hey, im just starting up scripting, i've got a power fisher working for myself right now. but im wondering which method of walking would be the easiest to do at barb village? (all the colors are basically the same)
im on the old school servers btw.
program SPSTut;
{$i srl/srl.simba}
{$i sps/sps.simba}
var
MyPath:TPointArray;
begin
SPS_Setup(RUNESCAPE_SURFACE,['10_7','10_6','11_7','11_6']);
myPath := [Point(4218, 2870), Point(4199, 2860),
Point(4181, 2848), Point(4167, 2836), Point(4157, 2820),
Point(4156, 2799), Point(4156, 2780), Point(4150, 2764),
Point(4143, 2746), Point(4127, 2737), Point(4113, 2719),
Point(4115, 2678), Point(4120, 2660), Point(4138, 2649),
Point(4154, 2641), Point(4167, 2640)]; //Path
SPS_WalkPath(myPath);
end.
-----------------
^made that via sps walking tool. but im getting this error
Error: Exception: The bitmap[0] does not exist at line 664
ONTOPIC OF DTM - here is where i get stuck
procedure SetRoadDTM(Time: Integer);
var
RMainPoint: TDTMPointDef; //The main point
DTMRSubPoints: Array of TDTMPointsDef; //The subpoints
RTDTM: TDTM; //The DDTM type
begin
if (Time = 1) then
SetArrayLength(DTMRSubPoints, 6)
else
SetArrayLength(DTMRSubPoints, 5);
function SetDDTM: Integer;
var
dtmMainPoint: TDTMPointDef;
dtmSubPoints: Array [0..4] of TDTMPointDef;
TempTDTM: TDTM;
begin
dtmMainPoint.x := 68;
dtmMainPoint.y := 69;
dtmMainPoint.AreaSize := 1;
dtmMainPoint.AreaShape := 0;
dtmMainPoint.Color := 1454414;
dtmMainPoint.Tolerance := 25;
dtmSubPoints[0].x := 68;
dtmSubPoints[0].y := 69;
dtmSubPoints[0].AreaSize := 1;
dtmSubPoints[0].AreaShape := 0;
dtmSubPoints[0].Color := 1454414;
dtmSubPoints[0].Tolerance := 25;
dtmSubPoints[1].x := 65;
dtmSubPoints[1].y := 61;
dtmSubPoints[1].AreaSize := 1;
dtmSubPoints[1].AreaShape := 0;
dtmSubPoints[1].Color := 1533023;
dtmSubPoints[1].Tolerance := 10;
dtmSubPoints[2].x := 59;
dtmSubPoints[2].y := 70;
dtmSubPoints[2].AreaSize := 1;
dtmSubPoints[2].AreaShape := 0;
dtmSubPoints[2].Color := 1730659;
dtmSubPoints[2].Tolerance := 10;
dtmSubPoints[3].x := 71;
dtmSubPoints[3].y := 75;
dtmSubPoints[3].AreaSize := 1;
dtmSubPoints[3].AreaShape := 0;
dtmSubPoints[3].Color := 1533023;
dtmSubPoints[3].Tolerance := 10;
dtmSubPoints[4].x := 78;
dtmSubPoints[4].y := 68;
dtmSubPoints[4].AreaSize := 1;
dtmSubPoints[4].AreaShape := 0;
dtmSubPoints[4].Color := 1533023;
dtmSubPoints[4].Tolerance := 10;
end;
RTDTM.MainPoint := RMainPoint;
RTDTM.SubPoints := DTMRSubPoints;
RoadDTM := AddDTM(RTDTM);
end;
[Error] (4:15): Unknown type 'TDTMPointDef' at line 3
any help/tips are appreciated.


Reply With Quote













