home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: SHell self-extracting ARchive
(archive/shar).
You can browse this item here: clock
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 46 72 6f 6d 20 64 65 63 | 77 72 6c 21 6c 61 62 72 |From dec|wrl!labr|
|00000010| 65 61 21 72 75 74 67 65 | 72 73 21 74 75 74 2e 63 |ea!rutge|rs!tut.c|
|00000020| 69 73 2e 6f 68 69 6f 2d | 73 74 61 74 65 2e 65 64 |is.ohio-|state.ed|
|00000030| 75 21 63 77 6a 63 63 21 | 68 61 6c 21 6e 63 6f 61 |u!cwjcc!|hal!ncoa|
|00000040| 73 74 21 61 6c 6c 62 65 | 72 79 20 54 75 65 20 4f |st!allbe|ry Tue O|
|00000050| 63 74 20 31 31 20 31 37 | 3a 35 34 3a 35 32 20 50 |ct 11 17|:54:52 P|
|00000060| 44 54 20 31 39 38 38 0a | 41 72 74 69 63 6c 65 20 |DT 1988.|Article |
|00000070| 36 36 33 20 6f 66 20 63 | 6f 6d 70 2e 73 6f 75 72 |663 of c|omp.sour|
|00000080| 63 65 73 2e 6d 69 73 63 | 3a 0a 50 61 74 68 3a 20 |ces.misc|:.Path: |
|00000090| 67 72 61 6e 69 74 65 21 | 64 65 63 77 72 6c 21 6c |granite!|decwrl!l|
|000000a0| 61 62 72 65 61 21 72 75 | 74 67 65 72 73 21 74 75 |abrea!ru|tgers!tu|
|000000b0| 74 2e 63 69 73 2e 6f 68 | 69 6f 2d 73 74 61 74 65 |t.cis.oh|io-state|
|000000c0| 2e 65 64 75 21 63 77 6a | 63 63 21 68 61 6c 21 6e |.edu!cwj|cc!hal!n|
|000000d0| 63 6f 61 73 74 21 61 6c | 6c 62 65 72 79 0a 46 72 |coast!al|lbery.Fr|
|000000e0| 6f 6d 3a 20 67 65 6f 72 | 67 65 40 72 65 62 65 6c |om: geor|ge@rebel|
|000000f0| 2e 55 55 43 50 20 28 47 | 65 6f 72 67 65 20 4d 2e |.UUCP (G|eorge M.|
|00000100| 20 53 69 70 65 29 0a 4e | 65 77 73 67 72 6f 75 70 | Sipe).N|ewsgroup|
|00000110| 73 3a 20 63 6f 6d 70 2e | 73 6f 75 72 63 65 73 2e |s: comp.|sources.|
|00000120| 6d 69 73 63 0a 53 75 62 | 6a 65 63 74 3a 20 76 30 |misc.Sub|ject: v0|
|00000130| 34 69 31 32 31 3a 20 6c | 61 72 67 65 20 64 69 67 |4i121: l|arge dig|
|00000140| 69 74 61 6c 20 63 6c 6f | 63 6b 0a 4d 65 73 73 61 |ital clo|ck.Messa|
|00000150| 67 65 2d 49 44 3a 20 3c | 34 38 33 34 32 40 72 65 |ge-ID: <|48342@re|
|00000160| 62 65 6c 2e 55 55 43 50 | 3e 0a 44 61 74 65 3a 20 |bel.UUCP|>.Date: |
|00000170| 31 31 20 4f 63 74 20 38 | 38 20 30 32 3a 32 32 3a |11 Oct 8|8 02:22:|
|00000180| 35 39 20 47 4d 54 0a 53 | 65 6e 64 65 72 3a 20 61 |59 GMT.S|ender: a|
|00000190| 6c 6c 62 65 72 79 40 6e | 63 6f 61 73 74 2e 55 55 |llbery@n|coast.UU|
|000001a0| 43 50 0a 52 65 70 6c 79 | 2d 54 6f 3a 20 67 65 6f |CP.Reply|-To: geo|
|000001b0| 72 67 65 40 72 65 62 65 | 6c 2e 55 55 43 50 20 28 |rge@rebe|l.UUCP (|
|000001c0| 47 65 6f 72 67 65 20 4d | 2e 20 53 69 70 65 29 0a |George M|. Sipe).|
|000001d0| 4f 72 67 61 6e 69 7a 61 | 74 69 6f 6e 3a 20 54 6f |Organiza|tion: To|
|000001e0| 6c 65 72 61 6e 74 20 53 | 79 73 74 65 6d 73 2c 20 |lerant S|ystems, |
|000001f0| 41 74 6c 61 6e 74 61 20 | 47 41 0a 4c 69 6e 65 73 |Atlanta |GA.Lines|
|00000200| 3a 20 37 30 32 0a 41 70 | 70 72 6f 76 65 64 3a 20 |: 702.Ap|proved: |
|00000210| 61 6c 6c 62 65 72 79 40 | 6e 63 6f 61 73 74 2e 55 |allbery@|ncoast.U|
|00000220| 55 43 50 0a 0a 50 6f 73 | 74 69 6e 67 2d 6e 75 6d |UCP..Pos|ting-num|
|00000230| 62 65 72 3a 20 56 6f 6c | 75 6d 65 20 34 2c 20 49 |ber: Vol|ume 4, I|
|00000240| 73 73 75 65 20 31 32 31 | 0a 53 75 62 6d 69 74 74 |ssue 121|.Submitt|
|00000250| 65 64 2d 62 79 3a 20 22 | 47 65 6f 72 67 65 20 4d |ed-by: "|George M|
|00000260| 2e 20 53 69 70 65 22 20 | 3c 67 65 6f 72 67 65 40 |. Sipe" |<george@|
|00000270| 72 65 62 65 6c 2e 55 55 | 43 50 3e 0a 41 72 63 68 |rebel.UU|CP>.Arch|
|00000280| 69 76 65 2d 6e 61 6d 65 | 3a 20 63 6c 6f 63 6b 0a |ive-name|: clock.|
|00000290| 0a 5b 54 68 65 20 73 65 | 63 6f 6e 64 20 6f 66 20 |.[The se|cond of |
|000002a0| 74 68 72 65 65 20 6d 61 | 6e 67 6c 69 6e 67 73 20 |three ma|nglings |
|000002b0| 6f 66 20 6e 65 74 2e 63 | 6c 61 73 73 69 63 73 2e |of net.c|lassics.|
|000002c0| 2e 2e 20 20 2b 2b 62 73 | 61 5d 0a 0a 23 21 20 2f |.. ++bs|a]..#! /|
|000002d0| 62 69 6e 2f 73 68 0a 23 | 20 54 68 69 73 20 69 73 |bin/sh.#| This is|
|000002e0| 20 61 20 73 68 65 6c 6c | 20 61 72 63 68 69 76 65 | a shell| archive|
|000002f0| 2c 20 6d 65 61 6e 69 6e | 67 3a 0a 23 20 31 2e 20 |, meanin|g:.# 1. |
|00000300| 52 65 6d 6f 76 65 20 65 | 76 65 72 79 74 68 69 6e |Remove e|verythin|
|00000310| 67 20 61 62 6f 76 65 20 | 74 68 65 20 23 21 20 2f |g above |the #! /|
|00000320| 62 69 6e 2f 73 68 20 6c | 69 6e 65 2e 0a 23 20 32 |bin/sh l|ine..# 2|
|00000330| 2e 20 53 61 76 65 20 74 | 68 65 20 72 65 73 75 6c |. Save t|he resul|
|00000340| 74 69 6e 67 20 74 65 78 | 74 20 69 6e 20 61 20 66 |ting tex|t in a f|
|00000350| 69 6c 65 2e 0a 23 20 33 | 2e 20 45 78 65 63 75 74 |ile..# 3|. Execut|
|00000360| 65 20 74 68 65 20 66 69 | 6c 65 20 77 69 74 68 20 |e the fi|le with |
|00000370| 2f 62 69 6e 2f 73 68 20 | 28 6e 6f 74 20 63 73 68 |/bin/sh |(not csh|
|00000380| 29 20 74 6f 20 63 72 65 | 61 74 65 3a 0a 23 09 52 |) to cre|ate:.#.R|
|00000390| 45 41 44 4d 45 0a 23 09 | 4d 61 6b 65 66 69 6c 65 |EADME.#.|Makefile|
|000003a0| 0a 23 09 63 6c 6f 63 6b | 2e 6d 61 6e 0a 23 09 63 |.#.clock|.man.#.c|
|000003b0| 6c 6f 63 6b 2e 63 0a 23 | 09 64 69 67 69 74 73 2e |lock.c.#|.digits.|
|000003c0| 63 0a 23 20 54 68 69 73 | 20 61 72 63 68 69 76 65 |c.# This| archive|
|000003d0| 20 63 72 65 61 74 65 64 | 3a 20 54 75 65 20 41 75 | created|: Tue Au|
|000003e0| 67 20 20 39 20 30 31 3a | 30 32 3a 34 32 20 31 39 |g 9 01:|02:42 19|
|000003f0| 38 38 0a 65 78 70 6f 72 | 74 20 50 41 54 48 3b 20 |88.expor|t PATH; |
|00000400| 50 41 54 48 3d 2f 62 69 | 6e 3a 2f 75 73 72 2f 62 |PATH=/bi|n:/usr/b|
|00000410| 69 6e 3a 24 50 41 54 48 | 0a 69 66 20 74 65 73 74 |in:$PATH|.if test|
|00000420| 20 2d 66 20 27 52 45 41 | 44 4d 45 27 0a 74 68 65 | -f 'REA|DME'.the|
|00000430| 6e 0a 09 65 63 68 6f 20 | 73 68 61 72 3a 20 22 77 |n..echo |shar: "w|
|00000440| 69 6c 6c 20 6e 6f 74 20 | 6f 76 65 72 2d 77 72 69 |ill not |over-wri|
|00000450| 74 65 20 65 78 69 73 74 | 69 6e 67 20 66 69 6c 65 |te exist|ing file|
|00000460| 20 27 52 45 41 44 4d 45 | 27 22 0a 65 6c 73 65 0a | 'README|'".else.|
|00000470| 73 65 64 20 27 73 2f 5e | 58 2f 2f 27 20 3c 3c 20 |sed 's/^|X//' << |
|00000480| 5c 53 48 41 52 5f 45 4f | 46 20 3e 20 27 52 45 41 |\SHAR_EO|F > 'REA|
|00000490| 44 4d 45 27 0a 58 43 6c | 6f 63 6b 20 64 69 73 70 |DME'.XCl|ock disp|
|000004a0| 6c 61 79 73 20 61 20 6c | 61 72 67 65 20 34 2d 64 |lays a l|arge 4-d|
|000004b0| 69 67 69 74 2c 20 31 32 | 2d 68 6f 75 72 20 63 6c |igit, 12|-hour cl|
|000004c0| 6f 63 6b 20 6f 6e 20 74 | 68 65 20 75 73 65 72 27 |ock on t|he user'|
|000004d0| 73 20 73 63 72 65 65 6e | 2e 20 20 41 0a 58 6c 69 |s screen|. A.Xli|
|000004e0| 6e 65 20 63 6f 6e 74 61 | 69 6e 69 6e 67 20 74 68 |ne conta|ining th|
|000004f0| 65 20 68 6f 73 74 6e 61 | 6d 65 20 69 73 20 64 69 |e hostna|me is di|
|00000500| 73 70 6c 61 79 65 64 20 | 61 62 6f 76 65 20 74 68 |splayed |above th|
|00000510| 65 20 74 69 6d 65 20 61 | 6e 64 20 61 20 6c 69 6e |e time a|nd a lin|
|00000520| 65 0a 58 63 6f 6e 74 61 | 69 6e 69 6e 67 20 74 68 |e.Xconta|ining th|
|00000530| 65 20 66 75 6c 6c 20 64 | 61 74 65 20 61 6e 64 20 |e full d|ate and |
|00000540| 74 69 6d 65 20 69 73 20 | 64 69 73 70 6c 61 79 65 |time is |displaye|
|00000550| 64 20 61 66 74 65 72 20 | 69 74 2e 0a 58 0a 58 55 |d after |it..X.XU|
|00000560| 6e 6c 69 6b 65 20 61 6e | 6f 74 68 65 72 20 72 65 |nlike an|other re|
|00000570| 63 65 6e 74 20 63 6c 6f | 63 6b 20 70 72 6f 67 72 |cent clo|ck progr|
|00000580| 61 6d 20 70 6f 73 74 69 | 6e 67 2c 20 74 68 69 73 |am posti|ng, this|
|00000590| 20 70 72 6f 67 72 61 6d | 20 69 73 0a 58 73 74 61 | program| is.Xsta|
|000005a0| 6e 64 2d 61 6c 6f 6e 65 | 20 61 6e 64 20 64 6f 65 |nd-alone| and doe|
|000005b0| 73 20 6e 6f 74 20 64 65 | 70 65 6e 64 20 6f 6e 20 |s not de|pend on |
|000005c0| 74 68 65 20 70 72 65 73 | 65 6e 63 65 20 6f 72 20 |the pres|ence or |
|000005d0| 6f 70 65 72 61 74 69 6f | 6e 20 6f 66 20 61 6e 79 |operatio|n of any|
|000005e0| 0a 58 6f 74 68 65 72 20 | 70 72 6f 67 72 61 6d 20 |.Xother |program |
|000005f0| 28 65 2e 67 2e 20 53 79 | 73 74 65 6d 20 56 20 62 |(e.g. Sy|stem V b|
|00000600| 61 6e 6e 65 72 29 2e 0a | 58 0a 58 54 68 65 20 64 |anner)..|X.XThe d|
|00000610| 69 73 70 6c 61 79 20 69 | 73 20 75 70 64 61 74 65 |isplay i|s update|
|00000620| 64 20 6f 6e 63 65 20 65 | 76 65 72 79 20 6d 69 6e |d once e|very min|
|00000630| 75 74 65 20 28 6c 6f 77 | 20 53 42 42 20 6f 76 65 |ute (low| SBB ove|
|00000640| 72 68 65 61 64 29 20 62 | 79 0a 58 64 65 66 61 75 |rhead) b|y.Xdefau|
|00000650| 6c 74 2e 20 20 49 66 20 | 72 65 66 72 65 73 68 5f |lt. If |refresh_|
|00000660| 72 61 74 65 20 69 73 20 | 73 70 65 63 69 66 69 65 |rate is |specifie|
|00000670| 64 2c 20 74 68 65 6e 20 | 74 68 65 20 64 69 73 70 |d, then |the disp|
|00000680| 6c 61 79 20 69 73 20 75 | 70 64 61 74 65 64 0a 58 |lay is u|pdated.X|
|00000690| 65 76 65 72 79 20 72 65 | 66 72 65 73 68 5f 72 61 |every re|fresh_ra|
|000006a0| 74 65 20 73 65 63 6f 6e | 64 73 2e 20 20 43 6c 6f |te secon|ds. Clo|
|000006b0| 63 6b 20 77 69 6c 6c 20 | 61 75 74 6f 6d 61 74 69 |ck will |automati|
|000006c0| 63 61 6c 6c 79 20 73 79 | 6e 63 68 72 6f 6e 69 7a |cally sy|nchroniz|
|000006d0| 65 0a 58 69 74 73 65 6c | 66 20 74 6f 20 65 76 65 |e.Xitsel|f to eve|
|000006e0| 6e 20 6d 69 6e 75 74 65 | 2c 20 6f 72 20 66 72 61 |n minute|, or fra|
|000006f0| 63 74 69 6f 6e 20 6f 66 | 20 6d 69 6e 75 74 65 20 |ction of| minute |
|00000700| 62 6f 75 6e 64 61 72 69 | 65 73 2e 20 20 54 68 65 |boundari|es. The|
|00000710| 20 66 69 72 73 74 0a 58 | 72 65 66 72 65 73 68 20 | first.X|refresh |
|00000720| 61 66 74 65 72 20 74 68 | 65 20 69 6e 69 74 69 61 |after th|e initia|
|00000730| 6c 20 64 69 73 70 6c 61 | 79 20 77 69 6c 6c 20 74 |l displa|y will t|
|00000740| 68 65 72 65 66 6f 72 65 | 20 70 72 6f 62 61 62 6c |herefore| probabl|
|00000750| 79 20 62 65 20 6c 65 73 | 73 20 74 68 61 6e 0a 58 |y be les|s than.X|
|00000760| 74 68 65 20 64 65 66 61 | 75 6c 74 20 6f 72 20 73 |the defa|ult or s|
|00000770| 70 65 63 69 66 69 65 64 | 20 72 65 66 72 65 73 68 |pecified| refresh|
|00000780| 20 72 61 74 65 2e 20 20 | 41 66 74 65 72 20 74 68 | rate. |After th|
|00000790| 61 74 20 68 6f 77 65 76 | 65 72 2c 20 74 68 65 20 |at howev|er, the |
|000007a0| 75 70 64 61 74 65 73 0a | 58 77 69 6c 6c 20 62 65 |updates.|Xwill be|
|000007b0| 20 76 65 72 79 20 72 65 | 67 75 6c 61 72 2e 0a 58 | very re|gular..X|
|000007c0| 0a 58 49 66 20 63 6c 6f | 63 6b 20 69 73 20 72 75 |.XIf clo|ck is ru|
|000007d0| 6e 20 75 6e 64 65 72 20 | 47 4e 55 20 45 6d 61 63 |n under |GNU Emac|
|000007e0| 73 20 74 65 72 6d 69 6e | 61 6c 2d 65 6d 75 6c 61 |s termin|al-emula|
|000007f0| 74 6f 72 20 66 75 6e 63 | 74 69 6f 6e 2c 20 69 74 |tor func|tion, it|
|00000800| 20 77 69 6c 6c 0a 58 61 | 75 74 6f 6d 61 74 69 63 | will.Xa|utomatic|
|00000810| 61 6c 6c 79 20 75 73 65 | 20 73 6c 69 67 68 74 6c |ally use| slightl|
|00000820| 79 20 66 65 77 65 72 20 | 6c 69 6e 65 73 20 69 6e |y fewer |lines in|
|00000830| 20 6f 72 64 65 72 20 74 | 6f 20 66 69 74 20 74 68 | order t|o fit th|
|00000840| 65 20 64 69 73 70 6c 61 | 79 0a 58 77 69 6e 64 6f |e displa|y.Xwindo|
|00000850| 77 20 6f 6e 20 61 20 6e | 6f 72 6d 61 6c 20 32 34 |w on a n|ormal 24|
|00000860| 20 6c 69 6e 65 20 74 65 | 72 6d 69 6e 61 6c 2e 0a | line te|rminal..|
|00000870| 58 0a 58 54 68 65 20 69 | 6e 74 65 72 72 75 70 74 |X.XThe i|nterrupt|
|00000880| 20 63 68 61 72 61 63 74 | 65 72 20 65 6e 64 73 20 | charact|er ends |
|00000890| 74 68 65 20 70 72 6f 67 | 72 61 6d 20 61 6e 64 20 |the prog|ram and |
|000008a0| 63 6c 65 61 72 73 20 74 | 68 65 20 73 63 72 65 65 |clears t|he scree|
|000008b0| 6e 2e 0a 58 0a 58 0a 58 | 20 20 20 20 20 43 6f 70 |n..X.X.X| Cop|
|000008c0| 79 72 69 67 68 74 20 28 | 63 29 20 31 39 38 38 20 |yright (|c) 1988 |
|000008d0| 62 79 20 47 65 6f 72 67 | 65 20 4d 2e 20 53 69 70 |by Georg|e M. Sip|
|000008e0| 65 2e 20 20 41 6c 6c 20 | 72 69 67 68 74 73 20 72 |e. All |rights r|
|000008f0| 65 73 65 72 76 65 64 2e | 0a 58 0a 58 54 68 69 73 |eserved.|.X.XThis|
|00000900| 20 73 6f 66 74 77 61 72 | 65 20 6d 61 79 20 6f 6e | softwar|e may on|
|00000910| 6c 79 20 62 65 20 72 65 | 64 69 73 74 72 69 62 75 |ly be re|distribu|
|00000920| 74 65 64 20 77 69 74 68 | 6f 75 74 20 66 65 65 20 |ted with|out fee |
|00000930| 61 6e 64 20 77 69 74 68 | 6f 75 74 20 61 6e 79 0a |and with|out any.|
|00000940| 58 6f 74 68 65 72 20 66 | 6f 72 6d 20 6f 66 20 6d |Xother f|orm of m|
|00000950| 6f 6e 65 74 61 72 79 20 | 67 61 69 6e 20 28 69 6e |onetary |gain (in|
|00000960| 63 6c 75 64 69 6e 67 20 | 73 6f 6c 64 2c 20 72 65 |cluding |sold, re|
|00000970| 6e 74 65 64 2c 20 6c 65 | 61 73 65 64 2c 20 6f 72 |nted, le|ased, or|
|00000980| 0a 58 74 72 61 64 65 64 | 29 2c 20 75 6e 6c 65 73 |.Xtraded|), unles|
|00000990| 73 20 74 68 65 20 65 78 | 70 72 65 73 73 20 77 72 |s the ex|press wr|
|000009a0| 69 74 74 65 6e 20 70 65 | 72 6d 69 73 73 69 6f 6e |itten pe|rmission|
|000009b0| 20 6f 66 20 74 68 65 20 | 63 6f 70 79 72 69 67 68 | of the |copyrigh|
|000009c0| 74 20 68 6f 6c 64 65 72 | 0a 58 69 73 20 6f 62 74 |t holder|.Xis obt|
|000009d0| 61 69 6e 65 64 20 69 6e | 20 61 64 76 61 6e 63 65 |ained in| advance|
|000009e0| 2e 0a 58 0a 58 54 68 69 | 73 20 63 6f 70 79 72 69 |..X.XThi|s copyri|
|000009f0| 67 68 74 20 6e 6f 74 69 | 63 65 20 6d 75 73 74 20 |ght noti|ce must |
|00000a00| 62 65 20 72 65 70 72 6f | 64 75 63 65 64 20 69 6e |be repro|duced in|
|00000a10| 20 69 74 73 20 65 6e 74 | 69 72 65 74 79 20 6f 6e | its ent|irety on|
|00000a20| 20 61 6c 6c 20 63 6f 70 | 69 65 73 0a 58 6f 66 20 | all cop|ies.Xof |
|00000a30| 74 68 69 73 20 73 6f 66 | 74 77 61 72 65 2e 20 20 |this sof|tware. |
|00000a40| 46 75 72 74 68 65 72 2c | 20 61 63 6b 6e 6f 77 6c |Further,| acknowl|
|00000a50| 65 64 67 6d 65 6e 74 20 | 6f 66 20 74 68 65 20 61 |edgment |of the a|
|00000a60| 75 74 68 6f 72 73 68 69 | 70 20 6f 66 20 74 68 69 |uthorshi|p of thi|
|00000a70| 73 0a 58 73 6f 66 74 77 | 61 72 65 20 6d 75 73 74 |s.Xsoftw|are must|
|00000a80| 20 6e 6f 74 20 62 65 20 | 72 65 6d 6f 76 65 64 20 | not be |removed |
|00000a90| 66 72 6f 6d 20 69 74 73 | 20 63 75 72 72 65 6e 74 |from its| current|
|00000aa0| 20 6f 72 20 64 65 72 69 | 76 65 64 0a 58 64 6f 63 | or deri|ved.Xdoc|
|00000ab0| 75 6d 65 6e 74 61 74 69 | 6f 6e 2e 0a 58 0a 58 4e |umentati|on..X.XN|
|00000ac0| 6f 20 65 78 70 72 65 73 | 73 65 64 20 6f 72 20 69 |o expres|sed or i|
|00000ad0| 6d 70 6c 69 65 64 20 77 | 61 72 72 61 6e 74 79 20 |mplied w|arranty |
|00000ae0| 69 73 20 6d 61 64 65 20 | 66 6f 72 20 74 68 69 73 |is made |for this|
|00000af0| 20 73 6f 66 74 77 61 72 | 65 2e 20 20 4e 6f 20 70 | softwar|e. No p|
|00000b00| 61 72 74 79 0a 58 63 6f | 6e 6e 65 63 74 65 64 20 |arty.Xco|nnected |
|00000b10| 77 69 74 68 20 74 68 69 | 73 20 73 6f 66 74 77 61 |with thi|s softwa|
|00000b20| 72 65 20 61 73 73 75 6d | 65 73 20 61 6e 79 20 6c |re assum|es any l|
|00000b30| 69 61 62 69 6c 69 74 79 | 20 6f 72 20 72 65 73 70 |iability| or resp|
|00000b40| 6f 6e 73 69 62 69 6c 69 | 74 79 0a 58 66 6f 72 20 |onsibili|ty.Xfor |
|00000b50| 69 74 73 20 75 73 65 2c | 20 74 68 65 20 63 6f 72 |its use,| the cor|
|00000b60| 72 65 63 74 6e 65 73 73 | 20 6f 66 20 69 74 73 20 |rectness| of its |
|00000b70| 6f 70 65 72 61 74 69 6f | 6e 2c 20 6f 72 20 69 74 |operatio|n, or it|
|00000b80| 73 20 66 69 74 6e 65 73 | 73 20 66 6f 72 20 61 6e |s fitnes|s for an|
|00000b90| 79 0a 58 70 75 72 70 6f | 73 65 2e 0a 58 0a 58 41 |y.Xpurpo|se..X.XA|
|00000ba0| 6e 79 20 64 69 73 74 72 | 69 62 75 74 6f 72 20 6f |ny distr|ibutor o|
|00000bb0| 66 20 63 6f 70 69 65 73 | 20 6f 66 20 74 68 69 73 |f copies| of this|
|00000bc0| 20 73 6f 66 74 77 61 72 | 65 20 73 68 61 6c 6c 20 | softwar|e shall |
|00000bd0| 67 72 61 6e 74 20 74 68 | 65 20 72 65 63 69 70 69 |grant th|e recipi|
|00000be0| 65 6e 74 0a 58 70 65 72 | 6d 69 73 73 69 6f 6e 20 |ent.Xper|mission |
|00000bf0| 66 6f 72 20 66 75 72 74 | 68 65 72 20 72 65 64 69 |for furt|her redi|
|00000c00| 73 74 72 69 62 75 74 69 | 6f 6e 20 61 73 20 70 65 |stributi|on as pe|
|00000c10| 72 6d 69 74 74 65 64 20 | 62 79 20 74 68 69 73 20 |rmitted |by this |
|00000c20| 6e 6f 74 69 63 65 2e 0a | 58 0a 58 50 65 72 6d 69 |notice..|X.XPermi|
|00000c30| 73 73 69 6f 6e 20 69 73 | 20 68 65 72 65 62 79 20 |ssion is| hereby |
|00000c40| 67 72 61 6e 74 65 64 20 | 74 6f 20 63 6f 70 79 2c |granted |to copy,|
|00000c50| 20 72 65 70 72 6f 64 75 | 63 65 2c 20 72 65 64 69 | reprodu|ce, redi|
|00000c60| 73 74 72 69 62 75 74 65 | 20 61 6e 64 0a 58 6f 74 |stribute| and.Xot|
|00000c70| 68 65 72 77 69 73 65 20 | 75 73 65 20 74 68 69 73 |herwise |use this|
|00000c80| 20 73 6f 66 74 77 61 72 | 65 20 61 73 20 6c 6f 6e | softwar|e as lon|
|00000c90| 67 20 61 73 20 74 68 65 | 20 63 6f 6e 64 69 74 69 |g as the| conditi|
|00000ca0| 6f 6e 73 20 61 62 6f 76 | 65 20 61 72 65 0a 58 73 |ons abov|e are.Xs|
|00000cb0| 74 72 69 63 74 6c 79 20 | 61 64 68 65 72 65 64 20 |trictly |adhered |
|00000cc0| 74 6f 2e 0a 58 0a 58 4e | 4f 54 45 3a 20 20 20 54 |to..X.XN|OTE: T|
|00000cd0| 68 69 73 20 73 6f 66 74 | 77 61 72 65 20 77 61 73 |his soft|ware was|
|00000ce0| 20 6f 72 69 67 69 6e 61 | 6c 6c 79 20 77 72 69 74 | origina|lly writ|
|00000cf0| 74 65 6e 20 62 79 20 4a | 69 6d 20 45 61 72 65 6e |ten by J|im Earen|
|00000d00| 6c 75 69 6e 64 69 6c 0a | 58 09 54 72 65 74 68 65 |luindil.|X.Trethe|
|00000d10| 77 65 79 20 61 6e 64 20 | 6d 6f 64 69 66 69 65 64 |wey and |modified|
|00000d20| 20 62 79 20 47 65 6f 72 | 67 65 20 4d 2e 20 53 69 | by Geor|ge M. Si|
|00000d30| 70 65 20 28 72 65 62 65 | 6c 21 67 65 6f 72 67 65 |pe (rebe|l!george|
|00000d40| 29 20 74 6f 20 74 68 65 | 0a 58 09 70 6f 69 6e 74 |) to the|.X.point|
|00000d50| 20 77 68 65 72 65 20 4a | 69 6d 20 77 6f 75 6c 64 | where J|im would|
|00000d60| 20 6e 6f 20 6c 6f 6e 67 | 65 72 20 72 65 63 6f 67 | no long|er recog|
|00000d70| 6e 69 7a 65 20 69 74 2e | 20 20 4e 6f 20 63 6f 70 |nize it.| No cop|
|00000d80| 79 72 69 67 68 74 0a 58 | 09 6e 6f 74 69 63 65 73 |yright.X|.notices|
|00000d90| 20 77 65 72 65 20 65 6d | 62 6f 64 69 65 64 20 69 | were em|bodied i|
|00000da0| 6e 20 74 68 65 20 6f 72 | 69 67 69 6e 61 6c 20 6e |n the or|iginal n|
|00000db0| 65 74 20 64 69 73 74 72 | 69 62 75 74 69 6f 6e 2e |et distr|ibution.|
|00000dc0| 0a 53 48 41 52 5f 45 4f | 46 0a 66 69 0a 69 66 20 |.SHAR_EO|F.fi.if |
|00000dd0| 74 65 73 74 20 2d 66 20 | 27 4d 61 6b 65 66 69 6c |test -f |'Makefil|
|00000de0| 65 27 0a 74 68 65 6e 0a | 09 65 63 68 6f 20 73 68 |e'.then.|.echo sh|
|00000df0| 61 72 3a 20 22 77 69 6c | 6c 20 6e 6f 74 20 6f 76 |ar: "wil|l not ov|
|00000e00| 65 72 2d 77 72 69 74 65 | 20 65 78 69 73 74 69 6e |er-write| existin|
|00000e10| 67 20 66 69 6c 65 20 27 | 4d 61 6b 65 66 69 6c 65 |g file '|Makefile|
|00000e20| 27 22 0a 65 6c 73 65 0a | 73 65 64 20 27 73 2f 5e |'".else.|sed 's/^|
|00000e30| 58 2f 2f 27 20 3c 3c 20 | 5c 53 48 41 52 5f 45 4f |X//' << |\SHAR_EO|
|00000e40| 46 20 3e 20 27 4d 61 6b | 65 66 69 6c 65 27 0a 58 |F > 'Mak|efile'.X|
|00000e50| 23 20 4d 61 6b 65 66 69 | 6c 65 20 66 6f 72 3a 20 |# Makefi|le for: |
|00000e60| 20 63 6c 6f 63 6b 20 2d | 20 64 69 67 69 74 61 6c | clock -| digital|
|00000e70| 20 63 6c 6f 63 6b 20 64 | 69 73 70 6c 61 79 0a 58 | clock d|isplay.X|
|00000e80| 0a 58 44 45 46 49 4e 45 | 53 09 09 3d 20 2d 44 42 |.XDEFINE|S..= -DB|
|00000e90| 53 44 0a 58 43 46 4c 41 | 47 53 09 09 3d 20 2d 4f |SD.XCFLA|GS..= -O|
|00000ea0| 20 24 28 44 45 46 49 4e | 45 53 29 0a 58 4c 49 42 | $(DEFIN|ES).XLIB|
|00000eb0| 53 09 09 3d 20 2d 6c 63 | 75 72 73 65 73 20 2d 6c |S..= -lc|urses -l|
|00000ec0| 74 65 72 6d 63 61 70 0a | 58 52 4f 46 46 09 09 3d |termcap.|XROFF..=|
|00000ed0| 20 6e 72 6f 66 66 0a 58 | 52 46 4c 41 47 53 09 09 | nroff.X|RFLAGS..|
|00000ee0| 3d 20 2d 6d 61 6e 0a 58 | 4c 44 46 4c 41 47 53 09 |= -man.X|LDFLAGS.|
|00000ef0| 09 3d 20 2d 73 0a 58 44 | 45 53 54 42 49 4e 09 09 |.= -s.XD|ESTBIN..|
|00000f00| 3d 20 24 7b 48 4f 4d 45 | 7d 0a 58 44 45 53 54 4d |= ${HOME|}.XDESTM|
|00000f10| 41 4e 09 09 3d 20 24 7b | 48 4f 4d 45 7d 0a 58 44 |AN..= ${|HOME}.XD|
|00000f20| 45 53 54 43 41 54 09 09 | 3d 20 24 7b 48 4f 4d 45 |ESTCAT..|= ${HOME|
|00000f30| 7d 0a 58 44 45 53 54 4f | 57 4e 09 09 3d 20 72 6f |}.XDESTO|WN..= ro|
|00000f40| 6f 74 0a 58 44 45 53 54 | 47 52 50 09 09 3d 20 73 |ot.XDEST|GRP..= s|
|00000f50| 74 61 66 66 0a 58 53 48 | 45 4c 4c 09 09 3d 20 2f |taff.XSH|ELL..= /|
|00000f60| 62 69 6e 2f 73 68 0a 58 | 4d 41 4b 45 46 49 4c 45 |bin/sh.X|MAKEFILE|
|00000f70| 09 3d 20 4d 61 6b 65 66 | 69 6c 65 0a 58 50 52 4f |.= Makef|ile.XPRO|
|00000f80| 47 52 41 4d 09 09 3d 20 | 63 6c 6f 63 6b 0a 58 4d |GRAM..= |clock.XM|
|00000f90| 41 4e 50 41 47 45 53 09 | 3d 20 63 6c 6f 63 6b 2e |ANPAGES.|= clock.|
|00000fa0| 6d 61 6e 0a 58 43 41 54 | 50 41 47 45 53 09 3d 20 |man.XCAT|PAGES.= |
|00000fb0| 63 6c 6f 63 6b 2e 63 61 | 74 0a 58 53 52 43 53 09 |clock.ca|t.XSRCS.|
|00000fc0| 09 3d 20 63 6c 6f 63 6b | 2e 63 20 64 69 67 69 74 |.= clock|.c digit|
|00000fd0| 73 2e 63 0a 58 4f 42 4a | 53 09 09 3d 20 63 6c 6f |s.c.XOBJ|S..= clo|
|00000fe0| 63 6b 2e 6f 20 64 69 67 | 69 74 73 2e 6f 0a 58 0a |ck.o dig|its.o.X.|
|00000ff0| 58 2e 6d 61 6e 2e 63 61 | 74 3a 0a 58 09 09 24 28 |X.man.ca|t:.X..$(|
|00001000| 52 4f 46 46 29 20 24 28 | 52 46 4c 41 47 53 29 20 |ROFF) $(|RFLAGS) |
|00001010| 24 3c 20 3e 20 24 40 0a | 58 0a 58 2e 53 55 46 46 |$< > $@.|X.X.SUFF|
|00001020| 49 58 45 53 3a 09 2e 6d | 61 6e 20 2e 63 61 74 0a |IXES:..m|an .cat.|
|00001030| 58 0a 58 23 20 43 6f 6d | 70 69 6c 65 20 61 6e 64 |X.X# Com|pile and|
|00001040| 20 6c 6f 61 64 20 74 68 | 65 20 70 72 6f 67 72 61 | load th|e progra|
|00001050| 6d 20 61 6e 64 20 66 6f | 72 6d 61 74 20 69 74 73 |m and fo|rmat its|
|00001060| 20 6d 61 6e 75 61 6c 20 | 70 61 67 65 73 2e 0a 58 | manual |pages..X|
|00001070| 61 6c 6c 3a 09 09 24 28 | 50 52 4f 47 52 41 4d 29 |all:..$(|PROGRAM)|
|00001080| 20 24 28 43 41 54 50 41 | 47 45 53 29 0a 58 0a 58 | $(CATPA|GES).X.X|
|00001090| 24 28 50 52 4f 47 52 41 | 4d 29 3a 09 24 28 4f 42 |$(PROGRA|M):.$(OB|
|000010a0| 4a 53 29 0a 58 09 09 24 | 28 43 43 29 20 24 28 4c |JS).X..$|(CC) $(L|
|000010b0| 44 46 4c 41 47 53 29 20 | 24 28 4f 42 4a 53 29 20 |DFLAGS) |$(OBJS) |
|000010c0| 24 28 4c 49 42 53 29 20 | 2d 6f 20 24 28 50 52 4f |$(LIBS) |-o $(PRO|
|000010d0| 47 52 41 4d 29 0a 58 0a | 58 23 20 52 75 6e 20 6c |GRAM).X.|X# Run l|
|000010e0| 69 6e 74 20 6f 6e 20 73 | 6f 75 72 63 65 20 66 69 |int on s|ource fi|
|000010f0| 6c 65 73 2c 20 70 75 74 | 20 72 65 73 75 6c 74 73 |les, put| results|
|00001100| 20 6f 6e 20 73 74 61 6e | 64 61 72 64 20 6f 75 74 | on stan|dard out|
|00001110| 70 75 74 2e 0a 58 6c 69 | 6e 74 3a 0a 58 09 09 6c |put..Xli|nt:.X..l|
|00001120| 69 6e 74 20 2d 75 20 24 | 28 44 45 46 49 4e 45 53 |int -u $|(DEFINES|
|00001130| 29 20 24 28 53 52 43 53 | 29 0a 58 0a 58 23 20 43 |) $(SRCS|).X.X# C|
|00001140| 72 65 61 74 65 20 61 20 | 74 61 67 73 20 66 69 6c |reate a |tags fil|
|00001150| 65 20 66 6f 72 20 75 73 | 65 20 62 79 20 61 20 73 |e for us|e by a s|
|00001160| 6f 75 72 63 65 20 63 6f | 64 65 20 65 64 69 74 6f |ource co|de edito|
|00001170| 72 2e 0a 58 74 61 67 73 | 3a 09 09 24 28 53 52 43 |r..Xtags|:..$(SRC|
|00001180| 53 29 0a 58 09 09 63 74 | 61 67 73 20 24 28 53 52 |S).X..ct|ags $(SR|
|00001190| 43 53 29 0a 58 0a 58 23 | 20 45 64 69 74 20 74 68 |CS).X.X#| Edit th|
|000011a0| 65 20 6d 61 6b 65 66 69 | 6c 65 20 61 6e 64 20 72 |e makefi|le and r|
|000011b0| 65 67 65 6e 65 72 61 74 | 65 20 74 68 65 20 64 65 |egenerat|e the de|
|000011c0| 70 65 6e 64 65 6e 63 79 | 20 69 6e 66 6f 72 6d 61 |pendency| informa|
|000011d0| 74 69 6f 6e 2e 0a 58 64 | 65 70 65 6e 64 3a 0a 58 |tion..Xd|epend:.X|
|000011e0| 09 09 6d 6b 6d 66 20 2d | 66 20 24 28 4d 41 4b 45 |..mkmf -|f $(MAKE|
|000011f0| 46 49 4c 45 29 20 50 52 | 4f 47 52 41 4d 3d 24 28 |FILE) PR|OGRAM=$(|
|00001200| 50 52 4f 47 52 41 4d 29 | 20 44 45 53 54 42 49 4e |PROGRAM)| DESTBIN|
|00001210| 3d 24 28 44 45 53 54 42 | 49 4e 29 0a 58 0a 58 23 |=$(DESTB|IN).X.X#|
|00001220| 20 50 72 69 6e 74 20 61 | 6e 20 69 6e 64 65 78 20 | Print a|n index |
|00001230| 6f 66 20 66 75 6e 63 74 | 69 6f 6e 73 20 6f 6e 20 |of funct|ions on |
|00001240| 73 74 61 6e 64 61 72 64 | 20 6f 75 74 70 75 74 2e |standard| output.|
|00001250| 0a 58 69 6e 64 65 78 3a | 0a 58 09 09 63 74 61 67 |.Xindex:|.X..ctag|
|00001260| 73 20 2d 77 78 20 24 28 | 53 52 43 53 29 0a 58 0a |s -wx $(|SRCS).X.|
|00001270| 58 23 20 50 72 69 6e 74 | 20 73 6f 75 72 63 65 20 |X# Print| source |
|00001280| 63 6f 64 65 20 66 69 6c | 65 73 20 6f 6e 20 73 74 |code fil|es on st|
|00001290| 61 6e 64 61 72 64 20 6f | 75 74 70 75 74 2e 0a 58 |andard o|utput..X|
|000012a0| 70 72 69 6e 74 3a 0a 58 | 09 09 6c 70 72 20 2d 70 |print:.X|..lpr -p|
|000012b0| 20 24 28 53 52 43 53 29 | 20 24 28 4d 41 4e 50 41 | $(SRCS)| $(MANPA|
|000012c0| 47 45 53 29 0a 58 0a 58 | 23 20 43 6f 6d 70 69 6c |GES).X.X|# Compil|
|000012d0| 65 20 61 6e 64 20 6c 6f | 61 64 20 74 68 65 20 70 |e and lo|ad the p|
|000012e0| 72 6f 67 72 61 6d 2c 20 | 66 6f 72 6d 61 74 20 6d |rogram, |format m|
|000012f0| 61 6e 75 61 6c 20 70 61 | 67 65 73 2c 20 61 6e 64 |anual pa|ges, and|
|00001300| 20 6d 6f 76 65 20 74 68 | 65 6d 0a 58 23 20 74 6f | move th|em.X# to|
|00001310| 20 74 68 65 69 72 20 64 | 65 73 74 69 6e 61 74 69 | their d|estinati|
|00001320| 6f 6e 20 64 69 72 65 63 | 74 6f 72 69 65 73 2e 0a |on direc|tories..|
|00001330| 58 69 6e 73 74 61 6c 6c | 3a 09 24 28 50 52 4f 47 |Xinstall|:.$(PROG|
|00001340| 52 41 4d 29 20 24 28 43 | 41 54 50 41 47 45 53 29 |RAM) $(C|ATPAGES)|
|00001350| 0a 58 09 09 63 70 20 24 | 28 50 52 4f 47 52 41 4d |.X..cp $|(PROGRAM|
|00001360| 29 20 24 28 44 45 53 54 | 42 49 4e 29 0a 58 09 09 |) $(DEST|BIN).X..|
|00001370| 63 68 6d 6f 64 20 37 35 | 35 20 24 28 44 45 53 54 |chmod 75|5 $(DEST|
|00001380| 42 49 4e 29 2f 24 28 50 | 52 4f 47 52 41 4d 29 0a |BIN)/$(P|ROGRAM).|
|00001390| 58 09 09 63 68 6f 77 6e | 20 24 28 44 45 53 54 4f |X..chown| $(DESTO|
|000013a0| 57 4e 29 20 24 28 44 45 | 53 54 42 49 4e 29 2f 24 |WN) $(DE|STBIN)/$|
|000013b0| 28 50 52 4f 47 52 41 4d | 29 0a 58 09 09 63 68 67 |(PROGRAM|).X..chg|
|000013c0| 72 70 20 24 28 44 45 53 | 54 47 52 50 29 20 24 28 |rp $(DES|TGRP) $(|
|000013d0| 44 45 53 54 42 49 4e 29 | 2f 24 28 50 52 4f 47 52 |DESTBIN)|/$(PROGR|
|000013e0| 41 4d 29 0a 58 09 09 2d | 66 6f 72 20 6d 61 6e 70 |AM).X..-|for manp|
|000013f0| 61 67 65 20 69 6e 20 24 | 28 4d 41 4e 50 41 47 45 |age in $|(MANPAGE|
|00001400| 53 29 3b 20 64 6f 20 5c | 0a 58 09 09 09 62 61 73 |S); do \|.X...bas|
|00001410| 65 70 61 67 65 3d 60 62 | 61 73 65 6e 61 6d 65 20 |epage=`b|asename |
|00001420| 24 24 6d 61 6e 70 61 67 | 65 20 2e 6d 61 6e 60 3b |$$manpag|e .man`;|
|00001430| 20 5c 0a 58 09 09 09 63 | 70 20 24 24 62 61 73 65 | \.X...c|p $$base|
|00001440| 70 61 67 65 2e 6d 61 6e | 20 24 28 44 45 53 54 4d |page.man| $(DESTM|
|00001450| 41 4e 29 2f 24 24 62 61 | 73 65 70 61 67 65 2e 6c |AN)/$$ba|sepage.l|
|00001460| 3b 20 5c 0a 58 09 09 09 | 63 68 6d 6f 64 20 36 34 |; \.X...|chmod 64|
|00001470| 34 20 24 28 44 45 53 54 | 4d 41 4e 29 2f 24 24 62 |4 $(DEST|MAN)/$$b|
|00001480| 61 73 65 70 61 67 65 2e | 6c 3b 20 5c 0a 58 09 09 |asepage.|l; \.X..|
|00001490| 09 63 68 6f 77 6e 20 24 | 28 44 45 53 54 4f 57 4e |.chown $|(DESTOWN|
|000014a0| 29 20 24 28 44 45 53 54 | 4d 41 4e 29 2f 24 24 62 |) $(DEST|MAN)/$$b|
|000014b0| 61 73 65 70 61 67 65 2e | 6c 3b 20 5c 0a 58 09 09 |asepage.|l; \.X..|
|000014c0| 09 63 68 67 72 70 20 24 | 28 44 45 53 54 47 52 50 |.chgrp $|(DESTGRP|
|000014d0| 29 20 24 28 44 45 53 54 | 4d 41 4e 29 2f 24 24 62 |) $(DEST|MAN)/$$b|
|000014e0| 61 73 65 70 61 67 65 2e | 6c 3b 20 5c 0a 58 09 09 |asepage.|l; \.X..|
|000014f0| 09 63 70 20 24 24 62 61 | 73 65 70 61 67 65 2e 63 |.cp $$ba|sepage.c|
|00001500| 61 74 20 24 28 44 45 53 | 54 43 41 54 29 2f 24 24 |at $(DES|TCAT)/$$|
|00001510| 62 61 73 65 70 61 67 65 | 2e 6c 3b 20 5c 0a 58 09 |basepage|.l; \.X.|
|00001520| 09 09 63 68 6d 6f 64 20 | 36 34 34 20 24 28 44 45 |..chmod |644 $(DE|
|00001530| 53 54 43 41 54 29 2f 24 | 24 62 61 73 65 70 61 67 |STCAT)/$|$basepag|
|00001540| 65 2e 6c 3b 20 5c 0a 58 | 09 09 09 63 68 6f 77 6e |e.l; \.X|...chown|
|00001550| 20 24 28 44 45 53 54 4f | 57 4e 29 20 24 28 44 45 | $(DESTO|WN) $(DE|
|00001560| 53 54 43 41 54 29 2f 24 | 24 62 61 73 65 70 61 67 |STCAT)/$|$basepag|
|00001570| 65 2e 6c 3b 20 5c 0a 58 | 09 09 09 63 68 67 72 70 |e.l; \.X|...chgrp|
|00001580| 20 24 28 44 45 53 54 47 | 52 50 29 20 24 28 44 45 | $(DESTG|RP) $(DE|
|00001590| 53 54 43 41 54 29 2f 24 | 24 62 61 73 65 70 61 67 |STCAT)/$|$basepag|
|000015a0| 65 2e 6c 3b 20 5c 0a 58 | 09 09 64 6f 6e 65 0a 58 |e.l; \.X|..done.X|
|000015b0| 0a 58 23 20 52 65 6d 6f | 76 65 20 74 68 65 20 70 |.X# Remo|ve the p|
|000015c0| 72 6f 67 72 61 6d 20 61 | 6e 64 20 69 74 73 20 66 |rogram a|nd its f|
|000015d0| 6f 72 6d 61 74 74 65 64 | 20 6d 61 6e 75 61 6c 20 |ormatted| manual |
|000015e0| 70 61 67 65 73 20 66 72 | 6f 6d 20 74 68 65 69 72 |pages fr|om their|
|000015f0| 0a 58 23 20 64 65 73 74 | 69 6e 61 74 69 6f 6e 20 |.X# dest|ination |
|00001600| 64 69 72 65 63 74 6f 72 | 69 65 73 2e 0a 58 75 6e |director|ies..Xun|
|00001610| 69 6e 73 74 61 6c 6c 3a | 0a 58 09 09 72 6d 20 2d |install:|.X..rm -|
|00001620| 66 20 24 28 44 45 53 54 | 42 49 4e 29 2f 24 28 50 |f $(DEST|BIN)/$(P|
|00001630| 52 4f 47 52 41 4d 29 0a | 58 09 09 2d 66 6f 72 20 |ROGRAM).|X..-for |
|00001640| 6d 61 6e 70 61 67 65 20 | 69 6e 20 24 28 4d 41 4e |manpage |in $(MAN|
|00001650| 50 41 47 45 53 29 3b 20 | 64 6f 20 5c 0a 58 09 09 |PAGES); |do \.X..|
|00001660| 09 62 61 73 65 70 61 67 | 65 3d 60 62 61 73 65 6e |.basepag|e=`basen|
|00001670| 61 6d 65 20 24 24 6d 61 | 6e 70 61 67 65 20 2e 6d |ame $$ma|npage .m|
|00001680| 61 6e 60 3b 20 5c 0a 58 | 09 09 09 72 6d 20 2d 66 |an`; \.X|...rm -f|
|00001690| 20 24 28 44 45 53 54 4d | 41 4e 29 2f 24 24 62 61 | $(DESTM|AN)/$$ba|
|000016a0| 73 65 70 61 67 65 2e 6c | 3b 20 5c 0a 58 09 09 09 |sepage.l|; \.X...|
|000016b0| 72 6d 20 2d 66 20 24 28 | 44 45 53 54 43 41 54 29 |rm -f $(|DESTCAT)|
|000016c0| 2f 24 24 62 61 73 65 70 | 61 67 65 2e 6c 3b 20 5c |/$$basep|age.l; \|
|000016d0| 0a 58 09 09 64 6f 6e 65 | 0a 58 0a 58 23 20 52 65 |.X..done|.X.X# Re|
|000016e0| 6d 6f 76 65 20 61 6c 6c | 20 74 61 72 67 65 74 20 |move all| target |
|000016f0| 61 6e 64 20 69 6e 74 65 | 72 6d 65 64 69 61 74 65 |and inte|rmediate|
|00001700| 20 66 69 6c 65 73 2e 0a | 58 63 6c 65 61 6e 3a 0a | files..|Xclean:.|
|00001710| 58 09 09 2d 72 6d 20 2d | 66 20 24 28 50 52 4f 47 |X..-rm -|f $(PROG|
|00001720| 52 41 4d 29 20 24 28 43 | 41 54 50 41 47 45 53 29 |RAM) $(C|ATPAGES)|
|00001730| 20 24 28 4f 42 4a 53 29 | 0a 58 09 09 2d 72 6d 20 | $(OBJS)|.X..-rm |
|00001740| 2d 66 20 63 6f 72 65 20 | 61 2e 6f 75 74 20 6d 61 |-f core |a.out ma|
|00001750| 64 65 20 2a 2e 6f 0a 53 | 48 41 52 5f 45 4f 46 0a |de *.o.S|HAR_EOF.|
|00001760| 66 69 0a 69 66 20 74 65 | 73 74 20 2d 66 20 27 63 |fi.if te|st -f 'c|
|00001770| 6c 6f 63 6b 2e 6d 61 6e | 27 0a 74 68 65 6e 0a 09 |lock.man|'.then..|
|00001780| 65 63 68 6f 20 73 68 61 | 72 3a 20 22 77 69 6c 6c |echo sha|r: "will|
|00001790| 20 6e 6f 74 20 6f 76 65 | 72 2d 77 72 69 74 65 20 | not ove|r-write |
|000017a0| 65 78 69 73 74 69 6e 67 | 20 66 69 6c 65 20 27 63 |existing| file 'c|
|000017b0| 6c 6f 63 6b 2e 6d 61 6e | 27 22 0a 65 6c 73 65 0a |lock.man|'".else.|
|000017c0| 73 65 64 20 27 73 2f 5e | 58 2f 2f 27 20 3c 3c 20 |sed 's/^|X//' << |
|000017d0| 5c 53 48 41 52 5f 45 4f | 46 20 3e 20 27 63 6c 6f |\SHAR_EO|F > 'clo|
|000017e0| 63 6b 2e 6d 61 6e 27 0a | 58 2e 54 48 20 43 4c 4f |ck.man'.|X.TH CLO|
|000017f0| 43 4b 20 6c 20 22 32 31 | 20 4a 75 6c 79 20 31 39 |CK l "21| July 19|
|00001800| 38 38 22 0a 58 2e 53 48 | 20 4e 41 4d 45 0a 58 63 |88".X.SH| NAME.Xc|
|00001810| 6c 6f 63 6b 20 5c 2d 20 | 64 69 67 69 74 61 6c 20 |lock \- |digital |
|00001820| 63 6c 6f 63 6b 20 64 69 | 73 70 6c 61 79 0a 58 2e |clock di|splay.X.|
|00001830| 53 48 20 53 59 4e 54 41 | 58 0a 58 2e 42 20 63 6c |SH SYNTA|X.X.B cl|
|00001840| 6f 63 6b 20 22 5b 72 65 | 66 72 65 73 68 5f 72 61 |ock "[re|fresh_ra|
|00001850| 74 65 5d 22 0a 58 2e 53 | 48 20 44 45 53 43 52 49 |te]".X.S|H DESCRI|
|00001860| 50 54 49 4f 4e 0a 58 2e | 49 20 43 6c 6f 63 6b 0a |PTION.X.|I Clock.|
|00001870| 58 64 69 73 70 6c 61 79 | 73 20 61 20 6c 61 72 67 |Xdisplay|s a larg|
|00001880| 65 20 34 2d 64 69 67 69 | 74 2c 20 31 32 2d 68 6f |e 4-digi|t, 12-ho|
|00001890| 75 72 20 63 6c 6f 63 6b | 20 6f 6e 20 74 68 65 20 |ur clock| on the |
|000018a0| 75 73 65 72 27 73 20 73 | 63 72 65 65 6e 2e 20 20 |user's s|creen. |
|000018b0| 41 20 6c 69 6e 65 0a 58 | 63 6f 6e 74 61 69 6e 69 |A line.X|containi|
|000018c0| 6e 67 20 74 68 65 20 68 | 6f 73 74 6e 61 6d 65 20 |ng the h|ostname |
|000018d0| 69 73 20 64 69 73 70 6c | 61 79 65 64 20 61 62 6f |is displ|ayed abo|
|000018e0| 76 65 20 74 68 65 20 74 | 69 6d 65 20 61 6e 64 20 |ve the t|ime and |
|000018f0| 61 20 6c 69 6e 65 0a 58 | 63 6f 6e 74 61 69 6e 69 |a line.X|containi|
|00001900| 6e 67 20 74 68 65 20 66 | 75 6c 6c 20 64 61 74 65 |ng the f|ull date|
|00001910| 20 61 6e 64 20 74 69 6d | 65 20 69 73 20 64 69 73 | and tim|e is dis|
|00001920| 70 6c 61 79 65 64 20 61 | 66 74 65 72 20 69 74 2e |played a|fter it.|
|00001930| 0a 58 2e 50 50 0a 58 54 | 68 65 20 64 69 73 70 6c |.X.PP.XT|he displ|
|00001940| 61 79 20 69 73 20 75 70 | 64 61 74 65 64 20 6f 6e |ay is up|dated on|
|00001950| 63 65 20 65 76 65 72 79 | 20 6d 69 6e 75 74 65 20 |ce every| minute |
|00001960| 28 6c 6f 77 20 73 79 73 | 74 65 6d 20 6f 76 65 72 |(low sys|tem over|
|00001970| 68 65 61 64 29 20 62 79 | 0a 58 64 65 66 61 75 6c |head) by|.Xdefaul|
|00001980| 74 2e 20 20 49 66 0a 58 | 2e 42 20 72 65 66 72 65 |t. If.X|.B refre|
|00001990| 73 68 5f 72 61 74 65 0a | 58 69 73 20 73 70 65 63 |sh_rate.|Xis spec|
|000019a0| 69 66 69 65 64 2c 20 74 | 68 65 6e 20 74 68 65 20 |ified, t|hen the |
|000019b0| 64 69 73 70 6c 61 79 20 | 69 73 20 75 70 64 61 74 |display |is updat|
|000019c0| 65 64 20 65 76 65 72 79 | 0a 58 2e 42 20 72 65 66 |ed every|.X.B ref|
|000019d0| 72 65 73 68 5f 72 61 74 | 65 0a 58 73 65 63 6f 6e |resh_rat|e.Xsecon|
|000019e0| 64 73 2e 0a 58 2e 49 20 | 43 6c 6f 63 6b 0a 58 77 |ds..X.I |Clock.Xw|
|000019f0| 69 6c 6c 20 61 75 74 6f | 6d 61 74 69 63 61 6c 6c |ill auto|maticall|
|00001a00| 79 20 73 79 6e 63 68 72 | 6f 6e 69 7a 65 20 69 74 |y synchr|onize it|
|00001a10| 73 65 6c 66 20 74 6f 20 | 65 76 65 6e 20 6d 69 6e |self to |even min|
|00001a20| 75 74 65 2c 20 6f 72 20 | 66 72 61 63 74 69 6f 6e |ute, or |fraction|
|00001a30| 20 6f 66 0a 58 6d 69 6e | 75 74 65 20 62 6f 75 6e | of.Xmin|ute boun|
|00001a40| 64 61 72 69 65 73 2e 20 | 20 54 68 65 20 66 69 72 |daries. | The fir|
|00001a50| 73 74 20 72 65 66 72 65 | 73 68 20 61 66 74 65 72 |st refre|sh after|
|00001a60| 20 74 68 65 20 69 6e 69 | 74 69 61 6c 20 64 69 73 | the ini|tial dis|
|00001a70| 70 6c 61 79 20 77 69 6c | 6c 0a 58 74 68 65 72 65 |play wil|l.Xthere|
|00001a80| 66 6f 72 65 20 70 72 6f | 62 61 62 6c 79 20 62 65 |fore pro|bably be|
|00001a90| 20 6c 65 73 73 20 74 68 | 61 6e 20 74 68 65 20 64 | less th|an the d|
|00001aa0| 65 66 61 75 6c 74 20 6f | 72 20 73 70 65 63 69 66 |efault o|r specif|
|00001ab0| 69 65 64 20 72 65 66 72 | 65 73 68 20 72 61 74 65 |ied refr|esh rate|
|00001ac0| 2e 0a 58 41 66 74 65 72 | 20 74 68 61 74 20 68 6f |..XAfter| that ho|
|00001ad0| 77 65 76 65 72 2c 20 74 | 68 65 20 75 70 64 61 74 |wever, t|he updat|
|00001ae0| 65 73 20 77 69 6c 6c 20 | 62 65 20 76 65 72 79 20 |es will |be very |
|00001af0| 72 65 67 75 6c 61 72 2e | 0a 58 2e 50 50 0a 58 49 |regular.|.X.PP.XI|
|00001b00| 66 0a 58 2e 49 20 63 6c | 6f 63 6b 0a 58 69 73 20 |f.X.I cl|ock.Xis |
|00001b10| 72 75 6e 20 75 6e 64 65 | 72 0a 58 2e 49 20 22 47 |run unde|r.X.I "G|
|00001b20| 4e 55 20 45 6d 61 63 73 | 22 0a 58 2e 42 20 22 74 |NU Emacs|".X.B "t|
|00001b30| 65 72 6d 69 6e 61 6c 2d | 65 6d 75 6c 61 74 6f 72 |erminal-|emulator|
|00001b40| 22 0a 58 66 75 6e 63 74 | 69 6f 6e 2c 20 69 74 20 |".Xfunct|ion, it |
|00001b50| 77 69 6c 6c 20 61 75 74 | 6f 6d 61 74 69 63 61 6c |will aut|omatical|
|00001b60| 6c 79 20 75 73 65 20 73 | 6c 69 67 68 74 6c 79 20 |ly use s|lightly |
|00001b70| 66 65 77 65 72 20 6c 69 | 6e 65 73 20 69 6e 20 6f |fewer li|nes in o|
|00001b80| 72 64 65 72 20 74 6f 0a | 58 66 69 74 20 74 68 65 |rder to.|Xfit the|
|00001b90| 20 64 69 73 70 6c 61 79 | 20 77 69 6e 64 6f 77 20 | display| window |
|00001ba0| 6f 6e 20 61 20 6e 6f 72 | 6d 61 6c 20 32 34 20 6c |on a nor|mal 24 l|
|00001bb0| 69 6e 65 20 74 65 72 6d | 69 6e 61 6c 2e 0a 58 2e |ine term|inal..X.|
|00001bc0| 50 50 0a 58 54 68 65 20 | 69 6e 74 65 72 72 75 70 |PP.XThe |interrup|
|00001bd0| 74 20 63 68 61 72 61 63 | 74 65 72 20 65 6e 64 73 |t charac|ter ends|
|00001be0| 20 74 68 65 20 70 72 6f | 67 72 61 6d 20 61 6e 64 | the pro|gram and|
|00001bf0| 20 63 6c 65 61 72 73 20 | 74 68 65 20 73 63 72 65 | clears |the scre|
|00001c00| 65 6e 2e 0a 58 2e 53 48 | 20 22 53 45 45 20 41 4c |en..X.SH| "SEE AL|
|00001c10| 53 4f 22 0a 58 55 73 65 | 72 20 43 6f 6d 6d 61 6e |SO".XUse|r Comman|
|00001c20| 64 73 20 28 31 29 3a 20 | 20 64 61 74 65 0a 58 2e |ds (1): | date.X.|
|00001c30| 53 48 20 41 55 54 48 4f | 52 0a 58 4f 72 69 67 69 |SH AUTHO|R.XOrigi|
|00001c40| 6e 61 6c 6c 79 20 77 72 | 69 74 74 65 6e 20 62 79 |nally wr|itten by|
|00001c50| 20 4a 69 6d 20 45 61 72 | 65 6e 6c 75 69 6e 64 69 | Jim Ear|enluindi|
|00001c60| 6c 20 54 72 65 74 68 65 | 77 65 79 2e 0a 58 2e 50 |l Trethe|wey..X.P|
|00001c70| 50 0a 58 49 74 20 68 61 | 73 20 62 65 65 6e 20 73 |P.XIt ha|s been s|
|00001c80| 75 62 73 74 61 6e 74 69 | 61 6c 6c 79 20 6d 6f 64 |ubstanti|ally mod|
|00001c90| 69 66 69 65 64 20 62 79 | 20 47 65 6f 72 67 65 20 |ified by| George |
|00001ca0| 4d 2e 20 53 69 70 65 20 | 28 63 75 72 72 65 6e 74 |M. Sipe |(current|
|00001cb0| 6c 79 20 2d 20 37 2f 38 | 38 2c 0a 58 61 74 20 72 |ly - 7/8|8,.Xat r|
|00001cc0| 65 62 65 6c 21 67 65 6f | 72 67 65 29 20 74 6f 20 |ebel!geo|rge) to |
|00001cd0| 74 68 65 20 70 6f 69 6e | 74 20 77 68 65 72 65 20 |the poin|t where |
|00001ce0| 4a 69 6d 20 77 6f 75 6c | 64 20 6e 6f 20 6c 6f 6e |Jim woul|d no lon|
|00001cf0| 67 65 72 20 72 65 63 6f | 67 6e 69 7a 65 20 69 74 |ger reco|gnize it|
|00001d00| 2e 0a 53 48 41 52 5f 45 | 4f 46 0a 66 69 0a 69 66 |..SHAR_E|OF.fi.if|
|00001d10| 20 74 65 73 74 20 2d 66 | 20 27 63 6c 6f 63 6b 2e | test -f| 'clock.|
|00001d20| 63 27 0a 74 68 65 6e 0a | 09 65 63 68 6f 20 73 68 |c'.then.|.echo sh|
|00001d30| 61 72 3a 20 22 77 69 6c | 6c 20 6e 6f 74 20 6f 76 |ar: "wil|l not ov|
|00001d40| 65 72 2d 77 72 69 74 65 | 20 65 78 69 73 74 69 6e |er-write| existin|
|00001d50| 67 20 66 69 6c 65 20 27 | 63 6c 6f 63 6b 2e 63 27 |g file '|clock.c'|
|00001d60| 22 0a 65 6c 73 65 0a 73 | 65 64 20 27 73 2f 5e 58 |".else.s|ed 's/^X|
|00001d70| 2f 2f 27 20 3c 3c 20 5c | 53 48 41 52 5f 45 4f 46 |//' << \|SHAR_EOF|
|00001d80| 20 3e 20 27 63 6c 6f 63 | 6b 2e 63 27 0a 58 2f 2a | > 'cloc|k.c'.X/*|
|00001d90| 20 20 20 43 6f 70 79 72 | 69 67 68 74 20 28 63 29 | Copyr|ight (c)|
|00001da0| 20 31 39 38 38 20 62 79 | 20 47 65 6f 72 67 65 20 | 1988 by| George |
|00001db0| 4d 2e 20 53 69 70 65 2e | 20 20 41 6c 6c 20 72 69 |M. Sipe.| All ri|
|00001dc0| 67 68 74 73 20 72 65 73 | 65 72 76 65 64 2e 0a 58 |ghts res|erved..X|
|00001dd0| 0a 58 54 68 69 73 20 73 | 6f 66 74 77 61 72 65 20 |.XThis s|oftware |
|00001de0| 6d 61 79 20 6f 6e 6c 79 | 20 62 65 20 72 65 64 69 |may only| be redi|
|00001df0| 73 74 72 69 62 75 74 65 | 64 20 77 69 74 68 6f 75 |stribute|d withou|
|00001e00| 74 20 66 65 65 20 61 6e | 64 20 77 69 74 68 6f 75 |t fee an|d withou|
|00001e10| 74 20 61 6e 79 0a 58 6f | 74 68 65 72 20 66 6f 72 |t any.Xo|ther for|
|00001e20| 6d 20 6f 66 20 6d 6f 6e | 65 74 61 72 79 20 67 61 |m of mon|etary ga|
|00001e30| 69 6e 20 28 69 6e 63 6c | 75 64 69 6e 67 20 73 6f |in (incl|uding so|
|00001e40| 6c 64 2c 20 72 65 6e 74 | 65 64 2c 20 6c 65 61 73 |ld, rent|ed, leas|
|00001e50| 65 64 2c 20 6f 72 0a 58 | 74 72 61 64 65 64 29 2c |ed, or.X|traded),|
|00001e60| 20 75 6e 6c 65 73 73 20 | 74 68 65 20 65 78 70 72 | unless |the expr|
|00001e70| 65 73 73 20 77 72 69 74 | 74 65 6e 20 70 65 72 6d |ess writ|ten perm|
|00001e80| 69 73 73 69 6f 6e 20 6f | 66 20 74 68 65 20 63 6f |ission o|f the co|
|00001e90| 70 79 72 69 67 68 74 20 | 68 6f 6c 64 65 72 0a 58 |pyright |holder.X|
|00001ea0| 69 73 20 6f 62 74 61 69 | 6e 65 64 20 69 6e 20 61 |is obtai|ned in a|
|00001eb0| 64 76 61 6e 63 65 2e 0a | 58 0a 58 54 68 69 73 20 |dvance..|X.XThis |
|00001ec0| 63 6f 70 79 72 69 67 68 | 74 20 6e 6f 74 69 63 65 |copyrigh|t notice|
|00001ed0| 20 6d 75 73 74 20 62 65 | 20 72 65 70 72 6f 64 75 | must be| reprodu|
|00001ee0| 63 65 64 20 69 6e 20 69 | 74 73 20 65 6e 74 69 72 |ced in i|ts entir|
|00001ef0| 65 74 79 20 6f 6e 20 61 | 6c 6c 20 63 6f 70 69 65 |ety on a|ll copie|
|00001f00| 73 0a 58 6f 66 20 74 68 | 69 73 20 73 6f 66 74 77 |s.Xof th|is softw|
|00001f10| 61 72 65 2e 20 20 46 75 | 72 74 68 65 72 2c 20 61 |are. Fu|rther, a|
|00001f20| 63 6b 6e 6f 77 6c 65 64 | 67 6d 65 6e 74 20 6f 66 |cknowled|gment of|
|00001f30| 20 74 68 65 20 61 75 74 | 68 6f 72 73 68 69 70 20 | the aut|horship |
|00001f40| 6f 66 20 74 68 69 73 0a | 58 73 6f 66 74 77 61 72 |of this.|Xsoftwar|
|00001f50| 65 20 6d 75 73 74 20 6e | 6f 74 20 62 65 20 72 65 |e must n|ot be re|
|00001f60| 6d 6f 76 65 64 20 66 72 | 6f 6d 20 69 74 73 20 63 |moved fr|om its c|
|00001f70| 75 72 72 65 6e 74 20 6f | 72 20 64 65 72 69 76 65 |urrent o|r derive|
|00001f80| 64 0a 58 64 6f 63 75 6d | 65 6e 74 61 74 69 6f 6e |d.Xdocum|entation|
|00001f90| 2e 0a 58 0a 58 4e 6f 20 | 65 78 70 72 65 73 73 65 |..X.XNo |expresse|
|00001fa0| 64 20 6f 72 20 69 6d 70 | 6c 69 65 64 20 77 61 72 |d or imp|lied war|
|00001fb0| 72 61 6e 74 79 20 69 73 | 20 6d 61 64 65 20 66 6f |ranty is| made fo|
|00001fc0| 72 20 74 68 69 73 20 73 | 6f 66 74 77 61 72 65 2e |r this s|oftware.|
|00001fd0| 20 20 4e 6f 20 70 61 72 | 74 79 0a 58 63 6f 6e 6e | No par|ty.Xconn|
|00001fe0| 65 63 74 65 64 20 77 69 | 74 68 20 74 68 69 73 20 |ected wi|th this |
|00001ff0| 73 6f 66 74 77 61 72 65 | 20 61 73 73 75 6d 65 73 |software| assumes|
|00002000| 20 61 6e 79 20 6c 69 61 | 62 69 6c 69 74 79 20 6f | any lia|bility o|
|00002010| 72 20 72 65 73 70 6f 6e | 73 69 62 69 6c 69 74 79 |r respon|sibility|
|00002020| 0a 58 66 6f 72 20 69 74 | 73 20 75 73 65 2c 20 74 |.Xfor it|s use, t|
|00002030| 68 65 20 63 6f 72 72 65 | 63 74 6e 65 73 73 20 6f |he corre|ctness o|
|00002040| 66 20 69 74 73 20 6f 70 | 65 72 61 74 69 6f 6e 2c |f its op|eration,|
|00002050| 20 6f 72 20 69 74 73 20 | 66 69 74 6e 65 73 73 20 | or its |fitness |
|00002060| 66 6f 72 20 61 6e 79 0a | 58 70 75 72 70 6f 73 65 |for any.|Xpurpose|
|00002070| 2e 0a 58 0a 58 41 6e 79 | 20 64 69 73 74 72 69 62 |..X.XAny| distrib|
|00002080| 75 74 6f 72 20 6f 66 20 | 63 6f 70 69 65 73 20 6f |utor of |copies o|
|00002090| 66 20 74 68 69 73 20 73 | 6f 66 74 77 61 72 65 20 |f this s|oftware |
|000020a0| 73 68 61 6c 6c 20 67 72 | 61 6e 74 20 74 68 65 20 |shall gr|ant the |
|000020b0| 72 65 63 69 70 69 65 6e | 74 0a 58 70 65 72 6d 69 |recipien|t.Xpermi|
|000020c0| 73 73 69 6f 6e 20 66 6f | 72 20 66 75 72 74 68 65 |ssion fo|r furthe|
|000020d0| 72 20 72 65 64 69 73 74 | 72 69 62 75 74 69 6f 6e |r redist|ribution|
|000020e0| 20 61 73 20 70 65 72 6d | 69 74 74 65 64 20 62 79 | as perm|itted by|
|000020f0| 20 74 68 69 73 20 6e 6f | 74 69 63 65 2e 0a 58 0a | this no|tice..X.|
|00002100| 58 50 65 72 6d 69 73 73 | 69 6f 6e 20 69 73 20 68 |XPermiss|ion is h|
|00002110| 65 72 65 62 79 20 67 72 | 61 6e 74 65 64 20 74 6f |ereby gr|anted to|
|00002120| 20 63 6f 70 79 2c 20 72 | 65 70 72 6f 64 75 63 65 | copy, r|eproduce|
|00002130| 2c 20 72 65 64 69 73 74 | 72 69 62 75 74 65 20 61 |, redist|ribute a|
|00002140| 6e 64 0a 58 6f 74 68 65 | 72 77 69 73 65 20 75 73 |nd.Xothe|rwise us|
|00002150| 65 20 74 68 69 73 20 73 | 6f 66 74 77 61 72 65 20 |e this s|oftware |
|00002160| 61 73 20 6c 6f 6e 67 20 | 61 73 20 74 68 65 20 63 |as long |as the c|
|00002170| 6f 6e 64 69 74 69 6f 6e | 73 20 61 62 6f 76 65 20 |ondition|s above |
|00002180| 61 72 65 0a 58 73 74 72 | 69 63 74 6c 79 20 61 64 |are.Xstr|ictly ad|
|00002190| 68 65 72 65 64 20 74 6f | 2e 0a 58 0a 58 09 4e 4f |hered to|..X.X.NO|
|000021a0| 54 45 3a 20 20 54 68 69 | 73 20 73 6f 66 74 77 61 |TE: Thi|s softwa|
|000021b0| 72 65 20 77 61 73 20 6f | 72 69 67 69 6e 61 6c 6c |re was o|riginall|
|000021c0| 79 20 77 72 69 74 74 65 | 6e 20 62 79 20 4a 69 6d |y writte|n by Jim|
|000021d0| 20 45 61 72 65 6e 6c 75 | 69 6e 64 69 6c 0a 58 09 | Earenlu|indil.X.|
|000021e0| 54 72 65 74 68 65 77 65 | 79 20 61 6e 64 20 6d 6f |Trethewe|y and mo|
|000021f0| 64 69 66 69 65 64 20 62 | 79 20 47 65 6f 72 67 65 |dified b|y George|
|00002200| 20 4d 2e 20 53 69 70 65 | 20 28 72 65 62 65 6c 21 | M. Sipe| (rebel!|
|00002210| 67 65 6f 72 67 65 29 20 | 74 6f 20 74 68 65 0a 58 |george) |to the.X|
|00002220| 09 70 6f 69 6e 74 20 77 | 68 65 72 65 20 4a 69 6d |.point w|here Jim|
|00002230| 20 77 6f 75 6c 64 20 6e | 6f 20 6c 6f 6e 67 65 72 | would n|o longer|
|00002240| 20 72 65 63 6f 67 6e 69 | 7a 65 20 69 74 2e 20 20 | recogni|ze it. |
|00002250| 4e 6f 20 63 6f 70 79 72 | 69 67 68 74 0a 58 09 6e |No copyr|ight.X.n|
|00002260| 6f 74 69 63 65 73 20 77 | 65 72 65 20 65 6d 62 6f |otices w|ere embo|
|00002270| 64 69 65 64 20 69 6e 20 | 74 68 65 20 6f 72 69 67 |died in |the orig|
|00002280| 69 6e 61 6c 20 6e 65 74 | 20 64 69 73 74 72 69 62 |inal net| distrib|
|00002290| 75 74 69 6f 6e 2e 0a 58 | 2a 2f 0a 58 0a 58 23 69 |ution..X|*/.X.X#i|
|000022a0| 6e 63 6c 75 64 65 20 3c | 73 74 64 69 6f 2e 68 3e |nclude <|stdio.h>|
|000022b0| 0a 58 23 69 6e 63 6c 75 | 64 65 20 3c 63 75 72 73 |.X#inclu|de <curs|
|000022c0| 65 73 2e 68 3e 0a 58 23 | 69 6e 63 6c 75 64 65 20 |es.h>.X#|include |
|000022d0| 3c 73 69 67 6e 61 6c 2e | 68 3e 0a 58 23 69 6e 63 |<signal.|h>.X#inc|
|000022e0| 6c 75 64 65 20 3c 73 79 | 73 2f 74 79 70 65 73 2e |lude <sy|s/types.|
|000022f0| 68 3e 0a 58 0a 58 23 69 | 66 6e 64 65 66 09 4d 53 |h>.X.X#i|fndef.MS|
|00002300| 44 4f 53 0a 58 0a 58 23 | 69 66 64 65 66 09 42 53 |DOS.X.X#|ifdef.BS|
|00002310| 44 0a 58 0a 58 23 69 6e | 63 6c 75 64 65 20 3c 73 |D.X.X#in|clude <s|
|00002320| 74 72 69 6e 67 73 2e 68 | 3e 0a 58 23 69 6e 63 6c |trings.h|>.X#incl|
|00002330| 75 64 65 20 3c 73 79 73 | 2f 69 6f 63 74 6c 2e 68 |ude <sys|/ioctl.h|
|00002340| 3e 0a 58 23 69 6e 63 6c | 75 64 65 20 3c 73 79 73 |>.X#incl|ude <sys|
|00002350| 2f 74 69 6d 65 2e 68 3e | 0a 58 65 78 74 65 72 6e |/time.h>|.Xextern|
|00002360| 09 74 69 6d 65 5f 74 20 | 74 69 6d 65 28 29 3b 0a |.time_t |time();.|
|00002370| 58 0a 58 23 65 6c 73 65 | 09 2f 2a 20 21 42 53 44 |X.X#else|./* !BSD|
|00002380| 20 2a 2f 0a 58 0a 58 23 | 69 6e 63 6c 75 64 65 20 | */.X.X#|include |
|00002390| 3c 73 74 72 69 6e 67 2e | 68 3e 0a 58 23 69 6e 63 |<string.|h>.X#inc|
|000023a0| 6c 75 64 65 20 3c 74 69 | 6d 65 2e 68 3e 0a 58 65 |lude <ti|me.h>.Xe|
|000023b0| 78 74 65 72 6e 09 6c 6f | 6e 67 20 74 69 6d 65 28 |xtern.lo|ng time(|
|000023c0| 29 3b 0a 58 65 78 74 65 | 72 6e 09 75 6e 73 69 67 |);.Xexte|rn.unsig|
|000023d0| 6e 65 64 20 69 6e 74 20 | 73 6c 65 65 70 28 29 3b |ned int |sleep();|
|000023e0| 0a 58 65 78 74 65 72 6e | 09 76 6f 69 64 20 65 78 |.Xextern|.void ex|
|000023f0| 69 74 28 29 3b 0a 58 0a | 58 23 65 6e 64 69 66 09 |it();.X.|X#endif.|
|00002400| 2f 2a 20 21 42 53 44 20 | 2a 2f 0a 58 0a 58 65 78 |/* !BSD |*/.X.Xex|
|00002410| 74 65 72 6e 09 73 74 72 | 75 63 74 20 74 6d 20 2a |tern.str|uct tm *|
|00002420| 6c 6f 63 61 6c 74 69 6d | 65 28 29 3b 0a 58 65 78 |localtim|e();.Xex|
|00002430| 74 65 72 6e 09 75 6e 73 | 69 67 6e 65 64 20 69 6e |tern.uns|igned in|
|00002440| 74 20 61 6c 61 72 6d 28 | 29 3b 0a 58 65 78 74 65 |t alarm(|);.Xexte|
|00002450| 72 6e 20 20 76 6f 69 64 | 20 70 72 5f 62 69 67 28 |rn void| pr_big(|
|00002460| 29 3b 0a 58 65 78 74 65 | 72 6e 20 20 76 6f 69 64 |);.Xexte|rn void|
|00002470| 20 70 72 5f 63 6f 6c 6f | 6e 28 29 3b 0a 58 65 78 | pr_colo|n();.Xex|
|00002480| 74 65 72 6e 20 20 76 6f | 69 64 20 70 72 5f 73 70 |tern vo|id pr_sp|
|00002490| 61 63 65 28 29 3b 0a 58 | 73 74 61 74 69 63 20 20 |ace();.X|static |
|000024a0| 69 6e 74 20 6f 6e 5f 69 | 6e 74 72 28 29 3b 0a 58 |int on_i|ntr();.X|
|000024b0| 73 74 61 74 69 63 20 20 | 76 6f 69 64 20 62 69 67 |static |void big|
|000024c0| 5f 6e 75 6d 73 28 29 3b | 0a 58 73 74 61 74 69 63 |_nums();|.Xstatic|
|000024d0| 20 20 76 6f 69 64 20 74 | 69 6d 65 5f 75 70 64 61 | void t|ime_upda|
|000024e0| 74 65 28 29 3b 0a 58 0a | 58 23 65 6c 73 65 09 2f |te();.X.|X#else./|
|000024f0| 2a 20 4d 53 44 4f 53 20 | 2a 2f 0a 58 0a 58 23 69 |* MSDOS |*/.X.X#i|
|00002500| 6e 63 6c 75 64 65 20 3c | 73 74 64 6c 69 62 2e 68 |nclude <|stdlib.h|
|00002510| 3e 0a 58 23 75 6e 64 65 | 66 09 67 65 74 63 68 0a |>.X#unde|f.getch.|
|00002520| 58 23 69 6e 63 6c 75 64 | 65 20 3c 63 6f 6e 69 6f |X#includ|e <conio|
|00002530| 2e 68 3e 0a 58 23 69 6e | 63 6c 75 64 65 20 3c 73 |.h>.X#in|clude <s|
|00002540| 74 72 69 6e 67 2e 68 3e | 0a 58 23 69 6e 63 6c 75 |tring.h>|.X#inclu|
|00002550| 64 65 20 3c 74 69 6d 65 | 2e 68 3e 0a 58 23 69 6e |de <time|.h>.X#in|
|00002560| 63 6c 75 64 65 20 3c 6c | 6f 63 61 6c 2e 68 3e 0a |clude <l|ocal.h>.|
|00002570| 58 65 78 74 65 72 6e 20 | 20 69 6e 74 20 6d 61 69 |Xextern | int mai|
|00002580| 6e 28 69 6e 74 20 61 72 | 67 63 2c 63 68 61 72 20 |n(int ar|gc,char |
|00002590| 2a 2a 61 72 67 76 29 3b | 0a 58 65 78 74 65 72 6e |**argv);|.Xextern|
|000025a0| 20 20 76 6f 69 64 20 70 | 72 5f 62 69 67 28 69 6e | void p|r_big(in|
|000025b0| 74 20 6e 75 6d 2c 69 6e | 74 20 63 6f 6c 29 3b 0a |t num,in|t col);.|
|000025c0| 58 65 78 74 65 72 6e 20 | 20 76 6f 69 64 20 70 72 |Xextern | void pr|
|000025d0| 5f 63 6f 6c 6f 6e 28 69 | 6e 74 20 63 6f 6c 29 3b |_colon(i|nt col);|
|000025e0| 0a 58 65 78 74 65 72 6e | 20 20 76 6f 69 64 20 70 |.Xextern| void p|
|000025f0| 72 5f 73 70 61 63 65 28 | 76 6f 69 64 29 3b 0a 58 |r_space(|void);.X|
|00002600| 73 74 61 74 69 63 20 20 | 69 6e 74 20 6f 6e 5f 69 |static |int on_i|
|00002610| 6e 74 72 28 76 6f 69 64 | 29 3b 0a 58 73 74 61 74 |ntr(void|);.Xstat|
|00002620| 69 63 20 20 76 6f 69 64 | 20 62 69 67 5f 6e 75 6d |ic void| big_num|
|00002630| 73 28 69 6e 74 20 68 72 | 73 2c 69 6e 74 20 6d 69 |s(int hr|s,int mi|
|00002640| 6e 73 29 3b 0a 58 73 74 | 61 74 69 63 20 20 76 6f |ns);.Xst|atic vo|
|00002650| 69 64 20 74 69 6d 65 5f | 75 70 64 61 74 65 28 76 |id time_|update(v|
|00002660| 6f 69 64 29 3b 0a 58 0a | 58 23 65 6e 64 69 66 09 |oid);.X.|X#endif.|
|00002670| 2f 2a 20 4d 53 44 4f 53 | 20 2a 2f 0a 58 0a 58 23 |/* MSDOS| */.X.X#|
|00002680| 64 65 66 69 6e 65 09 53 | 59 53 4c 49 4e 45 09 30 |define.S|YSLINE.0|
|00002690| 09 09 2f 2a 20 6c 69 6e | 65 20 74 6f 20 70 75 74 |../* lin|e to put|
|000026a0| 20 73 79 73 74 65 6d 20 | 6e 61 6d 65 20 6f 6e 20 | system |name on |
|000026b0| 2a 2f 0a 58 23 64 65 66 | 69 6e 65 09 44 49 47 49 |*/.X#def|ine.DIGI|
|000026c0| 54 53 09 33 09 09 2f 2a | 20 6c 69 6e 65 20 74 6f |TS.3../*| line to|
|000026d0| 20 70 75 74 20 64 69 67 | 69 74 73 20 6f 6e 20 2a | put dig|its on *|
|000026e0| 2f 0a 58 23 64 65 66 69 | 6e 65 09 44 41 54 45 54 |/.X#defi|ne.DATET|
|000026f0| 4d 09 31 39 09 09 2f 2a | 20 6c 69 6e 65 20 74 6f |M.19../*| line to|
|00002700| 20 70 75 74 20 66 75 6c | 6c 20 64 61 74 65 20 61 | put ful|l date a|
|00002710| 6e 64 20 74 69 6d 65 20 | 6f 6e 20 2a 2f 0a 58 0a |nd time |on */.X.|
|00002720| 58 73 74 61 74 69 63 20 | 69 6e 74 20 42 41 53 45 |Xstatic |int BASE|
|00002730| 3b 09 09 2f 2a 20 62 61 | 73 65 20 6c 69 6e 65 20 |;../* ba|se line |
|00002740| 66 6f 72 20 6f 75 74 70 | 75 74 20 2a 2f 0a 58 73 |for outp|ut */.Xs|
|00002750| 74 61 74 69 63 20 73 74 | 72 75 63 74 20 74 6d 20 |tatic st|ruct tm |
|00002760| 2a 6c 6f 63 5f 74 69 6d | 65 3b 09 2f 2a 20 6c 6f |*loc_tim|e;./* lo|
|00002770| 63 61 6c 20 74 69 6d 65 | 20 73 74 72 75 63 74 75 |cal time| structu|
|00002780| 72 65 20 2a 2f 0a 58 73 | 74 61 74 69 63 20 75 6e |re */.Xs|tatic un|
|00002790| 73 69 67 6e 65 64 20 69 | 6e 74 20 72 65 66 72 65 |signed i|nt refre|
|000027a0| 73 68 5f 72 61 74 65 3b | 2f 2a 20 73 65 63 6f 6e |sh_rate;|/* secon|
|000027b0| 64 73 20 62 65 74 77 65 | 65 6e 20 75 70 64 61 74 |ds betwe|en updat|
|000027c0| 65 73 20 2a 2f 0a 58 0a | 58 73 74 61 74 69 63 20 |es */.X.|Xstatic |
|000027d0| 63 68 61 72 20 6d 79 6e | 61 6d 65 5b 34 30 5d 3b |char myn|ame[40];|
|000027e0| 09 09 2f 2a 20 73 74 72 | 69 6e 67 20 74 6f 20 73 |../* str|ing to s|
|000027f0| 74 6f 72 65 20 73 79 73 | 74 65 6d 20 6e 61 6d 65 |tore sys|tem name|
|00002800| 20 69 6e 20 2a 2f 0a 58 | 0a 58 57 49 4e 44 4f 57 | in */.X|.XWINDOW|
|00002810| 20 2a 73 63 72 3b 09 09 | 09 2f 2a 20 73 63 72 65 | *scr;..|./* scre|
|00002820| 65 6e 20 77 68 65 72 65 | 20 6c 61 72 67 65 20 6e |en where| large n|
|00002830| 75 6d 62 65 72 73 20 64 | 69 73 70 6c 61 79 65 64 |umbers d|isplayed|
|00002840| 20 2a 2f 0a 58 69 6e 74 | 20 63 75 72 72 5f 63 6f | */.Xint| curr_co|
|00002850| 6c 3b 09 09 09 2f 2a 20 | 63 75 72 72 65 6e 74 20 |l;.../* |current |
|00002860| 63 65 6e 74 65 72 20 6f | 66 20 63 6f 6c 6f 6e 20 |center o|f colon |
|00002870| 63 6f 6c 75 6d 6e 20 2a | 2f 0a 58 69 6e 74 20 4e |column *|/.Xint N|
|00002880| 42 41 53 45 3b 09 09 09 | 2f 2a 20 6e 75 6d 65 72 |BASE;...|/* numer|
|00002890| 69 63 20 62 61 73 65 20 | 6c 69 6e 65 20 66 6f 72 |ic base |line for|
|000028a0| 20 6f 75 74 70 75 74 20 | 2a 2f 0a 58 0a 58 73 74 | output |*/.X.Xst|
|000028b0| 61 74 69 63 20 69 6e 74 | 20 6f 6e 5f 69 6e 74 72 |atic int| on_intr|
|000028c0| 28 29 0a 58 7b 0a 58 09 | 72 65 66 72 65 73 68 5f |().X{.X.|refresh_|
|000028d0| 72 61 74 65 20 3d 20 30 | 3b 0a 58 09 61 6c 61 72 |rate = 0|;.X.alar|
|000028e0| 6d 28 30 29 3b 0a 58 23 | 69 66 64 65 66 09 42 53 |m(0);.X#|ifdef.BS|
|000028f0| 44 0a 58 09 6b 69 6c 6c | 28 30 2c 20 53 49 47 41 |D.X.kill|(0, SIGA|
|00002900| 4c 52 4d 29 3b 0a 58 23 | 65 6e 64 69 66 0a 58 09 |LRM);.X#|endif.X.|
|00002910| 72 65 74 75 72 6e 28 30 | 29 3b 0a 58 7d 0a 58 0a |return(0|);.X}.X.|
|00002920| 58 73 74 61 74 69 63 20 | 76 6f 69 64 20 62 69 67 |Xstatic |void big|
|00002930| 5f 6e 75 6d 73 28 68 72 | 73 2c 20 6d 69 6e 73 29 |_nums(hr|s, mins)|
|00002940| 0a 58 69 6e 74 20 68 72 | 73 2c 20 6d 69 6e 73 3b |.Xint hr|s, mins;|
|00002950| 0a 58 7b 0a 58 09 73 74 | 61 74 69 63 20 69 6e 74 |.X{.X.st|atic int|
|00002960| 20 78 5f 68 72 5f 68 20 | 3d 20 2d 31 2c 20 78 5f | x_hr_h |= -1, x_|
|00002970| 68 72 5f 6c 20 3d 20 2d | 31 3b 0a 58 09 73 74 61 |hr_l = -|1;.X.sta|
|00002980| 74 69 63 20 69 6e 74 20 | 78 5f 6d 69 6e 5f 68 20 |tic int |x_min_h |
|00002990| 3d 20 2d 31 2c 20 78 5f | 6d 69 6e 5f 6c 20 3d 20 |= -1, x_|min_l = |
|000029a0| 2d 31 2c 20 78 5f 69 6e | 64 65 6e 74 20 3d 20 2d |-1, x_in|dent = -|
|000029b0| 31 3b 0a 58 09 69 6e 74 | 20 68 72 5f 68 2c 20 68 |1;.X.int| hr_h, h|
|000029c0| 72 5f 6c 2c 20 6d 69 6e | 5f 68 2c 20 6d 69 6e 5f |r_l, min|_h, min_|
|000029d0| 6c 2c 20 69 6e 64 65 6e | 74 3b 0a 58 0a 58 09 68 |l, inden|t;.X.X.h|
|000029e0| 72 5f 68 20 3d 20 68 72 | 73 20 2f 20 31 30 3b 0a |r_h = hr|s / 10;.|
|000029f0| 58 09 68 72 5f 6c 20 3d | 20 68 72 73 20 25 20 31 |X.hr_l =| hrs % 1|
|00002a00| 30 3b 0a 58 09 6d 69 6e | 5f 68 20 3d 20 6d 69 6e |0;.X.min|_h = min|
|00002a10| 73 20 2f 20 31 30 3b 0a | 58 09 6d 69 6e 5f 6c 20 |s / 10;.|X.min_l |
|00002a20| 3d 20 6d 69 6e 73 20 25 | 20 31 30 3b 0a 58 09 69 |= mins %| 10;.X.i|
|00002a30| 6e 64 65 6e 74 20 3d 20 | 28 68 72 5f 68 20 3d 3d |ndent = |(hr_h ==|
|00002a40| 20 30 29 20 3f 20 31 36 | 20 3a 20 32 34 3b 0a 58 | 0) ? 16| : 24;.X|
|00002a50| 09 69 66 20 28 69 6e 64 | 65 6e 74 20 21 3d 20 78 |.if (ind|ent != x|
|00002a60| 5f 69 6e 64 65 6e 74 29 | 20 7b 0a 58 09 09 70 72 |_indent)| {.X..pr|
|00002a70| 5f 73 70 61 63 65 28 29 | 3b 0a 58 09 09 78 5f 68 |_space()|;.X..x_h|
|00002a80| 72 5f 68 20 3d 20 78 5f | 68 72 5f 6c 20 3d 20 78 |r_h = x_|hr_l = x|
|00002a90| 5f 6d 69 6e 5f 68 20 3d | 20 78 5f 6d 69 6e 5f 6c |_min_h =| x_min_l|
|00002aa0| 20 3d 20 2d 31 3b 0a 58 | 09 09 70 72 5f 63 6f 6c | = -1;.X|..pr_col|
|00002ab0| 6f 6e 28 69 6e 64 65 6e | 74 20 2b 20 31 35 29 3b |on(inden|t + 15);|
|00002ac0| 0a 58 09 09 78 5f 69 6e | 64 65 6e 74 20 3d 20 69 |.X..x_in|dent = i|
|00002ad0| 6e 64 65 6e 74 3b 0a 58 | 09 7d 0a 58 09 69 66 20 |ndent;.X|.}.X.if |
|00002ae0| 28 28 68 72 5f 68 20 21 | 3d 20 30 29 20 26 26 20 |((hr_h !|= 0) && |
|00002af0| 28 68 72 5f 68 20 21 3d | 20 78 5f 68 72 5f 68 29 |(hr_h !=| x_hr_h)|
|00002b00| 29 20 7b 0a 58 09 09 70 | 72 5f 62 69 67 28 68 72 |) {.X..p|r_big(hr|
|00002b10| 5f 68 2c 20 39 29 3b 0a | 58 09 09 78 5f 68 72 5f |_h, 9);.|X..x_hr_|
|00002b20| 68 20 3d 20 68 72 5f 68 | 3b 0a 58 09 7d 0a 58 09 |h = hr_h|;.X.}.X.|
|00002b30| 69 66 20 28 68 72 5f 6c | 20 21 3d 20 78 5f 68 72 |if (hr_l| != x_hr|
|00002b40| 5f 6c 29 20 7b 0a 58 09 | 09 70 72 5f 62 69 67 28 |_l) {.X.|.pr_big(|
|00002b50| 68 72 5f 6c 2c 20 69 6e | 64 65 6e 74 29 3b 0a 58 |hr_l, in|dent);.X|
|00002b60| 09 09 78 5f 68 72 5f 6c | 20 3d 20 68 72 5f 6c 3b |..x_hr_l| = hr_l;|
|00002b70| 0a 58 09 7d 0a 58 09 69 | 66 20 28 6d 69 6e 5f 68 |.X.}.X.i|f (min_h|
|00002b80| 20 21 3d 20 78 5f 6d 69 | 6e 5f 68 29 20 7b 0a 58 | != x_mi|n_h) {.X|
|00002b90| 09 09 70 72 5f 62 69 67 | 28 6d 69 6e 5f 68 2c 20 |..pr_big|(min_h, |
|00002ba0| 69 6e 64 65 6e 74 20 2b | 20 32 31 29 3b 0a 58 09 |indent +| 21);.X.|
|00002bb0| 09 78 5f 6d 69 6e 5f 68 | 20 3d 20 6d 69 6e 5f 68 |.x_min_h| = min_h|
|00002bc0| 3b 0a 58 09 7d 0a 58 09 | 69 66 20 28 6d 69 6e 5f |;.X.}.X.|if (min_|
|00002bd0| 6c 20 21 3d 20 78 5f 6d | 69 6e 5f 6c 29 20 7b 0a |l != x_m|in_l) {.|
|00002be0| 58 09 09 70 72 5f 62 69 | 67 28 6d 69 6e 5f 6c 2c |X..pr_bi|g(min_l,|
|00002bf0| 20 69 6e 64 65 6e 74 20 | 2b 20 33 36 29 3b 0a 58 | indent |+ 36);.X|
|00002c00| 09 09 78 5f 6d 69 6e 5f | 6c 20 3d 20 6d 69 6e 5f |..x_min_|l = min_|
|00002c10| 6c 3b 0a 58 09 7d 0a 58 | 7d 0a 58 0a 58 73 74 61 |l;.X.}.X|}.X.Xsta|
|00002c20| 74 69 63 20 76 6f 69 64 | 20 74 69 6d 65 5f 75 70 |tic void| time_up|
|00002c30| 64 61 74 65 28 29 0a 58 | 7b 0a 58 09 74 69 6d 65 |date().X|{.X.time|
|00002c40| 5f 74 20 63 6c 6f 63 6b | 3b 0a 58 09 63 68 61 72 |_t clock|;.X.char|
|00002c50| 20 74 69 6d 65 5f 73 74 | 72 5b 34 33 5d 3b 0a 58 | time_st|r[43];.X|
|00002c60| 09 69 6e 74 20 74 5f 68 | 6f 75 72 2c 20 74 5f 6d |.int t_h|our, t_m|
|00002c70| 69 6e 2c 20 74 5f 73 65 | 63 3b 0a 58 09 69 6e 74 |in, t_se|c;.X.int|
|00002c80| 20 64 65 6c 74 61 3b 0a | 58 09 73 74 61 74 69 63 | delta;.|X.static|
|00002c90| 20 69 6e 74 20 63 6f 6c | 6f 6e 20 3d 20 31 35 3b | int col|on = 15;|
|00002ca0| 0a 58 0a 58 09 77 6d 6f | 76 65 28 73 63 72 2c 20 |.X.X.wmo|ve(scr, |
|00002cb0| 42 41 53 45 2c 20 30 29 | 3b 0a 58 09 77 63 6c 72 |BASE, 0)|;.X.wclr|
|00002cc0| 74 6f 65 6f 6c 28 73 63 | 72 29 3b 0a 58 09 77 6d |toeol(sc|r);.X.wm|
|00002cd0| 6f 76 65 28 73 63 72 2c | 20 42 41 53 45 2c 20 28 |ove(scr,| BASE, (|
|00002ce0| 43 4f 4c 53 20 2f 20 32 | 20 2d 20 73 74 72 6c 65 |COLS / 2| - strle|
|00002cf0| 6e 28 6d 79 6e 61 6d 65 | 29 20 2f 20 32 29 29 3b |n(myname|) / 2));|
|00002d00| 0a 58 09 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |.X.wprin|tw(scr, |
|00002d10| 6d 79 6e 61 6d 65 29 3b | 0a 58 09 77 6d 6f 76 65 |myname);|.X.wmove|
|00002d20| 28 73 63 72 2c 20 42 41 | 53 45 20 2b 20 44 41 54 |(scr, BA|SE + DAT|
|00002d30| 45 54 4d 2c 20 30 29 3b | 0a 58 09 77 63 6c 72 74 |ETM, 0);|.X.wclrt|
|00002d40| 6f 65 6f 6c 28 73 63 72 | 29 3b 0a 58 09 28 76 6f |oeol(scr|);.X.(vo|
|00002d50| 69 64 29 20 74 69 6d 65 | 28 26 63 6c 6f 63 6b 29 |id) time|(&clock)|
|00002d60| 3b 0a 58 09 28 76 6f 69 | 64 29 20 73 74 72 63 70 |;.X.(voi|d) strcp|
|00002d70| 79 28 74 69 6d 65 5f 73 | 74 72 2c 20 63 74 69 6d |y(time_s|tr, ctim|
|00002d80| 65 28 26 63 6c 6f 63 6b | 29 29 3b 0a 58 09 77 6d |e(&clock|));.X.wm|
|00002d90| 6f 76 65 28 73 63 72 2c | 20 42 41 53 45 20 2b 20 |ove(scr,| BASE + |
|00002da0| 44 41 54 45 54 4d 2c 20 | 28 43 4f 4c 53 20 2f 20 |DATETM, |(COLS / |
|00002db0| 32 20 2d 20 73 74 72 6c | 65 6e 28 74 69 6d 65 5f |2 - strl|en(time_|
|00002dc0| 73 74 72 29 20 2f 20 32 | 29 29 3b 0a 58 09 77 70 |str) / 2|));.X.wp|
|00002dd0| 72 69 6e 74 77 28 73 63 | 72 2c 20 74 69 6d 65 5f |rintw(sc|r, time_|
|00002de0| 73 74 72 29 3b 0a 58 0a | 58 09 6c 6f 63 5f 74 69 |str);.X.|X.loc_ti|
|00002df0| 6d 65 20 3d 20 6c 6f 63 | 61 6c 74 69 6d 65 28 26 |me = loc|altime(&|
|00002e00| 63 6c 6f 63 6b 29 3b 0a | 58 09 74 5f 68 6f 75 72 |clock);.|X.t_hour|
|00002e10| 20 3d 20 6c 6f 63 5f 74 | 69 6d 65 2d 3e 74 6d 5f | = loc_t|ime->tm_|
|00002e20| 68 6f 75 72 3b 0a 58 09 | 69 66 20 28 74 5f 68 6f |hour;.X.|if (t_ho|
|00002e30| 75 72 20 3e 20 31 32 29 | 20 74 5f 68 6f 75 72 20 |ur > 12)| t_hour |
|00002e40| 3d 20 74 5f 68 6f 75 72 | 20 2d 20 31 32 3b 0a 58 |= t_hour| - 12;.X|
|00002e50| 09 69 66 20 28 74 5f 68 | 6f 75 72 20 3d 3d 20 30 |.if (t_h|our == 0|
|00002e60| 29 20 74 5f 68 6f 75 72 | 20 3d 20 31 32 3b 0a 58 |) t_hour| = 12;.X|
|00002e70| 09 74 5f 6d 69 6e 20 3d | 20 6c 6f 63 5f 74 69 6d |.t_min =| loc_tim|
|00002e80| 65 2d 3e 74 6d 5f 6d 69 | 6e 3b 0a 58 09 62 69 67 |e->tm_mi|n;.X.big|
|00002e90| 5f 6e 75 6d 73 28 74 5f | 68 6f 75 72 2c 20 74 5f |_nums(t_|hour, t_|
|00002ea0| 6d 69 6e 29 3b 0a 58 09 | 74 5f 73 65 63 20 3d 20 |min);.X.|t_sec = |
|00002eb0| 6c 6f 63 5f 74 69 6d 65 | 2d 3e 74 6d 5f 73 65 63 |loc_time|->tm_sec|
|00002ec0| 3b 0a 58 09 63 6f 6c 6f | 6e 20 3d 20 28 63 6f 6c |;.X.colo|n = (col|
|00002ed0| 6f 6e 20 3d 3d 20 39 29 | 20 3f 20 34 20 3a 20 39 |on == 9)| ? 4 : 9|
|00002ee0| 3b 0a 58 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |;.X.wmov|e(scr, N|
|00002ef0| 42 41 53 45 20 2b 20 63 | 6f 6c 6f 6e 2c 20 63 75 |BASE + c|olon, cu|
|00002f00| 72 72 5f 63 6f 6c 29 3b | 0a 58 09 77 72 65 66 72 |rr_col);|.X.wrefr|
|00002f10| 65 73 68 28 73 63 72 29 | 3b 0a 58 09 69 66 20 28 |esh(scr)|;.X.if (|
|00002f20| 72 65 66 72 65 73 68 5f | 72 61 74 65 20 25 20 36 |refresh_|rate % 6|
|00002f30| 30 20 3d 3d 20 30 29 0a | 58 09 09 64 65 6c 74 61 |0 == 0).|X..delta|
|00002f40| 20 3d 20 72 65 66 72 65 | 73 68 5f 72 61 74 65 0a | = refre|sh_rate.|
|00002f50| 58 09 09 09 2d 20 28 28 | 74 5f 6d 69 6e 20 25 20 |X...- ((|t_min % |
|00002f60| 28 72 65 66 72 65 73 68 | 5f 72 61 74 65 20 2f 20 |(refresh|_rate / |
|00002f70| 36 30 29 29 20 2a 20 36 | 30 29 0a 58 09 09 09 2d |60)) * 6|0).X...-|
|00002f80| 20 28 74 5f 73 65 63 20 | 25 20 36 30 29 3b 0a 58 | (t_sec |% 60);.X|
|00002f90| 09 65 6c 73 65 0a 58 09 | 09 64 65 6c 74 61 20 3d |.else.X.|.delta =|
|00002fa0| 20 72 65 66 72 65 73 68 | 5f 72 61 74 65 20 2d 20 | refresh|_rate - |
|00002fb0| 28 74 5f 73 65 63 20 25 | 20 72 65 66 72 65 73 68 |(t_sec %| refresh|
|00002fc0| 5f 72 61 74 65 29 3b 0a | 58 09 69 66 20 28 64 65 |_rate);.|X.if (de|
|00002fd0| 6c 74 61 20 3e 20 30 29 | 20 28 76 6f 69 64 29 20 |lta > 0)| (void) |
|00002fe0| 73 6c 65 65 70 28 28 75 | 6e 73 69 67 6e 65 64 29 |sleep((u|nsigned)|
|00002ff0| 20 64 65 6c 74 61 29 3b | 0a 58 09 65 6c 73 65 20 | delta);|.X.else |
|00003000| 28 76 6f 69 64 29 20 73 | 6c 65 65 70 28 72 65 66 |(void) s|leep(ref|
|00003010| 72 65 73 68 5f 72 61 74 | 65 29 3b 0a 58 23 69 66 |resh_rat|e);.X#if|
|00003020| 64 65 66 09 4d 53 44 4f | 53 0a 58 09 77 68 69 6c |def.MSDO|S.X.whil|
|00003030| 65 20 28 6b 62 68 69 74 | 28 29 29 20 28 76 6f 69 |e (kbhit|()) (voi|
|00003040| 64 29 20 67 65 74 63 68 | 28 29 3b 0a 58 23 65 6e |d) getch|();.X#en|
|00003050| 64 69 66 0a 58 7d 0a 58 | 0a 58 69 6e 74 20 6d 61 |dif.X}.X|.Xint ma|
|00003060| 69 6e 28 61 72 67 63 2c | 20 61 72 67 76 29 0a 58 |in(argc,| argv).X|
|00003070| 69 6e 74 20 61 72 67 63 | 3b 0a 58 63 68 61 72 20 |int argc|;.Xchar |
|00003080| 2a 61 72 67 76 5b 5d 3b | 0a 58 7b 0a 58 23 69 66 |*argv[];|.X{.X#if|
|00003090| 64 65 66 20 42 53 44 0a | 58 09 73 74 72 75 63 74 |def BSD.|X.struct|
|000030a0| 20 73 67 74 74 79 62 20 | 74 74 79 5f 6f 6c 64 2c | sgttyb |tty_old,|
|000030b0| 20 74 74 79 5f 6e 65 77 | 3b 0a 58 23 65 6e 64 69 | tty_new|;.X#endi|
|000030c0| 66 0a 58 23 69 66 64 65 | 66 09 4d 53 44 4f 53 0a |f.X#ifde|f.MSDOS.|
|000030d0| 58 09 69 6e 74 20 62 72 | 6b 5f 6f 6c 64 3b 0a 58 |X.int br|k_old;.X|
|000030e0| 0a 58 09 62 72 6b 5f 6f | 6c 64 20 3d 20 73 65 74 |.X.brk_o|ld = set|
|000030f0| 62 72 65 61 6b 28 54 52 | 55 45 29 3b 0a 58 09 69 |break(TR|UE);.X.i|
|00003100| 66 20 28 61 72 67 63 20 | 3d 3d 20 31 29 20 72 65 |f (argc |== 1) re|
|00003110| 66 72 65 73 68 5f 72 61 | 74 65 20 3d 20 31 3b 0a |fresh_ra|te = 1;.|
|00003120| 58 23 65 6c 73 65 0a 58 | 09 69 66 20 28 61 72 67 |X#else.X|.if (arg|
|00003130| 63 20 3d 3d 20 31 29 20 | 72 65 66 72 65 73 68 5f |c == 1) |refresh_|
|00003140| 72 61 74 65 20 3d 20 36 | 30 3b 0a 58 23 65 6e 64 |rate = 6|0;.X#end|
|00003150| 69 66 0a 58 09 65 6c 73 | 65 20 69 66 20 28 61 72 |if.X.els|e if (ar|
|00003160| 67 63 20 3d 3d 20 32 29 | 20 72 65 66 72 65 73 68 |gc == 2)| refresh|
|00003170| 5f 72 61 74 65 20 3d 20 | 61 74 6f 69 28 61 72 67 |_rate = |atoi(arg|
|00003180| 76 5b 31 5d 29 3b 0a 58 | 09 65 6c 73 65 20 7b 0a |v[1]);.X|.else {.|
|00003190| 58 09 09 28 76 6f 69 64 | 29 20 70 72 69 6e 74 66 |X..(void|) printf|
|000031a0| 28 22 55 73 61 67 65 3a | 20 25 73 20 5b 72 65 66 |("Usage:| %s [ref|
|000031b0| 72 65 73 68 5f 72 61 74 | 65 5d 5c 6e 22 2c 20 61 |resh_rat|e]\n", a|
|000031c0| 72 67 76 5b 30 5d 29 3b | 0a 58 09 09 65 78 69 74 |rgv[0]);|.X..exit|
|000031d0| 28 31 29 3b 0a 58 09 7d | 0a 58 09 69 66 20 28 72 |(1);.X.}|.X.if (r|
|000031e0| 65 66 72 65 73 68 5f 72 | 61 74 65 20 3c 20 31 29 |efresh_r|ate < 1)|
|000031f0| 20 72 65 66 72 65 73 68 | 5f 72 61 74 65 20 3d 20 | refresh|_rate = |
|00003200| 31 3b 0a 58 23 69 66 64 | 65 66 20 42 53 44 0a 58 |1;.X#ifd|ef BSD.X|
|00003210| 09 69 66 20 28 69 6f 63 | 74 6c 28 31 2c 20 54 49 |.if (ioc|tl(1, TI|
|00003220| 4f 43 47 45 54 50 2c 20 | 26 74 74 79 5f 6f 6c 64 |OCGETP, |&tty_old|
|00003230| 29 20 3c 20 30 29 20 70 | 65 72 72 6f 72 28 22 69 |) < 0) p|error("i|
|00003240| 6f 63 74 6c 20 54 49 4f | 43 47 45 54 50 22 29 3b |octl TIO|CGETP");|
|00003250| 0a 58 09 74 74 79 5f 6e | 65 77 20 3d 20 74 74 79 |.X.tty_n|ew = tty|
|00003260| 5f 6f 6c 64 3b 0a 58 09 | 74 74 79 5f 6e 65 77 2e |_old;.X.|tty_new.|
|00003270| 73 67 5f 66 6c 61 67 73 | 20 7c 3d 20 58 54 41 42 |sg_flags| |= XTAB|
|00003280| 53 3b 0a 58 09 69 66 20 | 28 69 6f 63 74 6c 28 31 |S;.X.if |(ioctl(1|
|00003290| 2c 20 54 49 4f 43 53 45 | 54 50 2c 20 26 74 74 79 |, TIOCSE|TP, &tty|
|000032a0| 5f 6e 65 77 29 20 3c 20 | 30 29 20 70 65 72 72 6f |_new) < |0) perro|
|000032b0| 72 28 22 69 6f 63 74 6c | 20 54 49 4f 43 53 45 54 |r("ioctl| TIOCSET|
|000032c0| 50 22 29 3b 0a 58 23 65 | 6e 64 69 66 0a 58 09 69 |P");.X#e|ndif.X.i|
|000032d0| 6e 69 74 73 63 72 28 29 | 3b 0a 58 09 42 41 53 45 |nitscr()|;.X.BASE|
|000032e0| 20 3d 20 4c 49 4e 45 53 | 20 2d 20 32 31 20 2b 20 | = LINES| - 21 + |
|000032f0| 53 59 53 4c 49 4e 45 3b | 0a 58 09 4e 42 41 53 45 |SYSLINE;|.X.NBASE|
|00003300| 20 3d 20 42 41 53 45 20 | 2b 20 44 49 47 49 54 53 | = BASE |+ DIGITS|
|00003310| 3b 0a 58 09 28 76 6f 69 | 64 29 20 67 65 74 68 6f |;.X.(voi|d) getho|
|00003320| 73 74 6e 61 6d 65 28 6d | 79 6e 61 6d 65 2c 73 69 |stname(m|yname,si|
|00003330| 7a 65 6f 66 28 6d 79 6e | 61 6d 65 29 29 3b 0a 58 |zeof(myn|ame));.X|
|00003340| 09 6e 6f 65 63 68 6f 28 | 29 3b 0a 58 09 6e 6f 6e |.noecho(|);.X.non|
|00003350| 6c 28 29 3b 0a 58 09 73 | 63 72 20 3d 20 6e 65 77 |l();.X.s|cr = new|
|00003360| 77 69 6e 28 4c 49 4e 45 | 53 2c 20 43 4f 4c 53 2c |win(LINE|S, COLS,|
|00003370| 20 30 2c 20 30 29 3b 0a | 58 09 73 63 72 6f 6c 6c | 0, 0);.|X.scroll|
|00003380| 6f 6b 28 73 63 72 2c 20 | 46 41 4c 53 45 29 3b 0a |ok(scr, |FALSE);.|
|00003390| 58 09 6c 65 61 76 65 6f | 6b 28 73 63 72 2c 20 46 |X.leaveo|k(scr, F|
|000033a0| 41 4c 53 45 29 3b 0a 58 | 09 77 63 6c 65 61 72 28 |ALSE);.X|.wclear(|
|000033b0| 73 63 72 29 3b 0a 58 09 | 28 76 6f 69 64 29 20 73 |scr);.X.|(void) s|
|000033c0| 69 67 6e 61 6c 28 53 49 | 47 49 4e 54 2c 20 6f 6e |ignal(SI|GINT, on|
|000033d0| 5f 69 6e 74 72 29 3b 0a | 58 09 66 6f 72 20 28 20 |_intr);.|X.for ( |
|000033e0| 3b 20 72 65 66 72 65 73 | 68 5f 72 61 74 65 3b 20 |; refres|h_rate; |
|000033f0| 29 20 74 69 6d 65 5f 75 | 70 64 61 74 65 28 29 3b |) time_u|pdate();|
|00003400| 0a 58 09 77 63 6c 65 61 | 72 28 73 63 72 29 3b 0a |.X.wclea|r(scr);.|
|00003410| 58 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4c 49 4e |X.wmove(|scr, LIN|
|00003420| 45 53 20 2d 20 31 2c 20 | 30 29 3b 0a 58 09 77 63 |ES - 1, |0);.X.wc|
|00003430| 6c 72 74 6f 65 6f 6c 28 | 73 63 72 29 3b 0a 58 09 |lrtoeol(|scr);.X.|
|00003440| 77 72 65 66 72 65 73 68 | 28 73 63 72 29 3b 0a 58 |wrefresh|(scr);.X|
|00003450| 09 65 6e 64 77 69 6e 28 | 29 3b 0a 58 23 69 66 64 |.endwin(|);.X#ifd|
|00003460| 65 66 20 42 53 44 0a 58 | 09 69 66 20 28 69 6f 63 |ef BSD.X|.if (ioc|
|00003470| 74 6c 28 31 2c 20 54 49 | 4f 43 53 45 54 50 2c 20 |tl(1, TI|OCSETP, |
|00003480| 26 74 74 79 5f 6f 6c 64 | 29 20 3c 20 30 29 20 70 |&tty_old|) < 0) p|
|00003490| 65 72 72 6f 72 28 22 69 | 6f 63 74 6c 20 54 49 4f |error("i|octl TIO|
|000034a0| 43 53 45 54 50 22 29 3b | 0a 58 23 65 6e 64 69 66 |CSETP");|.X#endif|
|000034b0| 0a 58 23 69 66 64 65 66 | 09 4d 53 44 4f 53 0a 58 |.X#ifdef|.MSDOS.X|
|000034c0| 09 28 76 6f 69 64 29 20 | 73 65 74 62 72 65 61 6b |.(void) |setbreak|
|000034d0| 28 62 72 6b 5f 6f 6c 64 | 29 3b 0a 58 23 65 6e 64 |(brk_old|);.X#end|
|000034e0| 69 66 0a 58 09 72 65 74 | 75 72 6e 28 30 29 3b 0a |if.X.ret|urn(0);.|
|000034f0| 58 7d 0a 53 48 41 52 5f | 45 4f 46 0a 66 69 0a 69 |X}.SHAR_|EOF.fi.i|
|00003500| 66 20 74 65 73 74 20 2d | 66 20 27 64 69 67 69 74 |f test -|f 'digit|
|00003510| 73 2e 63 27 0a 74 68 65 | 6e 0a 09 65 63 68 6f 20 |s.c'.the|n..echo |
|00003520| 73 68 61 72 3a 20 22 77 | 69 6c 6c 20 6e 6f 74 20 |shar: "w|ill not |
|00003530| 6f 76 65 72 2d 77 72 69 | 74 65 20 65 78 69 73 74 |over-wri|te exist|
|00003540| 69 6e 67 20 66 69 6c 65 | 20 27 64 69 67 69 74 73 |ing file| 'digits|
|00003550| 2e 63 27 22 0a 65 6c 73 | 65 0a 73 65 64 20 27 73 |.c'".els|e.sed 's|
|00003560| 2f 5e 58 2f 2f 27 20 3c | 3c 20 5c 53 48 41 52 5f |/^X//' <|< \SHAR_|
|00003570| 45 4f 46 20 3e 20 27 64 | 69 67 69 74 73 2e 63 27 |EOF > 'd|igits.c'|
|00003580| 0a 58 2f 2a 20 20 20 43 | 6f 70 79 72 69 67 68 74 |.X/* C|opyright|
|00003590| 20 28 63 29 20 31 39 38 | 38 20 62 79 20 47 65 6f | (c) 198|8 by Geo|
|000035a0| 72 67 65 20 4d 2e 20 53 | 69 70 65 2e 20 20 41 6c |rge M. S|ipe. Al|
|000035b0| 6c 20 72 69 67 68 74 73 | 20 72 65 73 65 72 76 65 |l rights| reserve|
|000035c0| 64 2e 0a 58 0a 58 54 68 | 69 73 20 73 6f 66 74 77 |d..X.XTh|is softw|
|000035d0| 61 72 65 20 6d 61 79 20 | 6f 6e 6c 79 20 62 65 20 |are may |only be |
|000035e0| 72 65 64 69 73 74 72 69 | 62 75 74 65 64 20 77 69 |redistri|buted wi|
|000035f0| 74 68 6f 75 74 20 66 65 | 65 20 61 6e 64 20 77 69 |thout fe|e and wi|
|00003600| 74 68 6f 75 74 20 61 6e | 79 0a 58 6f 74 68 65 72 |thout an|y.Xother|
|00003610| 20 66 6f 72 6d 20 6f 66 | 20 6d 6f 6e 65 74 61 72 | form of| monetar|
|00003620| 79 20 67 61 69 6e 20 28 | 69 6e 63 6c 75 64 69 6e |y gain (|includin|
|00003630| 67 20 73 6f 6c 64 2c 20 | 72 65 6e 74 65 64 2c 20 |g sold, |rented, |
|00003640| 6c 65 61 73 65 64 2c 20 | 6f 72 0a 58 74 72 61 64 |leased, |or.Xtrad|
|00003650| 65 64 29 2c 20 75 6e 6c | 65 73 73 20 74 68 65 20 |ed), unl|ess the |
|00003660| 65 78 70 72 65 73 73 20 | 77 72 69 74 74 65 6e 20 |express |written |
|00003670| 70 65 72 6d 69 73 73 69 | 6f 6e 20 6f 66 20 74 68 |permissi|on of th|
|00003680| 65 20 63 6f 70 79 72 69 | 67 68 74 20 68 6f 6c 64 |e copyri|ght hold|
|00003690| 65 72 0a 58 69 73 20 6f | 62 74 61 69 6e 65 64 20 |er.Xis o|btained |
|000036a0| 69 6e 20 61 64 76 61 6e | 63 65 2e 0a 58 0a 58 54 |in advan|ce..X.XT|
|000036b0| 68 69 73 20 63 6f 70 79 | 72 69 67 68 74 20 6e 6f |his copy|right no|
|000036c0| 74 69 63 65 20 6d 75 73 | 74 20 62 65 20 72 65 70 |tice mus|t be rep|
|000036d0| 72 6f 64 75 63 65 64 20 | 69 6e 20 69 74 73 20 65 |roduced |in its e|
|000036e0| 6e 74 69 72 65 74 79 20 | 6f 6e 20 61 6c 6c 20 63 |ntirety |on all c|
|000036f0| 6f 70 69 65 73 0a 58 6f | 66 20 74 68 69 73 20 73 |opies.Xo|f this s|
|00003700| 6f 66 74 77 61 72 65 2e | 20 20 46 75 72 74 68 65 |oftware.| Furthe|
|00003710| 72 2c 20 61 63 6b 6e 6f | 77 6c 65 64 67 6d 65 6e |r, ackno|wledgmen|
|00003720| 74 20 6f 66 20 74 68 65 | 20 61 75 74 68 6f 72 73 |t of the| authors|
|00003730| 68 69 70 20 6f 66 20 74 | 68 69 73 0a 58 73 6f 66 |hip of t|his.Xsof|
|00003740| 74 77 61 72 65 20 6d 75 | 73 74 20 6e 6f 74 20 62 |tware mu|st not b|
|00003750| 65 20 72 65 6d 6f 76 65 | 64 20 66 72 6f 6d 20 69 |e remove|d from i|
|00003760| 74 73 20 63 75 72 72 65 | 6e 74 20 6f 72 20 64 65 |ts curre|nt or de|
|00003770| 72 69 76 65 64 0a 58 64 | 6f 63 75 6d 65 6e 74 61 |rived.Xd|ocumenta|
|00003780| 74 69 6f 6e 2e 0a 58 0a | 58 4e 6f 20 65 78 70 72 |tion..X.|XNo expr|
|00003790| 65 73 73 65 64 20 6f 72 | 20 69 6d 70 6c 69 65 64 |essed or| implied|
|000037a0| 20 77 61 72 72 61 6e 74 | 79 20 69 73 20 6d 61 64 | warrant|y is mad|
|000037b0| 65 20 66 6f 72 20 74 68 | 69 73 20 73 6f 66 74 77 |e for th|is softw|
|000037c0| 61 72 65 2e 20 20 4e 6f | 20 70 61 72 74 79 0a 58 |are. No| party.X|
|000037d0| 63 6f 6e 6e 65 63 74 65 | 64 20 77 69 74 68 20 74 |connecte|d with t|
|000037e0| 68 69 73 20 73 6f 66 74 | 77 61 72 65 20 61 73 73 |his soft|ware ass|
|000037f0| 75 6d 65 73 20 61 6e 79 | 20 6c 69 61 62 69 6c 69 |umes any| liabili|
|00003800| 74 79 20 6f 72 20 72 65 | 73 70 6f 6e 73 69 62 69 |ty or re|sponsibi|
|00003810| 6c 69 74 79 0a 58 66 6f | 72 20 69 74 73 20 75 73 |lity.Xfo|r its us|
|00003820| 65 2c 20 74 68 65 20 63 | 6f 72 72 65 63 74 6e 65 |e, the c|orrectne|
|00003830| 73 73 20 6f 66 20 69 74 | 73 20 6f 70 65 72 61 74 |ss of it|s operat|
|00003840| 69 6f 6e 2c 20 6f 72 20 | 69 74 73 20 66 69 74 6e |ion, or |its fitn|
|00003850| 65 73 73 20 66 6f 72 20 | 61 6e 79 0a 58 70 75 72 |ess for |any.Xpur|
|00003860| 70 6f 73 65 2e 0a 58 0a | 58 41 6e 79 20 64 69 73 |pose..X.|XAny dis|
|00003870| 74 72 69 62 75 74 6f 72 | 20 6f 66 20 63 6f 70 69 |tributor| of copi|
|00003880| 65 73 20 6f 66 20 74 68 | 69 73 20 73 6f 66 74 77 |es of th|is softw|
|00003890| 61 72 65 20 73 68 61 6c | 6c 20 67 72 61 6e 74 20 |are shal|l grant |
|000038a0| 74 68 65 20 72 65 63 69 | 70 69 65 6e 74 0a 58 70 |the reci|pient.Xp|
|000038b0| 65 72 6d 69 73 73 69 6f | 6e 20 66 6f 72 20 66 75 |ermissio|n for fu|
|000038c0| 72 74 68 65 72 20 72 65 | 64 69 73 74 72 69 62 75 |rther re|distribu|
|000038d0| 74 69 6f 6e 20 61 73 20 | 70 65 72 6d 69 74 74 65 |tion as |permitte|
|000038e0| 64 20 62 79 20 74 68 69 | 73 20 6e 6f 74 69 63 65 |d by thi|s notice|
|000038f0| 2e 0a 58 0a 58 50 65 72 | 6d 69 73 73 69 6f 6e 20 |..X.XPer|mission |
|00003900| 69 73 20 68 65 72 65 62 | 79 20 67 72 61 6e 74 65 |is hereb|y grante|
|00003910| 64 20 74 6f 20 63 6f 70 | 79 2c 20 72 65 70 72 6f |d to cop|y, repro|
|00003920| 64 75 63 65 2c 20 72 65 | 64 69 73 74 72 69 62 75 |duce, re|distribu|
|00003930| 74 65 20 61 6e 64 0a 58 | 6f 74 68 65 72 77 69 73 |te and.X|otherwis|
|00003940| 65 20 75 73 65 20 74 68 | 69 73 20 73 6f 66 74 77 |e use th|is softw|
|00003950| 61 72 65 20 61 73 20 6c | 6f 6e 67 20 61 73 20 74 |are as l|ong as t|
|00003960| 68 65 20 63 6f 6e 64 69 | 74 69 6f 6e 73 20 61 62 |he condi|tions ab|
|00003970| 6f 76 65 20 61 72 65 0a | 58 73 74 72 69 63 74 6c |ove are.|Xstrictl|
|00003980| 79 20 61 64 68 65 72 65 | 64 20 74 6f 2e 0a 58 0a |y adhere|d to..X.|
|00003990| 58 09 4e 4f 54 45 3a 20 | 20 54 68 69 73 20 73 6f |X.NOTE: | This so|
|000039a0| 66 74 77 61 72 65 20 77 | 61 73 20 6f 72 69 67 69 |ftware w|as origi|
|000039b0| 6e 61 6c 6c 79 20 77 72 | 69 74 74 65 6e 20 62 79 |nally wr|itten by|
|000039c0| 20 4a 69 6d 20 45 61 72 | 65 6e 6c 75 69 6e 64 69 | Jim Ear|enluindi|
|000039d0| 6c 0a 58 09 54 72 65 74 | 68 65 77 65 79 20 61 6e |l.X.Tret|hewey an|
|000039e0| 64 20 6d 6f 64 69 66 69 | 65 64 20 62 79 20 47 65 |d modifi|ed by Ge|
|000039f0| 6f 72 67 65 20 4d 2e 20 | 53 69 70 65 20 28 72 65 |orge M. |Sipe (re|
|00003a00| 62 65 6c 21 67 65 6f 72 | 67 65 29 20 74 6f 20 74 |bel!geor|ge) to t|
|00003a10| 68 65 0a 58 09 70 6f 69 | 6e 74 20 77 68 65 72 65 |he.X.poi|nt where|
|00003a20| 20 4a 69 6d 20 77 6f 75 | 6c 64 20 6e 6f 20 6c 6f | Jim wou|ld no lo|
|00003a30| 6e 67 65 72 20 72 65 63 | 6f 67 6e 69 7a 65 20 69 |nger rec|ognize i|
|00003a40| 74 2e 20 20 4e 6f 20 63 | 6f 70 79 72 69 67 68 74 |t. No c|opyright|
|00003a50| 0a 58 09 6e 6f 74 69 63 | 65 73 20 77 65 72 65 20 |.X.notic|es were |
|00003a60| 65 6d 62 6f 64 69 65 64 | 20 69 6e 20 74 68 65 20 |embodied| in the |
|00003a70| 6f 72 69 67 69 6e 61 6c | 20 6e 65 74 20 64 69 73 |original| net dis|
|00003a80| 74 72 69 62 75 74 69 6f | 6e 2e 0a 58 2a 2f 0a 58 |tributio|n..X*/.X|
|00003a90| 0a 58 23 69 6e 63 6c 75 | 64 65 20 3c 63 75 72 73 |.X#inclu|de <curs|
|00003aa0| 65 73 2e 68 3e 0a 58 0a | 58 23 69 66 6e 64 65 66 |es.h>.X.|X#ifndef|
|00003ab0| 09 4d 53 44 4f 53 0a 58 | 65 78 74 65 72 6e 20 20 |.MSDOS.X|extern |
|00003ac0| 76 6f 69 64 20 70 72 5f | 63 6f 6c 6f 6e 28 29 3b |void pr_|colon();|
|00003ad0| 0a 58 65 78 74 65 72 6e | 20 20 76 6f 69 64 20 70 |.Xextern| void p|
|00003ae0| 72 5f 73 70 61 63 65 28 | 29 3b 0a 58 65 78 74 65 |r_space(|);.Xexte|
|00003af0| 72 6e 20 20 76 6f 69 64 | 20 70 72 5f 62 69 67 28 |rn void| pr_big(|
|00003b00| 29 3b 0a 58 23 65 6c 73 | 65 0a 58 65 78 74 65 72 |);.X#els|e.Xexter|
|00003b10| 6e 20 20 76 6f 69 64 20 | 70 72 5f 63 6f 6c 6f 6e |n void |pr_colon|
|00003b20| 28 69 6e 74 20 63 6f 6c | 29 3b 0a 58 65 78 74 65 |(int col|);.Xexte|
|00003b30| 72 6e 20 20 76 6f 69 64 | 20 70 72 5f 73 70 61 63 |rn void| pr_spac|
|00003b40| 65 28 76 6f 69 64 29 3b | 0a 58 65 78 74 65 72 6e |e(void);|.Xextern|
|00003b50| 20 20 76 6f 69 64 20 70 | 72 5f 62 69 67 28 69 6e | void p|r_big(in|
|00003b60| 74 20 6e 75 6d 2c 69 6e | 74 20 63 6f 6c 29 3b 0a |t num,in|t col);.|
|00003b70| 58 23 65 6e 64 69 66 0a | 58 0a 58 65 78 74 65 72 |X#endif.|X.Xexter|
|00003b80| 6e 20 57 49 4e 44 4f 57 | 20 2a 73 63 72 3b 09 09 |n WINDOW| *scr;..|
|00003b90| 2f 2a 20 73 63 72 65 65 | 6e 20 77 68 65 72 65 20 |/* scree|n where |
|00003ba0| 6c 61 72 67 65 20 6e 75 | 6d 62 65 72 73 20 64 69 |large nu|mbers di|
|00003bb0| 73 70 6c 61 79 65 64 20 | 2a 2f 0a 58 65 78 74 65 |splayed |*/.Xexte|
|00003bc0| 72 6e 20 69 6e 74 20 63 | 75 72 72 5f 63 6f 6c 3b |rn int c|urr_col;|
|00003bd0| 09 09 2f 2a 20 63 75 72 | 72 65 6e 74 20 63 65 6e |../* cur|rent cen|
|00003be0| 74 65 72 20 6f 66 20 63 | 6f 6c 6f 6e 20 63 6f 6c |ter of c|olon col|
|00003bf0| 75 6d 6e 20 2a 2f 0a 58 | 65 78 74 65 72 6e 20 69 |umn */.X|extern i|
|00003c00| 6e 74 20 4e 42 41 53 45 | 3b 09 09 2f 2a 20 6e 75 |nt NBASE|;../* nu|
|00003c10| 6d 65 72 69 63 20 62 61 | 73 65 20 6c 69 6e 65 20 |meric ba|se line |
|00003c20| 66 6f 72 20 6f 75 74 70 | 75 74 20 2a 2f 0a 58 0a |for outp|ut */.X.|
|00003c30| 58 76 6f 69 64 20 70 72 | 5f 63 6f 6c 6f 6e 28 63 |Xvoid pr|_colon(c|
|00003c40| 6f 6c 29 0a 58 69 6e 74 | 20 63 6f 6c 3b 0a 58 7b |ol).Xint| col;.X{|
|00003c50| 0a 58 09 63 75 72 72 5f | 63 6f 6c 20 3d 20 63 6f |.X.curr_|col = co|
|00003c60| 6c 20 2b 20 31 3b 0a 58 | 09 77 6d 6f 76 65 28 73 |l + 1;.X|.wmove(s|
|00003c70| 63 72 2c 20 4e 42 41 53 | 45 20 20 20 20 20 2c 20 |cr, NBAS|E , |
|00003c80| 63 6f 6c 29 3b 20 77 70 | 72 69 6e 74 77 28 73 63 |col); wp|rintw(sc|
|00003c90| 72 2c 20 22 20 20 20 22 | 29 3b 0a 58 09 77 6d 6f |r, " "|);.X.wmo|
|00003ca0| 76 65 28 73 63 72 2c 20 | 4e 42 41 53 45 20 2b 20 |ve(scr, |NBASE + |
|00003cb0| 20 31 2c 20 63 6f 6c 29 | 3b 20 77 70 72 69 6e 74 | 1, col)|; wprint|
|00003cc0| 77 28 73 63 72 2c 20 22 | 20 20 20 22 29 3b 0a 58 |w(scr, "| ");.X|
|00003cd0| 09 77 6d 6f 76 65 28 73 | 63 72 2c 20 4e 42 41 53 |.wmove(s|cr, NBAS|
|00003ce0| 45 20 2b 20 20 32 2c 20 | 63 6f 6c 29 3b 20 77 70 |E + 2, |col); wp|
|00003cf0| 72 69 6e 74 77 28 73 63 | 72 2c 20 22 20 20 20 22 |rintw(sc|r, " "|
|00003d00| 29 3b 0a 58 09 77 6d 6f | 76 65 28 73 63 72 2c 20 |);.X.wmo|ve(scr, |
|00003d10| 4e 42 41 53 45 20 2b 20 | 20 33 2c 20 63 6f 6c 29 |NBASE + | 3, col)|
|00003d20| 3b 20 77 70 72 69 6e 74 | 77 28 73 63 72 2c 20 22 |; wprint|w(scr, "|
|00003d30| 20 23 20 22 29 3b 0a 58 | 09 77 6d 6f 76 65 28 73 | # ");.X|.wmove(s|
|00003d40| 63 72 2c 20 4e 42 41 53 | 45 20 2b 20 20 34 2c 20 |cr, NBAS|E + 4, |
|00003d50| 63 6f 6c 29 3b 20 77 70 | 72 69 6e 74 77 28 73 63 |col); wp|rintw(sc|
|00003d60| 72 2c 20 22 23 23 23 22 | 29 3b 0a 58 09 77 6d 6f |r, "###"|);.X.wmo|
|00003d70| 76 65 28 73 63 72 2c 20 | 4e 42 41 53 45 20 2b 20 |ve(scr, |NBASE + |
|00003d80| 20 35 2c 20 63 6f 6c 29 | 3b 20 77 70 72 69 6e 74 | 5, col)|; wprint|
|00003d90| 77 28 73 63 72 2c 20 22 | 20 23 20 22 29 3b 0a 58 |w(scr, "| # ");.X|
|00003da0| 09 77 6d 6f 76 65 28 73 | 63 72 2c 20 4e 42 41 53 |.wmove(s|cr, NBAS|
|00003db0| 45 20 2b 20 20 36 2c 20 | 63 6f 6c 29 3b 20 77 70 |E + 6, |col); wp|
|00003dc0| 72 69 6e 74 77 28 73 63 | 72 2c 20 22 20 20 20 22 |rintw(sc|r, " "|
|00003dd0| 29 3b 0a 58 09 77 6d 6f | 76 65 28 73 63 72 2c 20 |);.X.wmo|ve(scr, |
|00003de0| 4e 42 41 53 45 20 2b 20 | 20 37 2c 20 63 6f 6c 29 |NBASE + | 7, col)|
|00003df0| 3b 20 77 70 72 69 6e 74 | 77 28 73 63 72 2c 20 22 |; wprint|w(scr, "|
|00003e00| 20 20 20 22 29 3b 0a 58 | 09 77 6d 6f 76 65 28 73 | ");.X|.wmove(s|
|00003e10| 63 72 2c 20 4e 42 41 53 | 45 20 2b 20 20 38 2c 20 |cr, NBAS|E + 8, |
|00003e20| 63 6f 6c 29 3b 20 77 70 | 72 69 6e 74 77 28 73 63 |col); wp|rintw(sc|
|00003e30| 72 2c 20 22 20 23 20 22 | 29 3b 0a 58 09 77 6d 6f |r, " # "|);.X.wmo|
|00003e40| 76 65 28 73 63 72 2c 20 | 4e 42 41 53 45 20 2b 20 |ve(scr, |NBASE + |
|00003e50| 20 39 2c 20 63 6f 6c 29 | 3b 20 77 70 72 69 6e 74 | 9, col)|; wprint|
|00003e60| 77 28 73 63 72 2c 20 22 | 23 23 23 22 29 3b 0a 58 |w(scr, "|###");.X|
|00003e70| 09 77 6d 6f 76 65 28 73 | 63 72 2c 20 4e 42 41 53 |.wmove(s|cr, NBAS|
|00003e80| 45 20 2b 20 31 30 2c 20 | 63 6f 6c 29 3b 20 77 70 |E + 10, |col); wp|
|00003e90| 72 69 6e 74 77 28 73 63 | 72 2c 20 22 20 23 20 22 |rintw(sc|r, " # "|
|00003ea0| 29 3b 0a 58 09 77 6d 6f | 76 65 28 73 63 72 2c 20 |);.X.wmo|ve(scr, |
|00003eb0| 4e 42 41 53 45 20 2b 20 | 31 31 2c 20 63 6f 6c 29 |NBASE + |11, col)|
|00003ec0| 3b 20 77 70 72 69 6e 74 | 77 28 73 63 72 2c 20 22 |; wprint|w(scr, "|
|00003ed0| 20 20 20 22 29 3b 0a 58 | 09 77 6d 6f 76 65 28 73 | ");.X|.wmove(s|
|00003ee0| 63 72 2c 20 4e 42 41 53 | 45 20 2b 20 31 32 2c 20 |cr, NBAS|E + 12, |
|00003ef0| 63 6f 6c 29 3b 20 77 70 | 72 69 6e 74 77 28 73 63 |col); wp|rintw(sc|
|00003f00| 72 2c 20 22 20 20 20 22 | 29 3b 0a 58 09 77 6d 6f |r, " "|);.X.wmo|
|00003f10| 76 65 28 73 63 72 2c 20 | 4e 42 41 53 45 20 2b 20 |ve(scr, |NBASE + |
|00003f20| 31 33 2c 20 63 6f 6c 29 | 3b 20 77 70 72 69 6e 74 |13, col)|; wprint|
|00003f30| 77 28 73 63 72 2c 20 22 | 20 20 20 22 29 3b 0a 58 |w(scr, "| ");.X|
|00003f40| 7d 0a 58 0a 58 76 6f 69 | 64 20 70 72 5f 73 70 61 |}.X.Xvoi|d pr_spa|
|00003f50| 63 65 28 29 0a 58 7b 0a | 58 09 69 6e 74 20 69 3b |ce().X{.|X.int i;|
|00003f60| 0a 58 09 66 6f 72 28 69 | 20 3d 20 4e 42 41 53 45 |.X.for(i| = NBASE|
|00003f70| 3b 20 69 20 3c 20 4e 42 | 41 53 45 20 2b 20 31 34 |; i < NB|ASE + 14|
|00003f80| 3b 20 69 2b 2b 29 20 7b | 0a 58 09 09 77 6d 6f 76 |; i++) {|.X..wmov|
|00003f90| 65 28 73 63 72 2c 20 69 | 2c 20 20 39 29 3b 0a 58 |e(scr, i|, 9);.X|
|00003fa0| 09 09 77 70 72 69 6e 74 | 77 28 73 63 72 2c 20 22 |..wprint|w(scr, "|
|00003fb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003fc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003fd0| 20 20 20 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 | ");.X|..wmove(|
|00003fe0| 73 63 72 2c 20 69 2c 20 | 34 32 29 3b 0a 58 09 09 |scr, i, |42);.X..|
|00003ff0| 77 70 72 69 6e 74 77 28 | 73 63 72 2c 20 22 20 20 |wprintw(|scr, " |
|00004000| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004010| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004020| 20 22 29 3b 0a 58 09 7d | 0a 58 7d 0a 58 0a 58 76 | ");.X.}|.X}.X.Xv|
|00004030| 6f 69 64 20 70 72 5f 62 | 69 67 28 6e 75 6d 2c 20 |oid pr_b|ig(num, |
|00004040| 63 6f 6c 29 0a 58 69 6e | 74 20 6e 75 6d 3b 0a 58 |col).Xin|t num;.X|
|00004050| 69 6e 74 20 63 6f 6c 3b | 0a 58 7b 0a 58 09 69 66 |int col;|.X{.X.if|
|00004060| 28 6e 75 6d 20 3d 3d 20 | 30 29 20 7b 0a 58 09 09 |(num == |0) {.X..|
|00004070| 77 6d 6f 76 65 28 73 63 | 72 2c 20 4e 42 41 53 45 |wmove(sc|r, NBASE|
|00004080| 20 20 20 20 20 2c 20 63 | 6f 6c 29 3b 20 77 70 72 | , c|ol); wpr|
|00004090| 69 6e 74 77 28 73 63 72 | 2c 20 22 20 20 20 23 23 |intw(scr|, " ##|
|000040a0| 23 23 23 23 20 20 20 22 | 29 3b 0a 58 09 09 77 6d |#### "|);.X..wm|
|000040b0| 6f 76 65 28 73 63 72 2c | 20 4e 42 41 53 45 20 2b |ove(scr,| NBASE +|
|000040c0| 20 20 31 2c 20 63 6f 6c | 29 3b 20 77 70 72 69 6e | 1, col|); wprin|
|000040d0| 74 77 28 73 63 72 2c 20 | 22 20 23 23 23 23 23 23 |tw(scr, |" ######|
|000040e0| 23 23 23 23 20 22 29 3b | 0a 58 09 09 77 6d 6f 76 |#### ");|.X..wmov|
|000040f0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 2b 20 20 |e(scr, N|BASE + |
|00004100| 32 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 |2, col);| wprintw|
|00004110| 28 73 63 72 2c 20 22 23 | 23 23 23 20 20 20 20 23 |(scr, "#|### #|
|00004120| 23 23 23 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 |###");.X|..wmove(|
|00004130| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 20 33 2c |scr, NBA|SE + 3,|
|00004140| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00004150| 63 72 2c 20 22 23 23 23 | 20 20 20 20 20 20 23 23 |cr, "###| ##|
|00004160| 23 22 29 3b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 |#");.X..|wmove(sc|
|00004170| 72 2c 20 4e 42 41 53 45 | 20 2b 20 20 34 2c 20 63 |r, NBASE| + 4, c|
|00004180| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00004190| 2c 20 22 23 23 23 20 20 | 20 20 20 20 23 23 23 22 |, "### | ###"|
|000041a0| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|000041b0| 20 4e 42 41 53 45 20 2b | 20 20 35 2c 20 63 6f 6c | NBASE +| 5, col|
|000041c0| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|000041d0| 22 23 23 23 20 20 20 20 | 20 20 23 23 23 22 29 3b |"### | ###");|
|000041e0| 0a 58 09 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |.X..wmov|e(scr, N|
|000041f0| 42 41 53 45 20 2b 20 20 | 36 2c 20 63 6f 6c 29 3b |BASE + |6, col);|
|00004200| 20 77 70 72 69 6e 74 77 | 28 73 63 72 2c 20 22 23 | wprintw|(scr, "#|
|00004210| 23 23 20 20 20 20 20 20 | 23 23 23 22 29 3b 0a 58 |## |###");.X|
|00004220| 09 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4e 42 41 |..wmove(|scr, NBA|
|00004230| 53 45 20 2b 20 20 37 2c | 20 63 6f 6c 29 3b 20 77 |SE + 7,| col); w|
|00004240| 70 72 69 6e 74 77 28 73 | 63 72 2c 20 22 23 23 23 |printw(s|cr, "###|
|00004250| 20 20 20 20 20 20 23 23 | 23 22 29 3b 0a 58 09 09 | ##|#");.X..|
|00004260| 77 6d 6f 76 65 28 73 63 | 72 2c 20 4e 42 41 53 45 |wmove(sc|r, NBASE|
|00004270| 20 2b 20 20 38 2c 20 63 | 6f 6c 29 3b 20 77 70 72 | + 8, c|ol); wpr|
|00004280| 69 6e 74 77 28 73 63 72 | 2c 20 22 23 23 23 20 20 |intw(scr|, "### |
|00004290| 20 20 20 20 23 23 23 22 | 29 3b 0a 58 09 09 77 6d | ###"|);.X..wm|
|000042a0| 6f 76 65 28 73 63 72 2c | 20 4e 42 41 53 45 20 2b |ove(scr,| NBASE +|
|000042b0| 20 20 39 2c 20 63 6f 6c | 29 3b 20 77 70 72 69 6e | 9, col|); wprin|
|000042c0| 74 77 28 73 63 72 2c 20 | 22 23 23 23 20 20 20 20 |tw(scr, |"### |
|000042d0| 20 20 23 23 23 22 29 3b | 0a 58 09 09 77 6d 6f 76 | ###");|.X..wmov|
|000042e0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 2b 20 31 |e(scr, N|BASE + 1|
|000042f0| 30 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 |0, col);| wprintw|
|00004300| 28 73 63 72 2c 20 22 23 | 23 23 20 20 20 20 20 20 |(scr, "#|## |
|00004310| 23 23 23 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 |###");.X|..wmove(|
|00004320| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 31 31 2c |scr, NBA|SE + 11,|
|00004330| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00004340| 63 72 2c 20 22 23 23 23 | 23 20 20 20 20 23 23 23 |cr, "###|# ###|
|00004350| 23 22 29 3b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 |#");.X..|wmove(sc|
|00004360| 72 2c 20 4e 42 41 53 45 | 20 2b 20 31 32 2c 20 63 |r, NBASE| + 12, c|
|00004370| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00004380| 2c 20 22 20 23 23 23 23 | 23 23 23 23 23 23 20 22 |, " ####|###### "|
|00004390| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|000043a0| 20 4e 42 41 53 45 20 2b | 20 31 33 2c 20 63 6f 6c | NBASE +| 13, col|
|000043b0| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|000043c0| 22 20 20 20 23 23 23 23 | 23 23 20 20 20 22 29 3b |" ####|## ");|
|000043d0| 0a 58 09 7d 20 65 6c 73 | 65 20 69 66 28 6e 75 6d |.X.} els|e if(num|
|000043e0| 20 3d 3d 20 31 29 20 7b | 0a 58 09 09 77 6d 6f 76 | == 1) {|.X..wmov|
|000043f0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 20 20 20 |e(scr, N|BASE |
|00004400| 20 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 | , col);| wprintw|
|00004410| 28 73 63 72 2c 20 22 20 | 20 20 20 20 20 23 23 20 |(scr, " | ## |
|00004420| 20 20 20 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 | ");.X|..wmove(|
|00004430| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 20 31 2c |scr, NBA|SE + 1,|
|00004440| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00004450| 63 72 2c 20 22 20 20 20 | 20 20 23 23 23 20 20 20 |cr, " | ### |
|00004460| 20 22 29 3b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 | ");.X..|wmove(sc|
|00004470| 72 2c 20 4e 42 41 53 45 | 20 2b 20 20 32 2c 20 63 |r, NBASE| + 2, c|
|00004480| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00004490| 2c 20 22 20 20 20 20 23 | 23 23 23 20 20 20 20 22 |, " #|### "|
|000044a0| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|000044b0| 20 4e 42 41 53 45 20 2b | 20 20 33 2c 20 63 6f 6c | NBASE +| 3, col|
|000044c0| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|000044d0| 22 20 20 20 23 23 23 23 | 23 20 20 20 20 22 29 3b |" ####|# ");|
|000044e0| 0a 58 09 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |.X..wmov|e(scr, N|
|000044f0| 42 41 53 45 20 2b 20 20 | 34 2c 20 63 6f 6c 29 3b |BASE + |4, col);|
|00004500| 20 77 70 72 69 6e 74 77 | 28 73 63 72 2c 20 22 20 | wprintw|(scr, " |
|00004510| 20 20 20 20 23 23 23 20 | 20 20 20 22 29 3b 0a 58 | ### | ");.X|
|00004520| 09 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4e 42 41 |..wmove(|scr, NBA|
|00004530| 53 45 20 2b 20 20 35 2c | 20 63 6f 6c 29 3b 20 77 |SE + 5,| col); w|
|00004540| 70 72 69 6e 74 77 28 73 | 63 72 2c 20 22 20 20 20 |printw(s|cr, " |
|00004550| 20 20 23 23 23 20 20 20 | 20 22 29 3b 0a 58 09 09 | ### | ");.X..|
|00004560| 77 6d 6f 76 65 28 73 63 | 72 2c 20 4e 42 41 53 45 |wmove(sc|r, NBASE|
|00004570| 20 2b 20 20 36 2c 20 63 | 6f 6c 29 3b 20 77 70 72 | + 6, c|ol); wpr|
|00004580| 69 6e 74 77 28 73 63 72 | 2c 20 22 20 20 20 20 20 |intw(scr|, " |
|00004590| 23 23 23 20 20 20 20 22 | 29 3b 0a 58 09 09 77 6d |### "|);.X..wm|
|000045a0| 6f 76 65 28 73 63 72 2c | 20 4e 42 41 53 45 20 2b |ove(scr,| NBASE +|
|000045b0| 20 20 37 2c 20 63 6f 6c | 29 3b 20 77 70 72 69 6e | 7, col|); wprin|
|000045c0| 74 77 28 73 63 72 2c 20 | 22 20 20 20 20 20 23 23 |tw(scr, |" ##|
|000045d0| 23 20 20 20 20 22 29 3b | 0a 58 09 09 77 6d 6f 76 |# ");|.X..wmov|
|000045e0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 2b 20 20 |e(scr, N|BASE + |
|000045f0| 38 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 |8, col);| wprintw|
|00004600| 28 73 63 72 2c 20 22 20 | 20 20 20 20 23 23 23 20 |(scr, " | ### |
|00004610| 20 20 20 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 | ");.X|..wmove(|
|00004620| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 20 39 2c |scr, NBA|SE + 9,|
|00004630| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00004640| 63 72 2c 20 22 20 20 20 | 20 20 23 23 23 20 20 20 |cr, " | ### |
|00004650| 20 22 29 3b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 | ");.X..|wmove(sc|
|00004660| 72 2c 20 4e 42 41 53 45 | 20 2b 20 31 30 2c 20 63 |r, NBASE| + 10, c|
|00004670| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00004680| 2c 20 22 20 20 20 20 20 | 23 23 23 20 20 20 20 22 |, " |### "|
|00004690| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|000046a0| 20 4e 42 41 53 45 20 2b | 20 31 31 2c 20 63 6f 6c | NBASE +| 11, col|
|000046b0| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|000046c0| 22 20 20 20 20 20 23 23 | 23 20 20 20 20 22 29 3b |" ##|# ");|
|000046d0| 0a 58 09 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |.X..wmov|e(scr, N|
|000046e0| 42 41 53 45 20 2b 20 31 | 32 2c 20 63 6f 6c 29 3b |BASE + 1|2, col);|
|000046f0| 20 77 70 72 69 6e 74 77 | 28 73 63 72 2c 20 22 20 | wprintw|(scr, " |
|00004700| 20 20 23 23 23 23 23 23 | 23 20 20 22 29 3b 0a 58 | ######|# ");.X|
|00004710| 09 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4e 42 41 |..wmove(|scr, NBA|
|00004720| 53 45 20 2b 20 31 33 2c | 20 63 6f 6c 29 3b 20 77 |SE + 13,| col); w|
|00004730| 70 72 69 6e 74 77 28 73 | 63 72 2c 20 22 20 20 20 |printw(s|cr, " |
|00004740| 23 23 23 23 23 23 23 20 | 20 22 29 3b 0a 58 09 7d |####### | ");.X.}|
|00004750| 20 65 6c 73 65 20 69 66 | 28 6e 75 6d 20 3d 3d 20 | else if|(num == |
|00004760| 32 29 20 7b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 |2) {.X..|wmove(sc|
|00004770| 72 2c 20 4e 42 41 53 45 | 20 20 20 20 20 2c 20 63 |r, NBASE| , c|
|00004780| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00004790| 2c 20 22 20 20 23 23 23 | 23 23 23 23 23 20 20 22 |, " ###|##### "|
|000047a0| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|000047b0| 20 4e 42 41 53 45 20 2b | 20 20 31 2c 20 63 6f 6c | NBASE +| 1, col|
|000047c0| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|000047d0| 22 20 23 23 23 23 23 23 | 23 23 23 23 20 22 29 3b |" ######|#### ");|
|000047e0| 0a 58 09 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |.X..wmov|e(scr, N|
|000047f0| 42 41 53 45 20 2b 20 20 | 32 2c 20 63 6f 6c 29 3b |BASE + |2, col);|
|00004800| 20 77 70 72 69 6e 74 77 | 28 73 63 72 2c 20 22 23 | wprintw|(scr, "#|
|00004810| 23 23 20 20 20 20 20 23 | 23 23 23 22 29 3b 0a 58 |## #|###");.X|
|00004820| 09 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4e 42 41 |..wmove(|scr, NBA|
|00004830| 53 45 20 2b 20 20 33 2c | 20 63 6f 6c 29 3b 20 77 |SE + 3,| col); w|
|00004840| 70 72 69 6e 74 77 28 73 | 63 72 2c 20 22 23 23 23 |printw(s|cr, "###|
|00004850| 20 20 20 20 20 20 23 23 | 23 22 29 3b 0a 58 09 09 | ##|#");.X..|
|00004860| 77 6d 6f 76 65 28 73 63 | 72 2c 20 4e 42 41 53 45 |wmove(sc|r, NBASE|
|00004870| 20 2b 20 20 34 2c 20 63 | 6f 6c 29 3b 20 77 70 72 | + 4, c|ol); wpr|
|00004880| 69 6e 74 77 28 73 63 72 | 2c 20 22 20 20 20 20 20 |intw(scr|, " |
|00004890| 20 20 20 20 23 23 23 22 | 29 3b 0a 58 09 09 77 6d | ###"|);.X..wm|
|000048a0| 6f 76 65 28 73 63 72 2c | 20 4e 42 41 53 45 20 2b |ove(scr,| NBASE +|
|000048b0| 20 20 35 2c 20 63 6f 6c | 29 3b 20 77 70 72 69 6e | 5, col|); wprin|
|000048c0| 74 77 28 73 63 72 2c 20 | 22 20 20 20 20 20 20 20 |tw(scr, |" |
|000048d0| 20 20 23 23 23 22 29 3b | 0a 58 09 09 77 6d 6f 76 | ###");|.X..wmov|
|000048e0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 2b 20 20 |e(scr, N|BASE + |
|000048f0| 36 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 |6, col);| wprintw|
|00004900| 28 73 63 72 2c 20 22 20 | 20 20 20 20 20 20 20 20 |(scr, " | |
|00004910| 23 23 23 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 |###");.X|..wmove(|
|00004920| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 20 37 2c |scr, NBA|SE + 7,|
|00004930| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00004940| 63 72 2c 20 22 20 20 20 | 20 20 20 20 20 23 23 23 |cr, " | ###|
|00004950| 20 22 29 3b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 | ");.X..|wmove(sc|
|00004960| 72 2c 20 4e 42 41 53 45 | 20 2b 20 20 38 2c 20 63 |r, NBASE| + 8, c|
|00004970| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00004980| 2c 20 22 20 20 20 20 20 | 20 20 23 23 23 20 20 22 |, " | ### "|
|00004990| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|000049a0| 20 4e 42 41 53 45 20 2b | 20 20 39 2c 20 63 6f 6c | NBASE +| 9, col|
|000049b0| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|000049c0| 22 20 20 20 20 20 23 23 | 23 23 20 20 20 22 29 3b |" ##|## ");|
|000049d0| 0a 58 09 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |.X..wmov|e(scr, N|
|000049e0| 42 41 53 45 20 2b 20 31 | 30 2c 20 63 6f 6c 29 3b |BASE + 1|0, col);|
|000049f0| 20 77 70 72 69 6e 74 77 | 28 73 63 72 2c 20 22 20 | wprintw|(scr, " |
|00004a00| 20 20 23 23 23 23 20 20 | 20 20 20 22 29 3b 0a 58 | #### | ");.X|
|00004a10| 09 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4e 42 41 |..wmove(|scr, NBA|
|00004a20| 53 45 20 2b 20 31 31 2c | 20 63 6f 6c 29 3b 20 77 |SE + 11,| col); w|
|00004a30| 70 72 69 6e 74 77 28 73 | 63 72 2c 20 22 20 23 23 |printw(s|cr, " ##|
|00004a40| 23 23 20 20 20 20 20 20 | 20 22 29 3b 0a 58 09 09 |## | ");.X..|
|00004a50| 77 6d 6f 76 65 28 73 63 | 72 2c 20 4e 42 41 53 45 |wmove(sc|r, NBASE|
|00004a60| 20 2b 20 31 32 2c 20 63 | 6f 6c 29 3b 20 77 70 72 | + 12, c|ol); wpr|
|00004a70| 69 6e 74 77 28 73 63 72 | 2c 20 22 23 23 23 23 23 |intw(scr|, "#####|
|00004a80| 23 23 23 23 23 23 23 22 | 29 3b 0a 58 09 09 77 6d |#######"|);.X..wm|
|00004a90| 6f 76 65 28 73 63 72 2c | 20 4e 42 41 53 45 20 2b |ove(scr,| NBASE +|
|00004aa0| 20 31 33 2c 20 63 6f 6c | 29 3b 20 77 70 72 69 6e | 13, col|); wprin|
|00004ab0| 74 77 28 73 63 72 2c 20 | 22 23 23 23 23 23 23 23 |tw(scr, |"#######|
|00004ac0| 23 23 23 23 23 22 29 3b | 0a 58 09 7d 20 65 6c 73 |#####");|.X.} els|
|00004ad0| 65 20 69 66 28 6e 75 6d | 20 3d 3d 20 33 29 20 7b |e if(num| == 3) {|
|00004ae0| 0a 58 09 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |.X..wmov|e(scr, N|
|00004af0| 42 41 53 45 20 20 20 20 | 20 2c 20 63 6f 6c 29 3b |BASE | , col);|
|00004b00| 20 77 70 72 69 6e 74 77 | 28 73 63 72 2c 20 22 20 | wprintw|(scr, " |
|00004b10| 20 23 23 23 23 23 23 23 | 23 20 20 22 29 3b 0a 58 | #######|# ");.X|
|00004b20| 09 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4e 42 41 |..wmove(|scr, NBA|
|00004b30| 53 45 20 2b 20 20 31 2c | 20 63 6f 6c 29 3b 20 77 |SE + 1,| col); w|
|00004b40| 70 72 69 6e 74 77 28 73 | 63 72 2c 20 22 20 23 23 |printw(s|cr, " ##|
|00004b50| 23 23 23 23 23 23 23 23 | 20 22 29 3b 0a 58 09 09 |########| ");.X..|
|00004b60| 77 6d 6f 76 65 28 73 63 | 72 2c 20 4e 42 41 53 45 |wmove(sc|r, NBASE|
|00004b70| 20 2b 20 20 32 2c 20 63 | 6f 6c 29 3b 20 77 70 72 | + 2, c|ol); wpr|
|00004b80| 69 6e 74 77 28 73 63 72 | 2c 20 22 23 23 23 20 20 |intw(scr|, "### |
|00004b90| 20 20 20 23 23 23 23 22 | 29 3b 0a 58 09 09 77 6d | ####"|);.X..wm|
|00004ba0| 6f 76 65 28 73 63 72 2c | 20 4e 42 41 53 45 20 2b |ove(scr,| NBASE +|
|00004bb0| 20 20 33 2c 20 63 6f 6c | 29 3b 20 77 70 72 69 6e | 3, col|); wprin|
|00004bc0| 74 77 28 73 63 72 2c 20 | 22 23 23 23 20 20 20 20 |tw(scr, |"### |
|00004bd0| 20 20 23 23 23 22 29 3b | 0a 58 09 09 77 6d 6f 76 | ###");|.X..wmov|
|00004be0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 2b 20 20 |e(scr, N|BASE + |
|00004bf0| 34 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 |4, col);| wprintw|
|00004c00| 28 73 63 72 2c 20 22 20 | 20 20 20 20 20 20 20 20 |(scr, " | |
|00004c10| 23 23 23 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 |###");.X|..wmove(|
|00004c20| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 20 35 2c |scr, NBA|SE + 5,|
|00004c30| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00004c40| 63 72 2c 20 22 20 20 20 | 20 20 20 20 20 20 23 23 |cr, " | ##|
|00004c50| 23 22 29 3b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 |#");.X..|wmove(sc|
|00004c60| 72 2c 20 4e 42 41 53 45 | 20 2b 20 20 36 2c 20 63 |r, NBASE| + 6, c|
|00004c70| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00004c80| 2c 20 22 20 20 20 20 23 | 23 23 23 23 23 23 20 22 |, " #|###### "|
|00004c90| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|00004ca0| 20 4e 42 41 53 45 20 2b | 20 20 37 2c 20 63 6f 6c | NBASE +| 7, col|
|00004cb0| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|00004cc0| 22 20 20 20 20 23 23 23 | 23 23 23 23 20 22 29 3b |" ###|#### ");|
|00004cd0| 0a 58 09 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |.X..wmov|e(scr, N|
|00004ce0| 42 41 53 45 20 2b 20 20 | 38 2c 20 63 6f 6c 29 3b |BASE + |8, col);|
|00004cf0| 20 77 70 72 69 6e 74 77 | 28 73 63 72 2c 20 22 20 | wprintw|(scr, " |
|00004d00| 20 20 20 20 20 20 20 20 | 23 23 23 22 29 3b 0a 58 | |###");.X|
|00004d10| 09 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4e 42 41 |..wmove(|scr, NBA|
|00004d20| 53 45 20 2b 20 20 39 2c | 20 63 6f 6c 29 3b 20 77 |SE + 9,| col); w|
|00004d30| 70 72 69 6e 74 77 28 73 | 63 72 2c 20 22 20 20 20 |printw(s|cr, " |
|00004d40| 20 20 20 20 20 20 23 23 | 23 22 29 3b 0a 58 09 09 | ##|#");.X..|
|00004d50| 77 6d 6f 76 65 28 73 63 | 72 2c 20 4e 42 41 53 45 |wmove(sc|r, NBASE|
|00004d60| 20 2b 20 31 30 2c 20 63 | 6f 6c 29 3b 20 77 70 72 | + 10, c|ol); wpr|
|00004d70| 69 6e 74 77 28 73 63 72 | 2c 20 22 23 23 23 20 20 |intw(scr|, "### |
|00004d80| 20 20 20 20 23 23 23 22 | 29 3b 0a 58 09 09 77 6d | ###"|);.X..wm|
|00004d90| 6f 76 65 28 73 63 72 2c | 20 4e 42 41 53 45 20 2b |ove(scr,| NBASE +|
|00004da0| 20 31 31 2c 20 63 6f 6c | 29 3b 20 77 70 72 69 6e | 11, col|); wprin|
|00004db0| 74 77 28 73 63 72 2c 20 | 22 23 23 23 20 20 20 20 |tw(scr, |"### |
|00004dc0| 20 23 23 23 23 22 29 3b | 0a 58 09 09 77 6d 6f 76 | ####");|.X..wmov|
|00004dd0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 2b 20 31 |e(scr, N|BASE + 1|
|00004de0| 32 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 |2, col);| wprintw|
|00004df0| 28 73 63 72 2c 20 22 20 | 23 23 23 23 23 23 23 23 |(scr, " |########|
|00004e00| 23 23 20 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 |## ");.X|..wmove(|
|00004e10| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 31 33 2c |scr, NBA|SE + 13,|
|00004e20| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00004e30| 63 72 2c 20 22 20 20 23 | 23 23 23 23 23 23 23 20 |cr, " #|####### |
|00004e40| 20 22 29 3b 0a 58 09 7d | 20 65 6c 73 65 20 69 66 | ");.X.}| else if|
|00004e50| 28 6e 75 6d 20 3d 3d 20 | 34 29 20 7b 0a 58 09 09 |(num == |4) {.X..|
|00004e60| 77 6d 6f 76 65 28 73 63 | 72 2c 20 4e 42 41 53 45 |wmove(sc|r, NBASE|
|00004e70| 20 20 20 20 20 2c 20 63 | 6f 6c 29 3b 20 77 70 72 | , c|ol); wpr|
|00004e80| 69 6e 74 77 28 73 63 72 | 2c 20 22 20 20 20 20 20 |intw(scr|, " |
|00004e90| 20 20 23 23 23 20 20 22 | 29 3b 0a 58 09 09 77 6d | ### "|);.X..wm|
|00004ea0| 6f 76 65 28 73 63 72 2c | 20 4e 42 41 53 45 20 2b |ove(scr,| NBASE +|
|00004eb0| 20 20 31 2c 20 63 6f 6c | 29 3b 20 77 70 72 69 6e | 1, col|); wprin|
|00004ec0| 74 77 28 73 63 72 2c 20 | 22 20 20 20 20 20 20 23 |tw(scr, |" #|
|00004ed0| 23 23 23 20 20 22 29 3b | 0a 58 09 09 77 6d 6f 76 |### ");|.X..wmov|
|00004ee0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 2b 20 20 |e(scr, N|BASE + |
|00004ef0| 32 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 |2, col);| wprintw|
|00004f00| 28 73 63 72 2c 20 22 20 | 20 20 20 20 23 23 23 23 |(scr, " | ####|
|00004f10| 23 20 20 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 |# ");.X|..wmove(|
|00004f20| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 20 33 2c |scr, NBA|SE + 3,|
|00004f30| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00004f40| 63 72 2c 20 22 20 20 20 | 20 23 23 23 23 23 23 20 |cr, " | ###### |
|00004f50| 20 22 29 3b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 | ");.X..|wmove(sc|
|00004f60| 72 2c 20 4e 42 41 53 45 | 20 2b 20 20 34 2c 20 63 |r, NBASE| + 4, c|
|00004f70| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00004f80| 2c 20 22 20 20 20 23 23 | 23 20 23 23 23 20 20 22 |, " ##|# ### "|
|00004f90| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|00004fa0| 20 4e 42 41 53 45 20 2b | 20 20 35 2c 20 63 6f 6c | NBASE +| 5, col|
|00004fb0| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|00004fc0| 22 20 20 23 23 23 20 20 | 23 23 23 20 20 22 29 3b |" ### |### ");|
|00004fd0| 0a 58 09 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |.X..wmov|e(scr, N|
|00004fe0| 42 41 53 45 20 2b 20 20 | 36 2c 20 63 6f 6c 29 3b |BASE + |6, col);|
|00004ff0| 20 77 70 72 69 6e 74 77 | 28 73 63 72 2c 20 22 20 | wprintw|(scr, " |
|00005000| 23 23 23 20 20 20 23 23 | 23 20 20 22 29 3b 0a 58 |### ##|# ");.X|
|00005010| 09 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4e 42 41 |..wmove(|scr, NBA|
|00005020| 53 45 20 2b 20 20 37 2c | 20 63 6f 6c 29 3b 20 77 |SE + 7,| col); w|
|00005030| 70 72 69 6e 74 77 28 73 | 63 72 2c 20 22 23 23 23 |printw(s|cr, "###|
|00005040| 23 23 23 23 23 23 23 23 | 23 22 29 3b 0a 58 09 09 |########|#");.X..|
|00005050| 77 6d 6f 76 65 28 73 63 | 72 2c 20 4e 42 41 53 45 |wmove(sc|r, NBASE|
|00005060| 20 2b 20 20 38 2c 20 63 | 6f 6c 29 3b 20 77 70 72 | + 8, c|ol); wpr|
|00005070| 69 6e 74 77 28 73 63 72 | 2c 20 22 23 23 23 23 23 |intw(scr|, "#####|
|00005080| 23 23 23 23 23 23 23 22 | 29 3b 0a 58 09 09 77 6d |#######"|);.X..wm|
|00005090| 6f 76 65 28 73 63 72 2c | 20 4e 42 41 53 45 20 2b |ove(scr,| NBASE +|
|000050a0| 20 20 39 2c 20 63 6f 6c | 29 3b 20 77 70 72 69 6e | 9, col|); wprin|
|000050b0| 74 77 28 73 63 72 2c 20 | 22 20 20 20 20 20 20 20 |tw(scr, |" |
|000050c0| 23 23 23 20 20 22 29 3b | 0a 58 09 09 77 6d 6f 76 |### ");|.X..wmov|
|000050d0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 2b 20 31 |e(scr, N|BASE + 1|
|000050e0| 30 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 |0, col);| wprintw|
|000050f0| 28 73 63 72 2c 20 22 20 | 20 20 20 20 20 20 23 23 |(scr, " | ##|
|00005100| 23 20 20 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 |# ");.X|..wmove(|
|00005110| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 31 31 2c |scr, NBA|SE + 11,|
|00005120| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00005130| 63 72 2c 20 22 20 20 20 | 20 20 20 20 23 23 23 20 |cr, " | ### |
|00005140| 20 22 29 3b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 | ");.X..|wmove(sc|
|00005150| 72 2c 20 4e 42 41 53 45 | 20 2b 20 31 32 2c 20 63 |r, NBASE| + 12, c|
|00005160| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00005170| 2c 20 22 20 20 20 20 20 | 20 20 23 23 23 20 20 22 |, " | ### "|
|00005180| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|00005190| 20 4e 42 41 53 45 20 2b | 20 31 33 2c 20 63 6f 6c | NBASE +| 13, col|
|000051a0| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|000051b0| 22 20 20 20 20 20 20 20 | 23 23 23 20 20 22 29 3b |" |### ");|
|000051c0| 0a 58 09 7d 20 65 6c 73 | 65 20 69 66 28 6e 75 6d |.X.} els|e if(num|
|000051d0| 20 3d 3d 20 35 29 20 7b | 0a 58 09 09 77 6d 6f 76 | == 5) {|.X..wmov|
|000051e0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 20 20 20 |e(scr, N|BASE |
|000051f0| 20 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 | , col);| wprintw|
|00005200| 28 73 63 72 2c 20 22 23 | 23 23 23 23 23 23 23 23 |(scr, "#|########|
|00005210| 23 23 23 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 |###");.X|..wmove(|
|00005220| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 20 31 2c |scr, NBA|SE + 1,|
|00005230| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00005240| 63 72 2c 20 22 23 23 23 | 23 23 23 23 23 23 23 23 |cr, "###|########|
|00005250| 23 22 29 3b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 |#");.X..|wmove(sc|
|00005260| 72 2c 20 4e 42 41 53 45 | 20 2b 20 20 32 2c 20 63 |r, NBASE| + 2, c|
|00005270| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00005280| 2c 20 22 23 23 23 20 20 | 20 20 20 20 20 20 20 22 |, "### | "|
|00005290| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|000052a0| 20 4e 42 41 53 45 20 2b | 20 20 33 2c 20 63 6f 6c | NBASE +| 3, col|
|000052b0| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|000052c0| 22 23 23 23 20 20 20 20 | 20 20 20 20 20 22 29 3b |"### | ");|
|000052d0| 0a 58 09 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |.X..wmov|e(scr, N|
|000052e0| 42 41 53 45 20 2b 20 20 | 34 2c 20 63 6f 6c 29 3b |BASE + |4, col);|
|000052f0| 20 77 70 72 69 6e 74 77 | 28 73 63 72 2c 20 22 23 | wprintw|(scr, "#|
|00005300| 23 23 20 23 23 23 23 23 | 23 20 20 22 29 3b 0a 58 |## #####|# ");.X|
|00005310| 09 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4e 42 41 |..wmove(|scr, NBA|
|00005320| 53 45 20 2b 20 20 35 2c | 20 63 6f 6c 29 3b 20 77 |SE + 5,| col); w|
|00005330| 70 72 69 6e 74 77 28 73 | 63 72 2c 20 22 23 23 23 |printw(s|cr, "###|
|00005340| 23 23 23 23 23 23 23 23 | 20 22 29 3b 0a 58 09 09 |########| ");.X..|
|00005350| 77 6d 6f 76 65 28 73 63 | 72 2c 20 4e 42 41 53 45 |wmove(sc|r, NBASE|
|00005360| 20 2b 20 20 36 2c 20 63 | 6f 6c 29 3b 20 77 70 72 | + 6, c|ol); wpr|
|00005370| 69 6e 74 77 28 73 63 72 | 2c 20 22 23 23 23 20 20 |intw(scr|, "### |
|00005380| 20 20 20 23 23 23 23 22 | 29 3b 0a 58 09 09 77 6d | ####"|);.X..wm|
|00005390| 6f 76 65 28 73 63 72 2c | 20 4e 42 41 53 45 20 2b |ove(scr,| NBASE +|
|000053a0| 20 20 37 2c 20 63 6f 6c | 29 3b 20 77 70 72 69 6e | 7, col|); wprin|
|000053b0| 74 77 28 73 63 72 2c 20 | 22 20 20 20 20 20 20 20 |tw(scr, |" |
|000053c0| 20 20 23 23 23 22 29 3b | 0a 58 09 09 77 6d 6f 76 | ###");|.X..wmov|
|000053d0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 2b 20 20 |e(scr, N|BASE + |
|000053e0| 38 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 |8, col);| wprintw|
|000053f0| 28 73 63 72 2c 20 22 20 | 20 20 20 20 20 20 20 20 |(scr, " | |
|00005400| 23 23 23 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 |###");.X|..wmove(|
|00005410| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 20 39 2c |scr, NBA|SE + 9,|
|00005420| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00005430| 63 72 2c 20 22 20 20 20 | 20 20 20 20 20 20 23 23 |cr, " | ##|
|00005440| 23 22 29 3b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 |#");.X..|wmove(sc|
|00005450| 72 2c 20 4e 42 41 53 45 | 20 2b 20 31 30 2c 20 63 |r, NBASE| + 10, c|
|00005460| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00005470| 2c 20 22 23 23 23 20 20 | 20 20 20 20 23 23 23 22 |, "### | ###"|
|00005480| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|00005490| 20 4e 42 41 53 45 20 2b | 20 31 31 2c 20 63 6f 6c | NBASE +| 11, col|
|000054a0| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|000054b0| 22 23 23 23 20 20 20 20 | 20 23 23 23 23 22 29 3b |"### | ####");|
|000054c0| 0a 58 09 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |.X..wmov|e(scr, N|
|000054d0| 42 41 53 45 20 2b 20 31 | 32 2c 20 63 6f 6c 29 3b |BASE + 1|2, col);|
|000054e0| 20 77 70 72 69 6e 74 77 | 28 73 63 72 2c 20 22 20 | wprintw|(scr, " |
|000054f0| 23 23 23 23 23 23 23 23 | 23 23 20 22 29 3b 0a 58 |########|## ");.X|
|00005500| 09 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4e 42 41 |..wmove(|scr, NBA|
|00005510| 53 45 20 2b 20 31 33 2c | 20 63 6f 6c 29 3b 20 77 |SE + 13,| col); w|
|00005520| 70 72 69 6e 74 77 28 73 | 63 72 2c 20 22 20 20 23 |printw(s|cr, " #|
|00005530| 23 23 23 23 23 23 23 20 | 20 22 29 3b 0a 58 09 7d |####### | ");.X.}|
|00005540| 20 65 6c 73 65 20 69 66 | 28 6e 75 6d 20 3d 3d 20 | else if|(num == |
|00005550| 36 29 20 7b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 |6) {.X..|wmove(sc|
|00005560| 72 2c 20 4e 42 41 53 45 | 20 20 20 20 20 2c 20 63 |r, NBASE| , c|
|00005570| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00005580| 2c 20 22 20 20 20 20 20 | 20 20 23 23 23 20 20 22 |, " | ### "|
|00005590| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|000055a0| 20 4e 42 41 53 45 20 2b | 20 20 31 2c 20 63 6f 6c | NBASE +| 1, col|
|000055b0| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|000055c0| 22 20 20 20 20 20 20 23 | 23 23 20 20 20 22 29 3b |" #|## ");|
|000055d0| 0a 58 09 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |.X..wmov|e(scr, N|
|000055e0| 42 41 53 45 20 2b 20 20 | 32 2c 20 63 6f 6c 29 3b |BASE + |2, col);|
|000055f0| 20 77 70 72 69 6e 74 77 | 28 73 63 72 2c 20 22 20 | wprintw|(scr, " |
|00005600| 20 20 20 20 23 23 23 20 | 20 20 20 22 29 3b 0a 58 | ### | ");.X|
|00005610| 09 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4e 42 41 |..wmove(|scr, NBA|
|00005620| 53 45 20 2b 20 20 33 2c | 20 63 6f 6c 29 3b 20 77 |SE + 3,| col); w|
|00005630| 70 72 69 6e 74 77 28 73 | 63 72 2c 20 22 20 20 20 |printw(s|cr, " |
|00005640| 20 23 23 23 20 20 20 20 | 20 22 29 3b 0a 58 09 09 | ### | ");.X..|
|00005650| 77 6d 6f 76 65 28 73 63 | 72 2c 20 4e 42 41 53 45 |wmove(sc|r, NBASE|
|00005660| 20 2b 20 20 34 2c 20 63 | 6f 6c 29 3b 20 77 70 72 | + 4, c|ol); wpr|
|00005670| 69 6e 74 77 28 73 63 72 | 2c 20 22 20 20 20 23 23 |intw(scr|, " ##|
|00005680| 23 20 20 20 20 20 20 22 | 29 3b 0a 58 09 09 77 6d |# "|);.X..wm|
|00005690| 6f 76 65 28 73 63 72 2c | 20 4e 42 41 53 45 20 2b |ove(scr,| NBASE +|
|000056a0| 20 20 35 2c 20 63 6f 6c | 29 3b 20 77 70 72 69 6e | 5, col|); wprin|
|000056b0| 74 77 28 73 63 72 2c 20 | 22 20 20 23 23 23 20 20 |tw(scr, |" ### |
|000056c0| 20 20 20 20 20 22 29 3b | 0a 58 09 09 77 6d 6f 76 | ");|.X..wmov|
|000056d0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 2b 20 20 |e(scr, N|BASE + |
|000056e0| 36 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 |6, col);| wprintw|
|000056f0| 28 73 63 72 2c 20 22 20 | 23 23 23 23 23 23 23 23 |(scr, " |########|
|00005700| 23 20 20 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 |# ");.X|..wmove(|
|00005710| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 20 37 2c |scr, NBA|SE + 7,|
|00005720| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00005730| 63 72 2c 20 22 23 23 23 | 23 23 23 23 23 23 23 23 |cr, "###|########|
|00005740| 20 22 29 3b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 | ");.X..|wmove(sc|
|00005750| 72 2c 20 4e 42 41 53 45 | 20 2b 20 20 38 2c 20 63 |r, NBASE| + 8, c|
|00005760| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00005770| 2c 20 22 23 23 23 20 20 | 20 20 20 20 23 23 23 22 |, "### | ###"|
|00005780| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|00005790| 20 4e 42 41 53 45 20 2b | 20 20 39 2c 20 63 6f 6c | NBASE +| 9, col|
|000057a0| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|000057b0| 22 23 23 23 20 20 20 20 | 20 20 23 23 23 22 29 3b |"### | ###");|
|000057c0| 0a 58 09 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |.X..wmov|e(scr, N|
|000057d0| 42 41 53 45 20 2b 20 31 | 30 2c 20 63 6f 6c 29 3b |BASE + 1|0, col);|
|000057e0| 20 77 70 72 69 6e 74 77 | 28 73 63 72 2c 20 22 23 | wprintw|(scr, "#|
|000057f0| 23 23 20 20 20 20 20 20 | 23 23 23 22 29 3b 0a 58 |## |###");.X|
|00005800| 09 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4e 42 41 |..wmove(|scr, NBA|
|00005810| 53 45 20 2b 20 31 31 2c | 20 63 6f 6c 29 3b 20 77 |SE + 11,| col); w|
|00005820| 70 72 69 6e 74 77 28 73 | 63 72 2c 20 22 23 23 23 |printw(s|cr, "###|
|00005830| 20 20 20 20 20 20 23 23 | 23 22 29 3b 0a 58 09 09 | ##|#");.X..|
|00005840| 77 6d 6f 76 65 28 73 63 | 72 2c 20 4e 42 41 53 45 |wmove(sc|r, NBASE|
|00005850| 20 2b 20 31 32 2c 20 63 | 6f 6c 29 3b 20 77 70 72 | + 12, c|ol); wpr|
|00005860| 69 6e 74 77 28 73 63 72 | 2c 20 22 20 23 23 23 23 |intw(scr|, " ####|
|00005870| 23 23 23 23 23 23 20 22 | 29 3b 0a 58 09 09 77 6d |###### "|);.X..wm|
|00005880| 6f 76 65 28 73 63 72 2c | 20 4e 42 41 53 45 20 2b |ove(scr,| NBASE +|
|00005890| 20 31 33 2c 20 63 6f 6c | 29 3b 20 77 70 72 69 6e | 13, col|); wprin|
|000058a0| 74 77 28 73 63 72 2c 20 | 22 20 20 20 23 23 23 23 |tw(scr, |" ####|
|000058b0| 23 23 20 20 20 22 29 3b | 0a 58 09 7d 20 65 6c 73 |## ");|.X.} els|
|000058c0| 65 20 69 66 28 6e 75 6d | 20 3d 3d 20 37 29 20 7b |e if(num| == 7) {|
|000058d0| 0a 58 09 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |.X..wmov|e(scr, N|
|000058e0| 42 41 53 45 20 20 20 20 | 20 2c 20 63 6f 6c 29 3b |BASE | , col);|
|000058f0| 20 77 70 72 69 6e 74 77 | 28 73 63 72 2c 20 22 23 | wprintw|(scr, "#|
|00005900| 23 23 23 23 23 23 23 23 | 23 23 23 22 29 3b 0a 58 |########|###");.X|
|00005910| 09 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4e 42 41 |..wmove(|scr, NBA|
|00005920| 53 45 20 2b 20 20 31 2c | 20 63 6f 6c 29 3b 20 77 |SE + 1,| col); w|
|00005930| 70 72 69 6e 74 77 28 73 | 63 72 2c 20 22 23 23 23 |printw(s|cr, "###|
|00005940| 23 23 23 23 23 23 23 23 | 23 22 29 3b 0a 58 09 09 |########|#");.X..|
|00005950| 77 6d 6f 76 65 28 73 63 | 72 2c 20 4e 42 41 53 45 |wmove(sc|r, NBASE|
|00005960| 20 2b 20 20 32 2c 20 63 | 6f 6c 29 3b 20 77 70 72 | + 2, c|ol); wpr|
|00005970| 69 6e 74 77 28 73 63 72 | 2c 20 22 23 23 23 20 20 |intw(scr|, "### |
|00005980| 20 20 20 20 23 23 23 22 | 29 3b 0a 58 09 09 77 6d | ###"|);.X..wm|
|00005990| 6f 76 65 28 73 63 72 2c | 20 4e 42 41 53 45 20 2b |ove(scr,| NBASE +|
|000059a0| 20 20 33 2c 20 63 6f 6c | 29 3b 20 77 70 72 69 6e | 3, col|); wprin|
|000059b0| 74 77 28 73 63 72 2c 20 | 22 20 20 20 20 20 20 20 |tw(scr, |" |
|000059c0| 20 20 23 23 23 22 29 3b | 0a 58 09 09 77 6d 6f 76 | ###");|.X..wmov|
|000059d0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 2b 20 20 |e(scr, N|BASE + |
|000059e0| 34 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 |4, col);| wprintw|
|000059f0| 28 73 63 72 2c 20 22 20 | 20 20 20 20 20 20 20 20 |(scr, " | |
|00005a00| 23 23 23 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 |###");.X|..wmove(|
|00005a10| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 20 35 2c |scr, NBA|SE + 5,|
|00005a20| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00005a30| 63 72 2c 20 22 20 20 20 | 20 20 20 20 20 23 23 23 |cr, " | ###|
|00005a40| 20 22 29 3b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 | ");.X..|wmove(sc|
|00005a50| 72 2c 20 4e 42 41 53 45 | 20 2b 20 20 36 2c 20 63 |r, NBASE| + 6, c|
|00005a60| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00005a70| 2c 20 22 20 20 20 20 20 | 20 20 23 23 23 20 20 22 |, " | ### "|
|00005a80| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|00005a90| 20 4e 42 41 53 45 20 2b | 20 20 37 2c 20 63 6f 6c | NBASE +| 7, col|
|00005aa0| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|00005ab0| 22 20 20 20 20 20 20 23 | 23 23 20 20 20 22 29 3b |" #|## ");|
|00005ac0| 0a 58 09 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |.X..wmov|e(scr, N|
|00005ad0| 42 41 53 45 20 2b 20 20 | 38 2c 20 63 6f 6c 29 3b |BASE + |8, col);|
|00005ae0| 20 77 70 72 69 6e 74 77 | 28 73 63 72 2c 20 22 20 | wprintw|(scr, " |
|00005af0| 20 20 20 20 23 23 23 20 | 20 20 20 22 29 3b 0a 58 | ### | ");.X|
|00005b00| 09 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4e 42 41 |..wmove(|scr, NBA|
|00005b10| 53 45 20 2b 20 20 39 2c | 20 63 6f 6c 29 3b 20 77 |SE + 9,| col); w|
|00005b20| 70 72 69 6e 74 77 28 73 | 63 72 2c 20 22 20 20 20 |printw(s|cr, " |
|00005b30| 20 23 23 23 20 20 20 20 | 20 22 29 3b 0a 58 09 09 | ### | ");.X..|
|00005b40| 77 6d 6f 76 65 28 73 63 | 72 2c 20 4e 42 41 53 45 |wmove(sc|r, NBASE|
|00005b50| 20 2b 20 31 30 2c 20 63 | 6f 6c 29 3b 20 77 70 72 | + 10, c|ol); wpr|
|00005b60| 69 6e 74 77 28 73 63 72 | 2c 20 22 20 20 20 23 23 |intw(scr|, " ##|
|00005b70| 23 20 20 20 20 20 20 22 | 29 3b 0a 58 09 09 77 6d |# "|);.X..wm|
|00005b80| 6f 76 65 28 73 63 72 2c | 20 4e 42 41 53 45 20 2b |ove(scr,| NBASE +|
|00005b90| 20 31 31 2c 20 63 6f 6c | 29 3b 20 77 70 72 69 6e | 11, col|); wprin|
|00005ba0| 74 77 28 73 63 72 2c 20 | 22 20 20 23 23 23 20 20 |tw(scr, |" ### |
|00005bb0| 20 20 20 20 20 22 29 3b | 0a 58 09 09 77 6d 6f 76 | ");|.X..wmov|
|00005bc0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 2b 20 31 |e(scr, N|BASE + 1|
|00005bd0| 32 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 |2, col);| wprintw|
|00005be0| 28 73 63 72 2c 20 22 20 | 23 23 23 20 20 20 20 20 |(scr, " |### |
|00005bf0| 20 20 20 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 | ");.X|..wmove(|
|00005c00| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 31 33 2c |scr, NBA|SE + 13,|
|00005c10| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00005c20| 63 72 2c 20 22 23 23 23 | 20 20 20 20 20 20 20 20 |cr, "###| |
|00005c30| 20 22 29 3b 0a 58 09 7d | 20 65 6c 73 65 20 69 66 | ");.X.}| else if|
|00005c40| 28 6e 75 6d 20 3d 3d 20 | 38 29 20 7b 0a 58 09 09 |(num == |8) {.X..|
|00005c50| 77 6d 6f 76 65 28 73 63 | 72 2c 20 4e 42 41 53 45 |wmove(sc|r, NBASE|
|00005c60| 20 20 20 20 20 2c 20 63 | 6f 6c 29 3b 20 77 70 72 | , c|ol); wpr|
|00005c70| 69 6e 74 77 28 73 63 72 | 2c 20 22 20 20 20 23 23 |intw(scr|, " ##|
|00005c80| 23 23 23 23 20 20 20 22 | 29 3b 0a 58 09 09 77 6d |#### "|);.X..wm|
|00005c90| 6f 76 65 28 73 63 72 2c | 20 4e 42 41 53 45 20 2b |ove(scr,| NBASE +|
|00005ca0| 20 20 31 2c 20 63 6f 6c | 29 3b 20 77 70 72 69 6e | 1, col|); wprin|
|00005cb0| 74 77 28 73 63 72 2c 20 | 22 20 23 23 23 23 23 23 |tw(scr, |" ######|
|00005cc0| 23 23 23 23 20 22 29 3b | 0a 58 09 09 77 6d 6f 76 |#### ");|.X..wmov|
|00005cd0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 2b 20 20 |e(scr, N|BASE + |
|00005ce0| 32 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 |2, col);| wprintw|
|00005cf0| 28 73 63 72 2c 20 22 23 | 23 23 20 20 20 20 20 20 |(scr, "#|## |
|00005d00| 23 23 23 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 |###");.X|..wmove(|
|00005d10| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 20 33 2c |scr, NBA|SE + 3,|
|00005d20| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00005d30| 63 72 2c 20 22 23 23 23 | 20 20 20 20 20 20 23 23 |cr, "###| ##|
|00005d40| 23 22 29 3b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 |#");.X..|wmove(sc|
|00005d50| 72 2c 20 4e 42 41 53 45 | 20 2b 20 20 34 2c 20 63 |r, NBASE| + 4, c|
|00005d60| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00005d70| 2c 20 22 23 23 23 20 20 | 20 20 20 20 23 23 23 22 |, "### | ###"|
|00005d80| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|00005d90| 20 4e 42 41 53 45 20 2b | 20 20 35 2c 20 63 6f 6c | NBASE +| 5, col|
|00005da0| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|00005db0| 22 23 23 23 20 20 20 20 | 20 20 23 23 23 22 29 3b |"### | ###");|
|00005dc0| 0a 58 09 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |.X..wmov|e(scr, N|
|00005dd0| 42 41 53 45 20 2b 20 20 | 36 2c 20 63 6f 6c 29 3b |BASE + |6, col);|
|00005de0| 20 77 70 72 69 6e 74 77 | 28 73 63 72 2c 20 22 20 | wprintw|(scr, " |
|00005df0| 23 23 23 23 23 23 23 23 | 23 23 20 22 29 3b 0a 58 |########|## ");.X|
|00005e00| 09 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4e 42 41 |..wmove(|scr, NBA|
|00005e10| 53 45 20 2b 20 20 37 2c | 20 63 6f 6c 29 3b 20 77 |SE + 7,| col); w|
|00005e20| 70 72 69 6e 74 77 28 73 | 63 72 2c 20 22 20 23 23 |printw(s|cr, " ##|
|00005e30| 23 23 23 23 23 23 23 23 | 20 22 29 3b 0a 58 09 09 |########| ");.X..|
|00005e40| 77 6d 6f 76 65 28 73 63 | 72 2c 20 4e 42 41 53 45 |wmove(sc|r, NBASE|
|00005e50| 20 2b 20 20 38 2c 20 63 | 6f 6c 29 3b 20 77 70 72 | + 8, c|ol); wpr|
|00005e60| 69 6e 74 77 28 73 63 72 | 2c 20 22 23 23 23 20 20 |intw(scr|, "### |
|00005e70| 20 20 20 20 23 23 23 22 | 29 3b 0a 58 09 09 77 6d | ###"|);.X..wm|
|00005e80| 6f 76 65 28 73 63 72 2c | 20 4e 42 41 53 45 20 2b |ove(scr,| NBASE +|
|00005e90| 20 20 39 2c 20 63 6f 6c | 29 3b 20 77 70 72 69 6e | 9, col|); wprin|
|00005ea0| 74 77 28 73 63 72 2c 20 | 22 23 23 23 20 20 20 20 |tw(scr, |"### |
|00005eb0| 20 20 23 23 23 22 29 3b | 0a 58 09 09 77 6d 6f 76 | ###");|.X..wmov|
|00005ec0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 2b 20 31 |e(scr, N|BASE + 1|
|00005ed0| 30 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 |0, col);| wprintw|
|00005ee0| 28 73 63 72 2c 20 22 23 | 23 23 20 20 20 20 20 20 |(scr, "#|## |
|00005ef0| 23 23 23 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 |###");.X|..wmove(|
|00005f00| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 31 31 2c |scr, NBA|SE + 11,|
|00005f10| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00005f20| 63 72 2c 20 22 23 23 23 | 20 20 20 20 20 20 23 23 |cr, "###| ##|
|00005f30| 23 22 29 3b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 |#");.X..|wmove(sc|
|00005f40| 72 2c 20 4e 42 41 53 45 | 20 2b 20 31 32 2c 20 63 |r, NBASE| + 12, c|
|00005f50| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00005f60| 2c 20 22 20 23 23 23 23 | 23 23 23 23 23 23 20 22 |, " ####|###### "|
|00005f70| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|00005f80| 20 4e 42 41 53 45 20 2b | 20 31 33 2c 20 63 6f 6c | NBASE +| 13, col|
|00005f90| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|00005fa0| 22 20 20 20 23 23 23 23 | 23 23 20 20 20 22 29 3b |" ####|## ");|
|00005fb0| 0a 58 09 7d 20 65 6c 73 | 65 20 69 66 28 6e 75 6d |.X.} els|e if(num|
|00005fc0| 20 3d 3d 20 39 29 20 7b | 0a 58 09 09 77 6d 6f 76 | == 9) {|.X..wmov|
|00005fd0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 20 20 20 |e(scr, N|BASE |
|00005fe0| 20 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 | , col);| wprintw|
|00005ff0| 28 73 63 72 2c 20 22 20 | 20 20 23 23 23 23 23 23 |(scr, " | ######|
|00006000| 20 20 20 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 | ");.X|..wmove(|
|00006010| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 20 31 2c |scr, NBA|SE + 1,|
|00006020| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00006030| 63 72 2c 20 22 20 23 23 | 23 23 23 23 23 23 23 23 |cr, " ##|########|
|00006040| 20 22 29 3b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 | ");.X..|wmove(sc|
|00006050| 72 2c 20 4e 42 41 53 45 | 20 2b 20 20 32 2c 20 63 |r, NBASE| + 2, c|
|00006060| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00006070| 2c 20 22 23 23 23 20 20 | 20 20 20 20 23 23 23 22 |, "### | ###"|
|00006080| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|00006090| 20 4e 42 41 53 45 20 2b | 20 20 33 2c 20 63 6f 6c | NBASE +| 3, col|
|000060a0| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|000060b0| 22 23 23 23 20 20 20 20 | 20 20 23 23 23 22 29 3b |"### | ###");|
|000060c0| 0a 58 09 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |.X..wmov|e(scr, N|
|000060d0| 42 41 53 45 20 2b 20 20 | 34 2c 20 63 6f 6c 29 3b |BASE + |4, col);|
|000060e0| 20 77 70 72 69 6e 74 77 | 28 73 63 72 2c 20 22 23 | wprintw|(scr, "#|
|000060f0| 23 23 20 20 20 20 20 20 | 23 23 23 22 29 3b 0a 58 |## |###");.X|
|00006100| 09 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4e 42 41 |..wmove(|scr, NBA|
|00006110| 53 45 20 2b 20 20 35 2c | 20 63 6f 6c 29 3b 20 77 |SE + 5,| col); w|
|00006120| 70 72 69 6e 74 77 28 73 | 63 72 2c 20 22 23 23 23 |printw(s|cr, "###|
|00006130| 20 20 20 20 20 20 23 23 | 23 22 29 3b 0a 58 09 09 | ##|#");.X..|
|00006140| 77 6d 6f 76 65 28 73 63 | 72 2c 20 4e 42 41 53 45 |wmove(sc|r, NBASE|
|00006150| 20 2b 20 20 36 2c 20 63 | 6f 6c 29 3b 20 77 70 72 | + 6, c|ol); wpr|
|00006160| 69 6e 74 77 28 73 63 72 | 2c 20 22 20 23 23 23 23 |intw(scr|, " ####|
|00006170| 23 23 23 23 23 23 23 22 | 29 3b 0a 58 09 09 77 6d |#######"|);.X..wm|
|00006180| 6f 76 65 28 73 63 72 2c | 20 4e 42 41 53 45 20 2b |ove(scr,| NBASE +|
|00006190| 20 20 37 2c 20 63 6f 6c | 29 3b 20 77 70 72 69 6e | 7, col|); wprin|
|000061a0| 74 77 28 73 63 72 2c 20 | 22 20 20 23 23 23 23 23 |tw(scr, |" #####|
|000061b0| 23 23 23 23 20 22 29 3b | 0a 58 09 09 77 6d 6f 76 |#### ");|.X..wmov|
|000061c0| 65 28 73 63 72 2c 20 4e | 42 41 53 45 20 2b 20 20 |e(scr, N|BASE + |
|000061d0| 38 2c 20 63 6f 6c 29 3b | 20 77 70 72 69 6e 74 77 |8, col);| wprintw|
|000061e0| 28 73 63 72 2c 20 22 20 | 20 20 20 20 20 20 23 23 |(scr, " | ##|
|000061f0| 23 20 20 22 29 3b 0a 58 | 09 09 77 6d 6f 76 65 28 |# ");.X|..wmove(|
|00006200| 73 63 72 2c 20 4e 42 41 | 53 45 20 2b 20 20 39 2c |scr, NBA|SE + 9,|
|00006210| 20 63 6f 6c 29 3b 20 77 | 70 72 69 6e 74 77 28 73 | col); w|printw(s|
|00006220| 63 72 2c 20 22 20 20 20 | 20 20 20 23 23 23 20 20 |cr, " | ### |
|00006230| 20 22 29 3b 0a 58 09 09 | 77 6d 6f 76 65 28 73 63 | ");.X..|wmove(sc|
|00006240| 72 2c 20 4e 42 41 53 45 | 20 2b 20 31 30 2c 20 63 |r, NBASE| + 10, c|
|00006250| 6f 6c 29 3b 20 77 70 72 | 69 6e 74 77 28 73 63 72 |ol); wpr|intw(scr|
|00006260| 2c 20 22 20 20 20 20 20 | 23 23 23 20 20 20 20 22 |, " |### "|
|00006270| 29 3b 0a 58 09 09 77 6d | 6f 76 65 28 73 63 72 2c |);.X..wm|ove(scr,|
|00006280| 20 4e 42 41 53 45 20 2b | 20 31 31 2c 20 63 6f 6c | NBASE +| 11, col|
|00006290| 29 3b 20 77 70 72 69 6e | 74 77 28 73 63 72 2c 20 |); wprin|tw(scr, |
|000062a0| 22 20 20 20 20 23 23 23 | 20 20 20 20 20 22 29 3b |" ###| ");|
|000062b0| 0a 58 09 09 77 6d 6f 76 | 65 28 73 63 72 2c 20 4e |.X..wmov|e(scr, N|
|000062c0| 42 41 53 45 20 2b 20 31 | 32 2c 20 63 6f 6c 29 3b |BASE + 1|2, col);|
|000062d0| 20 77 70 72 69 6e 74 77 | 28 73 63 72 2c 20 22 20 | wprintw|(scr, " |
|000062e0| 20 20 23 23 23 20 20 20 | 20 20 20 22 29 3b 0a 58 | ### | ");.X|
|000062f0| 09 09 77 6d 6f 76 65 28 | 73 63 72 2c 20 4e 42 41 |..wmove(|scr, NBA|
|00006300| 53 45 20 2b 20 31 33 2c | 20 63 6f 6c 29 3b 20 77 |SE + 13,| col); w|
|00006310| 70 72 69 6e 74 77 28 73 | 63 72 2c 20 22 20 20 23 |printw(s|cr, " #|
|00006320| 23 23 20 20 20 20 20 20 | 20 22 29 3b 0a 58 09 7d |## | ");.X.}|
|00006330| 0a 58 7d 0a 53 48 41 52 | 5f 45 4f 46 0a 66 69 0a |.X}.SHAR|_EOF.fi.|
|00006340| 65 78 69 74 20 30 0a 23 | 09 45 6e 64 20 6f 66 20 |exit 0.#|.End of |
|00006350| 73 68 65 6c 6c 20 61 72 | 63 68 69 76 65 0a 2d 2d |shell ar|chive.--|
|00006360| 20 0a 47 65 6f 72 67 65 | 20 4d 2e 20 53 69 70 65 | .George| M. Sipe|
|00006370| 2c 09 09 50 68 6f 6e 65 | 3a 20 28 34 30 34 29 20 |,..Phone|: (404) |
|00006380| 36 36 32 2d 31 35 33 33 | 0a 54 6f 6c 65 72 61 6e |662-1533|.Toleran|
|00006390| 74 20 53 79 73 74 65 6d | 73 2c 20 36 39 36 31 20 |t System|s, 6961 |
|000063a0| 50 65 61 63 68 74 72 65 | 65 20 49 6e 64 75 73 74 |Peachtre|e Indust|
|000063b0| 72 69 61 6c 2c 20 4e 6f | 72 63 72 6f 73 73 2c 20 |rial, No|rcross, |
|000063c0| 47 41 20 20 33 30 30 37 | 31 0a 55 55 43 50 3a 20 |GA 3007|1.UUCP: |
|000063d0| 2e 2e 2e 21 7b 64 65 63 | 76 61 78 2c 68 70 6c 61 |...!{dec|vax,hpla|
|000063e0| 62 73 2c 6c 69 6e 75 73 | 2c 72 75 74 67 65 72 73 |bs,linus|,rutgers|
|000063f0| 2c 73 65 69 73 6d 6f 7d | 21 67 61 74 65 63 68 21 |,seismo}|!gatech!|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
