Can someone fix this short script please?

[Noob xp1]

Can someone fix this script I tried to make one but it didn't work.
Thx.


Program FirstScript;
{.include SRL/SRL.scar}

const
Waitt= 10000;// The cutting time.

var
x,y:integer;
l,lo:integer;

procedure chop;
begin
if FindColorSpiralTolerance(x,y,994343,52,26,468,260, 3) then
Mouse(x,y,2,2,true)
l:=l+1
wait(waitt + random(10))
end;

procedure drop;
begin
invfull;
if invfull then
begin
Droptoposition(2,28)
l:=0
end;
end;


begin
SetupSRL;
comp;
repeat
lo:= lo+1
wait(10 + random(1))
chop;
wait(10 + random(1))
drop;
until(false)
end.

 

[Noob xp1]

Please help

 

[b1b]

I'm pretty sure its this:

Waitt= 10000;// The cutting time.

(theres two "t's")

edit2: nevermind im reading through the script again (pretty sure thats not it)... cant find it sorry

 

[waddo v1]

rofl i know exactly whats wrong
lots
u have copied this script
and hav not set variables
u have told it to run procedure comp;
but u aint actualy wrote it

 

[waddo v1]

i dont like the look of drop to position doesnt seem to wokr
try this

DropItem(3)
   wait(150+random(10))
   DropItem(4)
   wait(150+random(10))
   DropItem(5)
   wait(150+random(10))
   DropItem(6)
   wait(150+random(10))
   DropItem(7)
   wait(150+random(10))
   DropItem(8)
   wait(150)
   DropItem(9)
   wait(150+random(10))
   DropItem(10)
   wait(150+random(10))
   DropItem(11)
   wait(150+random(10))
   DropItem(12)
   wait(150+random(10))
   DropItem(13)
   wait(150+random(10))
   DropItem(14)
   wait(150+random(10))
   DropItem(15)
   wait(150+random(10))
   DropItem(16)
   wait(150+random(10))
   DropItem(17)
   wait(150+random(10))
   DropItem(18)
   wait(150+random(10))
   DropItem(19)
   wait(150+random(10))
   DropItem(20)
   wait(150+random(10))
   DropItem(21)
   wait(150+random(10))
   DropItem(22)
   wait(150+random(10))
   DropItem(23)
   wait(150+random(10))
   DropItem(24)
   wait(150+random(10))
   DropItem(25)
   wait(150+random(10))
   DropItem(26)
   wait(150+random(10))
   DropItem(27)
   wait(150+random(10))
   DropItem(28)