/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / altsrcs / 2 / 2758

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 46 72 6f 6d 3a 20 66 6c | 61 6b 40 6d 63 67 70 31 |From: fl|ak@mcgp1|
|00000010| 2e 55 55 43 50 20 28 44 | 61 6e 20 46 6c 61 6b 29 |.UUCP (D|an Flak)|
|00000020| 0a 4e 65 77 73 67 72 6f | 75 70 73 3a 20 61 6c 74 |.Newsgro|ups: alt|
|00000030| 2e 73 6f 75 72 63 65 73 | 0a 53 75 62 6a 65 63 74 |.sources|.Subject|
|00000040| 3a 20 74 72 6f 66 66 20 | 2f 20 70 69 63 20 62 61 |: troff |/ pic ba|
|00000050| 72 20 67 72 61 70 68 20 | 70 72 6f 67 72 61 6d 0a |r graph |program.|
|00000060| 4d 65 73 73 61 67 65 2d | 49 44 3a 20 3c 34 38 31 |Message-|ID: <481|
|00000070| 38 40 6d 63 67 70 31 2e | 55 55 43 50 3e 0a 44 61 |8@mcgp1.|UUCP>.Da|
|00000080| 74 65 3a 20 31 33 20 46 | 65 62 20 39 31 20 32 33 |te: 13 F|eb 91 23|
|00000090| 3a 33 34 3a 33 36 20 47 | 4d 54 0a 0a 62 61 72 20 |:34:36 G|MT..bar |
|000000a0| 69 73 20 61 20 70 6f 6f | 72 20 70 72 6f 67 72 61 |is a poo|r progra|
|000000b0| 6d 6d 65 72 27 73 20 62 | 61 72 20 67 72 61 70 68 |mmer's b|ar graph|
|000000c0| 20 67 65 6e 65 72 61 74 | 6f 72 20 75 73 69 6e 67 | generat|or using|
|000000d0| 20 70 69 63 20 61 6e 64 | 20 74 72 6f 66 66 20 74 | pic and| troff t|
|000000e0| 6f 0a 64 72 61 77 20 74 | 68 65 20 70 69 63 74 75 |o.draw t|he pictu|
|000000f0| 72 65 73 2e 20 49 74 20 | 69 73 20 61 20 67 65 6e |res. It |is a gen|
|00000100| 65 72 61 6c 69 7a 61 74 | 69 6f 6e 20 6f 66 20 61 |eralizat|ion of a|
|00000110| 20 70 72 6f 67 72 61 6d | 20 49 20 77 72 6f 74 65 | program| I wrote|
|00000120| 20 74 6f 20 64 6f 20 61 | 0a 73 70 65 63 69 66 69 | to do a|.specifi|
|00000130| 63 20 72 65 70 6f 72 74 | 2c 20 61 6e 64 20 69 73 |c report|, and is|
|00000140| 6e 27 74 20 69 6e 74 65 | 6e 64 65 64 20 74 6f 20 |n't inte|nded to |
|00000150| 62 65 20 74 6f 6f 20 73 | 6f 70 68 69 73 74 69 63 |be too s|ophistic|
|00000160| 61 74 65 64 2e 20 4e 6f | 6e 65 74 68 65 6c 65 73 |ated. No|netheles|
|00000170| 73 2c 0a 69 74 20 73 74 | 69 6c 6c 20 62 65 61 72 |s,.it st|ill bear|
|00000180| 73 20 61 20 73 75 70 65 | 72 66 69 63 69 61 6c 20 |s a supe|rficial |
|00000190| 72 65 73 65 6d 62 6c 61 | 6e 63 65 20 74 6f 20 61 |resembla|nce to a|
|000001a0| 20 22 72 65 61 6c 22 20 | 67 72 61 70 68 69 63 73 | "real" |graphics|
|000001b0| 20 70 61 63 6b 61 67 65 | 2e 0a 41 6e 64 2c 20 69 | package|..And, i|
|000001c0| 66 20 79 6f 75 20 64 6f | 6e 27 74 20 68 61 76 65 |f you do|n't have|
|000001d0| 20 61 20 72 65 61 6c 20 | 67 72 61 70 68 69 63 73 | a real |graphics|
|000001e0| 20 70 61 63 6b 61 67 65 | 2c 20 61 74 20 6c 65 61 | package|, at lea|
|000001f0| 73 74 20 69 74 27 73 20 | 65 61 73 79 20 74 6f 20 |st it's |easy to |
|00000200| 75 73 65 2e 0a 0a 49 66 | 20 79 6f 75 20 66 6f 6c |use...If| you fol|
|00000210| 6c 6f 77 20 74 68 65 20 | 65 78 61 6d 70 6c 65 20 |low the |example |
|00000220| 75 73 65 64 20 69 6e 20 | 74 68 65 20 6d 61 6e 20 |used in |the man |
|00000230| 70 61 67 65 2c 20 79 6f | 75 20 73 68 6f 75 6c 64 |page, yo|u should|
|00000240| 20 67 65 74 20 61 20 62 | 61 72 0a 67 72 61 70 68 | get a b|ar.graph|
|00000250| 20 74 68 61 74 20 6c 6f | 6f 6b 73 20 73 6f 6d 65 | that lo|oks some|
|00000260| 74 68 69 6e 67 20 6c 69 | 6b 65 3a 0a 0a 0a 20 20 |thing li|ke:...  |
|00000270| 20 20 20 20 20 20 20 39 | 30 20 20 20 20 20 20 20 |       9|0       |
|00000280| 20 20 20 20 20 20 20 20 | 20 39 35 2e 30 20 20 20 |        | 95.0   |
|00000290| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 31 30 30 |        |     100|
|000002a0| 2e 30 0a 20 20 20 20 20 | 20 20 20 20 20 2e 2e 2e |.0.     |     ...|
|000002b0| 2e 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e |........|........|
|000002c0| 7c 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e ||.......|........|
|000002d0| 2e 2e 2e 2e 2e 7c 0a 20 | 20 20 20 20 20 20 20 20 |.....|. |        |
|000002e0| 20 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f | _______|________|
|000002f0| 5f 5f 5f 5f 7c 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |____|___|________|
|00000300| 5f 5f 5f 20 20 20 20 20 | 20 7c 0a 20 20 20 4c 69 |___     | |.   Li|
|00000310| 6e 65 20 31 20 7c 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |ne 1 |__|________|
|00000320| 5f 5f 5f 5f 5f 5f 5f 5f | 7c 5f 5f 5f 5f 5f 5f 5f |________||_______|
|00000330| 5f 5f 5f 5f 5f 5f 5f 7c | 20 39 39 2e 30 7c 0a 20 |_______|| 99.0|. |
|00000340| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000350| 20 20 20 20 20 20 20 20 | 20 20 20 20 7c 20 20 20 |        |    |   |
|00000360| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000370| 20 7c 0a 20 20 20 20 20 | 20 20 20 20 20 5f 5f 5f | |.     |     ___|
|00000380| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000390| 7c 5f 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 ||_      |        |
|000003a0| 20 20 20 20 20 7c 0a 20 | 20 20 4c 69 6e 65 20 32 |     |. |  Line 2|
|000003b0| 20 7c 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f | |______|________|
|000003c0| 5f 5f 5f 5f 7c 5f 7c 20 | 39 35 2e 34 20 20 20 20 |____|_| |95.4    |
|000003d0| 20 20 20 20 20 20 20 20 | 20 7c 0a 20 20 20 20 20 |        | |.     |
|000003e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000003f0| 20 20 20 20 20 20 20 20 | 7c 20 20 20 20 20 20 20 |        ||       |
|00000400| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 7c 0a 20 |        |     |. |
|00000410| 20 20 20 20 20 20 20 20 | 20 5f 5f 5f 5f 5f 5f 20 |        | ______ |
|00000420| 20 20 20 20 20 20 20 20 | 20 20 20 20 7c 20 20 20 |        |    |   |
|00000430| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000440| 20 7c 0a 20 20 20 4c 69 | 6e 65 20 33 20 7c 5f 5f | |.   Li|ne 3 |__|
|00000450| 5f 5f 5f 7c 20 39 31 2e | 32 20 20 20 20 20 20 20 |___| 91.|2       |
|00000460| 7c 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 ||       |        |
|00000470| 20 20 20 20 20 7c 0a 20 | 20 20 20 20 20 20 20 20 |     |. |        |
|00000480| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000490| 20 20 20 20 7c 20 20 20 | 20 20 20 20 20 20 20 20 |    |   |        |
|000004a0| 20 20 20 20 20 20 20 20 | 20 7c 0a 20 20 20 20 20 |        | |.     |
|000004b0| 20 20 20 20 20 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |     ___|________|
|000004c0| 5f 20 20 20 20 20 20 20 | 7c 20 20 20 20 20 20 20 |_       ||       |
|000004d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 7c 0a 20 |        |     |. |
|000004e0| 20 20 4c 69 6e 65 20 34 | 20 7c 5f 5f 5f 5f 5f 5f |  Line 4| |______|
|000004f0| 5f 5f 5f 5f 5f 7c 20 39 | 33 2e 38 20 7c 20 20 20 |_____| 9|3.8 |   |
|00000500| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000510| 20 7c 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | |.     |        |
|00000520| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000530| 7c 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 ||       |        |
|00000540| 20 20 20 20 20 7c 0a 20 | 20 20 4c 69 6e 65 20 35 |     |. |  Line 5|
|00000550| 20 7c 20 4e 44 20 20 20 | 20 20 20 20 20 20 20 20 | | ND   |        |
|00000560| 20 20 20 20 7c 20 20 20 | 20 20 20 20 20 20 20 20 |    |   |        |
|00000570| 20 20 20 20 20 20 20 20 | 20 7c 0a 0a 0a 43 6f 6d |        | |...Com|
|00000580| 70 69 6c 61 74 69 6f 6e | 20 69 73 20 73 69 6d 70 |pilation| is simp|
|00000590| 6c 65 20 63 63 20 2d 6f | 20 62 61 72 20 62 61 72 |le cc -o| bar bar|
|000005a0| 2e 63 20 28 41 6e 79 20 | 71 75 65 73 74 69 6f 6e |.c (Any |question|
|000005b0| 73 3f 29 0a 0a 23 2d 2d | 2d 2d 63 75 74 20 68 65 |s?)..#--|--cut he|
|000005c0| 72 65 20 61 6e 64 20 75 | 6e 70 61 63 6b 20 75 73 |re and u|npack us|
|000005d0| 69 6e 67 20 73 68 2d 2d | 2d 2d 2d 0a 23 21 2f 62 |ing sh--|---.#!/b|
|000005e0| 69 6e 2f 73 68 0a 23 20 | 54 68 69 73 20 69 73 20 |in/sh.# |This is |
|000005f0| 61 20 73 68 65 6c 6c 20 | 61 72 63 68 69 76 65 20 |a shell |archive |
|00000600| 28 70 72 6f 64 75 63 65 | 64 20 62 79 20 73 68 61 |(produce|d by sha|
|00000610| 72 20 33 2e 34 39 29 0a | 23 20 54 6f 20 65 78 74 |r 3.49).|# To ext|
|00000620| 72 61 63 74 20 74 68 65 | 20 66 69 6c 65 73 20 66 |ract the| files f|
|00000630| 72 6f 6d 20 74 68 69 73 | 20 61 72 63 68 69 76 65 |rom this| archive|
|00000640| 2c 20 73 61 76 65 20 69 | 74 20 74 6f 20 61 20 66 |, save i|t to a f|
|00000650| 69 6c 65 2c 20 72 65 6d | 6f 76 65 0a 23 20 65 76 |ile, rem|ove.# ev|
|00000660| 65 72 79 74 68 69 6e 67 | 20 61 62 6f 76 65 20 74 |erything| above t|
|00000670| 68 65 20 22 21 2f 62 69 | 6e 2f 73 68 22 20 6c 69 |he "!/bi|n/sh" li|
|00000680| 6e 65 20 61 62 6f 76 65 | 2c 20 61 6e 64 20 74 79 |ne above|, and ty|
|00000690| 70 65 20 22 73 68 20 66 | 69 6c 65 5f 6e 61 6d 65 |pe "sh f|ile_name|
|000006a0| 22 2e 0a 23 0a 23 20 6d | 61 64 65 20 30 32 2f 31 |"..#.# m|ade 02/1|
|000006b0| 33 2f 31 39 39 31 20 32 | 33 3a 31 39 20 55 54 43 |3/1991 2|3:19 UTC|
|000006c0| 20 62 79 20 66 6c 61 6b | 40 6d 63 67 70 31 0a 23 | by flak|@mcgp1.#|
|000006d0| 20 53 6f 75 72 63 65 20 | 64 69 72 65 63 74 6f 72 | Source |director|
|000006e0| 79 20 2f 75 73 72 2f 75 | 73 65 72 73 2f 66 6c 61 |y /usr/u|sers/fla|
|000006f0| 6b 2f 6a 61 63 6b 0a 23 | 0a 23 20 65 78 69 73 74 |k/jack.#|.# exist|
|00000700| 69 6e 67 20 66 69 6c 65 | 73 20 77 69 6c 6c 20 4e |ing file|s will N|
|00000710| 4f 54 20 62 65 20 6f 76 | 65 72 77 72 69 74 74 65 |OT be ov|erwritte|
|00000720| 6e 20 75 6e 6c 65 73 73 | 20 2d 63 20 69 73 20 73 |n unless| -c is s|
|00000730| 70 65 63 69 66 69 65 64 | 0a 23 0a 23 20 54 68 69 |pecified|.#.# Thi|
|00000740| 73 20 73 68 61 72 20 63 | 6f 6e 74 61 69 6e 73 3a |s shar c|ontains:|
|00000750| 0a 23 20 6c 65 6e 67 74 | 68 20 20 6d 6f 64 65 20 |.# lengt|h  mode |
|00000760| 20 20 20 20 20 20 6e 61 | 6d 65 0a 23 20 2d 2d 2d |      na|me.# ---|
|00000770| 2d 2d 2d 20 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 20 2d |--- ----|------ -|
|00000780| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000790| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000007a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0a 23 20 20 20 31 38 |--------|-.#   18|
|000007b0| 30 35 20 2d 72 77 2d 72 | 2d 2d 72 2d 2d 20 62 61 |05 -rw-r|--r-- ba|
|000007c0| 72 2e 65 6c 0a 23 20 20 | 20 34 33 34 34 20 2d 72 |r.el.#  | 4344 -r|
|000007d0| 77 2d 72 77 2d 72 77 2d | 20 62 61 72 2e 63 0a 23 |w-rw-rw-| bar.c.#|
|000007e0| 0a 23 20 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |.# =====|========|
|000007f0| 20 62 61 72 2e 65 6c 20 | 3d 3d 3d 3d 3d 3d 3d 3d | bar.el |========|
|00000800| 3d 3d 3d 3d 3d 3d 0a 69 | 66 20 74 65 73 74 20 2d |======.i|f test -|
|00000810| 66 20 27 62 61 72 2e 65 | 6c 27 20 2d 61 20 58 22 |f 'bar.e|l' -a X"|
|00000820| 24 31 22 20 21 3d 20 58 | 22 2d 63 22 3b 20 74 68 |$1" != X|"-c"; th|
|00000830| 65 6e 0a 09 65 63 68 6f | 20 27 78 20 2d 20 73 6b |en..echo| 'x - sk|
|00000840| 69 70 70 69 6e 67 20 62 | 61 72 2e 65 6c 20 28 46 |ipping b|ar.el (F|
|00000850| 69 6c 65 20 61 6c 72 65 | 61 64 79 20 65 78 69 73 |ile alre|ady exis|
|00000860| 74 73 29 27 0a 65 6c 73 | 65 0a 65 63 68 6f 20 27 |ts)'.els|e.echo '|
|00000870| 78 20 2d 20 65 78 74 72 | 61 63 74 69 6e 67 20 62 |x - extr|acting b|
|00000880| 61 72 2e 65 6c 20 28 54 | 65 78 74 29 27 0a 73 65 |ar.el (T|ext)'.se|
|00000890| 64 20 27 73 2f 5e 58 2f | 2f 27 20 3c 3c 20 27 53 |d 's/^X/|/' << 'S|
|000008a0| 48 41 52 5f 45 4f 46 27 | 20 3e 20 27 62 61 72 2e |HAR_EOF'| > 'bar.|
|000008b0| 65 6c 27 20 26 26 0a 2e | 64 65 20 29 6b 0a 2e 2e |el' &&..|de )k...|
|000008c0| 0a 2e 54 48 20 62 61 72 | 20 6c 20 6c 6f 63 61 6c |..TH bar| l local|
|000008d0| 0a 2e 53 48 20 4e 41 4d | 45 0a 62 61 72 20 5c 2d |..SH NAM|E.bar \-|
|000008e0| 20 63 72 65 61 74 65 20 | 61 20 62 61 72 20 67 72 | create |a bar gr|
|000008f0| 61 70 68 0a 2e 53 48 20 | 53 59 4e 4f 50 53 49 53 |aph..SH |SYNOPSIS|
|00000900| 0a 2e 42 20 62 61 72 20 | 5b 2d 69 6c 74 75 5d 20 |..B bar |[-iltu] |
|00000910| 3c 64 61 74 61 66 69 6c | 65 3e 0a 2e 53 48 20 44 |<datafil|e>..SH D|
|00000920| 45 53 43 52 49 50 54 49 | 4f 4e 0a 2e 49 20 62 61 |ESCRIPTI|ON..I ba|
|00000930| 72 0a 63 72 61 74 65 73 | 20 61 20 73 74 72 65 61 |r.crates| a strea|
|00000940| 6d 20 6f 66 20 74 72 6f | 66 66 20 27 70 69 63 27 |m of tro|ff 'pic'|
|00000950| 20 63 6f 6d 6d 61 6e 64 | 73 20 74 6f 20 74 68 65 | command|s to the|
|00000960| 20 73 74 61 6e 64 61 72 | 64 20 6f 75 74 70 75 74 | standar|d output|
|00000970| 20 74 6f 0a 70 72 6f 64 | 75 63 65 20 61 20 68 6f | to.prod|uce a ho|
|00000980| 72 69 7a 6f 6e 74 61 6c | 20 62 61 72 20 66 6f 72 |rizontal| bar for|
|00000990| 20 65 76 65 72 79 20 6c | 69 6e 65 20 69 6e 20 74 | every l|ine in t|
|000009a0| 68 65 20 64 61 74 61 20 | 66 69 6c 65 2e 20 0a 2e |he data |file. ..|
|000009b0| 53 48 20 4f 50 54 49 4f | 4e 53 0a 2e 54 50 0a 2e |SH OPTIO|NS..TP..|
|000009c0| 42 20 69 0a 69 6e 63 72 | 65 6d 65 6e 74 2e 20 54 |B i.incr|ement. T|
|000009d0| 68 69 73 20 76 61 6c 75 | 65 20 64 65 74 65 72 6d |his valu|e determ|
|000009e0| 69 6e 65 73 20 68 6f 77 | 20 6d 61 6e 79 20 76 65 |ines how| many ve|
|000009f0| 72 74 69 63 61 6c 20 70 | 61 72 74 69 74 69 6f 6e |rtical p|artition|
|00000a00| 73 20 74 68 65 72 65 20 | 77 69 6c 6c 0a 62 65 20 |s there |will.be |
|00000a10| 6f 6e 20 74 68 65 20 67 | 72 61 70 68 2e 20 28 45 |on the g|raph. (E|
|00000a20| 2e 47 2e 20 22 35 22 20 | 6d 65 61 6e 73 20 70 6c |.G. "5" |means pl|
|00000a30| 61 63 65 20 61 20 76 65 | 72 74 69 63 61 6c 20 73 |ace a ve|rtical s|
|00000a40| 63 61 6c 65 20 65 76 65 | 72 79 20 35 20 75 6e 69 |cale eve|ry 5 uni|
|00000a50| 74 73 29 2e 0a 44 65 66 | 61 75 6c 74 20 69 73 20 |ts)..Def|ault is |
|00000a60| 31 30 2e 0a 2e 54 50 0a | 2e 42 20 6c 0a 6c 6f 77 |10...TP.|.B l.low|
|00000a70| 65 72 20 6c 69 6d 69 74 | 2e 20 54 68 65 20 6c 6f |er limit|. The lo|
|00000a80| 77 65 72 20 6c 69 6d 69 | 74 20 66 6f 72 20 74 68 |wer limi|t for th|
|00000a90| 65 20 64 61 74 61 20 74 | 6f 20 62 65 20 70 6c 6f |e data t|o be plo|
|00000aa0| 74 74 65 64 2e 20 44 65 | 66 61 75 6c 74 20 69 73 |tted. De|fault is|
|00000ab0| 20 30 2e 0a 2e 54 50 0a | 2e 42 20 74 0a 74 69 74 | 0...TP.|.B t.tit|
|00000ac0| 6c 65 2e 20 54 68 65 20 | 74 69 74 6c 65 20 73 74 |le. The |title st|
|00000ad0| 72 69 6e 67 20 66 6f 72 | 20 74 68 65 20 67 72 61 |ring for| the gra|
|00000ae0| 70 68 2e 0a 2e 54 50 0a | 2e 42 20 75 0a 75 70 70 |ph...TP.|.B u.upp|
|00000af0| 65 72 20 6c 69 6d 69 74 | 2e 20 54 68 65 20 75 70 |er limit|. The up|
|00000b00| 70 65 72 20 6c 69 6d 69 | 74 20 66 6f 72 20 74 68 |per limi|t for th|
|00000b10| 65 20 64 61 74 61 20 74 | 6f 20 62 65 20 70 6c 6f |e data t|o be plo|
|00000b20| 74 74 65 64 2e 20 44 65 | 66 61 75 6c 74 20 69 73 |tted. De|fault is|
|00000b30| 0a 31 30 30 2e 0a 2e 53 | 48 20 45 58 41 4d 50 4c |.100...S|H EXAMPL|
|00000b40| 45 53 0a 44 41 54 41 20 | 46 49 4c 45 20 46 4f 52 |ES.DATA |FILE FOR|
|00000b50| 4d 41 54 3a 0a 54 68 65 | 20 64 61 74 61 20 66 69 |MAT:.The| data fi|
|00000b60| 6c 65 20 69 73 20 61 6e | 20 61 73 63 69 69 20 66 |le is an| ascii f|
|00000b70| 69 6c 65 20 63 6f 6e 74 | 61 69 6e 69 6e 67 20 6f |ile cont|aining o|
|00000b80| 6e 65 20 22 72 65 63 6f | 72 64 22 20 70 65 72 20 |ne "reco|rd" per |
|00000b90| 6c 69 6e 65 20 28 6d 61 | 78 69 6d 75 6d 20 0a 6f |line (ma|ximum .o|
|00000ba0| 66 20 33 30 20 72 65 63 | 6f 72 64 73 29 2e 20 41 |f 30 rec|ords). A|
|00000bb0| 0a 72 65 63 6f 72 64 20 | 63 6f 6e 73 69 73 74 73 |.record |consists|
|00000bc0| 20 6f 66 20 74 68 65 20 | 6e 61 6d 65 20 6f 66 20 | of the |name of |
|00000bd0| 74 68 65 20 69 74 65 6d | 20 62 65 69 6e 67 20 70 |the item| being p|
|00000be0| 6c 6f 74 74 65 64 20 28 | 6d 61 78 69 6d 75 6d 20 |lotted (|maximum |
|00000bf0| 6f 66 20 32 30 20 0a 63 | 68 61 72 61 63 74 65 72 |of 20 .c|haracter|
|00000c00| 73 29 20 61 6e 64 20 69 | 74 73 20 76 61 6c 75 65 |s) and i|ts value|
|00000c10| 20 73 65 70 61 72 61 74 | 65 64 20 62 79 20 61 20 | separat|ed by a |
|00000c20| 76 65 72 74 69 63 61 6c | 20 62 61 72 20 5c 66 28 |vertical| bar \f(|
|00000c30| 43 57 28 7c 29 5c 66 52 | 2e 0a 2e 73 70 0a 2e 6e |CW(|)\fR|...sp..n|
|00000c40| 66 0a 64 61 74 61 66 69 | 6c 65 0a 5c 66 28 43 57 |f.datafi|le.\f(CW|
|00000c50| 4c 69 6e 65 20 31 7c 20 | 39 39 2e 30 0a 4c 69 6e |Line 1| |99.0.Lin|
|00000c60| 65 20 32 7c 20 39 35 2e | 34 0a 4c 69 6e 65 20 33 |e 2| 95.|4.Line 3|
|00000c70| 7c 20 39 31 2e 32 0a 4c | 69 6e 65 20 34 7c 20 39 || 91.2.L|ine 4| 9|
|00000c80| 33 2e 38 0a 4c 69 6e 65 | 20 35 7c 20 4e 44 5c 66 |3.8.Line| 5| ND\f|
|00000c90| 52 0a 2e 66 69 0a 2e 73 | 70 0a 62 61 72 20 2d 6c |R..fi..s|p.bar -l|
|00000ca0| 20 39 30 20 2d 75 20 31 | 30 30 20 2d 69 20 35 20 | 90 -u 1|00 -i 5 |
|00000cb0| 2d 74 20 22 54 45 53 54 | 20 54 49 54 4c 45 22 20 |-t "TEST| TITLE" |
|00000cc0| 64 61 74 61 66 69 6c 65 | 0a 2e 73 70 0a 49 6e 20 |datafile|..sp.In |
|00000cd0| 74 68 65 20 65 78 61 6d | 70 6c 65 20 61 62 6f 76 |the exam|ple abov|
|00000ce0| 65 20 77 69 6c 6c 20 70 | 72 6f 64 75 63 65 20 74 |e will p|roduce t|
|00000cf0| 68 65 20 63 6f 6d 6d 61 | 6e 64 73 20 74 6f 20 64 |he comma|nds to d|
|00000d00| 72 61 77 20 61 20 62 61 | 72 20 67 72 61 70 68 20 |raw a ba|r graph |
|00000d10| 0a 63 6f 6e 74 61 69 6e | 69 6e 67 20 35 20 68 6f |.contain|ing 5 ho|
|00000d20| 72 69 7a 6f 6e 74 61 6c | 20 62 61 72 73 2e 20 54 |rizontal| bars. T|
|00000d30| 68 65 20 62 61 72 73 20 | 77 69 6c 6c 20 65 78 74 |he bars |will ext|
|00000d40| 65 6e 64 20 66 72 6f 6d | 20 39 30 20 74 6f 20 31 |end from| 90 to 1|
|00000d50| 30 30 20 77 69 74 68 0a | 76 65 72 74 69 63 61 6c |00 with.|vertical|
|00000d60| 20 73 63 61 6c 65 20 6d | 61 72 6b 73 20 61 74 20 | scale m|arks at |
|00000d70| 39 30 2c 20 39 35 2c 20 | 61 6e 64 20 31 30 30 2e |90, 95, |and 100.|
|00000d80| 20 54 68 65 20 74 69 74 | 6c 65 20 6f 66 20 74 68 | The tit|le of th|
|00000d90| 65 20 62 61 72 20 77 69 | 6c 6c 20 62 65 0a 22 54 |e bar wi|ll be."T|
|00000da0| 45 53 54 20 54 49 54 4c | 45 22 2c 20 61 6e 64 20 |EST TITL|E", and |
|00000db0| 69 74 20 77 69 6c 6c 20 | 62 65 20 63 65 6e 74 65 |it will |be cente|
|00000dc0| 72 65 64 20 6f 6e 20 74 | 68 65 20 74 6f 70 20 6f |red on t|he top o|
|00000dd0| 66 20 74 68 65 20 70 61 | 67 65 2e 0a 2e 53 48 20 |f the pa|ge...SH |
|00000de0| 44 49 41 47 4e 4f 53 54 | 49 43 53 0a 54 68 65 20 |DIAGNOST|ICS.The |
|00000df0| 70 72 6f 67 72 61 6d 20 | 77 69 6c 6c 20 69 73 73 |program |will iss|
|00000e00| 75 65 20 61 20 77 61 72 | 6e 69 6e 67 20 6d 65 73 |ue a war|ning mes|
|00000e10| 73 61 67 65 20 69 66 20 | 74 68 65 20 75 70 70 65 |sage if |the uppe|
|00000e20| 72 20 6f 72 20 6c 6f 77 | 65 72 20 6c 69 6d 69 74 |r or low|er limit|
|00000e30| 73 0a 61 72 65 20 65 78 | 63 65 65 64 65 64 20 62 |s.are ex|ceeded b|
|00000e40| 79 20 61 6e 79 20 6f 66 | 20 74 68 65 20 64 61 74 |y any of| the dat|
|00000e50| 61 20 76 61 6c 75 65 73 | 2e 20 54 68 65 20 6b 65 |a values|. The ke|
|00000e60| 79 77 6f 72 64 20 22 4e | 44 22 20 77 69 6c 6c 20 |yword "N|D" will |
|00000e70| 62 65 0a 69 6e 74 65 72 | 70 72 65 74 65 64 20 62 |be.inter|preted b|
|00000e80| 79 20 74 68 65 20 70 72 | 6f 67 72 61 6d 20 74 6f |y the pr|ogram to|
|00000e90| 20 6d 65 61 6e 20 22 4e | 4f 20 44 41 54 41 22 2e | mean "N|O DATA".|
|00000ea0| 20 50 75 74 20 69 6e 20 | 74 68 65 20 22 76 61 6c | Put in |the "val|
|00000eb0| 75 65 22 0a 70 6f 73 69 | 74 69 6f 6e 20 69 6e 20 |ue".posi|tion in |
|00000ec0| 61 20 72 65 63 6f 72 64 | 2c 20 69 74 20 77 69 6c |a record|, it wil|
|00000ed0| 6c 20 63 61 75 73 65 20 | 6e 6f 20 62 61 72 20 74 |l cause |no bar t|
|00000ee0| 6f 20 62 65 20 70 72 69 | 6e 74 65 64 2c 20 61 6e |o be pri|nted, an|
|00000ef0| 64 20 74 68 65 0a 6c 65 | 74 74 65 72 73 20 22 4e |d the.le|tters "N|
|00000f00| 44 22 20 64 69 73 70 6c | 61 79 65 64 20 69 6e 73 |D" displ|ayed ins|
|00000f10| 74 65 61 64 20 6f 66 20 | 61 20 64 61 74 61 20 76 |tead of |a data v|
|00000f20| 61 6c 75 65 2e 0a 2e 53 | 48 20 41 55 54 48 4f 52 |alue...S|H AUTHOR|
|00000f30| 0a 44 61 6e 20 46 6c 61 | 6b 2c 20 4d 63 43 61 77 |.Dan Fla|k, McCaw|
|00000f40| 20 43 65 6c 6c 75 6c 61 | 72 20 43 6f 6d 6d 75 6e | Cellula|r Commun|
|00000f50| 69 63 61 74 69 6f 6e 73 | 20 49 6e 63 2e 2c 20 32 |ications| Inc., 2|
|00000f60| 30 31 20 45 6c 6c 69 6f | 74 74 20 41 76 65 20 57 |01 Ellio|tt Ave W|
|00000f70| 2c 20 53 75 69 74 65 20 | 31 30 35 2c 20 0a 53 65 |, Suite |105, .Se|
|00000f80| 61 74 74 6c 65 2c 20 57 | 61 20 39 38 31 31 39 2c |attle, W|a 98119,|
|00000f90| 20 32 30 36 2d 32 38 36 | 2d 34 33 35 35 20 28 75 | 206-286|-4355 (u|
|00000fa0| 73 65 6e 65 74 3a 20 6e | 77 6e 65 78 75 73 21 6d |senet: n|wnexus!m|
|00000fb0| 63 67 70 31 21 66 6c 61 | 6b 29 0a 2e 53 48 20 42 |cgp1!fla|k)..SH B|
|00000fc0| 55 47 53 0a 53 48 41 52 | 5f 45 4f 46 0a 63 68 6d |UGS.SHAR|_EOF.chm|
|00000fd0| 6f 64 20 30 36 34 34 20 | 62 61 72 2e 65 6c 20 7c |od 0644 |bar.el ||
|00000fe0| 7c 0a 65 63 68 6f 20 27 | 72 65 73 74 6f 72 65 20 ||.echo '|restore |
|00000ff0| 6f 66 20 62 61 72 2e 65 | 6c 20 66 61 69 6c 65 64 |of bar.e|l failed|
|00001000| 27 0a 57 63 5f 63 3d 22 | 60 77 63 20 2d 63 20 3c |'.Wc_c="|`wc -c <|
|00001010| 20 27 62 61 72 2e 65 6c | 27 60 22 0a 74 65 73 74 | 'bar.el|'`".test|
|00001020| 20 31 38 30 35 20 2d 65 | 71 20 22 24 57 63 5f 63 | 1805 -e|q "$Wc_c|
|00001030| 22 20 7c 7c 0a 09 65 63 | 68 6f 20 27 62 61 72 2e |" ||..ec|ho 'bar.|
|00001040| 65 6c 3a 20 6f 72 69 67 | 69 6e 61 6c 20 73 69 7a |el: orig|inal siz|
|00001050| 65 20 31 38 30 35 2c 20 | 63 75 72 72 65 6e 74 20 |e 1805, |current |
|00001060| 73 69 7a 65 27 20 22 24 | 57 63 5f 63 22 0a 66 69 |size' "$|Wc_c".fi|
|00001070| 0a 23 20 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |.# =====|========|
|00001080| 20 62 61 72 2e 63 20 3d | 3d 3d 3d 3d 3d 3d 3d 3d | bar.c =|========|
|00001090| 3d 3d 3d 3d 3d 0a 69 66 | 20 74 65 73 74 20 2d 66 |=====.if| test -f|
|000010a0| 20 27 62 61 72 2e 63 27 | 20 2d 61 20 58 22 24 31 | 'bar.c'| -a X"$1|
|000010b0| 22 20 21 3d 20 58 22 2d | 63 22 3b 20 74 68 65 6e |" != X"-|c"; then|
|000010c0| 0a 09 65 63 68 6f 20 27 | 78 20 2d 20 73 6b 69 70 |..echo '|x - skip|
|000010d0| 70 69 6e 67 20 62 61 72 | 2e 63 20 28 46 69 6c 65 |ping bar|.c (File|
|000010e0| 20 61 6c 72 65 61 64 79 | 20 65 78 69 73 74 73 29 | already| exists)|
|000010f0| 27 0a 65 6c 73 65 0a 65 | 63 68 6f 20 27 78 20 2d |'.else.e|cho 'x -|
|00001100| 20 65 78 74 72 61 63 74 | 69 6e 67 20 62 61 72 2e | extract|ing bar.|
|00001110| 63 20 28 54 65 78 74 29 | 27 0a 73 65 64 20 27 73 |c (Text)|'.sed 's|
|00001120| 2f 5e 58 2f 2f 27 20 3c | 3c 20 27 53 48 41 52 5f |/^X//' <|< 'SHAR_|
|00001130| 45 4f 46 27 20 3e 20 27 | 62 61 72 2e 63 27 20 26 |EOF' > '|bar.c' &|
|00001140| 26 0a 2f 2a 2b 0a 58 20 | 2a 20 46 69 6c 65 3a 20 |&./*+.X |* File: |
|00001150| 62 61 72 2e 63 0a 58 20 | 2a 0a 58 20 2a 20 44 65 |bar.c.X |*.X * De|
|00001160| 73 63 72 69 70 74 69 6f | 6e 3a 20 50 72 6f 64 75 |scriptio|n: Produ|
|00001170| 63 65 20 61 20 62 61 72 | 20 67 72 61 70 68 20 75 |ce a bar| graph u|
|00001180| 73 69 6e 67 20 70 69 63 | 20 61 6e 64 20 74 72 6f |sing pic| and tro|
|00001190| 66 66 2e 0a 58 20 2a 0a | 58 20 2a 20 41 75 64 69 |ff..X *.|X * Audi|
|000011a0| 74 20 54 72 61 69 6c 3a | 0a 58 20 2a 20 20 20 4f |t Trail:|.X *   O|
|000011b0| 72 69 67 69 6e 61 6c 20 | 41 75 74 68 6f 72 20 61 |riginal |Author a|
|000011c0| 6e 64 20 44 61 74 65 3a | 20 44 61 6e 20 46 6c 61 |nd Date:| Dan Fla|
|000011d0| 6b 20 2d 20 4e 6f 76 65 | 6d 62 65 72 20 32 36 2c |k - Nove|mber 26,|
|000011e0| 20 31 39 39 30 0a 58 20 | 2a 20 20 20 55 70 64 61 | 1990.X |*   Upda|
|000011f0| 74 65 20 74 6f 20 67 65 | 6e 65 72 61 6c 20 63 61 |te to ge|neral ca|
|00001200| 73 65 3a 20 44 61 6e 20 | 46 6c 61 6b 20 2d 20 46 |se: Dan |Flak - F|
|00001210| 65 62 72 75 61 72 79 20 | 31 33 2c 20 31 39 39 31 |ebruary |13, 1991|
|00001220| 0a 58 20 2a 0a 2d 2a 2f | 0a 23 69 66 64 65 66 20 |.X *.-*/|.#ifdef |
|00001230| 56 45 52 53 49 4f 4e 0a | 73 74 61 74 69 63 20 63 |VERSION.|static c|
|00001240| 68 61 72 20 2a 53 43 43 | 53 20 3d 20 22 25 5a 25 |har *SCC|S = "%Z%|
|00001250| 20 25 4d 25 20 25 49 25 | 20 25 47 25 20 25 55 25 | %M% %I%| %G% %U%|
|00001260| 22 3b 0a 23 65 6e 64 69 | 66 0a 58 0a 2f 2a 20 23 |";.#endi|f.X./* #|
|00001270| 69 6e 63 6c 75 64 65 73 | 20 2a 2f 0a 23 69 6e 63 |includes| */.#inc|
|00001280| 6c 75 64 65 20 3c 73 74 | 64 69 6f 2e 68 3e 0a 58 |lude <st|dio.h>.X|
|00001290| 0a 2f 2a 20 23 64 65 66 | 69 6e 65 73 20 20 2a 2f |./* #def|ines  */|
|000012a0| 0a 23 64 65 66 69 6e 65 | 20 53 41 59 20 70 72 69 |.#define| SAY pri|
|000012b0| 6e 74 66 0a 23 64 65 66 | 69 6e 65 20 51 55 4f 54 |ntf.#def|ine QUOT|
|000012c0| 45 20 27 5c 30 34 32 27 | 0a 23 64 65 66 69 6e 65 |E '\042'|.#define|
|000012d0| 20 42 41 43 4b 53 4c 41 | 53 48 20 27 5c 31 33 34 | BACKSLA|SH '\134|
|000012e0| 27 0a 58 0a 2f 2a 20 65 | 78 74 65 72 6e 61 6c 20 |'.X./* e|xternal |
|000012f0| 76 61 72 69 61 62 6c 65 | 73 20 2a 2f 0a 58 0a 65 |variable|s */.X.e|
|00001300| 78 74 65 72 6e 20 63 68 | 61 72 20 2a 6f 70 74 61 |xtern ch|ar *opta|
|00001310| 72 67 3b 0a 65 78 74 65 | 72 6e 20 69 6e 74 20 20 |rg;.exte|rn int  |
|00001320| 6f 70 74 69 6e 64 3b 0a | 65 78 74 65 72 6e 20 69 |optind;.|extern i|
|00001330| 6e 74 20 20 6f 70 74 65 | 72 72 3b 0a 65 78 74 65 |nt  opte|rr;.exte|
|00001340| 72 6e 20 69 6e 74 20 20 | 6f 70 74 6f 70 74 3b 0a |rn int  |optopt;.|
|00001350| 2f 2a 20 72 65 66 65 72 | 65 6e 63 65 64 20 65 78 |/* refer|enced ex|
|00001360| 74 65 72 6e 61 6c 20 66 | 75 6e 63 74 69 6f 6e 73 |ternal f|unctions|
|00001370| 20 2a 2f 0a 66 6c 6f 61 | 74 20 61 74 6f 66 28 29 | */.floa|t atof()|
|00001380| 3b 0a 58 0a 2f 2a 20 69 | 6e 74 65 72 6e 61 6c 20 |;.X./* i|nternal |
|00001390| 66 75 6e 63 74 69 6f 6e | 73 20 2a 2f 0a 76 6f 69 |function|s */.voi|
|000013a0| 64 20 73 74 72 69 70 28 | 29 3b 0a 58 0a 2f 2a 20 |d strip(|);.X./* |
|000013b0| 67 6c 6f 62 61 6c 20 76 | 61 72 69 61 62 6c 65 73 |global v|ariables|
|000013c0| 20 20 20 2a 2f 0a 58 0a | 73 74 72 75 63 74 20 72 |   */.X.|struct r|
|000013d0| 65 63 6f 72 64 0a 58 09 | 7b 0a 58 09 63 68 61 72 |ecord.X.|{.X.char|
|000013e0| 20 20 6d 61 72 6b 65 74 | 5b 32 31 5d 3b 0a 58 09 |  market|[21];.X.|
|000013f0| 66 6c 6f 61 74 20 66 3b | 0a 58 09 63 68 61 72 20 |float f;|.X.char |
|00001400| 20 6d 5b 38 5d 3b 0a 58 | 09 7d 20 72 65 63 5b 33 | m[8];.X|.} rec[3|
|00001410| 30 5d 3b 0a 58 0a 66 6c | 6f 61 74 20 6c 6f 77 65 |0];.X.fl|oat lowe|
|00001420| 72 20 3d 20 30 2c 20 75 | 70 70 65 72 20 3d 20 31 |r = 0, u|pper = 1|
|00001430| 30 30 2c 20 6c 69 6e 65 | 61 74 20 3d 20 31 30 3b |00, line|at = 10;|
|00001440| 0a 63 68 61 72 20 20 74 | 69 74 6c 65 5b 38 30 5d |.char  t|itle[80]|
|00001450| 20 3d 20 22 22 3b 0a 69 | 6e 74 20 6e 72 65 63 73 | = "";.i|nt nrecs|
|00001460| 20 3d 20 30 3b 0a 58 0a | 46 49 4c 45 20 2a 66 69 | = 0;.X.|FILE *fi|
|00001470| 6e 2c 20 2a 66 6c 69 6d | 69 74 2c 20 2a 66 6f 70 |n, *flim|it, *fop|
|00001480| 65 6e 28 29 3b 0a 58 0a | 58 0a 2f 2a 20 73 74 61 |en();.X.|X./* sta|
|00001490| 74 69 63 20 76 61 72 69 | 61 62 6c 65 73 20 20 20 |tic vari|ables   |
|000014a0| 2a 2f 0a 58 0a 58 0c 0a | 2f 2a 3c 0a 58 20 2a 20 |*/.X.X..|/*<.X * |
|000014b0| 46 75 6e 63 74 69 6f 6e | 3a 20 6d 61 69 6e 0a 58 |Function|: main.X|
|000014c0| 20 2a 0a 58 20 2a 20 44 | 65 73 63 72 69 70 74 69 | *.X * D|escripti|
|000014d0| 6f 6e 3a 20 50 61 72 73 | 65 20 74 68 65 20 64 61 |on: Pars|e the da|
|000014e0| 74 61 20 61 6e 64 20 6d | 61 6b 65 20 61 20 70 69 |ta and m|ake a pi|
|000014f0| 63 20 66 69 6c 65 0a 58 | 20 2a 0a 58 20 2a 20 44 |c file.X| *.X * D|
|00001500| 61 74 61 20 54 79 70 65 | 3a 20 69 6e 74 0a 58 20 |ata Type|: int.X |
|00001510| 2a 0a 58 20 2a 20 41 72 | 67 75 6d 65 6e 74 73 3a |*.X * Ar|guments:|
|00001520| 20 0a 58 20 2a 20 20 20 | 20 61 72 67 76 5b 5d 20 | .X *   | argv[] |
|00001530| 2d 20 64 61 74 61 20 66 | 69 6c 65 2e 0a 58 20 2a |- data f|ile..X *|
|00001540| 0a 58 20 2a 20 20 20 20 | 46 6c 61 67 73 0a 58 20 |.X *    |Flags.X |
|00001550| 2a 20 20 20 20 2d 6c 20 | 20 20 20 6c 6f 77 65 72 |*    -l |   lower|
|00001560| 20 6c 69 6d 69 74 0a 58 | 20 2a 20 20 20 20 2d 75 | limit.X| *    -u|
|00001570| 20 20 20 20 75 70 70 65 | 72 20 6c 69 6d 69 74 0a |    uppe|r limit.|
|00001580| 58 20 2a 20 20 20 20 2d | 69 20 20 20 20 69 6e 63 |X *    -|i    inc|
|00001590| 72 65 6d 65 6e 74 0a 58 | 20 2a 20 20 20 20 2d 74 |rement.X| *    -t|
|000015a0| 20 20 20 20 74 69 74 6c | 65 20 73 74 72 69 6e 67 |    titl|e string|
|000015b0| 0a 58 20 2a 0a 58 20 2a | 20 52 65 74 75 72 6e 73 |.X *.X *| Returns|
|000015c0| 3a 0a 58 20 2a 0a 58 20 | 2a 20 53 69 64 65 20 45 |:.X *.X |* Side E|
|000015d0| 66 66 65 63 74 73 3a 0a | 58 20 2a 0a 58 20 2a 20 |ffects:.|X *.X * |
|000015e0| 43 61 6c 6c 73 3a 0a 58 | 20 2a 0a 58 20 2a 20 50 |Calls:.X| *.X * P|
|000015f0| 44 4c 0a 58 20 2a 0a 3e | 2a 2f 0a 58 0a 69 6e 74 |DL.X *.>|*/.X.int|
|00001600| 0a 6d 61 69 6e 20 28 61 | 72 67 63 2c 20 61 72 67 |.main (a|rgc, arg|
|00001610| 76 29 0a 69 6e 74 20 20 | 61 72 67 63 3b 0a 63 68 |v).int  |argc;.ch|
|00001620| 61 72 20 2a 2a 61 72 67 | 76 3b 0a 7b 0a 69 6e 74 |ar **arg|v;.{.int|
|00001630| 20 63 3b 0a 69 6e 74 20 | 69 2c 20 6a 2c 20 6b 2c | c;.int |i, j, k,|
|00001640| 20 6e 66 6f 75 6e 64 3b | 0a 66 6c 6f 61 74 20 72 | nfound;|.float r|
|00001650| 61 6e 67 65 2c 20 70 65 | 72 69 6e 63 68 3b 0a 63 |ange, pe|rinch;.c|
|00001660| 68 61 72 20 6c 69 6e 65 | 62 75 66 5b 31 30 30 30 |har line|buf[1000|
|00001670| 5d 3b 0a 58 0a 77 68 69 | 6c 65 20 28 28 63 20 3d |];.X.whi|le ((c =|
|00001680| 20 67 65 74 6f 70 74 20 | 28 61 72 67 63 2c 20 61 | getopt |(argc, a|
|00001690| 72 67 76 2c 20 22 69 3a | 6c 3a 75 3a 74 3a 22 29 |rgv, "i:|l:u:t:")|
|000016a0| 29 20 21 3d 20 45 4f 46 | 29 0a 58 09 7b 0a 58 09 |) != EOF|).X.{.X.|
|000016b0| 73 77 69 74 63 68 20 28 | 63 29 0a 58 09 09 7b 0a |switch (|c).X..{.|
|000016c0| 58 09 09 63 61 73 65 20 | 27 69 27 3a 0a 58 09 09 |X..case |'i':.X..|
|000016d0| 09 6c 69 6e 65 61 74 20 | 3d 20 61 74 6f 66 20 28 |.lineat |= atof (|
|000016e0| 6f 70 74 61 72 67 29 3b | 0a 58 09 09 62 72 65 61 |optarg);|.X..brea|
|000016f0| 6b 3b 0a 58 09 09 63 61 | 73 65 20 27 6c 27 3a 0a |k;.X..ca|se 'l':.|
|00001700| 58 09 09 09 6c 6f 77 65 | 72 20 3d 20 61 74 6f 66 |X...lowe|r = atof|
|00001710| 20 28 6f 70 74 61 72 67 | 29 3b 0a 58 09 09 62 72 | (optarg|);.X..br|
|00001720| 65 61 6b 3b 0a 58 09 09 | 63 61 73 65 20 27 75 27 |eak;.X..|case 'u'|
|00001730| 3a 0a 58 09 09 09 75 70 | 70 65 72 20 3d 20 61 74 |:.X...up|per = at|
|00001740| 6f 66 20 28 6f 70 74 61 | 72 67 29 3b 0a 58 09 09 |of (opta|rg);.X..|
|00001750| 62 72 65 61 6b 3b 0a 58 | 09 09 63 61 73 65 20 27 |break;.X|..case '|
|00001760| 74 27 3a 0a 58 09 09 09 | 73 70 72 69 6e 74 66 20 |t':.X...|sprintf |
|00001770| 28 74 69 74 6c 65 2c 20 | 22 25 73 22 2c 20 6f 70 |(title, |"%s", op|
|00001780| 74 61 72 67 29 3b 0a 58 | 09 09 62 72 65 61 6b 3b |targ);.X|..break;|
|00001790| 0a 58 09 09 64 65 66 61 | 75 6c 74 3a 0a 58 09 09 |.X..defa|ult:.X..|
|000017a0| 09 3b 0a 58 09 09 62 72 | 65 61 6b 3b 0a 58 09 09 |.;.X..br|eak;.X..|
|000017b0| 7d 0a 58 09 7d 0a 58 0a | 2f 2a 20 20 52 65 61 64 |}.X.}.X.|/*  Read|
|000017c0| 20 64 61 74 61 20 66 69 | 6c 65 20 2a 2f 0a 69 66 | data fi|le */.if|
|000017d0| 20 28 28 66 69 6e 20 3d | 20 66 6f 70 65 6e 20 28 | ((fin =| fopen (|
|000017e0| 61 72 67 76 5b 6f 70 74 | 69 6e 64 5d 2c 20 22 72 |argv[opt|ind], "r|
|000017f0| 22 29 29 20 3d 3d 20 4e | 55 4c 4c 29 0a 58 09 7b |")) == N|ULL).X.{|
|00001800| 0a 58 09 66 70 72 69 6e | 74 66 20 28 73 74 64 65 |.X.fprin|tf (stde|
|00001810| 72 72 2c 20 22 25 73 3a | 20 63 61 6e 27 74 20 6f |rr, "%s:| can't o|
|00001820| 70 65 6e 20 25 73 5c 6e | 22 2c 20 61 72 67 76 5b |pen %s\n|", argv[|
|00001830| 30 5d 2c 20 61 72 67 76 | 5b 6f 70 74 69 6e 64 5d |0], argv|[optind]|
|00001840| 29 3b 0a 58 09 65 78 69 | 74 20 28 2d 31 29 3b 0a |);.X.exi|t (-1);.|
|00001850| 58 09 7d 0a 58 0a 77 68 | 69 6c 65 20 28 66 67 65 |X.}.X.wh|ile (fge|
|00001860| 74 73 20 28 6c 69 6e 65 | 62 75 66 2c 20 31 30 30 |ts (line|buf, 100|
|00001870| 30 2c 20 66 69 6e 29 20 | 21 3d 20 4e 55 4c 4c 29 |0, fin) |!= NULL)|
|00001880| 0a 58 09 7b 0a 58 09 6e | 66 6f 75 6e 64 20 3d 20 |.X.{.X.n|found = |
|00001890| 73 73 63 61 6e 66 20 28 | 6c 69 6e 65 62 75 66 2c |sscanf (|linebuf,|
|000018a0| 20 22 25 5b 5e 7c 5d 7c | 25 5b 5e 27 5c 6e 27 5d | "%[^|]||%[^'\n']|
|000018b0| 22 2c 0a 58 09 09 72 65 | 63 5b 6e 72 65 63 73 5d |",.X..re|c[nrecs]|
|000018c0| 2e 6d 61 72 6b 65 74 2c | 20 72 65 63 5b 6e 72 65 |.market,| rec[nre|
|000018d0| 63 73 5d 2e 6d 29 3b 0a | 58 09 69 66 20 28 6e 66 |cs].m);.|X.if (nf|
|000018e0| 6f 75 6e 64 20 3d 3d 20 | 32 29 0a 58 09 09 7b 0a |ound == |2).X..{.|
|000018f0| 58 09 09 73 74 72 69 70 | 20 28 72 65 63 5b 6e 72 |X..strip| (rec[nr|
|00001900| 65 63 73 5d 2e 6d 29 3b | 0a 58 09 09 69 66 20 28 |ecs].m);|.X..if (|
|00001910| 73 74 72 6e 63 6d 70 20 | 28 72 65 63 5b 6e 72 65 |strncmp |(rec[nre|
|00001920| 63 73 5d 2e 6d 2c 20 22 | 4e 44 22 2c 20 32 29 29 |cs].m, "|ND", 2))|
|00001930| 0a 58 09 09 09 7b 0a 58 | 09 09 09 72 65 63 5b 6e |.X...{.X|...rec[n|
|00001940| 72 65 63 73 5d 2e 66 20 | 3d 20 61 74 6f 66 20 28 |recs].f |= atof (|
|00001950| 72 65 63 5b 6e 72 65 63 | 73 5d 2e 6d 29 3b 0a 58 |rec[nrec|s].m);.X|
|00001960| 09 09 09 7d 0a 58 09 09 | 65 6c 73 65 0a 58 09 09 |...}.X..|else.X..|
|00001970| 09 7b 0a 58 09 09 09 72 | 65 63 5b 6e 72 65 63 73 |.{.X...r|ec[nrecs|
|00001980| 5d 2e 66 20 3d 20 6c 6f | 77 65 72 3b 0a 58 09 09 |].f = lo|wer;.X..|
|00001990| 09 7d 0a 58 09 09 6e 72 | 65 63 73 2b 2b 3b 0a 58 |.}.X..nr|ecs++;.X|
|000019a0| 09 09 7d 0a 58 09 7d 0a | 58 0a 66 63 6c 6f 73 65 |..}.X.}.|X.fclose|
|000019b0| 20 28 66 69 6e 29 3b 0a | 58 0a 2f 2a 20 20 43 68 | (fin);.|X./*  Ch|
|000019c0| 65 63 6b 20 75 70 70 65 | 72 20 61 6e 64 20 6c 6f |eck uppe|r and lo|
|000019d0| 77 65 72 20 62 6f 75 6e | 64 73 20 20 2a 2f 0a 58 |wer boun|ds  */.X|
|000019e0| 0a 66 6f 72 20 28 69 20 | 3d 20 30 3b 20 69 20 3c |.for (i |= 0; i <|
|000019f0| 20 6e 72 65 63 73 3b 20 | 69 2b 2b 29 0a 58 09 7b | nrecs; |i++).X.{|
|00001a00| 0a 58 09 69 66 20 28 72 | 65 63 5b 69 5d 2e 66 20 |.X.if (r|ec[i].f |
|00001a10| 3c 20 6c 6f 77 65 72 29 | 0a 58 09 09 7b 0a 58 09 |< lower)|.X..{.X.|
|00001a20| 09 66 70 72 69 6e 74 66 | 20 28 73 74 64 65 72 72 |.fprintf| (stderr|
|00001a30| 2c 20 22 57 61 72 6e 69 | 6e 67 3a 20 6c 6f 77 65 |, "Warni|ng: lowe|
|00001a40| 72 20 6c 69 6d 69 74 20 | 65 78 63 65 65 64 65 64 |r limit |exceeded|
|00001a50| 20 25 73 20 2d 20 25 66 | 5c 6e 22 2c 20 0a 58 09 | %s - %f|\n", .X.|
|00001a60| 09 09 72 65 63 5b 69 5d | 2e 6d 61 72 6b 65 74 2c |..rec[i]|.market,|
|00001a70| 20 72 65 63 5b 69 5d 2e | 66 29 3b 0a 58 09 09 7d | rec[i].|f);.X..}|
|00001a80| 0a 58 0a 58 09 69 66 20 | 28 72 65 63 5b 69 5d 2e |.X.X.if |(rec[i].|
|00001a90| 66 20 3e 20 75 70 70 65 | 72 29 0a 58 09 09 7b 0a |f > uppe|r).X..{.|
|00001aa0| 58 09 09 66 70 72 69 6e | 74 66 20 28 73 74 64 65 |X..fprin|tf (stde|
|00001ab0| 72 72 2c 20 22 57 61 72 | 6e 69 6e 67 3a 20 75 70 |rr, "War|ning: up|
|00001ac0| 70 65 72 20 6c 69 6d 69 | 74 20 65 78 63 65 65 64 |per limi|t exceed|
|00001ad0| 65 64 20 25 73 20 2d 20 | 25 66 5c 6e 22 2c 0a 58 |ed %s - |%f\n",.X|
|00001ae0| 09 09 09 72 65 63 5b 69 | 5d 2e 6d 61 72 6b 65 74 |...rec[i|].market|
|00001af0| 2c 20 72 65 63 5b 69 5d | 2e 66 29 3b 0a 58 09 09 |, rec[i]|.f);.X..|
|00001b00| 7d 0a 58 09 7d 0a 58 0a | 58 0a 2f 2a 20 20 42 75 |}.X.}.X.|X./*  Bu|
|00001b10| 69 6c 64 20 74 68 65 20 | 66 69 6c 65 20 74 68 61 |ild the |file tha|
|00001b20| 74 20 77 69 6c 6c 20 70 | 6c 6f 74 20 74 68 65 20 |t will p|lot the |
|00001b30| 67 72 61 70 68 20 20 2a | 2f 0a 58 0a 70 72 69 6e |graph  *|/.X.prin|
|00001b40| 74 66 20 28 22 2e 64 65 | 20 29 6b 5c 6e 2e 2e 5c |tf (".de| )k\n..\|
|00001b50| 6e 22 29 3b 0a 70 72 69 | 6e 74 66 20 28 22 2e 50 |n");.pri|ntf (".P|
|00001b60| 48 5c 6e 22 29 3b 0a 70 | 72 69 6e 74 66 20 28 22 |H\n");.p|rintf ("|
|00001b70| 2e 70 73 20 31 32 5c 6e | 22 29 3b 0a 70 72 69 6e |.ps 12\n|");.prin|
|00001b80| 74 66 20 28 22 2e 76 73 | 20 31 32 5c 6e 22 29 3b |tf (".vs| 12\n");|
|00001b90| 0a 70 72 69 6e 74 66 20 | 28 22 2e 63 65 20 33 5c |.printf |(".ce 3\|
|00001ba0| 6e 22 29 3b 0a 70 72 69 | 6e 74 66 20 28 22 25 63 |n");.pri|ntf ("%c|
|00001bb0| 73 2b 34 25 63 66 42 25 | 73 25 63 66 50 25 63 73 |s+4%cfB%|s%cfP%cs|
|00001bc0| 30 5c 6e 22 2c 20 0a 58 | 09 42 41 43 4b 53 4c 41 |0\n", .X|.BACKSLA|
|00001bd0| 53 48 2c 20 42 41 43 4b | 53 4c 41 53 48 2c 20 74 |SH, BACK|SLASH, t|
|00001be0| 69 74 6c 65 2c 20 42 41 | 43 4b 53 4c 41 53 48 2c |itle, BA|CKSLASH,|
|00001bf0| 20 42 41 43 4b 53 4c 41 | 53 48 29 3b 0a 70 72 69 | BACKSLA|SH);.pri|
|00001c00| 6e 74 66 20 28 22 2e 70 | 73 31 33 5c 6e 22 29 3b |ntf (".p|s13\n");|
|00001c10| 0a 70 72 69 6e 74 66 20 | 28 22 2e 62 72 5c 6e 22 |.printf |(".br\n"|
|00001c20| 29 3b 0a 70 72 69 6e 74 | 66 20 28 22 2e 44 53 5c |);.print|f (".DS\|
|00001c30| 6e 22 29 3b 0a 70 72 69 | 6e 74 66 20 28 22 2e 50 |n");.pri|ntf (".P|
|00001c40| 53 5c 6e 22 29 3b 0a 70 | 72 69 6e 74 66 20 28 22 |S\n");.p|rintf ("|
|00001c50| 5c 6e 23 20 73 65 74 20 | 69 6e 76 69 73 69 62 6c |\n# set |invisibl|
|00001c60| 65 20 72 65 66 65 72 6e | 65 63 65 20 62 6f 78 5c |e refern|ece box\|
|00001c70| 6e 22 29 3b 0a 70 72 69 | 6e 74 66 20 28 22 62 6f |n");.pri|ntf ("bo|
|00001c80| 78 68 74 20 3d 20 37 2e | 30 3b 20 62 6f 78 77 69 |xht = 7.|0; boxwi|
|00001c90| 64 20 3d 20 34 2e 35 5c | 6e 22 29 3b 0a 70 72 69 |d = 4.5\|n");.pri|
|00001ca0| 6e 74 66 20 28 22 6d 6f | 76 65 20 74 6f 20 28 31 |ntf ("mo|ve to (1|
|00001cb0| 2e 35 2c 20 2d 34 2e 30 | 29 3b 20 4f 42 3a 20 62 |.5, -4.0|); OB: b|
|00001cc0| 6f 78 20 69 6e 76 69 73 | 20 25 63 20 25 63 5c 6e |ox invis| %c %c\n|
|00001cd0| 22 2c 20 51 55 4f 54 45 | 2c 20 51 55 4f 54 45 29 |", QUOTE|, QUOTE)|
|00001ce0| 3b 0a 70 72 69 6e 74 66 | 20 28 22 5c 6e 23 20 73 |;.printf| ("\n# s|
|00001cf0| 65 74 20 73 74 61 6e 64 | 61 72 64 20 62 6f 78 20 |et stand|ard box |
|00001d00| 68 65 69 67 68 74 20 66 | 6f 72 20 31 32 20 70 6f |height f|or 12 po|
|00001d10| 69 6e 74 20 70 69 74 63 | 68 5c 6e 22 29 3b 0a 70 |int pitc|h\n");.p|
|00001d20| 72 69 6e 74 66 20 28 22 | 62 6f 78 68 74 20 3d 20 |rintf ("|boxht = |
|00001d30| 2e 31 36 36 37 5c 6e 22 | 29 3b 0a 72 61 6e 67 65 |.1667\n"|);.range|
|00001d40| 20 3d 20 75 70 70 65 72 | 20 2d 20 6c 6f 77 65 72 | = upper| - lower|
|00001d50| 3b 0a 70 65 72 69 6e 63 | 68 20 3d 20 34 2e 35 20 |;.perinc|h = 4.5 |
|00001d60| 2f 20 72 61 6e 67 65 3b | 0a 70 72 69 6e 74 66 20 |/ range;|.printf |
|00001d70| 28 22 5c 6e 23 20 77 6f | 72 6b 61 72 6f 75 6e 64 |("\n# wo|rkaround|
|00001d80| 20 66 6f 72 20 62 75 67 | 20 69 6e 20 27 6f 6c 64 | for bug| in 'old|
|00001d90| 27 20 70 69 63 5c 6e 22 | 29 3b 0a 70 72 69 6e 74 |' pic\n"|);.print|
|00001da0| 66 20 28 22 25 63 20 20 | 20 25 63 20 61 74 20 4f |f ("%c  | %c at O|
|00001db0| 42 2e 6e 77 20 2b 20 28 | 30 2c 20 2e 32 29 5c 6e |B.nw + (|0, .2)\n|
|00001dc0| 22 2c 20 27 22 27 2c 20 | 27 22 27 29 3b 0a 70 72 |", '"', |'"');.pr|
|00001dd0| 69 6e 74 66 20 28 22 5c | 6e 23 20 61 64 64 20 74 |intf ("\|n# add t|
|00001de0| 69 74 6c 65 20 72 65 66 | 65 72 65 6e 63 65 20 6c |itle ref|erence l|
|00001df0| 69 6e 65 73 5c 6e 22 29 | 3b 0a 70 72 69 6e 74 66 |ines\n")|;.printf|
|00001e00| 20 28 22 25 63 25 34 2e | 31 66 25 63 20 61 74 20 | ("%c%4.|1f%c at |
|00001e10| 4f 42 2e 6e 77 20 2b 20 | 28 30 2c 20 2e 32 29 5c |OB.nw + |(0, .2)\|
|00001e20| 6e 22 2c 20 0a 58 09 27 | 22 27 2c 20 6c 6f 77 65 |n", .X.'|"', lowe|
|00001e30| 72 2c 20 27 22 27 29 3b | 0a 66 6f 72 20 28 6b 20 |r, '"');|.for (k |
|00001e40| 3d 20 30 3b 20 6b 20 3c | 20 72 61 6e 67 65 20 2f |= 0; k <| range /|
|00001e50| 20 6c 69 6e 65 61 74 3b | 20 6b 2b 2b 29 0a 58 09 | lineat;| k++).X.|
|00001e60| 7b 0a 58 09 70 72 69 6e | 74 66 20 28 22 25 63 25 |{.X.prin|tf ("%c%|
|00001e70| 34 2e 31 66 25 63 20 61 | 74 20 4f 42 2e 6e 77 20 |4.1f%c a|t OB.nw |
|00001e80| 2b 20 28 25 66 2c 20 2e | 32 29 5c 6e 22 2c 20 0a |+ (%f, .|2)\n", .|
|00001e90| 58 09 09 27 22 27 2c 20 | 6c 6f 77 65 72 20 2b 20 |X..'"', |lower + |
|00001ea0| 28 6b 20 2b 20 31 29 20 | 2a 20 6c 69 6e 65 61 74 |(k + 1) |* lineat|
|00001eb0| 2c 20 27 22 27 2c 0a 58 | 09 09 28 6b 20 2b 20 31 |, '"',.X|..(k + 1|
|00001ec0| 29 20 2a 20 6c 69 6e 65 | 61 74 20 2a 20 70 65 72 |) * line|at * per|
|00001ed0| 69 6e 63 68 29 3b 0a 58 | 09 7d 0a 66 6f 72 20 28 |inch);.X|.}.for (|
|00001ee0| 69 20 3d 20 30 3b 20 69 | 20 3c 20 6e 72 65 63 73 |i = 0; i| < nrecs|
|00001ef0| 3b 20 69 2b 2b 29 0a 58 | 09 7b 0a 58 09 70 72 69 |; i++).X|.{.X.pri|
|00001f00| 6e 74 66 20 28 22 23 20 | 47 72 61 70 68 20 66 6f |ntf ("# |Graph fo|
|00001f10| 72 20 25 73 20 5c 6e 22 | 2c 20 72 65 63 5b 69 5d |r %s \n"|, rec[i]|
|00001f20| 2e 6d 61 72 6b 65 74 29 | 3b 0a 58 09 70 72 69 6e |.market)|;.X.prin|
|00001f30| 74 66 20 28 22 62 6f 78 | 77 69 64 20 3d 20 25 66 |tf ("box|wid = %f|
|00001f40| 5c 6e 22 2c 20 28 72 65 | 63 5b 69 5d 2e 66 20 2d |\n", (re|c[i].f -|
|00001f50| 20 6c 6f 77 65 72 29 20 | 2a 20 70 65 72 69 6e 63 | lower) |* perinc|
|00001f60| 68 29 3b 0a 58 09 70 72 | 69 6e 74 66 20 28 22 25 |h);.X.pr|intf ("%|
|00001f70| 63 25 73 25 63 20 61 74 | 20 4f 42 2e 6e 77 20 2b |c%s%c at| OB.nw +|
|00001f80| 20 28 2d 2e 31 2c 20 2d | 25 66 29 20 72 6a 75 73 | (-.1, -|%f) rjus|
|00001f90| 74 5c 6e 22 2c 20 0a 58 | 09 09 27 22 27 2c 20 72 |t\n", .X|..'"', r|
|00001fa0| 65 63 5b 69 5d 2e 6d 61 | 72 6b 65 74 2c 20 27 22 |ec[i].ma|rket, '"|
|00001fb0| 27 2c 20 69 20 2a 20 2e | 33 33 33 33 29 3b 0a 58 |', i * .|3333);.X|
|00001fc0| 09 70 72 69 6e 74 66 20 | 28 22 6d 6f 76 65 20 74 |.printf |("move t|
|00001fd0| 6f 20 4f 42 2e 6e 77 20 | 2b 20 28 30 2c 20 2d 25 |o OB.nw |+ (0, -%|
|00001fe0| 66 29 3b 20 62 6f 78 5c | 6e 22 2c 20 69 20 2a 20 |f); box\|n", i * |
|00001ff0| 2e 33 33 33 33 29 3b 0a | 58 09 70 72 69 6e 74 66 |.3333);.|X.printf|
|00002000| 20 28 22 25 63 25 73 25 | 63 20 61 74 20 6c 61 73 | ("%c%s%|c at las|
|00002010| 74 20 62 6f 78 2e 65 20 | 2b 20 28 2e 31 2c 20 30 |t box.e |+ (.1, 0|
|00002020| 29 20 6c 6a 75 73 74 5c | 6e 22 2c 20 0a 58 09 09 |) ljust\|n", .X..|
|00002030| 27 22 27 2c 20 72 65 63 | 5b 69 5d 2e 6d 2c 20 27 |'"', rec|[i].m, '|
|00002040| 22 27 29 3b 0a 58 09 70 | 75 74 63 68 61 72 20 28 |"');.X.p|utchar (|
|00002050| 27 5c 6e 27 29 3b 0a 58 | 09 7d 0a 70 72 69 6e 74 |'\n');.X|.}.print|
|00002060| 66 20 28 22 5c 6e 23 20 | 64 72 61 77 20 64 61 73 |f ("\n# |draw das|
|00002070| 68 65 64 20 72 65 66 65 | 72 65 6e 63 65 20 6c 69 |hed refe|rence li|
|00002080| 6e 65 73 5c 6e 22 29 3b | 0a 66 6f 72 20 28 6b 20 |nes\n");|.for (k |
|00002090| 3d 20 30 3b 20 6b 20 3c | 20 72 61 6e 67 65 20 2f |= 0; k <| range /|
|000020a0| 20 6c 69 6e 65 61 74 3b | 20 6b 2b 2b 29 0a 58 09 | lineat;| k++).X.|
|000020b0| 7b 0a 58 09 70 72 69 6e | 74 66 20 28 22 6c 69 6e |{.X.prin|tf ("lin|
|000020c0| 65 20 66 72 6f 6d 20 4f | 42 2e 6e 77 20 2b 20 28 |e from O|B.nw + (|
|000020d0| 25 66 2c 20 2e 31 29 20 | 74 6f 20 6c 61 73 74 20 |%f, .1) |to last |
|000020e0| 62 6f 78 2e 73 77 20 2b | 20 28 25 66 2c 20 2d 2e |box.sw +| (%f, -.|
|000020f0| 30 38 37 29 20 64 61 73 | 68 65 64 5c 6e 22 2c 0a |087) das|hed\n",.|
|00002100| 58 09 09 28 6b 20 2b 20 | 31 29 20 2a 20 6c 69 6e |X..(k + |1) * lin|
|00002110| 65 61 74 20 2a 20 70 65 | 72 69 6e 63 68 2c 20 28 |eat * pe|rinch, (|
|00002120| 6b 20 2b 20 31 29 20 2a | 20 6c 69 6e 65 61 74 20 |k + 1) *| lineat |
|00002130| 2a 20 70 65 72 69 6e 63 | 68 29 3b 0a 58 09 7d 0a |* perinc|h);.X.}.|
|00002140| 70 72 69 6e 74 66 20 28 | 22 2e 50 45 5c 6e 22 29 |printf (|".PE\n")|
|00002150| 3b 0a 70 72 69 6e 74 66 | 20 28 22 2e 44 45 5c 6e |;.printf| (".DE\n|
|00002160| 22 29 3b 0a 7d 0a 58 0a | 58 0c 0a 2f 2a 3c 0a 58 |");.}.X.|X../*<.X|
|00002170| 20 2a 20 46 75 6e 63 74 | 69 6f 6e 3a 20 73 74 72 | * Funct|ion: str|
|00002180| 69 70 20 28 73 29 0a 58 | 20 2a 0a 58 20 2a 20 44 |ip (s).X| *.X * D|
|00002190| 65 73 63 72 69 70 74 69 | 6f 6e 3a 20 53 74 72 69 |escripti|on: Stri|
|000021a0| 70 20 6c 65 61 64 69 6e | 67 20 61 6e 64 20 74 72 |p leadin|g and tr|
|000021b0| 61 69 6c 69 6e 67 20 62 | 6c 61 6e 6b 73 20 66 72 |ailing b|lanks fr|
|000021c0| 6f 6d 20 61 20 73 74 72 | 69 6e 67 2e 0a 58 20 2a |om a str|ing..X *|
|000021d0| 0a 58 20 2a 20 44 61 74 | 61 20 54 79 70 65 3a 20 |.X * Dat|a Type: |
|000021e0| 76 6f 69 64 0a 58 20 2a | 0a 58 20 2a 20 41 72 67 |void.X *|.X * Arg|
|000021f0| 75 6d 65 6e 74 73 3a 20 | 73 20 2d 20 74 68 65 20 |uments: |s - the |
|00002200| 73 74 72 69 6e 67 20 74 | 6f 20 62 65 20 73 74 72 |string t|o be str|
|00002210| 69 70 70 65 64 2e 0a 58 | 20 2a 0a 58 20 2a 20 52 |ipped..X| *.X * R|
|00002220| 65 74 75 72 6e 73 3a 20 | 6e 6f 74 68 69 6e 67 21 |eturns: |nothing!|
|00002230| 0a 58 20 2a 0a 58 20 2a | 20 53 69 64 65 20 45 66 |.X *.X *| Side Ef|
|00002240| 66 65 63 74 73 3a 0a 58 | 20 2a 0a 58 20 2a 20 43 |fects:.X| *.X * C|
|00002250| 61 6c 6c 73 3a 0a 58 20 | 2a 0a 58 20 2a 20 50 44 |alls:.X |*.X * PD|
|00002260| 4c 0a 58 20 2a 0a 3e 2a | 2f 0a 58 0a 76 6f 69 64 |L.X *.>*|/.X.void|
|00002270| 20 73 74 72 69 70 20 28 | 73 29 0a 63 68 61 72 20 | strip (|s).char |
|00002280| 2a 73 3b 0a 7b 0a 63 68 | 61 72 20 2a 70 74 72 3b |*s;.{.ch|ar *ptr;|
|00002290| 0a 58 0a 70 74 72 20 3d | 20 73 3b 0a 77 68 69 6c |.X.ptr =| s;.whil|
|000022a0| 65 20 28 2a 70 74 72 2b | 2b 20 3d 3d 20 27 20 27 |e (*ptr+|+ == ' '|
|000022b0| 29 0a 73 70 72 69 6e 74 | 66 20 28 73 2c 20 22 25 |).sprint|f (s, "%|
|000022c0| 73 22 2c 20 70 74 72 29 | 3b 0a 72 65 74 75 72 6e |s", ptr)|;.return|
|000022d0| 3b 0a 7d 0a 53 48 41 52 | 5f 45 4f 46 0a 63 68 6d |;.}.SHAR|_EOF.chm|
|000022e0| 6f 64 20 30 36 36 36 20 | 62 61 72 2e 63 20 7c 7c |od 0666 |bar.c |||
|000022f0| 0a 65 63 68 6f 20 27 72 | 65 73 74 6f 72 65 20 6f |.echo 'r|estore o|
|00002300| 66 20 62 61 72 2e 63 20 | 66 61 69 6c 65 64 27 0a |f bar.c |failed'.|
|00002310| 57 63 5f 63 3d 22 60 77 | 63 20 2d 63 20 3c 20 27 |Wc_c="`w|c -c < '|
|00002320| 62 61 72 2e 63 27 60 22 | 0a 74 65 73 74 20 34 33 |bar.c'`"|.test 43|
|00002330| 34 34 20 2d 65 71 20 22 | 24 57 63 5f 63 22 20 7c |44 -eq "|$Wc_c" ||
|00002340| 7c 0a 09 65 63 68 6f 20 | 27 62 61 72 2e 63 3a 20 ||..echo |'bar.c: |
|00002350| 6f 72 69 67 69 6e 61 6c | 20 73 69 7a 65 20 34 33 |original| size 43|
|00002360| 34 34 2c 20 63 75 72 72 | 65 6e 74 20 73 69 7a 65 |44, curr|ent size|
|00002370| 27 20 22 24 57 63 5f 63 | 22 0a 66 69 0a 65 78 69 |' "$Wc_c|".fi.exi|
|00002380| 74 20 30 0a 2d 2d 20 0a | 20 20 20 20 20 20 20 44 |t 0.-- .|       D|
|00002390| 61 6e 20 46 6c 61 6b 20 | 2d 20 4d 63 43 61 77 20 |an Flak |- McCaw |
|000023a0| 43 65 6c 6c 75 6c 61 72 | 20 43 6f 6d 6d 75 6e 69 |Cellular| Communi|
|000023b0| 63 61 74 69 6f 6e 73 20 | 49 6e 63 2e 2c 20 32 30 |cations |Inc., 20|
|000023c0| 31 20 45 6c 6c 69 6f 74 | 20 41 76 65 20 57 2e 2c |1 Elliot| Ave W.,|
|000023d0| 0a 20 20 20 20 53 75 69 | 74 65 20 31 30 35 2c 20 |.    Sui|te 105, |
|000023e0| 53 65 61 74 74 6c 65 2c | 20 57 61 20 39 38 31 31 |Seattle,| Wa 9811|
|000023f0| 39 2c 20 32 30 36 2d 32 | 38 36 2d 34 33 35 35 2c |9, 206-2|86-4355,|
|00002400| 20 28 75 73 65 6e 65 74 | 3a 20 6e 77 6e 65 78 75 | (usenet|: nwnexu|
|00002410| 73 21 6d 63 67 70 31 21 | 66 6c 61 6b 29 0a       |s!mcgp1!|flak).  |
+--------+-------------------------+-------------------------+--------+--------+