Bot problems

[Zibit]

Why wont it work???

expandcollapse popup

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_outfile=first.exe
#AutoIt3Wrapper_UseUpx=n
#AutoIt3Wrapper_Change2CUI=y
#AutoIt3Wrapper_Run_AU3Check=n
#AutoIt3Wrapper_Tidy_Stop_onerror=n
#AutoIt3Wrapper_Run_Obfuscator=y
#Obfuscator_Parameters=/cs 1 /cn 1 / cf 1 /cv 1
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#cs ----------------------------------------------------------------------------
    
    AutoIt Version: 1.0.0.0
    Author:         z1b1t
    
    Script Function:
    KalOnline Splashy Bot
    
#ce ----------------------------------------------------------------------------
; Script Start - Add your code below here

local $handle, $coord, $dhealth, $dc, $phealth, $ok, $msg, $phealth, $demoncolor
local $healthcolor, $hcoord, $myhealth, $battle


GUICreate("Splashy",200,150)
$handle = ControlGetHandle("KalOnline", "", "")
$title = AutoItWinGetTitle()
$coord = PixelSearch( 0, 0, 1023, 767, $demoncolor )
$dhealth = GUICtrlCreateButton("", 20, 210, 1, 1)
$dc = GUICtrlCreateButton("", 20, 190, 1, 1)
$phealth = GUICtrlCreateButton("", 20, 170, 1, 1)
$ok = GUICtrlCreateButton("", 20, 150, 1, 1)
GuiCtrlCreateLabel("Warning!" & @CRLF & "Pushing button GetPixels will take" & @CRLF & "2 different pixels you have" & @CRLF & "5 seconds to take pixels :" & @CRLF & "Player HP and Player MP", 20, 80)
GuiCtrlSetColor(-1,0x00ff00)
GuiCtrlCreateLabel("Player Health:", 20, 30)
GuiCtrlCreateLabel("Status:", 20, 70)
GuiCtrlCreateLabel("Starting In:", 20, 10)

GuiSetState()


    $msg = GuiGetMsg()
    
    If $msg = $phealth Then     sleep(1000)
        GuiCtrlCreateLabel("5", 100, 10)
        sleep(1000)
        GuiCtrlCreateLabel("4", 100, 10)
        sleep(1000)
        GuiCtrlCreateLabel("3", 100, 10)
        sleep(1000)
        GuiCtrlCreateLabel("2", 100, 10)
        sleep(1000)
        GuiCtrlCreateLabel("1", 100, 10)
        sleep(1000)
        GuiCtrlCreateLabel("Starting!", 100, 10)
        GuiCtrlSetColor(-1,0xff0000)
        sleep(1000)
        GuiCtrlCreateLabel("5", 100, 30)
        sleep(1000)
        GuiCtrlCreateLabel("4", 100, 30)
        sleep(1000)
        GuiCtrlCreateLabel("3", 100, 30)
        sleep(1000)
        GuiCtrlCreateLabel("2", 100, 30)
        sleep(1000)
        GuiCtrlCreateLabel("1", 100, 30)
        sleep(1000)
        GuiCtrlCreateLabel("Check", 100, 30)
        GuiCtrlSetColor(-1,0x00ff00)
        $hcoord = MouseGetPos()
        $healthcolor = PixelGetColor($hcoord[0], $hcoord[1])
        $battle = "on"
        _main()





func _main()
                $myhealth = PixelGetColor($hcoord[0], $hcoord[1])
                while $battle = "on"
                If $myhealth <> $healthcolor Then
                ToolTip("healing",0,0)
                ControlSend("KalOnline", "", $handle, "4")
                Sleep(1000)
            EndIf
        wend
        
        while 1
            ToolTip("splashy ON",0,0)
                        WinActivate($title)
                ControlSend("KalOnline", "", $handle, "5")
        sleep(2000)
                ControlSend("KalOnline", "", $handle, "5")
        sleep(2000)
        wend
endfunc

[muncherw]

What's it supposed to do and what's it not doing?

[Khab]

Why wont it work???

Because there's something wrong with it.

Edited May 14, 2009 by Khab