Simba Code:
program TestSPSWalk; //Success, fairly fluent in SPS now.
//{$DEFINE SMART8}
//{$i P07Include.simba}
{$i SRL-OSR/SRL.simba}
{$i SPS/sps-osr.simba}
var x,y: integer;
corePath1,corePath2: TPointArray;
procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
Players[0].Name := '';
Players[0].Pass := '';
Players[0].Nick := '';
Players[0].Active:=True;
end;
procedure Walk;
begin
corePath1 := [Point(183, 163), Point(178, 163), Point(173, 164), Point(172, 172), Point(174, 177), Point(173, 184), Point(174, 191), Point(174, 198), Point(173, 203), Point(171, 210), Point(172, 215), Point(172, 221), Point(175, 229), Point(176, 237), Point(176, 241), Point(178, 247), Point(179, 253), Point(177, 262), Point(174, 266), Point(169, 270), Point(167, 272), Point(161, 274), Point(156, 277), Point(148, 284), Point(147, 289), Point(143, 293), Point(136, 297), Point(133, 303), Point(131, 308), Point(125, 312), Point(121, 318), Point(118, 324), Point(111, 328), Point(105, 332), Point(100, 334), Point(92, 334), Point(85, 334), Point(77, 333), Point(69, 332), Point(63, 331), Point(55, 328), Point(47, 328), Point(42, 328), Point(35, 328), Point(27, 328), Point(18, 328), Point(11, 328), Point(3, 328), Point(2, 351), Point(7, 350), Point(12, 352), Point(17, 352), Point(21, 351), Point(26, 351), Point(31, 354), Point(36, 353)];
//corePath2 := [Point(2732, 2768), Point(2732, 2772), Point(2733, 2782), Point(2733, 2730)];
MakeCompass(5);
SPS_Tolerance := 300;
SPS_Accuracy := 3;
SPS_AnyAngle := True;
SPS_Setup(runescape_surface, ['6_8']);
WriteLn(SPS_GetMyPos);
SPS_WalkPath(corePath1);
//SPS_Setup(runescape_surface, ['VIronMap']);
//SPS_WalkPath(corePath2);
end;
begin
//SetupSRL;
DeclarePlayers;
LoginPlayer;
ActivateClient;
Walk;
end.