This is a bit of code from my Powerminer, it does work but for some reason it moves the mouse two pixels at a time! Does anyone know how to fix this?
I use MIX1 so it should hop to the inventory i thought.
Thanks.
Simba Code:
program IronMad;
{.include SRL/SRL.simba}
var
x, y,IronOre: Integer;
procedure DropOre;
begin
repeat
IronOre := DTMFromString('mrAAAAHic42BgYHBiYmAIBGJbIDYGYjMgtgNiNyD2AeInQDV3gfgTEL8A4ntAfBWIrwPxGyA2lhUDkox4MH6ATyeybgDUEQmo');
If FindDTM(IronOre, x, y, MIX1, MIY1, MIX2, MIY2) then
begin
MMouse(x, y, 22, 22);
Mouse(x, y, 0, 0, false);
WaitOption('Drop', randomrange(200, 300));
Wait(randomrange(200, 300));
end;
until(not(FindDTM(IronOre, x, y, MIX1, MIY1, MIX2, MIY2)))
FreeDTM(IronOre);
end;