Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- alias cryption {
- var %n = 1, %crypt50 = ""
- if ($2 == e) {
- while ($mid($1,%n,1)) { %crypt50 = %crypt50 $+ $iif($mid($1,%n,1) == $chr(32),$chr(66),$chr($calc($asc($mid($1,%n,1)) + 50))) | inc %n }
- }
- else if ($2 == d) {
- while ($mid($1,%n,1)) { %crypt50 = %crypt50 $+ $iif($mid($1,%n,1) == $chr(66),-,$chr($calc($asc($mid($1,%n,1)) - 50))) | inc %n }
- }
- else { echo -a * Invalid Accepted Parameter }
- return %crypt50
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement