diff options
-rw-r--r-- | Master/texmf-dist/tex/plain/hanoi/hanoi.tex | 43 | ||||
-rwxr-xr-x | Master/tlpkg/libexec/ctan2tds | 2 | ||||
-rw-r--r-- | Master/tlpkg/tlpsrc/hanoi.tlpsrc | 0 |
3 files changed, 44 insertions, 1 deletions
diff --git a/Master/texmf-dist/tex/plain/hanoi/hanoi.tex b/Master/texmf-dist/tex/plain/hanoi/hanoi.tex new file mode 100644 index 00000000000..fb8ff66d50f --- /dev/null +++ b/Master/texmf-dist/tex/plain/hanoi/hanoi.tex @@ -0,0 +1,43 @@ +% Author: Brian Blackmore <blb8@po.cwru.edu> +% Date: January 1, 2012 +% Version: 20120102 +% License: Public Domain +% Requirements: Plain TeX + + % + % % + % % + % % + % Tower % + % of % + % Brahma % + % (Plain TeX) % + % by Brian % + % Blackmore % + % 20120101 % + % % + \nopagenumbers\output{}{} + \chardef\_13\catcode%edocta + 126 \_ \let ^^> \catcode~47 0 + ~95/_/let_\let~43/__^^k/def ~64 + 11 ~81\_ ~86 1 ~119 ~86 ~85 2 ~87 + ~85 ~`/!/_~80\__P/vsize~34 14~83\_+ + S#1{}~`/X13_X\expandafter\divide\hsize + by3 \multiplyP3 \output{\shipout/vbox to + 0.34PV\hbox to\z@w\vsplit255 to0.34P\hfil% A + \vsplit255 to0.34P\hfil/vbox to0.34Pw\unvbox SVU + Sa 255U\hssWU\ifnum/outputpenalty>-10000\else" \font + \dosupereject\fiW ~`\>13_^^~\rightline _!\count \font"% + /rm=cmr8\rm\baselineskip9pt !2 0 +/AV1 2 3 4 5 6 7 8 9 10 11 + 12 13 14 15 VW wU}+\BwVU wUW +\CV{U w}}+/spw\vboxw>V Move Sb/the + !2U>w/A:U>V\B:W>w\C:}}\vskip8pt plus4pt }+\f#1 #2f{#1U +/nf#1 #2fV%W + #2W +\h#1wX\f#1fW +/T#1VX\nf#1f} +\rh#1w\xdef#1V/TV#1}WU SwU+\move#1#2{" + \global\advance!2by1 /edef\twX\hV#1}W/rhw#1W\xdef#2VSwby-1 7W\t\space#2}/spW + +Q#1#2#3#4w\ifnum#1=1 \moveV#2}w#3U/elseV!0 #1\advance!0by-1 \edef/taV"#7WWVabcd + /the!0WQw/ta}V#2Ww#4}{#3W/moveV#2UV#3}QV\ta}w#4Ww#3Ww#2U}/fi}Q V10WV/AUw\C}V/BW \bye +======================================================================================= +If you want the full tower with 15 discs, change this number ten ^^ to 15 for 713 pgs. + + Happy TeXing in 2012! + +======================================================================================= diff --git a/Master/tlpkg/libexec/ctan2tds b/Master/tlpkg/libexec/ctan2tds index 8b1130e9b28..e4f06dc26be 100755 --- a/Master/tlpkg/libexec/ctan2tds +++ b/Master/tlpkg/libexec/ctan2tds @@ -1166,7 +1166,7 @@ $standardtex='\.(.bx|cfg|sty|clo|ldf|cls|def|fd|cmap|4ht)$'; 'getoptk', '\.tex', 'ginpenc', '\.gie|\.sty', 'graphics-pln','^[^e].*\.tex|.*\.sty', # not exmpl* - 'hanoid', 'hanoi\.tex', + 'hanoi', 'hanoi\.tex', 'harvmac', 'mac\.tex', 'hc', '\.hld|' . $standardtex, 'hrefhide', '\.sty|[^c]\.cfg', # omit ltxdoc.cfg, would be system-wide diff --git a/Master/tlpkg/tlpsrc/hanoi.tlpsrc b/Master/tlpkg/tlpsrc/hanoi.tlpsrc new file mode 100644 index 00000000000..e69de29bb2d --- /dev/null +++ b/Master/tlpkg/tlpsrc/hanoi.tlpsrc |