Daniel
12-02-2007, 04:44 AM
This will left click all of your inventory. Good for buryer's or something else:
{************************************************* ******************************
procedure SelectEntireInventory;
by: IP-Drowner
Description: Will left click all item's in your inventory. Best used with bone
buryer script's.
************************************************** *****************************}
procedure SelectEntireInventory;
begin
if (InvFull) then
begin
MouseItem(1:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(2:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(3:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(4:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(5:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(6:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(7:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(8:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(9:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(10:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(11:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(12:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(13:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(14:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(15:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(16:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(17:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(18:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(19:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(20:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(21:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(22:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(23:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(24:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(25:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(26:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(27:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(28:Integer;True:Boolean);
Wait(97 + Random(782));
end;
end;
I think that would work, i have tested it but i keep getting this error:
Line 51: [Error] (15139:12): comma (',') expected in script.
Don't know why! Anyway's, add/modify this into your script but give me some credit's.
{************************************************* ******************************
procedure SelectEntireInventory;
by: IP-Drowner
Description: Will left click all item's in your inventory. Best used with bone
buryer script's.
************************************************** *****************************}
procedure SelectEntireInventory;
begin
if (InvFull) then
begin
MouseItem(1:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(2:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(3:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(4:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(5:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(6:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(7:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(8:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(9:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(10:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(11:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(12:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(13:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(14:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(15:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(16:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(17:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(18:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(19:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(20:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(21:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(22:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(23:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(24:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(25:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(26:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(27:Integer;True:Boolean);
Wait(97 + Random(782));
MouseItem(28:Integer;True:Boolean);
Wait(97 + Random(782));
end;
end;
I think that would work, i have tested it but i keep getting this error:
Line 51: [Error] (15139:12): comma (',') expected in script.
Don't know why! Anyway's, add/modify this into your script but give me some credit's.