View difference between Paste ID: x3PbRjdi and hV4L3dXR

-;notAres' DH Gold Script 1.9.3 - 6/18/2012 - New INI option: Identify. Added VendItems() and StashItems() to simplify code and added 2 colors of legendaries to stash (highlighted/not highlighted). Trimmed down all "Area" CheckFor() calls. Fixed CheckFor("ExitGame"). Moves mouse out of the way while looting. Added deaths/cellars to PAUSED tooltip.
+#include <ImageSearch.au3> ;comment this if you are not using the new looting system
-;YOU MUST START THE BOT AT THE RESUME GAME SCREEN!
+Global $Paused
-;Thread: http://ownedcore.com/forums/diablo-3/diablo-3-bots-programs/354464-goldfarming-notares-sarkoth-dh-gold-script-autoit-script-1920x1080.html
+
-;;;;;
+
-;WONT WORK UNLESS MOVE IS BOUND TO MIDDLE MOUSE (Mouse 3) -- NOT MOVE/INTERACT
+HotKeySet("=","Leave")  ;script started by pressing =
-;Suggested build: http://us.battle.net/d3/en/calculator/demon-hunter#aRYXVT!aYW!YaaabY
+HotKeySet("-", "Pause") ;script paused by pressing -
-;Required display mode for cellar detection: "FULLSCREEN WINDOWED"
+
-;Official supported resolution: 1920x1080
+
-;;;;;
+;ImageSearch Looting Variables
-;Original by mackus101 @ ownedcore
+$ImgLoot = True ; set this to true if you want to use ImageSearch looting system. False will revert to old PixelSearch method
-;ImageSearch contributions by rvbfreak, goofinator, and asuRob
+$directory = "C:\Users\junqi\Documents\D3" ; CHANGE THIS! Point it to the directory with the imagesearch pngs
-;Refactoring and additional functions by Shimizoki
+$totalItems = 19 ; This needs to match the number of pngs you are loading
 Global $pick[$totalItems], $size = WinGetClientSize("[TITLE:Diablo III; CLASS:D3 Main Window Class]"), $go = True, $Leave = False, $Dead = False, $Logout = False, $Window = False, $i = 0, $currentArrayItem = 0, $gX = 0, $gY = 0
-;=========== DO NOT TOUCH ===========;
+If ($size[0]/$size[1]) <> 16/9 Then $size[1]-=30 ; adjusts ratio for titlebar if not 16:9
-#RequireAdmin
+$pick[0] = "legendaryA.png|20"
-#include <GUIConstantsEx.au3>
+$pick[1] = "legendaryE.png|20"
-#include <StaticConstants.au3>
+$pick[2] = "legendaryI.png|10"
-#include <WindowsConstants.au3>
+$pick[3] = "legendaryO.png|20"
 $pick[4] = "legendaryU.png|20"
 $pick[5] = "legendaryY.png|20"
-Global $size = WinGetClientSize("[CLASS:D3 Main Window Class]"), $ver = "1.9.3", $ini = "DH.ini", $hFont = 0, $title, $Paused, $Go = False, $i = 0, $gX = 0, $gY = 0, $LegendaryCount = 0, $SetCount = 0, $RareCount = 0, $MagicCount = 0, $GemCount = 0, $TomeCount = 0, $deathCount = 0, $cellarCount = 0, $t = TimerInit(), $rt = 0, $run = 0, $yellow = 0xFFF000, $red = 0xD90000, $lblRun, $lblLocation, $lblStatus, $lblLast, $lblRuntime, $lblGear, $lblItems
+$pick[6] = "setA.png|30"
-For $i = 0 To Random(0, 7, 1)
+$pick[7] = "setE.png|30"
-	$title &= Chr(Random(97, 122, 1))
+$pick[8] = "setU.png|30"
 $pick[9] = "setO.png|30"
-For $i = 0 To Random(5, 10, 1)
+$pick[10] = "setI.png|30"
-	$title &= Chr(Random(65, 90, 1))
+$pick[11] = "rareA.png|20"
 $pick[12] = "rareE.png|20"
-$title &= " "
+$pick[13] = "rareI.png|20"
-Global $gems[8] = ["Ru1.png", "Ru2.png", "Em1.png", "Em2.png", "To1.png", "To2.png", "Am1.png", "Am2.png"]
+$pick[14] = "rareO.png|20"
-If @OSArch = "X64" Then DllCall("kernel32.dll", "int", "Wow64DisableWow64FsRedirection", "int", 1)
+$pick[15] = "rareU.png|20"
-If @OSArch = "X64" And Not @AutoItX64 Then MsgBox(16, "ERROR", "Why aren't you running the 64-bit AutoIt??? Expect bugs!")
+$pick[16] = "ros.png|40"
-If $size = 0 Then
+$pick[17] = "uare.png|40"
-	MsgBox(16, "Error", "Diablo III is not running, cannot grab resolution!" & @CRLF & "Exiting...")
+$pick[18] = "tome.png|40"
-	Exit
+
 $LootRares = True ; set this to false if you don't want the bot to pick up rares (old looting method only)
