PHP Code:
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <IE.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$GUI = GUICreate("Darkorbit LoginBot", @DesktopWidth - 15, @DesktopHeight - 80, 5, 5)
$IE = _IECreateEmbedded()
$IEFenster = GUICtrlCreateObj($IE, 0, 0, 1196, 684)
$LoginGroup = GUICtrlCreateGroup("LoginGroup", 1200, 0, 145, 84)
$Login = GUICtrlCreateButton("Login", 1208, 48, 131, 25)
$Username = GUICtrlCreateCombo("DieserAccountfunzt", 1208, 24, 129, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
_IENavigate($IE, "http://de7.darkorbit.bigpoint.com/indexInternal.es?action=internalDock",1)
Sleep(100)
$Logout = _IEGetObjById($IE, "header_button_logout")
_IEAction($Logout, "click")
Sleep(1000)
Exit
Case $Login
_IENavigate($IE,"darkorbit.de",1)
$Loginput = _IEGetObjByName($IE, "username")
$Passwordput = _IEGetObjByName($IE, "password")
If GUICtrlRead($Username) = "DieserAccountfunzt" Then
_IEFormElementSetValue($Loginput, "DieserAccountfunzt")
_IEFormElementSetValue($Passwordput, "aaaaaaaa")
ControlSend("Darkorbit Bot","","","{ENTER}")
EndIf
Sleep(5000)
_IENavigate($IE, "http://de7.darkorbit.bigpoint.com/indexInternal.es?action=internalStart&acceptDailyLoginBonus=1",1)
_IENavigate($IE, "http://de7.darkorbit.bigpoint.com/indexInternal.es?action=internalDock",1)
_IENavigate($IE, "http://de7.darkorbit.bigpoint.com/indexInternal.es?action=internalMapRevolution")
Case $Exit
_IENavigate($IE, "http://de7.darkorbit.bigpoint.com/indexInternal.es?action=internalDock",1)
Sleep(100)
$Logout = _IEGetObjById($IE, "header_button_logout")
_IEAction($Logout, "click")
EndSwitch
WEnd
