AVA LD Farmer 1.1

**UCSerge** · 09-28-2013

AVA Settings:
Window Mode: both In game and Lobby
Field of View: 90 Degrees
Resolution: 800*600(4:3)
Basic Scanning Rate
Gamma: 2.75 (Must be set exactly to 2.75)
Graphic quality: Good (Level 3)

Update:
Whole code was restructured to work better
Closes friend requests/invites
Closes host connection error
Makes a new LD 1 player room

How to use: Since admins keep deleting my compiled release you guys will have to do it this way.
Google autoit, download + install
You will need to make a new autoit script and add my code
in the code you will see "@"error
You have to remove the "" after you copy it into your autoit script
Run script

Hotkeys:
End - Start-Pause
Del - Close script

Enjoy and don't be a leecher

Code:

#include <Misc.au3>

Global $mode = 0
Global $Alive
Opt("MouseCoordMode", $mode)
Opt("PixelCoordMode", $mode)


HotKeySet("{End}", "CheckAll")
HotKeySet("{Del}", "EndApp")


While 1
   Sleep(100)
   WEnd
   
   
   func CheckAll()
      $Alive = Not $Alive
      
      While $Alive
      Sleep(100)
      $coord = PixelSearch(390, 492, 422, 522, 0x54661C, 3)
      If Not "@"error Then ;invite search
      Sleep(100)
      Send("{Esc}")
      EndIf
      
      Sleep(100)
      $coord = PixelSearch(463, 487, 486, 512, 0x54661C, 3)
      If Not "@"error Then ;host error check
      Sleep(100)
      Send("{Esc}")
      Sleep(1000)
      EndIf
      
      Sleep(100)
      $coord = PixelSearch(322, 294, 347, 321, 0xD8D9D9, 3)
      If Not "@"error Then
      Sleep(100)
      MouseMove(422, 361, 10) ;createroom
      Sleep(100)
      MouseClick("left")
      Sleep(300)
      MouseMove(248, 388, 10) ;select room
      Sleep(100)
      MouseClick("left")
      Sleep(100)
      MouseMove(808, 353, 10) ;change max players
      Sleep(100)
      MouseClick("left")
      Sleep(100)
      MouseMove(802, 376, 10) ;change to 1player
      Sleep(100)
      MouseClick("left")
      Sleep(100)
      MouseMove(461, 612, 10) ;click ok
      Sleep(100)
      MouseClick("left")
      Sleep(1500)
      EndIf
      
      Sleep(100)
      $coord = PixelSearch(319, 432, 501, 528, 0xEB2A00, 3)
      If Not "@"error Then
      Sleep(100)
      MouseMove(418, 257, 10) ;start
      Sleep(150)
      MouseClick("left")
      Sleep(7000)
      EndIf
      
      Sleep(100)
      $coord = PixelSearch(250, 105, 590, 140, 0xFFA700, 3)
      If Not "@"error Then
      Sleep(250)
      Send("{Home}")
      Sleep(100)
      MouseMove(239, 262, 10) ;menuclick player
      MouseClick("left")
      Sleep(200)
      MouseMove(224, 353, 10) ;menuclick addboxes
      MouseClick("left")
      Sleep(200)
      MouseMove(312, 262, 10) ;menuclick misc
      MouseClick("left")
      Sleep(220)
      MouseMove(467, 373, 10) ;menuclick endgame
      MouseClick("left")
      Sleep(250)
      Send("{Home}") ;close menu
      Sleep(1000)
      EndIf
   
      Sleep(100)
      $coord = PixelSearch(27, 110, 57,136, 0xD2D2D2, 3)
      If Not "@"error Then
      Sleep(250)
      MouseMove(511, 728, 10) ;click close
      Sleep(100)
      MouseClick("left")
      Sleep(1000)
      EndIf
      WEnd
      EndFunc
         
   
   
      func EndApp()
      Exit 0
      EndFunc

**Riachu** · 09-28-2013

Error parsing function call :P I even removed the "s from the @. I wasnt sure if i wassupposed to make another space though.

EDIT Nvm, works perfectly. DIdnt know there was more than one @. Lub you!

EDITv2: It ends up stopping adding boxes by the thrid time. It just ends round after clicking one position kill