-;====================================;
+$Timer = False ; set this to true and the bot will randomly wait (5% chance) in town for 30-60 seconds before starting over
 $walktime = 3000 ; time in ms the script waits for you to enter and load the cellar. Slow this down for slower move speeds and loading times
-;============= SETTINGS: DONT CHANGE HERE, CHANGE DH.INI =============;
+$loadtime = 5000 ; time in ms the script waits for the game to load before it starts pathfinding. Slow this down for slower hard drives
-HotKeySet("=", "Begin") ;script toggled on/off by pressing =
+$tptime = 6900 ; time in ms the script waits for teleport before exiting the game
-HotKeySet("{PAUSE}", "TogglePause") ;script toggle pause by pressing Pause/Break key
+
 $y_ratio = $size[1] / 1080
 $yellow = 0xFFF000 ; yellow color code (repair icon)
-;Change to match your abilities (1-4 by default)z
+$red = 0xD90000 ; red color code (repair icon)
-$skillCaltrops = "1"
+
-$skillSmokeScreen = "2"
+Call("RestartRun")
-$skillPreparation = "3"
+
-$skillCompanion = "4"
+   While $go
 	  if($Leave) Then
-$movementSpeed = 25 ;This is the % increase movement speed you have. 25 = 25%, 0 = 0% (25% is the movement cap but SS + Displacement avg = 32%)
+		 $i = 0
 		 Call("CheckExit")
-;Custom Loot
+		 Sleep(850) ;had to add this since the icon doesn't show up RIGHT away in game
-$pngLoc = "@ScriptDir" ;Location of the .PNGs (NO SUBFOLDERS - ALL PNGS GO HERE)
+		 Call("CheckDead")
-$totalItems = 1 ;Number of items in the pick array
+		 Call("CheckRepair")
-Global $pick[$totalItems] ;DONT CHANGE THIS
+		 If $Window Then
 			MouseClick("left", Round(140*$x_ratio),Round(420*$y_ratio)) ;button to resume game from main menu
-;Array of items to loot (GEMS AND TOMES ALREADY INCLUDED)
+
-$pick[0] = "mythic.png|40" ;png|Tolerance
+			$Window = False
-;$pick[1] = "item2.png|0"
+
-;$pick[2] = "item3.png|0"
+		 ElseIf $Dead or $Logout Then
 			ExitLoop
-;Looting
+		 EndIf
-$LootSets = "True" ;True if you want to pick up Sets
+		 MouseClick("middle", Round(500*$x_ratio), Round(250*$y_ratio)) ;starts the run [waypoint 1]
-$LootLegendaries = "True";True if you want to pick up Legendaries
+		 Sleep(900)
-$LootRares = "True" ;True if you want to pick up Rares
+		 Send("2")
-$LootMagic = "True" ;True if you want to pick up Magic
+		 Sleep(300)
-$LootGems = "True" ;True if you want to pick up Gems
+		 MouseClick("middle", 1, Round(370*$y_ratio)) ;waits ~1 second then [waypoint 2]
-$LootTomes = "True" ;True if you want to pick up Tome of Secrets
+		 Sleep(1400)
-$LootCustom = "False" ;True if you want to pick up Custom Items (The items in the $pick array above)
+		 MouseClick("middle", Round(400*$x_ratio), Round(600*$y_ratio)) ;middle of courtyard [waypoint 3]
 		 Sleep(40)
-;Manage Loot
+		 Send("2")
-$Identify = "True" ;True to enable identifying items before stashing/vendoring
+		 Sleep(20)
-$mLoot = 5 ;Nuber of successful runs until Stash and Vendor
+		 Send("3")
-$mLootOff = 2 ;Stash and Vendor after mLoot +- X number of runs (Variability)
+		 Sleep(600)
 		 Send("1")
-;Stashing
+		 Sleep(300)
-$StashLoot = "True" ;True if you want to store Items in the stash
+		 MouseMove(Round(300*$x_ratio),Round(100*$y_ratio),1) ;moves cursor over to the cellar so the proper blue pixel becomes highlighted
-;---
+		 Sleep(790)
-$StashLegendary = "True";True if you want to store Legendary items in the stash
+		 Call("CheckDead")
-$StashRare = "True" ;True if you want to store Rare items in the stash
+		 If $Window Then
-$StashMagic = "False" ;True if you want to store Magic items in the stash
+			MouseClick("left", Round(140*$x_ratio),Round(420*$y_ratio)) ;button to resume game from main menu
-$StashTomes = "True" ;True if you want to store Tomes items in the stash
+
-$StashGems = "True" ;True if you want to store Gems items in the stash
+			$Window = False
 			ExitLoop
-;Vendoring ==NEW SETTINGS==
+		 ElseIf $Dead or $Logout Then
-$VendorLoot = "True" ;True if you want to vendor anything
+
-;---
+		 EndIf
-$VendorRare = "True" ;True if you want to vendor Rares
+		 $Pixel2 = PixelSearch(0,0, Round(600*$x_ratio), Round(600*$y_ratio),0x334FB7,3) ;checks for open cellar (in a 600x600 box from the top left - where it should always be)
-$VendorMagic = "True" ;True if you want to vendor Magic
+			   If Not @error Then
-$vendorAll = "False" ;True if you want to right click all items when talking to vendor
+				  MouseClick("left",Round(300*$x_ratio),Round(100*$y_ratio)) ;Entrance to cellar
-$vendorRows = 5 ;# of rows to vendor, starting from the top (default = 5: bottom row is safe)
+				  Sleep(300)
-$vendorCols = 10 ;# of columns to vendor, starting from left
+				  Send("2")
 				  Sleep(350) ; second cast in case the cooldown timer isn't quite right (rarely happens)
-;Variability ==NEW SETTINGS==
+				  Send("2")
-$Timer = "True" ;True and the bot will add random sleep intervals
+				  Sleep($walktime)
-;---
+				  MouseClick("middle",Round(110*$x_ratio),Round(1000*$y_ratio)) ;moves to doorway leading to rare inside cellar
-$attackTime = 3900 ;Time (in ms) the script will shoot sarkoth with the right button
+				  Sleep(2500)
-$attackMulti = "True" ;True if you want to shoot both left and right in addition to the middle (False for Lightning Ball)
+				  MouseMove(Round(440*$x_ratio),Round(80*$y_ratio),1) ;hovers over the rare Sarkoth
-$walktime = 2800 ;Time (in ms) the script waits for you to enter and load the cellar. Slow this down for slower move speeds and loading times
+				  Sleep(10)
-$loadtime = 3400 ;Time (in ms) the script waits for the game to load before it starts pathfinding. Slow this down for slower hard drives
+				  Send("{SHIFTDOWN}")
-$tptime = 6900 ;Time (in ms) the script waits for teleport before exiting the game
+				  MouseDown("right") ;attack middle
-;====================================;
+				  Sleep(1200)
 				  Send("4")
 				  Sleep(3000)
 				  MouseUp("right")
-If FileExists($ini) Then
+				  MouseClick("left",Round(440*$x_ratio),Round(80*$y_ratio),2)
-	Call("ReadINI")
+				  MouseMove(Round(240*$x_ratio),Round(75*$y_ratio),1) ;attack left
-	Call("CreateINI")
+				  Sleep(40)
 				  MouseDown("right")
-	Call("CreateINI")
+				  Sleep(2800)
 				  MouseUp("right")
 				  MouseMove(Round(590*$x_ratio),Round(50*$y_ratio),1) ;attack right
-If $pngLoc == "@ScriptDir" Then $pngLoc = @ScriptDir & "\pics\"
+				  MouseDown("right")
-If $totalItems < 1 Then $LootCustom = "False"
+				  Sleep(1800)
-$mLootIn = $mLoot
+				  MouseUp("right")
-$movementSpeed = 1 + ($movementSpeed / 100)
+				  MouseDown("left")
-$VersionsInfo = "http://dl.dropbox.com/u/9955791/version.ini"
+				  MouseMove(Round(Random(240,260)*$x_ratio),Round(75*$y_ratio),1) ;attack left
-$oldVersion = IniRead("updater.ini", "Version", "Version", $ver)
+				  Sleep(1200)
-$newVersion = "0.0"
+				  MouseMove(Round(Random(560,600)*$x_ratio),Round(50*$y_ratio),1) ;attack right
 				  Sleep(1200)
-If Not FileExists($pngLoc & "MainMenu.png") Then
+				  MouseUP("left")
-	MsgBox(16, "Fatal Error", "FATAL ERROR: Cannot find: " & $pngLoc & "MainMenu.png" & @CRLF & "Make sure your directory is set properly in the script")
+				  Sleep(10)
-	Exit
+				  MouseClick("right",Round(620*$x_ratio),Round(20*$y_ratio),2) ;break the table & chair
 				  Sleep(10)
 				  Send("{SHIFTUP}")
-Call("SetupGUI")
+				  Sleep(400)
-Call("DoUpdate")
+				  MouseClick("middle",Round(530*$x_ratio),Round(170*$y_ratio)) ;location of sarkoth after death
 				  Sleep(2100)
-While 1
+				  MouseClick("middle",Round(580*$x_ratio),Round(460*$y_ratio)) ;move to left top corner for gold
-	Call("RestartRun")
+				  Sleep(1100)
-WEnd
+				  MouseClick("middle",Round(1330*$x_ratio),Round(330*$y_ratio)) ;move to right top corner for gold
 				  Sleep(1100)
 				  Send("4")
