Code:
; => Start Fenster
#region Log GUI
$log = "Initializing Treasure Creator"
$startlog = GUICreate("Loading...", 300, 120, -1, -1, $WS_DLGFRAME)
$labellog = GUICtrlCreateEdit($log, 10, 10, 278, 78, BitOR($ES_READONLY, $ES_NOHIDESEL))
GUISetState(@SW_SHOW)
#endregion
Sleep(1000)
; => Liest eure Hardware-ID aus (Include von GetHWID.au3 erforderlich)
$log = "Your HWID is " & _GetHWID() & @CRLF & $log
GUICtrlSetData($labellog, $log)
sleep(3000)
; => Hier wird eure Hardware-ID mittels eines Dokuments, welches auf einem Webserver befindet, ausgelesen
; => Natürlich ist diese erstmals festzulegen.
$log = "Checking your Hardware-ID for using this Programm..." & @CRLF & $log
GUICtrlSetData($labellog, $log)
Sleep(1000)
$datei = BinaryToString(InetRead("http://deindomain.de/TextDokument.txt")) ; Hier die Webadresse für die .txt reinschreiben! Achtung! Nur .txt erlaubt!
$suche = _GetHWID() ;nach was gesucht werden soll
; => Hier wird nun komplett ausgelesen, ob eure HWID in der Dokument befindet und gibt jeweils eine Nachricht aus
If StringInStr($datei, $suche) Then
sleep(0)
$log = "Successfully connected" & @CRLF & $log
sleep(1000)
GUICtrlSetData($labellog, $log)
Sleep(2500)
Else
$log = "You do not have Permissions to use this Programm." & @CRLF & $log
GUICtrlSetData($labellog, $log)
sleep(2000)
Exit
EndIf
GUISetState(@SW_HIDE, $startlog)






