/ Amiga Tools 2 / Amiga Tools 2.iso / tex / macros / source / contrib / misc / askinclude.sty

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 25 20 61 73 6b 69 6e 63 | 6c 75 64 65 2e 73 74 79 |% askinc|lude.sty|
|00000010| 20 2d 20 69 6e 74 65 72 | 61 63 74 69 76 65 20 61 | - inter|active a|
|00000020| 73 6b 69 6e 67 20 6f 66 | 20 69 6e 63 6c 75 64 65 |sking of| include|
|00000030| 64 20 66 69 6c 65 73 20 | 0a 25 0a 25 20 56 45 52 |d files |.%.% VER|
|00000040| 53 49 4f 4e 20 31 2e 30 | 20 20 20 4e 6f 76 65 6d |SION 1.0|   Novem|
|00000050| 62 65 72 20 37 2c 20 31 | 39 39 31 0a 25 0a 25 20 |ber 7, 1|991.%.% |
|00000060| 28 63 29 20 31 39 39 31 | 20 62 79 20 50 61 62 6c |(c) 1991| by Pabl|
|00000070| 6f 20 41 2e 20 53 74 72 | 61 75 62 2e 20 20 50 65 |o A. Str|aub.  Pe|
|00000080| 72 6d 69 73 73 69 6f 6e | 20 69 73 20 67 72 61 6e |rmission| is gran|
|00000090| 74 65 64 20 74 6f 20 63 | 6f 70 79 20 61 6e 64 20 |ted to c|opy and |
|000000a0| 75 73 65 20 74 68 69 73 | 0a 25 20 69 6e 20 61 6e |use this|.% in an|
|000000b0| 79 20 77 61 79 20 61 6e | 64 20 66 6f 72 20 61 6e |y way an|d for an|
|000000c0| 79 20 70 75 72 70 6f 73 | 65 2c 20 65 78 63 65 70 |y purpos|e, excep|
|000000d0| 74 20 64 69 72 65 63 74 | 20 63 6f 6d 6d 65 72 63 |t direct| commerc|
|000000e0| 69 61 6c 20 61 64 76 61 | 6e 74 61 67 65 2c 0a 25 |ial adva|ntage,.%|
|000000f0| 20 70 72 6f 76 69 64 65 | 64 20 74 68 61 74 20 79 | provide|d that y|
|00000100| 6f 75 20 72 65 74 61 69 | 6e 20 74 68 69 73 20 63 |ou retai|n this c|
|00000110| 6f 70 79 72 69 67 68 74 | 20 6e 6f 74 69 63 65 2e |opyright| notice.|
|00000120| 0a 25 0a 25 20 48 49 53 | 54 4f 52 59 0a 25 0a 25 |.%.% HIS|TORY.%.%|
|00000130| 20 30 2e 39 35 20 20 31 | 31 2f 30 35 2f 39 31 20 | 0.95  1|1/05/91 |
|00000140| 20 20 46 69 72 73 74 20 | 62 65 74 61 2d 74 65 73 |  First |beta-tes|
|00000150| 74 20 76 65 72 73 69 6f | 6e 20 28 61 73 6b 65 64 |t versio|n (asked|
|00000160| 20 74 77 6f 20 71 75 65 | 73 74 69 6f 6e 73 29 0a | two que|stions).|
|00000170| 25 20 30 2e 39 39 20 20 | 31 31 2f 30 35 2f 39 31 |% 0.99  |11/05/91|
|00000180| 20 20 20 53 65 63 6f 6e | 64 20 62 65 74 61 2d 74 |   Secon|d beta-t|
|00000190| 65 73 74 20 76 65 72 73 | 69 6f 6e 20 28 61 73 6b |est vers|ion (ask|
|000001a0| 73 20 6f 6e 65 20 71 75 | 65 73 74 69 6f 6e 3b 20 |s one qu|estion; |
|000001b0| 75 73 65 73 20 2a 20 61 | 6e 64 20 2d 2e 29 0a 25 |uses * a|nd -.).%|
|000001c0| 20 31 2e 30 20 20 20 31 | 31 2f 30 37 2f 39 31 20 | 1.0   1|1/07/91 |
|000001d0| 20 20 43 68 61 6e 67 65 | 64 20 70 72 6f 6d 70 74 |  Change|d prompt|
|000001e0| 73 20 28 73 65 6e 74 20 | 74 6f 20 63 6f 6d 70 2e |s (sent |to comp.|
|000001f0| 74 65 78 74 2e 74 65 78 | 29 0a 25 20 31 2e 32 65 |text.tex|).% 1.2e|
|00000200| 20 20 31 39 39 34 2f 31 | 31 2f 30 32 20 54 77 6f |  1994/1|1/02 Two|
|00000210| 20 73 6d 61 6c 6c 20 63 | 68 61 6e 67 65 73 20 74 | small c|hanges t|
|00000220| 6f 20 72 75 6e 20 75 6e | 64 65 72 20 4c 61 54 65 |o run un|der LaTe|
|00000230| 58 32 65 0a 25 0a 25 20 | 50 6c 65 61 73 65 20 73 |X2e.%.% |Please s|
|00000240| 65 6e 64 20 65 6e 68 61 | 6e 63 65 6d 65 6e 74 73 |end enha|ncements|
|00000250| 20 61 6e 64 20 63 6f 72 | 72 65 63 74 69 6f 6e 73 | and cor|rections|
|00000260| 20 74 6f 20 73 74 72 61 | 75 62 40 63 73 2e 75 6d | to stra|ub@cs.um|
|00000270| 64 2e 65 64 75 2e 0a 25 | 0a 25 20 55 53 41 47 45 |d.edu..%|.% USAGE|
|00000280| 0a 25 0a 25 20 5c 64 6f | 63 75 6d 65 6e 74 73 74 |.%.% \do|cumentst|
|00000290| 79 6c 65 5b 2e 2e 2e 2c | 61 73 6b 69 6e 63 6c 75 |yle[...,|askinclu|
|000002a0| 64 65 2c 2e 2e 2e 5d 7b | 2e 2e 2e 7d 0a 25 0a 25 |de,...]{|...}.%.%|
|000002b0| 20 48 4f 57 20 49 54 20 | 57 4f 52 4b 53 0a 25 0a | HOW IT |WORKS.%.|
|000002c0| 25 20 54 68 65 20 61 73 | 6b 69 6e 63 6c 75 64 65 |% The as|kinclude|
|000002d0| 20 73 74 79 6c 65 20 6f | 70 74 69 6f 6e 20 61 73 | style o|ption as|
|000002e0| 6b 73 20 74 68 65 20 75 | 73 65 72 20 77 68 69 63 |ks the u|ser whic|
|000002f0| 68 20 66 69 6c 65 73 20 | 74 6f 20 69 6e 63 6c 75 |h files |to inclu|
|00000300| 64 65 2e 20 20 49 66 0a | 25 20 74 68 65 20 75 73 |de.  If.|% the us|
|00000310| 65 72 20 70 72 65 73 73 | 65 73 20 72 65 74 75 72 |er press|es retur|
|00000320| 6e 2c 20 74 68 65 20 66 | 69 6c 65 73 20 66 72 6f |n, the f|iles fro|
|00000330| 6d 20 74 68 65 20 70 72 | 65 76 69 6f 75 73 20 72 |m the pr|evious r|
|00000340| 75 6e 20 61 72 65 20 69 | 6e 63 6c 75 64 65 64 0a |un are i|ncluded.|
|00000350| 25 20 61 75 74 6f 6d 61 | 74 69 63 61 6c 6c 79 20 |% automa|tically |
|00000360| 28 65 78 63 65 70 74 20 | 6f 6e 20 74 68 65 20 66 |(except |on the f|
|00000370| 69 72 73 74 20 72 75 6e | 2c 20 69 6e 20 77 68 69 |irst run|, in whi|
|00000380| 63 68 20 63 61 73 65 20 | 61 6c 6c 20 66 69 6c 65 |ch case |all file|
|00000390| 73 20 61 72 65 0a 25 20 | 69 6e 63 6c 75 64 65 64 |s are.% |included|
|000003a0| 29 3b 20 69 66 20 74 68 | 65 20 61 6e 73 77 65 72 |); if th|e answer|
|000003b0| 20 69 73 20 20 2a 20 20 | 61 6c 6c 20 66 69 6c 65 | is  *  |all file|
|000003c0| 73 20 61 72 65 20 69 6e | 63 6c 75 64 65 64 3b 20 |s are in|cluded; |
|000003d0| 69 66 20 74 68 65 20 61 | 6e 73 77 65 72 0a 25 20 |if the a|nswer.% |
|000003e0| 69 73 20 20 2d 20 20 6e | 6f 20 66 69 6c 65 73 20 |is  -  n|o files |
|000003f0| 61 72 65 20 69 6e 63 6c | 75 64 65 64 3b 20 6f 74 |are incl|uded; ot|
|00000400| 68 65 72 77 69 73 65 20 | 74 68 65 20 73 70 65 63 |herwise |the spec|
|00000410| 69 66 69 65 64 20 66 69 | 6c 65 73 20 28 73 65 70 |ified fi|les (sep|
|00000420| 61 72 61 74 65 64 0a 25 | 20 62 79 20 63 6f 6d 6d |arated.%| by comm|
|00000430| 61 73 2c 20 77 69 74 68 | 20 6e 6f 20 65 6d 62 65 |as, with| no embe|
|00000440| 64 64 65 64 20 73 70 61 | 63 65 73 29 20 61 72 65 |dded spa|ces) are|
|00000450| 20 69 6e 63 6c 75 64 65 | 64 2e 0a 25 20 0a 25 20 | include|d..% .% |
|00000460| 52 45 53 54 52 49 43 54 | 49 4f 4e 53 0a 25 0a 25 |RESTRICT|IONS.%.%|
|00000470| 20 54 68 69 73 20 66 69 | 6c 65 20 72 65 64 65 66 | This fi|le redef|
|00000480| 69 6e 65 73 20 5c 64 6f | 63 75 6d 65 6e 74 2c 20 |ines \do|cument, |
|00000490| 74 68 65 20 63 6f 6d 6d | 61 6e 64 20 65 78 65 63 |the comm|and exec|
|000004a0| 75 74 65 64 20 77 69 74 | 68 20 5c 62 65 67 69 6e |uted wit|h \begin|
|000004b0| 7b 64 6f 63 75 6d 65 6e | 74 7d 2e 0a 25 20 49 74 |{documen|t}..% It|
|000004c0| 20 6d 61 79 20 62 65 20 | 69 6e 63 6f 6d 70 61 74 | may be |incompat|
|000004d0| 69 62 6c 65 20 77 69 74 | 68 20 6f 74 68 65 72 20 |ible wit|h other |
|000004e0| 73 74 79 6c 65 73 20 74 | 68 61 74 20 61 6c 73 6f |styles t|hat also|
|000004f0| 20 72 65 64 65 66 69 6e | 65 20 5c 64 6f 63 75 6d | redefin|e \docum|
|00000500| 65 6e 74 2e 0a 25 0a 25 | 20 54 68 65 20 75 73 65 |ent..%.%| The use|
|00000510| 72 27 73 20 69 6e 70 75 | 74 20 69 73 20 6e 6f 74 |r's inpu|t is not|
|00000520| 20 76 61 6c 69 64 61 74 | 65 64 2e 20 20 41 6e 79 | validat|ed.  Any|
|00000530| 74 68 69 6e 67 20 74 68 | 61 74 20 69 73 20 6e 6f |thing th|at is no|
|00000540| 74 20 61 20 2a 20 6f 72 | 20 61 20 2d 20 6f 72 20 |t a * or| a - or |
|00000550| 61 6e 0a 25 20 65 6d 70 | 74 79 20 6c 69 6e 65 20 |an.% emp|ty line |
|00000560| 69 73 20 70 61 73 73 65 | 64 20 74 6f 20 5c 69 6e |is passe|d to \in|
|00000570| 63 6c 75 64 65 6f 6e 6c | 79 2e 0a 25 0a 25 20 41 |cludeonl|y..%.% A|
|00000580| 43 4b 4e 4f 57 4c 45 44 | 47 45 4d 45 4e 54 0a 25 |CKNOWLED|GEMENT.%|
|00000590| 0a 25 20 54 6f 6d 20 53 | 63 61 76 6f 20 28 73 63 |.% Tom S|cavo (sc|
|000005a0| 61 76 6f 40 63 69 65 2e | 75 6f 72 65 67 6f 6e 2e |avo@cie.|uoregon.|
|000005b0| 65 64 75 29 20 73 75 67 | 67 65 73 74 65 64 20 73 |edu) sug|gested s|
|000005c0| 61 76 69 6e 67 20 74 68 | 65 20 69 6e 63 6c 75 64 |aving th|e includ|
|000005d0| 65 20 66 69 6c 65 20 6c | 69 73 74 0a 25 20 66 72 |e file l|ist.% fr|
|000005e0| 6f 6d 20 74 68 65 20 70 | 72 65 76 69 6f 75 73 20 |om the p|revious |
|000005f0| 72 75 6e 20 61 6e 64 20 | 61 20 73 69 6d 70 6c 69 |run and |a simpli|
|00000600| 66 69 65 64 20 75 73 65 | 72 20 69 6e 74 65 72 66 |fied use|r interf|
|00000610| 61 63 65 2e 0a 0a 0a 5c | 64 65 66 5c 40 69 6e 63 |ace....\|def\@inc|
|00000620| 6c 75 64 65 6f 6e 6c 79 | 7b 5c 40 67 6f 62 62 6c |ludeonly|{\@gobbl|
|00000630| 65 7d 20 25 20 61 73 73 | 75 6d 65 20 77 65 20 64 |e} % ass|ume we d|
|00000640| 6f 20 6e 6f 74 20 69 6e | 63 6c 75 64 65 20 66 72 |o not in|clude fr|
|00000650| 6f 6d 20 6c 61 73 74 20 | 72 75 6e 0a 0a 5c 64 65 |om last |run..\de|
|00000660| 66 5c 40 69 6e 70 75 74 | 73 7b 2a 7d 20 20 20 20 |f\@input|s{*}    |
|00000670| 20 20 20 20 20 20 20 20 | 20 25 20 61 73 73 75 6d |        | % assum|
|00000680| 65 20 61 6c 6c 20 66 69 | 6c 65 73 20 69 6e 63 6c |e all fi|les incl|
|00000690| 75 64 65 64 0a 0a 0a 25 | 20 64 65 74 65 72 6d 69 |uded...%| determi|
|000006a0| 6e 65 20 77 68 69 63 68 | 20 66 69 6c 65 73 20 74 |ne which| files t|
|000006b0| 6f 20 69 6e 63 6c 75 64 | 65 0a 0a 5c 64 65 66 5c |o includ|e..\def\|
|000006c0| 40 73 74 61 72 7b 2a 7d | 20 20 20 20 20 20 20 25 |@star{*}|       %|
|000006d0| 20 75 73 65 64 20 66 6f | 72 20 63 6f 6d 70 61 72 | used fo|r compar|
|000006e0| 69 6e 67 20 75 73 65 72 | 27 73 20 61 6e 73 77 65 |ing user|'s answe|
|000006f0| 72 0a 5c 64 65 66 5c 40 | 6d 69 6e 75 73 73 69 67 |r.\def\@|minussig|
|00000700| 6e 7b 2d 7d 20 20 20 20 | 20 20 25 20 64 69 74 74 |n{-}    |  % ditt|
|00000710| 6f 0a 0a 5c 74 79 70 65 | 6f 75 74 20 7b 20 7d 0a |o..\type|out { }.|
|00000720| 5c 74 79 70 65 6f 75 74 | 20 7b 45 6e 74 65 72 20 |\typeout| {Enter |
|00000730| 66 69 6c 65 28 73 29 20 | 74 6f 20 69 6e 63 6c 75 |file(s) |to inclu|
|00000740| 64 65 20 28 73 65 70 61 | 72 61 74 65 64 20 62 79 |de (sepa|rated by|
|00000750| 20 63 6f 6d 6d 61 73 20 | 61 6e 64 20 6e 6f 20 73 | commas |and no s|
|00000760| 70 61 63 65 73 29 2c 7d | 0a 5c 74 79 70 65 6f 75 |paces),}|.\typeou|
|00000770| 74 20 7b 6f 72 20 65 6e | 74 65 72 20 2a 20 66 6f |t {or en|ter * fo|
|00000780| 72 20 61 6c 6c 20 66 69 | 6c 65 73 2c 20 6f 72 20 |r all fi|les, or |
|00000790| 65 6e 74 65 72 20 2d 20 | 66 6f 72 20 6e 6f 6e 65 |enter - |for none|
|000007a0| 2c 20 6f 72 7d 0a 5c 74 | 79 70 65 69 6e 20 20 5b |, or}.\t|ypein  [|
|000007b0| 5c 69 6e 70 75 74 66 69 | 6c 65 73 5d 7b 70 72 65 |\inputfi|les]{pre|
|000007c0| 73 73 20 52 65 74 75 72 | 6e 20 69 66 20 74 68 69 |ss Retur|n if thi|
|000007d0| 73 20 72 75 6e 20 69 73 | 20 74 68 65 20 73 61 6d |s run is| the sam|
|000007e0| 65 20 61 73 20 74 68 65 | 20 6c 61 73 74 2e 7d 0a |e as the| last.}.|
|000007f0| 0a 5c 69 66 78 5c 69 6e | 70 75 74 66 69 6c 65 73 |.\ifx\in|putfiles|
|00000800| 5c 40 73 74 61 72 20 20 | 20 20 20 20 20 20 20 20 |\@star  |        |
|00000810| 20 25 20 61 6c 6c 20 66 | 69 6c 65 73 20 69 6e 63 | % all f|iles inc|
|00000820| 6c 75 64 65 64 0a 20 20 | 20 25 20 64 6f 20 6e 6f |luded.  | % do no|
|00000830| 74 68 69 6e 67 0a 5c 65 | 6c 73 65 20 5c 69 66 78 |thing.\e|lse \ifx|
|00000840| 5c 69 6e 70 75 74 66 69 | 6c 65 73 5c 40 6d 69 6e |\inputfi|les\@min|
|00000850| 75 73 73 69 67 6e 20 20 | 20 20 25 20 6e 6f 20 66 |ussign  |  % no f|
|00000860| 69 6c 65 73 20 69 6e 63 | 6c 75 64 65 64 0a 20 20 |iles inc|luded.  |
|00000870| 20 5c 69 6e 63 6c 75 64 | 65 6f 6e 6c 79 7b 7d 0a | \includ|eonly{}.|
|00000880| 20 20 20 5c 64 65 66 5c | 40 69 6e 70 75 74 73 7b |   \def\|@inputs{|
|00000890| 7d 0a 5c 65 6c 73 65 20 | 5c 69 66 78 5c 69 6e 70 |}.\else |\ifx\inp|
|000008a0| 75 74 66 69 6c 65 73 5c | 65 6d 70 74 79 20 20 20 |utfiles\|empty   |
|000008b0| 20 20 25 20 69 6e 63 6c | 75 64 65 20 61 63 63 6f |  % incl|ude acco|
|000008c0| 72 64 69 6e 67 20 74 6f | 20 70 72 65 76 69 6f 75 |rding to| previou|
|000008d0| 73 20 72 75 6e 0a 20 20 | 20 5c 64 65 66 5c 40 69 |s run.  | \def\@i|
|000008e0| 6e 63 6c 75 64 65 6f 6e | 6c 79 23 31 7b 25 0a 20 |ncludeon|ly#1{%. |
|000008f0| 20 20 20 20 5c 67 64 65 | 66 5c 40 69 6e 70 75 74 |    \gde|f\@input|
|00000900| 73 7b 23 31 7d 0a 20 20 | 20 20 20 5c 69 66 78 5c |s{#1}.  |   \ifx\|
|00000910| 40 69 6e 70 75 74 73 5c | 40 73 74 61 72 20 5c 65 |@inputs\|@star \e|
|00000920| 6c 73 65 20 5c 67 6c 6f | 62 61 6c 5c 40 70 61 72 |lse \glo|bal\@par|
|00000930| 74 73 77 74 72 75 65 5c | 67 6c 6f 62 61 6c 5c 65 |tswtrue\|global\e|
|00000940| 64 65 66 5c 40 70 61 72 | 74 6c 69 73 74 7b 23 31 |def\@par|tlist{#1|
|00000950| 7d 5c 66 69 7d 0a 5c 65 | 6c 73 65 0a 20 20 20 5c |}\fi}.\e|lse.   \|
|00000960| 64 65 66 5c 40 69 6e 70 | 75 74 73 7b 5c 69 6e 70 |def\@inp|uts{\inp|
|00000970| 75 74 66 69 6c 65 73 7d | 20 20 20 20 25 20 69 6e |utfiles}|    % in|
|00000980| 63 6c 75 64 65 20 74 68 | 65 73 65 20 66 69 6c 65 |clude th|ese file|
|00000990| 73 0a 20 20 20 5c 69 6e | 63 6c 75 64 65 6f 6e 6c |s.   \in|cludeonl|
|000009a0| 79 7b 5c 69 6e 70 75 74 | 66 69 6c 65 73 7d 0a 5c |y{\input|files}.\|
|000009b0| 66 69 5c 66 69 5c 66 69 | 0a 0a 0a 5c 41 74 42 65 |fi\fi\fi|...\AtBe|
|000009c0| 67 69 6e 44 6f 63 75 6d | 65 6e 74 7b 5c 69 66 40 |ginDocum|ent{\if@|
|000009d0| 66 69 6c 65 73 77 0a 20 | 20 20 20 20 20 20 20 20 |filesw. |        |
|000009e0| 20 20 20 20 20 20 20 20 | 5c 69 6d 6d 65 64 69 61 |        |\immedia|
|000009f0| 74 65 5c 77 72 69 74 65 | 5c 40 6d 61 69 6e 61 75 |te\write|\@mainau|
|00000a00| 78 7b 5c 73 74 72 69 6e | 67 5c 40 69 6e 63 6c 75 |x{\strin|g\@inclu|
|00000a10| 64 65 6f 6e 6c 79 5c 73 | 74 72 69 6e 67 7b 5c 40 |deonly\s|tring{\@|
|00000a20| 69 6e 70 75 74 73 0a 20 | 20 20 20 20 20 20 20 20 |inputs. |        |
|00000a30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000a40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000a50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000a60| 20 20 20 20 20 20 5c 73 | 74 72 69 6e 67 7d 7d 25 |      \s|tring}}%|
|00000a70| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00000a80| 20 20 5c 64 65 66 5c 40 | 69 6e 63 6c 75 64 65 6f |  \def\@|includeo|
|00000a90| 6e 6c 79 7b 7d 7d 0a    |                         |nly{}}. |        |
+--------+-------------------------+-------------------------+--------+--------+