Trying to Make it Find bone, Right click and Pickup.. Anyone see any errors?
Code:program lol; {$I SRL/SRL.Simba} {$I P07Include.Simba} var x, y: Integer; procedure FindBone; var x, y: integer; begin MouseSpeed:=20; If P07_FindObj(x, y, 'Take', 16777215, 10) Then begin Mouse(x, y, Random(2), Random(2), false); P07_ChooseOptionMulti(['ake Bo']); end; end; begin; FindBone; end.


Reply With Quote