|
3 | 3 | OUTPUT 'Please enter a string:' |
4 | 4 | str <- USERINPUT |
5 | 5 | IF str = '' THEN |
6 | | - str <- 'BewareofPLOTS!' |
| 6 | + str <- 'OrjnerbsCYBGF!' |
7 | 7 | ENDIF |
8 | 8 | cipher <- '' |
9 | 9 | FOR letter IN str |
10 | | - code <- CHAR_TO_CODE(letter) |
11 | | - IF code >= CHAR_TO_CODE('A') AND code <= CHAR_TO_CODE('Z') THEN |
12 | | - code <- (code - CHAR_TO_CODE('A') + 13) MOD 26 + CHAR_TO_CODE('A') |
| 10 | + IF letter >= 'A' AND letter <= 'Z' THEN |
| 11 | + cipher <- cipher + CODE_TO_CHAR((CHAR_TO_CODE(letter) - CHAR_TO_CODE('A') + 13) MOD 26 + CHAR_TO_CODE('A')) |
| 12 | + ELSE IF letter >= 'a' AND letter <= 'z' THEN |
| 13 | + cipher <- cipher + CODE_TO_CHAR((CHAR_TO_CODE(letter) - CHAR_TO_CODE('a') + 13) MOD 26 + CHAR_TO_CODE('a')) |
| 14 | + ELSE |
| 15 | + cipher <- cipher + letter |
13 | 16 | ENDIF |
14 | | - IF code >= CHAR_TO_CODE('a') AND code <= CHAR_TO_CODE('z') THEN |
15 | | - code <- (code - CHAR_TO_CODE('a') + 13) MOD 26 + CHAR_TO_CODE('a') |
16 | | - ENDIF |
17 | | - cipher <- cipher + CODE_TO_CHAR(code) |
18 | 17 | ENDFOR |
19 | 18 | OUTPUT 'Cipher: ' + cipher |
0 commit comments