summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/dialogl/animals2.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/latex/dialogl/animals2.tex')
-rw-r--r--Master/texmf-dist/doc/latex/dialogl/animals2.tex26
1 files changed, 26 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/dialogl/animals2.tex b/Master/texmf-dist/doc/latex/dialogl/animals2.tex
new file mode 100644
index 00000000000..5096c1a55d9
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/dialogl/animals2.tex
@@ -0,0 +1,26 @@
+\openin\inp=animal.dat
+\ifeof\inp \errmessage{Unable to open animal.dat!}\fi
+\loop
+ \temp=\curcode
+ \Scan
+ \Query
+ \mainlreptrue
+ \ifnum\curcode=0
+ \immediate\write16{%
+ Thank you for using Animals. I'm glad I got it right.}
+ \mainlrepfalse
+ \else
+ \ifnum\curcode=-1 \NewAnimal\mainlrepfalse\fi
+ \fi
+\ifmainlrep
+\repeat
+
+\closein\inp
+\message{Wanna go again? }%
+\GetYN
+\ifyn
+ \curcode=1 % initialization
+\else
+ \def\maybecontinue{}%
+\fi
+\endinput