Bit new, can't see where i've gone wrong

[Ruinedscape]

Creating a mining script for an rsps. I'm using scar v3.33 so the functions aren't the current.

procedure MineRock;
begin
if (GetColor(705, 445)=255) then begin  //check last inv spot is clear 
     if(findcolortolerance (x, y, RockColour, 4, 3, 516, 337, 5)) then //if it can find the rock colour then
     begin movewindmouseex (x, y, 1, 1, 20);  
     clickmouse (x, y, true);  //it moves mouse and clicks it
     wait(20000)  
     end else
      sendarrowwait(0+random(4), 1000);   //else it will move the camera angle
   writeln('Cannot find rock')
   wait(500)
else begin end  //ends MineRock if inv spot is not clear
end;

 

Comments were my intentions for that part of the code to make things clearer.

Thanks in advance.

Edited January 16, 2013 by Ruinedscape

[LordJashin]

Every time I hit enter somewhere in that code it auto completes and adds an end; which means You have either too many begins, or ends in that SCAR code snippet.

[Ruinedscape]

Thanks, i was missing an end before the last "else begin end" :3