; ; ------------------------------------------------------------ ; ; PureBasic - Cipher example file ; ; (c) Fantaisie Software ; ; ------------------------------------------------------------ ; ; CompilerIf #PB_Compiler_Unicode CompilerError "This program should be compiled in ASCII mode (see Compiler/Compiler Option window)" CompilerEndIf MessageRequester("CRC32 Test", "Should be 352441C2 : "+Hex(CRC32Fingerprint(@"abc", 3)), 0) MessageRequester("MD5 Test" , "Should be ed50deb5bb795508b8a5c8e50dafa954 : "+MD5Fingerprint(@"PureBasic", Len("PureBasic")), 0) MessageRequester("DES Test" , "Should be FrfWXJ4yTjycc : "+DESFingerprint("1Fr", "Fr"), 0) *OutputBuffer = AllocateMemory(100) Base64Encoder(@"PureBasic", Len("PureBasic"), *OutputBuffer, 100) MessageRequester("Base64 Test", "Should be UHVyZUJhc2lj : "+PeekS(*OutputBuffer), 0)