;~ Code source Tutoriel Kintow

#include <Crypt.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Tutoriel Kintow", 306, 84, 192, 124)
$Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 16, 8, 97, 17)
$Checkbox2 = GUICtrlCreateCheckbox("Checkbox2", 16, 32, 97, 17)
$Input1 = GUICtrlCreateInput("", 16, 56, 273, 17)
$Button1 = GUICtrlCreateButton("Vérifier", 112, 8, 177, 41)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
GuiCtrlSetState($Checkbox1,$GUI_DISABLE)
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            VerifPass()

    EndSwitch
WEnd

Func VerifPass()
;~  On vérifie que l'entrée dans l'input donne le même hash au MD5
    If _Crypt_HashData(GuiCtrlRead($Input1),$CALG_MD5) = "0xFC54D6A4062D075C7D4DACBEEE4C11D0" Then
;~  Dans ce cas, on y est
        MsgBox(0,"GG !","Bon mot de passe")
;~  On dévérouille la CheckBox bloquée
        GuiCtrlSetState($Checkbox1,$GUI_ENABLE)
    Else
;~  Dans ce cas, ce n'est pas le bon
        MsgBox(16,"Sorry :( !","Mauvais mot de passe")
    EndIf
EndFunc