Just A Suggestion 
SCAR Code:
function TypeXAmount(Amount:string) : boolean;
//by bEnJaa
var
Asterisk, ax, ay : integer;
begin
Asterisk := DTMFromString('78DA63646264605803C440C0C400030D0CFC4' +
'01224FA1F0818FF33E05503028C2C40D63AFC6A00504B08C6');
if (not LoggedIn) then exit;
repeat
Wait(200+Random(100));
until FindDTM(Asterisk, ax, ay, MCX1, MCY1, MCX2, MCY2);
TypeSend(Amount);
Wait(500+random(100));
Result := True;
end;
eg.
SCAR Code:
TypeXAmount('9');//for iron
....
TypeXAmount('18')//for coal
This little function is for after the dtm has been right clicked, and option Withdraw X has been selected. It waits the perfect amount of time until the asterisk appears in the chat screen, meaning the amount is ready to be input 
Use it if you want