Okies .. I tried re-making it. It worked GREAT the first time .. now it works like ass
SCAR Code:
procedure LoadBurnSiteDDTM;
var
dtmMainPoint: TDTMPointDef;
dtmSubPoints: Array [0..5] of TDTMPointDef;
MasterTDTM: TDTM;
BurnSiteDDTM: integer;
begin
dtmMainPoint.x := 39;
dtmMainPoint.y := 75;
dtmMainPoint.AreaSize := 1;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := 1795933;
dtmMainPoint.Tolerance := 255;
dtmSubPoints[0].x := 20;
dtmSubPoints[0].y := 64;
dtmSubPoints[0].AreaSize := 1;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := 2441069;
dtmSubPoints[0].Tolerance := 20;
dtmSubPoints[1].x := 24;
dtmSubPoints[1].y := 89;
dtmSubPoints[1].AreaSize := 1;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := 2441069;
dtmSubPoints[1].Tolerance := 20;
dtmSubPoints[2].x := 24;
dtmSubPoints[2].y := 106;
dtmSubPoints[2].AreaSize := 1;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := 2441069;
dtmSubPoints[2].Tolerance := 20;
dtmSubPoints[3].x := 59;
dtmSubPoints[3].y := 102;
dtmSubPoints[3].AreaSize := 1;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := 1133959;
dtmSubPoints[3].Tolerance := 20;
dtmSubPoints[4].x := 55;
dtmSubPoints[4].y := 119;
dtmSubPoints[4].AreaSize := 1;
dtmSubPoints[4].AreaShape := 0;
dtmSubPoints[4].Color := 1133959;
dtmSubPoints[4].Tolerance := 20;
dtmSubPoints[5].x := 47;
dtmSubPoints[5].y := 70;
dtmSubPoints[5].AreaSize := 1;
dtmSubPoints[5].AreaShape := 0;
dtmSubPoints[5].Color := 15594479;
dtmSubPoints[5].Tolerance := 20;
MasterTDTM.MainPoint := dtmMainPoint;
MasterTDTM.SubPoints := dtmSubPoints;
BurnSiteDDTM := AddDTM(MasterTDTM);
end;
SCAR Code:
procedure WalkToBurnSite;
begin
if not(LoggedIn)then exit;
FindNormalRandoms;
RadialRoadWalk(findVarrockRoadColor, 265, 275, 40, -1, 0);
Wait(2000 + Random(210));
if DTMRotated(BurnSiteDDTM, x, y, MMX1, MMY1, MMX2, MMY2)then
begin
Mouse(x, y, 1, 1, True);
Wait(2000 + Random(210));
end;
FreeDTM(BurnSiteDDTM);
end;
Anyone see any glaring errors??
EDIT: Jeezus .. I've been doing this the hard way - I just found Nielsie's DDTM Editor. I will play some more with this.