here you go, i commented all the things that you might not understand:
SCAR Code:
{.include srl/srl.scar} //Always include that
program WillowLogDropper_Fixed_By_MikeVSkater;
var
x, y: Integer;
procedure Drop;
var
i :integer;
ItemPoint: TPoint; //A TPoint is a integer that stores two numbers, the x and y cords.
begin
GameTab(4);
Wait(500 + Random(500));
for i := 1 to 28 do //these two look for a item in i
if (ExistsItem(i)) then //and i is set from 1 to 28(inv slots) by that loop
begin
ItemPoint := ItemCoords(i); //this is what sets those two cords
MMouse(ItemPoint.x, ItemPoint.y, 5, 5); //and then moves there
Wait(250 + Random(60));
if IsUpText('Willow logs') then //then checks to see if its a willow log
begin
Mouse(ItemPoint.x, ItemPoint.y, 5, 5, False); //then right clicks
Wait(250 + Random(50));
ChooseOption('Drop'); //and clicks drop
end;
end;
ArrangeInv; //this will put rest of items infront of inv
end;
begin
Drop; //You could make this just one procedure long :)
end.
Ohh btw
and
are sure bans..
make sure you use
SCAR Code:
Mouse(x, y, 1, 1 true); //Clicking
and
SCAR Code:
MMouse(x, y, 1, 1); //Moving
The numbers are for moving a random number 0 through the number ("1"=what ever you want)
For the "Mouse(x, y, 1, 1 true);" though, true = left click/false = right click
Goodluck with future scripting
~MikeVSkater