On 12-Oct-03, Carl Read wrote:

> On 12-Oct-03, Karl Robillard wrote:

>> I followed a link off the Pleac site to the ROT13 implementation
>> page (http://www.miranda.org/~jkominek/rot13/).

Going by most of the examples I've checked on the site it seems they'd
like characters to be printed one at a time, so here's a modified
version of the script I just posted...

rebol []

foreach char input [
    letter: to-string char
    if all [letter >= "a" letter <= "z"][
        char: char + either letter < "n" [13][-13]
    ]
    prin char
]
prin "^/"

-- 
Carl Read

-- 
To unsubscribe from this list, just send an email to
[EMAIL PROTECTED] with unsubscribe as the subject.

Reply via email to