#include <NomadMemory.au3>
#include <WinAPI.au3>
#include <String.au3>
#include <GUIConstantsEx.au3>
#include <GuiStatusBar.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GDIPlus.au3>
#Region ### START Koda GUI section ### Form=d:\users\steffen\desktop\gui.kxf
$Form1_1 = GUICreate("2on1 Bot_", 203, 240, 324, 284, -1, $WS_EX_TOPMOST)
$MenuItem1 = GUICtrlCreateMenu("&Sonstiges")
$MenuItem3 = GUICtrlCreateMenuItem("S4 League starten", $MenuItem1)
$MenuItem2 = GUICtrlCreateMenuItem("Zum Thread", $MenuItem1)
$MenuItem4 = GUICtrlCreateMenuItem("elitepvpers.com", $MenuItem1)
$StatusBar1 = _GUICtrlStatusBar_Create($Form1_1)
_GUICtrlStatusBar_SetSimple($StatusBar1)
_GUICtrlStatusBar_SetText($StatusBar1, " 2on1 Bot, by -[Frame]* & KaTimur")
$Label1 = GUICtrlCreateLabel("Waiting for S4...", 124, 180, 80, 17)
AdlibRegister("S4Open", 500)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$TAB1 = GUICtrlCreateTab(0, 0, 313, 385)
$TABSHEET1 = GUICtrlCreateTabItem("Home")
$Label1_H = GUictrlcreatelabel("KaTimur", 7, 50, 300, 300)
GUICtrlSetFont(-1, 28, 800, 0, "Stencil Std")
$Label2_H = GUictrlcreatelabel("-[Frame]*", 7, 120, 300, 300)
GUICtrlSetFont(-1, 28, 800, 0, "Stencil Std")
$Label2_H = GUictrlcreatelabel("2 o n 1 B o t", 47, 100, 300, 300)
GUICtrlSetFont(-1, 12, 800, 0, "Stencil Std")
$TAB2 = GUICtrlCreateTab(0, 15, 313, 385)
$TABSHEET2 = GUICtrlCreateTabItem("CaP Bot")
$Input_C1 = GUICtrlCreateInput("", 5, 50, 160, 20)
$Input_C2 = GUICtrlCreateInput("", 5, 75, 160, 20)
$Input_C3 = GUICtrlCreateInput("", 5, 100, 160, 20)
$Input_C4 = GUICtrlCreateInput("", 5, 125, 160, 20)
$Input_C5 = GUICtrlCreateInput("", 5, 150, 160, 20)
$TAB3 = GUICtrlCreateTab(0, 30, 313, 385)
$TABSHEET3 = GUICtrlCreateTabItem("Lobby Bot")
$Label1_l = GUICtrlCreateLabel("NumPad6 = Start", 22, 65, 160, 20)
$TAB4 = GUICtrlCreateTab(0, 45, 313, 385)
$TABSHEET4 = GUICtrlCreateTabItem("Infos")
$Label2_info = GUICtrlCreateLabel("Information: ", 7, 38, 200, 100)
$Label2_info = GUICtrlCreateLabel("______________________________ _", 7, 47, 200, 100)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
; Bypass Funktion By Katimur
############################################
; Bypass Funktion By Katimur
Func S4Open()
If ProcessExists("S4Client.exe") Then
GUICtrlSetData($Label1, "S4 ist running!")
Else
GUICtrlSetData($Label1, "Waiting for S4...")
EndIf
EndFunc
|