[Goldfarming] AFK Act 1 Sarkoth [AutoIT Script] [1920x1080] [WIZARD] *mackus101*

[oxyi]

sooooooo
after a few runs now with timmys scrip i can say it works fine for me (12% move,19m pick up range and about 24k dmg)

just sometimes he thinks the right lamp on the wall is rare/legendary and trys to pick it up ^^
and rarely he dont get to the celler for the open check cuz the mobs at the beginning blocked 1 teleport a bit but well shit happens

This is the issue where pixelsearch is not accurate, hence you have to use the ImageSearch function.

[illfated]

Use Venom Hydra instead of Meteor its way more effective.
Before teleporting back to town when there is no cellar found I also cast a hydra directly on me which kills nearby zombies who stop me from porting back
Also I added to hit esc + leave when theres no cellar found while he is teleporting to town which increases the survability to a 100% so far.
I also added #include <imagesearch> so I can feed it the item screenshots of the items I want him to pick up which works fairly fine.

Next I want to add that it searchs at 2-3 spots on the screen, as the 4th port sometimes messes up a littlebit so the dungeon is a little to the left.
If anyone has done that feel free to post ur tips

[TehVoyager]

First off: my code skills are not great.

what i did: took the info from this page: http://www.ownedcore.com/forums/diab...solutions.html (A guide to get notAres's script running on various 16:10 and above resolutions.)
Added to the pastebin from the opening post.

If someone running 1440x900 resolution, this should work. i'd appreciate someone testing it out.

