Rot-13: Difference between revisions
m
→{{header|RPL}}: typo
Recombinant (talk | contribs) m (→{{header|zig}}: Update zig to Zig in header) |
m (→{{header|RPL}}: typo) |
||
Line 5,055:
{{works with|Halcyon Calc|4.2.7}}
≪ ""
1 3 PICK SIZE '''FOR''' j
OVER j DUP SUB
'''IF''' DUP "A" ≥ OVER "Z" ≤ AND '''THEN'''
NUM 78 - 26 MOD 65 + CHR '''END'''
'''IF''' DUP "a" ≥ OVER "z" ≤ AND '''THEN'''
SWAP
≫ '<span style="color:blue">ROT13</span>' STO
"abjurer NOWHERE" <span style="color:blue">ROT13</span>
{{out}}
<pre>
| |||