Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include <Crypt.au3>
- #include <ScreenCapture.au3>
- ; Скепчурить регион
- _ScreenCapture_Capture(@TempDir & "\hopy.bmp", 0, 0, 100, 100)
- ; открыть во вьювере
- ;ShellExecute(@TempDir & "\hopy.bmp")
- ;посчитать MD5 файла
- $dHash = _Crypt_HashFile(@TempDir & "\hopy.bmp", $CALG_MD5) ; Create a hash of the file.
- $sHex = Hex($dHash)
- ;вывести
- ConsoleWrite ("MD5: " & $sHex & @CRLF)
- if $sHex <> "10F4E9511F3EC54A607E06691F193C22" then
- ConsoleWrite ("БЕГИТЕ ГЛУПЦЫ !!!!"& @CRLF)
- EndIf
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement