okokokok
2013-06-11 03:21:29
Hello guys,
Since i'm making a script for OSR, I'm trying to use DDTMs for walking.
When i make them it works like a charm, but when I try it out the other day… well i think you can guess what happens.
They are all messed up. Only a few are still working.
Does anyone have an idea why this is happening and what I can do about it?
I'll post the DDTM stuff down below. I'm using 35 tolerance btw. I have tried 40, but it seems to make no difference the next day.
I hope someone is able to help me. The part that I want to walk is:
[ATTACH=CONFIG]21653[/ATTACH]
greetz
Since i'm making a script for OSR, I'm trying to use DDTMs for walking.
When i make them it works like a charm, but when I try it out the other day… well i think you can guess what happens.
They are all messed up. Only a few are still working.
Does anyone have an idea why this is happening and what I can do about it?
I'll post the DDTM stuff down below. I'm using 35 tolerance btw. I have tried 40, but it seems to make no difference the next day.
Function LoadWalkToBankDDTMS(WalkNumber: Integer): Integer;
var
dtmMainPoint: TDTMPointDef;
dtmSubPoints: array[0..4] of TDTMPointDef;
TempTDTM: TDTM;
begin
case WalkNumber of
1: begin
dtmMainPoint.x := 635;
dtmMainPoint.y := 114;
dtmMainPoint.AreaSize := 1;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := 6186087;
dtmMainPoint.Tolerance := 35;
dtmSubPoints[0].x := 635;
dtmSubPoints[0].y := 114;
dtmSubPoints[0].AreaSize := 1;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := 6186087;
dtmSubPoints[0].Tolerance := 35;
dtmSubPoints[1].x := 640;
dtmSubPoints[1].y := 80;
dtmSubPoints[1].AreaSize := 1;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := 2183772;
dtmSubPoints[1].Tolerance := 35;
dtmSubPoints[2].x := 650;
dtmSubPoints[2].y := 122;
dtmSubPoints[2].AreaSize := 4;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := 15056560;
dtmSubPoints[2].Tolerance := 35;
dtmSubPoints[3].x := 667;
dtmSubPoints[3].y := 154;
dtmSubPoints[3].AreaSize := 1;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := 2309962;
dtmSubPoints[3].Tolerance := 35;
dtmSubPoints[4].x := 636;
dtmSubPoints[4].y := 156;
dtmSubPoints[4].AreaSize := 1;
dtmSubPoints[4].AreaShape := 0;
dtmSubPoints[4].Color := 2309962;
dtmSubPoints[4].Tolerance := 35;
TempTDTM.MainPoint := dtmMainPoint;
TempTDTM.SubPoints := dtmSubPoints;
Result := AddDTM(TempTDTM);
end;
2: begin
dtmMainPoint.x := 651;
dtmMainPoint.y := 142;
dtmMainPoint.AreaSize := 1;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := 6186087;
dtmMainPoint.Tolerance := 35;
dtmSubPoints[0].x := 651;
dtmSubPoints[0].y := 142;
dtmSubPoints[0].AreaSize := 1;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := 6186087;
dtmSubPoints[0].Tolerance := 35;
dtmSubPoints[1].x := 689;
dtmSubPoints[1].y := 152;
dtmSubPoints[1].AreaSize := 4;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := 14834990;
dtmSubPoints[1].Tolerance := 35;
dtmSubPoints[2].x := 625;
dtmSubPoints[2].y := 87;
dtmSubPoints[2].AreaSize := 1;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := 1128536;
dtmSubPoints[2].Tolerance := 35;
dtmSubPoints[3].x := 612;
dtmSubPoints[3].y := 149;
dtmSubPoints[3].AreaSize := 1;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := 2309962;
dtmSubPoints[3].Tolerance := 35;
dtmSubPoints[4].x := 670;
dtmSubPoints[4].y := 191;
dtmSubPoints[4].AreaSize := 1;
dtmSubPoints[4].AreaShape := 0;
dtmSubPoints[4].Color := 2309962;
dtmSubPoints[4].Tolerance := 35;
TempTDTM.MainPoint := dtmMainPoint;
TempTDTM.SubPoints := dtmSubPoints;
Result := AddDTM(TempTDTM);
end;
3: begin
dtmMainPoint.x := 614;
dtmMainPoint.y := 127;
dtmMainPoint.AreaSize := 1;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := 2643795;
dtmMainPoint.Tolerance := 35;
dtmSubPoints[0].x := 614;
dtmSubPoints[0].y := 127;
dtmSubPoints[0].AreaSize := 1;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := 2643795;
dtmSubPoints[0].Tolerance := 35;
dtmSubPoints[1].x := 609;
dtmSubPoints[1].y := 105;
dtmSubPoints[1].AreaSize := 1;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := 60909;
dtmSubPoints[1].Tolerance := 35;
dtmSubPoints[2].x := 617;
dtmSubPoints[2].y := 116;
dtmSubPoints[2].AreaSize := 1;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := 0;
dtmSubPoints[2].Tolerance := 35;
dtmSubPoints[3].x := 628;
dtmSubPoints[3].y := 151;
dtmSubPoints[3].AreaSize := 1;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := 2309962;
dtmSubPoints[3].Tolerance := 35;
dtmSubPoints[4].x := 667;
dtmSubPoints[4].y := 130;
dtmSubPoints[4].AreaSize := 1;
dtmSubPoints[4].AreaShape := 0;
dtmSubPoints[4].Color := 2309962;
dtmSubPoints[4].Tolerance := 35;
TempTDTM.MainPoint := dtmMainPoint;
TempTDTM.SubPoints := dtmSubPoints;
Result := AddDTM(TempTDTM);
end;
4: begin
dtmMainPoint.x := 642;
dtmMainPoint.y := 90;
dtmMainPoint.AreaSize := 3;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := 2508113;
dtmMainPoint.Tolerance := 255;
dtmSubPoints[0].x := 642;
dtmSubPoints[0].y := 90;
dtmSubPoints[0].AreaSize := 3;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := 2508113;
dtmSubPoints[0].Tolerance := 255;
dtmSubPoints[1].x := 642;
dtmSubPoints[1].y := 90;
dtmSubPoints[1].AreaSize := 3;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := 2508113;
dtmSubPoints[1].Tolerance := 40;
dtmSubPoints[2].x := 648;
dtmSubPoints[2].y := 107;
dtmSubPoints[2].AreaSize := 3;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := 60909;
dtmSubPoints[2].Tolerance := 40;
dtmSubPoints[3].x := 648;
dtmSubPoints[3].y := 75;
dtmSubPoints[3].AreaSize := 3;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := 195836;
dtmSubPoints[3].Tolerance := 40;
dtmSubPoints[4].x := 708;
dtmSubPoints[4].y := 93;
dtmSubPoints[4].AreaSize := 3;
dtmSubPoints[4].AreaShape := 0;
dtmSubPoints[4].Color := 471904;
dtmSubPoints[4].Tolerance := 40;
TempTDTM.MainPoint := dtmMainPoint;
TempTDTM.SubPoints := dtmSubPoints;
Result := AddDTM(TempTDTM);
end;
end;
end;
Function WalkToBank: Boolean;
var
x,y:Integer;
WalkDTM: integer;
begin
WalkDTM := LoadWalkToBankDDTMS(1);
if FindDTM(WalkDTM, X, Y, MMx1,MMy1,MMx2,MMy2) then
begin
Mouse(X, Y, 8, 8, True);
WriteLn('Point 1 done');
FFlag(0);
Result := True;
end
else
Writeln('Could not find point 1');
FreeDTM(WalkDTM);
WalkDTM := LoadWalkToBankDDTMS(2);
if FindDTM(WalkDTM, X, Y, MMx1,MMy1,MMx2,MMy2) then
begin
Mouse(X, Y, 8, 8, True);
WriteLn('Point 2 done');
FFlag(0);
Result := True;
end
else
Writeln('Could not find point 2');
FreeDTM(WalkDTM);
WalkDTM := LoadWalkToBankDDTMS(3);
if FindDTM(WalkDTM, X, Y, MMx1,MMy1,MMx2,MMy2) then
begin
Mouse(X, Y, 8, 8, True);
WriteLn('Point 3 done');
FFlag(0);
Result := True;
end
else
Writeln('Could not find point 3');
FreeDTM(WalkDTM);
WalkDTM := LoadWalkToBankDDTMS(4);
if FindDTM(WalkDTM, X, Y, MMx1,MMy1,MMx2,MMy2) then
begin
Mouse(X, Y, 8, 8, True);
WriteLn('Reached Bank');
FFlag(0);
Result := True;
end
else
Writeln('Could not find point 4');
FreeDTM(WalkDTM);
end;
function LoadWalkToHutDDTMS(WalkNumber: Integer): Integer;
var
dtmMainPoint: TDTMPointDef;
dtmSubPoints: array[0..8] of TDTMPointDef;
TempTDTM: TDTM;
begin
case WalkNumber of
1: begin
dtmMainPoint.x := 653;
dtmMainPoint.y := 175;
dtmMainPoint.AreaSize := 1;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := 2377293;
dtmMainPoint.Tolerance := 255;
dtmSubPoints[0].x := 653;
dtmSubPoints[0].y := 175;
dtmSubPoints[0].AreaSize := 1;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := 2377293;
dtmSubPoints[0].Tolerance := 255;
dtmSubPoints[1].x := 668;
dtmSubPoints[1].y := 172;
dtmSubPoints[1].AreaSize := 1;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := 241;
dtmSubPoints[1].Tolerance := 35;
dtmSubPoints[2].x := 682;
dtmSubPoints[2].y := 175;
dtmSubPoints[2].AreaSize := 1;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := 0;
dtmSubPoints[2].Tolerance := 35;
dtmSubPoints[3].x := 604;
dtmSubPoints[3].y := 150;
dtmSubPoints[3].AreaSize := 1;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := 6186343;
dtmSubPoints[3].Tolerance := 35;
dtmSubPoints[4].x := 654;
dtmSubPoints[4].y := 180;
dtmSubPoints[4].AreaSize := 1;
dtmSubPoints[4].AreaShape := 0;
dtmSubPoints[4].Color := 5334892;
dtmSubPoints[4].Tolerance := 35;
TempTDTM.MainPoint := dtmMainPoint;
TempTDTM.SubPoints := dtmSubPoints;
Result := AddDTM(TempTDTM);
end;
2: begin
dtmMainPoint.x := 662;
dtmMainPoint.y := 241;
dtmMainPoint.AreaSize := 3;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := 5922915;
dtmMainPoint.Tolerance := 35;
dtmSubPoints[0].x := 662;
dtmSubPoints[0].y := 241;
dtmSubPoints[0].AreaSize := 3;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := 5922915;
dtmSubPoints[0].Tolerance := 35;
dtmSubPoints[1].x := 705;
dtmSubPoints[1].y := 221;
dtmSubPoints[1].AreaSize := 3;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := 8011;
dtmSubPoints[1].Tolerance := 35;
dtmSubPoints[2].x := 714;
dtmSubPoints[2].y := 225;
dtmSubPoints[2].AreaSize := 3;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := 0;
dtmSubPoints[2].Tolerance := 35;
dtmSubPoints[3].x := 691;
dtmSubPoints[3].y := 253;
dtmSubPoints[3].AreaSize := 3;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := 15263733;
dtmSubPoints[3].Tolerance := 35;
dtmSubPoints[4].x := 650;
dtmSubPoints[4].y := 256;
dtmSubPoints[4].AreaSize := 3;
dtmSubPoints[4].AreaShape := 0;
dtmSubPoints[4].Color := 232;
dtmSubPoints[4].Tolerance := 35;
TempTDTM.MainPoint := dtmMainPoint;
TempTDTM.SubPoints := dtmSubPoints;
Result := AddDTM(TempTDTM);
end;
3: begin
dtmMainPoint.x := 642;
dtmMainPoint.y := 222;
dtmMainPoint.AreaSize := 3;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := 5922915;
dtmMainPoint.Tolerance := 35;
dtmSubPoints[0].x := 642;
dtmSubPoints[0].y := 222;
dtmSubPoints[0].AreaSize := 3;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := 5922915;
dtmSubPoints[0].Tolerance := 35;
dtmSubPoints[1].x := 637;
dtmSubPoints[1].y := 194;
dtmSubPoints[1].AreaSize := 3;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := 232;
dtmSubPoints[1].Tolerance := 35;
dtmSubPoints[2].x := 652;
dtmSubPoints[2].y := 204;
dtmSubPoints[2].AreaSize := 3;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := 279322;
dtmSubPoints[2].Tolerance := 35;
dtmSubPoints[3].x := 676;
dtmSubPoints[3].y := 234;
dtmSubPoints[3].AreaSize := 3;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := 232;
dtmSubPoints[3].Tolerance := 35;
dtmSubPoints[4].x := 670;
dtmSubPoints[4].y := 238;
dtmSubPoints[4].AreaSize := 3;
dtmSubPoints[4].AreaShape := 0;
dtmSubPoints[4].Color := 15263733;
dtmSubPoints[4].Tolerance := 35;
TempTDTM.MainPoint := dtmMainPoint;
TempTDTM.SubPoints := dtmSubPoints;
Result := AddDTM(TempTDTM);
end;
4: begin
dtmMainPoint.x := 660;
dtmMainPoint.y := 244;
dtmMainPoint.AreaSize := 3;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := 6054501;
dtmMainPoint.Tolerance := 35;
dtmSubPoints[0].x := 660;
dtmSubPoints[0].y := 244;
dtmSubPoints[0].AreaSize := 3;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := 6054501;
dtmSubPoints[0].Tolerance := 35;
dtmSubPoints[1].x := 626;
dtmSubPoints[1].y := 210;
dtmSubPoints[1].AreaSize := 3;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := 2963808;
dtmSubPoints[1].Tolerance := 35;
dtmSubPoints[2].x := 643;
dtmSubPoints[2].y := 203;
dtmSubPoints[2].AreaSize := 3;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := 228;
dtmSubPoints[2].Tolerance := 35;
dtmSubPoints[3].x := 697;
dtmSubPoints[3].y := 237;
dtmSubPoints[3].AreaSize := 3;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := 600898;
dtmSubPoints[3].Tolerance := 35;
dtmSubPoints[4].x := 726;
dtmSubPoints[4].y := 240;
dtmSubPoints[4].AreaSize := 3;
dtmSubPoints[4].AreaShape := 0;
dtmSubPoints[4].Color := 8011;
dtmSubPoints[4].Tolerance := 35;
TempTDTM.MainPoint := dtmMainPoint;
TempTDTM.SubPoints := dtmSubPoints;
Result := AddDTM(TempTDTM);
end;
5: begin
dtmMainPoint.x := 637;
dtmMainPoint.y := 183;
dtmMainPoint.AreaSize := 3;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := 4283758;
dtmMainPoint.Tolerance := 35;
dtmSubPoints[0].x := 637;
dtmSubPoints[0].y := 183;
dtmSubPoints[0].AreaSize := 3;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := 4283758;
dtmSubPoints[0].Tolerance := 35;
dtmSubPoints[1].x := 653;
dtmSubPoints[1].y := 151;
dtmSubPoints[1].AreaSize := 3;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := 3028579;
dtmSubPoints[1].Tolerance := 35;
dtmSubPoints[2].x := 659;
dtmSubPoints[2].y := 147;
dtmSubPoints[2].AreaSize := 3;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := 243;
dtmSubPoints[2].Tolerance := 35;
dtmSubPoints[3].x := 679;
dtmSubPoints[3].y := 149;
dtmSubPoints[3].AreaSize := 3;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := 8011;
dtmSubPoints[3].Tolerance := 35;
dtmSubPoints[4].x := 674;
dtmSubPoints[4].y := 161;
dtmSubPoints[4].AreaSize := 3;
dtmSubPoints[4].AreaShape := 0;
dtmSubPoints[4].Color := 15332850;
dtmSubPoints[4].Tolerance := 35;
TempTDTM.MainPoint := dtmMainPoint;
TempTDTM.SubPoints := dtmSubPoints;
Result := AddDTM(TempTDTM);
end;
6: begin
dtmMainPoint.x := 676;
dtmMainPoint.y := 155;
dtmMainPoint.AreaSize := 3;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := 4152172;
dtmMainPoint.Tolerance := 35;
dtmSubPoints[0].x := 676;
dtmSubPoints[0].y := 155;
dtmSubPoints[0].AreaSize := 3;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := 4152172;
dtmSubPoints[0].Tolerance := 35;
dtmSubPoints[1].x := 646;
dtmSubPoints[1].y := 157;
dtmSubPoints[1].AreaSize := 3;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := 600898;
dtmSubPoints[1].Tolerance := 35;
dtmSubPoints[2].x := 653;
dtmSubPoints[2].y := 202;
dtmSubPoints[2].AreaSize := 3;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := 600898;
dtmSubPoints[2].Tolerance := 35;
dtmSubPoints[3].x := 702;
dtmSubPoints[3].y := 167;
dtmSubPoints[3].AreaSize := 3;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := 239;
dtmSubPoints[3].Tolerance := 35;
dtmSubPoints[4].x := 722;
dtmSubPoints[4].y := 162;
dtmSubPoints[4].AreaSize := 3;
dtmSubPoints[4].AreaShape := 0;
dtmSubPoints[4].Color := 8011;
dtmSubPoints[4].Tolerance := 35;
TempTDTM.MainPoint := dtmMainPoint;
TempTDTM.SubPoints := dtmSubPoints;
Result := AddDTM(TempTDTM);
end;
7: begin
dtmMainPoint.x := 635;
dtmMainPoint.y := 199;
dtmMainPoint.AreaSize := 3;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := 875350;
dtmMainPoint.Tolerance := 35;
dtmSubPoints[0].x := 635;
dtmSubPoints[0].y := 199;
dtmSubPoints[0].AreaSize := 3;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := 875350;
dtmSubPoints[0].Tolerance := 35;
dtmSubPoints[1].x := 680;
dtmSubPoints[1].y := 197;
dtmSubPoints[1].AreaSize := 3;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := 236;
dtmSubPoints[1].Tolerance := 35;
dtmSubPoints[2].x := 730;
dtmSubPoints[2].y := 230;
dtmSubPoints[2].AreaSize := 3;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := 8011;
dtmSubPoints[2].Tolerance := 35;
dtmSubPoints[3].x := 711;
dtmSubPoints[3].y := 233;
dtmSubPoints[3].AreaSize := 3;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := 236;
dtmSubPoints[3].Tolerance := 35;
dtmSubPoints[4].x := 638;
dtmSubPoints[4].y := 216;
dtmSubPoints[4].AreaSize := 3;
dtmSubPoints[4].AreaShape := 0;
dtmSubPoints[4].Color := 279322;
dtmSubPoints[4].Tolerance := 35;
TempTDTM.MainPoint := dtmMainPoint;
TempTDTM.SubPoints := dtmSubPoints;
Result := AddDTM(TempTDTM);
end;
8: begin
dtmMainPoint.x := 623;
dtmMainPoint.y := 177;
dtmMainPoint.AreaSize := 3;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := 1651786;
dtmMainPoint.Tolerance := 35;
dtmSubPoints[0].x := 623;
dtmSubPoints[0].y := 177;
dtmSubPoints[0].AreaSize := 3;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := 1651786;
dtmSubPoints[0].Tolerance := 35;
dtmSubPoints[1].x := 614;
dtmSubPoints[1].y := 204;
dtmSubPoints[1].AreaSize := 3;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := 72721;
dtmSubPoints[1].Tolerance := 35;
dtmSubPoints[2].x := 626;
dtmSubPoints[2].y := 200;
dtmSubPoints[2].AreaSize := 3;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := 2713145;
dtmSubPoints[2].Tolerance := 35;
dtmSubPoints[3].x := 629;
dtmSubPoints[3].y := 169;
dtmSubPoints[3].AreaSize := 3;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := 0;
dtmSubPoints[3].Tolerance := 35;
dtmSubPoints[4].x := 644;
dtmSubPoints[4].y := 178;
dtmSubPoints[4].AreaSize := 3;
dtmSubPoints[4].AreaShape := 0;
dtmSubPoints[4].Color := 600898;
dtmSubPoints[4].Tolerance := 35;
TempTDTM.MainPoint := dtmMainPoint;
TempTDTM.SubPoints := dtmSubPoints;
Result := AddDTM(TempTDTM);
end;
end;
end;
Function WalkToHut: Boolean;
var
x,y:Integer;
WalkDTM: integer;
begin
WalkDTM := LoadWalkToHutDDTMS(1);
if FindDTM(WalkDTM, X, Y, MMx1,MMy1,MMx2,MMy2) then
begin
Mouse(X, Y, 8, 8, True);
WriteLn('Point 1 done');
FFlag(0);
Result := True;
end
else
Writeln('Could not find point 1');
FreeDTM(WalkDTM);
WalkDTM := LoadWalkToHutDDTMS(2);
if FindDTM(WalkDTM, X, Y, MMx1,MMy1,MMx2,MMy2) then
begin
Mouse(X, Y, 8, 8, True);
WriteLn('Point 2 done');
FFlag(0);
Result := True;
end
else
Writeln('Could not find point 2');
FreeDTM(WalkDTM);
WalkDTM := LoadWalkToHutDDTMS(3);
if FindDTM(WalkDTM, X, Y, MMx1,MMy1,MMx2,MMy2) then
begin
Mouse(X, Y, 8, 8, True);
WriteLn('Point 3 done');
FFlag(0);
Result := True;
end
else
Writeln('Could not find point 3');
FreeDTM(WalkDTM);
WalkDTM := LoadWalkToHutDDTMS(4);
if FindDTM(WalkDTM, X, Y, MMx1,MMy1,MMx2,MMy2) then
begin
Mouse(X, Y, 8, 8, True);
WriteLn('Point 4 done');
FFlag(0);
Result := True;
end
else
Writeln('Could not find point 4');
FreeDTM(WalkDTM);
WalkDTM := LoadWalkToHutDDTMS(5);
if FindDTM(WalkDTM, X, Y, MMx1,MMy1,MMx2,MMy2) then
begin
Mouse(X, Y, 8, 8, True);
WriteLn('Point 5 done');
FFlag(0);
Result := True;
end
else
Writeln('Could not find point 5');
FreeDTM(WalkDTM);
WalkDTM := LoadWalkToHutDDTMS(6);
if FindDTM(WalkDTM, X, Y, MMx1,MMy1,MMx2,MMy2) then
begin
Mouse(X, Y, 8, 8, True);
WriteLn('Point 6 done');
FFlag(0);
Result := True;
end
else
Writeln('Could not find point 6');
FreeDTM(WalkDTM);
WalkDTM := LoadWalkToHutDDTMS(7);
if FindDTM(WalkDTM, X, Y, MMx1,MMy1,MMx2,MMy2) then
begin
Mouse(X, Y, 8, 8, True);
WriteLn('Point 7 done');
FFlag(0);
Result := True;
end
else
Writeln('Could not find point 7');
FreeDTM(WalkDTM);
WalkDTM := LoadWalkToHutDDTMS(8);
if FindDTM(WalkDTM, X, Y, MMx1,MMy1,MMx2,MMy2) then
begin
Mouse(X, Y, 8, 8, True);
WriteLn('Reached Hut');
FFlag(0);
Result := True;
end
else
Writeln('Could not find point 8');
FreeDTM(WalkDTM);
end; I hope someone is able to help me. The part that I want to walk is:
[ATTACH=CONFIG]21653[/ATTACH]
greetz