#include <Constants.au3>
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
global $serverl,$servertp
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("minecraft server tool", 789, 484, 192, 114)
$startserver = GUICtrlCreateButton("Start Server", 8, 8, 115, 25, $WS_GROUP)
$servertype = GUICtrlCreateCombo("choose the server type", 128, 8, 145, 25)
GUICtrlSetData(-1, "Normalx86|Normalx64|Hey0x86|Hey0x64")
$console = GUICtrlCreateEdit("", 8, 40, 769, 409)
GUICtrlSetData(-1, "<The Minecraft Server Tool>")
$command = GUICtrlCreateInput("", 8, 456, 649, 21)
$send = GUICtrlCreateButton("Send", 664, 454, 75, 25, $WS_GROUP)
$cmds = GUICtrlCreateButton("cmds", 744, 454, 35, 25, $WS_GROUP)
$Button1 = GUICtrlCreateButton("Open Server properties", 656, 8, 123, 25, $WS_GROUP)
$restart = GUICtrlCreateButton("Restart Server", 384, 8, 75, 25, $WS_GROUP)
$reload = GUICtrlCreateButton("Reload everything", 280, 8, 91, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
local $serverl = 0
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
if ProcessExists("java.exe") then
ProcessClose("java.exe")
Exit
EndIf
case $restart
GUICtrlSetData($console,"")
if ProcessExists("java.exe") then ProcessClose("java.exe")
if $servertp = "1" Then
$serverl = Run('"'&@ProgramFilesDir&'\Java\jre6\bin\java.exe" -Xms1024M -Xmx1024M -jar minecraft_server.jar nogui', "", @SW_HIDE, $STDERR_CHILD + $STDIN_CHILD + $STDOUT_CHILD)
ElseIf $servertp = "2" Then
$serverl = Run('"'&@ProgramFilesDir&'(x86)\Java\jre6\bin\java.exe" -Xms1024M -Xmx1024M -jar minecraft_server.jar nogui', "", @SW_HIDE, $STDERR_CHILD + $STDIN_CHILD + $STDOUT_CHILD)
ElseIf $servertp = "3" Then
$serverl = Run('"'&@ProgramFilesDir&'\Java\jre6\bin\java.exe" -Xms1024M -Xmx1024M -jar Minecraft_Mod.jar nogui', "", @SW_HIDE, $STDERR_CHILD + $STDIN_CHILD + $STDOUT_CHILD)
ElseIf $servertp = "4" Then
$serverl = Run('"'&@ProgramFilesDir&'(x86)\Java\jre6\bin\java.exe" -Xms1024M -Xmx1024M -jar minecraft_server.jar nogui', "", @SW_HIDE, $STDERR_CHILD + $STDIN_CHILD + $STDOUT_CHILD)
EndIf
case $startserver
$servert = GUICtrlRead($servertype)
if ProcessExists("java.exe") then ProcessClose("java.exe")
If $servert = "Normalx86" Then
$serverl = Run('"'&@ProgramFilesDir&'\Java\jre6\bin\java.exe" -Xms1024M -Xmx1024M -jar minecraft_server.jar nogui', "", @SW_HIDE, $STDERR_CHILD + $STDIN_CHILD + $STDOUT_CHILD)
;~ $serverl = Run('"'&@ProgramFilesDir&'\Java\jre6\bin\java.exe" -Xms1024M -Xmx1024M -jar minecraft_server.jar nogui');, "", @SW_SHOW, $STDERR_CHILD + $STDOUT_CHILD)
$servertp = "1"
ElseIf $servert = "Normalx64" Then
$serverl = Run('"'&@ProgramFilesDir&'(x86)\Java\jre6\bin\java.exe" -Xms1024M -Xmx1024M -jar minecraft_server.jar nogui', "", @SW_HIDE, $STDERR_CHILD + $STDIN_CHILD + $STDOUT_CHILD)
$servertp = "2"
ElseIf $servert = "Hey0x86" Then
$serverl = Run('"'&@ProgramFilesDir&'\Java\jre6\bin\java.exe" -Xms1024M -Xmx1024M -jar Minecraft_Mod.jar nogui', "", @SW_HIDE, $STDERR_CHILD + $STDIN_CHILD + $STDOUT_CHILD)
$servertp = "3"
ElseIf $servert = "Hey0x64" Then
$serverl = Run('"'&@ProgramFilesDir&'(x86)\Java\jre6\bin\java.exe" -Xms1024M -Xmx1024M -jar minecraft_server.jar nogui', "", @SW_HIDE, $STDERR_CHILD + $STDIN_CHILD + $STDOUT_CHILD)
$servertp = "4"
EndIf
case $send
$incmd = GUICtrlRead($command)
StdinWrite($serverl,$incmd &"{enter}")
case Else
If $serverl Then
$data = StdOutRead($serverl)
If $data Then
GUICtrlSetData($console, GUICtrlRead($console) & $data)
EndIf
EndIf