Zibit Posted May 14, 2009 Share Posted May 14, 2009 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 Creator Of Xtreme DevelopersPixel Pattern UDFTray GUI UDFMathssend & recive register scriptMouse Control via Webcam Link to comment Share on other sites More sharing options...
muncherw Posted May 14, 2009 Share Posted May 14, 2009 What's it supposed to do and what's it not doing? Other People's Stuff:Andy Flesner's AutoIt v3: Your Quick Guide[topic="34302"]Locodarwin's ExcelCom_UDF[/topic][topic="61090"]MrCreatorR's Opera Library[/topic] Link to comment Share on other sites More sharing options...
Khab Posted May 14, 2009 Share Posted May 14, 2009 (edited) Why wont it work???Because there's something wrong with it. Edited May 14, 2009 by Khab 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