Rot-13: Difference between revisions
Content added Content deleted
imported>Sboeka m (C# program did not compile due 'message' not existing) |
imported>KayproKid (→{{header|S-BASIC}}: added additional approach) |
||
Line 5,637: | Line 5,637: | ||
Restored : The quick brown fox jumps over the lazy red dog. |
Restored : The quick brown fox jumps over the lazy red dog. |
||
</pre> |
</pre> |
||
Still a third approach makes use of S-BASIC's awkward (and probably little-used) XLATE function, which transforms each character in the input string by using its ASCII value as an index into the translation string. |
|||
<syntaxhighlight lang = "basic"> |
|||
var s, tr = string:127 |
|||
rem - set up the translation string |
|||
tr = space$(31) + " !" + chr(34) + "#$%&'()*+,-./0123456789" |
|||
tr = tr + ":;<=>?@NOPQRSTUVWXYZABCDEFGHIJKLM[\]^_`" |
|||
tr = tr + "nopqrstuvwxyzabcdefghijklm{|}~" |
|||
s = "The quick brown fox jumps over the lazy dog." |
|||
print "Plain text: "; s |
|||
s = xlate(s,tr) |
|||
print "Rotated : "; s |
|||
s = xlate(s,tr) |
|||
print "Restored : "; s |
|||
end |
|||
</syntaxhighlight> |
|||
=={{header|S-lang}}== |
=={{header|S-lang}}== |