Tom Torfs wrote in a message to Sean Dennis:

 TT>       if (c>='a' && c<='z')
 TT>          c = (((c-'a')+13)%26)+'a';
 TT>       else if (c>='A' && c<='Z')
 TT>          c = (((c-'A')+13)%26)+'A';

This assumes contiguous letters of course. Extension to non-contiguous is
fairly obvious (but probably unnecessary for most systems running OS/2).

greetings,
Tom
tomtorfs@village.uunet.be

--- timEd/2 1.10.y2k+
724/10