PHP Code:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <string.au3>
#include <Date.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 217, 133, 192, 124)
$Button1 = GUICtrlCreateButton("Register", 16, 64, 75, 25)
$Label1 = GUICtrlCreateLabel("Info", 24, 24, 180, 17)
$Input1 = GUICtrlCreateInput("Key",16,40)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
AdlibRegister("_check",1000)
While Sleep(20)
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
_register()
EndSwitch
WEnd
Func _register()
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Test", "StartTime") <> 0 Then ;falls der eintrag nicht leer ist --> schon registriert
MsgBox(48,"","Already registered")
ElseIf GUICtrlRead($Input1) = "key123" Then ;falls der eingegebene key mit dem im programm vorgegebenen übereinstimmt registrieren
Local $time = _DateDiff('s', "1970/01/01 00:00:00", _NowCalc())
RegWrite("HKEY_LOCAL_MACHINE\Software\Test", "StartTime", "REG_SZ", $time)
GUICtrlSetData($Label1,"Registered")
Else
MsgBox(48,"","Error wrong key")
EndIf
EndFunc
Func _check()
Local $h,$m,$s
Local $reg = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Test", "StartTime") ;startzeit auslesen
Local $time = (2592000 - (_DateDiff('s', "1970/01/01 00:00:00", _NowCalc()) - $reg))*1000 ;in (30 tage - vergangene sekunden)umrechnen (und millisekunden ausgeben)
_TicksToTime($time,$h,$m,$s) ;in stunden:minuten:sekunden umwandeln
GUICtrlSetData($Label1,$h &":" &$m &":" &$s &" left to use") ;ausgeben
If $reg = 0 Then
GUICtrlSetData($Label1, "Not registered")
ElseIf $time < 0 Then
MsgBox(48,"","Sorry the demo is over...")
Exit
EndIf
EndFunc