SRL Archive - OSR Help

This is my very first script I'm trying to make one for my self for fishing that fishes and banks at the fishing guild. After a few days of reading I've came up with this and not really sure what im missing or if i'm on the right track. Any Suggestions or Fixes would be really appeciated.

program GuildFishnBank;
{$I SRL/SRL.Simba}
{$I SRL/SRL/Misc/Debug.Simba}
{$I P07Include.Simba}

var
x, y ,PastInvCounter: Integer;
Text: TStringArray;



Procedure Bootup;
begin
WriteLn('Loading Script');
P07_MakeCompassNorth;
P07_MakeCameraAngleHigh;
Wait(randomRange(99, 200));
end;

Procedure AntiBan;
Begin
Writeln('Preforming Anti-Ban');
  case random(5) of
    1: Wait (RandomRange(250, 1200));
    2: HoverSkill('random', False);
    3: HoverSkill('fishing', False);
    4: Boredhuman;
    5: HoverSkill('cooking', False);
  end;
end;


Procedure Findspot;
begin
if(FindColorSpiralTolerance(x, y, 14728868, MSX1, MSY1, MSX2, MSY2, 5))then
  begin
  MMouse(RandomRange(X - 5, X + 5), RandomRange(y - 5, y + 5), 0, 0);
  wait (1500+random(500));
  if P07_IsUpTextMultiCustom( ['Cage','age']) then
    begin
      ClickMouse2(mouse_right);
      Writeln('We Found Some Fish');
      wait (75+random(100));
      PastInvCounter := P07_InvCount;
    End;
  End;
End;



Procedure Walkbank();
Begin
RadialWalkTolerance(3428977,180,259,65,5,5,10);
P07_FFlag;
End;

Procedure Walkspot();
Begin
RadialWalkTolerance(1063247,0,90,65,5,5,10);
P07_FFlag;
End;




Procedure Bankfish;
Begin
if FindColorTolerance(x, y, 7697790, 4, 4, 515, 337, 10) then
 MMouse(x, y, 2, 2);
wait(100)
  if FindColorTolerance(x, y, 7697790, 4, 4, 515, 337, 10) then
  ClickMouse2(Mouse_Right);
        P07_ChooseOptionMulti((['Bank']));
        wait(100);
        if P07_BankScreen then P07_Deposit(2,28,True);
End;



Procedure FishingCheck;
Begin
  Wait(10000+Random(2000));
  If PastInvCounter < P07_InvCount Then
    Begin
    Writeln('We Have Got Some Fish');
    Wait(10000+Random(1500));
    end;
  If PastInvCounter = P07_InvCount Then
    Begin
    Writeln('Looking For Another Spot');
    Findspot;
    Wait (10000+Random(1500));
    end;
End;








Begin
SetupP07Include;
BootUp;
repeat
    repeat
    AntiBan;
    Findspot;
    FishingCheck;
    Until P07_InvFull;
Walkbank;
BankFish;
WalkSpot;
Until
End;