BBS in a Box 15

home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 15 / BBS in a box XV-2.iso / Files II / Prog / S / SpriteWorld 1.0b4.sit / SpriteWorld / Examples / SpriteTest / Application.c < prev next >
MacBinary | 1994-05-01 | 16.0 KB | [TEXT/KAHL]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: Application.c
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	Compact Compressed (Unix) `(archive/compact)`	ext	Supported
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Sun May 1 00:36:56 1994, modified Sun May 1 00:36:56 1994, creator Think C, type ASCII, 15729 bytes "Application.c" , at 0x3df1 490 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[KAHL]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0d 41 70 70 6c 69 63 | 61 74 69 6f 6e 2e 63 00 |..Applic|ation.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 01 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 00 3d 71 00 | 00 01 ea a9 e8 e2 68 a9 |.....=q.|......h.|
|00000060| e8 e2 68 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |..h.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 01 ef 00 00 |........|........|
|00000080| 2f 2f 2f 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |///-----|--------|
|00000090| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 2f 2f 09 41 70 70 |--------|-.//.App|
|000000e0| 6c 69 63 61 74 69 6f 6e | 2e 63 0d 2f 2f 0d 2f 2f |lication|.c.//.//|
|000000f0| 09 43 72 65 61 74 65 64 | 3a 09 53 75 6e 64 61 79 |.Created|:.Sunday|
|00000100| 2c 20 41 70 72 69 6c 20 | 31 31 2c 20 31 39 39 33 |, April |11, 1993|
|00000110| 0d 2f 2f 09 42 79 3a 09 | 09 09 54 6f 6e 79 20 4d |.//.By:.|..Tony M|
|00000120| 79 6c 65 73 0d 2f 2f 0d | 2f 2f 09 43 6f 70 79 72 |yles.//.|//.Copyr|
|00000130| 69 67 68 74 3a 20 a9 20 | 31 39 39 33 2d 39 34 20 |ight: . |1993-94 |
|00000140| 54 6f 6e 79 20 4d 79 6c | 65 73 2c 20 41 6c 6c 20 |Tony Myl|es, All |
|00000150| 72 69 67 68 74 73 20 72 | 65 73 65 72 76 65 64 20 |rights r|eserved |
|00000160| 77 6f 72 6c 64 77 69 64 | 65 2e 0d 2f 2f 2f 2d 2d |worldwid|e..///--|
|00000170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000180| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000190| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000001a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000001b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000001c0| 2d 2d 2d 2d 0d 0d 0d 23 | 69 66 20 54 48 49 4e 4b |----...#|if THINK|
|000001d0| 5f 43 0d 23 69 66 6e 64 | 65 66 20 5f 5f 42 44 43 |_C.#ifnd|ef __BDC|
|000001e0| 5f 5f 0d 23 69 6e 63 6c | 75 64 65 20 3c 42 44 43 |__.#incl|ude <BDC|
|000001f0| 2e 68 3e 0d 23 65 6e 64 | 69 66 0d 23 65 6c 73 65 |.h>.#end|if.#else|
|00000200| 0d 23 69 66 6e 64 65 66 | 20 5f 5f 50 41 43 4b 41 |.#ifndef| __PACKA|
|00000210| 47 45 53 5f 5f 0d 23 69 | 6e 63 6c 75 64 65 20 3c |GES__.#i|nclude <|
|00000220| 50 61 63 6b 61 67 65 73 | 2e 68 3e 0d 23 65 6e 64 |Packages|.h>.#end|
|00000230| 69 66 0d 23 65 6e 64 69 | 66 0d 0d 23 69 66 6e 64 |if.#endi|f..#ifnd|
|00000240| 65 66 20 5f 5f 41 50 50 | 4c 45 45 56 45 4e 54 53 |ef __APP|LEEVENTS|
|00000250| 5f 5f 0d 23 69 6e 63 6c | 75 64 65 20 3c 41 70 70 |__.#incl|ude <App|
|00000260| 6c 65 45 76 65 6e 74 73 | 2e 68 3e 0d 23 65 6e 64 |leEvents|.h>.#end|
|00000270| 69 66 0d 0d 23 69 66 6e | 64 65 66 20 5f 5f 4f 53 |if..#ifn|def __OS|
|00000280| 55 54 49 4c 53 5f 5f 0d | 23 69 6e 63 6c 75 64 65 |UTILS__.|#include|
|00000290| 20 3c 4f 53 55 74 69 6c | 73 2e 68 3e 0d 23 65 6e | <OSUtil|s.h>.#en|
|000002a0| 64 69 66 0d 0d 23 69 66 | 6e 64 65 66 20 5f 5f 44 |dif..#if|ndef __D|
|000002b0| 45 53 4b 5f 5f 0d 23 69 | 6e 63 6c 75 64 65 20 3c |ESK__.#i|nclude <|
|000002c0| 44 65 73 6b 2e 68 3e 0d | 23 65 6e 64 69 66 0d 0d |Desk.h>.|#endif..|
|000002d0| 23 69 66 6e 64 65 66 20 | 5f 5f 44 49 41 4c 4f 47 |#ifndef |__DIALOG|
|000002e0| 53 5f 5f 0d 23 69 6e 63 | 6c 75 64 65 20 3c 44 69 |S__.#inc|lude <Di|
|000002f0| 61 6c 6f 67 73 2e 68 3e | 0d 23 65 6e 64 69 66 0d |alogs.h>|.#endif.|
|00000300| 0d 23 69 66 6e 64 65 66 | 20 5f 5f 44 49 53 4b 49 |.#ifndef| __DISKI|
|00000310| 4e 49 54 5f 5f 0d 23 69 | 6e 63 6c 75 64 65 20 3c |NIT__.#i|nclude <|
|00000320| 44 69 73 6b 49 6e 69 74 | 2e 68 3e 0d 23 65 6e 64 |DiskInit|.h>.#end|
|00000330| 69 66 0d 0d 23 69 66 6e | 64 65 66 20 5f 5f 45 50 |if..#ifn|def __EP|
|00000340| 50 43 5f 5f 0d 23 69 6e | 63 6c 75 64 65 20 3c 45 |PC__.#in|clude <E|
|00000350| 50 50 43 2e 68 3e 0d 23 | 65 6e 64 69 66 0d 0d 23 |PPC.h>.#|endif..#|
|00000360| 69 66 6e 64 65 66 20 5f | 5f 45 56 45 4e 54 53 5f |ifndef _|_EVENTS_|
|00000370| 5f 0d 23 69 6e 63 6c 75 | 64 65 20 3c 45 76 65 6e |_.#inclu|de <Even|
|00000380| 74 73 2e 68 3e 0d 23 65 | 6e 64 69 66 0d 0d 23 69 |ts.h>.#e|ndif..#i|
|00000390| 66 6e 64 65 66 20 5f 5f | 45 52 52 4f 52 53 5f 5f |fndef __|ERRORS__|
|000003a0| 0d 23 69 6e 63 6c 75 64 | 65 20 3c 45 72 72 6f 72 |.#includ|e <Error|
|000003b0| 73 2e 68 3e 0d 23 65 6e | 64 69 66 0d 0d 23 69 66 |s.h>.#en|dif..#if|
|000003c0| 6e 64 65 66 20 5f 5f 46 | 4f 4e 54 53 5f 5f 0d 23 |ndef __F|ONTS__.#|
|000003d0| 69 6e 63 6c 75 64 65 20 | 3c 46 6f 6e 74 73 2e 68 |include |<Fonts.h|
|000003e0| 3e 0d 23 65 6e 64 69 66 | 0d 0d 23 69 66 6e 64 65 |>.#endif|..#ifnde|
|000003f0| 66 20 5f 5f 47 45 53 54 | 41 4c 54 45 51 55 5f 5f |f __GEST|ALTEQU__|
|00000400| 0d 23 69 6e 63 6c 75 64 | 65 20 3c 47 65 73 74 61 |.#includ|e <Gesta|
|00000410| 6c 74 45 71 75 2e 68 3e | 0d 23 65 6e 64 69 66 0d |ltEqu.h>|.#endif.|
|00000420| 0d 23 69 66 6e 64 65 66 | 20 5f 5f 4d 45 4e 55 53 |.#ifndef| __MENUS|
|00000430| 5f 5f 0d 23 69 6e 63 6c | 75 64 65 20 3c 4d 65 6e |__.#incl|ude <Men|
|00000440| 75 73 2e 68 3e 0d 23 65 | 6e 64 69 66 0d 0d 23 69 |us.h>.#e|ndif..#i|
|00000450| 66 6e 64 65 66 20 5f 5f | 52 45 53 4f 55 52 43 45 |fndef __|RESOURCE|
|00000460| 53 5f 5f 0d 23 69 6e 63 | 6c 75 64 65 20 3c 52 65 |S__.#inc|lude <Re|
|00000470| 73 6f 75 72 63 65 73 2e | 68 3e 0d 23 65 6e 64 69 |sources.|h>.#endi|
|00000480| 66 0d 0d 23 69 66 6e 64 | 65 66 20 5f 5f 4f 53 45 |f..#ifnd|ef __OSE|
|00000490| 56 45 4e 54 53 5f 5f 0d | 23 69 6e 63 6c 75 64 65 |VENTS__.|#include|
|000004a0| 20 3c 4f 53 45 76 65 6e | 74 73 2e 68 3e 0d 23 65 | <OSEven|ts.h>.#e|
|000004b0| 6e 64 69 66 0d 0d 23 69 | 66 6e 64 65 66 20 5f 5f |ndif..#i|fndef __|
|000004c0| 54 45 58 54 45 44 49 54 | 5f 5f 0d 23 69 6e 63 6c |TEXTEDIT|__.#incl|
|000004d0| 75 64 65 20 3c 54 65 78 | 74 45 64 69 74 2e 68 3e |ude <Tex|tEdit.h>|
|000004e0| 0d 23 65 6e 64 69 66 0d | 0d 23 69 66 6e 64 65 66 |.#endif.|.#ifndef|
|000004f0| 20 5f 5f 54 52 41 50 53 | 5f 5f 0d 23 69 6e 63 6c | __TRAPS|__.#incl|
|00000500| 75 64 65 20 3c 54 72 61 | 70 73 2e 68 3e 0d 23 65 |ude <Tra|ps.h>.#e|
|00000510| 6e 64 69 66 0d 0d 23 69 | 66 6e 64 65 66 20 5f 5f |ndif..#i|fndef __|
|00000520| 54 4f 4f 4c 55 54 49 4c | 53 5f 5f 0d 23 69 6e 63 |TOOLUTIL|S__.#inc|
|00000530| 6c 75 64 65 20 3c 54 6f | 6f 6c 55 74 69 6c 73 2e |lude <To|olUtils.|
|00000540| 68 3e 0d 23 65 6e 64 69 | 66 0d 0d 23 69 66 6e 64 |h>.#endi|f..#ifnd|
|00000550| 65 66 20 5f 5f 57 49 4e | 44 4f 57 53 5f 5f 0d 23 |ef __WIN|DOWS__.#|
|00000560| 69 6e 63 6c 75 64 65 20 | 3c 57 69 6e 64 6f 77 73 |include |<Windows|
|00000570| 2e 68 3e 0d 23 65 6e 64 | 69 66 0d 0d 23 69 66 6e |.h>.#end|if..#ifn|
|00000580| 64 65 66 20 5f 5f 53 50 | 52 49 54 45 57 4f 52 4c |def __SP|RITEWORL|
|00000590| 44 5f 5f 0d 23 69 6e 63 | 6c 75 64 65 20 22 53 70 |D__.#inc|lude "Sp|
|000005a0| 72 69 74 65 57 6f 72 6c | 64 2e 68 22 0d 23 65 6e |riteWorl|d.h".#en|
|000005b0| 64 69 66 0d 0d 23 69 66 | 6e 64 65 66 20 5f 5f 53 |dif..#if|ndef __S|
|000005c0| 50 52 49 54 45 57 4f 52 | 4c 44 55 54 49 4c 53 5f |PRITEWOR|LDUTILS_|
|000005d0| 5f 0d 23 69 6e 63 6c 75 | 64 65 20 22 53 70 72 69 |_.#inclu|de "Spri|
|000005e0| 74 65 57 6f 72 6c 64 55 | 74 69 6c 73 2e 68 22 0d |teWorldU|tils.h".|
|000005f0| 23 65 6e 64 69 66 0d 0d | 23 69 66 6e 64 65 66 20 |#endif..|#ifndef |
|00000600| 5f 5f 41 50 50 4c 49 43 | 41 54 49 4f 4e 5f 5f 0d |__APPLIC|ATION__.|
|00000610| 23 69 6e 63 6c 75 64 65 | 20 22 41 70 70 6c 69 63 |#include| "Applic|
|00000620| 61 74 69 6f 6e 2e 68 22 | 0d 23 65 6e 64 69 66 0d |ation.h"|.#endif.|
|00000630| 0d 23 69 66 6e 64 65 66 | 20 5f 5f 53 50 52 49 54 |.#ifndef| __SPRIT|
|00000640| 45 54 45 53 54 5f 5f 0d | 23 69 6e 63 6c 75 64 65 |ETEST__.|#include|
|00000650| 20 22 53 70 72 69 74 65 | 54 65 73 74 2e 68 22 0d | "Sprite|Test.h".|
|00000660| 23 65 6e 64 69 66 0d 0d | 23 69 66 6e 64 65 66 20 |#endif..|#ifndef |
|00000670| 5f 5f 41 42 4f 55 54 5f | 5f 0d 23 69 6e 63 6c 75 |__ABOUT_|_.#inclu|
|00000680| 64 65 20 22 41 62 6f 75 | 74 2e 68 22 0d 23 65 6e |de "Abou|t.h".#en|
|00000690| 64 69 66 0d 0d 0d 42 6f | 6f 6c 65 61 6e 20 67 49 |dif...Bo|olean gI|
|000006a0| 73 52 75 6e 6e 69 6e 67 | 20 3d 20 74 72 75 65 3b |sRunning| = true;|
|000006b0| 0d 42 6f 6f 6c 65 61 6e | 20 67 49 6e 42 61 63 6b |.Boolean| gInBack|
|000006c0| 47 72 6f 75 6e 64 20 3d | 20 66 61 6c 73 65 3b 0d |Ground =| false;.|
|000006d0| 42 6f 6f 6c 65 61 6e 20 | 67 48 61 73 57 61 69 74 |Boolean |gHasWait|
|000006e0| 4e 65 78 74 45 76 65 6e | 74 20 3d 20 66 61 6c 73 |NextEven|t = fals|
|000006f0| 65 3b 0d 57 69 6e 64 6f | 77 50 74 72 20 67 57 69 |e;.Windo|wPtr gWi|
|00000700| 6e 64 6f 77 50 20 3d 20 | 4e 55 4c 4c 3b 0d 53 70 |ndowP = |NULL;.Sp|
|00000710| 72 69 74 65 54 65 73 74 | 50 74 72 20 67 53 70 72 |riteTest|Ptr gSpr|
|00000720| 69 74 65 54 65 73 74 50 | 20 3d 20 4e 55 4c 4c 3b |iteTestP| = NULL;|
|00000730| 0d 0d 0d 76 6f 69 64 20 | 6d 61 69 6e 28 76 6f 69 |...void |main(voi|
|00000740| 64 29 0d 7b 0d 09 4f 53 | 45 72 72 20 65 72 72 20 |d).{..OS|Err err |
|00000750| 3d 20 6e 6f 45 72 72 3b | 0d 0d 09 69 66 20 28 49 |= noErr;|...if (I|
|00000760| 6e 69 74 69 61 6c 69 7a | 65 28 6b 4e 75 6d 62 65 |nitializ|e(kNumbe|
|00000770| 72 4f 66 4d 6f 72 65 4d | 61 73 74 65 72 73 43 61 |rOfMoreM|astersCa|
|00000780| 6c 6c 73 29 29 0d 09 7b | 0d 09 09 69 66 20 28 43 |lls))..{|...if (C|
|00000790| 68 65 63 6b 53 79 73 74 | 65 6d 28 29 20 26 26 20 |heckSyst|em() && |
|000007a0| 43 68 65 63 6b 4d 65 6d | 6f 72 79 28 29 29 0d 09 |CheckMem|ory())..|
|000007b0| 09 7b 0d 09 09 09 69 66 | 20 28 48 61 73 41 70 70 |.{....if| (HasApp|
|000007c0| 6c 65 45 76 65 6e 74 73 | 28 29 29 0d 09 09 09 7b |leEvents|())....{|
|000007d0| 0d 09 09 09 09 65 72 72 | 20 3d 20 49 6e 73 74 61 |.....err| = Insta|
|000007e0| 6c 6c 41 70 70 6c 65 45 | 76 65 6e 74 48 61 6e 64 |llAppleE|ventHand|
|000007f0| 6c 65 72 73 28 29 3b 0d | 09 0d 09 09 09 09 69 66 |lers();.|......if|
|00000800| 20 28 65 72 72 20 21 3d | 20 6e 6f 45 72 72 29 0d | (err !=| noErr).|
|00000810| 09 09 09 09 7b 0d 09 09 | 09 09 09 45 72 72 6f 72 |....{...|...Error|
|00000820| 41 6c 65 72 74 28 65 72 | 72 2c 20 6b 55 6e 6b 6e |Alert(er|r, kUnkn|
|00000830| 6f 77 6e 45 72 72 6f 72 | 53 74 72 69 6e 67 49 6e |ownError|StringIn|
|00000840| 64 65 78 29 3b 0d 09 09 | 09 09 7d 0d 09 09 09 7d |dex);...|..}....}|
|00000850| 0d 09 0d 09 09 09 43 72 | 65 61 74 65 4d 65 6e 75 |......Cr|eateMenu|
|00000860| 42 61 72 28 29 3b 0d 09 | 09 09 43 72 65 61 74 65 |Bar();..|..Create|
|00000870| 57 69 6e 64 6f 77 28 29 | 3b 0d 09 0d 09 09 09 69 |Window()|;......i|
|00000880| 66 20 28 45 6e 74 65 72 | 41 70 70 6c 69 63 61 74 |f (Enter|Applicat|
|00000890| 69 6f 6e 28 29 29 0d 09 | 09 09 7b 0d 09 09 09 09 |ion())..|..{.....|
|000008a0| 53 65 72 76 69 63 65 45 | 76 65 6e 74 73 28 29 3b |ServiceE|vents();|
|000008b0| 0d 09 09 09 7d 0d 09 0d | 09 09 09 45 78 69 74 41 |....}...|...ExitA|
|000008c0| 70 70 6c 69 63 61 74 69 | 6f 6e 28 29 3b 0d 09 09 |pplicati|on();...|
|000008d0| 7d 0d 09 7d 0d 0d 09 45 | 78 69 74 54 6f 53 68 65 |}..}...E|xitToShe|
|000008e0| 6c 6c 28 29 3b 0d 7d 0d | 0d 0d 42 6f 6f 6c 65 61 |ll();.}.|..Boolea|
|000008f0| 6e 20 49 6e 69 74 69 61 | 6c 69 7a 65 28 0d 09 73 |n Initia|lize(..s|
|00000900| 68 6f 72 74 20 6e 75 6d | 62 65 72 4f 66 4d 61 73 |hort num|berOfMas|
|00000910| 74 65 72 73 29 0d 7b 0d | 09 4f 53 45 72 72 20 65 |ters).{.|.OSErr e|
|00000920| 72 72 20 3d 20 6e 6f 45 | 72 72 3b 0d 09 45 76 65 |rr = noE|rr;..Eve|
|00000930| 6e 74 52 65 63 6f 72 64 | 20 74 65 6d 70 45 76 65 |ntRecord| tempEve|
|00000940| 6e 74 3b 0d 0d 09 69 66 | 20 28 6b 53 74 61 63 6b |nt;...if| (kStack|
|00000950| 4e 65 65 64 65 64 20 3e | 20 53 74 61 63 6b 53 70 |Needed >| StackSp|
|00000960| 61 63 65 28 29 29 0d 09 | 7b 0d 09 09 09 2f 2f 20 |ace())..|{....// |
|00000970| 6e 65 77 20 61 64 64 72 | 65 73 73 20 69 73 20 68 |new addr|ess is h|
|00000980| 65 61 70 20 73 69 7a 65 | 20 2b 20 63 75 72 72 65 |eap size| + curre|
|00000990| 6e 74 20 73 74 61 63 6b | 20 2d 20 6e 65 65 64 65 |nt stack| - neede|
|000009a0| 64 20 73 74 61 63 6b 0d | 09 09 53 65 74 41 70 70 |d stack.|..SetApp|
|000009b0| 6c 4c 69 6d 69 74 28 28 | 50 74 72 29 28 28 6c 6f |lLimit((|Ptr)((lo|
|000009c0| 6e 67 29 47 65 74 41 70 | 70 6c 4c 69 6d 69 74 28 |ng)GetAp|plLimit(|
|000009d0| 29 20 2d 20 6b 53 74 61 | 63 6b 4e 65 65 64 65 64 |) - kSta|ckNeeded|
|000009e0| 20 2b 20 53 74 61 63 6b | 53 70 61 63 65 28 29 29 | + Stack|Space())|
|000009f0| 29 3b 0d 0d 09 09 65 72 | 72 20 3d 20 4d 65 6d 45 |);....er|r = MemE|
|00000a00| 72 72 6f 72 28 29 3b 0d | 09 7d 0d 0d 09 69 66 20 |rror();.|.}...if |
|00000a10| 28 65 72 72 20 3d 3d 20 | 6e 6f 45 72 72 29 0d 09 |(err == |noErr)..|
|00000a20| 7b 0d 09 09 4d 61 78 41 | 70 70 6c 5a 6f 6e 65 28 |{...MaxA|pplZone(|
|00000a30| 29 3b 0d 0d 09 09 77 68 | 69 6c 65 20 28 28 65 72 |);....wh|ile ((er|
|00000a40| 72 20 3d 3d 20 6e 6f 45 | 72 72 29 20 26 26 20 28 |r == noE|rr) && (|
|00000a50| 6e 75 6d 62 65 72 4f 66 | 4d 61 73 74 65 72 73 2d |numberOf|Masters-|
|00000a60| 2d 29 29 0d 09 09 7b 0d | 09 09 09 4d 6f 72 65 4d |-))...{.|...MoreM|
|00000a70| 61 73 74 65 72 73 28 29 | 3b 0d 0d 09 09 09 65 72 |asters()|;.....er|
|00000a80| 72 20 3d 20 4d 65 6d 45 | 72 72 6f 72 28 29 3b 0d |r = MemE|rror();.|
|00000a90| 09 09 7d 0d 09 7d 0d 0d | 09 69 66 20 28 65 72 72 |..}..}..|.if (err|
|00000aa0| 20 3d 3d 20 6e 6f 45 72 | 72 29 0d 09 7b 0d 09 09 | == noEr|r)..{...|
|00000ab0| 49 6e 69 74 47 72 61 66 | 28 26 71 64 2e 74 68 65 |InitGraf|(&qd.the|
|00000ac0| 50 6f 72 74 29 3b 0d 09 | 09 49 6e 69 74 46 6f 6e |Port);..|.InitFon|
|00000ad0| 74 73 28 29 3b 0d 09 09 | 49 6e 69 74 57 69 6e 64 |ts();...|InitWind|
|00000ae0| 6f 77 73 28 29 3b 0d 09 | 09 49 6e 69 74 4d 65 6e |ows();..|.InitMen|
|00000af0| 75 73 28 29 3b 0d 09 09 | 54 45 49 6e 69 74 28 29 |us();...|TEInit()|
|00000b00| 3b 0d 09 09 49 6e 69 74 | 44 69 61 6c 6f 67 73 28 |;...Init|Dialogs(|
|00000b10| 4e 55 4c 4c 29 3b 0d 09 | 09 49 6e 69 74 43 75 72 |NULL);..|.InitCur|
|00000b20| 73 6f 72 28 29 3b 0d 09 | 09 46 6c 75 73 68 45 76 |sor();..|.FlushEv|
|00000b30| 65 6e 74 73 28 65 76 65 | 72 79 45 76 65 6e 74 2c |ents(eve|ryEvent,|
|00000b40| 20 30 29 3b 0d 0d 09 09 | 28 76 6f 69 64 29 45 76 | 0);....|(void)Ev|
|00000b50| 65 6e 74 41 76 61 69 6c | 28 65 76 65 72 79 45 76 |entAvail|(everyEv|
|00000b60| 65 6e 74 2c 20 26 74 65 | 6d 70 45 76 65 6e 74 29 |ent, &te|mpEvent)|
|00000b70| 3b 0d 09 09 28 76 6f 69 | 64 29 45 76 65 6e 74 41 |;...(voi|d)EventA|
|00000b80| 76 61 69 6c 28 65 76 65 | 72 79 45 76 65 6e 74 2c |vail(eve|ryEvent,|
|00000b90| 20 26 74 65 6d 70 45 76 | 65 6e 74 29 3b 0d 09 09 | &tempEv|ent);...|
|00000ba0| 28 76 6f 69 64 29 45 76 | 65 6e 74 41 76 61 69 6c |(void)Ev|entAvail|
|00000bb0| 28 65 76 65 72 79 45 76 | 65 6e 74 2c 20 26 74 65 |(everyEv|ent, &te|
|00000bc0| 6d 70 45 76 65 6e 74 29 | 3b 0d 0d 09 09 67 48 61 |mpEvent)|;....gHa|
|00000bd0| 73 57 61 69 74 4e 65 78 | 74 45 76 65 6e 74 20 3d |sWaitNex|tEvent =|
|00000be0| 20 48 61 73 57 61 69 74 | 4e 65 78 74 45 76 65 6e | HasWait|NextEven|
|00000bf0| 74 28 29 3b 0d 09 7d 0d | 0d 09 09 2f 2f 20 69 66 |t();..}.|...// if|
|00000c00| 20 77 65 20 67 65 74 20 | 61 6e 20 65 72 72 6f 72 | we get |an error|
|00000c10| 20 68 65 72 65 2c 20 77 | 65 20 63 61 6e d5 74 20 | here, w|e can.t |
|00000c20| 64 6f 20 6a 61 63 6b 0d | 09 09 2f 2f 20 64 6f 6e |do jack.|..// don|
|00000c30| d5 74 20 65 76 65 6e 20 | 54 52 59 20 74 6f 20 70 |.t even |TRY to p|
|00000c40| 75 74 20 75 70 20 61 6e | 20 61 6c 65 72 74 0d 0d |ut up an| alert..|
|00000c50| 09 72 65 74 75 72 6e 20 | 65 72 72 20 3d 3d 20 6e |.return |err == n|
|00000c60| 6f 45 72 72 3b 0d 7d 0d | 0d 0d 42 6f 6f 6c 65 61 |oErr;.}.|..Boolea|
|00000c70| 6e 20 43 68 65 63 6b 53 | 79 73 74 65 6d 28 76 6f |n CheckS|ystem(vo|
|00000c80| 69 64 29 0d 7b 0d 09 4f | 53 45 72 72 09 65 72 72 |id).{..O|SErr.err|
|00000c90| 3b 0d 09 42 6f 6f 6c 65 | 61 6e 20 69 73 53 79 73 |;..Boole|an isSys|
|00000ca0| 74 65 6d 47 6f 6f 64 20 | 3d 20 74 72 75 65 3b 0d |temGood |= true;.|
|00000cb0| 09 6c 6f 6e 67 09 67 65 | 73 74 61 6c 74 52 65 73 |.long.ge|staltRes|
|00000cc0| 75 6c 74 3b 0d 0d 09 65 | 72 72 20 3d 20 47 65 73 |ult;...e|rr = Ges|
|00000cd0| 74 61 6c 74 28 67 65 73 | 74 61 6c 74 54 69 6d 65 |talt(ges|taltTime|
|00000ce0| 4d 67 72 56 65 72 73 69 | 6f 6e 2c 20 26 67 65 73 |MgrVersi|on, &ges|
|00000cf0| 74 61 6c 74 52 65 73 75 | 6c 74 29 3b 0d 0d 09 69 |taltResu|lt);...i|
|00000d00| 73 53 79 73 74 65 6d 47 | 6f 6f 64 20 3d 20 28 65 |sSystemG|ood = (e|
|00000d10| 72 72 20 3d 3d 20 6e 6f | 45 72 72 29 20 26 26 20 |rr == no|Err) && |
|00000d20| 28 67 65 73 74 61 6c 74 | 52 65 73 75 6c 74 20 3e |(gestalt|Result >|
|00000d30| 3d 20 67 65 73 74 61 6c | 74 53 74 61 6e 64 61 72 |= gestal|tStandar|
|00000d40| 64 54 69 6d 65 4d 67 72 | 29 3b 0d 0d 09 69 66 20 |dTimeMgr|);...if |
|00000d50| 28 21 69 73 53 79 73 74 | 65 6d 47 6f 6f 64 29 0d |(!isSyst|emGood).|
|00000d60| 09 7b 0d 09 09 43 61 6e | 74 52 75 6e 4f 6e 54 68 |.{...Can|tRunOnTh|
|00000d70| 69 73 4d 61 63 68 69 6e | 65 28 29 3b 0d 09 7d 0d |isMachin|e();..}.|
|00000d80| 0d 09 72 65 74 75 72 6e | 20 69 73 53 79 73 74 65 |..return| isSyste|
|00000d90| 6d 47 6f 6f 64 3b 0d 7d | 0d 0d 0d 42 6f 6f 6c 65 |mGood;.}|...Boole|
|00000da0| 61 6e 20 43 68 65 63 6b | 4d 65 6d 6f 72 79 28 76 |an Check|Memory(v|
|00000db0| 6f 69 64 29 0d 7b 0d 09 | 42 6f 6f 6c 65 61 6e 20 |oid).{..|Boolean |
|00000dc0| 69 73 45 6e 6f 75 67 68 | 4d 65 6d 6f 72 79 3b 0d |isEnough|Memory;.|
|00000dd0| 09 6c 6f 6e 67 20 68 65 | 61 70 4e 65 65 64 65 64 |.long he|apNeeded|
|00000de0| 2c 20 68 65 61 70 53 69 | 7a 65 3b 0d 09 47 44 48 |, heapSi|ze;..GDH|
|00000df0| 61 6e 64 6c 65 20 6d 61 | 69 6e 47 44 65 76 69 63 |andle ma|inGDevic|
|00000e00| 65 48 3b 0d 09 52 65 63 | 74 20 77 6f 72 6c 64 52 |eH;..Rec|t worldR|
|00000e10| 65 63 74 3b 0d 09 73 68 | 6f 72 74 20 70 69 78 65 |ect;..sh|ort pixe|
|00000e20| 6c 53 69 7a 65 3b 0d 0d | 09 69 66 20 28 53 57 48 |lSize;..|.if (SWH|
|00000e30| 61 73 43 6f 6c 6f 72 51 | 75 69 63 6b 44 72 61 77 |asColorQ|uickDraw|
|00000e40| 28 29 29 0d 09 7b 0d 09 | 09 6d 61 69 6e 47 44 65 |())..{..|.mainGDe|
|00000e50| 76 69 63 65 48 20 3d 20 | 47 65 74 4d 61 69 6e 44 |viceH = |GetMainD|
|00000e60| 65 76 69 63 65 28 29 3b | 0d 0d 09 09 77 6f 72 6c |evice();|....worl|
|00000e70| 64 52 65 63 74 20 3d 20 | 28 2a 2a 6d 61 69 6e 47 |dRect = |(**mainG|
|00000e80| 44 65 76 69 63 65 48 29 | 2e 67 64 52 65 63 74 3b |DeviceH)|.gdRect;|
|00000e90| 0d 09 09 70 69 78 65 6c | 53 69 7a 65 20 3d 20 28 |...pixel|Size = (|
|00000ea0| 2a 2a 28 2a 2a 6d 61 69 | 6e 47 44 65 76 69 63 65 |**(**mai|nGDevice|
|00000eb0| 48 29 2e 67 64 50 4d 61 | 70 29 2e 70 69 78 65 6c |H).gdPMa|p).pixel|
|00000ec0| 53 69 7a 65 3b 0d 09 7d | 0d 09 65 6c 73 65 0d 09 |Size;..}|..else..|
|00000ed0| 7b 0d 09 09 77 6f 72 6c | 64 52 65 63 74 20 3d 20 |{...worl|dRect = |
|00000ee0| 71 64 2e 73 63 72 65 65 | 6e 42 69 74 73 2e 62 6f |qd.scree|nBits.bo|
|00000ef0| 75 6e 64 73 3b 0d 09 09 | 70 69 78 65 6c 53 69 7a |unds;...|pixelSiz|
|00000f00| 65 20 3d 20 31 3b 0d 09 | 7d 0d 0d 09 68 65 61 70 |e = 1;..|}...heap|
|00000f10| 4e 65 65 64 65 64 20 3d | 20 33 20 2a 20 28 28 28 |Needed =| 3 * (((|
|00000f20| 28 77 6f 72 6c 64 52 65 | 63 74 2e 72 69 67 68 74 |(worldRe|ct.right|
|00000f30| 20 2d 20 77 6f 72 6c 64 | 52 65 63 74 2e 6c 65 66 | - world|Rect.lef|
|00000f40| 74 29 20 2a 0d 09 09 09 | 09 09 09 09 28 77 6f 72 |t) *....|....(wor|
|00000f50| 6c 64 52 65 63 74 2e 62 | 6f 74 74 6f 6d 20 2d 20 |ldRect.b|ottom - |
|00000f60| 77 6f 72 6c 64 52 65 63 | 74 2e 74 6f 70 29 29 20 |worldRec|t.top)) |
|00000f70| 2a 20 70 69 78 65 6c 53 | 69 7a 65 29 20 2f 20 38 |* pixelS|ize) / 8|
|00000f80| 29 3b 0d 09 68 65 61 70 | 4e 65 65 64 65 64 20 2b |);..heap|Needed +|
|00000f90| 3d 20 31 30 30 30 30 30 | 3b 0d 0d 09 68 65 61 70 |= 100000|;...heap|
|00000fa0| 53 69 7a 65 20 3d 20 28 | 6c 6f 6e 67 29 47 65 74 |Size = (|long)Get|
|00000fb0| 41 70 70 6c 4c 69 6d 69 | 74 28 29 20 2d 20 28 6c |ApplLimi|t() - (l|
|00000fc0| 6f 6e 67 29 41 70 70 6c | 69 63 5a 6f 6e 65 28 29 |ong)Appl|icZone()|
|00000fd0| 3b 0d 0d 09 69 73 45 6e | 6f 75 67 68 4d 65 6d 6f |;...isEn|oughMemo|
|00000fe0| 72 79 20 3d 20 28 68 65 | 61 70 53 69 7a 65 20 3e |ry = (he|apSize >|
|00000ff0| 20 68 65 61 70 4e 65 65 | 64 65 64 29 3b 0d 0d 09 | heapNee|ded);...|
|00001000| 69 66 20 28 21 69 73 45 | 6e 6f 75 67 68 4d 65 6d |if (!isE|noughMem|
|00001010| 6f 72 79 29 0d 09 7b 0d | 09 09 45 72 72 6f 72 41 |ory)..{.|..ErrorA|
|00001020| 6c 65 72 74 28 6d 65 6d | 46 75 6c 6c 45 72 72 2c |lert(mem|FullErr,|
|00001030| 20 6b 4e 6f 74 45 6e 6f | 75 67 68 4d 65 6d 6f 72 | kNotEno|ughMemor|
|00001040| 79 53 74 72 69 6e 67 49 | 6e 64 65 78 29 3b 0d 09 |yStringI|ndex);..|
|00001050| 7d 0d 0d 09 72 65 74 75 | 72 6e 20 69 73 45 6e 6f |}...retu|rn isEno|
|00001060| 75 67 68 4d 65 6d 6f 72 | 79 3b 0d 7d 0d 0d 0d 42 |ughMemor|y;.}...B|
|00001070| 6f 6f 6c 65 61 6e 20 48 | 61 73 41 70 70 6c 65 45 |oolean H|asAppleE|
|00001080| 76 65 6e 74 73 28 76 6f | 69 64 29 0d 7b 0d 09 42 |vents(vo|id).{..B|
|00001090| 6f 6f 6c 65 61 6e 20 68 | 61 73 41 70 70 6c 65 45 |oolean h|asAppleE|
|000010a0| 76 65 6e 74 73 3b 0d 09 | 4f 53 45 72 72 20 65 72 |vents;..|OSErr er|
|000010b0| 72 3b 0d 09 6c 6f 6e 67 | 20 67 65 73 74 61 6c 74 |r;..long| gestalt|
|000010c0| 52 65 73 75 6c 74 3b 0d | 0d 09 65 72 72 20 3d 20 |Result;.|..err = |
|000010d0| 47 65 73 74 61 6c 74 28 | 67 65 73 74 61 6c 74 41 |Gestalt(|gestaltA|
|000010e0| 70 70 6c 65 45 76 65 6e | 74 73 41 74 74 72 2c 20 |ppleEven|tsAttr, |
|000010f0| 26 67 65 73 74 61 6c 74 | 52 65 73 75 6c 74 29 3b |&gestalt|Result);|
|00001100| 0d 0d 09 69 66 20 28 65 | 72 72 20 3d 3d 20 6e 6f |...if (e|rr == no|
|00001110| 45 72 72 29 0d 09 7b 0d | 09 09 68 61 73 41 70 70 |Err)..{.|..hasApp|
|00001120| 6c 65 45 76 65 6e 74 73 | 20 3d 20 28 67 65 73 74 |leEvents| = (gest|
|00001130| 61 6c 74 52 65 73 75 6c | 74 20 26 20 28 31 20 3c |altResul|t & (1 <|
|00001140| 3c 20 67 65 73 74 61 6c | 74 41 70 70 6c 65 45 76 |< gestal|tAppleEv|
|00001150| 65 6e 74 73 50 72 65 73 | 65 6e 74 29 29 20 21 3d |entsPres|ent)) !=|
|00001160| 20 30 3b 0d 09 7d 0d 09 | 65 6c 73 65 0d 09 7b 0d | 0;..}..|else..{.|
|00001170| 09 09 68 61 73 41 70 70 | 6c 65 45 76 65 6e 74 73 |..hasApp|leEvents|
|00001180| 20 3d 20 66 61 6c 73 65 | 3b 0d 09 7d 0d 0d 09 72 | = false|;..}...r|
|00001190| 65 74 75 72 6e 20 68 61 | 73 41 70 70 6c 65 45 76 |eturn ha|sAppleEv|
|000011a0| 65 6e 74 73 3b 0d 7d 0d | 0d 0d 23 69 66 6e 64 65 |ents;.}.|..#ifnde|
|000011b0| 66 20 4e 65 77 41 45 45 | 76 65 6e 74 48 61 6e 64 |f NewAEE|ventHand|
|000011c0| 6c 65 72 50 72 6f 63 0d | 23 64 65 66 69 6e 65 20 |lerProc.|#define |
|000011d0| 4e 65 77 41 45 45 76 65 | 6e 74 48 61 6e 64 6c 65 |NewAEEve|ntHandle|
|000011e0| 72 50 72 6f 63 28 78 29 | 20 28 28 45 76 65 6e 74 |rProc(x)| ((Event|
|000011f0| 48 61 6e 64 6c 65 72 50 | 72 6f 63 50 74 72 29 78 |HandlerP|rocPtr)x|
|00001200| 29 0d 23 65 6e 64 69 66 | 20 0d 0d 4f 53 45 72 72 |).#endif| ..OSErr|
|00001210| 20 49 6e 73 74 61 6c 6c | 41 70 70 6c 65 45 76 65 | Install|AppleEve|
|00001220| 6e 74 48 61 6e 64 6c 65 | 72 73 28 76 6f 69 64 29 |ntHandle|rs(void)|
|00001230| 0d 7b 0d 09 4f 53 45 72 | 72 20 65 72 72 20 3d 20 |.{..OSEr|r err = |
|00001240| 6e 6f 45 72 72 3b 0d 0d | 09 65 72 72 20 3d 20 41 |noErr;..|.err = A|
|00001250| 45 49 6e 73 74 61 6c 6c | 45 76 65 6e 74 48 61 6e |EInstall|EventHan|
|00001260| 64 6c 65 72 28 6b 43 6f | 72 65 45 76 65 6e 74 43 |dler(kCo|reEventC|
|00001270| 6c 61 73 73 2c 20 6b 41 | 45 4f 70 65 6e 41 70 70 |lass, kA|EOpenApp|
|00001280| 6c 69 63 61 74 69 6f 6e | 2c 20 4e 65 77 41 45 45 |lication|, NewAEE|
|00001290| 76 65 6e 74 48 61 6e 64 | 6c 65 72 50 72 6f 63 28 |ventHand|lerProc(|
|000012a0| 48 61 6e 64 6c 65 4f 70 | 65 6e 41 70 70 29 2c 20 |HandleOp|enApp), |
|000012b0| 30 2c 20 66 61 6c 73 65 | 29 3b 0d 0d 09 69 66 20 |0, false|);...if |
|000012c0| 28 65 72 72 20 3d 3d 20 | 6e 6f 45 72 72 29 0d 09 |(err == |noErr)..|
|000012d0| 7b 0d 09 09 65 72 72 20 | 3d 20 41 45 49 6e 73 74 |{...err |= AEInst|
|000012e0| 61 6c 6c 45 76 65 6e 74 | 48 61 6e 64 6c 65 72 28 |allEvent|Handler(|
|000012f0| 6b 43 6f 72 65 45 76 65 | 6e 74 43 6c 61 73 73 2c |kCoreEve|ntClass,|
|00001300| 20 6b 41 45 4f 70 65 6e | 44 6f 63 75 6d 65 6e 74 | kAEOpen|Document|
|00001310| 73 2c 20 4e 65 77 41 45 | 45 76 65 6e 74 48 61 6e |s, NewAE|EventHan|
|00001320| 64 6c 65 72 50 72 6f 63 | 28 48 61 6e 64 6c 65 4f |dlerProc|(HandleO|
|00001330| 70 65 6e 44 6f 63 29 2c | 20 30 2c 20 66 61 6c 73 |penDoc),| 0, fals|
|00001340| 65 29 3b 0d 09 7d 0d 0d | 09 69 66 20 28 65 72 72 |e);..}..|.if (err|
|00001350| 20 3d 3d 20 6e 6f 45 72 | 72 29 0d 09 7b 0d 09 09 | == noEr|r)..{...|
|00001360| 65 72 72 20 3d 20 41 45 | 49 6e 73 74 61 6c 6c 45 |err = AE|InstallE|
|00001370| 76 65 6e 74 48 61 6e 64 | 6c 65 72 28 6b 43 6f 72 |ventHand|ler(kCor|
|00001380| 65 45 76 65 6e 74 43 6c | 61 73 73 2c 20 6b 41 45 |eEventCl|ass, kAE|
|00001390| 50 72 69 6e 74 44 6f 63 | 75 6d 65 6e 74 73 2c 20 |PrintDoc|uments, |
|000013a0| 4e 65 77 41 45 45 76 65 | 6e 74 48 61 6e 64 6c 65 |NewAEEve|ntHandle|
|000013b0| 72 50 72 6f 63 28 48 61 | 6e 64 6c 65 50 72 69 6e |rProc(Ha|ndlePrin|
|000013c0| 74 44 6f 63 29 2c 20 30 | 2c 20 66 61 6c 73 65 29 |tDoc), 0|, false)|
|000013d0| 3b 0d 09 7d 0d 0d 09 69 | 66 20 28 65 72 72 20 3d |;..}...i|f (err =|
|000013e0| 3d 20 6e 6f 45 72 72 29 | 0d 09 7b 0d 09 09 65 72 |= noErr)|..{...er|
|000013f0| 72 20 3d 20 41 45 49 6e | 73 74 61 6c 6c 45 76 65 |r = AEIn|stallEve|
|00001400| 6e 74 48 61 6e 64 6c 65 | 72 28 6b 43 6f 72 65 45 |ntHandle|r(kCoreE|
|00001410| 76 65 6e 74 43 6c 61 73 | 73 2c 20 6b 41 45 51 75 |ventClas|s, kAEQu|
|00001420| 69 74 41 70 70 6c 69 63 | 61 74 69 6f 6e 2c 20 4e |itApplic|ation, N|
|00001430| 65 77 41 45 45 76 65 6e | 74 48 61 6e 64 6c 65 72 |ewAEEven|tHandler|
|00001440| 50 72 6f 63 28 48 61 6e | 64 6c 65 51 75 69 74 29 |Proc(Han|dleQuit)|
|00001450| 2c 20 30 2c 20 66 61 6c | 73 65 29 3b 0d 09 7d 0d |, 0, fal|se);..}.|
|00001460| 0d 09 72 65 74 75 72 6e | 20 65 72 72 3b 0d 7d 0d |..return| err;.}.|
|00001470| 0d 0d 76 6f 69 64 20 43 | 72 65 61 74 65 4d 65 6e |..void C|reateMen|
|00001480| 75 42 61 72 28 76 6f 69 | 64 29 0d 7b 0d 09 48 61 |uBar(voi|d).{..Ha|
|00001490| 6e 64 6c 65 20 6d 65 6e | 75 42 61 72 48 3b 0d 0d |ndle men|uBarH;..|
|000014a0| 09 6d 65 6e 75 42 61 72 | 48 20 3d 20 47 65 74 4e |.menuBar|H = GetN|
|000014b0| 65 77 4d 42 61 72 28 6b | 4d 65 6e 75 42 61 72 52 |ewMBar(k|MenuBarR|
|000014c0| 65 73 49 44 29 3b 0d 0d | 09 69 66 20 28 6d 65 6e |esID);..|.if (men|
|000014d0| 75 42 61 72 48 20 21 3d | 20 4e 55 4c 4c 29 0d 09 |uBarH !=| NULL)..|
|000014e0| 7b 0d 09 09 53 65 74 4d | 65 6e 75 42 61 72 28 6d |{...SetM|enuBar(m|
|000014f0| 65 6e 75 42 61 72 48 29 | 3b 0d 09 09 41 64 64 52 |enuBarH)|;...AddR|
|00001500| 65 73 4d 65 6e 75 28 47 | 65 74 4d 48 61 6e 64 6c |esMenu(G|etMHandl|
|00001510| 65 28 6b 41 70 70 6c 65 | 4d 65 6e 75 49 44 29 2c |e(kApple|MenuID),|
|00001520| 20 27 44 52 56 52 27 29 | 3b 0d 09 09 44 72 61 77 | 'DRVR')|;...Draw|
|00001530| 4d 65 6e 75 42 61 72 28 | 29 3b 0d 09 7d 0d 09 65 |MenuBar(|);..}..e|
|00001540| 6c 73 65 0d 09 7b 0d 09 | 09 43 61 6e 74 46 69 6e |lse..{..|.CantFin|
|00001550| 64 52 65 73 6f 75 72 63 | 65 28 29 3b 0d 09 7d 0d |dResourc|e();..}.|
|00001560| 7d 0d 0d 0d 76 6f 69 64 | 20 43 72 65 61 74 65 57 |}...void| CreateW|
|00001570| 69 6e 64 6f 77 28 76 6f | 69 64 29 0d 7b 0d 09 67 |indow(vo|id).{..g|
|00001580| 57 69 6e 64 6f 77 50 20 | 3d 20 53 57 48 61 73 43 |WindowP |= SWHasC|
|00001590| 6f 6c 6f 72 51 75 69 63 | 6b 44 72 61 77 28 29 20 |olorQuic|kDraw() |
|000015a0| 3f 0d 09 09 09 47 65 74 | 4e 65 77 43 57 69 6e 64 |?....Get|NewCWind|
|000015b0| 6f 77 28 6b 57 69 6e 64 | 6f 77 52 65 73 49 44 2c |ow(kWind|owResID,|
|000015c0| 20 4e 55 4c 4c 2c 20 28 | 57 69 6e 64 6f 77 50 74 | NULL, (|WindowPt|
|000015d0| 72 29 2d 31 4c 29 20 3a | 0d 09 09 09 47 65 74 4e |r)-1L) :|....GetN|
|000015e0| 65 77 57 69 6e 64 6f 77 | 28 6b 57 69 6e 64 6f 77 |ewWindow|(kWindow|
|000015f0| 52 65 73 49 44 2c 20 4e | 55 4c 4c 2c 20 28 57 69 |ResID, N|ULL, (Wi|
|00001600| 6e 64 6f 77 50 74 72 29 | 2d 31 4c 29 3b 0d 0d 09 |ndowPtr)|-1L);...|
|00001610| 69 66 20 28 67 57 69 6e | 64 6f 77 50 20 21 3d 20 |if (gWin|dowP != |
|00001620| 4e 55 4c 4c 29 0d 09 7b | 0d 09 09 53 69 7a 65 57 |NULL)..{|...SizeW|
|00001630| 69 6e 64 6f 77 28 67 57 | 69 6e 64 6f 77 50 2c 20 |indow(gW|indowP, |
|00001640| 71 64 2e 73 63 72 65 65 | 6e 42 69 74 73 2e 62 6f |qd.scree|nBits.bo|
|00001650| 75 6e 64 73 2e 72 69 67 | 68 74 2c 20 71 64 2e 73 |unds.rig|ht, qd.s|
|00001660| 63 72 65 65 6e 42 69 74 | 73 2e 62 6f 75 6e 64 73 |creenBit|s.bounds|
|00001670| 2e 62 6f 74 74 6f 6d 2c | 20 66 61 6c 73 65 29 3b |.bottom,| false);|
|00001680| 0d 09 09 4d 6f 76 65 57 | 69 6e 64 6f 77 28 67 57 |...MoveW|indow(gW|
|00001690| 69 6e 64 6f 77 50 2c 20 | 30 2c 20 30 2c 20 66 61 |indowP, |0, 0, fa|
|000016a0| 6c 73 65 29 3b 0d 09 7d | 0d 09 65 6c 73 65 0d 09 |lse);..}|..else..|
|000016b0| 7b 0d 09 09 43 61 6e 74 | 46 69 6e 64 52 65 73 6f |{...Cant|FindReso|
|000016c0| 75 72 63 65 28 29 3b 0d | 09 7d 0d 7d 0d 0d 0d 42 |urce();.|.}.}...B|
|000016d0| 6f 6f 6c 65 61 6e 20 45 | 6e 74 65 72 41 70 70 6c |oolean E|nterAppl|
|000016e0| 69 63 61 74 69 6f 6e 28 | 76 6f 69 64 29 0d 7b 0d |ication(|void).{.|
|000016f0| 09 4f 53 45 72 72 09 65 | 72 72 3b 0d 0d 09 65 72 |.OSErr.e|rr;...er|
|00001700| 72 20 3d 20 53 57 45 6e | 74 65 72 53 70 72 69 74 |r = SWEn|terSprit|
|00001710| 65 57 6f 72 6c 64 28 29 | 3b 0d 0d 09 69 66 20 28 |eWorld()|;...if (|
|00001720| 65 72 72 20 3d 3d 20 6e | 6f 45 72 72 29 0d 09 7b |err == n|oErr)..{|
|00001730| 0d 09 09 65 72 72 20 3d | 20 43 72 65 61 74 65 53 |...err =| CreateS|
|00001740| 70 72 69 74 65 54 65 73 | 74 28 26 67 53 70 72 69 |priteTes|t(&gSpri|
|00001750| 74 65 54 65 73 74 50 2c | 20 28 43 57 69 6e 64 6f |teTestP,| (CWindo|
|00001760| 77 50 74 72 29 67 57 69 | 6e 64 6f 77 50 29 3b 0d |wPtr)gWi|ndowP);.|
|00001770| 09 7d 0d 0d 09 69 66 20 | 28 65 72 72 20 3d 3d 20 |.}...if |(err == |
|00001780| 6e 6f 45 72 72 29 0d 09 | 7b 0d 09 09 53 68 6f 77 |noErr)..|{...Show|
|00001790| 57 69 6e 64 6f 77 28 67 | 57 69 6e 64 6f 77 50 29 |Window(g|WindowP)|
|000017a0| 3b 0d 09 09 55 70 64 61 | 74 65 53 70 72 69 74 65 |;...Upda|teSprite|
|000017b0| 54 65 73 74 28 67 53 70 | 72 69 74 65 54 65 73 74 |Test(gSp|riteTest|
|000017c0| 50 29 3b 0d 09 09 56 61 | 6c 69 64 52 65 63 74 28 |P);...Va|lidRect(|
|000017d0| 26 67 57 69 6e 64 6f 77 | 50 2d 3e 70 6f 72 74 52 |&gWindow|P->portR|
|000017e0| 65 63 74 29 3b 0d 09 7d | 0d 0d 09 69 66 20 28 65 |ect);..}|...if (e|
|000017f0| 72 72 20 21 3d 20 6e 6f | 45 72 72 29 0d 09 7b 0d |rr != no|Err)..{.|
|00001800| 09 09 45 72 72 6f 72 41 | 6c 65 72 74 28 65 72 72 |..ErrorA|lert(err|
|00001810| 2c 20 6b 55 6e 6b 6e 6f | 77 6e 45 72 72 6f 72 53 |, kUnkno|wnErrorS|
|00001820| 74 72 69 6e 67 49 6e 64 | 65 78 29 3b 0d 09 7d 0d |tringInd|ex);..}.|
|00001830| 0d 09 72 65 74 75 72 6e | 20 65 72 72 20 3d 3d 20 |..return| err == |
|00001840| 6e 6f 45 72 72 3b 0d 7d | 0d 0d 0d 76 6f 69 64 20 |noErr;.}|...void |
|00001850| 45 78 69 74 41 70 70 6c | 69 63 61 74 69 6f 6e 28 |ExitAppl|ication(|
|00001860| 76 6f 69 64 29 0d 7b 0d | 09 44 69 73 70 6f 73 65 |void).{.|.Dispose|
|00001870| 53 70 72 69 74 65 54 65 | 73 74 28 67 53 70 72 69 |SpriteTe|st(gSpri|
|00001880| 74 65 54 65 73 74 50 29 | 3b 0d 0d 09 53 57 45 78 |teTestP)|;...SWEx|
|00001890| 69 74 53 70 72 69 74 65 | 57 6f 72 6c 64 28 29 3b |itSprite|World();|
|000018a0| 0d 0d 09 44 69 73 70 6f | 73 65 57 69 6e 64 6f 77 |...Dispo|seWindow|
|000018b0| 28 67 57 69 6e 64 6f 77 | 50 29 3b 0d 7d 0d 0d 0d |(gWindow|P);.}...|
|000018c0| 76 6f 69 64 20 53 65 72 | 76 69 63 65 45 76 65 6e |void Ser|viceEven|
|000018d0| 74 73 28 76 6f 69 64 29 | 0d 7b 0d 09 42 6f 6f 6c |ts(void)|.{..Bool|
|000018e0| 65 61 6e 20 68 61 76 65 | 45 76 65 6e 74 3b 0d 09 |ean have|Event;..|
|000018f0| 45 76 65 6e 74 52 65 63 | 6f 72 64 20 65 76 65 6e |EventRec|ord even|
|00001900| 74 3b 0d 09 6c 6f 6e 67 | 20 73 6c 65 65 70 54 69 |t;..long| sleepTi|
|00001910| 6d 65 3b 0d 09 52 67 6e | 48 61 6e 64 6c 65 20 6d |me;..Rgn|Handle m|
|00001920| 6f 75 73 65 52 67 6e 20 | 3d 20 67 48 61 73 57 61 |ouseRgn |= gHasWa|
|00001930| 69 74 4e 65 78 74 45 76 | 65 6e 74 20 3f 20 4e 65 |itNextEv|ent ? Ne|
|00001940| 77 52 67 6e 28 29 20 3a | 20 4e 55 4c 4c 3b 0d 0d |wRgn() :| NULL;..|
|00001950| 09 77 68 69 6c 65 20 28 | 67 49 73 52 75 6e 6e 69 |.while (|gIsRunni|
|00001960| 6e 67 29 0d 09 7b 0d 09 | 09 69 66 20 28 67 48 61 |ng)..{..|.if (gHa|
|00001970| 73 57 61 69 74 4e 65 78 | 74 45 76 65 6e 74 29 0d |sWaitNex|tEvent).|
|00001980| 09 09 7b 0d 09 09 09 73 | 6c 65 65 70 54 69 6d 65 |..{....s|leepTime|
|00001990| 20 3d 20 67 49 6e 42 61 | 63 6b 47 72 6f 75 6e 64 | = gInBa|ckGround|
|000019a0| 20 3f 20 6b 42 61 63 6b | 47 72 6f 75 6e 64 53 6c | ? kBack|GroundSl|
|000019b0| 65 65 70 54 69 6d 65 20 | 3a 20 6b 46 6f 72 65 47 |eepTime |: kForeG|
|000019c0| 72 6f 75 6e 64 53 6c 65 | 65 70 54 69 6d 65 3b 0d |roundSle|epTime;.|
|000019d0| 0d 09 09 09 68 61 76 65 | 45 76 65 6e 74 20 3d 20 |....have|Event = |
|000019e0| 57 61 69 74 4e 65 78 74 | 45 76 65 6e 74 28 65 76 |WaitNext|Event(ev|
|000019f0| 65 72 79 45 76 65 6e 74 | 2c 20 26 65 76 65 6e 74 |eryEvent|, &event|
|00001a00| 2c 20 73 6c 65 65 70 54 | 69 6d 65 2c 20 6d 6f 75 |, sleepT|ime, mou|
|00001a10| 73 65 52 67 6e 29 3b 0d | 09 09 7d 0d 09 09 65 6c |seRgn);.|..}...el|
|00001a20| 73 65 0d 09 09 7b 0d 09 | 09 09 53 79 73 74 65 6d |se...{..|..System|
|00001a30| 54 61 73 6b 28 29 3b 0d | 09 09 09 68 61 76 65 45 |Task();.|...haveE|
|00001a40| 76 65 6e 74 20 3d 20 47 | 65 74 4e 65 78 74 45 76 |vent = G|etNextEv|
|00001a50| 65 6e 74 28 65 76 65 72 | 79 45 76 65 6e 74 2c 20 |ent(ever|yEvent, |
|00001a60| 26 65 76 65 6e 74 29 3b | 0d 09 09 7d 0d 0d 09 09 |&event);|...}....|
|00001a70| 69 66 20 28 68 61 76 65 | 45 76 65 6e 74 29 0d 09 |if (have|Event)..|
|00001a80| 09 7b 0d 09 09 09 44 69 | 73 70 61 74 63 68 45 76 |.{....Di|spatchEv|
|00001a90| 65 6e 74 28 26 65 76 65 | 6e 74 29 3b 0d 09 09 7d |ent(&eve|nt);...}|
|00001aa0| 0d 09 09 65 6c 73 65 0d | 09 09 7b 0d 09 09 09 48 |...else.|..{....H|
|00001ab0| 61 6e 64 6c 65 4e 75 6c | 6c 45 76 65 6e 74 28 29 |andleNul|lEvent()|
|00001ac0| 3b 0d 09 09 7d 0d 09 7d | 0d 0d 09 69 66 20 28 6d |;...}..}|...if (m|
|00001ad0| 6f 75 73 65 52 67 6e 20 | 21 3d 20 4e 55 4c 4c 29 |ouseRgn |!= NULL)|
|00001ae0| 0d 09 7b 0d 09 09 44 69 | 73 70 6f 73 65 52 67 6e |..{...Di|sposeRgn|
|00001af0| 28 6d 6f 75 73 65 52 67 | 6e 29 3b 0d 09 7d 0d 7d |(mouseRg|n);..}.}|
|00001b00| 0d 0d 0d 76 6f 69 64 20 | 44 69 73 70 61 74 63 68 |...void |Dispatch|
|00001b10| 45 76 65 6e 74 28 0d 09 | 45 76 65 6e 74 52 65 63 |Event(..|EventRec|
|00001b20| 6f 72 64 2a 20 65 76 65 | 6e 74 29 0d 7b 0d 09 73 |ord* eve|nt).{..s|
|00001b30| 77 69 74 63 68 28 65 76 | 65 6e 74 2d 3e 77 68 61 |witch(ev|ent->wha|
|00001b40| 74 29 0d 09 7b 0d 09 09 | 63 61 73 65 20 6d 6f 75 |t)..{...|case mou|
|00001b50| 73 65 44 6f 77 6e 3a 0d | 09 09 09 48 61 6e 64 6c |seDown:.|...Handl|
|00001b60| 65 4d 6f 75 73 65 45 76 | 65 6e 74 28 65 76 65 6e |eMouseEv|ent(even|
|00001b70| 74 29 3b 0d 09 09 09 62 | 72 65 61 6b 3b 0d 09 09 |t);....b|reak;...|
|00001b80| 63 61 73 65 20 6d 6f 75 | 73 65 55 70 3a 0d 09 09 |case mou|seUp:...|
|00001b90| 09 62 72 65 61 6b 3b 0d | 09 09 63 61 73 65 20 6b |.break;.|..case k|
|00001ba0| 65 79 55 70 3a 0d 09 09 | 09 62 72 65 61 6b 3b 0d |eyUp:...|.break;.|
|00001bb0| 09 09 63 61 73 65 20 6b | 65 79 44 6f 77 6e 3a 0d |..case k|eyDown:.|
|00001bc0| 09 09 63 61 73 65 20 61 | 75 74 6f 4b 65 79 3a 0d |..case a|utoKey:.|
|00001bd0| 09 09 09 48 61 6e 64 6c | 65 4b 65 79 45 76 65 6e |...Handl|eKeyEven|
|00001be0| 74 28 28 63 68 61 72 29 | 28 65 76 65 6e 74 2d 3e |t((char)|(event->|
|00001bf0| 6d 65 73 73 61 67 65 20 | 26 20 63 68 61 72 43 6f |message |& charCo|
|00001c00| 64 65 4d 61 73 6b 29 2c | 20 65 76 65 6e 74 2d 3e |deMask),| event->|
|00001c10| 6d 6f 64 69 66 69 65 72 | 73 29 3b 0d 09 09 09 62 |modifier|s);....b|
|00001c20| 72 65 61 6b 3b 0d 09 09 | 63 61 73 65 20 75 70 64 |reak;...|case upd|
|00001c30| 61 74 65 45 76 74 3a 0d | 09 09 09 48 61 6e 64 6c |ateEvt:.|...Handl|
|00001c40| 65 55 70 64 61 74 65 45 | 76 65 6e 74 28 28 57 69 |eUpdateE|vent((Wi|
|00001c50| 6e 64 6f 77 50 74 72 29 | 65 76 65 6e 74 2d 3e 6d |ndowPtr)|event->m|
|00001c60| 65 73 73 61 67 65 29 3b | 0d 09 09 09 62 72 65 61 |essage);|....brea|
|00001c70| 6b 3b 0d 09 09 63 61 73 | 65 20 64 69 73 6b 45 76 |k;...cas|e diskEv|
|00001c80| 74 3a 0d 09 09 09 48 61 | 6e 64 6c 65 44 69 73 6b |t:....Ha|ndleDisk|
|00001c90| 45 76 65 6e 74 28 65 76 | 65 6e 74 2d 3e 6d 65 73 |Event(ev|ent->mes|
|00001ca0| 73 61 67 65 29 3b 0d 09 | 09 09 62 72 65 61 6b 3b |sage);..|..break;|
|00001cb0| 0d 09 09 63 61 73 65 20 | 61 63 74 69 76 61 74 65 |...case |activate|
|00001cc0| 45 76 74 3a 0d 09 09 09 | 48 61 6e 64 6c 65 41 63 |Evt:....|HandleAc|
|00001cd0| 74 69 76 61 74 65 45 76 | 65 6e 74 28 28 57 69 6e |tivateEv|ent((Win|
|00001ce0| 64 6f 77 50 74 72 29 65 | 76 65 6e 74 2d 3e 6d 65 |dowPtr)e|vent->me|
|00001cf0| 73 73 61 67 65 29 3b 0d | 09 09 09 62 72 65 61 6b |ssage);.|...break|
|00001d00| 3b 0d 09 09 63 61 73 65 | 20 6e 65 74 77 6f 72 6b |;...case| network|
|00001d10| 45 76 74 3a 0d 09 09 09 | 62 72 65 61 6b 3b 0d 09 |Evt:....|break;..|
|00001d20| 09 63 61 73 65 20 64 72 | 69 76 65 72 45 76 74 3a |.case dr|iverEvt:|
|00001d30| 0d 09 09 09 62 72 65 61 | 6b 3b 0d 09 09 63 61 73 |....brea|k;...cas|
|00001d40| 65 20 61 70 70 31 45 76 | 74 3a 0d 09 09 09 62 72 |e app1Ev|t:....br|
|00001d50| 65 61 6b 3b 0d 09 09 63 | 61 73 65 20 61 70 70 32 |eak;...c|ase app2|
|00001d60| 45 76 74 3a 0d 09 09 09 | 62 72 65 61 6b 3b 0d 09 |Evt:....|break;..|
|00001d70| 09 63 61 73 65 20 61 70 | 70 33 45 76 74 3a 0d 09 |.case ap|p3Evt:..|
|00001d80| 09 09 62 72 65 61 6b 3b | 0d 09 09 63 61 73 65 20 |..break;|...case |
|00001d90| 6f 73 45 76 74 3a 0d 09 | 09 09 48 61 6e 64 6c 65 |osEvt:..|..Handle|
|00001da0| 4f 53 45 76 65 6e 74 28 | 65 76 65 6e 74 2d 3e 6d |OSEvent(|event->m|
|00001db0| 65 73 73 61 67 65 29 3b | 0d 09 09 09 62 72 65 61 |essage);|....brea|
|00001dc0| 6b 3b 0d 09 09 63 61 73 | 65 20 6b 48 69 67 68 4c |k;...cas|e kHighL|
|00001dd0| 65 76 65 6c 45 76 65 6e | 74 3a 0d 09 09 09 41 45 |evelEven|t:....AE|
|00001de0| 50 72 6f 63 65 73 73 41 | 70 70 6c 65 45 76 65 6e |ProcessA|ppleEven|
|00001df0| 74 28 65 76 65 6e 74 29 | 3b 0d 09 09 09 62 72 65 |t(event)|;....bre|
|00001e00| 61 6b 3b 0d 09 09 64 65 | 66 61 75 6c 74 3a 0d 09 |ak;...de|fault:..|
|00001e10| 09 62 72 65 61 6b 3b 0d | 09 7d 0d 7d 0d 0d 0d 76 |.break;.|.}.}...v|
|00001e20| 6f 69 64 20 48 61 6e 64 | 6c 65 4d 6f 75 73 65 45 |oid Hand|leMouseE|
|00001e30| 76 65 6e 74 28 0d 09 45 | 76 65 6e 74 52 65 63 6f |vent(..E|ventReco|
|00001e40| 72 64 2a 20 65 76 65 6e | 74 29 0d 7b 0d 09 57 69 |rd* even|t).{..Wi|
|00001e50| 6e 64 6f 77 50 74 72 20 | 77 68 69 63 68 57 69 6e |ndowPtr |whichWin|
|00001e60| 64 6f 77 3b 0d 09 73 68 | 6f 72 74 20 70 61 72 74 |dow;..sh|ort part|
|00001e70| 43 6f 64 65 3b 0d 0d 09 | 70 61 72 74 43 6f 64 65 |Code;...|partCode|
|00001e80| 20 3d 20 46 69 6e 64 57 | 69 6e 64 6f 77 28 65 76 | = FindW|indow(ev|
|00001e90| 65 6e 74 2d 3e 77 68 65 | 72 65 2c 20 26 77 68 69 |ent->whe|re, &whi|
|00001ea0| 63 68 57 69 6e 64 6f 77 | 29 3b 0d 0d 09 73 77 69 |chWindow|);...swi|
|00001eb0| 74 63 68 20 28 70 61 72 | 74 43 6f 64 65 29 0d 09 |tch (par|tCode)..|
|00001ec0| 7b 0d 09 09 63 61 73 65 | 20 69 6e 44 65 73 6b 3a |{...case| inDesk:|
|00001ed0| 09 09 0d 09 09 09 62 72 | 65 61 6b 3b 0d 09 09 63 |......br|eak;...c|
|00001ee0| 61 73 65 20 69 6e 4d 65 | 6e 75 42 61 72 3a 0d 09 |ase inMe|nuBar:..|
|00001ef0| 09 09 41 64 6a 75 73 74 | 4d 65 6e 75 49 74 65 6d |..Adjust|MenuItem|
|00001f00| 73 28 29 3b 0d 09 09 09 | 48 61 6e 64 6c 65 4d 65 |s();....|HandleMe|
|00001f10| 6e 75 43 6f 6d 6d 61 6e | 64 28 4d 65 6e 75 53 65 |nuComman|d(MenuSe|
|00001f20| 6c 65 63 74 28 65 76 65 | 6e 74 2d 3e 77 68 65 72 |lect(eve|nt->wher|
|00001f30| 65 29 29 3b 0d 09 09 09 | 62 72 65 61 6b 3b 0d 09 |e));....|break;..|
|00001f40| 09 63 61 73 65 20 69 6e | 53 79 73 57 69 6e 64 6f |.case in|SysWindo|
|00001f50| 77 3a 0d 09 09 09 53 79 | 73 74 65 6d 43 6c 69 63 |w:....Sy|stemClic|
|00001f60| 6b 28 65 76 65 6e 74 2c | 20 77 68 69 63 68 57 69 |k(event,| whichWi|
|00001f70| 6e 64 6f 77 29 3b 0d 09 | 09 09 62 72 65 61 6b 3b |ndow);..|..break;|
|00001f80| 0d 09 09 63 61 73 65 20 | 69 6e 43 6f 6e 74 65 6e |...case |inConten|
|00001f90| 74 3a 0d 09 09 09 62 72 | 65 61 6b 3b 0d 09 09 63 |t:....br|eak;...c|
|00001fa0| 61 73 65 20 69 6e 44 72 | 61 67 3a 0d 09 09 09 62 |ase inDr|ag:....b|
|00001fb0| 72 65 61 6b 3b 0d 09 09 | 63 61 73 65 20 69 6e 47 |reak;...|case inG|
|00001fc0| 72 6f 77 3a 0d 09 09 09 | 62 72 65 61 6b 3b 0d 09 |row:....|break;..|
|00001fd0| 09 63 61 73 65 20 69 6e | 47 6f 41 77 61 79 3a 0d |.case in|GoAway:.|
|00001fe0| 09 09 09 62 72 65 61 6b | 3b 0d 09 09 63 61 73 65 |...break|;...case|
|00001ff0| 20 69 6e 5a 6f 6f 6d 49 | 6e 3a 0d 09 09 63 61 73 | inZoomI|n:...cas|
|00002000| 65 20 69 6e 5a 6f 6f 6d | 4f 75 74 3a 0d 09 09 09 |e inZoom|Out:....|
|00002010| 62 72 65 61 6b 3b 0d 09 | 09 64 65 66 61 75 6c 74 |break;..|.default|
|00002020| 3a 09 09 09 0d 09 09 09 | 62 72 65 61 6b 3b 0d 09 |:.......|break;..|
|00002030| 7d 0d 7d 0d 0d 0d 76 6f | 69 64 20 48 61 6e 64 6c |}.}...vo|id Handl|
|00002040| 65 4b 65 79 45 76 65 6e | 74 28 0d 09 63 68 61 72 |eKeyEven|t(..char|
|00002050| 20 6b 65 79 2c 0d 09 73 | 68 6f 72 74 20 6d 6f 64 | key,..s|hort mod|
|00002060| 69 66 69 65 72 73 29 0d | 7b 0d 09 69 66 20 28 28 |ifiers).|{..if ((|
|00002070| 6d 6f 64 69 66 69 65 72 | 73 20 26 20 63 6d 64 4b |modifier|s & cmdK|
|00002080| 65 79 29 20 21 3d 20 30 | 29 0d 09 7b 0d 09 09 41 |ey) != 0|)..{...A|
|00002090| 64 6a 75 73 74 4d 65 6e | 75 49 74 65 6d 73 28 29 |djustMen|uItems()|
|000020a0| 3b 0d 09 09 48 61 6e 64 | 6c 65 4d 65 6e 75 43 6f |;...Hand|leMenuCo|
|000020b0| 6d 6d 61 6e 64 28 4d 65 | 6e 75 4b 65 79 28 6b 65 |mmand(Me|nuKey(ke|
|000020c0| 79 29 29 3b 0d 09 7d 0d | 09 65 6c 73 65 0d 09 7b |y));..}.|.else..{|
|000020d0| 0d 09 09 09 2f 2f 20 69 | 66 20 74 68 65 20 73 70 |....// i|f the sp|
|000020e0| 61 63 65 62 61 72 20 69 | 73 20 68 69 74 2c 20 66 |acebar i|s hit, f|
|000020f0| 69 6c 6c 20 74 68 65 20 | 73 63 72 65 65 6e 20 77 |ill the |screen w|
|00002100| 69 74 68 20 62 6c 61 63 | 6b 0d 09 09 09 2f 2f 20 |ith blac|k....// |
|00002110| 75 73 65 66 75 6c 20 66 | 6f 72 20 64 65 62 75 67 |useful f|or debug|
|00002120| 67 69 6e 67 20 70 75 72 | 70 6f 73 65 73 0d 09 09 |ging pur|poses...|
|00002130| 69 66 20 28 6b 65 79 20 | 3d 3d 20 27 20 27 29 0d |if (key |== ' ').|
|00002140| 09 09 7b 0d 09 09 09 23 | 69 66 20 64 61 6e 67 65 |..{....#|if dange|
|00002150| 72 6f 75 73 50 61 74 74 | 65 72 6e 0d 09 09 09 46 |rousPatt|ern....F|
|00002160| 69 6c 6c 52 65 63 74 28 | 26 67 57 69 6e 64 6f 77 |illRect(|&gWindow|
|00002170| 50 2d 3e 70 6f 72 74 52 | 65 63 74 2c 20 71 64 2e |P->portR|ect, qd.|
|00002180| 62 6c 61 63 6b 29 3b 0d | 09 09 09 23 65 6c 73 65 |black);.|...#else|
|00002190| 0d 09 09 09 46 69 6c 6c | 52 65 63 74 28 26 67 57 |....Fill|Rect(&gW|
|000021a0| 69 6e 64 6f 77 50 2d 3e | 70 6f 72 74 52 65 63 74 |indowP->|portRect|
|000021b0| 2c 20 26 71 64 2e 62 6c | 61 63 6b 29 3b 0d 09 09 |, &qd.bl|ack);...|
|000021c0| 09 23 65 6e 64 69 66 0d | 09 09 7d 0d 09 7d 0d 7d |.#endif.|..}..}.}|
|000021d0| 0d 0d 0d 76 6f 69 64 20 | 48 61 6e 64 6c 65 55 70 |...void |HandleUp|
|000021e0| 64 61 74 65 45 76 65 6e | 74 28 0d 09 57 69 6e 64 |dateEven|t(..Wind|
|000021f0| 6f 77 50 74 72 20 75 70 | 64 61 74 65 57 69 6e 64 |owPtr up|dateWind|
|00002200| 6f 77 50 29 0d 7b 0d 09 | 69 66 20 28 75 70 64 61 |owP).{..|if (upda|
|00002210| 74 65 57 69 6e 64 6f 77 | 50 20 3d 3d 20 67 57 69 |teWindow|P == gWi|
|00002220| 6e 64 6f 77 50 29 0d 09 | 7b 0d 09 09 53 65 74 50 |ndowP)..|{...SetP|
|00002230| 6f 72 74 28 75 70 64 61 | 74 65 57 69 6e 64 6f 77 |ort(upda|teWindow|
|00002240| 50 29 3b 0d 09 09 42 65 | 67 69 6e 55 70 64 61 74 |P);...Be|ginUpdat|
|00002250| 65 28 75 70 64 61 74 65 | 57 69 6e 64 6f 77 50 29 |e(update|WindowP)|
|00002260| 3b 0d 0d 09 09 55 70 64 | 61 74 65 53 70 72 69 74 |;....Upd|ateSprit|
|00002270| 65 54 65 73 74 28 67 53 | 70 72 69 74 65 54 65 73 |eTest(gS|priteTes|
|00002280| 74 50 29 3b 0d 0d 09 09 | 45 6e 64 55 70 64 61 74 |tP);....|EndUpdat|
|00002290| 65 28 75 70 64 61 74 65 | 57 69 6e 64 6f 77 50 29 |e(update|WindowP)|
|000022a0| 3b 0d 09 7d 0d 7d 0d 0d | 0d 76 6f 69 64 20 48 61 |;..}.}..|.void Ha|
|000022b0| 6e 64 6c 65 41 63 74 69 | 76 61 74 65 45 76 65 6e |ndleActi|vateEven|
|000022c0| 74 28 0d 09 57 69 6e 64 | 6f 77 50 74 72 20 75 70 |t(..Wind|owPtr up|
|000022d0| 64 61 74 65 57 69 6e 64 | 6f 77 50 29 0d 7b 0d 23 |dateWind|owP).{.#|
|000022e0| 69 66 20 4d 50 57 0d 23 | 70 72 61 67 6d 61 20 75 |if MPW.#|pragma u|
|000022f0| 6e 75 73 65 64 28 75 70 | 64 61 74 65 57 69 6e 64 |nused(up|dateWind|
|00002300| 6f 77 50 29 0d 23 65 6e | 64 69 66 0d 7d 0d 0d 0d |owP).#en|dif.}...|
|00002310| 76 6f 69 64 20 48 61 6e | 64 6c 65 4f 53 45 76 65 |void Han|dleOSEve|
|00002320| 6e 74 28 0d 09 6c 6f 6e | 67 20 6d 65 73 73 61 67 |nt(..lon|g messag|
|00002330| 65 29 0d 7b 0d 09 69 66 | 20 28 28 6d 65 73 73 61 |e).{..if| ((messa|
|00002340| 67 65 20 3e 3e 20 32 34 | 29 20 3d 3d 20 73 75 73 |ge >> 24|) == sus|
|00002350| 70 65 6e 64 52 65 73 75 | 6d 65 4d 65 73 73 61 67 |pendResu|meMessag|
|00002360| 65 29 0d 09 7b 0d 09 09 | 69 66 20 28 28 6d 65 73 |e)..{...|if ((mes|
|00002370| 73 61 67 65 20 26 20 72 | 65 73 75 6d 65 46 6c 61 |sage & r|esumeFla|
|00002380| 67 29 20 21 3d 20 30 29 | 0d 09 09 7b 0d 09 09 09 |g) != 0)|...{....|
|00002390| 67 49 6e 42 61 63 6b 47 | 72 6f 75 6e 64 20 3d 20 |gInBackG|round = |
|000023a0| 66 61 6c 73 65 3b 0d 09 | 09 7d 0d 09 09 65 6c 73 |false;..|.}...els|
|000023b0| 65 0d 09 09 7b 0d 09 09 | 09 67 49 6e 42 61 63 6b |e...{...|.gInBack|
|000023c0| 47 72 6f 75 6e 64 20 3d | 20 74 72 75 65 3b 0d 09 |Ground =| true;..|
|000023d0| 09 7d 0d 09 7d 0d 7d 0d | 0d 0d 76 6f 69 64 20 48 |.}..}.}.|..void H|
|000023e0| 61 6e 64 6c 65 44 69 73 | 6b 45 76 65 6e 74 28 0d |andleDis|kEvent(.|
|000023f0| 09 6c 6f 6e 67 20 6d 65 | 73 73 61 67 65 29 0d 7b |.long me|ssage).{|
|00002400| 0d 09 4f 53 45 72 72 20 | 65 72 72 3b 0d 09 50 6f |..OSErr |err;..Po|
|00002410| 69 6e 74 20 64 69 61 6c | 6f 67 4c 6f 63 61 74 69 |int dial|ogLocati|
|00002420| 6f 6e 20 3d 20 7b 31 30 | 30 2c 20 31 30 30 7d 3b |on = {10|0, 100};|
|00002430| 0d 0d 09 69 66 20 28 28 | 6d 65 73 73 61 67 65 20 |...if ((|message |
|00002440| 26 20 30 78 46 46 46 46 | 30 30 30 30 29 20 21 3d |& 0xFFFF|0000) !=|
|00002450| 20 6e 6f 45 72 72 29 0d | 09 7b 0d 09 09 65 72 72 | noErr).|.{...err|
|00002460| 20 3d 20 44 49 42 61 64 | 4d 6f 75 6e 74 28 64 69 | = DIBad|Mount(di|
|00002470| 61 6c 6f 67 4c 6f 63 61 | 74 69 6f 6e 2c 20 6d 65 |alogLoca|tion, me|
|00002480| 73 73 61 67 65 29 3b 0d | 0d 09 09 69 66 20 28 65 |ssage);.|...if (e|
|00002490| 72 72 20 21 3d 20 6e 6f | 45 72 72 29 0d 09 09 7b |rr != no|Err)...{|
|000024a0| 0d 09 09 09 45 72 72 6f | 72 41 6c 65 72 74 28 65 |....Erro|rAlert(e|
|000024b0| 72 72 2c 20 6b 55 6e 6b | 6e 6f 77 6e 45 72 72 6f |rr, kUnk|nownErro|
|000024c0| 72 53 74 72 69 6e 67 49 | 6e 64 65 78 29 3b 0d 09 |rStringI|ndex);..|
|000024d0| 09 7d 0d 09 7d 0d 7d 0d | 0d 0d 76 6f 69 64 20 48 |.}..}.}.|..void H|
|000024e0| 61 6e 64 6c 65 4e 75 6c | 6c 45 76 65 6e 74 28 76 |andleNul|lEvent(v|
|000024f0| 6f 69 64 29 0d 7b 0d 09 | 52 75 6e 53 70 72 69 74 |oid).{..|RunSprit|
|00002500| 65 54 65 73 74 28 67 53 | 70 72 69 74 65 54 65 73 |eTest(gS|priteTes|
|00002510| 74 50 29 3b 0d 7d 0d 0d | 0d 76 6f 69 64 20 48 61 |tP);.}..|.void Ha|
|00002520| 6e 64 6c 65 4d 65 6e 75 | 43 6f 6d 6d 61 6e 64 28 |ndleMenu|Command(|
|00002530| 0d 09 6c 6f 6e 67 20 6d | 65 6e 75 49 74 65 6d 49 |..long m|enuItemI|
|00002540| 64 65 6e 74 69 66 69 65 | 72 29 0d 7b 0d 09 73 68 |dentifie|r).{..sh|
|00002550| 6f 72 74 20 6d 65 6e 75 | 49 64 65 6e 74 20 3d 20 |ort menu|Ident = |
|00002560| 48 69 57 6f 72 64 28 6d | 65 6e 75 49 74 65 6d 49 |HiWord(m|enuItemI|
|00002570| 64 65 6e 74 69 66 69 65 | 72 29 3b 0d 09 73 68 6f |dentifie|r);..sho|
|00002580| 72 74 20 6d 65 6e 75 49 | 74 65 6d 20 3d 20 4c 6f |rt menuI|tem = Lo|
|00002590| 57 6f 72 64 28 6d 65 6e | 75 49 74 65 6d 49 64 65 |Word(men|uItemIde|
|000025a0| 6e 74 69 66 69 65 72 29 | 3b 0d 0d 09 73 77 69 74 |ntifier)|;...swit|
|000025b0| 63 68 20 28 6d 65 6e 75 | 49 64 65 6e 74 29 0d 09 |ch (menu|Ident)..|
|000025c0| 7b 0d 09 09 63 61 73 65 | 20 6b 41 70 70 6c 65 4d |{...case| kAppleM|
|000025d0| 65 6e 75 49 44 3a 0d 09 | 09 7b 0d 09 09 09 48 61 |enuID:..|.{....Ha|
|000025e0| 6e 64 6c 65 41 70 70 6c | 65 4d 65 6e 75 43 6f 6d |ndleAppl|eMenuCom|
|000025f0| 6d 61 6e 64 28 6d 65 6e | 75 49 74 65 6d 29 3b 0d |mand(men|uItem);.|
|00002600| 09 09 09 62 72 65 61 6b | 3b 0d 09 09 7d 0d 0d 09 |...break|;...}...|
|00002610| 09 63 61 73 65 20 6b 46 | 69 6c 65 4d 65 6e 75 49 |.case kF|ileMenuI|
|00002620| 44 3a 0d 09 09 7b 0d 09 | 09 09 48 61 6e 64 6c 65 |D:...{..|..Handle|
|00002630| 46 69 6c 65 4d 65 6e 75 | 43 6f 6d 6d 61 6e 64 28 |FileMenu|Command(|
|00002640| 6d 65 6e 75 49 74 65 6d | 29 3b 0d 09 09 09 62 72 |menuItem|);....br|
|00002650| 65 61 6b 3b 0d 09 09 7d | 0d 0d 09 09 63 61 73 65 |eak;...}|....case|
|00002660| 20 6b 45 64 69 74 4d 65 | 6e 75 49 44 3a 0d 09 09 | kEditMe|nuID:...|
|00002670| 7b 0d 09 09 09 48 61 6e | 64 6c 65 45 64 69 74 4d |{....Han|dleEditM|
|00002680| 65 6e 75 43 6f 6d 6d 61 | 6e 64 28 6d 65 6e 75 49 |enuComma|nd(menuI|
|00002690| 74 65 6d 29 3b 0d 09 09 | 09 62 72 65 61 6b 3b 0d |tem);...|.break;.|
|000026a0| 09 09 7d 0d 0d 09 09 63 | 61 73 65 20 6b 53 70 72 |..}....c|ase kSpr|
|000026b0| 69 74 65 4d 65 6e 75 49 | 44 3a 0d 09 09 7b 0d 09 |iteMenuI|D:...{..|
|000026c0| 09 09 48 61 6e 64 6c 65 | 53 70 72 69 74 65 4d 65 |..Handle|SpriteMe|
|000026d0| 6e 75 43 6f 6d 6d 61 6e | 64 28 6d 65 6e 75 49 74 |nuComman|d(menuIt|
|000026e0| 65 6d 29 3b 0d 09 09 09 | 62 72 65 61 6b 3b 0d 09 |em);....|break;..|
|000026f0| 09 7d 0d 0d 09 09 63 61 | 73 65 20 6b 54 65 73 74 |.}....ca|se kTest|
|00002700| 4d 65 6e 75 49 44 3a 0d | 09 09 7b 0d 09 09 09 48 |MenuID:.|..{....H|
|00002710| 61 6e 64 6c 65 54 65 73 | 74 4d 65 6e 75 43 6f 6d |andleTes|tMenuCom|
|00002720| 6d 61 6e 64 28 6d 65 6e | 75 49 74 65 6d 29 3b 0d |mand(men|uItem);.|
|00002730| 09 09 09 62 72 65 61 6b | 3b 0d 09 09 7d 0d 09 7d |...break|;...}..}|
|00002740| 0d 0d 09 48 69 6c 69 74 | 65 4d 65 6e 75 28 30 29 |...Hilit|eMenu(0)|
|00002750| 3b 0d 7d 0d 0d 0d 76 6f | 69 64 20 48 61 6e 64 6c |;.}...vo|id Handl|
|00002760| 65 41 70 70 6c 65 4d 65 | 6e 75 43 6f 6d 6d 61 6e |eAppleMe|nuComman|
|00002770| 64 28 0d 09 73 68 6f 72 | 74 20 6d 65 6e 75 49 74 |d(..shor|t menuIt|
|00002780| 65 6d 29 0d 7b 0d 09 53 | 74 72 32 35 35 20 64 65 |em).{..S|tr255 de|
|00002790| 73 6b 41 63 63 4e 61 6d | 65 3b 0d 0d 09 73 77 69 |skAccNam|e;...swi|
|000027a0| 74 63 68 20 28 6d 65 6e | 75 49 74 65 6d 29 0d 09 |tch (men|uItem)..|
|000027b0| 7b 0d 09 09 63 61 73 65 | 20 6b 41 62 6f 75 74 49 |{...case| kAboutI|
|000027c0| 74 65 6d 3a 0d 09 09 7b | 0d 09 09 09 44 69 73 70 |tem:...{|....Disp|
|000027d0| 6c 61 79 41 62 6f 75 74 | 42 6f 78 28 29 3b 0d 09 |layAbout|Box();..|
|000027e0| 09 09 62 72 65 61 6b 3b | 0d 09 09 7d 0d 0d 09 09 |..break;|...}....|
|000027f0| 64 65 66 61 75 6c 74 3a | 0d 09 09 7b 0d 09 09 09 |default:|...{....|
|00002800| 47 65 74 49 74 65 6d 28 | 47 65 74 4d 48 61 6e 64 |GetItem(|GetMHand|
|00002810| 6c 65 28 6b 41 70 70 6c | 65 4d 65 6e 75 49 44 29 |le(kAppl|eMenuID)|
|00002820| 2c 20 6d 65 6e 75 49 74 | 65 6d 2c 20 64 65 73 6b |, menuIt|em, desk|
|00002830| 41 63 63 4e 61 6d 65 29 | 3b 0d 09 09 09 4f 70 65 |AccName)|;....Ope|
|00002840| 6e 44 65 73 6b 41 63 63 | 28 64 65 73 6b 41 63 63 |nDeskAcc|(deskAcc|
|00002850| 4e 61 6d 65 29 3b 0d 09 | 09 09 62 72 65 61 6b 3b |Name);..|..break;|
|00002860| 0d 09 09 7d 0d 09 7d 0d | 7d 0d 0d 0d 76 6f 69 64 |...}..}.|}...void|
|00002870| 20 48 61 6e 64 6c 65 46 | 69 6c 65 4d 65 6e 75 43 | HandleF|ileMenuC|
|00002880| 6f 6d 6d 61 6e 64 28 0d | 09 73 68 6f 72 74 20 6d |ommand(.|.short m|
|00002890| 65 6e 75 49 74 65 6d 29 | 0d 7b 0d 09 73 77 69 74 |enuItem)|.{..swit|
|000028a0| 63 68 20 28 6d 65 6e 75 | 49 74 65 6d 29 0d 09 7b |ch (menu|Item)..{|
|000028b0| 0d 09 09 63 61 73 65 20 | 6b 51 75 69 74 49 74 65 |...case |kQuitIte|
|000028c0| 6d 3a 0d 09 09 7b 0d 09 | 09 09 67 49 73 52 75 6e |m:...{..|..gIsRun|
|000028d0| 6e 69 6e 67 20 3d 20 66 | 61 6c 73 65 3b 0d 09 09 |ning = f|alse;...|
|000028e0| 09 62 72 65 61 6b 3b 0d | 09 09 7d 0d 09 7d 0d 7d |.break;.|..}..}.}|
|000028f0| 0d 0d 0d 76 6f 69 64 20 | 48 61 6e 64 6c 65 45 64 |...void |HandleEd|
|00002900| 69 74 4d 65 6e 75 43 6f | 6d 6d 61 6e 64 28 0d 09 |itMenuCo|mmand(..|
|00002910| 73 68 6f 72 74 20 6d 65 | 6e 75 49 74 65 6d 29 0d |short me|nuItem).|
|00002920| 7b 0d 09 28 76 6f 69 64 | 29 53 79 73 74 65 6d 45 |{..(void|)SystemE|
|00002930| 64 69 74 28 6d 65 6e 75 | 49 74 65 6d 29 3b 0d 7d |dit(menu|Item);.}|
|00002940| 0d 0d 0d 76 6f 69 64 20 | 48 61 6e 64 6c 65 53 70 |...void |HandleSp|
|00002950| 72 69 74 65 4d 65 6e 75 | 43 6f 6d 6d 61 6e 64 28 |riteMenu|Command(|
|00002960| 0d 09 73 68 6f 72 74 20 | 6d 65 6e 75 49 74 65 6d |..short |menuItem|
|00002970| 29 0d 7b 0d 09 73 77 69 | 74 63 68 20 28 6d 65 6e |).{..swi|tch (men|
|00002980| 75 49 74 65 6d 29 0d 09 | 7b 0d 09 09 63 61 73 65 |uItem)..|{...case|
|00002990| 20 6b 43 72 65 61 74 65 | 53 70 72 69 74 65 49 74 | kCreate|SpriteIt|
|000029a0| 65 6d 3a 0d 09 09 7b 0d | 09 09 09 48 61 6e 64 6c |em:...{.|...Handl|
|000029b0| 65 43 72 65 61 74 65 53 | 70 72 69 74 65 43 6f 6d |eCreateS|priteCom|
|000029c0| 6d 61 6e 64 28 67 53 70 | 72 69 74 65 54 65 73 74 |mand(gSp|riteTest|
|000029d0| 50 29 3b 0d 09 09 09 62 | 72 65 61 6b 3b 0d 09 09 |P);....b|reak;...|
|000029e0| 7d 0d 0d 09 09 63 61 73 | 65 20 6b 43 6f 6d 70 69 |}....cas|e kCompi|
|000029f0| 6c 65 53 70 72 69 74 65 | 49 74 65 6d 3a 0d 09 09 |leSprite|Item:...|
|00002a00| 7b 0d 09 09 09 43 6f 6d | 70 69 6c 65 53 70 72 69 |{....Com|pileSpri|
|00002a10| 74 65 43 6f 6d 6d 61 6e | 64 28 67 53 70 72 69 74 |teComman|d(gSprit|
|00002a20| 65 54 65 73 74 50 29 3b | 0d 09 09 09 62 72 65 61 |eTestP);|....brea|
|00002a30| 6b 3b 0d 09 09 7d 0d 0d | 09 09 63 61 73 65 20 6b |k;...}..|..case k|
|00002a40| 48 69 64 65 54 69 74 6c | 65 49 74 65 6d 3a 0d 09 |HideTitl|eItem:..|
|00002a50| 09 7b 0d 09 09 09 48 61 | 6e 64 6c 65 53 70 72 69 |.{....Ha|ndleSpri|
|00002a60| 74 65 54 65 73 74 54 69 | 74 6c 65 43 6f 6d 6d 61 |teTestTi|tleComma|
|00002a70| 6e 64 28 67 53 70 72 69 | 74 65 54 65 73 74 50 29 |nd(gSpri|teTestP)|
|00002a80| 3b 0d 09 09 09 62 72 65 | 61 6b 3b 0d 09 09 7d 0d |;....bre|ak;...}.|
|00002a90| 0d 09 09 63 61 73 65 20 | 6b 48 69 64 65 42 61 6c |...case |kHideBal|
|00002aa0| 6c 73 49 74 65 6d 3a 0d | 09 09 7b 0d 09 09 09 48 |lsItem:.|..{....H|
|00002ab0| 61 6e 64 6c 65 42 6f 75 | 6e 63 69 6e 67 42 61 6c |andleBou|ncingBal|
|00002ac0| 6c 73 43 6f 6d 6d 61 6e | 64 28 67 53 70 72 69 74 |lsComman|d(gSprit|
|00002ad0| 65 54 65 73 74 50 29 3b | 0d 09 09 09 62 72 65 61 |eTestP);|....brea|
|00002ae0| 6b 3b 0d 09 09 7d 0d 0d | 09 7d 0d 7d 0d 0d 0d 76 |k;...}..|.}.}...v|
|00002af0| 6f 69 64 20 48 61 6e 64 | 6c 65 54 65 73 74 4d 65 |oid Hand|leTestMe|
|00002b00| 6e 75 43 6f 6d 6d 61 6e | 64 28 0d 09 73 68 6f 72 |nuComman|d(..shor|
|00002b10| 74 20 6d 65 6e 75 49 74 | 65 6d 29 0d 7b 0d 09 73 |t menuIt|em).{..s|
|00002b20| 77 69 74 63 68 20 28 6d | 65 6e 75 49 74 65 6d 29 |witch (m|enuItem)|
|00002b30| 0d 09 7b 0d 09 09 63 61 | 73 65 20 6b 54 65 73 74 |..{...ca|se kTest|
|00002b40| 49 74 65 6d 3a 0d 09 09 | 7b 0d 09 09 09 69 66 20 |Item:...|{....if |
|00002b50| 28 67 53 70 72 69 74 65 | 54 65 73 74 50 2d 3e 69 |(gSprite|TestP->i|
|00002b60| 73 43 6f 6d 6d 61 6e 64 | 41 63 74 69 76 65 5b 6b |sCommand|Active[k|
|00002b70| 43 6f 70 79 42 69 74 73 | 54 65 73 74 43 6f 6d 6d |CopyBits|TestComm|
|00002b80| 61 6e 64 5d 29 0d 09 09 | 09 09 43 6f 70 79 42 69 |and])...|..CopyBi|
|00002b90| 74 73 53 70 65 65 64 54 | 65 73 74 43 6f 6d 6d 61 |tsSpeedT|estComma|
|00002ba0| 6e 64 28 67 53 70 72 69 | 74 65 54 65 73 74 50 29 |nd(gSpri|teTestP)|
|00002bb0| 3b 0d 09 09 09 65 6c 73 | 65 20 69 66 20 28 67 53 |;....els|e if (gS|
|00002bc0| 70 72 69 74 65 54 65 73 | 74 50 2d 3e 69 73 43 6f |priteTes|tP->isCo|
|00002bd0| 6d 6d 61 6e 64 41 63 74 | 69 76 65 5b 6b 42 6c 69 |mmandAct|ive[kBli|
|00002be0| 74 50 69 78 69 65 54 65 | 73 74 43 6f 6d 6d 61 6e |tPixieTe|stComman|
|00002bf0| 64 5d 29 0d 09 09 09 09 | 42 6c 69 74 50 69 78 69 |d]).....|BlitPixi|
|00002c00| 65 53 70 65 65 64 54 65 | 73 74 43 6f 6d 6d 61 6e |eSpeedTe|stComman|
|00002c10| 64 28 67 53 70 72 69 74 | 65 54 65 73 74 50 29 3b |d(gSprit|eTestP);|
|00002c20| 0d 09 09 09 65 6c 73 65 | 0d 09 09 09 09 52 75 6e |....else|.....Run|
|00002c30| 43 6f 6d 70 69 6c 65 64 | 53 70 72 69 74 65 43 6f |Compiled|SpriteCo|
|00002c40| 6d 6d 61 6e 64 28 67 53 | 70 72 69 74 65 54 65 73 |mmand(gS|priteTes|
|00002c50| 74 50 2c 20 66 61 6c 73 | 65 29 3b 0d 09 09 09 62 |tP, fals|e);....b|
|00002c60| 72 65 61 6b 3b 0d 09 09 | 7d 0d 0d 09 09 63 61 73 |reak;...|}....cas|
|00002c70| 65 20 6b 43 6f 70 79 42 | 69 74 73 54 65 73 74 49 |e kCopyB|itsTestI|
|00002c80| 74 65 6d 3a 0d 09 09 7b | 0d 09 09 09 67 53 70 72 |tem:...{|....gSpr|
|00002c90| 69 74 65 54 65 73 74 50 | 2d 3e 69 73 43 6f 6d 6d |iteTestP|->isComm|
|00002ca0| 61 6e 64 41 63 74 69 76 | 65 5b 6b 43 6f 70 79 42 |andActiv|e[kCopyB|
|00002cb0| 69 74 73 54 65 73 74 43 | 6f 6d 6d 61 6e 64 5d 20 |itsTestC|ommand] |
|00002cc0| 3d 20 74 72 75 65 3b 0d | 09 09 09 67 53 70 72 69 |= true;.|...gSpri|
|00002cd0| 74 65 54 65 73 74 50 2d | 3e 69 73 43 6f 6d 6d 61 |teTestP-|>isComma|
|00002ce0| 6e 64 41 63 74 69 76 65 | 5b 6b 42 6c 69 74 50 69 |ndActive|[kBlitPi|
|00002cf0| 78 69 65 54 65 73 74 43 | 6f 6d 6d 61 6e 64 5d 20 |xieTestC|ommand] |
|00002d00| 3d 20 66 61 6c 73 65 3b | 0d 09 09 09 67 53 70 72 |= false;|....gSpr|
|00002d10| 69 74 65 54 65 73 74 50 | 2d 3e 69 73 43 6f 6d 6d |iteTestP|->isComm|
|00002d20| 61 6e 64 41 63 74 69 76 | 65 5b 6b 52 75 6e 43 6f |andActiv|e[kRunCo|
|00002d30| 6d 70 69 6c 65 64 53 70 | 72 69 74 65 43 6f 6d 6d |mpiledSp|riteComm|
|00002d40| 61 6e 64 5d 20 3d 20 66 | 61 6c 73 65 3b 0d 09 09 |and] = f|alse;...|
|00002d50| 09 62 72 65 61 6b 3b 0d | 09 09 7d 0d 0d 09 09 63 |.break;.|..}....c|
|00002d60| 61 73 65 20 6b 42 6c 69 | 74 50 69 78 69 65 54 65 |ase kBli|tPixieTe|
|00002d70| 73 74 49 74 65 6d 3a 0d | 09 09 7b 0d 09 09 09 67 |stItem:.|..{....g|
|00002d80| 53 70 72 69 74 65 54 65 | 73 74 50 2d 3e 69 73 43 |SpriteTe|stP->isC|
|00002d90| 6f 6d 6d 61 6e 64 41 63 | 74 69 76 65 5b 6b 43 6f |ommandAc|tive[kCo|
|00002da0| 70 79 42 69 74 73 54 65 | 73 74 43 6f 6d 6d 61 6e |pyBitsTe|stComman|
|00002db0| 64 5d 20 3d 20 66 61 6c | 73 65 3b 0d 09 09 09 67 |d] = fal|se;....g|
|00002dc0| 53 70 72 69 74 65 54 65 | 73 74 50 2d 3e 69 73 43 |SpriteTe|stP->isC|
|00002dd0| 6f 6d 6d 61 6e 64 41 63 | 74 69 76 65 5b 6b 42 6c |ommandAc|tive[kBl|
|00002de0| 69 74 50 69 78 69 65 54 | 65 73 74 43 6f 6d 6d 61 |itPixieT|estComma|
|00002df0| 6e 64 5d 20 3d 20 74 72 | 75 65 3b 0d 09 09 09 67 |nd] = tr|ue;....g|
|00002e00| 53 70 72 69 74 65 54 65 | 73 74 50 2d 3e 69 73 43 |SpriteTe|stP->isC|
|00002e10| 6f 6d 6d 61 6e 64 41 63 | 74 69 76 65 5b 6b 52 75 |ommandAc|tive[kRu|
|00002e20| 6e 43 6f 6d 70 69 6c 65 | 64 53 70 72 69 74 65 43 |nCompile|dSpriteC|
|00002e30| 6f 6d 6d 61 6e 64 5d 20 | 3d 20 66 61 6c 73 65 3b |ommand] |= false;|
|00002e40| 0d 09 09 09 62 72 65 61 | 6b 3b 0d 09 09 7d 0d 0d |....brea|k;...}..|
|00002e50| 09 09 63 61 73 65 20 6b | 52 75 6e 43 6f 6d 70 69 |..case k|RunCompi|
|00002e60| 6c 65 64 53 70 72 69 74 | 65 49 74 65 6d 3a 0d 09 |ledSprit|eItem:..|
|00002e70| 09 7b 0d 09 09 09 67 53 | 70 72 69 74 65 54 65 73 |.{....gS|priteTes|
|00002e80| 74 50 2d 3e 69 73 43 6f | 6d 6d 61 6e 64 41 63 74 |tP->isCo|mmandAct|
|00002e90| 69 76 65 5b 6b 43 6f 70 | 79 42 69 74 73 54 65 73 |ive[kCop|yBitsTes|
|00002ea0| 74 43 6f 6d 6d 61 6e 64 | 5d 20 3d 20 66 61 6c 73 |tCommand|] = fals|
|00002eb0| 65 3b 0d 09 09 09 67 53 | 70 72 69 74 65 54 65 73 |e;....gS|priteTes|
|00002ec0| 74 50 2d 3e 69 73 43 6f | 6d 6d 61 6e 64 41 63 74 |tP->isCo|mmandAct|
|00002ed0| 69 76 65 5b 6b 42 6c 69 | 74 50 69 78 69 65 54 65 |ive[kBli|tPixieTe|
|00002ee0| 73 74 43 6f 6d 6d 61 6e | 64 5d 20 3d 20 66 61 6c |stComman|d] = fal|
|00002ef0| 73 65 3b 0d 09 09 09 67 | 53 70 72 69 74 65 54 65 |se;....g|SpriteTe|
|00002f00| 73 74 50 2d 3e 69 73 43 | 6f 6d 6d 61 6e 64 41 63 |stP->isC|ommandAc|
|00002f10| 74 69 76 65 5b 6b 52 75 | 6e 43 6f 6d 70 69 6c 65 |tive[kRu|nCompile|
|00002f20| 64 53 70 72 69 74 65 43 | 6f 6d 6d 61 6e 64 5d 20 |dSpriteC|ommand] |
|00002f30| 3d 20 74 72 75 65 3b 0d | 09 09 09 62 72 65 61 6b |= true;.|...break|
|00002f40| 3b 0d 09 09 7d 0d 0d 09 | 09 63 61 73 65 20 6b 43 |;...}...|.case kC|
|00002f50| 6f 6c 6c 69 73 69 6f 6e | 44 65 74 65 63 74 69 6f |ollision|Detectio|
|00002f60| 6e 49 74 65 6d 3a 0d 09 | 09 7b 0d 09 09 09 67 53 |nItem:..|.{....gS|
|00002f70| 70 72 69 74 65 54 65 73 | 74 50 2d 3e 69 73 43 6f |priteTes|tP->isCo|
|00002f80| 6d 6d 61 6e 64 41 63 74 | 69 76 65 5b 6b 43 6f 6c |mmandAct|ive[kCol|
|00002f90| 6c 69 73 69 6f 6e 44 65 | 74 65 63 74 69 6f 6e 43 |lisionDe|tectionC|
|00002fa0| 6f 6d 6d 61 6e 64 5d 20 | 3d 0d 09 09 09 09 09 21 |ommand] |=......!|
|00002fb0| 67 53 70 72 69 74 65 54 | 65 73 74 50 2d 3e 69 73 |gSpriteT|estP->is|
|00002fc0| 43 6f 6d 6d 61 6e 64 41 | 63 74 69 76 65 5b 6b 43 |CommandA|ctive[kC|
|00002fd0| 6f 6c 6c 69 73 69 6f 6e | 44 65 74 65 63 74 69 6f |ollision|Detectio|
|00002fe0| 6e 43 6f 6d 6d 61 6e 64 | 5d 3b 0d 09 09 09 62 72 |nCommand|];....br|
|00002ff0| 65 61 6b 3b 0d 09 09 7d | 0d 09 7d 0d 7d 0d 0d 0d |eak;...}|..}.}...|
|00003000| 76 6f 69 64 20 41 64 6a | 75 73 74 4d 65 6e 75 49 |void Adj|ustMenuI|
|00003010| 74 65 6d 73 28 76 6f 69 | 64 29 0d 7b 0d 09 4d 65 |tems(voi|d).{..Me|
|00003020| 6e 75 48 61 6e 64 6c 65 | 20 74 65 6d 70 4d 65 6e |nuHandle| tempMen|
|00003030| 75 48 3b 0d 0d 09 09 2f | 2f 20 61 64 6a 75 73 74 |uH;..../|/ adjust|
|00003040| 20 74 68 65 20 74 65 73 | 74 20 6d 65 6e 75 0d 09 | the tes|t menu..|
|00003050| 74 65 6d 70 4d 65 6e 75 | 48 20 3d 20 47 65 74 4d |tempMenu|H = GetM|
|00003060| 48 61 6e 64 6c 65 28 6b | 53 70 72 69 74 65 4d 65 |Handle(k|SpriteMe|
|00003070| 6e 75 49 44 29 3b 0d 0d | 09 43 68 65 63 6b 49 74 |nuID);..|.CheckIt|
|00003080| 65 6d 28 74 65 6d 70 4d | 65 6e 75 48 2c 20 6b 48 |em(tempM|enuH, kH|
|00003090| 69 64 65 54 69 74 6c 65 | 49 74 65 6d 2c 20 67 53 |ideTitle|Item, gS|
|000030a0| 70 72 69 74 65 54 65 73 | 74 50 2d 3e 69 73 43 6f |priteTes|tP->isCo|
|000030b0| 6d 6d 61 6e 64 41 63 74 | 69 76 65 5b 6b 53 70 72 |mmandAct|ive[kSpr|
|000030c0| 69 74 65 54 65 73 74 54 | 69 74 6c 65 43 6f 6d 6d |iteTestT|itleComm|
|000030d0| 61 6e 64 5d 29 3b 0d 09 | 43 68 65 63 6b 49 74 65 |and]);..|CheckIte|
|000030e0| 6d 28 74 65 6d 70 4d 65 | 6e 75 48 2c 20 6b 48 69 |m(tempMe|nuH, kHi|
|000030f0| 64 65 42 61 6c 6c 73 49 | 74 65 6d 2c 20 67 53 70 |deBallsI|tem, gSp|
|00003100| 72 69 74 65 54 65 73 74 | 50 2d 3e 69 73 43 6f 6d |riteTest|P->isCom|
|00003110| 6d 61 6e 64 41 63 74 69 | 76 65 5b 6b 42 6f 75 6e |mandActi|ve[kBoun|
|00003120| 63 69 6e 67 42 61 6c 6c | 73 43 6f 6d 6d 61 6e 64 |cingBall|sCommand|
|00003130| 5d 29 3b 0d 0d 09 09 2f | 2f 20 61 64 6a 75 73 74 |]);..../|/ adjust|
|00003140| 20 74 68 65 20 73 70 72 | 69 74 65 20 6d 65 6e 75 | the spr|ite menu|
|00003150| 0d 09 74 65 6d 70 4d 65 | 6e 75 48 20 3d 20 47 65 |..tempMe|nuH = Ge|
|00003160| 74 4d 48 61 6e 64 6c 65 | 28 6b 54 65 73 74 4d 65 |tMHandle|(kTestMe|
|00003170| 6e 75 49 44 29 3b 0d 0d | 09 43 68 65 63 6b 49 74 |nuID);..|.CheckIt|
|00003180| 65 6d 28 74 65 6d 70 4d | 65 6e 75 48 2c 20 6b 43 |em(tempM|enuH, kC|
|00003190| 6f 70 79 42 69 74 73 54 | 65 73 74 49 74 65 6d 2c |opyBitsT|estItem,|
|000031a0| 20 67 53 70 72 69 74 65 | 54 65 73 74 50 2d 3e 69 | gSprite|TestP->i|
|000031b0| 73 43 6f 6d 6d 61 6e 64 | 41 63 74 69 76 65 5b 6b |sCommand|Active[k|
|000031c0| 43 6f 70 79 42 69 74 73 | 54 65 73 74 43 6f 6d 6d |CopyBits|TestComm|
|000031d0| 61 6e 64 5d 29 3b 0d 09 | 43 68 65 63 6b 49 74 65 |and]);..|CheckIte|
|000031e0| 6d 28 74 65 6d 70 4d 65 | 6e 75 48 2c 20 6b 42 6c |m(tempMe|nuH, kBl|
|000031f0| 69 74 50 69 78 69 65 54 | 65 73 74 49 74 65 6d 2c |itPixieT|estItem,|
|00003200| 20 67 53 70 72 69 74 65 | 54 65 73 74 50 2d 3e 69 | gSprite|TestP->i|
|00003210| 73 43 6f 6d 6d 61 6e 64 | 41 63 74 69 76 65 5b 6b |sCommand|Active[k|
|00003220| 42 6c 69 74 50 69 78 69 | 65 54 65 73 74 43 6f 6d |BlitPixi|eTestCom|
|00003230| 6d 61 6e 64 5d 29 3b 0d | 09 43 68 65 63 6b 49 74 |mand]);.|.CheckIt|
|00003240| 65 6d 28 74 65 6d 70 4d | 65 6e 75 48 2c 20 6b 52 |em(tempM|enuH, kR|
|00003250| 75 6e 43 6f 6d 70 69 6c | 65 64 53 70 72 69 74 65 |unCompil|edSprite|
|00003260| 49 74 65 6d 2c 20 67 53 | 70 72 69 74 65 54 65 73 |Item, gS|priteTes|
|00003270| 74 50 2d 3e 69 73 43 6f | 6d 6d 61 6e 64 41 63 74 |tP->isCo|mmandAct|
|00003280| 69 76 65 5b 6b 52 75 6e | 43 6f 6d 70 69 6c 65 64 |ive[kRun|Compiled|
|00003290| 53 70 72 69 74 65 43 6f | 6d 6d 61 6e 64 5d 29 3b |SpriteCo|mmand]);|
|000032a0| 0d 09 43 68 65 63 6b 49 | 74 65 6d 28 74 65 6d 70 |..CheckI|tem(temp|
|000032b0| 4d 65 6e 75 48 2c 20 6b | 43 6f 6c 6c 69 73 69 6f |MenuH, k|Collisio|
|000032c0| 6e 44 65 74 65 63 74 69 | 6f 6e 49 74 65 6d 2c 20 |nDetecti|onItem, |
|000032d0| 67 53 70 72 69 74 65 54 | 65 73 74 50 2d 3e 69 73 |gSpriteT|estP->is|
|000032e0| 43 6f 6d 6d 61 6e 64 41 | 63 74 69 76 65 5b 6b 43 |CommandA|ctive[kC|
|000032f0| 6f 6c 6c 69 73 69 6f 6e | 44 65 74 65 63 74 69 6f |ollision|Detectio|
|00003300| 6e 43 6f 6d 6d 61 6e 64 | 5d 29 3b 0d 0d 09 69 66 |nCommand|]);...if|
|00003310| 20 28 28 21 53 57 48 61 | 73 43 6f 6c 6f 72 51 75 | ((!SWHa|sColorQu|
|00003320| 69 63 6b 44 72 61 77 28 | 29 29 20 7c 7c 0d 09 09 |ickDraw(|)) ||...|
|00003330| 28 28 2a 2a 67 53 70 72 | 69 74 65 54 65 73 74 50 |((**gSpr|iteTestP|
|00003340| 2d 3e 73 70 72 69 74 65 | 57 6f 72 6c 64 50 2d 3e |->sprite|WorldP->|
|00003350| 62 61 63 6b 46 72 61 6d | 65 50 2d 3e 66 72 61 6d |backFram|eP->fram|
|00003360| 65 50 6f 72 74 2e 63 6f | 6c 6f 72 47 72 61 66 50 |ePort.co|lorGrafP|
|00003370| 2d 3e 70 6f 72 74 50 69 | 78 4d 61 70 29 2e 70 69 |->portPi|xMap).pi|
|00003380| 78 65 6c 53 69 7a 65 20 | 21 3d 20 38 29 29 0d 09 |xelSize |!= 8))..|
|00003390| 7b 0d 09 09 09 2f 2f 20 | 64 69 73 61 62 6c 65 20 |{....// |disable |
|000033a0| 73 6f 6d 65 20 6f 66 20 | 74 68 65 20 74 65 73 74 |some of |the test|
|000033b0| 73 20 69 66 20 77 65 20 | 61 72 65 20 6e 6f 74 20 |s if we |are not |
|000033c0| 69 6e 20 38 20 62 69 74 | 0d 09 09 44 69 73 61 62 |in 8 bit|...Disab|
|000033d0| 6c 65 49 74 65 6d 28 74 | 65 6d 70 4d 65 6e 75 48 |leItem(t|empMenuH|
|000033e0| 2c 20 6b 42 6c 69 74 50 | 69 78 69 65 54 65 73 74 |, kBlitP|ixieTest|
|000033f0| 49 74 65 6d 29 3b 0d 09 | 09 44 69 73 61 62 6c 65 |Item);..|.Disable|
|00003400| 49 74 65 6d 28 74 65 6d | 70 4d 65 6e 75 48 2c 20 |Item(tem|pMenuH, |
|00003410| 6b 52 75 6e 43 6f 6d 70 | 69 6c 65 64 53 70 72 69 |kRunComp|iledSpri|
|00003420| 74 65 49 74 65 6d 29 3b | 0d 09 7d 0d 0d 23 69 66 |teItem);|..}..#if|
|00003430| 20 64 65 66 69 6e 65 64 | 28 70 6f 77 65 72 63 29 | defined|(powerc)|
|00003440| 20 7c 7c 20 64 65 66 69 | 6e 65 64 28 5f 5f 70 6f | || defi|ned(__po|
|00003450| 77 65 72 63 29 0d 09 44 | 69 73 61 62 6c 65 49 74 |werc)..D|isableIt|
|00003460| 65 6d 28 74 65 6d 70 4d | 65 6e 75 48 2c 20 6b 52 |em(tempM|enuH, kR|
|00003470| 75 6e 43 6f 6d 70 69 6c | 65 64 53 70 72 69 74 65 |unCompil|edSprite|
|00003480| 49 74 65 6d 29 3b 0d 23 | 65 6e 64 69 66 0d 7d 0d |Item);.#|endif.}.|
|00003490| 0d 0d 70 61 73 63 61 6c | 20 4f 53 45 72 72 20 48 |..pascal| OSErr H|
|000034a0| 61 6e 64 6c 65 4f 70 65 | 6e 41 70 70 28 0d 09 41 |andleOpe|nApp(..A|
|000034b0| 70 70 6c 65 45 76 65 6e | 74 20 73 72 63 41 70 70 |ppleEven|t srcApp|
|000034c0| 6c 65 45 76 65 6e 74 2c | 0d 09 41 70 70 6c 65 45 |leEvent,|..AppleE|
|000034d0| 76 65 6e 74 20 72 65 70 | 6c 79 41 70 70 6c 65 45 |vent rep|lyAppleE|
|000034e0| 76 65 6e 74 2c 0d 09 6c | 6f 6e 67 20 72 65 66 43 |vent,..l|ong refC|
|000034f0| 6f 6e 29 0d 7b 0d 23 69 | 66 20 4d 50 57 0d 23 70 |on).{.#i|f MPW.#p|
|00003500| 72 61 67 6d 61 20 75 6e | 75 73 65 64 28 73 72 63 |ragma un|used(src|
|00003510| 41 70 70 6c 65 45 76 65 | 6e 74 2c 72 65 70 6c 79 |AppleEve|nt,reply|
|00003520| 41 70 70 6c 65 45 76 65 | 6e 74 2c 72 65 66 43 6f |AppleEve|nt,refCo|
|00003530| 6e 29 0d 23 65 6e 64 69 | 66 0d 0d 09 72 65 74 75 |n).#endi|f...retu|
|00003540| 72 6e 20 6e 6f 45 72 72 | 3b 0d 7d 0d 0d 0d 70 61 |rn noErr|;.}...pa|
|00003550| 73 63 61 6c 20 4f 53 45 | 72 72 20 48 61 6e 64 6c |scal OSE|rr Handl|
|00003560| 65 4f 70 65 6e 44 6f 63 | 28 0d 09 41 70 70 6c 65 |eOpenDoc|(..Apple|
|00003570| 45 76 65 6e 74 20 73 72 | 63 41 70 70 6c 65 45 76 |Event sr|cAppleEv|
|00003580| 65 6e 74 2c 0d 09 41 70 | 70 6c 65 45 76 65 6e 74 |ent,..Ap|pleEvent|
|00003590| 20 72 65 70 6c 79 41 70 | 70 6c 65 45 76 65 6e 74 | replyAp|pleEvent|
|000035a0| 2c 0d 09 6c 6f 6e 67 20 | 72 65 66 43 6f 6e 29 0d |,..long |refCon).|
|000035b0| 7b 0d 23 69 66 20 4d 50 | 57 0d 23 70 72 61 67 6d |{.#if MP|W.#pragm|
|000035c0| 61 20 75 6e 75 73 65 64 | 28 73 72 63 41 70 70 6c |a unused|(srcAppl|
|000035d0| 65 45 76 65 6e 74 2c 72 | 65 70 6c 79 41 70 70 6c |eEvent,r|eplyAppl|
|000035e0| 65 45 76 65 6e 74 2c 72 | 65 66 43 6f 6e 29 0d 23 |eEvent,r|efCon).#|
|000035f0| 65 6e 64 69 66 0d 09 72 | 65 74 75 72 6e 20 65 72 |endif..r|eturn er|
|00003600| 72 41 45 45 76 65 6e 74 | 4e 6f 74 48 61 6e 64 6c |rAEEvent|NotHandl|
|00003610| 65 64 3b 0d 7d 0d 0d 0d | 70 61 73 63 61 6c 20 4f |ed;.}...|pascal O|
|00003620| 53 45 72 72 20 48 61 6e | 64 6c 65 50 72 69 6e 74 |SErr Han|dlePrint|
|00003630| 44 6f 63 28 0d 09 41 70 | 70 6c 65 45 76 65 6e 74 |Doc(..Ap|pleEvent|
|00003640| 20 73 72 63 41 70 70 6c | 65 45 76 65 6e 74 2c 0d | srcAppl|eEvent,.|
|00003650| 09 41 70 70 6c 65 45 76 | 65 6e 74 20 72 65 70 6c |.AppleEv|ent repl|
|00003660| 79 41 70 70 6c 65 45 76 | 65 6e 74 2c 0d 09 6c 6f |yAppleEv|ent,..lo|
|00003670| 6e 67 20 72 65 66 43 6f | 6e 29 0d 7b 0d 23 69 66 |ng refCo|n).{.#if|
|00003680| 20 4d 50 57 0d 23 70 72 | 61 67 6d 61 20 75 6e 75 | MPW.#pr|agma unu|
|00003690| 73 65 64 28 73 72 63 41 | 70 70 6c 65 45 76 65 6e |sed(srcA|ppleEven|
|000036a0| 74 2c 72 65 70 6c 79 41 | 70 70 6c 65 45 76 65 6e |t,replyA|ppleEven|
|000036b0| 74 2c 72 65 66 43 6f 6e | 29 0d 23 65 6e 64 69 66 |t,refCon|).#endif|
|000036c0| 0d 09 72 65 74 75 72 6e | 20 65 72 72 41 45 45 76 |..return| errAEEv|
|000036d0| 65 6e 74 4e 6f 74 48 61 | 6e 64 6c 65 64 3b 0d 7d |entNotHa|ndled;.}|
|000036e0| 0d 0d 0d 70 61 73 63 61 | 6c 20 4f 53 45 72 72 20 |...pasca|l OSErr |
|000036f0| 48 61 6e 64 6c 65 51 75 | 69 74 28 0d 09 41 70 70 |HandleQu|it(..App|
|00003700| 6c 65 45 76 65 6e 74 20 | 73 72 63 41 70 70 6c 65 |leEvent |srcApple|
|00003710| 45 76 65 6e 74 2c 0d 09 | 41 70 70 6c 65 45 76 65 |Event,..|AppleEve|
|00003720| 6e 74 20 72 65 70 6c 79 | 41 70 70 6c 65 45 76 65 |nt reply|AppleEve|
|00003730| 6e 74 2c 0d 09 6c 6f 6e | 67 20 72 65 66 43 6f 6e |nt,..lon|g refCon|
|00003740| 29 0d 7b 0d 23 69 66 20 | 4d 50 57 0d 23 70 72 61 |).{.#if |MPW.#pra|
|00003750| 67 6d 61 20 75 6e 75 73 | 65 64 28 73 72 63 41 70 |gma unus|ed(srcAp|
|00003760| 70 6c 65 45 76 65 6e 74 | 2c 72 65 70 6c 79 41 70 |pleEvent|,replyAp|
|00003770| 70 6c 65 45 76 65 6e 74 | 2c 72 65 66 43 6f 6e 29 |pleEvent|,refCon)|
|00003780| 0d 23 65 6e 64 69 66 0d | 09 67 49 73 52 75 6e 6e |.#endif.|.gIsRunn|
|00003790| 69 6e 67 20 3d 20 66 61 | 6c 73 65 3b 0d 0d 09 72 |ing = fa|lse;...r|
|000037a0| 65 74 75 72 6e 20 6e 6f | 45 72 72 3b 0d 7d 0d 0d |eturn no|Err;.}..|
|000037b0| 0d 76 6f 69 64 20 45 72 | 72 6f 72 41 6c 65 72 74 |.void Er|rorAlert|
|000037c0| 28 0d 09 4f 53 45 72 72 | 20 65 72 72 2c 0d 09 73 |(..OSErr| err,..s|
|000037d0| 68 6f 72 74 20 65 72 72 | 6f 72 53 74 72 69 6e 67 |hort err|orString|
|000037e0| 49 6e 64 65 78 29 0d 7b | 0d 09 53 74 72 32 35 35 |Index).{|..Str255|
|000037f0| 20 6d 65 73 73 61 67 65 | 53 74 72 69 6e 67 2c 20 | message|String, |
|00003800| 65 72 72 6f 72 53 74 72 | 69 6e 67 3b 0d 0d 09 09 |errorStr|ing;....|
|00003810| 2f 2f 20 6d 61 6b 65 20 | 73 75 72 65 20 77 65 20 |// make |sure we |
|00003820| 64 6f 6e 27 74 20 6b 6e | 6f 77 20 77 68 61 74 20 |don't kn|ow what |
|00003830| 74 68 69 73 20 65 72 72 | 6f 72 20 69 73 2e 2e 2e |this err|or is...|
|00003840| 0d 09 69 66 20 28 65 72 | 72 6f 72 53 74 72 69 6e |..if (er|rorStrin|
|00003850| 67 49 6e 64 65 78 20 3d | 3d 20 6b 55 6e 6b 6e 6f |gIndex =|= kUnkno|
|00003860| 77 6e 45 72 72 6f 72 53 | 74 72 69 6e 67 49 6e 64 |wnErrorS|tringInd|
|00003870| 65 78 29 0d 09 7b 0d 09 | 09 73 77 69 74 63 68 20 |ex)..{..|.switch |
|00003880| 28 65 72 72 29 0d 09 09 | 7b 0d 09 09 09 63 61 73 |(err)...|{....cas|
|00003890| 65 20 6d 65 6d 46 75 6c | 6c 45 72 72 3a 0d 09 09 |e memFul|lErr:...|
|000038a0| 09 09 65 72 72 6f 72 53 | 74 72 69 6e 67 49 6e 64 |..errorS|tringInd|
|000038b0| 65 78 20 3d 20 6b 4e 6f | 74 45 6e 6f 75 67 68 4d |ex = kNo|tEnoughM|
|000038c0| 65 6d 6f 72 79 53 74 72 | 69 6e 67 49 6e 64 65 78 |emoryStr|ingIndex|
|000038d0| 3b 0d 09 09 09 09 62 72 | 65 61 6b 3b 0d 0d 09 09 |;.....br|eak;....|
|000038e0| 09 63 61 73 65 20 72 65 | 73 4e 6f 74 46 6f 75 6e |.case re|sNotFoun|
|000038f0| 64 3a 0d 09 09 09 09 65 | 72 72 6f 72 53 74 72 69 |d:.....e|rrorStri|
|00003900| 6e 67 49 6e 64 65 78 20 | 3d 20 6b 43 61 6e 74 46 |ngIndex |= kCantF|
|00003910| 69 6e 64 52 65 73 6f 75 | 72 63 65 53 74 72 69 6e |indResou|rceStrin|
|00003920| 67 49 6e 64 65 78 3b 0d | 09 09 09 09 62 72 65 61 |gIndex;.|....brea|
|00003930| 6b 3b 0d 09 09 7d 0d 09 | 7d 0d 0d 09 47 65 74 49 |k;...}..|}...GetI|
|00003940| 6e 64 53 74 72 69 6e 67 | 28 6d 65 73 73 61 67 65 |ndString|(message|
|00003950| 53 74 72 69 6e 67 2c 20 | 6b 45 72 72 6f 72 53 74 |String, |kErrorSt|
|00003960| 72 69 6e 67 4c 69 73 74 | 52 65 73 49 44 2c 20 65 |ringList|ResID, e|
|00003970| 72 72 6f 72 53 74 72 69 | 6e 67 49 6e 64 65 78 29 |rrorStri|ngIndex)|
|00003980| 3b 0d 0d 09 69 66 20 28 | 6d 65 73 73 61 67 65 53 |;...if (|messageS|
|00003990| 74 72 69 6e 67 5b 30 5d | 20 3d 3d 20 30 29 0d 09 |tring[0]| == 0)..|
|000039a0| 7b 0d 09 09 42 6c 6f 63 | 6b 4d 6f 76 65 28 6b 53 |{...Bloc|kMove(kS|
|000039b0| 65 72 69 6f 75 73 44 61 | 6d 61 67 65 53 74 72 69 |eriousDa|mageStri|
|000039c0| 6e 67 2c 20 6d 65 73 73 | 61 67 65 53 74 72 69 6e |ng, mess|ageStrin|
|000039d0| 67 2c 20 73 69 7a 65 6f | 66 28 6b 53 65 72 69 6f |g, sizeo|f(kSerio|
|000039e0| 75 73 44 61 6d 61 67 65 | 53 74 72 69 6e 67 29 29 |usDamage|String))|
|000039f0| 3b 0d 09 7d 0d 0d 09 4e | 75 6d 54 6f 53 74 72 69 |;..}...N|umToStri|
|00003a00| 6e 67 28 65 72 72 2c 20 | 65 72 72 6f 72 53 74 72 |ng(err, |errorStr|
|00003a10| 69 6e 67 29 3b 0d 0d 09 | 50 61 72 61 6d 54 65 78 |ing);...|ParamTex|
|00003a20| 74 28 6d 65 73 73 61 67 | 65 53 74 72 69 6e 67 2c |t(messag|eString,|
|00003a30| 20 65 72 72 6f 72 53 74 | 72 69 6e 67 2c 20 22 5c | errorSt|ring, "\|
|00003a40| 70 22 2c 20 22 5c 70 22 | 29 3b 0d 0d 09 28 76 6f |p", "\p"|);...(vo|
|00003a50| 69 64 29 53 74 6f 70 41 | 6c 65 72 74 28 6b 45 72 |id)StopA|lert(kEr|
|00003a60| 72 6f 72 41 6c 65 72 74 | 52 65 73 49 44 2c 20 4e |rorAlert|ResID, N|
|00003a70| 55 4c 4c 29 3b 0d 7d 0d | 0d 0d 76 6f 69 64 20 43 |ULL);.}.|..void C|
|00003a80| 61 6e 74 46 69 6e 64 52 | 65 73 6f 75 72 63 65 28 |antFindR|esource(|
|00003a90| 76 6f 69 64 29 0d 7b 0d | 09 4f 53 45 72 72 20 65 |void).{.|.OSErr e|
|00003aa0| 72 72 3b 0d 09 0d 09 65 | 72 72 20 3d 20 52 65 73 |rr;....e|rr = Res|
|00003ab0| 45 72 72 6f 72 28 29 3b | 0d 09 0d 09 69 66 20 28 |Error();|....if (|
|00003ac0| 65 72 72 20 3d 3d 20 6e | 6f 45 72 72 29 0d 09 7b |err == n|oErr)..{|
|00003ad0| 0d 09 09 65 72 72 20 3d | 20 72 65 73 4e 6f 74 46 |...err =| resNotF|
|00003ae0| 6f 75 6e 64 3b 0d 09 7d | 0d 0d 09 45 72 72 6f 72 |ound;..}|...Error|
|00003af0| 41 6c 65 72 74 28 65 72 | 72 2c 20 6b 43 61 6e 74 |Alert(er|r, kCant|
|00003b00| 46 69 6e 64 52 65 73 6f | 75 72 63 65 53 74 72 69 |FindReso|urceStri|
|00003b10| 6e 67 49 6e 64 65 78 29 | 3b 0d 0d 09 45 78 69 74 |ngIndex)|;...Exit|
|00003b20| 54 6f 53 68 65 6c 6c 28 | 29 3b 0d 7d 0d 0d 0d 76 |ToShell(|);.}...v|
|00003b30| 6f 69 64 20 43 61 6e 74 | 52 75 6e 4f 6e 54 68 69 |oid Cant|RunOnThi|
|00003b40| 73 4d 61 63 68 69 6e 65 | 28 76 6f 69 64 29 0d 7b |sMachine|(void).{|
|00003b50| 0d 09 28 76 6f 69 64 29 | 53 74 6f 70 41 6c 65 72 |..(void)|StopAler|
|00003b60| 74 28 6b 43 61 6e 74 52 | 75 6e 41 6c 65 72 74 52 |t(kCantR|unAlertR|
|00003b70| 65 73 49 44 2c 20 4e 55 | 4c 4c 29 3b 0d 7d 0d 0d |esID, NU|LL);.}..|
|00003b80| 0d 73 68 6f 72 74 20 4e | 75 6d 54 6f 6f 6c 62 6f |.short N|umToolbo|
|00003b90| 78 54 72 61 70 73 28 76 | 6f 69 64 29 0d 7b 0d 09 |xTraps(v|oid).{..|
|00003ba0| 72 65 74 75 72 6e 09 28 | 4e 47 65 74 54 72 61 70 |return.(|NGetTrap|
|00003bb0| 41 64 64 72 65 73 73 28 | 5f 49 6e 69 74 47 72 61 |Address(|_InitGra|
|00003bc0| 66 2c 20 54 6f 6f 6c 54 | 72 61 70 29 20 3d 3d 20 |f, ToolT|rap) == |
|00003bd0| 4e 47 65 74 54 72 61 70 | 41 64 64 72 65 73 73 28 |NGetTrap|Address(|
|00003be0| 30 78 41 41 36 45 2c 20 | 54 6f 6f 6c 54 72 61 70 |0xAA6E, |ToolTrap|
|00003bf0| 29 29 0d 09 09 09 09 3f | 09 30 78 30 32 30 30 20 |)).....?|.0x0200 |
|00003c00| 3a 09 30 78 30 34 30 30 | 3b 0d 7d 0d 0d 0d 54 72 |:.0x0400|;.}...Tr|
|00003c10| 61 70 54 79 70 65 20 47 | 65 74 54 72 61 70 54 79 |apType G|etTrapTy|
|00003c20| 70 65 28 0d 09 73 68 6f | 72 74 20 74 72 61 70 29 |pe(..sho|rt trap)|
|00003c30| 0d 7b 0d 09 23 64 65 66 | 69 6e 65 20 54 72 61 70 |.{..#def|ine Trap|
|00003c40| 4d 61 73 6b 20 30 78 30 | 38 30 30 0d 0d 09 72 65 |Mask 0x0|800...re|
|00003c50| 74 75 72 6e 20 28 28 74 | 72 61 70 20 26 20 54 72 |turn ((t|rap & Tr|
|00003c60| 61 70 4d 61 73 6b 29 20 | 21 3d 20 30 29 20 3f 20 |apMask) |!= 0) ? |
|00003c70| 54 6f 6f 6c 54 72 61 70 | 20 3a 20 4f 53 54 72 61 |ToolTrap| : OSTra|
|00003c80| 70 3b 0d 7d 0d 0d 0d 42 | 6f 6f 6c 65 61 6e 20 54 |p;.}...B|oolean T|
|00003c90| 72 61 70 41 76 61 69 6c | 28 0d 09 73 68 6f 72 74 |rapAvail|(..short|
|00003ca0| 20 74 72 61 70 29 0d 7b | 0d 09 54 72 61 70 54 79 | trap).{|..TrapTy|
|00003cb0| 70 65 09 74 54 79 70 65 | 3b 0d 0d 09 74 54 79 70 |pe.tType|;...tTyp|
|00003cc0| 65 20 3d 20 47 65 74 54 | 72 61 70 54 79 70 65 28 |e = GetT|rapType(|
|00003cd0| 74 72 61 70 29 3b 0d 09 | 69 66 20 28 74 54 79 70 |trap);..|if (tTyp|
|00003ce0| 65 20 3d 3d 20 54 6f 6f | 6c 54 72 61 70 29 0d 09 |e == Too|lTrap)..|
|00003cf0| 7b 0d 09 09 74 72 61 70 | 20 3d 20 74 72 61 70 20 |{...trap| = trap |
|00003d00| 26 20 30 78 30 37 46 46 | 3b 0d 09 7d 0d 0d 09 69 |& 0x07FF|;..}...i|
|00003d10| 66 20 28 74 72 61 70 20 | 3e 3d 20 4e 75 6d 54 6f |f (trap |>= NumTo|
|00003d20| 6f 6c 62 6f 78 54 72 61 | 70 73 28 29 29 0d 09 7b |olboxTra|ps())..{|
|00003d30| 0d 09 09 74 72 61 70 20 | 3d 20 5f 55 6e 69 6d 70 |...trap |= _Unimp|
|00003d40| 6c 65 6d 65 6e 74 65 64 | 3b 0d 09 7d 0d 0d 09 72 |lemented|;..}...r|
|00003d50| 65 74 75 72 6e 20 4e 47 | 65 74 54 72 61 70 41 64 |eturn NG|etTrapAd|
|00003d60| 64 72 65 73 73 28 74 72 | 61 70 2c 20 74 54 79 70 |dress(tr|ap, tTyp|
|00003d70| 65 29 20 21 3d 0d 09 09 | 09 20 4e 47 65 74 54 72 |e) !=...|. NGetTr|
|00003d80| 61 70 41 64 64 72 65 73 | 73 28 5f 55 6e 69 6d 70 |apAddres|s(_Unimp|
|00003d90| 6c 65 6d 65 6e 74 65 64 | 2c 20 54 6f 6f 6c 54 72 |lemented|, ToolTr|
|00003da0| 61 70 29 3b 0d 7d 0d 0d | 0d 42 6f 6f 6c 65 61 6e |ap);.}..|.Boolean|
|00003db0| 20 48 61 73 57 61 69 74 | 4e 65 78 74 45 76 65 6e | HasWait|NextEven|
|00003dc0| 74 28 76 6f 69 64 29 0d | 7b 0d 09 72 65 74 75 72 |t(void).|{..retur|
|00003dd0| 6e 20 54 72 61 70 41 76 | 61 69 6c 28 5f 57 61 69 |n TrapAv|ail(_Wai|
|00003de0| 74 4e 65 78 74 45 76 65 | 6e 74 29 3b 0d 7d 0d 0d |tNextEve|nt);.}..|
|00003df0| 0d 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003e00| 00 00 01 00 00 00 01 84 | 00 00 00 84 00 00 00 66 |........|.......f|
|00003e10| 00 00 02 bb 08 53 61 6d | 70 6c 65 2e 68 00 02 00 |.....Sam|ple.h...|
|00003e20| 00 00 54 45 58 54 4b 41 | 48 4c 01 00 ff ff ff ff |..TEXTKA|HL......|
|00003e30| 0d 41 70 70 6c 69 63 61 | 74 69 6f 6e 2e 63 02 00 |.Applica|tion.c..|
|00003e40| 00 00 54 45 58 54 4b 41 | 48 4c 01 00 ff ff ff ff |..TEXTKA|HL......|
|00003e50| 00 00 54 45 58 54 4b 41 | 48 4c 01 00 ff ff ff ff |..TEXTKA|HL......|
|00003e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003e70| 00 00 a7 ff 62 16 00 00 | 3d 71 00 00 01 ea 00 00 |....b...|=q......|
|00003e80| 00 00 00 00 12 00 00 00 | 02 bb 0c 53 61 6d 70 6c |........|...Sampl|
|00003e90| 65 49 6e 69 74 2e 63 bb | 02 00 00 00 54 45 58 54 |eInit.c.|....TEXT|
|00003ea0| 4b 41 48 4c 01 00 ff ff | ff ff 00 00 00 00 02 c4 |KAHL....|........|
|00003eb0| 00 00 00 00 2e 86 00 00 | 40 00 00 00 00 00 02 24 |........|@......$|
|00003ec0| 00 00 20 00 a6 51 3e 56 | a7 a4 7b dc 00 00 00 00 |.. ..Q>V|..{.....|
|00003ed0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003ee0| 00 00 0e 86 00 02 00 00 | 00 00 00 00 00 00 0e 88 |........|........|
|00003ef0| 00 01 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003f00| 00 00 00 04 00 06 00 03 | 00 00 00 0a 00 09 06 4d |........|.......M|
|00003f10| 6f 6e 61 63 6f 1c 00 00 | 00 1e 00 56 00 03 02 55 |onaco...|...V...U|
|00003f20| 02 34 00 56 00 03 02 55 | 02 34 00 00 22 05 00 00 |.4.V...U|.4.."...|
|00003f30| 00 00 00 00 00 00 00 00 | 00 00 00 48 00 09 4d 6f |........|...H..Mo|
|00003f40| 6e 61 63 6f 00 00 00 00 | 00 00 00 00 00 00 00 00 |naco....|........|
|00003f50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 03 |........|........|
|00003f60| 00 04 00 56 00 03 02 64 | 02 3b 00 56 00 03 02 64 |...V...d|.;.V...d|
|00003f70| 02 3b a9 e8 9c 19 00 00 | 15 ab 00 00 15 ab 00 00 |.;......|........|
|00003f80| 14 1f 00 00 00 00 01 00 | 00 00 01 84 00 00 00 84 |........|........|
|00003f90| 00 00 00 66 00 5e 1e 84 | 07 5a 00 00 00 1c 00 66 |...f.^..|.Z.....f|
|00003fa0| 00 02 4d 50 53 52 00 01 | 00 1a 45 54 41 42 00 00 |..MPSR..|..ETAB..|
|00003fb0| 00 32 45 46 4e 54 00 00 | 00 3e 03 f0 ff ff 00 00 |.2EFNT..|.>......|
|00003fc0| 00 16 00 00 00 00 03 ed | ff ff 00 00 00 38 00 00 |........|.....8..|
|00003fd0| 00 00 03 ec ff ff 00 00 | 00 00 00 00 00 00 03 eb |........|........|
|00003fe0| ff ff 00 00 00 08 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+