-
Private
Monk autoit super script. 1280x720 A3Q4 Tremors in the Stone.
Hello. Credit for this goes to NoUseLying. Copied the code from him and changed it to work for the resolution in the title. I also removed the group feature for solo afk leveling.
This is specifically for a monk using the setup listed in the controls section below. Fully automated scripting. Copy and paste the code below into notepad and save as a .au3 file.
If you need the program, please google autoit to run this script.
;#### - NoUseLying's - Tremors in the Stone - Au3 Leveling AutoIt Script - ####
;Version .8
;Controls-
;Skill Slot 1 = Exploding Palm (not required, any glyph that you want) Left button
;Skill Slot 2 = Breath of Heaven (any glyph that you want, I use Blazing Wrath) Down button
;Skill Slot 3 = Serenity (any glyph that you want, I use Instant Karma) Up button
;Skill Slot 4 = Mantra of Evasion (any glyph that you want, I use Hard Target) Right button
;Skill Slot Left Click = Crippling Wave (any glyph that you want, I use Concussion)
;Skill Slot Right Click = Seven Sided Strike (not required, glyph that you want)
;Notes-
;Timings after loads is very high in order for various machines to run it flawlessly. Approximately 25
;seconds between click to load game and talk to the npc.
;It will automatically repair all equipment as well so you don't have
;to check to make sure you are not doing this with broken gear.
;Attack actions are done in place using the shift key. All Terror Spawns will come to you.
;Hotkeys Defined
HotKeySet("=","start") ;START by pressing =
HotKeySet("-", "stop") ;STOP by pressing -
$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()
sleep(random(24000,25000))
$xQuestDialog = Random(700,725) ; x leftside(700) x rightside(725)
$yQuestDialog = Random(260,294) ; y top(275) y bottom(294)
MouseClick("left",$xQuestDialog,$yQuestDialog,1)
EndFunc
Func findblacksmith()
$xFindBlacksmith = Random(1145,1150) ; x leftside(1145) x rightside(1150)
$yFindBlacksmith = Random(20,30) ; y top(20) y bottom(30)
MouseClick("left",$xFindBlacksmith,$yFindBlacksmith,1)
sleep(random(2000,2500))
EndFunc
Func findrepair()
$xFindRepair = Random(335,345) ; x leftside(335) x rightside(345)
$yFindRepair = Random(400,425) ; y top(400) y bottom(425)
MouseClick("left",$xFindRepair,$yFindRepair,1)
sleep(random(500,750))
EndFunc
Func repair()
$xRepair = Random(150,175) ; x leftside(150) x rightside(175)
$yRepair = Random(385,400) ; y top(385) y bottom(400)
MouseClick("left",$xRepair,$yRepair,1)
sleep(random(500,750))
EndFunc
Func movefromblacksmith()
Send("{Right}")
$xMoveFromBlacksmith = Random(400,410) ; x leftside(400) x rightside(410)
$yMoveFromBlacksmith = Random(460,470) ; y top(460) y bottom(470)
MouseClick("left",$xMoveFromBlacksmith,$yMoveFromBlacksmith,1)
EndFunc
Func huntchamber()
$xHuntChamber = Random(900,910) ; x leftside(900) x rightside(910)
$yHuntChamber = Random(490,500) ; y top(490) y bottom(500)
MouseClick("left",$xHuntChamber,$yHuntChamber,1)
EndFunc
Func findchamber()
$xFindChamber = Random(900,910) ; x leftside(900) x rightside(910)
$yFindChamber = Random(380,390) ; y top(380) y bottom(390)
MouseClick("left",$xFindChamber,$yFindChamber,1)
EndFunc
Func findchamber2()
$xFindChamber2 = Random(790,800) ; x leftside(790) x rightside(800)
$yFindChamber2 = Random(300,310) ; y top(300) y bottom(310)
MouseClick("left",$xFindChamber2,$yFindChamber2,1)
EndFunc
Func enterchamber()
$xEnterChamber = Random(490,500) ; x leftside(490) x rightside(450)
$yEnterChamber = Random(155,165) ; y top(155) y bottom(165)
MouseClick("left",$xEnterChamber,$yEnterChamber,1)
EndFunc
Func killeverything()
sleep(random(13500,13750))
$xRightKillArea = Random(1000,1075) ; x leftside(1000) x rightside(1075)
$yRightKillArea = Random(514,603) ; y top(514) y bottom(603)
$xMiddleKillArea = Random(675,750) ; x leftside(675) x rightside(750)
$yMiddleKillArea = Random(514,603) ; y top(514) y bottom(603)
$xLeftKillArea = Random(370,495) ; x leftside(370) x rightside(495)
$yLeftKillArea = Random(483,613) ; y top(483) y bottom(613)
$xUpperKillArea = Random(575,600) ; x leftside(575) x rightside(600)
$yUpperKillArea = Random(275,285) ; y top(275) y bottom(285)
MouseMove($xRightKillArea,$yRightKillArea,1)
Send("{RShift down}")
MouseDown("left")
sleep(random(1000,1500))
MouseMove($xLeftKillArea,$yLeftKillArea,1)
sleep(random(1000,1500))
MouseMove($xMiddleKillArea,$yMiddleKillArea,1)
sleep(random(1000,1500))
MouseMove($xRightKillArea,$yRightKillArea,1)
sleep(random(1000,1500))
MouseMove($xLeftKillArea,$yLeftKillArea,1)
sleep(random(1000,1500))
MouseMove($xUpperKillArea,$yUpperKillArea,1)
sleep(random(2000,2500))
MouseMove($xRightKillArea,$yRightKillArea,1)
Send("{Up}")
sleep(random(1000,1500))
MouseMove($xLeftKillArea,$yLeftKillArea,1)
sleep(random(1000,1500))
MouseMove($xRightKillArea,$yRightKillArea,1)
sleep(random(1000,1500))
MouseMove($xLeftKillArea,$yLeftKillArea,1)
sleep(random(1000,1500))
MouseMove($xMiddleKillArea,$yMiddleKillArea,1)
Send("{Down}")
sleep(random(1000,1500))
MouseMove($xUpperKillArea,$yUpperKillArea,1)
sleep(random(2000,2500))
MouseMove($xRightKillArea,$yRightKillArea,1)
sleep(random(1000,1500))
MouseMove($xLeftKillArea,$yLeftKillArea,1)
sleep(random(1000,1500))
MouseUp("left")
Send("{RShift up}")
EndFunc
Func exitchamber()
$xExitChamber = Random(535,545) ; x leftside(535) x rightside(545)
$yExitChamber = Random(155,165) ; y top(155) y bottom(165)
MouseClick("left",$xExitChamber,$yExitChamber,1)
sleep(random(1750,2000))
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)
sleep(Random(20000,21000))
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(1000,1500)
$bclearroom = random(1000,1500)
sleep(random($min,$max))
Call ( "resumegame" ) ;enter game
sleep(random($min,$max))
Call ( "quest" ) ;get quest
sleep(random(1200,1400))
Call ( "findblacksmith" ) ;move to blacksmith to repair.
sleep(random(2000,2500))
Call ( "findrepair" ) ;move to blacksmith to repair.
sleep(random(500,750))
Call ( "repair" ) ;move to blacksmith to repair.
sleep(random(500,750))
Call ( "movefromblacksmith" ) ;move away from blacksmith
sleep(random(500,750))
Call ( "huntchamber" ) ;head to the chamber
sleep(random(750,1000))
Call ( "findchamber" ) ;head to the chamber
sleep(random(750,1000))
Call ( "findchamber2" ) ;head to the chamber
sleep(random(750,1000))
Call ( "enterchamber" ) ;enter chamber
sleep(random(2200,2300))
Call ( "killeverything" ) ;clear room
sleep(random($aclearroom,$bclearroom))
Call ( "exitchamber" ) ;leave chamber
sleep(random(2300,2700))
Call ( "endrun" ) ;tp and exit
sleep(random(6250,6500))
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 [/LEFT]
Last edited by laughsitup2005; 09-10-2013 at 02:30 AM.
-
Post Thanks / Like - 1 Thanks
fm365met (1 members gave Thanks to laughsitup2005 for this useful post)
-
Private
is it possible to edit this for wizard? would you be so kindly to guide me from a-z? i dont know a thing here
-
Private
Hi there. All you have to do is change the skills to what you want. I do not play a wizard so I do not know what skills are best, but when you get through, you need to edit this according to your set up.
A quick explination on what you need to do is this.
Send is the action command for sending a key press. For example: Send("{Up}") this presses the up arrow.
A mouse click is a little different though: MouseDown("left") this presses the left mouse button.
And lastly: Send("{RShift down}") Notice that RShift has caps but down doesn't. The down action tells Right shift to be pressed, then to stay pressed until Send("{RShift up}") is called.
My rule of thumb is to make your main aoe ability left mouse click and have the shift hold for it. Right click for resource regenerating abilities if applicable, Right and down arrows for minions to help keep the terror spawns from all attacking you at once, Up and down arrow for buffs, and Left arrow for a secondary attack.
When you set up these skills in autoit, make sure you put the send actions between the mouse movement and sleep actions. For example:
MouseMove($xRightKillArea,$yRightKillArea,1)
(((Place attack here)))
sleep(random(1000,1500))
MouseMove($xLeftKillArea,$yLeftKillArea,1)
(((Place attack here)))
sleep(random(1000,1500))
Hope this helps. If you have any more questions, I will be happy to help.
Last edited by laughsitup2005; 09-17-2013 at 09:11 PM.