Run in windowed NON FULLSCREEN mode. the reason for this is 1440x900 is a 16:10 resolution whereas this script was originally designed for 16:9. therefore we have to run the game in a 16x9 resolution. i used 1336x768 as its the 16:9 resolution that most closely matches 1440x900 (and there was example code for that resolution. lol thanks @Simonzi from that thread for the example code.

It will also require some editing to your D3Prefs.txt file.

    ;TehVoyager's edit of Mackus101's edit of notAres' Sarkoth DH Gold Script 1.3a - 6/9/2012
    ;Orig. Thread: http://ownedcore.com/forums/diablo-3/diablo-3-bots-programs/354464-goldfarming-notares-sarkarth-dh-gold-script-autoit-script-1920x1080.html
    ;Thread: http://www.ownedcore.com/forums/diablo-3/diablo-3-bots-programs/d3-gold-profiles/354396-goldfarming-afk-act-1-sarkoth-autoit-script-1920x1080-wizard-mackus101.html
    ;Please notice I changed some variable names around and added a variable for teleport time. $waittime is now appropriately named $loadtime.
    ;WONT WORK UNLESS MOVE IS BOUND TO MIDDLE MOUSE (Mouse 3) -- NOT MOVE/INTERACT
    ;Required build: http://us.battle.net/d3/en/calculator/wizard#kcjXSQ!YXe!aYaaZZ
    ;Required display mode for cellar detection: "WINDOWED (non fullscreen)"
    ;Edited resolution: 1440x900
    ;;;;;
    ;Features:
    ;Loot scanning. Will only pick up rare/legendary/set pieces [IMPROVED]
    ;Randomized aiming coordinates (but still static path)
    ;Randomized pickup timers for variation in runs
    ;Automatic repair on yellow status icon
    ;Automatic resolution adjustment (16:9 only) [BUGGY - need someone to tweak coords]
    ;Death check
    ;Open window check (in rare case it gets stuck in menu)
    ;;;;;
    ;Original:
    ;[Goldfarming] AFK 150k-200k Gold Per Hour by mackus101 @ ownedcore

    Opt('MouseCoordMode', 2)
    Opt('PixelCoordMode', 2)  

    Global $Paused
    HotKeySet("=","Leave")  ;script started by pressing =
    HotKeySet("-", "Pause") ;script paused by pressing -
    HotKeySet("x", "Stop") ;script stopped by pressing x
     
    $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
    $loadtime = 3200 ; time in ms the script waits for the game to load before it starts pathfinding. Slow this down for slower hard drives
    $tptime =       6900 ; time in ms the script waits for teleport before exiting the game
    $yellow =       0xFFF000 ; yellow color code (repair icon)
    $red =          0xD90000 ; red color code (repair icon)
     
    $LootRares = True ; Change this to false if you don't want the bot to pick up rares (good for legendary/set only, recommend setting LootGems to False)
    $LootGems = False ; Change this to true if you want to pick up gems (messy, can fill up bag with whites/blues)
    $Amethyst = 0xAC7FFF
    $Ruby = 0xB01D2D
    $Emerald = 0x58EE33
    $Topaz = 0xFFFF59
     
    $go = True
    $Leave = False
    $Dead = False
    $Logout = False
    $Window = False
    $default_resolutionX = 1920
    $default_resolutionY = 1080
    $x_ratio = 1366 / $default_resolutionX
    $y_ratio = 768 / $default_resolutionY
    $i = 0
     
    Call("RestartRun")
     
    Func RestartRun()
       While $go
              if($Leave) Then
                     $i = 0
                     Sleep(1000) ;had to add this since the icon doesn't show up RIGHT away in game
                     Call("CheckDead")
                     Call("CheckRepair")
                     If $Window Then
                            MouseClick("left", Round(230*$x_ratio),Round(416*$y_ratio)) ;button to resume game from main menu
                            Sleep($loadtime)
                            $Window = False
                            ExitLoop
                     ElseIf $Dead or $Logout Then
                            ExitLoop
                     EndIf
                     MouseClick("left", Round(0 * $x_ratio),Round(250 * $y_ratio)) ;starts the main run
                     Send("4")
                     Sleep(140)
                     Send("4")
                     Sleep(140)
                     Send("4")
                     Sleep(140)
                     Send("4")
                     Sleep(80)
                     Send("4")
                     Sleep(80)
                     Send("4")
                     Sleep(80)
					 Send("4")
                     Sleep(80)
                     Send("4")
                     Sleep(80)
					 Send("2")
					 Send("1")
					 Send("3")
                     Sleep(300)
                     MouseMove(Round(290*$x_ratio),Round(270*$y_ratio),1) ;moves cursor over to the cellar so the proper blue pixel becomes highlighted
                     Sleep(700)
                     Call("CheckDead")
                     If $Window Then
                            MouseClick("left", Round(230*$x_ratio),Round(416*$y_ratio)) ;button to resume game from main menu
                            Sleep($loadtime)
                            $Window = False
                            ExitLoop
                     ElseIf $Dead or $Logout Then
                            ExitLoop
                     EndIf
                     $Pixel2 = PixelSearch(0,0, Round(600*$x_ratio), Round(600*$y_ratio),0x334FB7,3) ;checks for open cellar (in a 600x400 box from the top left - where it should always be)
                               If Not @error Then
                                      MouseClick("left",Round(290*$x_ratio),Round(270*$y_ratio)) ;Entrance to cellar
                                      Sleep(400)
                                      Send("2")
                                      Sleep($walktime)
                                      MouseClick("middle",Round(110*$x_ratio),Round(1000*$y_ratio)) ;moves to doorway leading to rare inside cellar
                                      Sleep(2500)
                                      MouseMove(Round(440*$x_ratio),Round(80*$y_ratio),1) ;hovers over the rare Sarkoth
                                      Sleep(10)
                                      Send("{SHIFTDOWN}")
									  MouseClick("left",Round(440*$x_ratio),Round(80*$y_ratio),2)
                                      MouseDown("right") ;attack middle
                                      Sleep(4000)
                                      MouseClick("right",Round(620*$x_ratio),Round(20*$y_ratio),2) ;break the table & chair
                                      Sleep(10)
                                      Send("{SHIFTUP}")
                                      Sleep(400)
                                      MouseClick("middle",Round(530*$x_ratio),Round(170*$y_ratio)) ;location of sarkoth after death
                                      Sleep(2100)
                                      MouseClick("middle",Round(580*$x_ratio),Round(460*$y_ratio)) ;move to left top corner for gold
                                      Sleep(1100)
                                      MouseClick("middle",Round(1330*$x_ratio),Round(330*$y_ratio)) ;move to right top corner for gold
                                      Sleep(1100)
                                      MouseClick("middle",Round(1010*$x_ratio),Round(940*$y_ratio)) ;move to middle before looting
                                      Call("CheckLoot")
                                      Send("t")
                                      Sleep($tptime)
                                      Call("CheckDead")
                                      If Not $Logout And Not $Dead And Not $Window Then
                                             Sleep(300)
                                             Send("{ESCAPE}") ;menu
                                             Sleep(200)
                                             MouseClick("left", Round(956*$x_ratio),Round(579*$y_ratio)) ;button to leave game
                                             Sleep($loadtime)
                                             Call("CheckDead")
                                             If Not $Logout Then
                                                    MouseClick("left", Round(230*$x_ratio),Round(416*$y_ratio)) ;button to resume game from main menu
                                                    Sleep($loadtime)
                                             EndIf
                                      Else
                                             MouseClick("left", Round(230*$x_ratio),Round(416*$y_ratio)) ;button to resume game from main menu
                                             Sleep($loadtime)
                                             $Window = False ; reset the flag so it doesn't think a window is always up
                                      EndIf
                               Else
                                      Sleep(50)
                                      Send("t")
                                      Sleep($tptime)
                                      Call("CheckDead")
                                      If Not $Logout And Not $Dead And Not $Window Then
                                             Sleep(300)
                                             Send("{ESCAPE}") ;menu
                                             Sleep(200)
                                             MouseClick("left", Round(956*$x_ratio),Round(579*$y_ratio)) ;button to leave game
                                             Sleep($loadtime)
                                             Call("CheckDead")
                                             If Not $Logout Then
                                                    MouseClick("left", Round(230*$x_ratio),Round(416*$y_ratio)) ;button to resume game from main menu
                                                    Sleep($loadtime)
                                             EndIf
                                      Else
                                             MouseClick("left", Round(230*$x_ratio),Round(416*$y_ratio)) ;button to resume game from main menu
                                             Sleep($loadtime)
                                             $Window = False ; reset the flag so it doesn't think a window is always up
                                      EndIf
                            EndIf
              EndIf
       WEnd
       Call("RestartRun")
    EndFunc
     
    Func CheckDead()
    Call("CheckWindow")
    $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 Not @error Then
       If Not $Window Then
              $Dead = True
              Sleep(100)
              Send("{Escape}")
              Sleep(10)
              MouseClick("left", Round(956*$x_ratio),Round(579*$y_ratio)) ;button to leave game
              Sleep(11000)
              Sleep($loadtime)
              MouseClick("left", Round(230*$x_ratio),Round(416*$y_ratio)) ;button to resume game from main menu
              Sleep($loadtime)
       Else
              MouseClick("left", Round(230*$x_ratio),Round(416*$y_ratio)) ;button to resume game from main menu
              Sleep($loadtime)
              $Dead = False
       EndIf
    Else
       $Dead = False
    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
    If Not @error Then
       Sleep(11000)
       Sleep($loadtime)
       If Not $Window Then
              $Dead = True
              $Logout = True
              Sleep($loadtime)
              MouseClick("left", Round(230*$x_ratio),Round(416*$y_ratio)) ;button to resume game from main menu
              Sleep($loadtime)
       Else
              MouseClick("left", Round(230*$x_ratio),Round(416*$y_ratio)) ;button to resume game from main menu
              Sleep($loadtime)
              $Logout = False
       EndIf
    Else
       $Logout = False
    EndIf
    EndFunc
     
    Func CheckWindow()
    $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
    If Not @error Then
       Sleep(200)
       Send("{SPACE}") ;close any open windows
       $Window = True
    Else
       $Window = False
    EndIf
    EndFunc
     
    Func CheckRepair()
    $RepairArea = PixelSearch(Round(1480*$x_ratio), 0, Round(1570*$x_ratio), Round(100*$y_ratio), $yellow)
       If Not @error Then
              Call("DoRepair")
       EndIf
    $RepairAreaRed = PixelSearch(Round(1480*$x_ratio), 0, Round(1570*$x_ratio), Round(100*$y_ratio), $red)
       If Not @error Then
              Call("DoRepair")
       EndIf
    EndFunc
     
    Func DoRepair()
    Sleep(100)
    Send("t")
    Sleep($tptime)
    MouseClick("left", Round(1480*$x_ratio),Round(281*$y_ratio)) ;begin movement towards merchant
    Sleep(1500)
    MouseClick("left", Round(1316*$x_ratio),Round(206*$y_ratio)) ;moves to get merchant in screen
    Sleep(1500)
    MouseClick("left", Round(845*$x_ratio),Round(225*$y_ratio)) ;NPC Merchant to the right of cain's home
    Sleep(1200)
    MouseClick("left", Round(521*$x_ratio),Round(506*$y_ratio)) ;button to open up repair menu
    Sleep(400)
    MouseClick("left", Round(260*$x_ratio),Round(595*$y_ratio)) ;button to pay for repairs
    Sleep(200)
    Call("CheckDead")
    If Not $Dead and Not $Logout Then
       Send("{ESCAPE}") ;closes repair tab
       Sleep(100)
       Send("{ESCAPE}") ;menu
       Sleep(10)
       MouseClick("left", Round(956*$x_ratio),Round(579*$y_ratio)) ;button to leave game
       Sleep($loadtime)
       MouseClick("left", Round(230*$x_ratio),Round(416*$y_ratio)) ;button to resume game from main menu
       Sleep($loadtime)
    EndIf
    EndFunc
     
    Func CheckLoot()
    Sleep(Random(500,2000))
    $SetLoot = PixelSearch(Round(400*$x_ratio), 0, Round(1690*$x_ratio), Round(900*$y_ratio), 0x02CE01, 2) ; set loot
    If Not @error Then
       MouseClick ('left', $SetLoot[0], $SetLoot[1])
       Sleep(Random(800,1200))
       $i+= 1
       If $i <= 6 Then
              Call("CheckLoot")
       EndIf
    EndIf
    $LegendaryLoot= PixelSearch(Round(400*$x_ratio), 0, Round(1690*$x_ratio), Round(900*$y_ratio), 0xBF642F, 2) ; legendary loot
    If Not @error Then
       MouseClick ('left', $LegendaryLoot[0], $LegendaryLoot[1])
       Sleep(Random(800,1200))
       $i+= 1
       If $i <= 6 Then
              Call("CheckLoot")
       EndIf
    EndIf
    If $LootRares Then
       $RareLoot = PixelSearch(Round(400*$x_ratio), 0, Round(1690*$x_ratio), Round(900*$y_ratio), 0xBBBB00, 2) ; rare loot (darker for compatibility)
       If Not @error Then
              MouseClick ('left', $RareLoot[0], $RareLoot[1])
              Sleep(Random(700,900))
              $i+= 1
              If $i <= 6 Then
                     Call("CheckLoot")
              EndIf
       EndIf
    EndIf
    If $LootGems Then
       $AmethystDrop = PixelSearch(Round(400*$x_ratio), 0, Round(1690*$x_ratio), Round(900*$y_ratio), $Amethyst,8)
       If Not @error Then
              MouseClick("left", $AmethystDrop[0], $AmethystDrop[1])
              Sleep(Random(900,1400))
              $i+= 1
              If $i <= 10 Then
                     Call("CheckLoot")
              EndIf
       EndIf
       $RubyDrop = PixelSearch(Round(400*$x_ratio), 0, Round(1690*$x_ratio), Round(900*$y_ratio), $Ruby,6)
       If Not @error Then
              MouseClick("left", $RubyDrop[0], $RubyDrop[1])
              Sleep(Random(900,1400))
              $i+= 1
              If $i <= 10 Then
                     Call("CheckLoot")
              EndIf
       EndIf
       $EmeraldDrop = PixelSearch(Round(400*$x_ratio), 0, Round(1690*$x_ratio), Round(900*$y_ratio), $Emerald,11)
       If Not @error Then
              MouseClick("left", $EmeraldDrop[0], $EmeraldDrop[1])
              Sleep(Random(900,1400))
              $i+= 1
              If $i <= 10 Then
                     Call("CheckLoot")
              EndIf
       EndIf
       $TopazDrop = PixelSearch(Round(400*$x_ratio), 0, Round(1690*$x_ratio), Round(900*$y_ratio), $Topaz,2)
       If Not 1 = 1 Then ; change to 'If Not @error Then' if you want to search for topazes
              MouseClick("left", $TopazDrop[0], $TopazDrop[1])
              Sleep(Random(900,1400))
              $i+= 1
              If $i <= 10 Then
                     Call("CheckLoot")
              EndIf
       EndIf
    EndIf
    EndFunc
     
    Func Pause()
       $Leave = False
    EndFunc
     
    Func Stop() ;to allow the script to stop
        Exit
    EndFunc
     
    Func Leave()
       $Leave = True
    EndFunc

D3Prefs.txt

DisplayModeWindowMode "1"
DisplayModeWinLeft "1"
DisplayModeWinTop "1"
DisplayModeWinWidth "1382"
DisplayModeWinHeight "806"
DisplayModeUIOptWidth "1366"
DisplayModeUIOptHeight "768"
DisplayModeWidth "1366"
DisplayModeHeight "768"

[wittekop]

Have you fixed the bug with death on TP ? if your TPing when it detects the dank cellar isnt there and while your porting a mob kills you this bugs the wormwhole script.. has yours addressed this ?

looks like it didn't. just got back home after running it for 2.5 hours, and the script got me stuck in the game menu on the profile screen (opens up when u click your character)
also noticed that, if he dies during the no cellar detected, teleport to town : he detects that you died, uses the proper delay to leave game + restart a new game, but on starting the new run instead of teleporting towards the cellar door he just walks left, right into the zombies + he dies again. then he detects that you're dead again, uses the proper delay to start a new game and from there he does teleport. i don't understand why theres a difference...

i wasn't watching the bot when he got stuck in the profile screen window, but i noticed that after teleporting to the area in front of the cellar door, when he uses diamond skin it happens that theres zombies in the area. when there's no cellar door he starts the townportal, but gets interrupted by getting hit by the zombies. the hits don't kill the char right away since he still has diamond skin, but the Sleep-delays are already counting and i think they reach the time in the script where it's supposed to leave game, before the checkdead function is activated ==> this makes the script think it's in the starting game menu and wants to click 'resume game' while it's not there yet. that way, the script starts clicking @ random points, thinking it's running the game, and accidentally clicks on your character, opening the profile info screen.

which leads me to the next question :

the checkwindow function : which window does it exactly check for ? i thought this was only checking if there's an error-code window. Or is it supposed to check the profile info window and the banner window as well?

[Richness]

Would appreciate any assistance on making him attack Sarkoth a bit longer, thank you in advance.

[wittekop]

Would appreciate any assistance on making him attack Sarkoth a bit longer, thank you in advance.

look for this part
MouseMove(Round(440*$x_ratio),Round(80*$y_ratio),1) ;hovers over the rare Sarkoth
Sleep(10)
Send("{SHIFTDOWN}")
MouseClick("left",Round(440*$x_ratio),Round(80*$y_ratio),2)
MouseDown("right") ;attack middle
Sleep(4000)

and raise the value of the Sleep(...)

[TehVoyager]

EDIT: @op have you thought about trying this build: Wizard - Game Guide - Diablo III

Pop sparkflint and Force weapon and Diamond skin at start. Tele to Sarkoth. if there go down pop meteor on him pop archon channel the beam. once dead collect loot.

[Fumador]

@TechVoyager:

Your version of this script dont work for me. I use 1440x900 dekstop resolution and in D3 I use setting provided by you for D3prefs:

DisplayModeWindowMode "1"
DisplayModeWinLeft "1"
DisplayModeWinTop "1"
DisplayModeWinWidth "1382"
DisplayModeWinHeight "806"
DisplayModeUIOptWidth "1366"
DisplayModeUIOptHeight "768"
DisplayModeWidth "1366"
DisplayModeHeight "768"

Unfortunately, this version dont even hit "resume" button. its just miss it - dont know why :/.

[TehVoyager]

.....Damnit.

well, i thought i could be of some service. i'll try to tinker with it when i get home, but i have close to no experience with code or autoit. mabie the stars will align or something.

did you run in Non fullscreen windowed mode? Letterbox mode off? did you follow the instructions from the OP exactly?

At the very least, at least it failed before getting anyone killed ^__^

[Fumador]

Unfortunale, most boots are working only with 1920:1080 16:9 screens. Im discriminated :/...

[TehVoyager]

Wahts sad is i could probably run the bot if i put my game on my 42"HDTV hahahaha

[blb078]

This somewhat helped. It kind of works although ghetto-ish. He now goes to repair before each run, which I guess is better than nothing. I've checked the pixel color and coords a couple times but he still goes to repair ever times. Still have the issue where it doesn't detect death but I just put a longer sleep in and let it go through the script so that works. The biggest problem I have right now is the cellar, I put the pixel color and coords down but it seems my character or the mouse is slightly off each run so it's never in the same spot and i noticed the blue in the cellar is diff color even from the slightest movement. So I had to have it check the tip of the door be open in the cellar which works, but the issue is that is is also the same color if the door is closed so whether it's open or close he runs over to it and proceeds to fire away, etc. So my question is, is there a way to have it detect the center part of the cellar if it's not the color of the wood which that color on my screen is 0xf0f0f0 to run over and click it. So i guess if the pixel color doesn't equal 0xf0f0f0 then run over and click other wise port out?
and maybe do the same thing for the repair, if it doesnt equal 0x001648(my yellow color...i think) then have it proceed as normal, if it does equal that then repair

anyone able to help w/this?

[swaby]

The dying issue I put in a sleep(10000) on line 143(should be around there for you) and that basically just delayed everything and now when he dies it works fine, takes a bit longer but at least it works.

Which line/phrasing exactly do I insert this timer in? Because at 143 I have "MouseClick("left", Round(230*$x_ratio),Round(416*$y_ratio))" I added Sleep(10000) before and after that line and it did not seem to solve anything.

[nvmax]

Here is mine. Just so everyone is aware, it uses the default set up for the wizard as originally stated in the beginning of the post. I have 45ias and 21 yard pickup radius. This pickup radius makes it so that I do not have to travel around the room to pick up all the gold. He only travels if there are any yellows/greens/oranges. As soon as my wiz walks over to were sark died, all gold is picked up and then goes to town and exits. If you want this back, you will need to remove the commented areas in the code where it moves the wiz to the left top/right top/bottom left. This run is very fast and works on the original 1080. Repair is also in this script but no blue pickups and sales. It's about 35s to complete a run when sark is there and about 15s when he is not.

[AutoIt] wizworm - Pastebin.com

Edit: I also have 11% movement speed and I do 32k damage and my timings are adjusted for this. If you don't have run speed, cast speed, pick up radius..you may have many troubles with this current version. All it needs is longer sleep times though if that is the case. If you like this script and want me to fix the sleep times for another build, say 0 movement, cast, radius, I can do that however you will gain much faster runs, and more gold, if you go to the auction house and buy a few better items to mach. Enjoy.

this is a very very bad script, for it moving down the steps not sure why this is needed though adds the chance to die from a big guy right at the first every so often, 2nd when it detects there isnt any cellar there it runs upwards to the well, which like 20% of the time there is mobs there which you will die and take more loss of gold there, and last when in the cellar it kills the mobs very well though goes to 1 point and then stops moving, doesnt pick up alot of gold on the side, I have 24 radius pickup and still misses alot of gold, thats not good.

2nd if you get killed while tping then it bugs it so very often and then it never gets out of the loop and it fails, so if you can fix those few issues your script would be pretty sweet, also newer scripts have blue pickup and sell for additional gold, might want to incorporate that.

[MaynardDL]

I had this problem too. Your first issue is related to pixel color. You have to figure what pixel color your cellar is, they're all blueish but depending on your computer it might be a tad lighter or darker than the person who wrote the script. The dying issue I put in a sleep(10000) on line 143(should be around there for you) and that basically just delayed everything and now when he dies it works fine, takes a bit longer but at least it works.

Now if someone can see my post a few above(post #214) and let me know if those things are possible it'd be much appreciated. thx

How do I best figure out the pixel color and once I do, where is it changed? Also I notive on line 146 a Sleep(5) or above that on 142 Sleep($loadtime)... which is it?