My DDTMWalk function, ive looked through it, ive done everything that i can do, but it keeps comming up when i try to run my scripthere is the function:SCAR Code:Failed when compiling
Line 127: [Error] (27669:1): Syntax error in script C:\Program Files\SCAR 3.21\Scripts\my catherby woodcutter v1.1.scarSCAR Code:function DDTMWalk(BankWalkNumber: Integer): Integer; //<--this is where the syntax error is called
var
dtmMainPoint: TDTMPointDef;
dtmSubPoints: Array [0..4] of TDTMPointDef;
TempTDTM: TDTM;
case BankWalkNumber of
1: begin
dtmMainPoint.x := 938;
dtmMainPoint.y := 269;
dtmMainPoint.AreaSize := 5;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := FindDDTMColor(1);
dtmMainPoint.Tolerance := 10;
dtmSubPoints[0].x := 938;
dtmSubPoints[0].y := 269;
dtmSubPoints[0].AreaSize := 5;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := FindDDTMColor(1);
dtmSubPoints[0].Tolerance := 10;
dtmSubPoints[1].x := 939;
dtmSubPoints[1].y := 268;
dtmSubPoints[1].AreaSize := 0;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := FindDDTMColor(1);
dtmSubPoints[1].Tolerance := 0;
dtmSubPoints[2].x := 937;
dtmSubPoints[2].y := 269;
dtmSubPoints[2].AreaSize := 0;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := FindDDTMColor(1);
dtmSubPoints[2].Tolerance := 0;
dtmSubPoints[3].x := 938;
dtmSubPoints[3].y := 270;
dtmSubPoints[3].AreaSize := 0;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := FindDDTMColor(1);
dtmSubPoints[3].Tolerance := 0;
TempTDTM.MainPoint := dtmMainPoint;
TempTDTM.SubPoints := dtmSubPoints;
Result := AddDTM(TempTDTM);
end;
2: begin
dtmMainPoint.x := 924;
dtmMainPoint.y := 223;
dtmMainPoint.AreaSize := 8;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := FindDDTMColor(2);
dtmMainPoint.Tolerance := 10;
dtmSubPoints[0].x := 924;
dtmSubPoints[0].y := 223;
dtmSubPoints[0].AreaSize := 8;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := FindDDTMColor(2);
dtmSubPoints[0].Tolerance := 10;
dtmSubPoints[1].x := 924;
dtmSubPoints[1].y := 220;
dtmSubPoints[1].AreaSize := 0;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := FindDDTMColor(2);
dtmSubPoints[1].Tolerance := 0;
dtmSubPoints[2].x := 928;
dtmSubPoints[2].y := 225;
dtmSubPoints[2].AreaSize := 0;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := FindDDTMColor(2);
dtmSubPoints[2].Tolerance := 0;
dtmSubPoints[3].x := 922;
dtmSubPoints[3].y := 224;
dtmSubPoints[3].AreaSize := 0;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := FindDDTMColor(2);
dtmSubPoints[3].Tolerance := 0;
TempTDTM.MainPoint := dtmMainPoint;
TempTDTM.SubPoints := dtmSubPoints;
Result := AddDTM(TempTDTM);
end;
3: begin
dtmMainPoint.x := 904;
dtmMainPoint.y := 324;
dtmMainPoint.AreaSize := 11;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := FindDDTMColor(3);
dtmMainPoint.Tolerance := 10;
dtmSubPoints[0].x := 904;
dtmSubPoints[0].y := 324;
dtmSubPoints[0].AreaSize := 11;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := FindDDTMColor(3);
dtmSubPoints[0].Tolerance := 10;
dtmSubPoints[1].x := 910;
dtmSubPoints[1].y := 322;
dtmSubPoints[1].AreaSize := 0;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := FindDDTMColor(3);
dtmSubPoints[1].Tolerance := 0;
dtmSubPoints[2].x := 905;
dtmSubPoints[2].y := 326;
dtmSubPoints[2].AreaSize := 0;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := FindDDTMColor(3);
dtmSubPoints[2].Tolerance := 0;
dtmSubPoints[3].x := 903;
dtmSubPoints[3].y := 321;
dtmSubPoints[3].AreaSize := 0;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := FindDDTMColor(3);
dtmSubPoints[3].Tolerance := 0;
TempTDTM.MainPoint := dtmMainPoint;
TempTDTM.SubPoints := dtmSubPoints;
Result := AddDTM(TempTDTM);
end;
4: begin
dtmMainPoint.x := 916;
dtmMainPoint.y := 276;
dtmMainPoint.AreaSize := 6;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := FindDDTMColor(4);
dtmMainPoint.Tolerance := 10;
dtmSubPoints[0].x := 916;
dtmSubPoints[0].y := 276;
dtmSubPoints[0].AreaSize := 6;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := FindDDTMColor(4);
dtmSubPoints[0].Tolerance := 10;
dtmSubPoints[1].x := 912;
dtmSubPoints[1].y := 275;
dtmSubPoints[1].AreaSize := 0;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := FindDDTMColor(4);
dtmSubPoints[1].Tolerance := 0;
dtmSubPoints[2].x := 918;
dtmSubPoints[2].y := 276;
dtmSubPoints[2].AreaSize := 0;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := FindDDTMColor(4);
dtmSubPoints[2].Tolerance := 0;
dtmSubPoints[3].x := 915;
dtmSubPoints[3].y := 278;
dtmSubPoints[3].AreaSize := 0;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := FindDDTMColor(4);
dtmSubPoints[3].Tolerance := 0;
TempTDTM.MainPoint := dtmMainPoint;
TempTDTM.SubPoints := dtmSubPoints;
Result := AddDTM(TempTDTM);
end;
5: begin
dtmMainPoint.x := 924;
dtmMainPoint.y := 232;
dtmMainPoint.AreaSize := 10;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := FindDDTMColor(5);
dtmMainPoint.Tolerance := 10;
dtmSubPoints[0].x := 924;
dtmSubPoints[0].y := 232;
dtmSubPoints[0].AreaSize := 10;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := FindDDTMColor(5);
dtmSubPoints[0].Tolerance := 10;
dtmSubPoints[1].x := 927;
dtmSubPoints[1].y := 234;
dtmSubPoints[1].AreaSize := 0;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := FindDDTMColor(5);
dtmSubPoints[1].Tolerance := 0;
dtmSubPoints[2].x := 929;
dtmSubPoints[2].y := 231;
dtmSubPoints[2].AreaSize := 0;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := FindDDTMColor(5);
dtmSubPoints[2].Tolerance := 0;
dtmSubPoints[3].x := 928;
dtmSubPoints[3].y := 228;
dtmSubPoints[3].AreaSize := 0;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := FindDDTMColor(5);
dtmSubPoints[3].Tolerance := 0;
TempTDTM.MainPoint := dtmMainPoint;
TempTDTM.SubPoints := dtmSubPoints;
Result := AddDTM(TempTDTM);
end;
end;






Reply With Quote










