home *** CD-ROM | disk | FTP | other *** search
| MacBinary | 1989-09-14 | 29.0 KB | [TEXT/KAHL] |
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: MacBinary
(archive/macBinary).
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 66%
| dexvert
| AMOS Picture Packer (image/amosPicturePacker)
| ext
| Supported |
| 1%
| dexvert
| Debian floppy split (archive/debianFloppySplit)
| ext
| Unsupported |
| 1%
| dexvert
| Sound Images sound sample (audio/soundImagesSoundSample)
| ext
| Unsupported |
| 1%
| dexvert
| DESI-III drawing (image/desiIIIDrawing)
| ext
| Unsupported |
| 1%
| dexvert
| MS-DOS PMODE extender executable (executable/msdosPMODEExtenderExecutable)
| ext
| Unsupported |
| 1%
| dexvert
| Alien Trilogytextures (other/alienTrilogyTextures)
| ext
| Unsupported |
| 1%
| dexvert
| APT cache data (other/aptCacheData)
| ext
| Unsupported |
| 1%
| dexvert
| CorelTRACE configuration (other/corelTRACEConfiguration)
| ext
| Unsupported |
| 1%
| dexvert
| Dreamcast Disc (other/dreamcastDisc)
| ext
| Unsupported |
| 1%
| dexvert
| EST flat binary (other/estFlatBinary)
| ext
| Unsupported |
| 1%
| dexvert
| Finale Enigma Binary Format (other/finaleEnigmaBinaryFormat)
| ext
| Unsupported |
| 1%
| dexvert
| Sega Genesis/Megadrive/32x ROM (other/genesisROM)
| ext
| Unsupported |
| 1%
| dexvert
| Myth: The Fallen Lords game archive (other/mythTheFallenLordsGameArchive)
| ext
| Unsupported |
| 1%
| dexvert
| Sound Images Sound Driver (other/soundImagesSoundDriver)
| ext
| Unsupported |
| 1%
| dexvert
| Symantec/Norton Config (other/symantecNortonConfig)
| ext
| Unsupported |
| 1%
| dexvert
| Vectrex ROM (other/vectrexROM)
| ext
| Unsupported |
| 1%
| dexvert
| BIS raP encoded format (other/bisraPEncoded)
| ext
| Unsupported |
| 1%
| dexvert
| Pascal Script binary (other/pascalScriptBinary)
| ext
| Unsupported |
| 1%
| dexvert
| 7th Level game data archive (other/seventhLevelGameDataArchive)
| ext
| Unsupported |
| 1%
| dexvert
| MacBinary (archive/macBinary)
| fallback
| Supported |
| 1%
| dexvert
| Binary Text (image/binaryText)
| fallback
| Supported |
| 1%
| dexvert
| Text File (text/txt)
| fallback
| Supported |
| 100%
| file
| MacBinary, Thu Oct 15 16:13:44 1987, modified Sun Jan 15 05:28:37 1989, creator Think C, type ASCII, 29543 bytes "printf-2-w.c"
| default (weak)
| |
| 99%
| file
| data
| default
| |
| 74%
| TrID
| Macintosh plain text (MacBinary)
| default
| |
| 25%
| TrID
| MacBinary 1
| default (weak)
| |
| 100%
| lsar
| MacBinary
| default
| |
| 100%
| gt2
| MAC Bilddatei
| default (weak)
|
|
| id metadata |
|---|
| key | value |
|---|
| macFileType | [TEXT] |
| macFileCreator | [KAHL] |
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0c 70 72 69 6e 74 66 | 2d 32 2d 77 2e 63 00 00 |..printf|-2-w.c..|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4b 41 48 | 4c 00 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 00 73 67 00 | 00 00 00 9d 9a dc f8 9f |.....sg.|........|
|00000060| f6 22 d5 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |."......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 2f 2a 0d 09 70 72 69 6e | 74 66 20 72 6f 75 74 69 |/*..prin|tf routi|
|00000090| 6e 65 73 20 66 6f 72 20 | 4c 69 67 68 74 73 70 65 |nes for |Lightspe|
|000000a0| 65 64 43 0d 0d 09 28 43 | 29 20 43 6f 70 79 72 69 |edC...(C|) Copyri|
|000000b0| 67 68 74 20 31 39 38 36 | 2e 20 54 48 49 4e 4b 20 |ght 1986|. THINK |
|000000c0| 54 65 63 68 6e 6f 6c 6f | 67 69 65 73 2c 20 49 6e |Technolo|gies, In|
|000000d0| 63 2e 20 20 41 6c 6c 20 | 72 69 67 68 74 73 20 72 |c. All |rights r|
|000000e0| 65 73 65 72 76 65 64 2e | 0d 09 0d 09 4e 4f 54 45 |eserved.|....NOTE|
|000000f0| 3a 20 50 72 6f 70 6f 72 | 74 69 6f 6e 61 6c 20 66 |: Propor|tional f|
|00000100| 6f 6e 74 73 20 63 61 6e | 20 62 65 20 75 73 65 64 |onts can| be used|
|00000110| 2c 20 62 75 74 20 6c 69 | 6e 65 73 20 77 69 6c 6c |, but li|nes will|
|00000120| 20 77 72 61 70 20 61 73 | 20 69 66 20 74 68 65 79 | wrap as| if they|
|00000130| 0d 09 09 09 61 72 65 20 | 6d 6f 6e 6f 73 70 61 63 |....are |monospac|
|00000140| 65 64 2e 20 20 49 6e 20 | 74 68 69 73 20 76 65 72 |ed. In |this ver|
|00000150| 73 69 6f 6e 2c 20 73 69 | 6e 63 65 20 65 61 63 68 |sion, si|nce each|
|00000160| 20 6c 69 6e 65 20 69 73 | 20 64 72 61 77 6e 20 77 | line is| drawn w|
|00000170| 69 74 68 0d 09 09 09 44 | 72 61 77 43 68 61 72 20 |ith....D|rawChar |
|00000180| 6f 72 20 44 72 61 77 54 | 65 78 74 20 77 69 74 68 |or DrawT|ext with|
|00000190| 6f 75 74 20 72 65 70 6f | 73 69 74 69 6f 6e 69 6e |out repo|sitionin|
|000001a0| 67 2c 20 69 74 20 77 69 | 6c 6c 20 6c 6f 6f 6b 20 |g, it wi|ll look |
|000001b0| 62 65 74 74 65 72 0d 09 | 09 09 74 68 61 6e 20 74 |better..|..than t|
|000001c0| 68 65 20 6f 6c 64 20 6d | 6f 6e 6f 73 70 61 63 65 |he old m|onospace|
|000001d0| 64 20 72 65 70 6f 73 69 | 74 69 6f 6e 69 6e 67 20 |d reposi|tioning |
|000001e0| 76 65 72 73 69 6f 6e 20 | 6f 66 20 70 75 74 63 68 |version |of putch|
|000001f0| 2e 0d 2a 2f 0d 0d 2f 2a | 20 49 66 20 79 6f 75 20 |..*/../*| If you |
|00000200| 68 61 76 65 20 61 20 6e | 6f 6e 2d 4d 61 63 20 73 |have a n|on-Mac s|
|00000210| 63 72 65 65 6e 20 6c 69 | 6b 65 20 61 20 52 61 64 |creen li|ke a Rad|
|00000220| 69 75 73 20 6f 72 20 45 | 2d 4d 61 63 68 69 6e 65 |ius or E|-Machine|
|00000230| 73 2c 20 65 74 63 2e 20 | 20 73 74 64 69 6f 0d 09 |s, etc. | stdio..|
|00000240| 6d 61 79 20 6e 6f 74 20 | 6f 70 65 72 61 74 65 20 |may not |operate |
|00000250| 63 6f 72 72 65 63 74 6c | 79 20 73 69 6e 63 65 20 |correctl|y since |
|00000260| 69 74 20 6e 6f 72 6d 61 | 6c 6c 79 20 64 69 72 65 |it norma|lly dire|
|00000270| 63 74 6c 79 20 6d 6f 76 | 65 73 20 74 68 65 20 67 |ctly mov|es the g|
|00000280| 72 61 70 68 69 63 73 0d | 09 70 65 6e 20 74 6f 20 |raphics.|.pen to |
|00000290| 61 63 68 69 65 76 65 20 | 72 65 61 73 6f 6e 61 62 |achieve |reasonab|
|000002a0| 6c 65 20 73 70 65 65 64 | 73 20 69 6e 20 64 72 61 |le speed|s in dra|
|000002b0| 77 69 6e 67 20 63 68 61 | 72 61 63 74 65 72 73 2e |wing cha|racters.|
|000002c0| 20 20 42 79 20 64 65 66 | 69 6e 69 6e 67 0d 09 5f | By def|ining.._|
|000002d0| 4e 6f 6e 4d 61 63 53 63 | 72 65 65 6e 5f 20 79 6f |NonMacSc|reen_ yo|
|000002e0| 75 20 63 61 6e 20 63 6f | 6e 76 65 72 74 20 61 6c |u can co|nvert al|
|000002f0| 6c 20 6f 66 20 74 68 65 | 20 73 70 65 63 69 61 6c |l of the| special|
|00000300| 69 7a 65 64 20 63 6f 64 | 65 20 69 6e 74 6f 20 74 |ized cod|e into t|
|00000310| 68 65 0d 09 73 74 61 6e | 64 61 72 64 20 4d 61 63 |he..stan|dard Mac|
|00000320| 69 6e 74 6f 73 68 20 54 | 6f 6f 6c 62 6f 78 20 74 |intosh T|oolbox t|
|00000330| 72 61 70 73 20 73 6f 20 | 69 74 20 77 69 6c 6c 20 |raps so |it will |
|00000340| 77 6f 72 6b 20 63 6f 72 | 72 65 63 74 6c 79 20 2a |work cor|rectly *|
|00000350| 2f 0d 09 0d 2f 2a 20 23 | 64 65 66 69 6e 65 20 5f |/.../* #|define _|
|00000360| 4e 6f 6e 4d 61 63 53 63 | 72 65 65 6e 5f 20 2a 2f |NonMacSc|reen_ */|
|00000370| 0d 0d 23 69 6e 63 6c 75 | 64 65 20 22 63 6f 6e 66 |..#inclu|de "conf|
|00000380| 69 67 2e 68 22 0d 0d 23 | 69 66 6e 64 65 66 20 5f |ig.h"..#|ifndef _|
|00000390| 73 74 64 69 6f 68 5f 0d | 23 69 6e 63 6c 75 64 65 |stdioh_.|#include|
|000003a0| 20 22 73 74 64 69 6f 2e | 68 22 0d 23 65 6e 64 69 | "stdio.|h".#endi|
|000003b0| 66 0d 0d 23 69 66 6e 64 | 65 66 09 5f 51 75 69 63 |f..#ifnd|ef._Quic|
|000003c0| 6b 44 72 61 77 5f 0d 23 | 69 6e 63 6c 75 64 65 20 |kDraw_.#|include |
|000003d0| 22 51 75 69 63 6b 44 72 | 61 77 2e 68 22 0d 23 65 |"QuickDr|aw.h".#e|
|000003e0| 6e 64 69 66 0d 0d 23 69 | 66 6e 64 65 66 09 5f 46 |ndif..#i|fndef._F|
|000003f0| 6f 6e 74 4d 67 72 5f 0d | 23 69 6e 63 6c 75 64 65 |ontMgr_.|#include|
|00000400| 20 22 46 6f 6e 74 4d 67 | 72 2e 68 22 0d 23 65 6e | "FontMg|r.h".#en|
|00000410| 64 69 66 0d 0d 23 69 66 | 6e 64 65 66 09 5f 4d 65 |dif..#if|ndef._Me|
|00000420| 6e 75 4d 67 72 5f 0d 23 | 69 6e 63 6c 75 64 65 20 |nuMgr_.#|include |
|00000430| 22 4d 65 6e 75 4d 67 72 | 2e 68 22 0d 23 65 6e 64 |"MenuMgr|.h".#end|
|00000440| 69 66 0d 0d 23 69 66 6e | 64 65 66 09 5f 54 6f 6f |if..#ifn|def._Too|
|00000450| 6c 62 6f 78 55 74 69 6c | 5f 0d 23 69 6e 63 6c 75 |lboxUtil|_.#inclu|
|00000460| 64 65 20 22 54 6f 6f 6c | 62 6f 78 55 74 69 6c 2e |de "Tool|boxUtil.|
|00000470| 68 22 0d 23 65 6e 64 69 | 66 0d 0d 23 69 66 6e 64 |h".#endi|f..#ifnd|
|00000480| 65 66 20 5f 66 6f 70 65 | 6e 77 68 5f 0d 23 69 6e |ef _fope|nwh_.#in|
|00000490| 63 6c 75 64 65 20 22 66 | 6f 70 65 6e 77 2e 68 22 |clude "f|openw.h"|
|000004a0| 0d 23 65 6e 64 69 66 0d | 0d 63 68 61 72 20 2a 43 |.#endif.|.char *C|
|000004b0| 74 6f 50 73 74 72 28 29 | 3b 0d 63 68 61 72 20 2a |toPstr()|;.char *|
|000004c0| 50 74 6f 43 73 74 72 28 | 29 3b 0d 63 68 61 72 20 |PtoCstr(|);.char |
|000004d0| 2a 73 74 64 5f 76 65 72 | 28 29 3b 0d 76 6f 69 64 |*std_ver|();.void|
|000004e0| 20 64 72 61 77 63 75 72 | 73 6f 72 28 29 3b 0d 76 | drawcur|sor();.v|
|000004f0| 6f 69 64 20 53 74 64 5f | 75 70 64 61 74 65 77 69 |oid Std_|updatewi|
|00000500| 6e 64 6f 77 28 29 3b 0d | 0d 2f 2a 20 73 63 72 65 |ndow();.|./* scre|
|00000510| 65 6e 20 64 69 73 70 6c | 61 79 20 67 6c 6f 62 61 |en displ|ay globa|
|00000520| 6c 73 20 2a 2f 0d 0d 73 | 74 61 74 69 63 20 57 69 |ls */..s|tatic Wi|
|00000530| 6e 64 6f 77 50 74 72 20 | 43 75 72 72 65 6e 74 73 |ndowPtr |Currents|
|00000540| 77 72 70 20 3d 20 30 3b | 0d 73 74 61 74 69 63 20 |wrp = 0;|.static |
|00000550| 46 49 4c 45 20 2a 43 75 | 72 72 65 6e 74 57 69 6e |FILE *Cu|rrentWin|
|00000560| 64 6f 77 20 3d 20 30 3b | 0d 73 74 61 74 69 63 20 |dow = 0;|.static |
|00000570| 57 69 6e 64 6f 77 50 74 | 72 20 5f 65 78 69 74 5f |WindowPt|r _exit_|
|00000580| 77 70 20 3d 20 30 3b 09 | 2f 2a 20 66 6f 72 20 73 |wp = 0;.|/* for s|
|00000590| 70 65 63 69 61 6c 20 65 | 78 69 74 20 77 69 6e 64 |pecial e|xit wind|
|000005a0| 6f 77 20 68 61 6e 64 6c | 69 6e 67 20 2a 2f 0d 73 |ow handl|ing */.s|
|000005b0| 74 61 74 69 63 20 57 69 | 6e 64 6f 77 50 74 72 20 |tatic Wi|ndowPtr |
|000005c0| 5f 63 6f 6e 73 6f 6c 65 | 5f 77 70 20 3d 20 30 3b |_console|_wp = 0;|
|000005d0| 0d 0d 2f 2a 20 64 65 66 | 61 75 6c 74 20 66 6f 6e |../* def|ault fon|
|000005e0| 74 20 69 6e 66 6f 20 2a | 2f 0d 0d 73 74 61 74 69 |t info *|/..stati|
|000005f0| 63 20 47 72 61 66 50 6f | 72 74 20 64 75 6d 6d 79 |c GrafPo|rt dummy|
|00000600| 50 6f 72 74 3b 0d 73 74 | 61 74 69 63 20 46 6f 6e |Port;.st|atic Fon|
|00000610| 74 49 6e 66 6f 20 5f 73 | 66 3b 09 09 09 09 2f 2a |tInfo _s|f;..../*|
|00000620| 20 68 6f 6c 64 73 20 74 | 68 65 20 69 6e 66 6f 20 | holds t|he info |
|00000630| 61 62 6f 75 74 20 74 68 | 65 20 66 6f 6e 74 20 2a |about th|e font *|
|00000640| 2f 0d 73 74 61 74 69 63 | 20 69 6e 74 09 5f 66 6f |/.static| int._fo|
|00000650| 6e 74 20 3d 20 6d 6f 6e | 61 63 6f 2c 0d 09 09 09 |nt = mon|aco,....|
|00000660| 5f 73 69 7a 65 20 3d 20 | 39 2c 0d 09 09 09 5f 66 |_size = |9,...._f|
|00000670| 61 63 65 20 3d 20 30 2c | 0d 09 09 09 5f 6d 6f 64 |ace = 0,|...._mod|
|00000680| 65 20 3d 20 73 72 63 4f | 72 3b 09 09 09 2f 2a 20 |e = srcO|r;.../* |
|00000690| 73 74 75 66 66 20 66 6f | 72 20 53 74 64 69 6f 5f |stuff fo|r Stdio_|
|000006a0| 43 6f 6e 66 69 67 20 2a | 2f 0d 0d 73 74 61 74 69 |Config *|/..stati|
|000006b0| 63 20 52 67 6e 48 61 6e | 64 6c 65 20 65 6d 70 74 |c RgnHan|dle empt|
|000006c0| 79 72 67 6e 3b 09 09 09 | 2f 2a 20 75 73 65 64 20 |yrgn;...|/* used |
|000006d0| 66 6f 72 20 73 63 72 6f | 6c 6c 69 6e 67 20 2a 2f |for scro|lling */|
|000006e0| 0d 73 74 61 74 69 63 20 | 52 65 63 74 20 62 6f 75 |.static |Rect bou|
|000006f0| 6e 64 73 3b 0d 0d 42 6f | 6f 6c 65 61 6e 20 5f 69 |nds;..Bo|olean _i|
|00000700| 6e 69 74 65 64 20 3d 20 | 66 61 6c 73 65 3b 09 09 |nited = |false;..|
|00000710| 09 2f 2a 20 77 68 65 74 | 68 65 72 20 4d 61 63 20 |./* whet|her Mac |
|00000720| 69 73 20 69 6e 69 74 65 | 64 20 79 65 74 20 2a 2f |is inite|d yet */|
|00000730| 0d 73 74 61 74 69 63 20 | 42 6f 6f 6c 65 61 6e 20 |.static |Boolean |
|00000740| 5f 73 63 72 65 65 6e 20 | 3d 20 66 61 6c 73 65 3b |_screen |= false;|
|00000750| 09 09 2f 2a 20 77 68 65 | 74 68 65 72 20 73 63 72 |../* whe|ther scr|
|00000760| 65 65 6e 20 69 73 20 69 | 6e 69 74 65 64 20 2a 2f |een is i|nited */|
|00000770| 0d 73 74 61 74 69 63 20 | 42 6f 6f 6c 65 61 6e 20 |.static |Boolean |
|00000780| 5f 63 6c 69 63 6b 5f 6f | 6e 20 3d 20 74 72 75 65 |_click_o|n = true|
|00000790| 3b 09 2f 2a 20 77 61 69 | 74 20 61 74 20 65 78 69 |;./* wai|t at exi|
|000007a0| 74 20 66 72 6f 6d 20 70 | 72 6f 67 72 61 6d 20 2a |t from p|rogram *|
|000007b0| 2f 0d 73 74 61 74 69 63 | 20 42 6f 6f 6c 65 61 6e |/.static| Boolean|
|000007c0| 20 5f 6f 75 72 5f 6d 65 | 6e 75 73 20 3d 20 66 61 | _our_me|nus = fa|
|000007d0| 6c 73 65 3b 09 2f 2a 20 | 66 6c 61 67 20 74 6f 20 |lse;./* |flag to |
|000007e0| 69 6e 64 69 63 61 74 65 | 20 69 66 20 6f 75 72 20 |indicate| if our |
|000007f0| 6d 65 6e 75 73 20 2a 2f | 0d 73 74 61 74 69 63 20 |menus */|.static |
|00000800| 69 6e 74 20 64 65 73 6b | 61 63 63 5f 63 6f 75 6e |int desk|acc_coun|
|00000810| 74 20 3d 20 30 3b 09 09 | 2f 2a 20 23 20 64 65 73 |t = 0;..|/* # des|
|00000820| 6b 20 61 63 63 65 73 73 | 6f 72 69 65 73 20 6f 70 |k access|ories op|
|00000830| 65 6e 20 2a 2f 0d 0d 42 | 6f 6f 6c 65 61 6e 20 5f |en */..B|oolean _|
|00000840| 65 63 68 6f 20 3d 20 74 | 72 75 65 3b 09 09 09 09 |echo = t|rue;....|
|00000850| 2f 2a 20 67 6c 6f 62 61 | 6c 20 45 63 68 6f 20 73 |/* globa|l Echo s|
|00000860| 74 61 74 75 73 20 66 6f | 72 20 6b 65 79 62 6f 61 |tatus fo|r keyboa|
|00000870| 72 64 20 69 6e 70 75 74 | 20 2a 2f 0d 65 78 74 65 |rd input| */.exte|
|00000880| 72 6e 20 76 6f 69 64 20 | 28 2a 5f 65 63 68 6f 5f |rn void |(*_echo_|
|00000890| 74 6f 5f 70 72 69 6e 74 | 65 72 5f 29 28 29 3b 09 |to_print|er_)();.|
|000008a0| 2f 2a 20 67 6c 6f 62 61 | 6c 20 45 63 68 6f 20 63 |/* globa|l Echo c|
|000008b0| 61 6c 6c 20 76 61 72 69 | 61 62 6c 65 20 66 6f 72 |all vari|able for|
|000008c0| 20 70 72 69 6e 74 65 72 | 20 2a 2f 0d 0d 0d 23 64 | printer| */...#d|
|000008d0| 65 66 69 6e 65 20 6d 6f | 76 65 63 75 72 73 6f 72 |efine mo|vecursor|
|000008e0| 28 73 77 72 70 2c 20 78 | 2c 20 79 29 5c 0d 4d 6f |(swrp, x|, y)\.Mo|
|000008f0| 76 65 54 6f 28 20 5f 4c | 45 46 54 45 44 47 45 20 |veTo( _L|EFTEDGE |
|00000900| 2b 20 28 78 29 20 2a 20 | 73 77 72 70 2d 3e 63 68 |+ (x) * |swrp->ch|
|00000910| 61 72 77 69 64 74 68 2c | 5c 0d 09 5f 54 4f 50 45 |arwidth,|\.._TOPE|
|00000920| 44 47 45 20 2b 20 73 77 | 72 70 2d 3e 73 66 2e 61 |DGE + sw|rp->sf.a|
|00000930| 73 63 65 6e 74 20 2b 20 | 28 28 79 29 2b 73 77 72 |scent + |((y)+swr|
|00000940| 70 2d 3e 76 69 73 72 6f | 77 2d 73 77 72 70 2d 3e |p->visro|w-swrp->|
|00000950| 6f 70 74 2e 6d 61 78 72 | 6f 77 29 20 2a 20 73 77 |opt.maxr|ow) * sw|
|00000960| 72 70 2d 3e 63 68 61 72 | 68 65 69 67 68 74 29 0d |rp->char|height).|
|00000970| 09 0d 0d 2f 2a 20 44 65 | 74 65 72 6d 69 6e 65 20 |.../* De|termine |
|00000980| 69 66 20 74 68 69 73 20 | 69 73 20 6f 6e 65 20 6f |if this |is one o|
|00000990| 66 20 74 68 65 20 73 74 | 64 69 6f 20 63 72 65 61 |f the st|dio crea|
|000009a0| 74 65 64 20 77 69 6e 64 | 6f 77 73 20 6f 72 20 6e |ted wind|ows or n|
|000009b0| 6f 74 20 2a 2f 0d 0d 73 | 74 61 74 69 63 0d 42 6f |ot */..s|tatic.Bo|
|000009c0| 6f 6c 65 61 6e 20 4f 75 | 72 57 69 6e 64 6f 77 28 |olean Ou|rWindow(|
|000009d0| 77 69 6e 64 6f 77 29 0d | 72 65 67 69 73 74 65 72 |window).|register|
|000009e0| 20 53 74 64 57 69 6e 64 | 6f 77 52 65 63 20 2a 77 | StdWind|owRec *w|
|000009f0| 69 6e 64 6f 77 3b 0d 7b | 0d 09 69 66 20 28 77 69 |indow;.{|..if (wi|
|00000a00| 6e 64 6f 77 29 0d 09 09 | 69 66 20 28 28 77 69 6e |ndow)...|if ((win|
|00000a10| 64 6f 77 20 3d 3d 20 28 | 53 74 64 57 69 6e 64 6f |dow == (|StdWindo|
|00000a20| 77 52 65 63 20 2a 29 5f | 65 78 69 74 5f 77 70 29 |wRec *)_|exit_wp)|
|00000a30| 20 7c 7c 20 28 77 69 6e | 64 6f 77 2d 3e 73 69 67 | || (win|dow->sig|
|00000a40| 6e 61 74 75 72 65 20 3d | 3d 20 5f 4f 55 52 53 49 |nature =|= _OURSI|
|00000a50| 47 4e 41 54 55 52 45 29 | 29 0d 09 09 09 72 65 74 |GNATURE)|)....ret|
|00000a60| 75 72 6e 20 28 74 72 75 | 65 29 3b 0d 09 0d 09 72 |urn (tru|e);....r|
|00000a70| 65 74 75 72 6e 20 28 66 | 61 6c 73 65 29 3b 0d 7d |eturn (f|alse);.}|
|00000a80| 0d 0d 2f 2a 20 44 69 73 | 70 61 74 63 68 20 76 69 |../* Dis|patch vi|
|00000a90| 61 20 72 65 66 63 6f 6e | 20 66 69 65 6c 64 20 6f |a refcon| field o|
|00000aa0| 66 20 77 69 6e 64 6f 77 | 20 72 65 63 6f 72 64 20 |f window| record |
|00000ab0| 66 6f 72 20 77 69 6e 64 | 6f 77 20 65 76 65 6e 74 |for wind|ow event|
|00000ac0| 73 20 2a 2f 0d 0d 73 74 | 61 74 69 63 0d 42 6f 6f |s */..st|atic.Boo|
|00000ad0| 6c 65 61 6e 20 57 69 6e | 64 6f 77 45 76 65 6e 74 |lean Win|dowEvent|
|00000ae0| 28 78 65 76 65 6e 74 29 | 0d 58 45 76 65 6e 74 52 |(xevent)|.XEventR|
|00000af0| 65 63 6f 72 64 20 2a 78 | 65 76 65 6e 74 3b 0d 7b |ecord *x|event;.{|
|00000b00| 0d 72 65 67 69 73 74 65 | 72 20 57 69 6e 64 6f 77 |.registe|r Window|
|00000b10| 50 65 65 6b 20 77 70 3b | 0d 72 65 67 69 73 74 65 |Peek wp;|.registe|
|00000b20| 72 20 65 76 65 6e 74 69 | 6e 66 6f 20 2a 2a 72 65 |r eventi|nfo **re|
|00000b30| 66 63 6f 6e 3b 0d 72 65 | 67 69 73 74 65 72 20 69 |fcon;.re|gister i|
|00000b40| 6e 74 20 28 2a 70 72 6f | 63 29 28 29 3b 0d 09 0d |nt (*pro|c)();...|
|00000b50| 09 69 66 20 28 21 20 4f | 75 72 57 69 6e 64 6f 77 |.if (! O|urWindow|
|00000b60| 28 77 70 20 3d 20 28 57 | 69 6e 64 6f 77 50 65 65 |(wp = (W|indowPee|
|00000b70| 6b 29 20 78 65 76 65 6e | 74 2d 3e 77 69 6e 64 6f |k) xeven|t->windo|
|00000b80| 77 29 29 20 72 65 74 75 | 72 6e 20 28 66 61 6c 73 |w)) retu|rn (fals|
|00000b90| 65 29 3b 0d 0d 09 69 66 | 20 28 77 70 2d 3e 77 69 |e);...if| (wp->wi|
|00000ba0| 6e 64 6f 77 4b 69 6e 64 | 20 3e 3d 20 38 20 26 26 |ndowKind| >= 8 &&|
|00000bb0| 20 28 72 65 66 63 6f 6e | 20 3d 20 28 65 76 65 6e | (refcon| = (even|
|00000bc0| 74 69 6e 66 6f 2a 2a 29 | 20 77 70 2d 3e 72 65 66 |tinfo**)| wp->ref|
|00000bd0| 43 6f 6e 29 0d 09 09 09 | 26 26 09 28 70 72 6f 63 |Con)....|&&.(proc|
|00000be0| 20 3d 20 28 2a 2a 72 65 | 66 63 6f 6e 29 2e 65 76 | = (**re|fcon).ev|
|00000bf0| 65 6e 74 50 72 6f 63 29 | 29 0d 09 09 72 65 74 75 |entProc)|)...retu|
|00000c00| 72 6e 20 28 28 2a 70 72 | 6f 63 29 28 78 65 76 65 |rn ((*pr|oc)(xeve|
|00000c10| 6e 74 29 29 3b 0d 09 0d | 09 72 65 74 75 72 6e 20 |nt));...|.return |
|00000c20| 28 66 61 6c 73 65 29 3b | 0d 7d 0d 0d 2f 2a 20 49 |(false);|.}../* I|
|00000c30| 66 20 77 65 20 73 65 74 | 20 75 70 20 74 68 65 20 |f we set| up the |
|00000c40| 73 63 72 65 65 6e 2c 20 | 77 65 20 73 65 74 20 75 |screen, |we set u|
|00000c50| 70 20 61 20 73 69 6d 70 | 6c 65 20 6d 65 6e 75 20 |p a simp|le menu |
|00000c60| 61 73 20 77 65 6c 6c 0d | 09 66 6f 72 20 44 41 73 |as well.|.for DAs|
|00000c70| 20 61 6e 64 20 73 75 63 | 68 20 2a 2f 0d 0d 73 74 | and suc|h */..st|
|00000c80| 61 74 69 63 0d 76 6f 69 | 64 20 73 65 74 75 70 5f |atic.voi|d setup_|
|00000c90| 6d 65 6e 75 73 28 29 0d | 7b 0d 72 65 67 69 73 74 |menus().|{.regist|
|00000ca0| 65 72 20 4d 65 6e 75 48 | 61 6e 64 6c 65 20 6d 65 |er MenuH|andle me|
|00000cb0| 6e 75 3b 09 09 2f 2a 20 | 68 61 6e 64 6c 65 20 66 |nu;../* |handle f|
|00000cc0| 6f 72 20 6f 75 72 20 6d | 65 6e 75 73 20 2a 2f 0d |or our m|enus */.|
|00000cd0| 0d 09 49 6e 69 74 4d 65 | 6e 75 73 28 29 3b 0d 09 |..InitMe|nus();..|
|00000ce0| 6d 65 6e 75 20 3d 20 4e | 65 77 4d 65 6e 75 28 31 |menu = N|ewMenu(1|
|00000cf0| 2c 20 22 5c 70 5c 30 32 | 34 22 29 3b 09 2f 2a 20 |, "\p\02|4");./* |
|00000d00| 20 61 70 70 6c 65 20 6d | 65 6e 75 20 20 2a 2f 0d | apple m|enu */.|
|00000d10| 09 41 64 64 52 65 73 4d | 65 6e 75 28 6d 65 6e 75 |.AddResM|enu(menu|
|00000d20| 2c 20 27 44 52 56 52 27 | 29 3b 0d 09 49 6e 73 65 |, 'DRVR'|);..Inse|
|00000d30| 72 74 4d 65 6e 75 28 6d | 65 6e 75 2c 20 30 29 3b |rtMenu(m|enu, 0);|
|00000d40| 0d 09 6d 65 6e 75 20 3d | 20 4e 65 77 4d 65 6e 75 |..menu =| NewMenu|
|00000d50| 28 32 2c 20 22 5c 70 46 | 69 6c 65 22 29 3b 0d 09 |(2, "\pF|ile");..|
|00000d60| 41 70 70 65 6e 64 4d 65 | 6e 75 28 6d 65 6e 75 2c |AppendMe|nu(menu,|
|00000d70| 20 22 5c 70 28 4e 65 77 | 3b 4f 70 65 6e 3b 43 6c | "\p(New|;Open;Cl|
|00000d80| 6f 73 65 3b 28 53 61 76 | 65 3b 28 2d 3b 51 75 69 |ose;(Sav|e;(-;Qui|
|00000d90| 74 22 29 3b 0d 09 49 6e | 73 65 72 74 4d 65 6e 75 |t");..In|sertMenu|
|00000da0| 28 6d 65 6e 75 2c 20 30 | 29 3b 0d 09 6d 65 6e 75 |(menu, 0|);..menu|
|00000db0| 20 3d 20 4e 65 77 4d 65 | 6e 75 28 33 2c 20 22 5c | = NewMe|nu(3, "\|
|00000dc0| 70 45 64 69 74 22 29 3b | 0d 23 69 66 64 65 66 20 |pEdit");|.#ifdef |
|00000dd0| 5f 53 54 44 5f 50 41 53 | 54 45 5f 0d 09 41 70 70 |_STD_PAS|TE_..App|
|00000de0| 65 6e 64 4d 65 6e 75 28 | 6d 65 6e 75 2c 20 22 5c |endMenu(|menu, "\|
|00000df0| 70 28 55 6e 64 6f 3b 28 | 2d 3b 28 43 75 74 3b 28 |p(Undo;(|-;(Cut;(|
|00000e00| 43 6f 70 79 3b 50 61 73 | 74 65 3b 28 43 6c 65 61 |Copy;Pas|te;(Clea|
|00000e10| 72 3b 28 2d 22 29 3b 0d | 23 65 6c 73 65 0d 09 41 |r;(-");.|#else..A|
|00000e20| 70 70 65 6e 64 4d 65 6e | 75 28 6d 65 6e 75 2c 20 |ppendMen|u(menu, |
|00000e30| 22 5c 70 28 55 6e 64 6f | 3b 28 2d 3b 28 43 75 74 |"\p(Undo|;(-;(Cut|
|00000e40| 3b 28 43 6f 70 79 3b 28 | 50 61 73 74 65 3b 28 43 |;(Copy;(|Paste;(C|
|00000e50| 6c 65 61 72 3b 28 2d 22 | 29 3b 0d 23 65 6e 64 69 |lear;(-"|);.#endi|
|00000e60| 66 20 5f 53 54 44 5f 50 | 41 53 54 45 5f 0d 0d 09 |f _STD_P|ASTE_...|
|00000e70| 41 70 70 65 6e 64 4d 65 | 6e 75 28 6d 65 6e 75 2c |AppendMe|nu(menu,|
|00000e80| 20 43 74 6f 50 73 74 72 | 28 73 74 64 5f 76 65 72 | CtoPstr|(std_ver|
|00000e90| 28 29 29 29 3b 0d 09 50 | 74 6f 43 73 74 72 28 73 |()));..P|toCstr(s|
|00000ea0| 74 64 5f 76 65 72 28 29 | 29 3b 0d 09 49 6e 73 65 |td_ver()|);..Inse|
|00000eb0| 72 74 4d 65 6e 75 28 6d | 65 6e 75 2c 20 30 29 3b |rtMenu(m|enu, 0);|
|00000ec0| 0d 09 44 72 61 77 4d 65 | 6e 75 42 61 72 28 29 3b |..DrawMe|nuBar();|
|00000ed0| 0d 09 0d 09 5f 6f 75 72 | 5f 6d 65 6e 75 73 20 3d |...._our|_menus =|
|00000ee0| 20 74 72 75 65 3b 0d 7d | 0d 0d 73 74 61 74 69 63 | true;.}|..static|
|00000ef0| 0d 76 6f 69 64 20 64 6f | 5f 65 78 69 74 28 29 0d |.void do|_exit().|
|00000f00| 7b 43 75 72 73 6f 72 20 | 77 61 74 63 68 3b 0d 0d |{Cursor |watch;..|
|00000f10| 09 09 77 61 74 63 68 20 | 3d 20 2a 2a 47 65 74 43 |..watch |= **GetC|
|00000f20| 75 72 73 6f 72 28 77 61 | 74 63 68 43 75 72 73 6f |ursor(wa|tchCurso|
|00000f30| 72 29 3b 0d 09 09 53 65 | 74 43 75 72 73 6f 72 28 |r);...Se|tCursor(|
|00000f40| 26 77 61 74 63 68 29 3b | 0d 09 09 5f 63 6c 69 63 |&watch);|..._clic|
|00000f50| 6b 5f 6f 6e 20 3d 20 66 | 61 6c 73 65 3b 0d 09 09 |k_on = f|alse;...|
|00000f60| 65 78 69 74 28 30 29 3b | 0d 7d 0d 0d 73 74 61 74 |exit(0);|.}..stat|
|00000f70| 69 63 0d 64 6f 4d 65 6e | 75 28 65 76 65 6e 74 29 |ic.doMen|u(event)|
|00000f80| 0d 72 65 67 69 73 74 65 | 72 20 58 45 76 65 6e 74 |.registe|r XEvent|
|00000f90| 52 65 63 6f 72 64 20 2a | 65 76 65 6e 74 3b 0d 7b |Record *|event;.{|
|00000fa0| 0d 73 68 6f 72 74 20 69 | 74 65 6d 3b 0d 0d 09 69 |.short i|tem;...i|
|00000fb0| 66 20 28 65 76 65 6e 74 | 2d 3e 72 65 63 6f 72 64 |f (event|->record|
|00000fc0| 2e 77 68 61 74 20 21 3d | 20 6d 65 6e 75 45 76 65 |.what !=| menuEve|
|00000fd0| 6e 74 29 0d 09 09 72 65 | 74 75 72 6e 3b 0d 0d 09 |nt)...re|turn;...|
|00000fe0| 69 74 65 6d 20 3d 20 65 | 76 65 6e 74 2d 3e 72 65 |item = e|vent->re|
|00000ff0| 63 6f 72 64 2e 6d 65 73 | 73 61 67 65 3b 0d 09 73 |cord.mes|sage;..s|
|00001000| 77 69 74 63 68 20 28 2a | 20 28 73 68 6f 72 74 20 |witch (*| (short |
|00001010| 2a 29 20 26 65 76 65 6e | 74 2d 3e 72 65 63 6f 72 |*) &even|t->recor|
|00001020| 64 2e 6d 65 73 73 61 67 | 65 29 0d 09 7b 0d 09 63 |d.messag|e)..{..c|
|00001030| 61 73 65 20 31 3a 0d 09 | 09 65 76 65 6e 74 2d 3e |ase 1:..|.event->|
|00001040| 72 65 63 6f 72 64 2e 77 | 68 61 74 20 3d 20 61 70 |record.w|hat = ap|
|00001050| 70 6c 65 45 76 65 6e 74 | 3b 0d 09 09 48 69 6c 69 |pleEvent|;...Hili|
|00001060| 74 65 4d 65 6e 75 28 30 | 29 3b 0d 09 09 62 72 65 |teMenu(0|);...bre|
|00001070| 61 6b 3b 0d 09 63 61 73 | 65 20 32 3a 0d 09 09 73 |ak;..cas|e 2:...s|
|00001080| 77 69 74 63 68 20 28 69 | 74 65 6d 29 0d 09 09 7b |witch (i|tem)...{|
|00001090| 0d 09 09 63 61 73 65 20 | 32 3a 09 2f 2a 20 4f 70 |...case |2:./* Op|
|000010a0| 65 6e 20 65 6e 74 72 79 | 20 6f 6e 20 66 69 6c 65 |en entry| on file|
|000010b0| 20 6d 65 6e 75 20 2a 2f | 0d 09 09 09 65 76 65 6e | menu */|....even|
|000010c0| 74 2d 3e 72 65 63 6f 72 | 64 2e 77 68 61 74 20 3d |t->recor|d.what =|
|000010d0| 20 6f 70 65 6e 45 76 65 | 6e 74 3b 0d 09 09 09 62 | openEve|nt;....b|
|000010e0| 72 65 61 6b 3b 0d 09 09 | 09 0d 09 09 63 61 73 65 |reak;...|....case|
|000010f0| 20 33 3a 09 2f 2a 20 43 | 6c 6f 73 65 20 65 6e 74 | 3:./* C|lose ent|
|00001100| 72 79 20 6f 6e 20 66 69 | 6c 65 20 6d 65 6e 75 20 |ry on fi|le menu |
|00001110| 2a 2f 0d 09 09 09 65 76 | 65 6e 74 2d 3e 72 65 63 |*/....ev|ent->rec|
|00001120| 6f 72 64 2e 77 68 61 74 | 20 3d 20 63 6c 6f 73 65 |ord.what| = close|
|00001130| 45 76 65 6e 74 3b 0d 09 | 09 09 62 72 65 61 6b 3b |Event;..|..break;|
|00001140| 0d 09 09 09 0d 09 09 63 | 61 73 65 20 36 3a 09 2f |.......c|ase 6:./|
|00001150| 2a 20 51 75 69 74 20 65 | 6e 74 72 79 20 6f 6e 20 |* Quit e|ntry on |
|00001160| 66 69 6c 65 20 6d 65 6e | 75 20 2a 2f 0d 09 09 09 |file men|u */....|
|00001170| 64 6f 5f 65 78 69 74 28 | 29 3b 0d 09 09 09 62 72 |do_exit(|);....br|
|00001180| 65 61 6b 3b 0d 09 09 7d | 0d 09 09 62 72 65 61 6b |eak;...}|...break|
|00001190| 3b 0d 09 63 61 73 65 20 | 33 3a 0d 23 69 66 64 65 |;..case |3:.#ifde|
|000011a0| 66 20 5f 53 54 44 5f 50 | 41 53 54 45 5f 0d 09 09 |f _STD_P|ASTE_...|
|000011b0| 09 69 66 20 28 69 74 65 | 6d 20 3d 3d 20 35 29 0d |.if (ite|m == 5).|
|000011c0| 09 09 09 2f 2a 20 50 61 | 73 74 65 20 65 6e 74 72 |.../* Pa|ste entr|
|000011d0| 79 20 6f 6e 20 65 64 69 | 74 20 6d 65 6e 75 20 2a |y on edi|t menu *|
|000011e0| 2f 0d 09 09 09 5f 73 74 | 64 5f 73 65 74 75 70 5f |/...._st|d_setup_|
|000011f0| 70 61 73 74 65 28 29 3b | 0d 23 65 6e 64 69 66 20 |paste();|.#endif |
|00001200| 5f 53 54 44 5f 50 41 53 | 54 45 5f 0d 0d 09 09 48 |_STD_PAS|TE_....H|
|00001210| 69 6c 69 74 65 4d 65 6e | 75 28 30 29 3b 0d 09 09 |iliteMen|u(0);...|
|00001220| 65 76 65 6e 74 2d 3e 72 | 65 63 6f 72 64 2e 77 68 |event->r|ecord.wh|
|00001230| 61 74 20 3d 20 65 64 69 | 74 45 76 65 6e 74 3b 0d |at = edi|tEvent;.|
|00001240| 09 09 62 72 65 61 6b 3b | 0d 09 7d 0d 7d 0d 0d 2f |..break;|..}.}../|
|00001250| 2a 20 65 6e 61 62 6c 65 | 20 65 64 69 74 20 6d 65 |* enable| edit me|
|00001260| 6e 75 20 70 69 63 6b 73 | 20 66 6f 72 20 75 6e 64 |nu picks| for und|
|00001270| 6f 2c 20 63 75 74 2c 20 | 63 6f 70 79 2c 20 70 61 |o, cut, |copy, pa|
|00001280| 73 74 65 2c 20 65 74 63 | 2e 20 2a 2f 0d 0d 73 74 |ste, etc|. */..st|
|00001290| 61 74 69 63 0d 76 6f 69 | 64 20 65 64 69 74 5f 65 |atic.voi|d edit_e|
|000012a0| 6e 61 62 6c 65 28 29 0d | 7b 72 65 67 69 73 74 65 |nable().|{registe|
|000012b0| 72 20 4d 65 6e 75 48 61 | 6e 64 6c 65 20 65 64 69 |r MenuHa|ndle edi|
|000012c0| 74 6d 65 6e 75 3b 0d 0d | 09 69 66 20 28 5f 6f 75 |tmenu;..|.if (_ou|
|000012d0| 72 5f 6d 65 6e 75 73 29 | 0d 09 7b 0d 09 09 69 66 |r_menus)|..{...if|
|000012e0| 20 28 65 64 69 74 6d 65 | 6e 75 20 3d 20 47 65 74 | (editme|nu = Get|
|000012f0| 4d 48 61 6e 64 6c 65 28 | 33 29 29 0d 09 09 7b 72 |MHandle(|3))...{r|
|00001300| 65 67 69 73 74 65 72 20 | 69 6e 74 20 69 3b 0d 09 |egister |int i;..|
|00001310| 09 09 66 6f 72 20 28 69 | 3d 43 6f 75 6e 74 4d 49 |..for (i|=CountMI|
|00001320| 74 65 6d 73 28 65 64 69 | 74 6d 65 6e 75 29 3b 20 |tems(edi|tmenu); |
|00001330| 69 3b 20 69 2d 2d 29 0d | 09 09 09 09 45 6e 61 62 |i; i--).|....Enab|
|00001340| 6c 65 49 74 65 6d 28 65 | 64 69 74 6d 65 6e 75 2c |leItem(e|ditmenu,|
|00001350| 20 69 29 3b 0d 09 09 09 | 44 69 73 61 62 6c 65 49 | i);....|DisableI|
|00001360| 74 65 6d 28 65 64 69 74 | 6d 65 6e 75 2c 20 32 29 |tem(edit|menu, 2)|
|00001370| 3b 09 2f 2a 20 67 72 61 | 79 20 6c 69 6e 65 20 2a |;./* gra|y line *|
|00001380| 2f 0d 09 09 09 44 69 73 | 61 62 6c 65 49 74 65 6d |/....Dis|ableItem|
|00001390| 28 65 64 69 74 6d 65 6e | 75 2c 20 37 29 3b 09 2f |(editmen|u, 7);./|
|000013a0| 2a 20 67 72 61 79 20 6c | 69 6e 65 20 2a 2f 0d 09 |* gray l|ine */..|
|000013b0| 09 09 44 69 73 61 62 6c | 65 49 74 65 6d 28 65 64 |..Disabl|eItem(ed|
|000013c0| 69 74 6d 65 6e 75 2c 20 | 38 29 3b 09 2f 2a 20 4c |itmenu, |8);./* L|
|000013d0| 69 62 72 61 72 79 20 76 | 65 72 73 69 6f 6e 20 2a |ibrary v|ersion *|
|000013e0| 2f 0d 09 09 7d 0d 09 7d | 0d 7d 0d 0d 73 74 61 74 |/...}..}|.}..stat|
|000013f0| 69 63 0d 76 6f 69 64 20 | 65 64 69 74 5f 64 69 73 |ic.void |edit_dis|
|00001400| 61 62 6c 65 28 29 0d 7b | 72 65 67 69 73 74 65 72 |able().{|register|
|00001410| 20 4d 65 6e 75 48 61 6e | 64 6c 65 20 65 64 69 74 | MenuHan|dle edit|
|00001420| 6d 65 6e 75 3b 0d 0d 09 | 69 66 20 28 5f 6f 75 72 |menu;...|if (_our|
|00001430| 5f 6d 65 6e 75 73 29 0d | 09 7b 0d 09 09 69 66 20 |_menus).|.{...if |
|00001440| 28 65 64 69 74 6d 65 6e | 75 20 3d 20 47 65 74 4d |(editmen|u = GetM|
|00001450| 48 61 6e 64 6c 65 28 33 | 29 29 0d 09 09 7b 72 65 |Handle(3|))...{re|
|00001460| 67 69 73 74 65 72 20 69 | 6e 74 20 69 3b 0d 09 09 |gister i|nt i;...|
|00001470| 09 66 6f 72 20 28 69 3d | 43 6f 75 6e 74 4d 49 74 |.for (i=|CountMIt|
|00001480| 65 6d 73 28 65 64 69 74 | 6d 65 6e 75 29 3b 20 69 |ems(edit|menu); i|
|00001490| 3b 20 69 2d 2d 29 09 0d | 09 09 09 09 44 69 73 61 |; i--)..|....Disa|
|000014a0| 62 6c 65 49 74 65 6d 28 | 65 64 69 74 6d 65 6e 75 |bleItem(|editmenu|
|000014b0| 2c 20 69 29 3b 0d 23 69 | 66 64 65 66 20 5f 53 54 |, i);.#i|fdef _ST|
|000014c0| 44 5f 50 41 53 54 45 5f | 0d 09 09 09 45 6e 61 62 |D_PASTE_|....Enab|
|000014d0| 6c 65 49 74 65 6d 28 65 | 64 69 74 6d 65 6e 75 2c |leItem(e|ditmenu,|
|000014e0| 20 35 29 3b 09 2f 2a 20 | 50 61 73 74 65 20 2a 2f | 5);./* |Paste */|
|000014f0| 0d 23 65 6e 64 69 66 20 | 5f 53 54 44 5f 50 41 53 |.#endif |_STD_PAS|
|00001500| 54 45 5f 0d 09 09 09 45 | 6e 61 62 6c 65 49 74 65 |TE_....E|nableIte|
|00001510| 6d 28 65 64 69 74 6d 65 | 6e 75 2c 20 38 29 3b 09 |m(editme|nu, 8);.|
|00001520| 2f 2a 20 4c 69 62 72 61 | 72 79 20 76 65 72 73 69 |/* Libra|ry versi|
|00001530| 6f 6e 20 2a 2f 0d 09 09 | 7d 0d 09 7d 0d 7d 0d 0d |on */...|}..}.}..|
|00001540| 2f 2a 0d 20 2a 20 20 53 | 74 64 45 76 65 6e 74 20 |/*. * S|tdEvent |
|00001550| 2d 20 65 76 65 6e 74 20 | 68 61 6e 64 6c 65 72 0d |- event |handler.|
|00001560| 20 2a 0d 20 2a 2f 0d 0d | 23 6c 69 6e 65 20 30 20 | *. */..|#line 0 |
|00001570| 53 74 64 45 76 65 6e 74 | 0d 42 6f 6f 6c 65 61 6e |StdEvent|.Boolean|
|00001580| 20 53 74 64 45 76 65 6e | 74 28 65 76 65 6e 74 29 | StdEven|t(event)|
|00001590| 0d 72 65 67 69 73 74 65 | 72 20 45 76 65 6e 74 52 |.registe|r EventR|
|000015a0| 65 63 6f 72 64 20 2a 65 | 76 65 6e 74 3b 0d 7b 0d |ecord *e|vent;.{.|
|000015b0| 58 45 76 65 6e 74 52 65 | 63 6f 72 64 20 65 76 3b |XEventRe|cord ev;|
|000015c0| 0d 72 65 67 69 73 74 65 | 72 20 58 45 76 65 6e 74 |.registe|r XEvent|
|000015d0| 52 65 63 6f 72 64 20 2a | 78 65 76 65 6e 74 20 3d |Record *|xevent =|
|000015e0| 20 26 65 76 3b 0d 72 65 | 67 69 73 74 65 72 20 73 | &ev;.re|gister s|
|000015f0| 68 6f 72 74 20 69 74 65 | 6d 2c 20 72 65 66 6e 75 |hort ite|m, refnu|
|00001600| 6d 3b 0d 52 65 63 74 20 | 72 3b 0d 6c 6f 6e 67 20 |m;.Rect |r;.long |
|00001610| 73 69 7a 65 3b 0d 69 6e | 74 20 28 2a 70 72 6f 63 |size;.in|t (*proc|
|00001620| 29 28 29 3b 0d 73 74 61 | 74 69 63 20 63 68 61 72 |)();.sta|tic char|
|00001630| 20 61 63 63 65 73 73 6f | 72 79 5b 32 35 36 5d 3b | accesso|ry[256];|
|00001640| 0d 0d 09 49 6e 69 74 5f | 73 74 64 69 6f 28 29 3b |...Init_|stdio();|
|00001650| 0d 09 0d 09 2f 2a 20 63 | 6f 70 79 20 65 76 65 6e |..../* c|opy even|
|00001660| 74 20 74 6f 20 6c 6f 63 | 61 6c 20 64 61 74 61 20 |t to loc|al data |
|00001670| 73 74 72 75 63 74 75 72 | 65 20 2a 2f 0d 0d 09 65 |structur|e */...e|
|00001680| 76 20 3d 20 2a 28 58 45 | 76 65 6e 74 52 65 63 6f |v = *(XE|ventReco|
|00001690| 72 64 2a 29 20 65 76 65 | 6e 74 3b 0d 09 0d 09 2f |rd*) eve|nt;..../|
|000016a0| 2a 20 72 65 73 65 74 20 | 65 76 65 6e 74 20 74 6f |* reset |event to|
|000016b0| 20 70 6f 69 6e 74 20 74 | 6f 20 74 68 69 73 20 65 | point t|o this e|
|000016c0| 78 74 65 6e 64 65 64 20 | 65 76 65 6e 74 20 72 65 |xtended |event re|
|000016d0| 63 6f 72 64 20 2a 2f 0d | 09 0d 09 65 76 65 6e 74 |cord */.|...event|
|000016e0| 20 3d 20 28 45 76 65 6e | 74 52 65 63 6f 72 64 2a | = (Even|tRecord*|
|000016f0| 29 20 26 65 76 3b 0d 09 | 0d 09 78 65 76 65 6e 74 |) &ev;..|..xevent|
|00001700| 2d 3e 77 69 6e 64 6f 77 | 20 3d 20 46 72 6f 6e 74 |->window| = Front|
|00001710| 57 69 6e 64 6f 77 28 29 | 3b 0d 09 0d 09 73 77 69 |Window()|;....swi|
|00001720| 74 63 68 20 28 65 76 65 | 6e 74 2d 3e 77 68 61 74 |tch (eve|nt->what|
|00001730| 29 0d 09 7b 0d 09 64 65 | 66 61 75 6c 74 3a 0d 09 |)..{..de|fault:..|
|00001740| 09 72 65 74 75 72 6e 20 | 28 57 69 6e 64 6f 77 45 |.return |(WindowE|
|00001750| 76 65 6e 74 28 65 76 65 | 6e 74 29 29 3b 0d 09 09 |vent(eve|nt));...|
|00001760| 0d 09 63 61 73 65 20 6e | 75 6c 6c 45 76 65 6e 74 |..case n|ullEvent|
|00001770| 3a 0d 09 09 69 66 20 28 | 21 20 57 69 6e 64 6f 77 |:...if (|! Window|
|00001780| 45 76 65 6e 74 28 65 76 | 65 6e 74 29 29 20 72 65 |Event(ev|ent)) re|
|00001790| 74 75 72 6e 20 28 66 61 | 6c 73 65 29 3b 0d 09 09 |turn (fa|lse);...|
|000017a0| 0d 09 09 73 77 69 74 63 | 68 20 28 46 69 6e 64 57 |...switc|h (FindW|
|000017b0| 69 6e 64 6f 77 28 65 76 | 65 6e 74 2d 3e 77 68 65 |indow(ev|ent->whe|
|000017c0| 72 65 2c 20 26 78 65 76 | 65 6e 74 2d 3e 77 69 6e |re, &xev|ent->win|
|000017d0| 64 6f 77 29 29 0d 09 09 | 7b 0d 09 09 63 61 73 65 |dow))...|{...case|
|000017e0| 20 69 6e 43 6f 6e 74 65 | 6e 74 3a 0d 09 09 09 69 | inConte|nt:....i|
|000017f0| 66 20 28 78 65 76 65 6e | 74 2d 3e 77 69 6e 64 6f |f (xeven|t->windo|
|00001800| 77 20 3d 3d 20 46 72 6f | 6e 74 57 69 6e 64 6f 77 |w == Fro|ntWindow|
|00001810| 28 29 29 0d 09 09 09 7b | 0d 09 09 09 09 53 65 74 |())....{|.....Set|
|00001820| 50 6f 72 74 28 78 65 76 | 65 6e 74 2d 3e 77 69 6e |Port(xev|ent->win|
|00001830| 64 6f 77 29 3b 0d 09 09 | 09 09 47 6c 6f 62 61 6c |dow);...|..Global|
|00001840| 54 6f 4c 6f 63 61 6c 28 | 26 65 76 65 6e 74 2d 3e |ToLocal(|&event->|
|00001850| 77 68 65 72 65 29 3b 0d | 09 09 09 09 65 76 65 6e |where);.|....even|
|00001860| 74 2d 3e 77 68 61 74 20 | 3d 20 63 75 72 73 6f 72 |t->what |= cursor|
|00001870| 45 76 65 6e 74 3b 0d 09 | 09 09 09 72 65 74 75 72 |Event;..|...retur|
|00001880| 6e 20 28 57 69 6e 64 6f | 77 45 76 65 6e 74 28 65 |n (Windo|wEvent(e|
|00001890| 76 65 6e 74 29 29 3b 0d | 09 09 09 7d 0d 09 09 64 |vent));.|...}...d|
|000018a0| 65 66 61 75 6c 74 3a 0d | 09 09 09 53 65 74 43 75 |efault:.|...SetCu|
|000018b0| 72 73 6f 72 28 26 61 72 | 72 6f 77 29 3b 0d 09 09 |rsor(&ar|row);...|
|000018c0| 09 62 72 65 61 6b 3b 0d | 09 09 7d 0d 09 09 62 72 |.break;.|..}...br|
|000018d0| 65 61 6b 3b 0d 0d 09 63 | 61 73 65 20 75 70 64 61 |eak;...c|ase upda|
|000018e0| 74 65 45 76 74 3a 0d 09 | 09 69 66 20 28 21 20 4f |teEvt:..|.if (! O|
|000018f0| 75 72 57 69 6e 64 6f 77 | 28 78 65 76 65 6e 74 2d |urWindow|(xevent-|
|00001900| 3e 77 69 6e 64 6f 77 20 | 3d 20 28 57 69 6e 64 6f |>window |= (Windo|
|00001910| 77 50 74 72 29 20 65 76 | 65 6e 74 2d 3e 6d 65 73 |wPtr) ev|ent->mes|
|00001920| 73 61 67 65 29 29 0d 09 | 09 09 72 65 74 75 72 6e |sage))..|..return|
|00001930| 20 28 66 61 6c 73 65 29 | 3b 0d 09 09 0d 09 09 42 | (false)|;......B|
|00001940| 65 67 69 6e 55 70 64 61 | 74 65 28 78 65 76 65 6e |eginUpda|te(xeven|
|00001950| 74 2d 3e 77 69 6e 64 6f | 77 29 3b 0d 09 09 53 65 |t->windo|w);...Se|
|00001960| 74 50 6f 72 74 28 78 65 | 76 65 6e 74 2d 3e 77 69 |tPort(xe|vent->wi|
|00001970| 6e 64 6f 77 29 3b 0d 09 | 09 57 69 6e 64 6f 77 45 |ndow);..|.WindowE|
|00001980| 76 65 6e 74 28 65 76 65 | 6e 74 29 3b 0d 09 09 45 |vent(eve|nt);...E|
|00001990| 6e 64 55 70 64 61 74 65 | 28 78 65 76 65 6e 74 2d |ndUpdate|(xevent-|
|000019a0| 3e 77 69 6e 64 6f 77 29 | 3b 0d 09 09 62 72 65 61 |>window)|;...brea|
|000019b0| 6b 3b 0d 09 09 0d 09 63 | 61 73 65 20 61 63 74 69 |k;.....c|ase acti|
|000019c0| 76 61 74 65 45 76 74 3a | 0d 09 09 69 66 20 28 21 |vateEvt:|...if (!|
|000019d0| 20 4f 75 72 57 69 6e 64 | 6f 77 28 78 65 76 65 6e | OurWind|ow(xeven|
|000019e0| 74 2d 3e 77 69 6e 64 6f | 77 20 3d 20 28 57 69 6e |t->windo|w = (Win|
|000019f0| 64 6f 77 50 74 72 29 20 | 65 76 65 6e 74 2d 3e 6d |dowPtr) |event->m|
|00001a00| 65 73 73 61 67 65 29 29 | 0d 09 09 09 72 65 74 75 |essage))|....retu|
|00001a10| 72 6e 20 28 66 61 6c 73 | 65 29 3b 0d 0d 09 09 53 |rn (fals|e);....S|
|00001a20| 65 74 50 6f 72 74 28 78 | 65 76 65 6e 74 2d 3e 77 |etPort(x|event->w|
|00001a30| 69 6e 64 6f 77 29 3b 0d | 09 09 69 66 20 28 21 28 |indow);.|..if (!(|
|00001a40| 65 76 65 6e 74 2d 3e 6d | 6f 64 69 66 69 65 72 73 |event->m|odifiers|
|00001a50| 20 26 20 61 63 74 69 76 | 65 46 6c 61 67 29 29 0d | & activ|eFlag)).|
|00001a60| 09 09 09 65 76 65 6e 74 | 2d 3e 77 68 61 74 20 3d |...event|->what =|
|00001a70| 20 64 65 61 63 74 69 76 | 61 74 65 45 76 74 3b 0d | deactiv|ateEvt;.|
|00001a80| 09 09 57 69 6e 64 6f 77 | 45 76 65 6e 74 28 65 76 |..Window|Event(ev|
|00001a90| 65 6e 74 29 3b 0d 09 09 | 62 72 65 61 6b 3b 0d 09 |ent);...|break;..|
|00001aa0| 09 0d 09 63 61 73 65 20 | 6d 6f 75 73 65 44 6f 77 |...case |mouseDow|
|00001ab0| 6e 3a 0d 09 09 73 77 69 | 74 63 68 20 28 46 69 6e |n:...swi|tch (Fin|
|00001ac0| 64 57 69 6e 64 6f 77 28 | 65 76 65 6e 74 2d 3e 77 |dWindow(|event->w|
|00001ad0| 68 65 72 65 2c 20 26 78 | 65 76 65 6e 74 2d 3e 77 |here, &x|event->w|
|00001ae0| 69 6e 64 6f 77 29 29 0d | 09 09 7b 0d 09 09 64 65 |indow)).|..{...de|
|00001af0| 66 61 75 6c 74 3a 0d 09 | 09 09 72 65 74 75 72 6e |fault:..|..return|
|00001b00| 20 28 66 61 6c 73 65 29 | 3b 0d 0d 09 09 63 61 73 | (false)|;....cas|
|00001b10| 65 20 69 6e 4d 65 6e 75 | 42 61 72 3a 0d 09 09 09 |e inMenu|Bar:....|
|00001b20| 69 66 20 28 21 20 5f 6f | 75 72 5f 6d 65 6e 75 73 |if (! _o|ur_menus|
|00001b30| 29 0d 09 09 09 09 72 65 | 74 75 72 6e 20 28 66 61 |).....re|turn (fa|
|00001b40| 6c 73 65 29 3b 0d 0d 09 | 09 09 78 65 76 65 6e 74 |lse);...|..xevent|
|00001b50| 2d 3e 77 69 6e 64 6f 77 | 20 3d 20 46 72 6f 6e 74 |->window| = Front|
|00001b60| 57 69 6e 64 6f 77 28 29 | 3b 0d 09 09 09 53 65 74 |Window()|;....Set|
|00001b70| 43 75 72 73 6f 72 28 26 | 61 72 72 6f 77 29 3b 0d |Cursor(&|arrow);.|
|00001b80| 09 09 09 64 6f 4d 65 6e | 75 28 65 76 65 6e 74 29 |...doMen|u(event)|
|00001b90| 3b 0d 09 09 09 65 76 65 | 6e 74 2d 3e 6d 65 73 73 |;....eve|nt->mess|
|00001ba0| 61 67 65 20 3d 20 4d 65 | 6e 75 53 65 6c 65 63 74 |age = Me|nuSelect|
|00001bb0| 28 65 76 65 6e 74 2d 3e | 77 68 65 72 65 29 3b 0d |(event->|where);.|
|00001bc0| 0d 09 09 09 69 66 20 28 | 68 69 77 6f 72 64 28 65 |....if (|hiword(e|
|00001bd0| 76 65 6e 74 2d 3e 6d 65 | 73 73 61 67 65 29 20 3d |vent->me|ssage) =|
|00001be0| 3d 20 30 29 20 62 72 65 | 61 6b 3b 0d 0d 09 09 09 |= 0) bre|ak;.....|
|00001bf0| 65 76 65 6e 74 2d 3e 77 | 68 61 74 20 3d 20 6d 65 |event->w|hat = me|
|00001c00| 6e 75 45 76 65 6e 74 3b | 0d 09 09 09 64 6f 4d 65 |nuEvent;|....doMe|
|00001c10| 6e 75 28 65 76 65 6e 74 | 29 3b 0d 09 09 09 73 77 |nu(event|);....sw|
|00001c20| 69 74 63 68 20 28 65 76 | 65 6e 74 2d 3e 77 68 61 |itch (ev|ent->wha|
|00001c30| 74 29 0d 09 09 09 7b 0d | 09 09 09 63 61 73 65 20 |t)....{.|...case |
|00001c40| 65 64 69 74 45 76 65 6e | 74 3a 0d 09 09 09 09 69 |editEven|t:.....i|
|00001c50| 66 20 28 53 79 73 74 65 | 6d 45 64 69 74 28 28 73 |f (Syste|mEdit((s|
|00001c60| 68 6f 72 74 29 20 65 76 | 65 6e 74 2d 3e 6d 65 73 |hort) ev|ent->mes|
|00001c70| 73 61 67 65 20 2d 20 31 | 29 29 0d 09 09 09 09 09 |sage - 1|))......|
|00001c80| 62 72 65 61 6b 3b 0d 09 | 09 09 09 57 69 6e 64 6f |break;..|...Windo|
|00001c90| 77 45 76 65 6e 74 28 65 | 76 65 6e 74 29 3b 0d 09 |wEvent(e|vent);..|
|00001ca0| 09 09 09 62 72 65 61 6b | 3b 0d 09 09 09 09 0d 09 |...break|;.......|
|00001cb0| 09 09 63 61 73 65 20 63 | 6c 6f 73 65 45 76 65 6e |..case c|loseEven|
|00001cc0| 74 3a 0d 09 09 09 09 69 | 66 20 28 78 65 76 65 6e |t:.....i|f (xeven|
|00001cd0| 74 2d 3e 77 69 6e 64 6f | 77 29 0d 09 09 09 09 7b |t->windo|w).....{|
|00001ce0| 0d 09 09 09 09 09 72 65 | 66 6e 75 6d 20 3d 20 28 |......re|fnum = (|
|00001cf0| 28 57 69 6e 64 6f 77 50 | 65 65 6b 29 20 78 65 76 |(WindowP|eek) xev|
|00001d00| 65 6e 74 2d 3e 77 69 6e | 64 6f 77 29 2d 3e 77 69 |ent->win|dow)->wi|
|00001d10| 6e 64 6f 77 4b 69 6e 64 | 3b 0d 09 09 09 09 09 69 |ndowKind|;......i|
|00001d20| 66 20 28 72 65 66 6e 75 | 6d 20 3c 20 30 29 0d 09 |f (refnu|m < 0)..|
|00001d30| 09 09 09 09 7b 0d 09 09 | 09 09 09 09 43 6c 6f 73 |....{...|....Clos|
|00001d40| 65 44 65 73 6b 41 63 63 | 28 72 65 66 6e 75 6d 29 |eDeskAcc|(refnum)|
|00001d50| 3b 0d 09 09 09 09 09 7d | 0d 09 09 09 09 09 65 6c |;......}|......el|
|00001d60| 73 65 0d 09 09 09 09 09 | 09 57 69 6e 64 6f 77 45 |se......|.WindowE|
|00001d70| 76 65 6e 74 28 65 76 65 | 6e 74 29 3b 0d 09 09 09 |vent(eve|nt);....|
|00001d80| 09 7d 0d 09 09 09 09 62 | 72 65 61 6b 3b 0d 09 09 |.}.....b|reak;...|
|00001d90| 09 0d 09 09 09 63 61 73 | 65 20 6f 70 65 6e 45 76 |.....cas|e openEv|
|00001da0| 65 6e 74 3a 0d 09 09 09 | 09 69 66 20 28 5f 63 6f |ent:....|.if (_co|
|00001db0| 6e 73 6f 6c 65 2d 3e 66 | 69 6c 65 62 75 66 29 0d |nsole->f|ilebuf).|
|00001dc0| 09 09 09 09 7b 0d 09 09 | 09 09 09 69 66 20 28 21 |....{...|...if (!|
|00001dd0| 28 28 57 69 6e 64 6f 77 | 50 65 65 6b 29 5f 63 6f |((Window|Peek)_co|
|00001de0| 6e 73 6f 6c 65 2d 3e 66 | 69 6c 65 62 75 66 29 2d |nsole->f|ilebuf)-|
|00001df0| 3e 76 69 73 69 62 6c 65 | 29 0d 09 09 09 09 09 7b |>visible|)......{|
|00001e00| 0d 09 09 09 09 09 09 53 | 68 6f 77 57 69 6e 64 6f |.......S|howWindo|
|00001e10| 77 28 5f 63 6f 6e 73 6f | 6c 65 2d 3e 66 69 6c 65 |w(_conso|le->file|
|00001e20| 62 75 66 29 3b 0d 09 09 | 09 09 09 09 53 74 64 5f |buf);...|....Std_|
|00001e30| 75 70 64 61 74 65 77 69 | 6e 64 6f 77 28 5f 63 6f |updatewi|ndow(_co|
|00001e40| 6e 73 6f 6c 65 2d 3e 66 | 69 6c 65 62 75 66 29 3b |nsole->f|ilebuf);|
|00001e50| 0d 09 09 09 09 09 7d 0d | 09 09 09 09 7d 0d 09 09 |......}.|....}...|
|00001e60| 09 09 62 72 65 61 6b 3b | 0d 09 09 09 09 0d 09 09 |..break;|........|
|00001e70| 09 63 61 73 65 20 61 70 | 70 6c 65 45 76 65 6e 74 |.case ap|pleEvent|
|00001e80| 3a 0d 09 09 09 09 47 65 | 74 49 74 65 6d 28 47 65 |:.....Ge|tItem(Ge|
|00001e90| 74 4d 48 61 6e 64 6c 65 | 28 68 69 77 6f 72 64 28 |tMHandle|(hiword(|
|00001ea0| 65 76 65 6e 74 2d 3e 6d | 65 73 73 61 67 65 29 29 |event->m|essage))|
|00001eb0| 2c 0d 09 09 09 09 09 09 | 6c 6f 77 6f 72 64 28 65 |,.......|loword(e|
|00001ec0| 76 65 6e 74 2d 3e 6d 65 | 73 73 61 67 65 29 2c 0d |vent->me|ssage),.|
|00001ed0| 09 09 09 09 09 09 61 63 | 63 65 73 73 6f 72 79 29 |......ac|cessory)|
|00001ee0| 3b 0d 09 09 09 09 4f 70 | 65 6e 44 65 73 6b 41 63 |;.....Op|enDeskAc|
|00001ef0| 63 28 61 63 63 65 73 73 | 6f 72 79 29 3b 0d 09 09 |c(access|ory);...|
|00001f00| 09 09 65 64 69 74 5f 65 | 6e 61 62 6c 65 28 29 3b |..edit_e|nable();|
|00001f10| 0d 09 09 09 09 62 72 65 | 61 6b 3b 0d 09 09 09 7d |.....bre|ak;....}|
|00001f20| 0d 09 09 09 62 72 65 61 | 6b 3b 0d 09 09 09 0d 09 |....brea|k;......|
|00001f30| 09 63 61 73 65 20 69 6e | 53 79 73 57 69 6e 64 6f |.case in|SysWindo|
|00001f40| 77 3a 0d 09 09 09 53 79 | 73 74 65 6d 43 6c 69 63 |w:....Sy|stemClic|
|00001f50| 6b 28 65 76 65 6e 74 2c | 20 78 65 76 65 6e 74 2d |k(event,| xevent-|
|00001f60| 3e 77 69 6e 64 6f 77 29 | 3b 0d 09 09 09 62 72 65 |>window)|;....bre|
|00001f70| 61 6b 3b 0d 0d 09 09 63 | 61 73 65 20 69 6e 43 6f |ak;....c|ase inCo|
|00001f80| 6e 74 65 6e 74 3a 0d 09 | 09 09 69 66 20 28 21 20 |ntent:..|..if (! |
|00001f90| 4f 75 72 57 69 6e 64 6f | 77 28 78 65 76 65 6e 74 |OurWindo|w(xevent|
|00001fa0| 2d 3e 77 69 6e 64 6f 77 | 29 29 20 72 65 74 75 72 |->window|)) retur|
|00001fb0| 6e 20 28 66 61 6c 73 65 | 29 3b 0d 09 09 09 0d 09 |n (false|);......|
|00001fc0| 09 09 69 66 20 28 78 65 | 76 65 6e 74 2d 3e 77 69 |..if (xe|vent->wi|
|00001fd0| 6e 64 6f 77 20 21 3d 20 | 46 72 6f 6e 74 57 69 6e |ndow != |FrontWin|
|00001fe0| 64 6f 77 28 29 29 0d 09 | 09 09 7b 0d 09 09 09 09 |dow())..|..{.....|
|00001ff0| 65 76 65 6e 74 2d 3e 77 | 68 61 74 20 3d 20 73 65 |event->w|hat = se|
|00002000| 6c 65 63 74 45 76 65 6e | 74 3b 0d 09 09 09 09 57 |lectEven|t;.....W|
|00002010| 69 6e 64 6f 77 45 76 65 | 6e 74 28 65 76 65 6e 74 |indowEve|nt(event|
|00002020| 29 3b 0d 09 09 09 09 69 | 66 20 28 65 76 65 6e 74 |);.....i|f (event|
|00002030| 2d 3e 77 68 61 74 20 21 | 3d 20 6d 6f 75 73 65 44 |->what !|= mouseD|
|00002040| 6f 77 6e 29 0d 09 09 09 | 09 7b 0d 09 09 09 09 09 |own)....|.{......|
|00002050| 53 65 6c 65 63 74 57 69 | 6e 64 6f 77 28 78 65 76 |SelectWi|ndow(xev|
|00002060| 65 6e 74 2d 3e 77 69 6e | 64 6f 77 29 3b 0d 09 09 |ent->win|dow);...|
|00002070| 09 09 09 62 72 65 61 6b | 3b 0d 09 09 09 09 7d 0d |...break|;.....}.|
|00002080| 09 09 09 7d 0d 09 09 09 | 53 65 74 50 6f 72 74 28 |...}....|SetPort(|
|00002090| 78 65 76 65 6e 74 2d 3e | 77 69 6e 64 6f 77 29 3b |xevent->|window);|
|000020a0| 0d 09 09 09 47 6c 6f 62 | 61 6c 54 6f 4c 6f 63 61 |....Glob|alToLoca|
|000020b0| 6c 28 26 65 76 65 6e 74 | 2d 3e 77 68 65 72 65 29 |l(&event|->where)|
|000020c0| 3b 0d 09 09 09 69 66 20 | 28 65 76 65 6e 74 2d 3e |;....if |(event->|
|000020d0| 6d 65 73 73 61 67 65 20 | 3d 20 46 69 6e 64 43 6f |message |= FindCo|
|000020e0| 6e 74 72 6f 6c 28 65 76 | 65 6e 74 2d 3e 77 68 65 |ntrol(ev|ent->whe|
|000020f0| 72 65 2c 0d 09 09 09 09 | 09 09 09 09 09 09 09 20 |re,.....|....... |
|00002100| 78 65 76 65 6e 74 2d 3e | 77 69 6e 64 6f 77 2c 0d |xevent->|window,.|
|00002110| 09 09 09 09 09 09 09 09 | 09 09 09 20 26 78 65 76 |........|... &xev|
|00002120| 65 6e 74 2d 3e 63 6f 6e | 74 72 6f 6c 29 29 0d 09 |ent->con|trol))..|
|00002130| 09 09 7b 0d 09 09 09 09 | 70 72 6f 63 20 3d 20 28 |..{.....|proc = (|
|00002140| 69 6e 74 20 28 2a 29 28 | 29 29 20 28 65 76 65 6e |int (*)(|)) (even|
|00002150| 74 2d 3e 6d 65 73 73 61 | 67 65 20 3e 20 31 32 38 |t->messa|ge > 128|
|00002160| 20 3f 20 30 4c 20 3a 20 | 2d 31 4c 29 3b 0d 09 09 | ? 0L : |-1L);...|
|00002170| 09 09 69 66 20 28 54 72 | 61 63 6b 43 6f 6e 74 72 |..if (Tr|ackContr|
|00002180| 6f 6c 28 78 65 76 65 6e | 74 2d 3e 63 6f 6e 74 72 |ol(xeven|t->contr|
|00002190| 6f 6c 2c 20 65 76 65 6e | 74 2d 3e 77 68 65 72 65 |ol, even|t->where|
|000021a0| 2c 20 70 72 6f 63 29 20 | 3d 3d 20 30 29 0d 09 09 |, proc) |== 0)...|
|000021b0| 09 09 09 62 72 65 61 6b | 3b 0d 09 09 09 09 65 76 |...break|;.....ev|
|000021c0| 65 6e 74 2d 3e 77 68 61 | 74 20 3d 20 63 6f 6e 74 |ent->wha|t = cont|
|000021d0| 72 6f 6c 45 76 65 6e 74 | 3b 0d 09 09 09 7d 0d 09 |rolEvent|;....}..|
|000021e0| 09 09 57 69 6e 64 6f 77 | 45 76 65 6e 74 28 65 76 |..Window|Event(ev|
|000021f0| 65 6e 74 29 3b 0d 09 09 | 09 69 66 20 28 65 76 65 |ent);...|.if (eve|
|00002200| 6e 74 2d 3e 77 68 61 74 | 20 21 3d 20 64 72 61 67 |nt->what| != drag|
|00002210| 45 76 65 6e 74 29 20 62 | 72 65 61 6b 3b 0d 09 09 |Event) b|reak;...|
|00002220| 09 0d 09 09 09 4c 6f 63 | 61 6c 54 6f 47 6c 6f 62 |.....Loc|alToGlob|
|00002230| 61 6c 28 26 65 76 65 6e | 74 2d 3e 77 68 65 72 65 |al(&even|t->where|
|00002240| 29 3b 0d 09 09 09 2f 2a | 20 2e 2e 2e 20 2a 2f 0d |);..../*| ... */.|
|00002250| 09 09 63 61 73 65 20 69 | 6e 44 72 61 67 3a 0d 09 |..case i|nDrag:..|
|00002260| 09 09 2f 2a 20 64 6f 6e | 27 74 20 73 65 6c 65 63 |../* don|'t selec|
|00002270| 74 20 77 69 6e 64 6f 77 | 20 69 66 20 63 6f 6d 6d |t window| if comm|
|00002280| 61 6e 64 20 6b 65 79 20 | 69 73 20 64 6f 77 6e 20 |and key |is down |
|00002290| 2a 2f 0d 09 09 09 0d 09 | 09 09 69 66 20 28 21 28 |*/......|..if (!(|
|000022a0| 65 76 65 6e 74 2d 3e 6d | 6f 64 69 66 69 65 72 73 |event->m|odifiers|
|000022b0| 20 26 20 63 6d 64 4b 65 | 79 29 29 0d 09 09 09 09 | & cmdKe|y)).....|
|000022c0| 69 66 20 28 78 65 76 65 | 6e 74 2d 3e 77 69 6e 64 |if (xeve|nt->wind|
|000022d0| 6f 77 20 21 3d 20 46 72 | 6f 6e 74 57 69 6e 64 6f |ow != Fr|ontWindo|
|000022e0| 77 28 29 29 0d 09 09 09 | 09 7b 0d 09 09 09 09 09 |w())....|.{......|
|000022f0| 53 65 6c 65 63 74 57 69 | 6e 64 6f 77 28 78 65 76 |SelectWi|ndow(xev|
|00002300| 65 6e 74 2d 3e 77 69 6e | 64 6f 77 29 3b 0d 09 09 |ent->win|dow);...|
|00002310| 09 09 09 62 72 65 61 6b | 3b 0d 09 09 09 09 7d 0d |...break|;.....}.|
|00002320| 09 09 09 53 65 74 52 65 | 63 74 28 26 72 2c 20 34 |...SetRe|ct(&r, 4|
|00002330| 2c 20 5f 4d 42 41 52 48 | 45 49 47 48 54 20 2b 20 |, _MBARH|EIGHT + |
|00002340| 34 2c 20 73 63 72 65 65 | 6e 57 69 64 74 68 20 2d |4, scree|nWidth -|
|00002350| 20 34 2c 20 73 63 72 65 | 65 6e 48 65 69 67 68 74 | 4, scre|enHeight|
|00002360| 20 2d 20 34 29 3b 0d 09 | 09 09 53 65 74 43 75 72 | - 4);..|..SetCur|
|00002370| 73 6f 72 28 26 61 72 72 | 6f 77 29 3b 0d 09 09 09 |sor(&arr|ow);....|
|00002380| 44 72 61 67 57 69 6e 64 | 6f 77 28 78 65 76 65 6e |DragWind|ow(xeven|
|00002390| 74 2d 3e 77 69 6e 64 6f | 77 2c 20 65 76 65 6e 74 |t->windo|w, event|
|000023a0| 2d 3e 77 68 65 72 65 2c | 20 26 72 29 3b 0d 09 09 |->where,| &r);...|
|000023b0| 09 62 72 65 61 6b 3b 0d | 09 09 09 0d 09 09 63 61 |.break;.|......ca|
|000023c0| 73 65 20 69 6e 47 72 6f | 77 3a 0d 09 09 09 69 66 |se inGro|w:....if|
|000023d0| 20 28 21 20 4f 75 72 57 | 69 6e 64 6f 77 28 78 65 | (! OurW|indow(xe|
|000023e0| 76 65 6e 74 2d 3e 77 69 | 6e 64 6f 77 29 29 20 72 |vent->wi|ndow)) r|
|000023f0| 65 74 75 72 6e 20 28 66 | 61 6c 73 65 29 3b 0d 09 |eturn (f|alse);..|
|00002400| 09 09 0d 09 09 09 7b 72 | 65 67 69 73 74 65 72 20 |......{r|egister |
|00002410| 53 74 64 57 69 6e 64 6f | 77 52 65 63 20 2a 73 77 |StdWindo|wRec *sw|
|00002420| 72 70 20 3d 20 28 53 74 | 64 57 69 6e 64 6f 77 52 |rp = (St|dWindowR|
|00002430| 65 63 2a 29 78 65 76 65 | 6e 74 2d 3e 77 69 6e 64 |ec*)xeve|nt->wind|
|00002440| 6f 77 3b 0d 09 09 09 20 | 0d 09 09 09 53 65 74 52 |ow;.... |....SetR|
|00002450| 65 63 74 28 26 72 2c 0d | 09 09 09 09 73 77 72 70 |ect(&r,.|....swrp|
|00002460| 2d 3e 63 68 61 72 77 69 | 64 74 68 20 2b 20 5f 4c |->charwi|dth + _L|
|00002470| 45 46 54 45 44 47 45 20 | 2b 20 5f 43 4f 4e 54 52 |EFTEDGE |+ _CONTR|
|00002480| 4f 4c 57 49 44 54 48 20 | 2b 20 33 2c 0d 09 09 09 |OLWIDTH |+ 3,....|
|00002490| 09 73 77 72 70 2d 3e 63 | 68 61 72 68 65 69 67 68 |.swrp->c|harheigh|
|000024a0| 74 20 2b 20 5f 54 4f 50 | 45 44 47 45 20 2b 20 5f |t + _TOP|EDGE + _|
|000024b0| 43 4f 4e 54 52 4f 4c 57 | 49 44 54 48 20 2b 20 38 |CONTROLW|IDTH + 8|
|000024c0| 2c 0d 09 09 09 09 73 77 | 72 70 2d 3e 63 68 61 72 |,.....sw|rp->char|
|000024d0| 77 69 64 74 68 20 2a 20 | 73 77 72 70 2d 3e 6f 70 |width * |swrp->op|
|000024e0| 74 2e 6d 61 78 63 6f 6c | 20 2b 20 5f 4c 45 46 54 |t.maxcol| + _LEFT|
|000024f0| 45 44 47 45 20 2b 20 5f | 43 4f 4e 54 52 4f 4c 57 |EDGE + _|CONTROLW|
|00002500| 49 44 54 48 20 2b 20 33 | 2c 0d 09 09 09 09 73 77 |IDTH + 3|,.....sw|
|00002510| 72 70 2d 3e 63 68 61 72 | 68 65 69 67 68 74 20 2a |rp->char|height *|
|00002520| 20 73 77 72 70 2d 3e 6f | 70 74 2e 6d 61 78 72 6f | swrp->o|pt.maxro|
|00002530| 77 20 2b 20 5f 54 4f 50 | 45 44 47 45 20 2b 20 5f |w + _TOP|EDGE + _|
|00002540| 43 4f 4e 54 52 4f 4c 57 | 49 44 54 48 20 2b 20 38 |CONTROLW|IDTH + 8|
|00002550| 29 3b 0d 09 09 09 7d 0d | 09 09 09 0d 09 09 09 53 |);....}.|.......S|
|00002560| 65 74 43 75 72 73 6f 72 | 28 26 61 72 72 6f 77 29 |etCursor|(&arrow)|
|00002570| 3b 0d 09 09 09 69 66 20 | 28 73 69 7a 65 20 3d 20 |;....if |(size = |
|00002580| 47 72 6f 77 57 69 6e 64 | 6f 77 28 78 65 76 65 6e |GrowWind|ow(xeven|
|00002590| 74 2d 3e 77 69 6e 64 6f | 77 2c 20 65 76 65 6e 74 |t->windo|w, event|
|000025a0| 2d 3e 77 68 65 72 65 2c | 20 26 72 29 29 0d 09 09 |->where,| &r))...|
|000025b0| 09 7b 0d 09 09 09 09 53 | 69 7a 65 57 69 6e 64 6f |.{.....S|izeWindo|
|000025c0| 77 28 78 65 76 65 6e 74 | 2d 3e 77 69 6e 64 6f 77 |w(xevent|->window|
|000025d0| 2c 20 6c 6f 77 6f 72 64 | 28 73 69 7a 65 29 2c 20 |, loword|(size), |
|000025e0| 68 69 77 6f 72 64 28 73 | 69 7a 65 29 2c 20 30 29 |hiword(s|ize), 0)|
|000025f0| 3b 0d 09 09 09 09 53 65 | 74 50 6f 72 74 28 78 65 |;.....Se|tPort(xe|
|00002600| 76 65 6e 74 2d 3e 77 69 | 6e 64 6f 77 29 3b 0d 09 |vent->wi|ndow);..|
|00002610| 09 09 09 49 6e 76 61 6c | 52 65 63 74 28 26 78 65 |...Inval|Rect(&xe|
|00002620| 76 65 6e 74 2d 3e 77 69 | 6e 64 6f 77 2d 3e 70 6f |vent->wi|ndow->po|
|00002630| 72 74 52 65 63 74 29 3b | 0d 09 09 09 09 65 76 65 |rtRect);|.....eve|
|00002640| 6e 74 2d 3e 77 68 61 74 | 20 3d 20 67 72 6f 77 45 |nt->what| = growE|
|00002650| 76 65 6e 74 3b 0d 09 09 | 09 09 57 69 6e 64 6f 77 |vent;...|..Window|
|00002660| 45 76 65 6e 74 28 65 76 | 65 6e 74 29 3b 0d 09 09 |Event(ev|ent);...|
|00002670| 09 09 7b 53 74 64 57 69 | 6e 64 6f 77 52 65 63 20 |..{StdWi|ndowRec |
|00002680| 2a 73 77 72 70 20 3d 20 | 28 28 53 74 64 57 69 6e |*swrp = |((StdWin|
|00002690| 64 6f 77 52 65 63 2a 29 | 78 65 76 65 6e 74 2d 3e |dowRec*)|xevent->|
|000026a0| 77 69 6e 64 6f 77 29 3b | 0d 09 09 09 09 09 73 77 |window);|......sw|
|000026b0| 72 70 2d 3e 76 69 73 63 | 6f 6c 20 3d 20 28 6c 6f |rp->visc|ol = (lo|
|000026c0| 77 6f 72 64 28 73 69 7a | 65 29 2d 5f 43 4f 4e 54 |word(siz|e)-_CONT|
|000026d0| 52 4f 4c 57 49 44 54 48 | 2d 31 2d 73 77 72 70 2d |ROLWIDTH|-1-swrp-|
|000026e0| 3e 63 68 61 72 77 69 64 | 74 68 2b 31 29 2f 73 77 |>charwid|th+1)/sw|
|000026f0| 72 70 2d 3e 63 68 61 72 | 77 69 64 74 68 3b 0d 09 |rp->char|width;..|
|00002700| 09 09 09 09 73 77 72 70 | 2d 3e 76 69 73 72 6f 77 |....swrp|->visrow|
|00002710| 20 3d 20 28 68 69 77 6f | 72 64 28 73 69 7a 65 29 | = (hiwo|rd(size)|
|00002720| 2d 5f 43 4f 4e 54 52 4f | 4c 57 49 44 54 48 2d 31 |-_CONTRO|LWIDTH-1|
|00002730| 2d 73 77 72 70 2d 3e 63 | 68 61 72 68 65 69 67 68 |-swrp->c|harheigh|
|00002740| 74 2b 31 29 2f 73 77 72 | 70 2d 3e 63 68 61 72 68 |t+1)/swr|p->charh|
|00002750| 65 69 67 68 74 3b 0d 0d | 09 09 09 09 09 2f 2a 20 |eight;..|...../* |
|00002760| 6d 61 6b 65 20 73 75 72 | 65 20 6e 65 69 74 68 65 |make sur|e neithe|
|00002770| 72 20 76 61 72 69 61 62 | 6c 65 20 65 78 63 65 65 |r variab|le excee|
|00002780| 64 73 20 6c 65 67 61 6c | 20 62 6f 75 6e 64 73 20 |ds legal| bounds |
|00002790| 2a 2f 0d 0d 09 09 09 09 | 09 69 66 20 28 73 77 72 |*/......|.if (swr|
|000027a0| 70 2d 3e 76 69 73 63 6f | 6c 20 3e 20 73 77 72 70 |p->visco|l > swrp|
|000027b0| 2d 3e 6f 70 74 2e 6d 61 | 78 63 6f 6c 29 20 73 77 |->opt.ma|xcol) sw|
|000027c0| 72 70 2d 3e 76 69 73 63 | 6f 6c 20 3d 20 73 77 72 |rp->visc|ol = swr|
|000027d0| 70 2d 3e 6f 70 74 2e 6d | 61 78 63 6f 6c 3b 0d 09 |p->opt.m|axcol;..|
|000027e0| 09 09 09 09 69 66 20 28 | 73 77 72 70 2d 3e 76 69 |....if (|swrp->vi|
|000027f0| 73 72 6f 77 20 3e 20 73 | 77 72 70 2d 3e 6f 70 74 |srow > s|wrp->opt|
|00002800| 2e 6d 61 78 72 6f 77 29 | 20 73 77 72 70 2d 3e 76 |.maxrow)| swrp->v|
|00002810| 69 73 72 6f 77 20 3d 20 | 73 77 72 70 2d 3e 6f 70 |isrow = |swrp->op|
|00002820| 74 2e 6d 61 78 72 6f 77 | 3b 0d 09 09 09 09 7d 0d |t.maxrow|;.....}.|
|00002830| 09 09 09 7d 0d 09 09 09 | 62 72 65 61 6b 3b 0d 0d |...}....|break;..|
|00002840| 09 09 63 61 73 65 20 69 | 6e 47 6f 41 77 61 79 3a |..case i|nGoAway:|
|00002850| 0d 09 09 09 69 66 20 28 | 21 20 4f 75 72 57 69 6e |....if (|! OurWin|
|00002860| 64 6f 77 28 78 65 76 65 | 6e 74 2d 3e 77 69 6e 64 |dow(xeve|nt->wind|
|00002870| 6f 77 29 29 20 72 65 74 | 75 72 6e 20 28 66 61 6c |ow)) ret|urn (fal|
|00002880| 73 65 29 3b 0d 09 09 09 | 0d 09 09 09 53 65 74 43 |se);....|....SetC|
|00002890| 75 72 73 6f 72 28 26 61 | 72 72 6f 77 29 3b 0d 09 |ursor(&a|rrow);..|
|000028a0| 09 09 69 66 20 28 54 72 | 61 63 6b 47 6f 41 77 61 |..if (Tr|ackGoAwa|
|000028b0| 79 28 78 65 76 65 6e 74 | 2d 3e 77 69 6e 64 6f 77 |y(xevent|->window|
|000028c0| 2c 20 65 76 65 6e 74 2d | 3e 77 68 65 72 65 29 29 |, event-|>where))|
|000028d0| 0d 09 09 09 7b 0d 09 09 | 09 09 65 76 65 6e 74 2d |....{...|..event-|
|000028e0| 3e 77 68 61 74 20 3d 20 | 63 6c 6f 73 65 45 76 65 |>what = |closeEve|
|000028f0| 6e 74 3b 0d 09 09 09 09 | 57 69 6e 64 6f 77 45 76 |nt;.....|WindowEv|
|00002900| 65 6e 74 28 65 76 65 6e | 74 29 3b 0d 09 09 09 7d |ent(even|t);....}|
|00002910| 0d 09 09 09 62 72 65 61 | 6b 3b 0d 09 09 7d 0d 09 |....brea|k;...}..|
|00002920| 09 62 72 65 61 6b 3b 0d | 09 7d 0d 09 72 65 74 75 |.break;.|.}..retu|
|00002930| 72 6e 20 28 74 72 75 65 | 29 3b 09 0d 7d 0d 0d 73 |rn (true|);..}..s|
|00002940| 74 61 74 69 63 0d 76 6f | 69 64 20 73 74 64 69 6f |tatic.vo|id stdio|
|00002950| 5f 66 6f 6e 74 73 65 74 | 28 70 6f 72 74 70 29 0d |_fontset|(portp).|
|00002960| 47 72 61 66 50 74 72 20 | 70 6f 72 74 70 3b 0d 7b |GrafPtr |portp;.{|
|00002970| 0d 09 2f 2a 20 73 65 74 | 20 75 70 20 61 20 66 6f |../* set| up a fo|
|00002980| 6e 74 20 2a 2f 0d 09 0d | 09 53 65 74 50 6f 72 74 |nt */...|.SetPort|
|00002990| 28 70 6f 72 74 70 29 3b | 0d 09 54 65 78 74 46 6f |(portp);|..TextFo|
|000029a0| 6e 74 28 5f 66 6f 6e 74 | 29 3b 0d 09 54 65 78 74 |nt(_font|);..Text|
|000029b0| 53 69 7a 65 28 5f 73 69 | 7a 65 29 3b 0d 09 54 65 |Size(_si|ze);..Te|
|000029c0| 78 74 46 61 63 65 28 5f | 66 61 63 65 29 3b 0d 09 |xtFace(_|face);..|
|000029d0| 54 65 78 74 4d 6f 64 65 | 28 5f 6d 6f 64 65 29 3b |TextMode|(_mode);|
|000029e0| 0d 7d 0d 0d 73 74 61 74 | 69 63 0d 76 6f 69 64 20 |.}..stat|ic.void |
|000029f0| 64 72 61 77 63 75 72 73 | 6f 72 28 73 77 72 70 2c |drawcurs|or(swrp,|
|00002a00| 20 66 6c 61 67 29 0d 72 | 65 67 69 73 74 65 72 20 | flag).r|egister |
|00002a10| 53 74 64 57 69 6e 64 6f | 77 52 65 63 20 2a 73 77 |StdWindo|wRec *sw|
|00002a20| 72 70 3b 0d 42 6f 6f 6c | 65 61 6e 20 66 6c 61 67 |rp;.Bool|ean flag|
|00002a30| 3b 0d 7b 72 65 67 69 73 | 74 65 72 20 69 6e 74 20 |;.{regis|ter int |
|00002a40| 78 2c 20 79 2c 20 73 61 | 76 65 79 3b 0d 23 69 66 |x, y, sa|vey;.#if|
|00002a50| 64 65 66 20 5f 4e 6f 6e | 4d 61 63 53 63 72 65 65 |def _Non|MacScree|
|00002a60| 6e 5f 0d 50 6f 69 6e 74 | 20 73 61 76 65 70 6f 69 |n_.Point| savepoi|
|00002a70| 6e 74 3b 0d 23 65 6e 64 | 69 66 0d 0d 09 69 66 20 |nt;.#end|if...if |
|00002a80| 28 73 77 72 70 2d 3e 6f | 70 74 2e 63 75 72 73 6f |(swrp->o|pt.curso|
|00002a90| 72 5f 76 69 73 69 62 6c | 65 29 0d 09 7b 72 65 67 |r_visibl|e)..{reg|
|00002aa0| 69 73 74 65 72 20 69 6e | 74 20 6d 6f 64 65 20 3d |ister in|t mode =|
|00002ab0| 20 6e 6f 74 50 61 74 43 | 6f 70 79 3b 0d 09 0d 09 | notPatC|opy;....|
|00002ac0| 09 69 66 20 28 66 6c 61 | 67 20 3d 3d 20 4f 4e 29 |.if (fla|g == ON)|
|00002ad0| 20 6d 6f 64 65 20 3d 20 | 70 61 74 43 6f 70 79 3b | mode = |patCopy;|
|00002ae0| 0d 09 09 0d 09 09 2f 2a | 20 61 64 6a 75 73 74 20 |....../*| adjust |
|00002af0| 61 6e 64 20 73 61 76 65 | 20 70 65 6e 20 70 6f 73 |and save| pen pos|
|00002b00| 69 74 69 6f 6e 20 2a 2f | 0d 09 09 0d 23 69 66 64 |ition */|....#ifd|
|00002b10| 65 66 20 5f 4e 6f 6e 4d | 61 63 53 63 72 65 65 6e |ef _NonM|acScreen|
|00002b20| 5f 0d 09 09 47 65 74 50 | 65 6e 28 26 73 61 76 65 |_...GetP|en(&save|
|00002b30| 70 6f 69 6e 74 29 3b 0d | 09 09 78 20 3d 20 73 61 |point);.|..x = sa|
|00002b40| 76 65 70 6f 69 6e 74 2e | 68 20 2d 20 31 3b 0d 09 |vepoint.|h - 1;..|
|00002b50| 09 73 61 76 65 79 20 3d | 20 73 61 76 65 70 6f 69 |.savey =| savepoi|
|00002b60| 6e 74 2e 76 3b 0d 09 09 | 79 20 3d 20 73 61 76 65 |nt.v;...|y = save|
|00002b70| 79 20 2b 20 73 77 72 70 | 2d 3e 73 66 2e 64 65 73 |y + swrp|->sf.des|
|00002b80| 63 65 6e 74 3b 0d 09 09 | 4d 6f 76 65 54 6f 28 78 |cent;...|MoveTo(x|
|00002b90| 2c 79 29 3b 0d 23 65 6c | 73 65 0d 09 09 78 20 3d |,y);.#el|se...x =|
|00002ba0| 20 28 28 57 69 6e 64 6f | 77 50 74 72 29 73 77 72 | ((Windo|wPtr)swr|
|00002bb0| 70 29 2d 3e 70 6e 4c 6f | 63 2e 68 20 2d 3d 20 31 |p)->pnLo|c.h -= 1|
|00002bc0| 3b 0d 09 09 73 61 76 65 | 79 20 3d 20 28 28 57 69 |;...save|y = ((Wi|
|00002bd0| 6e 64 6f 77 50 74 72 29 | 73 77 72 70 29 2d 3e 70 |ndowPtr)|swrp)->p|
|00002be0| 6e 4c 6f 63 2e 76 3b 0d | 09 09 79 20 3d 20 28 28 |nLoc.v;.|..y = ((|
|00002bf0| 28 57 69 6e 64 6f 77 50 | 74 72 29 73 77 72 70 29 |(WindowP|tr)swrp)|
|00002c00| 2d 3e 70 6e 4c 6f 63 2e | 76 20 2b 3d 20 73 77 72 |->pnLoc.|v += swr|
|00002c10| 70 2d 3e 73 66 2e 64 65 | 73 63 65 6e 74 29 3b 0d |p->sf.de|scent);.|
|00002c20| 23 65 6e 64 69 66 0d 09 | 09 2f 2a 20 63 75 72 73 |#endif..|./* curs|
|00002c30| 6f 72 20 69 73 20 73 69 | 6d 70 6c 79 20 61 20 76 |or is si|mply a v|
|00002c40| 65 72 74 69 63 61 6c 20 | 6c 69 6e 65 20 2a 2f 0d |ertical |line */.|
|00002c50| 0d 23 69 66 64 65 66 20 | 5f 4e 6f 6e 4d 61 63 53 |.#ifdef |_NonMacS|
|00002c60| 63 72 65 65 6e 5f 0d 09 | 09 50 65 6e 4d 6f 64 65 |creen_..|.PenMode|
|00002c70| 28 6d 6f 64 65 29 3b 0d | 23 65 6c 73 65 0d 09 09 |(mode);.|#else...|
|00002c80| 28 28 57 69 6e 64 6f 77 | 50 74 72 29 73 77 72 70 |((Window|Ptr)swrp|
|00002c90| 29 2d 3e 70 6e 4d 6f 64 | 65 20 3d 20 6d 6f 64 65 |)->pnMod|e = mode|
|00002ca0| 3b 20 2f 2a 69 6d 70 72 | 6f 76 65 64 20 73 70 65 |; /*impr|oved spe|
|00002cb0| 65 64 20 6f 6e 20 4d 61 | 63 20 73 63 72 65 65 6e |ed on Ma|c screen|
|00002cc0| 20 2a 2f 0d 23 65 6e 64 | 69 66 0d 09 09 0d 09 09 | */.#end|if......|
|00002cd0| 4c 69 6e 65 54 6f 28 78 | 2c 20 79 20 2d 20 73 77 |LineTo(x|, y - sw|
|00002ce0| 72 70 2d 3e 63 68 61 72 | 68 65 69 67 68 74 29 3b |rp->char|height);|
|00002cf0| 0d 09 09 0d 23 69 66 64 | 65 66 20 5f 4e 6f 6e 4d |....#ifd|ef _NonM|
|00002d00| 61 63 53 63 72 65 65 6e | 5f 0d 09 09 4d 6f 76 65 |acScreen|_...Move|
|00002d10| 54 6f 28 78 2b 31 2c 20 | 73 61 76 65 79 29 3b 0d |To(x+1, |savey);.|
|00002d20| 23 65 6c 73 65 0d 09 09 | 28 28 57 69 6e 64 6f 77 |#else...|((Window|
|00002d30| 50 74 72 29 73 77 72 70 | 29 2d 3e 70 6e 4c 6f 63 |Ptr)swrp|)->pnLoc|
|00002d40| 2e 68 20 3d 20 78 20 2b | 20 31 3b 0d 09 09 28 28 |.h = x +| 1;...((|
|00002d50| 57 69 6e 64 6f 77 50 74 | 72 29 73 77 72 70 29 2d |WindowPt|r)swrp)-|
|00002d60| 3e 70 6e 4c 6f 63 2e 76 | 20 3d 20 73 61 76 65 79 |>pnLoc.v| = savey|
|00002d70| 3b 0d 23 65 6e 64 69 66 | 0d 09 09 2f 2a 20 72 65 |;.#endif|.../* re|
|00002d80| 64 72 61 77 20 63 68 61 | 72 61 63 74 65 72 20 77 |draw cha|racter w|
|00002d90| 68 65 72 65 20 63 75 72 | 73 6f 72 20 69 73 20 69 |here cur|sor is i|
|00002da0| 66 20 77 65 20 74 75 72 | 6e 65 64 20 69 74 20 6f |f we tur|ned it o|
|00002db0| 66 66 20 2a 2f 0d 09 09 | 0d 09 09 69 66 20 28 66 |ff */...|...if (f|
|00002dc0| 6c 61 67 20 3d 3d 20 4f | 46 46 29 0d 09 09 7b 0d |lag == O|FF)...{.|
|00002dd0| 09 09 09 44 72 61 77 43 | 68 61 72 28 73 77 72 70 |...DrawC|har(swrp|
|00002de0| 2d 3e 73 63 72 65 65 6e | 5b 28 28 73 77 72 70 2d |->screen|[((swrp-|
|00002df0| 3e 74 6f 70 72 6f 77 2b | 73 77 72 70 2d 3e 72 6f |>toprow+|swrp->ro|
|00002e00| 77 29 25 73 77 72 70 2d | 3e 6f 70 74 2e 6d 61 78 |w)%swrp-|>opt.max|
|00002e10| 72 6f 77 29 2a 73 77 72 | 70 2d 3e 6f 70 74 2e 6d |row)*swr|p->opt.m|
|00002e20| 61 78 63 6f 6c 2b 73 77 | 72 70 2d 3e 63 6f 6c 5d |axcol+sw|rp->col]|
|00002e30| 29 3b 0d 0d 09 09 09 2f | 2a 20 72 65 70 6c 61 63 |);...../|* replac|
|00002e40| 65 64 20 20 77 69 74 68 | 20 62 65 6c 6f 77 20 74 |ed with| below t|
|00002e50| 6f 20 69 6d 70 72 6f 76 | 65 20 73 70 65 65 64 20 |o improv|e speed |
|00002e60| 2a 2f 0d 23 69 66 64 65 | 66 20 5f 4e 6f 6e 4d 61 |*/.#ifde|f _NonMa|
|00002e70| 63 53 63 72 65 65 6e 5f | 0d 09 09 09 4d 6f 76 65 |cScreen_|....Move|
|00002e80| 54 6f 28 78 2b 31 2c 20 | 73 61 76 65 79 29 3b 0d |To(x+1, |savey);.|
|00002e90| 23 65 6c 73 65 0d 09 09 | 09 28 28 57 69 6e 64 6f |#else...|.((Windo|
|00002ea0| 77 50 74 72 29 73 77 72 | 70 29 2d 3e 70 6e 4c 6f |wPtr)swr|p)->pnLo|
|00002eb0| 63 2e 68 20 3d 20 78 20 | 2b 20 31 3b 0d 09 09 09 |c.h = x |+ 1;....|
|00002ec0| 28 28 57 69 6e 64 6f 77 | 50 74 72 29 73 77 72 70 |((Window|Ptr)swrp|
|00002ed0| 29 2d 3e 70 6e 4c 6f 63 | 2e 76 20 3d 20 73 61 76 |)->pnLoc|.v = sav|
|00002ee0| 65 79 3b 0d 23 65 6e 64 | 69 66 0d 09 09 7d 0d 09 |ey;.#end|if...}..|
|00002ef0| 7d 0d 7d 0d 0d 23 6c 69 | 6e 65 20 30 20 53 74 64 |}.}..#li|ne 0 Std|
|00002f00| 5f 75 70 64 61 74 65 77 | 69 6e 64 6f 77 0d 76 6f |_updatew|indow.vo|
|00002f10| 69 64 20 53 74 64 5f 75 | 70 64 61 74 65 77 69 6e |id Std_u|pdatewin|
|00002f20| 64 6f 77 28 73 77 72 70 | 29 0d 72 65 67 69 73 74 |dow(swrp|).regist|
|00002f30| 65 72 20 53 74 64 57 69 | 6e 64 6f 77 52 65 63 20 |er StdWi|ndowRec |
|00002f40| 2a 73 77 72 70 3b 0d 7b | 0d 72 65 67 69 73 74 65 |*swrp;.{|.registe|
|00002f50| 72 20 69 6e 74 20 69 2c | 20 74 68 69 73 72 6f 77 |r int i,| thisrow|
|00002f60| 3b 0d 0d 09 09 53 65 74 | 50 6f 72 74 28 73 77 72 |;....Set|Port(swr|
|00002f70| 70 29 3b 0d 09 09 0d 09 | 09 45 72 61 73 65 52 65 |p);.....|.EraseRe|
|00002f80| 63 74 28 26 28 28 57 69 | 6e 64 6f 77 50 74 72 29 |ct(&((Wi|ndowPtr)|
|00002f90| 73 77 72 70 29 2d 3e 70 | 6f 72 74 52 65 63 74 29 |swrp)->p|ortRect)|
|00002fa0| 3b 0d 09 09 0d 09 09 2f | 2a 20 72 65 64 72 61 77 |;....../|* redraw|
|00002fb0| 20 6c 61 73 74 20 6e 20 | 72 6f 77 73 20 69 6e 20 | last n |rows in |
|00002fc0| 74 68 65 20 76 69 73 69 | 62 6c 65 20 72 65 67 69 |the visi|ble regi|
|00002fd0| 6f 6e 20 2a 2f 0d 0d 09 | 09 66 6f 72 20 28 69 3d |on */...|.for (i=|
|00002fe0| 30 2c 20 0d 09 09 09 20 | 74 68 69 73 72 6f 77 20 |0, .... |thisrow |
|00002ff0| 3d 20 28 73 77 72 70 2d | 3e 74 6f 70 72 6f 77 20 |= (swrp-|>toprow |
|00003000| 2b 20 28 73 77 72 70 2d | 3e 6f 70 74 2e 6d 61 78 |+ (swrp-|>opt.max|
|00003010| 72 6f 77 2d 73 77 72 70 | 2d 3e 76 69 73 72 6f 77 |row-swrp|->visrow|
|00003020| 29 29 20 25 20 73 77 72 | 70 2d 3e 6f 70 74 2e 6d |)) % swr|p->opt.m|
|00003030| 61 78 72 6f 77 3b 0d 09 | 09 09 20 69 3c 73 77 72 |axrow;..|.. i<swr|
|00003040| 70 2d 3e 76 69 73 72 6f | 77 3b 0d 09 09 09 20 69 |p->visro|w;.... i|
|00003050| 2b 2b 2c 20 74 68 69 73 | 72 6f 77 20 3d 20 2b 2b |++, this|row = ++|
|00003060| 74 68 69 73 72 6f 77 20 | 25 20 73 77 72 70 2d 3e |thisrow |% swrp->|
|00003070| 6f 70 74 2e 6d 61 78 72 | 6f 77 29 0d 09 09 7b 0d |opt.maxr|ow)...{.|
|00003080| 09 09 09 6d 6f 76 65 63 | 75 72 73 6f 72 28 73 77 |...movec|ursor(sw|
|00003090| 72 70 2c 20 30 2c 20 69 | 2b 73 77 72 70 2d 3e 6f |rp, 0, i|+swrp->o|
|000030a0| 70 74 2e 6d 61 78 72 6f | 77 2d 73 77 72 70 2d 3e |pt.maxro|w-swrp->|
|000030b0| 76 69 73 72 6f 77 29 3b | 0d 09 09 09 44 72 61 77 |visrow);|....Draw|
|000030c0| 54 65 78 74 28 26 73 77 | 72 70 2d 3e 73 63 72 65 |Text(&sw|rp->scre|
|000030d0| 65 6e 5b 74 68 69 73 72 | 6f 77 2a 73 77 72 70 2d |en[thisr|ow*swrp-|
|000030e0| 3e 6f 70 74 2e 6d 61 78 | 63 6f 6c 5d 2c 20 30 2c |>opt.max|col], 0,|
|000030f0| 20 73 77 72 70 2d 3e 76 | 69 73 63 6f 6c 29 3b 0d | swrp->v|iscol);.|
|00003100| 09 09 7d 0d 09 09 0d 09 | 09 69 66 20 28 21 73 77 |..}.....|.if (!sw|
|00003110| 72 70 2d 3e 6f 70 74 2e | 6e 6f 5f 67 72 6f 77 29 |rp->opt.|no_grow)|
|00003120| 0d 09 09 7b 52 65 63 74 | 20 72 3b 0d 09 09 09 2f |...{Rect| r;..../|
|00003130| 2a 20 69 6e 76 61 6c 69 | 64 61 74 65 20 74 68 65 |* invali|date the|
|00003140| 20 73 63 72 6f 6c 6c 20 | 62 61 72 20 72 65 67 69 | scroll |bar regi|
|00003150| 6f 6e 73 20 6f 66 20 74 | 68 65 20 77 69 6e 64 6f |ons of t|he windo|
|00003160| 77 2c 20 73 6f 0d 09 09 | 09 09 09 74 68 65 20 73 |w, so...|...the s|
|00003170| 63 72 6f 6c 6c 20 62 61 | 72 73 20 61 6e 64 20 67 |croll ba|rs and g|
|00003180| 72 6f 77 20 62 6f 78 20 | 67 65 74 20 64 72 61 77 |row box |get draw|
|00003190| 6e 20 70 72 6f 70 65 72 | 6c 79 20 2a 2f 0d 09 09 |n proper|ly */...|
|000031a0| 09 72 20 3d 20 28 28 57 | 69 6e 64 6f 77 50 74 72 |.r = ((W|indowPtr|
|000031b0| 29 73 77 72 70 29 2d 3e | 70 6f 72 74 52 65 63 74 |)swrp)->|portRect|
|000031c0| 3b 0d 09 09 09 72 2e 6c | 65 66 74 20 3d 20 72 2e |;....r.l|eft = r.|
|000031d0| 72 69 67 68 74 2d 5f 43 | 4f 4e 54 52 4f 4c 57 49 |right-_C|ONTROLWI|
|000031e0| 44 54 48 2d 32 3b 0d 09 | 09 09 72 2e 74 6f 70 20 |DTH-2;..|..r.top |
|000031f0| 3d 20 20 72 2e 62 6f 74 | 74 6f 6d 2d 5f 43 4f 4e |= r.bot|tom-_CON|
|00003200| 54 52 4f 4c 57 49 44 54 | 48 2d 32 3b 0d 09 09 09 |TROLWIDT|H-2;....|
|00003210| 49 6e 76 61 6c 52 65 63 | 74 28 26 72 29 3b 0d 0d |InvalRec|t(&r);..|
|00003220| 09 09 09 44 72 61 77 43 | 6f 6e 74 72 6f 6c 73 28 |...DrawC|ontrols(|
|00003230| 73 77 72 70 29 3b 0d 09 | 09 09 44 72 61 77 47 72 |swrp);..|..DrawGr|
|00003240| 6f 77 49 63 6f 6e 28 73 | 77 72 70 29 3b 0d 09 09 |owIcon(s|wrp);...|
|00003250| 7d 0d 0d 09 09 2f 2a 20 | 6d 61 6b 65 20 73 75 72 |}..../* |make sur|
|00003260| 65 20 74 68 65 72 65 20 | 69 73 20 6e 6f 20 66 75 |e there |is no fu|
|00003270| 72 74 68 65 72 20 75 70 | 64 61 74 65 20 65 76 65 |rther up|date eve|
|00003280| 6e 74 20 6f 6e 20 74 68 | 69 73 20 77 69 6e 64 6f |nt on th|is windo|
|00003290| 77 20 2a 2f 0d 09 09 0d | 09 09 56 61 6c 69 64 52 |w */....|..ValidR|
|000032a0| 65 63 74 28 26 28 28 57 | 69 6e 64 6f 77 50 74 72 |ect(&((W|indowPtr|
|000032b0| 29 73 77 72 70 29 2d 3e | 70 6f 72 74 52 65 63 74 |)swrp)->|portRect|
|000032c0| 29 3b 0d 09 09 0d 09 09 | 6d 6f 76 65 63 75 72 73 |);......|movecurs|
|000032d0| 6f 72 28 73 77 72 70 2c | 20 73 77 72 70 2d 3e 63 |or(swrp,| swrp->c|
|000032e0| 6f 6c 2c 20 73 77 72 70 | 2d 3e 72 6f 77 29 3b 0d |ol, swrp|->row);.|
|000032f0| 09 09 64 72 61 77 63 75 | 72 73 6f 72 28 73 77 72 |..drawcu|rsor(swr|
|00003300| 70 2c 20 4f 4e 29 3b 0d | 7d 0d 0d 73 74 61 74 69 |p, ON);.|}..stati|
|00003310| 63 0d 53 74 64 77 69 6e | 64 6f 77 5f 64 6f 45 76 |c.Stdwin|dow_doEv|
|00003320| 65 6e 74 28 78 65 76 65 | 6e 74 29 0d 58 45 76 65 |ent(xeve|nt).XEve|
|00003330| 6e 74 52 65 63 6f 72 64 | 20 2a 78 65 76 65 6e 74 |ntRecord| *xevent|
|00003340| 3b 0d 7b 0d 72 65 67 69 | 73 74 65 72 20 57 69 6e |;.{.regi|ster Win|
|00003350| 64 6f 77 50 74 72 20 77 | 70 20 3d 20 78 65 76 65 |dowPtr w|p = xeve|
|00003360| 6e 74 2d 3e 77 69 6e 64 | 6f 77 3b 0d 72 65 67 69 |nt->wind|ow;.regi|
|00003370| 73 74 65 72 20 69 6e 74 | 20 69 3b 0d 0d 09 73 77 |ster int| i;...sw|
|00003380| 69 74 63 68 20 28 28 28 | 45 76 65 6e 74 52 65 63 |itch (((|EventRec|
|00003390| 6f 72 64 2a 29 78 65 76 | 65 6e 74 29 2d 3e 77 68 |ord*)xev|ent)->wh|
|000033a0| 61 74 29 0d 09 7b 0d 09 | 63 61 73 65 20 61 63 74 |at)..{..|case act|
|000033b0| 69 76 61 74 65 45 76 74 | 3a 0d 09 09 65 64 69 74 |ivateEvt|:...edit|
|000033c0| 5f 64 69 73 61 62 6c 65 | 28 29 3b 0d 09 09 62 72 |_disable|();...br|
|000033d0| 65 61 6b 3b 0d 0d 09 63 | 61 73 65 20 64 65 61 63 |eak;...c|ase deac|
|000033e0| 74 69 76 61 74 65 45 76 | 74 3a 0d 09 7b 53 74 64 |tivateEv|t:..{Std|
|000033f0| 57 69 6e 64 6f 77 52 65 | 63 20 2a 73 72 70 3b 0d |WindowRe|c *srp;.|
|00003400| 09 0d 09 09 65 64 69 74 | 5f 64 69 73 61 62 6c 65 |....edit|_disable|
|00003410| 28 29 3b 0d 09 09 0d 09 | 09 69 66 20 28 28 73 72 |();.....|.if ((sr|
|00003420| 70 20 3d 20 28 53 74 64 | 57 69 6e 64 6f 77 52 65 |p = (Std|WindowRe|
|00003430| 63 2a 29 46 72 6f 6e 74 | 57 69 6e 64 6f 77 28 29 |c*)Front|Window()|
|00003440| 29 29 0d 09 09 09 69 66 | 20 28 21 20 4f 75 72 57 |))....if| (! OurW|
|00003450| 69 6e 64 6f 77 28 73 72 | 70 29 29 0d 09 09 09 09 |indow(sr|p)).....|
|00003460| 65 64 69 74 5f 65 6e 61 | 62 6c 65 28 29 3b 0d 09 |edit_ena|ble();..|
|00003470| 09 62 72 65 61 6b 3b 0d | 09 7d 0d 09 63 61 73 65 |.break;.|.}..case|
|00003480| 20 75 70 64 61 74 65 45 | 76 74 3a 0d 09 09 53 74 | updateE|vt:...St|
|00003490| 64 5f 75 70 64 61 74 65 | 77 69 6e 64 6f 77 28 77 |d_update|window(w|
|000034a0| 70 29 3b 0d 09 09 62 72 | 65 61 6b 3b 0d 0d 09 63 |p);...br|eak;...c|
|000034b0| 61 73 65 20 63 6c 6f 73 | 65 45 76 65 6e 74 3a 0d |ase clos|eEvent:.|
|000034c0| 0d 09 09 2f 2a 20 68 69 | 64 65 20 74 68 65 20 77 |.../* hi|de the w|
|000034d0| 69 6e 64 6f 77 20 2a 2f | 0d 09 09 0d 09 09 48 69 |indow */|......Hi|
|000034e0| 64 65 57 69 6e 64 6f 77 | 28 77 70 29 3b 0d 09 09 |deWindow|(wp);...|
|000034f0| 0d 09 09 2f 2a 20 54 48 | 49 53 20 50 41 54 43 48 |.../* TH|IS PATCH|
|00003500| 45 44 20 4f 55 54 20 43 | 4f 44 45 20 41 4c 4c 4f |ED OUT C|ODE ALLO|
|00003510| 57 53 20 43 4c 4f 53 49 | 4e 47 20 41 4c 4c 20 57 |WS CLOSI|NG ALL W|
|00003520| 49 4e 44 4f 57 53 20 57 | 48 49 43 48 20 53 48 41 |INDOWS W|HICH SHA|
|00003530| 52 45 0d 09 09 09 54 48 | 49 53 20 57 49 4e 44 4f |RE....TH|IS WINDO|
|00003540| 57 20 50 4f 49 4e 54 45 | 52 20 41 4e 44 20 52 45 |W POINTE|R AND RE|
|00003550| 4c 45 41 53 49 4e 47 20 | 54 48 45 49 52 20 57 49 |LEASING |THEIR WI|
|00003560| 4e 44 4f 57 20 52 45 43 | 4f 52 44 53 3a 0d 09 09 |NDOW REC|ORDS:...|
|00003570| 66 6f 72 20 28 69 3d 20 | 5f 4e 46 49 4c 45 2d 31 |for (i= |_NFILE-1|
|00003580| 3b 20 69 3e 3d 30 20 3b | 20 69 2d 2d 29 0d 09 09 |; i>=0 ;| i--)...|
|00003590| 09 69 66 20 28 5f 66 69 | 6c 65 5b 69 5d 2e 66 69 |.if (_fi|le[i].fi|
|000035a0| 6c 65 62 75 66 20 3d 3d | 20 28 63 68 61 72 2a 29 |lebuf ==| (char*)|
|000035b0| 77 70 29 0d 09 09 09 09 | 66 63 6c 6f 73 65 77 28 |wp).....|fclosew(|
|000035c0| 26 5f 66 69 6c 65 5b 69 | 5d 29 3b 0d 09 09 2a 2f |&_file[i|]);...*/|
|000035d0| 0d 09 09 0d 09 09 62 72 | 65 61 6b 3b 0d 09 09 0d |......br|eak;....|
|000035e0| 09 64 65 66 61 75 6c 74 | 3a 0d 09 09 2f 2a 20 65 |.default|:.../* e|
|000035f0| 76 65 6e 74 20 77 61 73 | 20 6e 6f 74 20 68 61 6e |vent was| not han|
|00003600| 64 6c 65 64 20 62 79 20 | 75 73 20 2a 2f 0d 0d 09 |dled by |us */...|
|00003610| 09 72 65 74 75 72 6e 20 | 28 66 61 6c 73 65 29 3b |.return |(false);|
|00003620| 0d 09 7d 0d 09 0d 09 2f | 2a 20 65 76 65 6e 74 20 |..}..../|* event |
|00003630| 77 61 73 20 68 61 6e 64 | 6c 65 64 20 73 6f 6d 65 |was hand|led some|
|00003640| 77 68 65 72 65 20 61 62 | 6f 76 65 20 2a 2f 0d 09 |where ab|ove */..|
|00003650| 0d 09 72 65 74 75 72 6e | 20 28 74 72 75 65 29 3b |..return| (true);|
|00003660| 0d 7d 0d 0d 23 6c 69 6e | 65 20 30 20 66 63 6c 6f |.}..#lin|e 0 fclo|
|00003670| 73 65 77 0d 69 6e 74 09 | 66 63 6c 6f 73 65 77 28 |sew.int.|fclosew(|
|00003680| 77 68 6f 29 0d 72 65 67 | 69 73 74 65 72 20 46 49 |who).reg|ister FI|
|00003690| 4c 45 09 2a 77 68 6f 3b | 0d 7b 0d 09 69 66 20 28 |LE.*who;|.{..if (|
|000036a0| 21 77 68 6f 2d 3e 77 69 | 6e 64 6f 77 29 20 72 65 |!who->wi|ndow) re|
|000036b0| 74 75 72 6e 20 28 45 4f | 46 29 3b 0d 09 0d 09 69 |turn (EO|F);....i|
|000036c0| 66 20 28 77 68 6f 20 21 | 3d 20 5f 63 6f 6e 73 6f |f (who !|= _conso|
|000036d0| 6c 65 29 0d 09 7b 0d 09 | 09 77 68 6f 2d 3e 77 69 |le)..{..|.who->wi|
|000036e0| 6e 64 6f 77 20 3d 20 66 | 61 6c 73 65 3b 0d 09 09 |ndow = f|alse;...|
|000036f0| 77 68 6f 2d 3e 49 6e 55 | 73 65 20 3d 20 66 61 6c |who->InU|se = fal|
|00003700| 73 65 3b 0d 09 09 0d 09 | 09 2f 2a 20 4e 6f 77 20 |se;.....|./* Now |
|00003710| 72 65 6c 65 61 73 65 20 | 74 68 65 20 6d 65 6d 6f |release |the memo|
|00003720| 72 79 20 66 6f 72 20 74 | 68 65 20 77 69 6e 64 6f |ry for t|he windo|
|00003730| 77 20 72 65 63 6f 72 64 | 20 75 6e 6c 65 73 73 0d |w record| unless.|
|00003740| 09 09 09 69 74 27 73 20 | 74 68 65 20 63 6f 6e 73 |...it's |the cons|
|00003750| 6f 6c 65 20 77 68 69 63 | 68 20 77 65 20 6e 65 76 |ole whic|h we nev|
|00003760| 65 72 20 73 68 6f 75 6c | 64 20 72 65 6c 65 61 73 |er shoul|d releas|
|00003770| 65 20 2a 2f 0d 09 09 0d | 09 09 69 66 20 28 4f 75 |e */....|..if (Ou|
|00003780| 72 57 69 6e 64 6f 77 28 | 77 68 6f 2d 3e 66 69 6c |rWindow(|who->fil|
|00003790| 65 62 75 66 29 20 26 26 | 20 28 28 57 69 6e 64 6f |ebuf) &&| ((Windo|
|000037a0| 77 50 74 72 29 77 68 6f | 2d 3e 66 69 6c 65 62 75 |wPtr)who|->filebu|
|000037b0| 66 20 21 3d 20 5f 63 6f | 6e 73 6f 6c 65 5f 77 70 |f != _co|nsole_wp|
|000037c0| 29 29 0d 09 09 7b 0d 09 | 09 09 28 28 53 74 64 57 |))...{..|..((StdW|
|000037d0| 69 6e 64 6f 77 52 65 63 | 2a 29 77 68 6f 2d 3e 66 |indowRec|*)who->f|
|000037e0| 69 6c 65 62 75 66 29 2d | 3e 73 69 67 6e 61 74 75 |ilebuf)-|>signatu|
|000037f0| 72 65 20 3d 20 30 3b 0d | 09 09 09 44 69 73 70 6f |re = 0;.|...Dispo|
|00003800| 73 48 61 6e 64 6c 65 28 | 28 28 57 69 6e 64 6f 77 |sHandle(|((Window|
|00003810| 50 65 65 6b 29 77 68 6f | 2d 3e 66 69 6c 65 62 75 |Peek)who|->filebu|
|00003820| 66 29 2d 3e 72 65 66 43 | 6f 6e 29 3b 0d 09 09 09 |f)->refC|on);....|
|00003830| 44 69 73 70 6f 73 65 57 | 69 6e 64 6f 77 28 77 68 |DisposeW|indow(wh|
|00003840| 6f 2d 3e 66 69 6c 65 62 | 75 66 29 3b 0d 09 09 7d |o->fileb|uf);...}|
|00003850| 0d 0d 09 09 77 68 6f 2d | 3e 66 69 6c 65 62 75 66 |....who-|>filebuf|
|00003860| 20 3d 20 4e 55 4c 4c 3b | 0d 0d 09 09 69 66 20 28 | = NULL;|....if (|
|00003870| 77 68 6f 20 3d 3d 20 43 | 75 72 72 65 6e 74 57 69 |who == C|urrentWi|
|00003880| 6e 64 6f 77 29 0d 09 09 | 7b 0d 09 09 09 43 75 72 |ndow)...|{....Cur|
|00003890| 72 65 6e 74 57 69 6e 64 | 6f 77 20 3d 20 5f 63 6f |rentWind|ow = _co|
|000038a0| 6e 73 6f 6c 65 3b 0d 09 | 09 09 43 75 72 72 65 6e |nsole;..|..Curren|
|000038b0| 74 73 77 72 70 20 3d 20 | 5f 63 6f 6e 73 6f 6c 65 |tswrp = |_console|
|000038c0| 5f 77 70 3b 0d 09 09 7d | 0d 09 7d 0d 09 0d 09 72 |_wp;...}|..}....r|
|000038d0| 65 74 75 72 6e 20 28 30 | 29 3b 0d 7d 0d 0d 73 74 |eturn (0|);.}..st|
|000038e0| 61 74 69 63 0d 76 6f 69 | 64 20 63 6c 65 61 72 73 |atic.voi|d clears|
|000038f0| 63 72 65 65 6e 6d 65 6d | 28 73 77 72 70 29 0d 72 |creenmem|(swrp).r|
|00003900| 65 67 69 73 74 65 72 20 | 53 74 64 57 69 6e 64 6f |egister |StdWindo|
|00003910| 77 52 65 63 20 2a 73 77 | 72 70 3b 0d 7b 0d 72 65 |wRec *sw|rp;.{.re|
|00003920| 67 69 73 74 65 72 20 63 | 68 61 72 20 73 70 20 3d |gister c|har sp =|
|00003930| 20 27 20 27 3b 0d 72 65 | 67 69 73 74 65 72 20 63 | ' ';.re|gister c|
|00003940| 68 61 72 20 2a 62 65 67 | 70 2c 20 2a 70 3b 0d 09 |har *beg|p, *p;..|
|00003950| 0d 09 2f 2a 20 63 6c 65 | 61 72 20 73 63 72 65 65 |../* cle|ar scree|
|00003960| 6e 20 62 75 66 66 65 72 | 20 74 6f 20 73 70 61 63 |n buffer| to spac|
|00003970| 65 73 20 77 6f 72 6b 69 | 6e 67 20 62 61 63 6b 77 |es worki|ng backw|
|00003980| 61 72 64 73 20 74 68 72 | 6f 75 67 68 20 62 75 66 |ards thr|ough buf|
|00003990| 66 65 72 20 2a 2f 0d 0d | 09 70 20 3d 20 28 62 65 |fer */..|.p = (be|
|000039a0| 67 70 20 3d 20 73 77 72 | 70 2d 3e 73 63 72 65 65 |gp = swr|p->scree|
|000039b0| 6e 29 20 2b 20 73 77 72 | 70 2d 3e 6f 70 74 2e 6d |n) + swr|p->opt.m|
|000039c0| 61 78 63 6f 6c 20 2a 20 | 73 77 72 70 2d 3e 6f 70 |axcol * |swrp->op|
|000039d0| 74 2e 6d 61 78 72 6f 77 | 3b 0d 09 0d 09 77 68 69 |t.maxrow|;....whi|
|000039e0| 6c 65 20 28 2d 2d 70 20 | 3e 3d 20 62 65 67 70 29 |le (--p |>= begp)|
|000039f0| 20 2a 70 20 3d 20 73 70 | 3b 0d 7d 0d 0d 2f 2a 20 | *p = sp|;.}../* |
|00003a00| 52 4d 53 20 34 2f 32 30 | 2f 38 38 20 2a 2f 0d 2f |RMS 4/20|/88 */./|
|00003a10| 2a 20 70 72 6f 63 65 64 | 75 72 65 20 74 6f 20 64 |* proced|ure to d|
|00003a20| 65 74 65 72 6d 69 6e 65 | 20 69 66 20 4d 75 6c 74 |etermine| if Mult|
|00003a30| 69 46 69 6e 64 65 72 20 | 69 73 20 72 75 6e 6e 69 |iFinder |is runni|
|00003a40| 6e 67 20 62 79 20 63 68 | 65 63 6b 69 6e 67 20 66 |ng by ch|ecking f|
|00003a50| 6f 72 20 74 68 65 0d 65 | 78 69 73 74 65 6e 63 65 |or the.e|xistence|
|00003a60| 20 6f 66 20 74 68 65 20 | 57 61 69 74 4e 65 78 74 | of the |WaitNext|
|00003a70| 45 76 65 6e 74 28 29 20 | 74 72 61 70 20 2a 2f 0d |Event() |trap */.|
|00003a80| 0d 73 74 61 74 69 63 20 | 69 6e 74 20 4d 46 49 73 |.static |int MFIs|
|00003a90| 52 75 6e 6e 69 6e 67 28 | 29 0d 7b 09 2f 2a 20 24 |Running(|).{./* $|
|00003aa0| 38 46 20 69 73 20 66 6f | 72 20 5f 4d 46 44 69 73 |8F is fo|r _MFDis|
|00003ab0| 70 61 74 63 68 2c 20 24 | 39 46 20 69 73 20 74 68 |patch, $|9F is th|
|00003ac0| 65 20 75 6e 69 6d 70 6c | 65 6d 65 6e 74 65 64 20 |e unimpl|emented |
|00003ad0| 74 72 61 70 20 2a 2f 0d | 09 72 65 74 75 72 6e 20 |trap */.|.return |
|00003ae0| 28 47 65 74 54 72 61 70 | 41 64 64 72 65 73 73 28 |(GetTrap|Address(|
|00003af0| 30 78 38 46 4c 29 20 21 | 3d 20 47 65 74 54 72 61 |0x8FL) !|= GetTra|
|00003b00| 70 41 64 64 72 65 73 73 | 28 30 78 39 46 4c 29 29 |pAddress|(0x9FL))|
|00003b10| 3b 0d 7d 0d 0d 73 74 61 | 74 69 63 0d 46 49 4c 45 |;.}..sta|tic.FILE|
|00003b20| 20 2a 66 6f 70 65 6e 77 | 78 28 74 69 74 6c 65 62 | *fopenw|x(titleb|
|00003b30| 61 72 2c 20 75 70 70 65 | 72 5f 6c 65 66 74 2c 20 |ar, uppe|r_left, |
|00003b40| 6f 70 74 69 6f 6e 73 70 | 74 72 2c 20 77 68 69 63 |optionsp|tr, whic|
|00003b50| 68 66 69 6c 65 76 61 72 | 2c 20 6f 75 72 77 70 29 |hfilevar|, ourwp)|
|00003b60| 0d 63 68 61 72 20 2a 74 | 69 74 6c 65 62 61 72 3b |.char *t|itlebar;|
|00003b70| 0d 50 6f 69 6e 74 20 75 | 70 70 65 72 5f 6c 65 66 |.Point u|pper_lef|
|00003b80| 74 3b 0d 72 65 67 69 73 | 74 65 72 20 53 74 64 57 |t;.regis|ter StdW|
|00003b90| 69 6e 64 6f 77 4f 70 74 | 69 6f 6e 73 20 2a 6f 70 |indowOpt|ions *op|
|00003ba0| 74 69 6f 6e 73 70 74 72 | 3b 0d 46 49 4c 45 20 2a |tionsptr|;.FILE *|
|00003bb0| 77 68 69 63 68 66 69 6c | 65 76 61 72 3b 0d 57 69 |whichfil|evar;.Wi|
|00003bc0| 6e 64 6f 77 50 74 72 20 | 6f 75 72 77 70 3b 0d 7b |ndowPtr |ourwp;.{|
|00003bd0| 0d 72 65 67 69 73 74 65 | 72 20 69 6e 74 20 6d 61 |.registe|r int ma|
|00003be0| 78 72 6f 77 20 3d 20 30 | 2c 20 6d 61 78 63 6f 6c |xrow = 0|, maxcol|
|00003bf0| 20 3d 20 30 3b 0d 72 65 | 67 69 73 74 65 72 20 46 | = 0;.re|gister F|
|00003c00| 49 4c 45 20 2a 77 68 6f | 3b 0d 72 65 67 69 73 74 |ILE *who|;.regist|
|00003c10| 65 72 20 53 74 64 57 69 | 6e 64 6f 77 52 65 63 20 |er StdWi|ndowRec |
|00003c20| 2a 73 77 72 70 3b 0d 72 | 65 67 69 73 74 65 72 20 |*swrp;.r|egister |
|00003c30| 42 6f 6f 6c 65 61 6e 20 | 67 72 6f 77 20 3d 20 74 |Boolean |grow = t|
|00003c40| 72 75 65 2c 20 67 6f 61 | 77 61 79 20 3d 20 74 72 |rue, goa|way = tr|
|00003c50| 75 65 3b 0d 65 76 65 6e | 74 69 6e 66 6f 20 65 74 |ue;.even|tinfo et|
|00003c60| 3b 0d 0d 09 49 6e 69 74 | 5f 73 74 64 69 6f 28 29 |;...Init|_stdio()|
|00003c70| 3b 0d 09 0d 09 69 66 20 | 28 77 68 69 63 68 66 69 |;....if |(whichfi|
|00003c80| 6c 65 76 61 72 29 0d 09 | 7b 0d 09 09 2f 2a 20 61 |levar)..|{.../* a|
|00003c90| 20 73 70 65 63 69 66 69 | 63 20 66 69 6c 65 20 76 | specifi|c file v|
|00003ca0| 61 72 69 61 62 6c 65 20 | 77 61 73 20 73 70 65 63 |ariable |was spec|
|00003cb0| 69 66 69 65 64 20 2a 2f | 0d 09 09 77 68 6f 20 3d |ified */|...who =|
|00003cc0| 20 77 68 69 63 68 66 69 | 6c 65 76 61 72 3b 0d 09 | whichfi|levar;..|
|00003cd0| 09 0d 09 09 69 66 20 28 | 28 21 77 68 6f 2d 3e 53 |....if (|(!who->S|
|00003ce0| 74 64 53 74 72 65 61 6d | 29 20 7c 7c 20 77 68 6f |tdStream|) || who|
|00003cf0| 2d 3e 49 6e 55 73 65 29 | 0d 09 09 7b 0d 09 09 09 |->InUse)|...{....|
|00003d00| 2f 2a 20 64 6f 6e 27 74 | 20 61 6c 6c 6f 77 20 74 |/* don't| allow t|
|00003d10| 68 69 73 20 66 6f 72 20 | 6f 74 68 65 72 20 74 68 |his for |other th|
|00003d20| 61 6e 20 73 74 61 6e 64 | 61 72 64 20 73 74 72 65 |an stand|ard stre|
|00003d30| 61 6d 73 20 2a 2f 0d 09 | 09 09 65 72 72 6e 6f 20 |ams */..|..errno |
|00003d40| 3d 20 2d 34 37 3b 09 2f | 2a 20 66 69 6c 65 20 62 |= -47;./|* file b|
|00003d50| 75 73 79 20 65 72 72 6f | 72 20 2a 2f 0d 09 09 09 |usy erro|r */....|
|00003d60| 72 65 74 75 72 6e 20 28 | 4e 55 4c 4c 29 3b 0d 09 |return (|NULL);..|
|00003d70| 09 7d 0d 09 7d 0d 09 65 | 6c 73 65 0d 09 7b 72 65 |.}..}..e|lse..{re|
|00003d80| 67 69 73 74 65 72 20 69 | 6e 74 20 66 72 65 65 5f |gister i|nt free_|
|00003d90| 73 6c 6f 74 20 3d 20 5f | 4e 46 49 4c 45 3b 0d 09 |slot = _|NFILE;..|
|00003da0| 09 0d 09 09 2f 2a 20 6c | 6f 6f 6b 20 74 68 72 75 |..../* l|ook thru|
|00003db0| 20 46 49 4c 45 20 61 72 | 72 61 79 20 66 6f 72 20 | FILE ar|ray for |
|00003dc0| 61 6e 20 6f 70 65 6e 20 | 73 6c 6f 74 20 2a 2f 0d |an open |slot */.|
|00003dd0| 09 09 0d 09 09 77 68 69 | 6c 65 20 28 28 2d 2d 66 |.....whi|le ((--f|
|00003de0| 72 65 65 5f 73 6c 6f 74 | 3e 3d 30 29 20 26 26 20 |ree_slot|>=0) && |
|00003df0| 5f 66 69 6c 65 5b 66 72 | 65 65 5f 73 6c 6f 74 5d |_file[fr|ee_slot]|
|00003e00| 2e 49 6e 55 73 65 29 0d | 09 09 09 3b 0d 09 0d 09 |.InUse).|...;....|
|00003e10| 09 69 66 20 28 66 72 65 | 65 5f 73 6c 6f 74 20 3c |.if (fre|e_slot <|
|00003e20| 20 30 29 0d 09 09 7b 0d | 09 09 09 65 72 72 6e 6f | 0)...{.|...errno|
|00003e30| 20 3d 20 2d 34 32 3b 20 | 09 2f 2a 20 74 6d 66 6f | = -42; |./* tmfo|
|00003e40| 45 72 72 20 2d 20 74 6f | 6f 20 6d 61 6e 79 20 66 |Err - to|o many f|
|00003e50| 69 6c 65 73 20 6f 70 65 | 6e 09 2a 2f 0d 09 09 09 |iles ope|n.*/....|
|00003e60| 72 65 74 75 72 6e 20 28 | 4e 55 4c 4c 29 3b 0d 09 |return (|NULL);..|
|00003e70| 09 7d 0d 0d 09 09 77 68 | 6f 20 3d 20 26 5f 66 69 |.}....wh|o = &_fi|
|00003e80| 6c 65 5b 66 72 65 65 5f | 73 6c 6f 74 5d 3b 0d 0d |le[free_|slot];..|
|00003e90| 09 09 69 66 20 28 21 6f | 75 72 77 70 20 26 26 20 |..if (!o|urwp && |
|00003ea0| 6f 70 74 69 6f 6e 73 70 | 74 72 29 0d 09 09 7b 0d |optionsp|tr)...{.|
|00003eb0| 09 09 09 2f 2a 20 6f 76 | 65 72 72 69 64 65 20 64 |.../* ov|erride d|
|00003ec0| 65 66 61 75 6c 74 73 20 | 2a 2f 0d 09 09 09 0d 09 |efaults |*/......|
|00003ed0| 09 09 6d 61 78 63 6f 6c | 20 3d 20 6f 70 74 69 6f |..maxcol| = optio|
|00003ee0| 6e 73 70 74 72 2d 3e 6d | 61 78 63 6f 6c 3b 0d 09 |nsptr->m|axcol;..|
|00003ef0| 09 09 6d 61 78 72 6f 77 | 20 3d 20 6f 70 74 69 6f |..maxrow| = optio|
|00003f00| 6e 73 70 74 72 2d 3e 6d | 61 78 72 6f 77 3b 0d 09 |nsptr->m|axrow;..|
|00003f10| 09 09 0d 09 09 09 67 72 | 6f 77 20 3d 20 21 6f 70 |......gr|ow = !op|
|00003f20| 74 69 6f 6e 73 70 74 72 | 2d 3e 6e 6f 5f 67 72 6f |tionsptr|->no_gro|
|00003f30| 77 3b 0d 09 09 09 67 6f | 61 77 61 79 20 3d 20 21 |w;....go|away = !|
|00003f40| 6f 70 74 69 6f 6e 73 70 | 74 72 2d 3e 6e 6f 5f 67 |optionsp|tr->no_g|
|00003f50| 6f 61 77 61 79 3b 0d 09 | 09 7d 0d 09 7d 0d 0d 09 |oaway;..|.}..}...|
|00003f60| 2f 2a 20 69 66 20 6f 75 | 72 77 70 20 69 73 20 6e |/* if ou|rwp is n|
|00003f70| 6f 6e 7a 65 72 6f 2c 20 | 74 68 65 6e 20 74 68 65 |onzero, |then the|
|00003f80| 20 77 69 6e 64 6f 77 20 | 69 73 20 61 6c 72 65 61 | window |is alrea|
|00003f90| 64 79 20 73 65 74 20 75 | 70 20 61 6e 64 20 61 6c |dy set u|p and al|
|00003fa0| 6c 0d 09 09 77 65 20 6e | 65 65 64 20 74 6f 20 64 |l...we n|eed to d|
|00003fb0| 6f 20 69 73 20 73 65 74 | 20 75 70 20 74 68 65 20 |o is set| up the |
|00003fc0| 66 69 6c 65 20 72 65 63 | 6f 72 64 20 2a 2f 0d 0d |file rec|ord */..|
|00003fd0| 09 69 66 20 28 6f 75 72 | 77 70 29 20 73 77 72 70 |.if (our|wp) swrp|
|00003fe0| 20 3d 20 28 53 74 64 57 | 69 6e 64 6f 77 52 65 63 | = (StdW|indowRec|
|00003ff0| 2a 29 20 6f 75 72 77 70 | 3b 0d 09 65 6c 73 65 0d |*) ourwp|;..else.|
|00004000| 09 7b 7b 72 65 67 69 73 | 74 65 72 20 69 6e 74 20 |.{{regis|ter int |
|00004010| 63 68 61 72 68 65 69 67 | 68 74 3b 0d 09 0d 09 09 |charheig|ht;.....|
|00004020| 73 74 64 69 6f 5f 66 6f | 6e 74 73 65 74 28 26 64 |stdio_fo|ntset(&d|
|00004030| 75 6d 6d 79 50 6f 72 74 | 29 3b 0d 09 09 47 65 74 |ummyPort|);...Get|
|00004040| 46 6f 6e 74 49 6e 66 6f | 28 26 5f 73 66 29 3b 0d |FontInfo|(&_sf);.|
|00004050| 09 09 0d 09 09 63 68 61 | 72 68 65 69 67 68 74 20 |.....cha|rheight |
|00004060| 3d 20 28 5f 73 66 2e 61 | 73 63 65 6e 74 20 2b 20 |= (_sf.a|scent + |
|00004070| 5f 73 66 2e 64 65 73 63 | 65 6e 74 20 2b 20 5f 73 |_sf.desc|ent + _s|
|00004080| 66 2e 6c 65 61 64 69 6e | 67 29 3b 0d 09 09 0d 09 |f.leadin|g);.....|
|00004090| 09 2f 2a 20 73 65 74 20 | 75 70 20 64 65 66 61 75 |./* set |up defau|
|000040a0| 6c 74 20 6e 75 6d 62 65 | 72 20 6f 66 20 72 6f 77 |lt numbe|r of row|
|000040b0| 73 20 61 6e 64 20 63 6f | 6c 75 6d 6e 73 20 64 65 |s and co|lumns de|
|000040c0| 70 65 6e 64 69 6e 67 20 | 6f 6e 20 73 63 72 65 65 |pending |on scree|
|000040d0| 6e 20 2a 2f 0d 09 0d 09 | 09 69 66 20 28 21 6d 61 |n */....|.if (!ma|
|000040e0| 78 72 6f 77 29 0d 09 09 | 09 6d 61 78 72 6f 77 20 |xrow)...|.maxrow |
|000040f0| 3d 20 28 73 63 72 65 65 | 6e 48 65 69 67 68 74 20 |= (scree|nHeight |
|00004100| 2d 20 75 70 70 65 72 5f | 6c 65 66 74 2e 76 20 2d |- upper_|left.v -|
|00004110| 20 5f 54 4f 50 45 44 47 | 45 20 2d 20 5f 43 4f 4e | _TOPEDG|E - _CON|
|00004120| 54 52 4f 4c 57 49 44 54 | 48 20 2d 20 31 20 2d 20 |TROLWIDT|H - 1 - |
|00004130| 63 68 61 72 68 65 69 67 | 68 74 20 2b 20 31 29 20 |charheig|ht + 1) |
|00004140| 2f 0d 09 09 09 09 09 09 | 63 68 61 72 68 65 69 67 |/.......|charheig|
|00004150| 68 74 3b 0d 09 0d 09 2f | 2a 2a 2a 2a 2a 2a 2a 2a |ht;..../|********|
|00004160| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 20 52 4d 53 20 34 2f |********|* RMS 4/|
|00004170| 32 30 2f 38 38 20 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |20/88 **|********|
|00004180| 2a 2a 2a 2a 2a 0d 09 2a | 0d 09 2a 0d 09 2a 09 49 |*****..*|..*..*.I|
|00004190| 66 20 4d 75 6c 74 69 46 | 69 6e 64 65 72 20 69 73 |f MultiF|inder is|
|000041a0| 20 72 75 6e 6e 69 6e 67 | 2c 20 77 65 27 6c 6c 20 | running|, we'll |
|000041b0| 6d 61 6b 65 20 74 68 65 | 20 63 6f 6e 73 6f 6c 65 |make the| console|
|000041c0| 20 77 69 6e 64 6f 77 20 | 68 61 6c 66 2d 68 65 69 | window |half-hei|
|000041d0| 67 68 74 2c 0d 09 2a 09 | 73 6f 20 74 68 61 74 20 |ght,..*.|so that |
|000041e0| 77 65 20 63 61 6e 20 73 | 65 65 20 74 68 65 20 63 |we can s|ee the c|
|000041f0| 6f 6e 74 65 6e 74 73 20 | 77 68 69 6c 65 20 72 75 |ontents |while ru|
|00004200| 6e 6e 69 6e 67 20 74 68 | 65 20 64 65 62 75 67 67 |nning th|e debugg|
|00004210| 65 72 2e 0d 09 2a 0d 09 | 2a 09 41 73 20 73 6f 6f |er...*..|*.As soo|
|00004220| 6e 20 61 73 20 61 20 70 | 6f 73 73 69 62 6c 65 2c |n as a p|ossible,|
|00004230| 20 22 4d 46 49 73 52 75 | 6e 6e 69 6e 67 28 29 22 | "MFIsRu|nning()"|
|00004240| 20 77 69 6c 6c 20 62 65 | 20 72 65 70 6c 61 63 65 | will be| replace|
|00004250| 64 20 62 79 20 61 20 0d | 09 2a 09 6d 65 63 68 61 |d by a .|.*.mecha|
|00004260| 6e 69 73 6d 20 74 6f 20 | 73 65 65 20 69 66 20 74 |nism to |see if t|
|00004270| 68 65 20 64 65 62 75 67 | 67 65 72 20 69 73 20 62 |he debug|ger is b|
|00004280| 65 69 6e 67 20 75 73 65 | 64 2e 0d 09 2a 0d 09 2a |eing use|d...*..*|
|00004290| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000042a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000042b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2f 0d 09 |********|*****/..|
|000042c0| 0d 23 69 66 64 65 66 20 | 5f 48 41 4c 46 57 49 4e |.#ifdef |_HALFWIN|
|000042d0| 44 4f 57 5f 0d 09 09 69 | 66 20 28 4d 46 49 73 52 |DOW_...i|f (MFIsR|
|000042e0| 75 6e 6e 69 6e 67 28 29 | 29 20 6d 61 78 72 6f 77 |unning()|) maxrow|
|000042f0| 20 3d 20 31 31 3b 09 09 | 2f 2a 20 68 61 6c 66 20 | = 11;..|/* half |
|00004300| 61 20 73 74 61 6e 64 61 | 72 64 20 73 63 72 65 65 |a standa|rd scree|
|00004310| 6e 20 2a 2f 0d 23 65 6e | 64 69 66 0d 0d 09 09 69 |n */.#en|dif....i|
|00004320| 66 20 28 21 6d 61 78 63 | 6f 6c 29 0d 09 09 09 6d |f (!maxc|ol)....m|
|00004330| 61 78 63 6f 6c 20 3d 20 | 28 73 63 72 65 65 6e 57 |axcol = |(screenW|
|00004340| 69 64 74 68 20 2d 20 75 | 70 70 65 72 5f 6c 65 66 |idth - u|pper_lef|
|00004350| 74 2e 68 20 2d 20 5f 4c | 45 46 54 45 44 47 45 20 |t.h - _L|EFTEDGE |
|00004360| 2d 20 5f 43 4f 4e 54 52 | 4f 4c 57 49 44 54 48 20 |- _CONTR|OLWIDTH |
|00004370| 2d 20 31 20 2d 20 5f 73 | 66 2e 77 69 64 4d 61 78 |- 1 - _s|f.widMax|
|00004380| 20 2b 20 31 29 20 2f 0d | 09 09 09 09 09 20 5f 73 | + 1) /.|..... _s|
|00004390| 66 2e 77 69 64 4d 61 78 | 3b 0d 09 0d 09 09 2f 2a |f.widMax|;...../*|
|000043a0| 20 63 72 65 61 74 65 20 | 61 20 70 6f 69 6e 74 65 | create |a pointe|
|000043b0| 72 20 62 6c 6f 63 6b 20 | 62 69 67 20 65 6e 6f 75 |r block |big enou|
|000043c0| 67 68 20 74 6f 20 61 63 | 63 6f 6d 6f 64 61 74 65 |gh to ac|comodate|
|000043d0| 20 74 68 65 20 77 69 6e | 64 6f 77 20 72 65 63 6f | the win|dow reco|
|000043e0| 72 64 0d 09 09 61 6e 64 | 20 61 6c 6c 20 6f 66 20 |rd...and| all of |
|000043f0| 6f 75 72 20 73 74 75 66 | 66 20 2a 2f 0d 0d 09 09 |our stuf|f */....|
|00004400| 69 66 20 28 21 28 73 77 | 72 70 20 3d 20 28 53 74 |if (!(sw|rp = (St|
|00004410| 64 57 69 6e 64 6f 77 52 | 65 63 2a 29 20 28 4e 65 |dWindowR|ec*) (Ne|
|00004420| 77 50 74 72 28 73 69 7a | 65 6f 66 28 53 74 64 57 |wPtr(siz|eof(StdW|
|00004430| 69 6e 64 6f 77 52 65 63 | 29 2b 6d 61 78 72 6f 77 |indowRec|)+maxrow|
|00004440| 2a 6d 61 78 63 6f 6c 29 | 29 29 29 0d 09 09 7b 0d |*maxcol)|)))...{.|
|00004450| 09 09 09 65 72 72 6e 6f | 20 3d 20 2d 31 30 38 3b |...errno| = -108;|
|00004460| 09 2f 2a 20 4d 65 6d 46 | 75 6c 6c 45 72 72 20 2d |./* MemF|ullErr -|
|00004470| 20 72 61 6e 20 6f 75 74 | 20 6f 66 20 6d 65 6d 6f | ran out| of memo|
|00004480| 72 79 20 2a 2f 0d 09 09 | 09 72 65 74 75 72 6e 20 |ry */...|.return |
|00004490| 28 4e 55 4c 4c 29 3b 0d | 09 09 7d 0d 09 0d 09 09 |(NULL);.|..}.....|
|000044a0| 73 77 72 70 2d 3e 73 66 | 20 3d 20 5f 73 66 3b 0d |swrp->sf| = _sf;.|
|000044b0| 09 09 0d 09 09 73 77 72 | 70 2d 3e 63 68 61 72 68 |.....swr|p->charh|
|000044c0| 65 69 67 68 74 20 3d 20 | 63 68 61 72 68 65 69 67 |eight = |charheig|
|000044d0| 68 74 3b 0d 09 09 73 77 | 72 70 2d 3e 63 68 61 72 |ht;...sw|rp->char|
|000044e0| 77 69 64 74 68 20 3d 20 | 5f 73 66 2e 77 69 64 4d |width = |_sf.widM|
|000044f0| 61 78 3b 0d 09 09 0d 09 | 20 7d 09 2f 2a 20 6a 75 |ax;.....| }./* ju|
|00004500| 73 74 20 70 72 6f 76 69 | 64 65 73 20 73 63 6f 70 |st provi|des scop|
|00004510| 69 6e 67 20 66 6f 72 20 | 63 68 61 72 68 65 69 67 |ing for |charheig|
|00004520| 68 74 20 2a 2f 0d 09 20 | 0d 09 09 73 77 72 70 2d |ht */.. |...swrp-|
|00004530| 3e 74 6f 70 72 6f 77 20 | 3d 20 73 77 72 70 2d 3e |>toprow |= swrp->|
|00004540| 63 6f 6c 20 3d 20 30 3b | 0d 09 09 73 77 72 70 2d |col = 0;|...swrp-|
|00004550| 3e 72 6f 77 20 3d 20 6d | 61 78 72 6f 77 20 2d 20 |>row = m|axrow - |
|00004560| 31 3b 09 2f 2a 20 73 74 | 61 72 74 20 63 75 72 73 |1;./* st|art curs|
|00004570| 6f 72 20 61 74 20 62 6f | 74 74 6f 6d 20 6f 66 20 |or at bo|ttom of |
|00004580| 73 63 72 65 65 6e 20 2a | 2f 0d 09 09 73 77 72 70 |screen *|/...swrp|
|00004590| 2d 3e 73 69 67 6e 61 74 | 75 72 65 20 3d 20 5f 4f |->signat|ure = _O|
|000045a0| 55 52 53 49 47 4e 41 54 | 55 52 45 3b 0d 09 0d 09 |URSIGNAT|URE;....|
|000045b0| 09 62 6f 75 6e 64 73 2e | 74 6f 70 20 3d 20 75 70 |.bounds.|top = up|
|000045c0| 70 65 72 5f 6c 65 66 74 | 2e 76 3b 0d 09 09 62 6f |per_left|.v;...bo|
|000045d0| 75 6e 64 73 2e 6c 65 66 | 74 20 3d 20 75 70 70 65 |unds.lef|t = uppe|
|000045e0| 72 5f 6c 65 66 74 2e 68 | 3b 0d 09 09 62 6f 75 6e |r_left.h|;...boun|
|000045f0| 64 73 2e 72 69 67 68 74 | 20 3d 20 62 6f 75 6e 64 |ds.right| = bound|
|00004600| 73 2e 6c 65 66 74 20 2b | 20 5f 4c 45 46 54 45 44 |s.left +| _LEFTED|
|00004610| 47 45 20 2b 20 6d 61 78 | 63 6f 6c 20 2a 20 73 77 |GE + max|col * sw|
|00004620| 72 70 2d 3e 63 68 61 72 | 77 69 64 74 68 20 2b 20 |rp->char|width + |
|00004630| 5f 43 4f 4e 54 52 4f 4c | 57 49 44 54 48 20 2b 20 |_CONTROL|WIDTH + |
|00004640| 31 3b 0d 09 09 62 6f 75 | 6e 64 73 2e 62 6f 74 74 |1;...bou|nds.bott|
|00004650| 6f 6d 20 3d 20 62 6f 75 | 6e 64 73 2e 74 6f 70 20 |om = bou|nds.top |
|00004660| 2b 20 5f 54 4f 50 45 44 | 47 45 20 2b 20 6d 61 78 |+ _TOPED|GE + max|
|00004670| 72 6f 77 20 2a 20 73 77 | 72 70 2d 3e 63 68 61 72 |row * sw|rp->char|
|00004680| 68 65 69 67 68 74 20 2b | 20 5f 43 4f 4e 54 52 4f |height +| _CONTRO|
|00004690| 4c 57 49 44 54 48 20 2b | 20 31 20 2b 20 34 3b 0d |LWIDTH +| 1 + 4;.|
|000046a0| 09 0d 09 09 4e 65 77 57 | 69 6e 64 6f 77 28 73 77 |....NewW|indow(sw|
|000046b0| 72 70 2c 20 26 62 6f 75 | 6e 64 73 2c 20 43 74 6f |rp, &bou|nds, Cto|
|000046c0| 50 73 74 72 28 74 69 74 | 6c 65 62 61 72 29 2c 20 |Pstr(tit|lebar), |
|000046d0| 74 72 75 65 2c 0d 09 09 | 09 09 09 28 67 72 6f 77 |true,...|...(grow|
|000046e0| 20 3f 20 64 6f 63 75 6d | 65 6e 74 50 72 6f 63 20 | ? docum|entProc |
|000046f0| 3a 20 6e 6f 47 72 6f 77 | 44 6f 63 50 72 6f 63 29 |: noGrow|DocProc)|
|00004700| 2c 20 2d 31 4c 2c 20 67 | 6f 61 77 61 79 2c 20 30 |, -1L, g|oaway, 0|
|00004710| 4c 29 3b 0d 09 09 0d 09 | 09 50 74 6f 43 73 74 72 |L);.....|.PtoCstr|
|00004720| 28 74 69 74 6c 65 62 61 | 72 29 3b 0d 09 0d 09 09 |(titleba|r);.....|
|00004730| 2f 2a 20 73 65 74 20 75 | 70 20 65 76 65 6e 74 20 |/* set u|p event |
|00004740| 70 72 6f 63 65 73 73 69 | 6e 67 20 68 6f 6f 6b 73 |processi|ng hooks|
|00004750| 20 2a 2f 0d 09 09 0d 09 | 09 65 74 2e 65 76 65 6e | */.....|.et.even|
|00004760| 74 50 72 6f 63 20 3d 20 | 53 74 64 77 69 6e 64 6f |tProc = |Stdwindo|
|00004770| 77 5f 64 6f 45 76 65 6e | 74 3b 0d 09 09 65 74 2e |w_doEven|t;...et.|
|00004780| 76 73 63 72 6f 6c 6c 20 | 3d 20 30 3b 0d 09 09 50 |vscroll |= 0;...P|
|00004790| 74 72 54 6f 48 61 6e 64 | 28 26 65 74 2c 20 26 28 |trToHand|(&et, &(|
|000047a0| 28 57 69 6e 64 6f 77 50 | 65 65 6b 29 73 77 72 70 |(WindowP|eek)swrp|
|000047b0| 29 2d 3e 72 65 66 43 6f | 6e 2c 20 73 69 7a 65 6f |)->refCo|n, sizeo|
|000047c0| 66 20 65 74 29 3b 0d 09 | 09 0d 09 09 73 74 64 69 |f et);..|....stdi|
|000047d0| 6f 5f 66 6f 6e 74 73 65 | 74 28 73 77 72 70 29 3b |o_fontse|t(swrp);|
|000047e0| 0d 09 09 0d 09 09 69 66 | 20 28 67 72 6f 77 29 0d |......if| (grow).|
|000047f0| 09 09 7b 0d 09 09 09 49 | 6e 76 61 6c 52 65 63 74 |..{....I|nvalRect|
|00004800| 28 26 28 28 57 69 6e 64 | 6f 77 50 74 72 29 73 77 |(&((Wind|owPtr)sw|
|00004810| 72 70 29 2d 3e 70 6f 72 | 74 52 65 63 74 29 3b 0d |rp)->por|tRect);.|
|00004820| 09 09 09 44 72 61 77 43 | 6f 6e 74 72 6f 6c 73 28 |...DrawC|ontrols(|
|00004830| 73 77 72 70 29 3b 0d 09 | 09 09 44 72 61 77 47 72 |swrp);..|..DrawGr|
|00004840| 6f 77 49 63 6f 6e 28 73 | 77 72 70 29 3b 0d 09 09 |owIcon(s|wrp);...|
|00004850| 7d 0d 09 09 0d 09 09 56 | 61 6c 69 64 52 65 63 74 |}......V|alidRect|
|00004860| 28 26 28 28 57 69 6e 64 | 6f 77 50 74 72 29 73 77 |(&((Wind|owPtr)sw|
|00004870| 72 70 29 2d 3e 70 6f 72 | 74 52 65 63 74 29 3b 0d |rp)->por|tRect);.|
|00004880| 09 0d 09 09 69 66 20 28 | 6f 70 74 69 6f 6e 73 70 |....if (|optionsp|
|00004890| 74 72 29 0d 09 09 09 73 | 77 72 70 2d 3e 6f 70 74 |tr)....s|wrp->opt|
|000048a0| 20 3d 20 2a 6f 70 74 69 | 6f 6e 73 70 74 72 3b 0d | = *opti|onsptr;.|
|000048b0| 09 09 65 6c 73 65 0d 09 | 09 7b 0d 09 09 09 73 77 |..else..|.{....sw|
|000048c0| 72 70 2d 3e 6f 70 74 2e | 6d 61 78 72 6f 77 20 3d |rp->opt.|maxrow =|
|000048d0| 20 6d 61 78 72 6f 77 3b | 0d 09 09 09 73 77 72 70 | maxrow;|....swrp|
|000048e0| 2d 3e 76 69 73 63 6f 6c | 20 3d 20 73 77 72 70 2d |->viscol| = swrp-|
|000048f0| 3e 6f 70 74 2e 6d 61 78 | 63 6f 6c 20 3d 20 6d 61 |>opt.max|col = ma|
|00004900| 78 63 6f 6c 3b 0d 09 09 | 09 73 77 72 70 2d 3e 6f |xcol;...|.swrp->o|
|00004910| 70 74 2e 63 75 72 73 6f | 72 5f 76 69 73 69 62 6c |pt.curso|r_visibl|
|00004920| 65 20 3d 20 74 72 75 65 | 3b 0d 09 09 09 73 77 72 |e = true|;....swr|
|00004930| 70 2d 3e 6f 70 74 2e 65 | 63 68 6f 5f 73 74 61 74 |p->opt.e|cho_stat|
|00004940| 65 20 3d 20 74 72 75 65 | 3b 0d 09 09 09 73 77 72 |e = true|;....swr|
|00004950| 70 2d 3e 6f 70 74 2e 5f | 74 61 62 5f 77 69 64 74 |p->opt._|tab_widt|
|00004960| 68 20 3d 20 34 3b 0d 09 | 09 09 73 77 72 70 2d 3e |h = 4;..|..swrp->|
|00004970| 6f 70 74 2e 6e 6f 5f 70 | 75 6c 6c 5f 66 72 6f 6e |opt.no_p|ull_fron|
|00004980| 74 20 3d 20 66 61 6c 73 | 65 3b 0d 09 09 09 73 77 |t = fals|e;....sw|
|00004990| 72 70 2d 3e 6f 70 74 2e | 6e 6f 5f 67 72 6f 77 20 |rp->opt.|no_grow |
|000049a0| 3d 20 21 67 72 6f 77 3b | 0d 09 09 09 73 77 72 70 |= !grow;|....swrp|
|000049b0| 2d 3e 6f 70 74 2e 6e 6f | 5f 64 72 61 67 20 3d 20 |->opt.no|_drag = |
|000049c0| 66 61 6c 73 65 3b 0d 09 | 09 09 73 77 72 70 2d 3e |false;..|..swrp->|
|000049d0| 6f 70 74 2e 6e 6f 5f 67 | 6f 61 77 61 79 20 3d 20 |opt.no_g|oaway = |
|000049e0| 21 67 6f 61 77 61 79 3b | 0d 09 09 09 73 77 72 70 |!goaway;|....swrp|
|000049f0| 2d 3e 6f 70 74 2e 6e 6f | 5f 73 63 72 6f 6c 6c 20 |->opt.no|_scroll |
|00004a00| 3d 20 66 61 6c 73 65 3b | 0d 09 09 09 73 77 72 70 |= false;|....swrp|
|00004a10| 2d 3e 6f 70 74 2e 6e 6f | 5f 77 72 61 70 20 3d 20 |->opt.no|_wrap = |
|00004a20| 66 61 6c 73 65 3b 0d 09 | 09 7d 0d 09 0d 09 09 73 |false;..|.}.....s|
|00004a30| 77 72 70 2d 3e 76 69 73 | 72 6f 77 20 3d 20 6d 61 |wrp->vis|row = ma|
|00004a40| 78 72 6f 77 3b 0d 09 09 | 73 77 72 70 2d 3e 76 69 |xrow;...|swrp->vi|
|00004a50| 73 63 6f 6c 20 3d 20 6d | 61 78 63 6f 6c 3b 0d 09 |scol = m|axcol;..|
|00004a60| 09 0d 09 09 2f 2a 20 63 | 6c 65 61 72 20 73 63 72 |..../* c|lear scr|
|00004a70| 65 65 6e 20 6d 65 6d 6f | 72 79 20 74 6f 20 73 70 |een memo|ry to sp|
|00004a80| 61 63 65 73 20 2a 2f 0d | 09 09 0d 09 09 63 6c 65 |aces */.|.....cle|
|00004a90| 61 72 73 63 72 65 65 6e | 6d 65 6d 28 73 77 72 70 |arscreen|mem(swrp|
|00004aa0| 29 3b 0d 0d 09 09 6d 6f | 76 65 63 75 72 73 6f 72 |);....mo|vecursor|
|00004ab0| 28 73 77 72 70 2c 20 73 | 77 72 70 2d 3e 63 6f 6c |(swrp, s|wrp->col|
|00004ac0| 2c 20 73 77 72 70 2d 3e | 72 6f 77 29 3b 0d 09 09 |, swrp->|row);...|
|00004ad0| 64 72 61 77 63 75 72 73 | 6f 72 28 73 77 72 70 2c |drawcurs|or(swrp,|
|00004ae0| 20 4f 4e 29 3b 0d 09 7d | 0d 0d 09 2f 2a 20 73 65 | ON);..}|.../* se|
|00004af0| 74 20 61 6c 6c 20 72 65 | 6c 65 76 61 6e 74 20 69 |t all re|levant i|
|00004b00| 74 65 6d 73 20 69 6e 20 | 46 49 4c 45 20 72 65 63 |tems in |FILE rec|
|00004b10| 6f 72 64 20 2a 2f 0d 09 | 0d 09 77 68 6f 2d 3e 66 |ord */..|..who->f|
|00004b20| 69 6c 65 62 75 66 09 3d | 20 28 63 68 61 72 20 2a |ilebuf.=| (char *|
|00004b30| 29 20 73 77 72 70 3b 0d | 09 77 68 6f 2d 3e 53 74 |) swrp;.|.who->St|
|00004b40| 64 53 74 72 65 61 6d 09 | 3d 20 74 72 75 65 3b 0d |dStream.|= true;.|
|00004b50| 09 77 68 6f 2d 3e 49 6e | 55 73 65 09 09 3d 20 74 |.who->In|Use..= t|
|00004b60| 72 75 65 3b 0d 09 77 68 | 6f 2d 3e 77 69 6e 64 6f |rue;..wh|o->windo|
|00004b70| 77 09 09 3d 20 74 72 75 | 65 3b 0d 09 77 68 6f 2d |w..= tru|e;..who-|
|00004b80| 3e 72 64 09 09 09 3d 20 | 74 72 75 65 3b 09 09 09 |>rd...= |true;...|
|00004b90| 2f 2a 20 31 31 2f 31 33 | 2f 38 37 20 72 6d 73 20 |/* 11/13|/87 rms |
|00004ba0| 2d 20 63 68 61 6e 67 65 | 64 20 66 72 6f 6d 20 46 |- change|d from F|
|00004bb0| 41 4c 53 45 20 2a 2f 0d | 09 77 68 6f 2d 3e 77 72 |ALSE */.|.who->wr|
|00004bc0| 09 09 09 3d 20 74 72 75 | 65 3b 0d 0d 09 72 65 74 |...= tru|e;...ret|
|00004bd0| 75 72 6e 20 28 77 68 6f | 29 3b 0d 7d 0d 0d 23 6c |urn (who|);.}..#l|
|00004be0| 69 6e 65 20 30 20 66 6f | 70 65 6e 77 0d 46 49 4c |ine 0 fo|penw.FIL|
|00004bf0| 45 20 2a 66 6f 70 65 6e | 77 28 74 69 74 6c 65 62 |E *fopen|w(titleb|
|00004c00| 61 72 2c 20 75 70 70 65 | 72 5f 6c 65 66 74 2c 20 |ar, uppe|r_left, |
|00004c10| 6f 70 74 69 6f 6e 73 70 | 74 72 29 0d 63 68 61 72 |optionsp|tr).char|
|00004c20| 20 2a 74 69 74 6c 65 62 | 61 72 3b 0d 50 6f 69 6e | *titleb|ar;.Poin|
|00004c30| 74 20 75 70 70 65 72 5f | 6c 65 66 74 3b 0d 53 74 |t upper_|left;.St|
|00004c40| 64 57 69 6e 64 6f 77 4f | 70 74 69 6f 6e 73 20 2a |dWindowO|ptions *|
|00004c50| 6f 70 74 69 6f 6e 73 70 | 74 72 3b 0d 7b 0d 09 66 |optionsp|tr;.{..f|
|00004c60| 6f 70 65 6e 77 78 28 74 | 69 74 6c 65 62 61 72 2c |openwx(t|itlebar,|
|00004c70| 20 75 70 70 65 72 5f 6c | 65 66 74 2c 20 6f 70 74 | upper_l|eft, opt|
|00004c80| 69 6f 6e 73 70 74 72 2c | 20 4e 55 4c 4c 2c 20 4e |ionsptr,| NULL, N|
|00004c90| 55 4c 4c 29 3b 0d 7d 0d | 0d 23 6c 69 6e 65 20 30 |ULL);.}.|.#line 0|
|00004ca0| 20 73 65 74 77 69 6e 64 | 6f 77 0d 69 6e 74 20 73 | setwind|ow.int s|
|00004cb0| 65 74 77 69 6e 64 6f 77 | 28 77 69 6e 64 6f 77 66 |etwindow|(windowf|
|00004cc0| 69 6c 65 29 0d 72 65 67 | 69 73 74 65 72 20 46 49 |ile).reg|ister FI|
|00004cd0| 4c 45 20 2a 77 69 6e 64 | 6f 77 66 69 6c 65 3b 0d |LE *wind|owfile;.|
|00004ce0| 7b 0d 72 65 67 69 73 74 | 65 72 20 53 74 64 57 69 |{.regist|er StdWi|
|00004cf0| 6e 64 6f 77 52 65 63 20 | 2a 73 77 72 70 3b 0d 0d |ndowRec |*swrp;..|
|00004d00| 09 69 66 20 28 77 69 6e | 64 6f 77 66 69 6c 65 20 |.if (win|dowfile |
|00004d10| 26 26 0d 09 09 77 69 6e | 64 6f 77 66 69 6c 65 2d |&&...win|dowfile-|
|00004d20| 3e 49 6e 55 73 65 20 26 | 26 0d 09 09 77 69 6e 64 |>InUse &|&...wind|
|00004d30| 6f 77 66 69 6c 65 2d 3e | 77 69 6e 64 6f 77 20 26 |owfile->|window &|
|00004d40| 26 0d 09 09 28 73 77 72 | 70 20 3d 20 28 28 53 74 |&...(swr|p = ((St|
|00004d50| 64 57 69 6e 64 6f 77 52 | 65 63 2a 29 77 69 6e 64 |dWindowR|ec*)wind|
|00004d60| 6f 77 66 69 6c 65 2d 3e | 66 69 6c 65 62 75 66 29 |owfile->|filebuf)|
|00004d70| 29 2d 3e 73 69 67 6e 61 | 74 75 72 65 20 3d 3d 20 |)->signa|ture == |
|00004d80| 5f 4f 55 52 53 49 47 4e | 41 54 55 52 45 29 0d 09 |_OURSIGN|ATURE)..|
|00004d90| 7b 0d 09 09 43 75 72 72 | 65 6e 74 57 69 6e 64 6f |{...Curr|entWindo|
|00004da0| 77 20 3d 20 77 69 6e 64 | 6f 77 66 69 6c 65 3b 0d |w = wind|owfile;.|
|00004db0| 09 09 43 75 72 72 65 6e | 74 73 77 72 70 20 3d 20 |..Curren|tswrp = |
|00004dc0| 28 57 69 6e 64 6f 77 50 | 74 72 29 20 73 77 72 70 |(WindowP|tr) swrp|
|00004dd0| 3b 0d 09 09 5f 65 63 68 | 6f 20 3d 20 73 77 72 70 |;..._ech|o = swrp|
|00004de0| 2d 3e 6f 70 74 2e 65 63 | 68 6f 5f 73 74 61 74 65 |->opt.ec|ho_state|
|00004df0| 3b 0d 09 7d 0d 09 65 6c | 73 65 0d 09 09 72 65 74 |;..}..el|se...ret|
|00004e00| 75 72 6e 20 28 45 4f 46 | 29 3b 0d 09 09 0d 09 72 |urn (EOF|);.....r|
|00004e10| 65 74 75 72 6e 20 28 30 | 29 3b 0d 7d 0d 0d 73 74 |eturn (0|);.}..st|
|00004e20| 64 77 73 61 76 65 28 77 | 69 6e 64 6f 77 66 69 6c |dwsave(w|indowfil|
|00004e30| 65 2c 20 65 6e 76 29 0d | 46 49 4c 45 20 2a 77 69 |e, env).|FILE *wi|
|00004e40| 6e 64 6f 77 66 69 6c 65 | 3b 0d 53 74 64 77 73 61 |ndowfile|;.Stdwsa|
|00004e50| 76 65 52 65 63 6f 72 64 | 20 2a 65 6e 76 3b 0d 7b |veRecord| *env;.{|
|00004e60| 0d 0d 09 49 6e 69 74 5f | 73 74 64 69 6f 28 29 3b |...Init_|stdio();|
|00004e70| 0d 09 65 6e 76 2d 3e 66 | 70 20 3d 20 43 75 72 72 |..env->f|p = Curr|
|00004e80| 65 6e 74 57 69 6e 64 6f | 77 3b 0d 09 65 6e 76 2d |entWindo|w;..env-|
|00004e90| 3e 77 70 20 3d 20 43 75 | 72 72 65 6e 74 73 77 72 |>wp = Cu|rrentswr|
|00004ea0| 70 3b 0d 09 0d 09 72 65 | 74 75 72 6e 20 28 73 65 |p;....re|turn (se|
|00004eb0| 74 77 69 6e 64 6f 77 28 | 77 69 6e 64 6f 77 66 69 |twindow(|windowfi|
|00004ec0| 6c 65 29 29 3b 0d 7d 0d | 0d 73 74 64 77 72 65 73 |le));.}.|.stdwres|
|00004ed0| 74 6f 72 65 28 77 69 6e | 64 6f 77 66 69 6c 65 2c |tore(win|dowfile,|
|00004ee0| 20 65 6e 76 29 0d 46 49 | 4c 45 20 2a 77 69 6e 64 | env).FI|LE *wind|
|00004ef0| 6f 77 66 69 6c 65 3b 0d | 53 74 64 77 73 61 76 65 |owfile;.|Stdwsave|
|00004f00| 52 65 63 6f 72 64 20 2a | 65 6e 76 3b 0d 7b 0d 09 |Record *|env;.{..|
|00004f10| 69 66 20 28 77 69 6e 64 | 6f 77 66 69 6c 65 20 21 |if (wind|owfile !|
|00004f20| 3d 20 43 75 72 72 65 6e | 74 57 69 6e 64 6f 77 29 |= Curren|tWindow)|
|00004f30| 20 72 65 74 75 72 6e 20 | 28 45 4f 46 29 3b 0d 09 | return |(EOF);..|
|00004f40| 0d 09 43 75 72 72 65 6e | 74 57 69 6e 64 6f 77 20 |..Curren|tWindow |
|00004f50| 3d 20 65 6e 76 2d 3e 66 | 70 3b 0d 09 43 75 72 72 |= env->f|p;..Curr|
|00004f60| 65 6e 74 73 77 72 70 20 | 3d 20 65 6e 76 2d 3e 77 |entswrp |= env->w|
|00004f70| 70 3b 0d 09 5f 65 63 68 | 6f 20 3d 20 28 28 53 74 |p;.._ech|o = ((St|
|00004f80| 64 57 69 6e 64 6f 77 52 | 65 63 2a 29 43 75 72 72 |dWindowR|ec*)Curr|
|00004f90| 65 6e 74 73 77 72 70 29 | 2d 3e 6f 70 74 2e 65 63 |entswrp)|->opt.ec|
|00004fa0| 68 6f 5f 73 74 61 74 65 | 3b 0d 09 72 65 74 75 72 |ho_state|;..retur|
|00004fb0| 6e 20 28 30 29 3b 0d 7d | 0d 0d 23 6c 69 6e 65 20 |n (0);.}|..#line |
|00004fc0| 30 20 43 6c 69 63 6b 5f | 4f 6e 28 29 0d 76 6f 69 |0 Click_|On().voi|
|00004fd0| 64 20 43 6c 69 63 6b 5f | 4f 6e 28 66 6c 61 67 29 |d Click_|On(flag)|
|00004fe0| 0d 7b 0d 09 5f 63 6c 69 | 63 6b 5f 6f 6e 20 3d 20 |.{.._cli|ck_on = |
|00004ff0| 66 6c 61 67 3b 0d 7d 0d | 0d 73 74 61 74 69 63 0d |flag;.}.|.static.|
|00005000| 64 72 61 77 5f 65 78 69 | 74 5f 74 65 78 74 28 78 |draw_exi|t_text(x|
|00005010| 65 76 65 6e 74 29 0d 58 | 45 76 65 6e 74 52 65 63 |event).X|EventRec|
|00005020| 6f 72 64 20 2a 78 65 76 | 65 6e 74 3b 0d 7b 0d 57 |ord *xev|ent;.{.W|
|00005030| 69 6e 64 6f 77 50 74 72 | 20 77 70 20 3d 20 78 65 |indowPtr| wp = xe|
|00005040| 76 65 6e 74 2d 3e 77 69 | 6e 64 6f 77 3b 0d 09 73 |vent->wi|ndow;..s|
|00005050| 77 69 74 63 68 20 28 28 | 28 45 76 65 6e 74 52 65 |witch ((|(EventRe|
|00005060| 63 6f 72 64 2a 29 78 65 | 76 65 6e 74 29 2d 3e 77 |cord*)xe|vent)->w|
|00005070| 68 61 74 29 0d 09 7b 0d | 09 63 61 73 65 20 75 70 |hat)..{.|.case up|
|00005080| 64 61 74 65 45 76 74 3a | 0d 09 09 53 65 74 50 6f |dateEvt:|...SetPo|
|00005090| 72 74 28 77 70 29 3b 0d | 09 09 4d 6f 76 65 54 6f |rt(wp);.|..MoveTo|
|000050a0| 28 34 2c 20 32 34 2b 5f | 73 66 2e 64 65 73 63 65 |(4, 24+_|sf.desce|
|000050b0| 6e 74 29 3b 0d 09 09 44 | 72 61 77 53 74 72 69 6e |nt);...D|rawStrin|
|000050c0| 67 28 22 5c 70 20 43 6c | 69 63 6b 20 63 6c 6f 73 |g("\p Cl|ick clos|
|000050d0| 65 20 62 6f 78 20 6f 66 | 20 74 68 69 73 20 77 69 |e box of| this wi|
|000050e0| 6e 64 6f 77 20 6f 72 20 | 70 72 65 73 73 20 52 65 |ndow or |press Re|
|000050f0| 74 75 72 6e 20 74 6f 20 | 63 6f 6e 74 69 6e 75 65 |turn to |continue|
|00005100| 22 29 3b 0d 09 09 62 72 | 65 61 6b 3b 0d 0d 09 63 |");...br|eak;...c|
|00005110| 61 73 65 20 63 6c 6f 73 | 65 45 76 65 6e 74 3a 0d |ase clos|eEvent:.|
|00005120| 09 09 64 6f 5f 65 78 69 | 74 28 29 3b 0d 09 09 0d |..do_exi|t();....|
|00005130| 09 64 65 66 61 75 6c 74 | 3a 0d 09 09 2f 2a 20 65 |.default|:.../* e|
|00005140| 76 65 6e 74 20 6e 6f 74 | 20 68 61 6e 64 6c 65 64 |vent not| handled|
|00005150| 20 62 79 20 75 73 20 2a | 2f 0d 09 09 0d 09 09 72 | by us *|/......r|
|00005160| 65 74 75 72 6e 20 28 66 | 61 6c 73 65 29 3b 0d 09 |eturn (f|alse);..|
|00005170| 7d 0d 0d 09 2f 2a 20 65 | 76 65 6e 74 20 77 61 73 |}.../* e|vent was|
|00005180| 20 68 61 6e 64 6c 65 64 | 20 61 62 6f 76 65 20 2a | handled| above *|
|00005190| 2f 0d 0d 09 72 65 74 75 | 72 6e 20 28 74 72 75 65 |/...retu|rn (true|
|000051a0| 29 3b 0d 7d 0d 0d 73 74 | 61 74 69 63 0d 76 6f 69 |);.}..st|atic.voi|
|000051b0| 64 09 63 6c 69 63 6b 5f | 74 6f 5f 63 6f 6e 74 69 |d.click_|to_conti|
|000051c0| 6e 75 65 28 29 0d 7b 0d | 65 76 65 6e 74 69 6e 66 |nue().{.|eventinf|
|000051d0| 6f 20 65 74 3b 0d 0d 09 | 2f 2a 20 6d 61 6b 65 20 |o et;...|/* make |
|000051e0| 73 75 72 65 20 61 6c 6c | 20 65 78 69 74 20 72 6f |sure all| exit ro|
|000051f0| 75 74 69 6e 65 73 20 68 | 61 76 65 20 62 65 65 6e |utines h|ave been|
|00005200| 20 63 61 6c 6c 65 64 20 | 62 65 66 6f 72 65 20 77 | called |before w|
|00005210| 65 0d 09 09 64 6f 20 61 | 6e 79 74 68 69 6e 67 20 |e...do a|nything |
|00005220| 2a 2f 0d 0d 09 5f 65 78 | 69 74 69 6e 67 28 31 29 |*/..._ex|iting(1)|
|00005230| 3b 0d 09 0d 09 2f 2a 20 | 69 66 20 28 65 6d 70 74 |;..../* |if (empt|
|00005240| 79 72 67 6e 29 20 44 69 | 73 70 6f 73 65 52 67 6e |yrgn) Di|sposeRgn|
|00005250| 28 65 6d 70 74 79 72 67 | 6e 29 3b 20 2d 20 6e 65 |(emptyrg|n); - ne|
|00005260| 65 64 20 6e 6f 74 20 62 | 6f 74 68 65 72 20 73 69 |ed not b|other si|
|00005270| 6e 63 65 20 74 68 65 0d | 09 09 65 6e 74 69 72 65 |nce the.|..entire|
|00005280| 20 61 70 70 6c 69 63 61 | 74 69 6f 6e 20 68 65 61 | applica|tion hea|
|00005290| 70 20 73 68 6f 75 6c 64 | 20 62 65 20 76 61 70 6f |p should| be vapo|
|000052a0| 72 69 7a 65 64 20 73 68 | 6f 72 74 6c 79 20 2a 2f |rized sh|ortly */|
|000052b0| 0d 09 0d 09 69 66 20 28 | 5f 63 6c 69 63 6b 5f 6f |....if (|_click_o|
|000052c0| 6e 29 0d 09 7b 0d 09 09 | 2f 2a 20 63 61 6e 63 65 |n)..{...|/* cance|
|000052d0| 6c 20 61 6e 79 20 70 65 | 6e 64 69 6e 67 20 65 76 |l any pe|nding ev|
|000052e0| 65 6e 74 73 20 2a 2f 0d | 09 09 0d 09 09 46 6c 75 |ents */.|.....Flu|
|000052f0| 73 68 45 76 65 6e 74 73 | 28 65 76 65 72 79 45 76 |shEvents|(everyEv|
|00005300| 65 6e 74 2c 20 30 29 3b | 0d 0d 09 09 62 6f 75 6e |ent, 0);|....boun|
|00005310| 64 73 2e 6c 65 66 74 20 | 3d 20 62 6f 75 6e 64 73 |ds.left |= bounds|
|00005320| 2e 74 6f 70 20 3d 20 35 | 30 3b 0d 09 09 62 6f 75 |.top = 5|0;...bou|
|00005330| 6e 64 73 2e 72 69 67 68 | 74 20 3d 20 34 35 36 3b |nds.righ|t = 456;|
|00005340| 0d 09 09 62 6f 75 6e 64 | 73 2e 62 6f 74 74 6f 6d |...bound|s.bottom|
|00005350| 20 3d 20 31 30 30 3b 0d | 09 09 0d 09 09 2f 2a 20 | = 100;.|...../* |
|00005360| 50 75 74 20 75 70 20 61 | 20 77 69 6e 64 6f 77 20 |Put up a| window |
|00005370| 61 6e 64 20 68 61 6e 64 | 6c 65 20 77 69 6e 64 6f |and hand|le windo|
|00005380| 77 20 65 76 65 6e 74 73 | 0d 09 09 09 75 6e 74 69 |w events|....unti|
|00005390| 6c 20 67 6f 61 77 61 79 | 20 69 73 20 63 6c 69 63 |l goaway| is clic|
|000053a0| 6b 65 64 20 66 6f 72 20 | 74 68 69 73 20 77 69 6e |ked for |this win|
|000053b0| 64 6f 77 20 2a 2f 0d 09 | 0d 09 09 5f 65 78 69 74 |dow */..|..._exit|
|000053c0| 5f 77 70 20 3d 20 4e 65 | 77 57 69 6e 64 6f 77 28 |_wp = Ne|wWindow(|
|000053d0| 30 4c 2c 20 26 62 6f 75 | 6e 64 73 2c 20 22 5c 70 |0L, &bou|nds, "\p|
|000053e0| 45 78 69 74 20 57 69 6e | 64 6f 77 22 2c 0d 09 09 |Exit Win|dow",...|
|000053f0| 09 09 09 09 09 74 72 75 | 65 2c 20 6e 6f 47 72 6f |.....tru|e, noGro|
|00005400| 77 44 6f 63 50 72 6f 63 | 2c 0d 09 09 09 09 09 09 |wDocProc|,.......|
|00005410| 09 2d 31 4c 2c 20 74 72 | 75 65 2c 20 30 4c 29 3b |.-1L, tr|ue, 0L);|
|00005420| 0d 0d 09 09 65 74 2e 65 | 76 65 6e 74 50 72 6f 63 |....et.e|ventProc|
|00005430| 20 3d 20 64 72 61 77 5f | 65 78 69 74 5f 74 65 78 | = draw_|exit_tex|
|00005440| 74 3b 0d 09 09 50 74 72 | 54 6f 48 61 6e 64 28 26 |t;...Ptr|ToHand(&|
|00005450| 65 74 2c 20 26 28 28 57 | 69 6e 64 6f 77 50 65 65 |et, &((W|indowPee|
|00005460| 6b 29 20 5f 65 78 69 74 | 5f 77 70 29 2d 3e 72 65 |k) _exit|_wp)->re|
|00005470| 66 43 6f 6e 2c 20 73 69 | 7a 65 6f 66 20 65 74 29 |fCon, si|zeof et)|
|00005480| 3b 0d 0d 09 09 5f 66 6f | 6e 74 20 3d 20 73 79 73 |;...._fo|nt = sys|
|00005490| 74 65 6d 46 6f 6e 74 3b | 0d 09 09 5f 73 69 7a 65 |temFont;|..._size|
|000054a0| 20 3d 20 31 32 3b 0d 09 | 09 73 74 64 69 6f 5f 66 | = 12;..|.stdio_f|
|000054b0| 6f 6e 74 73 65 74 28 5f | 65 78 69 74 5f 77 70 29 |ontset(_|exit_wp)|
|000054c0| 3b 0d 09 09 0d 09 09 2f | 2a 20 73 6d 61 6c 6c 20 |;....../|* small |
|000054d0| 65 76 65 6e 74 20 6c 6f | 6f 70 20 74 6f 20 70 72 |event lo|op to pr|
|000054e0| 6f 63 65 73 73 20 77 69 | 6e 64 6f 77 20 65 76 65 |ocess wi|ndow eve|
|000054f0| 6e 74 73 20 73 75 63 68 | 20 61 73 20 62 72 69 6e |nts such| as brin|
|00005500| 67 69 6e 67 0d 09 09 09 | 74 6f 20 66 72 6f 6e 74 |ging....|to front|
|00005510| 2c 20 72 65 73 69 7a 69 | 6e 67 2c 20 64 72 61 67 |, resizi|ng, drag|
|00005520| 67 69 6e 67 2c 20 65 74 | 63 2e 20 2a 2f 0d 09 09 |ging, et|c. */...|
|00005530| 09 0d 09 09 66 6f 72 20 | 28 3b 3b 29 0d 09 09 7b |....for |(;;)...{|
|00005540| 45 76 65 6e 74 52 65 63 | 6f 72 64 20 65 76 65 6e |EventRec|ord even|
|00005550| 74 3b 0d 09 09 09 77 68 | 69 6c 65 20 28 21 20 47 |t;....wh|ile (! G|
|00005560| 65 74 4e 65 78 74 45 76 | 65 6e 74 28 65 76 65 72 |etNextEv|ent(ever|
|00005570| 79 45 76 65 6e 74 2c 20 | 26 65 76 65 6e 74 29 29 |yEvent, |&event))|
|00005580| 0d 09 09 09 7b 0d 09 09 | 09 09 48 69 6c 69 74 65 |....{...|..Hilite|
|00005590| 4d 65 6e 75 28 30 29 3b | 0d 09 09 09 09 53 79 73 |Menu(0);|.....Sys|
|000055a0| 74 65 6d 54 61 73 6b 28 | 29 3b 0d 09 09 09 7d 0d |temTask(|);....}.|
|000055b0| 09 09 09 0d 09 09 09 53 | 65 74 43 75 72 73 6f 72 |.......S|etCursor|
|000055c0| 28 26 61 72 72 6f 77 29 | 3b 0d 09 09 0d 09 09 09 |(&arrow)|;.......|
|000055d0| 69 66 20 28 65 76 65 6e | 74 2e 77 68 61 74 20 3d |if (even|t.what =|
|000055e0| 3d 20 6b 65 79 44 6f 77 | 6e 20 26 26 20 28 63 68 |= keyDow|n && (ch|
|000055f0| 61 72 29 20 65 76 65 6e | 74 2e 6d 65 73 73 61 67 |ar) even|t.messag|
|00005600| 65 20 3d 3d 20 27 5c 72 | 27 29 0d 09 09 09 09 62 |e == '\r|').....b|
|00005610| 72 65 61 6b 3b 0d 0d 09 | 09 09 53 74 64 45 76 65 |reak;...|..StdEve|
|00005620| 6e 74 28 26 65 76 65 6e | 74 29 3b 0d 09 09 7d 0d |nt(&even|t);...}.|
|00005630| 09 09 0d 09 09 64 6f 5f | 65 78 69 74 28 29 3b 0d |.....do_|exit();.|
|00005640| 09 7d 0d 7d 0d 0d 23 6c | 69 6e 65 20 30 20 53 74 |.}.}..#l|ine 0 St|
|00005650| 64 69 6f 5f 43 6f 6e 66 | 69 67 28 29 0d 76 6f 69 |dio_Conf|ig().voi|
|00005660| 64 20 53 74 64 69 6f 5f | 43 6f 6e 66 69 67 28 66 |d Stdio_|Config(f|
|00005670| 6f 6e 74 2c 73 69 7a 65 | 2c 66 61 63 65 2c 6d 6f |ont,size|,face,mo|
|00005680| 64 65 29 0d 69 6e 74 09 | 66 6f 6e 74 2c 73 69 7a |de).int.|font,siz|
|00005690| 65 2c 66 61 63 65 2c 6d | 6f 64 65 3b 0d 7b 0d 09 |e,face,m|ode;.{..|
|000056a0| 2f 2a 20 6d 6f 64 69 66 | 79 20 64 65 66 61 75 6c |/* modif|y defaul|
|000056b0| 74 73 20 2a 2f 0d 09 09 | 0d 09 5f 66 6f 6e 74 20 |ts */...|.._font |
|000056c0| 3d 20 66 6f 6e 74 3b 0d | 09 5f 73 69 7a 65 20 3d |= font;.|._size =|
|000056d0| 20 73 69 7a 65 3b 0d 09 | 5f 66 61 63 65 20 3d 20 | size;..|_face = |
|000056e0| 66 61 63 65 3b 0d 09 5f | 6d 6f 64 65 20 3d 20 6d |face;.._|mode = m|
|000056f0| 6f 64 65 3b 0d 7d 0d 0d | 23 6c 69 6e 65 20 30 20 |ode;.}..|#line 0 |
|00005700| 53 74 64 69 6f 5f 63 6f | 6e 66 69 67 28 29 09 2f |Stdio_co|nfig()./|
|00005710| 2a 20 6c 6f 77 65 72 20 | 63 61 73 65 20 63 20 73 |* lower |case c s|
|00005720| 69 6e 63 65 20 69 74 20 | 77 61 73 20 77 72 6f 6e |ince it |was wron|
|00005730| 67 20 69 6e 20 74 68 65 | 20 6d 61 6e 75 61 6c 21 |g in the| manual!|
|00005740| 20 2a 2f 0d 76 6f 69 64 | 20 53 74 64 69 6f 5f 63 | */.void| Stdio_c|
|00005750| 6f 6e 66 69 67 28 66 6f | 6e 74 2c 73 69 7a 65 2c |onfig(fo|nt,size,|
|00005760| 66 61 63 65 2c 6d 6f 64 | 65 29 0d 69 6e 74 09 66 |face,mod|e).int.f|
|00005770| 6f 6e 74 2c 73 69 7a 65 | 2c 66 61 63 65 2c 6d 6f |ont,size|,face,mo|
|00005780| 64 65 3b 0d 7b 0d 09 53 | 74 64 69 6f 5f 43 6f 6e |de;.{..S|tdio_Con|
|00005790| 66 69 67 28 66 6f 6e 74 | 2c 20 73 69 7a 65 2c 20 |fig(font|, size, |
|000057a0| 66 61 63 65 2c 20 6d 6f | 64 65 29 3b 0d 7d 0d 0d |face, mo|de);.}..|
|000057b0| 76 6f 69 64 20 49 6e 69 | 74 5f 73 74 64 69 6f 28 |void Ini|t_stdio(|
|000057c0| 29 0d 7b 0d 72 65 67 69 | 73 74 65 72 20 53 74 64 |).{.regi|ster Std|
|000057d0| 57 69 6e 64 6f 77 52 65 | 63 20 2a 73 77 72 70 3b |WindowRe|c *swrp;|
|000057e0| 0d 50 6f 69 6e 74 20 74 | 6f 70 6c 65 66 74 63 6f |.Point t|opleftco|
|000057f0| 72 6e 65 72 3b 0d 0d 09 | 69 66 20 28 5f 69 6e 69 |rner;...|if (_ini|
|00005800| 74 65 64 20 26 26 20 5f | 73 63 72 65 65 6e 29 20 |ted && _|screen) |
|00005810| 72 65 74 75 72 6e 3b 0d | 0d 09 69 66 20 28 21 5f |return;.|..if (!_|
|00005820| 69 6e 69 74 65 64 29 0d | 09 7b 0d 09 09 5f 69 6e |inited).|.{..._in|
|00005830| 69 74 65 64 20 3d 20 74 | 72 75 65 3b 0d 09 09 49 |ited = t|rue;...I|
|00005840| 6e 69 74 47 72 61 66 28 | 26 74 68 65 50 6f 72 74 |nitGraf(|&thePort|
|00005850| 29 3b 0d 09 09 49 6e 69 | 74 46 6f 6e 74 73 28 29 |);...Ini|tFonts()|
|00005860| 3b 0d 09 09 49 6e 69 74 | 57 69 6e 64 6f 77 73 28 |;...Init|Windows(|
|00005870| 29 3b 0d 09 09 49 6e 69 | 74 44 69 61 6c 6f 67 73 |);...Ini|tDialogs|
|00005880| 28 30 4c 29 3b 0d 09 09 | 73 65 74 75 70 5f 6d 65 |(0L);...|setup_me|
|00005890| 6e 75 73 28 29 3b 0d 09 | 09 54 45 49 6e 69 74 28 |nus();..|.TEInit(|
|000058a0| 29 3b 0d 09 09 46 6c 75 | 73 68 45 76 65 6e 74 73 |);...Flu|shEvents|
|000058b0| 28 65 76 65 72 79 45 76 | 65 6e 74 2c 20 30 29 3b |(everyEv|ent, 0);|
|000058c0| 0d 09 09 48 69 6c 69 74 | 65 4d 65 6e 75 28 30 29 |...Hilit|eMenu(0)|
|000058d0| 3b 0d 09 09 53 79 73 74 | 65 6d 54 61 73 6b 28 29 |;...Syst|emTask()|
|000058e0| 3b 0d 09 7d 0d 0d 09 69 | 66 20 28 21 5f 73 63 72 |;..}...i|f (!_scr|
|000058f0| 65 65 6e 29 0d 09 7b 0d | 09 09 5f 73 63 72 65 65 |een)..{.|.._scree|
|00005900| 6e 20 3d 20 74 72 75 65 | 3b 0d 0d 09 09 4f 70 65 |n = true|;....Ope|
|00005910| 6e 50 6f 72 74 28 26 64 | 75 6d 6d 79 50 6f 72 74 |nPort(&d|ummyPort|
|00005920| 29 3b 0d 0d 09 09 2f 2a | 20 74 68 69 73 20 66 6f |);..../*| this fo|
|00005930| 6e 74 20 69 6e 66 6f 72 | 6d 61 74 69 6f 6e 20 6d |nt infor|mation m|
|00005940| 75 73 74 20 62 65 20 73 | 65 74 20 75 70 20 66 6f |ust be s|et up fo|
|00005950| 72 20 66 6f 70 65 6e 77 | 20 74 6f 20 6b 6e 6f 77 |r fopenw| to know|
|00005960| 20 68 6f 77 0d 09 09 09 | 20 62 69 67 20 74 6f 20 | how....| big to |
|00005970| 6d 61 6b 65 20 74 68 65 | 20 77 69 6e 64 6f 77 20 |make the| window |
|00005980| 2a 2f 0d 09 09 0d 09 09 | 74 6f 70 6c 65 66 74 63 |*/......|topleftc|
|00005990| 6f 72 6e 65 72 2e 68 20 | 3d 20 34 3b 0d 09 09 74 |orner.h |= 4;...t|
|000059a0| 6f 70 6c 65 66 74 63 6f | 72 6e 65 72 2e 76 20 3d |opleftco|rner.v =|
|000059b0| 20 5f 4d 42 41 52 48 45 | 49 47 48 54 20 2b 20 5f | _MBARHE|IGHT + _|
|000059c0| 54 49 54 4c 45 42 41 52 | 48 45 49 47 48 54 20 2b |TITLEBAR|HEIGHT +|
|000059d0| 20 34 3b 0d 0d 09 09 73 | 65 74 77 69 6e 64 6f 77 | 4;....s|etwindow|
|000059e0| 28 66 6f 70 65 6e 77 78 | 28 22 63 6f 6e 73 6f 6c |(fopenwx|("consol|
|000059f0| 65 22 2c 20 74 6f 70 6c | 65 66 74 63 6f 72 6e 65 |e", topl|eftcorne|
|00005a00| 72 2c 20 4e 55 4c 4c 2c | 20 5f 63 6f 6e 73 6f 6c |r, NULL,| _consol|
|00005a10| 65 2c 20 4e 55 4c 4c 29 | 29 3b 0d 09 09 0d 09 09 |e, NULL)|);......|
|00005a20| 5f 63 6f 6e 73 6f 6c 65 | 5f 77 70 20 3d 20 43 75 |_console|_wp = Cu|
|00005a30| 72 72 65 6e 74 73 77 72 | 70 3b 0d 0d 09 09 2f 2a |rrentswr|p;..../*|
|00005a40| 20 75 6e 6c 69 6b 65 20 | 6f 74 68 65 72 20 77 69 | unlike |other wi|
|00005a50| 6e 64 6f 77 73 2c 20 63 | 6f 6e 73 6f 6c 65 20 69 |ndows, c|onsole i|
|00005a60| 73 20 6d 75 6c 74 69 2d | 70 75 72 70 6f 73 65 20 |s multi-|purpose |
|00005a70| 61 6e 64 0d 09 09 09 73 | 6f 20 69 74 20 69 73 20 |and....s|o it is |
|00005a80| 68 61 6e 64 6c 65 64 20 | 73 70 65 63 69 61 6c 6c |handled |speciall|
|00005a90| 79 20 2a 2f 0d 0d 09 09 | 5f 63 6f 6e 73 6f 6c 65 |y */....|_console|
|00005aa0| 2d 3e 72 64 20 3d 20 74 | 72 75 65 3b 0d 0d 09 09 |->rd = t|rue;....|
|00005ab0| 2f 2a 20 73 65 74 20 75 | 70 20 73 74 64 6f 75 74 |/* set u|p stdout|
|00005ac0| 20 61 6e 64 20 73 74 64 | 65 72 72 20 74 6f 20 6d | and std|err to m|
|00005ad0| 61 74 63 68 20 2a 2f 0d | 0d 09 09 69 66 20 28 73 |atch */.|...if (s|
|00005ae0| 74 64 6f 75 74 2d 3e 53 | 74 64 53 74 72 65 61 6d |tdout->S|tdStream|
|00005af0| 29 0d 09 09 09 66 6f 70 | 65 6e 77 78 28 22 22 2c |)....fop|enwx("",|
|00005b00| 20 74 6f 70 6c 65 66 74 | 63 6f 72 6e 65 72 2c 20 | topleft|corner, |
|00005b10| 4e 55 4c 4c 2c 20 73 74 | 64 6f 75 74 2c 20 5f 63 |NULL, st|dout, _c|
|00005b20| 6f 6e 73 6f 6c 65 5f 77 | 70 29 3b 0d 09 09 0d 09 |onsole_w|p);.....|
|00005b30| 09 69 66 20 28 73 74 64 | 65 72 72 2d 3e 53 74 64 |.if (std|err->Std|
|00005b40| 53 74 72 65 61 6d 29 0d | 09 09 09 66 6f 70 65 6e |Stream).|...fopen|
|00005b50| 77 78 28 22 22 2c 20 74 | 6f 70 6c 65 66 74 63 6f |wx("", t|opleftco|
|00005b60| 72 6e 65 72 2c 20 4e 55 | 4c 4c 2c 20 73 74 64 65 |rner, NU|LL, stde|
|00005b70| 72 72 2c 20 5f 63 6f 6e | 73 6f 6c 65 5f 77 70 29 |rr, _con|sole_wp)|
|00005b80| 3b 0d 0d 09 09 2f 2a 20 | 73 65 74 20 75 70 20 65 |;..../* |set up e|
|00005b90| 78 69 74 20 70 72 6f 63 | 65 64 75 72 65 20 2a 2f |xit proc|edure */|
|00005ba0| 0d 09 09 0d 09 09 6f 6e | 65 78 69 74 28 63 6c 69 |......on|exit(cli|
|00005bb0| 63 6b 5f 74 6f 5f 63 6f | 6e 74 69 6e 75 65 29 3b |ck_to_co|ntinue);|
|00005bc0| 0d 09 09 0d 09 09 53 65 | 74 43 75 72 73 6f 72 28 |......Se|tCursor(|
|00005bd0| 26 61 72 72 6f 77 29 3b | 0d 09 7d 0d 09 0d 20 20 |&arrow);|..}... |
|00005be0| 09 69 66 20 28 21 65 6d | 70 74 79 72 67 6e 29 20 |.if (!em|ptyrgn) |
|00005bf0| 65 6d 70 74 79 72 67 6e | 3d 4e 65 77 52 67 6e 28 |emptyrgn|=NewRgn(|
|00005c00| 29 3b 0d 7d 0d 0d 23 6c | 69 6e 65 20 30 20 53 65 |);.}..#l|ine 0 Se|
|00005c10| 74 5f 45 63 68 6f 28 29 | 0d 76 6f 69 64 20 53 65 |t_Echo()|.void Se|
|00005c20| 74 5f 45 63 68 6f 28 73 | 74 61 74 65 29 0d 42 6f |t_Echo(s|tate).Bo|
|00005c30| 6f 6c 65 61 6e 09 73 74 | 61 74 65 3b 0d 7b 0d 09 |olean.st|ate;.{..|
|00005c40| 5f 65 63 68 6f 20 3d 20 | 73 74 61 74 65 3b 0d 09 |_echo = |state;..|
|00005c50| 69 66 20 28 43 75 72 72 | 65 6e 74 57 69 6e 64 6f |if (Curr|entWindo|
|00005c60| 77 29 0d 09 09 28 28 53 | 74 64 57 69 6e 64 6f 77 |w)...((S|tdWindow|
|00005c70| 52 65 63 2a 29 28 43 75 | 72 72 65 6e 74 73 77 72 |Rec*)(Cu|rrentswr|
|00005c80| 70 29 29 2d 3e 6f 70 74 | 2e 65 63 68 6f 5f 73 74 |p))->opt|.echo_st|
|00005c90| 61 74 65 20 3d 20 73 74 | 61 74 65 3b 0d 7d 0d 0d |ate = st|ate;.}..|
|00005ca0| 2f 2a 20 70 64 67 20 2d | 20 36 2f 31 30 2f 38 36 |/* pdg -| 6/10/86|
|00005cb0| 20 2d 20 53 74 64 69 6f | 5f 4d 61 63 49 6e 69 74 | - Stdio|_MacInit|
|00005cc0| 28 29 20 61 6c 6c 6f 77 | 73 20 63 6f 65 78 69 73 |() allow|s coexis|
|00005cd0| 74 65 6e 63 65 20 6f 66 | 20 4d 61 63 20 77 69 6e |tence of| Mac win|
|00005ce0| 64 6f 77 73 20 61 6e 64 | 0d 09 09 09 09 09 73 74 |dows and|......st|
|00005cf0| 64 69 6f 20 69 66 20 63 | 61 6c 6c 65 64 20 77 69 |dio if c|alled wi|
|00005d00| 74 68 20 66 6c 61 67 20 | 73 65 74 20 74 6f 20 74 |th flag |set to t|
|00005d10| 72 75 65 20 73 6f 20 73 | 74 64 69 6f 20 77 6f 6e |rue so s|tdio won|
|00005d20| 27 74 0d 09 09 09 09 09 | 72 65 69 6e 69 74 69 61 |'t......|reinitia|
|00005d30| 6c 69 7a 65 20 61 6c 6c | 20 6f 66 20 74 68 65 20 |lize all| of the |
|00005d40| 4d 61 63 20 73 74 75 66 | 66 2e 20 2a 2f 0d 0d 23 |Mac stuf|f. */..#|
|00005d50| 6c 69 6e 65 20 30 20 53 | 74 64 69 6f 5f 4d 61 63 |line 0 S|tdio_Mac|
|00005d60| 49 6e 69 74 28 29 0d 76 | 6f 69 64 20 53 74 64 69 |Init().v|oid Stdi|
|00005d70| 6f 5f 4d 61 63 49 6e 69 | 74 28 66 6c 61 67 29 0d |o_MacIni|t(flag).|
|00005d80| 42 6f 6f 6c 65 61 6e 20 | 66 6c 61 67 3b 0d 7b 0d |Boolean |flag;.{.|
|00005d90| 09 5f 69 6e 69 74 65 64 | 20 3d 20 66 6c 61 67 3b |._inited| = flag;|
|00005da0| 0d 7d 0d 0d 23 6c 69 6e | 65 20 30 20 53 65 74 5f |.}..#lin|e 0 Set_|
|00005db0| 54 61 62 0d 76 6f 69 64 | 20 53 65 74 5f 54 61 62 |Tab.void| Set_Tab|
|00005dc0| 28 6c 65 6e 29 0d 69 6e | 74 09 6c 65 6e 3b 0d 7b |(len).in|t.len;.{|
|00005dd0| 0d 09 49 6e 69 74 5f 73 | 74 64 69 6f 28 29 3b 0d |..Init_s|tdio();.|
|00005de0| 09 28 28 53 74 64 57 69 | 6e 64 6f 77 52 65 63 2a |.((StdWi|ndowRec*|
|00005df0| 29 20 43 75 72 72 65 6e | 74 73 77 72 70 29 2d 3e |) Curren|tswrp)->|
|00005e00| 6f 70 74 2e 5f 74 61 62 | 5f 77 69 64 74 68 20 3d |opt._tab|_width =|
|00005e10| 20 6c 65 6e 20 3e 20 31 | 20 3f 20 6c 65 6e 20 3a | len > 1| ? len :|
|00005e20| 20 31 3b 0d 7d 0d 0d 23 | 6c 69 6e 65 20 30 20 67 | 1;.}..#|line 0 g|
|00005e30| 6f 74 6f 78 79 0d 76 6f | 69 64 09 67 6f 74 6f 78 |otoxy.vo|id.gotox|
|00005e40| 79 28 78 2c 79 29 0d 72 | 65 67 69 73 74 65 72 20 |y(x,y).r|egister |
|00005e50| 69 6e 74 20 78 2c 79 3b | 0d 7b 0d 72 65 67 69 73 |int x,y;|.{.regis|
|00005e60| 74 65 72 20 53 74 64 57 | 69 6e 64 6f 77 52 65 63 |ter StdW|indowRec|
|00005e70| 20 2a 73 77 72 70 3b 0d | 0d 09 49 6e 69 74 5f 73 | *swrp;.|..Init_s|
|00005e80| 74 64 69 6f 28 29 3b 0d | 09 0d 09 73 77 72 70 20 |tdio();.|...swrp |
|00005e90| 3d 20 28 53 74 64 57 69 | 6e 64 6f 77 52 65 63 2a |= (StdWi|ndowRec*|
|00005ea0| 29 20 43 75 72 72 65 6e | 74 73 77 72 70 3b 0d 09 |) Curren|tswrp;..|
|00005eb0| 0d 09 69 66 20 28 28 78 | 20 3c 20 73 77 72 70 2d |..if ((x| < swrp-|
|00005ec0| 3e 6f 70 74 2e 6d 61 78 | 63 6f 6c 29 20 26 26 20 |>opt.max|col) && |
|00005ed0| 28 79 20 3c 20 73 77 72 | 70 2d 3e 6f 70 74 2e 6d |(y < swr|p->opt.m|
|00005ee0| 61 78 72 6f 77 29 29 0d | 09 7b 0d 09 09 64 72 61 |axrow)).|.{...dra|
|00005ef0| 77 63 75 72 73 6f 72 28 | 73 77 72 70 2c 20 4f 46 |wcursor(|swrp, OF|
|00005f00| 46 29 3b 0d 09 09 73 77 | 72 70 2d 3e 63 6f 6c 20 |F);...sw|rp->col |
|00005f10| 3d 20 78 3b 0d 09 09 73 | 77 72 70 2d 3e 72 6f 77 |= x;...s|wrp->row|
|00005f20| 20 3d 20 79 3b 0d 09 09 | 6d 6f 76 65 63 75 72 73 | = y;...|movecurs|
|00005f30| 6f 72 28 73 77 72 70 2c | 20 78 2c 79 29 3b 0d 09 |or(swrp,| x,y);..|
|00005f40| 09 64 72 61 77 63 75 72 | 73 6f 72 28 73 77 72 70 |.drawcur|sor(swrp|
|00005f50| 2c 20 4f 4e 29 3b 0d 09 | 7d 0d 7d 0d 0d 23 6c 69 |, ON);..|}.}..#li|
|00005f60| 6e 65 20 30 20 67 65 74 | 78 70 6f 73 0d 69 6e 74 |ne 0 get|xpos.int|
|00005f70| 20 67 65 74 78 70 6f 73 | 28 29 0d 7b 0d 09 49 6e | getxpos|().{..In|
|00005f80| 69 74 5f 73 74 64 69 6f | 28 29 3b 0d 09 0d 09 72 |it_stdio|();....r|
|00005f90| 65 74 75 72 6e 20 28 28 | 28 53 74 64 57 69 6e 64 |eturn ((|(StdWind|
|00005fa0| 6f 77 52 65 63 2a 29 20 | 43 75 72 72 65 6e 74 73 |owRec*) |Currents|
|00005fb0| 77 72 70 29 2d 3e 63 6f | 6c 29 3b 0d 7d 0d 0d 23 |wrp)->co|l);.}..#|
|00005fc0| 6c 69 6e 65 20 30 20 67 | 65 74 79 70 6f 73 0d 69 |line 0 g|etypos.i|
|00005fd0| 6e 74 20 67 65 74 79 70 | 6f 73 28 29 0d 7b 0d 09 |nt getyp|os().{..|
|00005fe0| 49 6e 69 74 5f 73 74 64 | 69 6f 28 29 3b 0d 09 0d |Init_std|io();...|
|00005ff0| 09 72 65 74 75 72 6e 20 | 28 28 28 53 74 64 57 69 |.return |(((StdWi|
|00006000| 6e 64 6f 77 52 65 63 2a | 29 20 43 75 72 72 65 6e |ndowRec*|) Curren|
|00006010| 74 73 77 72 70 29 2d 3e | 72 6f 77 29 3b 0d 7d 0d |tswrp)->|row);.}.|
|00006020| 0d 23 6c 69 6e 65 20 30 | 20 47 65 74 5f 53 63 72 |.#line 0| Get_Scr|
|00006030| 65 65 6e 50 74 72 0d 63 | 68 61 72 20 2a 47 65 74 |eenPtr.c|har *Get|
|00006040| 5f 53 63 72 65 65 6e 50 | 74 72 28 77 68 6f 29 0d |_ScreenP|tr(who).|
|00006050| 72 65 67 69 73 74 65 72 | 20 46 49 4c 45 20 2a 77 |register| FILE *w|
|00006060| 68 6f 3b 0d 7b 0d 09 49 | 6e 69 74 5f 73 74 64 69 |ho;.{..I|nit_stdi|
|00006070| 6f 28 29 3b 0d 09 0d 09 | 69 66 20 28 77 68 6f 2d |o();....|if (who-|
|00006080| 3e 49 6e 55 73 65 20 26 | 26 20 77 68 6f 2d 3e 77 |>InUse &|& who->w|
|00006090| 69 6e 64 6f 77 29 0d 09 | 09 72 65 74 75 72 6e 20 |indow)..|.return |
|000060a0| 28 28 28 53 74 64 57 69 | 6e 64 6f 77 52 65 63 2a |(((StdWi|ndowRec*|
|000060b0| 29 20 77 68 6f 2d 3e 66 | 69 6c 65 62 75 66 29 2d |) who->f|ilebuf)-|
|000060c0| 3e 73 63 72 65 65 6e 29 | 3b 0d 09 09 0d 09 72 65 |>screen)|;.....re|
|000060d0| 74 75 72 6e 20 28 4e 55 | 4c 4c 29 3b 0d 7d 0d 0d |turn (NU|LL);.}..|
|000060e0| 23 6c 69 6e 65 20 30 20 | 47 65 74 5f 57 69 6e 64 |#line 0 |Get_Wind|
|000060f0| 6f 77 50 74 72 0d 76 6f | 69 64 20 2a 47 65 74 5f |owPtr.vo|id *Get_|
|00006100| 57 69 6e 64 6f 77 50 74 | 72 28 77 68 6f 29 09 2f |WindowPt|r(who)./|
|00006110| 2a 20 61 63 74 75 61 6c | 6c 79 20 72 65 74 75 72 |* actual|ly retur|
|00006120| 6e 73 20 61 20 57 69 6e | 64 6f 77 50 74 72 21 20 |ns a Win|dowPtr! |
|00006130| 2a 2f 0d 72 65 67 69 73 | 74 65 72 20 46 49 4c 45 |*/.regis|ter FILE|
|00006140| 20 2a 77 68 6f 3b 0d 7b | 0d 09 49 6e 69 74 5f 73 | *who;.{|..Init_s|
|00006150| 74 64 69 6f 28 29 3b 0d | 09 0d 09 69 66 20 28 77 |tdio();.|...if (w|
|00006160| 68 6f 2d 3e 49 6e 55 73 | 65 20 26 26 20 77 68 6f |ho->InUs|e && who|
|00006170| 2d 3e 77 69 6e 64 6f 77 | 29 0d 09 09 72 65 74 75 |->window|)...retu|
|00006180| 72 6e 20 28 28 76 6f 69 | 64 2a 29 20 77 68 6f 2d |rn ((voi|d*) who-|
|00006190| 3e 66 69 6c 65 62 75 66 | 29 3b 0d 09 09 0d 09 72 |>filebuf|);.....r|
|000061a0| 65 74 75 72 6e 20 28 4e | 55 4c 4c 29 3b 0d 7d 0d |eturn (N|ULL);.}.|
|000061b0| 0d 23 6c 69 6e 65 20 30 | 20 70 75 74 63 68 0d 76 |.#line 0| putch.v|
|000061c0| 6f 69 64 20 70 75 74 63 | 68 28 63 29 0d 72 65 67 |oid putc|h(c).reg|
|000061d0| 69 73 74 65 72 20 63 68 | 61 72 20 63 3b 0d 7b 0d |ister ch|ar c;.{.|
|000061e0| 72 65 67 69 73 74 65 72 | 20 53 74 64 57 69 6e 64 |register| StdWind|
|000061f0| 6f 77 52 65 63 20 2a 73 | 77 72 70 3b 0d 72 65 67 |owRec *s|wrp;.reg|
|00006200| 69 73 74 65 72 20 63 68 | 61 72 20 2a 73 63 72 65 |ister ch|ar *scre|
|00006210| 65 6e 70 3b 0d 73 74 61 | 74 69 63 20 69 6e 69 74 |enp;.sta|tic init|
|00006220| 65 64 3d 66 61 6c 73 65 | 3b 0d 0d 09 69 66 20 28 |ed=false|;...if (|
|00006230| 21 69 6e 69 74 65 64 29 | 0d 09 7b 0d 09 09 69 6e |!inited)|..{...in|
|00006240| 69 74 65 64 20 3d 20 74 | 72 75 65 3b 0d 09 09 49 |ited = t|rue;...I|
|00006250| 6e 69 74 5f 73 74 64 69 | 6f 28 29 3b 0d 09 7d 0d |nit_stdi|o();..}.|
|00006260| 09 0d 09 69 66 20 28 21 | 20 43 75 72 72 65 6e 74 |...if (!| Current|
|00006270| 73 77 72 70 20 7c 7c 20 | 21 20 43 75 72 72 65 6e |swrp || |! Curren|
|00006280| 74 57 69 6e 64 6f 77 2d | 3e 49 6e 55 73 65 29 20 |tWindow-|>InUse) |
|00006290| 72 65 74 75 72 6e 3b 0d | 09 0d 09 69 66 20 28 5f |return;.|...if (_|
|000062a0| 65 63 68 6f 5f 74 6f 5f | 70 72 69 6e 74 65 72 5f |echo_to_|printer_|
|000062b0| 20 26 26 20 28 43 75 72 | 72 65 6e 74 73 77 72 70 | && (Cur|rentswrp|
|000062c0| 20 3d 3d 20 5f 63 6f 6e | 73 6f 6c 65 5f 77 70 29 | == _con|sole_wp)|
|000062d0| 29 0d 09 09 28 2a 5f 65 | 63 68 6f 5f 74 6f 5f 70 |)...(*_e|cho_to_p|
|000062e0| 72 69 6e 74 65 72 5f 29 | 28 63 29 3b 0d 09 0d 09 |rinter_)|(c);....|
|000062f0| 53 65 74 50 6f 72 74 28 | 73 77 72 70 20 3d 20 28 |SetPort(|swrp = (|
|00006300| 53 74 64 57 69 6e 64 6f | 77 52 65 63 2a 29 20 43 |StdWindo|wRec*) C|
|00006310| 75 72 72 65 6e 74 73 77 | 72 70 29 3b 0d 0d 09 69 |urrentsw|rp);...i|
|00006320| 66 20 28 73 77 72 70 20 | 21 3d 20 28 53 74 64 57 |f (swrp |!= (StdW|
|00006330| 69 6e 64 6f 77 52 65 63 | 20 2a 29 46 72 6f 6e 74 |indowRec| *)Front|
|00006340| 57 69 6e 64 6f 77 28 29 | 29 0d 09 09 69 66 20 28 |Window()|)...if (|
|00006350| 21 20 73 77 72 70 2d 3e | 6f 70 74 2e 6e 6f 5f 70 |! swrp->|opt.no_p|
|00006360| 75 6c 6c 5f 66 72 6f 6e | 74 29 0d 09 09 7b 0d 09 |ull_fron|t)...{..|
|00006370| 09 09 53 65 6c 65 63 74 | 57 69 6e 64 6f 77 28 73 |..Select|Window(s|
|00006380| 77 72 70 29 3b 0d 09 09 | 09 53 74 64 5f 75 70 64 |wrp);...|.Std_upd|
|00006390| 61 74 65 77 69 6e 64 6f | 77 28 73 77 72 70 29 3b |atewindo|w(swrp);|
|000063a0| 0d 09 09 7d 0d 0d 09 2f | 2a 20 77 61 69 74 20 68 |...}.../|* wait h|
|000063b0| 65 72 65 20 69 66 20 6d | 6f 75 73 65 20 69 73 20 |ere if m|ouse is |
|000063c0| 64 6f 77 6e 20 2a 2f 0d | 09 0d 09 77 68 69 6c 65 |down */.|...while|
|000063d0| 20 28 42 75 74 74 6f 6e | 28 29 29 3b 0d 0d 09 69 | (Button|());...i|
|000063e0| 66 20 28 63 3c 27 20 27 | 29 0d 09 7b 0d 09 09 73 |f (c<' '|)..{...s|
|000063f0| 77 69 74 63 68 28 63 29 | 0d 09 09 7b 0d 09 0d 09 |witch(c)|...{....|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
