짧지만 유용한 암호화/복호화 기법(XOR 암호화 활용)

[출처 : http://autohotkey.co.kr/b/1-1650 나로님 공유스크립트]



exampleText := "동해물과 백두산이 마르고 닳도록`nDo you know encryption?"
msgbox, % "<원문>`n" exampleText "`n`n<암호문>`n" encrypt(exampleText) "`n`n<복호문>`n" encrypt(encrypt(exampleText))
Return
encrypt(text)
{
  String =
  Loop, parse, text
  {
      char := Asc(A_LoopField)^Asc("1")^Asc("2")
      String .= "`" . chr(Char)
  }
  Return, %String%
}