#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.14.0
 Author:         yones7x

 Script Function:
    Template AutoIt script.

#ce ----------------------------------------------------------------------------
#include <Crypt.au3>
Global $F_INI = @ScriptDir&'\GK_Setting.ini'
If FileExists($F_INI) = 0 Then _ConfINI_GUI()
$DHash = IniRead($F_INI, "Setting", "Last_Hash", "")
$DLink = IniRead($F_INI, "Setting", "Link", "")
If $DLink = "" Then _ConfINI_GUI()
$DTimeW = IniRead($F_INI, "Setting", "Time_Wait", "")
If $DTimeW = "" Then _ConfINI_GUI()
While 1
    $DATA = InetRead($DLink, 1+8)
    If @error Then
        TrayTip("yones7x GetKeys", "Check your connection !", 10)
    ElseIf _Crypt_HashData($DATA, $CALG_MD5) = $DHash Then
    Else
        $DHash = _Crypt_HashData($DATA, $CALG_MD5)
        IniWrite($F_INI, "Setting", "Last_Hash", String($DHash))
        MsgBox(0, "", BinaryToString($DATA))
        ShellExecute($DLink)
    EndIf
    Sleep($DTimeW) ;Wait 2 min
WEnd

Func _ConfINI_GUI()
    MsgBox(64, "yones7x GetKeys Tool", "Hi!"&@CRLF&"Click 'OK' to start configure settings")
    $GUINI = GUICreate("yones7x GetKeys Tool", 260, 125)
    GUICtrlCreateLabel("Put here the link of raw string 'pastepin':", 10, 10, 240, 20)
    GUICtrlSetFont(-1, 9, 800, 0, "Arial")
    ;GUICtrlSetBkColor(-1, 0xFF)
    $GUINI_In1 = GUICtrlCreateInput("http://pastebin.com/...php?i=WfEGMEnU", 10, 30, 240, 20)

    GUICtrlCreateLabel("Set a time wait (in minutes) between each check: (0-10)", 10, 60, 200, 30)
    GUICtrlSetFont(-1, 9, 800, 0, "Arial")
    $GUINI_In2 = GUICtrlCreateInput(2, 10, 95, 50, 20, 0x2000)
    GUICtrlCreateUpdown($GUINI_In2, 1)
    GUICtrlSetLimit(-1, 10)

    $GUINI_B1 = GUICtrlCreateButton("OK !", 205, 95, 50, 25)
    GUICtrlSetFont($GUINI_B1, 9, 800, 0, "Arial")
    GUISetState(@SW_SHOW, $GUINI)
    While 1
        Switch GUIGetMsg()
            Case -3
                Exit
            Case $GUINI_B1
                IniWrite($F_INI, "Setting", "Link", GUICtrlRead($GUINI_In1))
                IniWrite($F_INI, "Setting", "Time_Wait", GUICtrlRead($GUINI_In2)*60*1000)
                _Restart()
        EndSwitch
    WEnd
EndFunc

Func _Restart()
    If @Compiled Then
        ShellExecute(@ScriptFullPath)
    EndIf
    Exit
EndFunc