Okay...hab bestimmt iwo Mist gebaut
Script :
#RequireAdmin
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=..\..\aion_1.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <nomadmemory.au3>
#Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Marian\Desktop\autoit un so\Magic Aion\GUI\GUI.kxf
$Form1_1 = GUICreate("Magic Aion", 633, 447, 192, 124)
$Progress1 = GUICtrlCreateProgress(24, 128, 233, 25)
$Adresse1 = 0x2B444AB8;
$Adresse2 = 0x77756D00
$Open = _memoryopen(ProcessExists("AION.bin"))
$MaxLeben = _MemoryRead($Adresse1, $Open, 'dword')
$MomentanesLeben = _MemoryRead($Adresse2, $Open, 'dword')
GuiCtrlSetData($Progress1,$MomentanesLeben*100/$Maxleben)
$Progress2 = GUICtrlCreateProgress(24, 192, 233, 25)
$Progress3 = GUICtrlCreateProgress(24, 256, 241, 25)
$Progress4 = GUICtrlCreateProgress(24, 328, 433, 17)
$Label2 = GUICtrlCreateLabel("Target", 448, 81, 35, 17)
$Progress5 = GUICtrlCreateProgress(368, 128, 249, 25)
$Button1 = GUICtrlCreateButton("Run bot", 24, 400, 153, 33, $WS_GROUP)
$Label1 = GUICtrlCreateLabel("Player", 24, 80, 33, 17)
$Button2 = GUICtrlCreateButton("Magic Aion Homepage", 432, 8, 145, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("Forum", 432, 40, 145, 25, $WS_GROUP)
$Button4 = GUICtrlCreateButton("Exit", 464, 400, 145, 33, $WS_GROUP)
$Button5 = GUICtrlCreateButton("Settings", 248, 400, 153, 33, $WS_GROUP)
$Label3 = GUICtrlCreateLabel("HP", 104, 96, 19, 17)
$Label4 = GUICtrlCreateLabel("MP", 104, 168, 20, 17)
$Label5 = GUICtrlCreateLabel("GK", 104, 232, 19, 17)
$Label6 = GUICtrlCreateLabel("EP", 104, 304, 18, 17)
$Label3 = GUICtrlCreateLabel("Magic Aion - www.magic-aion.com", 24, 8, 219, 26)
GUICtrlSetFont(-1, 12, 400, 0, "Minion Pro Cond")
GUICtrlSetColor(-1, 0x000080)
if not processexists("AION.bin") Then
msgbox(0,"ERROR","Aion process is not open. The will now exit.")
exit
endif
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
case $Button4
Exit
case $Button2
ShellExecute("www.magic-aion.com")
case $Button3
ShellExecute("http://magic-aion.**************/index.php")
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd