PHP Code:
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#region ### START Koda GUI section ### Form=
$Form1_1 = GUICreate("Gold/GM Hack EP1 Only", 387, 267, 192, 124)
$Tab1 = GUICtrlCreateTab(8, 8, 369, 249)
$TabSheet1 = GUICtrlCreateTabItem("Gold Hack")
$Label5 = GUICtrlCreateLabel("Username :", 20, 38, 58, 17)
$gUserGold = GUICtrlCreateInput("Username", 106, 37, 217, 21)
$Label6 = GUICtrlCreateLabel("Password :", 20, 67, 56, 17)
$gPWGold = GUICtrlCreateInput("Password", 106, 65, 217, 21, $ES_PASSWORD)
$Label7 = GUICtrlCreateLabel("Charname :", 20, 96, 58, 17)
$gCharGold = GUICtrlCreateInput("Charname", 106, 94, 217, 21)
$Label8 = GUICtrlCreateLabel("Gold :", 20, 125, 32, 17)
$gGold = GUICtrlCreateInput("Gold", 106, 123, 217, 21)
$Label9 = GUICtrlCreateLabel("Select Server :", 20, 154, 74, 17)
$gServerGold = GUICtrlCreateCombo("Select Server", 106, 152, 217, 25, $CBS_DROPDOWN)
GUICtrlSetData($gServerGold, "World of Dum's|Holy LC|Force LC|Empire Network|Extreme Chaos|LCGenericName01|Bloddy LC|Uberepic LC|Inception LC|World of Chaos|LastChaos Bunkay")
$gHackGold = GUICtrlCreateButton("Hack Gold!", 120, 184, 75, 25)
$gProgGold = GUICtrlCreateProgress(16, 216, 350, 33)
$TabSheet2 = GUICtrlCreateTabItem("GM Hack")
$Label1 = GUICtrlCreateLabel("Username :", 20, 38, 58, 17)
$gUserGM = GUICtrlCreateInput("Username", 106, 37, 217, 21)
$Label2 = GUICtrlCreateLabel("Password :", 20, 67, 56, 17)
$gPWGM = GUICtrlCreateInput("Password", 106, 66, 217, 21, $ES_PASSWORD)
$Label3 = GUICtrlCreateLabel("Charname :", 20, 96, 58, 17)
$gCharGM = GUICtrlCreateInput("Charname", 106, 95, 217, 21)
$Label4 = GUICtrlCreateLabel("Select Server :", 20, 125, 74, 17)
$gServerGM = GUICtrlCreateCombo("Select Server", 106, 124, 217, 25, $CBS_DROPDOWN)
GUICtrlSetData($gServerGM, "World of Dum's|Holy LC|Force LC|Empire Network|Extreme Chaos|LCGenericName01|Bloddy LC|Uberepic LC|Inception LC|World of Chaos|LastChaos Bunkay")
$gHackGM = GUICtrlCreateButton("Hack GM!", 104, 160, 75, 25)
$gProgGM = GUICtrlCreateProgress(24, 200, 334, 41)
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $gHackGold
$User = GUICtrlRead($gUserGold)
$PW = GUICtrlRead($gPWGold)
$Char = GUICtrlRead($gCharGold)
$Gold = GUICtrlRead($gGold)
$Server = GUICtrlRead($gServerGold)
$qGold = MsgBox(4, "Question", "Are you sure that you'll hack " & $Gold & ", at the Server " & $Server & ", with Char " & $Char & " and User " & $User & @CRLF)
If $qGold = 6 Then
Sleep(1000)
GUICtrlSetData($gProgGold, +100)
Sleep(500)
MsgBox(64, "Success!", "Your Char " & $Char & " at Account " & $User & " at Server " & $Server & " has now " & $Gold & " Gold." & @CRLF & "Have Fun :)")
Else
MsgBox(16, "Failed!", "Please try again and press Yes !")
EndIf
Case $gHackGM
$UserGM = GUICtrlRead($gUserGM)
$PWGM = GUICtrlRead($gPWGM)
$CharGM = GUICtrlRead($gCharGM)
$ServerGM = GUICtrlRead($gServerGM)
$qGM = MsgBox(4, "Question", "Are you sure that you'll hack GM, at the Server " & $ServerGM & ", with Char " & $CharGM & " and User " & $UserGM & @CRLF)
If $qGM = 6 Then
Sleep(1000)
GUICtrlSetData($gProgGM, +100)
Sleep(500)
MsgBox(64, "Success!", "Your Char " & $CharGM & " at Account " & $UserGM & " at Server " & $ServerGM & " has now GM Rights." & @CRLF & "Have Fun :)")
Else
MsgBox(16, "Failed!", "Please try again and press Yes !")
EndIf
EndSwitch
WEnd
