Aces Posted June 22, 2007 Share Posted June 22, 2007 (edited) CODE;; Set AutoIt Options AutoItSetOption("MouseCoordMode", 0) AutoItSetOption("PixelCoordMode", 0) AutoItSetOption("WinWaitDelay", 500) AutoItSetOption("MouseClickDelay", 200) AutoItSetOption("ColorMode", 0) ;; Mouse Delay $mouse = 500 ;; Window Config $title = IniRead("config\config.ini", "D2", "d2title", "") ;; Diablo II Config $d2path = IniRead("config\config.ini", "D2", "d2path", "") $d2exe = IniRead("config\config.ini", "D2", "d2exe", "") $d2param = IniRead("config\config.ini", "D2", "d2param", "") $d2account = IniRead("config\config.ini", "Login", "d2account", "") $d2pass = IniRead("config\config.ini", "Login", "d2pass", "") $d2charslot = IniRead("config\config.ini", "Login", "d2charslot", "") $d2gamename = IniRead("config\config.ini", "Game", "d2gamename", "") $d2gamepass = IniRead("config\config.ini", "Game", "d2gamepass", "") $chaospath = IniRead("config\config.ini", "Chaos", "path", "") $chaosexe = IniRead("config\config.ini", "Chaos", "exe", "") ;; Start the chaos script ;; Create Chaos Game Create() ;; Teleport to Chaos Sanctuary ToChaos() ;; Functions Func Create() WinActivate($title) WinWaitActive($title) WinSetState($title, "", @SW_SHOW) $accountcolor = PixelGetColor(555,480) $accountchecksum = PixelChecksum(555,480,555,480, 1) $accounthex = PixelSearch(555,480,555,480, $accountcolor) MouseMove( $accounthex[0] , $accounthex[1] ) Sleep($mouse) MouseClick("left", $accounthex[0] , $accounthex[1] ) $accountcolor = PixelGetColor(545,175) $accountchecksum = PixelChecksum(545,175,545,175, 1) $accounthex = PixelSearch(545,175,545,175, $accountcolor) MouseClick("left", $accounthex[0] , $accounthex[1] ) Sleep($mouse) $random = Random(1, 500) Send($d2gamename & " " & $random) Sleep($mouse) $accountcolor = PixelGetColor(545,225) $accountchecksum = PixelChecksum(545,225,545,225, 1) $accounthex = PixelSearch(545,225,545,225, $accountcolor) MouseClick("left", $accounthex[0] , $accounthex[1] ) Sleep($mouse) Send($d2gamepass) Sleep($mouse) $accountcolor = PixelGetColor(625,440) $accountchecksum = PixelChecksum(625,440,625,440, 1) $accounthex = PixelSearch(625,440,625,440, $accountcolor) MouseMove( $accounthex[0] , $accounthex[1] ) Sleep($mouse) MouseClick("left", $accounthex[0], $accounthex[1] ) Sleep(5000) EndFunc pops up an error message saying theres no such function Create() anyone know the problem? Edited June 22, 2007 by Aces ~~ AutoIt v3 Minion ~~Name: Kevin "Aces-X" MorrisOrganization: A C DevelopmentE-Mail: AcesX91@acecoding.netOS: XP Professional; Vista package~~ Released Software ~~CPU-Mach: Topic at acecoding.net ForumsProxyzBuddy: Beta testing at the moment, private onlyWHSTool: Not released to the public Link to comment Share on other sites More sharing options...
Zacharot Posted June 22, 2007 Share Posted June 22, 2007 (edited) erp Edited June 22, 2007 by Zacharot Link to comment Share on other sites More sharing options...
Aces Posted June 22, 2007 Author Share Posted June 22, 2007 help please. ~~ AutoIt v3 Minion ~~Name: Kevin "Aces-X" MorrisOrganization: A C DevelopmentE-Mail: AcesX91@acecoding.netOS: XP Professional; Vista package~~ Released Software ~~CPU-Mach: Topic at acecoding.net ForumsProxyzBuddy: Beta testing at the moment, private onlyWHSTool: Not released to the public Link to comment Share on other sites More sharing options...
Zacharot Posted June 22, 2007 Share Posted June 22, 2007 (edited) is this your entire code? I cant very well fix (or help fix) if you are only posting snippets of it. ERROR: ToChaos(): undefined function. and in fact, it's not defined. Edited June 22, 2007 by Zacharot Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now