/ Garbo
/ Garbo.cdr / mac / appl / fixdsktp.sit / Source / fix.c.bin ![]() | < prev | next > |
MacBinary | 1989-09-13 | 5.0 KB | [TEXT/KAHL] |
Confidence | Program | Detection | Match Type | Support |
---|---|---|---|---|
66% | dexvert | AMOS Picture Packer (image/amosPicturePacker) | ext | Supported |
10% | dexvert | Jesper Olsen Module (music/jesperOlsen) | magic | 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, Mon Jul 20 13:49:00 1987, modified Wed Sep 7 17:50:42 1988, creator Think C, type ASCII, 4974 bytes "fix.c" | default (weak) | |
99% | file | data | default | |
49% | TrID | Macintosh plain text (MacBinary) | default | |
33% | TrID | TTComp archive compressed (bin-2K) | default (weak) | |
17% | TrID | MacBinary 1 | default (weak) | |
0% | TrID | Sybase iAnywhere database files | default (weak) | |
100% | lsar | MacBinary | default | |
100% | gt2 | MAC Bilddatei | default (weak) |
id metadata | |
---|---|
key | value |
macFileType | [TEXT] |
macFileCreator | [KAHL] |
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 05 66 69 78 2e 63 00 | 00 00 00 00 00 00 00 00 |..fix.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 13 6e 00 | 00 00 00 9d 28 08 8c 9f |......n.|....(...|
|00000060| 4b 5f b2 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |K_......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 23 64 65 66 69 6e 65 20 | 44 45 42 55 47 5f 4d 4f |#define |DEBUG_MO|
|00000090| 44 45 0d 0d 2f 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |DE../***|********|
|000000a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000d0| 2a 2f 0d 2f 2a 20 50 72 | 6f 67 72 61 6d 20 46 69 |*/./* Pr|ogram Fi|
|000000e0| 78 20 44 65 73 6b 74 6f | 70 3a 20 63 6c 65 61 6e |x Deskto|p: clean|
|000000f0| 20 75 70 20 74 68 65 20 | 64 65 73 6b 74 6f 70 20 | up the |desktop |
|00000100| 66 69 6c 65 2e 20 20 20 | 20 20 20 20 20 20 20 2a |file. | *|
|00000110| 2f 0d 2f 2a 20 20 20 52 | 65 6d 6f 76 65 73 20 65 |/./* R|emoves e|
|00000120| 78 74 72 61 6e 65 6f 75 | 73 20 69 6e 66 6f 72 6d |xtraneou|s inform|
|00000130| 61 74 69 6f 6e 20 66 72 | 6f 6d 20 74 68 65 20 64 |ation fr|om the d|
|00000140| 65 73 6b 74 6f 70 2e 20 | 20 20 20 20 20 20 2a 2f |esktop. | */|
|00000150| 0d 2f 2a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |./* | |
|00000160| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000170| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000180| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 2a 2f 0d | | */.|
|00000190| 2f 2a 20 20 20 56 65 72 | 73 69 6f 6e 20 31 2e 30 |/* Ver|sion 1.0|
|000001a0| 20 5b 20 37 2f 20 39 2f | 38 37 5d 3a 20 4f 72 69 | [ 7/ 9/|87]: Ori|
|000001b0| 67 69 6e 61 6c 20 69 6d | 70 6c 65 6d 65 6e 74 61 |ginal im|plementa|
|000001c0| 74 69 6f 6e 2e 20 20 20 | 20 20 20 20 2a 2f 0d 2f |tion. | */./|
|000001d0| 2a 20 20 20 20 20 20 20 | 20 20 20 20 31 2e 31 20 |* | 1.1 |
|000001e0| 5b 20 37 2f 31 36 2f 38 | 37 5d 3a 20 53 75 70 70 |[ 7/16/8|7]: Supp|
|000001f0| 6f 72 74 20 66 6f 72 20 | 4d 46 53 20 76 6f 6c 75 |ort for |MFS volu|
|00000200| 6d 65 73 20 61 64 64 65 | 64 2e 20 2a 2f 0d 2f 2a |mes adde|d. */./*|
|00000210| 09 09 09 20 32 2e 30 20 | 5b 20 38 2f 32 32 2f 38 |... 2.0 |[ 8/22/8|
|00000220| 38 5d 3a 20 43 6f 6e 76 | 65 72 74 65 64 20 74 6f |8]: Conv|erted to|
|00000230| 20 4c 69 67 68 74 73 70 | 65 65 64 20 43 2e 09 09 | Lightsp|eed C...|
|00000240| 2a 2f 0d 2f 2a 20 20 20 | 20 20 20 20 20 20 20 20 |*/./* | |
|00000250| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000260| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000270| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 2a | | *|
|00000280| 2f 0d 2f 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |/./*****|********|
|00000290| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000002a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000002b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2f |********|*******/|
|000002c0| 0d 0d 23 69 6e 63 6c 75 | 64 65 20 3c 4d 61 63 54 |..#inclu|de <MacT|
|000002d0| 79 70 65 73 2e 68 3e 0d | 23 69 6e 63 6c 75 64 65 |ypes.h>.|#include|
|000002e0| 20 3c 51 75 69 63 6b 44 | 72 61 77 2e 68 3e 0d 23 | <QuickD|raw.h>.#|
|000002f0| 69 6e 63 6c 75 64 65 20 | 3c 4d 65 6e 75 4d 67 72 |include |<MenuMgr|
|00000300| 2e 68 3e 0d 23 69 6e 63 | 6c 75 64 65 20 3c 57 69 |.h>.#inc|lude <Wi|
|00000310| 6e 64 6f 77 4d 67 72 2e | 68 3e 0d 23 69 6e 63 6c |ndowMgr.|h>.#incl|
|00000320| 75 64 65 20 3c 44 69 61 | 6c 6f 67 4d 67 72 2e 68 |ude <Dia|logMgr.h|
|00000330| 3e 0d 23 69 6e 63 6c 75 | 64 65 20 3c 45 76 65 6e |>.#inclu|de <Even|
|00000340| 74 4d 67 72 2e 68 3e 0d | 23 69 6e 63 6c 75 64 65 |tMgr.h>.|#include|
|00000350| 20 3c 46 69 6c 65 4d 67 | 72 2e 68 3e 0d 23 69 6e | <FileMg|r.h>.#in|
|00000360| 63 6c 75 64 65 20 3c 48 | 46 53 2e 68 3e 0d 0d 23 |clude <H|FS.h>..#|
|00000370| 64 65 66 69 6e 65 20 46 | 49 58 5f 4d 41 49 4e 0d |define F|IX_MAIN.|
|00000380| 23 69 6e 63 6c 75 64 65 | 20 22 66 69 78 2e 68 22 |#include| "fix.h"|
|00000390| 0d 0d 73 74 61 74 69 63 | 20 4d 65 6e 75 48 61 6e |..static| MenuHan|
|000003a0| 64 6c 65 20 6d 65 6e 75 | 6c 69 73 74 5b 34 5d 3b |dle menu|list[4];|
|000003b0| 0d 0d 76 6f 69 64 20 6d | 61 69 6e 28 76 6f 69 64 |..void m|ain(void|
|000003c0| 29 3b 0d 76 6f 69 64 20 | 63 68 65 63 6b 5f 68 66 |);.void |check_hf|
|000003d0| 73 28 76 6f 69 64 29 3b | 0d 76 6f 69 64 20 69 6e |s(void);|.void in|
|000003e0| 69 74 69 61 6c 69 7a 65 | 5f 74 6f 6f 6c 62 6f 78 |itialize|_toolbox|
|000003f0| 28 76 6f 69 64 29 3b 0d | 76 6f 69 64 20 69 6e 69 |(void);.|void ini|
|00000400| 74 69 61 6c 69 7a 65 5f | 6d 65 6e 75 73 28 76 6f |tialize_|menus(vo|
|00000410| 69 64 29 3b 0d 76 6f 69 | 64 20 68 61 6e 64 6c 65 |id);.voi|d handle|
|00000420| 5f 65 76 65 6e 74 73 28 | 76 6f 69 64 29 3b 0d 69 |_events(|void);.i|
|00000430| 6e 74 20 6d 65 6e 75 5f | 63 6f 6d 6d 61 6e 64 28 |nt menu_|command(|
|00000440| 6c 6f 6e 67 20 6d 65 6e | 75 5f 63 68 6f 69 63 65 |long men|u_choice|
|00000450| 2c 20 69 6e 74 20 77 61 | 73 5f 6b 65 79 29 3b 0d |, int wa|s_key);.|
|00000460| 76 6f 69 64 20 61 70 70 | 6c 65 5f 63 6f 6d 6d 61 |void app|le_comma|
|00000470| 6e 64 28 69 6e 74 20 77 | 68 61 74 29 3b 0d 69 6e |nd(int w|hat);.in|
|00000480| 74 20 66 69 6c 65 5f 63 | 6f 6d 6d 61 6e 64 28 69 |t file_c|ommand(i|
|00000490| 6e 74 20 77 68 61 74 29 | 3b 0d 0d 09 2f 2a 20 4d |nt what)|;.../* M|
|000004a0| 61 69 6e 20 70 72 6f 67 | 72 61 6d 2e 20 2a 2f 0d |ain prog|ram. */.|
|000004b0| 0d 76 6f 69 64 20 6d 61 | 69 6e 28 29 0d 7b 0d 09 |.void ma|in().{..|
|000004c0| 63 68 65 63 6b 5f 68 66 | 73 28 29 3b 0d 0d 09 4d |check_hf|s();...M|
|000004d0| 61 78 41 70 70 6c 5a 6f | 6e 65 28 29 3b 0d 09 69 |axApplZo|ne();..i|
|000004e0| 6e 69 74 69 61 6c 69 7a | 65 5f 74 6f 6f 6c 62 6f |nitializ|e_toolbo|
|000004f0| 78 28 29 3b 0d 09 69 6e | 69 74 69 61 6c 69 7a 65 |x();..in|itialize|
|00000500| 5f 6d 65 6e 75 73 28 29 | 3b 0d 0d 09 68 61 6e 64 |_menus()|;...hand|
|00000510| 6c 65 5f 65 76 65 6e 74 | 73 28 29 3b 0d 0d 09 49 |le_event|s();...I|
|00000520| 6e 69 74 57 69 6e 64 6f | 77 73 28 29 3b 0d 09 73 |nitWindo|ws();..s|
|00000530| 65 74 5f 77 61 74 63 68 | 5f 63 75 72 73 6f 72 28 |et_watch|_cursor(|
|00000540| 29 3b 0d 7d 0d 0d 09 2f | 2a 20 43 68 65 63 6b 20 |);.}.../|* Check |
|00000550| 74 68 61 74 20 74 68 65 | 20 48 69 65 72 61 72 63 |that the| Hierarc|
|00000560| 68 69 63 61 6c 20 46 69 | 6c 65 20 53 79 73 74 65 |hical Fi|le Syste|
|00000570| 6d 20 69 73 20 61 76 61 | 69 6c 61 62 6c 65 2e 20 |m is ava|ilable. |
|00000580| 2a 2f 0d 0d 73 74 61 74 | 69 63 20 76 6f 69 64 20 |*/..stat|ic void |
|00000590| 63 68 65 63 6b 5f 68 66 | 73 28 29 0d 7b 0d 09 69 |check_hf|s().{..i|
|000005a0| 66 20 28 46 53 46 43 42 | 4c 65 6e 20 3c 20 30 29 |f (FSFCB|Len < 0)|
|000005b0| 20 7b 09 09 09 09 2f 2a | 20 4e 6f 74 20 48 46 53 | {..../*| Not HFS|
|000005c0| 20 2a 2f 0d 09 09 53 74 | 6f 70 41 6c 65 72 74 28 | */...St|opAlert(|
|000005d0| 41 4c 45 52 54 5f 52 4f | 4d 2c 4e 49 4c 29 3b 0d |ALERT_RO|M,NIL);.|
|000005e0| 09 09 45 78 69 74 54 6f | 53 68 65 6c 6c 28 29 3b |..ExitTo|Shell();|
|000005f0| 0d 09 7d 0d 7d 0d 0d 09 | 2f 2a 20 49 6e 69 74 69 |..}.}...|/* Initi|
|00000600| 61 6c 69 7a 65 20 61 6c | 6c 20 54 6f 6f 6c 42 6f |alize al|l ToolBo|
|00000610| 78 20 72 6f 75 74 69 6e | 65 73 20 75 73 65 64 20 |x routin|es used |
|00000620| 62 79 20 74 68 65 20 70 | 72 6f 67 72 61 6d 2e 20 |by the p|rogram. |
|00000630| 2a 2f 0d 0d 23 69 66 64 | 65 66 20 44 45 42 55 47 |*/..#ifd|ef DEBUG|
|00000640| 5f 4d 4f 44 45 0d 76 6f | 69 64 20 67 6f 6f 64 62 |_MODE.vo|id goodb|
|00000650| 79 65 28 76 6f 69 64 29 | 3b 0d 0d 73 74 61 74 69 |ye(void)|;..stati|
|00000660| 63 20 76 6f 69 64 20 67 | 6f 6f 64 62 79 65 28 29 |c void g|oodbye()|
|00000670| 0d 7b 0d 09 45 78 69 74 | 54 6f 53 68 65 6c 6c 28 |.{..Exit|ToShell(|
|00000680| 29 3b 0d 7d 0d 23 65 6e | 64 69 66 0d 0d 73 74 61 |);.}.#en|dif..sta|
|00000690| 74 69 63 20 76 6f 69 64 | 20 69 6e 69 74 69 61 6c |tic void| initial|
|000006a0| 69 7a 65 5f 74 6f 6f 6c | 62 6f 78 28 29 0d 7b 0d |ize_tool|box().{.|
|000006b0| 09 49 6e 69 74 47 72 61 | 66 28 26 74 68 65 50 6f |.InitGra|f(&thePo|
|000006c0| 72 74 29 3b 0d 09 49 6e | 69 74 46 6f 6e 74 73 28 |rt);..In|itFonts(|
|000006d0| 29 3b 0d 09 49 6e 69 74 | 57 69 6e 64 6f 77 73 28 |);..Init|Windows(|
|000006e0| 29 3b 0d 09 49 6e 69 74 | 4d 65 6e 75 73 28 29 3b |);..Init|Menus();|
|000006f0| 0d 09 54 45 49 6e 69 74 | 28 29 3b 0d 0d 23 69 66 |..TEInit|();..#if|
|00000700| 64 65 66 20 44 45 42 55 | 47 5f 4d 4f 44 45 0d 09 |def DEBU|G_MODE..|
|00000710| 49 6e 69 74 44 69 61 6c | 6f 67 73 28 67 6f 6f 64 |InitDial|ogs(good|
|00000720| 62 79 65 29 3b 0d 23 65 | 6c 73 65 0d 09 49 6e 69 |bye);.#e|lse..Ini|
|00000730| 74 44 69 61 6c 6f 67 73 | 28 4e 49 4c 29 3b 0d 23 |tDialogs|(NIL);.#|
|00000740| 65 6e 64 69 66 0d 0d 09 | 46 6c 75 73 68 45 76 65 |endif...|FlushEve|
|00000750| 6e 74 73 28 65 76 65 72 | 79 45 76 65 6e 74 2c 20 |nts(ever|yEvent, |
|00000760| 30 29 3b 0d 09 49 6e 69 | 74 43 75 72 73 6f 72 28 |0);..Ini|tCursor(|
|00000770| 29 3b 0d 7d 0d 0d 09 2f | 2a 20 4c 6f 61 64 20 6f |);.}.../|* Load o|
|00000780| 75 72 20 6d 65 6e 75 73 | 20 61 6e 64 20 64 72 61 |ur menus| and dra|
|00000790| 77 20 74 68 65 20 6d 65 | 6e 75 20 62 61 72 2e 20 |w the me|nu bar. |
|000007a0| 2a 2f 0d 0d 73 74 61 74 | 69 63 20 76 6f 69 64 20 |*/..stat|ic void |
|000007b0| 69 6e 69 74 69 61 6c 69 | 7a 65 5f 6d 65 6e 75 73 |initiali|ze_menus|
|000007c0| 28 29 0d 7b 0d 09 72 65 | 67 69 73 74 65 72 20 48 |().{..re|gister H|
|000007d0| 61 6e 64 6c 65 20 6d 79 | 5f 6d 65 6e 75 73 3b 09 |andle my|_menus;.|
|000007e0| 2f 2a 20 4d 65 6e 75 20 | 62 61 72 2e 2e 2e 20 2a |/* Menu |bar... *|
|000007f0| 2f 0d 0d 09 6d 79 5f 6d | 65 6e 75 73 20 3d 20 47 |/...my_m|enus = G|
|00000800| 65 74 4e 65 77 4d 42 61 | 72 28 4d 42 41 52 5f 52 |etNewMBa|r(MBAR_R|
|00000810| 45 53 4f 55 52 43 45 29 | 3b 0d 09 53 65 74 4d 65 |ESOURCE)|;..SetMe|
|00000820| 6e 75 42 61 72 28 6d 79 | 5f 6d 65 6e 75 73 29 3b |nuBar(my|_menus);|
|00000830| 0d 09 44 69 73 70 6f 73 | 48 61 6e 64 6c 65 28 6d |..Dispos|Handle(m|
|00000840| 79 5f 6d 65 6e 75 73 29 | 3b 0d 0d 09 6d 65 6e 75 |y_menus)|;...menu|
|00000850| 6c 69 73 74 5b 41 50 50 | 4c 45 5f 4d 45 4e 55 5d |list[APP|LE_MENU]|
|00000860| 20 20 20 20 3d 20 47 65 | 74 4d 48 61 6e 64 6c 65 | = Ge|tMHandle|
|00000870| 28 41 50 50 4c 45 5f 4d | 45 4e 55 29 3b 0d 09 6d |(APPLE_M|ENU);..m|
|00000880| 65 6e 75 6c 69 73 74 5b | 46 49 4c 45 5f 4d 45 4e |enulist[|FILE_MEN|
|00000890| 55 5d 20 20 20 20 20 3d | 20 47 65 74 4d 48 61 6e |U] =| GetMHan|
|000008a0| 64 6c 65 28 46 49 4c 45 | 5f 4d 45 4e 55 29 3b 0d |dle(FILE|_MENU);.|
|000008b0| 09 6d 65 6e 75 6c 69 73 | 74 5b 45 44 49 54 5f 4d |.menulis|t[EDIT_M|
|000008c0| 45 4e 55 5d 20 20 20 20 | 20 3d 20 47 65 74 4d 48 |ENU] | = GetMH|
|000008d0| 61 6e 64 6c 65 28 45 44 | 49 54 5f 4d 45 4e 55 29 |andle(ED|IT_MENU)|
|000008e0| 3b 0d 0d 09 41 64 64 52 | 65 73 4d 65 6e 75 28 6d |;...AddR|esMenu(m|
|000008f0| 65 6e 75 6c 69 73 74 5b | 41 50 50 4c 45 5f 4d 45 |enulist[|APPLE_ME|
|00000900| 4e 55 5d 2c 20 27 44 52 | 56 52 27 29 3b 0d 0d 09 |NU], 'DR|VR');...|
|00000910| 44 69 73 61 62 6c 65 49 | 74 65 6d 28 6d 65 6e 75 |DisableI|tem(menu|
|00000920| 6c 69 73 74 5b 46 49 4c | 45 5f 4d 45 4e 55 5d 2c |list[FIL|E_MENU],|
|00000930| 20 46 49 4c 45 5f 43 4c | 4f 53 45 29 3b 09 2f 2a | FILE_CL|OSE);./*|
|00000940| 20 44 69 73 61 62 6c 65 | 20 20 2a 2f 0d 09 44 69 | Disable| */..Di|
|00000950| 73 61 62 6c 65 49 74 65 | 6d 28 6d 65 6e 75 6c 69 |sableIte|m(menuli|
|00000960| 73 74 5b 45 44 49 54 5f | 4d 45 4e 55 5d 2c 20 30 |st[EDIT_|MENU], 0|
|00000970| 29 3b 09 2f 2a 20 73 6f | 6d 65 20 63 6f 6d 6d 61 |);./* so|me comma|
|00000980| 6e 64 73 2e 2e 2e 20 2a | 2f 0d 0d 09 44 72 61 77 |nds... *|/...Draw|
|00000990| 4d 65 6e 75 42 61 72 28 | 29 3b 0d 7d 0d 0d 09 2f |MenuBar(|);.}.../|
|000009a0| 2a 20 4d 61 69 6e 20 65 | 76 65 6e 74 20 6c 6f 6f |* Main e|vent loo|
|000009b0| 70 2e 20 2a 2f 0d 0d 73 | 74 61 74 69 63 20 76 6f |p. */..s|tatic vo|
|000009c0| 69 64 20 68 61 6e 64 6c | 65 5f 65 76 65 6e 74 73 |id handl|e_events|
|000009d0| 28 29 0d 7b 0d 09 45 76 | 65 6e 74 52 65 63 6f 72 |().{..Ev|entRecor|
|000009e0| 64 20 6d 79 65 76 65 6e | 74 3b 0d 09 72 65 67 69 |d myeven|t;..regi|
|000009f0| 73 74 65 72 20 69 6e 74 | 20 71 75 69 74 5f 66 6c |ster int| quit_fl|
|00000a00| 61 67 2c 20 64 65 73 6b | 5f 73 74 61 74 75 73 2c |ag, desk|_status,|
|00000a10| 20 6e 65 77 5f 64 65 73 | 6b 5f 73 74 61 74 75 73 | new_des|k_status|
|00000a20| 3b 0d 0d 09 71 75 69 74 | 5f 66 6c 61 67 20 3d 20 |;...quit|_flag = |
|00000a30| 30 3b 0d 09 64 65 73 6b | 5f 73 74 61 74 75 73 20 |0;..desk|_status |
|00000a40| 3d 20 30 3b 20 2f 2a 20 | 4e 6f 20 64 65 73 6b 20 |= 0; /* |No desk |
|00000a50| 61 63 63 65 73 73 6f 72 | 79 20 69 73 20 69 6e 69 |accessor|y is ini|
|00000a60| 74 69 61 6c 6c 79 20 6f | 70 65 6e 2e 20 2a 2f 0d |tially o|pen. */.|
|00000a70| 09 77 68 69 6c 65 20 28 | 21 71 75 69 74 5f 66 6c |.while (|!quit_fl|
|00000a80| 61 67 29 20 7b 0d 09 09 | 6e 65 77 5f 64 65 73 6b |ag) {...|new_desk|
|00000a90| 5f 73 74 61 74 75 73 20 | 3d 20 28 46 72 6f 6e 74 |_status |= (Front|
|00000aa0| 57 69 6e 64 6f 77 28 29 | 20 21 3d 20 4e 49 4c 29 |Window()| != NIL)|
|00000ab0| 3b 0d 09 09 69 66 20 28 | 6e 65 77 5f 64 65 73 6b |;...if (|new_desk|
|00000ac0| 5f 73 74 61 74 75 73 20 | 21 3d 20 64 65 73 6b 5f |_status |!= desk_|
|00000ad0| 73 74 61 74 75 73 29 20 | 7b 09 2f 2a 20 55 70 64 |status) |{./* Upd|
|00000ae0| 61 74 65 20 6d 65 6e 75 | 73 2e 20 2a 2f 0d 09 09 |ate menu|s. */...|
|00000af0| 09 64 65 73 6b 5f 73 74 | 61 74 75 73 20 3d 20 6e |.desk_st|atus = n|
|00000b00| 65 77 5f 64 65 73 6b 5f | 73 74 61 74 75 73 3b 0d |ew_desk_|status;.|
|00000b10| 09 09 09 69 66 20 28 64 | 65 73 6b 5f 73 74 61 74 |...if (d|esk_stat|
|00000b20| 75 73 29 20 7b 0d 09 09 | 09 09 45 6e 61 62 6c 65 |us) {...|..Enable|
|00000b30| 49 74 65 6d 28 6d 65 6e | 75 6c 69 73 74 5b 46 49 |Item(men|ulist[FI|
|00000b40| 4c 45 5f 4d 45 4e 55 5d | 2c 20 46 49 4c 45 5f 43 |LE_MENU]|, FILE_C|
|00000b50| 4c 4f 53 45 29 3b 0d 09 | 09 09 09 45 6e 61 62 6c |LOSE);..|...Enabl|
|00000b60| 65 49 74 65 6d 28 6d 65 | 6e 75 6c 69 73 74 5b 45 |eItem(me|nulist[E|
|00000b70| 44 49 54 5f 4d 45 4e 55 | 5d 2c 20 30 29 3b 0d 09 |DIT_MENU|], 0);..|
|00000b80| 09 09 09 44 72 61 77 4d | 65 6e 75 42 61 72 28 29 |...DrawM|enuBar()|
|00000b90| 3b 0d 09 09 09 7d 0d 09 | 09 09 65 6c 73 65 20 7b |;....}..|..else {|
|00000ba0| 0d 09 09 09 09 44 69 73 | 61 62 6c 65 49 74 65 6d |.....Dis|ableItem|
|00000bb0| 28 6d 65 6e 75 6c 69 73 | 74 5b 46 49 4c 45 5f 4d |(menulis|t[FILE_M|
|00000bc0| 45 4e 55 5d 2c 20 46 49 | 4c 45 5f 43 4c 4f 53 45 |ENU], FI|LE_CLOSE|
|00000bd0| 29 3b 0d 09 09 09 09 44 | 69 73 61 62 6c 65 49 74 |);.....D|isableIt|
|00000be0| 65 6d 28 6d 65 6e 75 6c | 69 73 74 5b 45 44 49 54 |em(menul|ist[EDIT|
|00000bf0| 5f 4d 45 4e 55 5d 2c 20 | 30 29 3b 0d 09 09 09 09 |_MENU], |0);.....|
|00000c00| 44 72 61 77 4d 65 6e 75 | 42 61 72 28 29 3b 0d 09 |DrawMenu|Bar();..|
|00000c10| 09 09 7d 0d 09 09 7d 0d | 09 09 53 79 73 74 65 6d |..}...}.|..System|
|00000c20| 54 61 73 6b 28 29 3b 0d | 09 09 47 65 74 4e 65 78 |Task();.|..GetNex|
|00000c30| 74 45 76 65 6e 74 28 65 | 76 65 72 79 45 76 65 6e |tEvent(e|veryEven|
|00000c40| 74 2c 20 26 6d 79 65 76 | 65 6e 74 29 3b 0d 09 09 |t, &myev|ent);...|
|00000c50| 73 77 69 74 63 68 28 6d | 79 65 76 65 6e 74 2e 77 |switch(m|yevent.w|
|00000c60| 68 61 74 29 20 7b 0d 09 | 09 09 63 61 73 65 20 6d |hat) {..|..case m|
|00000c70| 6f 75 73 65 44 6f 77 6e | 3a 0d 09 09 09 09 7b 0d |ouseDown|:.....{.|
|00000c80| 09 09 09 09 09 57 69 6e | 64 6f 77 50 74 72 20 77 |.....Win|dowPtr w|
|00000c90| 68 69 63 68 5f 77 69 6e | 64 6f 77 3b 0d 0d 09 09 |hich_win|dow;....|
|00000ca0| 09 09 09 73 77 69 74 63 | 68 28 46 69 6e 64 57 69 |...switc|h(FindWi|
|00000cb0| 6e 64 6f 77 28 6d 79 65 | 76 65 6e 74 2e 77 68 65 |ndow(mye|vent.whe|
|00000cc0| 72 65 2c 20 26 77 68 69 | 63 68 5f 77 69 6e 64 6f |re, &whi|ch_windo|
|00000cd0| 77 29 29 20 7b 0d 09 09 | 09 09 09 09 63 61 73 65 |w)) {...|....case|
|00000ce0| 20 69 6e 53 79 73 57 69 | 6e 64 6f 77 3a 0d 09 09 | inSysWi|ndow:...|
|00000cf0| 09 09 09 09 09 53 79 73 | 74 65 6d 43 6c 69 63 6b |.....Sys|temClick|
|00000d00| 28 26 6d 79 65 76 65 6e | 74 2c 20 77 68 69 63 68 |(&myeven|t, which|
|00000d10| 5f 77 69 6e 64 6f 77 29 | 3b 0d 09 09 09 09 09 09 |_window)|;.......|
|00000d20| 09 62 72 65 61 6b 3b 0d | 09 09 09 09 09 09 63 61 |.break;.|......ca|
|00000d30| 73 65 20 69 6e 4d 65 6e | 75 42 61 72 3a 0d 09 09 |se inMen|uBar:...|
|00000d40| 09 09 09 09 09 71 75 69 | 74 5f 66 6c 61 67 20 3d |.....qui|t_flag =|
|00000d50| 20 6d 65 6e 75 5f 63 6f | 6d 6d 61 6e 64 28 4d 65 | menu_co|mmand(Me|
|00000d60| 6e 75 53 65 6c 65 63 74 | 28 6d 79 65 76 65 6e 74 |nuSelect|(myevent|
|00000d70| 2e 77 68 65 72 65 29 2c | 20 30 29 3b 20 2f 2a 20 |.where),| 0); /* |
|00000d80| 6e 6f 74 20 6b 65 79 70 | 72 65 73 73 20 2a 2f 0d |not keyp|ress */.|
|00000d90| 09 09 09 09 09 09 09 62 | 72 65 61 6b 3b 0d 09 09 |.......b|reak;...|
|00000da0| 09 09 09 7d 0d 09 09 09 | 09 7d 0d 09 09 09 09 62 |...}....|.}.....b|
|00000db0| 72 65 61 6b 3b 0d 09 09 | 09 63 61 73 65 20 6b 65 |reak;...|.case ke|
|00000dc0| 79 44 6f 77 6e 3a 0d 09 | 09 09 63 61 73 65 20 61 |yDown:..|..case a|
|00000dd0| 75 74 6f 4b 65 79 3a 0d | 09 09 09 09 69 66 20 28 |utoKey:.|....if (|
|00000de0| 6d 79 65 76 65 6e 74 2e | 6d 6f 64 69 66 69 65 72 |myevent.|modifier|
|00000df0| 73 20 26 20 63 6d 64 4b | 65 79 29 0d 09 09 09 09 |s & cmdK|ey).....|
|00000e00| 09 71 75 69 74 5f 66 6c | 61 67 20 3d 20 6d 65 6e |.quit_fl|ag = men|
|00000e10| 75 5f 63 6f 6d 6d 61 6e | 64 28 4d 65 6e 75 4b 65 |u_comman|d(MenuKe|
|00000e20| 79 28 28 63 68 61 72 29 | 6d 79 65 76 65 6e 74 2e |y((char)|myevent.|
|00000e30| 6d 65 73 73 61 67 65 29 | 2c 20 31 29 3b 20 2f 2a |message)|, 1); /*|
|00000e40| 20 77 61 73 20 6b 65 79 | 70 72 65 73 73 20 2a 2f | was key|press */|
|00000e50| 0d 09 09 09 09 62 72 65 | 61 6b 3b 0d 09 09 7d 0d |.....bre|ak;...}.|
|00000e60| 09 7d 0d 7d 0d 0d 09 2f | 2a 20 44 69 73 70 61 74 |.}.}.../|* Dispat|
|00000e70| 63 68 20 61 20 6d 65 6e | 75 20 73 65 6c 65 63 74 |ch a men|u select|
|00000e80| 69 6f 6e 2e 20 20 43 61 | 6c 6c 65 64 20 66 72 6f |ion. Ca|lled fro|
|00000e90| 6d 20 74 68 65 20 65 76 | 65 6e 74 20 6c 6f 6f 70 |m the ev|ent loop|
|00000ea0| 2e 20 2a 2f 0d 0d 73 74 | 61 74 69 63 20 69 6e 74 |. */..st|atic int|
|00000eb0| 20 6d 65 6e 75 5f 63 6f | 6d 6d 61 6e 64 28 6d 65 | menu_co|mmand(me|
|00000ec0| 6e 75 5f 63 68 6f 69 63 | 65 2c 20 77 61 73 5f 6b |nu_choic|e, was_k|
|00000ed0| 65 79 29 0d 09 6c 6f 6e | 67 20 6d 65 6e 75 5f 63 |ey)..lon|g menu_c|
|00000ee0| 68 6f 69 63 65 3b 0d 09 | 69 6e 74 20 77 61 73 5f |hoice;..|int was_|
|00000ef0| 6b 65 79 3b 0d 7b 0d 09 | 72 65 67 69 73 74 65 72 |key;.{..|register|
|00000f00| 20 69 6e 74 20 77 68 69 | 63 68 5f 6d 65 6e 75 2c | int whi|ch_menu,|
|00000f10| 20 77 68 69 63 68 5f 69 | 74 65 6d 3b 0d 0d 09 77 | which_i|tem;...w|
|00000f20| 68 69 63 68 5f 6d 65 6e | 75 20 3d 20 28 69 6e 74 |hich_men|u = (int|
|00000f30| 29 28 6d 65 6e 75 5f 63 | 68 6f 69 63 65 3e 3e 31 |)(menu_c|hoice>>1|
|00000f40| 36 29 3b 0d 09 77 68 69 | 63 68 5f 69 74 65 6d 20 |6);..whi|ch_item |
|00000f50| 3d 20 28 69 6e 74 29 6d | 65 6e 75 5f 63 68 6f 69 |= (int)m|enu_choi|
|00000f60| 63 65 3b 0d 0d 09 48 69 | 6c 69 74 65 4d 65 6e 75 |ce;...Hi|liteMenu|
|00000f70| 28 77 68 69 63 68 5f 6d | 65 6e 75 29 3b 0d 09 73 |(which_m|enu);..s|
|00000f80| 77 69 74 63 68 28 77 68 | 69 63 68 5f 6d 65 6e 75 |witch(wh|ich_menu|
|00000f90| 29 20 7b 0d 09 09 63 61 | 73 65 20 41 50 50 4c 45 |) {...ca|se APPLE|
|00000fa0| 5f 4d 45 4e 55 3a 0d 09 | 09 09 61 70 70 6c 65 5f |_MENU:..|..apple_|
|00000fb0| 63 6f 6d 6d 61 6e 64 28 | 77 68 69 63 68 5f 69 74 |command(|which_it|
|00000fc0| 65 6d 29 3b 0d 09 09 09 | 62 72 65 61 6b 3b 0d 09 |em);....|break;..|
|00000fd0| 09 63 61 73 65 20 46 49 | 4c 45 5f 4d 45 4e 55 3a |.case FI|LE_MENU:|
|00000fe0| 0d 09 09 09 69 66 20 28 | 66 69 6c 65 5f 63 6f 6d |....if (|file_com|
|00000ff0| 6d 61 6e 64 28 77 68 69 | 63 68 5f 69 74 65 6d 29 |mand(whi|ch_item)|
|00001000| 29 20 7b 0d 09 09 09 09 | 48 69 6c 69 74 65 4d 65 |) {.....|HiliteMe|
|00001010| 6e 75 28 30 29 3b 0d 09 | 09 09 09 72 65 74 75 72 |nu(0);..|...retur|
|00001020| 6e 28 31 29 3b 0d 09 09 | 09 7d 0d 09 09 09 62 72 |n(1);...|.}....br|
|00001030| 65 61 6b 3b 0d 09 09 63 | 61 73 65 20 45 44 49 54 |eak;...c|ase EDIT|
|00001040| 5f 4d 45 4e 55 3a 0d 09 | 09 09 69 66 20 28 21 77 |_MENU:..|..if (!w|
|00001050| 61 73 5f 6b 65 79 29 0d | 09 09 09 09 53 79 73 74 |as_key).|....Syst|
|00001060| 65 6d 45 64 69 74 28 77 | 68 69 63 68 5f 69 74 65 |emEdit(w|hich_ite|
|00001070| 6d 2d 31 29 3b 0d 09 09 | 09 62 72 65 61 6b 3b 0d |m-1);...|.break;.|
|00001080| 09 7d 0d 09 48 69 6c 69 | 74 65 4d 65 6e 75 28 30 |.}..Hili|teMenu(0|
|00001090| 29 3b 0d 09 72 65 74 75 | 72 6e 28 30 29 3b 20 2f |);..retu|rn(0); /|
|000010a0| 2a 20 4e 6f 74 20 72 65 | 61 64 79 20 74 6f 20 71 |* Not re|ady to q|
|000010b0| 75 69 74 20 79 65 74 2e | 2e 2e 20 2a 2f 0d 7d 0d |uit yet.|.. */.}.|
|000010c0| 0d 09 2f 2a 20 48 61 6e | 64 6c 65 20 61 6e 20 41 |../* Han|dle an A|
|000010d0| 70 70 6c 65 20 6d 65 6e | 75 20 73 65 6c 65 63 74 |pple men|u select|
|000010e0| 69 6f 6e 2e 20 2a 2f 0d | 0d 73 74 61 74 69 63 20 |ion. */.|.static |
|000010f0| 76 6f 69 64 20 61 70 70 | 6c 65 5f 63 6f 6d 6d 61 |void app|le_comma|
|00001100| 6e 64 28 77 68 61 74 29 | 0d 09 69 6e 74 20 77 68 |nd(what)|..int wh|
|00001110| 61 74 3b 0d 7b 0d 09 72 | 65 67 69 73 74 65 72 20 |at;.{..r|egister |
|00001120| 44 69 61 6c 6f 67 50 74 | 72 20 61 62 6f 75 74 5f |DialogPt|r about_|
|00001130| 64 69 61 6c 6f 67 3b 0d | 09 69 6e 74 20 74 65 6d |dialog;.|.int tem|
|00001140| 70 3b 0d 0d 09 69 66 20 | 28 77 68 61 74 20 3d 3d |p;...if |(what ==|
|00001150| 20 41 50 50 4c 45 5f 41 | 42 4f 55 54 29 20 7b 0d | APPLE_A|BOUT) {.|
|00001160| 09 09 61 62 6f 75 74 5f | 64 69 61 6c 6f 67 20 3d |..about_|dialog =|
|00001170| 20 47 65 74 4e 65 77 44 | 69 61 6c 6f 67 28 44 49 | GetNewD|ialog(DI|
|00001180| 41 4c 4f 47 5f 41 42 4f | 55 54 2c 20 4e 49 4c 2c |ALOG_ABO|UT, NIL,|
|00001190| 20 4d 49 4e 55 53 5f 4f | 4e 45 29 3b 0d 09 09 4d | MINUS_O|NE);...M|
|000011a0| 6f 64 61 6c 44 69 61 6c | 6f 67 28 4e 49 4c 2c 20 |odalDial|og(NIL, |
|000011b0| 26 74 65 6d 70 29 3b 0d | 09 09 44 69 73 70 6f 73 |&temp);.|..Dispos|
|000011c0| 44 69 61 6c 6f 67 28 61 | 62 6f 75 74 5f 64 69 61 |Dialog(a|bout_dia|
|000011d0| 6c 6f 67 29 3b 0d 09 7d | 0d 09 65 6c 73 65 20 7b |log);..}|..else {|
|000011e0| 0d 09 09 47 65 74 49 74 | 65 6d 28 6d 65 6e 75 6c |...GetIt|em(menul|
|000011f0| 69 73 74 5b 41 50 50 4c | 45 5f 4d 45 4e 55 5d 2c |ist[APPL|E_MENU],|
|00001200| 20 77 68 61 74 2c 20 73 | 74 72 69 6e 67 29 3b 0d | what, s|tring);.|
|00001210| 09 09 4f 70 65 6e 44 65 | 73 6b 41 63 63 28 73 74 |..OpenDe|skAcc(st|
|00001220| 72 69 6e 67 29 3b 0d 09 | 7d 0d 7d 0d 0d 09 2f 2a |ring);..|}.}.../*|
|00001230| 20 48 61 6e 64 6c 65 20 | 61 20 66 69 6c 65 20 6d | Handle |a file m|
|00001240| 65 6e 75 20 73 65 6c 65 | 63 74 69 6f 6e 2e 20 2a |enu sele|ction. *|
|00001250| 2f 0d 0d 73 74 61 74 69 | 63 20 69 6e 74 20 66 69 |/..stati|c int fi|
|00001260| 6c 65 5f 63 6f 6d 6d 61 | 6e 64 28 77 68 61 74 29 |le_comma|nd(what)|
|00001270| 0d 09 69 6e 74 20 77 68 | 61 74 3b 0d 7b 0d 09 73 |..int wh|at;.{..s|
|00001280| 77 69 74 63 68 28 77 68 | 61 74 29 20 7b 0d 09 09 |witch(wh|at) {...|
|00001290| 63 61 73 65 20 46 49 4c | 45 5f 4f 50 54 49 4f 4e |case FIL|E_OPTION|
|000012a0| 53 3a 0d 09 09 09 64 6f | 5f 6f 70 74 69 6f 6e 73 |S:....do|_options|
|000012b0| 28 29 3b 0d 09 09 09 62 | 72 65 61 6b 3b 0d 09 09 |();....b|reak;...|
|000012c0| 63 61 73 65 20 46 49 4c | 45 5f 50 52 4f 43 45 53 |case FIL|E_PROCES|
|000012d0| 53 3a 0d 09 09 09 6f 6e | 65 5f 70 61 73 73 28 29 |S:....on|e_pass()|
|000012e0| 3b 0d 09 09 09 62 72 65 | 61 6b 3b 0d 09 09 63 61 |;....bre|ak;...ca|
|000012f0| 73 65 20 46 49 4c 45 5f | 43 4c 4f 53 45 3a 0d 09 |se FILE_|CLOSE:..|
|00001300| 09 09 7b 0d 09 09 09 09 | 72 65 67 69 73 74 65 72 |..{.....|register|
|00001310| 20 69 6e 74 20 72 65 66 | 6e 75 6d 3b 0d 0d 09 09 | int ref|num;....|
|00001320| 09 09 69 66 20 28 28 72 | 65 66 6e 75 6d 20 3d 20 |..if ((r|efnum = |
|00001330| 28 28 57 69 6e 64 6f 77 | 50 65 65 6b 29 20 46 72 |((Window|Peek) Fr|
|00001340| 6f 6e 74 57 69 6e 64 6f | 77 28 29 29 2d 3e 77 69 |ontWindo|w())->wi|
|00001350| 6e 64 6f 77 4b 69 6e 64 | 29 20 3c 20 30 29 0d 09 |ndowKind|) < 0)..|
|00001360| 09 09 09 09 43 6c 6f 73 | 65 44 65 73 6b 41 63 63 |....Clos|eDeskAcc|
|00001370| 28 72 65 66 6e 75 6d 29 | 3b 0d 09 09 09 7d 0d 09 |(refnum)|;....}..|
|00001380| 09 09 62 72 65 61 6b 3b | 0d 09 09 63 61 73 65 20 |..break;|...case |
|00001390| 46 49 4c 45 5f 51 55 49 | 54 3a 0d 09 09 09 72 65 |FILE_QUI|T:....re|
|000013a0| 74 75 72 6e 28 31 29 3b | 09 2f 2a 20 57 65 27 72 |turn(1);|./* We'r|
|000013b0| 65 20 71 75 69 74 74 69 | 6e 67 21 20 2a 2f 0d 09 |e quitti|ng! */..|
|000013c0| 09 09 62 72 65 61 6b 3b | 0d 09 7d 0d 09 72 65 74 |..break;|..}..ret|
|000013d0| 75 72 6e 28 30 29 3b 09 | 2f 2a 20 4e 6f 74 20 61 |urn(0);.|/* Not a|
|000013e0| 20 71 75 69 74 2e 2e 2e | 20 2a 2f 0d 7d 0d 00 00 | quit...| */.}...|
|000013f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+