Unknown identifier 'mouse' in script

I found a pritty nice script (it's from 2005), so i thought maybe i can use it, but no, i got that error:

Line 10: [Error] (10:4): Unknown identifier 'mouse' in script

I see that mouse isn't used in new SCAR, but what i should use instead of 'mouse'?

Script:

Code:

program clicker;
var
x,y,z,zz:integer

;procedure randomclick;
begin
z:=1+random(14)
if(z=zz)then z:=z+16
;case z of
1: mouse(923,528)
2: mouse(926,530)
3: mouse(935,527)
4: mouse(939,530)
5: mouse(941,528)
6: mouse(946,527)
7: mouse(953,528)
8: mouse(962,529)
9: mouse(966,530)
10: mouse(971,528)
11: mouse(977,530)
12: mouse(984,529)
13: mouse(987,527)
14: mouse(997,529)
15: mouse(1005,529)
end;
zz:=z
if(z>15)then randomclick;
end;

begin
repeat
randomclick;
wait(1000+random(1000))
until(false)
end.

 

Code:

program clicker;
{.include SRL/SRL.scar**
var
x,y,z,zz:integer;

procedure randomclick;
begin
z:=1+random(14)
if(z=zz)then z:=z+16;
case z of
1: mouse(x,y,0,0,true);
2: mouse(x,y,0,0,true);
3: mouse(x,y,0,0,true);
4: mouse(x,y,0,0,true);
5: mouse(x,y,0,0,true);
6: mouse(x,y,0,0,true);
7: mouse(x,y,0,0,true);
8: mouse(x,y,0,0,true);
9: mouse(x,y,0,0,true);
10: mouse(x,y,0,0,true);
11: mouse(x,y,0,0,true);
12: mouse(x,y,0,0,true);
13: mouse(x,y,0,0,true);
14: mouse(x,y,0,0,true);
15: mouse(x,y,0,0,true);
end;
zz:=z
if(z>15)then randomclick;
end;

begin
SetupSRL;
repeat
randomclick;
wait(1000+random(1000))
until(false)
end.