SCAR Code:procedure Chop;
var cx, cy: Integer;
begin
SetAngle(true);
if FindObjCustom(cx, cy, ['Mage', 'age', 'Mag'],[1385251, 1780264, 3098949], 3)
then
begin
Case random(2) of
0: begin
MMouse(cx, cy, 2, 2);
FindEnt(cx, cy, true);
Mouse(cx, cy, 0, 0, true);
FindEnt(cx, cy, true);
end;
1: begin
MMouse(cx, cy, 2, 2);
FindEnt(cx, cy, true);
Mouse(cx, cy, 0, 0, false);
FindEnt(cx, cy, true);
ChooseOption('Chop down');
end;
end;
end;
end.
?? EditedCode:[Error] (12854:4): Semicolon (';') expected



Reply With Quote





lol, thanx, i didn't even think about that, but now i get:
