Here are some scripts I've been using. They are edited versions of the great script made by Milkshakes00 earlier in the thread! So far the Monk seems to work well 50+ now that it has been changed, will likely alter other scripts to suit 50+ better as I get the characters there. When you get to Hell, instead of just throwing on any old EXP bonus gear, try to get it all with your primary damage stat on it, as well as a at least a decent weapon for the level. Up to 55 or so you can usually find nice rares for less than 5K gold.
For any of these, selecting NO is usually better for lower level characters. If any of the coords aren't working (and you're sure about windowed mode / movement passives), the utility that comes with AutoIt is really easy to use to correct them, as well as alter them for any resolution!
Start the scripts using the "-" (minus) key!
Monk:
Needs:
1920x1080
Fullscreen windowed mode (not maximized normal window)
Fleet Footed passive
Sweeping Wind bound to Right Click, Serenity to 1 if YES is selected
Breath of Heaven bound to key 1 if NO is selected
Dialog Box:
Selecting YES will place the monk near the mobs, using Sweeping Wind to tag all of the mobs so you get the EXP bonus for multimob kills, while also using Serenity for Invulnerability.
Selecting NO will attempt to place you a bit farther from the mobs and use Breath of Heaven to keep you alive (if available), better for low levels. You're probably still dead no matter what depending on level difference.
Code:
Global $Paused
HotKeySet("-", "Leave") ;script can be stopped by pressing -
HotKeySet("{PGUP}", "Pause") ;script can be stopped by pressing -
HotKeySet("{PGDN}", "Stop")
$Leave = False
$begin=MsgBox(0x3, "Serenity", "Do you have Serenity? YES uses Serenity, NO will attempt to use Breath of Heaven; Bind either to the 1 key. NO will also attempt to keep you away from mobs better.")
if $begin = 2 Then
Exit
ElseIf $begin = 6 Then
$ser = True
ElseIf $begin = 7 Then
$ser = False
EndIf
While $ser = True
if($Leave) Then
Send("{space}")
MouseClick("left", 1587, 878)
Sleep(Random(500, 700))
MouseClick("right", 1750, 825) ;Sends right click ability, I have this bound to sweeping wind
Sleep(Random(100, 200))
Send("{4}")
Sleep(Random(200, 300))
MouseClick("left", 1704, 825)
Sleep(Random(1700, 2000))
Send("{1}") ;Send Serenity -invulnerability- key, change # as desired
Sleep(Random(1750, 2250))
MouseClick("left", 299, 35) ;Click towards exit
Sleep(Random(2500, 3000))
MouseClick("left", 528, 188) ;Click on door back to town
Sleep(Random(500, 600))
MouseClick("left", 800, 350)
Sleep(Random(2500, 3100))
Send("{Escape}")
Sleep(Random(500, 1500))
MouseClick("left", 956, 579)
Sleep(Random(13000, 13650))
MouseClick("left", 230, 416)
Sleep(Random(6000, 6450))
EndIf
WEnd
While $ser = False
if($Leave) Then
Send("{space}")
MouseClick("left", 1587, 878)
Sleep(Random(1000, 1500))
MouseClick("left", 1678, 1020)
Sleep(Random(1500, 2000))
MouseClick("left", 872, 542)
Sleep(Random(500, 750))
Send("{1}") ;Use Breath of Heaven if available
MouseClick("left", 400, 46)
Sleep(Random(3000, 3500))
MouseClick("left", 479, 109) ;Click towards exit
Sleep(Random(2800, 3250))
Send("{Escape}")
Sleep(Random(500, 1500))
MouseClick("left", 956, 579)
Sleep(Random(13000, 13650))
MouseClick("left", 230, 416)
Sleep(Random(6000, 6450))
EndIf
WEnd
Func Pause()
$Leave = False
EndFunc
Func Stop() ;to allow the script to stop
Exit
EndFunc
Func Leave()
$Leave = True
EndFunc
Wizard:
Needs:
1920x1080
Fullscreen windowed mode (not maximized normal window)
Frost armor on key 1, Meteor on key 2 if YES is selected
Frost Armor on key 1 only if NO is selected
Selecting YES runs out, places the cursor where the mobs will be, and drops a meteor so you get the multi-kill bonus when the other meteor hits immediately after, hits frost armor and jets out.
Selecting NO runs you in, hits frost armor in a spot that seemed best for rounding up as many to get hit as possible, and runs back home.
Code:
Global $Paused
HotKeySet("-", "Leave") ;script can be stopped by pressing -
HotKeySet("{PGUP}", "Pause") ;script can be stopped by pressing -
HotKeySet("{PGDN}", "Stop")
$Leave = False
$begin=MsgBox(0x3, "Meteor", "Do you have Meteor? YES uses Meteor, NO will attempt to use Frost Armor; Bind Meteor to 2, Frost Armor to 1.")
if $begin = 2 Then
Exit
ElseIf $begin = 6 Then
$met = True
ElseIf $begin = 7 Then
$met = False
EndIf
While $met = True
if($Leave) Then
Send("{space}")
MouseClick("left", 1434, 768)
Sleep(Random(800, 900))
MouseClick("left", 1341, 805)
Sleep(Random(600, 800))
MouseMove(1370, 591)
Sleep(Random(250, 350))
Send("{2}") ;Send Meteor
Sleep(Random(200, 300))
Send("{1}") ;Send Frost Armor
Sleep(Random(600, 800))
MouseClick("left", 599, 196) ;Click on door back to town
Sleep(Random(1000, 1250))
MouseClick("left", 467, 141) ;Click on door back to town
Sleep(Random(3000, 3148))
Send("{Escape}")
Sleep(Random(500, 1500))
MouseClick("left", 956, 579)
Sleep(Random(13000, 13650))
MouseClick("left", 230, 416)
Sleep(Random(6000, 6450))
EndIf
WEnd
While $met = False
if($Leave) Then
Send("{space}")
MouseClick("left", 1434, 768)
Sleep(Random(800, 900))
MouseClick("left", 1341, 805)
Sleep(Random(600, 800))
MouseClick("left", 1370, 591)
Sleep(Random(1000, 1100))
Send("{1}") ; Frost Armor
MouseClick("left", 522, 415) ;Click towards exit
Sleep(Random(1250, 1500))
MouseClick("left", 599, 196) ;Click on door back to town
Sleep(Random(1250, 1500))
MouseClick("left", 467, 141) ;Click on door back to town
Sleep(Random(3000, 3148))
Send("{Escape}")
Sleep(Random(500, 1500))
MouseClick("left", 956, 579)
Sleep(Random(13000, 13650))
MouseClick("left", 230, 416)
Sleep(Random(6000, 6450))
EndIf
WEnd
Func Pause()
$Leave = False
EndFunc
Func Stop() ;to allow the script to stop
Exit
EndFunc
Func Leave()
$Leave = True
EndFunc
Barb:
Needs:
1920x1080
Fullscreen Windowed mode (NOT maximized window)
Ground Stomp on key 1
Basically this just books up, ground stomps the mobs to stun them and runs, killing them with the meteor and giving you the multi-kill exp bonus.
Code:
Global $Paused
HotKeySet("-", "Leave") ;script can be stopped by pressing -
HotKeySet("{PGUP}", "Pause") ;script can be stopped by pressing -
HotKeySet("{PGDN}", "Stop")
$go = True
$Leave = False
While $go
if($Leave) Then
Send("{space}")
MouseClick("left", 1434, 768)
Sleep(Random(800, 900))
MouseClick("left", 1341, 805)
Sleep(Random(600, 800))
MouseClick("left", 1370, 591)
Sleep(Random(1400, 1600))
Send("{1}") ; Ground Stomp
MouseClick("left", 522, 415) ;Click towards exit
Sleep(Random(1250, 1500))
MouseClick("left", 599, 196) ;Click on door back to town
Sleep(Random(1250, 1500))
MouseClick("left", 467, 141) ;Click on door back to town
Sleep(Random(3000, 3148))
Send("{Escape}")
Sleep(Random(500, 1500))
MouseClick("left", 956, 579)
Sleep(Random(13000, 13650))
MouseClick("left", 230, 416)
Sleep(Random(6000, 6450))
EndIf
WEnd
Func Pause()
$Leave = False
EndFunc
Func Stop() ;to allow the script to stop
Exit
EndFunc
Func Leave()
$Leave = True
EndFunc
Witch Doctor:
Needs:
1920x1080
Fullscreen windowed mode (not maximized normal window)
Spirit Walk on key 1, Acid Rain on key 2 if YES is selected
Spirit Walk on key 1 only if NO is selected
Selecting YES runs out, hits spirit walk to position mobs, drops acid cloud, jets out.
Selecting NO runs you in, hits spirit walk in a spot that seemed best for rounding up as many to get hit as possible, and runs back home.
Code:
Global $Paused
HotKeySet("-", "Leave") ;script can be stopped by pressing -
HotKeySet("{PGUP}", "Pause") ;script can be stopped by pressing -
HotKeySet("{PGDN}", "Stop")
$Leave = False
$begin=MsgBox(0x3, "Acid Cloud", "Do you have Acid Cloud? YES uses Acid Cloud, NO will attempt to use Spirit Walk; Bind Acid Cloud to 2, Spirit Walk to 1.")
if $begin = 2 Then
Exit
ElseIf $begin = 6 Then
$acid = True
ElseIf $begin = 7 Then
$acid = False
EndIf
While $acid = True
if($Leave) Then
Send("{space}")
MouseClick("left", 1434, 768)
Sleep(Random(1000, 1100))
MouseClick("left", 1341, 805)
Sleep(Random(500, 600))
MouseClick("left", 1256, 631)
Sleep(Random(300, 400))
MouseMove(1204, 468)
Sleep(Random(100, 150))
Send("{1}") ;Send Spirit Walk
Sleep(Random(250, 350))
Send("{2}") ;Send Acid Cloud
Sleep(Random(500, 600))
MouseClick("left", 457, 207) ;Click towards exit
Sleep(Random(1000, 1200))
MouseClick("left", 403, 81) ;Click on door back to town
Sleep(Random(3500, 4000))
Send("{Escape}")
Sleep(Random(500, 1500))
MouseClick("left", 956, 579)
Sleep(Random(13000, 13650))
MouseClick("left", 230, 416)
Sleep(Random(6000, 6450))
EndIf
WEnd
While $acid = False
if($Leave) Then
Send("{space}")
MouseClick("left", 1434, 768)
Sleep(Random(800, 900))
MouseClick("left", 1341, 805)
Sleep(Random(600, 800))
MouseClick("left", 1370, 591)
Sleep(Random(1000, 1100))
Send("{1}") ; Spirit Walk
MouseClick("left", 522, 415) ;Click towards exit
Sleep(Random(1250, 1500))
MouseClick("left", 599, 196) ;Click on door back to town
Sleep(Random(1250, 1500))
MouseClick("left", 467, 141) ;Click on door back to town
Sleep(Random(4000, 4500))
Send("{Escape}")
Sleep(Random(500, 1500))
MouseClick("left", 956, 579)
Sleep(Random(13000, 13650))
MouseClick("left", 230, 416)
Sleep(Random(6000, 6450))
EndIf
WEnd
Func Pause()
$Leave = False
EndFunc
Func Stop() ;to allow the script to stop
Exit
EndFunc
Func Leave()
$Leave = True
EndFunc
Soooo yeahhhh. As I work on these I will just stick them here, do with them as you will.
Edit 6/5/12 - Cleaned up some of the timings and movement to make them a little quicker / safer -- Altered Monk script to perform a little better at 50+ -- Altered Wizard script to operate a little more quickly and stay out of harms way better -- Changed Witch Doctor timings to take better advantage of Spirit Walk -- Changed Barb script to function a little faster.