This is my first AutoIt script,
i wrote this to kill the vermin in the armory(act 3 quest 4) as a group for XP Bonus.
I also put notes in the script for users to learn and understand and modify.
Any Suggestions Just Post Them Here Please.
How to Use:
Download AutoIt from their Official Website and Install
Open Notepad paste code below into it and save as: AnyFileName.au3
1024x600:
Code:
;#### - NoUseLying's - ACT 3 Q 4 Tremors in the Stone - Au3 Leveling AutoIt Script - ####
;Version .8
;Controls-
;Skill Slot 3 = Number 3 = Whatever Area Damage Deal attack skill you want.
;Notes-
;YOU MUST BEABLE TO KILL ALL OF THEM TO KEEP TIMING RIGHT WHEN EXITING
;This bot is still in beta, but works pretty much flawless for now.
;delays may need to be increased or decresed based on your system performance.
;feel free to add to this script and give me suggestions, i love ideas.
;NextRelease-
;Faster Runs
;Upcoming-
;Figure out a way to implement a aspect ratio for all d3 resolutions
;Hotkeys Defined
HotKeySet("=","start") ;START by pressing =
HotKeySet("-", "pause") ;PAUSE by pressing -
HotKeySet("x", "stop") ;STOP by pressing x
$runScript = True
$start = False
Call ( "mainRun" )
Func resumegame()
;####Breakdown of MouseClick Function using Random Mouse Cordinates####
;$x???????? = Random(???,???) (x axis function named anything)
;Left to Right
;1st number for x = 1st number on x axis(x value for left side -------
;2nd number for x = 2nd number on x axis(x value for right side -------
;MouseClick("anybutton",$x????????,$yFunction,1)
;$y???????? = Random(???,???) (y axis function named anything)
;Top to Bottom
;1st number for y = 1st number on y ayis(y value for top |||||||
;2nd number for y = 2nd number on y ayis(y value for bottom |||||||
;MouseClick("anybutton",$xFunction,$y????????,1)
;1024 x 600 widescreen mouse positions
$xMostResume = Random(40,217) ; x leftside(40) x rightside(217)
$yMostResume = Random(217,248) ; y top(217) y bottom(248)
MouseClick("left",$xMostResume,$yMostResume,1)
EndFunc
Func leavegame()
;1024 x 600 widescreen
$xMostLeave = Random(420,599) ; x leftside(420) x rightside(599)
$yMostLeave = Random(312,335) ; y top(312) y bottom(335)
MouseClick("left",$xMostLeave,$yMostLeave,1)
EndFunc
Func quest()
;1024 x 600 widescreen
$xQuestDialog = Random(610,629) ; x leftside(610) x rightside(629)
$yQuestDialog = Random(223,232) ; y top(223} y bottom(232)
MouseClick("left",$xQuestDialog,$yQuestDialog,1)
sleep(random(1250,2000))
Send(" {space} ")
EndFunc
Func movefromstart()
;1024 x 600 widescreen
$xMoveFromStart = Random(1006,1023) ; x leftside(1006) x rightside(1023)
$yMoveFromStart = Random(359,383) ; y top(359} y bottom(383)
MouseClick("left",$xMoveFromStart,$yMoveFromStart,1)
EndFunc
Func getapathtochamber()
;1024 x 600 widescreen
$xGetPathToChamber = Random(952,969) ; x leftside(952) x rightside(969)
$yGetPathToChamber = Random(370,383) ; y top(370} y bottom(383)
MouseClick("left",$xGetPathToChamber,$yGetPathToChamber,1)
EndFunc
Func enterchamber()
;1024 x 600 widescreen
$xEnterChamber = Random(367,383) ; x leftside(367) x rightside(383)
$yEnterChamber = Random(29,42) ; y top(29) y bottom(42)
MouseClick("left",$xEnterChamber,$yEnterChamber,1)
sleep(random(3000,3900))
Send(" {space} ")
EndFunc
Func skipquestchat()
;1024 x 600 widescreen
$xSkipQuestChat = Random(401,501) ; x leftside(401) x rightside(501)
$ySkipQuestChat = Random(196,221) ; y top(196} y bottom(221)
MouseClick("left",$xSkipQuestChat,$ySkipQuestChat,1)
EndFunc
Func leavechamber()
;1024 x 600 widescreen
$xLeaveChamber = Random(367,383) ; x leftside(367) x rightside(383)
$yLeaveChamber = Random(62,94) ; y top(62} y bottom(94)
MouseClick("left",$xLeaveChamber,$yLeaveChamber,1)
EndFunc
Func reenterchamber()
;1024 x 600 widescreen
$xReenterChamber = Random(353,369) ; x leftside(353) x rightside(369)
$yReenterChamber = Random(194,212) ; y top(194} y bottom(212)
MouseClick("left",$xReenterChamber,$yReenterChamber,1)
EndFunc
Func killeverything()
$xRightKillArea = Random(1276,1365) ; x leftside(1276) x rightside(1365)
$yRightKillArea = Random(644,767) ; y top(644} y bottom(767)
$xLeftKillArea = Random(391,418) ; x leftside(391) x rightside(1365)
$yLeftKillArea = Random(497,767) ; y top(497} y bottom(767)
MouseMove($xRightKillArea,$yRightKillArea,1)
Send("{1}")
sleep(random(900,1000))
MouseMove($xLeftKillArea,$yLeftKillArea,1)
Send("{1}")
sleep(random(800,900))
MouseMove($xRightKillArea,$yRightKillArea,1)
Send("{1}")
sleep(random(900,1000))
MouseMove($xLeftKillArea,$yLeftKillArea,1)
Send("{1}")
sleep(random(900,1000))
EndFunc
Func endrun()
Call ( "leavechamber" ) ;leave game
Send ( "{Escape}" )
Sleep(Random(1000,2000))
Call ( "leavegame" ) ;leave game
EndFunc
Func changequest()
;1024 x 600 widescreen
$xChangeQuest = Random(40,217) ; x leftside(40) x rightside(217)
$yChangeQuest = Random(258,282) ; y top(258} y bottom(282)
MouseClick("left",$xChangeQuest,$yChangeQuest,1)
EndFunc
Func selectquest()
;1024 x 600 widescreen
$xSelectQuest = Random(198,415) ; x leftside(198) x rightside(415)
$ySelectQuest = Random(391,408) ; y top(391} y bottom(408)
MouseClick("left",$xSelectQuest,$ySelectQuest,1)
EndFunc
Func selectq()
;1024 x 600 widescreen
$xSelectQ = Random(560,736) ; x leftside(560) x rightside(736)
$ySelectQ = Random(468,490) ; y top(468} y bottom(490)
MouseClick("left",$xSelectQ,$ySelectQ,1)
EndFunc
Func confirmselectedquest()
;1024 x 600 widescreen
$xConfirmSelectedQuest = Random(400,500) ; x leftside(400) x rightside(500)
$yConfirmSelectedQuest = Random(340,363) ; y top(340} y bottom(363)
MouseClick("left",$xConfirmSelectedQuest,$yConfirmSelectedQuest,1)
EndFunc
Func start()
$start = True
EndFunc
Func pause()
$start = False
EndFunc
Func stop()
Exit
EndFunc
Func mainRun()
While $runScript
If ($start) Then
$min = random(2100,2900)
$max = random(3100,4400)
$aclearroom = random(4000,5000)
$bclearroom = random(4500,5500)
sleep(random($min,$max))
Call ( "resumegame" ) ;enter game
sleep(random($min,$max))
Send(" {space} ")
sleep(random(1250,1500))
Send(" {space} ")
sleep(random(1000,1400))
Send(" {space} ")
sleep(random(1000,1500))
Call ( "quest" ) ;get quest
sleep(random(1200,1400))
Call ( "movefromstart" ) ;move closer to chamber
sleep(random(2500,3000))
Call ( "getapathtochamber" ) ;move to area where you can walk directly to chamber
sleep(random(2600,2900))
Call ( "enterchamber" ) ;enter chamber
sleep(random(2200,2300))
Call ( "skipquestchat" ) ;skip quest chat
sleep(random(2300,2700))
Call ( "leavechamber" ) ;leave room to group enemies
sleep(random(8000,9000))
Call ( "reenterchamber" ) ;reenter chamber
sleep(random(1000,1500))
Call ( "killeverything" ) ;clear room
sleep(random($aclearroom,$bclearroom))
Call ( "endrun" ) ;tp and exit
sleep(random(3250,3500))
Call ( "changequest" ) ;change quest button
sleep(random(600,800))
Call ( "selectquest" ) ;reselect quest
sleep(random(666,999))
Call ( "selectq" ) ;select button
sleep(random(500,800))
Call ( "confirmselectedquest" ) ;confirm reselection
EndIf
Wend
EndFunc
800x600:
Code:
;#### - NoUseLying's - Tremors in the Stone - Au3 Leveling AutoIt Script - ####
;Version .8
;Controls-
;Skill Slot 3 = Number 3 = Whatever Area Damage Deal attack skill you want.
;Notes-
;YOU MUST BEABLE TO KILL ALL OF THEM TO KEEP TIMING RIGHT WHEN EXITING
;This bot is still in beta, but works pretty much flawless for now.
;delays may need to be increased or decresed based on your system performance.
;feel free to add to this script and give me suggestions, i love ideas.
;NextRelease-
;Faster Runs
;Upcoming-
;Figure out a way to implement a aspect ratio for all d3 resolutions
;Hotkeys Defined
HotKeySet("=","start") ;START by pressing =
HotKeySet("-", "pause") ;PAUSE by pressing -
HotKeySet("x", "stop") ;STOP by pressing x
$runScript = True
$start = False
Call ( "mainRun" )
Func resumegame()
;####Breakdown of MouseClick Function using Random Mouse Cordinates####
;$x???????? = Random(???,???) (x axis function named anything)
;Left to Right
;1st number for x = 1st number on x axis(x value for left side -------
;2nd number for x = 2nd number on x axis(x value for right side -------
;MouseClick("anybutton",$x????????,$yFunction,1)
;$y???????? = Random(???,???) (y axis function named anything)
;Top to Bottom
;1st number for y = 1st number on y ayis(y value for top |||||||
;2nd number for y = 2nd number on y ayis(y value for bottom |||||||
;MouseClick("anybutton",$xFunction,$y????????,1)
;800 x 600 widescreen mouse positions
$xMostResume = Random(42,229) ; x leftside(42) x rightside(229)
$yMostResume = Random(217,245) ; y top(217) y bottom(245)
MouseClick("left",$xMostResume,$yMostResume,1)
EndFunc
Func leavegame()
$xMostLeave = Random(310,480) ; x leftside(310) x rightside(480)
$yMostLeave = Random(310,333) ; y top(310) y bottom(333)
MouseClick("left",$xMostLeave,$yMostLeave,1)
EndFunc
Func quest()
$xQuestDialog = Random(500,517) ; x leftside(500) x rightside(517)
$yQuestDialog = Random(215,240) ; y top(215) y bottom(240)
MouseClick("left",$xQuestDialog,$yQuestDialog,1)
sleep(random(1250,2000))
Send(" {space} ")
EndFunc
Func movefromstart()
$xMoveFromStart = Random(797,799) ; x leftside(797) x rightside(799)
$yMoveFromStart = Random(149,170) ; y top(149) y bottom(170)
MouseClick("left",$xMoveFromStart,$yMoveFromStart,1)
EndFunc
Func getapathtochamber()
$xGetPathToChamber = Random(952,969) ; x leftside(952) x rightside(969)
$yGetPathToChamber = Random(475,520) ; y top(475) y bottom(520)
MouseClick("left",$xGetPathToChamber,$yGetPathToChamber,1)
EndFunc
Func enterchamber()
$xEnterChamber = Random(337,389) ; x leftside(337) x rightside(389)
$yEnterChamber = Random(108,140) ; y top(108) y bottom(140)
MouseClick("left",$xEnterChamber,$yEnterChamber,1)
sleep(random(3000,3900))
Send(" {space} ")
EndFunc
Func skipquestchat()
$xSkipQuestChat = Random(290,380) ; x leftside(290) x rightside(380)
$ySkipQuestChat = Random(193,219) ; y top(193) y bottom(219)
MouseClick("left",$xSkipQuestChat,$ySkipQuestChat,1)
EndFunc
Func leavechamber()
$xLeaveChamber = Random(257,296) ; x leftside(257) x rightside(296)
$yLeaveChamber = Random(73,135) ; y top(73) y bottom(135)
MouseClick("left",$xLeaveChamber,$yLeaveChamber,1)
EndFunc
Func reenterchamber()
$xReenterChamber = Random(266,328) ; x leftside(366) x rightside(328)
$yReenterChamber = Random(184,232) ; y top(184) y bottom(232)
MouseClick("left",$xReenterChamber,$yReenterChamber,1)
EndFunc
Func killeverything()
$xRightKillArea = Random(614,670) ; x leftside(614) x rightside(670)
$yRightKillArea = Random(341,486) ; y top(341) y bottom(486)
$xLeftKillArea = Random(375,404) ; x leftside(282) x rightside(404)
$yLeftKillArea = Random(335,507) ; y top(335) y bottom(507)
sleep(random(900,1000))
MouseMove($xRightKillArea,$yRightKillArea,1)
Send("{1}")
sleep(random(900,1000))
MouseMove($xLeftKillArea,$yLeftKillArea,1)
Send("{1}")
sleep(random(800,900))
MouseMove($xRightKillArea,$yRightKillArea,1)
Send("{1}")
sleep(random(900,1000))
Send("{3}")
sleep(random(900,1000))
EndFunc
Func endrun()
Call ( "leavechamber" ) ;leave game
Send ( "{Escape}" )
Sleep(Random(1000,2000))
Call ( "leavegame" ) ;leave game
EndFunc
Func changequest()
$xChangeQuest = Random(39,218) ; x leftside(39) x rightside(218)
$yChangeQuest = Random(259,280) ; y top(259) y bottom(280)
MouseClick("left",$xChangeQuest,$yChangeQuest,1)
EndFunc
Func selectquest()
$xSelectQuest = Random(83,306) ; x leftside(83) x rightside(306)
$ySelectQuest = Random(391,407) ; y top(391) y bottom(407)
MouseClick("left",$xSelectQuest,$ySelectQuest,1)
EndFunc
Func selectq()
$xSelectQ = Random(446,626) ; x leftside(446) x rightside(626)
$ySelectQ = Random(467,491) ; y top(467) y bottom(491)
MouseClick("left",$xSelectQ,$ySelectQ,1)
EndFunc
Func confirmselectedquest()
$xConfirmSelectedQuest = Random(286,390) ; x leftside(286) x rightside(390)
$yConfirmSelectedQuest = Random(338,364) ; y top(338) y bottom(364)
MouseClick("left",$xConfirmSelectedQuest,$yConfirmSelectedQuest,1)
EndFunc
Func start()
$start = True
EndFunc
Func pause()
$start = False
EndFunc
Func stop()
Exit
EndFunc
Func mainRun()
While $runScript
If ($start) Then
$min = random(2100,2900)
$max = random(3100,4400)
$aclearroom = random(4000,5000)
$bclearroom = random(4500,5500)
sleep(random($min,$max))
Call ( "resumegame" ) ;enter game
sleep(random($min,$max))
Send(" {space} ")
sleep(random(1250,1500))
Send(" {space} ")
sleep(random(1000,1400))
Send(" {space} ")
sleep(random(1000,1500))
Call ( "quest" ) ;get quest
sleep(random(1200,1400))
Call ( "movefromstart" ) ;move closer to chamber
sleep(random(2500,3000))
Call ( "getapathtochamber" ) ;move to area where you can walk directly to chamber
sleep(random(2600,2900))
Call ( "enterchamber" ) ;enter chamber
sleep(random(2200,2300))
Call ( "skipquestchat" ) ;skip quest chat
sleep(random(2300,2700))
Call ( "leavechamber" ) ;leave room to group enemies
sleep(random(8000,9000))
Call ( "reenterchamber" ) ;reenter chamber
sleep(random(1000,1500))
Call ( "killeverything" ) ;clear room
sleep(random($aclearroom,$bclearroom))
Call ( "endrun" ) ;tp and exit
sleep(random(3250,3500))
Call ( "changequest" ) ;change quest button
sleep(random(600,800))
Call ( "selectquest" ) ;reselect quest
sleep(random(666,999))
Call ( "selectq" ) ;select button
sleep(random(500,800))
Call ( "confirmselectedquest" ) ;confirm reselection
EndIf
Wend
EndFunc
1280x700
Code:
;#### - NoUseLying's - Tremors in the Stone - Au3 Leveling AutoIt Script - ####
;Version .8
;Controls-
;Skill Slot 3 = Number 3 = Whatever Area Damage Deal attack skill you want.
;Notes-
;YOU MUST BEABLE TO KILL ALL OF THEM TO KEEP TIMING RIGHT WHEN EXITING
;This bot is still in beta, but works pretty much flawless for now.
;delays may need to be increased or decresed based on your system performance.
;feel free to add to this script and give me suggestions, i love ideas.
;NextRelease-
;Faster Runs
;Upcoming-
;Figure out a way to implement a aspect ratio for all d3 resolutions
;Hotkeys Defined
HotKeySet("=","start") ;START by pressing =
HotKeySet("-", "pause") ;PAUSE by pressing -
HotKeySet("x", "stop") ;STOP by pressing x
$runScript = True
$start = False
Call ( "mainRun" )
Func resumegame()
;####Breakdown of MouseClick Function using Random Mouse Cordinates####
;$x???????? = Random(???,???) (x axis function named anything)
;Left to Right
;1st number for x = 1st number on x axis(x value for left side -------
;2nd number for x = 2nd number on x axis(x value for right side -------
;MouseClick("anybutton",$x????????,$yFunction,1)
;$y???????? = Random(???,???) (y axis function named anything)
;Top to Bottom
;1st number for y = 1st number on y ayis(y value for top |||||||
;2nd number for y = 2nd number on y ayis(y value for bottom |||||||
;MouseClick("anybutton",$xFunction,$y????????,1)
;1280x720 widescreen mouse positions
$xMostResume = Random(47,262) ; x leftside(47) x rightside(262)
$yMostResume = Random(257,296) ; y top(257) y bottom(296)
MouseClick("left",$xMostResume,$yMostResume,1)
EndFunc
Func leavegame()
$xMostLeave = Random(533,744) ; x leftside(533) x rightside(744)
$yMostLeave = Random(372,401) ; y top(372) y bottom(401)
MouseClick("left",$xMostLeave,$yMostLeave,1)
EndFunc
Func quest()
$xQuestDialog = Random(760,780) ; x leftside(760) x rightside(780)
$yQuestDialog = Random(260,294) ; y top(260) y bottom(294)
MouseClick("left",$xQuestDialog,$yQuestDialog,1)
sleep(random(1250,2000))
Send(" {space} ")
EndFunc
Func movefromstart()
$xMoveFromStart = Random(1254,1279) ; x leftside(1254) x rightside(1279)
$yMoveFromStart = Random(321,376) ; y top(321) y bottom(376)
MouseClick("left",$xMoveFromStart,$yMoveFromStart,1)
EndFunc
Func getapathtochamber()
$xGetPathToChamber = Random(1126,1162) ; x leftside(1126) x rightside(1162)
$yGetPathToChamber = Random(339,385) ; y top(339) y bottom(385)
MouseClick("left",$xGetPathToChamber,$yGetPathToChamber,1)
EndFunc
Func enterchamber()
$xEnterChamber = Random(358,464) ; x leftside(358) x rightside(464)
$yEnterChamber = Random(131,187) ; y top(131) y bottom(187)
MouseClick("left",$xEnterChamber,$yEnterChamber,1)
sleep(random(3000,3900))
Send(" {space} ")
EndFunc
Func skipquestchat()
$xSkipQuestChat = Random(505,627) ; x leftside(505) x rightside(627)
$ySkipQuestChat = Random(236,261) ; y top(236) y bottom(261)
MouseClick("left",$xSkipQuestChat,$ySkipQuestChat,1)
EndFunc
Func leavechamber()
$xLeaveChamber = Random(474,516) ; x leftside(474) x rightside(516)
$yLeaveChamber = Random(91,148) ; y top(91) y bottom(148)
MouseClick("left",$xLeaveChamber,$yLeaveChamber,1)
EndFunc
Func reenterchamber()
$xReenterChamber = Random(453,570) ; x leftside(453) x rightside(570)
$yReenterChamber = Random(229,292) ; y top(229) y bottom(292)
MouseClick("left",$xReenterChamber,$yReenterChamber,1)
EndFunc
Func killeverything()
$xRightKillArea = Random(816,948) ; x leftside(816) x rightside(948)
$yRightKillArea = Random(514,603) ; y top(514) y bottom(603)
$xLeftKillArea = Random(570,779) ; x leftside(570) x rightside(779)
$yLeftKillArea = Random(483,613) ; y top(483) y bottom(613)
sleep(random(900,1000))
MouseMove($xRightKillArea,$yRightKillArea,1)
Send("{1}")
sleep(random(900,1000))
MouseMove($xLeftKillArea,$yLeftKillArea,1)
Send("{1}")
sleep(random(800,900))
MouseMove($xRightKillArea,$yRightKillArea,1)
Send("{1}")
sleep(random(900,1000))
Send("{3}")
sleep(random(900,1000))
EndFunc
Func endrun()
Call ( "leavechamber" ) ;leave game
Send ( "{Escape}" )
Sleep(Random(1000,2000))
Call ( "leavegame" ) ;leave game
EndFunc
Func changequest()
$xChangeQuest = Random(49,260) ; x leftside(49) x rightside(260)
$yChangeQuest = Random(311,339) ; y top(311) y bottom(339)
MouseClick("left",$xChangeQuest,$yChangeQuest,1)
EndFunc
Func selectquest()
$xSelectQuest = Random(261,528) ; x leftside(261) x rightside(528)
$ySelectQuest = Random(471,489) ; y top(471) y bottom(489)
MouseClick("left",$xSelectQuest,$ySelectQuest,1)
EndFunc
Func selectq()
$xSelectQ = Random(699,909) ; x leftside(699) x rightside(909)
$ySelectQ = Random(562,588) ; y top(562) y bottom(588)
MouseClick("left",$xSelectQ,$ySelectQ,1)
EndFunc
Func confirmselectedquest()
$xConfirmSelectedQuest = Random(502,626) ; x leftside(502) x rightside(626)
$yConfirmSelectedQuest = Random(409,436) ; y top(409) y bottom(436)
MouseClick("left",$xConfirmSelectedQuest,$yConfirmSelectedQuest,1)
EndFunc
Func start()
$start = True
EndFunc
Func pause()
$start = False
EndFunc
Func stop()
Exit
EndFunc
Func mainRun()
While $runScript
If ($start) Then
$min = random(2100,2900)
$max = random(3100,4400)
$aclearroom = random(4000,5000)
$bclearroom = random(4500,5500)
sleep(random($min,$max))
Call ( "resumegame" ) ;enter game
sleep(random($min,$max))
Send(" {space} ")
sleep(random(1250,1500))
Send(" {space} ")
sleep(random(1000,1400))
Send(" {space} ")
sleep(random(1000,1500))
Call ( "quest" ) ;get quest
sleep(random(1200,1400))
Call ( "movefromstart" ) ;move closer to chamber
sleep(random(2500,3000))
Call ( "getapathtochamber" ) ;move to area where you can walk directly to chamber
sleep(random(2600,2900))
Call ( "enterchamber" ) ;enter chamber
sleep(random(2200,2300))
Call ( "skipquestchat" ) ;skip quest chat
sleep(random(2300,2700))
Call ( "leavechamber" ) ;leave room to group enemies
sleep(random(8000,9000))
Call ( "reenterchamber" ) ;reenter chamber
sleep(random(1000,1500))
Call ( "killeverything" ) ;clear room
sleep(random($aclearroom,$bclearroom))
Call ( "endrun" ) ;tp and exit
sleep(random(3250,3500))
Call ( "changequest" ) ;change quest button
sleep(random(600,800))
Call ( "selectquest" ) ;reselect quest
sleep(random(666,999))
Call ( "selectq" ) ;select button
sleep(random(500,800))
Call ( "confirmselectedquest" ) ;confirm reselection
EndIf
Wend
EndFunc