SCAR Code:
program New;
{.incldue SRL/SRL.scar}
{.include SRL/SRL/Extended/xMapWalk.scar}
procedure BobAxeTrip;
begin
GameTab(7)
Wait(1000 + Random(500));
MouseBox(573, 234, 582, 244, 1);
Wait(1000 + Random(500));
GameTab(4)
Wait(7000 + Random(2000));
repeat
if(FindMMDtm(DTM1, x, y))then
begin
until(Mouse(x, y, 2, 2, True))
FFlag(5)
repeat
if(FindMMDtm(DTM2, x, y))then
begin
until(Mouse(x, y, 2, 2, True))
Wait(3000 + Random(1000));
MouseBox(575, 217, 590, 236, 1);
repeat
if(FindMMColor(x, y, 1976445))or
FindMMColor(x, y, 596302))or
FindMMColor(x, y, 164618))then
MMouse(x, y, 2, 2);
until(IsUpText('Bob'))
Mouse(x, y, 2, 2, True);
MakeCompass('N');
Wait(1000 + Random(500));
MMouse(585, 98, 2, 2);
RoadWalkTol(6381672, 'NE',5);
RoadWalkTol(6381672, 'E',5);
RoadWalkTol(6381672, 'N',5);
RoadWalkTol(6381672, 'NW',5);
RoadWalkTol(6381672, 'N',5);
RoadWalkTol(6381672, 'NW',5);
RoadWalkTol(6381672, 'N',5);
RoadWalkTol(3299950, 'NW',5);
RoadWalkTol(12029563, 'NW',5);
RoadWalkTol(12029563, 'NW',5);
RoadWalkTol(6184549, 'NW',5);
RoadWalkTol(12029563, 'NW',5);
RoadWalkTol(1995900, 'NE',5);
end;
end;
end;
begin
SetupSRL;
BobAxeTrip;
end.