Question About AutoIT?!

12/17/2010 16:28 PuN|SheR#1
Hey.. I Would like to make a autologin for my CS server, everything is perfectly good exsept this : When it should run hl.exe(cs) it says
failed to initialize interface !

Code:
Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=c:\documents and settings\vasko\my documents\forms\medak.kxf
$Form1_1 = GUICreate("MedakUTD AutoLogin", 633, 180, 192, 124)
$Button1 = GUICtrlCreateButton("MedakUTD Alfa", 88, 64, 201, 33, 0)
$Button2 = GUICtrlCreateButton("MedakUTD Beta", 352, 64, 201, 33, 0)
$Button3 = GUICtrlCreateButton("MedakUTD DM+AWP", 88, 104, 201, 33, 0)
$Button4 = GUICtrlCreateButton("MedakUTD DeathMatch", 352, 104, 201, 33, 0)
$Label1 = GUICtrlCreateLabel("Medak Auto Login By BushilicA^", 88, 16, 464, 41)
GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x0000FF)
GUICtrlSetBkColor(-1, 0xFF0000)
$Input1 = GUICtrlCreatelabel("Zelis Se Konektirati na svom serveru?Klikni Na Kopce : MyServer", 24, 144, 385, 21)
$Button5 = GUICtrlCreateButton("MyServer", 432, 144, 169, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Hotkeyset("{Delete}","quit")
Func quit()
	exit 0
	endfunc

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
	msgbox(0,"Program Startovan","Program Bice Pokrenut u 2 secunda",2)
	sleep(2000)
	winminimizeall()
	mouseclick("left",38,17,2,5)
	sleep(8000)
	send("{`}")
	sleep(500)
	send("connect 217.26.212.50:27024")
	send("{Enter}")
	sleep(9000)
	send("{Enter}")
	sleep(1000)
	send("{Enter}")
	sleep(1000)
	send("{Enter}")
	sleep(5000)
	send("{y}")
	send("MedakUTD AutoLogin By Bushilica Visit Forum www.medakutd.com")
	send("{Enter}")
	sleep(5000)
	exit
case $Button2
	msgbox(0,"Program Startovan","Program Bice Pokrenut u 2 secunda",2)
	sleep(2000)
	WinMinimizeAll()
	mouseclick("left",38,17,2,5)
	sleep(8000)
	send("{`}")
	send("connect 217.26.212.39:27043")
	send("{Enter}")
    sleep(9000)
	send("{Enter}")
	sleep(1000)
	send("{Enter}")
	sleep(1000)
	send("{Enter}")
	sleep(5000)
	send("{y}")
	send("MedakUTD AutoLogin By Bushilica Visit Forum www.medakutd.com")
	send("{Enter}")
	sleep(5000)
	exit
case $Button3
	msgbox(0,"Program Startovan","Program Bice Pokrenut u 2 secunda",2)
	sleep(2000)
	WinMinimizeAll()
	mouseclick("left",38,17,2,5)
	sleep(8000)
	send("{`}")
	send("connect 91.150.72.227:27044")
	send("{Enter}")
	sleep(9000)
	send("{Enter}")
	sleep(1000)
	send("{Enter}")
	sleep(1000)
	send("{Enter}")
	sleep(5000)
	send("{y}")
	send("MedakUTD AutoLogin By Bushilica Visit Forum www.medakutd.com")
	send("{Enter}")
	sleep(5000)
	exit
case $Button4
	msgBox(0,"Problem","Server Je Trenutno Ugasen")
    sleep(3000)
	exit
case $Button5
	$cs = Inputbox("IP","Koji Je Ip servera koga zelis da se konektujes","217.26.212.50:27024")
	sleep(1000)
	WinMinimizeAll()
	mouseclick("left",38,17,2,5)
	sleep(8000)
	send("{`}")
	send("connect ")
	send($cs)
	send("{Enter}")
	sleep(9000)
	send("{Enter}")
	sleep(1000)
	send("{Enter}")
	sleep(1000)
	send("{Enter}")
	sleep(5000)
	send("{y}")
	send("AutoLogin By BushilicA")
	send("{Enter}")
	sleep(5000)
	Exit
EndSwitch
WEnd
hotkeyset("{End}","quit")
12/18/2010 22:30 gabrola#2
Wrong section.
12/19/2010 12:09 Die Schnittstelle#3
moved
12/19/2010 12:22 maxi39#4
PHP Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=c:\documents and settings\vasko\my documents\forms\medak.kxf
$Form1_1 = GUICreate("MedakUTD AutoLogin", 633, 180, 192, 124)
$Button1 = GUICtrlCreateButton("MedakUTD Alfa", 88, 64, 201, 33, 0)
$Button2 = GUICtrlCreateButton("MedakUTD Beta", 352, 64, 201, 33, 0)
$Button3 = GUICtrlCreateButton("MedakUTD DM+AWP", 88, 104, 201, 33, 0)
$Button4 = GUICtrlCreateButton("MedakUTD DeathMatch", 352, 104, 201, 33, 0)
$Label1 = GUICtrlCreateLabel("Medak Auto Login By BushilicA^", 88, 16, 464, 41)
GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x0000FF)
GUICtrlSetBkColor(-1, 0xFF0000)
$Input1 = GUICtrlCreatelabel("Zelis Se Konektirati na svom serveru?Klikni Na Kopce : MyServer", 24, 144, 385, 21)
$Button5 = GUICtrlCreateButton("MyServer", 432, 144, 169, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Hotkeyset("{Delete}","quit")

hotkeyset("{End}","quit")
While 1




$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
    ;ShellExecute("C:\......\.hl.exe") ;start the hl.exe
    ;ShellExecute(".\hl.exe") ;if your .exe is in the same folder
    WinWaitActive("the windowname of hl.exe") ;wait for the window of cs


    msgbox(0,"Program Startovan","Program Bice Pokrenut u 2 secunda",2)
    sleep(2000)
    winminimizeall()
    mouseclick("left",38,17,2,5)
    sleep(8000)
    send("{`}")
    sleep(500)
    send("connect 217.26.212.50:27024")
    send("{Enter}")
    sleep(9000)
    send("{Enter}")
    sleep(1000)
    send("{Enter}")
    sleep(1000)
    send("{Enter}")
    sleep(5000)
    send("{y}")
    send("MedakUTD AutoLogin By Bushilica Visit Forum www.medakutd.com")
    send("{Enter}")
    sleep(5000)
    exit
case $Button2
    msgbox(0,"Program Startovan","Program Bice Pokrenut u 2 secunda",2)
    sleep(2000)
    WinMinimizeAll()
    mouseclick("left",38,17,2,5)
    sleep(8000)
    send("{`}")
    send("connect 217.26.212.39:27043")
    send("{Enter}")
    sleep(9000)
    send("{Enter}")
    sleep(1000)
    send("{Enter}")
    sleep(1000)
    send("{Enter}")
    sleep(5000)
    send("{y}")
    send("MedakUTD AutoLogin By Bushilica Visit Forum www.medakutd.com")
    send("{Enter}")
    sleep(5000)
    exit
case $Button3
    msgbox(0,"Program Startovan","Program Bice Pokrenut u 2 secunda",2)
    sleep(2000)
    WinMinimizeAll()
    mouseclick("left",38,17,2,5)
    sleep(8000)
    send("{`}")
    send("connect 91.150.72.227:27044")
    send("{Enter}")
    sleep(9000)
    send("{Enter}")
    sleep(1000)
    send("{Enter}")
    sleep(1000)
    send("{Enter}")
    sleep(5000)
    send("{y}")
    send("MedakUTD AutoLogin By Bushilica Visit Forum www.medakutd.com")
    send("{Enter}")
    sleep(5000)
    exit
case $Button4
    msgBox(0,"Problem","Server Je Trenutno Ugasen")
    sleep(3000)
    exit
case $Button5
    $cs = Inputbox("IP","Koji Je Ip servera koga zelis da se konektujes","217.26.212.50:27024")
    sleep(1000)
    WinMinimizeAll()
    mouseclick("left",38,17,2,5)
    sleep(8000)
    send("{`}")
    send("connect ")
    send($cs)
    send("{Enter}")
    sleep(9000)
    send("{Enter}")
    sleep(1000)
    send("{Enter}")
    sleep(1000)
    send("{Enter}")
    sleep(5000)
    send("{y}")
    send("AutoLogin By BushilicA")
    send("{Enter}")
    sleep(5000)
    Exit
EndSwitch
WEnd
Func quit()
    exit 0
    endfunc