-	If ($Go) Then
+				  MouseClick("middle",Round(1010*$x_ratio),Round(940*$y_ratio)) ;move to middle before looting
-		$i = 0
+				  Send("{ALTDOWN}")
-		WinSetTitle($title, "", $title & $ver & " - Running")
+				  Call("CheckLoot")
-		MouseMove(Round(Random(0, 400) * $x_ratio), Round(Random(700, 1080) * $y_ratio), 3) ;Moves mouse out of the way
+				  Send("{ALTUP}")
-		;Checks if the player is Dead/Logout/Window, then if in Main Menu, etc.
+				  SLeep(10)
-		If CheckDead() Then
+				  Send("t")
-			Return
+				  Sleep($tptime)
-		ElseIf CheckFor("ExitGame", "", Round(860 * $x_ratio), Round(400 * $y_ratio), Round(1040 * $x_ratio), Round(450 * $y_ratio), 0.5, 140) Then
+				  Call("RandomSleep")
-			GUICtrlSetData($lblStatus, "Status: Exit window up")
+				  Call("CheckDead")
-			MouseClick("left", Round(1064 * $x_ratio), Round(632 * $y_ratio))
+				  If Not $Logout And Not $Dead And Not $Window Then
-			Sleep(100)
+					 Sleep(300)
-			Send("{SPACE}")
+					 Send("{ESCAPE}") ;menu
-			Return
+					 Sleep(200)
-		ElseIf CheckFor("MainMenu", "", Round(40 * $x_ratio), Round(300 * $y_ratio), Round(400 * $x_ratio), Round(450 * $y_ratio)) Then
+					 MouseClick("left", Round(960*$x_ratio),Round(580*$y_ratio)) ;button to leave game
-			GUICtrlSetData($lblRun, "Run Number: " & $run & " - Runs till vendor: " & $mLootIn)
+					 Sleep($loadtime)
-			GUICtrlSetData($lblLocation, "Location: Main Menu")
+					 Call("CheckDead")
-			GUICtrlSetData($lblStatus, "Status: Starting Game")
+					 If Not $Logout Then
-			RandClick("left", Round(230 * $x_ratio), Round(416 * $y_ratio), 120, 20, 1, 6) ;Random Click on the resume button
+						MouseClick("left", Round(140*$x_ratio),Round(420*$y_ratio)) ;button to resume game from main menu
 						Sleep($loadtime)
-			$rt = TimerInit()
+					 EndIf
-			$run += 1
+				  Else
-		ElseIf CheckFor("OldRuins", "Area") Or CheckFor("NewTristram", "Area") Or CheckFor("DankCellar", "Area") Then
+					 MouseClick("left", Round(140*$x_ratio),Round(420*$y_ratio)) ;button to resume game from main menu
-			Call("TownPortal")
+					 Sleep($loadtime)
-			Call("LeaveGame")
+					 $Window = False ; reset the flag so it doesn't think a window is always up
-			Return
+				  EndIf
-		ElseIf CheckFor("LimitError", "", Round(700 * $x_ratio), Round(340 * $y_ratio), Round(1200 * $x_ratio), Round(600 * $y_ratio), 1, 140) Then
+			   Else
-			MouseClick("left", Round(960 * $y_ratio), Round(635 * $x_ratio))
+				  Sleep(10)
-			$rand = Random(40000, 80000)
+				  MouseClick("middle",Round(1100*$x_ratio),Round(600*$y_ratio)) ;moves between caltrops for safety before teleporting back to town
-			GUICtrlSetData($lblStatus, "Status: Input Limit - Waiting " & Round($rand / 1000) & " seconds.")
+				  Sleep(200)
-			Sleep($rand)
+				  Send("1")
-			Send("{SPACE}")
+				  Sleep(620)
-			Return
+				  Send("2")
-		ElseIf CheckFor("Disconnect", "", Round(700 * $x_ratio), Round(340 * $y_ratio), Round(1200 * $x_ratio), Round(600 * $y_ratio), 1, 140) Then
+				  Sleep(40)
-			GUICtrlSetData($lblStatus, "Status: Network Disconnect window up")
+				  Send("t")
-			MouseClick("left", Round(960 * $x_ratio), Round(632 * $y_ratio))
+				  Sleep($tptime)
-			Sleep(100)
+				  Call("RandomSleep")
-			Send("{SPACE}")
+				  Call("CheckDead")
-			Return
+				  If Not $Logout And Not $Dead And Not $Window Then
-		Else
+					 Sleep(300)
-			GUICtrlSetData($lblStatus, "ERROR: Cannot find Resume button")
+					 Send("{ESCAPE}") ;menu
-			Return
+					 Sleep(200)
-		EndIf
+					 MouseClick("left", Round(960*$x_ratio),Round(580*$y_ratio)) ;button to leave game
-		;Make sure we are in the right area before beginning run
+					 Sleep($loadtime)
-		If CheckFor("OldRuins", "Area") Then
+					 Call("CheckDead")
-			Sleep(200)
+					 If Not $Logout Then
-			GUICtrlSetData($lblLocation, "Location: Old Ruins")
+						MouseClick("left", Round(140*$x_ratio),Round(420*$y_ratio)) ;button to resume game from main menu
-			Call("CheckRepair")
+						Sleep($loadtime)
-			;Start Run
+					 EndIf
-			RandClick("middle", Round(500 * $x_ratio), Round(250 * $y_ratio), 2, 2) ;starts the run [waypoint 1]
+				  Else
-			Moving(900)
+					 MouseClick("left", Round(140*$x_ratio),Round(420*$y_ratio)) ;button to resume game from main menu
-			Send($skillSmokeScreen)
+					 Sleep($loadtime)
-			Moving(600)
+					 $Window = False ; reset the flag so it doesn't think a window is always up
-			RandClick("middle", Round(3 * $y_ratio), Round(370 * $y_ratio), 2, 2) ;waits ~1 second then [waypoint 2]
+				  EndIf
-			Moving(1850)
+
-			RandClick("middle", Round(400 * $x_ratio), Round(600 * $y_ratio), 2, 2) ;middle of courtyard [waypoint 3]
+	  EndIf
-			Moving(100)
+   WEnd
-			Send($skillSmokeScreen)
+   Call("RestartRun")
-			Moving(100)
+EndFunc
-			Send($skillPreparation)
+
-			Moving(750)
+
-			Send($skillCaltrops)
+Call("CheckWindow")
-			Moving(100)
+$YouHaveDied = PixelSearch(Round(620*$x_ratio), Round(325*$y_ratio), Round(625*$x_ratio), Round(330*$y_ratio), 0xFFFFFF) ; checks for white text "YOU HAVE DIED"
-			RandMove(Round(300 * $x_ratio), Round(70 * $y_ratio), 1, 1) ;moves cursor over to the cellar so the proper blue pixel becomes highlighted
+If Not @error Then
-			Sleep(350)
+   If Not $Window Then
-			If CheckDead() Then
+	  $Dead = True
-				Return
+	  Sleep(100)
 	  Send("{Escape}")
 	  Sleep(10)
