0wn 4 skill
2008-08-13 20:26:48
I have been making a script and I have got to the walking part. I want the script to walk some points which i have set in an array.
This Is the points i want it to walk.
And this is a procedure I tried with some half hearted help from some people on the SRL channel :p
If someone could write me a procedure to walk the paths and explain it with
// Notes
That would be more than helpful.
Thanx in Advance.
Function LoadPathsBank: TPointArray;
begin
SetLength(Result, 7);
Result[0] := Point(3104, 3433);
Result[1] := Point(3092, 3443);
Result[2] := Point(3090, 3454);
Result[3] := Point(3089, 3465);
Result[4] := Point(3098, 3473);
Result[5] := Point(3099, 3484);
Result[6] := Point(3094, 3490);
end;This Is the points i want it to walk.
And this is a procedure I tried with some half hearted help from some people on the SRL channel :p
Procedure WalkToBank;
Var
I: Integer;
Path: TPointArray;
Begin
If Not Loggedin then Exit;
Begin
Path := LoadPathsBank;
for i := 0 to High(Path) do
WalkToTile(Path[i], 3, 0);
end;
end;If someone could write me a procedure to walk the paths and explain it with
// Notes
That would be more than helpful.
Thanx in Advance.