Carousel Volume 2 #1

home *** CD-ROM | disk | FTP | other *** search
/ Carousel Volume 2 #1 / carousel.iso / mactosh / fonts / fontshow.sit / globals.Pas < prev next >
MacBinary | 1988-09-09 | 3.4 KB | [TEXT/TPAS]
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: globals.Pas
Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	TheDraw Pascal screen Image `(image/theDrawPascalScreenImage)`	ext	Unsupported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Fri Sep 9 18:22:37 1988, modified Fri Sep 9 18:22:37 1988, creator 'TPAS', type ASCII, 2883 bytes "globals.Pas" , at 0xbc3 333 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	`[TPAS]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0b 67 6c 6f 62 61 6c | 73 2e 50 61 73 00 00 00 |..global|s.Pas...|
|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 54 50 41 | 53 01 00 00 00 00 00 00 |.TEXTTPA|S.......|
|00000050| 00 00 00 00 00 0b 43 00 | 00 01 4d 9f 4e 0a 2d 9f |......C.|..M.N.-.|
|00000060| 4e 0a 2d 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |N.-.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 32 5b 00 00 |........|....2[..|
|00000080| 55 4e 49 54 20 47 6c 6f | 62 61 6c 73 28 31 29 3b |UNIT Glo|bals(1);|
|00000090| 0d 7b 24 55 2d 7d 0d 7b | 24 44 2b 7d 0d 28 2a 20 |.{$U-}.{|$D+}.(* |
|000000a0| 54 68 69 73 20 75 6e 69 | 74 20 63 6f 6e 74 61 69 |This uni|t contai|
|000000b0| 6e 73 20 67 6c 6f 62 61 | 6c 20 76 61 72 69 61 62 |ns globa|l variab|
|000000c0| 6c 65 73 20 66 6f 72 20 | 74 68 65 20 46 6f 6e 74 |les for |the Font|
|000000d0| 53 68 6f 77 20 70 72 6f | 67 72 61 6d 20 2a 29 0d |Show pro|gram *).|
|000000e0| 28 2a 20 56 65 72 73 69 | 6f 6e 20 31 2e 30 20 62 |(* Versi|on 1.0 b|
|000000f0| 79 20 52 69 63 68 61 72 | 64 20 43 6c 61 72 6b 2c |y Richar|d Clark,|
|00000100| 20 53 65 70 74 65 6d 62 | 65 72 20 31 39 38 38 20 | Septemb|er 1988 |
|00000110| 2a 29 0d 49 4e 54 45 52 | 46 41 43 45 0d 0d 20 20 |*).INTER|FACE..  |
|00000120| 55 53 45 53 20 4d 65 6d | 54 79 70 65 73 2c 20 51 |USES Mem|Types, Q|
|00000130| 75 69 63 6b 44 72 61 77 | 2c 20 4f 53 49 6e 74 66 |uickDraw|, OSIntf|
|00000140| 2c 20 54 6f 6f 6c 49 6e | 74 66 3b 0d 20 20 0d 09 |, ToolIn|tf;.  ..|
|00000150| 20 56 41 52 0d 20 20 20 | 20 44 72 61 67 4c 69 6d | VAR.   | DragLim|
|00000160| 69 74 73 2c 20 20 20 20 | 20 20 20 20 20 20 20 20 |its,    |        |
|00000170| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 28 2a 20 |        |     (* |
|00000180| 57 68 65 72 65 20 61 72 | 65 20 77 65 20 61 6c 6c |Where ar|e we all|
|00000190| 6f 77 65 64 20 74 6f 20 | 64 72 61 67 20 77 69 6e |owed to |drag win|
|000001a0| 64 6f 77 73 3f 20 2a 29 | 0d 20 20 20 20 53 69 7a |dows? *)|.    Siz|
|000001b0| 65 4c 69 6d 69 74 73 20 | 20 20 20 3a 20 52 65 63 |eLimits |   : Rec|
|000001c0| 74 3b 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |t;      |        |
|000001d0| 20 28 2a 20 57 68 61 74 | 20 61 72 65 20 74 68 65 | (* What| are the|
|000001e0| 20 72 65 73 69 7a 69 6e | 67 20 62 6f 75 6e 64 73 | resizin|g bounds|
|000001f0| 20 6f 6e 20 6f 75 72 20 | 77 69 6e 64 6f 77 73 3f | on our |windows?|
|00000200| 20 2a 29 0d 20 20 20 20 | 51 75 69 74 20 20 20 20 | *).    |Quit    |
|00000210| 20 20 20 20 20 20 3a 20 | 42 6f 6f 6c 65 61 6e 3b |      : |Boolean;|
|00000220| 20 20 20 20 20 20 20 20 | 20 20 20 20 28 2a 20 48 |        |    (* H|
|00000230| 61 73 20 51 75 69 74 20 | 62 65 65 6e 20 73 65 6c |as Quit |been sel|
|00000240| 65 63 74 65 64 3f 20 2a | 29 0d 09 09 20 20 57 69 |ected? *|)...  Wi|
|00000250| 6e 64 6f 77 52 65 73 65 | 72 76 65 20 3a 20 50 74 |ndowRese|rve : Pt|
|00000260| 72 3b 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |r;      |        |
|00000270| 20 20 28 2a 20 54 68 69 | 73 20 76 61 72 69 61 62 |  (* Thi|s variab|
|00000280| 6c 65 20 69 73 20 75 73 | 65 64 20 74 6f 20 72 65 |le is us|ed to re|
|00000290| 73 65 72 76 65 20 6d 65 | 6d 6f 72 79 20 66 6f 72 |serve me|mory for|
|000002a0| 20 74 68 65 20 4e 45 58 | 54 20 2a 29 0d 20 20 20 | the NEX|T *).   |
|000002b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000002c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000002d0| 20 20 20 20 20 28 2a 20 | 77 69 6e 64 6f 77 20 74 |     (* |window t|
|000002e0| 6f 20 62 65 20 6f 70 65 | 6e 65 64 2e 20 28 53 65 |o be ope|ned. (Se|
|000002f0| 65 20 70 72 6f 67 72 61 | 6d 6d 69 6e 67 20 6e 6f |e progra|mming no|
|00000300| 74 65 73 29 20 2a 29 0d | 20 20 09 09 63 75 72 72 |tes) *).|  ..curr|
|00000310| 46 6f 6e 74 2c 20 20 20 | 20 20 20 20 20 20 20 20 |Font,   |        |
|00000320| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000330| 28 2a 20 54 68 65 20 63 | 75 72 72 65 6e 74 20 66 |(* The c|urrent f|
|00000340| 6f 6e 74 20 61 6e 64 20 | 73 69 7a 65 2c 20 61 73 |ont and |size, as|
|00000350| 20 64 65 74 65 72 6d 69 | 6e 65 64 20 62 79 20 74 | determi|ned by t|
|00000360| 68 65 20 46 6f 6e 74 20 | 2a 29 0d 20 20 20 20 63 |he Font |*).    c|
|00000370| 75 72 72 53 69 7a 65 20 | 20 20 20 20 20 3a 20 49 |urrSize |     : I|
|00000380| 4e 54 45 47 45 52 3b 20 | 20 20 20 20 20 20 20 20 |NTEGER; |        |
|00000390| 20 20 20 28 2a 20 61 6e | 64 20 53 69 7a 65 20 6d |   (* an|d Size m|
|000003a0| 65 6e 75 73 2e 20 2a 29 | 0d 20 20 20 20 41 62 6f |enus. *)|.    Abo|
|000003b0| 75 74 57 69 6e 64 6f 77 | 20 20 20 3a 20 57 69 6e |utWindow|   : Win|
|000003c0| 64 6f 77 50 74 72 3b 20 | 20 20 20 20 20 20 20 20 |dowPtr; |        |
|000003d0| 20 28 2a 20 41 20 70 6f | 69 6e 74 65 72 20 74 6f | (* A po|inter to|
|000003e0| 20 6f 75 72 20 d2 41 62 | 6f 75 74 d3 20 77 69 6e | our .Ab|out. win|
|000003f0| 64 6f 77 20 28 73 69 6e | 63 65 20 77 65 20 6f 6e |dow (sin|ce we on|
|00000400| 6c 79 20 68 61 76 65 20 | 6f 6e 65 29 20 2a 29 0d |ly have |one) *).|
|00000410| 20 20 20 20 43 75 72 72 | 46 72 65 65 4d 65 6d 20 |    Curr|FreeMem |
|00000420| 20 20 3a 20 4c 4f 4e 47 | 49 4e 54 3b 20 20 20 20 |  : LONG|INT;    |
|00000430| 20 20 20 20 20 20 20 20 | 28 2a 20 54 68 65 20 63 |        |(* The c|
|00000440| 75 72 72 65 6e 74 20 61 | 6d 6f 75 6e 74 20 6f 66 |urrent a|mount of|
|00000450| 20 6d 65 6d 6f 72 79 20 | 61 76 61 69 6c 61 62 6c | memory |availabl|
|00000460| 65 20 28 61 73 20 72 65 | 70 6f 72 74 65 64 20 62 |e (as re|ported b|
|00000470| 79 20 2a 29 0d 09 20 20 | 20 20 20 20 20 20 20 20 |y *)..  |        |
|00000480| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000490| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 28 2a 20 |        |     (* |
|000004a0| 46 72 65 65 4d 65 6d 29 | 20 2a 29 0d 09 20 0d 20 |FreeMem)| *).. . |
|000004b0| 20 50 52 4f 43 45 44 55 | 52 45 20 49 6e 69 74 47 | PROCEDU|RE InitG|
|000004c0| 6c 6f 62 61 6c 73 3b 20 | 20 20 20 20 20 20 20 20 |lobals; |        |
|000004d0| 20 20 20 20 20 20 20 28 | 2a 20 53 65 74 20 75 70 |       (|* Set up|
|000004e0| 20 74 68 65 20 76 61 6c | 75 65 73 20 6f 66 20 74 | the val|ues of t|
|000004f0| 68 65 20 61 62 6f 76 65 | 20 67 6c 6f 62 61 6c 73 |he above| globals|
|00000500| 20 2a 29 0d 20 20 50 52 | 4f 43 45 44 55 52 45 20 | *).  PR|OCEDURE |
|00000510| 53 61 66 65 74 79 4e 65 | 74 3b 20 20 20 20 20 20 |SafetyNe|t;      |
|00000520| 20 20 20 20 20 20 20 20 | 20 20 20 20 28 2a 20 49 |        |    (* I|
|00000530| 66 20 74 68 65 72 65 20 | 69 73 20 61 20 53 79 73 |f there |is a Sys|
|00000540| 74 65 6d 20 45 72 72 6f | 72 2c 20 74 68 69 73 20 |tem Erro|r, this |
|00000550| 69 73 20 6f 75 72 20 22 | 72 65 73 75 6d 65 22 20 |is our "|resume" |
|00000560| 70 72 6f 63 65 64 75 72 | 65 20 2a 29 0d 20 20 0d |procedur|e *).  .|
|00000570| 49 4d 50 4c 45 4d 45 4e | 54 41 54 49 4f 4e 0d 0d |IMPLEMEN|TATION..|
|00000580| 20 20 50 52 4f 43 45 44 | 55 52 45 20 49 6e 69 74 |  PROCED|URE Init|
|00000590| 47 6c 6f 62 61 6c 73 3b | 0d 20 20 28 2a 20 54 68 |Globals;|.  (* Th|
|000005a0| 69 73 20 70 72 6f 63 65 | 64 75 72 65 20 73 65 74 |is proce|dure set|
|000005b0| 73 20 75 70 20 74 68 65 | 20 69 6e 69 74 69 61 6c |s up the| initial|
|000005c0| 20 76 61 6c 75 65 73 20 | 6f 66 20 74 68 65 20 61 | values |of the a|
|000005d0| 62 6f 76 65 20 67 6c 6f | 62 61 6c 20 76 61 72 69 |bove glo|bal vari|
|000005e0| 61 62 6c 65 73 20 2a 29 | 0d 09 20 42 45 47 49 4e |ables *)|.. BEGIN|
|000005f0| 0d 09 20 20 20 44 72 61 | 67 4c 69 6d 69 74 73 20 |..   Dra|gLimits |
|00000600| 3a 3d 20 53 63 72 65 65 | 6e 42 69 74 73 2e 62 6f |:= Scree|nBits.bo|
|00000610| 75 6e 64 73 3b 0d 20 20 | 09 09 49 6e 73 65 74 52 |unds;.  |..InsetR|
|00000620| 65 63 74 28 44 72 61 67 | 4c 69 6d 69 74 73 2c 20 |ect(Drag|Limits, |
|00000630| 32 30 2c 20 32 30 29 3b | 20 20 20 20 20 20 28 2a |20, 20);|      (*|
|00000640| 20 44 6f 6e 27 74 20 6c | 65 74 20 77 69 6e 64 6f | Don't l|et windo|
|00000650| 77 73 20 67 65 74 20 61 | 6e 79 20 63 6c 6f 73 65 |ws get a|ny close|
|00000660| 64 72 20 74 68 61 6e 20 | 32 30 20 70 69 78 65 6c |dr than |20 pixel|
|00000670| 73 20 66 72 6f 6d 20 2a | 29 0d 20 20 09 09 53 69 |s from *|).  ..Si|
|00000680| 7a 65 4c 69 6d 69 74 73 | 20 3a 3d 20 44 72 61 67 |zeLimits| := Drag|
|00000690| 4c 69 6d 69 74 73 3b 20 | 20 20 20 20 20 20 20 20 |Limits; |        |
|000006a0| 20 20 28 2a 20 74 68 65 | 20 65 64 67 65 20 6f 66 |  (* the| edge of|
|000006b0| 20 74 68 65 20 73 63 72 | 65 65 6e 2e 20 20 41 6c | the scr|een.  Al|
|000006c0| 73 6f 2c 20 64 6f 6e 27 | 74 20 6c 65 74 20 74 68 |so, don'|t let th|
|000006d0| 65 6d 20 67 65 74 20 61 | 6e 79 20 2a 29 0d 20 20 |em get a|ny *).  |
|000006e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000006f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000700| 20 20 20 20 20 20 28 2a | 20 73 6d 61 6c 6c 65 72 |      (*| smaller|
|00000710| 20 74 68 61 6e 20 32 30 | 20 78 20 32 30 20 70 69 | than 20| x 20 pi|
|00000720| 78 65 6c 73 2c 20 61 6e | 64 20 6e 6f 20 6c 61 72 |xels, an|d no lar|
|00000730| 67 65 72 20 74 68 61 6e | 20 20 20 20 20 20 20 2a |ger than|       *|
|00000740| 29 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |).      |        |
|00000750| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000760| 20 20 20 20 20 20 20 20 | 20 20 28 2a 20 28 73 63 |        |  (* (sc|
|00000770| 72 65 65 6e 53 69 7a 65 | 20 2d 20 34 30 20 70 69 |reenSize| - 40 pi|
|00000780| 78 65 6c 73 29 20 2a 29 | 0d 20 20 09 09 77 69 6e |xels) *)|.  ..win|
|00000790| 64 6f 77 52 65 73 65 72 | 76 65 20 3a 3d 20 4e 49 |dowReser|ve := NI|
|000007a0| 4c 3b 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |L;      |        |
|000007b0| 20 28 2a 20 53 68 6f 77 | 20 74 68 61 74 20 77 65 | (* Show| that we|
|000007c0| 20 64 6f 6e 27 74 20 68 | 61 76 65 20 61 6e 79 20 | don't h|ave any |
|000007d0| 6d 65 6d 6f 72 79 20 70 | 72 65 2d 61 6c 6c 6f 63 |memory p|re-alloc|
|000007e0| 61 74 65 64 20 66 6f 72 | 20 20 2a 29 0d 20 20 20 |ated for|  *).   |
|000007f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000800| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000810| 20 20 20 20 20 28 2a 20 | 77 69 6e 64 6f 77 73 20 |     (* |windows |
|00000820| 79 65 74 2e 20 2a 29 0d | 20 20 09 09 41 62 6f 75 |yet. *).|  ..Abou|
|00000830| 74 57 69 6e 64 6f 77 20 | 3a 3d 20 4e 49 4c 3b 20 |tWindow |:= NIL; |
|00000840| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000850| 28 2a 20 4e 6f 20 d2 41 | 62 6f 75 74 d3 20 77 69 |(* No .A|bout. wi|
|00000860| 6e 64 6f 77 20 79 65 74 | 20 2a 29 0d 20 20 09 09 |ndow yet| *).  ..|
|00000870| 51 75 69 74 20 3a 3d 20 | 46 41 4c 53 45 3b 20 20 |Quit := |FALSE;  |
|00000880| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000890| 20 20 20 20 28 2a 20 4e | 6f 20 6e 65 65 64 20 74 |    (* N|o need t|
|000008a0| 6f 20 71 75 69 74 2c 20 | 61 73 20 77 65 20 6a 75 |o quit, |as we ju|
|000008b0| 73 74 20 73 74 61 72 74 | 65 64 20 2a 29 0d 0d 20 |st start|ed *).. |
|000008c0| 20 09 09 63 75 72 72 46 | 6f 6e 74 20 3a 3d 20 31 | ..currF|ont := 1|
|000008d0| 3b 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |;       |        |
|000008e0| 20 20 20 20 20 20 20 28 | 2a 20 55 73 65 20 74 68 |       (|* Use th|
|000008f0| 65 20 d2 41 70 70 6c 69 | 63 61 74 69 6f 6e 20 46 |e .Appli|cation F|
|00000900| 6f 6e 74 d3 20 28 74 79 | 70 69 63 61 6c 6c 79 20 |ont. (ty|pically |
|00000910| 47 65 6e 65 76 61 29 20 | 69 6e 69 74 69 61 6c 6c |Geneva) |initiall|
|00000920| 79 20 2a 29 0d 20 20 09 | 09 63 75 72 72 53 69 7a |y *).  .|.currSiz|
|00000930| 65 20 3a 3d 20 31 32 3b | 20 20 20 20 20 20 20 20 |e := 12;|        |
|00000940| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 28 2a 20 |        |     (* |
|00000950| 31 32 20 70 6f 69 6e 74 | 73 20 73 65 65 6d 73 20 |12 point|s seems |
|00000960| 74 6f 20 62 65 20 61 20 | 72 65 61 73 6f 6e 61 62 |to be a |reasonab|
|00000970| 6c 65 20 73 69 7a 65 20 | 2a 29 0d 20 09 45 4e 44 |le size |*). .END|
|00000980| 3b 20 28 2a 20 49 6e 69 | 74 47 6c 6f 62 61 6c 73 |; (* Ini|tGlobals|
|00000990| 20 2a 29 0d 0d 0d 20 20 | 50 52 4f 43 45 44 55 52 | *)...  |PROCEDUR|
|000009a0| 45 20 53 61 66 65 74 79 | 4e 65 74 3b 0d 20 20 28 |E Safety|Net;.  (|
|000009b0| 2a 20 54 68 69 73 20 69 | 73 20 74 68 65 20 22 72 |* This i|s the "r|
|000009c0| 65 73 75 6d 65 22 20 70 | 72 6f 63 65 64 75 72 65 |esume" p|rocedure|
|000009d0| 20 77 68 69 63 68 20 69 | 73 20 63 61 6c 6c 65 64 | which i|s called|
|000009e0| 20 69 66 20 61 20 53 79 | 73 74 65 6d 20 45 72 72 | if a Sy|stem Err|
|000009f0| 6f 72 20 6f 63 63 75 72 | 73 20 61 6e 64 20 74 68 |or occur|s and th|
|00000a00| 65 20 75 73 65 72 20 70 | 72 65 73 73 65 73 20 2a |e user p|resses *|
|00000a10| 29 0d 20 20 28 2a 20 74 | 68 65 20 22 72 65 73 75 |).  (* t|he "resu|
|00000a20| 6d 65 22 20 62 75 74 74 | 6f 6e 2e 20 20 49 74 20 |me" butt|on.  It |
|00000a30| 68 61 73 20 74 6f 20 62 | 65 20 69 6e 20 74 68 65 |has to b|e in the|
|00000a40| 20 73 61 6d 65 20 73 65 | 67 6d 65 6e 74 20 61 73 | same se|gment as|
|00000a50| 20 6f 75 72 20 6d 61 69 | 6e 20 6c 6f 6f 70 20 73 | our mai|n loop s|
|00000a60| 6f 20 69 74 20 77 69 6c | 6c 20 6e 65 76 65 72 20 |o it wil|l never |
|00000a70| 62 65 20 20 2a 29 0d 20 | 20 28 2a 20 75 6e 6c 6f |be  *). | (* unlo|
|00000a80| 61 64 65 64 20 66 72 6f | 6d 20 6d 65 6d 6f 72 79 |aded fro|m memory|
|00000a90| 2e 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00000aa0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000ab0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000ac0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000ad0| 20 20 20 20 20 20 20 20 | 20 2a 29 0d 20 20 28 2a |        | *).  (*|
|00000ae0| 20 54 68 69 73 20 70 72 | 6f 63 65 64 75 72 65 20 | This pr|ocedure |
|00000af0| 69 73 20 72 65 66 65 72 | 65 6e 63 65 64 20 66 72 |is refer|enced fr|
|00000b00| 6f 6d 20 74 68 65 20 49 | 6e 69 74 69 61 6c 69 7a |om the I|nitializ|
|00000b10| 61 74 69 6f 6e 20 73 65 | 67 6d 65 6e 74 2e 20 20 |ation se|gment.  |
|00000b20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000b30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 2a 29 |        |      *)|
|00000b40| 0d 20 09 42 45 47 49 4e | 0d 20 20 09 09 45 78 69 |. .BEGIN|.  ..Exi|
|00000b50| 74 54 6f 53 68 65 6c 6c | 3b 20 20 20 20 20 20 20 |tToShell|;       |
|00000b60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000b70| 20 28 2a 20 74 72 79 20 | 74 6f 20 72 65 74 75 72 | (* try |to retur|
|00000b80| 6e 20 74 6f 20 74 68 65 | 20 46 69 6e 64 65 72 20 |n to the| Finder |
|00000b90| 69 66 20 61 6e 20 65 72 | 72 6f 72 20 6f 63 63 75 |if an er|ror occu|
|00000ba0| 72 73 20 2a 29 0d 20 09 | 45 4e 44 3b 20 28 2a 20 |rs *). .|END; (* |
|00000bb0| 73 61 66 65 74 79 4e 65 | 74 20 2a 29 0d 0d 0d 45 |safetyNe|t *)...E|
|00000bc0| 4e 44 2e 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |ND......|........|
|00000bd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000be0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c00| 00 00 01 00 00 00 01 1b | 00 00 00 1b 00 00 00 32 |........|.......2|
|00000c10| ff f9 07 5a 00 04 00 00 | ff ff 00 54 00 02 00 00 |...Z....|...T....|
|00000c20| ff f9 0d 2e 00 04 00 00 | ff ff 00 8c 00 02 00 00 |........|........|
|00000c30| 0b 67 6c 6f 62 61 6c 73 | 2e 50 61 73 02 00 00 00 |.globals|.Pas....|
|00000c40| 54 45 58 54 54 50 41 53 | 01 00 00 40 00 40 00 00 |TEXTTPAS|...@.@..|
|00000c50| 00 00 54 45 58 54 54 50 | 41 53 01 00 00 40 00 40 |..TEXTTP|AS...@.@|
|00000c60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c70| 00 00 9f 4b 67 79 00 00 | 0b 43 00 00 01 4d ff f6 |...Kgy..|.C...M..|
|00000c80| 12 78 00 04 fe 5e 05 4c | 52 45 43 54 00 3e 01 00 |.x...^.L|RECT.>..|
|00000c90| ff f6 00 14 00 00 00 00 | 01 00 00 ac 00 03 00 00 |........|........|
|00000ca0| ff f9 07 fe 00 00 00 00 | ff f9 07 5a 00 04 00 00 |........|...Z....|
|00000cb0| ff f6 12 78 00 04 fb dc | 07 4c 53 43 52 4f 4c 4c |...x....|.LSCROLL|
|00000cc0| 00 3e 01 00 ff f6 00 10 | 00 00 00 00 01 00 00 b0 |.>......|........|
|00000cd0| 00 03 00 00 ff ff 00 54 | 00 02 00 00 ff ff 00 54 |.......T|.......T|
|00000ce0| 00 02 00 00 ff f6 12 78 | 00 04 00 00 07 4c 53 45 |.......x|.....LSE|
|00000cf0| 41 52 43 48 00 2f 01 00 | ff f6 00 1a ff ff 00 8c |ARCH./..|........|
|00000d00| 00 00 00 17 01 00 80 00 | 00 00 03 31 2e 30 0c 46 |........|...1.0.F|
|00000d10| 6f 6e 74 53 68 6f 77 20 | 31 2e 30 00 00 01 00 00 |ontShow |1.0.....|
|00000d20| 00 01 1b 00 00 00 1b 00 | 00 00 32 00 1d 57 10 06 |........|..2..W..|
|00000d30| 9e 00 00 00 1c 00 32 00 | 00 76 65 72 73 00 00 00 |......2.|.vers...|
|00000d40| 0a 00 02 ff ff 00 00 00 | 00 00 1d 56 74 00 00 00 |........|...Vt...|
|00000d50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+