Simba Code:
Program testP07;
{$DEFINE SMART8}
{$I SRL/SRL.Simba}
{$I P07Include.Simba}
{$i sps/sps.simba}
var //{path name}
//{delcare the sps variable}
ToAirAlter: tpointarray;
status: string;
//LOGIN INFO STUFF
Procedure P07_DeclarePlayer;
Begin
P07_PlayerName:='';
P07_PlayerPass:='';
End;
procedure CameraAdjust;
begin
P07_MakeCompassNorth;
wait(1000);
writeln('Is it north?');
P07_MakeCameraAngleHigh;
writeln('is it high');
end;
procedure AirAlterPath;
begin
ToAirAlter := [Point(260, 118), Point(261, 120), Point(259, 113), Point(259, 108), Point(254, 102), Point(251, 102), Point(247, 102), Point(240, 103), Point(235, 106), Point(231, 112), Point(229, 118), Point(228, 122), Point(230, 130), Point(232, 137), Point(234, 145), Point(233, 153), Point(233, 160), Point(233, 166), Point(232, 171), Point(232, 177), Point(230, 185), Point(231, 196), Point(229, 202), Point(226, 207), Point(225, 213), Point(223, 219), Point(222, 228), Point(223, 237), Point(223, 262), Point(213, 265), Point(201, 274), Point(192, 282), Point(185, 289), Point(179, 296), Point(170, 303), Point(161, 311), Point(155, 321), Point(149, 330), Point(138, 338), Point(129, 347), Point(125, 356)]
end;
procedure AirAlterWalk;
begin
AirAlterPath;
if sps_walkpath(ToAirAlter) then
status := 'walking to...'
else begin
status := 'failed walking to...';
writeln(status + ' + time runnning:' +timerunning);
end;
writeln(status + ' + time runnning:' +timerunning);
end;
Begin
SetupSRL();
P07_DeclarePlayer;
SetupP07Include;
ActivateClient;
Wait(2000);
If (Not P07_LoggedIn) Then
P07_LogInPlayer;
CameraAdjust;
srl_sixhourfix := true;
smart_fixspeed := true;
AirAlterPath; //{call path variables here}
//{Mistake I see a lot only call the map once, Not in the procedure}
//{If using multiple accounts it will always give an error when trying to pull the map}
sps_setup(runescape_other,['Air_Alter_Bank']);
clicknorth(srl_angle_high);
AirAlterWalk;
repeat
until(false)
end.