Alright, I'm getting very discouraged for some stupid reason.
I had this script for a week, and I'd use it to drop my iron when I was too lazy. It was workin fine until 1 day it decided not to work correctly. Wonder why.
SCAR Code:
// Drops all iron ores inside an inventory
program DropIron;
{.include SRL/SRL.scar}
var Iro,drop,x1,y1,x2,y2: integer;
Procedure ClickHuman(x,y: integer; Left: Boolean);
begin
HoldMouse(x,y,left);
Wait(15+random(15))
ReleaseMouse(x,y,left);
end;
procedure loadBitDTM;
begin
drop := BitmapFromString(14, 8, 'z78DA33753135313177C3014CC' +
'1B298247EF5C82206480097C9C4A8C754834B2FF1E243C54C626C' +
'21C63D98B64048031C809838C2A59E1812BFAB20240010BE9F4F');
Iro := DTMFromString('78DA635CC8C4C020CAC8800C7CF494C0344C9' +
'47131500D17AA1A1305095435CB8850B31CA84600550D4C16AE66' +
'01508D1401354B806A2409A8598E698EA592348A1A00FDD10713');
end;
Procedure DropOre;
begin
FindDTM(Iro,x1,y1,560,210,730,460);
MMouse(x1,y1,4,4);
ClickHuman(x1,y1,false);
FindBitmap(drop,x2,y2);
MMouse(x2+6,y2+3,4,4);
ClickHuman(x2,y2,true);
end;
begin
setupsrl;
ActivateClient;
MouseSpeed:= 8;
repeat DropOre;
until not(FindDTM(Iro,x1,y1,50,210,730,460));
end.