Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- program unFuckedAgil;
- {$DEFINE WALKER}
- {$i AeroLib/AeroLib.Simba}
- //For Varrock
- var
- RSW: TRSWalker;
- t : UInt32;
- procedure Walk;
- begin
- RSW.Init('world.png');
- //RSW.walkStyle := wsSPS; //works similarly to how SPS would walk the path
- //RSW.anyAngle := True; //`True` if you are not walking with compass facing north
- //RSW.skipClose := 15;
- writeln('initated world.png');
- end
- procedure getLoc;
- var
- Loc: TPoint;
- begin
- Loc := RSW.GetMyPos;
- writeln('Current location is:', Loc);
- wait(1000);
- end
- begin
- walk();
- repeat
- getLoc();
- until(false)
- end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement