summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/dialogl/diatest.tex
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2011-01-20 22:23:40 +0000
committerKarl Berry <karl@freefriends.org>2011-01-20 22:23:40 +0000
commit07899da1626d7e1e1d782a72ece3588442da6c7e (patch)
treed5b1de235090a5af9517f8525a508dfb4f4c8a6f /Master/texmf-dist/doc/latex/dialogl/diatest.tex
parent26a263f4b5fc1171444b7d04d05b1831317f36b5 (diff)
rm dialogl, noinfo license, author sadly deceased
git-svn-id: svn://tug.org/texlive/trunk@21137 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/latex/dialogl/diatest.tex')
-rw-r--r--Master/texmf-dist/doc/latex/dialogl/diatest.tex162
1 files changed, 0 insertions, 162 deletions
diff --git a/Master/texmf-dist/doc/latex/dialogl/diatest.tex b/Master/texmf-dist/doc/latex/dialogl/diatest.tex
deleted file mode 100644
index 4310bf1d6b6..00000000000
--- a/Master/texmf-dist/doc/latex/dialogl/diatest.tex
+++ /dev/null
@@ -1,162 +0,0 @@
-% Test of the `menus' package. You can run this file with (at least)
-% plain TeX, LaTeX (2e), and old LaTeX (2.09).
-%
-% Some chicanery to make this file work in several different contexts.
-\ifx\undefined\documentclass
- \def\NeedsTeXFormat#1{}\def\RequirePackage#1{\input #1.sty \relax}
- \def\ProvidesPackage#1[#2]{}
- \ifx\undefined\documentstyle
- \def\startup{\input menus.sty \relax}
- \else
- \def\startup{\documentstyle[menus]{article}}
- \fi
-\else
- \def\startup{%
- \documentclass{article}%
- \usepackage{menus}%
- }
-\fi
-
-\startup
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-\mesj{
-The following series of tests is designed to cover most of the
-features that are provided by dialog.sty. If you compare what you
-see on screen with the contents of the file diatest.tex you will
-see how they correspond.
-
-Press the Return or Enter key to continue:}
-\readline{}\xyz
-
-\promptmesj{
-
-Testing \mesj:
-Press return to continue: }
-\readline{}\xyz\mesj{}
-\mesj{Give ~ me %^^L an &|
- \newif #}
-
-\promptmesj{
-Testing \xmesj:
-Press return to continue: }
-\readline{}\xyz\mesj{}
-\xmesj{Do we have \{\}\\ characters?
-And \iftrue\.true\else\.false\fi.
-Not to mention ampersand \&, since \string\iftrue.}
-
-\promptmesj{
-Testing \xmesj inside of a \def:
-Press return to continue: }
-\readline{}\xyz\mesj{}
-\def\next{\xmesj{Abc space:\ , control-M: \^^M, and percent:\%\
-and another line break.}}
-\next
-
-\promptmesj{
-Testing \promptmesj:
-Press return to continue: }
-\readline{}\xyz\mesj{}
-\promptmesj{Enter this or that: }
-\readline{}\xyz
-
-\promptmesj{
-Testing \storemesj:
-Press return to continue: }
-\readline{}\xyz\mesj{}
-\storemesj\foo{This is a fine old message, isn't it?:
-\mesj{Give ~ me %^^L an &|
- \newif }}
-\xmesj{\foo}
-
-\promptmesj{
-Testing \storexmesj now with an arg:
-Press return to continue: }
-\readline{}\xyz\mesj{}
-\storexmesj\foo#1{This is a fine old message, isn't it?:
-\\mesj{Give ~ me \%^^L an \&|#1
- \\newif \#}}
-\xmesj{\foo{KABLOO}}
-
-\promptmesj{
-Testing \fmesj:
-Press return to continue: }
-\readline{}\xyz\mesj{}
-\fmesj\foo{This is a fine old message, isn't it?:
-\mesj{Give ~ me %^^L an &|
- \newif}}
-\foo
-
-\promptmesj{
-Testing \fxmesj now with an arg:
-Press return to continue: }
-\readline{}\xyz\mesj{}
-\fxmesj\foo#1{This is a fine old message, isn't it?:
-\\mesj{Give ~ me \%^^L an \&|#1
- \\newif \#}}
-\foo{KABLOO}
-
-\promptmesj{
-Would you like to try out \readline? [yes or no]: }
-\readline{}\answer
-\xmesj{Well, if I understood you correctly, you answered `\answer'}
-
-\promptmesj{
-OK, now try give me an executable answer, such as
-"\iftrue yes\else no\fi": }
-\xreadline{}\answer
-\xmesj{Well, and now if I try to execute that: "\answer"}
-
-\promptmesj{
-OK, now let's try \readchar. Give me an arbitrary answer of
-one or more characters: }
-\readchar{}\answer
-\xmesj{Taking the first character from your answer, I get: "\answer"}
-
-\promptmesj{
-OK, now let's try \readChar. Give me an arbitrary answer of
-one or more letters: }
-\readChar{}\answer
-\xmesj{Taking the first character from your answer, and
-uppercasing it, I get: "\answer"}
-
-\promptmesj{
-OK, give me a number then, so that I can
-check it with \checkinteger: }
-\readline{}\answer
-\checkinteger\answer\fam
-\xmesj{\ifnum\fam=-\maxdimen%
-Gee, I don't think that was\else\.Got\fi%
- a valid number: "\answer"}
-
-\def\dimtest#1{\promptxmesj{#1}%
- \readline{}\answer
- \ifx\empty\answer
- \else
- \checkdimen\answer\vfuzz
- \ifdim\vfuzz=-\maxdimen%
- \xmesj{Sorry, that doesn't look like a TeX dimen to me: "\answer"}%
- \else
- \xmesj{Looks like a valid TeX dimen: "\answer" = \the\vfuzz}%
- \fi
- \expandafter\dimtestb
- \fi
-}
-
-\def\dimtesta{\dimtest{\
-OK, give me a dimen then, so that I can\
-check it with \\checkdimen:\
-}}
-
-\def\dimtestb{\dimtest{\
-How about another dimen: }}
-
-\def\empty{}
-
-% Iterate once with one prompt, then several times with a shorter
-% prompt.
-\dimtesta
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-\csname stop\endcsname
-\end