home *** CD-ROM | disk | FTP | other *** search
| MacBinary | 1989-09-14 | 10.4 KB | [TEXT/KAHL] |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: MacBinary
(archive/macBinary).
You can browse this item here: wind.c.bin
| 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 Apr 27 19:33:04 1987, modified Sun Apr 23 14:05:25 1989, creator Think C, type ASCII, 10495 bytes "wind.c"
| default (weak)
| |
| 99%
| file
| data
| default
| |
| 49%
| TrID
| Macintosh plain text (MacBinary)
| default
| |
| 33%
| TrID
| TTComp archive compressed (bin-4K)
| default (weak)
| |
| 17%
| 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 06 77 69 6e 64 2e 63 | 00 00 00 00 00 00 00 00 |..wind.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 28 ff 00 | 00 00 00 9c b9 9b 30 a0 |.....(..|......0.|
|00000060| 77 c0 e5 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |w.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 2f 2a 0d 20 2a 20 77 69 | 6e 64 2e 63 20 2d 20 57 |/*. * wi|nd.c - W|
|00000090| 69 6e 64 44 65 6d 6f 3a | 20 61 20 64 65 6d 6f 20 |indDemo:| a demo |
|000000a0| 6f 66 20 61 20 63 75 73 | 74 6f 6d 20 57 69 6e 64 |of a cus|tom Wind|
|000000b0| 6f 77 20 44 65 66 69 6e | 69 74 69 6f 6e 2e 0d 20 |ow Defin|ition.. |
|000000c0| 2a 0d 20 2a 20 48 6f 77 | 20 74 6f 20 62 75 69 6c |*. * How| to buil|
|000000d0| 64 20 74 68 69 73 20 70 | 72 6f 67 72 61 6d 3a 0d |d this p|rogram:.|
|000000e0| 20 2a 09 31 29 20 49 6e | 20 74 68 65 20 22 69 63 | *.1) In| the "ic|
|000000f0| 6f 6e 70 72 6f 6a 22 20 | 70 72 6f 6a 65 63 74 2c |onproj" |project,|
|00000100| 20 63 72 65 61 74 65 20 | 74 68 65 20 43 4f 44 45 | create |the CODE|
|00000110| 20 72 65 73 6f 75 72 63 | 65 2c 20 22 69 63 6f 6e | resourc|e, "icon|
|00000120| 2e 77 64 65 66 22 2e 0d | 20 2a 09 32 29 20 52 75 |.wdef"..| *.2) Ru|
|00000130| 6e 20 52 4d 61 6b 65 72 | 20 6f 6e 20 74 68 65 20 |n RMaker| on the |
|00000140| 66 69 6c 65 20 22 77 69 | 6e 64 2e 72 22 2e 0d 20 |file "wi|nd.r".. |
|00000150| 2a 09 34 29 20 49 6e 20 | 74 68 65 20 22 77 69 6e |*.4) In |the "win|
|00000160| 64 70 72 6f 6a 22 20 70 | 72 6f 6a 65 63 74 2c 20 |dproj" p|roject, |
|00000170| 42 75 69 6c 64 20 74 68 | 65 20 41 70 70 6c 69 63 |Build th|e Applic|
|00000180| 61 74 69 6f 6e 2c 20 57 | 69 6e 64 44 65 6d 6f 2e |ation, W|indDemo.|
|00000190| 0d 20 2a 0d 20 2a 0d 20 | 2a 20 54 68 65 20 69 6e |. *. *. |* The in|
|000001a0| 74 65 72 65 73 74 69 6e | 67 20 70 61 72 74 73 20 |terestin|g parts |
|000001b0| 6f 66 20 74 68 69 73 20 | 70 72 6f 67 72 61 6d 20 |of this |program |
|000001c0| 61 72 65 3a 0d 20 2a 0d | 20 2a 09 31 29 20 49 6e |are:. *.| *.1) In|
|000001d0| 20 64 6f 65 76 65 6e 74 | 28 29 2c 20 77 68 65 6e | doevent|(), when|
|000001e0| 20 67 72 6f 77 69 6e 67 | 20 61 20 77 69 6e 64 6f | growing| a windo|
|000001f0| 77 20 28 6a 75 73 74 20 | 62 65 66 6f 72 65 20 63 |w (just |before c|
|00000200| 61 6c 6c 69 6e 67 20 53 | 69 7a 65 57 69 6e 64 6f |alling S|izeWindo|
|00000210| 77 28 29 29 2c 0d 20 2a | 09 69 74 20 66 6f 72 63 |w()),. *|.it forc|
|00000220| 65 73 20 73 6d 61 6c 6c | 20 77 69 6e 64 6f 77 73 |es small| windows|
|00000230| 20 74 6f 20 62 65 20 74 | 68 65 20 73 69 7a 65 20 | to be t|he size |
|00000240| 6f 66 20 61 6e 20 69 63 | 6f 6e 3b 0d 20 2a 0d 20 |of an ic|on;. *. |
|00000250| 2a 09 32 29 20 49 6e 20 | 64 72 61 77 77 69 6e 64 |*.2) In |drawwind|
|00000260| 6f 77 28 29 2c 20 61 6e | 79 20 73 6d 61 6c 6c 20 |ow(), an|y small |
|00000270| 77 69 6e 64 6f 77 20 67 | 65 74 73 20 61 6e 20 69 |window g|ets an i|
|00000280| 63 6f 6e 20 64 72 61 77 | 6e 20 69 74 20 69 6e 0d |con draw|n it in.|
|00000290| 20 2a 09 69 6e 73 74 65 | 61 64 20 6f 66 20 69 74 | *.inste|ad of it|
|000002a0| 73 20 6e 6f 72 6d 61 6c | 20 73 74 75 66 66 2e 0d |s normal| stuff..|
|000002b0| 20 2a 0d 20 2a 20 54 68 | 65 20 72 65 73 74 20 6f | *. * Th|e rest o|
|000002c0| 66 20 74 68 69 73 20 70 | 72 6f 67 72 61 6d 20 69 |f this p|rogram i|
|000002d0| 73 20 6a 75 73 74 20 62 | 6f 69 6c 65 72 70 6c 61 |s just b|oilerpla|
|000002e0| 74 65 0d 20 2a 20 28 61 | 6e 64 20 6e 6f 74 20 76 |te. * (a|nd not v|
|000002f0| 65 72 79 20 70 72 65 74 | 74 79 20 63 6f 64 65 20 |ery pret|ty code |
|00000300| 61 6e 79 77 61 79 21 29 | 0d 20 2a 2f 0d 0d 23 69 |anyway!)|. */..#i|
|00000310| 6e 63 6c 75 64 65 20 3c | 4d 61 63 54 79 70 65 73 |nclude <|MacTypes|
|00000320| 2e 68 3e 0d 23 69 6e 63 | 6c 75 64 65 20 3c 51 75 |.h>.#inc|lude <Qu|
|00000330| 69 63 6b 64 72 61 77 2e | 68 3e 0d 23 69 6e 63 6c |ickdraw.|h>.#incl|
|00000340| 75 64 65 20 3c 4d 65 6d | 6f 72 79 4d 67 72 2e 68 |ude <Mem|oryMgr.h|
|00000350| 3e 0d 23 69 6e 63 6c 75 | 64 65 20 3c 57 69 6e 64 |>.#inclu|de <Wind|
|00000360| 6f 77 4d 67 72 2e 68 3e | 0d 23 69 6e 63 6c 75 64 |owMgr.h>|.#includ|
|00000370| 65 20 3c 44 69 61 6c 6f | 67 4d 67 72 2e 68 3e 0d |e <Dialo|gMgr.h>.|
|00000380| 23 69 6e 63 6c 75 64 65 | 20 3c 4d 65 6e 75 4d 67 |#include| <MenuMg|
|00000390| 72 2e 68 3e 0d 23 69 6e | 63 6c 75 64 65 20 3c 45 |r.h>.#in|clude <E|
|000003a0| 76 65 6e 74 4d 67 72 2e | 68 3e 0d 23 69 6e 63 6c |ventMgr.|h>.#incl|
|000003b0| 75 64 65 20 3c 44 65 73 | 6b 4d 67 72 2e 68 3e 0d |ude <Des|kMgr.h>.|
|000003c0| 23 69 6e 63 6c 75 64 65 | 20 3c 43 6f 6e 74 72 6f |#include| <Contro|
|000003d0| 6c 4d 67 72 2e 68 3e 0d | 23 69 6e 63 6c 75 64 65 |lMgr.h>.|#include|
|000003e0| 20 3c 54 65 78 74 45 64 | 69 74 2e 68 3e 0d 23 69 | <TextEd|it.h>.#i|
|000003f0| 6e 63 6c 75 64 65 20 3c | 50 61 63 6b 61 67 65 4d |nclude <|PackageM|
|00000400| 67 72 2e 68 3e 0d 23 69 | 6e 63 6c 75 64 65 20 3c |gr.h>.#i|nclude <|
|00000410| 54 6f 6f 6c 62 6f 78 55 | 74 69 6c 2e 68 3e 0d 23 |ToolboxU|til.h>.#|
|00000420| 69 6e 63 6c 75 64 65 20 | 3c 70 61 73 63 61 6c 2e |include |<pascal.|
|00000430| 68 3e 0d 0d 2f 2a 0d 20 | 2a 20 53 4d 41 4c 4c 57 |h>../*. |* SMALLW|
|00000440| 49 44 54 48 2c 0d 20 2a | 20 53 4d 41 4c 4c 48 45 |IDTH,. *| SMALLHE|
|00000450| 49 47 48 54 09 2d 20 6c | 61 72 67 65 73 74 20 64 |IGHT.- l|argest d|
|00000460| 69 6d 65 6e 73 69 6f 6e | 73 20 6f 66 20 61 20 63 |imension|s of a c|
|00000470| 6f 6c 6c 61 70 73 65 64 | 2d 73 74 61 74 65 20 77 |ollapsed|-state w|
|00000480| 69 6e 64 6f 77 2e 0d 20 | 2a 20 20 41 6e 79 20 77 |indow.. |* Any w|
|00000490| 69 6e 64 6f 77 20 6c 61 | 72 67 65 72 20 74 68 61 |indow la|rger tha|
|000004a0| 6e 20 74 68 69 73 20 28 | 69 6e 20 62 6f 74 68 20 |n this (|in both |
|000004b0| 64 69 6d 65 6e 73 69 6f | 6e 73 29 20 69 73 20 61 |dimensio|ns) is a|
|000004c0| 20 73 74 61 6e 64 61 72 | 64 20 77 69 6e 64 6f 77 | standar|d window|
|000004d0| 2e 0d 20 2a 0d 20 2a 20 | 54 68 65 73 65 20 6e 75 |.. *. * |These nu|
|000004e0| 6d 62 65 72 73 20 63 6f | 6d 65 20 66 72 6f 6d 20 |mbers co|me from |
|000004f0| 74 68 65 20 69 63 6f 6e | 77 69 6e 64 20 57 44 45 |the icon|wind WDE|
|00000500| 46 2e 0d 20 2a 2f 0d 0d | 23 64 65 66 69 6e 65 20 |F.. */..|#define |
|00000510| 53 4d 41 4c 4c 57 49 44 | 54 48 09 36 33 0d 23 64 |SMALLWID|TH.63.#d|
|00000520| 65 66 69 6e 65 20 53 4d | 41 4c 4c 48 45 49 47 48 |efine SM|ALLHEIGH|
|00000530| 54 09 31 35 0d 0d 2f 2a | 0d 20 2a 20 49 43 4f 4e |T.15../*|. * ICON|
|00000540| 53 49 5a 45 09 2d 20 74 | 68 65 20 77 69 64 74 68 |SIZE.- t|he width|
|00000550| 2f 68 65 69 67 68 74 20 | 6f 66 20 61 6e 20 69 63 |/height |of an ic|
|00000560| 6f 6e 2e 0d 20 2a 20 54 | 68 69 73 20 70 72 6f 67 |on.. * T|his prog|
|00000570| 72 61 6d 20 66 6f 72 63 | 65 73 20 61 6e 79 20 63 |ram forc|es any c|
|00000580| 6f 6c 6c 61 70 73 65 64 | 20 77 69 6e 64 6f 77 20 |ollapsed| window |
|00000590| 74 6f 20 74 68 65 20 73 | 69 7a 65 20 6f 66 20 61 |to the s|ize of a|
|000005a0| 6e 20 69 63 6f 6e 2e 0d | 20 2a 2f 0d 0d 23 64 65 |n icon..| */..#de|
|000005b0| 66 69 6e 65 20 49 43 4f | 4e 53 49 5a 45 20 33 32 |fine ICO|NSIZE 32|
|000005c0| 0d 0d 23 64 65 66 69 6e | 65 20 41 50 50 4c 45 4d |..#defin|e APPLEM|
|000005d0| 45 4e 55 09 31 09 2f 2a | 20 4d 65 6e 75 20 49 44 |ENU.1./*| Menu ID|
|000005e0| 20 66 6f 72 20 41 70 70 | 6c 65 20 6d 65 6e 75 09 | for App|le menu.|
|000005f0| 2a 2f 0d 23 64 65 66 69 | 6e 65 20 46 49 4c 45 4d |*/.#defi|ne FILEM|
|00000600| 45 4e 55 09 32 09 2f 2a | 20 2e 2e 2e 46 69 6c 65 |ENU.2./*| ...File|
|00000610| 20 6d 65 6e 75 09 09 09 | 09 2a 2f 0d 23 64 65 66 | menu...|.*/.#def|
|00000620| 69 6e 65 20 4c 41 53 54 | 4d 45 4e 55 09 32 09 2f |ine LAST|MENU.2./|
|00000630| 2a 20 4e 75 6d 62 65 72 | 20 6f 66 20 6d 65 6e 75 |* Number| of menu|
|00000640| 73 09 09 09 2a 2f 0d 0d | 23 64 65 66 69 6e 65 20 |s...*/..|#define |
|00000650| 44 4c 47 5f 41 42 4f 55 | 54 09 32 35 36 09 2f 2a |DLG_ABOU|T.256./*|
|00000660| 20 52 65 73 49 44 20 6f | 66 20 74 68 65 20 41 62 | ResID o|f the Ab|
|00000670| 6f 75 74 2e 2e 2e 20 64 | 69 61 6c 6f 67 20 2a 2f |out... d|ialog */|
|00000680| 0d 0d 2f 2a 0d 20 2a 20 | 2a 46 49 4c 45 20 2d 20 |../*. * |*FILE - |
|00000690| 69 74 65 6d 73 20 69 6e | 20 74 68 65 20 46 49 4c |items in| the FIL|
|000006a0| 45 20 6d 65 6e 75 0d 20 | 2a 2f 0d 0d 23 64 65 66 |E menu. |*/..#def|
|000006b0| 69 6e 65 20 4e 45 57 46 | 49 4c 45 09 09 31 09 2f |ine NEWF|ILE..1./|
|000006c0| 2a 20 63 72 65 61 74 65 | 20 61 20 6e 65 77 20 77 |* create| a new w|
|000006d0| 69 6e 64 6f 77 20 2a 2f | 0d 23 64 65 66 69 6e 65 |indow */|.#define|
|000006e0| 20 51 55 49 54 46 49 4c | 45 09 32 09 2f 2a 20 71 | QUITFIL|E.2./* q|
|000006f0| 75 69 74 20 74 68 65 20 | 70 72 6f 67 72 61 6d 20 |uit the |program |
|00000700| 2a 2f 0d 0d 4d 65 6e 75 | 48 61 6e 64 6c 65 20 6d |*/..Menu|Handle m|
|00000710| 79 6d 65 6e 75 73 5b 4c | 41 53 54 4d 45 4e 55 20 |ymenus[L|ASTMENU |
|00000720| 2b 20 31 5d 3b 20 2f 2a | 20 6d 65 6e 75 73 5b 31 |+ 1]; /*| menus[1|
|00000730| 2e 2e 4c 41 53 54 4d 45 | 4e 55 5d 09 2a 2f 0d 0d |..LASTME|NU].*/..|
|00000740| 23 64 65 66 69 6e 65 20 | 6d 61 78 53 74 61 63 6b |#define |maxStack|
|00000750| 53 69 7a 65 20 38 31 39 | 32 09 2f 2a 20 6d 61 78 |Size 819|2./* max|
|00000760| 20 73 69 7a 65 20 6f 66 | 20 6f 75 72 20 73 74 61 | size of| our sta|
|00000770| 63 6b 20 2a 2f 0d 0d 2f | 2a 0d 20 2a 20 73 63 72 |ck */../|*. * scr|
|00000780| 65 65 6e 70 6f 72 74 20 | 2d 20 75 73 65 64 20 74 |eenport |- used t|
|00000790| 6f 20 6b 65 65 70 20 74 | 68 65 20 63 75 72 72 65 |o keep t|he curre|
|000007a0| 6e 74 20 70 6f 72 74 20 | 66 72 6f 6d 20 65 76 65 |nt port |from eve|
|000007b0| 72 20 64 61 6e 67 6c 69 | 6e 67 2e 0d 20 2a 20 20 |r dangli|ng.. * |
|000007c0| 20 54 68 69 73 20 69 73 | 20 61 20 70 6f 72 74 20 | This is| a port |
|000007d0| 66 6f 72 20 74 68 65 20 | 77 68 6f 6c 65 20 73 63 |for the |whole sc|
|000007e0| 72 65 65 6e 2e 0d 20 2a | 2f 0d 0d 47 72 61 66 50 |reen.. *|/..GrafP|
|000007f0| 74 72 20 73 63 72 65 65 | 6e 70 6f 72 74 3b 0d 0d |tr scree|nport;..|
|00000800| 23 64 65 66 69 6e 65 20 | 4e 55 4d 5f 57 49 4e 44 |#define |NUM_WIND|
|00000810| 4f 57 53 20 33 09 09 09 | 09 2f 2a 20 6e 75 6d 62 |OWS 3...|./* numb|
|00000820| 65 72 20 6f 66 20 77 69 | 6e 64 6f 77 27 73 20 69 |er of wi|ndow's i|
|00000830| 6e 20 74 68 65 20 70 72 | 6f 67 72 61 6d 20 2a 2f |n the pr|ogram */|
|00000840| 0d 57 69 6e 64 6f 77 50 | 74 72 20 77 69 6e 64 6f |.WindowP|tr windo|
|00000850| 63 5b 4e 55 4d 5f 57 49 | 4e 44 4f 57 53 5d 3b 09 |c[NUM_WI|NDOWS];.|
|00000860| 09 2f 2a 20 74 68 65 20 | 70 72 6f 67 72 61 6d 27 |./* the |program'|
|00000870| 73 20 77 69 6e 64 6f 77 | 73 09 2a 2f 0d 0d 23 64 |s window|s.*/..#d|
|00000880| 65 66 69 6e 65 20 57 49 | 4e 44 4f 57 49 44 09 32 |efine WI|NDOWID.2|
|00000890| 36 30 09 09 2f 2a 20 52 | 65 73 6f 75 72 63 65 20 |60../* R|esource |
|000008a0| 49 44 20 6f 66 20 6d 79 | 20 66 69 72 73 74 20 77 |ID of my| first w|
|000008b0| 69 6e 64 6f 77 20 2a 2f | 0d 23 64 65 66 69 6e 65 |indow */|.#define|
|000008c0| 20 49 43 4f 4e 49 44 09 | 09 32 36 30 09 09 2f 2a | ICONID.|.260../*|
|000008d0| 20 52 65 73 6f 75 72 63 | 65 20 49 44 20 6f 66 20 | Resourc|e ID of |
|000008e0| 74 68 65 20 69 63 6f 6e | 20 74 6f 20 70 6c 6f 74 |the icon| to plot|
|000008f0| 20 2a 2f 0d 0d 2f 2a 0d | 20 2a 20 6d 61 69 6e 28 | */../*.| * main(|
|00000900| 29 20 2d 20 72 75 6e 20 | 74 68 65 20 70 72 6f 67 |) - run |the prog|
|00000910| 72 61 6d 2e 0d 20 2a 2f | 0d 0d 6d 61 69 6e 28 29 |ram.. */|..main()|
|00000920| 0d 7b 0d 09 69 6e 74 20 | 77 69 64 78 3b 09 09 09 |.{..int |widx;...|
|00000930| 09 09 2f 2a 20 69 6e 64 | 65 78 20 69 6e 74 6f 20 |../* ind|ex into |
|00000940| 77 72 65 63 6f 72 64 5b | 5d 20 2a 2f 0d 09 6c 6f |wrecord[|] */..lo|
|00000950| 6e 67 20 2a 73 74 61 63 | 6b 62 61 73 65 70 74 72 |ng *stac|kbaseptr|
|00000960| 3b 09 09 09 2f 2a 20 70 | 6f 69 6e 74 73 20 74 6f |;.../* p|oints to|
|00000970| 20 63 75 72 72 65 6e 74 | 20 73 74 61 63 6b 20 62 | current| stack b|
|00000980| 61 73 65 20 2a 2f 0d 09 | 69 6e 74 20 69 3b 0d 0d |ase */..|int i;..|
|00000990| 09 2f 2a 0d 09 20 2a 20 | 49 6e 69 74 69 61 6c 69 |./*.. * |Initiali|
|000009a0| 7a 65 20 6f 75 72 20 6d | 65 6d 6f 72 79 2c 0d 09 |ze our m|emory,..|
|000009b0| 20 2a 20 74 68 65 6e 20 | 69 6e 69 74 20 74 68 65 | * then |init the|
|000009c0| 20 54 6f 6f 6c 62 6f 78 | 20 6d 61 6e 61 67 65 72 | Toolbox| manager|
|000009d0| 73 20 28 6f 72 64 65 72 | 20 69 73 20 69 6d 70 6f |s (order| is impo|
|000009e0| 72 74 61 6e 74 29 2e 0d | 09 20 2a 2f 0d 0d 09 73 |rtant)..|. */...s|
|000009f0| 74 61 63 6b 62 61 73 65 | 70 74 72 20 3d 20 28 6c |tackbase|ptr = (l|
|00000a00| 6f 6e 67 20 2a 29 20 30 | 78 39 30 38 3b 0d 09 53 |ong *) 0|x908;..S|
|00000a10| 65 74 41 70 70 6c 4c 69 | 6d 69 74 28 28 50 74 72 |etApplLi|mit((Ptr|
|00000a20| 29 20 28 2a 73 74 61 63 | 6b 62 61 73 65 70 74 72 |) (*stac|kbaseptr|
|00000a30| 20 2d 20 6d 61 78 53 74 | 61 63 6b 53 69 7a 65 29 | - maxSt|ackSize)|
|00000a40| 29 3b 0d 09 4d 61 78 41 | 70 70 6c 5a 6f 6e 65 28 |);..MaxA|pplZone(|
|00000a50| 29 3b 0d 09 4d 6f 72 65 | 4d 61 73 74 65 72 73 28 |);..More|Masters(|
|00000a60| 29 3b 0d 09 4d 6f 72 65 | 4d 61 73 74 65 72 73 28 |);..More|Masters(|
|00000a70| 29 3b 0d 0d 09 49 6e 69 | 74 47 72 61 66 28 26 74 |);...Ini|tGraf(&t|
|00000a80| 68 65 50 6f 72 74 29 3b | 0d 09 49 6e 69 74 46 6f |hePort);|..InitFo|
|00000a90| 6e 74 73 28 29 3b 0d 09 | 49 6e 69 74 57 69 6e 64 |nts();..|InitWind|
|00000aa0| 6f 77 73 28 29 3b 0d 09 | 49 6e 69 74 4d 65 6e 75 |ows();..|InitMenu|
|00000ab0| 73 28 29 3b 0d 09 54 45 | 49 6e 69 74 28 29 3b 0d |s();..TE|Init();.|
|00000ac0| 09 49 6e 69 74 44 69 61 | 6c 6f 67 73 28 28 50 72 |.InitDia|logs((Pr|
|00000ad0| 6f 63 50 74 72 29 20 30 | 29 3b 0d 09 44 49 4c 6f |ocPtr) 0|);..DILo|
|00000ae0| 61 64 28 29 3b 0d 09 53 | 65 74 45 76 65 6e 74 4d |ad();..S|etEventM|
|00000af0| 61 73 6b 28 65 76 65 72 | 79 45 76 65 6e 74 20 2d |ask(ever|yEvent -|
|00000b00| 20 6b 65 79 55 70 4d 61 | 73 6b 29 3b 0d 09 49 6e | keyUpMa|sk);..In|
|00000b10| 69 74 43 75 72 73 6f 72 | 28 29 3b 0d 09 47 65 74 |itCursor|();..Get|
|00000b20| 57 4d 67 72 50 6f 72 74 | 28 26 73 63 72 65 65 6e |WMgrPort|(&screen|
|00000b30| 70 6f 72 74 29 3b 0d 09 | 53 65 74 50 6f 72 74 28 |port);..|SetPort(|
|00000b40| 73 63 72 65 65 6e 70 6f | 72 74 29 3b 0d 0d 09 2f |screenpo|rt);.../|
|00000b50| 2a 0d 09 20 2a 20 53 65 | 74 75 70 20 6f 75 72 20 |*.. * Se|tup our |
|00000b60| 6d 65 6e 75 73 2e 0d 09 | 20 2a 2f 0d 0d 09 66 6f |menus...| */...fo|
|00000b70| 72 20 28 69 20 3d 20 31 | 3b 20 69 20 3c 3d 20 4c |r (i = 1|; i <= L|
|00000b80| 41 53 54 4d 45 4e 55 3b | 20 69 2b 2b 29 20 7b 0d |ASTMENU;| i++) {.|
|00000b90| 09 09 6d 79 6d 65 6e 75 | 73 5b 69 5d 20 3d 20 47 |..mymenu|s[i] = G|
|00000ba0| 65 74 4d 65 6e 75 28 69 | 29 3b 0d 09 09 49 6e 73 |etMenu(i|);...Ins|
|00000bb0| 65 72 74 4d 65 6e 75 28 | 6d 79 6d 65 6e 75 73 5b |ertMenu(|mymenus[|
|00000bc0| 69 5d 2c 20 30 29 3b 0d | 09 7d 0d 09 44 72 61 77 |i], 0);.|.}..Draw|
|00000bd0| 4d 65 6e 75 42 61 72 28 | 29 3b 0d 0d 09 2f 2a 0d |MenuBar(|);.../*.|
|00000be0| 09 20 2a 20 43 72 65 61 | 74 65 20 6f 75 72 20 66 |. * Crea|te our f|
|00000bf0| 69 72 73 74 20 77 69 6e | 64 6f 77 2e 0d 09 20 2a |irst win|dow... *|
|00000c00| 2f 0d 09 0d 09 6d 61 6b | 65 77 69 6e 64 6f 77 28 |/....mak|ewindow(|
|00000c10| 29 3b 0d 0d 09 77 68 69 | 6c 65 20 28 64 6f 65 76 |);...whi|le (doev|
|00000c20| 65 6e 74 28 29 29 0d 09 | 09 3b 0d 09 49 6e 69 74 |ent())..|.;..Init|
|00000c30| 43 75 72 73 6f 72 28 29 | 3b 0d 09 53 65 74 45 76 |Cursor()|;..SetEv|
|00000c40| 65 6e 74 4d 61 73 6b 28 | 65 76 65 72 79 45 76 65 |entMask(|everyEve|
|00000c50| 6e 74 20 2d 20 6b 65 79 | 55 70 4d 61 73 6b 29 3b |nt - key|UpMask);|
|00000c60| 0d 7d 0d 0d 2f 2a 0d 20 | 2a 20 6d 61 6b 65 77 69 |.}../*. |* makewi|
|00000c70| 6e 64 6f 77 28 29 20 2d | 20 63 72 65 61 74 65 20 |ndow() -| create |
|00000c80| 61 20 6e 65 77 20 77 69 | 6e 64 6f 77 2e 0d 20 2a |a new wi|ndow.. *|
|00000c90| 2f 0d 0d 6d 61 6b 65 77 | 69 6e 64 6f 77 28 29 0d |/..makew|indow().|
|00000ca0| 7b 0d 09 73 74 61 74 69 | 63 20 57 69 6e 64 6f 77 |{..stati|c Window|
|00000cb0| 52 65 63 6f 72 64 20 77 | 72 65 63 6f 72 64 5b 4e |Record w|record[N|
|00000cc0| 55 4d 5f 57 49 4e 44 4f | 57 53 5d 3b 20 2f 2a 20 |UM_WINDO|WS]; /* |
|00000cd0| 53 74 6f 72 61 67 65 20 | 66 6f 72 20 77 69 6e 64 |Storage |for wind|
|00000ce0| 6f 77 20 72 65 63 6f 72 | 64 73 2e 20 2a 2f 0d 09 |ow recor|ds. */..|
|00000cf0| 69 6e 74 20 77 69 64 78 | 3b 0d 09 0d 09 66 6f 72 |int widx|;....for|
|00000d00| 20 28 77 69 64 78 20 3d | 20 30 3b 20 77 69 64 78 | (widx =| 0; widx|
|00000d10| 20 3c 20 4e 55 4d 5f 57 | 49 4e 44 4f 57 53 20 26 | < NUM_W|INDOWS &|
|00000d20| 26 20 77 69 6e 64 6f 63 | 5b 77 69 64 78 5d 3b 20 |& windoc|[widx]; |
|00000d30| 2b 2b 77 69 64 78 29 0d | 09 09 3b 0d 09 69 66 20 |++widx).|..;..if |
|00000d40| 28 77 69 64 78 20 3c 20 | 4e 55 4d 5f 57 49 4e 44 |(widx < |NUM_WIND|
|00000d50| 4f 57 53 29 20 7b 0d 09 | 09 77 69 6e 64 6f 63 5b |OWS) {..|.windoc[|
|00000d60| 77 69 64 78 5d 20 3d 20 | 47 65 74 4e 65 77 57 69 |widx] = |GetNewWi|
|00000d70| 6e 64 6f 77 28 57 49 4e | 44 4f 57 49 44 20 2b 20 |ndow(WIN|DOWID + |
|00000d80| 77 69 64 78 2c 20 26 77 | 72 65 63 6f 72 64 5b 77 |widx, &w|record[w|
|00000d90| 69 64 78 5d 2c 20 28 6c | 6f 6e 67 29 20 2d 31 29 |idx], (l|ong) -1)|
|00000da0| 3b 0d 09 7d 0d 7d 0d 0d | 2f 2a 0d 20 2a 20 75 6e |;..}.}..|/*. * un|
|00000db0| 6d 61 6b 65 77 69 6e 64 | 6f 77 28 29 20 2d 20 64 |makewind|ow() - d|
|00000dc0| 65 73 74 72 6f 79 20 28 | 63 6c 6f 73 65 29 20 61 |estroy (|close) a|
|00000dd0| 20 77 69 6e 64 6f 77 2e | 0d 20 2a 2f 0d 0d 75 6e | window.|. */..un|
|00000de0| 6d 61 6b 65 77 69 6e 64 | 6f 77 28 77 69 6e 64 70 |makewind|ow(windp|
|00000df0| 29 0d 57 69 6e 64 6f 77 | 50 74 72 20 77 69 6e 64 |).Window|Ptr wind|
|00000e00| 70 3b 09 09 2f 2a 20 74 | 68 65 20 77 69 6e 64 6f |p;../* t|he windo|
|00000e10| 77 20 74 6f 20 64 65 73 | 74 72 6f 79 20 2a 2f 0d |w to des|troy */.|
|00000e20| 7b 0d 09 69 6e 74 20 77 | 69 64 78 3b 0d 0d 09 66 |{..int w|idx;...f|
|00000e30| 6f 72 20 28 77 69 64 78 | 20 3d 20 30 3b 20 77 69 |or (widx| = 0; wi|
|00000e40| 64 78 20 3c 20 4e 55 4d | 5f 57 49 4e 44 4f 57 53 |dx < NUM|_WINDOWS|
|00000e50| 20 26 26 20 77 69 6e 64 | 6f 63 5b 77 69 64 78 5d | && wind|oc[widx]|
|00000e60| 20 21 3d 20 77 69 6e 64 | 70 3b 20 2b 2b 77 69 64 | != wind|p; ++wid|
|00000e70| 78 29 0d 09 09 3b 0d 09 | 69 66 20 28 77 69 64 78 |x)...;..|if (widx|
|00000e80| 20 3c 20 4e 55 4d 5f 57 | 49 4e 44 4f 57 53 29 20 | < NUM_W|INDOWS) |
|00000e90| 7b 0d 09 09 43 6c 6f 73 | 65 57 69 6e 64 6f 77 28 |{...Clos|eWindow(|
|00000ea0| 77 69 6e 64 70 29 3b 0d | 09 09 77 69 6e 64 6f 63 |windp);.|..windoc|
|00000eb0| 5b 77 69 64 78 5d 20 3d | 20 28 57 69 6e 64 6f 77 |[widx] =| (Window|
|00000ec0| 50 74 72 29 20 30 3b 0d | 09 7d 0d 7d 0d 0d 2f 2a |Ptr) 0;.|.}.}../*|
|00000ed0| 0d 20 2a 20 64 6f 65 76 | 65 6e 74 28 29 20 2d 20 |. * doev|ent() - |
|00000ee0| 6f 6e 65 20 6c 6f 6f 70 | 20 74 68 72 6f 75 67 68 |one loop| through|
|00000ef0| 20 74 68 65 20 6d 61 69 | 6e 20 65 76 65 6e 74 20 | the mai|n event |
|00000f00| 68 61 6e 64 6c 65 72 0d | 20 2a 2f 0d 0d 69 6e 74 |handler.| */..int|
|00000f10| 09 09 2f 2a 20 22 64 6f | 20 61 6e 6f 74 68 65 72 |../* "do| another|
|00000f20| 20 65 76 65 6e 74 22 09 | 2a 2f 0d 64 6f 65 76 65 | event".|*/.doeve|
|00000f30| 6e 74 28 29 0d 7b 0d 09 | 47 72 61 66 50 74 72 20 |nt().{..|GrafPtr |
|00000f40| 73 61 76 65 70 6f 72 74 | 3b 0d 09 45 76 65 6e 74 |saveport|;..Event|
|00000f50| 52 65 63 6f 72 64 20 6d | 79 65 76 65 6e 74 3b 09 |Record m|yevent;.|
|00000f60| 2f 2a 20 74 68 65 20 65 | 76 65 6e 74 20 74 6f 20 |/* the e|vent to |
|00000f70| 68 61 6e 64 6c 65 20 2a | 2f 0d 09 57 69 6e 64 6f |handle *|/..Windo|
|00000f80| 77 50 74 72 20 77 68 69 | 63 68 77 69 6e 64 6f 77 |wPtr whi|chwindow|
|00000f90| 3b 09 2f 2a 20 50 6f 69 | 6e 74 73 20 74 6f 20 77 |;./* Poi|nts to w|
|00000fa0| 69 6e 64 6f 77 20 6f 66 | 20 4d 6f 75 73 65 44 6f |indow of| MouseDo|
|00000fb0| 77 6e 20 2a 2f 0d 09 63 | 68 61 72 20 77 68 69 63 |wn */..c|har whic|
|00000fc0| 68 63 68 61 72 3b 09 09 | 09 2f 2a 20 74 68 65 20 |hchar;..|./* the |
|00000fd0| 63 68 61 72 61 63 74 65 | 72 20 74 79 70 65 64 20 |characte|r typed |
|00000fe0| 2a 2f 0d 09 6c 6f 6e 67 | 20 6d 65 6e 75 63 6f 6d |*/..long| menucom|
|00000ff0| 6d 61 6e 64 3b 09 09 2f | 2a 20 61 20 6d 65 6e 75 |mand;../|* a menu|
|00001000| 20 63 6f 6d 6d 61 6e 64 | 20 74 6f 20 64 6f 20 28 | command| to do (|
|00001010| 6d 65 6e 75 20 2b 20 69 | 74 65 6d 29 20 2a 2f 0d |menu + i|tem) */.|
|00001020| 09 69 6e 74 20 77 69 6e | 64 6f 77 63 6f 64 65 3b |.int win|dowcode;|
|00001030| 09 09 09 2f 2a 20 57 68 | 61 74 20 6d 6f 75 73 65 |.../* Wh|at mouse|
|00001040| 20 77 61 73 20 69 6e 20 | 77 68 65 6e 20 65 76 65 | was in |when eve|
|00001050| 6e 74 20 70 6f 73 74 65 | 64 20 2a 2f 0d 09 52 65 |nt poste|d */..Re|
|00001060| 63 74 20 64 72 61 67 72 | 65 63 74 3b 09 09 09 2f |ct dragr|ect;.../|
|00001070| 2a 20 42 6f 75 6e 64 73 | 20 6f 66 20 77 69 6e 64 |* Bounds| of wind|
|00001080| 6f 77 20 64 72 61 67 67 | 69 6e 67 20 2a 2f 0d 09 |ow dragg|ing */..|
|00001090| 52 65 63 74 20 6c 69 6d | 69 74 73 3b 09 09 09 2f |Rect lim|its;.../|
|000010a0| 2a 20 6c 69 6d 69 74 73 | 20 74 6f 20 67 72 6f 77 |* limits| to grow|
|000010b0| 74 68 20 2a 2f 0d 09 6c | 6f 6e 67 20 6e 65 77 64 |th */..l|ong newd|
|000010c0| 69 6d 73 3b 09 09 09 2f | 2a 20 6e 65 77 20 77 69 |ims;.../|* new wi|
|000010d0| 64 74 68 20 26 20 68 65 | 69 67 68 74 20 6f 66 20 |dth & he|ight of |
|000010e0| 74 68 65 20 77 69 6e 64 | 6f 77 09 2a 2f 0d 09 69 |the wind|ow.*/..i|
|000010f0| 6e 74 20 6e 65 77 77 69 | 64 74 68 2c 20 6e 65 77 |nt newwi|dth, new|
|00001100| 68 65 69 67 68 74 3b 20 | 2f 2a 20 6e 65 77 64 69 |height; |/* newdi|
|00001110| 6d 73 20 73 70 6c 69 74 | 20 69 6e 74 6f 20 77 69 |ms split| into wi|
|00001120| 64 74 68 20 61 6e 64 20 | 68 65 69 67 68 74 20 2a |dth and |height *|
|00001130| 2f 0d 09 69 6e 74 20 75 | 73 65 72 64 6f 6e 65 3b |/..int u|serdone;|
|00001140| 09 09 09 2f 2a 20 54 72 | 75 65 20 77 68 65 6e 20 |.../* Tr|ue when |
|00001150| 75 73 65 72 20 77 61 6e | 74 73 20 74 6f 20 65 78 |user wan|ts to ex|
|00001160| 69 74 20 70 72 6f 67 72 | 61 6d 20 2a 2f 0d 0d 09 |it progr|am */...|
|00001170| 75 73 65 72 64 6f 6e 65 | 20 3d 20 46 41 4c 53 45 |userdone| = FALSE|
|00001180| 3b 0d 09 53 79 73 74 65 | 6d 54 61 73 6b 28 29 3b |;..Syste|mTask();|
|00001190| 09 09 09 2f 2a 20 67 69 | 76 65 20 74 68 65 20 73 |.../* gi|ve the s|
|000011a0| 79 73 74 65 6d 20 61 20 | 6d 6f 6d 65 6e 74 20 6f |ystem a |moment o|
|000011b0| 66 20 74 69 6d 65 09 2a | 2f 0d 0d 09 69 66 20 28 |f time.*|/...if (|
|000011c0| 21 47 65 74 4e 65 78 74 | 45 76 65 6e 74 28 65 76 |!GetNext|Event(ev|
|000011d0| 65 72 79 45 76 65 6e 74 | 2c 20 26 6d 79 65 76 65 |eryEvent|, &myeve|
|000011e0| 6e 74 29 29 20 7b 0d 09 | 09 2f 2a 20 57 65 27 72 |nt)) {..|./* We'r|
|000011f0| 65 20 69 64 6c 65 2e 20 | 2a 2f 0d 09 7d 20 65 6c |e idle. |*/..} el|
|00001200| 73 65 20 69 66 20 28 28 | 6d 79 65 76 65 6e 74 2e |se if ((|myevent.|
|00001210| 6d 6f 64 69 66 69 65 72 | 73 20 26 20 63 6d 64 4b |modifier|s & cmdK|
|00001220| 65 79 29 20 26 26 0d 09 | 20 20 28 6d 79 65 76 65 |ey) &&..| (myeve|
|00001230| 6e 74 2e 77 68 61 74 20 | 3d 3d 20 6b 65 79 44 6f |nt.what |== keyDo|
|00001240| 77 6e 20 7c 7c 20 6d 79 | 65 76 65 6e 74 2e 77 68 |wn || my|event.wh|
|00001250| 61 74 20 3d 3d 20 61 75 | 74 6f 4b 65 79 29 29 20 |at == au|toKey)) |
|00001260| 7b 0d 09 0d 09 09 2f 2a | 0d 09 09 20 2a 20 49 74 |{...../*|... * It|
|00001270| 27 73 20 61 20 63 6f 6d | 6d 61 6e 64 2d 6b 65 79 |'s a com|mand-key|
|00001280| 20 6b 65 79 73 74 72 6f | 6b 65 2e 0d 09 09 20 2a | keystro|ke.... *|
|00001290| 20 28 63 6f 6d 6d 61 6e | 64 20 6b 65 79 73 74 72 | (comman|d keystr|
|000012a0| 6f 6b 65 73 20 61 72 65 | 20 68 61 6e 64 6c 65 64 |okes are| handled|
|000012b0| 20 68 65 72 65 20 73 69 | 6e 63 65 20 64 69 61 6c | here si|nce dial|
|000012c0| 6f 67 73 20 63 61 6e 27 | 74 29 0d 09 09 20 2a 2f |ogs can'|t)... */|
|000012d0| 0d 09 0d 09 09 77 68 69 | 63 68 63 68 61 72 20 3d |.....whi|chchar =|
|000012e0| 20 28 63 68 61 72 29 20 | 28 6d 79 65 76 65 6e 74 | (char) |(myevent|
|000012f0| 2e 6d 65 73 73 61 67 65 | 20 26 20 63 68 61 72 43 |.message| & charC|
|00001300| 6f 64 65 4d 61 73 6b 29 | 3b 0d 09 09 6d 65 6e 75 |odeMask)|;...menu|
|00001310| 63 6f 6d 6d 61 6e 64 20 | 3d 20 4d 65 6e 75 4b 65 |command |= MenuKe|
|00001320| 79 28 77 68 69 63 68 63 | 68 61 72 29 3b 0d 09 09 |y(whichc|har);...|
|00001330| 75 73 65 72 64 6f 6e 65 | 20 3d 20 64 6f 63 6f 6d |userdone| = docom|
|00001340| 6d 61 6e 64 28 6d 65 6e | 75 63 6f 6d 6d 61 6e 64 |mand(men|ucommand|
|00001350| 29 3b 0d 09 7d 20 65 6c | 73 65 20 69 66 20 28 49 |);..} el|se if (I|
|00001360| 73 44 69 61 6c 6f 67 45 | 76 65 6e 74 28 26 6d 79 |sDialogE|vent(&my|
|00001370| 65 76 65 6e 74 29 29 20 | 7b 0d 09 09 2f 2a 20 68 |event)) |{.../* h|
|00001380| 65 72 65 27 73 20 77 68 | 65 72 65 20 77 65 27 64 |ere's wh|ere we'd|
|00001390| 20 68 61 6e 64 6c 65 20 | 6d 6f 64 65 6c 65 73 73 | handle |modeless|
|000013a0| 20 64 69 61 6c 6f 67 20 | 65 76 65 6e 74 73 20 2a | dialog |events *|
|000013b0| 2f 0d 09 7d 20 65 6c 73 | 65 20 7b 0d 09 09 73 77 |/..} els|e {...sw|
|000013c0| 69 74 63 68 20 28 6d 79 | 65 76 65 6e 74 2e 77 68 |itch (my|event.wh|
|000013d0| 61 74 29 20 7b 0d 09 09 | 63 61 73 65 20 75 70 64 |at) {...|case upd|
|000013e0| 61 74 65 45 76 74 3a 09 | 09 09 2f 2a 20 75 70 64 |ateEvt:.|../* upd|
|000013f0| 61 74 65 20 74 68 65 20 | 61 70 70 72 6f 70 72 69 |ate the |appropri|
|00001400| 61 74 65 20 77 69 6e 64 | 6f 77 20 2a 2f 0d 09 09 |ate wind|ow */...|
|00001410| 09 42 65 67 69 6e 55 70 | 64 61 74 65 28 28 57 69 |.BeginUp|date((Wi|
|00001420| 6e 64 6f 77 50 74 72 29 | 28 6d 79 65 76 65 6e 74 |ndowPtr)|(myevent|
|00001430| 2e 6d 65 73 73 61 67 65 | 29 29 3b 0d 09 09 09 47 |.message|));....G|
|00001440| 65 74 50 6f 72 74 28 26 | 73 61 76 65 70 6f 72 74 |etPort(&|saveport|
|00001450| 29 3b 0d 09 09 09 53 65 | 74 50 6f 72 74 28 28 57 |);....Se|tPort((W|
|00001460| 69 6e 64 6f 77 50 74 72 | 29 28 6d 79 65 76 65 6e |indowPtr|)(myeven|
|00001470| 74 2e 6d 65 73 73 61 67 | 65 29 29 3b 0d 09 09 09 |t.messag|e));....|
|00001480| 0d 09 09 09 64 72 61 77 | 77 69 6e 64 6f 77 28 28 |....draw|window((|
|00001490| 57 69 6e 64 6f 77 50 74 | 72 29 28 6d 79 65 76 65 |WindowPt|r)(myeve|
|000014a0| 6e 74 2e 6d 65 73 73 61 | 67 65 29 29 3b 0d 09 09 |nt.messa|ge));...|
|000014b0| 09 0d 09 09 09 53 65 74 | 50 6f 72 74 28 73 61 76 |.....Set|Port(sav|
|000014c0| 65 70 6f 72 74 29 3b 0d | 09 09 09 45 6e 64 55 70 |eport);.|...EndUp|
|000014d0| 64 61 74 65 28 28 57 69 | 6e 64 6f 77 50 74 72 29 |date((Wi|ndowPtr)|
|000014e0| 28 6d 79 65 76 65 6e 74 | 2e 6d 65 73 73 61 67 65 |(myevent|.message|
|000014f0| 29 29 3b 0d 09 09 09 62 | 72 65 61 6b 3b 0d 09 09 |));....b|reak;...|
|00001500| 63 61 73 65 20 61 63 74 | 69 76 61 74 65 45 76 74 |case act|ivateEvt|
|00001510| 3a 09 09 2f 2a 20 61 63 | 74 69 76 61 74 65 20 6f |:../* ac|tivate o|
|00001520| 72 20 64 65 61 63 74 69 | 76 61 74 65 20 77 69 6e |r deacti|vate win|
|00001530| 64 6f 77 20 2a 2f 0d 09 | 09 09 69 66 20 28 6d 79 |dow */..|..if (my|
|00001540| 65 76 65 6e 74 2e 6d 6f | 64 69 66 69 65 72 73 20 |event.mo|difiers |
|00001550| 26 20 31 29 20 7b 0d 09 | 09 09 09 53 65 74 50 6f |& 1) {..|...SetPo|
|00001560| 72 74 28 28 57 69 6e 64 | 6f 77 50 74 72 29 20 6d |rt((Wind|owPtr) m|
|00001570| 79 65 76 65 6e 74 2e 6d | 65 73 73 61 67 65 29 3b |yevent.m|essage);|
|00001580| 0d 09 09 09 09 49 6e 76 | 61 6c 52 65 63 74 28 26 |.....Inv|alRect(&|
|00001590| 74 68 65 50 6f 72 74 2d | 3e 70 6f 72 74 52 65 63 |thePort-|>portRec|
|000015a0| 74 29 3b 0d 09 09 09 7d | 20 65 6c 73 65 20 7b 0d |t);....}| else {.|
|000015b0| 09 09 09 09 49 6e 76 61 | 6c 52 65 63 74 28 26 74 |....Inva|lRect(&t|
|000015c0| 68 65 50 6f 72 74 2d 3e | 70 6f 72 74 52 65 63 74 |hePort->|portRect|
|000015d0| 29 3b 0d 09 09 09 09 53 | 65 74 50 6f 72 74 28 73 |);.....S|etPort(s|
|000015e0| 63 72 65 65 6e 70 6f 72 | 74 29 3b 0d 09 09 09 7d |creenpor|t);....}|
|000015f0| 0d 09 09 09 62 72 65 61 | 6b 3b 0d 09 09 63 61 73 |....brea|k;...cas|
|00001600| 65 20 6d 6f 75 73 65 44 | 6f 77 6e 3a 09 09 09 2f |e mouseD|own:.../|
|00001610| 2a 20 61 20 6d 6f 75 73 | 65 20 63 6c 69 63 6b 20 |* a mous|e click |
|00001620| 73 6f 6d 65 70 6c 61 63 | 65 09 2a 2f 0d 09 09 09 |someplac|e.*/....|
|00001630| 77 69 6e 64 6f 77 63 6f | 64 65 20 3d 20 46 69 6e |windowco|de = Fin|
|00001640| 64 57 69 6e 64 6f 77 28 | 6d 79 65 76 65 6e 74 2e |dWindow(|myevent.|
|00001650| 77 68 65 72 65 2c 20 26 | 77 68 69 63 68 77 69 6e |where, &|whichwin|
|00001660| 64 6f 77 29 3b 0d 09 09 | 09 0d 09 09 09 73 77 69 |dow);...|.....swi|
|00001670| 74 63 68 20 28 77 69 6e | 64 6f 77 63 6f 64 65 29 |tch (win|dowcode)|
|00001680| 20 7b 0d 09 09 09 63 61 | 73 65 20 69 6e 53 79 73 | {....ca|se inSys|
|00001690| 57 69 6e 64 6f 77 3a 09 | 09 2f 2a 20 61 20 44 41 |Window:.|./* a DA|
|000016a0| 27 73 20 77 69 6e 64 6f | 77 20 2a 2f 0d 09 09 09 |'s windo|w */....|
|000016b0| 09 53 79 73 74 65 6d 43 | 6c 69 63 6b 28 26 6d 79 |.SystemC|lick(&my|
|000016c0| 65 76 65 6e 74 2c 20 77 | 68 69 63 68 77 69 6e 64 |event, w|hichwind|
|000016d0| 6f 77 29 3b 0d 09 09 09 | 09 62 72 65 61 6b 3b 0d |ow);....|.break;.|
|000016e0| 09 09 09 63 61 73 65 20 | 69 6e 4d 65 6e 75 42 61 |...case |inMenuBa|
|000016f0| 72 3a 09 09 09 2f 2a 20 | 61 20 6d 65 6e 75 20 69 |r:.../* |a menu i|
|00001700| 74 65 6d 20 2a 2f 0d 09 | 09 09 09 6d 65 6e 75 63 |tem */..|...menuc|
|00001710| 6f 6d 6d 61 6e 64 20 3d | 20 4d 65 6e 75 53 65 6c |ommand =| MenuSel|
|00001720| 65 63 74 28 6d 79 65 76 | 65 6e 74 2e 77 68 65 72 |ect(myev|ent.wher|
|00001730| 65 29 3b 0d 09 09 09 09 | 75 73 65 72 64 6f 6e 65 |e);.....|userdone|
|00001740| 20 3d 20 64 6f 63 6f 6d | 6d 61 6e 64 28 6d 65 6e | = docom|mand(men|
|00001750| 75 63 6f 6d 6d 61 6e 64 | 29 3b 0d 09 09 09 09 62 |ucommand|);.....b|
|00001760| 72 65 61 6b 3b 0d 09 09 | 09 63 61 73 65 20 69 6e |reak;...|.case in|
|00001770| 44 72 61 67 3a 09 09 09 | 2f 2a 20 54 69 74 6c 65 |Drag:...|/* Title|
|00001780| 20 42 61 72 20 2a 2f 0d | 0d 09 09 09 09 2f 2a 0d | Bar */.|...../*.|
|00001790| 09 09 09 09 20 2a 20 44 | 72 61 67 20 74 68 65 20 |.... * D|rag the |
|000017a0| 77 69 6e 64 6f 77 20 61 | 72 6f 75 6e 64 2e 0d 09 |window a|round...|
|000017b0| 09 09 09 20 2a 0d 09 09 | 09 09 20 2a 20 49 66 20 |... *...|.. * If |
|000017c0| 74 68 65 20 63 6c 69 63 | 6b 65 64 20 77 69 6e 64 |the clic|ked wind|
|000017d0| 6f 77 20 77 61 73 6e 27 | 74 20 73 65 6c 65 63 74 |ow wasn'|t select|
|000017e0| 65 64 0d 09 09 09 09 20 | 2a 20 28 61 6e 64 20 74 |ed..... |* (and t|
|000017f0| 68 69 73 20 77 61 73 6e | 27 74 20 61 20 63 6f 6d |his wasn|'t a com|
|00001800| 6d 61 6e 64 2d 63 6c 69 | 63 6b 29 2c 20 73 65 6c |mand-cli|ck), sel|
|00001810| 65 63 74 20 69 74 2e 0d | 09 09 09 09 20 2a 2f 0d |ect it..|.... */.|
|00001820| 0d 09 09 09 09 69 66 20 | 28 77 68 69 63 68 77 69 |.....if |(whichwi|
|00001830| 6e 64 6f 77 20 21 3d 20 | 46 72 6f 6e 74 57 69 6e |ndow != |FrontWin|
|00001840| 64 6f 77 28 29 20 26 26 | 0d 09 09 09 09 20 20 28 |dow() &&|..... (|
|00001850| 6d 79 65 76 65 6e 74 2e | 6d 6f 64 69 66 69 65 72 |myevent.|modifier|
|00001860| 73 20 26 20 63 6d 64 4b | 65 79 29 20 3d 3d 20 30 |s & cmdK|ey) == 0|
|00001870| 29 20 7b 0d 09 09 09 09 | 09 53 65 6c 65 63 74 57 |) {.....|.SelectW|
|00001880| 69 6e 64 6f 77 28 77 68 | 69 63 68 77 69 6e 64 6f |indow(wh|ichwindo|
|00001890| 77 29 3b 0d 09 09 09 09 | 7d 0d 0d 09 09 09 09 64 |w);.....|}......d|
|000018a0| 72 61 67 72 65 63 74 2e | 6c 65 66 74 20 3d 20 34 |ragrect.|left = 4|
|000018b0| 3b 0d 09 09 09 09 64 72 | 61 67 72 65 63 74 2e 74 |;.....dr|agrect.t|
|000018c0| 6f 70 20 3d 20 32 34 3b | 0d 09 09 09 09 64 72 61 |op = 24;|.....dra|
|000018d0| 67 72 65 63 74 2e 72 69 | 67 68 74 20 3d 20 73 63 |grect.ri|ght = sc|
|000018e0| 72 65 65 6e 42 69 74 73 | 2e 62 6f 75 6e 64 73 2e |reenBits|.bounds.|
|000018f0| 72 69 67 68 74 20 2d 20 | 34 3b 0d 09 09 09 09 64 |right - |4;.....d|
|00001900| 72 61 67 72 65 63 74 2e | 62 6f 74 74 6f 6d 20 3d |ragrect.|bottom =|
|00001910| 20 73 63 72 65 65 6e 42 | 69 74 73 2e 62 6f 75 6e | screenB|its.boun|
|00001920| 64 73 2e 62 6f 74 74 6f | 6d 20 2d 20 34 3b 0d 0d |ds.botto|m - 4;..|
|00001930| 09 09 09 09 44 72 61 67 | 57 69 6e 64 6f 77 28 77 |....Drag|Window(w|
|00001940| 68 69 63 68 77 69 6e 64 | 6f 77 2c 20 6d 79 65 76 |hichwind|ow, myev|
|00001950| 65 6e 74 2e 77 68 65 72 | 65 2c 20 26 64 72 61 67 |ent.wher|e, &drag|
|00001960| 72 65 63 74 29 3b 0d 09 | 09 09 09 62 72 65 61 6b |rect);..|...break|
|00001970| 3b 0d 09 09 09 63 61 73 | 65 20 69 6e 47 6f 41 77 |;....cas|e inGoAw|
|00001980| 61 79 3a 09 09 09 2f 2a | 20 43 6c 6f 73 65 20 62 |ay:.../*| Close b|
|00001990| 6f 78 09 2a 2f 0d 09 09 | 09 09 69 66 20 28 54 72 |ox.*/...|..if (Tr|
|000019a0| 61 63 6b 47 6f 41 77 61 | 79 28 77 68 69 63 68 77 |ackGoAwa|y(whichw|
|000019b0| 69 6e 64 6f 77 2c 20 6d | 79 65 76 65 6e 74 2e 77 |indow, m|yevent.w|
|000019c0| 68 65 72 65 29 29 20 7b | 0d 09 09 09 09 09 75 6e |here)) {|......un|
|000019d0| 6d 61 6b 65 77 69 6e 64 | 6f 77 28 77 68 69 63 68 |makewind|ow(which|
|000019e0| 77 69 6e 64 6f 77 29 3b | 0d 09 09 09 09 7d 0d 09 |window);|.....}..|
|000019f0| 09 09 09 62 72 65 61 6b | 3b 0d 09 09 09 63 61 73 |...break|;....cas|
|00001a00| 65 20 69 6e 5a 6f 6f 6d | 49 6e 3a 0d 09 09 09 63 |e inZoom|In:....c|
|00001a10| 61 73 65 20 69 6e 5a 6f | 6f 6d 4f 75 74 3a 09 09 |ase inZo|omOut:..|
|00001a20| 09 2f 2a 20 5a 6f 6f 6d | 20 62 6f 78 09 2a 2f 0d |./* Zoom| box.*/.|
|00001a30| 09 09 09 09 69 66 20 28 | 54 72 61 63 6b 42 6f 78 |....if (|TrackBox|
|00001a40| 28 77 68 69 63 68 77 69 | 6e 64 6f 77 2c 20 6d 79 |(whichwi|ndow, my|
|00001a50| 65 76 65 6e 74 2e 77 68 | 65 72 65 2c 20 77 69 6e |event.wh|ere, win|
|00001a60| 64 6f 77 63 6f 64 65 29 | 29 20 7b 0d 09 09 09 09 |dowcode)|) {.....|
|00001a70| 09 45 72 61 73 65 52 65 | 63 74 28 26 77 68 69 63 |.EraseRe|ct(&whic|
|00001a80| 68 77 69 6e 64 6f 77 2d | 3e 70 6f 72 74 52 65 63 |hwindow-|>portRec|
|00001a90| 74 29 3b 0d 09 09 09 09 | 09 5a 6f 6f 6d 57 69 6e |t);.....|.ZoomWin|
|00001aa0| 64 6f 77 28 77 68 69 63 | 68 77 69 6e 64 6f 77 2c |dow(whic|hwindow,|
|00001ab0| 20 77 69 6e 64 6f 77 63 | 6f 64 65 2c 20 46 41 4c | windowc|ode, FAL|
|00001ac0| 53 45 29 3b 0d 09 09 09 | 09 7d 0d 09 09 09 09 62 |SE);....|.}.....b|
|00001ad0| 72 65 61 6b 3b 0d 09 09 | 09 63 61 73 65 20 69 6e |reak;...|.case in|
|00001ae0| 47 72 6f 77 3a 09 09 09 | 2f 2a 20 69 6e 20 74 68 |Grow:...|/* in th|
|00001af0| 65 20 67 72 6f 77 20 72 | 65 67 69 6f 6e 20 2a 2f |e grow r|egion */|
|00001b00| 0d 09 09 09 09 6c 69 6d | 69 74 73 2e 74 6f 70 20 |.....lim|its.top |
|00001b10| 3d 20 31 35 3b 0d 09 09 | 09 09 6c 69 6d 69 74 73 |= 15;...|..limits|
|00001b20| 2e 6c 65 66 74 20 3d 20 | 31 35 3b 0d 09 09 09 09 |.left = |15;.....|
|00001b30| 6c 69 6d 69 74 73 2e 62 | 6f 74 74 6f 6d 20 3d 0d |limits.b|ottom =.|
|00001b40| 09 09 09 09 20 20 73 63 | 72 65 65 6e 70 6f 72 74 |.... sc|reenport|
|00001b50| 2d 3e 70 6f 72 74 52 65 | 63 74 2e 62 6f 74 74 6f |->portRe|ct.botto|
|00001b60| 6d 20 2d 20 73 63 72 65 | 65 6e 70 6f 72 74 2d 3e |m - scre|enport->|
|00001b70| 70 6f 72 74 52 65 63 74 | 2e 74 6f 70 3b 0d 09 09 |portRect|.top;...|
|00001b80| 09 09 6c 69 6d 69 74 73 | 2e 72 69 67 68 74 20 3d |..limits|.right =|
|00001b90| 0d 09 09 09 09 20 20 73 | 63 72 65 65 6e 70 6f 72 |..... s|creenpor|
|00001ba0| 74 2d 3e 70 6f 72 74 52 | 65 63 74 2e 72 69 67 68 |t->portR|ect.righ|
|00001bb0| 74 20 2d 20 73 63 72 65 | 65 6e 70 6f 72 74 2d 3e |t - scre|enport->|
|00001bc0| 70 6f 72 74 52 65 63 74 | 2e 6c 65 66 74 3b 0d 0d |portRect|.left;..|
|00001bd0| 09 09 09 09 6c 69 6d 69 | 74 73 2e 72 69 67 68 74 |....limi|ts.right|
|00001be0| 2b 2b 3b 09 09 2f 2a 20 | 28 74 6f 20 63 6f 6d 70 |++;../* |(to comp|
|00001bf0| 65 6e 73 61 74 65 20 66 | 6f 72 20 61 20 74 6f 6f |ensate f|or a too|
|00001c00| 6c 62 6f 78 20 62 75 67 | 29 20 2a 2f 0d 09 09 09 |lbox bug|) */....|
|00001c10| 09 6c 69 6d 69 74 73 2e | 62 6f 74 74 6f 6d 2b 2b |.limits.|bottom++|
|00001c20| 3b 09 2f 2a 20 28 64 69 | 74 74 6f 29 20 2a 2f 0d |;./* (di|tto) */.|
|00001c30| 09 09 09 09 0d 09 09 09 | 09 6e 65 77 64 69 6d 73 |........|.newdims|
|00001c40| 20 3d 20 47 72 6f 77 57 | 69 6e 64 6f 77 28 77 68 | = GrowW|indow(wh|
|00001c50| 69 63 68 77 69 6e 64 6f | 77 2c 20 6d 79 65 76 65 |ichwindo|w, myeve|
|00001c60| 6e 74 2e 77 68 65 72 65 | 2c 20 26 6c 69 6d 69 74 |nt.where|, &limit|
|00001c70| 73 29 3b 0d 09 09 09 09 | 69 66 20 28 6e 65 77 64 |s);.....|if (newd|
|00001c80| 69 6d 73 20 21 3d 20 30 | 4c 29 20 7b 0d 09 09 09 |ims != 0|L) {....|
|00001c90| 09 0d 09 09 09 09 09 2f | 2a 2a 2a 2a 2a 2a 2a 2a |......./|********|
|00001ca0| 2a 2a 0d 09 09 09 09 09 | 20 2a 20 48 65 72 65 27 |**......| * Here'|
|00001cb0| 73 20 6f 6e 65 20 6f 66 | 20 74 68 65 20 74 77 6f |s one of| the two|
|00001cc0| 20 69 6e 74 65 72 65 73 | 74 69 6e 67 20 70 61 72 | interes|ting par|
|00001cd0| 74 73 20 6f 66 20 74 68 | 69 73 20 70 72 6f 67 72 |ts of th|is progr|
|00001ce0| 61 6d 3a 0d 09 09 09 09 | 09 20 2a 0d 09 09 09 09 |am:.....|. *.....|
|00001cf0| 09 20 2a 20 49 66 20 74 | 68 65 20 6e 65 77 20 77 |. * If t|he new w|
|00001d00| 69 6e 64 6f 77 20 73 69 | 7a 65 20 69 73 20 73 6d |indow si|ze is sm|
|00001d10| 61 6c 6c 2c 20 69 74 20 | 69 73 20 66 6f 72 63 65 |all, it |is force|
|00001d20| 64 20 74 6f 20 62 65 0d | 09 09 09 09 09 20 2a 20 |d to be.|..... * |
|00001d30| 74 68 65 20 73 69 7a 65 | 20 6f 66 20 61 6e 20 69 |the size| of an i|
|00001d40| 63 6f 6e 2e 0d 09 09 09 | 09 09 20 2a 2a 2a 2a 2a |con.....|.. *****|
|00001d50| 2a 2a 2a 2a 2a 2f 0d 09 | 09 09 09 09 20 0d 09 09 |*****/..|.... ...|
|00001d60| 09 09 09 6e 65 77 77 69 | 64 74 68 20 3d 20 4c 6f |...newwi|dth = Lo|
|00001d70| 57 6f 72 64 28 6e 65 77 | 64 69 6d 73 29 3b 0d 09 |Word(new|dims);..|
|00001d80| 09 09 09 09 6e 65 77 68 | 65 69 67 68 74 20 3d 20 |....newh|eight = |
|00001d90| 48 69 57 6f 72 64 28 6e | 65 77 64 69 6d 73 29 3b |HiWord(n|ewdims);|
|00001da0| 0d 09 09 09 09 09 0d 09 | 09 09 09 09 69 66 20 28 |........|....if (|
|00001db0| 6e 65 77 77 69 64 74 68 | 20 3c 3d 20 53 4d 41 4c |newwidth| <= SMAL|
|00001dc0| 4c 57 49 44 54 48 20 7c | 7c 20 6e 65 77 68 65 69 |LWIDTH ||| newhei|
|00001dd0| 67 68 74 20 3c 3d 20 53 | 4d 41 4c 4c 48 45 49 47 |ght <= S|MALLHEIG|
|00001de0| 48 54 29 20 7b 0d 09 09 | 09 09 09 09 6e 65 77 77 |HT) {...|....neww|
|00001df0| 69 64 74 68 20 3d 20 49 | 43 4f 4e 53 49 5a 45 3b |idth = I|CONSIZE;|
|00001e00| 0d 09 09 09 09 09 09 6e | 65 77 68 65 69 67 68 74 |.......n|ewheight|
|00001e10| 20 3d 20 49 43 4f 4e 53 | 49 5a 45 3b 0d 09 09 09 | = ICONS|IZE;....|
|00001e20| 09 09 7d 0d 09 09 09 09 | 09 53 69 7a 65 57 69 6e |..}.....|.SizeWin|
|00001e30| 64 6f 77 28 77 68 69 63 | 68 77 69 6e 64 6f 77 2c |dow(whic|hwindow,|
|00001e40| 20 6e 65 77 77 69 64 74 | 68 2c 20 6e 65 77 68 65 | newwidt|h, newhe|
|00001e50| 69 67 68 74 2c 20 2d 31 | 29 3b 0d 09 09 09 09 09 |ight, -1|);......|
|00001e60| 49 6e 76 61 6c 52 65 63 | 74 28 26 74 68 65 50 6f |InvalRec|t(&thePo|
|00001e70| 72 74 2d 3e 70 6f 72 74 | 52 65 63 74 29 3b 0d 09 |rt->port|Rect);..|
|00001e80| 09 09 09 7d 0d 09 09 09 | 09 62 72 65 61 6b 3b 0d |...}....|.break;.|
|00001e90| 09 09 09 63 61 73 65 20 | 69 6e 43 6f 6e 74 65 6e |...case |inConten|
|00001ea0| 74 3a 09 09 09 2f 2a 20 | 53 6f 6d 65 77 68 65 72 |t:.../* |Somewher|
|00001eb0| 65 20 69 6e 20 74 68 65 | 20 77 69 6e 64 6f 77 20 |e in the| window |
|00001ec0| 2a 2f 0d 09 09 09 09 69 | 66 20 28 77 68 69 63 68 |*/.....i|f (which|
|00001ed0| 77 69 6e 64 6f 77 20 21 | 3d 20 46 72 6f 6e 74 57 |window !|= FrontW|
|00001ee0| 69 6e 64 6f 77 28 29 29 | 20 7b 0d 09 09 09 09 09 |indow())| {......|
|00001ef0| 2f 2a 20 74 68 65 20 77 | 69 6e 64 6f 77 20 69 73 |/* the w|indow is|
|00001f00| 6e 27 74 20 61 63 74 69 | 76 65 20 2d 20 6a 75 73 |n't acti|ve - jus|
|00001f10| 74 20 61 63 74 69 76 61 | 74 65 20 69 74 20 2a 2f |t activa|te it */|
|00001f20| 0d 09 09 09 09 09 53 65 | 6c 65 63 74 57 69 6e 64 |......Se|lectWind|
|00001f30| 6f 77 28 77 68 69 63 68 | 77 69 6e 64 6f 77 29 3b |ow(which|window);|
|00001f40| 0d 09 09 09 09 7d 20 65 | 6c 73 65 20 7b 0d 0d 09 |.....} e|lse {...|
|00001f50| 09 09 09 09 2f 2a 0d 09 | 09 09 09 09 20 2a 20 54 |..../*..|.... * T|
|00001f60| 68 65 20 77 69 6e 64 6f | 77 20 69 73 20 61 63 74 |he windo|w is act|
|00001f70| 69 76 65 2c 0d 09 09 09 | 09 09 20 2a 20 20 20 69 |ive,....|.. * i|
|00001f80| 6e 74 65 72 70 72 65 74 | 20 74 68 65 20 6d 6f 75 |nterpret| the mou|
|00001f90| 73 65 2d 64 6f 77 6e 20 | 69 6e 20 74 68 69 73 20 |se-down |in this |
|00001fa0| 77 69 6e 64 6f 77 27 73 | 20 63 6f 6e 74 65 78 74 |window's| context|
|00001fb0| 2e 0d 09 09 09 09 09 20 | 2a 2f 0d 0d 09 09 09 09 |....... |*/......|
|00001fc0| 09 47 6c 6f 62 61 6c 54 | 6f 4c 6f 63 61 6c 28 26 |.GlobalT|oLocal(&|
|00001fd0| 6d 79 65 76 65 6e 74 2e | 77 68 65 72 65 29 3b 0d |myevent.|where);.|
|00001fe0| 09 09 09 09 7d 0d 09 09 | 09 7d 0d 09 09 09 62 72 |....}...|.}....br|
|00001ff0| 65 61 6b 3b 0d 09 09 7d | 0d 09 7d 0d 09 72 65 74 |eak;...}|..}..ret|
|00002000| 75 72 6e 28 21 75 73 65 | 72 64 6f 6e 65 29 3b 0d |urn(!use|rdone);.|
|00002010| 7d 0d 0d 2f 2a 0d 20 2a | 20 64 6f 63 6f 6d 6d 61 |}../*. *| docomma|
|00002020| 6e 64 28 29 20 2d 20 68 | 61 6e 64 6c 65 20 61 20 |nd() - h|andle a |
|00002030| 63 6f 6d 6d 61 6e 64 20 | 67 69 76 65 6e 20 74 68 |command |given th|
|00002040| 72 6f 75 67 68 20 61 20 | 6d 65 6e 75 20 73 65 6c |rough a |menu sel|
|00002050| 65 63 74 69 6f 6e 2e 0d | 20 2a 2f 0d 0d 69 6e 74 |ection..| */..int|
|00002060| 09 09 2f 2a 20 22 74 68 | 65 20 63 6f 6d 6d 61 6e |../* "th|e comman|
|00002070| 64 20 77 61 73 20 27 71 | 75 69 74 27 20 2a 2f 0d |d was 'q|uit' */.|
|00002080| 64 6f 63 6f 6d 6d 61 6e | 64 28 6d 72 65 73 75 6c |docomman|d(mresul|
|00002090| 74 29 0d 6c 6f 6e 67 09 | 6d 72 65 73 75 6c 74 3b |t).long.|mresult;|
|000020a0| 09 2f 2a 20 74 68 65 20 | 63 6f 6d 6d 61 6e 64 20 |./* the |command |
|000020b0| 74 6f 20 65 78 65 63 75 | 74 65 20 28 61 20 6d 65 |to execu|te (a me|
|000020c0| 6e 75 20 69 74 65 6d 29 | 09 2a 2f 0d 7b 0d 09 69 |nu item)|.*/.{..i|
|000020d0| 6e 74 20 74 68 65 6d 65 | 6e 75 3b 09 09 2f 2a 20 |nt theme|nu;../* |
|000020e0| 6d 65 6e 75 20 74 68 65 | 20 6d 6f 75 73 65 20 63 |menu the| mouse c|
|000020f0| 68 6f 73 65 20 2a 2f 0d | 09 69 6e 74 20 74 68 65 |hose */.|.int the|
|00002100| 69 74 65 6d 3b 09 09 2f | 2a 20 69 74 65 6d 20 69 |item;../|* item i|
|00002110| 6e 20 74 68 61 74 20 6d | 65 6e 75 20 2a 2f 0d 09 |n that m|enu */..|
|00002120| 69 6e 74 09 20 72 65 74 | 75 72 6e 73 3b 09 09 2f |int. ret|urns;../|
|00002130| 2a 20 76 61 6c 75 65 20 | 74 6f 20 62 65 20 72 65 |* value |to be re|
|00002140| 74 75 72 6e 65 64 20 2a | 2f 0d 09 73 68 6f 72 74 |turned *|/..short|
|00002150| 20 69 74 65 6d 68 69 74 | 3b 09 09 0d 09 44 69 61 | itemhit|;....Dia|
|00002160| 6c 6f 67 50 74 72 20 72 | 65 70 6f 72 74 70 74 72 |logPtr r|eportptr|
|00002170| 3b 0d 0d 09 72 65 74 75 | 72 6e 73 20 3d 20 46 41 |;...retu|rns = FA|
|00002180| 4c 53 45 3b 0d 09 74 68 | 65 6d 65 6e 75 20 3d 20 |LSE;..th|emenu = |
|00002190| 48 69 57 6f 72 64 28 6d | 72 65 73 75 6c 74 29 3b |HiWord(m|result);|
|000021a0| 0d 09 74 68 65 69 74 65 | 6d 20 3d 20 4c 6f 57 6f |..theite|m = LoWo|
|000021b0| 72 64 28 6d 72 65 73 75 | 6c 74 29 3b 0d 09 0d 09 |rd(mresu|lt);....|
|000021c0| 73 77 69 74 63 68 20 28 | 74 68 65 6d 65 6e 75 29 |switch (|themenu)|
|000021d0| 20 7b 0d 09 63 61 73 65 | 20 41 50 50 4c 45 4d 45 | {..case| APPLEME|
|000021e0| 4e 55 3a 09 09 09 2f 2a | 20 54 65 6c 6c 20 61 62 |NU:.../*| Tell ab|
|000021f0| 6f 75 74 20 74 68 65 20 | 70 72 6f 67 72 61 6d 20 |out the |program |
|00002200| 2a 2f 0d 09 09 72 65 70 | 6f 72 74 70 74 72 20 3d |*/...rep|ortptr =|
|00002210| 20 47 65 74 4e 65 77 44 | 69 61 6c 6f 67 28 44 4c | GetNewD|ialog(DL|
|00002220| 47 5f 41 42 4f 55 54 2c | 20 28 63 68 61 72 20 2a |G_ABOUT,| (char *|
|00002230| 29 20 30 2c 20 28 6c 6f | 6e 67 29 20 2d 31 29 3b |) 0, (lo|ng) -1);|
|00002240| 0d 09 09 4d 6f 64 61 6c | 44 69 61 6c 6f 67 28 28 |...Modal|Dialog((|
|00002250| 50 72 6f 63 50 74 72 29 | 20 30 2c 20 26 69 74 65 |ProcPtr)| 0, &ite|
|00002260| 6d 68 69 74 29 3b 0d 09 | 09 44 69 73 70 6f 73 44 |mhit);..|.DisposD|
|00002270| 69 61 6c 6f 67 28 72 65 | 70 6f 72 74 70 74 72 29 |ialog(re|portptr)|
|00002280| 3b 0d 09 09 62 72 65 61 | 6b 3b 0d 0d 09 63 61 73 |;...brea|k;...cas|
|00002290| 65 20 46 49 4c 45 4d 45 | 4e 55 3a 0d 09 09 73 77 |e FILEME|NU:...sw|
|000022a0| 69 74 63 68 20 28 74 68 | 65 69 74 65 6d 29 20 7b |itch (th|eitem) {|
|000022b0| 0d 09 09 63 61 73 65 20 | 4e 45 57 46 49 4c 45 3a |...case |NEWFILE:|
|000022c0| 09 09 2f 2a 20 63 72 65 | 61 74 65 20 61 20 6e 65 |../* cre|ate a ne|
|000022d0| 77 20 77 69 6e 64 6f 77 | 20 28 69 66 20 77 65 20 |w window| (if we |
|000022e0| 63 61 6e 29 20 2a 2f 0d | 09 09 09 6d 61 6b 65 77 |can) */.|...makew|
|000022f0| 69 6e 64 6f 77 28 29 3b | 0d 09 09 09 62 72 65 61 |indow();|....brea|
|00002300| 6b 3b 0d 09 09 63 61 73 | 65 20 51 55 49 54 46 49 |k;...cas|e QUITFI|
|00002310| 4c 45 3a 09 09 2f 2a 20 | 71 75 69 74 20 74 68 65 |LE:../* |quit the|
|00002320| 20 70 72 6f 67 72 61 6d | 20 2a 2f 0d 09 09 09 72 | program| */....r|
|00002330| 65 74 75 72 6e 73 20 3d | 20 54 52 55 45 3b 0d 09 |eturns =| TRUE;..|
|00002340| 09 09 62 72 65 61 6b 3b | 0d 09 09 7d 0d 09 09 62 |..break;|...}...b|
|00002350| 72 65 61 6b 3b 0d 09 7d | 0d 09 48 69 6c 69 74 65 |reak;..}|..Hilite|
|00002360| 4d 65 6e 75 28 30 29 3b | 0d 09 72 65 74 75 72 6e |Menu(0);|..return|
|00002370| 28 72 65 74 75 72 6e 73 | 29 3b 0d 7d 0d 0d 2f 2a |(returns|);.}../*|
|00002380| 0d 20 2a 20 64 72 61 77 | 77 69 6e 64 6f 77 28 29 |. * draw|window()|
|00002390| 20 2d 20 64 72 61 77 20 | 74 68 65 20 67 69 76 65 | - draw |the give|
|000023a0| 6e 20 77 69 6e 64 6f 77 | 27 73 20 63 6f 6e 74 65 |n window|'s conte|
|000023b0| 6e 74 73 20 69 6e 74 6f | 20 74 68 65 20 63 75 72 |nts into| the cur|
|000023c0| 72 65 6e 74 20 70 6f 72 | 74 2e 0d 20 2a 2f 0d 0d |rent por|t.. */..|
|000023d0| 64 72 61 77 77 69 6e 64 | 6f 77 28 77 69 6e 64 70 |drawwind|ow(windp|
|000023e0| 29 0d 57 69 6e 64 6f 77 | 50 74 72 20 77 69 6e 64 |).Window|Ptr wind|
|000023f0| 70 3b 0d 7b 0d 09 69 6e | 74 20 77 69 64 78 3b 0d |p;.{..in|t widx;.|
|00002400| 09 48 61 6e 64 6c 65 20 | 69 63 6f 6e 68 3b 09 2f |.Handle |iconh;./|
|00002410| 2a 20 61 6e 20 69 63 6f | 6e 20 74 6f 20 64 72 61 |* an ico|n to dra|
|00002420| 77 20 2a 2f 0d 09 52 65 | 63 74 20 74 6d 70 72 65 |w */..Re|ct tmpre|
|00002430| 63 74 3b 09 2f 2a 20 61 | 20 74 65 6d 70 6f 72 61 |ct;./* a| tempora|
|00002440| 72 79 20 72 65 63 74 61 | 6e 67 6c 65 20 2a 2f 0d |ry recta|ngle */.|
|00002450| 09 52 67 6e 48 61 6e 64 | 6c 65 20 6f 6c 64 63 6c |.RgnHand|le oldcl|
|00002460| 69 70 3b 09 2f 2a 20 6f | 72 69 67 69 6e 61 6c 20 |ip;./* o|riginal |
|00002470| 63 6c 69 70 20 72 65 67 | 69 6f 6e 20 74 6f 20 72 |clip reg|ion to r|
|00002480| 65 73 74 6f 72 65 20 2a | 2f 0d 09 0d 09 66 6f 72 |estore *|/....for|
|00002490| 20 28 77 69 64 78 20 3d | 20 30 3b 20 77 69 64 78 | (widx =| 0; widx|
|000024a0| 20 3c 20 4e 55 4d 5f 57 | 49 4e 44 4f 57 53 20 26 | < NUM_W|INDOWS &|
|000024b0| 26 20 77 69 6e 64 70 20 | 21 3d 20 77 69 6e 64 6f |& windp |!= windo|
|000024c0| 63 5b 77 69 64 78 5d 3b | 20 2b 2b 77 69 64 78 29 |c[widx];| ++widx)|
|000024d0| 0d 09 09 3b 0d 09 69 66 | 20 28 77 69 64 78 20 3e |...;..if| (widx >|
|000024e0| 3d 20 4e 55 4d 5f 57 49 | 4e 44 4f 57 53 29 20 72 |= NUM_WI|NDOWS) r|
|000024f0| 65 74 75 72 6e 3b 0d 0d | 09 45 72 61 73 65 52 67 |eturn;..|.EraseRg|
|00002500| 6e 28 74 68 65 50 6f 72 | 74 2d 3e 76 69 73 52 67 |n(thePor|t->visRg|
|00002510| 6e 29 3b 0d 09 0d 0d 09 | 2f 2a 2a 2a 2a 2a 2a 2a |n);.....|/*******|
|00002520| 2a 2a 2a 0d 09 20 2a 20 | 48 65 72 65 27 73 20 74 |***.. * |Here's t|
|00002530| 68 65 20 6f 74 68 65 72 | 20 69 6e 74 65 72 65 73 |he other| interes|
|00002540| 74 69 6e 67 20 70 61 72 | 74 20 6f 66 20 74 68 69 |ting par|t of thi|
|00002550| 73 20 70 72 6f 67 72 61 | 6d 3a 0d 09 20 2a 0d 09 |s progra|m:.. *..|
|00002560| 20 2a 20 49 66 20 74 68 | 65 20 77 69 6e 64 6f 77 | * If th|e window|
|00002570| 20 69 73 20 73 6d 61 6c | 6c 2c 20 61 6e 20 69 63 | is smal|l, an ic|
|00002580| 6f 6e 20 69 73 20 64 72 | 61 77 6e 20 69 6e 20 69 |on is dr|awn in i|
|00002590| 74 0d 09 20 2a 20 28 72 | 61 74 68 65 72 20 74 68 |t.. * (r|ather th|
|000025a0| 61 6e 20 69 74 73 20 6e | 6f 72 6d 61 6c 20 73 74 |an its n|ormal st|
|000025b0| 75 66 66 29 2e 0d 09 20 | 2a 2a 2a 2a 2a 2a 2a 2a |uff)... |********|
|000025c0| 2a 2a 2f 0d 09 20 0d 09 | 69 66 20 28 74 68 65 50 |**/.. ..|if (theP|
|000025d0| 6f 72 74 2d 3e 70 6f 72 | 74 52 65 63 74 2e 72 69 |ort->por|tRect.ri|
|000025e0| 67 68 74 20 2d 20 74 68 | 65 50 6f 72 74 2d 3e 70 |ght - th|ePort->p|
|000025f0| 6f 72 74 52 65 63 74 2e | 6c 65 66 74 20 3c 3d 20 |ortRect.|left <= |
|00002600| 53 4d 41 4c 4c 57 49 44 | 54 48 20 7c 7c 0d 09 20 |SMALLWID|TH ||.. |
|00002610| 20 74 68 65 50 6f 72 74 | 2d 3e 70 6f 72 74 52 65 | thePort|->portRe|
|00002620| 63 74 2e 62 6f 74 74 6f | 6d 20 2d 20 74 68 65 50 |ct.botto|m - theP|
|00002630| 6f 72 74 2d 3e 70 6f 72 | 74 52 65 63 74 2e 74 6f |ort->por|tRect.to|
|00002640| 70 20 3c 3d 20 53 4d 41 | 4c 4c 48 45 49 47 48 54 |p <= SMA|LLHEIGHT|
|00002650| 29 20 7b 0d 09 09 0d 09 | 09 2f 2a 0d 09 09 20 2a |) {.....|./*... *|
|00002660| 20 49 74 27 73 20 61 20 | 63 6f 6c 6c 61 70 73 65 | It's a |collapse|
|00002670| 64 20 77 69 6e 64 6f 77 | 20 2d 2d 20 64 72 61 77 |d window| -- draw|
|00002680| 20 6f 75 72 20 69 63 6f | 6e 20 69 6e 20 69 74 2e | our ico|n in it.|
|00002690| 0d 09 09 20 2a 2f 0d 09 | 09 0d 09 09 74 6d 70 72 |... */..|....tmpr|
|000026a0| 65 63 74 2e 6c 65 66 74 | 20 3d 20 30 3b 0d 09 09 |ect.left| = 0;...|
|000026b0| 74 6d 70 72 65 63 74 2e | 74 6f 70 20 3d 20 30 3b |tmprect.|top = 0;|
|000026c0| 0d 09 09 74 6d 70 72 65 | 63 74 2e 72 69 67 68 74 |...tmpre|ct.right|
|000026d0| 20 3d 20 74 6d 70 72 65 | 63 74 2e 6c 65 66 74 20 | = tmpre|ct.left |
|000026e0| 2b 20 33 32 3b 0d 09 09 | 74 6d 70 72 65 63 74 2e |+ 32;...|tmprect.|
|000026f0| 62 6f 74 74 6f 6d 20 3d | 20 74 6d 70 72 65 63 74 |bottom =| tmprect|
|00002700| 2e 74 6f 70 20 2b 20 33 | 32 3b 0d 09 09 69 63 6f |.top + 3|2;...ico|
|00002710| 6e 68 20 3d 20 47 65 74 | 49 63 6f 6e 28 49 43 4f |nh = Get|Icon(ICO|
|00002720| 4e 49 44 29 3b 0d 09 09 | 50 6c 6f 74 49 63 6f 6e |NID);...|PlotIcon|
|00002730| 28 26 74 6d 70 72 65 63 | 74 2c 20 69 63 6f 6e 68 |(&tmprec|t, iconh|
|00002740| 29 3b 0d 0d 09 7d 20 65 | 6c 73 65 20 7b 0d 09 0d |);...} e|lse {...|
|00002750| 09 09 2f 2a 0d 09 09 20 | 2a 20 49 74 27 73 20 61 |../*... |* It's a|
|00002760| 20 73 74 61 6e 64 61 72 | 64 20 77 69 6e 64 6f 77 | standar|d window|
|00002770| 20 2d 2d 20 64 72 61 77 | 20 73 6f 6d 65 74 68 69 | -- draw| somethi|
|00002780| 6e 67 20 69 6e 74 65 72 | 65 73 74 69 6e 67 0d 09 |ng inter|esting..|
|00002790| 09 20 2a 20 65 78 63 6c | 75 64 69 6e 67 20 74 68 |. * excl|uding th|
|000027a0| 65 20 73 63 72 6f 6c 6c | 62 61 72 20 61 72 65 61 |e scroll|bar area|
|000027b0| 2e 0d 09 09 20 2a 2f 0d | 09 09 0d 09 09 74 6d 70 |.... */.|.....tmp|
|000027c0| 72 65 63 74 20 3d 20 74 | 68 65 50 6f 72 74 2d 3e |rect = t|hePort->|
|000027d0| 70 6f 72 74 52 65 63 74 | 3b 0d 09 09 74 6d 70 72 |portRect|;...tmpr|
|000027e0| 65 63 74 2e 72 69 67 68 | 74 20 2d 3d 20 31 35 3b |ect.righ|t -= 15;|
|000027f0| 0d 09 09 74 6d 70 72 65 | 63 74 2e 62 6f 74 74 6f |...tmpre|ct.botto|
|00002800| 6d 20 2d 3d 20 31 35 3b | 0d 09 09 6f 6c 64 63 6c |m -= 15;|...oldcl|
|00002810| 69 70 20 3d 20 4e 65 77 | 52 67 6e 28 29 3b 0d 09 |ip = New|Rgn();..|
|00002820| 09 69 66 20 28 6f 6c 64 | 63 6c 69 70 29 20 7b 0d |.if (old|clip) {.|
|00002830| 09 09 09 47 65 74 43 6c | 69 70 28 6f 6c 64 63 6c |...GetCl|ip(oldcl|
|00002840| 69 70 29 3b 0d 09 09 09 | 52 65 63 74 52 67 6e 28 |ip);....|RectRgn(|
|00002850| 74 68 65 50 6f 72 74 2d | 3e 63 6c 69 70 52 67 6e |thePort-|>clipRgn|
|00002860| 2c 20 26 74 6d 70 72 65 | 63 74 29 3b 0d 09 09 09 |, &tmpre|ct);....|
|00002870| 53 65 63 74 52 67 6e 28 | 6f 6c 64 63 6c 69 70 2c |SectRgn(|oldclip,|
|00002880| 20 74 68 65 50 6f 72 74 | 2d 3e 63 6c 69 70 52 67 | thePort|->clipRg|
|00002890| 6e 2c 20 74 68 65 50 6f | 72 74 2d 3e 63 6c 69 70 |n, thePo|rt->clip|
|000028a0| 52 67 6e 29 3b 0d 09 09 | 7d 0d 09 09 54 65 78 74 |Rgn);...|}...Text|
|000028b0| 42 6f 78 28 22 54 68 65 | 20 57 44 45 46 20 61 63 |Box("The| WDEF ac|
|000028c0| 74 73 20 6c 69 6b 65 20 | 61 20 73 74 61 6e 64 61 |ts like |a standa|
|000028d0| 72 64 20 77 69 6e 64 6f | 77 20 75 6e 74 69 6c 20 |rd windo|w until |
|000028e0| 69 74 20 73 68 72 69 6e | 6b 73 20 5c 0d 70 61 73 |it shrin|ks \.pas|
|000028f0| 74 20 61 20 63 65 72 74 | 61 69 6e 20 70 6f 69 6e |t a cert|ain poin|
|00002900| 74 2e 22 2c 20 37 35 4c | 2c 20 26 74 6d 70 72 65 |t.", 75L|, &tmpre|
|00002910| 63 74 2c 20 74 65 4a 75 | 73 74 4c 65 66 74 29 3b |ct, teJu|stLeft);|
|00002920| 0d 09 09 69 66 20 28 6f | 6c 64 63 6c 69 70 29 20 |...if (o|ldclip) |
|00002930| 7b 0d 09 09 09 53 65 74 | 43 6c 69 70 28 6f 6c 64 |{....Set|Clip(old|
|00002940| 63 6c 69 70 29 3b 0d 09 | 09 09 44 69 73 70 6f 73 |clip);..|..Dispos|
|00002950| 65 52 67 6e 28 6f 6c 64 | 63 6c 69 70 29 3b 0d 09 |eRgn(old|clip);..|
|00002960| 09 7d 0d 09 09 44 72 61 | 77 47 72 6f 77 49 63 6f |.}...Dra|wGrowIco|
|00002970| 6e 28 77 69 6e 64 70 29 | 3b 0d 09 7d 0d 7d 0d 00 |n(windp)|;..}.}..|
+--------+-------------------------+-------------------------+--------+--------+