-			;Checks if Dank Cellar is Open
+	  MouseClick("left", Round(960*$x_ratio),Round(580*$y_ratio)) ;button to leave game
-			$Pixel2 = PixelSearch(0, 0, Round(600 * $x_ratio), Round(600 * $y_ratio), 0x334FB7, 3)
+	  Sleep(11000)
-			If Not @error Then
+	  Sleep($loadtime)
-				GUICtrlSetData($lblStatus, "Status: Cellar - Found")
+	  MouseClick("left", Round(140*$x_ratio),Round(420*$y_ratio)) ;button to resume game from main menu
-				$cellarCount += 1
+	  Sleep($loadtime)
-				MouseClick("left", Round(300 * $x_ratio), Round(70 * $y_ratio), 1) ;Entrance to cellar
+   Else
-				Sleep(800 * $movementSpeed)
+	  MouseClick("left", Round(140*$x_ratio),Round(420*$y_ratio)) ;button to resume game from main menu
-				Send($skillSmokeScreen)
+	  Sleep($loadtime)
-				Moving($walktime)
+	  $Dead = False
-			Else ;ABORT RUN
+   EndIf
-				GUICtrlSetData($lblStatus, "Status: Cellar - Not Found" & @CRLF)
+
-				Sleep(10)
+   $Dead = False
-				RandClick("middle", Round(1100 * $x_ratio), Round(600 * $y_ratio)) ;moves between caltrops for safety before teleporting back to town
+
-				Moving(250)
+$LogoutTimerCancel = PixelSearch(Round(900*$x_ratio), Round(240*$y_ratio), Round(1010*$x_ratio), Round(290*$y_ratio), 0x993827) ; checks for cancel button on logout timer
-				Send($skillCaltrops)
+If Not @error Then
-				Sleep(620)
+   Sleep(11000)
-				Send($skillSmokeScreen)
+   Sleep($loadtime)
-				Sleep(40)
+   If Not $Window Then
-				Call("TownPortal")
+	  $Dead = True
-				If Not CheckDead() Then
+	  $Logout = True
-					Call("LeaveGame")
+	  Sleep($loadtime)
-				EndIf
+	  MouseClick("left", Round(140*$x_ratio),Round(420*$y_ratio)) ;button to resume game from main menu
-				Return
+	  Sleep($loadtime)
    Else
-		Else
+	  MouseClick("left", Round(140*$x_ratio),Round(420*$y_ratio)) ;button to resume game from main menu
-			Call("TownPortal")
+	  Sleep($loadtime)
-			If Not CheckDead() Then
+	  $Logout = False
-				Call("LeaveGame")
+   EndIf
 Else
