Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- f1::
- InputBox, tobecoded, Enter Text, Enter the text you want to run in the chiper
- Clipboard := caesarCipher(tobecoded, 3)
- Return
- f2::
- InputBox, tobeuncoded, Enter Text, Enter the text you want to decoded in the chiper
- Clipboard := caesarCipher(tobeuncoded, -3)
- Return
- caesarCipher(text, shift, key = "abcdefghijklmnopqrstuvwxyz "){
- Loop, Parse, text
- encryptedString .= SubStr(key, Mod(Instr(key, A_LoopField, True) + shift, StrLen(key)), 1)
- return encryptedString
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement