home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: SHell self-extracting ARchive
(archive/shar).
You can browse this item here: pstext
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| SHell self-extracting ARchive (archive/shar)
| magic
| Supported |
| 1%
| dexvert
| Text File (text/txt)
| fallback
| Supported |
| 100%
| file
| POSIX shell script text executable
| default
| |
| 99%
| file
| C source text
| default
| |
| 98%
| file
| makefile script text
| default
| |
| 97%
| file
| a /bin/sh script, ASCII text executable
| default (weak)
| |
| 100%
| TrID
| shar SHell self-extracting aRchive
| default
| |
| 100%
| checkBytes
| Printable ASCII
| default
| |
| 100%
| perlTextCheck
| Likely Text (Perl)
| default
| |
| 100%
| siegfried
| fmt/329 Shell Archive Format
| default
| |
| 100%
| gt2
| Shell Skript: '/bin/sh'
| default (weak)
| |
| 100%
| detectItEasy
| Format: plain text[LF]
| default (weak)
| |
| 100%
| binwalkID
| Executable script, shebang: "/bin/sh"
| default (weak)
| |
| 100%
| xdgMime
| application/x-shellscript
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 23 21 20 2f 62 69 6e 2f | 73 68 0a 23 20 54 68 69 |#! /bin/|sh.# Thi|
|00000010| 73 20 69 73 20 61 20 73 | 68 65 6c 6c 20 61 72 63 |s is a s|hell arc|
|00000020| 68 69 76 65 2c 20 6d 65 | 61 6e 69 6e 67 3a 0a 23 |hive, me|aning:.#|
|00000030| 20 31 2e 20 52 65 6d 6f | 76 65 20 65 76 65 72 79 | 1. Remo|ve every|
|00000040| 74 68 69 6e 67 20 61 62 | 6f 76 65 20 74 68 65 20 |thing ab|ove the |
|00000050| 23 21 20 2f 62 69 6e 2f | 73 68 20 6c 69 6e 65 2e |#! /bin/|sh line.|
|00000060| 0a 23 20 32 2e 20 53 61 | 76 65 20 74 68 65 20 72 |.# 2. Sa|ve the r|
|00000070| 65 73 75 6c 74 69 6e 67 | 20 74 65 78 74 20 69 6e |esulting| text in|
|00000080| 20 61 20 66 69 6c 65 2e | 0a 23 20 33 2e 20 45 78 | a file.|.# 3. Ex|
|00000090| 65 63 75 74 65 20 74 68 | 65 20 66 69 6c 65 20 77 |ecute th|e file w|
|000000a0| 69 74 68 20 2f 62 69 6e | 2f 73 68 20 28 6e 6f 74 |ith /bin|/sh (not|
|000000b0| 20 63 73 68 29 20 74 6f | 20 63 72 65 61 74 65 20 | csh) to| create |
|000000c0| 74 68 65 20 66 69 6c 65 | 73 3a 0a 23 09 52 65 61 |the file|s:.#.Rea|
|000000d0| 64 6d 65 0a 23 09 4d 61 | 6b 65 66 69 6c 65 0a 23 |dme.#.Ma|kefile.#|
|000000e0| 09 70 73 74 65 78 74 2e | 31 0a 23 09 70 73 74 65 |.pstext.|1.#.pste|
|000000f0| 78 74 2e 63 0a 23 20 54 | 68 69 73 20 61 72 63 68 |xt.c.# T|his arch|
|00000100| 69 76 65 20 63 72 65 61 | 74 65 64 3a 20 4d 6f 6e |ive crea|ted: Mon|
|00000110| 20 44 65 63 20 31 38 20 | 31 36 3a 33 36 3a 30 38 | Dec 18 |16:36:08|
|00000120| 20 31 39 38 39 0a 23 20 | 42 79 3a 09 44 61 6e 20 | 1989.# |By:.Dan |
|00000130| 4a 75 64 64 20 28 29 0a | 65 78 70 6f 72 74 20 50 |Judd ().|export P|
|00000140| 41 54 48 3b 20 50 41 54 | 48 3d 2f 62 69 6e 3a 24 |ATH; PAT|H=/bin:$|
|00000150| 50 41 54 48 0a 69 66 20 | 74 65 73 74 20 2d 66 20 |PATH.if |test -f |
|00000160| 27 52 65 61 64 6d 65 27 | 0a 74 68 65 6e 0a 09 65 |'Readme'|.then..e|
|00000170| 63 68 6f 20 73 68 61 72 | 3a 20 77 69 6c 6c 20 6e |cho shar|: will n|
|00000180| 6f 74 20 6f 76 65 72 2d | 77 72 69 74 65 20 65 78 |ot over-|write ex|
|00000190| 69 73 74 69 6e 67 20 66 | 69 6c 65 20 22 27 52 65 |isting f|ile "'Re|
|000001a0| 61 64 6d 65 27 22 0a 65 | 6c 73 65 0a 63 61 74 20 |adme'".e|lse.cat |
|000001b0| 3c 3c 20 5c 53 48 41 52 | 5f 45 4f 46 20 3e 20 27 |<< \SHAR|_EOF > '|
|000001c0| 52 65 61 64 6d 65 27 0a | 0a 54 68 69 73 20 69 73 |Readme'.|.This is|
|000001d0| 20 79 65 74 20 61 6e 6f | 74 68 65 72 20 74 75 72 | yet ano|ther tur|
|000001e0| 6e 20 79 6f 75 72 20 70 | 6f 73 74 73 63 72 69 70 |n your p|ostscrip|
|000001f0| 74 20 70 72 69 6e 74 65 | 72 20 69 6e 74 6f 20 61 |t printe|r into a|
|00000200| 20 0a 6c 69 6e 65 20 70 | 72 69 6e 74 65 72 20 6b | .line p|rinter k|
|00000210| 69 6e 64 20 6f 66 20 70 | 72 6f 67 72 61 6d 2e 20 |ind of p|rogram. |
|00000220| 49 20 77 72 6f 74 65 20 | 74 68 69 73 20 62 65 63 |I wrote |this bec|
|00000230| 61 75 73 65 20 49 20 77 | 61 6e 74 65 64 20 61 20 |ause I w|anted a |
|00000240| 0a 70 6c 61 69 6e 20 74 | 65 78 74 20 66 69 6c 74 |.plain t|ext filt|
|00000250| 65 72 20 74 68 61 74 20 | 77 6f 75 6c 64 20 68 61 |er that |would ha|
|00000260| 6e 64 6c 65 20 74 61 62 | 73 20 61 6e 64 20 62 61 |ndle tab|s and ba|
|00000270| 63 6b 20 73 70 61 63 65 | 73 20 73 61 6e 65 6c 79 |ck space|s sanely|
|00000280| 2c 0a 70 72 69 6e 74 20 | 32 20 70 61 67 65 73 20 |,.print |2 pages |
|00000290| 6f 6e 20 31 2c 20 70 72 | 69 6e 74 20 6c 61 6e 73 |on 1, pr|int lans|
|000002a0| 63 61 70 65 20 6f 72 20 | 70 6f 72 74 72 61 69 74 |cape or |portrait|
|000002b0| 2c 20 61 6e 64 20 6e 6f | 20 63 75 74 65 73 79 20 |, and no| cutesy |
|000002c0| 0a 70 61 67 65 20 68 65 | 61 64 65 72 73 2e 20 49 |.page he|aders. I|
|000002d0| 74 20 68 61 73 20 61 6e | 20 6f 70 74 69 6f 6e 20 |t has an| option |
|000002e0| 74 6f 20 70 72 69 6e 74 | 20 78 20 6c 69 6e 65 73 |to print| x lines|
|000002f0| 20 70 65 72 20 70 61 67 | 65 20 66 6f 72 20 74 68 | per pag|e for th|
|00000300| 6f 73 65 0a 6f 66 20 79 | 6f 75 20 77 68 6f 20 64 |ose.of y|ou who d|
|00000310| 6f 20 6e 6f 74 20 77 69 | 73 68 20 74 6f 20 66 69 |o not wi|sh to fi|
|00000320| 67 75 72 65 20 6f 75 74 | 20 77 68 61 74 20 73 69 |gure out| what si|
|00000330| 7a 65 20 6f 66 20 54 69 | 6d 65 73 2d 52 6f 6d 61 |ze of Ti|mes-Roma|
|00000340| 6e 20 28 6f 72 0a 77 68 | 61 74 65 76 65 72 20 66 |n (or.wh|atever f|
|00000350| 6f 6e 74 20 79 6f 75 20 | 6c 69 6b 65 29 20 69 73 |ont you |like) is|
|00000360| 20 6e 65 65 64 65 64 20 | 74 6f 20 67 65 74 20 36 | needed |to get 6|
|00000370| 36 20 6c 69 6e 65 73 20 | 70 65 72 20 70 61 67 65 |6 lines |per page|
|00000380| 2e 0a 0a 46 65 65 6c 20 | 66 72 65 65 20 74 6f 20 |...Feel |free to |
|00000390| 64 6f 20 77 68 61 74 20 | 79 6f 75 20 77 61 6e 74 |do what |you want|
|000003a0| 20 77 69 74 68 20 74 68 | 69 73 20 70 72 6f 67 72 | with th|is progr|
|000003b0| 61 6d 2c 20 65 78 63 65 | 70 74 20 73 65 6c 6c 20 |am, exce|pt sell |
|000003c0| 69 74 2e 0a 49 66 20 79 | 6f 75 20 66 69 6e 64 20 |it..If y|ou find |
|000003d0| 62 75 67 73 20 6f 72 20 | 61 64 64 20 6e 65 61 74 |bugs or |add neat|
|000003e0| 20 66 65 61 74 75 72 65 | 73 20 74 68 61 74 20 61 | feature|s that a|
|000003f0| 72 65 20 6e 6f 74 20 73 | 70 65 63 69 66 69 63 20 |re not s|pecific |
|00000400| 74 6f 0a 61 6e 79 20 70 | 61 72 74 69 63 75 6c 61 |to.any p|articula|
|00000410| 72 20 6c 61 73 65 72 20 | 70 72 69 6e 74 65 72 20 |r laser |printer |
|00000420| 73 65 6e 64 20 6d 65 20 | 6d 61 69 6c 2e 0a 0a 44 |send me |mail...D|
|00000430| 61 6e 20 4a 75 64 64 0a | 53 74 2e 20 4f 6c 61 66 |an Judd.|St. Olaf|
|00000440| 20 43 6f 6c 6c 65 67 65 | 0a 31 32 2f 31 38 2f 31 | College|.12/18/1|
|00000450| 39 38 39 0a 64 61 6e 6a | 75 64 64 40 74 68 6f 72 |989.danj|udd@thor|
|00000460| 2e 61 63 63 2e 73 74 6f | 6c 61 66 2e 65 64 75 0a |.acc.sto|laf.edu.|
|00000470| 53 48 41 52 5f 45 4f 46 | 0a 66 69 20 23 20 65 6e |SHAR_EOF|.fi # en|
|00000480| 64 20 6f 66 20 6f 76 65 | 72 77 72 69 74 69 6e 67 |d of ove|rwriting|
|00000490| 20 63 68 65 63 6b 0a 69 | 66 20 74 65 73 74 20 2d | check.i|f test -|
|000004a0| 66 20 27 4d 61 6b 65 66 | 69 6c 65 27 0a 74 68 65 |f 'Makef|ile'.the|
|000004b0| 6e 0a 09 65 63 68 6f 20 | 73 68 61 72 3a 20 77 69 |n..echo |shar: wi|
|000004c0| 6c 6c 20 6e 6f 74 20 6f | 76 65 72 2d 77 72 69 74 |ll not o|ver-writ|
|000004d0| 65 20 65 78 69 73 74 69 | 6e 67 20 66 69 6c 65 20 |e existi|ng file |
|000004e0| 22 27 4d 61 6b 65 66 69 | 6c 65 27 22 0a 65 6c 73 |"'Makefi|le'".els|
|000004f0| 65 0a 63 61 74 20 3c 3c | 20 5c 53 48 41 52 5f 45 |e.cat <<| \SHAR_E|
|00000500| 4f 46 20 3e 20 27 4d 61 | 6b 65 66 69 6c 65 27 0a |OF > 'Ma|kefile'.|
|00000510| 43 43 3d 20 2f 62 69 6e | 2f 63 63 0a 44 45 53 54 |CC= /bin|/cc.DEST|
|00000520| 3d 20 2f 75 73 72 2f 6c | 6f 63 61 6c 2f 73 74 6f |= /usr/l|ocal/sto|
|00000530| 2f 70 73 74 65 78 74 0a | 50 53 54 45 58 54 5f 53 |/pstext.|PSTEXT_S|
|00000540| 52 43 3d 09 70 73 74 65 | 78 74 2e 63 0a 50 53 54 |RC=.pste|xt.c.PST|
|00000550| 45 58 54 5f 4f 42 4a 3d | 09 70 73 74 65 78 74 2e |EXT_OBJ=|.pstext.|
|00000560| 6f 0a 0a 61 6c 6c 3a 09 | 24 28 50 53 54 45 58 54 |o..all:.|$(PSTEXT|
|00000570| 5f 4f 42 4a 29 0a 09 24 | 28 43 43 29 20 2d 6f 20 |_OBJ)..$|(CC) -o |
|00000580| 70 73 74 65 78 74 20 24 | 28 50 53 54 45 58 54 5f |pstext $|(PSTEXT_|
|00000590| 4f 42 4a 29 0a 0a 70 73 | 74 65 78 74 3a 09 24 28 |OBJ)..ps|text:.$(|
|000005a0| 50 53 54 45 58 54 5f 4f | 42 4a 29 0a 09 24 28 43 |PSTEXT_O|BJ)..$(C|
|000005b0| 43 29 20 2d 6f 20 70 73 | 74 65 78 74 20 24 28 50 |C) -o ps|text $(P|
|000005c0| 53 54 45 58 54 5f 4f 42 | 4a 29 0a 0a 69 6e 73 74 |STEXT_OB|J)..inst|
|000005d0| 61 6c 6c 3a 20 0a 09 69 | 6e 73 74 61 6c 6c 20 2d |all: ..i|nstall -|
|000005e0| 63 20 2d 6d 37 35 35 20 | 2d 6f 20 62 69 6e 20 2d |c -m755 |-o bin -|
|000005f0| 67 20 62 69 6e 20 70 73 | 74 65 78 74 20 24 28 44 |g bin ps|text $(D|
|00000600| 45 53 54 29 0a 63 6c 65 | 61 6e 3a 09 0a 09 72 6d |EST).cle|an:...rm|
|00000610| 20 2d 66 20 24 28 50 53 | 54 45 58 54 5f 4f 42 4a | -f $(PS|TEXT_OBJ|
|00000620| 29 20 70 73 74 65 78 74 | 20 61 2e 6f 75 74 20 63 |) pstext| a.out c|
|00000630| 6f 72 65 0a 53 48 41 52 | 5f 45 4f 46 0a 66 69 20 |ore.SHAR|_EOF.fi |
|00000640| 23 20 65 6e 64 20 6f 66 | 20 6f 76 65 72 77 72 69 |# end of| overwri|
|00000650| 74 69 6e 67 20 63 68 65 | 63 6b 0a 69 66 20 74 65 |ting che|ck.if te|
|00000660| 73 74 20 2d 66 20 27 70 | 73 74 65 78 74 2e 31 27 |st -f 'p|stext.1'|
|00000670| 0a 74 68 65 6e 0a 09 65 | 63 68 6f 20 73 68 61 72 |.then..e|cho shar|
|00000680| 3a 20 77 69 6c 6c 20 6e | 6f 74 20 6f 76 65 72 2d |: will n|ot over-|
|00000690| 77 72 69 74 65 20 65 78 | 69 73 74 69 6e 67 20 66 |write ex|isting f|
|000006a0| 69 6c 65 20 22 27 70 73 | 74 65 78 74 2e 31 27 22 |ile "'ps|text.1'"|
|000006b0| 0a 65 6c 73 65 0a 63 61 | 74 20 3c 3c 20 5c 53 48 |.else.ca|t << \SH|
|000006c0| 41 52 5f 45 4f 46 20 3e | 20 27 70 73 74 65 78 74 |AR_EOF >| 'pstext|
|000006d0| 2e 31 27 0a 2e 54 48 20 | 50 53 54 45 58 54 20 31 |.1'..TH |PSTEXT 1|
|000006e0| 20 22 44 65 63 65 6d 62 | 65 72 20 31 32 2c 20 31 | "Decemb|er 12, 1|
|000006f0| 39 38 39 22 0a 2e 55 43 | 20 34 0a 2e 53 48 20 4e |989"..UC| 4..SH N|
|00000700| 41 4d 45 0a 70 73 74 65 | 78 74 20 5c 2d 20 63 6f |AME.pste|xt \- co|
|00000710| 6e 76 65 72 74 20 70 6c | 61 69 6e 20 74 65 78 74 |nvert pl|ain text|
|00000720| 20 74 6f 20 50 6f 73 74 | 53 63 72 69 70 74 0a 2e | to Post|Script..|
|00000730| 53 48 20 53 59 4e 4f 50 | 53 49 53 0a 2e 42 20 70 |SH SYNOP|SIS..B p|
|00000740| 73 74 65 78 74 0a 5b 0a | 2e 42 20 5c 2d 6c 0a 5d |stext.[.|.B \-l.]|
|00000750| 20 5b 0a 2e 42 20 5c 2d | 6c 64 0a 5d 20 5b 0a 2e | [..B \-|ld.] [..|
|00000760| 42 20 5c 2d 70 0a 5d 20 | 5b 0a 2e 42 20 5c 2d 64 |B \-p.] |[..B \-d|
|00000770| 0a 5d 20 5b 0a 2e 42 20 | 5c 2d 73 20 70 6f 69 6e |.] [..B |\-s poin|
|00000780| 74 73 69 7a 65 0a 5d 20 | 5b 0a 2e 42 20 5c 2d 66 |tsize.] |[..B \-f|
|00000790| 20 66 6f 6e 74 6e 61 6d | 65 0a 5d 20 5b 0a 2e 42 | fontnam|e.] [..B|
|000007a0| 20 5c 2d 6e 20 6e 75 6d | 62 65 72 6f 66 6c 69 6e | \-n num|beroflin|
|000007b0| 65 73 0a 5d 20 5b 0a 2e | 42 20 5c 2d 74 20 74 61 |es.] [..|B \-t ta|
|000007c0| 62 73 74 72 69 6e 67 0a | 5d 20 5b 0a 2e 42 20 5c |bstring.|] [..B \|
|000007d0| 2d 0a 5d 20 5b 20 66 69 | 6c 65 20 2e 2e 2e 20 5d |-.] [ fi|le ... ]|
|000007e0| 0a 2e 62 72 0a 2e 53 48 | 20 44 45 53 43 52 49 50 |..br..SH| DESCRIP|
|000007f0| 54 49 4f 4e 0a 2e 49 20 | 50 73 74 65 78 74 0a 72 |TION..I |Pstext.r|
|00000800| 65 61 64 73 20 65 61 63 | 68 0a 2e 49 20 66 69 6c |eads eac|h..I fil|
|00000810| 65 0a 69 6e 20 73 65 71 | 75 65 6e 63 65 20 63 6f |e.in seq|uence co|
|00000820| 6e 76 65 72 74 73 20 69 | 74 20 66 72 6f 6d 20 70 |nverts i|t from p|
|00000830| 6c 61 69 6e 20 74 65 78 | 74 20 74 6f 20 50 6f 73 |lain tex|t to Pos|
|00000840| 74 53 63 72 69 70 74 20 | 61 6e 64 20 77 72 69 74 |tScript |and writ|
|00000850| 65 73 20 69 74 20 74 6f | 20 0a 74 68 65 20 73 74 |es it to| .the st|
|00000860| 61 6e 64 61 72 64 20 6f | 75 74 70 75 74 2c 20 69 |andard o|utput, i|
|00000870| 66 20 6e 6f 20 66 69 6c | 65 73 20 61 72 65 20 73 |f no fil|es are s|
|00000880| 70 65 63 69 66 69 65 64 | 20 69 74 20 72 65 61 64 |pecified| it read|
|00000890| 73 20 66 72 6f 6d 20 74 | 68 65 20 73 74 61 6e 64 |s from t|he stand|
|000008a0| 61 72 64 20 0a 69 6e 70 | 75 74 2e 20 42 61 63 6b |ard .inp|ut. Back|
|000008b0| 73 70 61 63 65 73 20 6d | 6f 76 65 20 74 68 65 20 |spaces m|ove the |
|000008c0| 63 75 72 72 65 6e 74 20 | 70 6f 69 6e 74 20 62 61 |current |point ba|
|000008d0| 63 6b 20 74 68 65 20 77 | 69 64 74 68 0a 6f 66 20 |ck the w|idth.of |
|000008e0| 74 68 65 20 75 6e 64 65 | 72 73 63 6f 72 65 20 28 |the unde|rscore (|
|000008f0| 5f 29 20 69 6e 20 74 68 | 65 20 63 75 72 72 65 6e |_) in th|e curren|
|00000900| 74 20 66 6f 6e 74 20 61 | 6e 64 20 70 6f 69 6e 74 |t font a|nd point|
|00000910| 73 69 7a 65 2e 20 46 6f | 72 6d 20 66 65 65 64 73 |size. Fo|rm feeds|
|00000920| 20 63 61 75 73 65 0a 74 | 65 78 74 20 74 6f 20 62 | cause.t|ext to b|
|00000930| 65 67 69 6e 20 70 72 69 | 6e 74 69 6e 67 20 6f 6e |egin pri|nting on|
|00000940| 20 61 20 6e 65 77 20 70 | 61 67 65 2c 20 69 6e 20 | a new p|age, in |
|00000950| 74 68 65 20 63 61 73 65 | 20 6f 66 20 64 75 61 6c |the case| of dual|
|00000960| 20 70 61 67 65 20 6d 6f | 64 65 20 74 68 65 0a 6e | page mo|de the.n|
|00000970| 65 78 74 20 70 61 67 65 | 20 6d 61 79 20 61 63 74 |ext page| may act|
|00000980| 75 61 6c 6c 79 20 62 65 | 20 6f 6e 20 74 68 65 20 |ually be| on the |
|00000990| 73 61 6d 65 20 70 69 65 | 63 65 20 6f 66 20 70 61 |same pie|ce of pa|
|000009a0| 70 65 72 2e 20 53 65 70 | 61 72 61 74 65 20 66 69 |per. Sep|arate fi|
|000009b0| 6c 65 73 20 61 6c 77 61 | 79 73 0a 62 65 67 69 6e |les alwa|ys.begin|
|000009c0| 20 6f 6e 20 61 20 6e 65 | 77 20 70 61 67 65 2e 20 | on a ne|w page. |
|000009d0| 54 61 62 73 20 61 72 65 | 20 73 65 74 20 65 76 65 |Tabs are| set eve|
|000009e0| 72 79 20 77 69 64 74 68 | 20 6f 66 20 74 68 65 20 |ry width| of the |
|000009f0| 63 75 72 72 65 6e 74 20 | 74 61 62 73 74 72 69 6e |current |tabstrin|
|00000a00| 67 0a 28 73 65 65 20 2d | 74 20 6f 70 74 69 6f 6e |g.(see -|t option|
|00000a10| 20 62 65 6c 6f 77 29 2e | 0a 2e 50 50 0a 41 20 72 | below).|..PP.A r|
|00000a20| 65 61 73 6f 6e 61 62 6c | 65 20 61 6d 6f 75 6e 74 |easonabl|e amount|
|00000a30| 20 6f 66 20 63 61 72 65 | 20 68 61 73 20 62 65 65 | of care| has bee|
|00000a40| 6e 20 74 61 6b 65 6e 20 | 74 6f 20 6b 65 65 70 20 |n taken |to keep |
|00000a50| 74 68 65 20 50 6f 73 74 | 53 63 72 69 70 74 20 67 |the Post|Script g|
|00000a60| 65 6e 65 72 61 74 65 64 | 0a 61 73 20 67 65 6e 65 |enerated|.as gene|
|00000a70| 72 69 63 20 61 73 20 70 | 6f 73 73 69 62 6c 65 2e |ric as p|ossible.|
|00000a80| 0a 2e 50 50 0a 54 68 65 | 20 41 70 70 6c 65 20 4c |..PP.The| Apple L|
|00000a90| 61 73 65 72 57 72 69 74 | 65 72 2c 20 6f 6e 65 20 |aserWrit|er, one |
|00000aa0| 6f 66 20 74 68 65 20 6d | 6f 72 65 20 63 6f 6d 6d |of the m|ore comm|
|00000ab0| 6f 6e 20 50 6f 73 74 53 | 63 72 69 70 74 20 70 72 |on PostS|cript pr|
|00000ac0| 69 6e 74 65 72 73 2c 0a | 68 61 73 20 74 68 65 20 |inters,.|has the |
|00000ad0| 66 6f 6c 6c 6f 77 69 6e | 67 20 66 6f 6e 74 73 20 |followin|g fonts |
|00000ae0| 61 76 61 69 6c 61 62 6c | 65 3a 20 28 6e 6f 74 65 |availabl|e: (note|
|00000af0| 3a 20 74 68 65 20 66 6f | 6e 74 73 20 6d 75 73 74 |: the fo|nts must|
|00000b00| 20 62 65 20 73 70 65 63 | 69 66 69 65 64 0a 65 78 | be spec|ified.ex|
|00000b10| 61 63 74 6c 79 20 61 73 | 20 73 68 6f 77 6e 2e 29 |actly as| shown.)|
|00000b20| 0a 2e 50 50 0a 2e 6e 66 | 0a 2e 6e 61 0a 2e 74 61 |..PP..nf|..na..ta|
|00000b30| 20 33 69 0a 41 76 61 6e | 74 47 61 72 64 65 2d 42 | 3i.Avan|tGarde-B|
|00000b40| 6f 6f 6b 09 41 76 61 6e | 74 47 61 72 64 65 2d 42 |ook.Avan|tGarde-B|
|00000b50| 6f 6f 6b 4f 62 6c 69 71 | 75 65 0a 41 76 61 6e 74 |ookObliq|ue.Avant|
|00000b60| 47 61 72 64 65 2d 44 65 | 6d 69 09 41 76 61 6e 74 |Garde-De|mi.Avant|
|00000b70| 47 61 72 64 65 2d 44 65 | 6d 69 4f 62 6c 69 71 75 |Garde-De|miObliqu|
|00000b80| 65 0a 42 6f 6f 6b 6d 61 | 6e 2d 44 65 6d 69 09 42 |e.Bookma|n-Demi.B|
|00000b90| 6f 6f 6b 6d 61 6e 2d 44 | 65 6d 69 49 74 61 6c 69 |ookman-D|emiItali|
|00000ba0| 63 0a 42 6f 6f 6b 6d 61 | 6e 2d 4c 69 67 68 74 09 |c.Bookma|n-Light.|
|00000bb0| 42 6f 6f 6b 6d 61 6e 2d | 4c 69 67 68 74 49 74 61 |Bookman-|LightIta|
|00000bc0| 6c 69 63 0a 43 6f 75 72 | 69 65 72 09 43 6f 75 72 |lic.Cour|ier.Cour|
|00000bd0| 69 65 72 2d 42 6f 6c 64 | 0a 43 6f 75 72 69 65 72 |ier-Bold|.Courier|
|00000be0| 2d 42 6f 6c 64 4f 62 6c | 69 71 75 65 09 43 6f 75 |-BoldObl|ique.Cou|
|00000bf0| 72 69 65 72 2d 4f 62 6c | 69 71 75 65 0a 48 65 6c |rier-Obl|ique.Hel|
|00000c00| 76 65 74 69 63 61 09 48 | 65 6c 76 65 74 69 63 61 |vetica.H|elvetica|
|00000c10| 2d 42 6f 6c 64 0a 48 65 | 6c 76 65 74 69 63 61 2d |-Bold.He|lvetica-|
|00000c20| 42 6f 6c 64 4f 62 6c 69 | 71 75 65 09 48 65 6c 76 |BoldObli|que.Helv|
|00000c30| 65 74 69 63 61 2d 4e 61 | 72 72 6f 77 0a 48 65 6c |etica-Na|rrow.Hel|
|00000c40| 76 65 74 69 63 61 2d 4e | 61 72 72 6f 77 2d 42 6f |vetica-N|arrow-Bo|
|00000c50| 6c 64 09 48 65 6c 76 65 | 74 69 63 61 2d 4e 61 72 |ld.Helve|tica-Nar|
|00000c60| 72 6f 77 2d 42 6f 6c 64 | 4f 62 6c 69 71 75 65 0a |row-Bold|Oblique.|
|00000c70| 48 65 6c 76 65 74 69 63 | 61 2d 4e 61 72 72 6f 77 |Helvetic|a-Narrow|
|00000c80| 2d 4f 62 6c 69 71 75 65 | 09 48 65 6c 76 65 74 69 |-Oblique|.Helveti|
|00000c90| 63 61 2d 4f 62 6c 69 71 | 75 65 0a 4e 65 77 43 65 |ca-Obliq|ue.NewCe|
|00000ca0| 6e 74 75 72 79 53 63 68 | 6c 62 6b 2d 42 6f 6c 64 |nturySch|lbk-Bold|
|00000cb0| 09 4e 65 77 43 65 6e 74 | 75 72 79 53 63 68 6c 62 |.NewCent|urySchlb|
|00000cc0| 6b 2d 42 6f 6c 64 49 74 | 61 6c 69 63 0a 4e 65 77 |k-BoldIt|alic.New|
|00000cd0| 43 65 6e 74 75 72 79 53 | 63 68 6c 62 6b 2d 49 74 |CenturyS|chlbk-It|
|00000ce0| 61 6c 69 63 09 4e 65 77 | 43 65 6e 74 75 72 79 53 |alic.New|CenturyS|
|00000cf0| 63 68 6c 62 6b 2d 52 6f | 6d 61 6e 0a 50 61 6c 61 |chlbk-Ro|man.Pala|
|00000d00| 74 69 6e 6f 2d 42 6f 6c | 64 09 50 61 6c 61 74 69 |tino-Bol|d.Palati|
|00000d10| 6e 6f 2d 42 6f 6c 64 49 | 74 61 6c 69 63 0a 50 61 |no-BoldI|talic.Pa|
|00000d20| 6c 61 74 69 6e 6f 2d 49 | 74 61 6c 69 63 09 50 61 |latino-I|talic.Pa|
|00000d30| 6c 61 74 69 6e 6f 2d 52 | 6f 6d 61 6e 0a 53 79 6d |latino-R|oman.Sym|
|00000d40| 62 6f 6c 09 54 69 6d 65 | 73 2d 42 6f 6c 64 0a 54 |bol.Time|s-Bold.T|
|00000d50| 69 6d 65 73 2d 42 6f 6c | 64 49 74 61 6c 69 63 09 |imes-Bol|dItalic.|
|00000d60| 54 69 6d 65 73 2d 49 74 | 61 6c 69 63 0a 54 69 6d |Times-It|alic.Tim|
|00000d70| 65 73 2d 52 6f 6d 61 6e | 09 5a 61 70 66 43 68 61 |es-Roman|.ZapfCha|
|00000d80| 6e 63 65 72 79 2d 4d 65 | 64 69 75 6d 49 74 61 6c |ncery-Me|diumItal|
|00000d90| 69 63 0a 5a 61 70 66 44 | 69 6e 67 62 61 74 73 0a |ic.ZapfD|ingbats.|
|00000da0| 2e 66 69 0a 2e 61 64 0a | 2e 50 50 0a 54 68 65 20 |.fi..ad.|.PP.The |
|00000db0| 6f 70 74 69 6f 6e 73 20 | 61 72 65 3a 0a 2e 54 50 |options |are:..TP|
|00000dc0| 0a 2e 42 20 5c 2d 6c 0a | 54 65 78 74 20 77 69 6c |..B \-l.|Text wil|
|00000dd0| 6c 20 62 65 20 64 69 73 | 70 6c 61 79 65 64 20 69 |l be dis|played i|
|00000de0| 6e 20 6c 61 6e 64 73 63 | 61 70 65 20 6d 6f 64 65 |n landsc|ape mode|
|00000df0| 2e 0a 2e 54 50 0a 2e 42 | 20 5c 2d 6c 64 0a 54 65 |...TP..B| \-ld.Te|
|00000e00| 78 74 20 77 69 6c 6c 20 | 62 65 20 64 69 73 70 6c |xt will |be displ|
|00000e10| 61 79 65 64 20 69 6e 20 | 6c 61 6e 64 73 63 61 70 |ayed in |landscap|
|00000e20| 65 20 61 6e 64 20 64 75 | 61 6c 20 70 61 67 65 20 |e and du|al page |
|00000e30| 6d 6f 64 65 2e 0a 2e 54 | 50 0a 2e 42 20 5c 2d 64 |mode...T|P..B \-d|
|00000e40| 0a 54 65 78 74 20 77 69 | 6c 6c 20 62 65 20 64 69 |.Text wi|ll be di|
|00000e50| 73 70 6c 61 79 65 64 20 | 69 6e 20 70 6f 72 74 72 |splayed |in portr|
|00000e60| 61 69 74 20 61 6e 64 20 | 64 75 61 6c 20 70 61 67 |ait and |dual pag|
|00000e70| 65 20 6d 6f 64 65 2e 0a | 2e 54 50 0a 2e 42 20 5c |e mode..|.TP..B \|
|00000e80| 2d 70 0a 54 65 78 74 20 | 77 69 6c 6c 20 62 65 20 |-p.Text |will be |
|00000e90| 64 69 73 70 6c 61 79 65 | 64 20 69 6e 20 70 6f 72 |displaye|d in por|
|00000ea0| 74 72 61 69 74 20 6d 6f | 64 65 20 28 64 65 66 61 |trait mo|de (defa|
|00000eb0| 75 6c 74 29 2e 0a 2e 54 | 50 0a 2e 42 20 5c 2d 73 |ult)...T|P..B \-s|
|00000ec0| 20 0a 2e 49 20 70 6f 69 | 6e 74 73 69 7a 65 0a 54 | ..I poi|ntsize.T|
|00000ed0| 65 78 74 20 77 69 6c 6c | 20 62 65 20 64 69 73 70 |ext will| be disp|
|00000ee0| 6c 61 79 65 64 20 69 6e | 20 74 68 65 20 67 69 76 |layed in| the giv|
|00000ef0| 65 6e 20 70 6f 69 6e 74 | 73 69 7a 65 20 28 31 32 |en point|size (12|
|00000f00| 20 64 65 66 61 75 6c 74 | 29 2e 20 46 72 61 63 74 | default|). Fract|
|00000f10| 69 6f 6e 61 6c 0a 70 6f | 69 6e 74 73 69 7a 65 73 |ional.po|intsizes|
|00000f20| 20 61 72 65 20 61 63 63 | 65 70 74 61 62 6c 65 2e | are acc|eptable.|
|00000f30| 0a 2e 54 50 0a 2e 42 20 | 5c 2d 66 0a 2e 49 20 66 |..TP..B |\-f..I f|
|00000f40| 6f 6e 74 6e 61 6d 65 0a | 54 65 78 74 20 77 69 6c |ontname.|Text wil|
|00000f50| 6c 20 62 65 20 64 69 73 | 70 6c 61 79 65 64 20 69 |l be dis|played i|
|00000f60| 6e 20 74 68 65 20 67 69 | 76 65 20 66 6f 6e 74 20 |n the gi|ve font |
|00000f70| 69 66 20 61 76 61 69 6c | 61 62 6c 65 20 28 43 6f |if avail|able (Co|
|00000f80| 75 72 69 65 72 20 64 65 | 66 61 75 6c 74 29 2e 0a |urier de|fault)..|
|00000f90| 41 6e 79 20 66 6f 6e 74 | 20 6d 61 79 20 62 65 20 |Any font| may be |
|00000fa0| 73 70 65 63 69 66 69 65 | 64 2c 20 69 66 20 74 68 |specifie|d, if th|
|00000fb0| 65 20 70 72 69 6e 74 65 | 72 20 28 6f 72 20 77 68 |e printe|r (or wh|
|00000fc0| 61 74 65 76 65 72 20 69 | 73 20 64 69 73 70 6c 61 |atever i|s displa|
|00000fd0| 79 69 6e 67 20 74 68 65 | 0a 50 6f 73 74 53 63 72 |ying the|.PostScr|
|00000fe0| 69 70 74 29 20 63 61 6e | 20 6e 6f 74 20 66 69 6e |ipt) can| not fin|
|00000ff0| 64 20 74 68 65 20 66 6f | 6e 74 20 43 6f 75 72 69 |d the fo|nt Couri|
|00001000| 65 72 20 77 69 6c 6c 20 | 62 65 20 75 73 65 64 20 |er will |be used |
|00001010| 61 6e 79 77 61 79 2e 20 | 46 6f 6e 74 73 0a 63 6f |anyway. |Fonts.co|
|00001020| 6d 6d 6f 6e 6c 79 20 61 | 76 61 69 6c 61 62 6c 65 |mmonly a|vailable|
|00001030| 20 61 72 65 20 43 6f 75 | 72 69 65 72 2d 42 6f 6c | are Cou|rier-Bol|
|00001040| 64 2c 20 48 65 6c 76 65 | 74 69 63 61 2c 20 48 65 |d, Helve|tica, He|
|00001050| 6c 76 65 74 69 63 61 2d | 42 6f 6c 64 2c 20 54 69 |lvetica-|Bold, Ti|
|00001060| 6d 65 73 2d 52 6f 6d 61 | 6e 0a 54 69 6d 65 73 2d |mes-Roma|n.Times-|
|00001070| 42 6f 6c 64 2c 20 54 69 | 6d 65 73 2d 49 74 61 6c |Bold, Ti|mes-Ital|
|00001080| 69 63 20 61 6e 64 20 53 | 79 6d 62 6f 6c 2e 20 54 |ic and S|ymbol. T|
|00001090| 68 65 72 65 20 61 72 65 | 20 6f 62 76 69 6f 75 73 |here are| obvious|
|000010a0| 6c 79 20 6d 6f 72 65 20 | 64 65 70 65 6e 64 69 6e |ly more |dependin|
|000010b0| 67 0a 6f 6e 20 79 6f 75 | 72 20 6f 75 74 70 75 74 |g.on you|r output|
|000010c0| 20 64 65 76 69 63 65 2e | 0a 2e 54 50 0a 2e 42 20 | device.|..TP..B |
|000010d0| 5c 2d 6e 0a 2e 49 20 6e | 75 6d 62 65 72 6f 66 6c |\-n..I n|umberofl|
|000010e0| 69 6e 65 73 0a 54 65 78 | 74 20 77 69 6c 6c 20 62 |ines.Tex|t will b|
|000010f0| 65 20 64 69 73 70 6c 61 | 79 65 64 20 77 69 74 68 |e displa|yed with|
|00001100| 20 6e 75 6d 62 65 72 6f | 66 6c 69 6e 65 73 20 70 | numbero|flines p|
|00001110| 65 72 20 70 61 67 65 2e | 20 54 68 69 73 20 74 61 |er page.| This ta|
|00001120| 6b 65 73 20 70 72 65 63 | 65 64 65 6e 63 65 0a 6f |kes prec|edence.o|
|00001130| 76 65 72 20 2d 73 20 66 | 6c 61 67 2e 0a 2e 54 50 |ver -s f|lag...TP|
|00001140| 0a 2e 42 20 5c 2d 74 0a | 2e 49 20 74 61 62 73 74 |..B \-t.|.I tabst|
|00001150| 72 69 6e 67 0a 54 61 62 | 73 20 77 69 6c 6c 20 62 |ring.Tab|s will b|
|00001160| 65 20 74 68 65 20 77 69 | 64 74 68 20 6f 66 20 74 |e the wi|dth of t|
|00001170| 61 62 73 74 72 69 6e 67 | 20 69 6e 20 74 68 65 20 |abstring| in the |
|00001180| 63 75 72 72 65 6e 74 20 | 70 6f 69 6e 74 73 69 7a |current |pointsiz|
|00001190| 65 20 61 6e 64 20 66 6f | 6e 74 2e 0a 54 68 65 20 |e and fo|nt..The |
|000011a0| 64 65 66 61 75 6c 74 20 | 74 61 62 73 74 72 69 6e |default |tabstrin|
|000011b0| 67 20 69 73 20 4e 4e 4e | 4e 4e 4e 4e 4e 2c 20 6d |g is NNN|NNNNN, m|
|000011c0| 65 61 6e 69 6e 67 20 74 | 68 61 74 20 74 61 62 73 |eaning t|hat tabs|
|000011d0| 74 6f 70 73 20 61 72 65 | 20 70 6c 61 63 65 64 20 |tops are| placed |
|000011e0| 65 76 65 72 79 0a 77 69 | 64 74 68 20 6f 66 20 38 |every.wi|dth of 8|
|000011f0| 20 4e 27 73 2e 20 54 61 | 62 73 20 77 69 6c 6c 20 | N's. Ta|bs will |
|00001200| 67 6f 20 74 6f 20 74 68 | 65 20 6e 65 61 72 65 73 |go to th|e neares|
|00001210| 74 20 66 6f 72 77 61 72 | 64 20 74 61 62 20 73 74 |t forwar|d tab st|
|00001220| 6f 70 2e 0a 2e 50 50 0a | 2e 53 48 20 22 53 45 45 |op...PP.|.SH "SEE|
|00001230| 20 41 4c 53 4f 22 0a 50 | 6f 73 74 53 63 72 69 70 | ALSO".P|ostScrip|
|00001240| 74 20 4c 61 6e 67 75 61 | 67 65 20 52 65 66 65 72 |t Langua|ge Refer|
|00001250| 65 6e 63 65 20 4d 61 6e | 75 61 6c 20 62 79 20 41 |ence Man|ual by A|
|00001260| 64 6f 62 65 20 53 79 73 | 74 65 6d 73 20 49 6e 63 |dobe Sys|tems Inc|
|00001270| 2e 0a 2e 53 48 20 42 55 | 47 53 0a 49 6e 20 73 6f |...SH BU|GS.In so|
|00001280| 6d 65 20 73 79 73 74 65 | 6d 73 20 28 4e 65 78 74 |me syste|ms (Next|
|00001290| 20 66 6f 72 20 65 78 61 | 6d 70 6c 65 29 20 66 69 | for exa|mple) fi|
|000012a0| 6e 64 66 6f 6e 74 20 77 | 69 6c 6c 20 6c 6f 6f 6b |ndfont w|ill look|
|000012b0| 20 66 6f 72 20 66 6f 6e | 74 73 20 69 6e 20 6d 6f | for fon|ts in mo|
|000012c0| 72 65 20 70 6c 61 63 65 | 73 20 0a 74 68 61 6e 20 |re place|s .than |
|000012d0| 6a 75 73 74 20 74 68 6f | 73 65 20 74 68 61 74 20 |just tho|se that |
|000012e0| 46 6f 6e 74 44 69 72 65 | 63 74 6f 72 79 20 67 69 |FontDire|ctory gi|
|000012f0| 76 65 73 2e 20 49 6e 20 | 74 68 65 73 65 20 63 61 |ves. In |these ca|
|00001300| 73 65 73 20 70 73 74 65 | 78 74 20 6f 75 74 70 75 |ses pste|xt outpu|
|00001310| 74 20 0a 6d 61 79 20 6e | 6f 74 20 70 72 69 6e 74 |t .may n|ot print|
|00001320| 20 69 6e 20 74 68 65 20 | 64 65 73 69 72 65 64 20 | in the |desired |
|00001330| 66 6f 6e 74 20 61 6e 64 | 20 77 69 6c 6c 20 70 72 |font and| will pr|
|00001340| 69 6e 74 20 69 6e 20 43 | 6f 75 72 69 65 72 20 69 |int in C|ourier i|
|00001350| 6e 73 74 65 61 64 2e 20 | 54 68 65 72 65 0a 61 72 |nstead. |There.ar|
|00001360| 65 20 61 20 63 6f 75 70 | 6c 65 20 6f 66 20 6f 70 |e a coup|le of op|
|00001370| 74 69 6f 6e 73 20 69 6e | 20 64 65 61 6c 69 6e 67 |tions in| dealing|
|00001380| 20 77 69 74 68 20 74 68 | 69 73 2e 20 4d 6f 64 69 | with th|is. Modi|
|00001390| 66 79 20 74 68 65 20 43 | 20 63 6f 64 65 20 73 6f |fy the C| code so|
|000013a0| 20 74 68 65 20 0a 6c 69 | 6e 65 20 63 6f 6e 74 61 | the .li|ne conta|
|000013b0| 69 6e 69 6e 67 20 74 68 | 65 20 46 6f 6e 74 44 69 |ining th|e FontDi|
|000013c0| 72 65 63 74 6f 72 79 20 | 69 73 20 6e 6f 74 20 73 |rectory |is not s|
|000013d0| 65 6e 74 2c 20 6f 72 20 | 73 6f 6d 65 20 6f 74 68 |ent, or |some oth|
|000013e0| 65 72 20 63 6f 6d 6d 61 | 6e 64 20 69 73 0a 75 73 |er comma|nd is.us|
|000013f0| 65 64 20 28 53 68 61 72 | 65 64 46 6f 6e 74 44 69 |ed (Shar|edFontDi|
|00001400| 72 65 63 74 6f 72 79 20 | 69 6e 20 74 68 65 20 63 |rectory |in the c|
|00001410| 61 73 65 20 6f 66 20 61 | 20 4e 65 78 74 29 2e 20 |ase of a| Next). |
|00001420| 4f 72 20 79 6f 75 20 63 | 61 6e 20 63 6f 6d 6d 65 |Or you c|an comme|
|00001430| 6e 74 20 6f 75 74 0a 74 | 68 65 20 6c 69 6e 65 20 |nt out.t|he line |
|00001440| 69 6e 20 74 68 65 20 50 | 6f 73 74 53 63 72 69 70 |in the P|ostScrip|
|00001450| 74 20 6f 75 74 70 75 74 | 20 62 65 66 6f 72 65 20 |t output| before |
|00001460| 79 6f 75 20 73 65 6e 64 | 20 69 74 20 74 6f 20 74 |you send| it to t|
|00001470| 68 65 20 70 72 69 6e 74 | 65 72 2e 20 42 65 0a 77 |he print|er. Be.w|
|00001480| 61 72 6e 65 64 20 74 68 | 61 74 20 6f 6d 69 74 74 |arned th|at omitt|
|00001490| 69 6e 67 20 74 68 65 20 | 6c 69 6e 65 20 61 6c 6c |ing the |line all|
|000014a0| 20 74 6f 67 65 74 68 65 | 72 20 77 69 6c 6c 20 6d | togethe|r will m|
|000014b0| 65 61 6e 20 74 68 61 74 | 20 69 66 20 79 6f 75 20 |ean that| if you |
|000014c0| 73 70 65 63 69 66 79 0a | 61 20 66 6f 6e 74 20 74 |specify.|a font t|
|000014d0| 68 61 74 20 63 61 6e 27 | 74 20 62 65 20 66 6f 75 |hat can'|t be fou|
|000014e0| 6e 64 20 74 68 65 20 6a | 6f 62 20 77 69 6c 6c 20 |nd the j|ob will |
|000014f0| 6e 6f 74 20 70 72 69 6e | 74 2e 0a 0a 54 68 65 20 |not prin|t...The |
|00001500| 6d 61 72 67 69 6e 73 20 | 68 61 76 65 20 62 65 65 |margins |have bee|
|00001510| 6e 20 73 65 74 20 74 6f | 20 77 6f 72 6b 20 66 6f |n set to| work fo|
|00001520| 72 20 61 6e 20 41 70 70 | 6c 65 20 4c 61 73 65 72 |r an App|le Laser|
|00001530| 57 72 69 74 65 72 20 4e | 54 58 20 74 68 65 73 65 |Writer N|TX these|
|00001540| 20 6d 61 79 0a 6e 65 65 | 64 20 74 6f 20 62 65 20 | may.nee|d to be |
|00001550| 72 65 73 65 74 20 66 6f | 72 20 64 65 76 69 63 65 |reset fo|r device|
|00001560| 73 20 77 68 6f 73 65 20 | 6d 61 72 67 69 6e 73 20 |s whose |margins |
|00001570| 64 69 66 66 65 72 2e 0a | 2e 53 48 20 41 55 54 48 |differ..|.SH AUTH|
|00001580| 4f 52 0a 44 61 6e 20 4a | 75 64 64 2c 20 53 74 2e |OR.Dan J|udd, St.|
|00001590| 20 4f 6c 61 66 20 43 6f | 6c 6c 65 67 65 2e 0a 0a | Olaf Co|llege...|
|000015a0| 54 68 69 73 20 70 72 6f | 67 72 61 6d 20 69 73 20 |This pro|gram is |
|000015b0| 66 72 65 65 6c 79 20 72 | 65 64 69 73 74 72 69 62 |freely r|edistrib|
|000015c0| 75 74 61 62 6c 65 2c 20 | 61 6e 64 20 69 73 20 6e |utable, |and is n|
|000015d0| 6f 74 20 74 6f 20 62 65 | 20 73 6f 6c 64 2e 0a 53 |ot to be| sold..S|
|000015e0| 48 41 52 5f 45 4f 46 0a | 66 69 20 23 20 65 6e 64 |HAR_EOF.|fi # end|
|000015f0| 20 6f 66 20 6f 76 65 72 | 77 72 69 74 69 6e 67 20 | of over|writing |
|00001600| 63 68 65 63 6b 0a 69 66 | 20 74 65 73 74 20 2d 66 |check.if| test -f|
|00001610| 20 27 70 73 74 65 78 74 | 2e 63 27 0a 74 68 65 6e | 'pstext|.c'.then|
|00001620| 0a 09 65 63 68 6f 20 73 | 68 61 72 3a 20 77 69 6c |..echo s|har: wil|
|00001630| 6c 20 6e 6f 74 20 6f 76 | 65 72 2d 77 72 69 74 65 |l not ov|er-write|
|00001640| 20 65 78 69 73 74 69 6e | 67 20 66 69 6c 65 20 22 | existin|g file "|
|00001650| 27 70 73 74 65 78 74 2e | 63 27 22 0a 65 6c 73 65 |'pstext.|c'".else|
|00001660| 0a 63 61 74 20 3c 3c 20 | 5c 53 48 41 52 5f 45 4f |.cat << |\SHAR_EO|
|00001670| 46 20 3e 20 27 70 73 74 | 65 78 74 2e 63 27 0a 2f |F > 'pst|ext.c'./|
|00001680| 2a 20 0a 20 20 70 73 74 | 65 78 74 0a 20 20 62 79 |* . pst|ext. by|
|00001690| 20 44 61 6e 20 4a 75 64 | 64 0a 20 20 20 20 20 53 | Dan Jud|d. S|
|000016a0| 74 2e 20 4f 6c 61 66 20 | 43 6f 6c 6c 65 67 65 0a |t. Olaf |College.|
|000016b0| 20 20 20 20 20 31 31 2f | 32 39 2f 38 39 0a 20 20 | 11/|29/89. |
|000016c0| 0a 20 20 54 68 69 73 20 | 70 72 6f 67 72 61 6d 20 |. This |program |
|000016d0| 74 61 6b 65 73 20 70 6c | 61 69 6e 20 61 73 63 69 |takes pl|ain asci|
|000016e0| 69 20 74 65 78 74 20 61 | 6e 64 20 63 6f 6e 76 65 |i text a|nd conve|
|000016f0| 72 74 73 20 69 74 20 74 | 6f 20 50 6f 73 74 73 63 |rts it t|o Postsc|
|00001700| 72 69 70 74 2e 0a 20 20 | 49 74 20 74 61 6b 65 73 |ript.. |It takes|
|00001710| 20 61 20 66 65 77 20 6f | 70 74 69 6f 6e 73 2e 0a | a few o|ptions..|
|00001720| 20 20 5b 2d 70 20 5d 20 | 70 72 69 6e 74 73 20 70 | [-p ] |prints p|
|00001730| 6f 72 74 72 61 69 74 20 | 6d 6f 64 65 20 31 20 70 |ortrait |mode 1 p|
|00001740| 61 67 65 20 28 64 65 66 | 61 75 6c 74 29 0a 20 20 |age (def|ault). |
|00001750| 5b 2d 6c 20 5d 20 70 72 | 69 6e 74 73 20 6c 61 6e |[-l ] pr|ints lan|
|00001760| 64 73 63 61 70 65 20 6d | 6f 64 65 20 31 20 70 61 |dscape m|ode 1 pa|
|00001770| 67 65 0a 20 20 5b 2d 6c | 64 20 5d 20 64 75 61 6c |ge. [-l|d ] dual|
|00001780| 20 6c 61 6e 64 73 63 61 | 70 65 20 6d 6f 64 65 20 | landsca|pe mode |
|00001790| 32 20 70 61 67 65 73 20 | 70 65 72 20 70 61 67 65 |2 pages |per page|
|000017a0| 0a 20 20 5b 2d 64 20 5d | 20 64 75 61 6c 20 70 6f |. [-d ]| dual po|
|000017b0| 72 74 72 61 69 74 20 6d | 6f 64 65 2c 20 70 72 69 |rtrait m|ode, pri|
|000017c0| 6e 74 73 20 32 20 70 61 | 67 65 73 20 70 65 72 20 |nts 2 pa|ges per |
|000017d0| 70 61 67 65 0a 20 20 5b | 2d 6e 20 6e 75 6d 62 65 |page. [|-n numbe|
|000017e0| 72 5d 20 6e 75 6d 62 65 | 72 20 6f 66 20 6c 69 6e |r] numbe|r of lin|
|000017f0| 65 73 20 70 65 72 20 70 | 61 67 65 0a 20 20 5b 2d |es per p|age. [-|
|00001800| 74 20 74 61 62 73 74 72 | 69 6e 67 20 5d 20 75 73 |t tabstr|ing ] us|
|00001810| 65 20 61 20 64 69 66 66 | 65 72 65 6e 74 20 74 61 |e a diff|erent ta|
|00001820| 62 73 74 72 69 6e 67 20 | 73 69 7a 65 20 28 4e 4e |bstring |size (NN|
|00001830| 4e 4e 4e 4e 4e 4e 20 64 | 65 66 61 75 6c 74 29 0a |NNNNNN d|efault).|
|00001840| 20 20 5b 2d 66 20 66 6f | 6e 74 6e 61 6d 65 20 5d | [-f fo|ntname ]|
|00001850| 20 75 73 65 20 61 20 64 | 69 66 66 65 72 65 6e 74 | use a d|ifferent|
|00001860| 20 66 6f 6e 74 20 28 43 | 6f 75 72 69 65 72 20 64 | font (C|ourier d|
|00001870| 65 66 61 75 6c 74 29 0a | 20 20 5b 2d 73 20 70 6f |efault).| [-s po|
|00001880| 69 6e 74 73 69 7a 65 20 | 5d 20 75 73 65 20 61 20 |intsize |] use a |
|00001890| 64 69 66 66 65 72 65 6e | 74 20 70 6f 69 6e 74 20 |differen|t point |
|000018a0| 73 69 7a 65 20 28 31 32 | 20 64 65 66 61 75 6c 74 |size (12| default|
|000018b0| 29 0a 0a 20 20 49 74 20 | 68 61 6e 64 6c 65 73 20 |).. It |handles |
|000018c0| 74 61 62 73 20 61 6e 64 | 20 62 61 63 6b 73 70 61 |tabs and| backspa|
|000018d0| 63 65 73 20 69 6e 20 61 | 6e 20 69 6e 74 65 6c 6c |ces in a|n intell|
|000018e0| 69 67 65 6e 74 20 77 61 | 79 20 69 6e 20 61 6e 79 |igent wa|y in any|
|000018f0| 20 66 6f 6e 74 2e 0a 0a | 20 20 43 6f 70 79 72 69 | font...| Copyri|
|00001900| 67 68 74 20 44 61 6e 20 | 4a 75 64 64 20 31 39 38 |ght Dan |Judd 198|
|00001910| 39 0a 20 20 54 68 69 73 | 20 70 72 6f 67 72 61 6d |9. This| program|
|00001920| 20 69 73 20 66 72 65 65 | 6c 79 20 72 65 64 69 73 | is free|ly redis|
|00001930| 74 72 69 62 75 74 61 62 | 6c 65 2c 20 62 75 74 20 |tributab|le, but |
|00001940| 6d 61 79 20 6e 6f 74 20 | 62 65 20 73 6f 6c 64 2e |may not |be sold.|
|00001950| 0a 20 20 73 65 6e 64 20 | 62 75 67 20 66 69 78 65 |. send |bug fixe|
|00001960| 73 20 74 6f 20 64 61 6e | 6a 75 64 64 40 74 68 6f |s to dan|judd@tho|
|00001970| 72 2e 61 63 63 2e 73 74 | 6f 6c 61 66 2e 65 64 75 |r.acc.st|olaf.edu|
|00001980| 0a 20 2a 2f 0a 0a 23 69 | 6e 63 6c 75 64 65 20 3c |. */..#i|nclude <|
|00001990| 73 74 64 69 6f 2e 68 3e | 0a 23 69 6e 63 6c 75 64 |stdio.h>|.#includ|
|000019a0| 65 20 3c 73 74 72 69 6e | 67 73 2e 68 3e 0a 23 69 |e <strin|gs.h>.#i|
|000019b0| 6e 63 6c 75 64 65 20 3c | 63 74 79 70 65 2e 68 3e |nclude <|ctype.h>|
|000019c0| 0a 23 64 65 66 69 6e 65 | 20 54 52 55 45 20 31 0a |.#define| TRUE 1.|
|000019d0| 23 64 65 66 69 6e 65 20 | 46 41 4c 53 45 20 30 0a |#define |FALSE 0.|
|000019e0| 23 64 65 66 69 6e 65 20 | 44 46 4c 54 5f 50 54 53 |#define |DFLT_PTS|
|000019f0| 49 5a 45 20 31 32 0a 23 | 64 65 66 69 6e 65 20 44 |IZE 12.#|define D|
|00001a00| 46 4c 54 5f 46 4f 4e 54 | 20 22 43 6f 75 72 69 65 |FLT_FONT| "Courie|
|00001a10| 72 22 0a 23 64 65 66 69 | 6e 65 20 44 46 4c 54 5f |r".#defi|ne DFLT_|
|00001a20| 54 41 42 53 54 52 49 4e | 47 20 22 4e 4e 4e 4e 4e |TABSTRIN|G "NNNNN|
|00001a30| 4e 4e 4e 22 0a 23 64 65 | 66 69 6e 65 20 44 46 4c |NNN".#de|fine DFL|
|00001a40| 54 5f 53 54 59 4c 45 20 | 31 0a 23 64 65 66 69 6e |T_STYLE |1.#defin|
|00001a50| 65 20 44 46 4c 54 5f 4c | 49 4e 45 53 20 30 0a 0a |e DFLT_L|INES 0..|
|00001a60| 6d 61 69 6e 28 61 72 67 | 63 2c 61 72 67 76 29 0a |main(arg|c,argv).|
|00001a70| 69 6e 74 20 61 72 67 63 | 3b 0a 63 68 61 72 20 2a |int argc|;.char *|
|00001a80| 61 72 67 76 5b 5d 3b 0a | 7b 0a 20 64 6f 75 62 6c |argv[];.|{. doubl|
|00001a90| 65 20 70 74 73 69 7a 65 | 3d 44 46 4c 54 5f 50 54 |e ptsize|=DFLT_PT|
|00001aa0| 53 49 5a 45 3b 0a 20 63 | 68 61 72 20 2a 66 6f 6e |SIZE;. c|har *fon|
|00001ab0| 74 3b 0a 20 63 68 61 72 | 20 2a 74 61 62 73 74 72 |t;. char| *tabstr|
|00001ac0| 69 6e 67 3b 0a 20 69 6e | 74 20 73 74 79 6c 65 3d |ing;. in|t style=|
|00001ad0| 44 46 4c 54 5f 53 54 59 | 4c 45 3b 0a 20 69 6e 74 |DFLT_STY|LE;. int|
|00001ae0| 20 6e 75 6d 6c 69 6e 65 | 73 3d 44 46 4c 54 5f 4c | numline|s=DFLT_L|
|00001af0| 49 4e 45 53 3b 0a 20 46 | 49 4c 45 20 2a 66 70 6f |INES;. F|ILE *fpo|
|00001b00| 75 74 3d 73 74 64 6f 75 | 74 3b 0a 20 46 49 4c 45 |ut=stdou|t;. FILE|
|00001b10| 20 2a 66 70 69 6e 3d 73 | 74 64 69 6e 3b 0a 20 73 | *fpin=s|tdin;. s|
|00001b20| 68 6f 72 74 20 62 61 64 | 66 6c 61 67 3d 46 41 4c |hort bad|flag=FAL|
|00001b30| 53 45 3b 0a 20 63 68 61 | 72 20 63 68 3b 0a 20 63 |SE;. cha|r ch;. c|
|00001b40| 68 61 72 20 2a 70 72 6f | 67 6e 61 6d 65 3b 0a 20 |har *pro|gname;. |
|00001b50| 64 6f 75 62 6c 65 20 61 | 74 6f 66 28 29 3b 0a 0a |double a|tof();..|
|00001b60| 20 66 6f 6e 74 3d 28 63 | 68 61 72 20 2a 29 20 6d | font=(c|har *) m|
|00001b70| 61 6c 6c 6f 63 28 73 69 | 7a 65 6f 66 28 44 46 4c |alloc(si|zeof(DFL|
|00001b80| 54 5f 46 4f 4e 54 29 29 | 3b 0a 20 73 74 72 63 70 |T_FONT))|;. strcp|
|00001b90| 79 28 66 6f 6e 74 2c 44 | 46 4c 54 5f 46 4f 4e 54 |y(font,D|FLT_FONT|
|00001ba0| 29 3b 0a 20 74 61 62 73 | 74 72 69 6e 67 3d 28 63 |);. tabs|tring=(c|
|00001bb0| 68 61 72 20 2a 29 20 6d | 61 6c 6c 6f 63 28 73 69 |har *) m|alloc(si|
|00001bc0| 7a 65 6f 66 28 44 46 4c | 54 5f 54 41 42 53 54 52 |zeof(DFL|T_TABSTR|
|00001bd0| 49 4e 47 29 29 3b 0a 20 | 73 74 72 63 70 79 28 74 |ING));. |strcpy(t|
|00001be0| 61 62 73 74 72 69 6e 67 | 2c 44 46 4c 54 5f 54 41 |abstring|,DFLT_TA|
|00001bf0| 42 53 54 52 49 4e 47 29 | 3b 0a 20 2f 2a 20 70 61 |BSTRING)|;. /* pa|
|00001c00| 72 73 65 20 61 72 67 73 | 20 2a 2f 0a 20 70 72 6f |rse args| */. pro|
|00001c10| 67 6e 61 6d 65 3d 2a 61 | 72 67 76 2b 2b 3b 0a 0a |gname=*a|rgv++;..|
|00001c20| 20 77 68 69 6c 65 20 28 | 28 2d 2d 61 72 67 63 20 | while (|(--argc |
|00001c30| 3e 20 30 29 26 26 28 2a | 61 72 67 76 5b 30 5d 3d |> 0)&&(*|argv[0]=|
|00001c40| 3d 27 2d 27 29 29 20 7b | 0a 20 20 20 73 77 69 74 |='-')) {|. swit|
|00001c50| 63 68 28 2a 2b 2b 61 72 | 67 76 5b 30 5d 29 20 7b |ch(*++ar|gv[0]) {|
|00001c60| 0a 20 20 20 20 0a 20 20 | 20 20 63 61 73 65 20 27 |. . | case '|
|00001c70| 6c 27 3a 09 69 66 28 2a | 2b 2b 61 72 67 76 5b 30 |l':.if(*|++argv[0|
|00001c80| 5d 3d 3d 27 64 27 29 20 | 7b 0a 09 09 20 20 73 74 |]=='d') |{... st|
|00001c90| 79 6c 65 3d 33 3b 0a 09 | 09 20 20 7d 0a 09 09 20 |yle=3;..|. }... |
|00001ca0| 65 6c 73 65 20 7b 0a 09 | 09 20 20 73 74 79 6c 65 |else {..|. style|
|00001cb0| 3d 34 3b 0a 09 09 20 20 | 7d 3b 0a 09 09 62 72 65 |=4;... |};...bre|
|00001cc0| 61 6b 3b 0a 20 20 20 20 | 63 61 73 65 20 27 70 27 |ak;. |case 'p'|
|00001cd0| 3a 09 73 74 79 6c 65 3d | 31 3b 0a 09 09 62 72 65 |:.style=|1;...bre|
|00001ce0| 61 6b 3b 0a 20 20 20 20 | 63 61 73 65 20 27 64 27 |ak;. |case 'd'|
|00001cf0| 3a 09 73 74 79 6c 65 3d | 32 3b 0a 09 09 62 72 65 |:.style=|2;...bre|
|00001d00| 61 6b 3b 0a 20 20 20 20 | 63 61 73 65 20 27 66 27 |ak;. |case 'f'|
|00001d10| 3a 09 69 66 20 28 2a 2b | 2b 61 72 67 76 5b 30 5d |:.if (*+|+argv[0]|
|00001d20| 20 21 3d 27 5c 30 27 29 | 7b 0a 09 09 20 20 66 6f | !='\0')|{... fo|
|00001d30| 6e 74 3d 2a 61 72 67 76 | 3b 0a 09 09 20 7d 0a 09 |nt=*argv|;... }..|
|00001d40| 09 65 6c 73 65 0a 09 09 | 20 69 66 20 28 2d 2d 61 |.else...| if (--a|
|00001d50| 72 67 63 29 20 7b 0a 09 | 09 20 20 66 6f 6e 74 3d |rgc) {..|. font=|
|00001d60| 2a 2b 2b 61 72 67 76 3b | 0a 09 09 20 20 7d 0a 09 |*++argv;|... }..|
|00001d70| 09 20 65 6c 73 65 20 7b | 0a 09 09 20 20 62 61 64 |. else {|... bad|
|00001d80| 66 6c 61 67 3d 54 52 55 | 45 3b 0a 09 09 20 20 7d |flag=TRU|E;... }|
|00001d90| 0a 09 09 62 72 65 61 6b | 3b 0a 20 20 20 20 63 61 |...break|;. ca|
|00001da0| 73 65 20 27 74 27 3a 09 | 69 66 20 28 2a 2b 2b 61 |se 't':.|if (*++a|
|00001db0| 72 67 76 5b 30 5d 20 21 | 3d 27 5c 30 27 29 7b 0a |rgv[0] !|='\0'){.|
|00001dc0| 09 09 20 20 74 61 62 73 | 74 72 69 6e 67 3d 2a 61 |.. tabs|tring=*a|
|00001dd0| 72 67 76 3b 0a 09 09 20 | 7d 0a 09 09 65 6c 73 65 |rgv;... |}...else|
|00001de0| 0a 09 09 20 69 66 20 28 | 2d 2d 61 72 67 63 29 20 |... if (|--argc) |
|00001df0| 7b 0a 09 09 20 20 74 61 | 62 73 74 72 69 6e 67 3d |{... ta|bstring=|
|00001e00| 2a 2b 2b 61 72 67 76 3b | 0a 09 09 20 20 7d 0a 09 |*++argv;|... }..|
|00001e10| 09 20 65 6c 73 65 20 7b | 0a 09 09 20 20 62 61 64 |. else {|... bad|
|00001e20| 66 6c 61 67 3d 54 52 55 | 45 3b 0a 09 09 20 20 7d |flag=TRU|E;... }|
|00001e30| 0a 09 09 62 72 65 61 6b | 3b 0a 20 20 20 20 63 61 |...break|;. ca|
|00001e40| 73 65 20 27 6e 27 3a 09 | 69 66 20 28 2a 2b 2b 61 |se 'n':.|if (*++a|
|00001e50| 72 67 76 5b 30 5d 20 21 | 3d 27 5c 30 27 29 7b 0a |rgv[0] !|='\0'){.|
|00001e60| 09 09 20 20 69 66 28 28 | 6e 75 6d 6c 69 6e 65 73 |.. if((|numlines|
|00001e70| 3d 61 74 6f 66 28 2a 61 | 72 67 76 29 29 20 3c 3d |=atof(*a|rgv)) <=|
|00001e80| 20 30 29 7b 0a 09 09 20 | 20 20 20 66 70 72 69 6e | 0){... | fprin|
|00001e90| 74 66 28 73 74 64 65 72 | 72 2c 22 73 70 65 63 69 |tf(stder|r,"speci|
|00001ea0| 66 79 20 61 20 6c 69 6e | 65 20 6e 75 6d 62 65 72 |fy a lin|e number|
|00001eb0| 20 31 20 6f 72 20 6d 6f | 72 65 5c 6e 22 29 3b 0a | 1 or mo|re\n");.|
|00001ec0| 09 09 20 20 20 20 62 61 | 64 66 6c 61 67 3d 54 52 |.. ba|dflag=TR|
|00001ed0| 55 45 3b 0a 09 09 20 20 | 20 20 7d 0a 09 09 7d 0a |UE;... | }...}.|
|00001ee0| 09 09 65 6c 73 65 0a 09 | 09 69 66 20 28 2d 2d 61 |..else..|.if (--a|
|00001ef0| 72 67 63 29 20 7b 0a 09 | 09 20 20 69 66 28 28 6e |rgc) {..|. if((n|
|00001f00| 75 6d 6c 69 6e 65 73 3d | 61 74 6f 66 28 2a 2b 2b |umlines=|atof(*++|
|00001f10| 61 72 67 76 29 29 20 3c | 3d 20 30 29 7b 0a 09 09 |argv)) <|= 0){...|
|00001f20| 20 20 20 20 66 70 72 69 | 6e 74 66 28 73 74 64 65 | fpri|ntf(stde|
|00001f30| 72 72 2c 22 73 70 65 63 | 69 66 79 20 61 20 6c 69 |rr,"spec|ify a li|
|00001f40| 6e 65 20 6e 75 6d 62 65 | 72 20 31 20 6f 72 20 6d |ne numbe|r 1 or m|
|00001f50| 6f 72 65 5c 6e 22 29 3b | 0a 09 09 20 20 20 20 62 |ore\n");|... b|
|00001f60| 61 64 66 6c 61 67 3d 54 | 52 55 45 3b 0a 09 09 20 |adflag=T|RUE;... |
|00001f70| 20 20 20 7d 0a 09 09 20 | 20 7d 0a 09 09 20 65 6c | }... | }... el|
|00001f80| 73 65 20 7b 0a 09 09 20 | 20 62 61 64 66 6c 61 67 |se {... | badflag|
|00001f90| 3d 54 52 55 45 3b 0a 09 | 09 20 20 7d 0a 09 09 62 |=TRUE;..|. }...b|
|00001fa0| 72 65 61 6b 3b 0a 20 20 | 20 20 63 61 73 65 20 27 |reak;. | case '|
|00001fb0| 73 27 3a 09 69 66 20 28 | 2a 2b 2b 61 72 67 76 5b |s':.if (|*++argv[|
|00001fc0| 30 5d 20 21 3d 27 5c 30 | 27 29 7b 0a 09 09 20 20 |0] !='\0|'){... |
|00001fd0| 69 66 28 28 70 74 73 69 | 7a 65 3d 61 74 6f 66 28 |if((ptsi|ze=atof(|
|00001fe0| 2a 61 72 67 76 29 29 20 | 3c 3d 20 30 29 7b 0a 09 |*argv)) |<= 0){..|
|00001ff0| 09 20 20 20 20 66 70 72 | 69 6e 74 66 28 73 74 64 |. fpr|intf(std|
|00002000| 65 72 72 2c 22 73 70 65 | 63 69 66 79 20 61 20 70 |err,"spe|cify a p|
|00002010| 6f 69 6e 74 20 73 69 7a | 65 20 67 72 65 61 74 65 |oint siz|e greate|
|00002020| 72 20 74 68 61 6e 20 30 | 5c 6e 22 29 3b 0a 09 09 |r than 0|\n");...|
|00002030| 20 20 20 20 62 61 64 66 | 6c 61 67 3d 54 52 55 45 | badf|lag=TRUE|
|00002040| 3b 0a 09 09 20 20 20 20 | 7d 0a 09 09 7d 0a 09 09 |;... |}...}...|
|00002050| 65 6c 73 65 0a 09 09 69 | 66 20 28 2d 2d 61 72 67 |else...i|f (--arg|
|00002060| 63 29 20 7b 0a 09 09 20 | 20 69 66 28 28 70 74 73 |c) {... | if((pts|
|00002070| 69 7a 65 3d 61 74 6f 66 | 28 2a 2b 2b 61 72 67 76 |ize=atof|(*++argv|
|00002080| 29 29 20 3c 3d 20 30 29 | 7b 0a 09 09 20 20 20 20 |)) <= 0)|{... |
|00002090| 66 70 72 69 6e 74 66 28 | 73 74 64 65 72 72 2c 22 |fprintf(|stderr,"|
|000020a0| 73 70 65 63 69 66 79 20 | 61 20 70 6f 69 6e 74 20 |specify |a point |
|000020b0| 73 69 7a 65 20 67 72 65 | 61 74 65 72 20 74 68 61 |size gre|ater tha|
|000020c0| 6e 20 30 5c 6e 22 29 3b | 0a 09 09 20 20 20 20 62 |n 0\n");|... b|
|000020d0| 61 64 66 6c 61 67 3d 54 | 52 55 45 3b 0a 09 09 20 |adflag=T|RUE;... |
|000020e0| 20 20 20 7d 0a 09 09 20 | 20 7d 0a 09 09 20 65 6c | }... | }... el|
|000020f0| 73 65 20 7b 0a 09 09 20 | 20 62 61 64 66 6c 61 67 |se {... | badflag|
|00002100| 3d 54 52 55 45 3b 0a 09 | 09 20 20 7d 0a 09 09 62 |=TRUE;..|. }...b|
|00002110| 72 65 61 6b 3b 0a 20 20 | 20 20 64 65 66 61 75 6c |reak;. | defaul|
|00002120| 74 3a 09 62 61 64 66 6c | 61 67 3d 54 52 55 45 3b |t:.badfl|ag=TRUE;|
|00002130| 0a 09 09 62 72 65 61 6b | 3b 0a 0a 09 7d 0a 69 66 |...break|;...}.if|
|00002140| 28 62 61 64 66 6c 61 67 | 29 20 7b 0a 20 66 70 72 |(badflag|) {. fpr|
|00002150| 69 6e 74 66 28 73 74 64 | 65 72 72 2c 22 55 73 61 |intf(std|err,"Usa|
|00002160| 67 65 3a 20 25 73 20 5b | 2d 70 5d 20 5b 2d 6c 5d |ge: %s [|-p] [-l]|
|00002170| 20 5b 2d 6c 64 5d 20 5b | 2d 64 5d 20 5b 2d 6e 20 | [-ld] [|-d] [-n |
|00002180| 6c 69 6e 65 73 20 5d 20 | 5b 2d 74 20 74 61 62 73 |lines ] |[-t tabs|
|00002190| 74 72 69 6e 67 5d 22 29 | 3b 0a 20 66 70 72 69 6e |tring]")|;. fprin|
|000021a0| 74 66 28 73 74 64 65 72 | 72 2c 22 5b 2d 66 20 66 |tf(stder|r,"[-f f|
|000021b0| 6f 6e 74 6e 61 6d 65 5d | 20 5b 2d 73 20 70 6f 69 |ontname]| [-s poi|
|000021c0| 6e 74 73 69 7a 65 5d 5c | 6e 22 2c 70 72 6f 67 6e |ntsize]\|n",progn|
|000021d0| 61 6d 65 29 3b 0a 20 65 | 78 69 74 28 31 29 3b 0a |ame);. e|xit(1);.|
|000021e0| 20 20 7d 0a 20 20 20 20 | 2a 61 72 67 76 2b 2b 3b | }. |*argv++;|
|000021f0| 0a 20 20 20 20 7d 0a 0a | 20 2f 2a 20 73 65 74 20 |. }..| /* set |
|00002200| 75 70 20 70 6f 73 74 73 | 63 72 69 70 74 20 68 65 |up posts|cript he|
|00002210| 61 64 65 72 20 2a 2f 0a | 0a 20 70 72 69 6e 74 68 |ader */.|. printh|
|00002220| 65 61 64 28 66 70 6f 75 | 74 2c 66 6f 6e 74 2c 70 |ead(fpou|t,font,p|
|00002230| 74 73 69 7a 65 2c 73 74 | 79 6c 65 2c 6e 75 6d 6c |tsize,st|yle,numl|
|00002240| 69 6e 65 73 2c 74 61 62 | 73 74 72 69 6e 67 29 3b |ines,tab|string);|
|00002250| 0a 20 2f 2a 20 72 65 61 | 64 20 66 69 6c 65 73 20 |. /* rea|d files |
|00002260| 2a 2f 0a 20 69 66 20 28 | 61 72 67 63 20 3d 3d 30 |*/. if (|argc ==0|
|00002270| 29 20 7b 0a 20 20 20 67 | 65 74 66 69 6c 65 28 73 |) {. g|etfile(s|
|00002280| 74 64 69 6e 2c 66 70 6f | 75 74 29 3b 0a 20 20 20 |tdin,fpo|ut);. |
|00002290| 7d 0a 20 20 65 6c 73 65 | 20 7b 0a 20 20 20 77 68 |}. else| {. wh|
|000022a0| 69 6c 65 28 61 72 67 63 | 2d 2d 21 3d 30 29 20 7b |ile(argc|--!=0) {|
|000022b0| 0a 20 20 20 20 69 66 28 | 28 66 70 69 6e 3d 66 6f |. if(|(fpin=fo|
|000022c0| 70 65 6e 28 2a 61 72 67 | 76 2c 22 72 22 29 29 21 |pen(*arg|v,"r"))!|
|000022d0| 3d 4e 55 4c 4c 29 20 7b | 0a 20 20 20 20 20 20 67 |=NULL) {|. g|
|000022e0| 65 74 66 69 6c 65 28 66 | 70 69 6e 2c 66 70 6f 75 |etfile(f|pin,fpou|
|000022f0| 74 29 3b 0a 20 20 20 20 | 20 20 66 63 6c 6f 73 65 |t);. | fclose|
|00002300| 28 66 70 69 6e 29 3b 0a | 20 20 20 20 20 20 2a 61 |(fpin);.| *a|
|00002310| 72 67 76 2b 2b 3b 0a 20 | 20 20 20 20 20 7d 0a 20 |rgv++;. | }. |
|00002320| 20 20 20 20 65 6c 73 65 | 7b 0a 20 20 20 20 20 20 | else|{. |
|00002330| 66 70 72 69 6e 74 66 28 | 73 74 64 65 72 72 2c 22 |fprintf(|stderr,"|
|00002340| 55 6e 61 62 6c 65 20 74 | 6f 20 6f 70 65 6e 20 66 |Unable t|o open f|
|00002350| 69 6c 65 20 25 73 5c 6e | 22 2c 2a 61 72 67 76 29 |ile %s\n|",*argv)|
|00002360| 3b 0a 20 20 20 20 20 20 | 66 70 72 69 6e 74 66 28 |;. |fprintf(|
|00002370| 66 70 6f 75 74 2c 22 5c | 6e 6c 70 5c 6e 22 29 3b |fpout,"\|nlp\n");|
|00002380| 0a 20 20 20 20 20 20 65 | 78 69 74 28 31 29 3b 0a |. e|xit(1);.|
|00002390| 20 20 20 20 20 20 7d 0a | 20 20 20 20 7d 0a 20 20 | }.| }. |
|000023a0| 7d 0a 20 2f 2a 20 6d 61 | 6b 65 73 75 72 65 20 73 |}. /* ma|kesure s|
|000023b0| 68 6f 77 70 61 67 65 20 | 69 73 20 64 6f 6e 65 20 |howpage |is done |
|000023c0| 73 6f 20 6c 61 73 74 20 | 70 61 67 65 20 70 72 69 |so last |page pri|
|000023d0| 6e 74 73 20 2a 2f 0a 20 | 66 70 72 69 6e 74 66 28 |nts */. |fprintf(|
|000023e0| 66 70 6f 75 74 2c 22 5c | 6e 6c 70 5c 6e 22 29 3b |fpout,"\|nlp\n");|
|000023f0| 0a 20 65 78 69 74 28 30 | 29 3b 0a 20 7d 0a 0a 20 |. exit(0|);. }.. |
|00002400| 2f 2a 0a 20 20 20 67 65 | 74 66 69 6c 65 28 66 70 |/*. ge|tfile(fp|
|00002410| 69 6e 2c 66 70 6f 75 74 | 29 0a 20 20 20 20 46 49 |in,fpout|). FI|
|00002420| 4c 45 20 2a 66 70 69 6e | 2c 66 70 6f 75 74 3b 0a |LE *fpin|,fpout;.|
|00002430| 20 20 20 52 65 61 64 20 | 69 6e 20 74 65 78 74 20 | Read |in text |
|00002440| 66 72 6f 6d 20 61 20 66 | 69 6c 65 20 61 6e 64 20 |from a f|ile and |
|00002450| 6f 75 74 70 75 74 20 61 | 70 70 72 6f 70 72 69 61 |output a|ppropria|
|00002460| 74 65 20 70 6f 73 74 73 | 63 72 69 70 74 0a 20 20 |te posts|cript. |
|00002470| 2a 2f 0a 20 67 65 74 66 | 69 6c 65 28 66 70 69 6e |*/. getf|ile(fpin|
|00002480| 2c 66 70 6f 75 74 29 0a | 20 20 46 49 4c 45 20 2a |,fpout).| FILE *|
|00002490| 66 70 69 6e 2c 2a 66 70 | 6f 75 74 3b 0a 20 20 7b |fpin,*fp|out;. {|
|000024a0| 0a 20 20 20 63 68 61 72 | 20 63 68 3b 0a 0a 20 20 |. char| ch;.. |
|000024b0| 20 66 70 72 69 6e 74 66 | 28 66 70 6f 75 74 2c 22 | fprintf|(fpout,"|
|000024c0| 28 22 29 3b 0a 20 20 20 | 77 68 69 6c 65 20 28 28 |(");. |while ((|
|000024d0| 63 68 3d 67 65 74 63 28 | 66 70 69 6e 29 29 21 3d |ch=getc(|fpin))!=|
|000024e0| 45 4f 46 29 20 7b 0a 20 | 20 20 69 66 28 69 73 70 |EOF) {. | if(isp|
|000024f0| 72 69 6e 74 28 63 68 29 | 29 20 7b 0a 20 20 20 20 |rint(ch)|) {. |
|00002500| 73 77 69 74 63 68 20 28 | 63 68 20 29 20 7b 0a 20 |switch (|ch ) {. |
|00002510| 20 20 20 20 63 61 73 65 | 20 27 28 27 3a 0a 20 20 | case| '(':. |
|00002520| 20 20 20 63 61 73 65 20 | 27 29 27 3a 0a 20 20 20 | case |')':. |
|00002530| 20 20 63 61 73 65 20 27 | 5c 5c 27 3a 0a 09 09 66 | case '|\\':...f|
|00002540| 70 72 69 6e 74 66 28 66 | 70 6f 75 74 2c 22 5c 5c |printf(f|pout,"\\|
|00002550| 25 63 22 2c 63 68 29 3b | 0a 09 09 62 72 65 61 6b |%c",ch);|...break|
|00002560| 3b 0a 20 20 20 20 20 64 | 65 66 61 75 6c 74 3a 09 |;. d|efault:.|
|00002570| 66 70 72 69 6e 74 66 28 | 66 70 6f 75 74 2c 22 25 |fprintf(|fpout,"%|
|00002580| 63 22 2c 63 68 29 3b 0a | 09 09 62 72 65 61 6b 3b |c",ch);.|..break;|
|00002590| 0a 20 20 20 20 20 7d 0a | 20 20 20 7d 0a 20 20 65 |. }.| }. e|
|000025a0| 6c 73 65 20 7b 0a 20 20 | 20 20 73 77 69 74 63 68 |lse {. | switch|
|000025b0| 20 28 63 68 20 29 20 7b | 0a 20 20 20 20 20 63 61 | (ch ) {|. ca|
|000025c0| 73 65 20 27 5c 6e 27 3a | 09 66 70 72 69 6e 74 66 |se '\n':|.fprintf|
|000025d0| 28 66 70 6f 75 74 2c 22 | 29 73 5c 6e 28 22 29 3b |(fpout,"|)s\n(");|
|000025e0| 0a 09 09 62 72 65 61 6b | 3b 0a 20 20 20 20 20 63 |...break|;. c|
|000025f0| 61 73 65 20 27 5c 74 27 | 3a 09 66 70 72 69 6e 74 |ase '\t'|:.fprint|
|00002600| 66 28 66 70 6f 75 74 2c | 22 29 53 5c 6e 68 74 20 |f(fpout,|")S\nht |
|00002610| 28 22 29 3b 0a 09 09 62 | 72 65 61 6b 3b 0a 20 20 |(");...b|reak;. |
|00002620| 20 20 20 63 61 73 65 20 | 27 5c 62 27 3a 09 66 70 | case |'\b':.fp|
|00002630| 72 69 6e 74 66 28 66 70 | 6f 75 74 2c 22 29 53 5c |rintf(fp|out,")S\|
|00002640| 6e 62 73 28 22 29 3b 0a | 09 09 62 72 65 61 6b 3b |nbs(");.|..break;|
|00002650| 0a 20 20 20 20 20 63 61 | 73 65 20 27 5c 72 27 3a |. ca|se '\r':|
|00002660| 09 66 70 72 69 6e 74 66 | 28 66 70 6f 75 74 2c 22 |.fprintf|(fpout,"|
|00002670| 29 53 5c 6e 63 72 28 22 | 29 3b 0a 09 09 62 72 65 |)S\ncr("|);...bre|
|00002680| 61 6b 3b 0a 20 20 20 20 | 20 63 61 73 65 20 27 5c |ak;. | case '\|
|00002690| 66 27 3a 09 66 70 72 69 | 6e 74 66 28 66 70 6f 75 |f':.fpri|ntf(fpou|
|000026a0| 74 2c 22 29 53 5c 6e 6e | 70 28 22 29 3b 0a 09 09 |t,")S\nn|p(");...|
|000026b0| 62 72 65 61 6b 3b 0a 20 | 20 20 20 20 64 65 66 61 |break;. | defa|
|000026c0| 75 6c 74 3a 0a 09 09 62 | 72 65 61 6b 3b 0a 20 20 |ult:...b|reak;. |
|000026d0| 20 20 20 20 20 20 7d 0a | 20 20 20 20 20 20 7d 0a | }.| }.|
|000026e0| 20 20 20 7d 0a 20 2f 2a | 20 73 65 6e 64 20 74 72 | }. /*| send tr|
|000026f0| 61 69 6c 65 72 20 2a 2f | 0a 20 66 70 72 69 6e 74 |ailer */|. fprint|
|00002700| 66 28 66 70 6f 75 74 2c | 22 29 73 5c 6e 6e 70 5c |f(fpout,|")s\nnp\|
|00002710| 6e 22 29 3b 0a 20 7d 0a | 70 72 69 6e 74 68 65 61 |n");. }.|printhea|
|00002720| 64 28 66 70 2c 66 6f 6e | 74 2c 73 69 7a 65 2c 73 |d(fp,fon|t,size,s|
|00002730| 74 79 6c 65 2c 6e 75 6d | 6c 69 6e 65 73 2c 74 61 |tyle,num|lines,ta|
|00002740| 62 73 74 72 69 6e 67 29 | 0a 20 46 49 4c 45 20 2a |bstring)|. FILE *|
|00002750| 66 70 3b 0a 20 63 68 61 | 72 20 2a 66 6f 6e 74 3b |fp;. cha|r *font;|
|00002760| 0a 20 64 6f 75 62 6c 65 | 20 73 69 7a 65 3b 0a 20 |. double| size;. |
|00002770| 69 6e 74 20 73 74 79 6c | 65 3b 0a 20 69 6e 74 20 |int styl|e;. int |
|00002780| 6e 75 6d 6c 69 6e 65 73 | 3b 0a 20 63 68 61 72 20 |numlines|;. char |
|00002790| 2a 74 61 62 73 74 72 69 | 6e 67 3b 0a 20 7b 0a 20 |*tabstri|ng;. {. |
|000027a0| 20 66 70 72 69 6e 74 66 | 28 66 70 2c 22 25 25 21 | fprintf|(fp,"%%!|
|000027b0| 20 50 53 20 2d 20 41 64 | 6f 62 65 5c 6e 22 29 3b | PS - Ad|obe\n");|
|000027c0| 0a 20 20 66 70 72 69 6e | 74 66 28 66 70 2c 22 25 |. fprin|tf(fp,"%|
|000027d0| 25 20 43 72 65 61 74 65 | 64 20 62 79 20 70 73 74 |% Create|d by pst|
|000027e0| 65 78 74 20 62 79 20 44 | 61 6e 20 4a 75 64 64 5c |ext by D|an Judd\|
|000027f0| 6e 22 29 3b 0a 20 20 66 | 70 72 69 6e 74 66 28 66 |n");. f|printf(f|
|00002800| 70 2c 22 2f 50 41 47 45 | 5f 53 54 59 4c 45 20 25 |p,"/PAGE|_STYLE %|
|00002810| 64 20 64 65 66 5c 6e 22 | 2c 73 74 79 6c 65 29 3b |d def\n"|,style);|
|00002820| 0a 20 20 66 70 72 69 6e | 74 66 28 66 70 2c 22 2f |. fprin|tf(fp,"/|
|00002830| 4e 55 4d 5f 4c 49 4e 45 | 53 20 25 64 20 64 65 66 |NUM_LINE|S %d def|
|00002840| 5c 6e 22 2c 6e 75 6d 6c | 69 6e 65 73 29 3b 0a 20 |\n",numl|ines);. |
|00002850| 20 66 70 72 69 6e 74 66 | 28 66 70 2c 22 2f 46 4f | fprintf|(fp,"/FO|
|00002860| 4e 54 20 28 25 73 29 20 | 63 76 6e 20 64 65 66 5c |NT (%s) |cvn def\|
|00002870| 6e 22 2c 66 6f 6e 74 29 | 3b 0a 20 20 66 70 72 69 |n",font)|;. fpri|
|00002880| 6e 74 66 28 66 70 2c 22 | 2f 46 4f 4e 54 5f 53 49 |ntf(fp,"|/FONT_SI|
|00002890| 5a 45 20 25 6c 66 20 64 | 65 66 5c 6e 22 2c 73 69 |ZE %lf d|ef\n",si|
|000028a0| 7a 65 29 3b 0a 20 20 66 | 70 72 69 6e 74 66 28 66 |ze);. f|printf(f|
|000028b0| 70 2c 22 25 25 63 68 65 | 63 6b 20 69 66 20 66 6f |p,"%%che|ck if fo|
|000028c0| 6e 74 20 65 78 69 73 74 | 73 5c 6e 22 29 3b 0a 0a |nt exist|s\n");..|
|000028d0| 2f 2a 20 74 68 69 73 20 | 69 73 20 76 61 67 75 65 |/* this |is vague|
|000028e0| 6c 79 20 64 65 76 69 63 | 65 20 64 65 70 65 6e 65 |ly devic|e depene|
|000028f0| 6e 74 2c 20 46 6f 6e 74 | 44 69 72 65 63 74 6f 72 |nt, Font|Director|
|00002900| 79 20 69 73 20 73 74 61 | 6e 64 61 72 64 2c 20 62 |y is sta|ndard, b|
|00002910| 75 74 20 2a 2f 0a 2f 2a | 20 74 68 65 20 4e 65 78 |ut */./*| the Nex|
|00002920| 74 20 75 73 65 73 20 53 | 68 61 72 65 64 46 6f 6e |t uses S|haredFon|
|00002930| 74 44 69 72 65 63 74 6f | 72 79 20 69 6e 73 74 65 |tDirecto|ry inste|
|00002940| 61 64 2e 20 54 68 65 20 | 70 72 6f 67 72 61 6d 20 |ad. The |program |
|00002950| 77 6f 6e 27 74 20 63 72 | 61 73 68 2c 2a 2f 0a 2f |won't cr|ash,*/./|
|00002960| 2a 20 62 75 74 20 74 68 | 65 20 6f 6e 6c 79 20 66 |* but th|e only f|
|00002970| 6f 6e 74 20 79 6f 75 20 | 63 61 6e 20 75 73 65 20 |ont you |can use |
|00002980| 69 73 20 43 6f 75 72 69 | 65 72 2e 20 42 6c 65 63 |is Couri|er. Blec|
|00002990| 68 2e 20 2a 2f 0a 2f 2a | 20 69 66 20 74 68 69 73 |h. */./*| if this|
|000029a0| 20 69 73 20 61 20 70 72 | 6f 62 6c 65 6d 20 6a 75 | is a pr|oblem ju|
|000029b0| 73 74 20 63 6f 6d 6d 65 | 6e 74 20 6f 75 74 20 74 |st comme|nt out t|
|000029c0| 68 65 20 6e 65 78 74 20 | 6c 69 6e 65 20 2a 2f 0a |he next |line */.|
|000029d0| 0a 20 20 66 70 72 69 6e | 74 66 28 66 70 2c 22 46 |. fprin|tf(fp,"F|
|000029e0| 6f 6e 74 44 69 72 65 63 | 74 6f 72 79 20 46 4f 4e |ontDirec|tory FON|
|000029f0| 54 20 6b 6e 6f 77 6e 20 | 6e 6f 74 20 7b 20 2f 46 |T known |not { /F|
|00002a00| 4f 4e 54 20 28 43 6f 75 | 72 69 65 72 29 20 63 76 |ONT (Cou|rier) cv|
|00002a10| 6e 20 64 65 66 7d 20 69 | 66 5c 6e 22 29 3b 0a 20 |n def} i|f\n");. |
|00002a20| 20 66 70 72 69 6e 74 66 | 28 66 70 2c 22 25 25 6d | fprintf|(fp,"%%m|
|00002a30| 69 73 63 20 68 61 72 64 | 77 61 72 65 20 64 65 66 |isc hard|ware def|
|00002a40| 73 5c 6e 22 29 3b 0a 20 | 20 66 70 72 69 6e 74 66 |s\n");. | fprintf|
|00002a50| 28 66 70 2c 22 2f 58 4c | 4d 41 52 47 49 4e 20 31 |(fp,"/XL|MARGIN 1|
|00002a60| 38 20 64 65 66 5c 6e 22 | 29 3b 0a 20 20 66 70 72 |8 def\n"|);. fpr|
|00002a70| 69 6e 74 66 28 66 70 2c | 22 2f 58 52 4d 41 52 47 |intf(fp,|"/XRMARG|
|00002a80| 49 4e 20 31 34 20 64 65 | 66 5c 6e 22 29 3b 0a 20 |IN 14 de|f\n");. |
|00002a90| 20 66 70 72 69 6e 74 66 | 28 66 70 2c 22 2f 58 50 | fprintf|(fp,"/XP|
|00002aa0| 41 47 45 20 36 31 32 20 | 64 65 66 5c 6e 22 29 3b |AGE 612 |def\n");|
|00002ab0| 0a 20 20 66 70 72 69 6e | 74 66 28 66 70 2c 22 2f |. fprin|tf(fp,"/|
|00002ac0| 59 50 41 47 45 20 37 39 | 32 20 64 65 66 5c 6e 22 |YPAGE 79|2 def\n"|
|00002ad0| 29 3b 0a 20 20 66 70 72 | 69 6e 74 66 28 66 70 2c |);. fpr|intf(fp,|
|00002ae0| 22 2f 59 54 4d 41 52 47 | 49 4e 20 38 20 64 65 66 |"/YTMARG|IN 8 def|
|00002af0| 5c 6e 22 29 3b 0a 20 20 | 66 70 72 69 6e 74 66 28 |\n");. |fprintf(|
|00002b00| 66 70 2c 22 2f 59 42 4d | 41 52 47 49 4e 20 31 33 |fp,"/YBM|ARGIN 13|
|00002b10| 20 64 65 66 5c 6e 22 29 | 3b 0a 20 20 66 70 72 69 | def\n")|;. fpri|
|00002b20| 6e 74 66 28 66 70 2c 22 | 2f 50 41 47 45 4e 55 4d |ntf(fp,"|/PAGENUM|
|00002b30| 20 31 20 64 65 66 5c 6e | 22 29 3b 0a 20 20 66 70 | 1 def\n|");. fp|
|00002b40| 72 69 6e 74 66 28 66 70 | 2c 22 25 25 5c 6e 22 29 |rintf(fp|,"%%\n")|
|00002b50| 3b 0a 20 20 66 70 72 69 | 6e 74 66 28 66 70 2c 22 |;. fpri|ntf(fp,"|
|00002b60| 25 25 73 68 6f 72 74 20 | 64 65 66 73 20 74 6f 20 |%%short |defs to |
|00002b70| 73 61 76 65 20 73 70 61 | 63 65 5c 6e 22 29 3b 0a |save spa|ce\n");.|
|00002b80| 20 20 66 70 72 69 6e 74 | 66 28 66 70 2c 22 25 25 | fprint|f(fp,"%%|
|00002b90| 5c 6e 22 29 3b 0a 20 20 | 66 70 72 69 6e 74 66 28 |\n");. |fprintf(|
|00002ba0| 66 70 2c 22 2f 62 64 20 | 7b 62 69 6e 64 20 64 65 |fp,"/bd |{bind de|
|00002bb0| 66 7d 20 62 69 6e 64 20 | 64 65 66 5c 6e 22 29 3b |f} bind |def\n");|
|00002bc0| 0a 20 20 66 70 72 69 6e | 74 66 28 66 70 2c 22 2f |. fprin|tf(fp,"/|
|00002bd0| 6d 20 7b 6d 6f 76 65 74 | 6f 7d 20 62 64 5c 6e 22 |m {movet|o} bd\n"|
|00002be0| 29 3b 0a 20 20 66 70 72 | 69 6e 74 66 28 66 70 2c |);. fpr|intf(fp,|
|00002bf0| 22 2f 6c 20 7b 6c 69 6e | 65 74 6f 7d 62 64 5c 6e |"/l {lin|eto}bd\n|
|00002c00| 22 29 3b 0a 20 20 66 70 | 72 69 6e 74 66 28 66 70 |");. fp|rintf(fp|
|00002c10| 2c 22 2f 67 73 20 7b 67 | 73 61 76 65 7d 62 64 5c |,"/gs {g|save}bd\|
|00002c20| 6e 22 29 3b 0a 20 20 66 | 70 72 69 6e 74 66 28 66 |n");. f|printf(f|
|00002c30| 70 2c 22 2f 67 72 20 7b | 67 72 65 73 74 6f 72 65 |p,"/gr {|grestore|
|00002c40| 7d 62 64 5c 6e 22 29 3b | 0a 20 20 66 70 72 69 6e |}bd\n");|. fprin|
|00002c50| 74 66 28 66 70 2c 22 2f | 74 72 20 7b 74 72 61 6e |tf(fp,"/|tr {tran|
|00002c60| 73 6c 61 74 65 7d 20 62 | 64 5c 6e 22 29 3b 0a 20 |slate} b|d\n");. |
|00002c70| 20 66 70 72 69 6e 74 66 | 28 66 70 2c 22 2f 72 74 | fprintf|(fp,"/rt|
|00002c80| 20 7b 72 6f 74 61 74 65 | 7d 20 62 64 5c 6e 22 29 | {rotate|} bd\n")|
|00002c90| 3b 0a 20 20 66 70 72 69 | 6e 74 66 28 66 70 2c 22 |;. fpri|ntf(fp,"|
|00002ca0| 25 25 5c 6e 22 29 3b 0a | 20 20 66 70 72 69 6e 74 |%%\n");.| fprint|
|00002cb0| 66 28 66 70 2c 22 25 25 | 53 65 74 20 75 70 20 76 |f(fp,"%%|Set up v|
|00002cc0| 61 72 73 20 61 6e 64 20 | 6e 70 20 64 65 70 65 6e |ars and |np depen|
|00002cd0| 64 69 6e 67 20 6f 6e 20 | 50 41 47 45 5f 53 54 59 |ding on |PAGE_STY|
|00002ce0| 4c 45 5c 6e 22 29 3b 0a | 20 20 66 70 72 69 6e 74 |LE\n");.| fprint|
|00002cf0| 66 28 66 70 2c 22 25 25 | 5c 6e 22 29 3b 0a 20 20 |f(fp,"%%|\n");. |
|00002d00| 66 70 72 69 6e 74 66 28 | 66 70 2c 22 25 25 20 53 |fprintf(|fp,"%% S|
|00002d10| 74 79 6c 65 20 31 5c 6e | 22 29 3b 0a 20 20 66 70 |tyle 1\n|");. fp|
|00002d20| 72 69 6e 74 66 28 66 70 | 2c 22 31 20 50 41 47 45 |rintf(fp|,"1 PAGE|
|00002d30| 5f 53 54 59 4c 45 20 65 | 71 20 7b 5c 6e 22 29 3b |_STYLE e|q {\n");|
|00002d40| 0a 20 20 66 70 72 69 6e | 74 66 28 66 70 2c 22 09 |. fprin|tf(fp,".|
|00002d50| 2f 50 41 47 45 53 5f 50 | 45 52 5f 53 48 45 45 54 |/PAGES_P|ER_SHEET|
|00002d60| 20 31 20 64 65 66 5c 6e | 22 29 3b 0a 20 20 66 70 | 1 def\n|");. fp|
|00002d70| 72 69 6e 74 66 28 66 70 | 2c 22 09 2f 73 70 20 7b |rintf(fp|,"./sp {|
|00002d80| 7d 20 64 65 66 5c 6e 22 | 29 3b 0a 20 20 66 70 72 |} def\n"|);. fpr|
|00002d90| 69 6e 74 66 28 66 70 2c | 22 09 2f 6e 70 20 7b 20 |intf(fp,|"./np { |
|00002da0| 73 68 6f 77 70 61 67 65 | 20 62 70 09 7d 20 62 64 |showpage| bp.} bd|
|00002db0| 5c 6e 22 29 3b 0a 20 20 | 66 70 72 69 6e 74 66 28 |\n");. |fprintf(|
|00002dc0| 66 70 2c 22 09 7d 20 69 | 66 5c 6e 22 29 3b 0a 20 |fp,".} i|f\n");. |
|00002dd0| 20 66 70 72 69 6e 74 66 | 28 66 70 2c 22 25 25 20 | fprintf|(fp,"%% |
|00002de0| 53 74 79 6c 65 20 32 5c | 6e 22 29 3b 0a 20 20 66 |Style 2\|n");. f|
|00002df0| 70 72 69 6e 74 66 28 66 | 70 2c 22 32 20 50 41 47 |printf(f|p,"2 PAG|
|00002e00| 45 5f 53 54 59 4c 45 20 | 65 71 20 7b 5c 6e 22 29 |E_STYLE |eq {\n")|
|00002e10| 3b 0a 20 20 66 70 72 69 | 6e 74 66 28 66 70 2c 22 |;. fpri|ntf(fp,"|
|00002e20| 09 2f 50 41 47 45 53 5f | 50 45 52 5f 53 48 45 45 |./PAGES_|PER_SHEE|
|00002e30| 54 20 32 20 64 65 66 5c | 6e 22 29 3b 0a 20 20 66 |T 2 def\|n");. f|
|00002e40| 70 72 69 6e 74 66 28 66 | 70 2c 22 09 2f 73 70 20 |printf(f|p,"./sp |
|00002e50| 7b 67 73 20 58 50 41 47 | 45 20 32 20 64 69 76 20 |{gs XPAG|E 2 div |
|00002e60| 64 75 70 20 30 20 6d 20 | 59 50 41 47 45 20 6c 20 |dup 0 m |YPAGE l |
|00002e70| 73 74 72 6f 6b 65 20 5c | 6e 22 29 3b 0a 20 20 66 |stroke \|n");. f|
|00002e80| 70 72 69 6e 74 66 28 66 | 70 2c 22 09 09 6e 65 77 |printf(f|p,"..new|
|00002e90| 70 61 74 68 20 30 20 30 | 20 6d 20 30 20 59 50 41 |path 0 0| m 0 YPA|
|00002ea0| 47 45 20 6c 20 58 50 41 | 47 45 20 32 20 64 69 76 |GE l XPA|GE 2 div|
|00002eb0| 20 58 52 4d 41 52 47 49 | 4e 20 73 75 62 20 64 75 | XRMARGI|N sub du|
|00002ec0| 70 5c 6e 22 29 3b 0a 20 | 20 66 70 72 69 6e 74 66 |p\n");. | fprintf|
|00002ed0| 28 66 70 2c 22 09 09 59 | 50 41 47 45 20 6c 20 30 |(fp,"..Y|PAGE l 0|
|00002ee0| 20 6c 20 30 20 30 20 6c | 20 63 6c 69 70 5c 6e 22 | l 0 0 l| clip\n"|
|00002ef0| 29 3b 0a 20 20 66 70 72 | 69 6e 74 66 28 66 70 2c |);. fpr|intf(fp,|
|00002f00| 22 09 09 7d 20 62 64 5c | 6e 22 29 3b 0a 20 20 66 |"..} bd\|n");. f|
|00002f10| 70 72 69 6e 74 66 28 66 | 70 2c 22 09 2f 6e 70 20 |printf(f|p,"./np |
|00002f20| 7b 20 2f 50 41 47 45 4e | 55 4d 20 31 20 50 41 47 |{ /PAGEN|UM 1 PAG|
|00002f30| 45 4e 55 4d 20 61 64 64 | 20 64 65 66 5c 6e 22 29 |ENUM add| def\n")|
|00002f40| 3b 0a 20 20 66 70 72 69 | 6e 74 66 28 66 70 2c 22 |;. fpri|ntf(fp,"|
|00002f50| 09 09 50 41 47 45 4e 55 | 4d 20 50 41 47 45 53 5f |..PAGENU|M PAGES_|
|00002f60| 50 45 52 5f 53 48 45 45 | 54 5c 6e 22 29 3b 0a 20 |PER_SHEE|T\n");. |
|00002f70| 20 66 70 72 69 6e 74 66 | 28 66 70 2c 22 09 09 67 | fprintf|(fp,"..g|
|00002f80| 74 20 7b 67 72 20 73 68 | 6f 77 70 61 67 65 20 73 |t {gr sh|owpage s|
|00002f90| 70 20 2f 50 41 47 45 4e | 55 4d 20 31 20 64 65 66 |p /PAGEN|UM 1 def|
|00002fa0| 20 7d 20 5c 6e 22 29 3b | 0a 20 20 66 70 72 69 6e | } \n");|. fprin|
|00002fb0| 74 66 28 66 70 2c 22 09 | 09 7b 67 72 20 67 73 20 |tf(fp,".|.{gr gs |
|00002fc0| 58 50 41 47 45 20 32 20 | 64 69 76 20 30 20 74 72 |XPAGE 2 |div 0 tr|
|00002fd0| 7d 20 69 66 65 6c 73 65 | 5c 6e 22 29 3b 0a 20 20 |} ifelse|\n");. |
|00002fe0| 66 70 72 69 6e 74 66 28 | 66 70 2c 22 09 09 62 70 |fprintf(|fp,"..bp|
|00002ff0| 5c 6e 22 29 3b 0a 20 20 | 66 70 72 69 6e 74 66 28 |\n");. |fprintf(|
|00003000| 66 70 2c 22 09 09 7d 20 | 62 64 5c 6e 22 29 3b 0a |fp,"..} |bd\n");.|
|00003010| 20 20 66 70 72 69 6e 74 | 66 28 66 70 2c 22 09 7d | fprint|f(fp,".}|
|00003020| 20 69 66 5c 6e 22 29 3b | 0a 20 20 66 70 72 69 6e | if\n");|. fprin|
|00003030| 74 66 28 66 70 2c 22 25 | 25 20 53 74 79 6c 65 20 |tf(fp,"%|% Style |
|00003040| 33 5c 6e 22 29 3b 0a 20 | 20 66 70 72 69 6e 74 66 |3\n");. | fprintf|
|00003050| 28 66 70 2c 22 33 20 50 | 41 47 45 5f 53 54 59 4c |(fp,"3 P|AGE_STYL|
|00003060| 45 20 65 71 20 7b 5c 6e | 22 29 3b 0a 20 20 2f 2a |E eq {\n|");. /*|
|00003070| 20 64 65 66 69 6e 65 20 | 69 66 20 79 6f 75 20 77 | define |if you w|
|00003080| 61 6e 74 20 64 6f 75 62 | 6c 65 20 70 61 67 65 20 |ant doub|le page |
|00003090| 6c 61 6e 64 73 63 61 70 | 65 20 6d 6f 64 65 20 74 |landscap|e mode t|
|000030a0| 6f 20 68 61 76 65 20 66 | 6f 6e 74 73 20 2a 2f 0a |o have f|onts */.|
|000030b0| 20 20 2f 2a 20 70 72 6f | 70 6f 72 74 69 6f 6e 61 | /* pro|portiona|
|000030c0| 6c 20 74 6f 20 73 69 6e | 67 6c 65 20 70 61 67 65 |l to sin|gle page|
|000030d0| 20 70 6f 72 74 72 61 69 | 74 20 2a 2f 0a 23 69 66 | portrai|t */.#if|
|000030e0| 64 65 66 20 4c 41 4e 44 | 50 52 4f 50 0a 20 20 66 |def LAND|PROP. f|
|000030f0| 70 72 69 6e 74 66 28 66 | 70 2c 22 09 2f 46 4f 4e |printf(f|p,"./FON|
|00003100| 54 5f 53 49 5a 45 20 46 | 4f 4e 54 5f 53 49 5a 45 |T_SIZE F|ONT_SIZE|
|00003110| 20 2e 36 34 32 20 6d 75 | 6c 20 64 65 66 5c 6e 22 | .642 mu|l def\n"|
|00003120| 29 3b 0a 23 65 6e 64 69 | 66 0a 20 20 66 70 72 69 |);.#endi|f. fpri|
|00003130| 6e 74 66 28 66 70 2c 22 | 09 2f 54 4d 50 20 58 50 |ntf(fp,"|./TMP XP|
|00003140| 41 47 45 20 64 65 66 5c | 6e 22 29 3b 0a 20 20 66 |AGE def\|n");. f|
|00003150| 70 72 69 6e 74 66 28 66 | 70 2c 22 09 2f 58 50 41 |printf(f|p,"./XPA|
|00003160| 47 45 20 59 50 41 47 45 | 20 64 65 66 5c 6e 22 29 |GE YPAGE| def\n")|
|00003170| 3b 0a 20 20 66 70 72 69 | 6e 74 66 28 66 70 2c 22 |;. fpri|ntf(fp,"|
|00003180| 09 2f 59 50 41 47 45 20 | 54 4d 50 20 64 65 66 5c |./YPAGE |TMP def\|
|00003190| 6e 22 29 3b 0a 20 20 66 | 70 72 69 6e 74 66 28 66 |n");. f|printf(f|
|000031a0| 70 2c 22 09 2f 54 4d 50 | 20 58 52 4d 41 52 47 49 |p,"./TMP| XRMARGI|
|000031b0| 4e 20 64 65 66 5c 6e 22 | 29 3b 0a 20 20 66 70 72 |N def\n"|);. fpr|
|000031c0| 69 6e 74 66 28 66 70 2c | 22 09 2f 58 52 4d 41 52 |intf(fp,|"./XRMAR|
|000031d0| 47 49 4e 20 59 54 4d 41 | 52 47 49 4e 20 64 65 66 |GIN YTMA|RGIN def|
|000031e0| 5c 6e 22 29 3b 0a 20 20 | 66 70 72 69 6e 74 66 28 |\n");. |fprintf(|
|000031f0| 66 70 2c 22 09 2f 59 54 | 4d 41 52 47 49 4e 20 54 |fp,"./YT|MARGIN T|
|00003200| 4d 50 20 64 65 66 5c 6e | 22 29 3b 0a 20 20 66 70 |MP def\n|");. fp|
|00003210| 72 69 6e 74 66 28 66 70 | 2c 22 09 2f 54 4d 50 20 |rintf(fp|,"./TMP |
|00003220| 58 4c 4d 41 52 47 49 4e | 20 64 65 66 5c 6e 22 29 |XLMARGIN| def\n")|
|00003230| 3b 0a 20 20 66 70 72 69 | 6e 74 66 28 66 70 2c 22 |;. fpri|ntf(fp,"|
|00003240| 09 2f 58 4c 4d 41 52 47 | 49 4e 20 59 42 4d 41 52 |./XLMARG|IN YBMAR|
|00003250| 47 49 4e 20 64 65 66 5c | 6e 22 29 3b 0a 20 20 66 |GIN def\|n");. f|
|00003260| 70 72 69 6e 74 66 28 66 | 70 2c 22 09 2f 59 42 4d |printf(f|p,"./YBM|
|00003270| 41 52 47 49 4e 20 54 4d | 50 20 64 65 66 5c 6e 22 |ARGIN TM|P def\n"|
|00003280| 29 3b 0a 20 20 66 70 72 | 69 6e 74 66 28 66 70 2c |);. fpr|intf(fp,|
|00003290| 22 09 2f 50 41 47 45 53 | 5f 50 45 52 5f 53 48 45 |"./PAGES|_PER_SHE|
|000032a0| 45 54 20 32 20 64 65 66 | 5c 6e 22 29 3b 0a 20 20 |ET 2 def|\n");. |
|000032b0| 66 70 72 69 6e 74 66 28 | 66 70 2c 22 09 2f 73 70 |fprintf(|fp,"./sp|
|000032c0| 20 7b 67 73 20 30 20 58 | 50 41 47 45 20 74 72 20 | {gs 0 X|PAGE tr |
|000032d0| 2d 39 30 20 72 74 5c 6e | 22 29 3b 0a 20 20 66 70 |-90 rt\n|");. fp|
|000032e0| 72 69 6e 74 66 28 66 70 | 2c 22 09 09 58 50 41 47 |rintf(fp|,"..XPAG|
|000032f0| 45 20 32 20 64 69 76 20 | 64 75 70 20 30 20 6d 6f |E 2 div |dup 0 mo|
|00003300| 76 65 74 6f 20 59 50 41 | 47 45 20 6c 20 73 74 72 |veto YPA|GE l str|
|00003310| 6f 6b 65 20 5c 6e 22 29 | 3b 0a 20 20 66 70 72 69 |oke \n")|;. fpri|
|00003320| 6e 74 66 28 66 70 2c 22 | 09 09 6e 65 77 70 61 74 |ntf(fp,"|..newpat|
|00003330| 68 20 30 20 30 20 6d 20 | 30 20 59 50 41 47 45 20 |h 0 0 m |0 YPAGE |
|00003340| 6c 20 58 50 41 47 45 20 | 32 20 64 69 76 20 58 52 |l XPAGE |2 div XR|
|00003350| 4d 41 52 47 49 4e 20 73 | 75 62 20 64 75 70 5c 6e |MARGIN s|ub dup\n|
|00003360| 22 29 3b 0a 20 20 66 70 | 72 69 6e 74 66 28 66 70 |");. fp|rintf(fp|
|00003370| 2c 22 09 09 59 50 41 47 | 45 20 6c 20 30 20 6c 20 |,"..YPAG|E l 0 l |
|00003380| 30 20 30 20 6c 20 63 6c | 69 70 5c 6e 22 29 3b 0a |0 0 l cl|ip\n");.|
|00003390| 20 20 66 70 72 69 6e 74 | 66 28 66 70 2c 22 09 09 | fprint|f(fp,"..|
|000033a0| 7d 20 62 64 5c 6e 22 29 | 3b 0a 20 20 66 70 72 69 |} bd\n")|;. fpri|
|000033b0| 6e 74 66 28 66 70 2c 22 | 09 2f 6e 70 20 7b 20 2f |ntf(fp,"|./np { /|
|000033c0| 50 41 47 45 4e 55 4d 20 | 31 20 50 41 47 45 4e 55 |PAGENUM |1 PAGENU|
|000033d0| 4d 20 61 64 64 20 64 65 | 66 5c 6e 22 29 3b 0a 20 |M add de|f\n");. |
|000033e0| 20 66 70 72 69 6e 74 66 | 28 66 70 2c 22 09 09 50 | fprintf|(fp,"..P|
|000033f0| 41 47 45 4e 55 4d 20 50 | 41 47 45 53 5f 50 45 52 |AGENUM P|AGES_PER|
|00003400| 5f 53 48 45 45 54 5c 6e | 22 29 3b 0a 20 20 66 70 |_SHEET\n|");. fp|
|00003410| 72 69 6e 74 66 28 66 70 | 2c 22 09 09 67 74 20 7b |rintf(fp|,"..gt {|
|00003420| 67 72 20 73 68 6f 77 70 | 61 67 65 20 73 70 20 2f |gr showp|age sp /|
|00003430| 50 41 47 45 4e 55 4d 20 | 31 20 64 65 66 20 7d 20 |PAGENUM |1 def } |
|00003440| 5c 6e 22 29 3b 0a 20 20 | 66 70 72 69 6e 74 66 28 |\n");. |fprintf(|
|00003450| 66 70 2c 22 09 09 7b 67 | 72 20 67 73 20 30 20 58 |fp,"..{g|r gs 0 X|
|00003460| 50 41 47 45 20 32 20 64 | 69 76 20 74 72 20 2d 39 |PAGE 2 d|iv tr -9|
|00003470| 30 20 72 74 20 7d 20 69 | 66 65 6c 73 65 5c 6e 22 |0 rt } i|felse\n"|
|00003480| 29 3b 0a 20 20 66 70 72 | 69 6e 74 66 28 66 70 2c |);. fpr|intf(fp,|
|00003490| 22 09 09 62 70 5c 6e 22 | 29 3b 0a 20 20 66 70 72 |"..bp\n"|);. fpr|
|000034a0| 69 6e 74 66 28 66 70 2c | 22 09 09 7d 20 62 64 5c |intf(fp,|"..} bd\|
|000034b0| 6e 22 29 3b 0a 20 20 66 | 70 72 69 6e 74 66 28 66 |n");. f|printf(f|
|000034c0| 70 2c 22 09 7d 20 69 66 | 5c 6e 22 29 3b 0a 20 20 |p,".} if|\n");. |
|000034d0| 66 70 72 69 6e 74 66 28 | 66 70 2c 22 25 25 20 53 |fprintf(|fp,"%% S|
|000034e0| 74 79 6c 65 20 34 5c 6e | 22 29 3b 0a 20 20 66 70 |tyle 4\n|");. fp|
|000034f0| 72 69 6e 74 66 28 66 70 | 2c 22 34 20 50 41 47 45 |rintf(fp|,"4 PAGE|
|00003500| 5f 53 54 59 4c 45 20 65 | 71 20 7b 5c 6e 22 29 3b |_STYLE e|q {\n");|
|00003510| 0a 20 20 66 70 72 69 6e | 74 66 28 66 70 2c 22 09 |. fprin|tf(fp,".|
|00003520| 2f 54 4d 50 20 58 50 41 | 47 45 20 64 65 66 5c 6e |/TMP XPA|GE def\n|
|00003530| 22 29 3b 0a 20 20 66 70 | 72 69 6e 74 66 28 66 70 |");. fp|rintf(fp|
|00003540| 2c 22 09 2f 58 50 41 47 | 45 20 59 50 41 47 45 20 |,"./XPAG|E YPAGE |
|00003550| 64 65 66 5c 6e 22 29 3b | 0a 20 20 66 70 72 69 6e |def\n");|. fprin|
|00003560| 74 66 28 66 70 2c 22 09 | 2f 59 50 41 47 45 20 54 |tf(fp,".|/YPAGE T|
|00003570| 4d 50 20 64 65 66 5c 6e | 22 29 3b 0a 20 20 66 70 |MP def\n|");. fp|
|00003580| 72 69 6e 74 66 28 66 70 | 2c 22 09 2f 54 4d 50 20 |rintf(fp|,"./TMP |
|00003590| 58 52 4d 41 52 47 49 4e | 20 64 65 66 5c 6e 22 29 |XRMARGIN| def\n")|
|000035a0| 3b 0a 20 20 66 70 72 69 | 6e 74 66 28 66 70 2c 22 |;. fpri|ntf(fp,"|
|000035b0| 09 2f 58 52 4d 41 52 47 | 49 4e 20 59 54 4d 41 52 |./XRMARG|IN YTMAR|
|000035c0| 47 49 4e 20 64 65 66 5c | 6e 22 29 3b 0a 20 20 66 |GIN def\|n");. f|
|000035d0| 70 72 69 6e 74 66 28 66 | 70 2c 22 09 2f 59 54 4d |printf(f|p,"./YTM|
|000035e0| 41 52 47 49 4e 20 54 4d | 50 20 64 65 66 5c 6e 22 |ARGIN TM|P def\n"|
|000035f0| 29 3b 0a 20 20 66 70 72 | 69 6e 74 66 28 66 70 2c |);. fpr|intf(fp,|
|00003600| 22 09 2f 54 4d 50 20 58 | 4c 4d 41 52 47 49 4e 20 |"./TMP X|LMARGIN |
|00003610| 64 65 66 5c 6e 22 29 3b | 0a 20 20 66 70 72 69 6e |def\n");|. fprin|
|00003620| 74 66 28 66 70 2c 22 09 | 2f 58 4c 4d 41 52 47 49 |tf(fp,".|/XLMARGI|
|00003630| 4e 20 59 42 4d 41 52 47 | 49 4e 20 64 65 66 5c 6e |N YBMARG|IN def\n|
|00003640| 22 29 3b 0a 20 20 66 70 | 72 69 6e 74 66 28 66 70 |");. fp|rintf(fp|
|00003650| 2c 22 09 2f 59 42 4d 41 | 52 47 49 4e 20 54 4d 50 |,"./YBMA|RGIN TMP|
|00003660| 20 64 65 66 5c 6e 22 29 | 3b 0a 20 20 66 70 72 69 | def\n")|;. fpri|
|00003670| 6e 74 66 28 66 70 2c 22 | 09 2f 50 41 47 45 53 5f |ntf(fp,"|./PAGES_|
|00003680| 50 45 52 5f 53 48 45 45 | 54 20 31 20 64 65 66 5c |PER_SHEE|T 1 def\|
|00003690| 6e 22 29 3b 0a 20 20 66 | 70 72 69 6e 74 66 28 66 |n");. f|printf(f|
|000036a0| 70 2c 22 09 2f 73 70 20 | 7b 67 73 20 30 20 58 50 |p,"./sp |{gs 0 XP|
|000036b0| 41 47 45 20 74 72 20 2d | 39 30 20 72 74 5c 6e 22 |AGE tr -|90 rt\n"|
|000036c0| 29 3b 0a 20 20 66 70 72 | 69 6e 74 66 28 66 70 2c |);. fpr|intf(fp,|
|000036d0| 22 09 09 7d 20 62 64 5c | 6e 22 29 3b 0a 20 20 66 |"..} bd\|n");. f|
|000036e0| 70 72 69 6e 74 66 28 66 | 70 2c 22 09 2f 6e 70 20 |printf(f|p,"./np |
|000036f0| 7b 20 67 72 20 73 68 6f | 77 70 61 67 65 20 73 70 |{ gr sho|wpage sp|
|00003700| 20 62 70 7d 20 62 64 5c | 6e 22 29 3b 0a 20 20 66 | bp} bd\|n");. f|
|00003710| 70 72 69 6e 74 66 28 66 | 70 2c 22 09 7d 20 69 66 |printf(f|p,".} if|
|00003720| 5c 6e 22 29 3b 0a 20 20 | 66 70 72 69 6e 74 66 28 |\n");. |fprintf(|
|00003730| 66 70 2c 22 25 25 5c 6e | 22 29 3b 0a 20 20 66 70 |fp,"%%\n|");. fp|
|00003740| 72 69 6e 74 66 28 66 70 | 2c 22 25 25 73 65 74 20 |rintf(fp|,"%%set |
|00003750| 75 70 20 66 6f 6e 74 73 | 5c 6e 22 29 3b 0a 20 20 |up fonts|\n");. |
|00003760| 66 70 72 69 6e 74 66 28 | 66 70 2c 22 25 25 5c 6e |fprintf(|fp,"%%\n|
|00003770| 22 29 3b 0a 20 20 66 70 | 72 69 6e 74 66 28 66 70 |");. fp|rintf(fp|
|00003780| 2c 22 4e 55 4d 5f 4c 49 | 4e 45 53 20 31 20 67 65 |,"NUM_LI|NES 1 ge|
|00003790| 20 7b 46 4f 4e 54 20 66 | 69 6e 64 66 6f 6e 74 20 | {FONT f|indfont |
|000037a0| 31 20 73 63 61 6c 65 66 | 6f 6e 74 20 73 65 74 66 |1 scalef|ont setf|
|000037b0| 6f 6e 74 5c 6e 22 29 3b | 0a 20 20 66 70 72 69 6e |ont\n");|. fprin|
|000037c0| 74 66 28 66 70 2c 22 09 | 2f 46 4f 4e 54 5f 48 54 |tf(fp,".|/FONT_HT|
|000037d0| 20 63 75 72 72 65 6e 74 | 66 6f 6e 74 20 2f 46 6f | current|font /Fo|
|000037e0| 6e 74 42 42 6f 78 20 67 | 65 74 20 33 20 67 65 74 |ntBBox g|et 3 get|
|000037f0| 20 30 20 65 78 63 68 5c | 6e 22 29 3b 0a 20 20 66 | 0 exch\|n");. f|
|00003800| 70 72 69 6e 74 66 28 66 | 70 2c 22 09 09 63 75 72 |printf(f|p,"..cur|
|00003810| 72 65 6e 74 66 6f 6e 74 | 20 2f 46 6f 6e 74 4d 61 |rentfont| /FontMa|
|00003820| 74 72 69 78 20 67 65 74 | 20 74 72 61 6e 73 66 6f |trix get| transfo|
|00003830| 72 6d 20 65 78 63 68 20 | 70 6f 70 5c 6e 22 29 3b |rm exch |pop\n");|
|00003840| 0a 20 20 66 70 72 69 6e | 74 66 28 66 70 2c 22 09 |. fprin|tf(fp,".|
|00003850| 09 63 75 72 72 65 6e 74 | 66 6f 6e 74 20 2f 46 6f |.current|font /Fo|
|00003860| 6e 74 42 42 6f 78 20 67 | 65 74 20 30 20 67 65 74 |ntBBox g|et 0 get|
|00003870| 20 30 20 65 78 63 68 5c | 6e 22 29 3b 0a 20 20 66 | 0 exch\|n");. f|
|00003880| 70 72 69 6e 74 66 28 66 | 70 2c 22 09 09 63 75 72 |printf(f|p,"..cur|
|00003890| 72 65 6e 74 66 6f 6e 74 | 20 2f 46 6f 6e 74 4d 61 |rentfont| /FontMa|
|000038a0| 74 72 69 78 20 67 65 74 | 20 74 72 61 6e 73 66 6f |trix get| transfo|
|000038b0| 72 6d 20 65 78 63 68 20 | 70 6f 70 5c 6e 22 29 3b |rm exch |pop\n");|
|000038c0| 0a 20 20 66 70 72 69 6e | 74 66 28 66 70 2c 22 09 |. fprin|tf(fp,".|
|000038d0| 09 73 75 62 20 64 65 66 | 5c 6e 22 29 3b 0a 20 20 |.sub def|\n");. |
|000038e0| 66 70 72 69 6e 74 66 28 | 66 70 2c 22 09 2f 54 4d |fprintf(|fp,"./TM|
|000038f0| 50 20 46 4f 4e 54 5f 48 | 54 20 31 20 73 75 62 20 |P FONT_H|T 1 sub |
|00003900| 64 65 66 5c 6e 22 29 3b | 0a 20 20 66 70 72 69 6e |def\n");|. fprin|
|00003910| 74 66 28 66 70 2c 22 09 | 2f 46 4f 4e 54 5f 53 49 |tf(fp,".|/FONT_SI|
|00003920| 5a 45 20 59 50 41 47 45 | 20 59 42 4d 41 52 47 49 |ZE YPAGE| YBMARGI|
|00003930| 4e 20 73 75 62 20 59 54 | 4d 41 52 47 49 4e 20 73 |N sub YT|MARGIN s|
|00003940| 75 62 20 31 20 73 75 62 | 20 64 75 70 5c 6e 22 29 |ub 1 sub| dup\n")|
|00003950| 3b 0a 20 20 66 70 72 69 | 6e 74 66 28 66 70 2c 22 |;. fpri|ntf(fp,"|
|00003960| 09 4e 55 4d 5f 4c 49 4e | 45 53 20 64 69 76 20 54 |.NUM_LIN|ES div T|
|00003970| 4d 50 20 6d 75 6c 20 73 | 75 62 20 4e 55 4d 5f 4c |MP mul s|ub NUM_L|
|00003980| 49 4e 45 53 20 64 69 76 | 20 64 65 66 5c 6e 22 29 |INES div| def\n")|
|00003990| 3b 0a 20 20 66 70 72 69 | 6e 74 66 28 66 70 2c 22 |;. fpri|ntf(fp,"|
|000039a0| 09 7d 20 69 66 5c 6e 22 | 29 3b 0a 20 20 66 70 72 |.} if\n"|);. fpr|
|000039b0| 69 6e 74 66 28 66 70 2c | 22 46 4f 4e 54 20 66 69 |intf(fp,|"FONT fi|
|000039c0| 6e 64 66 6f 6e 74 20 46 | 4f 4e 54 5f 53 49 5a 45 |ndfont F|ONT_SIZE|
|000039d0| 20 73 63 61 6c 65 66 6f | 6e 74 20 73 65 74 66 6f | scalefo|nt setfo|
|000039e0| 6e 74 5c 6e 22 29 3b 0a | 20 20 66 70 72 69 6e 74 |nt\n");.| fprint|
|000039f0| 66 28 66 70 2c 22 25 25 | 67 65 74 20 68 65 69 67 |f(fp,"%%|get heig|
|00003a00| 68 74 20 6f 66 20 66 6f | 6e 74 20 73 65 74 20 74 |ht of fo|nt set t|
|00003a10| 6f 6c 65 72 61 6e 63 65 | 73 5c 6e 22 29 3b 0a 20 |olerance|s\n");. |
|00003a20| 20 66 70 72 69 6e 74 66 | 28 66 70 2c 22 2f 46 4f | fprintf|(fp,"/FO|
|00003a30| 4e 54 5f 48 54 20 63 75 | 72 72 65 6e 74 66 6f 6e |NT_HT cu|rrentfon|
|00003a40| 74 20 20 2f 46 6f 6e 74 | 42 42 6f 78 20 67 65 74 |t /Font|BBox get|
|00003a50| 20 33 20 67 65 74 20 30 | 20 65 78 63 68 5c 6e 22 | 3 get 0| exch\n"|
|00003a60| 29 3b 0a 20 20 66 70 72 | 69 6e 74 66 28 66 70 2c |);. fpr|intf(fp,|
|00003a70| 22 09 63 75 72 72 65 6e | 74 66 6f 6e 74 20 20 2f |".curren|tfont /|
|00003a80| 46 6f 6e 74 4d 61 74 72 | 69 78 20 67 65 74 20 74 |FontMatr|ix get t|
|00003a90| 72 61 6e 73 66 6f 72 6d | 20 65 78 63 68 20 70 6f |ransform| exch po|
|00003aa0| 70 20 5c 6e 22 29 3b 0a | 20 20 66 70 72 69 6e 74 |p \n");.| fprint|
|00003ab0| 66 28 66 70 2c 22 09 63 | 75 72 72 65 6e 74 66 6f |f(fp,".c|urrentfo|
|00003ac0| 6e 74 20 20 2f 46 6f 6e | 74 42 42 6f 78 20 20 67 |nt /Fon|tBBox g|
|00003ad0| 65 74 20 30 20 67 65 74 | 20 30 20 65 78 63 68 5c |et 0 get| 0 exch\|
|00003ae0| 6e 22 29 3b 0a 20 20 66 | 70 72 69 6e 74 66 28 66 |n");. f|printf(f|
|00003af0| 70 2c 22 09 63 75 72 72 | 65 6e 74 66 6f 6e 74 20 |p,".curr|entfont |
|00003b00| 20 2f 46 6f 6e 74 4d 61 | 74 72 69 78 20 67 65 74 | /FontMa|trix get|
|00003b10| 20 74 72 61 6e 73 66 6f | 72 6d 20 65 78 63 68 20 | transfo|rm exch |
|00003b20| 70 6f 70 20 5c 6e 22 29 | 3b 0a 20 20 66 70 72 69 |pop \n")|;. fpri|
|00003b30| 6e 74 66 28 66 70 2c 22 | 09 73 75 62 20 20 64 65 |ntf(fp,"|.sub de|
|00003b40| 66 20 5c 6e 22 29 3b 0a | 20 20 66 70 72 69 6e 74 |f \n");.| fprint|
|00003b50| 66 28 66 70 2c 22 2f 46 | 4f 4e 54 5f 54 4f 4c 20 |f(fp,"/F|ONT_TOL |
|00003b60| 46 4f 4e 54 5f 48 54 20 | 59 42 4d 41 52 47 49 4e |FONT_HT |YBMARGIN|
|00003b70| 20 61 64 64 20 64 65 66 | 5c 6e 22 29 3b 0a 20 20 | add def|\n");. |
|00003b80| 66 70 72 69 6e 74 66 28 | 66 70 2c 22 25 25 5c 6e |fprintf(|fp,"%%\n|
|00003b90| 22 29 3b 0a 20 20 66 70 | 72 69 6e 74 66 28 66 70 |");. fp|rintf(fp|
|00003ba0| 2c 22 25 25 52 6f 75 74 | 69 6e 65 73 20 63 6f 6d |,"%%Rout|ines com|
|00003bb0| 6d 6f 6e 20 74 6f 20 61 | 6c 6c 20 70 61 67 65 20 |mon to a|ll page |
|00003bc0| 73 74 79 6c 65 73 5c 6e | 22 29 3b 0a 20 20 66 70 |styles\n|");. fp|
|00003bd0| 72 69 6e 74 66 28 66 70 | 2c 22 25 25 5c 6e 22 29 |rintf(fp|,"%%\n")|
|00003be0| 3b 0a 20 20 66 70 72 69 | 6e 74 66 28 66 70 2c 22 |;. fpri|ntf(fp,"|
|00003bf0| 2f 62 70 20 7b 20 58 4c | 4d 41 52 47 49 4e 20 59 |/bp { XL|MARGIN Y|
|00003c00| 50 41 47 45 20 59 54 4d | 41 52 47 49 4e 20 73 75 |PAGE YTM|ARGIN su|
|00003c10| 62 20 46 4f 4e 54 5f 53 | 49 5a 45 20 73 75 62 20 |b FONT_S|IZE sub |
|00003c20| 6d 5c 6e 22 29 3b 0a 20 | 20 66 70 72 69 6e 74 66 |m\n");. | fprintf|
|00003c30| 28 66 70 2c 22 09 7d 20 | 62 64 5c 6e 22 29 3b 0a |(fp,".} |bd\n");.|
|00003c40| 20 20 66 70 72 69 6e 74 | 66 28 66 70 2c 22 2f 73 | fprint|f(fp,"/s|
|00003c50| 20 7b 20 73 68 6f 77 20 | 20 63 75 72 72 65 6e 74 | { show | current|
|00003c60| 70 6f 69 6e 74 20 65 78 | 63 68 20 70 6f 70 20 64 |point ex|ch pop d|
|00003c70| 75 70 20 46 4f 4e 54 5f | 54 4f 4c 20 5c 6e 22 29 |up FONT_|TOL \n")|
|00003c80| 3b 0a 20 20 66 70 72 69 | 6e 74 66 28 66 70 2c 22 |;. fpri|ntf(fp,"|
|00003c90| 09 67 74 20 7b 46 4f 4e | 54 5f 53 49 5a 45 20 73 |.gt {FON|T_SIZE s|
|00003ca0| 75 62 20 58 4c 4d 41 52 | 47 49 4e 20 20 65 78 63 |ub XLMAR|GIN exc|
|00003cb0| 68 20 6d 7d 20 7b 6e 70 | 7d 20 69 66 65 6c 73 65 |h m} {np|} ifelse|
|00003cc0| 7d 20 20 62 64 5c 6e 22 | 29 3b 0a 20 20 66 70 72 |} bd\n"|);. fpr|
|00003cd0| 69 6e 74 66 28 66 70 2c | 22 2f 53 20 7b 73 68 6f |intf(fp,|"/S {sho|
|00003ce0| 77 7d 20 62 64 5c 6e 22 | 29 3b 0a 20 20 66 70 72 |w} bd\n"|);. fpr|
|00003cf0| 69 6e 74 66 28 66 70 2c | 22 2f 4f 46 46 53 45 54 |intf(fp,|"/OFFSET|
|00003d00| 20 28 5f 29 20 73 74 72 | 69 6e 67 77 69 64 74 68 | (_) str|ingwidth|
|00003d10| 20 70 6f 70 20 6e 65 67 | 20 64 65 66 5c 6e 22 29 | pop neg| def\n")|
|00003d20| 3b 0a 20 20 66 70 72 69 | 6e 74 66 28 66 70 2c 22 |;. fpri|ntf(fp,"|
|00003d30| 2f 62 73 20 7b 20 4f 46 | 46 53 45 54 20 30 20 72 |/bs { OF|FSET 0 r|
|00003d40| 6d 6f 76 65 74 6f 20 7d | 20 62 64 5c 6e 22 29 3b |moveto }| bd\n");|
|00003d50| 0a 20 20 66 70 72 69 6e | 74 66 28 66 70 2c 22 2f |. fprin|tf(fp,"/|
|00003d60| 62 73 20 7b 58 4c 4d 41 | 52 47 49 4e 20 63 75 72 |bs {XLMA|RGIN cur|
|00003d70| 72 65 6e 74 70 6f 69 6e | 74 20 70 6f 70 20 4f 46 |rentpoin|t pop OF|
|00003d80| 46 53 45 54 20 61 64 64 | 20 6c 74 20 7b 4f 46 46 |FSET add| lt {OFF|
|00003d90| 53 45 54 20 30 20 72 6d | 6f 76 65 74 6f 7d 22 29 |SET 0 rm|oveto}")|
|00003da0| 3b 0a 20 20 66 70 72 69 | 6e 74 66 28 66 70 2c 22 |;. fpri|ntf(fp,"|
|00003db0| 7b 58 4c 4d 41 52 47 49 | 4e 20 63 75 72 72 65 6e |{XLMARGI|N curren|
|00003dc0| 74 70 6f 69 6e 74 20 65 | 78 63 68 20 70 6f 70 20 |tpoint e|xch pop |
|00003dd0| 6d 7d 69 66 65 6c 73 65 | 7d 20 62 64 22 29 3b 0a |m}ifelse|} bd");.|
|00003de0| 20 20 66 70 72 69 6e 74 | 66 28 66 70 2c 22 2f 54 | fprint|f(fp,"/T|
|00003df0| 41 42 4c 45 4e 20 28 25 | 73 29 20 73 74 72 69 6e |ABLEN (%|s) strin|
|00003e00| 67 77 69 64 74 68 20 70 | 6f 70 20 64 65 66 5c 6e |gwidth p|op def\n|
|00003e10| 22 2c 74 61 62 73 74 72 | 69 6e 67 29 3b 0a 20 20 |",tabstr|ing);. |
|00003e20| 66 70 72 69 6e 74 66 28 | 66 70 2c 22 2f 68 74 20 |fprintf(|fp,"/ht |
|00003e30| 7b 63 75 72 72 65 6e 74 | 70 6f 69 6e 74 20 65 78 |{current|point ex|
|00003e40| 63 68 20 58 4c 4d 41 52 | 47 49 4e 20 73 75 62 20 |ch XLMAR|GIN sub |
|00003e50| 54 41 42 4c 45 4e 20 64 | 69 76 20 63 76 69 20 31 |TABLEN d|iv cvi 1|
|00003e60| 20 61 64 64 20 54 41 42 | 4c 45 4e 20 5c 6e 22 29 | add TAB|LEN \n")|
|00003e70| 3b 0a 20 20 66 70 72 69 | 6e 74 66 28 66 70 2c 22 |;. fpri|ntf(fp,"|
|00003e80| 09 6d 75 6c 20 58 4c 4d | 41 52 47 49 4e 20 61 64 |.mul XLM|ARGIN ad|
|00003e90| 64 20 65 78 63 68 20 6d | 7d 62 64 5c 6e 22 29 3b |d exch m|}bd\n");|
|00003ea0| 0a 20 20 66 70 72 69 6e | 74 66 28 66 70 2c 22 2f |. fprin|tf(fp,"/|
|00003eb0| 63 72 20 7b 63 75 72 72 | 65 6e 74 70 6f 69 6e 74 |cr {curr|entpoint|
|00003ec0| 20 58 4c 4d 41 52 47 49 | 4e 20 65 78 63 68 20 6d | XLMARGI|N exch m|
|00003ed0| 20 70 6f 70 7d 20 62 64 | 5c 6e 22 29 3b 0a 20 20 | pop} bd|\n");. |
|00003ee0| 66 70 72 69 6e 74 66 28 | 66 70 2c 22 2f 6c 70 20 |fprintf(|fp,"/lp |
|00003ef0| 7b 67 72 20 31 20 50 41 | 47 45 4e 55 4d 20 6e 65 |{gr 1 PA|GENUM ne|
|00003f00| 20 7b 73 68 6f 77 70 61 | 67 65 7d 69 66 7d 20 62 | {showpa|ge}if} b|
|00003f10| 64 5c 6e 22 29 3b 0a 20 | 20 66 70 72 69 6e 74 66 |d\n");. | fprintf|
|00003f20| 28 66 70 2c 22 25 25 5c | 6e 22 29 3b 0a 20 20 66 |(fp,"%%\|n");. f|
|00003f30| 70 72 69 6e 74 66 28 66 | 70 2c 22 25 25 62 65 67 |printf(f|p,"%%beg|
|00003f40| 69 6e 20 64 61 74 61 20 | 65 74 20 61 6c 5c 6e 22 |in data |et al\n"|
|00003f50| 29 3b 0a 20 20 66 70 72 | 69 6e 74 66 28 66 70 2c |);. fpr|intf(fp,|
|00003f60| 22 25 25 5c 6e 22 29 3b | 0a 20 20 66 70 72 69 6e |"%%\n");|. fprin|
|00003f70| 74 66 28 66 70 2c 22 73 | 70 5c 6e 22 29 3b 0a 20 |tf(fp,"s|p\n");. |
|00003f80| 20 66 70 72 69 6e 74 66 | 28 66 70 2c 22 62 70 5c | fprintf|(fp,"bp\|
|00003f90| 6e 22 29 3b 0a 20 7d 0a | 53 48 41 52 5f 45 4f 46 |n");. }.|SHAR_EOF|
|00003fa0| 0a 66 69 20 23 20 65 6e | 64 20 6f 66 20 6f 76 65 |.fi # en|d of ove|
|00003fb0| 72 77 72 69 74 69 6e 67 | 20 63 68 65 63 6b 0a 23 |rwriting| check.#|
|00003fc0| 09 45 6e 64 20 6f 66 20 | 73 68 65 6c 6c 20 61 72 |.End of |shell ar|
|00003fd0| 63 68 69 76 65 0a 65 78 | 69 74 20 30 0a 0a 0a |chive.ex|it 0... |
+--------+-------------------------+-------------------------+--------+--------+