-			Return
+   $Logout = False
-		EndIf
+
 EndFunc
-		;Checks that the player is in the Dank Cellar
+
-		If CheckFor("DankCellar", "Area") Then
+Func CheckWindow()
-			GUICtrlSetData($lblLocation, "Location: Dank Cellar")
+$CloseButton = PixelSearch(Round(1570*$x_ratio), Round(110*$y_ratio), Round(1590*$x_ratio), Round(120*$y_ratio), 0x8C2300) ; checks for the red color of the "X" on an open window
-			RandClick("middle", Round(110 * $x_ratio), Round(1000 * $y_ratio), 1, 1) ;moves to doorway leading to rare inside cellar
+If Not @error Then
-			Sleep(Random(2200, 2800))
+   Sleep(200)
-			RandMove(Round(460 * $x_ratio), Round(80 * $y_ratio), 1, 1) ;hovers over the rare Sarkoth
+   Send("{SPACE}") ;close any open windows
-			Sleep(10)
+   $Window = True
-			Send("{SHIFTDOWN}")
+
-			GUICtrlSetData($lblStatus, "Status: Attacking Sarkoth")
+   $Window = False
-			MouseDown("right") ;ATTACK
+
-			Sleep(1100)
+EndFunc
-			Send($skillCompanion)
+
-			Sleep($attackTime)
+Func CheckExit()
-			MouseUp("right")
+$ExitButton = PixelSearch(Round(1190*$x_ratio), Round(400*$y_ratio), Round(1200*$x_ratio), Round(440*$y_ratio), 0x14100E) ; checks for the grey border of the exit prompt
-			RandClick("left", Round(460 * $x_ratio), Round(80 * $y_ratio), 1, 1)
+If Not @error Then
-			RandMove(Round(240 * $x_ratio), Round(75 * $y_ratio), 1, 1) ;attack left
+   Send("{ESCAPE}")
-			Sleep(40)
+   Sleep(100)
-			MouseDown("right")
+   Send("{SPACE}") ;close any open windows
-			If $attackMulti == True Then Sleep($attackTime / 2)
+   Sleep(200)
-			MouseUp("right")
+   MouseMove(1,1) ; reset cursor position before checking for button
-			MouseMove(Round(590 * $x_ratio), Round(50 * $y_ratio), 1) ;attack right
+   $Resume = Hex(PixelGetColor(Round(140*$x_ratio), Round(420*$y_ratio)), 6) ; checks if resume button can be pressed
-			MouseDown("right")
+   If $Resume == "400900" Or $Resume == "380900" Then
-			If $attackMulti == True Then Sleep($attackTime / 2)
+	  Sleep(200)
-			MouseUp("right")
+	  MouseClick("left", Round(140*$x_ratio),Round(420*$y_ratio)) ;button to resume game from main menu
-			MouseDown("left")
+	  Sleep($loadtime)
-			MouseMove(Round(Random(240, 260) * $x_ratio), Round(75 * $y_ratio), 1) ;attack left
+   EndIf
-			If $attackMulti == True Then Sleep($attackTime / 2.5)
+
-			MouseMove(Round(Random(560, 600) * $x_ratio), Round(50 * $y_ratio), 1) ;attack right
+EndFunc
-			If $attackMulti == True Then Sleep($attackTime / 2.5)
+
-			MouseUp("left")
+
-			Sleep(400)
+$RepairArea = PixelSearch(Round(1480*$x_ratio), 0, Round(1570*$x_ratio), Round(100*$y_ratio), $yellow)
-			MouseClick("right", Round(630 * $x_ratio), Round(18 * $y_ratio), 1, 8) ;break the table & chair
+   If Not @error Then
-			Sleep(200)
+	  Call("DoRepair")
-			Send("{SHIFTUP}")
+   EndIf
-			Moving(200)
+$RepairAreaRed = PixelSearch(Round(1480*$x_ratio), 0, Round(1570*$x_ratio), Round(100*$y_ratio), $red)
-			RandClick("middle", Round(530 * $x_ratio), Round(190 * $y_ratio)) ;location of sarkoth after death
+   If Not @error Then
-			Moving(2700)
+	  Call("DoRepair")
-			GUICtrlSetData($lblStatus, "Status: Looting")
+   EndIf
-			Send($skillCompanion)
+EndFunc
-			Call("Loot")
+
-			RandSleep(0, 6, 30)
+
-			Send($skillCompanion)
+Sleep(100)
-			Call("TownPortal")
+Send("t")
-		Else
+Sleep($tptime)
-			Send($skillCaltrops)
+MouseClick("left", Round(1480*$x_ratio),Round(281*$y_ratio)) ;begin movement towards merchant
-			Sleep(400)
+Sleep(1500)
-			Send($skillSmokeScreen)
+MouseClick("left", Round(1316*$x_ratio),Round(206*$y_ratio)) ;moves to get merchant in screen
-			Sleep(40)
+Sleep(1500)
-			Call("TownPortal")
+MouseClick("left", Round(845*$x_ratio),Round(225*$y_ratio)) ;NPC Merchant to the right of cain's home
-			If Not CheckDead() Then
+Sleep(1200)
-				Call("LeaveGame")
+MouseClick("left", Round(521*$x_ratio),Round(506*$y_ratio)) ;button to open up repair menu
 Sleep(400)
-			Return
+MouseClick("left", Round(260*$x_ratio),Round(595*$y_ratio)) ;button to pay for repairs
-		EndIf
+Sleep(200)
-		;After successful run
+Call("CheckDead")
-		If Not CheckDead() Then
+If Not $Dead and Not $Logout Then
-			Sleep(600)
+   Send("{ESCAPE}") ;closes repair tab
-			If $mLootIn = 1 And CheckFor("NewTristram", "Area") Then ;If its time to manage loot and we are in town
+   Sleep(100)
-				If $Identify == True Then Call("Identify")
+   Send("{ESCAPE}") ;menu
-				If $StashLoot == True Then
+   Sleep(10)
-					Call("StashLoot")
+   MouseClick("left", Round(960*$x_ratio),Round(580*$y_ratio)) ;button to leave game
-				EndIf
+   Sleep($loadtime)
-				If $VendorLoot == True Then
+   MouseClick("left", Round(140*$x_ratio),Round(420*$y_ratio)) ;button to resume game from main menu
-					Call("VendorLoot")
+   Sleep($loadtime)
-				EndIf
+
-				$mLootIn = Round(Random($mLoot - $mLootOff, $mLoot + $mLootOff)) ;Reset Counter
+EndFunc
-			ElseIf Not CheckFor("NewTristram", "Area") Then
+
-				GUICtrlSetData($lblStatus, "Status: Skipping vendor, not in New Tristram")
+Func CheckLoot()
-				Sleep(3000)
+Sleep(Random(500,2000))
-			ElseIf $mLootIn <= 0 Then
+If Not $ImgLoot Then
-				$mLootIn = 1
+   $SetLoot = PixelSearch(Round(400*$x_ratio), 0, Round(1900*$x_ratio), Round(900*$y_ratio), 0x02CE01, 2) ; set loot
-			Else
+   If Not @error Then
-				$mLootIn -= 1
+	  MouseClick ('left', $SetLoot[0], $SetLoot[1], 1, 0)
 	  Sleep(Random(1000,1200))
-			If Not CheckDead() Then
+	  MouseMove(14,14,0) ;Reset cursor position, it doesn't need to hover
-				Call("LeaveGame")
+	  $i+= 1
 	  If $i <= 6 Then
-			Return
+		 Call("CheckLoot")
-		Else
+		 SLeep(10)
-			Return
+	  EndIf
-		EndIf
+   EndIf
-	EndIf
+   $LegendaryLoot= PixelSearch(Round(400*$x_ratio), 0, Round(1900*$x_ratio), Round(900*$y_ratio), 0xBF642F, 2) ; legendary loot
-EndFunc   ;==>RestartRun
+   If Not @error Then
 	  MouseClick ('left', $LegendaryLoot[0], $LegendaryLoot[1], 1, 0)
-;Helper Functions
+	  Sleep(Random(1000,1200))
 	  MouseMove(14,14,0) ;Reset cursor position, it doesn't need to hover
-Func SetupGUI()
+	  $i+= 1
-	$frmBot = GUICreate($title & $ver & " - Updating", 280, 121, Round(1540 * $x_ratio), Round(920 * $y_ratio), -1, BitOR($WS_EX_TOPMOST, $WS_EX_TOOLWINDOW), 0)
+	  If $i <= 6 Then
-	GUISetBkColor(0xC0C0C0)
+		 Call("CheckLoot")
-	$lblRun = GUICtrlCreateLabel("Run Number: 0 - Runs till vendor: 0", 4, 0, 280, 24)
+		 SLeep(10)
-	GUICtrlSetFont(-1, 10, 600, 0, "Segoe UI")
+	  EndIf
-	GUICtrlSetColor(-1, 0xFF0000)
+   EndIf
-	$lblLocation = GUICtrlCreateLabel("Location: Main Menu", 12, 20, 240, 17)
+   If $LootRares Then
-	$lblStatus = GUICtrlCreateLabel("Status: ", 12, 35, 240, 17)
+	  $RareLoot = PixelSearch(Round(400*$x_ratio), 0, Round(1900*$x_ratio), Round(900*$y_ratio), 0xBBBB00, 2) ; rare loot (darker for compatibility)
-	$lblLast = GUICtrlCreateLabel("Last Runtime: 0 seconds", 12, 50, 240, 17)
+	  If Not @error Then
-	$lblRuntime = GUICtrlCreateLabel("Total Runtime: 0 hours, 0 minutes", 12, 65, 240, 17)
+		 MouseClick ('left', $RareLoot[0], $RareLoot[1], 1, 0)
-	$lblGear = GUICtrlCreateLabel("Legendary: 0 - Set: 0 - Rare: 0", 12, 80, 240, 17)
+		 Sleep(Random(1000,1200))
-	$lblItems = GUICtrlCreateLabel("Magic: 0 - Gems: 0 - Tomes: 0", 12, 95, 240, 17)
+		 MouseMove(14,14,0) ;Reset cursor position, it doesn't need to hover
-	GUISetState(@SW_SHOW)
+		 $i+= 1
-EndFunc   ;==>SetupGUI
+		 If $i <= 6 Then
 		 Call("CheckLoot")
 		 EndIf
