Source

enigma / doc / context / third / enigma / examples / enigma-example-plain.tex

Full commit
\parindent0pt
%%·····································································%
\input {enigma}
%%·····································································%
%% The first machine will be used for encryption of our plain text.
\defineenigma {encryption}
\setupenigma  {encryption} {
  other_chars = yes,
  day_key = B V III II 12 03 01 GI JV KZ WM PU QY AD CN ET FL,
  rotor_setting = ben,
}
%%·····································································%
%% This second machine below will be used to decrypt the string.
\defineenigma{decryption}
\setupenigma{decryption}{
  other_chars = yes,
  day_key = B V III II 12 03 01 GI JV KZ WM PU QY AD CN ET FL,
  rotor_setting = ben,
}
%%·····································································%
%%                                main
%%·····································································%
%% Ciphertext in the PDF. Rely on the addressee to decrypt the document
%% externally.
%%·····································································%
%%                      encryption of plain text
%%·····································································%
\startencryption
  Never underestimate the amount of money, time, and effort someone will expend to thwart a security system.
\stopencryption

%%·····································································%
%%                      decryption of ciphertext
%%·····································································%
%% Input string generated with:
%% mtxrun --script t-enigma  \
%%        --setup="day_key=B V III II 12 03 01 GI JV KZ WM PU QY AD CN ET FL,\
%%           rotor_setting=ben,\
%%             other_chars=yes"\
%%        --text="Never underestimate the amount of money,\
%%                time, and effort someone will expend to\
%%                thwart a security system."
\startdecryption
  aqsnwyxgqarpuzrdktscbslaqmdhyonywxkwhcdgphvuqsspfjwhlszahygjbzmfpcpbniahvfcuradntepxsfchnn
\stopdecryption
%%·····································································%
\bye