Version 2.5.7 has been released now.
Whats new:
- I've update a codegen, this generated a completed script now.(See example)
- Codegen reduced to SRL coding standards.
- Minor fixes
Script example:
program Walker;
//The code was generated with the path generator for SPS version 2.5.7 by Cynic
{$DEFINE SMART}
{$i SRL/srl.simba}
{$i sps/sps.simba}
var
//place your variables here
Status: string;
procedure DeclarePlayers;
begin
HowManyPlayers:=1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer:=0;
with Players[0] do
begin
Name:='';
Pass:='';
BoxRewards:=[''];
LampSkill:=SKILL_PRAYER;
Pin:='';
Active:=true;
end;
end;
procedure SeersToCatherby;
var
SeersToCatherbyVar: TPointArray;
begin
SeersToCatherbyVar:=[Point(2593,2710),Point(2633,2714),Point(2663,2712),Point(2700,2708),Point(2721,2709),Point(2760,2713),Point(2798,2729),Point(2820,2732),Point(2861,2746),Point(2881,2762),Point(2896,2791),Point(2904,2807),Point(2921,2822),Point(2933,2842),Point(2954,2861),Point(2979,2885),Point(2994,2904),Point(3011,2918),Point(3034,2921),Point(3057,2915),Point(3066,2912),Point(3073,2895)];
if SPS_WalkPath(SeersToCatherbyVar) then
Status := 'SeersToCatherby'
else begin
Status :='Failed SeersToCatherby';
WriteLn(status + '#Time Running:' +TimeRunning);
Logout;
TerminateScript;
end;
WriteLn(status + '#Time Running:' +TimeRunning);
end;
procedure CatherbyToCamelot;
var
CatherbyToCamelotVar: TPointArray;
begin
CatherbyToCamelotVar:=[Point(3076,2889),Point(3065,2907),Point(3051,2914),Point(3042,2919),Point(3027,2921),Point(3008,2915),Point(2992,2897),Point(2975,2880),Point(2951,2858),Point(2940,2844),Point(2927,2826),Point(2917,2813),Point(2907,2804),Point(2900,2795),Point(2894,2783),Point(2892,2776),Point(2881,2760),Point(2867,2743),Point(2869,2731),Point(2867,2712)];
if SPS_WalkPath(CatherbyToCamelotVar) then
Status := 'CatherbyToCamelot'
else begin
Status :='Failed CatherbyToCamelot';
WriteLn(status + '#Time Running:' +TimeRunning);
Logout;
TerminateScript;
end;
WriteLn(status + '#Time Running:' +TimeRunning);
end;
procedure SetupWalker;
begin
SRL_SIXHOURFIX := TRUE;
SMART_FIXSPEED := TRUE;
SetupSRL;
DeclarePlayers;
LoginPlayer;
Wait(774+ Random(277));
ClickNorth(SRL_ANGLE_HIGH);
SPS_Setup(RUNESCAPE_SURFACE,['6_6','7_6','7_7']);
end;
begin
SetupWalker;
SeersToCatherby;
CatherbyToCamelot;
end.
Cheers,
Cynic.