SRL Archive - OSR Help

Can someone explain to me why the sps does nothing:

program CowSlayer;
{$DEFINE SMART} // This is how we include SMART; it HAS to be called BEFORE SRL!
{$i srl/srl.simba}
{$i sps/sps.simba}



Var
  LevelsGained: Integer;





procedure DeclarePlayers;
begin
  HowManyPlayers := 1; // This is set to the total amount of players 
  NumberOfPlayers(HowManyPlayers); // 
  CurrentPlayer := 0; // 
  Players[0].Name := ''; // Username
  Players[0].Pass := ''; // Password
  Players[0].Nick := ''; // 3-4 lowercase letters from username; used for random event detection
  Players[0].Active := True; // Set to true if you want to use Player 0
  Players[0].Pin := ''; // Leave blank if the player doesn't have a bank pin
  Players[0].BoxRewards := ['XP'];
end;


procedure Deployment;
var
  myPathVar: TPointArray;
begin
  SPS_Setup(RUNESCAPE_SURFACE, ['10_6']);
  myPathVar:= [Point(165,227),Point(151,250),Point(162,271),Point(171,290),Point(169,311),Point(172,323)];
  wait(RandomRange(500,800));
  SPS_WalkPath(myPathVar);
end;



Function Findguy: Boolean;     //////Thanks to NEMESIS3X\\\\\\

Var
   x, y: Integer;
   TPAA: T2DPointArray; // The Variables of the Functions
   TPA: TPointArray;
   CTS, I, Retry: Integer;
Begin
  CTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  FindColorsSpiralTolerance(MSCX, MSCY, TPA, randomcolorignor4now, MSX1, MSY1, MSX2, MSY2, 7); // Enter the Color and Tolerance Here at the Right place.
  ColorToleranceSpeed(CTS);
  TPAA := TPAToATPAEx(TPA, 3, 1); //Put the Width and Heigh here
  SortATPASize(TPAA, True);
  For I := 0 To High(TPAA) Do
    If GetArraylength(TPAA[i]) > 5 Then // Set How Many Points you need for your function to take Action
    Begin
    repeat
      inc(Retry);
      MiddleTPAEx(TPAA[i], x, y);
      MMouse(x, y, 3, 3);
       if (IsUpTextMultiCustom(['', ''])) then // Enter The name of Your NPC or Monster
      Begin
        Result := True;
        GetMousePos(x, y);
        mouse(x,y,3,3,true);
        wait(100 + random(200));
      wait(5000 + random(1000));
        Break;
      End;
      until (Retry = 2);
      Break;
      end;
      end;


begin
  {$IFDEF SIMBAMAJOR980}
    SMART_SERVER := 24;
    SMART_MEMBERS := TRUE;
    SMART_SIGNED := TRUE;
    SMART_SUPERDETAIL := FALSE;
  {$ELSE}
    SMART_FIXSPEED := TRUE;
  {$ENDIF}
  ClearDebug;
  ActivateClient;
  SetupSRL;
  SRL_SIXHOURFIX := True;
  DeclarePlayers;
    if not (LoggedIn) then
  LoginPlayer;
  wait(1578 + Random(467));
  ClickNorth(0);     // Set the Compass to North and set the Angle to The Highest Point
  wait(898 + Random(434));
  Writeln('Shud b doing deployment');
  Deployment;
  Writeln('deployment shud hav been done');
end.

never mind i fixed it