Code:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Sol Addy Logger", 197, 65, 423, 207)
GUISetFont(9, 800, 0, "MS Sans Serif")
GUISetBkColor(0x000000)
$Label1 = GUICtrlCreateLabel("Score", 8, 16, 37, 17)
GUICtrlSetColor(-1, 0x80FF00)
$Label2 = GUICtrlCreateLabel("0x000000000", 48, 16, 80, 17)
GUICtrlSetColor(-1, 0x80FF00)
$Label3 = GUICtrlCreateLabel("xxxxxxxxxxxxxxxxxxx", 8, 40, 118, 17)
GUICtrlSetColor(-1, 0x80FF00)
$Button1 = GUICtrlCreateButton("Start", 136, 16, 49, 41)
GUICtrlSetColor(-1, 0x80FF00)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $button1
call("ok")
EndSwitch
WEnd
func ok()
$1 = guictrlsetdata($Label3,"Solitär wird gestartet")
$2 = sleep(1000)
$3 = run("sol.exe")
if WinGetProcess("S4Client") Then
guictrlsetdata($LAbel3,"Solitär gestartet!")
EndIf
$5 = call("Search")
EndFunc
func Search()
$ofs = 0x30
$byte = "\x89\x46\x30\x5E\xE8\x00\x00\x00\x00\x33\xC0\x40\x5D\xC2\x0C\x00"
$mask = "xxxxx????xxxxxxx"
$start = 0x1001000
$ende = 0x6000
$read =
$write = Guictrlsetdata($Label3,$read)
EndFunc