40x1 Inventory Dropper Tool

[RaZzor]

Hello everyone,

a friend of mine asked me if I could write a program in AutoIt which drops 40 one slot items from the inventory to the ground. Since there is no tool like this in the download section (I think there was something by eSeLhOrN but it got deleted) I thought: "Why not contribute it to the blizzsector community, too.".

How to set up the script:

1. Download AutoIt from here.
2. Install it
3. Make a new *.au3 file (name doesn't matter, for example 40x1 Inventory Dropper)
4. Open the script
5. Copy the following code into the file, then save and close.

Global $Paused
HotKeySet( "{END}" , "Drop" )
HotKeySet( "{HOME}" , "Terminate" )

AutoItSetOption( "MouseCoordMode" , 0 )

While 1
Sleep(10)
WEnd

Func Drop()
$Paused = NOT $Paused
While $Paused
MouseClickDrag( "Left" , 430, 330, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 460, 330, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 490, 330, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 520, 330, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 550, 330, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 580, 330, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 610, 330, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 640, 330, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 670, 330, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 700, 330, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 430, 360, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 460, 360, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 490, 360, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 520, 360, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 550, 360, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 580, 360, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 610, 360, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 640, 360, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 670, 360, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 700, 360, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 430, 390, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 460, 390, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 490, 390, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 520, 390, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 550, 390, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 580, 390, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 610, 390, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 640, 390, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 670, 390, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 700, 390, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 430, 420, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 460, 420, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 490, 420, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 520, 420, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 550, 420, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 580, 420, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 610, 420, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 640, 420, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 670, 420, 300, 300, 2 )
MouseClick( "Left" )
MouseClickDrag( "Left" , 700, 420, 300, 300, 2 )
MouseClick( "Left" )
WEnd
EndFunc

Func Terminate()
Exit 0
EndFunc

6. Right click the file and click on "Compile Script".

A new *.exe file with the name which the *.au3 file had (in this case 40x1 Inventory Dropper.au3) is going to be created in the same directory. I posted the code here so nobody can claim me to be a scammer. If you still don't know how to compile an AutoIt file after the "How to set up the script" you should shoot yourself.

How to use the script

As you can see (in the code), the script starts dropping items when you hit the END button on your keyboard (it's over the arrows, duh). If you want to stop the script press HOME.

Performance Tweaking

If you are experiencing troubles (e.g. the cursor doesn't hit all items) change the mouse drag delays

MouseClickDrag( "Left" , x1, y1, x2, y2, 2 )

The italic and bold number stands for the delay. The standard delay is 10, 1 is the fastest and 100 is the slowest. Try to find out the best number for yourself. A higher delay will work better with slow PCs.

This script is made for D2 in fullscreen mode. If you want to run it in windowed mode, you have to change the bold and italic number from "0" to "2"

AutoItSetOption( "MouseCoordMode" , 0 )

---

I'm still a new (lol.) to AutoIt, so if there is any possibility to reduce the code please post it here. I'll edit the main post then.

Have fun