Anonymous user
Straddling checkerboard: Difference between revisions
m
→{{header|REXX}}: added whitespace to the REXX header section.
SqrtNegInf (talk | contribs) m (→{{header|Perl}}: oops, missing ';') |
m (→{{header|REXX}}: added whitespace to the REXX header section.) |
||
Line 2,028:
=={{header|REXX}}==
Extra coding was added to:
:* allow the use of any table (specifiable on the invocation of the '''genCipher''' subroutine, the :5<sup>th</sup> line in the REXX program),
:* no hard-coding of the location of blanks,
:* no hard-coding or the numbered lines in the straddled checkerboard table,
:* no hard-coding of the location of the escape character,
:* support the usage of a blank in the 1<sup>st</sup> character (the top line of the table).
<lang rexx>/*REXX program uses the straddling checkerboard cipher to encrypt/decrypt a message. */
arg msg /*obtain optional message from the C.L.*/
Line 2,081:
decrypted= ONENIGHTITWASTHETWENTIETHOFMARCH1888IWASRETURNING
</pre>
=={{header|Ruby}}==
| |||