/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume15 / touchup / part05

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 4e 65 77 73 67 72 6f 75 | 70 73 3a 20 63 6f 6d 70 |Newsgrou|ps: comp|
|00000010| 2e 73 6f 75 72 63 65 73 | 2e 75 6e 69 78 0a 53 75 |.sources|.unix.Su|
|00000020| 62 6a 65 63 74 3a 20 76 | 31 35 69 30 36 32 3a 20 |bject: v|15i062: |
|00000030| 20 41 20 62 69 74 6d 61 | 70 20 65 64 69 74 6f 72 | A bitma|p editor|
|00000040| 20 66 6f 72 20 53 75 6e | 73 2c 20 50 61 72 74 30 | for Sun|s, Part0|
|00000050| 35 2f 30 36 0a 41 70 70 | 72 6f 76 65 64 3a 20 72 |5/06.App|roved: r|
|00000060| 73 61 6c 7a 40 75 75 6e | 65 74 2e 55 55 2e 4e 45 |salz@uun|et.UU.NE|
|00000070| 54 0a 0a 53 75 62 6d 69 | 74 74 65 64 2d 62 79 3a |T..Submi|tted-by:|
|00000080| 20 52 61 79 6d 6f 6e 64 | 20 54 20 4b 72 65 69 73 | Raymond| T Kreis|
|00000090| 65 6c 20 3c 72 61 79 6b | 40 73 62 63 73 2e 73 75 |el <rayk|@sbcs.su|
|000000a0| 6e 79 73 62 2e 65 64 75 | 3e 0a 50 6f 73 74 69 6e |nysb.edu|>.Postin|
|000000b0| 67 2d 6e 75 6d 62 65 72 | 3a 20 56 6f 6c 75 6d 65 |g-number|: Volume|
|000000c0| 20 31 35 2c 20 49 73 73 | 75 65 20 36 32 0a 41 72 | 15, Iss|ue 62.Ar|
|000000d0| 63 68 69 76 65 2d 6e 61 | 6d 65 3a 20 74 6f 75 63 |chive-na|me: touc|
|000000e0| 68 75 70 2f 70 61 72 74 | 30 35 0a 0a 54 48 49 53 |hup/part|05..THIS|
|000000f0| 20 49 53 20 41 20 43 4f | 4d 50 4c 45 54 45 20 52 | IS A CO|MPLETE R|
|00000100| 45 50 4f 53 54 49 4e 47 | 20 4f 46 20 54 48 45 20 |EPOSTING| OF THE |
|00000110| 45 4e 54 49 52 45 20 50 | 41 43 4b 41 47 45 2e 0a |ENTIRE P|ACKAGE..|
|00000120| 0a 23 21 20 2f 62 69 6e | 2f 73 68 0a 23 20 54 68 |.#! /bin|/sh.# Th|
|00000130| 69 73 20 69 73 20 61 20 | 73 68 65 6c 6c 20 61 72 |is is a |shell ar|
|00000140| 63 68 69 76 65 2e 20 20 | 52 65 6d 6f 76 65 20 61 |chive.  |Remove a|
|00000150| 6e 79 74 68 69 6e 67 20 | 62 65 66 6f 72 65 20 74 |nything |before t|
|00000160| 68 69 73 20 6c 69 6e 65 | 2c 20 74 68 65 6e 20 75 |his line|, then u|
|00000170| 6e 70 61 63 6b 0a 23 20 | 69 74 20 62 79 20 73 61 |npack.# |it by sa|
|00000180| 76 69 6e 67 20 69 74 20 | 69 6e 74 6f 20 61 20 66 |ving it |into a f|
|00000190| 69 6c 65 20 61 6e 64 20 | 74 79 70 69 6e 67 20 22 |ile and |typing "|
|000001a0| 73 68 20 66 69 6c 65 22 | 2e 20 20 54 6f 20 6f 76 |sh file"|.  To ov|
|000001b0| 65 72 77 72 69 74 65 20 | 65 78 69 73 74 69 6e 67 |erwrite |existing|
|000001c0| 0a 23 20 66 69 6c 65 73 | 2c 20 74 79 70 65 20 22 |.# files|, type "|
|000001d0| 73 68 20 66 69 6c 65 20 | 2d 63 22 2e 20 20 59 6f |sh file |-c".  Yo|
|000001e0| 75 20 63 61 6e 20 61 6c | 73 6f 20 66 65 65 64 20 |u can al|so feed |
|000001f0| 74 68 69 73 20 61 73 20 | 73 74 61 6e 64 61 72 64 |this as |standard|
|00000200| 20 69 6e 70 75 74 20 76 | 69 61 0a 23 20 75 6e 73 | input v|ia.# uns|
|00000210| 68 61 72 2c 20 6f 72 20 | 62 79 20 74 79 70 69 6e |har, or |by typin|
|00000220| 67 20 22 73 68 20 3c 66 | 69 6c 65 22 2c 20 65 2e |g "sh <f|ile", e.|
|00000230| 67 2e 2e 20 20 49 66 20 | 74 68 69 73 20 61 72 63 |g..  If |this arc|
|00000240| 68 69 76 65 20 69 73 20 | 63 6f 6d 70 6c 65 74 65 |hive is |complete|
|00000250| 2c 20 79 6f 75 0a 23 20 | 77 69 6c 6c 20 73 65 65 |, you.# |will see|
|00000260| 20 74 68 65 20 66 6f 6c | 6c 6f 77 69 6e 67 20 6d | the fol|lowing m|
|00000270| 65 73 73 61 67 65 20 61 | 74 20 74 68 65 20 65 6e |essage a|t the en|
|00000280| 64 3a 0a 23 09 09 22 45 | 6e 64 20 6f 66 20 61 72 |d:.#.."E|nd of ar|
|00000290| 63 68 69 76 65 20 35 20 | 28 6f 66 20 36 29 2e 22 |chive 5 |(of 6)."|
|000002a0| 0a 50 41 54 48 3d 2f 62 | 69 6e 3a 2f 75 73 72 2f |.PATH=/b|in:/usr/|
|000002b0| 62 69 6e 3a 2f 75 73 72 | 2f 75 63 62 20 3b 20 65 |bin:/usr|/ucb ; e|
|000002c0| 78 70 6f 72 74 20 50 41 | 54 48 0a 69 66 20 74 65 |xport PA|TH.if te|
|000002d0| 73 74 20 2d 66 20 62 72 | 75 73 68 2e 63 20 2d 61 |st -f br|ush.c -a|
|000002e0| 20 22 24 7b 31 7d 22 20 | 21 3d 20 22 2d 63 22 20 | "${1}" |!= "-c" |
|000002f0| 3b 20 74 68 65 6e 20 0a | 20 20 65 63 68 6f 20 73 |; then .|  echo s|
|00000300| 68 61 72 3a 20 57 69 6c | 6c 20 6e 6f 74 20 6f 76 |har: Wil|l not ov|
|00000310| 65 72 2d 77 72 69 74 65 | 20 65 78 69 73 74 69 6e |er-write| existin|
|00000320| 67 20 66 69 6c 65 20 5c | 22 62 72 75 73 68 2e 63 |g file \|"brush.c|
|00000330| 5c 22 0a 65 6c 73 65 0a | 65 63 68 6f 20 73 68 61 |\".else.|echo sha|
|00000340| 72 3a 20 45 78 74 72 61 | 63 74 69 6e 67 20 5c 22 |r: Extra|cting \"|
|00000350| 62 72 75 73 68 2e 63 5c | 22 20 5c 28 32 30 35 38 |brush.c\|" \(2058|
|00000360| 20 63 68 61 72 61 63 74 | 65 72 73 5c 29 0a 73 65 | charact|ers\).se|
|00000370| 64 20 22 73 2f 5e 58 2f | 2f 22 20 3e 62 72 75 73 |d "s/^X/|/" >brus|
|00000380| 68 2e 63 20 3c 3c 27 45 | 4e 44 5f 4f 46 5f 62 72 |h.c <<'E|ND_OF_br|
|00000390| 75 73 68 2e 63 27 0a 58 | 0a 58 2f 2a 2a 2a 2a 2a |ush.c'.X|.X/*****|
|000003a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000003b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000003c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000003d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000003e0| 2a 2a 2a 2a 2a 0a 58 20 | 20 20 54 6f 75 63 68 75 |*****.X |  Touchu|
|000003f0| 70 20 61 20 62 69 74 6d | 61 70 20 67 72 61 70 68 |p a bitm|ap graph|
|00000400| 69 63 73 20 65 64 69 74 | 6f 72 20 66 6f 72 20 74 |ics edit|or for t|
|00000410| 68 65 20 53 75 6e 20 57 | 6f 72 6b 73 74 61 74 69 |he Sun W|orkstati|
|00000420| 6f 6e 20 72 75 6e 6e 69 | 6e 67 20 53 75 6e 56 69 |on runni|ng SunVi|
|00000430| 65 77 0a 58 20 20 20 43 | 6f 70 79 72 69 67 68 74 |ew.X   C|opyright|
|00000440| 20 28 63 29 20 31 39 38 | 38 20 62 79 20 52 61 79 | (c) 198|8 by Ray|
|00000450| 6d 6f 6e 64 20 4b 72 65 | 69 73 65 6c 0a 58 20 20 |mond Kre|isel.X  |
|00000460| 20 31 2f 32 32 2f 38 38 | 20 40 20 53 75 6e 79 20 | 1/22/88| @ Suny |
|00000470| 53 74 6f 6e 79 20 42 72 | 6f 6f 6b 0a 58 0a 58 20 |Stony Br|ook.X.X |
|00000480| 20 20 54 68 69 73 20 70 | 72 6f 67 72 61 6d 20 6d |  This p|rogram m|
|00000490| 61 79 20 62 65 20 72 65 | 64 69 73 74 72 69 62 75 |ay be re|distribu|
|000004a0| 74 65 64 20 77 69 74 68 | 6f 75 74 20 66 65 65 20 |ted with|out fee |
|000004b0| 61 73 20 6c 6f 6e 67 20 | 61 73 20 74 68 69 73 20 |as long |as this |
|000004c0| 63 6f 70 79 72 69 67 68 | 74 0a 58 20 20 20 6e 6f |copyrigh|t.X   no|
|000004d0| 74 69 63 65 20 69 73 20 | 69 6e 74 61 63 74 2e 0a |tice is |intact..|
|000004e0| 58 0a 58 3d 3d 3e 20 50 | 4c 45 41 53 45 20 73 65 |X.X==> P|LEASE se|
|000004f0| 6e 64 20 63 6f 6d 6d 65 | 6e 74 73 20 61 6e 64 20 |nd comme|nts and |
|00000500| 62 75 67 20 72 65 70 6f | 72 74 73 20 74 6f 20 6f |bug repo|rts to o|
|00000510| 6e 65 20 6f 66 20 74 68 | 65 20 66 6f 6c 6c 6f 77 |ne of th|e follow|
|00000520| 69 6e 67 20 61 64 64 72 | 65 73 73 65 73 3a 0a 58 |ing addr|esses:.X|
|00000530| 0a 58 09 20 20 20 52 61 | 79 20 4b 72 65 69 73 65 |.X.   Ra|y Kreise|
|00000540| 6c 0a 58 09 20 20 20 43 | 53 20 44 65 70 74 2e 2c |l.X.   C|S Dept.,|
|00000550| 20 53 55 4e 59 20 61 74 | 20 53 74 6f 6e 79 20 42 | SUNY at| Stony B|
|00000560| 72 6f 6f 6b 2c 20 53 74 | 6f 6e 79 20 42 72 6f 6f |rook, St|ony Broo|
|00000570| 6b 20 4e 59 20 31 31 37 | 39 34 0a 58 0a 58 09 20 |k NY 117|94.X.X. |
|00000580| 20 20 55 55 43 50 3a 20 | 7b 61 6c 6c 65 67 72 61 |  UUCP: |{allegra|
|00000590| 2c 20 70 68 69 6c 61 62 | 73 2c 20 70 79 72 61 6d |, philab|s, pyram|
|000005a0| 69 64 2c 20 72 65 73 65 | 61 72 63 68 7d 21 73 62 |id, rese|arch}!sb|
|000005b0| 63 73 21 72 61 79 6b 20 | 20 20 0a 58 09 20 20 20 |cs!rayk |  .X.   |
|000005c0| 41 52 50 41 2d 49 6e 74 | 65 72 6e 65 74 3a 20 72 |ARPA-Int|ernet: r|
|000005d0| 61 79 6b 40 73 62 63 73 | 2e 73 75 6e 79 73 62 2e |ayk@sbcs|.sunysb.|
|000005e0| 65 64 75 09 09 09 0a 58 | 09 20 20 20 43 53 6e 65 |edu....X|.   CSne|
|000005f0| 74 3a 20 72 61 79 6b 40 | 73 75 6e 79 2d 73 62 0a |t: rayk@|suny-sb.|
|00000600| 58 09 20 20 20 28 49 66 | 20 6e 6f 62 6f 64 79 20 |X.   (If| nobody |
|00000610| 69 73 20 68 6f 6d 65 20 | 61 74 20 61 6e 79 20 6f |is home |at any o|
|00000620| 66 20 74 68 65 20 61 62 | 6f 76 65 20 61 64 64 72 |f the ab|ove addr|
|00000630| 65 73 73 65 73 20 74 72 | 79 3a 0a 58 09 09 53 37 |esses tr|y:.X..S7|
|00000640| 32 51 4b 52 45 40 54 4f | 57 53 4f 4e 56 58 2e 42 |2QKRE@TO|WSONVX.B|
|00000650| 49 54 4e 45 54 09 09 09 | 20 20 20 20 20 20 20 20 |ITNET...|        |
|00000660| 29 0a 58 0a 58 20 22 49 | 66 20 49 20 67 65 74 20 |).X.X "I|f I get |
|00000670| 68 6f 6d 65 20 62 65 66 | 6f 72 65 20 64 61 79 6c |home bef|ore dayl|
|00000680| 69 67 68 74 2c 20 49 20 | 6a 75 73 74 20 6d 69 67 |ight, I |just mig|
|00000690| 68 74 20 67 65 74 20 73 | 6f 6d 65 20 73 6c 65 65 |ht get s|ome slee|
|000006a0| 70 20 74 6f 6e 69 67 68 | 74 2e 2e 2e 2e 22 0a 58 |p tonigh|t....".X|
|000006b0| 0a 58 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.X******|********|
|000006c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000006d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000006e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000006f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2f 0a 58 0a |********|****/.X.|
|00000700| 58 23 69 6e 63 6c 75 64 | 65 20 3c 70 69 78 72 65 |X#includ|e <pixre|
|00000710| 63 74 2f 70 69 78 72 65 | 63 74 5f 68 73 2e 68 3e |ct/pixre|ct_hs.h>|
|00000720| 0a 58 0a 58 2f 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.X.X/***|********|
|00000730| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000740| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000750| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000760| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0a |********|*******.|
|00000770| 58 09 66 69 6c 65 3a 20 | 62 72 75 73 68 2e 63 0a |X.file: |brush.c.|
|00000780| 58 09 70 75 72 70 6f 73 | 65 3a 20 54 68 69 73 20 |X.purpos|e: This |
|00000790| 66 69 6c 65 20 63 6f 6e | 74 61 69 6e 73 20 61 6c |file con|tains al|
|000007a0| 6c 20 74 68 61 74 20 64 | 69 66 66 65 72 65 6e 74 |l that d|ifferent|
|000007b0| 73 20 62 72 75 73 68 20 | 73 74 79 6c 65 73 2e 0a |s brush |styles..|
|000007c0| 58 09 09 42 72 75 73 68 | 65 73 20 63 61 6e 20 62 |X..Brush|es can b|
|000007d0| 65 20 63 72 65 61 74 65 | 64 20 77 69 74 68 20 69 |e create|d with i|
|000007e0| 63 6f 6e 65 64 69 74 2c | 20 75 73 69 6e 67 20 74 |conedit,| using t|
|000007f0| 68 65 20 75 70 70 65 72 | 0a 58 09 09 72 69 67 68 |he upper|.X..righ|
|00000800| 74 68 61 6e 64 20 33 32 | 78 33 32 20 62 69 74 73 |thand 32|x32 bits|
|00000810| 2e 20 20 54 68 65 20 36 | 34 78 36 34 20 69 6d 61 |.  The 6|4x64 ima|
|00000820| 67 65 20 66 72 6f 6d 20 | 69 63 6f 6e 65 64 69 74 |ge from |iconedit|
|00000830| 0a 58 09 09 69 73 20 74 | 68 65 6e 20 73 74 72 69 |.X..is t|hen stri|
|00000840| 70 70 65 64 20 74 6f 20 | 33 32 78 33 32 20 62 79 |pped to |32x32 by|
|00000850| 20 73 74 72 69 70 5f 69 | 63 6f 6e 33 32 78 33 32 | strip_i|con32x32|
|00000860| 0a 58 0a 58 09 6d 6f 64 | 69 66 69 63 61 74 69 6f |.X.X.mod|ificatio|
|00000870| 6e 73 3a 0a 58 09 09 64 | 61 74 65 3a 09 54 75 65 |ns:.X..d|ate:.Tue|
|00000880| 20 4d 61 72 20 32 32 20 | 32 32 3a 30 34 3a 35 38 | Mar 22 |22:04:58|
|00000890| 20 45 53 54 20 31 39 38 | 38 0a 58 09 09 61 75 74 | EST 198|8.X..aut|
|000008a0| 68 6f 72 3a 09 72 61 79 | 6b 0a 58 09 09 63 68 61 |hor:.ray|k.X..cha|
|000008b0| 6e 67 65 73 3a 61 64 64 | 20 63 6f 6d 6d 65 6e 74 |nges:add| comment|
|000008c0| 73 0a 58 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |s.X*****|********|
|000008d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000008e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000008f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000900| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2f 0a 58 |********|*****/.X|
|00000910| 0a 58 73 74 61 74 69 63 | 20 73 68 6f 72 74 20 62 |.Xstatic| short b|
|00000920| 72 75 73 68 31 5f 64 61 | 74 61 5b 5d 20 3d 20 7b |rush1_da|ta[] = {|
|00000930| 0a 58 23 69 6e 63 6c 75 | 64 65 20 22 62 72 75 73 |.X#inclu|de "brus|
|00000940| 68 31 2e 69 63 6f 6e 2e | 70 61 74 22 0a 58 7d 3b |h1.icon.|pat".X};|
|00000950| 0a 58 73 74 61 74 69 63 | 20 6d 70 72 5f 73 74 61 |.Xstatic| mpr_sta|
|00000960| 74 69 63 28 62 72 75 73 | 68 31 5f 70 72 2c 20 33 |tic(brus|h1_pr, 3|
|00000970| 32 2c 20 33 32 2c 20 31 | 2c 20 62 72 75 73 68 31 |2, 32, 1|, brush1|
|00000980| 5f 64 61 74 61 29 3b 0a | 58 0a 58 73 74 61 74 69 |_data);.|X.Xstati|
|00000990| 63 20 73 68 6f 72 74 20 | 62 72 75 73 68 32 5f 64 |c short |brush2_d|
|000009a0| 61 74 61 5b 5d 20 3d 20 | 7b 0a 58 23 69 6e 63 6c |ata[] = |{.X#incl|
|000009b0| 75 64 65 20 22 62 72 75 | 73 68 32 2e 69 63 6f 6e |ude "bru|sh2.icon|
|000009c0| 2e 70 61 74 22 0a 58 7d | 3b 0a 58 73 74 61 74 69 |.pat".X}|;.Xstati|
|000009d0| 63 20 6d 70 72 5f 73 74 | 61 74 69 63 28 62 72 75 |c mpr_st|atic(bru|
|000009e0| 73 68 32 5f 70 72 2c 20 | 33 32 2c 20 33 32 2c 20 |sh2_pr, |32, 32, |
|000009f0| 31 2c 20 62 72 75 73 68 | 32 5f 64 61 74 61 29 3b |1, brush|2_data);|
|00000a00| 0a 58 0a 58 73 74 61 74 | 69 63 20 73 68 6f 72 74 |.X.Xstat|ic short|
|00000a10| 20 62 72 75 73 68 33 5f | 64 61 74 61 5b 5d 20 3d | brush3_|data[] =|
|00000a20| 20 7b 0a 58 23 69 6e 63 | 6c 75 64 65 20 22 62 72 | {.X#inc|lude "br|
|00000a30| 75 73 68 33 2e 69 63 6f | 6e 2e 70 61 74 22 0a 58 |ush3.ico|n.pat".X|
|00000a40| 7d 3b 0a 58 73 74 61 74 | 69 63 20 6d 70 72 5f 73 |};.Xstat|ic mpr_s|
|00000a50| 74 61 74 69 63 28 62 72 | 75 73 68 33 5f 70 72 2c |tatic(br|ush3_pr,|
|00000a60| 20 33 32 2c 20 33 32 2c | 20 31 2c 20 62 72 75 73 | 32, 32,| 1, brus|
|00000a70| 68 33 5f 64 61 74 61 29 | 3b 0a 58 0a 58 73 74 61 |h3_data)|;.X.Xsta|
|00000a80| 74 69 63 20 73 68 6f 72 | 74 20 62 72 75 73 68 34 |tic shor|t brush4|
|00000a90| 5f 64 61 74 61 5b 5d 20 | 3d 20 7b 0a 58 23 69 6e |_data[] |= {.X#in|
|00000aa0| 63 6c 75 64 65 20 22 62 | 72 75 73 68 34 2e 69 63 |clude "b|rush4.ic|
|00000ab0| 6f 6e 2e 70 61 74 22 0a | 58 7d 3b 0a 58 73 74 61 |on.pat".|X};.Xsta|
|00000ac0| 74 69 63 20 6d 70 72 5f | 73 74 61 74 69 63 28 62 |tic mpr_|static(b|
|00000ad0| 72 75 73 68 34 5f 70 72 | 2c 20 33 32 2c 20 33 32 |rush4_pr|, 32, 32|
|00000ae0| 2c 20 31 2c 20 62 72 75 | 73 68 34 5f 64 61 74 61 |, 1, bru|sh4_data|
|00000af0| 29 3b 0a 58 0a 58 73 74 | 61 74 69 63 20 73 68 6f |);.X.Xst|atic sho|
|00000b00| 72 74 20 62 72 75 73 68 | 35 5f 64 61 74 61 5b 5d |rt brush|5_data[]|
|00000b10| 20 3d 20 7b 0a 58 23 69 | 6e 63 6c 75 64 65 20 22 | = {.X#i|nclude "|
|00000b20| 62 72 75 73 68 35 2e 69 | 63 6f 6e 2e 70 61 74 22 |brush5.i|con.pat"|
|00000b30| 0a 58 7d 3b 0a 58 73 74 | 61 74 69 63 20 6d 70 72 |.X};.Xst|atic mpr|
|00000b40| 5f 73 74 61 74 69 63 28 | 62 72 75 73 68 35 5f 70 |_static(|brush5_p|
|00000b50| 72 2c 20 33 32 2c 20 33 | 32 2c 20 31 2c 20 62 72 |r, 32, 3|2, 1, br|
|00000b60| 75 73 68 35 5f 64 61 74 | 61 29 3b 0a 58 0a 58 73 |ush5_dat|a);.X.Xs|
|00000b70| 74 61 74 69 63 20 73 68 | 6f 72 74 20 62 72 75 73 |tatic sh|ort brus|
|00000b80| 68 36 5f 64 61 74 61 5b | 5d 20 3d 20 7b 0a 58 23 |h6_data[|] = {.X#|
|00000b90| 69 6e 63 6c 75 64 65 20 | 22 62 72 75 73 68 36 2e |include |"brush6.|
|00000ba0| 69 63 6f 6e 2e 70 61 74 | 22 0a 58 7d 3b 0a 58 73 |icon.pat|".X};.Xs|
|00000bb0| 74 61 74 69 63 20 6d 70 | 72 5f 73 74 61 74 69 63 |tatic mp|r_static|
|00000bc0| 28 62 72 75 73 68 36 5f | 70 72 2c 20 33 32 2c 20 |(brush6_|pr, 32, |
|00000bd0| 33 32 2c 20 31 2c 20 62 | 72 75 73 68 36 5f 64 61 |32, 1, b|rush6_da|
|00000be0| 74 61 29 3b 0a 45 4e 44 | 5f 4f 46 5f 62 72 75 73 |ta);.END|_OF_brus|
|00000bf0| 68 2e 63 0a 69 66 20 74 | 65 73 74 20 32 30 35 38 |h.c.if t|est 2058|
|00000c00| 20 2d 6e 65 20 60 77 63 | 20 2d 63 20 3c 62 72 75 | -ne `wc| -c <bru|
|00000c10| 73 68 2e 63 60 3b 20 74 | 68 65 6e 0a 20 20 20 20 |sh.c`; t|hen.    |
|00000c20| 65 63 68 6f 20 73 68 61 | 72 3a 20 5c 22 62 72 75 |echo sha|r: \"bru|
|00000c30| 73 68 2e 63 5c 22 20 75 | 6e 70 61 63 6b 65 64 20 |sh.c\" u|npacked |
|00000c40| 77 69 74 68 20 77 72 6f | 6e 67 20 73 69 7a 65 21 |with wro|ng size!|
|00000c50| 0a 66 69 0a 23 20 65 6e | 64 20 6f 66 20 6f 76 65 |.fi.# en|d of ove|
|00000c60| 72 77 72 69 74 69 6e 67 | 20 63 68 65 63 6b 0a 66 |rwriting| check.f|
|00000c70| 69 0a 69 66 20 74 65 73 | 74 20 2d 66 20 63 69 72 |i.if tes|t -f cir|
|00000c80| 63 6c 65 2e 63 20 2d 61 | 20 22 24 7b 31 7d 22 20 |cle.c -a| "${1}" |
|00000c90| 21 3d 20 22 2d 63 22 20 | 3b 20 74 68 65 6e 20 0a |!= "-c" |; then .|
|00000ca0| 20 20 65 63 68 6f 20 73 | 68 61 72 3a 20 57 69 6c |  echo s|har: Wil|
|00000cb0| 6c 20 6e 6f 74 20 6f 76 | 65 72 2d 77 72 69 74 65 |l not ov|er-write|
|00000cc0| 20 65 78 69 73 74 69 6e | 67 20 66 69 6c 65 20 5c | existin|g file \|
|00000cd0| 22 63 69 72 63 6c 65 2e | 63 5c 22 0a 65 6c 73 65 |"circle.|c\".else|
|00000ce0| 0a 65 63 68 6f 20 73 68 | 61 72 3a 20 45 78 74 72 |.echo sh|ar: Extr|
|00000cf0| 61 63 74 69 6e 67 20 5c | 22 63 69 72 63 6c 65 2e |acting \|"circle.|
|00000d00| 63 5c 22 20 5c 28 33 35 | 37 37 20 63 68 61 72 61 |c\" \(35|77 chara|
|00000d10| 63 74 65 72 73 5c 29 0a | 73 65 64 20 22 73 2f 5e |cters\).|sed "s/^|
|00000d20| 58 2f 2f 22 20 3e 63 69 | 72 63 6c 65 2e 63 20 3c |X//" >ci|rcle.c <|
|00000d30| 3c 27 45 4e 44 5f 4f 46 | 5f 63 69 72 63 6c 65 2e |<'END_OF|_circle.|
|00000d40| 63 27 0a 58 0a 58 2f 2a | 2a 2a 2a 2a 2a 2a 2a 2a |c'.X.X/*|********|
|00000d50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000d60| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000d70| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000d80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000d90| 2a 0a 58 20 20 20 54 6f | 75 63 68 75 70 20 61 20 |*.X   To|uchup a |
|00000da0| 62 69 74 6d 61 70 20 67 | 72 61 70 68 69 63 73 20 |bitmap g|raphics |
|00000db0| 65 64 69 74 6f 72 20 66 | 6f 72 20 74 68 65 20 53 |editor f|or the S|
|00000dc0| 75 6e 20 57 6f 72 6b 73 | 74 61 74 69 6f 6e 20 72 |un Works|tation r|
|00000dd0| 75 6e 6e 69 6e 67 20 53 | 75 6e 56 69 65 77 0a 58 |unning S|unView.X|
|00000de0| 20 20 20 43 6f 70 79 72 | 69 67 68 74 20 28 63 29 |   Copyr|ight (c)|
|00000df0| 20 31 39 38 38 20 62 79 | 20 52 61 79 6d 6f 6e 64 | 1988 by| Raymond|
|00000e00| 20 4b 72 65 69 73 65 6c | 0a 58 20 20 20 31 2f 32 | Kreisel|.X   1/2|
|00000e10| 32 2f 38 38 20 40 20 53 | 75 6e 79 20 53 74 6f 6e |2/88 @ S|uny Ston|
|00000e20| 79 20 42 72 6f 6f 6b 0a | 58 0a 58 20 20 20 54 68 |y Brook.|X.X   Th|
|00000e30| 69 73 20 70 72 6f 67 72 | 61 6d 20 6d 61 79 20 62 |is progr|am may b|
|00000e40| 65 20 72 65 64 69 73 74 | 72 69 62 75 74 65 64 20 |e redist|ributed |
|00000e50| 77 69 74 68 6f 75 74 20 | 66 65 65 20 61 73 20 6c |without |fee as l|
|00000e60| 6f 6e 67 20 61 73 20 74 | 68 69 73 20 63 6f 70 79 |ong as t|his copy|
|00000e70| 72 69 67 68 74 0a 58 20 | 20 20 6e 6f 74 69 63 65 |right.X |  notice|
|00000e80| 20 69 73 20 69 6e 74 61 | 63 74 2e 0a 58 0a 58 3d | is inta|ct..X.X=|
|00000e90| 3d 3e 20 50 4c 45 41 53 | 45 20 73 65 6e 64 20 63 |=> PLEAS|E send c|
|00000ea0| 6f 6d 6d 65 6e 74 73 20 | 61 6e 64 20 62 75 67 20 |omments |and bug |
|00000eb0| 72 65 70 6f 72 74 73 20 | 74 6f 20 6f 6e 65 20 6f |reports |to one o|
|00000ec0| 66 20 74 68 65 20 66 6f | 6c 6c 6f 77 69 6e 67 20 |f the fo|llowing |
|00000ed0| 61 64 64 72 65 73 73 65 | 73 3a 0a 58 0a 58 09 20 |addresse|s:.X.X. |
|00000ee0| 20 20 52 61 79 20 4b 72 | 65 69 73 65 6c 0a 58 09 |  Ray Kr|eisel.X.|
|00000ef0| 20 20 20 43 53 20 44 65 | 70 74 2e 2c 20 53 55 4e |   CS De|pt., SUN|
|00000f00| 59 20 61 74 20 53 74 6f | 6e 79 20 42 72 6f 6f 6b |Y at Sto|ny Brook|
|00000f10| 2c 20 53 74 6f 6e 79 20 | 42 72 6f 6f 6b 20 4e 59 |, Stony |Brook NY|
|00000f20| 20 31 31 37 39 34 0a 58 | 0a 58 09 20 20 20 55 55 | 11794.X|.X.   UU|
|00000f30| 43 50 3a 20 7b 61 6c 6c | 65 67 72 61 2c 20 70 68 |CP: {all|egra, ph|
|00000f40| 69 6c 61 62 73 2c 20 70 | 79 72 61 6d 69 64 2c 20 |ilabs, p|yramid, |
|00000f50| 72 65 73 65 61 72 63 68 | 7d 21 73 62 63 73 21 72 |research|}!sbcs!r|
|00000f60| 61 79 6b 20 20 20 0a 58 | 09 20 20 20 41 52 50 41 |ayk   .X|.   ARPA|
|00000f70| 2d 49 6e 74 65 72 6e 65 | 74 3a 20 72 61 79 6b 40 |-Interne|t: rayk@|
|00000f80| 73 62 63 73 2e 73 75 6e | 79 73 62 2e 65 64 75 09 |sbcs.sun|ysb.edu.|
|00000f90| 09 09 0a 58 09 20 20 20 | 43 53 6e 65 74 3a 20 72 |...X.   |CSnet: r|
|00000fa0| 61 79 6b 40 73 75 6e 79 | 2d 73 62 0a 58 09 20 20 |ayk@suny|-sb.X.  |
|00000fb0| 20 28 49 66 20 6e 6f 62 | 6f 64 79 20 69 73 20 68 | (If nob|ody is h|
|00000fc0| 6f 6d 65 20 61 74 20 61 | 6e 79 20 6f 66 20 74 68 |ome at a|ny of th|
|00000fd0| 65 20 61 62 6f 76 65 20 | 61 64 64 72 65 73 73 65 |e above |addresse|
|00000fe0| 73 20 74 72 79 3a 0a 58 | 09 09 53 37 32 51 4b 52 |s try:.X|..S72QKR|
|00000ff0| 45 40 54 4f 57 53 4f 4e | 56 58 2e 42 49 54 4e 45 |E@TOWSON|VX.BITNE|
|00001000| 54 09 09 09 20 20 20 20 | 20 20 20 20 29 0a 58 0a |T...    |    ).X.|
|00001010| 58 20 22 49 66 20 49 20 | 67 65 74 20 68 6f 6d 65 |X "If I |get home|
|00001020| 20 62 65 66 6f 72 65 20 | 64 61 79 6c 69 67 68 74 | before |daylight|
|00001030| 2c 20 49 20 6a 75 73 74 | 20 6d 69 67 68 74 20 67 |, I just| might g|
|00001040| 65 74 20 73 6f 6d 65 20 | 73 6c 65 65 70 20 74 6f |et some |sleep to|
|00001050| 6e 69 67 68 74 2e 2e 2e | 2e 22 0a 58 0a 58 2a 2a |night...|.".X.X**|
|00001060| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001070| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001080| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001090| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000010a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2f 0a 58 0a 58 2f 2a 2a |********|/.X.X/**|
|000010b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000010c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000010d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000010e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000010f0| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 58 09 66 69 6c 65 3a |********|.X.file:|
|00001100| 20 63 69 72 63 6c 65 2e | 63 0a 58 09 70 75 72 70 | circle.|c.X.purp|
|00001110| 6f 73 65 3a 20 54 68 69 | 73 20 66 69 6c 65 20 63 |ose: Thi|s file c|
|00001120| 6f 6e 74 61 69 6e 73 20 | 74 68 61 74 20 72 6f 75 |ontains |that rou|
|00001130| 74 69 6e 65 73 20 74 68 | 61 74 20 64 72 61 77 20 |tines th|at draw |
|00001140| 63 69 72 63 6c 65 73 0a | 58 09 09 6f 6e 20 74 68 |circles.|X..on th|
|00001150| 65 20 73 63 72 65 65 6e | 2e 20 41 20 55 4e 44 4f |e screen|. A UNDO|
|00001160| 43 55 4d 45 4e 54 45 44 | 20 53 75 6e 76 69 65 77 |CUMENTED| Sunview|
|00001170| 20 66 75 6e 63 74 69 6f | 6e 20 22 70 77 5f 70 6f | functio|n "pw_po|
|00001180| 6c 79 70 6f 69 6e 74 22 | 0a 58 09 09 69 73 20 75 |lypoint"|.X..is u|
|00001190| 73 65 64 20 74 6f 20 67 | 65 74 20 74 68 65 20 6c |sed to g|et the l|
|000011a0| 69 73 74 20 6f 66 20 70 | 6f 69 6e 74 73 20 74 68 |ist of p|oints th|
|000011b0| 61 74 20 6d 61 6b 65 20 | 74 68 65 20 63 69 72 63 |at make |the circ|
|000011c0| 6c 65 0a 58 09 09 6f 6e | 20 74 6f 20 74 68 65 20 |le.X..on| to the |
|000011d0| 73 63 72 65 65 6e 20 41 | 4d 41 5a 49 4e 47 4c 59 |screen A|MAZINGLY|
|000011e0| 20 46 41 53 54 2e 0a 58 | 09 09 54 68 65 20 70 6f | FAST..X|..The po|
|000011f0| 69 6e 74 73 20 74 68 61 | 74 20 6d 61 6b 65 20 75 |ints tha|t make u|
|00001200| 70 20 74 68 65 20 63 69 | 72 63 6c 65 20 61 72 65 |p the ci|rcle are|
|00001210| 20 63 61 6c 63 75 6c 61 | 74 65 64 20 77 69 74 68 | calcula|ted with|
|00001220| 0a 58 09 09 62 72 65 73 | 65 6e 68 61 6d 73 20 28 |.X..bres|enhams (|
|00001230| 73 70 3f 29 20 69 6e 63 | 72 65 6d 65 6e 74 61 6c |sp?) inc|remental|
|00001240| 20 63 69 72 63 6c 65 20 | 61 6c 67 6f 72 69 74 68 | circle |algorith|
|00001250| 6d 2e 0a 58 0a 58 09 6d | 6f 64 69 66 69 63 61 74 |m..X.X.m|odificat|
|00001260| 69 6f 6e 73 3a 0a 58 09 | 09 64 61 74 65 3a 09 54 |ions:.X.|.date:.T|
|00001270| 75 65 20 4d 61 72 20 32 | 32 20 32 32 3a 30 34 3a |ue Mar 2|2 22:04:|
|00001280| 35 38 20 45 53 54 20 31 | 39 38 38 0a 58 09 09 61 |58 EST 1|988.X..a|
|00001290| 75 74 68 6f 72 3a 09 72 | 61 79 6b 0a 58 09 09 63 |uthor:.r|ayk.X..c|
|000012a0| 68 61 6e 67 65 73 3a 61 | 64 64 20 63 6f 6d 6d 65 |hanges:a|dd comme|
|000012b0| 6e 74 73 0a 58 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |nts.X***|********|
|000012c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000012d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000012e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000012f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2f |********|*******/|
|00001300| 0a 58 0a 58 23 69 6e 63 | 6c 75 64 65 20 22 68 65 |.X.X#inc|lude "he|
|00001310| 61 64 65 72 2e 68 22 0a | 58 0a 58 73 74 72 75 63 |ader.h".|X.Xstruc|
|00001320| 74 20 20 70 72 5f 70 6f | 73 20 20 70 74 6c 69 73 |t  pr_po|s  ptlis|
|00001330| 74 5b 4d 41 58 5f 50 54 | 53 5d 3b 0a 58 0a 58 64 |t[MAX_PT|S];.X.Xd|
|00001340| 72 61 77 5f 63 69 72 63 | 6c 65 28 70 77 2c 20 63 |raw_circ|le(pw, c|
|00001350| 65 6e 74 65 72 5f 78 2c | 63 65 6e 74 65 72 5f 79 |enter_x,|center_y|
|00001360| 2c 20 72 61 64 69 75 73 | 2c 52 4f 50 29 0a 58 69 |, radius|,ROP).Xi|
|00001370| 6e 74 09 09 63 65 6e 74 | 65 72 5f 78 2c 63 65 6e |nt..cent|er_x,cen|
|00001380| 74 65 72 5f 79 3b 0a 58 | 50 69 78 77 69 6e 20 20 |ter_y;.X|Pixwin  |
|00001390| 20 20 20 20 20 20 20 20 | 20 20 2a 70 77 3b 0a 58 |        |  *pw;.X|
|000013a0| 69 6e 74 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |int     |        |
|000013b0| 20 20 20 72 61 64 69 75 | 73 2c 52 4f 50 3b 0a 58 |   radiu|s,ROP;.X|
|000013c0| 7b 0a 58 73 74 72 75 63 | 74 20 70 72 5f 70 6f 73 |{.Xstruc|t pr_pos|
|000013d0| 20 20 20 20 20 20 63 65 | 6e 74 65 72 3b 0a 58 0a |      ce|nter;.X.|
|000013e0| 58 20 20 20 20 20 20 20 | 20 69 6e 74 20 20 20 20 |X       | int    |
|000013f0| 20 20 20 20 20 20 20 20 | 20 78 2c 79 2c 0a 58 20 |        | x,y,.X |
|00001400| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001410| 20 20 20 20 20 20 20 65 | 72 72 6f 72 2c 20 6e 75 |       e|rror, nu|
|00001420| 6d 70 74 73 3b 0a 58 0a | 58 09 69 66 20 28 72 61 |mpts;.X.|X.if (ra|
|00001430| 64 69 75 73 3d 3d 30 29 | 20 72 65 74 75 72 6e 28 |dius==0)| return(|
|00001440| 30 29 3b 0a 58 09 63 65 | 6e 74 65 72 2e 78 20 3d |0);.X.ce|nter.x =|
|00001450| 20 63 65 6e 74 65 72 5f | 78 3b 0a 58 09 63 65 6e | center_|x;.X.cen|
|00001460| 74 65 72 2e 79 20 3d 20 | 63 65 6e 74 65 72 5f 79 |ter.y = |center_y|
|00001470| 3b 0a 58 0a 58 20 20 20 | 20 20 20 20 20 20 20 20 |;.X.X   |        |
|00001480| 78 20 3d 20 30 3b 20 79 | 20 3d 20 72 61 64 69 75 |x = 0; y| = radiu|
|00001490| 73 3b 20 6e 75 6d 70 74 | 73 20 3d 20 30 3b 0a 58 |s; numpt|s = 0;.X|
|000014a0| 20 20 20 20 20 20 20 20 | 20 20 20 65 72 72 6f 72 |        |   error|
|000014b0| 20 3d 20 33 20 2d 20 28 | 72 61 64 69 75 73 20 3c | = 3 - (|radius <|
|000014c0| 3c 20 31 29 3b 0a 58 0a | 58 20 20 20 20 20 20 20 |< 1);.X.|X       |
|000014d0| 20 20 20 20 77 68 69 6c | 65 20 28 78 20 3c 20 79 |    whil|e (x < y|
|000014e0| 29 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 7b 0a |).X     |      {.|
|000014f0| 58 20 20 20 20 20 20 20 | 20 20 20 20 20 20 70 74 |X       |      pt|
|00001500| 6c 69 73 74 5b 6e 75 6d | 70 74 73 5d 2e 78 3d 63 |list[num|pts].x=c|
|00001510| 65 6e 74 65 72 2e 78 2b | 78 3b 20 20 20 70 74 6c |enter.x+|x;   ptl|
|00001520| 69 73 74 5b 6e 75 6d 70 | 74 73 2b 2b 5d 2e 79 3d |ist[nump|ts++].y=|
|00001530| 63 65 6e 74 65 72 2e 79 | 2b 79 3b 0a 58 20 20 20 |center.y|+y;.X   |
|00001540| 20 20 20 20 20 20 20 20 | 20 20 70 74 6c 69 73 74 |        |  ptlist|
|00001550| 5b 6e 75 6d 70 74 73 5d | 2e 78 3d 63 65 6e 74 65 |[numpts]|.x=cente|
|00001560| 72 2e 78 2d 78 3b 20 20 | 20 70 74 6c 69 73 74 5b |r.x-x;  | ptlist[|
|00001570| 6e 75 6d 70 74 73 2b 2b | 5d 2e 79 3d 63 65 6e 74 |numpts++|].y=cent|
|00001580| 65 72 2e 79 2b 79 3b 0a | 58 20 20 20 20 20 20 20 |er.y+y;.|X       |
|00001590| 20 20 20 20 20 20 70 74 | 6c 69 73 74 5b 6e 75 6d |      pt|list[num|
|000015a0| 70 74 73 5d 2e 78 3d 63 | 65 6e 74 65 72 2e 78 2b |pts].x=c|enter.x+|
|000015b0| 78 3b 20 20 20 70 74 6c | 69 73 74 5b 6e 75 6d 70 |x;   ptl|ist[nump|
|000015c0| 74 73 2b 2b 5d 2e 79 3d | 63 65 6e 74 65 72 2e 79 |ts++].y=|center.y|
|000015d0| 2d 79 3b 0a 58 20 20 20 | 20 20 20 20 20 20 20 20 |-y;.X   |        |
|000015e0| 20 20 70 74 6c 69 73 74 | 5b 6e 75 6d 70 74 73 5d |  ptlist|[numpts]|
|000015f0| 2e 78 3d 63 65 6e 74 65 | 72 2e 78 2d 78 3b 20 20 |.x=cente|r.x-x;  |
|00001600| 20 70 74 6c 69 73 74 5b | 6e 75 6d 70 74 73 2b 2b | ptlist[|numpts++|
|00001610| 5d 2e 79 3d 63 65 6e 74 | 65 72 2e 79 2d 79 3b 0a |].y=cent|er.y-y;.|
|00001620| 58 20 20 20 20 20 20 20 | 20 20 20 20 20 20 70 74 |X       |      pt|
|00001630| 6c 69 73 74 5b 6e 75 6d | 70 74 73 5d 2e 78 3d 63 |list[num|pts].x=c|
|00001640| 65 6e 74 65 72 2e 78 2b | 79 3b 20 20 20 70 74 6c |enter.x+|y;   ptl|
|00001650| 69 73 74 5b 6e 75 6d 70 | 74 73 2b 2b 5d 2e 79 3d |ist[nump|ts++].y=|
|00001660| 63 65 6e 74 65 72 2e 79 | 2b 78 3b 0a 58 20 20 20 |center.y|+x;.X   |
|00001670| 20 20 20 20 20 20 20 20 | 20 20 70 74 6c 69 73 74 |        |  ptlist|
|00001680| 5b 6e 75 6d 70 74 73 5d | 2e 78 3d 63 65 6e 74 65 |[numpts]|.x=cente|
|00001690| 72 2e 78 2d 79 3b 20 20 | 20 70 74 6c 69 73 74 5b |r.x-y;  | ptlist[|
|000016a0| 6e 75 6d 70 74 73 2b 2b | 5d 2e 79 3d 63 65 6e 74 |numpts++|].y=cent|
|000016b0| 65 72 2e 79 2b 78 3b 0a | 58 20 20 20 20 20 20 20 |er.y+x;.|X       |
|000016c0| 20 20 20 20 20 20 70 74 | 6c 69 73 74 5b 6e 75 6d |      pt|list[num|
|000016d0| 70 74 73 5d 2e 78 3d 63 | 65 6e 74 65 72 2e 78 2b |pts].x=c|enter.x+|
|000016e0| 79 3b 20 20 20 70 74 6c | 69 73 74 5b 6e 75 6d 70 |y;   ptl|ist[nump|
|000016f0| 74 73 2b 2b 5d 2e 79 3d | 63 65 6e 74 65 72 2e 79 |ts++].y=|center.y|
|00001700| 2d 78 3b 0a 58 20 20 20 | 20 20 20 20 20 20 20 20 |-x;.X   |        |
|00001710| 20 20 70 74 6c 69 73 74 | 5b 6e 75 6d 70 74 73 5d |  ptlist|[numpts]|
|00001720| 2e 78 3d 63 65 6e 74 65 | 72 2e 78 2d 79 3b 20 20 |.x=cente|r.x-y;  |
|00001730| 20 70 74 6c 69 73 74 5b | 6e 75 6d 70 74 73 2b 2b | ptlist[|numpts++|
|00001740| 5d 2e 79 3d 63 65 6e 74 | 65 72 2e 79 2d 78 3b 0a |].y=cent|er.y-x;.|
|00001750| 58 20 20 20 0a 58 20 20 | 20 20 20 20 20 20 20 20 |X   .X  |        |
|00001760| 20 20 20 69 66 20 28 65 | 72 72 6f 72 20 3c 20 30 |   if (e|rror < 0|
|00001770| 29 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |).X     |        |
|00001780| 20 20 20 65 72 72 6f 72 | 20 3d 20 65 72 72 6f 72 |   error| = error|
|00001790| 20 2b 20 28 78 20 3c 3c | 20 32 29 20 2b 20 36 3b | + (x <<| 2) + 6;|
|000017a0| 0a 58 20 20 20 20 20 20 | 20 20 20 20 20 20 20 65 |.X      |       e|
|000017b0| 6c 73 65 0a 58 20 20 20 | 20 20 20 20 20 20 20 20 |lse.X   |        |
|000017c0| 20 20 20 20 20 65 72 72 | 6f 72 20 3d 20 65 72 72 |     err|or = err|
|000017d0| 6f 72 20 2b 20 28 28 78 | 2d 79 2d 2d 29 20 3c 3c |or + ((x|-y--) <<|
|000017e0| 20 32 29 20 2b 20 31 30 | 3b 0a 58 20 20 20 20 20 | 2) + 10|;.X     |
|000017f0| 20 20 20 20 20 20 20 20 | 78 2b 2b 3b 0a 58 20 20 |        |x++;.X  |
|00001800| 20 20 20 20 20 20 20 20 | 20 7d 20 20 2f 2a 20 65 |        | }  /* e|
|00001810| 6e 64 20 6f 66 20 77 68 | 69 6c 65 20 28 78 20 2c |nd of wh|ile (x ,|
|00001820| 20 79 29 20 2a 2f 0a 58 | 20 20 20 0a 58 20 20 20 | y) */.X|   .X   |
|00001830| 20 20 20 20 20 20 20 20 | 69 66 20 28 78 20 3d 3d |        |if (x ==|
|00001840| 20 79 29 0a 58 20 20 20 | 20 20 20 20 20 20 20 20 | y).X   |        |
|00001850| 7b 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |{.X     |        |
|00001860| 70 74 6c 69 73 74 5b 6e | 75 6d 70 74 73 5d 2e 78 |ptlist[n|umpts].x|
|00001870| 3d 63 65 6e 74 65 72 2e | 78 2b 78 3b 20 20 20 70 |=center.|x+x;   p|
|00001880| 74 6c 69 73 74 5b 6e 75 | 6d 70 74 73 2b 2b 5d 2e |tlist[nu|mpts++].|
|00001890| 79 3d 63 65 6e 74 65 72 | 2e 79 2b 79 3b 0a 58 20 |y=center|.y+y;.X |
|000018a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 70 74 6c 69 |        |    ptli|
|000018b0| 73 74 5b 6e 75 6d 70 74 | 73 5d 2e 78 3d 63 65 6e |st[numpt|s].x=cen|
|000018c0| 74 65 72 2e 78 2d 78 3b | 20 20 20 70 74 6c 69 73 |ter.x-x;|   ptlis|
|000018d0| 74 5b 6e 75 6d 70 74 73 | 2b 2b 5d 2e 79 3d 63 65 |t[numpts|++].y=ce|
|000018e0| 6e 74 65 72 2e 79 2b 79 | 3b 0a 58 20 20 20 20 20 |nter.y+y|;.X     |
|000018f0| 20 20 20 20 20 20 20 20 | 70 74 6c 69 73 74 5b 6e |        |ptlist[n|
|00001900| 75 6d 70 74 73 5d 2e 78 | 3d 63 65 6e 74 65 72 2e |umpts].x|=center.|
|00001910| 78 2b 78 3b 20 20 20 70 | 74 6c 69 73 74 5b 6e 75 |x+x;   p|tlist[nu|
|00001920| 6d 70 74 73 2b 2b 5d 2e | 79 3d 63 65 6e 74 65 72 |mpts++].|y=center|
|00001930| 2e 79 2d 79 3b 0a 58 20 | 20 20 20 20 20 20 20 20 |.y-y;.X |        |
|00001940| 20 20 20 20 70 74 6c 69 | 73 74 5b 6e 75 6d 70 74 |    ptli|st[numpt|
|00001950| 73 5d 2e 78 3d 63 65 6e | 74 65 72 2e 78 2d 78 3b |s].x=cen|ter.x-x;|
|00001960| 20 20 20 70 74 6c 69 73 | 74 5b 6e 75 6d 70 74 73 |   ptlis|t[numpts|
|00001970| 2b 2b 5d 2e 79 3d 63 65 | 6e 74 65 72 2e 79 2d 79 |++].y=ce|nter.y-y|
|00001980| 3b 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 7d 0a |;.X     |      }.|
|00001990| 58 0a 58 09 20 20 20 6d | 79 5f 70 77 5f 70 6f 6c |X.X.   m|y_pw_pol|
|000019a0| 79 70 6f 69 6e 74 28 70 | 77 2c 30 2c 30 2c 6e 75 |ypoint(p|w,0,0,nu|
|000019b0| 6d 70 74 73 2c 70 74 6c | 69 73 74 2c 50 49 58 5f |mpts,ptl|ist,PIX_|
|000019c0| 53 45 54 29 3b 0a 58 7d | 20 20 2f 2a 20 65 6e 64 |SET);.X}|  /* end|
|000019d0| 20 6f 66 20 66 75 6e 63 | 74 69 6f 6e 20 64 72 61 | of func|tion dra|
|000019e0| 77 5f 63 69 72 63 6c 65 | 28 29 20 2a 2f 20 20 20 |w_circle|() */   |
|000019f0| 0a 58 0a 58 0a 58 0a 58 | 6d 79 5f 70 77 5f 70 6f |.X.X.X.X|my_pw_po|
|00001a00| 6c 79 70 6f 69 6e 74 28 | 74 65 6d 70 5f 70 77 2c |lypoint(|temp_pw,|
|00001a10| 6f 66 66 5f 78 2c 6f 66 | 66 5f 79 2c 63 6f 75 6e |off_x,of|f_y,coun|
|00001a20| 74 5f 70 74 73 2c 70 74 | 6c 69 73 74 2c 20 52 4f |t_pts,pt|list, RO|
|00001a30| 50 29 0a 58 50 69 78 77 | 69 6e 20 2a 74 65 6d 70 |P).XPixw|in *temp|
|00001a40| 5f 70 77 3b 0a 58 69 6e | 74 20 6f 66 66 5f 78 2c |_pw;.Xin|t off_x,|
|00001a50| 6f 66 66 5f 79 2c 63 6f | 75 6e 74 5f 70 74 73 3b |off_y,co|unt_pts;|
|00001a60| 0a 58 73 74 72 75 63 74 | 20 70 72 5f 70 6f 73 20 |.Xstruct| pr_pos |
|00001a70| 70 74 6c 69 73 74 5b 5d | 3b 0a 58 69 6e 74 20 52 |ptlist[]|;.Xint R|
|00001a80| 4f 50 3b 0a 58 7b 0a 58 | 0a 58 20 20 69 66 20 28 |OP;.X{.X|.X  if (|
|00001a90| 69 6d 61 67 65 5f 64 65 | 70 74 68 20 3e 20 31 29 |image_de|pth > 1)|
|00001aa0| 0a 58 20 20 7b 0a 58 20 | 20 20 20 77 68 69 6c 65 |.X  {.X |   while|
|00001ab0| 28 2d 2d 63 6f 75 6e 74 | 5f 70 74 73 20 3e 20 30 |(--count|_pts > 0|
|00001ac0| 29 0a 58 20 20 20 20 7b | 0a 58 20 20 20 20 20 20 |).X    {|.X      |
|00001ad0| 70 77 5f 72 6f 70 28 74 | 65 6d 70 5f 70 77 2c 6f |pw_rop(t|emp_pw,o|
|00001ae0| 66 66 5f 78 2b 70 74 6c | 69 73 74 5b 63 6f 75 6e |ff_x+ptl|ist[coun|
|00001af0| 74 5f 70 74 73 5d 2e 78 | 2c 6f 66 66 5f 79 2b 70 |t_pts].x|,off_y+p|
|00001b00| 74 6c 69 73 74 5b 63 6f | 75 6e 74 5f 70 74 73 5d |tlist[co|unt_pts]|
|00001b10| 2e 79 2c 31 2c 31 0a 58 | 20 20 09 2c 50 49 58 5f |.y,1,1.X|  .,PIX_|
|00001b20| 43 4f 4c 4f 52 28 63 75 | 72 5f 63 6f 6c 6f 72 29 |COLOR(cu|r_color)|
|00001b30| 20 7c 20 50 49 58 5f 53 | 52 43 20 2c 70 61 74 74 | | PIX_S|RC ,patt|
|00001b40| 65 72 6e 5b 30 5d 2c 30 | 2c 30 29 3b 0a 58 20 20 |ern[0],0|,0);.X  |
|00001b50| 20 20 7d 0a 58 20 20 7d | 0a 58 20 20 65 6c 73 65 |  }.X  }|.X  else|
|00001b60| 0a 58 20 20 7b 0a 58 20 | 20 20 20 70 77 5f 70 6f |.X  {.X |   pw_po|
|00001b70| 6c 79 70 6f 69 6e 74 28 | 74 65 6d 70 5f 70 77 2c |lypoint(|temp_pw,|
|00001b80| 6f 66 66 5f 78 2c 6f 66 | 66 5f 79 2c 63 6f 75 6e |off_x,of|f_y,coun|
|00001b90| 74 5f 70 74 73 2c 70 74 | 6c 69 73 74 2c 52 4f 50 |t_pts,pt|list,ROP|
|00001ba0| 29 3b 0a 58 20 20 7d 0a | 58 7d 0a 45 4e 44 5f 4f |);.X  }.|X}.END_O|
|00001bb0| 46 5f 63 69 72 63 6c 65 | 2e 63 0a 69 66 20 74 65 |F_circle|.c.if te|
|00001bc0| 73 74 20 33 35 37 37 20 | 2d 6e 65 20 60 77 63 20 |st 3577 |-ne `wc |
|00001bd0| 2d 63 20 3c 63 69 72 63 | 6c 65 2e 63 60 3b 20 74 |-c <circ|le.c`; t|
|00001be0| 68 65 6e 0a 20 20 20 20 | 65 63 68 6f 20 73 68 61 |hen.    |echo sha|
|00001bf0| 72 3a 20 5c 22 63 69 72 | 63 6c 65 2e 63 5c 22 20 |r: \"cir|cle.c\" |
|00001c00| 75 6e 70 61 63 6b 65 64 | 20 77 69 74 68 20 77 72 |unpacked| with wr|
|00001c10| 6f 6e 67 20 73 69 7a 65 | 21 0a 66 69 0a 23 20 65 |ong size|!.fi.# e|
|00001c20| 6e 64 20 6f 66 20 6f 76 | 65 72 77 72 69 74 69 6e |nd of ov|erwritin|
|00001c30| 67 20 63 68 65 63 6b 0a | 66 69 0a 69 66 20 74 65 |g check.|fi.if te|
|00001c40| 73 74 20 2d 66 20 63 6d | 73 5f 72 61 69 6e 62 6f |st -f cm|s_rainbo|
|00001c50| 77 2e 63 20 2d 61 20 22 | 24 7b 31 7d 22 20 21 3d |w.c -a "|${1}" !=|
|00001c60| 20 22 2d 63 22 20 3b 20 | 74 68 65 6e 20 0a 20 20 | "-c" ; |then .  |
|00001c70| 65 63 68 6f 20 73 68 61 | 72 3a 20 57 69 6c 6c 20 |echo sha|r: Will |
|00001c80| 6e 6f 74 20 6f 76 65 72 | 2d 77 72 69 74 65 20 65 |not over|-write e|
|00001c90| 78 69 73 74 69 6e 67 20 | 66 69 6c 65 20 5c 22 63 |xisting |file \"c|
|00001ca0| 6d 73 5f 72 61 69 6e 62 | 6f 77 2e 63 5c 22 0a 65 |ms_rainb|ow.c\".e|
|00001cb0| 6c 73 65 0a 65 63 68 6f | 20 73 68 61 72 3a 20 45 |lse.echo| shar: E|
|00001cc0| 78 74 72 61 63 74 69 6e | 67 20 5c 22 63 6d 73 5f |xtractin|g \"cms_|
|00001cd0| 72 61 69 6e 62 6f 77 2e | 63 5c 22 20 5c 28 32 38 |rainbow.|c\" \(28|
|00001ce0| 38 36 20 63 68 61 72 61 | 63 74 65 72 73 5c 29 0a |86 chara|cters\).|
|00001cf0| 73 65 64 20 22 73 2f 5e | 58 2f 2f 22 20 3e 63 6d |sed "s/^|X//" >cm|
|00001d00| 73 5f 72 61 69 6e 62 6f | 77 2e 63 20 3c 3c 27 45 |s_rainbo|w.c <<'E|
|00001d10| 4e 44 5f 4f 46 5f 63 6d | 73 5f 72 61 69 6e 62 6f |ND_OF_cm|s_rainbo|
|00001d20| 77 2e 63 27 0a 58 0a 58 | 2f 2a 2a 2a 2a 2a 2a 2a |w.c'.X.X|/*******|
|00001d30| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001d40| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001d50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001d60| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001d70| 2a 2a 2a 0a 58 20 20 20 | 54 6f 75 63 68 75 70 20 |***.X   |Touchup |
|00001d80| 61 20 62 69 74 6d 61 70 | 20 67 72 61 70 68 69 63 |a bitmap| graphic|
|00001d90| 73 20 65 64 69 74 6f 72 | 20 66 6f 72 20 74 68 65 |s editor| for the|
|00001da0| 20 53 75 6e 20 57 6f 72 | 6b 73 74 61 74 69 6f 6e | Sun Wor|kstation|
|00001db0| 20 72 75 6e 6e 69 6e 67 | 20 53 75 6e 56 69 65 77 | running| SunView|
|00001dc0| 0a 58 20 20 20 43 6f 70 | 79 72 69 67 68 74 20 28 |.X   Cop|yright (|
|00001dd0| 63 29 20 31 39 38 38 20 | 62 79 20 52 61 79 6d 6f |c) 1988 |by Raymo|
|00001de0| 6e 64 20 4b 72 65 69 73 | 65 6c 0a 58 20 20 20 31 |nd Kreis|el.X   1|
|00001df0| 2f 32 32 2f 38 38 20 40 | 20 53 75 6e 79 20 53 74 |/22/88 @| Suny St|
|00001e00| 6f 6e 79 20 42 72 6f 6f | 6b 0a 58 0a 58 20 20 20 |ony Broo|k.X.X   |
|00001e10| 54 68 69 73 20 70 72 6f | 67 72 61 6d 20 6d 61 79 |This pro|gram may|
|00001e20| 20 62 65 20 72 65 64 69 | 73 74 72 69 62 75 74 65 | be redi|stribute|
|00001e30| 64 20 77 69 74 68 6f 75 | 74 20 66 65 65 20 61 73 |d withou|t fee as|
|00001e40| 20 6c 6f 6e 67 20 61 73 | 20 74 68 69 73 20 63 6f | long as| this co|
|00001e50| 70 79 72 69 67 68 74 0a | 58 20 20 20 6e 6f 74 69 |pyright.|X   noti|
|00001e60| 63 65 20 69 73 20 69 6e | 74 61 63 74 2e 0a 58 0a |ce is in|tact..X.|
|00001e70| 58 3d 3d 3e 20 50 4c 45 | 41 53 45 20 73 65 6e 64 |X==> PLE|ASE send|
|00001e80| 20 63 6f 6d 6d 65 6e 74 | 73 20 61 6e 64 20 62 75 | comment|s and bu|
|00001e90| 67 20 72 65 70 6f 72 74 | 73 20 74 6f 20 6f 6e 65 |g report|s to one|
|00001ea0| 20 6f 66 20 74 68 65 20 | 66 6f 6c 6c 6f 77 69 6e | of the |followin|
|00001eb0| 67 20 61 64 64 72 65 73 | 73 65 73 3a 0a 58 0a 58 |g addres|ses:.X.X|
|00001ec0| 09 20 20 20 52 61 79 20 | 4b 72 65 69 73 65 6c 0a |.   Ray |Kreisel.|
|00001ed0| 58 09 20 20 20 43 53 20 | 44 65 70 74 2e 2c 20 53 |X.   CS |Dept., S|
|00001ee0| 55 4e 59 20 61 74 20 53 | 74 6f 6e 79 20 42 72 6f |UNY at S|tony Bro|
|00001ef0| 6f 6b 2c 20 53 74 6f 6e | 79 20 42 72 6f 6f 6b 20 |ok, Ston|y Brook |
|00001f00| 4e 59 20 31 31 37 39 34 | 0a 58 0a 58 09 20 20 20 |NY 11794|.X.X.   |
|00001f10| 55 55 43 50 3a 20 7b 61 | 6c 6c 65 67 72 61 2c 20 |UUCP: {a|llegra, |
|00001f20| 70 68 69 6c 61 62 73 2c | 20 70 79 72 61 6d 69 64 |philabs,| pyramid|
|00001f30| 2c 20 72 65 73 65 61 72 | 63 68 7d 21 73 62 63 73 |, resear|ch}!sbcs|
|00001f40| 21 72 61 79 6b 20 20 20 | 0a 58 09 20 20 20 41 52 |!rayk   |.X.   AR|
|00001f50| 50 41 2d 49 6e 74 65 72 | 6e 65 74 3a 20 72 61 79 |PA-Inter|net: ray|
|00001f60| 6b 40 73 62 63 73 2e 73 | 75 6e 79 73 62 2e 65 64 |k@sbcs.s|unysb.ed|
|00001f70| 75 09 09 09 0a 58 09 20 | 20 20 43 53 6e 65 74 3a |u....X. |  CSnet:|
|00001f80| 20 72 61 79 6b 40 73 75 | 6e 79 2d 73 62 0a 58 09 | rayk@su|ny-sb.X.|
|00001f90| 20 20 20 28 49 66 20 6e | 6f 62 6f 64 79 20 69 73 |   (If n|obody is|
|00001fa0| 20 68 6f 6d 65 20 61 74 | 20 61 6e 79 20 6f 66 20 | home at| any of |
|00001fb0| 74 68 65 20 61 62 6f 76 | 65 20 61 64 64 72 65 73 |the abov|e addres|
|00001fc0| 73 65 73 20 74 72 79 3a | 0a 58 09 09 53 37 32 51 |ses try:|.X..S72Q|
|00001fd0| 4b 52 45 40 54 4f 57 53 | 4f 4e 56 58 2e 42 49 54 |KRE@TOWS|ONVX.BIT|
|00001fe0| 4e 45 54 09 09 09 20 20 | 20 20 20 20 20 20 29 0a |NET...  |      ).|
|00001ff0| 58 0a 58 20 22 49 66 20 | 49 20 67 65 74 20 68 6f |X.X "If |I get ho|
|00002000| 6d 65 20 62 65 66 6f 72 | 65 20 64 61 79 6c 69 67 |me befor|e daylig|
|00002010| 68 74 2c 20 49 20 6a 75 | 73 74 20 6d 69 67 68 74 |ht, I ju|st might|
|00002020| 20 67 65 74 20 73 6f 6d | 65 20 73 6c 65 65 70 20 | get som|e sleep |
|00002030| 74 6f 6e 69 67 68 74 2e | 2e 2e 2e 22 0a 58 0a 58 |tonight.|...".X.X|
|00002040| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002050| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002060| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002070| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002080| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2f 0a 58 2f 2a 2a |********|**/.X/**|
|00002090| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000020a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000020b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000020c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000020d0| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 58 09 66 69 6c 65 3a |********|.X.file:|
|000020e0| 20 20 63 6d 73 5f 72 61 | 69 6e 62 6f 77 2e 63 0a |  cms_ra|inbow.c.|
|000020f0| 58 09 70 75 72 70 6f 73 | 65 3a 20 74 68 69 73 20 |X.purpos|e: this |
|00002100| 66 69 6c 65 20 63 6f 6e | 74 61 69 6e 73 20 74 68 |file con|tains th|
|00002110| 61 74 20 66 75 6e 63 69 | 74 6f 6e 20 74 68 61 74 |at funci|ton that|
|00002120| 20 69 6e 69 74 61 6c 69 | 7a 65 73 20 74 68 65 0a | initali|zes the.|
|00002130| 58 09 09 74 68 65 20 64 | 65 66 61 75 6c 74 20 63 |X..the d|efault c|
|00002140| 6f 6c 6f 72 20 74 61 62 | 6c 65 20 66 6f 72 20 63 |olor tab|le for c|
|00002150| 6f 6c 6f 72 20 73 75 6e | 20 75 73 61 67 65 0a 58 |olor sun| usage.X|
|00002160| 0a 58 09 6d 6f 64 69 66 | 69 63 61 74 69 6f 6e 73 |.X.modif|ications|
|00002170| 3a 0a 58 09 09 64 61 74 | 65 3a 09 54 75 65 20 4d |:.X..dat|e:.Tue M|
|00002180| 61 72 20 32 32 20 32 32 | 3a 30 34 3a 35 38 20 45 |ar 22 22|:04:58 E|
|00002190| 53 54 20 31 39 38 38 0a | 58 09 09 61 75 74 68 6f |ST 1988.|X..autho|
|000021a0| 72 3a 09 72 61 79 6b 0a | 58 09 09 63 68 61 6e 67 |r:.rayk.|X..chang|
|000021b0| 65 73 3a 61 64 64 20 63 | 6f 6d 6d 65 6e 74 73 0a |es:add c|omments.|
|000021c0| 58 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |X*******|********|
|000021d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000021e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000021f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002200| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2f 0a 58 0a 58 |********|***/.X.X|
|00002210| 65 78 74 65 72 6e 20 75 | 6e 73 69 67 6e 65 64 20 |extern u|nsigned |
|00002220| 63 68 61 72 20 72 65 64 | 5b 32 35 36 5d 2c 67 72 |char red|[256],gr|
|00002230| 65 65 6e 5b 32 35 36 5d | 2c 62 6c 75 65 5b 32 35 |een[256]|,blue[25|
|00002240| 36 5d 3b 0a 58 0a 58 73 | 65 74 5f 63 6f 6c 6f 72 |6];.X.Xs|et_color|
|00002250| 65 6e 74 72 79 28 69 2c | 20 72 2c 20 67 2c 20 62 |entry(i,| r, g, b|
|00002260| 29 0a 58 7b 0a 58 20 20 | 72 65 64 5b 69 5d 20 3d |).X{.X  |red[i] =|
|00002270| 72 3b 0a 58 20 20 67 72 | 65 65 6e 5b 69 5d 20 3d |r;.X  gr|een[i] =|
|00002280| 67 3b 0a 58 20 20 62 6c | 75 65 5b 69 5d 3d 62 3b |g;.X  bl|ue[i]=b;|
|00002290| 0a 58 7d 0a 58 0a 58 0a | 58 0a 58 76 6f 69 64 20 |.X}.X.X.|X.Xvoid |
|000022a0| 69 6e 69 74 5f 63 6f 6c | 6f 72 74 61 62 6c 65 28 |init_col|ortable(|
|000022b0| 29 0a 58 0a 58 7b 0a 58 | 20 20 20 20 69 6e 74 20 |).X.X{.X|    int |
|000022c0| 69 2c 20 72 65 64 2c 20 | 67 72 65 65 6e 2c 20 62 |i, red, |green, b|
|000022d0| 6c 75 65 3b 0a 58 20 20 | 20 20 73 65 74 5f 63 6f |lue;.X  |  set_co|
|000022e0| 6c 6f 72 65 6e 74 72 79 | 28 30 2c 20 32 35 35 2c |lorentry|(0, 255,|
|000022f0| 20 32 35 35 2c 20 32 35 | 35 29 3b 09 2f 2a 20 77 | 255, 25|5);./* w|
|00002300| 68 69 74 65 20 2a 2f 0a | 58 20 20 20 20 73 65 74 |hite */.|X    set|
|00002310| 5f 63 6f 6c 6f 72 65 6e | 74 72 79 28 31 2c 20 30 |_coloren|try(1, 0|
|00002320| 2c 20 30 2c 20 30 29 3b | 09 09 2f 2a 20 62 6c 61 |, 0, 0);|../* bla|
|00002330| 63 6b 20 2a 2f 0a 58 20 | 20 20 20 72 65 64 20 3d |ck */.X |   red =|
|00002340| 20 62 6c 75 65 20 3d 20 | 67 72 65 65 6e 20 3d 20 | blue = |green = |
|00002350| 30 3b 0a 58 0a 58 20 20 | 20 20 66 6f 72 20 28 69 |0;.X.X  |  for (i|
|00002360| 20 3d 20 32 3b 20 69 20 | 3c 20 33 30 3b 20 69 2b | = 2; i |< 30; i+|
|00002370| 2b 29 20 7b 0a 58 09 72 | 65 64 20 2b 3d 20 39 3b |+) {.X.r|ed += 9;|
|00002380| 0a 58 09 73 65 74 5f 63 | 6f 6c 6f 72 65 6e 74 72 |.X.set_c|olorentr|
|00002390| 79 28 69 2c 20 72 65 64 | 2c 20 67 72 65 65 6e 2c |y(i, red|, green,|
|000023a0| 20 62 6c 75 65 29 3b 0a | 58 20 20 20 20 7d 0a 58 | blue);.|X    }.X|
|000023b0| 20 20 20 20 73 65 74 5f | 63 6f 6c 6f 72 65 6e 74 |    set_|colorent|
|000023c0| 72 79 28 33 30 2c 20 32 | 35 35 2c 20 30 2c 20 30 |ry(30, 2|55, 0, 0|
|000023d0| 29 3b 09 2f 2a 20 72 65 | 64 20 2a 2f 0a 58 20 20 |);./* re|d */.X  |
|000023e0| 20 20 72 65 64 20 3d 20 | 32 35 35 3b 20 62 6c 75 |  red = |255; blu|
|000023f0| 65 20 3d 20 67 72 65 65 | 6e 20 3d 20 30 3b 0a 58 |e = gree|n = 0;.X|
|00002400| 20 20 20 20 66 6f 72 20 | 28 69 20 3d 20 33 30 3b |    for |(i = 30;|
|00002410| 20 69 20 3c 20 36 32 3b | 20 69 2b 2b 29 20 7b 0a | i < 62;| i++) {.|
|00002420| 58 09 67 72 65 65 6e 20 | 2b 3d 20 36 3b 0a 58 09 |X.green |+= 6;.X.|
|00002430| 73 65 74 5f 63 6f 6c 6f | 72 65 6e 74 72 79 28 69 |set_colo|rentry(i|
|00002440| 2c 20 72 65 64 2c 20 67 | 72 65 65 6e 2c 20 62 6c |, red, g|reen, bl|
|00002450| 75 65 29 3b 0a 58 20 20 | 20 20 7d 0a 58 20 20 20 |ue);.X  |  }.X   |
|00002460| 20 73 65 74 5f 63 6f 6c | 6f 72 65 6e 74 72 79 28 | set_col|orentry(|
|00002470| 36 32 2c 20 32 35 35 2c | 20 31 39 35 2c 20 30 29 |62, 255,| 195, 0)|
|00002480| 3b 09 2f 2a 20 6f 72 61 | 6e 67 65 20 2a 2f 20 2f |;./* ora|nge */ /|
|00002490| 2a 20 6e 6f 74 65 20 64 | 69 66 66 20 3d 20 33 33 |* note d|iff = 33|
|000024a0| 20 2a 2f 0a 58 20 20 20 | 20 72 65 64 20 3d 20 32 | */.X   | red = 2|
|000024b0| 35 35 3b 20 62 6c 75 65 | 20 3d 20 30 3b 20 67 72 |55; blue| = 0; gr|
|000024c0| 65 65 6e 20 3d 20 31 39 | 35 3b 0a 58 20 20 20 20 |een = 19|5;.X    |
|000024d0| 66 6f 72 20 28 69 20 3d | 20 36 33 3b 20 69 20 3c |for (i =| 63; i <|
|000024e0| 20 39 36 3b 20 69 2b 2b | 29 20 7b 0a 58 09 67 72 | 96; i++|) {.X.gr|
|000024f0| 65 65 6e 20 2b 3d 20 32 | 3b 0a 58 09 73 65 74 5f |een += 2|;.X.set_|
|00002500| 63 6f 6c 6f 72 65 6e 74 | 72 79 28 69 2c 20 72 65 |colorent|ry(i, re|
|00002510| 64 2c 20 67 72 65 65 6e | 2c 20 62 6c 75 65 29 3b |d, green|, blue);|
|00002520| 0a 58 20 20 20 20 7d 0a | 58 20 20 20 20 73 65 74 |.X    }.|X    set|
|00002530| 5f 63 6f 6c 6f 72 65 6e | 74 72 79 28 39 36 2c 20 |_coloren|try(96, |
|00002540| 32 35 35 2c 20 32 35 35 | 2c 20 30 29 3b 09 2f 2a |255, 255|, 0);./*|
|00002550| 20 79 65 6c 6c 6f 77 20 | 2a 2f 0a 58 20 20 20 20 | yellow |*/.X    |
|00002560| 72 65 64 20 3d 20 32 35 | 35 3b 20 62 6c 75 65 20 |red = 25|5; blue |
|00002570| 3d 20 30 3b 20 67 72 65 | 65 6e 20 3d 20 32 35 35 |= 0; gre|en = 255|
|00002580| 3b 0a 58 20 20 20 20 66 | 6f 72 20 28 69 20 3d 20 |;.X    f|or (i = |
|00002590| 39 37 3b 20 69 20 3c 20 | 31 33 33 3b 20 69 2b 2b |97; i < |133; i++|
|000025a0| 29 20 7b 0a 58 09 72 65 | 64 20 2d 3d 20 37 3b 0a |) {.X.re|d -= 7;.|
|000025b0| 58 09 73 65 74 5f 63 6f | 6c 6f 72 65 6e 74 72 79 |X.set_co|lorentry|
|000025c0| 28 69 2c 20 72 65 64 2c | 20 67 72 65 65 6e 2c 20 |(i, red,| green, |
|000025d0| 62 6c 75 65 29 3b 0a 58 | 20 20 20 20 7d 0a 58 20 |blue);.X|    }.X |
|000025e0| 20 20 20 73 65 74 5f 63 | 6f 6c 6f 72 65 6e 74 72 |   set_c|olorentr|
|000025f0| 79 28 31 33 33 2c 20 30 | 2c 20 32 35 35 2c 20 30 |y(133, 0|, 255, 0|
|00002600| 29 3b 09 2f 2a 20 67 72 | 65 65 6e 20 2a 2f 0a 58 |);./* gr|een */.X|
|00002610| 20 20 20 20 72 65 64 20 | 3d 20 62 6c 75 65 20 3d |    red |= blue =|
|00002620| 20 30 3b 20 67 72 65 65 | 6e 20 3d 20 32 35 35 3b | 0; gree|n = 255;|
|00002630| 0a 58 20 20 20 20 66 6f | 72 20 28 69 20 3d 20 31 |.X    fo|r (i = 1|
|00002640| 33 34 3b 20 69 20 3c 20 | 31 36 35 3b 20 69 2b 2b |34; i < |165; i++|
|00002650| 29 20 7b 0a 58 09 67 72 | 65 65 6e 20 2d 3d 20 38 |) {.X.gr|een -= 8|
|00002660| 3b 0a 58 09 62 6c 75 65 | 20 2b 3d 20 38 3b 0a 58 |;.X.blue| += 8;.X|
|00002670| 09 73 65 74 5f 63 6f 6c | 6f 72 65 6e 74 72 79 28 |.set_col|orentry(|
|00002680| 69 2c 20 72 65 64 2c 20 | 67 72 65 65 6e 2c 20 62 |i, red, |green, b|
|00002690| 6c 75 65 29 3b 0a 58 20 | 20 20 20 7d 0a 58 20 20 |lue);.X |   }.X  |
|000026a0| 20 20 73 65 74 5f 63 6f | 6c 6f 72 65 6e 74 72 79 |  set_co|lorentry|
|000026b0| 28 31 36 35 2c 20 30 2c | 20 30 2c 20 32 35 35 29 |(165, 0,| 0, 255)|
|000026c0| 3b 09 2f 2a 20 62 6c 75 | 65 20 2a 2f 0a 58 20 20 |;./* blu|e */.X  |
|000026d0| 20 20 72 65 64 20 3d 20 | 67 72 65 65 6e 20 3d 20 |  red = |green = |
|000026e0| 30 3b 20 62 6c 75 65 20 | 3d 20 32 35 35 3b 0a 58 |0; blue |= 255;.X|
|000026f0| 20 20 20 20 66 6f 72 20 | 28 69 20 3d 20 31 36 35 |    for |(i = 165|
|00002700| 3b 20 69 20 3c 20 32 30 | 32 3b 20 69 2b 2b 29 20 |; i < 20|2; i++) |
|00002710| 7b 0a 58 09 72 65 64 20 | 2b 3d 20 37 3b 0a 58 09 |{.X.red |+= 7;.X.|
|00002720| 73 65 74 5f 63 6f 6c 6f | 72 65 6e 74 72 79 28 69 |set_colo|rentry(i|
|00002730| 2c 20 72 65 64 2c 20 67 | 72 65 65 6e 2c 20 62 6c |, red, g|reen, bl|
|00002740| 75 65 29 3b 0a 58 20 20 | 20 20 7d 0a 58 20 20 20 |ue);.X  |  }.X   |
|00002750| 20 73 65 74 5f 63 6f 6c | 6f 72 65 6e 74 72 79 28 | set_col|orentry(|
|00002760| 32 30 32 2c 20 32 35 35 | 2c 20 30 2c 20 32 35 35 |202, 255|, 0, 255|
|00002770| 29 3b 09 2f 2a 20 76 69 | 6f 6c 65 74 20 2a 2f 0a |);./* vi|olet */.|
|00002780| 58 20 20 20 20 72 65 64 | 20 3d 20 62 6c 75 65 20 |X    red| = blue |
|00002790| 3d 20 32 35 35 3b 20 67 | 72 65 65 6e 20 3d 20 30 |= 255; g|reen = 0|
|000027a0| 3b 0a 58 20 20 20 20 66 | 6f 72 20 28 69 20 3d 20 |;.X    f|or (i = |
|000027b0| 32 30 33 3b 20 69 20 3c | 20 32 33 39 3b 20 69 2b |203; i <| 239; i+|
|000027c0| 2b 29 20 7b 0a 58 09 67 | 72 65 65 6e 20 2b 3d 20 |+) {.X.g|reen += |
|000027d0| 37 3b 0a 58 09 73 65 74 | 5f 63 6f 6c 6f 72 65 6e |7;.X.set|_coloren|
|000027e0| 74 72 79 28 69 2c 20 72 | 65 64 2c 20 67 72 65 65 |try(i, r|ed, gree|
|000027f0| 6e 2c 20 62 6c 75 65 29 | 3b 0a 58 20 20 20 20 7d |n, blue)|;.X    }|
|00002800| 0a 58 20 20 20 20 73 65 | 74 5f 63 6f 6c 6f 72 65 |.X    se|t_colore|
|00002810| 6e 74 72 79 28 32 33 39 | 2c 20 32 35 35 2c 20 32 |ntry(239|, 255, 2|
|00002820| 35 35 2c 20 32 35 35 29 | 3b 09 2f 2a 20 77 68 69 |55, 255)|;./* whi|
|00002830| 74 65 20 2a 2f 0a 58 20 | 20 20 20 72 65 64 20 3d |te */.X |   red =|
|00002840| 20 62 6c 75 65 20 3d 20 | 67 72 65 65 6e 20 3d 20 | blue = |green = |
|00002850| 32 35 35 3b 0a 58 20 20 | 20 20 66 6f 72 20 28 69 |255;.X  |  for (i|
|00002860| 20 3d 20 32 33 39 3b 20 | 69 20 3c 3d 20 32 35 35 | = 239; |i <= 255|
|00002870| 3b 20 69 2b 2b 29 20 7b | 0a 58 09 67 72 65 65 6e |; i++) {|.X.green|
|00002880| 20 2d 3d 20 39 3b 0a 58 | 09 72 65 64 20 2d 3d 20 | -= 9;.X|.red -= |
|00002890| 39 3b 0a 58 09 62 6c 75 | 65 20 2d 3d 20 39 3b 0a |9;.X.blu|e -= 9;.|
|000028a0| 58 09 73 65 74 5f 63 6f | 6c 6f 72 65 6e 74 72 79 |X.set_co|lorentry|
|000028b0| 28 69 2c 20 72 65 64 2c | 20 67 72 65 65 6e 2c 20 |(i, red,| green, |
|000028c0| 62 6c 75 65 29 3b 0a 58 | 20 20 20 20 7d 0a 58 7d |blue);.X|    }.X}|
|000028d0| 0a 58 0a 45 4e 44 5f 4f | 46 5f 63 6d 73 5f 72 61 |.X.END_O|F_cms_ra|
|000028e0| 69 6e 62 6f 77 2e 63 0a | 69 66 20 74 65 73 74 20 |inbow.c.|if test |
|000028f0| 32 38 38 36 20 2d 6e 65 | 20 60 77 63 20 2d 63 20 |2886 -ne| `wc -c |
|00002900| 3c 63 6d 73 5f 72 61 69 | 6e 62 6f 77 2e 63 60 3b |<cms_rai|nbow.c`;|
|00002910| 20 74 68 65 6e 0a 20 20 | 20 20 65 63 68 6f 20 73 | then.  |  echo s|
|00002920| 68 61 72 3a 20 5c 22 63 | 6d 73 5f 72 61 69 6e 62 |har: \"c|ms_rainb|
|00002930| 6f 77 2e 63 5c 22 20 75 | 6e 70 61 63 6b 65 64 20 |ow.c\" u|npacked |
|00002940| 77 69 74 68 20 77 72 6f | 6e 67 20 73 69 7a 65 21 |with wro|ng size!|
|00002950| 0a 66 69 0a 23 20 65 6e | 64 20 6f 66 20 6f 76 65 |.fi.# en|d of ove|
|00002960| 72 77 72 69 74 69 6e 67 | 20 63 68 65 63 6b 0a 66 |rwriting| check.f|
|00002970| 69 0a 69 66 20 74 65 73 | 74 20 2d 66 20 63 6f 6c |i.if tes|t -f col|
|00002980| 6f 72 5f 70 61 6c 65 74 | 2e 63 20 2d 61 20 22 24 |or_palet|.c -a "$|
|00002990| 7b 31 7d 22 20 21 3d 20 | 22 2d 63 22 20 3b 20 74 |{1}" != |"-c" ; t|
|000029a0| 68 65 6e 20 0a 20 20 65 | 63 68 6f 20 73 68 61 72 |hen .  e|cho shar|
|000029b0| 3a 20 57 69 6c 6c 20 6e | 6f 74 20 6f 76 65 72 2d |: Will n|ot over-|
|000029c0| 77 72 69 74 65 20 65 78 | 69 73 74 69 6e 67 20 66 |write ex|isting f|
|000029d0| 69 6c 65 20 5c 22 63 6f | 6c 6f 72 5f 70 61 6c 65 |ile \"co|lor_pale|
|000029e0| 74 2e 63 5c 22 0a 65 6c | 73 65 0a 65 63 68 6f 20 |t.c\".el|se.echo |
|000029f0| 73 68 61 72 3a 20 45 78 | 74 72 61 63 74 69 6e 67 |shar: Ex|tracting|
|00002a00| 20 5c 22 63 6f 6c 6f 72 | 5f 70 61 6c 65 74 2e 63 | \"color|_palet.c|
|00002a10| 5c 22 20 5c 28 34 34 35 | 35 20 63 68 61 72 61 63 |\" \(445|5 charac|
|00002a20| 74 65 72 73 5c 29 0a 73 | 65 64 20 22 73 2f 5e 58 |ters\).s|ed "s/^X|
|00002a30| 2f 2f 22 20 3e 63 6f 6c | 6f 72 5f 70 61 6c 65 74 |//" >col|or_palet|
|00002a40| 2e 63 20 3c 3c 27 45 4e | 44 5f 4f 46 5f 63 6f 6c |.c <<'EN|D_OF_col|
|00002a50| 6f 72 5f 70 61 6c 65 74 | 2e 63 27 0a 58 0a 58 2f |or_palet|.c'.X.X/|
|00002a60| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002a70| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002a80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002a90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002aa0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0a 58 20 20 20 54 |********|**.X   T|
|00002ab0| 6f 75 63 68 75 70 20 61 | 20 62 69 74 6d 61 70 20 |ouchup a| bitmap |
|00002ac0| 67 72 61 70 68 69 63 73 | 20 65 64 69 74 6f 72 20 |graphics| editor |
|00002ad0| 66 6f 72 20 74 68 65 20 | 53 75 6e 20 57 6f 72 6b |for the |Sun Work|
|00002ae0| 73 74 61 74 69 6f 6e 20 | 72 75 6e 6e 69 6e 67 20 |station |running |
|00002af0| 53 75 6e 56 69 65 77 0a | 58 20 20 20 43 6f 70 79 |SunView.|X   Copy|
|00002b00| 72 69 67 68 74 20 28 63 | 29 20 31 39 38 38 20 62 |right (c|) 1988 b|
|00002b10| 79 20 52 61 79 6d 6f 6e | 64 20 4b 72 65 69 73 65 |y Raymon|d Kreise|
|00002b20| 6c 0a 58 20 20 20 31 2f | 32 32 2f 38 38 20 40 20 |l.X   1/|22/88 @ |
|00002b30| 53 75 6e 79 20 53 74 6f | 6e 79 20 42 72 6f 6f 6b |Suny Sto|ny Brook|
|00002b40| 0a 58 0a 58 20 20 20 54 | 68 69 73 20 70 72 6f 67 |.X.X   T|his prog|
|00002b50| 72 61 6d 20 6d 61 79 20 | 62 65 20 72 65 64 69 73 |ram may |be redis|
|00002b60| 74 72 69 62 75 74 65 64 | 20 77 69 74 68 6f 75 74 |tributed| without|
|00002b70| 20 66 65 65 20 61 73 20 | 6c 6f 6e 67 20 61 73 20 | fee as |long as |
|00002b80| 74 68 69 73 20 63 6f 70 | 79 72 69 67 68 74 0a 58 |this cop|yright.X|
|00002b90| 20 20 20 6e 6f 74 69 63 | 65 20 69 73 20 69 6e 74 |   notic|e is int|
|00002ba0| 61 63 74 2e 0a 58 0a 58 | 3d 3d 3e 20 50 4c 45 41 |act..X.X|==> PLEA|
|00002bb0| 53 45 20 73 65 6e 64 20 | 63 6f 6d 6d 65 6e 74 73 |SE send |comments|
|00002bc0| 20 61 6e 64 20 62 75 67 | 20 72 65 70 6f 72 74 73 | and bug| reports|
|00002bd0| 20 74 6f 20 6f 6e 65 20 | 6f 66 20 74 68 65 20 66 | to one |of the f|
|00002be0| 6f 6c 6c 6f 77 69 6e 67 | 20 61 64 64 72 65 73 73 |ollowing| address|
|00002bf0| 65 73 3a 0a 58 0a 58 09 | 20 20 20 52 61 79 20 4b |es:.X.X.|   Ray K|
|00002c00| 72 65 69 73 65 6c 0a 58 | 09 20 20 20 43 53 20 44 |reisel.X|.   CS D|
|00002c10| 65 70 74 2e 2c 20 53 55 | 4e 59 20 61 74 20 53 74 |ept., SU|NY at St|
|00002c20| 6f 6e 79 20 42 72 6f 6f | 6b 2c 20 53 74 6f 6e 79 |ony Broo|k, Stony|
|00002c30| 20 42 72 6f 6f 6b 20 4e | 59 20 31 31 37 39 34 0a | Brook N|Y 11794.|
|00002c40| 58 0a 58 09 20 20 20 55 | 55 43 50 3a 20 7b 61 6c |X.X.   U|UCP: {al|
|00002c50| 6c 65 67 72 61 2c 20 70 | 68 69 6c 61 62 73 2c 20 |legra, p|hilabs, |
|00002c60| 70 79 72 61 6d 69 64 2c | 20 72 65 73 65 61 72 63 |pyramid,| researc|
|00002c70| 68 7d 21 73 62 63 73 21 | 72 61 79 6b 20 20 20 0a |h}!sbcs!|rayk   .|
|00002c80| 58 09 20 20 20 41 52 50 | 41 2d 49 6e 74 65 72 6e |X.   ARP|A-Intern|
|00002c90| 65 74 3a 20 72 61 79 6b | 40 73 62 63 73 2e 73 75 |et: rayk|@sbcs.su|
|00002ca0| 6e 79 73 62 2e 65 64 75 | 09 09 09 0a 58 09 20 20 |nysb.edu|....X.  |
|00002cb0| 20 43 53 6e 65 74 3a 20 | 72 61 79 6b 40 73 75 6e | CSnet: |rayk@sun|
|00002cc0| 79 2d 73 62 0a 58 09 20 | 20 20 28 49 66 20 6e 6f |y-sb.X. |  (If no|
|00002cd0| 62 6f 64 79 20 69 73 20 | 68 6f 6d 65 20 61 74 20 |body is |home at |
|00002ce0| 61 6e 79 20 6f 66 20 74 | 68 65 20 61 62 6f 76 65 |any of t|he above|
|00002cf0| 20 61 64 64 72 65 73 73 | 65 73 20 74 72 79 3a 0a | address|es try:.|
|00002d00| 58 09 09 53 37 32 51 4b | 52 45 40 54 4f 57 53 4f |X..S72QK|RE@TOWSO|
|00002d10| 4e 56 58 2e 42 49 54 4e | 45 54 09 09 09 20 20 20 |NVX.BITN|ET...   |
|00002d20| 20 20 20 20 20 29 0a 58 | 0a 58 20 22 49 66 20 49 |     ).X|.X "If I|
|00002d30| 20 67 65 74 20 68 6f 6d | 65 20 62 65 66 6f 72 65 | get hom|e before|
|00002d40| 20 64 61 79 6c 69 67 68 | 74 2c 20 49 20 6a 75 73 | dayligh|t, I jus|
|00002d50| 74 20 6d 69 67 68 74 20 | 67 65 74 20 73 6f 6d 65 |t might |get some|
|00002d60| 20 73 6c 65 65 70 20 74 | 6f 6e 69 67 68 74 2e 2e | sleep t|onight..|
|00002d70| 2e 2e 22 0a 58 0a 58 2a | 2a 2a 2a 2a 2a 2a 2a 2a |..".X.X*|********|
|00002d80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002d90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002da0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002db0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002dc0| 2a 2f 0a 58 2f 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |*/.X/***|********|
|00002dd0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002de0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002df0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002e00| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0a |********|*******.|
|00002e10| 58 09 66 69 6c 65 3a 63 | 6f 6c 6f 72 5f 70 61 6c |X.file:c|olor_pal|
|00002e20| 65 74 2e 63 0a 58 09 70 | 75 72 70 6f 73 65 3a 20 |et.c.X.p|urpose: |
|00002e30| 54 68 69 73 20 66 69 6c | 65 20 63 6f 6e 74 61 69 |This fil|e contai|
|00002e40| 6e 73 20 74 68 61 74 20 | 66 75 6e 63 74 69 6f 6e |ns that |function|
|00002e50| 73 20 74 68 61 74 20 68 | 61 6e 64 6c 65 20 74 68 |s that h|andle th|
|00002e60| 65 20 63 6f 6c 6f 72 0a | 58 09 09 6d 61 70 20 66 |e color.|X..map f|
|00002e70| 6f 72 20 75 73 61 67 65 | 20 77 69 74 68 20 63 6f |or usage| with co|
|00002e80| 6c 6f 72 20 73 75 6e 73 | 0a 58 0a 58 09 6d 6f 64 |lor suns|.X.X.mod|
|00002e90| 69 66 69 63 61 74 69 6f | 6e 73 3a 0a 58 09 09 64 |ificatio|ns:.X..d|
|00002ea0| 61 74 65 3a 09 54 75 65 | 20 4d 61 72 20 32 32 20 |ate:.Tue| Mar 22 |
|00002eb0| 32 32 3a 30 34 3a 35 38 | 20 45 53 54 20 31 39 38 |22:04:58| EST 198|
|00002ec0| 38 0a 58 09 09 61 75 74 | 68 6f 72 3a 09 72 61 79 |8.X..aut|hor:.ray|
|00002ed0| 6b 0a 58 09 09 63 68 61 | 6e 67 65 73 3a 61 64 64 |k.X..cha|nges:add|
|00002ee0| 20 63 6f 6d 6d 65 6e 74 | 73 0a 58 2a 2a 2a 2a 2a | comment|s.X*****|
|00002ef0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002f00| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002f10| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002f20| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002f30| 2a 2a 2a 2a 2a 2f 0a 58 | 0a 58 23 69 6e 63 6c 75 |*****/.X|.X#inclu|
|00002f40| 64 65 20 22 68 65 61 64 | 65 72 2e 68 22 0a 58 23 |de "head|er.h".X#|
|00002f50| 69 6e 63 6c 75 64 65 20 | 3c 73 75 6e 77 69 6e 64 |include |<sunwind|
|00002f60| 6f 77 2f 63 6d 73 5f 6d | 6f 6e 6f 2e 68 3e 0a 58 |ow/cms_m|ono.h>.X|
|00002f70| 0a 58 2f 2a 0a 58 20 2a | 20 4c 65 74 73 20 67 6f |.X/*.X *| Lets go|
|00002f80| 20 69 6e 74 6f 20 63 6f | 6c 6f 72 20 6d 6f 64 65 | into co|lor mode|
|00002f90| 2c 20 73 63 6f 74 74 79 | 0a 58 20 2a 0a 58 20 2a |, scotty|.X *.X *|
|00002fa0| 2f 0a 58 73 65 74 5f 63 | 6f 6c 6f 72 28 29 0a 58 |/.Xset_c|olor().X|
|00002fb0| 7b 0a 58 20 20 70 61 6e | 65 6c 5f 73 65 74 28 6d |{.X  pan|el_set(m|
|00002fc0| 6f 6e 6f 5f 63 79 63 6c | 65 2c 50 41 4e 45 4c 5f |ono_cycl|e,PANEL_|
|00002fd0| 53 48 4f 57 5f 49 54 45 | 4d 2c 20 46 41 4c 53 45 |SHOW_ITE|M, FALSE|
|00002fe0| 2c 30 29 3b 0a 58 20 20 | 70 61 6e 65 6c 5f 73 65 |,0);.X  |panel_se|
|00002ff0| 74 28 63 6f 6c 6f 72 5f | 62 75 74 74 6f 6e 2c 50 |t(color_|button,P|
|00003000| 41 4e 45 4c 5f 53 48 4f | 57 5f 49 54 45 4d 2c 20 |ANEL_SHO|W_ITEM, |
|00003010| 54 52 55 45 2c 30 29 3b | 0a 58 7d 0a 58 0a 58 0a |TRUE,0);|.X}.X.X.|
|00003020| 58 2f 2a 0a 58 20 2a 20 | 42 61 63 6b 20 74 6f 20 |X/*.X * |Back to |
|00003030| 6d 6f 6e 6f 20 6d 6f 64 | 65 0a 58 20 2a 0a 58 20 |mono mod|e.X *.X |
|00003040| 2a 2f 0a 58 73 65 74 5f | 6d 6f 6e 6f 28 29 0a 58 |*/.Xset_|mono().X|
|00003050| 7b 0a 58 2f 2a 20 73 65 | 74 20 74 68 65 20 63 6f |{.X/* se|t the co|
|00003060| 6c 6f 72 20 6d 61 70 20 | 74 6f 20 6d 6f 6e 6f 20 |lor map |to mono |
|00003070| 2a 2a 2a 2a 2a 2a 2a 2a | 20 2a 2f 0a 58 20 20 63 |********| */.X  c|
|00003080| 6d 73 5f 6d 6f 6e 6f 63 | 68 72 6f 6d 65 6c 6f 61 |ms_monoc|hromeloa|
|00003090| 64 28 72 65 64 2c 67 72 | 65 65 6e 2c 62 6c 75 65 |d(red,gr|een,blue|
|000030a0| 29 3b 0a 58 20 20 6d 79 | 5f 70 75 74 5f 63 6f 6c |);.X  my|_put_col|
|000030b0| 6f 72 6d 61 70 28 29 3b | 0a 58 20 20 70 61 6e 65 |ormap();|.X  pane|
|000030c0| 6c 5f 73 65 74 28 63 6f | 6c 6f 72 5f 62 75 74 74 |l_set(co|lor_butt|
|000030d0| 6f 6e 2c 50 41 4e 45 4c | 5f 53 48 4f 57 5f 49 54 |on,PANEL|_SHOW_IT|
|000030e0| 45 4d 2c 20 46 41 4c 53 | 45 2c 30 29 3b 0a 58 20 |EM, FALS|E,0);.X |
|000030f0| 20 70 61 6e 65 6c 5f 73 | 65 74 28 6d 6f 6e 6f 5f | panel_s|et(mono_|
|00003100| 63 79 63 6c 65 2c 50 41 | 4e 45 4c 5f 53 48 4f 57 |cycle,PA|NEL_SHOW|
|00003110| 5f 49 54 45 4d 2c 20 54 | 52 55 45 2c 30 29 3b 0a |_ITEM, T|RUE,0);.|
|00003120| 58 7d 0a 58 0a 58 2f 2a | 0a 58 20 2a 20 53 65 74 |X}.X.X/*|.X * Set|
|00003130| 20 74 68 65 20 63 6f 6c | 6f 72 6d 61 70 20 66 6f | the col|ormap fo|
|00003140| 72 20 61 6c 6c 20 6f 66 | 20 74 68 65 20 77 69 6e |r all of| the win|
|00003150| 64 6f 77 73 0a 58 20 2a | 2f 0a 58 75 6e 73 69 67 |dows.X *|/.Xunsig|
|00003160| 6e 65 64 20 63 68 61 72 | 20 74 65 6d 70 5f 72 65 |ned char| temp_re|
|00003170| 64 5b 32 35 36 5d 2c 74 | 65 6d 70 5f 67 72 65 65 |d[256],t|emp_gree|
|00003180| 6e 5b 32 35 36 5d 2c 74 | 65 6d 70 5f 62 6c 75 65 |n[256],t|emp_blue|
|00003190| 5b 32 35 36 5d 3b 0a 58 | 0a 58 6d 79 5f 70 75 74 |[256];.X|.Xmy_put|
|000031a0| 5f 63 6f 6c 6f 72 6d 61 | 70 28 29 0a 58 7b 0a 58 |_colorma|p().X{.X|
|000031b0| 50 69 78 77 69 6e 20 2a | 74 65 6d 70 5f 70 77 3b |Pixwin *|temp_pw;|
|000031c0| 0a 58 0a 58 20 20 70 77 | 5f 73 65 74 63 6d 73 6e |.X.X  pw|_setcmsn|
|000031d0| 61 6d 65 28 70 77 2c 20 | 22 72 61 79 20 6b 72 65 |ame(pw, |"ray kre|
|000031e0| 69 73 65 6c 22 29 3b 0a | 58 20 20 70 77 5f 70 75 |isel");.|X  pw_pu|
|000031f0| 74 63 6f 6c 6f 72 6d 61 | 70 28 70 77 2c 20 30 2c |tcolorma|p(pw, 0,|
|00003200| 32 35 36 2c 72 65 64 2c | 67 72 65 65 6e 2c 62 6c |256,red,|green,bl|
|00003210| 75 65 29 3b 0a 58 20 20 | 70 77 5f 73 65 74 63 6d |ue);.X  |pw_setcm|
|00003220| 73 6e 61 6d 65 28 66 61 | 74 5f 70 77 2c 20 22 72 |sname(fa|t_pw, "r|
|00003230| 61 79 20 6b 72 65 69 73 | 65 6c 22 29 3b 0a 58 20 |ay kreis|el");.X |
|00003240| 20 70 77 5f 70 75 74 63 | 6f 6c 6f 72 6d 61 70 28 | pw_putc|olormap(|
|00003250| 66 61 74 5f 70 77 2c 20 | 30 2c 32 35 36 2c 72 65 |fat_pw, |0,256,re|
|00003260| 64 2c 67 72 65 65 6e 2c | 62 6c 75 65 29 3b 0a 58 |d,green,|blue);.X|
|00003270| 20 20 70 77 5f 73 65 74 | 63 6d 73 6e 61 6d 65 28 |  pw_set|cmsname(|
|00003280| 63 6f 6c 6f 72 5f 70 77 | 2c 20 22 72 61 79 20 6b |color_pw|, "ray k|
|00003290| 72 65 69 73 65 6c 22 29 | 3b 0a 58 20 20 70 77 5f |reisel")|;.X  pw_|
|000032a0| 70 75 74 63 6f 6c 6f 72 | 6d 61 70 28 63 6f 6c 6f |putcolor|map(colo|
|000032b0| 72 5f 70 77 2c 20 30 2c | 32 35 36 2c 72 65 64 2c |r_pw, 0,|256,red,|
|000032c0| 67 72 65 65 6e 2c 62 6c | 75 65 29 3b 0a 58 0a 58 |green,bl|ue);.X.X|
|000032d0| 20 20 62 63 6f 70 79 28 | 72 65 64 2c 74 65 6d 70 |  bcopy(|red,temp|
|000032e0| 5f 72 65 64 2c 32 35 36 | 29 3b 0a 58 20 20 62 63 |_red,256|);.X  bc|
|000032f0| 6f 70 79 28 67 72 65 65 | 6e 2c 74 65 6d 70 5f 67 |opy(gree|n,temp_g|
|00003300| 72 65 65 6e 2c 32 35 36 | 29 3b 0a 58 20 20 62 63 |reen,256|);.X  bc|
|00003310| 6f 70 79 28 62 6c 75 65 | 2c 74 65 6d 70 5f 62 6c |opy(blue|,temp_bl|
|00003320| 75 65 2c 32 35 36 29 3b | 0a 58 20 20 74 65 6d 70 |ue,256);|.X  temp|
|00003330| 5f 72 65 64 5b 30 5d 20 | 3d 20 2d 31 3b 0a 58 20 |_red[0] |= -1;.X |
|00003340| 20 74 65 6d 70 5f 67 72 | 65 65 6e 5b 30 5d 20 3d | temp_gr|een[0] =|
|00003350| 20 2d 31 3b 0a 58 20 20 | 74 65 6d 70 5f 62 6c 75 | -1;.X  |temp_blu|
|00003360| 65 5b 30 5d 20 3d 20 2d | 31 3b 0a 58 20 20 74 65 |e[0] = -|1;.X  te|
|00003370| 6d 70 5f 72 65 64 5b 31 | 5d 20 3d 20 30 3b 0a 58 |mp_red[1|] = 0;.X|
|00003380| 20 20 74 65 6d 70 5f 67 | 72 65 65 6e 5b 31 5d 20 |  temp_g|reen[1] |
|00003390| 3d 20 30 3b 0a 58 20 20 | 74 65 6d 70 5f 62 6c 75 |= 0;.X  |temp_blu|
|000033a0| 65 5b 31 5d 20 3d 20 30 | 3b 0a 58 0a 58 20 20 74 |e[1] = 0|;.X.X  t|
|000033b0| 65 6d 70 5f 70 77 20 3d | 20 28 50 69 78 77 69 6e |emp_pw =| (Pixwin|
|000033c0| 20 2a 29 77 69 6e 64 6f | 77 5f 67 65 74 28 70 61 | *)windo|w_get(pa|
|000033d0| 6e 65 6c 2c 20 57 49 4e | 5f 50 49 58 57 49 4e 29 |nel, WIN|_PIXWIN)|
|000033e0| 3b 0a 58 20 20 70 77 5f | 73 65 74 63 6d 73 6e 61 |;.X  pw_|setcmsna|
|000033f0| 6d 65 28 74 65 6d 70 5f | 70 77 2c 20 22 72 61 79 |me(temp_|pw, "ray|
|00003400| 20 6b 72 65 69 73 65 6c | 22 29 3b 0a 58 20 20 70 | kreisel|");.X  p|
|00003410| 77 5f 70 75 74 63 6f 6c | 6f 72 6d 61 70 28 74 65 |w_putcol|ormap(te|
|00003420| 6d 70 5f 70 77 2c 20 30 | 2c 32 35 36 2c 72 65 64 |mp_pw, 0|,256,red|
|00003430| 2c 67 72 65 65 6e 2c 62 | 6c 75 65 29 3b 0a 58 0a |,green,b|lue);.X.|
|00003440| 58 20 20 74 65 6d 70 5f | 70 77 20 3d 20 28 50 69 |X  temp_|pw = (Pi|
|00003450| 78 77 69 6e 20 2a 29 77 | 69 6e 64 6f 77 5f 67 65 |xwin *)w|indow_ge|
|00003460| 74 28 63 6f 6d 6d 61 6e | 64 5f 70 61 6e 65 6c 2c |t(comman|d_panel,|
|00003470| 20 57 49 4e 5f 50 49 58 | 57 49 4e 29 3b 0a 58 20 | WIN_PIX|WIN);.X |
|00003480| 20 70 77 5f 73 65 74 63 | 6d 73 6e 61 6d 65 28 74 | pw_setc|msname(t|
|00003490| 65 6d 70 5f 70 77 2c 20 | 22 72 61 79 20 6b 72 65 |emp_pw, |"ray kre|
|000034a0| 69 73 65 6c 22 29 3b 0a | 58 20 20 70 77 5f 70 75 |isel");.|X  pw_pu|
|000034b0| 74 63 6f 6c 6f 72 6d 61 | 70 28 74 65 6d 70 5f 70 |tcolorma|p(temp_p|
|000034c0| 77 2c 20 30 2c 32 35 36 | 2c 72 65 64 2c 67 72 65 |w, 0,256|,red,gre|
|000034d0| 65 6e 2c 62 6c 75 65 29 | 3b 0a 58 0a 58 20 20 74 |en,blue)|;.X.X  t|
|000034e0| 65 6d 70 5f 70 77 20 3d | 20 28 50 69 78 77 69 6e |emp_pw =| (Pixwin|
|000034f0| 20 2a 29 77 69 6e 64 6f | 77 5f 67 65 74 28 72 65 | *)windo|w_get(re|
|00003500| 67 69 6f 6e 5f 70 61 6e | 65 6c 2c 20 57 49 4e 5f |gion_pan|el, WIN_|
|00003510| 50 49 58 57 49 4e 29 3b | 0a 58 20 20 70 77 5f 73 |PIXWIN);|.X  pw_s|
|00003520| 65 74 63 6d 73 6e 61 6d | 65 28 74 65 6d 70 5f 70 |etcmsnam|e(temp_p|
|00003530| 77 2c 20 22 72 61 79 20 | 6b 72 65 69 73 65 6c 22 |w, "ray |kreisel"|
|00003540| 29 3b 0a 58 20 20 70 77 | 5f 70 75 74 63 6f 6c 6f |);.X  pw|_putcolo|
|00003550| 72 6d 61 70 28 74 65 6d | 70 5f 70 77 2c 20 30 2c |rmap(tem|p_pw, 0,|
|00003560| 32 35 36 2c 72 65 64 2c | 67 72 65 65 6e 2c 62 6c |256,red,|green,bl|
|00003570| 75 65 29 3b 0a 58 0a 58 | 20 20 74 65 6d 70 5f 70 |ue);.X.X|  temp_p|
|00003580| 77 20 3d 20 28 50 69 78 | 77 69 6e 20 2a 29 77 69 |w = (Pix|win *)wi|
|00003590| 6e 64 6f 77 5f 67 65 74 | 28 70 61 74 74 65 72 6e |ndow_get|(pattern|
|000035a0| 5f 70 61 6e 65 6c 2c 20 | 57 49 4e 5f 50 49 58 57 |_panel, |WIN_PIXW|
|000035b0| 49 4e 29 3b 0a 58 20 20 | 70 77 5f 73 65 74 63 6d |IN);.X  |pw_setcm|
|000035c0| 73 6e 61 6d 65 28 74 65 | 6d 70 5f 70 77 2c 20 22 |sname(te|mp_pw, "|
|000035d0| 72 61 79 20 6b 72 65 69 | 73 65 6c 22 29 3b 0a 58 |ray krei|sel");.X|
|000035e0| 20 20 70 77 5f 70 75 74 | 63 6f 6c 6f 72 6d 61 70 |  pw_put|colormap|
|000035f0| 28 74 65 6d 70 5f 70 77 | 2c 20 30 2c 32 35 36 2c |(temp_pw|, 0,256,|
|00003600| 72 65 64 2c 67 72 65 65 | 6e 2c 62 6c 75 65 29 3b |red,gree|n,blue);|
|00003610| 0a 58 0a 58 20 20 74 65 | 6d 70 5f 70 77 20 3d 20 |.X.X  te|mp_pw = |
|00003620| 28 50 69 78 77 69 6e 20 | 2a 29 77 69 6e 64 6f 77 |(Pixwin |*)window|
|00003630| 5f 67 65 74 28 62 72 75 | 73 68 5f 70 61 6e 65 6c |_get(bru|sh_panel|
|00003640| 2c 20 57 49 4e 5f 50 49 | 58 57 49 4e 29 3b 0a 58 |, WIN_PI|XWIN);.X|
|00003650| 20 20 70 77 5f 73 65 74 | 63 6d 73 6e 61 6d 65 28 |  pw_set|cmsname(|
|00003660| 74 65 6d 70 5f 70 77 2c | 20 22 72 61 79 20 6b 72 |temp_pw,| "ray kr|
|00003670| 65 69 73 65 6c 22 29 3b | 0a 58 20 20 70 77 5f 70 |eisel");|.X  pw_p|
|00003680| 75 74 63 6f 6c 6f 72 6d | 61 70 28 74 65 6d 70 5f |utcolorm|ap(temp_|
|00003690| 70 77 2c 20 30 2c 32 35 | 36 2c 72 65 64 2c 67 72 |pw, 0,25|6,red,gr|
|000036a0| 65 65 6e 2c 62 6c 75 65 | 29 3b 0a 58 0a 58 7d 0a |een,blue|);.X.X}.|
|000036b0| 58 0a 58 63 6f 6c 6f 72 | 5f 6d 6f 64 65 28 69 74 |X.Xcolor|_mode(it|
|000036c0| 65 6d 2c 20 65 76 65 6e | 74 29 0a 58 50 61 6e 65 |em, even|t).XPane|
|000036d0| 6c 5f 69 74 65 6d 20 20 | 20 20 20 20 69 74 65 6d |l_item  |    item|
|000036e0| 3b 0a 58 45 76 65 6e 74 | 20 20 20 20 20 20 20 20 |;.XEvent|        |
|000036f0| 20 20 20 2a 65 76 65 6e | 74 3b 0a 58 7b 0a 58 20 |   *even|t;.X{.X |
|00003700| 20 20 20 28 76 6f 69 64 | 29 77 69 6e 64 6f 77 5f |   (void|)window_|
|00003710| 73 65 74 28 63 6f 6c 6f | 72 5f 66 72 61 6d 65 2c |set(colo|r_frame,|
|00003720| 20 57 49 4e 5f 53 48 4f | 57 2c 20 54 52 55 45 2c | WIN_SHO|W, TRUE,|
|00003730| 20 30 29 3b 0a 58 20 20 | 20 20 64 72 61 77 5f 63 | 0);.X  |  draw_c|
|00003740| 6f 6c 6f 72 6d 61 70 28 | 29 3b 0a 58 7d 0a 58 0a |olormap(|);.X}.X.|
|00003750| 58 0a 58 2f 2a 0a 58 20 | 2a 20 44 72 61 77 20 74 |X.X/*.X |* Draw t|
|00003760| 68 65 20 63 6f 6c 6f 72 | 6d 61 70 20 75 70 20 6f |he color|map up o|
|00003770| 6e 20 61 20 63 61 6e 76 | 61 73 20 69 6e 20 74 68 |n a canv|as in th|
|00003780| 65 20 63 6f 6c 6f 72 20 | 70 61 6c 65 74 20 77 69 |e color |palet wi|
|00003790| 6e 64 6f 77 0a 58 20 2a | 2f 0a 58 64 72 61 77 5f |ndow.X *|/.Xdraw_|
|000037a0| 63 6f 6c 6f 72 6d 61 70 | 28 29 0a 58 7b 0a 58 69 |colormap|().X{.Xi|
|000037b0| 6e 74 20 69 3b 0a 58 20 | 20 66 6f 72 20 28 69 3d |nt i;.X | for (i=|
|000037c0| 30 3b 69 3c 32 35 36 3b | 69 2b 2b 29 0a 58 20 20 |0;i<256;|i++).X  |
|000037d0| 20 20 70 77 5f 77 72 69 | 74 65 28 63 6f 6c 6f 72 |  pw_wri|te(color|
|000037e0| 5f 70 77 2c 28 69 25 31 | 36 29 2a 50 41 4c 45 54 |_pw,(i%1|6)*PALET|
|000037f0| 5f 42 4c 4f 43 4b 2c 69 | 2f 31 36 2a 50 41 4c 45 |_BLOCK,i|/16*PALE|
|00003800| 54 5f 42 4c 4f 43 4b 2c | 50 41 4c 45 54 5f 42 4c |T_BLOCK,|PALET_BL|
|00003810| 4f 43 4b 2c 50 41 4c 45 | 54 5f 42 4c 4f 43 4b 2c |OCK,PALE|T_BLOCK,|
|00003820| 50 49 58 5f 43 4f 4c 4f | 52 28 69 29 20 7c 20 50 |PIX_COLO|R(i) | P|
|00003830| 49 58 5f 53 52 43 2c 4e | 49 4c 50 52 2c 30 2c 30 |IX_SRC,N|ILPR,0,0|
|00003840| 29 3b 0a 58 20 20 75 70 | 64 61 74 65 5f 63 75 72 |);.X  up|date_cur|
|00003850| 5f 63 6f 6c 6f 72 28 30 | 2c 30 2c 63 75 72 5f 63 |_color(0|,0,cur_c|
|00003860| 6f 6c 6f 72 29 3b 0a 58 | 7d 0a 58 0a 58 0a 58 0a |olor);.X|}.X.X.X.|
|00003870| 58 2f 2a 0a 58 20 2a 20 | 47 65 74 20 72 69 64 20 |X/*.X * |Get rid |
|00003880| 6f 66 20 74 68 65 20 63 | 6f 6c 6f 72 20 70 61 6c |of the c|olor pal|
|00003890| 65 74 0a 58 20 2a 2f 0a | 58 63 6f 6c 6f 72 5f 64 |et.X */.|Xcolor_d|
|000038a0| 6f 6e 65 28 69 74 65 6d | 2c 20 65 76 65 6e 74 29 |one(item|, event)|
|000038b0| 0a 58 50 61 6e 65 6c 5f | 69 74 65 6d 20 20 20 20 |.XPanel_|item    |
|000038c0| 20 20 69 74 65 6d 3b 0a | 58 45 76 65 6e 74 20 20 |  item;.|XEvent  |
|000038d0| 20 20 20 20 20 20 20 20 | 20 2a 65 76 65 6e 74 3b |        | *event;|
|000038e0| 0a 58 7b 0a 58 20 20 20 | 20 28 76 6f 69 64 29 77 |.X{.X   | (void)w|
|000038f0| 69 6e 64 6f 77 5f 73 65 | 74 28 63 6f 6c 6f 72 5f |indow_se|t(color_|
|00003900| 66 72 61 6d 65 2c 20 57 | 49 4e 5f 53 48 4f 57 2c |frame, W|IN_SHOW,|
|00003910| 20 46 41 4c 53 45 2c 20 | 30 29 3b 0a 58 7d 0a 58 | FALSE, |0);.X}.X|
|00003920| 0a 58 0a 58 2f 2a 0a 58 | 20 2a 20 4d 61 6b 65 20 |.X.X/*.X| * Make |
|00003930| 61 6e 20 65 76 65 6e 74 | 20 68 61 6e 64 6c 65 20 |an event| handle |
|00003940| 66 6f 72 20 74 68 65 20 | 6d 6f 75 73 65 20 65 6e |for the |mouse en|
|00003950| 76 65 6e 74 20 6f 66 20 | 74 68 65 20 63 6f 6c 6f |vent of |the colo|
|00003960| 72 20 70 61 6c 65 74 0a | 58 20 2a 20 4c 65 74 20 |r palet.|X * Let |
|00003970| 74 68 65 20 75 73 65 20 | 70 69 63 6b 20 61 20 62 |the use |pick a b|
|00003980| 6c 6f 63 6b 20 6f 6e 20 | 74 68 65 20 63 6f 6c 6f |lock on |the colo|
|00003990| 72 20 70 61 6c 65 74 20 | 61 6e 64 20 73 65 74 20 |r palet |and set |
|000039a0| 74 68 65 20 63 75 72 72 | 65 6e 74 0a 58 20 2a 20 |the curr|ent.X * |
|000039b0| 63 6f 6c 6f 72 20 61 20 | 63 6f 72 64 69 6e 67 6c |color a |cordingl|
|000039c0| 79 0a 58 20 2a 2f 0a 58 | 63 6f 6c 6f 72 5f 68 61 |y.X */.X|color_ha|
|000039d0| 6e 64 6c 65 5f 65 76 65 | 6e 74 28 63 61 6e 76 61 |ndle_eve|nt(canva|
|000039e0| 73 5f 6c 6f 63 61 6c 2c | 20 65 76 65 6e 74 2c 20 |s_local,| event, |
|000039f0| 61 72 67 29 0a 58 43 61 | 6e 76 61 73 20 20 63 61 |arg).XCa|nvas  ca|
|00003a00| 6e 76 61 73 5f 6c 6f 63 | 61 6c 3b 0a 58 45 76 65 |nvas_loc|al;.XEve|
|00003a10| 6e 74 20 20 20 2a 65 76 | 65 6e 74 3b 0a 58 63 61 |nt   *ev|ent;.Xca|
|00003a20| 64 64 72 5f 74 20 61 72 | 67 3b 0a 58 7b 0a 58 20 |ddr_t ar|g;.X{.X |
|00003a30| 20 20 20 69 66 20 28 65 | 76 65 6e 74 5f 69 73 5f |   if (e|vent_is_|
|00003a40| 75 70 28 65 76 65 6e 74 | 29 29 0a 58 20 20 20 20 |up(event|)).X    |
|00003a50| 20 20 20 72 65 74 75 72 | 6e 3b 0a 58 20 20 20 20 |   retur|n;.X    |
|00003a60| 73 77 69 74 63 68 20 28 | 65 76 65 6e 74 5f 69 64 |switch (|event_id|
|00003a70| 28 65 76 65 6e 74 29 29 | 20 7b 0a 58 09 20 63 61 |(event))| {.X. ca|
|00003a80| 73 65 20 4d 53 5f 4c 45 | 46 54 3a 0a 58 09 09 75 |se MS_LE|FT:.X..u|
|00003a90| 70 64 61 74 65 5f 63 75 | 72 5f 63 6f 6c 6f 72 28 |pdate_cu|r_color(|
|00003aa0| 65 76 65 6e 74 5f 78 28 | 65 76 65 6e 74 29 2c 65 |event_x(|event),e|
|00003ab0| 76 65 6e 74 5f 79 28 65 | 76 65 6e 74 29 2c 30 29 |vent_y(e|vent),0)|
|00003ac0| 3b 0a 58 09 09 62 72 65 | 61 6b 3b 0a 58 09 7d 0a |;.X..bre|ak;.X.}.|
|00003ad0| 58 7d 0a 58 0a 58 0a 58 | 2f 2a 0a 58 20 2a 20 52 |X}.X.X.X|/*.X * R|
|00003ae0| 65 64 72 61 77 20 74 68 | 65 20 63 75 72 72 72 65 |edraw th|e currre|
|00003af0| 6e 74 20 63 6f 6c 6f 72 | 20 61 74 20 74 68 65 20 |nt color| at the |
|00003b00| 62 6f 74 74 6f 6d 20 6f | 66 20 74 68 65 20 63 6f |bottom o|f the co|
|00003b10| 6c 6f 72 20 70 61 6c 65 | 74 0a 58 20 2a 2f 0a 58 |lor pale|t.X */.X|
|00003b20| 75 70 64 61 74 65 5f 63 | 75 72 5f 63 6f 6c 6f 72 |update_c|ur_color|
|00003b30| 28 78 2c 79 2c 76 61 6c | 75 65 29 0a 58 7b 0a 58 |(x,y,val|ue).X{.X|
|00003b40| 20 20 69 66 20 28 76 61 | 6c 75 65 29 0a 58 20 20 |  if (va|lue).X  |
|00003b50| 20 7b 0a 58 20 20 20 20 | 63 75 72 5f 63 6f 6c 6f | {.X    |cur_colo|
|00003b60| 72 3d 20 76 61 6c 75 65 | 3b 0a 58 20 20 20 7d 0a |r= value|;.X   }.|
|00003b70| 58 20 20 65 6c 73 65 0a | 58 20 20 20 7b 0a 58 20 |X  else.|X   {.X |
|00003b80| 20 20 20 20 69 66 20 28 | 28 78 20 3e 3d 20 50 41 |    if (|(x >= PA|
|00003b90| 4c 45 54 5f 42 4c 4f 43 | 4b 2a 31 36 29 20 7c 7c |LET_BLOC|K*16) |||
|00003ba0| 20 28 79 20 3e 3d 20 50 | 41 4c 45 54 5f 42 4c 4f | (y >= P|ALET_BLO|
|00003bb0| 43 4b 2a 31 36 29 29 0a | 58 09 20 20 20 72 65 74 |CK*16)).|X.   ret|
|00003bc0| 75 72 6e 28 30 29 3b 0a | 58 20 20 20 20 20 63 75 |urn(0);.|X     cu|
|00003bd0| 72 5f 63 6f 6c 6f 72 20 | 3d 20 78 2f 50 41 4c 45 |r_color |= x/PALE|
|00003be0| 54 5f 42 4c 4f 43 4b 20 | 2b 20 79 2f 50 41 4c 45 |T_BLOCK |+ y/PALE|
|00003bf0| 54 5f 42 4c 4f 43 4b 2a | 31 36 3b 0a 58 20 20 20 |T_BLOCK*|16;.X   |
|00003c00| 7d 0a 58 20 20 70 77 5f | 77 72 69 74 65 28 63 6f |}.X  pw_|write(co|
|00003c10| 6c 6f 72 5f 70 77 2c 30 | 2c 50 41 4c 45 54 5f 42 |lor_pw,0|,PALET_B|
|00003c20| 4c 4f 43 4b 2a 31 36 2b | 38 2c 50 41 4c 45 54 5f |LOCK*16+|8,PALET_|
|00003c30| 42 4c 4f 43 4b 2a 31 36 | 2c 50 41 4c 45 54 5f 42 |BLOCK*16|,PALET_B|
|00003c40| 4c 4f 43 4b 2a 32 2c 50 | 49 58 5f 43 4f 4c 4f 52 |LOCK*2,P|IX_COLOR|
|00003c50| 28 63 75 72 5f 63 6f 6c | 6f 72 29 20 7c 20 50 49 |(cur_col|or) | PI|
|00003c60| 58 5f 53 52 43 2c 4e 49 | 4c 50 52 2c 30 2c 30 29 |X_SRC,NI|LPR,0,0)|
|00003c70| 3b 0a 58 7d 0a 58 0a 45 | 4e 44 5f 4f 46 5f 63 6f |;.X}.X.E|ND_OF_co|
|00003c80| 6c 6f 72 5f 70 61 6c 65 | 74 2e 63 0a 69 66 20 74 |lor_pale|t.c.if t|
|00003c90| 65 73 74 20 34 34 35 35 | 20 2d 6e 65 20 60 77 63 |est 4455| -ne `wc|
|00003ca0| 20 2d 63 20 3c 63 6f 6c | 6f 72 5f 70 61 6c 65 74 | -c <col|or_palet|
|00003cb0| 2e 63 60 3b 20 74 68 65 | 6e 0a 20 20 20 20 65 63 |.c`; the|n.    ec|
|00003cc0| 68 6f 20 73 68 61 72 3a | 20 5c 22 63 6f 6c 6f 72 |ho shar:| \"color|
|00003cd0| 5f 70 61 6c 65 74 2e 63 | 5c 22 20 75 6e 70 61 63 |_palet.c|\" unpac|
|00003ce0| 6b 65 64 20 77 69 74 68 | 20 77 72 6f 6e 67 20 73 |ked with| wrong s|
|00003cf0| 69 7a 65 21 0a 66 69 0a | 23 20 65 6e 64 20 6f 66 |ize!.fi.|# end of|
|00003d00| 20 6f 76 65 72 77 72 69 | 74 69 6e 67 20 63 68 65 | overwri|ting che|
|00003d10| 63 6b 0a 66 69 0a 69 66 | 20 74 65 73 74 20 2d 66 |ck.fi.if| test -f|
|00003d20| 20 63 6f 6d 6d 61 6e 64 | 2e 63 20 2d 61 20 22 24 | command|.c -a "$|
|00003d30| 7b 31 7d 22 20 21 3d 20 | 22 2d 63 22 20 3b 20 74 |{1}" != |"-c" ; t|
|00003d40| 68 65 6e 20 0a 20 20 65 | 63 68 6f 20 73 68 61 72 |hen .  e|cho shar|
|00003d50| 3a 20 57 69 6c 6c 20 6e | 6f 74 20 6f 76 65 72 2d |: Will n|ot over-|
|00003d60| 77 72 69 74 65 20 65 78 | 69 73 74 69 6e 67 20 66 |write ex|isting f|
|00003d70| 69 6c 65 20 5c 22 63 6f | 6d 6d 61 6e 64 2e 63 5c |ile \"co|mmand.c\|
|00003d80| 22 0a 65 6c 73 65 0a 65 | 63 68 6f 20 73 68 61 72 |".else.e|cho shar|
|00003d90| 3a 20 45 78 74 72 61 63 | 74 69 6e 67 20 5c 22 63 |: Extrac|ting \"c|
|00003da0| 6f 6d 6d 61 6e 64 2e 63 | 5c 22 20 5c 28 34 33 36 |ommand.c|\" \(436|
|00003db0| 36 20 63 68 61 72 61 63 | 74 65 72 73 5c 29 0a 73 |6 charac|ters\).s|
|00003dc0| 65 64 20 22 73 2f 5e 58 | 2f 2f 22 20 3e 63 6f 6d |ed "s/^X|//" >com|
|00003dd0| 6d 61 6e 64 2e 63 20 3c | 3c 27 45 4e 44 5f 4f 46 |mand.c <|<'END_OF|
|00003de0| 5f 63 6f 6d 6d 61 6e 64 | 2e 63 27 0a 58 0a 58 2f |_command|.c'.X.X/|
|00003df0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003e00| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003e10| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003e20| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003e30| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0a 58 20 20 20 54 |********|**.X   T|
|00003e40| 6f 75 63 68 75 70 20 61 | 20 62 69 74 6d 61 70 20 |ouchup a| bitmap |
|00003e50| 67 72 61 70 68 69 63 73 | 20 65 64 69 74 6f 72 20 |graphics| editor |
|00003e60| 66 6f 72 20 74 68 65 20 | 53 75 6e 20 57 6f 72 6b |for the |Sun Work|
|00003e70| 73 74 61 74 69 6f 6e 20 | 72 75 6e 6e 69 6e 67 20 |station |running |
|00003e80| 53 75 6e 56 69 65 77 0a | 58 20 20 20 43 6f 70 79 |SunView.|X   Copy|
|00003e90| 72 69 67 68 74 20 28 63 | 29 20 31 39 38 38 20 62 |right (c|) 1988 b|
|00003ea0| 79 20 52 61 79 6d 6f 6e | 64 20 4b 72 65 69 73 65 |y Raymon|d Kreise|
|00003eb0| 6c 0a 58 20 20 20 31 2f | 32 32 2f 38 38 20 40 20 |l.X   1/|22/88 @ |
|00003ec0| 53 75 6e 79 20 53 74 6f | 6e 79 20 42 72 6f 6f 6b |Suny Sto|ny Brook|
|00003ed0| 0a 58 0a 58 20 20 20 54 | 68 69 73 20 70 72 6f 67 |.X.X   T|his prog|
|00003ee0| 72 61 6d 20 6d 61 79 20 | 62 65 20 72 65 64 69 73 |ram may |be redis|
|00003ef0| 74 72 69 62 75 74 65 64 | 20 77 69 74 68 6f 75 74 |tributed| without|
|00003f00| 20 66 65 65 20 61 73 20 | 6c 6f 6e 67 20 61 73 20 | fee as |long as |
|00003f10| 74 68 69 73 20 63 6f 70 | 79 72 69 67 68 74 0a 58 |this cop|yright.X|
|00003f20| 20 20 20 6e 6f 74 69 63 | 65 20 69 73 20 69 6e 74 |   notic|e is int|
|00003f30| 61 63 74 2e 0a 58 0a 58 | 3d 3d 3e 20 50 4c 45 41 |act..X.X|==> PLEA|
|00003f40| 53 45 20 73 65 6e 64 20 | 63 6f 6d 6d 65 6e 74 73 |SE send |comments|
|00003f50| 20 61 6e 64 20 62 75 67 | 20 72 65 70 6f 72 74 73 | and bug| reports|
|00003f60| 20 74 6f 20 6f 6e 65 20 | 6f 66 20 74 68 65 20 66 | to one |of the f|
|00003f70| 6f 6c 6c 6f 77 69 6e 67 | 20 61 64 64 72 65 73 73 |ollowing| address|
|00003f80| 65 73 3a 0a 58 0a 58 09 | 20 20 20 52 61 79 20 4b |es:.X.X.|   Ray K|
|00003f90| 72 65 69 73 65 6c 0a 58 | 09 20 20 20 43 53 20 44 |reisel.X|.   CS D|
|00003fa0| 65 70 74 2e 2c 20 53 55 | 4e 59 20 61 74 20 53 74 |ept., SU|NY at St|
|00003fb0| 6f 6e 79 20 42 72 6f 6f | 6b 2c 20 53 74 6f 6e 79 |ony Broo|k, Stony|
|00003fc0| 20 42 72 6f 6f 6b 20 4e | 59 20 31 31 37 39 34 0a | Brook N|Y 11794.|
|00003fd0| 58 0a 58 09 20 20 20 55 | 55 43 50 3a 20 7b 61 6c |X.X.   U|UCP: {al|
|00003fe0| 6c 65 67 72 61 2c 20 70 | 68 69 6c 61 62 73 2c 20 |legra, p|hilabs, |
|00003ff0| 70 79 72 61 6d 69 64 2c | 20 72 65 73 65 61 72 63 |pyramid,| researc|
|00004000| 68 7d 21 73 62 63 73 21 | 72 61 79 6b 20 20 20 0a |h}!sbcs!|rayk   .|
|00004010| 58 09 20 20 20 41 52 50 | 41 2d 49 6e 74 65 72 6e |X.   ARP|A-Intern|
|00004020| 65 74 3a 20 72 61 79 6b | 40 73 62 63 73 2e 73 75 |et: rayk|@sbcs.su|
|00004030| 6e 79 73 62 2e 65 64 75 | 09 09 09 0a 58 09 20 20 |nysb.edu|....X.  |
|00004040| 20 43 53 6e 65 74 3a 20 | 72 61 79 6b 40 73 75 6e | CSnet: |rayk@sun|
|00004050| 79 2d 73 62 0a 58 09 20 | 20 20 28 49 66 20 6e 6f |y-sb.X. |  (If no|
|00004060| 62 6f 64 79 20 69 73 20 | 68 6f 6d 65 20 61 74 20 |body is |home at |
|00004070| 61 6e 79 20 6f 66 20 74 | 68 65 20 61 62 6f 76 65 |any of t|he above|
|00004080| 20 61 64 64 72 65 73 73 | 65 73 20 74 72 79 3a 0a | address|es try:.|
|00004090| 58 09 09 53 37 32 51 4b | 52 45 40 54 4f 57 53 4f |X..S72QK|RE@TOWSO|
|000040a0| 4e 56 58 2e 42 49 54 4e | 45 54 09 09 09 20 20 20 |NVX.BITN|ET...   |
|000040b0| 20 20 20 20 20 29 0a 58 | 0a 58 20 22 49 66 20 49 |     ).X|.X "If I|
|000040c0| 20 67 65 74 20 68 6f 6d | 65 20 62 65 66 6f 72 65 | get hom|e before|
|000040d0| 20 64 61 79 6c 69 67 68 | 74 2c 20 49 20 6a 75 73 | dayligh|t, I jus|
|000040e0| 74 20 6d 69 67 68 74 20 | 67 65 74 20 73 6f 6d 65 |t might |get some|
|000040f0| 20 73 6c 65 65 70 20 74 | 6f 6e 69 67 68 74 2e 2e | sleep t|onight..|
|00004100| 2e 2e 22 0a 58 0a 58 2a | 2a 2a 2a 2a 2a 2a 2a 2a |..".X.X*|********|
|00004110| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004120| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004130| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004140| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004150| 2a 2f 0a 58 0a 58 2f 2a | 2a 2a 2a 2a 2a 2a 2a 2a |*/.X.X/*|********|
|00004160| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004170| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004180| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004190| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000041a0| 2a 0a 58 09 66 69 6c 65 | 3a 20 63 6f 6d 6d 61 6e |*.X.file|: comman|
|000041b0| 64 2e 63 0a 58 09 70 75 | 72 70 6f 73 65 3a 20 54 |d.c.X.pu|rpose: T|
|000041c0| 68 69 73 20 66 69 6c 65 | 20 63 6f 6e 74 61 69 6e |his file| contain|
|000041d0| 73 20 74 68 65 20 69 63 | 6f 6e 20 64 61 74 61 20 |s the ic|on data |
|000041e0| 66 6f 72 20 74 68 65 20 | 63 6f 6d 6d 61 6e 64 20 |for the |command |
|000041f0| 69 63 6f 6e 73 0a 58 09 | 09 69 6e 20 74 68 65 20 |icons.X.|.in the |
|00004200| 63 6f 6d 6d 61 6e 64 20 | 6d 65 6e 75 20 6f 66 20 |command |menu of |
|00004210| 74 68 65 20 72 69 67 68 | 74 68 61 6e 64 20 73 69 |the righ|thand si|
|00004220| 64 65 20 6f 66 20 74 68 | 65 20 6d 61 69 6e 20 77 |de of th|e main w|
|00004230| 69 6e 64 6f 77 0a 58 0a | 58 09 6d 6f 64 69 66 69 |indow.X.|X.modifi|
|00004240| 63 61 74 69 6f 6e 73 3a | 0a 58 09 09 64 61 74 65 |cations:|.X..date|
|00004250| 3a 09 54 75 65 20 4d 61 | 72 20 32 32 20 32 32 3a |:.Tue Ma|r 22 22:|
|00004260| 30 34 3a 35 38 20 45 53 | 54 20 31 39 38 38 0a 58 |04:58 ES|T 1988.X|
|00004270| 09 09 61 75 74 68 6f 72 | 3a 09 72 61 79 6b 0a 58 |..author|:.rayk.X|
|00004280| 09 09 63 68 61 6e 67 65 | 73 3a 61 64 64 20 63 6f |..change|s:add co|
|00004290| 6d 6d 65 6e 74 73 0a 58 | 2a 2a 2a 2a 2a 2a 2a 2a |mments.X|********|
|000042a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000042b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000042c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000042d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000042e0| 2a 2a 2f 0a 58 23 69 6e | 63 6c 75 64 65 20 3c 70 |**/.X#in|clude <p|
|000042f0| 69 78 72 65 63 74 2f 70 | 69 78 72 65 63 74 5f 68 |ixrect/p|ixrect_h|
|00004300| 73 2e 68 3e 0a 58 0a 58 | 0a 58 73 74 61 74 69 63 |s.h>.X.X|.Xstatic|
|00004310| 20 73 68 6f 72 74 20 63 | 6f 6d 6d 61 6e 64 31 5f | short c|ommand1_|
|00004320| 64 61 74 61 5b 5d 20 3d | 20 7b 0a 58 23 69 6e 63 |data[] =| {.X#inc|
|00004330| 6c 75 64 65 20 22 6c 61 | 73 6f 2e 63 69 63 6f 6e |lude "la|so.cicon|
|00004340| 2e 70 61 74 22 0a 58 7d | 3b 0a 58 73 74 61 74 69 |.pat".X}|;.Xstati|
|00004350| 63 20 6d 70 72 5f 73 74 | 61 74 69 63 28 63 6f 6d |c mpr_st|atic(com|
|00004360| 6d 61 6e 64 31 5f 70 72 | 2c 20 34 38 2c 20 34 38 |mand1_pr|, 48, 48|
|00004370| 2c 20 31 2c 20 63 6f 6d | 6d 61 6e 64 31 5f 64 61 |, 1, com|mand1_da|
|00004380| 74 61 29 3b 0a 58 0a 58 | 73 74 61 74 69 63 20 73 |ta);.X.X|static s|
|00004390| 68 6f 72 74 20 63 6f 6d | 6d 61 6e 64 32 5f 64 61 |hort com|mand2_da|
|000043a0| 74 61 5b 5d 20 3d 20 7b | 0a 58 23 69 6e 63 6c 75 |ta[] = {|.X#inclu|
|000043b0| 64 65 20 22 63 69 72 63 | 6c 65 5f 68 2e 63 69 63 |de "circ|le_h.cic|
|000043c0| 6f 6e 2e 70 61 74 22 0a | 58 7d 3b 0a 58 73 74 61 |on.pat".|X};.Xsta|
|000043d0| 74 69 63 20 6d 70 72 5f | 73 74 61 74 69 63 28 63 |tic mpr_|static(c|
|000043e0| 6f 6d 6d 61 6e 64 32 5f | 70 72 2c 20 34 38 2c 20 |ommand2_|pr, 48, |
|000043f0| 34 38 2c 20 31 2c 20 63 | 6f 6d 6d 61 6e 64 32 5f |48, 1, c|ommand2_|
|00004400| 64 61 74 61 29 3b 0a 58 | 0a 58 73 74 61 74 69 63 |data);.X|.Xstatic|
|00004410| 20 73 68 6f 72 74 20 63 | 6f 6d 6d 61 6e 64 33 5f | short c|ommand3_|
|00004420| 64 61 74 61 5b 5d 20 3d | 20 7b 0a 58 23 69 6e 63 |data[] =| {.X#inc|
|00004430| 6c 75 64 65 20 22 64 72 | 61 77 2e 63 69 63 6f 6e |lude "dr|aw.cicon|
|00004440| 2e 70 61 74 22 0a 58 7d | 3b 0a 58 73 74 61 74 69 |.pat".X}|;.Xstati|
|00004450| 63 20 6d 70 72 5f 73 74 | 61 74 69 63 28 63 6f 6d |c mpr_st|atic(com|
|00004460| 6d 61 6e 64 33 5f 70 72 | 2c 20 34 38 2c 20 34 38 |mand3_pr|, 48, 48|
|00004470| 2c 20 31 2c 20 63 6f 6d | 6d 61 6e 64 33 5f 64 61 |, 1, com|mand3_da|
|00004480| 74 61 29 3b 0a 58 0a 58 | 73 74 61 74 69 63 20 73 |ta);.X.X|static s|
|00004490| 68 6f 72 74 20 63 6f 6d | 6d 61 6e 64 34 5f 64 61 |hort com|mand4_da|
|000044a0| 74 61 5b 5d 20 3d 20 7b | 0a 58 23 69 6e 63 6c 75 |ta[] = {|.X#inclu|
|000044b0| 64 65 20 22 6c 69 6e 65 | 2e 63 69 63 6f 6e 2e 70 |de "line|.cicon.p|
|000044c0| 61 74 22 0a 58 7d 3b 0a | 58 73 74 61 74 69 63 20 |at".X};.|Xstatic |
|000044d0| 6d 70 72 5f 73 74 61 74 | 69 63 28 63 6f 6d 6d 61 |mpr_stat|ic(comma|
|000044e0| 6e 64 34 5f 70 72 2c 20 | 34 38 2c 20 34 38 2c 20 |nd4_pr, |48, 48, |
|000044f0| 31 2c 20 63 6f 6d 6d 61 | 6e 64 34 5f 64 61 74 61 |1, comma|nd4_data|
|00004500| 29 3b 0a 58 0a 58 73 74 | 61 74 69 63 20 73 68 6f |);.X.Xst|atic sho|
|00004510| 72 74 20 63 6f 6d 6d 61 | 6e 64 35 5f 64 61 74 61 |rt comma|nd5_data|
|00004520| 5b 5d 20 3d 20 7b 0a 58 | 23 69 6e 63 6c 75 64 65 |[] = {.X|#include|
|00004530| 20 22 6d 61 67 2e 63 69 | 63 6f 6e 2e 70 61 74 22 | "mag.ci|con.pat"|
|00004540| 0a 58 7d 3b 0a 58 73 74 | 61 74 69 63 20 6d 70 72 |.X};.Xst|atic mpr|
|00004550| 5f 73 74 61 74 69 63 28 | 63 6f 6d 6d 61 6e 64 35 |_static(|command5|
|00004560| 5f 70 72 2c 20 34 38 2c | 20 34 38 2c 20 31 2c 20 |_pr, 48,| 48, 1, |
|00004570| 63 6f 6d 6d 61 6e 64 35 | 5f 64 61 74 61 29 3b 0a |command5|_data);.|
|00004580| 58 0a 58 73 74 61 74 69 | 63 20 73 68 6f 72 74 20 |X.Xstati|c short |
|00004590| 63 6f 6d 6d 61 6e 64 36 | 5f 64 61 74 61 5b 5d 20 |command6|_data[] |
|000045a0| 3d 20 7b 0a 58 23 69 6e | 63 6c 75 64 65 20 22 66 |= {.X#in|clude "f|
|000045b0| 66 69 6c 6c 2e 63 69 63 | 6f 6e 2e 70 61 74 22 0a |fill.cic|on.pat".|
|000045c0| 58 7d 3b 0a 58 73 74 61 | 74 69 63 20 6d 70 72 5f |X};.Xsta|tic mpr_|
|000045d0| 73 74 61 74 69 63 28 63 | 6f 6d 6d 61 6e 64 36 5f |static(c|ommand6_|
|000045e0| 70 72 2c 20 34 38 2c 20 | 34 38 2c 20 31 2c 20 63 |pr, 48, |48, 1, c|
|000045f0| 6f 6d 6d 61 6e 64 36 5f | 64 61 74 61 29 3b 0a 58 |ommand6_|data);.X|
|00004600| 0a 58 73 74 61 74 69 63 | 20 73 68 6f 72 74 20 63 |.Xstatic| short c|
|00004610| 6f 6d 6d 61 6e 64 37 5f | 64 61 74 61 5b 5d 20 3d |ommand7_|data[] =|
|00004620| 20 7b 0a 58 23 69 6e 63 | 6c 75 64 65 20 22 6f 76 | {.X#inc|lude "ov|
|00004630| 61 6c 5f 68 2e 63 69 63 | 6f 6e 2e 70 61 74 22 0a |al_h.cic|on.pat".|
|00004640| 58 7d 3b 0a 58 73 74 61 | 74 69 63 20 6d 70 72 5f |X};.Xsta|tic mpr_|
|00004650| 73 74 61 74 69 63 28 63 | 6f 6d 6d 61 6e 64 37 5f |static(c|ommand7_|
|00004660| 70 72 2c 20 34 38 2c 20 | 34 38 2c 20 31 2c 20 63 |pr, 48, |48, 1, c|
|00004670| 6f 6d 6d 61 6e 64 37 5f | 64 61 74 61 29 3b 0a 58 |ommand7_|data);.X|
|00004680| 0a 58 73 74 61 74 69 63 | 20 73 68 6f 72 74 20 63 |.Xstatic| short c|
|00004690| 6f 6d 6d 61 6e 64 38 5f | 64 61 74 61 5b 5d 20 3d |ommand8_|data[] =|
|000046a0| 20 7b 0a 58 23 69 6e 63 | 6c 75 64 65 20 22 70 6f | {.X#inc|lude "po|
|000046b0| 6c 79 5f 66 2e 63 69 63 | 6f 6e 2e 70 61 74 22 0a |ly_f.cic|on.pat".|
|000046c0| 58 7d 3b 0a 58 73 74 61 | 74 69 63 20 6d 70 72 5f |X};.Xsta|tic mpr_|
|000046d0| 73 74 61 74 69 63 28 63 | 6f 6d 6d 61 6e 64 38 5f |static(c|ommand8_|
|000046e0| 70 72 2c 20 34 38 2c 20 | 34 38 2c 20 31 2c 20 63 |pr, 48, |48, 1, c|
|000046f0| 6f 6d 6d 61 6e 64 38 5f | 64 61 74 61 29 3b 0a 58 |ommand8_|data);.X|
|00004700| 0a 58 73 74 61 74 69 63 | 20 73 68 6f 72 74 20 63 |.Xstatic| short c|
|00004710| 6f 6d 6d 61 6e 64 39 5f | 64 61 74 61 5b 5d 20 3d |ommand9_|data[] =|
|00004720| 20 7b 0a 58 23 69 6e 63 | 6c 75 64 65 20 22 70 6f | {.X#inc|lude "po|
|00004730| 6c 79 5f 68 2e 63 69 63 | 6f 6e 2e 70 61 74 22 0a |ly_h.cic|on.pat".|
|00004740| 58 7d 3b 0a 58 73 74 61 | 74 69 63 20 6d 70 72 5f |X};.Xsta|tic mpr_|
|00004750| 73 74 61 74 69 63 28 63 | 6f 6d 6d 61 6e 64 39 5f |static(c|ommand9_|
|00004760| 70 72 2c 20 34 38 2c 20 | 34 38 2c 20 31 2c 20 63 |pr, 48, |48, 1, c|
|00004770| 6f 6d 6d 61 6e 64 39 5f | 64 61 74 61 29 3b 0a 58 |ommand9_|data);.X|
|00004780| 0a 58 73 74 61 74 69 63 | 20 73 68 6f 72 74 20 63 |.Xstatic| short c|
|00004790| 6f 6d 6d 61 6e 64 31 30 | 5f 64 61 74 61 5b 5d 20 |ommand10|_data[] |
|000047a0| 3d 20 7b 0a 58 23 69 6e | 63 6c 75 64 65 20 22 72 |= {.X#in|clude "r|
|000047b0| 65 63 74 61 6e 5f 66 2e | 63 69 63 6f 6e 2e 70 61 |ectan_f.|cicon.pa|
|000047c0| 74 22 0a 58 7d 3b 0a 58 | 73 74 61 74 69 63 20 6d |t".X};.X|static m|
|000047d0| 70 72 5f 73 74 61 74 69 | 63 28 63 6f 6d 6d 61 6e |pr_stati|c(comman|
|000047e0| 64 31 30 5f 70 72 2c 20 | 34 38 2c 20 34 38 2c 20 |d10_pr, |48, 48, |
|000047f0| 31 2c 20 63 6f 6d 6d 61 | 6e 64 31 30 5f 64 61 74 |1, comma|nd10_dat|
|00004800| 61 29 3b 0a 58 0a 58 73 | 74 61 74 69 63 20 73 68 |a);.X.Xs|tatic sh|
|00004810| 6f 72 74 20 63 6f 6d 6d | 61 6e 64 31 31 5f 64 61 |ort comm|and11_da|
|00004820| 74 61 5b 5d 20 3d 20 7b | 0a 58 23 69 6e 63 6c 75 |ta[] = {|.X#inclu|
|00004830| 64 65 20 22 72 65 63 74 | 61 6e 5f 68 2e 63 69 63 |de "rect|an_h.cic|
|00004840| 6f 6e 2e 70 61 74 22 0a | 58 7d 3b 0a 58 73 74 61 |on.pat".|X};.Xsta|
|00004850| 74 69 63 20 6d 70 72 5f | 73 74 61 74 69 63 28 63 |tic mpr_|static(c|
|00004860| 6f 6d 6d 61 6e 64 31 31 | 5f 70 72 2c 20 34 38 2c |ommand11|_pr, 48,|
|00004870| 20 34 38 2c 20 31 2c 20 | 63 6f 6d 6d 61 6e 64 31 | 48, 1, |command1|
|00004880| 31 5f 64 61 74 61 29 3b | 0a 58 0a 58 73 74 61 74 |1_data);|.X.Xstat|
|00004890| 69 63 20 73 68 6f 72 74 | 20 63 6f 6d 6d 61 6e 64 |ic short| command|
|000048a0| 31 32 5f 64 61 74 61 5b | 5d 20 3d 20 7b 0a 58 23 |12_data[|] = {.X#|
|000048b0| 69 6e 63 6c 75 64 65 20 | 22 74 65 78 74 2e 63 69 |include |"text.ci|
|000048c0| 63 6f 6e 2e 70 61 74 22 | 0a 58 7d 3b 0a 58 73 74 |con.pat"|.X};.Xst|
|000048d0| 61 74 69 63 20 6d 70 72 | 5f 73 74 61 74 69 63 28 |atic mpr|_static(|
|000048e0| 63 6f 6d 6d 61 6e 64 31 | 32 5f 70 72 2c 20 34 38 |command1|2_pr, 48|
|000048f0| 2c 20 34 38 2c 20 31 2c | 20 63 6f 6d 6d 61 6e 64 |, 48, 1,| command|
|00004900| 31 32 5f 64 61 74 61 29 | 3b 0a 58 0a 58 73 74 61 |12_data)|;.X.Xsta|
|00004910| 74 69 63 20 73 68 6f 72 | 74 20 63 6f 6d 6d 61 6e |tic shor|t comman|
|00004920| 64 31 33 5f 64 61 74 61 | 5b 5d 20 3d 20 7b 0a 58 |d13_data|[] = {.X|
|00004930| 23 69 6e 63 6c 75 64 65 | 20 22 73 65 6c 5f 72 65 |#include| "sel_re|
|00004940| 67 2e 63 69 63 6f 6e 2e | 70 61 74 22 0a 58 7d 3b |g.cicon.|pat".X};|
|00004950| 0a 58 73 74 61 74 69 63 | 20 6d 70 72 5f 73 74 61 |.Xstatic| mpr_sta|
|00004960| 74 69 63 28 63 6f 6d 6d | 61 6e 64 31 33 5f 70 72 |tic(comm|and13_pr|
|00004970| 2c 20 34 38 2c 20 34 38 | 2c 20 31 2c 20 63 6f 6d |, 48, 48|, 1, com|
|00004980| 6d 61 6e 64 31 33 5f 64 | 61 74 61 29 3b 0a 58 0a |mand13_d|ata);.X.|
|00004990| 58 73 74 61 74 69 63 20 | 73 68 6f 72 74 20 63 6f |Xstatic |short co|
|000049a0| 6d 6d 61 6e 64 31 34 5f | 64 61 74 61 5b 5d 20 3d |mmand14_|data[] =|
|000049b0| 20 7b 0a 58 23 69 6e 63 | 6c 75 64 65 20 22 73 65 | {.X#inc|lude "se|
|000049c0| 6c 5f 70 6f 69 6e 74 2e | 63 69 63 6f 6e 2e 70 61 |l_point.|cicon.pa|
|000049d0| 74 22 0a 58 7d 3b 0a 58 | 73 74 61 74 69 63 20 6d |t".X};.X|static m|
|000049e0| 70 72 5f 73 74 61 74 69 | 63 28 63 6f 6d 6d 61 6e |pr_stati|c(comman|
|000049f0| 64 31 34 5f 70 72 2c 20 | 34 38 2c 20 34 38 2c 20 |d14_pr, |48, 48, |
|00004a00| 31 2c 20 63 6f 6d 6d 61 | 6e 64 31 34 5f 64 61 74 |1, comma|nd14_dat|
|00004a10| 61 29 3b 0a 58 0a 58 73 | 74 61 74 69 63 20 73 68 |a);.X.Xs|tatic sh|
|00004a20| 6f 72 74 20 63 6f 6d 6d | 61 6e 64 31 35 5f 64 61 |ort comm|and15_da|
|00004a30| 74 61 5b 5d 20 3d 20 7b | 0a 58 23 69 6e 63 6c 75 |ta[] = {|.X#inclu|
|00004a40| 64 65 20 22 70 61 69 6e | 74 2e 63 69 63 6f 6e 2e |de "pain|t.cicon.|
|00004a50| 70 61 74 22 0a 58 7d 3b | 0a 58 73 74 61 74 69 63 |pat".X};|.Xstatic|
|00004a60| 20 6d 70 72 5f 73 74 61 | 74 69 63 28 63 6f 6d 6d | mpr_sta|tic(comm|
|00004a70| 61 6e 64 31 35 5f 70 72 | 2c 20 34 38 2c 20 34 38 |and15_pr|, 48, 48|
|00004a80| 2c 20 31 2c 20 63 6f 6d | 6d 61 6e 64 31 35 5f 64 |, 1, com|mand15_d|
|00004a90| 61 74 61 29 3b 0a 58 0a | 58 73 74 61 74 69 63 20 |ata);.X.|Xstatic |
|00004aa0| 73 68 6f 72 74 20 63 6f | 6d 6d 61 6e 64 31 36 5f |short co|mmand16_|
|00004ab0| 64 61 74 61 5b 5d 20 3d | 20 7b 0a 58 23 69 6e 63 |data[] =| {.X#inc|
|00004ac0| 6c 75 64 65 20 22 65 72 | 61 73 65 2e 63 69 63 6f |lude "er|ase.cico|
|00004ad0| 6e 2e 70 61 74 22 0a 58 | 7d 3b 0a 58 73 74 61 74 |n.pat".X|};.Xstat|
|00004ae0| 69 63 20 6d 70 72 5f 73 | 74 61 74 69 63 28 63 6f |ic mpr_s|tatic(co|
|00004af0| 6d 6d 61 6e 64 31 36 5f | 70 72 2c 20 34 38 2c 20 |mmand16_|pr, 48, |
|00004b00| 34 38 2c 20 31 2c 20 63 | 6f 6d 6d 61 6e 64 31 36 |48, 1, c|ommand16|
|00004b10| 5f 64 61 74 61 29 3b 0a | 58 0a 58 2f 2a 20 53 45 |_data);.|X.X/* SE|
|00004b20| 4c 45 43 54 45 44 20 52 | 45 47 49 4f 4e 20 43 4f |LECTED R|EGION CO|
|00004b30| 4d 4d 41 4e 44 53 20 2a | 2f 0a 58 0a 58 73 74 61 |MMANDS *|/.X.Xsta|
|00004b40| 74 69 63 20 73 68 6f 72 | 74 20 72 65 67 5f 63 6f |tic shor|t reg_co|
|00004b50| 6d 6d 61 6e 64 31 5f 64 | 61 74 61 5b 5d 20 3d 20 |mmand1_d|ata[] = |
|00004b60| 7b 0a 58 23 69 6e 63 6c | 75 64 65 20 22 63 75 74 |{.X#incl|ude "cut|
|00004b70| 2e 63 69 63 6f 6e 2e 70 | 61 74 22 0a 58 7d 3b 0a |.cicon.p|at".X};.|
|00004b80| 58 73 74 61 74 69 63 20 | 6d 70 72 5f 73 74 61 74 |Xstatic |mpr_stat|
|00004b90| 69 63 28 72 65 67 5f 63 | 6f 6d 6d 61 6e 64 31 5f |ic(reg_c|ommand1_|
|00004ba0| 70 72 2c 20 34 38 2c 20 | 34 38 2c 20 31 2c 20 72 |pr, 48, |48, 1, r|
|00004bb0| 65 67 5f 63 6f 6d 6d 61 | 6e 64 31 5f 64 61 74 61 |eg_comma|nd1_data|
|00004bc0| 29 3b 0a 58 0a 58 73 74 | 61 74 69 63 20 73 68 6f |);.X.Xst|atic sho|
|00004bd0| 72 74 20 72 65 67 5f 63 | 6f 6d 6d 61 6e 64 32 5f |rt reg_c|ommand2_|
|00004be0| 64 61 74 61 5b 5d 20 3d | 20 7b 0a 58 23 69 6e 63 |data[] =| {.X#inc|
|00004bf0| 6c 75 64 65 20 22 66 6c | 69 70 5f 68 6f 72 2e 63 |lude "fl|ip_hor.c|
|00004c00| 69 63 6f 6e 2e 70 61 74 | 22 0a 58 7d 3b 0a 58 73 |icon.pat|".X};.Xs|
|00004c10| 74 61 74 69 63 20 6d 70 | 72 5f 73 74 61 74 69 63 |tatic mp|r_static|
|00004c20| 28 72 65 67 5f 63 6f 6d | 6d 61 6e 64 32 5f 70 72 |(reg_com|mand2_pr|
|00004c30| 2c 20 34 38 2c 20 34 38 | 2c 20 31 2c 20 72 65 67 |, 48, 48|, 1, reg|
|00004c40| 5f 63 6f 6d 6d 61 6e 64 | 32 5f 64 61 74 61 29 3b |_command|2_data);|
|00004c50| 0a 58 0a 58 73 74 61 74 | 69 63 20 73 68 6f 72 74 |.X.Xstat|ic short|
|00004c60| 20 72 65 67 5f 63 6f 6d | 6d 61 6e 64 33 5f 64 61 | reg_com|mand3_da|
|00004c70| 74 61 5b 5d 20 3d 20 7b | 0a 58 23 69 6e 63 6c 75 |ta[] = {|.X#inclu|
|00004c80| 64 65 20 22 66 6c 69 70 | 5f 76 65 72 2e 63 69 63 |de "flip|_ver.cic|
|00004c90| 6f 6e 2e 70 61 74 22 0a | 58 7d 3b 0a 58 73 74 61 |on.pat".|X};.Xsta|
|00004ca0| 74 69 63 20 6d 70 72 5f | 73 74 61 74 69 63 28 72 |tic mpr_|static(r|
|00004cb0| 65 67 5f 63 6f 6d 6d 61 | 6e 64 33 5f 70 72 2c 20 |eg_comma|nd3_pr, |
|00004cc0| 34 38 2c 20 34 38 2c 20 | 31 2c 20 72 65 67 5f 63 |48, 48, |1, reg_c|
|00004cd0| 6f 6d 6d 61 6e 64 33 5f | 64 61 74 61 29 3b 0a 58 |ommand3_|data);.X|
|00004ce0| 0a 58 73 74 61 74 69 63 | 20 73 68 6f 72 74 20 72 |.Xstatic| short r|
|00004cf0| 65 67 5f 63 6f 6d 6d 61 | 6e 64 34 5f 64 61 74 61 |eg_comma|nd4_data|
|00004d00| 5b 5d 20 3d 20 7b 0a 58 | 23 69 6e 63 6c 75 64 65 |[] = {.X|#include|
|00004d10| 20 22 69 6e 76 65 72 73 | 65 2e 63 69 63 6f 6e 2e | "invers|e.cicon.|
|00004d20| 70 61 74 22 0a 58 7d 3b | 0a 58 73 74 61 74 69 63 |pat".X};|.Xstatic|
|00004d30| 20 6d 70 72 5f 73 74 61 | 74 69 63 28 72 65 67 5f | mpr_sta|tic(reg_|
|00004d40| 63 6f 6d 6d 61 6e 64 34 | 5f 70 72 2c 20 34 38 2c |command4|_pr, 48,|
|00004d50| 20 34 38 2c 20 31 2c 20 | 72 65 67 5f 63 6f 6d 6d | 48, 1, |reg_comm|
|00004d60| 61 6e 64 34 5f 64 61 74 | 61 29 3b 0a 58 0a 58 73 |and4_dat|a);.X.Xs|
|00004d70| 74 61 74 69 63 20 73 68 | 6f 72 74 20 72 65 67 5f |tatic sh|ort reg_|
|00004d80| 63 6f 6d 6d 61 6e 64 35 | 5f 64 61 74 61 5b 5d 20 |command5|_data[] |
|00004d90| 3d 20 7b 0a 58 23 69 6e | 63 6c 75 64 65 20 22 63 |= {.X#in|clude "c|
|00004da0| 6f 70 79 2e 63 69 63 6f | 6e 2e 70 61 74 22 0a 58 |opy.cico|n.pat".X|
|00004db0| 7d 3b 0a 58 73 74 61 74 | 69 63 20 6d 70 72 5f 73 |};.Xstat|ic mpr_s|
|00004dc0| 74 61 74 69 63 28 72 65 | 67 5f 63 6f 6d 6d 61 6e |tatic(re|g_comman|
|00004dd0| 64 35 5f 70 72 2c 20 34 | 38 2c 20 34 38 2c 20 31 |d5_pr, 4|8, 48, 1|
|00004de0| 2c 20 72 65 67 5f 63 6f | 6d 6d 61 6e 64 35 5f 64 |, reg_co|mmand5_d|
|00004df0| 61 74 61 29 3b 0a 58 0a | 58 73 74 61 74 69 63 20 |ata);.X.|Xstatic |
|00004e00| 73 68 6f 72 74 20 72 65 | 67 5f 63 6f 6d 6d 61 6e |short re|g_comman|
|00004e10| 64 36 5f 64 61 74 61 5b | 5d 20 3d 20 7b 0a 58 23 |d6_data[|] = {.X#|
|00004e20| 69 6e 63 6c 75 64 65 20 | 22 70 61 73 74 65 2e 63 |include |"paste.c|
|00004e30| 69 63 6f 6e 2e 70 61 74 | 22 0a 58 7d 3b 0a 58 73 |icon.pat|".X};.Xs|
|00004e40| 74 61 74 69 63 20 6d 70 | 72 5f 73 74 61 74 69 63 |tatic mp|r_static|
|00004e50| 28 72 65 67 5f 63 6f 6d | 6d 61 6e 64 36 5f 70 72 |(reg_com|mand6_pr|
|00004e60| 2c 20 34 38 2c 20 34 38 | 2c 20 31 2c 20 72 65 67 |, 48, 48|, 1, reg|
|00004e70| 5f 63 6f 6d 6d 61 6e 64 | 36 5f 64 61 74 61 29 3b |_command|6_data);|
|00004e80| 0a 58 0a 58 73 74 61 74 | 69 63 20 73 68 6f 72 74 |.X.Xstat|ic short|
|00004e90| 20 72 65 67 5f 63 6f 6d | 6d 61 6e 64 37 5f 64 61 | reg_com|mand7_da|
|00004ea0| 74 61 5b 5d 20 3d 20 7b | 0a 58 23 69 6e 63 6c 75 |ta[] = {|.X#inclu|
|00004eb0| 64 65 20 22 72 6f 74 61 | 74 65 2e 63 69 63 6f 6e |de "rota|te.cicon|
|00004ec0| 2e 70 61 74 22 0a 58 7d | 3b 0a 58 73 74 61 74 69 |.pat".X}|;.Xstati|
|00004ed0| 63 20 6d 70 72 5f 73 74 | 61 74 69 63 28 72 65 67 |c mpr_st|atic(reg|
|00004ee0| 5f 63 6f 6d 6d 61 6e 64 | 37 5f 70 72 2c 20 34 38 |_command|7_pr, 48|
|00004ef0| 2c 20 34 38 2c 20 31 2c | 20 72 65 67 5f 63 6f 6d |, 48, 1,| reg_com|
|00004f00| 6d 61 6e 64 37 5f 64 61 | 74 61 29 3b 0a 58 0a 58 |mand7_da|ta);.X.X|
|00004f10| 0a 58 73 74 61 74 69 63 | 20 73 68 6f 72 74 20 72 |.Xstatic| short r|
|00004f20| 65 67 5f 63 6f 6d 6d 61 | 6e 64 38 5f 64 61 74 61 |eg_comma|nd8_data|
|00004f30| 5b 5d 20 3d 20 7b 0a 58 | 23 69 6e 63 6c 75 64 65 |[] = {.X|#include|
|00004f40| 20 22 6d 6f 76 65 2e 63 | 69 63 6f 6e 2e 70 61 74 | "move.c|icon.pat|
|00004f50| 22 0a 58 7d 3b 0a 58 73 | 74 61 74 69 63 20 6d 70 |".X};.Xs|tatic mp|
|00004f60| 72 5f 73 74 61 74 69 63 | 28 72 65 67 5f 63 6f 6d |r_static|(reg_com|
|00004f70| 6d 61 6e 64 38 5f 70 72 | 2c 20 34 38 2c 20 34 38 |mand8_pr|, 48, 48|
|00004f80| 2c 20 31 2c 20 72 65 67 | 5f 63 6f 6d 6d 61 6e 64 |, 1, reg|_command|
|00004f90| 38 5f 64 61 74 61 29 3b | 0a 45 4e 44 5f 4f 46 5f |8_data);|.END_OF_|
|00004fa0| 63 6f 6d 6d 61 6e 64 2e | 63 0a 69 66 20 74 65 73 |command.|c.if tes|
|00004fb0| 74 20 34 33 36 36 20 2d | 6e 65 20 60 77 63 20 2d |t 4366 -|ne `wc -|
|00004fc0| 63 20 3c 63 6f 6d 6d 61 | 6e 64 2e 63 60 3b 20 74 |c <comma|nd.c`; t|
|00004fd0| 68 65 6e 0a 20 20 20 20 | 65 63 68 6f 20 73 68 61 |hen.    |echo sha|
|00004fe0| 72 3a 20 5c 22 63 6f 6d | 6d 61 6e 64 2e 63 5c 22 |r: \"com|mand.c\"|
|00004ff0| 20 75 6e 70 61 63 6b 65 | 64 20 77 69 74 68 20 77 | unpacke|d with w|
|00005000| 72 6f 6e 67 20 73 69 7a | 65 21 0a 66 69 0a 23 20 |rong siz|e!.fi.# |
|00005010| 65 6e 64 20 6f 66 20 6f | 76 65 72 77 72 69 74 69 |end of o|verwriti|
|00005020| 6e 67 20 63 68 65 63 6b | 0a 66 69 0a 69 66 20 74 |ng check|.fi.if t|
|00005030| 65 73 74 20 2d 66 20 63 | 6f 6e 66 69 72 6d 65 72 |est -f c|onfirmer|
|00005040| 2e 63 20 2d 61 20 22 24 | 7b 31 7d 22 20 21 3d 20 |.c -a "$|{1}" != |
|00005050| 22 2d 63 22 20 3b 20 74 | 68 65 6e 20 0a 20 20 65 |"-c" ; t|hen .  e|
|00005060| 63 68 6f 20 73 68 61 72 | 3a 20 57 69 6c 6c 20 6e |cho shar|: Will n|
|00005070| 6f 74 20 6f 76 65 72 2d | 77 72 69 74 65 20 65 78 |ot over-|write ex|
|00005080| 69 73 74 69 6e 67 20 66 | 69 6c 65 20 5c 22 63 6f |isting f|ile \"co|
|00005090| 6e 66 69 72 6d 65 72 2e | 63 5c 22 0a 65 6c 73 65 |nfirmer.|c\".else|
|000050a0| 0a 65 63 68 6f 20 73 68 | 61 72 3a 20 45 78 74 72 |.echo sh|ar: Extr|
|000050b0| 61 63 74 69 6e 67 20 5c | 22 63 6f 6e 66 69 72 6d |acting \|"confirm|
|000050c0| 65 72 2e 63 5c 22 20 5c | 28 34 33 32 38 20 63 68 |er.c\" \|(4328 ch|
|000050d0| 61 72 61 63 74 65 72 73 | 5c 29 0a 73 65 64 20 22 |aracters|\).sed "|
|000050e0| 73 2f 5e 58 2f 2f 22 20 | 3e 63 6f 6e 66 69 72 6d |s/^X//" |>confirm|
|000050f0| 65 72 2e 63 20 3c 3c 27 | 45 4e 44 5f 4f 46 5f 63 |er.c <<'|END_OF_c|
|00005100| 6f 6e 66 69 72 6d 65 72 | 2e 63 27 0a 58 0a 58 2f |onfirmer|.c'.X.X/|
|00005110| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005120| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005130| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005140| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005150| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0a 58 20 20 20 54 |********|**.X   T|
|00005160| 6f 75 63 68 75 70 20 61 | 20 62 69 74 6d 61 70 20 |ouchup a| bitmap |
|00005170| 67 72 61 70 68 69 63 73 | 20 65 64 69 74 6f 72 20 |graphics| editor |
|00005180| 66 6f 72 20 74 68 65 20 | 53 75 6e 20 57 6f 72 6b |for the |Sun Work|
|00005190| 73 74 61 74 69 6f 6e 20 | 72 75 6e 6e 69 6e 67 20 |station |running |
|000051a0| 53 75 6e 56 69 65 77 0a | 58 20 20 20 43 6f 70 79 |SunView.|X   Copy|
|000051b0| 72 69 67 68 74 20 28 63 | 29 20 31 39 38 38 20 62 |right (c|) 1988 b|
|000051c0| 79 20 52 61 79 6d 6f 6e | 64 20 4b 72 65 69 73 65 |y Raymon|d Kreise|
|000051d0| 6c 0a 58 20 20 20 31 2f | 32 32 2f 38 38 20 40 20 |l.X   1/|22/88 @ |
|000051e0| 53 75 6e 79 20 53 74 6f | 6e 79 20 42 72 6f 6f 6b |Suny Sto|ny Brook|
|000051f0| 0a 58 0a 58 20 20 20 54 | 68 69 73 20 70 72 6f 67 |.X.X   T|his prog|
|00005200| 72 61 6d 20 6d 61 79 20 | 62 65 20 72 65 64 69 73 |ram may |be redis|
|00005210| 74 72 69 62 75 74 65 64 | 20 77 69 74 68 6f 75 74 |tributed| without|
|00005220| 20 66 65 65 20 61 73 20 | 6c 6f 6e 67 20 61 73 20 | fee as |long as |
|00005230| 74 68 69 73 20 63 6f 70 | 79 72 69 67 68 74 0a 58 |this cop|yright.X|
|00005240| 20 20 20 6e 6f 74 69 63 | 65 20 69 73 20 69 6e 74 |   notic|e is int|
|00005250| 61 63 74 2e 0a 58 0a 58 | 3d 3d 3e 20 50 4c 45 41 |act..X.X|==> PLEA|
|00005260| 53 45 20 73 65 6e 64 20 | 63 6f 6d 6d 65 6e 74 73 |SE send |comments|
|00005270| 20 61 6e 64 20 62 75 67 | 20 72 65 70 6f 72 74 73 | and bug| reports|
|00005280| 20 74 6f 20 6f 6e 65 20 | 6f 66 20 74 68 65 20 66 | to one |of the f|
|00005290| 6f 6c 6c 6f 77 69 6e 67 | 20 61 64 64 72 65 73 73 |ollowing| address|
|000052a0| 65 73 3a 0a 58 0a 58 09 | 20 20 20 52 61 79 20 4b |es:.X.X.|   Ray K|
|000052b0| 72 65 69 73 65 6c 0a 58 | 09 20 20 20 43 53 20 44 |reisel.X|.   CS D|
|000052c0| 65 70 74 2e 2c 20 53 55 | 4e 59 20 61 74 20 53 74 |ept., SU|NY at St|
|000052d0| 6f 6e 79 20 42 72 6f 6f | 6b 2c 20 53 74 6f 6e 79 |ony Broo|k, Stony|
|000052e0| 20 42 72 6f 6f 6b 20 4e | 59 20 31 31 37 39 34 0a | Brook N|Y 11794.|
|000052f0| 58 0a 58 09 20 20 20 55 | 55 43 50 3a 20 7b 61 6c |X.X.   U|UCP: {al|
|00005300| 6c 65 67 72 61 2c 20 70 | 68 69 6c 61 62 73 2c 20 |legra, p|hilabs, |
|00005310| 70 79 72 61 6d 69 64 2c | 20 72 65 73 65 61 72 63 |pyramid,| researc|
|00005320| 68 7d 21 73 62 63 73 21 | 72 61 79 6b 20 20 20 0a |h}!sbcs!|rayk   .|
|00005330| 58 09 20 20 20 41 52 50 | 41 2d 49 6e 74 65 72 6e |X.   ARP|A-Intern|
|00005340| 65 74 3a 20 72 61 79 6b | 40 73 62 63 73 2e 73 75 |et: rayk|@sbcs.su|
|00005350| 6e 79 73 62 2e 65 64 75 | 09 09 09 0a 58 09 20 20 |nysb.edu|....X.  |
|00005360| 20 43 53 6e 65 74 3a 20 | 72 61 79 6b 40 73 75 6e | CSnet: |rayk@sun|
|00005370| 79 2d 73 62 0a 58 0a 58 | 20 22 49 66 20 49 20 67 |y-sb.X.X| "If I g|
|00005380| 65 74 20 68 6f 6d 65 20 | 62 65 66 6f 72 65 20 64 |et home |before d|
|00005390| 61 79 6c 69 67 68 74 2c | 20 49 20 6a 75 73 74 20 |aylight,| I just |
|000053a0| 6d 69 67 68 74 20 67 65 | 74 20 73 6f 6d 65 20 73 |might ge|t some s|
|000053b0| 6c 65 65 70 20 74 6f 6e | 69 67 68 74 2e 2e 2e 2e |leep ton|ight....|
|000053c0| 22 0a 58 0a 58 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |".X.X***|********|
|000053d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000053e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000053f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005400| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2f |********|*******/|
|00005410| 0a 58 2f 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.X/*****|********|
|00005420| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005430| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005440| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005450| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0a 58 09 |********|*****.X.|
|00005460| 66 69 6c 65 3a 20 63 6f | 6e 66 69 72 6d 65 72 2e |file: co|nfirmer.|
|00005470| 63 0a 58 09 70 75 72 70 | 6f 73 65 3a 20 54 68 69 |c.X.purp|ose: Thi|
|00005480| 73 20 66 69 6c 65 20 63 | 6f 6e 74 61 69 6e 73 20 |s file c|ontains |
|00005490| 61 20 73 69 6d 70 6c 65 | 20 63 6f 6e 66 69 72 6d |a simple| confirm|
|000054a0| 65 72 20 63 6f 70 69 65 | 64 20 66 72 6f 6d 20 74 |er copie|d from t|
|000054b0| 68 65 0a 58 09 20 53 75 | 6e 76 69 65 77 20 6d 61 |he.X. Su|nview ma|
|000054c0| 6e 75 61 6c 20 74 68 61 | 74 20 68 61 73 20 62 65 |nual tha|t has be|
|000054d0| 65 6e 20 73 6f 75 70 65 | 64 20 75 70 20 61 20 6c |en soupe|d up a l|
|000054e0| 69 74 74 6c 65 0a 58 0a | 58 09 6d 6f 64 69 66 69 |ittle.X.|X.modifi|
|000054f0| 63 61 74 69 6f 6e 73 3a | 0a 58 09 09 64 61 74 65 |cations:|.X..date|
|00005500| 3a 09 54 75 65 20 4d 61 | 72 20 32 32 20 32 32 3a |:.Tue Ma|r 22 22:|
|00005510| 30 34 3a 35 38 20 45 53 | 54 20 31 39 38 38 0a 58 |04:58 ES|T 1988.X|
|00005520| 09 09 61 75 74 68 6f 72 | 3a 09 72 61 79 6b 0a 58 |..author|:.rayk.X|
|00005530| 09 09 63 68 61 6e 67 65 | 73 3a 61 64 64 20 63 6f |..change|s:add co|
|00005540| 6d 6d 65 6e 74 73 0a 58 | 2a 2a 2a 2a 2a 2a 2a 2a |mments.X|********|
|00005550| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005560| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005570| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005580| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005590| 2a 2a 2f 0a 58 0a 58 23 | 69 6e 63 6c 75 64 65 20 |**/.X.X#|include |
|000055a0| 3c 73 74 64 69 6f 2e 68 | 3e 0a 58 23 69 6e 63 6c |<stdio.h|>.X#incl|
|000055b0| 75 64 65 20 3c 73 79 73 | 2f 66 69 6c 65 2e 68 3e |ude <sys|/file.h>|
|000055c0| 0a 58 23 69 6e 63 6c 75 | 64 65 20 3c 73 75 6e 74 |.X#inclu|de <sunt|
|000055d0| 6f 6f 6c 2f 73 75 6e 76 | 69 65 77 2e 68 3e 0a 58 |ool/sunv|iew.h>.X|
|000055e0| 23 69 6e 63 6c 75 64 65 | 20 3c 73 75 6e 74 6f 6f |#include| <suntoo|
|000055f0| 6c 2f 70 61 6e 65 6c 2e | 68 3e 0a 58 23 69 6e 63 |l/panel.|h>.X#inc|
|00005600| 6c 75 64 65 20 3c 73 75 | 6e 74 6f 6f 6c 2f 63 61 |lude <su|ntool/ca|
|00005610| 6e 76 61 73 2e 68 3e 0a | 58 23 69 6e 63 6c 75 64 |nvas.h>.|X#includ|
|00005620| 65 20 3c 73 75 6e 74 6f | 6f 6c 2f 77 61 6c 6b 6d |e <sunto|ol/walkm|
|00005630| 65 6e 75 2e 68 3e 0a 58 | 23 69 6e 63 6c 75 64 65 |enu.h>.X|#include|
|00005640| 20 3c 73 75 6e 74 6f 6f | 6c 2f 73 63 72 6f 6c 6c | <suntoo|l/scroll|
|00005650| 62 61 72 2e 68 3e 0a 58 | 23 69 6e 63 6c 75 64 65 |bar.h>.X|#include|
|00005660| 20 3c 6d 61 74 68 2e 68 | 3e 0a 58 23 69 6e 63 6c | <math.h|>.X#incl|
|00005670| 75 64 65 20 3c 70 69 78 | 72 65 63 74 2f 70 69 78 |ude <pix|rect/pix|
|00005680| 72 65 63 74 5f 68 73 2e | 68 3e 0a 58 0a 58 65 78 |rect_hs.|h>.X.Xex|
|00005690| 74 65 72 6e 20 50 61 6e | 65 6c 20 70 61 6e 65 6c |tern Pan|el panel|
|000056a0| 3b 0a 58 0a 58 73 74 61 | 74 69 63 20 46 72 61 6d |;.X.Xsta|tic Fram|
|000056b0| 65 20 20 69 6e 69 74 5f | 63 6f 6e 66 69 72 6d 65 |e  init_|confirme|
|000056c0| 72 28 29 3b 0a 58 73 74 | 61 74 69 63 20 76 6f 69 |r();.Xst|atic voi|
|000056d0| 64 20 79 65 73 5f 6e 6f | 28 29 3b 0a 58 0a 58 2f |d yes_no|();.X.X/|
|000056e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000056f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005700| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005710| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0a |********|*******.|
|00005720| 58 20 20 20 20 20 20 20 | 20 63 6f 6e 66 69 72 6d |X       | confirm|
|00005730| 0a 58 20 20 20 20 20 20 | 20 20 70 75 72 70 6f 73 |.X      |  purpos|
|00005740| 65 3a 20 54 6f 20 64 69 | 73 70 6c 61 79 20 61 20 |e: To di|splay a |
|00005750| 77 69 6e 64 6f 77 20 6f | 6e 20 74 68 65 20 62 61 |window o|n the ba|
|00005760| 73 65 5f 66 72 61 6d 65 | 20 53 75 6e 77 69 6e 64 |se_frame| Sunwind|
|00005770| 6f 77 0a 58 20 20 20 20 | 20 20 20 20 20 20 20 20 |ow.X    |        |
|00005780| 20 20 20 20 66 6f 72 63 | 65 20 74 68 65 20 75 73 |    forc|e the us|
|00005790| 65 72 20 74 6f 20 61 6e | 73 77 65 72 20 74 68 65 |er to an|swer the|
|000057a0| 20 71 75 65 73 74 69 6f | 6e 20 62 79 20 73 65 6c | questio|n by sel|
|000057b0| 65 63 74 69 6e 67 0a 58 | 09 09 65 69 74 68 65 72 |ecting.X|..either|
|000057c0| 20 59 45 53 20 6f 72 20 | 4e 4f 0a 58 20 20 20 20 | YES or |NO.X    |
|000057d0| 20 20 20 20 70 61 72 61 | 6d 65 74 65 72 3a 0a 58 |    para|meter:.X|
|000057e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000057f0| 6d 65 73 73 61 67 65 3a | 20 54 68 65 20 71 75 65 |message:| The que|
|00005800| 73 74 69 6f 6e 20 74 6f | 20 61 73 6b 65 64 2e 0a |stion to| asked..|
|00005810| 58 20 20 20 20 20 20 20 | 20 72 65 74 75 72 6e 73 |X       | returns|
|00005820| 3a 0a 58 09 09 31 20 3a | 20 69 66 20 74 68 65 20 |:.X..1 :| if the |
|00005830| 75 73 65 72 20 61 6e 73 | 77 65 72 65 64 20 59 45 |user ans|wered YE|
|00005840| 53 0a 58 09 09 30 20 3a | 20 69 66 20 74 68 65 20 |S.X..0 :| if the |
|00005850| 75 73 65 72 20 61 6e 73 | 77 65 72 65 64 20 4e 4f |user ans|wered NO|
|00005860| 0a 58 20 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.X *****|********|
|00005870| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005880| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00005890| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000058a0| 2a 2a 2f 0a 58 69 6e 74 | 20 63 6f 6e 66 69 72 6d |**/.Xint| confirm|
|000058b0| 28 6d 65 73 73 61 67 65 | 29 0a 58 63 68 61 72 20 |(message|).Xchar |
|000058c0| 20 20 20 20 2a 6d 65 73 | 73 61 67 65 3b 20 0a 58 |    *mes|sage; .X|
|000058d0| 7b 0a 58 09 46 72 61 6d | 65 20 20 20 20 20 63 6f |{.X.Fram|e     co|
|000058e0| 6e 66 69 72 6d 65 72 3b | 0a 58 09 69 6e 74 20 20 |nfirmer;|.X.int  |
|000058f0| 20 20 20 20 20 61 6e 73 | 77 65 72 3b 0a 58 0a 58 |     ans|wer;.X.X|
|00005900| 2f 2a 20 63 72 65 61 74 | 65 20 74 68 65 20 63 6f |/* creat|e the co|
|00005910| 6e 66 69 72 6d 65 72 20 | 2a 2f 0a 58 09 63 6f 6e |nfirmer |*/.X.con|
|00005920| 66 69 72 6d 65 72 20 3d | 20 69 6e 69 74 5f 63 6f |firmer =| init_co|
|00005930| 6e 66 69 72 6d 65 72 28 | 6d 65 73 73 61 67 65 29 |nfirmer(|message)|
|00005940| 3b 0a 58 09 77 69 6e 64 | 6f 77 5f 62 65 6c 6c 28 |;.X.wind|ow_bell(|
|00005950| 70 61 6e 65 6c 29 3b 0a | 58 2f 2a 20 6d 61 6b 65 |panel);.|X/* make|
|00005960| 20 74 68 65 20 75 73 65 | 72 20 61 6e 73 77 65 72 | the use|r answer|
|00005970| 20 2a 2f 0a 58 20 09 61 | 6e 73 77 65 72 20 3d 20 | */.X .a|nswer = |
|00005980| 28 69 6e 74 29 20 77 69 | 6e 64 6f 77 5f 6c 6f 6f |(int) wi|ndow_loo|
|00005990| 70 28 63 6f 6e 66 69 72 | 6d 65 72 29 3b 0a 58 0a |p(confir|mer);.X.|
|000059a0| 58 2f 2a 20 64 65 73 74 | 72 6f 79 20 74 68 65 20 |X/* dest|roy the |
|000059b0| 63 6f 6e 66 69 72 6d 65 | 72 20 2a 2f 0a 58 09 77 |confirme|r */.X.w|
|000059c0| 69 6e 64 6f 77 5f 73 65 | 74 28 63 6f 6e 66 69 72 |indow_se|t(confir|
|000059d0| 6d 65 72 2c 20 46 52 41 | 4d 45 5f 4e 4f 5f 43 4f |mer, FRA|ME_NO_CO|
|000059e0| 4e 46 49 52 4d 2c 20 54 | 52 55 45 2c 20 30 29 3b |NFIRM, T|RUE, 0);|
|000059f0| 0a 58 09 77 69 6e 64 6f | 77 5f 64 65 73 74 72 6f |.X.windo|w_destro|
|00005a00| 79 28 63 6f 6e 66 69 72 | 6d 65 72 29 3b 0a 58 0a |y(confir|mer);.X.|
|00005a10| 58 20 20 20 20 09 72 65 | 74 75 72 6e 20 61 6e 73 |X    .re|turn ans|
|00005a20| 77 65 72 3b 0a 58 7d 0a | 58 0a 58 73 74 61 74 69 |wer;.X}.|X.Xstati|
|00005a30| 63 20 46 72 61 6d 65 0a | 58 69 6e 69 74 5f 63 6f |c Frame.|Xinit_co|
|00005a40| 6e 66 69 72 6d 65 72 28 | 6d 65 73 73 61 67 65 29 |nfirmer(|message)|
|00005a50| 0a 58 63 68 61 72 20 20 | 20 20 20 2a 6d 65 73 73 |.Xchar  |   *mess|
|00005a60| 61 67 65 3b 20 0a 58 7b | 20 0a 58 65 78 74 65 72 |age; .X{| .Xexter|
|00005a70| 6e 20 20 20 46 72 61 6d | 65 20 20 62 61 73 65 5f |n   Fram|e  base_|
|00005a80| 66 72 61 6d 65 3b 0a 58 | 46 72 61 6d 65 20 20 20 |frame;.X|Frame   |
|00005a90| 20 20 20 20 20 20 20 20 | 63 6f 6e 66 69 72 6d 65 |        |confirme|
|00005aa0| 72 3b 0a 58 50 61 6e 65 | 6c 20 20 20 20 20 20 20 |r;.XPane|l       |
|00005ab0| 20 20 20 20 70 61 6e 65 | 6c 3b 0a 58 50 61 6e 65 |    pane|l;.XPane|
|00005ac0| 6c 5f 69 74 65 6d 20 20 | 20 20 20 20 6d 65 73 73 |l_item  |    mess|
|00005ad0| 61 67 65 5f 69 74 65 6d | 3b 0a 58 69 6e 74 20 09 |age_item|;.Xint .|
|00005ae0| 20 20 20 20 20 20 20 20 | 6c 65 66 74 2c 20 74 6f |        |left, to|
|00005af0| 70 2c 20 77 69 64 74 68 | 2c 20 68 65 69 67 68 74 |p, width|, height|
|00005b00| 3b 0a 58 52 65 63 74 09 | 20 20 20 20 20 20 20 20 |;.XRect.|        |
|00005b10| 2a 72 3b 0a 58 73 74 72 | 75 63 74 20 70 69 78 72 |*r;.Xstr|uct pixr|
|00005b20| 65 63 74 20 20 2a 70 72 | 3b 0a 58 0a 58 2f 2a 20 |ect  *pr|;.X.X/* |
|00005b30| 63 72 65 61 74 65 20 74 | 68 65 20 63 6f 6e 66 69 |create t|he confi|
|00005b40| 72 6d 65 72 20 62 61 73 | 65 20 66 72 61 6d 65 20 |rmer bas|e frame |
|00005b50| 2a 2f 0a 58 09 63 6f 6e | 66 69 72 6d 65 72 20 3d |*/.X.con|firmer =|
|00005b60| 20 77 69 6e 64 6f 77 5f | 63 72 65 61 74 65 28 62 | window_|create(b|
|00005b70| 61 73 65 5f 66 72 61 6d | 65 2c 20 46 52 41 4d 45 |ase_fram|e, FRAME|
|00005b80| 2c 20 0a 58 20 20 20 20 | 20 20 20 20 20 20 20 20 |, .X    |        |
|00005b90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005ba0| 20 20 20 20 20 20 46 52 | 41 4d 45 5f 53 48 4f 57 |      FR|AME_SHOW|
|00005bb0| 5f 4c 41 42 45 4c 2c 20 | 46 41 4c 53 45 2c 0a 58 |_LABEL, |FALSE,.X|
|00005bc0| 09 09 09 09 20 20 30 29 | 3b 0a 58 0a 58 2f 2a 20 |....  0)|;.X.X/* |
|00005bd0| 63 72 65 61 74 65 20 74 | 68 65 20 73 69 6e 67 6c |create t|he singl|
|00005be0| 65 20 70 61 6e 65 6c 20 | 73 75 62 77 69 6e 64 6f |e panel |subwindo|
|00005bf0| 77 20 2a 2f 0a 58 09 70 | 61 6e 65 6c 20 3d 20 77 |w */.X.p|anel = w|
|00005c00| 69 6e 64 6f 77 5f 63 72 | 65 61 74 65 28 63 6f 6e |indow_cr|eate(con|
|00005c10| 66 69 72 6d 65 72 2c 20 | 50 41 4e 45 4c 2c 20 30 |firmer, |PANEL, 0|
|00005c20| 29 3b 0a 58 0a 58 2f 2a | 20 70 75 74 20 69 6e 20 |);.X.X/*| put in |
|00005c30| 74 68 65 20 6d 65 73 73 | 61 67 65 20 2a 2f 0a 58 |the mess|age */.X|
|00005c40| 09 6d 65 73 73 61 67 65 | 5f 69 74 65 6d 20 3d 20 |.message|_item = |
|00005c50| 70 61 6e 65 6c 5f 63 72 | 65 61 74 65 5f 69 74 65 |panel_cr|eate_ite|
|00005c60| 6d 28 70 61 6e 65 6c 2c | 20 50 41 4e 45 4c 5f 4d |m(panel,| PANEL_M|
|00005c70| 45 53 53 41 47 45 2c 0a | 58 09 09 09 09 09 50 41 |ESSAGE,.|X.....PA|
|00005c80| 4e 45 4c 5f 4c 41 42 45 | 4c 5f 53 54 52 49 4e 47 |NEL_LABE|L_STRING|
|00005c90| 2c 20 6d 65 73 73 61 67 | 65 2c 0a 58 09 09 09 09 |, messag|e,.X....|
|00005ca0| 09 30 29 3b 0a 58 0a 58 | 09 70 72 20 3d 20 70 61 |.0);.X.X|.pr = pa|
|00005cb0| 6e 65 6c 5f 62 75 74 74 | 6f 6e 5f 69 6d 61 67 65 |nel_butt|on_image|
|00005cc0| 28 70 61 6e 65 6c 2c 20 | 22 4e 4f 22 2c 20 33 2c |(panel, |"NO", 3,|
|00005cd0| 20 30 29 3b 0a 58 09 77 | 69 64 74 68 20 3d 20 32 | 0);.X.w|idth = 2|
|00005ce0| 20 2a 20 70 72 2d 3e 70 | 72 5f 77 69 64 74 68 20 | * pr->p|r_width |
|00005cf0| 2b 20 31 30 3b 0a 58 0a | 58 20 20 09 72 20 3d 20 |+ 10;.X.|X  .r = |
|00005d00| 28 52 65 63 74 20 2a 29 | 20 70 61 6e 65 6c 5f 67 |(Rect *)| panel_g|
|00005d10| 65 74 28 6d 65 73 73 61 | 67 65 5f 69 74 65 6d 2c |et(messa|ge_item,|
|00005d20| 20 50 41 4e 45 4c 5f 49 | 54 45 4d 5f 52 45 43 54 | PANEL_I|TEM_RECT|
|00005d30| 29 3b 0a 58 0a 58 2f 2a | 20 63 65 6e 74 65 72 20 |);.X.X/*| center |
|00005d40| 74 68 65 20 79 65 73 2f | 6e 6f 20 62 75 74 74 6f |the yes/|no butto|
|00005d50| 6e 73 20 75 6e 64 65 72 | 20 74 68 65 20 6d 65 73 |ns under| the mes|
|00005d60| 73 61 67 65 20 2a 2f 0a | 58 09 6c 65 66 74 20 3d |sage */.|X.left =|
|00005d70| 20 28 72 2d 3e 72 5f 77 | 69 64 74 68 20 2d 20 77 | (r->r_w|idth - w|
|00005d80| 69 64 74 68 29 20 2f 20 | 32 3b 0a 58 09 69 66 20 |idth) / |2;.X.if |
|00005d90| 28 6c 65 66 74 20 3c 20 | 30 29 0a 58 09 20 20 20 |(left < |0).X.   |
|00005da0| 20 6c 65 66 74 20 3d 20 | 30 3b 0a 58 09 74 6f 70 | left = |0;.X.top|
|00005db0| 20 3d 20 72 65 63 74 5f | 62 6f 74 74 6f 6d 28 72 | = rect_|bottom(r|
|00005dc0| 29 20 2b 20 35 3b 0a 58 | 0a 58 20 20 20 20 20 20 |) + 5;.X|.X      |
|00005dd0| 20 20 70 61 6e 65 6c 5f | 63 72 65 61 74 65 5f 69 |  panel_|create_i|
|00005de0| 74 65 6d 28 70 61 6e 65 | 6c 2c 20 50 41 4e 45 4c |tem(pane|l, PANEL|
|00005df0| 5f 42 55 54 54 4f 4e 2c | 0a 58 20 20 20 20 20 20 |_BUTTON,|.X      |
|00005e00| 20 20 20 20 20 20 20 20 | 20 20 20 20 50 41 4e 45 |        |    PANE|
|00005e10| 4c 5f 49 54 45 4d 5f 58 | 2c 20 6c 65 66 74 2c 0a |L_ITEM_X|, left,.|
|00005e20| 58 09 20 20 20 20 20 20 | 20 20 20 20 50 41 4e 45 |X.      |    PANE|
|00005e30| 4c 5f 49 54 45 4d 5f 59 | 2c 20 74 6f 70 2c 0a 58 |L_ITEM_Y|, top,.X|
|00005e40| 09 20 20 20 20 20 20 20 | 20 20 20 50 41 4e 45 4c |.       |   PANEL|
|00005e50| 5f 4c 41 42 45 4c 5f 49 | 4d 41 47 45 2c 20 70 72 |_LABEL_I|MAGE, pr|
|00005e60| 2c 0a 58 09 20 20 20 20 | 20 20 20 20 20 20 50 41 |,.X.    |      PA|
|00005e70| 4e 45 4c 5f 43 4c 49 45 | 4e 54 5f 44 41 54 41 2c |NEL_CLIE|NT_DATA,|
|00005e80| 20 46 41 4c 53 45 2c 0a | 58 09 09 20 20 50 41 4e | FALSE,.|X..  PAN|
|00005e90| 45 4c 5f 4e 4f 54 49 46 | 59 5f 50 52 4f 43 2c 20 |EL_NOTIF|Y_PROC, |
|00005ea0| 79 65 73 5f 6e 6f 2c 0a | 58 09 09 20 20 30 29 3b |yes_no,.|X..  0);|
|00005eb0| 0a 58 20 0a 58 20 20 20 | 20 20 20 20 20 70 61 6e |.X .X   |     pan|
|00005ec0| 65 6c 5f 63 72 65 61 74 | 65 5f 69 74 65 6d 28 70 |el_creat|e_item(p|
|00005ed0| 61 6e 65 6c 2c 20 50 41 | 4e 45 4c 5f 42 55 54 54 |anel, PA|NEL_BUTT|
|00005ee0| 4f 4e 2c 0a 58 09 20 20 | 20 20 20 20 20 20 20 20 |ON,.X.  |        |
|00005ef0| 50 41 4e 45 4c 5f 4c 41 | 42 45 4c 5f 49 4d 41 47 |PANEL_LA|BEL_IMAG|
|00005f00| 45 2c 20 70 61 6e 65 6c | 5f 62 75 74 74 6f 6e 5f |E, panel|_button_|
|00005f10| 69 6d 61 67 65 28 70 61 | 6e 65 6c 2c 20 22 59 45 |image(pa|nel, "YE|
|00005f20| 53 22 2c 20 33 2c 20 30 | 29 2c 0a 58 09 20 20 20 |S", 3, 0|),.X.   |
|00005f30| 20 20 20 20 20 20 20 50 | 41 4e 45 4c 5f 43 4c 49 |       P|ANEL_CLI|
|00005f40| 45 4e 54 5f 44 41 54 41 | 2c 20 54 52 55 45 2c 0a |ENT_DATA|, TRUE,.|
|00005f50| 58 09 09 20 20 50 41 4e | 45 4c 5f 4e 4f 54 49 46 |X..  PAN|EL_NOTIF|
|00005f60| 59 5f 50 52 4f 43 2c 20 | 79 65 73 5f 6e 6f 2c 0a |Y_PROC, |yes_no,.|
|00005f70| 58 09 09 20 20 30 29 3b | 0a 58 20 0a 58 0a 58 09 |X..  0);|.X .X.X.|
|00005f80| 77 69 6e 64 6f 77 5f 66 | 69 74 28 70 61 6e 65 6c |window_f|it(panel|
|00005f90| 29 3b 0a 58 09 77 69 6e | 64 6f 77 5f 66 69 74 28 |);.X.win|dow_fit(|
|00005fa0| 63 6f 6e 66 69 72 6d 65 | 72 29 3b 0a 58 0a 58 2f |confirme|r);.X.X/|
|00005fb0| 2a 20 63 65 6e 74 65 72 | 20 74 68 65 20 63 6f 6e |* center| the con|
|00005fc0| 66 69 72 6d 65 72 20 66 | 72 61 6d 65 20 69 6e 20 |firmer f|rame in |
|00005fd0| 74 68 65 20 62 61 73 65 | 20 66 72 61 6d 65 20 2a |the base| frame *|
|00005fe0| 2f 0a 58 09 72 20 3d 20 | 28 52 65 63 74 20 2a 29 |/.X.r = |(Rect *)|
|00005ff0| 20 77 69 6e 64 6f 77 5f | 67 65 74 28 62 61 73 65 | window_|get(base|
|00006000| 5f 66 72 61 6d 65 2c 20 | 57 49 4e 5f 52 45 43 54 |_frame, |WIN_RECT|
|00006010| 29 3b 0a 58 0a 58 09 77 | 69 64 74 68 20 3d 20 28 |);.X.X.w|idth = (|
|00006020| 69 6e 74 29 20 77 69 6e | 64 6f 77 5f 67 65 74 28 |int) win|dow_get(|
|00006030| 63 6f 6e 66 69 72 6d 65 | 72 2c 20 57 49 4e 5f 57 |confirme|r, WIN_W|
|00006040| 49 44 54 48 29 3b 0a 58 | 09 68 65 69 67 68 74 20 |IDTH);.X|.height |
|00006050| 3d 20 28 69 6e 74 29 20 | 77 69 6e 64 6f 77 5f 67 |= (int) |window_g|
|00006060| 65 74 28 63 6f 6e 66 69 | 72 6d 65 72 2c 20 57 49 |et(confi|rmer, WI|
|00006070| 4e 5f 48 45 49 47 48 54 | 29 3b 0a 58 0a 58 09 6c |N_HEIGHT|);.X.X.l|
|00006080| 65 66 74 20 3d 20 28 72 | 2d 3e 72 5f 77 69 64 74 |eft = (r|->r_widt|
|00006090| 68 20 2d 20 77 69 64 74 | 68 29 20 2f 20 32 3b 0a |h - widt|h) / 2;.|
|000060a0| 58 09 74 6f 70 20 3d 20 | 28 72 2d 3e 72 5f 68 65 |X.top = |(r->r_he|
|000060b0| 69 67 68 74 20 2d 20 68 | 65 69 67 68 74 29 20 2f |ight - h|eight) /|
|000060c0| 20 33 3b 0a 58 0a 58 20 | 20 20 20 20 20 20 20 69 | 3;.X.X |       i|
|000060d0| 66 20 28 6c 65 66 74 20 | 3c 20 30 29 20 0a 58 20 |f (left |< 0) .X |
|000060e0| 20 20 20 20 20 20 20 20 | 20 20 20 6c 65 66 74 20 |        |   left |
|000060f0| 3d 20 30 3b 20 0a 58 20 | 09 69 66 20 28 74 6f 70 |= 0; .X |.if (top|
|00006100| 20 3c 20 30 29 0a 58 09 | 20 20 20 20 74 6f 70 20 | < 0).X.|    top |
|00006110| 3d 20 30 3b 0a 58 0a 58 | 09 77 69 6e 64 6f 77 5f |= 0;.X.X|.window_|
|00006120| 73 65 74 28 63 6f 6e 66 | 69 72 6d 65 72 2c 20 57 |set(conf|irmer, W|
|00006130| 49 4e 5f 58 2c 20 6c 65 | 66 74 2c 20 57 49 4e 5f |IN_X, le|ft, WIN_|
|00006140| 59 2c 20 74 6f 70 2c 0a | 58 09 09 09 30 29 3b 0a |Y, top,.|X...0);.|
|00006150| 58 0a 58 20 20 20 20 20 | 20 20 20 6c 65 66 74 20 |X.X     |   left |
|00006160| 3d 20 6c 65 66 74 20 2b | 20 28 77 69 64 74 68 20 |= left +| (width |
|00006170| 2d 20 77 69 64 74 68 2f | 33 29 3b 0a 58 20 20 20 |- width/|3);.X   |
|00006180| 20 20 20 20 20 74 6f 70 | 20 3d 20 74 6f 70 20 2b |     top| = top +|
|00006190| 20 68 65 69 67 68 74 20 | 2f 20 32 3b 20 20 20 20 | height |/ 2;    |
|000061a0| 20 20 0a 58 09 77 69 6e | 64 6f 77 5f 73 65 74 28 |  .X.win|dow_set(|
|000061b0| 62 61 73 65 5f 66 72 61 | 6d 65 2c 20 57 49 4e 5f |base_fra|me, WIN_|
|000061c0| 4d 4f 55 53 45 5f 58 59 | 2c 20 6c 65 66 74 2c 20 |MOUSE_XY|, left, |
|000061d0| 74 6f 70 2c 20 20 30 29 | 3b 0a 58 0a 58 09 72 65 |top,  0)|;.X.X.re|
|000061e0| 74 75 72 6e 20 63 6f 6e | 66 69 72 6d 65 72 3b 0a |turn con|firmer;.|
|000061f0| 58 7d 0a 58 0a 58 2f 2a | 20 79 65 73 2f 6e 6f 20 |X}.X.X/*| yes/no |
|00006200| 6e 6f 74 69 66 79 20 70 | 72 6f 63 20 2a 2f 0a 58 |notify p|roc */.X|
|00006210| 73 74 61 74 69 63 20 76 | 6f 69 64 0a 58 79 65 73 |static v|oid.Xyes|
|00006220| 5f 6e 6f 28 69 74 65 6d | 2c 20 65 76 65 6e 74 29 |_no(item|, event)|
|00006230| 0a 58 50 61 6e 65 6c 5f | 69 74 65 6d 20 20 20 69 |.XPanel_|item   i|
|00006240| 74 65 6d 3b 0a 58 45 76 | 65 6e 74 20 20 20 20 20 |tem;.XEv|ent     |
|00006250| 20 20 20 2a 65 76 65 6e | 74 3b 0a 58 7b 0a 58 09 |   *even|t;.X{.X.|
|00006260| 77 69 6e 64 6f 77 5f 72 | 65 74 75 72 6e 28 70 61 |window_r|eturn(pa|
|00006270| 6e 65 6c 5f 67 65 74 28 | 69 74 65 6d 2c 20 50 41 |nel_get(|item, PA|
|00006280| 4e 45 4c 5f 43 4c 49 45 | 4e 54 5f 44 41 54 41 29 |NEL_CLIE|NT_DATA)|
|00006290| 29 3b 0a 58 7d 0a 58 0a | 45 4e 44 5f 4f 46 5f 63 |);.X}.X.|END_OF_c|
|000062a0| 6f 6e 66 69 72 6d 65 72 | 2e 63 0a 69 66 20 74 65 |onfirmer|.c.if te|
|000062b0| 73 74 20 34 33 32 38 20 | 2d 6e 65 20 60 77 63 20 |st 4328 |-ne `wc |
|000062c0| 2d 63 20 3c 63 6f 6e 66 | 69 72 6d 65 72 2e 63 60 |-c <conf|irmer.c`|
|000062d0| 3b 20 74 68 65 6e 0a 20 | 20 20 20 65 63 68 6f 20 |; then. |   echo |
|000062e0| 73 68 61 72 3a 20 5c 22 | 63 6f 6e 66 69 72 6d 65 |shar: \"|confirme|
|000062f0| 72 2e 63 5c 22 20 75 6e | 70 61 63 6b 65 64 20 77 |r.c\" un|packed w|
|00006300| 69 74 68 20 77 72 6f 6e | 67 20 73 69 7a 65 21 0a |ith wron|g size!.|
|00006310| 66 69 0a 23 20 65 6e 64 | 20 6f 66 20 6f 76 65 72 |fi.# end| of over|
|00006320| 77 72 69 74 69 6e 67 20 | 63 68 65 63 6b 0a 66 69 |writing |check.fi|
|00006330| 0a 69 66 20 74 65 73 74 | 20 2d 66 20 64 69 73 6b |.if test| -f disk|
|00006340| 5f 69 6f 2e 63 20 2d 61 | 20 22 24 7b 31 7d 22 20 |_io.c -a| "${1}" |
|00006350| 21 3d 20 22 2d 63 22 20 | 3b 20 74 68 65 6e 20 0a |!= "-c" |; then .|
|00006360| 20 20 65 63 68 6f 20 73 | 68 61 72 3a 20 57 69 6c |  echo s|har: Wil|
|00006370| 6c 20 6e 6f 74 20 6f 76 | 65 72 2d 77 72 69 74 65 |l not ov|er-write|
|00006380| 20 65 78 69 73 74 69 6e | 67 20 66 69 6c 65 20 5c | existin|g file \|
|00006390| 22 64 69 73 6b 5f 69 6f | 2e 63 5c 22 0a 65 6c 73 |"disk_io|.c\".els|
|000063a0| 65 0a 65 63 68 6f 20 73 | 68 61 72 3a 20 45 78 74 |e.echo s|har: Ext|
|000063b0| 72 61 63 74 69 6e 67 20 | 5c 22 64 69 73 6b 5f 69 |racting |\"disk_i|
|000063c0| 6f 2e 63 5c 22 20 5c 28 | 31 34 38 38 34 20 63 68 |o.c\" \(|14884 ch|
|000063d0| 61 72 61 63 74 65 72 73 | 5c 29 0a 73 65 64 20 22 |aracters|\).sed "|
|000063e0| 73 2f 5e 58 2f 2f 22 20 | 3e 64 69 73 6b 5f 69 6f |s/^X//" |>disk_io|
|000063f0| 2e 63 20 3c 3c 27 45 4e | 44 5f 4f 46 5f 64 69 73 |.c <<'EN|D_OF_dis|
+--------+-------------------------+-------------------------+--------+--------+