Hey I would like to help out with Calibration or walking, this looks soo promising so I would love to get in, here is a sample of my work in my not-so-secret-anymore MultiLog Draynor Chopper :P
This piece walks to the trees north north west of the bank :P
procedure WalkToNormal;
Begin
If(FindSymbolIn(tx, ty, 'bank', 614, 62, 669, 107)) Then
Begin
If(FindSymbol(tx, ty, 'dungeon')) Then
Begin
Exit;
end;
RoadColor := FindRoadColor;
If(FindSymbol(tx, ty, 'quest')) Then
Begin
Status('Found Quest Symbol.');
Mouse(tx, ty, 10, 10, True);
FFlag(1);
If(FindSymbol(tx, ty, 'dungeon')) Then
Begin
Status('Found Dungeon Symbol.');
Mouse(tx - 7, ty + 12, 6, 6, True);
wait(4000+Random(2000));
end else
begin
Status('Didn''t Find Dungeon Symbol.');
Status('Going to "Blind" click.');
Mouse(670, 34, 10, 10, True);
FFlag(1);
DungeonCal;
Exit;
end;
end;
If Not(FindSymbol(tx, ty, 'quest')) Then
Begin
Status('Walking by RadialRoadWalk.');
RadialRoadWalk(RoadColor, 285, 311, 70, 3, 3);
FFlag(1);
If(FindSymbol(tx, ty, 'quest')) Then
Begin
Status('Found Quest Symbol.');
Mouse(tx, ty, 6, 6, True);
FFlag(1);
Status('Searching for Dungeon Symbol');
If(FindSymbol(tx, ty, 'dungeon')) Then
Begin
Status('Found Dungeon Symbol.');
Mouse(tx - 7, ty + 12, 6, 6, True);
FFlag(1);
WriteLn('Successfully made it to Normal Trees!');
end else
begin
Status('Didn''t Find Dungeon Symbol.');
Mouse(655, 27, 10, 10, True);
FFlag(1);
If(FindSymbol(tx, ty, 'dungeon')) Then
Begin
Status('Successfully made it to Normal Trees!');
Exit;
end;
end;
end;
end;
end;
end;
and for staying in the forest I had the procedure DungeonCal;
procedure DungeonCal;
Begin
MakeCompass('N');
Status('Checking Location.');
If Not(FindSymbolIn(tx, ty, 'dungeon', 621, 50, 699, 111))Then
Begin
If(FindSYmbol(tx, ty, 'dungeon')) Then
Begin
WriteLn('Callibrating by Dungeon Symbol');
Mouse(tx - 10+Random(2), ty + 15+Random(2), 6, 6, True);
FFlag(1);
WriteLn('Successfully Callibrated');
end else
Begin
WriteLn('Couldn''t Find Dungeon Symbol on MM.');
end;
end else
Begin
Status('Within Distance of Dungeon Symbol');
end;
end;