Rosetta Code

Rot-13: Difference between revisions

Page Discussion

Rot-13 (view source)

Revision as of 22:51, 8 September 2023

107 bytes removed ,  8 months ago
m
→‎{{header|EasyLang}}
(→‎{{header|Raku}}: add one-liner)
Line 1,762:
=={{header|EasyLang}}==
<syntaxhighlight lang="text">
procfunc$ rot13 string$ . encodedStringstr$ .
for c$ in strchars str$
encodedString$ = ""
for i = 1code to= lenstrcode stringc$
code = strcode substr string$ i 1
if code >= 65 and code <= 90
encodedCodeencCode = code + 13
if encodedCodeencCode > 90
encodedCodeencCode = 64 + encodedCodeencCode - 90
.
elif code >= 97 and code <= 122
encodedCodeencCode = code + 13
if encodedCodeencCode > 122
encodedCodeencCode = 96 + encodedCodeencCode - 122
.
else
encodedCodeencCode = code
.
encodedStringencStr$ &= strchar encodedCodeencCode
.
return encStr$
.
print rot13 "Rosetta Code" result$▼
#
▲rot13 "Rosetta Code" result$
print result$
</syntaxhighlight>
{{out}}
Chkas
2,044

edits

Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/348635"