-	$LogoutTimerCancel = PixelSearch(Round(900 * $x_ratio), Round(240 * $y_ratio), Round(1010 * $x_ratio), Round(290 * $y_ratio), 0x993827) ; checks for cancel button on logout timer
+	  EndIf
-	If Not @error Then
+   EndIf
-		GUICtrlSetData($lblStatus, "Status: Logging out")
+
-		Sleep(11000)
+   Call("pickItems")
-		Sleep($loadtime)
+
-		Return 1
+EndFunc
-	EndIf
+
 Func pickItems()
-	$CloseButton = PixelSearch(Round(1570 * $x_ratio), Round(110 * $y_ratio), Round(1590 * $x_ratio), Round(120 * $y_ratio), 0x8C2300) ; checks for the red color of the "X" on an open window
+$currentArrayItem = 0
-	If Not @error Then
+For $gI = 0 to ($totalItems - 1)
-		GUICtrlSetData($lblStatus, "Status: Open Window")
+   $array = StringSplit($pick[$gI],"|")
-		Sleep(200)
+   $file = $array[1]
-		Send("{SPACE}") ;close any open windows
+   $accuracy = $array[2]
-		Return 1
+   $urlString = $directory & $file
-	EndIf
+   $Target = _ImageSearchArea($urlString,1,0,0,Round(1920*$x_ratio),Round(1080*$y_ratio),$gX,$gY,$accuracy)
    While $i <= 12 ; max: 13 gems and pieces of gear to loot
-	$YouHaveDied = PixelSearch(Round(620 * $x_ratio), Round(325 * $y_ratio), Round(625 * $x_ratio), Round(330 * $y_ratio), 0xFFFFFF) ; checks for white text "YOU HAVE DIED"
+	  If $Target And ($gX > 15) And ($gY > 15) Then
-	If Not @error Then
+		 ;MsgBox(4096,"Debug",$urlString & " " & $gX & "-" & $gY)
-		GUICtrlSetData($lblStatus, "Status: Dead")
+		 MouseClick("left", $gX, $gY, 1, 0)
-		$deathCount += 1
+		 Sleep(Random(1200,1400))
-		Call("LeaveGame")
+		 MouseMove(14,14,0) ;Reset cursor position, it doesn't need to hover
-		Sleep(11000)
+		 Sleep(5)
-		Sleep($loadtime)
+		 $Target = _ImageSearchArea($urlString,1,0,0,Round(1920*$x_ratio),Round(1080*$y_ratio),$gX,$gY,$accuracy)
-		Return 1
+		 $i+= 1
-	Else
+	  Else
-		Return 0
+		 ExitLoop
-	EndIf
+	  EndIf
-EndFunc   ;==>CheckDead
+   WEnd
 Next
 EndFunc
-	$RepairArea = PixelSearch(Round(1480 * $x_ratio), 0, Round(1570 * $x_ratio), Round(100 * $y_ratio), $yellow)
+
-	If Not @error Then
+Func RandomSleep()
-		Call("DoRepair")
+   If $Timer And Random(1,20) = 20 Then
-	EndIf
+	  Sleep(Random(30000,60000)
-	$RepairAreaRed = PixelSearch(Round(1480 * $x_ratio), 0, Round(1570 * $x_ratio), Round(100 * $y_ratio), $red)
+   EndIf
-	If Not @error Then
+EndFunc
-		Call("DoRepair")
+
-	EndIf
+Func Pause()
-EndFunc   ;==>CheckRepair
+   $Leave = False
 EndFunc
 
-	Sleep(Random(75, 150))
+
-	Call("TownPortal")
+    Exit
-	If CheckDead() Then
+EndFunc
-		Return
+
-	EndIf
+Func Leave()
-	If CheckFor("NewTristram", "Area") Then
+   $Leave = True
-		RandClick("left", Round(1480 * $x_ratio), Round(281 * $y_ratio), 1, 1) ;begin movement towards merchant
+EndFunc