1 files changed, 47 insertions, 0 deletions
diff --git a/doc/context/third/enigma/examples/enigma-example-plain.tex b/doc/context/third/enigma/examples/enigma-example-plain.tex
new file mode 100644
index 0000000..d731c7d
--- /dev/null
+++ b/doc/context/third/enigma/examples/enigma-example-plain.tex
@@ -0,0 +1,47 @@
+\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