SCAR Code:
program gppickin;
{.Include SRL/SRL.Scar}
// this include included both of the includes that you originally had
// the reason you were getting unknown identifier was because this include
// wasnt included.
var clicks: Integer;
const
Itemcolor1=1413297;
itemcolor2=1815773;
itemcolor3=1413297;
Procedure finditems1; //the original procedure name was already included in
//srl, so you needed to change the names.
begin
repeat
if (findobjmulti('Coins',itemcolor1,itemcolor2,itemcolor3,5)) and isuptext('Coins') then
begin
movemousesmooth(x,y);
mouse(x,y,1,2,true);
clicks:=clicks+1;
end;
Until(not(findobjmulti('Coins',itemcolor1,itemcolor2,itemcolor3,5)))
end;
begin
setupsrl;//added this
repeat
finditems1;
until(clicks>=25)
end.