[Goldfarming] AFK 150k-200k Gold Per Hour [AutoIT Script]

This is a discussion on [Goldfarming] AFK 150k-200k Gold Per Hour [AutoIT Script] within the Diablo 3 bots, hacks and exploits board part of the Diablo 3 forum category; Untitled123.png Global $Paused HotKeySet("=","Leave") ;script can START by pressing = HotKeySet("-", "Pause") ;script can be Pause by pressing - HotKeySet("x", ...

Page 1 of 5 123 ... LastLast
Results 1 to 10 of 41
  1. #1
    moris1's Avatar
    moris1 is offline Banned User Array
    Join Date
    Nov 2008
    Location
    NC
    Posts
    2
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    0
    Reputation
    -1

    [Goldfarming] AFK 150k-200k Gold Per Hour [AutoIT Script]

    Untitled123.png





    Global $Paused

    HotKeySet("=","Leave") ;script can START by pressing =
    HotKeySet("-", "Pause") ;script can be Pause by pressing -
    HotKeySet("x", "Stop") ;script can be Stopped by pressing x

    $go = True
    $Leave = False

    While $go
    if($Leave) Then
    $Pixel1 = PixelSearch(1482,20,1535,95,0xFFF000) ;searches top right screen for yellow of broken armor
    If Not @error Then
    Send("t")
    Sleep(8000)
    MouseClick("left", 1480, 281) ;begin movement towards merchant
    Sleep(1500)
    MouseClick("left", 1316, 206) ;moves to get merchant in screen
    Sleep(1500)
    MouseClick("left", 845, 225) ;NPC Merchant to the right of cain's home
    Sleep(1500)
    MouseClick("left", 521, 506) ;button to open up repair menu
    Sleep(1500)
    MouseClick("left", 260, 595) ;button to pay for repairs
    Sleep(2500)
    Send("{ESCAPE}") ;opens menu
    Sleep(1000)
    MouseClick("left", 956, 579) ;button to leave game
    Sleep(8000)
    MouseClick("left", 230, 416) ;button to resume game from main menu
    Sleep(8000)
    Else
    MouseClick("left", 587, 333) ;starts the run
    Sleep(1800)
    Send("2")
    MouseClick("left", 96, 383)
    Sleep(800)
    Send("1")
    Sleep(1500)
    MouseClick("left", 417, 422) ;middle of area outside of cellar
    Send("1")
    Sleep(2000)
    Send("3")
    Send("2")
    MouseMove(118, 224,1) ;moves cursor over to the cellar so the proper blue pixel becomes highlighted
    Sleep(2000)
    $Pixel2 = PixelSearch(0,0,1950,1120,0x3B62E3) ;searches for the specific blue pixel that only occurs when mouse hovers over open cellar
    If Not @error Then
    MouseClick("left",118,224) ;Entrance to cellar
    Sleep(1900)
    Send(2)
    Sleep(1800)
    MouseClick("left", 531, 769)
    Sleep(2000)
    MouseClick("left", 547, 490) ;moves to doorway leading to rare inside cellar
    Sleep(1500)
    MouseMove(579,209,1) ;hovers over the rare Sarkoth
    Send(4)
    Sleep(1000)
    Send("{SHIFTDOWN}")
    MouseDown("right") ;attack middle
    Sleep(4200)
    MouseMove(467,269,1) ;attack left, add more sleep time if you can't kill minion on left
    Sleep(2000)
    MouseMove(682,147,1) ;attack right
    Sleep(1000)
    MouseMove(579,209,1) ;move back to middle
    Sleep(1000)
    MouseUP("right")
    Sleep(300)
    Send("{SHIFTUP}")
    Sleep(500)
    MouseClick("left", 579, 209) ;location of sarkoth after death
    Sleep(2500)
    MouseClick("left", 866, 324) ;moves to right top corner for gold
    Sleep(1500)
    MouseClick("left", 902, 954) ;moves to bottom middle for gold
    Sleep(1500)
    MouseClick("left", 687, 413) ;moves to left top corner for gold
    Sleep(1500)
    Send("t")
    Sleep(8200)
    Send("{Escape}") ;menu
    MouseClick("left", 956, 579) ;button to leave game
    Sleep(13000)
    MouseClick("left", 230, 416) ;button to resume game from main menu
    Sleep(7000)
    Else
    MouseClick("left",900,900) ;moves down screen away from cellar in attempt for safety before teleporting back to town
    Sleep(1200)
    Send("t")
    Sleep(8200)
    Send("{ESCAPE}") ;menu
    MouseClick("left", 956, 579) ;button to leave game
    Sleep(13000)
    MouseClick("left", 230, 416) ;button to resume game from main menu
    Sleep(8000)
    EndIf
    EndIf
    EndIf
    WEnd

    Func Pause()
    $Leave = False
    EndFunc

    Func Stop() ;to allow the script to stop
    Exit
    EndFunc

    Func Leave()
    $Leave = True
    EndFunc


    Also i hate to say this but it seems like if I wont ask ,nobody will give it to me so and me please.
    Last edited by moris1; 06-06-2012 at 06:59 PM.

  2. The Following User Says Thank You to moris1 For This Useful Post:


  3. #2
    abboz695 is offline Guru
    Array
    Join Date
    Sep 2011
    Posts
    78
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    7
    Reputation
    24
    this would be great but i wish it was more versatile so i could use it for all classes, even if i changed them quickly

  4. #3
    Tzheng is offline Newbie
    Array
    Join Date
    Jun 2012
    Posts
    2
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    0
    Reputation
    0
    Is there some sort of guide or tutorial? Perhaps a video or something (I understand that these things take time, but at least what does all this mean?). I have autoitv3, but never used scripts before, and I don't know what to do with the code up there. Plz help!!

  5. #4
    btrizzy is offline Wannabe Member
    Array
    Join Date
    Oct 2008
    Posts
    12
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    10
    Reputation
    1
    Can you make a script that can just run around the royal crypts to pick up gold?


  6. #5
    Tzheng is offline Newbie
    Array
    Join Date
    Jun 2012
    Posts
    2
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    0
    Reputation
    0
    So I finally got this into a script format, which AutoIT can read. I logged into inferno Act I Legacy of Cain - Explore Cellar (like the picture said), then I pressed leave game, and at the main menu, I pressed resume. At this time, I started up the script (I copied it from the post and paste into a script editor, saved as an .au3 file, and ran it). The cursor moved to the waypoint, but then when it select on the maps, it won't go to Old Ruins (instead, it will pressed below Old Ruins, then start placement of caltrops). Please help!! I am on windowed full screen 1920x1080 res and have got 6 drop radius like the requirement said.

  7. #6
    Mackus101 is offline Newbie
    Array
    Join Date
    Jun 2012
    Posts
    1
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    0
    Reputation
    0
    Originally posted On ownedcore.com

    ---------- Post added at 09:23 AM ---------- Previous post was at 09:22 AM ----------

    Quote Originally Posted by Mackus101 View Post
    Originally posted On ownedcore.com
    [Goldfarming] AFK 150k-200k Gold Per Hour [AutoIT Script] [1920x1080] [made for DH]

  8. #7
    Valefor2 is offline Banned User Array
    Join Date
    Jan 2011
    Posts
    497
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    0
    Reputation
    95
    this works for babarian and i could have i the download link?

  9. #8
    jtanton is offline Newbie
    Array
    Join Date
    Jun 2012
    Posts
    2
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    0
    Reputation
    0
    How do you get scripts to work srry I'v never used one before.

  10. #9
    jgibson5041 is offline Newbie
    Array
    Join Date
    Jun 2012
    Posts
    8
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    6
    Reputation
    3
    I have modified this script to for for a melee based character, such as a barb or monk. It only collects the gold, and you need a gold/health pick up of at least 6 yards. Here is the code. Enjoy!

    Global $Paused

    HotKeySet("=","Leave")
    HotKeySet("-", "Pause")
    HotKeySet("x", "Stop")

    $default_resolutionX = 1920
    $default_resolutionY = 1080
    $x_ratio = @Desktopwidth / $default_resolutionX
    $y_ratio = @Desktopheight / $default_resolutionY

    $go = True
    $Leave = False

    While $go
    if($Leave) Then
    $Pixel1 = PixelSearch((1482 * $x_ratio),(20 * $y_ratio),(1535 * $x_ratio),(95 * $y_ratio),0xFFF000) ;searches top right screen for yellow of broken armor
    If Not @error Then
    Send("t")
    Sleep(8000)
    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(1500)
    MouseClick("left", Round(521 * $x_ratio),Round(506 * $y_ratio)) ;button to open up repair menu
    Sleep(1500)
    MouseClick("left", Round(260 * $x_ratio),Round(595 * $y_ratio)) ;button to pay for repairs
    Sleep(2500)
    Send("{ESCAPE}") ;opens menu
    Sleep(1000)
    MouseClick("left", Round(956 * $x_ratio),Round(579 * $y_ratio)) ;button to leave game
    Sleep(8000)
    MouseClick("left", Round(230 * $x_ratio),Round(416 * $y_ratio)) ;button to resume game from main menu
    Sleep(8000)
    Else
    MouseClick("left", Round(587 * $x_ratio),Round(333 * $y_ratio)) ;starts the main run
    Sleep(1800)
    Send("2")
    MouseClick("left", Round(96 * $x_ratio),Round(383 * $y_ratio))
    Sleep(800)
    Send("1")
    Sleep(1500)
    MouseClick("left", Round(417 * $x_ratio),Round(422 * $y_ratio)) ;middle of area outside of cellar
    Send("1")
    Sleep(2000)
    Send("3")
    Send("2")
    MouseMove(Round(115 * $x_ratio),Round(210 * $y_ratio),1) ;moves cursor over to the cellar so the proper blue pixel becomes highlighted
    Sleep(2000)
    $Pixel2 = PixelSearch(0,0,(960 * $x_ratio),(540 * $y_ratio),0x3B62E3,3) ;searches for the specific blue pixel that only occurs when mouse hovers over open cellar
    If Not @error Then
    MouseClick("left",Round(115 *$x_ratio),Round(210 * $y_ratio)) ;Entrance to cellar
    Sleep(1900)
    Send(2)
    Sleep(1800)
    MouseClick("left",Round(531 *$x_ratio),Round(769 * $y_ratio))
    Sleep(2000)
    MouseClick("left",Round(547 *$x_ratio),Round(490 * $y_ratio)) ;moves to doorway leading to rare inside cellar
    Sleep(1500)
    MouseMove(Round(579 * $x_ratio),Round(209 * $y_ratio),1) ;hovers over the rare Sarkoth
    Send(4)
    Sleep(1000)
    MouseDown("right") ;attack middle
    Sleep(3800)
    MouseMove(Round(467 * $x_ratio),Round(269 * $y_ratio),1) ;attack left, add more sleep time if you can't kill minion on left
    Sleep(3000)
    MouseMove(Round(682 * $x_ratio),Round(147 * $y_ratio),1) ;attack right
    Sleep(800)
    MouseMove(Round(579 * $x_ratio),Round(209 * $y_ratio),1) ;move back to middle
    Sleep(1000)
    MouseUP("right")
    Sleep(500)
    MouseMove (Round(579 * $x_ratio) ,Round(209 * $y_ratio) ,1)
    Sleep (3000)
    MouseClick("left",Round(579 *$x_ratio),Round(209 * $y_ratio)) ;location of sarkoth after death
    Sleep(2500)
    MouseClick("left",Round(866 *$x_ratio),Round(324 * $y_ratio)) ;moves to right top corner for gold
    Sleep(1500)
    MouseClick("left",Round(902 *$x_ratio),Round(954 * $y_ratio)) ;moves to bottom middle for gold
    Sleep(1500)
    MouseClick("left",Round(687 *$x_ratio),Round(413 * $y_ratio)) ;moves to left top corner for gold
    Sleep(1500)
    MouseClick("left",Round(1447 *$x_ratio),Round (704 * $y_ratio)) ;moves down and left for gold
    Sleep(1500)
    MouseClick("left",Round(1049 *$x_ratio),Round (104 * $y_ratio)) ;moves up and right for gold
    Sleep(1500)
    MouseClick("left",Round(1073 *$x_ratio),Round (303 * $y_ratio))
    Sleep(1500)
    MouseClick("left",Round(1291 *$x_ratio),Round (801 * $y_ratio))
    Sleep(1500)
    Send("t")
    Sleep(8200)
    Send("{Escape}") ;menu
    MouseClick("left",Round(956 * $x_ratio),Round(579 * $y_ratio)) ;button to leave game
    Sleep(13000)
    MouseClick("left",Round(230 * $x_ratio),Round(416 * $y_ratio)) ;button to resume game from main menu
    Sleep(7000)
    Else
    MouseClick("left",Round(900 * $x_ratio),Round(900 * $y_ratio)) ;moves down screen away from cellar in attempt for safety before teleporting back to town
    Sleep(1200)
    Send("t")
    Sleep(8200)
    Send("{ESCAPE}") ;menu
    MouseClick("left",Round(956 * $x_ratio),Round(579 * $y_ratio)) ;button to leave game
    Sleep(13000)
    MouseClick("left",Round(230 * $x_ratio),Round(416 * $y_ratio)) ;button to resume game from main menu
    Sleep(8000)
    EndIf
    EndIf
    EndIf
    WEnd

    Func Pause()
    $Leave = False
    EndFunc

    Func Stop() ;to allow the script to stop
    Exit
    EndFunc

    Func Leave()
    $Leave = True
    EndFunc

  11. #10
    loofer is offline Newbie
    Array
    Join Date
    Jun 2012
    Posts
    1
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    0
    Reputation
    0
    Tried to run it over night, Guess it ran for about an hour (gained 150k or so) but I woke up to it clicking my desktop. Not sure how it closed diablo by itself but it did nothing a good majority of the night lol. Will test again, thanks for sharing.


    Edit: Have been messing with it and its working great, but you could double or even triple your gold income if you could figure out how to program it to pick up flawless gems as well as gold. I'm not sure exactly how to make it check for pixel colors on the screen.
    Last edited by loofer; 06-08-2012 at 11:33 PM.

Page 1 of 5 123 ... LastLast

Similar Threads

  1. [Goldfarming] Make up to 500k per hour - fast - Act I Inferno
    By moris1 in forum Diablo 3 bots, hacks and exploits
    Replies: 3
    Last Post: 07-30-2012, 05:57 AM
  2. [Bot/Autoit Script] PVP Honor Leeching Script
    By tschoerk in forum WoW Bots, hacks and exploits
    Replies: 36
    Last Post: 11-30-2011, 11:00 PM
  3. Replies: 4
    Last Post: 08-23-2009, 10:38 PM
  4. wowwal/hybrid make 200k gold in 5 minutes
    By avik in forum Say Hello
    Replies: 0
    Last Post: 05-09-2009, 08:30 PM
  5. First AutoIt Script
    By Toxik in forum Entertainment
    Replies: 2
    Last Post: 01-22-2008, 02:07 AM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •