home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1995-08-30 | 20.9 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Simis (archive/simis)
| ext
| Unsupported |
| 100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| f9 fa f9 fa 00 00 d7 79 | 00 01 4a f5 00 00 55 12 |.......y|..J...U.|
|00000010| 00 00 55 12 00 00 55 12 | 00 00 55 12 00 00 55 12 |..U...U.|..U...U.|
|00000020| 00 00 55 12 00 00 55 12 | 00 00 55 12 2a 2a 2a 2a |..U...U.|..U.****|
|00000030| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000040| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000050| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000060| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000070| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 2a 0a 2a 09 |********|***.*.*.|
|00000080| 24 56 45 52 3a 20 41 6e | 79 50 72 6f 67 72 61 6d |$VER: An|yProgram|
|00000090| 20 30 2e 30 31 df 20 20 | 20 28 32 31 2d 46 65 62 | 0.01. | (21-Feb|
|000000a0| 2d 39 35 20 20 32 30 3a | 33 30 29 0a 2a 0a 2a 20 |-95 20:|30).*.* |
|000000b0| 42 65 67 69 6e 6e 69 6e | 67 20 6f 66 20 61 20 70 |Beginnin|g of a p|
|000000c0| 72 6f 67 72 61 6d 20 74 | 68 61 74 20 75 73 65 73 |rogram t|hat uses|
|000000d0| 20 74 68 65 20 47 61 64 | 55 74 69 6c 2e 6c 69 62 | the Gad|Util.lib|
|000000e0| 72 61 72 79 2e 20 54 68 | 69 73 20 63 6f 64 65 20 |rary. Th|is code |
|000000f0| 6d 61 79 20 62 65 0a 2a | 20 75 73 65 64 20 62 79 |may be.*| used by|
|00000100| 20 65 76 65 72 79 6f 6e | 65 20 77 68 6f 20 77 61 | everyon|e who wa|
|00000110| 6e 74 73 20 74 6f 20 64 | 65 76 65 6c 6f 70 20 61 |nts to d|evelop a|
|00000120| 73 73 65 6d 62 6c 79 20 | 6c 61 6e 67 75 61 67 65 |ssembly |language|
|00000130| 20 70 72 6f 67 72 61 6d | 73 20 75 73 69 6e 67 0a | program|s using.|
|00000140| 2a 20 47 61 64 55 74 69 | 6c 20 66 6f 72 20 6c 61 |* GadUti|l for la|
|00000150| 79 6f 75 74 2c 20 68 6f | 74 6b 65 79 73 20 61 6e |yout, ho|tkeys an|
|00000160| 64 20 6c 69 73 74 76 69 | 65 77 20 73 70 65 63 69 |d listvi|ew speci|
|00000170| 61 6c 20 66 75 6e 63 74 | 69 6f 6e 73 2e 0a 2a 0a |al funct|ions..*.|
|00000180| 2a 20 53 75 62 72 6f 75 | 74 69 6e 65 73 3a 0a 2a |* Subrou|tines:.*|
|00000190| 0a 2a 09 44 6f 53 74 61 | 72 74 75 70 20 2d 20 6d |.*.DoSta|rtup - m|
|000001a0| 69 6e 69 6d 61 6c 20 57 | 6f 72 6b 62 65 6e 63 68 |inimal W|orkbench|
|000001b0| 20 61 6e 64 20 43 4c 49 | 20 73 74 61 72 74 75 70 | and CLI| startup|
|000001c0| 20 63 6f 64 65 2e 20 4e | 6f 20 61 72 67 75 6d 65 | code. N|o argume|
|000001d0| 6e 74 73 0a 2a 09 09 20 | 20 20 20 61 72 65 20 63 |nts.*.. | are c|
|000001e0| 68 65 63 6b 65 64 2e 0a | 2a 0a 2a 09 45 6e 64 53 |hecked..|*.*.EndS|
|000001f0| 74 61 72 74 75 70 20 2d | 20 72 65 70 6c 69 65 73 |tartup -| replies|
|00000200| 20 74 68 65 20 57 6f 72 | 6b 62 65 6e 63 68 20 73 | the Wor|kbench s|
|00000210| 74 61 72 74 75 70 20 6d | 65 73 73 61 67 65 2e 0a |tartup m|essage..|
|00000220| 2a 0a 2a 09 70 72 6f 63 | 65 73 73 5f 65 76 65 6e |*.*.proc|ess_even|
|00000230| 74 73 20 2d 20 6d 61 69 | 6e 20 6c 6f 6f 70 20 6f |ts - mai|n loop o|
|00000240| 66 20 74 68 65 20 70 72 | 6f 67 72 61 6d 2e 0a 2a |f the pr|ogram..*|
|00000250| 0a 2a 09 47 65 74 49 4d | 65 73 73 61 67 65 20 2d |.*.GetIM|essage -|
|00000260| 20 67 65 74 20 61 20 6d | 65 73 73 61 67 65 20 66 | get a m|essage f|
|00000270| 72 6f 6d 20 61 20 77 69 | 6e 64 6f 77 27 73 20 55 |rom a wi|ndow's U|
|00000280| 73 65 72 50 6f 72 74 2e | 20 54 68 69 73 20 72 6f |serPort.| This ro|
|00000290| 75 74 69 6e 65 0a 2a 09 | 09 20 20 20 20 20 20 77 |utine.*.|. w|
|000002a0| 69 6c 6c 20 61 6c 73 6f | 20 63 68 65 63 6b 20 66 |ill also| check f|
|000002b0| 6f 72 20 49 44 43 4d 50 | 5f 52 45 46 52 45 53 48 |or IDCMP|_REFRESH|
|000002c0| 57 49 4e 44 4f 57 2c 20 | 61 6e 64 20 72 65 66 72 |WINDOW, |and refr|
|000002d0| 65 73 68 0a 2a 09 09 20 | 20 20 20 20 20 61 6c 6c |esh.*.. | all|
|000002e0| 20 67 61 64 67 65 74 73 | 20 61 6e 64 20 62 65 76 | gadgets| and bev|
|000002f0| 65 6c 20 62 6f 78 65 73 | 20 61 75 74 6f 6d 61 74 |el boxes| automat|
|00000300| 69 63 61 6c 6c 79 2e 20 | 54 68 65 20 6d 65 73 73 |ically. |The mess|
|00000310| 61 67 65 0a 2a 09 09 20 | 20 20 20 20 20 77 69 6c |age.*.. | wil|
|00000320| 6c 20 62 65 20 72 65 70 | 6c 69 65 64 20 69 6e 20 |l be rep|lied in |
|00000330| 74 68 69 73 20 72 6f 75 | 74 69 6e 65 20 61 6e 64 |this rou|tine and|
|00000340| 20 79 6f 75 20 77 69 6c | 6c 20 68 61 76 65 20 73 | you wil|l have s|
|00000350| 6f 6d 65 0a 2a 09 09 20 | 20 20 20 20 20 6f 66 20 |ome.*.. | of |
|00000360| 74 68 65 20 6d 65 73 73 | 61 67 65 20 63 6f 6e 74 |the mess|age cont|
|00000370| 65 6e 74 73 20 69 6e 20 | 73 6f 6d 65 20 72 65 67 |ents in |some reg|
|00000380| 69 73 74 65 72 73 2e 0a | 2a 0a 2a 09 47 65 74 4c |isters..|*.*.GetL|
|00000390| 6f 63 53 74 72 20 2d 20 | 67 65 74 20 61 20 6c 6f |ocStr - |get a lo|
|000003a0| 63 61 6c 69 7a 65 64 20 | 73 74 72 69 6e 67 20 75 |calized |string u|
|000003b0| 73 69 6e 67 20 74 68 65 | 20 70 72 6f 67 72 61 6d |sing the| program|
|000003c0| 73 20 63 61 74 61 6c 6f | 67 2e 0a 2a 0a 2a 09 41 |s catalo|g..*.*.A|
|000003d0| 62 6f 75 74 20 2d 20 64 | 69 73 70 6c 61 79 20 74 |bout - d|isplay t|
|000003e0| 68 65 20 72 65 71 75 65 | 73 74 65 72 20 63 6f 6e |he reque|ster con|
|000003f0| 74 61 69 6e 69 6e 67 20 | 73 6f 6d 65 20 69 6e 66 |taining |some inf|
|00000400| 6f 72 6d 61 74 69 6f 6e | 20 61 62 6f 75 74 20 74 |ormation| about t|
|00000410| 68 65 0a 2a 09 09 70 72 | 6f 67 72 61 6d 20 61 6e |he.*..pr|ogram an|
|00000420| 64 20 69 74 73 20 61 75 | 74 68 6f 72 2e 0a 2a 0a |d its au|thor..*.|
|00000430| 2a 09 44 6f 52 65 71 75 | 65 73 74 65 72 20 2d 20 |*.DoRequ|ester - |
|00000440| 64 69 73 70 6c 61 79 20 | 61 20 72 65 71 75 65 73 |display |a reques|
|00000450| 74 65 72 20 77 69 74 68 | 20 74 68 65 20 67 69 76 |ter with| the giv|
|00000460| 65 6e 20 67 61 64 67 65 | 74 2c 20 62 6f 64 79 20 |en gadge|t, body |
|00000470| 61 6e 64 0a 2a 09 09 20 | 20 20 20 20 20 74 69 74 |and.*.. | tit|
|00000480| 6c 65 20 74 65 78 74 2e | 0a 2a 0a 2a 09 59 6f 75 |le text.|.*.*.You|
|00000490| 20 6d 61 79 20 63 68 61 | 6e 67 65 20 61 6c 6c 20 | may cha|nge all |
|000004a0| 72 6f 75 74 69 6e 65 73 | 20 69 6e 20 74 68 69 73 |routines| in this|
|000004b0| 20 63 6f 64 65 2c 20 62 | 75 74 20 79 6f 75 20 6d | code, b|ut you m|
|000004c0| 61 79 20 6e 6f 74 20 73 | 70 72 65 61 64 20 61 6e |ay not s|pread an|
|000004d0| 79 0a 2a 09 6d 6f 64 69 | 66 69 65 64 20 76 65 72 |y.*.modi|fied ver|
|000004e0| 73 69 6f 6e 73 20 6f 66 | 20 74 68 69 73 20 66 69 |sions of| this fi|
|000004f0| 6c 65 20 28 61 6c 6c 20 | 79 6f 75 72 20 70 72 6f |le (all |your pro|
|00000500| 67 72 61 6d 73 20 6d 61 | 79 20 62 65 20 73 70 72 |grams ma|y be spr|
|00000510| 65 61 64 20 65 76 65 6e | 0a 2a 09 69 66 20 79 6f |ead even|.*.if yo|
|00000520| 75 20 75 73 65 20 74 68 | 69 73 20 63 6f 64 65 2c |u use th|is code,|
|00000530| 20 61 73 20 74 68 69 73 | 20 69 73 20 74 68 65 20 | as this| is the |
|00000540| 70 75 72 70 6f 73 65 20 | 6f 66 20 74 68 65 73 65 |purpose |of these|
|00000550| 20 72 6f 75 74 69 6e 65 | 73 29 2e 0a 2a 0a 2a 09 | routine|s)..*.*.|
|00000560| 53 65 65 20 74 68 65 20 | 64 6f 63 75 6d 65 6e 74 |See the |document|
|00000570| 61 74 69 6f 6e 20 66 6f | 72 20 47 61 64 55 74 69 |ation fo|r GadUti|
|00000580| 6c 2e 6c 69 62 72 61 72 | 79 20 66 6f 72 20 64 69 |l.librar|y for di|
|00000590| 73 74 72 69 62 75 74 69 | 6f 6e 20 6f 66 20 74 68 |stributi|on of th|
|000005a0| 65 0a 2a 09 70 72 6f 67 | 72 61 6d 73 20 79 6f 75 |e.*.prog|rams you|
|000005b0| 20 63 72 65 61 74 65 2e | 0a 2a 0a 2a 20 4d 61 63 | create.|.*.* Mac|
|000005c0| 72 6f 73 3a 0a 2a 0a 2a | 09 5f 50 52 4f 47 4e 41 |ros:.*.*|._PROGNA|
|000005d0| 4d 45 20 2d 20 74 68 65 | 20 6e 61 6d 65 20 6f 66 |ME - the| name of|
|000005e0| 20 79 6f 75 72 20 70 72 | 6f 67 72 61 6d 0a 2a 0a | your pr|ogram.*.|
|000005f0| 2a 09 5f 53 48 4f 52 54 | 41 55 54 48 4f 52 20 2d |*._SHORT|AUTHOR -|
|00000600| 20 74 68 65 20 6e 61 6d | 65 20 74 6f 20 62 65 20 | the nam|e to be |
|00000610| 70 6c 61 63 65 64 20 69 | 6e 20 74 68 65 20 77 69 |placed i|n the wi|
|00000620| 6e 64 6f 77 20 74 69 74 | 6c 65 2e 20 43 61 6e 20 |ndow tit|le. Can |
|00000630| 62 65 0a 2a 09 09 20 20 | 20 20 20 20 20 74 68 65 |be.*.. | the|
|00000640| 20 61 75 74 68 6f 72 27 | 73 20 6f 72 20 61 20 63 | author'|s or a c|
|00000650| 6f 6d 70 61 6e 79 27 73 | 20 6e 61 6d 65 20 65 74 |ompany's| name et|
|00000660| 63 2e 0a 2a 0a 2a 09 5f | 46 55 4c 4c 41 55 54 48 |c..*.*._|FULLAUTH|
|00000670| 4f 52 20 2d 20 74 68 65 | 20 61 75 74 68 6f 72 27 |OR - the| author'|
|00000680| 73 20 66 75 6c 6c 20 6e | 61 6d 65 20 61 6e 64 20 |s full n|ame and |
|00000690| 61 64 64 72 65 73 73 2e | 20 54 68 69 73 20 74 65 |address.| This te|
|000006a0| 78 74 20 77 69 6c 6c 0a | 2a 09 09 20 20 20 20 20 |xt will.|*.. |
|000006b0| 20 62 65 20 73 68 6f 77 | 6e 20 69 6e 20 74 68 65 | be show|n in the|
|000006c0| 20 61 62 6f 75 74 20 77 | 69 6e 64 6f 77 0a 2a 0a | about w|indow.*.|
|000006d0| 2a 09 5f 56 45 52 53 49 | 4f 4e 20 2d 20 74 68 65 |*._VERSI|ON - the|
|000006e0| 20 76 65 72 73 69 6f 6e | 20 6f 66 20 79 6f 75 72 | version| of your|
|000006f0| 20 70 72 6f 67 72 61 6d | 0a 2a 0a 2a 09 5f 44 41 | program|.*.*._DA|
|00000700| 54 45 20 2d 20 74 68 65 | 20 63 6f 6d 70 69 6c 61 |TE - the| compila|
|00000710| 74 69 6f 6e 20 64 61 74 | 65 20 6f 66 20 74 68 65 |tion dat|e of the|
|00000720| 20 70 72 6f 67 72 61 6d | 2e 20 54 68 69 73 20 65 | program|. This e|
|00000730| 78 61 6d 70 6c 65 20 75 | 73 65 73 0a 2a 09 09 52 |xample u|ses.*..R|
|00000740| 65 76 54 69 6d 65 72 20 | 62 79 20 53 74 61 66 66 |evTimer |by Staff|
|00000750| 61 6e 20 48 e4 6d e4 6c | e4 2e 20 49 66 20 79 6f |an H.m.l|.. If yo|
|00000760| 75 20 64 6f 6e 27 74 20 | 68 61 76 65 20 74 68 69 |u don't |have thi|
|00000770| 73 20 70 72 6f 67 72 61 | 6d 2c 0a 2a 09 09 79 6f |s progra|m,.*..yo|
|00000780| 75 20 6d 61 79 20 6e 65 | 65 64 20 74 6f 20 63 68 |u may ne|ed to ch|
|00000790| 61 6e 67 65 20 74 68 69 | 73 20 6d 61 63 72 6f 20 |ange thi|s macro |
|000007a0| 74 6f 20 61 20 64 63 2e | 62 20 73 74 61 74 65 6d |to a dc.|b statem|
|000007b0| 65 6e 74 2e 20 54 68 65 | 0a 2a 09 09 64 61 74 65 |ent. The|.*..date|
|000007c0| 20 68 65 72 65 20 69 73 | 20 69 6e 20 61 20 66 72 | here is| in a fr|
|000007d0| 65 65 20 66 6f 72 6d 61 | 74 20 28 6e 6f 74 20 75 |ee forma|t (not u|
|000007e0| 73 65 64 20 62 79 20 74 | 68 65 20 76 65 72 73 69 |sed by t|he versi|
|000007f0| 6f 6e 20 63 6d 64 29 2e | 0a 2a 0a 2a 09 5f 56 45 |on cmd).|.*.*._VE|
|00000800| 52 54 41 47 20 2d 20 74 | 68 65 20 76 65 72 73 69 |RTAG - t|he versi|
|00000810| 6f 6e 20 74 61 67 2e 20 | 54 68 65 20 56 65 72 73 |on tag. |The Vers|
|00000820| 69 6f 6e 20 63 6f 6d 6d | 61 6e 64 20 77 69 6c 6c |ion comm|and will|
|00000830| 20 73 65 61 72 63 68 20 | 66 6f 72 20 74 68 69 73 | search |for this|
|00000840| 0a 2a 09 09 20 20 73 74 | 72 69 6e 67 20 69 6e 20 |.*.. st|ring in |
|00000850| 74 68 65 20 70 72 6f 67 | 72 61 6d 2e 20 54 68 65 |the prog|ram. The|
|00000860| 20 73 74 72 69 6e 67 20 | 69 73 20 69 6e 20 61 20 | string |is in a |
|00000870| 73 74 72 69 63 74 20 66 | 6f 72 6d 61 74 2c 0a 2a |strict f|ormat,.*|
|00000880| 09 09 20 20 61 6e 64 20 | 74 68 65 20 62 65 73 74 |.. and |the best|
|00000890| 20 74 68 69 6e 67 20 69 | 73 20 74 6f 20 61 76 6f | thing i|s to avo|
|000008a0| 69 64 20 63 68 61 6e 67 | 69 6e 67 20 61 6e 79 74 |id chang|ing anyt|
|000008b0| 68 69 6e 67 20 65 6c 73 | 65 20 74 68 61 6e 0a 2a |hing els|e than.*|
|000008c0| 09 09 20 20 74 68 65 20 | 64 61 74 65 20 28 64 64 |.. the |date (dd|
|000008d0| 2e 6d 6d 2e 79 79 20 66 | 6f 72 6d 61 74 29 2e 0a |.mm.yy f|ormat)..|
|000008e0| 2a 0a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |*.******|********|
|000008f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000900| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000910| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000920| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000930| 2a 0a 0a 09 69 6e 63 64 | 69 72 09 69 6e 63 6c 75 |*...incd|ir.inclu|
|00000940| 64 65 3a 0a 09 69 6e 63 | 6c 75 64 65 09 6c 69 62 |de:..inc|lude.lib|
|00000950| 72 61 72 69 65 73 2f 67 | 61 64 74 6f 6f 6c 73 2e |raries/g|adtools.|
|00000960| 69 0a 09 69 6e 63 6c 75 | 64 65 09 6c 69 62 72 61 |i..inclu|de.libra|
|00000970| 72 69 65 73 2f 67 61 64 | 75 74 69 6c 2e 69 0a 09 |ries/gad|util.i..|
|00000980| 69 6e 63 6c 75 64 65 09 | 6c 69 62 72 61 72 69 65 |include.|librarie|
|00000990| 73 2f 67 61 64 75 74 69 | 6c 5f 6c 69 62 2e 69 0a |s/gaduti|l_lib.i.|
|000009a0| 09 69 6e 63 6c 75 64 65 | 09 6c 69 62 72 61 72 69 |.include|.librari|
|000009b0| 65 73 2f 61 73 6c 2e 69 | 0a 09 69 6e 63 6c 75 64 |es/asl.i|..includ|
|000009c0| 65 09 64 6f 73 2f 64 6f | 73 65 78 74 65 6e 73 2e |e.dos/do|sextens.|
|000009d0| 69 0a 09 69 6e 63 6c 75 | 64 65 09 65 78 65 63 2f |i..inclu|de.exec/|
|000009e0| 6c 69 73 74 73 2e 69 0a | 09 69 6e 63 6c 75 64 65 |lists.i.|.include|
|000009f0| 09 65 78 65 63 2f 6d 65 | 6d 6f 72 79 2e 69 0a 09 |.exec/me|mory.i..|
|00000a00| 69 6e 63 6c 75 64 65 09 | 4c 56 4f 73 2e 69 0a 0a |include.|LVOs.i..|
|00000a10| 44 45 42 55 47 3a 09 65 | 71 75 09 30 0a 0a 5f 50 |DEBUG:.e|qu.0.._P|
|00000a20| 52 4f 47 4e 41 4d 45 3a | 09 4d 41 43 52 4f 0a 09 |ROGNAME:|.MACRO..|
|00000a30| 09 64 63 2e 62 09 27 41 | 6e 79 50 72 6f 67 72 61 |.dc.b.'A|nyProgra|
|00000a40| 6d 20 27 0a 09 09 45 4e | 44 4d 0a 09 09 0a 5f 53 |m '...EN|DM...._S|
|00000a50| 48 4f 52 54 41 55 54 48 | 4f 52 3a 09 4d 41 43 52 |HORTAUTH|OR:.MACR|
|00000a60| 4f 0a 09 09 64 63 2e 62 | 09 22 50 2d 4f 20 59 6c |O...dc.b|."P-O Yl|
|00000a70| 69 6e 69 65 6d 69 22 2c | 30 0a 09 09 45 4e 44 4d |iniemi",|0...ENDM|
|00000a80| 0a 0a 5f 46 55 4c 4c 41 | 55 54 48 4f 52 3a 09 4d |.._FULLA|UTHOR:.M|
|00000a90| 41 43 52 4f 0a 09 09 64 | 63 2e 62 09 31 30 2c 31 |ACRO...d|c.b.10,1|
|00000aa0| 30 0a 09 09 64 63 2e 62 | 09 22 20 20 20 20 20 20 |0...dc.b|." |
|00000ab0| 20 20 20 50 65 72 2d 4f | 6c 6f 66 20 59 6c 69 6e | Per-O|lof Ylin|
|00000ac0| 69 65 6d 69 22 2c 31 30 | 0a 09 09 64 63 2e 62 09 |iemi",10|...dc.b.|
|00000ad0| 22 20 20 20 20 20 20 20 | 20 20 4d 75 6f 6e 69 6f |" | Muonio|
|00000ae0| 76 61 61 72 61 22 2c 31 | 30 0a 09 09 64 63 2e 62 |vaara",1|0...dc.b|
|00000af0| 09 22 20 20 20 20 20 20 | 20 20 20 53 2d 39 38 30 |." | S-980|
|00000b00| 20 36 34 20 4d 75 6f 64 | 6f 73 6c 6f 6d 70 6f 6c | 64 Muod|oslompol|
|00000b10| 6f 22 2c 31 30 0a 09 09 | 64 63 2e 62 09 22 20 20 |o",10...|dc.b." |
|00000b20| 20 20 20 20 20 20 20 53 | 57 45 44 45 4e 22 2c 31 | S|WEDEN",1|
|00000b30| 30 2c 31 30 2c 30 0a 09 | 09 45 4e 44 4d 0a 0a 5f |0,10,0..|.ENDM.._|
|00000b40| 56 45 52 53 49 4f 4e 3a | 09 4d 41 43 52 4f 0a 09 |VERSION:|.MACRO..|
|00000b50| 09 64 63 2e 62 09 27 30 | 2e 30 31 df 27 0a 09 09 |.dc.b.'0|.01.'...|
|00000b60| 45 4e 44 4d 0a 0a 5f 44 | 41 54 45 3a 09 09 4d 41 |ENDM.._D|ATE:..MA|
|00000b70| 43 52 4f 0a 09 09 69 6e | 63 62 69 6e 09 65 6e 76 |CRO...in|cbin.env|
|00000b80| 3a 64 61 74 65 0a 09 09 | 45 4e 44 4d 0a 0a 5f 56 |:date...|ENDM.._V|
|00000b90| 45 52 54 41 47 3a 09 4d | 41 43 52 4f 0a 09 09 64 |ERTAG:.M|ACRO...d|
|00000ba0| 63 2e 62 09 27 24 56 45 | 52 3a 20 27 0a 09 09 5f |c.b.'$VE|R: '..._|
|00000bb0| 50 52 4f 47 4e 41 4d 45 | 0a 09 09 5f 56 45 52 53 |PROGNAME|..._VERS|
|00000bc0| 49 4f 4e 0a 09 09 64 63 | 2e 62 09 27 20 28 31 38 |ION...dc|.b.' (18|
|00000bd0| 2e 30 32 2e 39 35 29 27 | 2c 30 0a 09 09 45 4e 44 |.02.95)'|,0...END|
|00000be0| 4d 0a 0a 3b 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |M..;----|--------|
|00000bf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 20 4f 70 65 |--------|---- Ope|
|00000c00| 6e 20 6c 69 62 72 61 72 | 69 65 73 20 61 6e 64 20 |n librar|ies and |
|00000c10| 72 75 6e 2e 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |run. ---|--------|
|00000c20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000c30| 2d 0a 4d 61 69 6e 3a 0a | 09 6d 6f 76 65 2e 6c 09 |-.Main:.|.move.l.|
|00000c40| 5f 41 62 73 45 78 65 63 | 42 61 73 65 2e 77 2c 61 |_AbsExec|Base.w,a|
|00000c50| 36 0a 09 6c 65 61 2e 6c | 09 42 53 53 5f 44 61 74 |6..lea.l|.BSS_Dat|
|00000c60| 61 2c 61 35 09 09 3b 20 | 47 65 74 20 70 6f 69 6e |a,a5..; |Get poin|
|00000c70| 74 65 72 20 74 6f 20 61 | 6c 6c 20 70 72 6f 67 72 |ter to a|ll progr|
|00000c80| 61 6d 20 64 61 74 61 0a | 09 62 73 72 2e 62 09 44 |am data.|.bsr.b.D|
|00000c90| 6f 53 74 61 72 74 75 70 | 09 09 3b 20 53 69 6d 70 |oStartup|..; Simp|
|00000ca0| 6c 65 20 73 74 61 72 74 | 75 70 20 63 6f 64 65 0a |le start|up code.|
|00000cb0| 09 6c 65 61 2e 6c 09 6c | 69 62 64 61 74 61 73 28 |.lea.l.l|ibdatas(|
|00000cc0| 70 63 29 2c 61 32 0a 09 | 6d 6f 76 65 2e 77 09 28 |pc),a2..|move.w.(|
|00000cd0| 61 32 29 2b 2c 64 32 0a | 2e 6f 70 65 6e 6c 69 62 |a2)+,d2.|.openlib|
|00000ce0| 3a 0a 09 6d 6f 76 65 71 | 2e 6c 09 23 30 2c 64 30 |:..moveq|.l.#0,d0|
|00000cf0| 09 09 09 3b 20 47 65 74 | 20 72 65 71 75 69 72 65 |...; Get| require|
|00000d00| 64 20 76 65 72 73 69 6f | 6e 20 6f 66 20 6c 69 62 |d versio|n of lib|
|00000d10| 72 61 72 79 0a 09 6d 6f | 76 65 2e 77 09 28 61 32 |rary..mo|ve.w.(a2|
|00000d20| 29 2b 2c 64 30 0a 09 6d | 6f 76 65 2e 6c 09 28 61 |)+,d0..m|ove.l.(a|
|00000d30| 32 29 2c 61 31 09 09 09 | 3b 20 47 65 74 20 70 6f |2),a1...|; Get po|
|00000d40| 69 6e 74 65 72 20 74 6f | 20 6c 69 62 72 61 72 79 |inter to| library|
|00000d50| 20 6e 61 6d 65 0a 09 43 | 61 6c 6c 4c 69 62 09 4f | name..C|allLib.O|
|00000d60| 70 65 6e 4c 69 62 72 61 | 72 79 0a 09 6d 6f 76 65 |penLibra|ry..move|
|00000d70| 2e 6c 09 64 30 2c 28 61 | 32 29 2b 09 09 3b 20 53 |.l.d0,(a|2)+..; S|
|00000d80| 61 76 65 20 6c 69 62 72 | 61 72 79 20 62 61 73 65 |ave libr|ary base|
|00000d90| 20 61 64 64 72 65 73 73 | 0a 09 64 62 65 71 09 64 | address|..dbeq.d|
|00000da0| 32 2c 2e 6f 70 65 6e 6c | 69 62 0a 09 62 65 71 2e |2,.openl|ib..beq.|
|00000db0| 62 09 2e 63 6c 6f 73 65 | 6c 69 62 73 09 09 3b 20 |b..close|libs..; |
|00000dc0| 43 6c 6f 73 65 20 6f 70 | 65 6e 65 64 20 6c 69 62 |Close op|ened lib|
|00000dd0| 72 61 72 69 65 73 20 6f | 6e 20 65 72 72 6f 72 0a |raries o|n error.|
|00000de0| 0a 09 62 73 72 2e 77 09 | 50 72 6f 67 72 61 6d 09 |..bsr.w.|Program.|
|00000df0| 09 09 3b 20 53 74 61 72 | 74 20 74 68 65 20 61 63 |..; Star|t the ac|
|00000e00| 74 75 61 6c 20 70 72 6f | 67 72 61 6d 0a 09 62 72 |tual pro|gram..br|
|00000e10| 61 2e 62 09 2e 6e 6f 64 | 6f 73 09 09 09 3b 20 44 |a.b..nod|os...; D|
|00000e20| 6f 6e 27 74 20 70 72 69 | 6e 74 20 65 72 72 6f 72 |on't pri|nt error|
|00000e30| 20 6d 65 73 73 61 67 65 | 0a 0a 2e 63 6c 6f 73 65 | message|...close|
|00000e40| 6c 69 62 73 3a 0a 09 6d | 6f 76 65 2e 6c 09 44 6f |libs:..m|ove.l.Do|
|00000e50| 73 42 61 73 65 28 70 63 | 29 2c 64 30 09 09 3b 20 |sBase(pc|),d0..; |
|00000e60| 43 68 65 63 6b 20 66 6f | 72 20 64 6f 73 2e 6c 69 |Check fo|r dos.li|
|00000e70| 62 72 61 72 79 0a 09 62 | 65 71 2e 62 09 2e 6e 6f |brary..b|eq.b..no|
|00000e80| 64 6f 73 0a 09 6c 65 61 | 2e 6c 09 65 72 72 73 74 |dos..lea|.l.errst|
|00000e90| 72 28 70 63 29 2c 61 30 | 09 09 3b 20 54 65 6c 6c |r(pc),a0|..; Tell|
|00000ea0| 20 74 68 61 74 20 74 68 | 65 20 70 72 6f 67 72 61 | that th|e progra|
|00000eb0| 6d 20 6e 65 65 64 73 20 | 74 68 65 0a 09 6d 6f 76 |m needs |the..mov|
|00000ec0| 65 2e 6c 09 61 30 2c 64 | 31 09 09 09 3b 20 20 67 |e.l.a0,d|1...; g|
|00000ed0| 61 64 75 74 69 6c 2e 6c | 69 62 72 61 72 79 0a 09 |adutil.l|ibrary..|
|00000ee0| 43 61 6c 6c 4c 69 62 09 | 50 75 74 53 74 72 2c 64 |CallLib.|PutStr,d|
|00000ef0| 30 0a 09 6d 6f 76 65 2e | 6c 09 5f 41 62 73 45 78 |0..move.|l._AbsEx|
|00000f00| 65 63 42 61 73 65 2e 77 | 2c 61 36 0a 2e 6e 6f 64 |ecBase.w|,a6..nod|
|00000f10| 6f 73 3a 0a 09 6c 65 61 | 2e 6c 09 6c 69 62 64 61 |os:..lea|.l.libda|
|00000f20| 74 61 73 28 70 63 29 2c | 61 32 09 09 3b 20 47 65 |tas(pc),|a2..; Ge|
|00000f30| 74 20 6c 69 62 72 61 72 | 79 20 62 61 73 65 73 0a |t librar|y bases.|
|00000f40| 09 6d 6f 76 65 2e 77 09 | 28 61 32 29 2b 2c 64 32 |.move.w.|(a2)+,d2|
|00000f50| 09 09 3b 20 47 65 74 20 | 6e 75 6d 20 6f 66 20 6c |..; Get |num of l|
|00000f60| 69 62 72 61 72 69 65 73 | 20 74 6f 20 63 6c 6f 73 |ibraries| to clos|
|00000f70| 65 0a 2e 63 6c 6f 73 65 | 6c 69 62 3a 0a 09 74 73 |e..close|lib:..ts|
|00000f80| 74 2e 77 09 28 61 32 29 | 2b 09 09 09 3b 20 53 6b |t.w.(a2)|+...; Sk|
|00000f90| 69 70 20 76 65 72 73 69 | 6f 6e 20 6e 75 6d 62 65 |ip versi|on numbe|
|00000fa0| 72 0a 09 6d 6f 76 65 2e | 6c 09 28 61 32 29 2b 2c |r..move.|l.(a2)+,|
|00000fb0| 64 30 09 09 3b 20 47 65 | 74 20 6c 69 62 72 61 72 |d0..; Ge|t librar|
|00000fc0| 79 20 62 61 73 65 0a 09 | 62 65 71 2e 62 09 2e 63 |y base..|beq.b..c|
|00000fd0| 6c 6f 73 65 64 6f 6e 65 | 09 09 3b 20 44 6f 6e 65 |losedone|..; Done|
|00000fe0| 20 69 66 20 4e 55 4c 4c | 0a 09 6d 6f 76 65 2e 6c | if NULL|..move.l|
|00000ff0| 09 64 30 2c 61 31 0a 09 | 43 61 6c 6c 4c 69 62 09 |.d0,a1..|CallLib.|
|00001000| 43 6c 6f 73 65 4c 69 62 | 72 61 72 79 0a 09 64 62 |CloseLib|rary..db|
|00001010| 72 61 09 64 32 2c 2e 63 | 6c 6f 73 65 6c 69 62 0a |ra.d2,.c|loselib.|
|00001020| 2e 63 6c 6f 73 65 64 6f | 6e 65 3a 0a 09 62 73 72 |.closedo|ne:..bsr|
|00001030| 2e 62 09 45 6e 64 53 74 | 61 72 74 75 70 0a 09 6d |.b.EndSt|artup..m|
|00001040| 6f 76 65 71 2e 6c 09 23 | 30 2c 64 30 0a 09 72 74 |oveq.l.#|0,d0..rt|
|00001050| 73 0a 0a 3b 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |s..;****|********|
|00001060| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001070| 20 53 74 61 72 74 75 70 | 20 63 6f 64 65 20 2a 2a | Startup| code **|
|00001080| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001090| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000010a0| 2a 2a 0a 3b 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |**.;----|--------|
|000010b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 20 57 6f |--------|----- Wo|
|000010c0| 72 6b 62 65 6e 63 68 20 | 73 74 61 72 74 75 70 20 |rkbench |startup |
|000010d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000010e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000010f0| 2d 2d 0a 3b 09 47 65 74 | 20 57 42 20 73 74 61 72 |--.;.Get| WB star|
|00001100| 74 75 70 20 6d 65 73 73 | 61 67 65 0a 3b 0a 44 6f |tup mess|age.;.Do|
|00001110| 53 74 61 72 74 75 70 3a | 0a 09 6d 6f 76 65 6d 2e |Startup:|..movem.|
|00001120| 6c 09 64 30 2d 64 31 2f | 61 30 2d 61 32 2f 61 36 |l.d0-d1/|a0-a2/a6|
|00001130| 2c 2d 28 73 70 29 0a 0a | 09 6d 6f 76 65 2e 6c 09 |,-(sp)..|.move.l.|
|00001140| 5f 41 62 73 45 78 65 63 | 42 61 73 65 2e 77 2c 61 |_AbsExec|Base.w,a|
|00001150| 36 0a 09 73 75 62 61 2e | 6c 09 61 31 2c 61 31 09 |6..suba.|l.a1,a1.|
|00001160| 09 09 3b 20 46 69 6e 64 | 20 74 68 69 73 20 74 61 |..; Find| this ta|
|00001170| 73 6b 0a 09 43 61 6c 6c | 4c 69 62 09 46 69 6e 64 |sk..Call|Lib.Find|
|00001180| 54 61 73 6b 0a 09 6d 6f | 76 65 2e 6c 09 64 30 2c |Task..mo|ve.l.d0,|
|00001190| 61 32 09 09 09 3b 20 53 | 61 76 65 20 70 6f 69 6e |a2...; S|ave poin|
|000011a0| 74 65 72 20 74 6f 20 74 | 61 73 6b 0a 0a 09 74 73 |ter to t|ask...ts|
|000011b0| 74 2e 6c 09 70 72 5f 43 | 4c 49 28 61 32 29 09 09 |t.l.pr_C|LI(a2)..|
|000011c0| 3b 20 43 68 65 63 6b 20 | 69 66 20 73 74 61 72 74 |; Check |if start|
|000011d0| 65 64 20 66 72 6f 6d 20 | 57 42 20 6f 72 20 43 4c |ed from |WB or CL|
|000011e0| 49 0a 09 62 6e 65 2e 73 | 09 2e 73 74 61 72 74 75 |I..bne.s|..startu|
|000011f0| 70 64 6f 6e 65 09 09 3b | 20 50 72 6f 67 72 61 6d |pdone..;| Program|
|00001200| 20 77 61 73 20 73 74 61 | 72 74 65 64 20 66 72 6f | was sta|rted fro|
|00001210| 6d 20 43 4c 49 0a 0a 09 | 6c 65 61 2e 6c 09 70 72 |m CLI...|lea.l.pr|
|00001220| 5f 4d 73 67 50 6f 72 74 | 28 61 32 29 2c 61 30 09 |_MsgPort|(a2),a0.|
|00001230| 3b 20 57 61 69 74 20 66 | 6f 72 20 57 6f 72 6b 62 |; Wait f|or Workb|
|00001240| 65 6e 63 68 20 73 74 61 | 72 74 75 70 20 6d 65 73 |ench sta|rtup mes|
|00001250| 73 61 67 65 0a 09 43 61 | 6c 6c 4c 69 62 09 57 61 |sage..Ca|llLib.Wa|
|00001260| 69 74 50 6f 72 74 0a 09 | 6c 65 61 2e 6c 09 70 72 |itPort..|lea.l.pr|
|00001270| 5f 4d 73 67 50 6f 72 74 | 28 61 32 29 2c 61 30 09 |_MsgPort|(a2),a0.|
|00001280| 3b 20 47 65 74 20 74 68 | 65 20 57 42 20 73 74 61 |; Get th|e WB sta|
|00001290| 72 74 75 70 20 6d 65 73 | 73 61 67 65 0a 09 43 61 |rtup mes|sage..Ca|
|000012a0| 6c 6c 4c 69 62 09 47 65 | 74 4d 73 67 0a 09 6d 6f |llLib.Ge|tMsg..mo|
|000012b0| 76 65 2e 6c 09 64 30 2c | 57 42 4d 65 73 73 61 67 |ve.l.d0,|WBMessag|
|000012c0| 65 28 61 35 29 09 3b 20 | 61 6e 64 20 73 61 76 65 |e(a5).; |and save|
|000012d0| 20 69 74 20 66 6f 72 20 | 6c 61 74 65 72 20 75 73 | it for |later us|
|000012e0| 65 0a 0a 2e 73 74 61 72 | 74 75 70 64 6f 6e 65 3a |e...star|tupdone:|
|000012f0| 0a 09 6d 6f 76 65 6d 2e | 6c 09 28 73 70 29 2b 2c |..movem.|l.(sp)+,|
|00001300| 64 30 2d 64 31 2f 61 30 | 2d 61 32 2f 61 36 0a 09 |d0-d1/a0|-a2/a6..|
|00001310| 72 74 73 09 0a 0a 3b 2a | 2a 2a 2a 2a 2a 2a 2a 2a |rts...;*|********|
|00001320| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001330| 20 52 65 76 65 72 73 65 | 64 20 53 74 61 72 74 75 | Reverse|d Startu|
|00001340| 70 20 63 6f 64 65 20 2a | 2a 2a 2a 2a 2a 2a 2a 2a |p code *|********|
|00001350| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001360| 2a 2a 2a 2a 2a 0a 3b 09 | 52 65 70 6c 79 20 57 42 |*****.;.|Reply WB|
|00001370| 20 73 74 61 72 74 75 70 | 20 6d 65 73 73 61 67 65 | startup| message|
|00001380| 0a 0a 45 6e 64 53 74 61 | 72 74 75 70 3a 0a 09 6d |..EndSta|rtup:..m|
|00001390| 6f 76 65 2e 6c 09 5f 41 | 62 73 45 78 65 63 42 61 |ove.l._A|bsExecBa|
|000013a0| 73 65 2e 77 2c 61 36 09 | 3b 20 52 65 74 75 72 6e |se.w,a6.|; Return|
|000013b0| 20 74 68 65 20 57 42 20 | 73 74 61 72 74 75 70 20 | the WB |startup |
|000013c0| 6d 65 73 73 61 67 65 0a | 09 6d 6f 76 65 2e 6c 09 |message.|.move.l.|
|000013d0| 57 42 4d 65 73 73 61 67 | 65 28 61 35 29 2c 64 32 |WBMessag|e(a5),d2|
|000013e0| 0a 09 62 65 71 2e 73 09 | 2e 6e 6f 77 62 6d 73 67 |..beq.s.|.nowbmsg|
|000013f0| 09 09 3b 20 4e 6f 20 57 | 42 20 73 74 61 72 74 75 |..; No W|B startu|
|00001400| 70 20 6d 65 73 73 61 67 | 65 0a 09 43 61 6c 6c 4c |p messag|e..CallL|
|00001410| 69 62 09 46 6f 72 62 69 | 64 0a 09 6d 6f 76 65 2e |ib.Forbi|d..move.|
|00001420| 6c 09 64 32 2c 61 31 0a | 09 43 61 6c 6c 4c 69 62 |l.d2,a1.|.CallLib|
|00001430| 09 52 65 70 6c 79 4d 73 | 67 0a 2e 6e 6f 77 62 6d |.ReplyMs|g..nowbm|
|00001440| 73 67 3a 0a 09 72 74 73 | 0a 0a 3b 2d 2d 2d 2d 2d |sg:..rts|..;-----|
|00001450| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001460| 2d 2d 2d 2d 2d 20 44 61 | 74 61 20 66 6f 72 20 69 |----- Da|ta for i|
|00001470| 6e 69 74 20 72 6f 75 74 | 69 6e 65 73 20 2d 2d 2d |nit rout|ines ---|
|00001480| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001490| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0a 6c 69 62 64 61 74 |--------|-.libdat|
|000014a0| 61 73 3a 09 64 63 2e 77 | 09 34 2d 31 0a 09 09 64 |as:.dc.w|.4-1...d|
|000014b0| 63 2e 77 09 33 37 0a 44 | 6f 73 42 61 73 65 3a 09 |c.w.37.D|osBase:.|
|000014c0| 64 63 2e 6c 09 64 6f 73 | 6e 61 6d 65 0a 09 09 64 |dc.l.dos|name...d|
|000014d0| 63 2e 77 09 33 37 0a 47 | 66 78 42 61 73 65 3a 09 |c.w.37.G|fxBase:.|
|000014e0| 64 63 2e 6c 09 67 66 78 | 6e 61 6d 65 0a 09 09 64 |dc.l.gfx|name...d|
|000014f0| 63 2e 77 09 33 37 0a 49 | 6e 74 75 69 42 61 73 65 |c.w.37.I|ntuiBase|
|00001500| 3a 09 64 63 2e 6c 09 69 | 6e 74 75 69 6e 61 6d 65 |:.dc.l.i|ntuiname|
|00001510| 0a 09 09 64 63 2e 77 09 | 33 36 0a 47 55 74 69 6c |...dc.w.|36.GUtil|
|00001520| 42 61 73 65 3a 09 64 63 | 2e 6c 09 67 61 64 75 74 |Base:.dc|.l.gadut|
|00001530| 69 6c 6e 61 6d 65 0a 0a | 41 73 6c 42 61 73 65 3a |ilname..|AslBase:|
|00001540| 09 64 63 2e 6c 09 30 09 | 09 09 3b 20 4f 70 74 69 |.dc.l.0.|..; Opti|
|00001550| 6f 6e 61 6c 20 6c 69 62 | 72 61 72 69 65 73 0a 41 |onal lib|raries.A|
|00001560| 73 6c 4c 69 62 4e 61 6d | 65 3a 09 64 63 2e 62 09 |slLibNam|e:.dc.b.|
|00001570| 27 61 73 6c 2e 6c 69 62 | 72 61 72 79 27 2c 30 0a |'asl.lib|rary',0.|
|00001580| 0a 64 6f 73 6e 61 6d 65 | 3a 09 64 63 2e 62 09 27 |.dosname|:.dc.b.'|
|00001590| 64 6f 73 2e 6c 69 62 72 | 61 72 79 27 2c 30 0a 67 |dos.libr|ary',0.g|
|000015a0| 61 64 75 74 69 6c 6e 61 | 6d 65 3a 09 64 63 2e 62 |adutilna|me:.dc.b|
|000015b0| 09 27 67 61 64 75 74 69 | 6c 2e 6c 69 62 72 61 72 |.'gaduti|l.librar|
|000015c0| 79 27 2c 30 0a 67 66 78 | 6e 61 6d 65 3a 09 64 63 |y',0.gfx|name:.dc|
|000015d0| 2e 62 09 27 67 72 61 70 | 68 69 63 73 2e 6c 69 62 |.b.'grap|hics.lib|
|000015e0| 72 61 72 79 27 2c 30 0a | 69 6e 74 75 69 6e 61 6d |rary',0.|intuinam|
|000015f0| 65 3a 09 64 63 2e 62 09 | 27 69 6e 74 75 69 74 69 |e:.dc.b.|'intuiti|
|00001600| 6f 6e 2e 6c 69 62 72 61 | 72 79 27 2c 30 0a 0a 65 |on.libra|ry',0..e|
|00001610| 72 72 73 74 72 3a 09 09 | 64 63 2e 62 09 27 54 68 |rrstr:..|dc.b.'Th|
|00001620| 69 73 20 70 72 6f 67 72 | 61 6d 20 72 65 71 75 69 |is progr|am requi|
|00001630| 72 65 73 20 47 61 64 55 | 74 69 6c 2e 6c 69 62 72 |res GadU|til.libr|
|00001640| 61 72 79 20 76 33 36 2b | 27 2c 31 30 2c 30 0a 09 |ary v36+|',10,0..|
|00001650| 5f 56 45 52 54 41 47 0a | 09 65 76 65 6e 0a 0a 3b |_VERTAG.|.even..;|
|00001660| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001670| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 20 54 68 65 20 70 72 |--------|- The pr|
|00001680| 6f 67 72 61 6d 20 73 74 | 61 72 74 73 20 68 65 72 |ogram st|arts her|
|00001690| 65 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |e ------|--------|
|000016a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0a 50 72 |--------|-----.Pr|
|000016b0| 6f 67 72 61 6d 3a 0a 09 | 6d 6f 76 65 6d 2e 6c 09 |ogram:..|movem.l.|
|000016c0| 64 30 2d 61 36 2c 2d 28 | 73 70 29 0a 09 73 75 62 |d0-a6,-(|sp)..sub|
|000016d0| 61 2e 6c 09 61 30 2c 61 | 30 09 09 09 3b 20 4c 6f |a.l.a0,a|0...; Lo|
|000016e0| 63 6b 20 74 68 65 20 64 | 65 66 61 75 6c 74 20 70 |ck the d|efault p|
|000016f0| 75 62 6c 69 63 20 73 63 | 72 65 65 6e 0a 09 43 61 |ublic sc|reen..Ca|
|00001700| 6c 6c 4c 69 62 09 4c 6f | 63 6b 50 75 62 53 63 72 |llLib.Lo|ckPubScr|
|00001710| 65 65 6e 2c 49 6e 74 75 | 69 42 61 73 65 28 70 63 |een,Intu|iBase(pc|
|00001720| 29 0a 09 6d 6f 76 65 2e | 6c 09 64 30 2c 73 63 72 |)..move.|l.d0,scr|
|00001730| 65 65 6e 28 61 35 29 09 | 09 3b 20 53 61 76 65 20 |een(a5).|.; Save |
|00001740| 73 63 72 65 65 6e 20 70 | 6f 69 6e 74 65 72 0a 09 |screen p|ointer..|
|00001750| 62 65 71 2e 77 09 2e 6e | 6f 73 63 72 65 65 6e 0a |beq.w..n|oscreen.|
|00001760| 0a 09 6c 65 61 2e 6c 09 | 63 61 74 61 6c 6f 67 6e |..lea.l.|catalogn|
|00001770| 61 6d 65 28 70 63 29 2c | 61 30 09 3b 20 4f 70 65 |ame(pc),|a0.; Ope|
|00001780| 6e 20 63 61 74 61 6c 6f | 67 20 66 6f 72 20 74 72 |n catalo|g for tr|
|00001790| 61 6e 73 6c 61 74 65 64 | 20 73 74 72 69 6e 67 73 |anslated| strings|
|000017a0| 0a 09 6d 6f 76 65 71 2e | 6c 09 23 30 2c 64 30 0a |..moveq.|l.#0,d0.|
|000017b0| 09 43 61 6c 6c 4c 69 62 | 09 47 55 5f 4f 70 65 6e |.CallLib|.GU_Open|
|000017c0| 43 61 74 61 6c 6f 67 2c | 47 55 74 69 6c 42 61 73 |Catalog,|GUtilBas|
|000017d0| 65 28 70 63 29 0a 09 6d | 6f 76 65 2e 6c 09 64 30 |e(pc)..m|ove.l.d0|
|000017e0| 2c 63 61 74 61 6c 6f 67 | 0a 0a 09 6d 6f 76 65 2e |,catalog|...move.|
|000017f0| 6c 09 73 63 72 65 65 6e | 28 61 35 29 2c 61 32 09 |l.screen|(a5),a2.|
|00001800| 09 3b 20 53 63 72 65 65 | 6e 20 70 6f 69 6e 74 65 |.; Scree|n pointe|
|00001810| 72 0a 09 6d 6f 76 65 2e | 6c 09 73 63 5f 46 6f 6e |r..move.|l.sc_Fon|
|00001820| 74 28 61 32 29 2c 74 65 | 78 74 61 74 74 72 09 3b |t(a2),te|xtattr.;|
|00001830| 20 55 73 65 20 74 68 65 | 20 73 63 72 65 65 6e 27 | Use the| screen'|
|00001840| 73 20 66 6f 6e 74 20 66 | 6f 72 20 67 61 64 67 65 |s font f|or gadge|
|00001850| 74 73 0a 09 6c 65 61 2e | 6c 09 67 6c 69 73 74 28 |ts..lea.|l.glist(|
|00001860| 70 63 29 2c 61 30 09 09 | 3b 20 47 61 64 67 65 74 |pc),a0..|; Gadget|
|00001870| 20 6c 69 73 74 20 70 6f | 69 6e 74 65 72 0a 09 6c | list po|inter..l|
|00001880| 65 61 2e 6c 09 67 61 64 | 67 65 74 73 28 70 63 29 |ea.l.gad|gets(pc)|
|00001890| 2c 61 31 09 09 3b 20 4c | 61 79 6f 75 74 47 61 64 |,a1..; L|ayoutGad|
|000018a0| 67 65 74 20 73 74 72 75 | 63 74 75 72 65 73 0a 09 |get stru|ctures..|
|000018b0| 6c 65 61 2e 6c 09 4c 61 | 79 6f 75 74 54 61 67 73 |lea.l.La|youtTags|
|000018c0| 28 70 63 29 2c 61 33 09 | 3b 20 4c 61 79 6f 75 74 |(pc),a3.|; Layout|
|000018d0| 20 74 61 67 73 0a 0a 09 | 6d 6f 76 65 2e 6c 09 47 | tags...|move.l.G|
|000018e0| 55 74 69 6c 42 61 73 65 | 28 70 63 29 2c 61 36 09 |UtilBase|(pc),a6.|
|000018f0| 3b 20 43 72 65 61 74 65 | 20 61 6c 6c 20 67 61 64 |; Create| all gad|
|00001900| 67 65 74 73 0a 09 43 61 | 6c 6c 4c 69 62 09 47 55 |gets..Ca|llLib.GU|
|00001910| 5f 4c 61 79 6f 75 74 47 | 61 64 67 65 74 73 41 0a |_LayoutG|adgetsA.|
|00001920| 09 6d 6f 76 65 2e 6c 09 | 61 30 2c 70 72 69 76 5f |.move.l.|a0,priv_|
|00001930| 69 6e 66 6f 28 61 35 29 | 09 3b 20 53 61 76 65 20 |info(a5)|.; Save |
|00001940| 73 74 72 75 63 74 75 72 | 65 20 70 6f 69 6e 74 65 |structur|e pointe|
|00001950| 72 0a 09 62 65 71 2e 77 | 09 2e 75 6e 6c 6f 63 6b |r..beq.w|..unlock|
|00001960| 73 63 72 65 65 6e 09 09 | 3b 20 43 6f 75 6c 64 20 |screen..|; Could |
|00001970| 6e 6f 74 20 63 72 65 61 | 74 65 20 67 61 64 67 65 |not crea|te gadge|
|00001980| 74 73 21 0a 0a 09 6c 65 | 61 2e 6c 09 77 69 6e 64 |ts!...le|a.l.wind|
|00001990| 6f 77 5f 74 61 67 73 28 | 70 63 29 2c 61 31 09 3b |ow_tags(|pc),a1.;|
|000019a0| 20 47 65 74 20 70 6f 69 | 6e 74 65 72 20 74 6f 20 | Get poi|nter to |
|000019b0| 77 69 6e 64 6f 77 20 74 | 61 67 20 6c 69 73 74 0a |window t|ag list.|
|000019c0| 09 6d 6f 76 65 2e 6c 09 | 74 65 78 74 61 74 74 72 |.move.l.|textattr|
|000019d0| 28 70 63 29 2c 61 30 09 | 09 3b 20 47 65 74 20 74 |(pc),a0.|.; Get t|
|000019e0| 68 65 20 73 63 72 65 65 | 6e 27 73 20 66 6f 6e 74 |he scree|n's font|
|000019f0| 0a 0a 09 6d 6f 76 65 6d | 2e 6c 09 61 30 2d 61 31 |...movem|.l.a0-a1|
|00001a00| 2c 2d 28 73 70 29 09 09 | 3b 20 53 61 76 65 20 72 |,-(sp)..|; Save r|
|00001a10| 65 67 73 0a 09 6d 6f 76 | 65 2e 6c 09 61 30 2c 61 |egs..mov|e.l.a0,a|
|00001a20| 31 09 09 09 3b 20 46 6f | 6e 74 20 74 6f 20 63 61 |1...; Fo|nt to ca|
|00001a30| 6c 63 75 6c 61 74 65 20 | 74 65 78 74 20 77 69 64 |lculate |text wid|
|00001a40| 74 68 20 77 69 74 68 0a | 09 6c 65 61 2e 6c 09 4d |th with.|.lea.l.M|
|00001a50| 61 69 6e 57 54 69 74 6c | 65 28 70 63 29 2c 61 30 |ainWTitl|e(pc),a0|
|00001a60| 09 3b 20 47 65 74 20 6c | 65 6e 67 74 68 20 6f 66 |.; Get l|ength of|
|00001a70| 20 7a 6f 6f 6d 65 64 20 | 77 69 6e 64 6f 77 27 73 | zoomed |window's|
|00001a80| 20 74 69 74 6c 65 0a 09 | 63 6c 72 2e 62 09 6d 6f | title..|clr.b.mo|
|00001a90| 72 65 74 69 74 6c 65 09 | 09 3b 20 4d 61 72 6b 20 |retitle.|.; Mark |
|00001aa0| 65 6e 64 20 6f 66 20 22 | 7a 6f 6f 6d 65 64 22 20 |end of "|zoomed" |
|00001ab0| 74 69 74 6c 65 0a 09 43 | 61 6c 6c 4c 69 62 09 47 |title..C|allLib.G|
|00001ac0| 55 5f 54 65 78 74 57 69 | 64 74 68 0a 09 6d 6f 76 |U_TextWi|dth..mov|
|00001ad0| 65 2e 62 09 23 22 20 22 | 2c 6d 6f 72 65 74 69 74 |e.b.#" "|,moretit|
|00001ae0| 6c 65 09 09 3b 20 52 65 | 73 74 6f 72 65 20 72 65 |le..; Re|store re|
|00001af0| 6d 6f 76 65 64 20 63 68 | 61 72 0a 09 6d 6f 76 65 |moved ch|ar..move|
|00001b00| 6d 2e 6c 09 28 73 70 29 | 2b 2c 61 30 2d 61 31 09 |m.l.(sp)|+,a0-a1.|
|00001b10| 09 3b 20 52 65 73 74 6f | 72 65 20 72 65 67 73 0a |.; Resto|re regs.|
|00001b20| 0a 09 61 64 64 2e 77 09 | 23 38 37 2c 64 30 09 09 |..add.w.|#87,d0..|
|00001b30| 09 3b 20 41 64 6a 75 73 | 74 20 77 69 64 74 68 20 |.; Adjus|t width |
|00001b40| 66 6f 72 20 73 79 73 74 | 65 6d 20 67 61 64 67 65 |for syst|em gadge|
|00001b50| 74 73 0a 09 6d 6f 76 65 | 2e 77 09 64 30 2c 7a 6f |ts..move|.w.d0,zo|
|00001b60| 6f 6d 77 28 61 31 29 09 | 09 3b 20 53 65 74 20 7a |omw(a1).|.; Set z|
|00001b70| 6f 6f 6d 65 64 20 77 69 | 6e 64 6f 77 27 73 20 77 |oomed wi|ndow's w|
|00001b80| 69 64 74 68 0a 0a 09 6d | 6f 76 65 71 2e 6c 09 23 |idth...m|oveq.l.#|
|00001b90| 30 2c 64 30 09 09 09 3b | 20 57 69 6e 54 6f 70 20 |0,d0...;| WinTop |
|00001ba0| 3d 20 5a 6f 6f 6d 59 20 | 3d 20 5a 6f 6f 6d 48 20 |= ZoomY |= ZoomH |
|00001bb0| 3d 0a 09 6d 6f 76 65 2e | 77 09 74 61 5f 59 53 69 |=..move.|w.ta_YSi|
|00001bc0| 7a 65 28 61 30 29 2c 64 | 30 09 09 3b 20 66 6f 6e |ze(a0),d|0..; fon|
|00001bd0| 74 68 65 69 67 68 74 20 | 2b 20 33 0a 09 61 64 64 |theight |+ 3..add|
|00001be0| 71 2e 77 09 23 33 2c 64 | 30 0a 09 6d 6f 76 65 2e |q.w.#3,d|0..move.|
|00001bf0| 6c 09 64 30 2c 77 69 6e | 74 6f 70 28 61 31 29 0a |l.d0,win|top(a1).|
|00001c00| 09 6d 6f 76 65 2e 77 09 | 64 30 2c 7a 6f 6f 6d 79 |.move.w.|d0,zoomy|
|00001c10| 28 61 31 29 0a 09 6d 6f | 76 65 2e 77 09 64 30 2c |(a1)..mo|ve.w.d0,|
|00001c20| 7a 6f 6f 6d 68 28 61 31 | 29 0a 0a 09 6d 6f 76 65 |zoomh(a1|)...move|
|00001c30| 2e 6c 09 66 61 72 72 69 | 67 68 74 28 70 63 29 2c |.l.farri|ght(pc),|
|00001c40| 64 30 09 09 3b 20 57 41 | 5f 49 6e 6e 65 72 57 69 |d0..; WA|_InnerWi|
|00001c50| 64 74 68 20 3d 20 66 61 | 72 72 69 67 68 74 2b 4c |dth = fa|rright+L|
|00001c60| 45 46 54 5f 4f 46 46 53 | 45 54 0a 09 61 64 64 71 |EFT_OFFS|ET..addq|
|00001c70| 2e 6c 09 23 4c 45 46 54 | 5f 4f 46 46 53 45 54 2c |.l.#LEFT|_OFFSET,|
|00001c80| 64 30 0a 09 6d 6f 76 65 | 2e 6c 09 64 30 2c 77 69 |d0..move|.l.d0,wi|
|00001c90| 6e 77 69 64 28 61 31 29 | 0a 0a 09 6d 6f 76 65 2e |nwid(a1)|...move.|
|00001ca0| 6c 09 66 61 72 62 6f 74 | 74 6f 6d 28 70 63 29 2c |l.farbot|tom(pc),|
|00001cb0| 64 30 09 3b 20 57 41 5f | 49 6e 6e 65 72 48 65 69 |d0.; WA_|InnerHei|
|00001cc0| 67 68 74 20 3d 20 66 61 | 72 62 6f 74 74 6f 6d 2b |ght = fa|rbottom+|
|00001cd0| 54 4f 50 5f 4f 46 46 53 | 45 54 0a 09 61 64 64 71 |TOP_OFFS|ET..addq|
|00001ce0| 2e 6c 09 23 54 4f 50 5f | 4f 46 46 53 45 54 2c 64 |.l.#TOP_|OFFSET,d|
|00001cf0| 30 0a 09 6d 6f 76 65 2e | 6c 09 64 30 2c 77 69 6e |0..move.|l.d0,win|
|00001d00| 68 65 69 28 61 31 29 0a | 0a 09 73 75 62 61 2e 6c |hei(a1).|..suba.l|
|00001d10| 09 61 30 2c 61 30 09 09 | 09 3b 20 4f 70 65 6e 20 |.a0,a0..|.; Open |
|00001d20| 74 68 65 20 77 69 6e 64 | 6f 77 0a 09 43 61 6c 6c |the wind|ow..Call|
|00001d30| 4c 69 62 09 4f 70 65 6e | 57 69 6e 64 6f 77 54 61 |Lib.Open|WindowTa|
|00001d40| 67 4c 69 73 74 2c 49 6e | 74 75 69 42 61 73 65 28 |gList,In|tuiBase(|
|00001d50| 70 63 29 0a 09 6d 6f 76 | 65 2e 6c 09 64 30 2c 6d |pc)..mov|e.l.d0,m|
|00001d60| 61 69 6e 5f 77 69 6e 28 | 61 35 29 0a 09 62 65 71 |ain_win(|a5)..beq|
|00001d70| 2e 62 09 2e 66 72 65 65 | 67 61 64 73 09 09 3b 20 |.b..free|gads..; |
|00001d80| 45 72 72 6f 72 20 6f 70 | 65 6e 69 6e 67 20 74 68 |Error op|ening th|
|00001d90| 65 20 77 69 6e 64 6f 77 | 0a 0a 09 6d 6f 76 65 2e |e window|...move.|
|00001da0| 6c 09 64 30 2c 61 30 09 | 09 09 3b 20 52 65 66 72 |l.d0,a0.|..; Refr|
|00001db0| 65 73 68 20 65 76 65 72 | 79 74 68 69 6e 67 20 69 |esh ever|ything i|
|00001dc0| 6e 20 74 68 65 20 77 69 | 6e 64 6f 77 0a 09 6d 6f |n the wi|ndow..mo|
|00001dd0| 76 65 2e 6c 09 70 72 69 | 76 5f 69 6e 66 6f 28 61 |ve.l.pri|v_info(a|
|00001de0| 35 29 2c 61 31 0a 09 43 | 61 6c 6c 4c 69 62 09 47 |5),a1..C|allLib.G|
|00001df0| 55 5f 52 65 66 72 65 73 | 68 57 69 6e 64 6f 77 2c |U_Refres|hWindow,|
|00001e00| 47 55 74 69 6c 42 61 73 | 65 28 70 63 29 0a 0a 09 |GUtilBas|e(pc)...|
|00001e10| 6c 65 61 2e 6c 09 4e 65 | 77 4d 65 6e 75 73 28 70 |lea.l.Ne|wMenus(p|
|00001e20| 63 29 2c 61 30 09 09 3b | 20 43 72 65 61 74 65 20 |c),a0..;| Create |
|00001e30| 6d 65 6e 75 20 73 74 72 | 75 63 74 75 72 65 0a 09 |menu str|ucture..|
|00001e40| 6d 6f 76 65 2e 6c 09 70 | 72 69 76 5f 69 6e 66 6f |move.l.p|riv_info|
|00001e50| 28 61 35 29 2c 61 31 0a | 09 73 75 62 61 2e 6c 09 |(a5),a1.|.suba.l.|
|00001e60| 61 32 2c 61 32 0a 09 6c | 65 61 2e 6c 09 6c 61 79 |a2,a2..l|ea.l.lay|
|00001e70| 6f 75 74 6d 65 6e 75 74 | 61 67 73 28 70 63 29 2c |outmenut|ags(pc),|
|00001e80| 61 33 0a 09 43 61 6c 6c | 4c 69 62 09 47 55 5f 43 |a3..Call|Lib.GU_C|
|00001e90| 72 65 61 74 65 4c 6f 63 | 4d 65 6e 75 41 0a 09 6d |reateLoc|MenuA..m|
|00001ea0| 6f 76 65 2e 6c 09 64 30 | 2c 6d 65 6e 75 73 74 72 |ove.l.d0|,menustr|
|00001eb0| 69 70 28 61 35 29 0a 09 | 62 65 71 2e 62 09 2e 63 |ip(a5)..|beq.b..c|
|00001ec0| 6c 6f 73 65 77 69 6e 09 | 09 3b 20 43 6f 75 6c 64 |losewin.|.; Could|
|00001ed0| 20 6e 6f 74 20 63 72 65 | 61 74 65 20 6d 65 6e 75 | not cre|ate menu|
|00001ee0| 73 0a 0a 09 6d 6f 76 65 | 2e 6c 09 64 30 2c 61 31 |s...move|.l.d0,a1|
|00001ef0| 09 09 09 3b 20 41 74 74 | 61 63 68 20 74 68 65 20 |...; Att|ach the |
|00001f00| 6d 65 6e 75 73 20 74 6f | 20 74 68 65 20 77 69 6e |menus to| the win|
|00001f10| 64 6f 77 0a 09 6d 6f 76 | 65 2e 6c 09 49 6e 74 75 |dow..mov|e.l.Intu|
|00001f20| 69 42 61 73 65 28 70 63 | 29 2c 61 36 0a 09 6d 6f |iBase(pc|),a6..mo|
|00001f30| 76 65 2e 6c 09 6d 61 69 | 6e 5f 77 69 6e 28 61 35 |ve.l.mai|n_win(a5|
|00001f40| 29 2c 61 30 0a 09 43 61 | 6c 6c 4c 69 62 09 53 65 |),a0..Ca|llLib.Se|
|00001f50| 74 4d 65 6e 75 53 74 72 | 69 70 0a 09 74 73 74 2e |tMenuStr|ip..tst.|
|00001f60| 6c 09 64 30 0a 09 62 65 | 71 2e 62 09 2e 66 72 65 |l.d0..be|q.b..fre|
|00001f70| 65 6d 65 6e 75 73 0a 0a | 09 6d 6f 76 65 2e 6c 09 |emenus..|.move.l.|
|00001f80| 6d 61 69 6e 5f 77 69 6e | 28 61 35 29 2c 61 30 09 |main_win|(a5),a0.|
|00001f90| 09 3b 20 57 61 69 74 20 | 66 6f 72 20 61 6e 64 20 |.; Wait |for and |
|00001fa0| 70 72 6f 63 65 73 73 20 | 61 6c 6c 20 65 76 65 6e |process |all even|
|00001fb0| 74 73 0a 09 62 73 72 2e | 62 09 70 72 6f 63 65 73 |ts..bsr.|b.proces|
|00001fc0| 73 5f 65 76 65 6e 74 73 | 09 0a 0a 2e 63 6c 65 61 |s_events|....clea|
|00001fd0| 72 6d 65 6e 75 73 3a 0a | 09 6d 6f 76 65 2e 6c 09 |rmenus:.|.move.l.|
|00001fe0| 49 6e 74 75 69 42 61 73 | 65 28 70 63 29 2c 61 36 |IntuiBas|e(pc),a6|
|00001ff0| 09 3b 20 52 65 6d 6f 76 | 65 20 6d 65 6e 75 73 20 |.; Remov|e menus |
|00002000| 66 72 6f 6d 20 77 69 6e | 64 6f 77 0a 09 43 61 6c |from win|dow..Cal|
|00002010| 6c 4c 69 62 09 43 6c 65 | 61 72 4d 65 6e 75 53 74 |lLib.Cle|arMenuSt|
|00002020| 72 69 70 0a 2e 66 72 65 | 65 6d 65 6e 75 73 3a 0a |rip..fre|emenus:.|
|00002030| 09 6d 6f 76 65 2e 6c 09 | 47 55 74 69 6c 42 61 73 |.move.l.|GUtilBas|
|00002040| 65 28 70 63 29 2c 61 36 | 09 3b 20 44 65 61 6c 6c |e(pc),a6|.; Deall|
|00002050| 6f 63 61 74 65 20 6d 65 | 6e 75 20 73 74 72 75 63 |ocate me|nu struc|
|00002060| 74 75 72 65 73 0a 09 6d | 6f 76 65 2e 6c 09 6d 65 |tures..m|ove.l.me|
|00002070| 6e 75 73 74 72 69 70 28 | 61 35 29 2c 61 30 0a 09 |nustrip(|a5),a0..|
|00002080| 43 61 6c 6c 4c 69 62 09 | 47 55 5f 46 72 65 65 4d |CallLib.|GU_FreeM|
|00002090| 65 6e 75 73 0a 2e 63 6c | 6f 73 65 77 69 6e 3a 0a |enus..cl|osewin:.|
|000020a0| 09 6d 6f 76 65 2e 6c 09 | 6d 61 69 6e 5f 77 69 6e |.move.l.|main_win|
|000020b0| 28 61 35 29 2c 61 30 09 | 09 3b 20 43 6c 6f 73 65 |(a5),a0.|.; Close|
|000020c0| 20 74 68 65 20 6d 61 69 | 6e 20 77 69 6e 64 6f 77 | the mai|n window|
|000020d0| 09 0a 09 43 61 6c 6c 4c | 69 62 09 43 6c 6f 73 65 |...CallL|ib.Close|
|000020e0| 57 69 6e 64 6f 77 2c 49 | 6e 74 75 69 42 61 73 65 |Window,I|ntuiBase|
|000020f0| 28 70 63 29 0a 2e 66 72 | 65 65 67 61 64 73 3a 0a |(pc)..fr|eegads:.|
|00002100| 09 6d 6f 76 65 2e 6c 09 | 70 72 69 76 5f 69 6e 66 |.move.l.|priv_inf|
|00002110| 6f 28 61 35 29 2c 61 30 | 09 3b 20 46 72 65 65 20 |o(a5),a0|.; Free |
|00002120| 61 6c 6c 20 67 61 64 67 | 65 74 73 0a 09 6d 6f 76 |all gadg|ets..mov|
|00002130| 65 2e 6c 09 47 55 74 69 | 6c 42 61 73 65 28 70 63 |e.l.GUti|lBase(pc|
|00002140| 29 2c 61 36 0a 09 43 61 | 6c 6c 4c 69 62 09 47 55 |),a6..Ca|llLib.GU|
|00002150| 5f 46 72 65 65 4c 61 79 | 6f 75 74 47 61 64 67 65 |_FreeLay|outGadge|
|00002160| 74 73 0a 2e 75 6e 6c 6f | 63 6b 73 63 72 65 65 6e |ts..unlo|ckscreen|
|00002170| 3a 0a 09 73 75 62 61 2e | 6c 09 61 30 2c 61 30 09 |:..suba.|l.a0,a0.|
|00002180| 09 09 3b 20 4e 6f 20 6e | 61 6d 65 20 70 6f 69 6e |..; No n|ame poin|
|00002190| 74 65 72 0a 09 6d 6f 76 | 65 2e 6c 09 73 63 72 65 |ter..mov|e.l.scre|
|000021a0| 65 6e 28 61 35 29 2c 61 | 31 09 09 3b 20 50 6f 69 |en(a5),a|1..; Poi|
|000021b0| 6e 74 65 72 20 74 6f 20 | 6c 6f 63 6b 65 64 20 73 |nter to |locked s|
|000021c0| 63 72 65 65 6e 0a 09 43 | 61 6c 6c 4c 69 62 09 55 |creen..C|allLib.U|
|000021d0| 6e 6c 6f 63 6b 50 75 62 | 53 63 72 65 65 6e 2c 49 |nlockPub|Screen,I|
|000021e0| 6e 74 75 69 42 61 73 65 | 28 70 63 29 0a 2e 6e 6f |ntuiBase|(pc)..no|
|000021f0| 73 63 72 65 65 6e 3a 0a | 09 6d 6f 76 65 2e 6c 09 |screen:.|.move.l.|
|00002200| 63 61 74 61 6c 6f 67 28 | 70 63 29 2c 61 30 0a 09 |catalog(|pc),a0..|
|00002210| 43 61 6c 6c 4c 69 62 09 | 47 55 5f 43 6c 6f 73 65 |CallLib.|GU_Close|
|00002220| 43 61 74 61 6c 6f 67 2c | 47 55 74 69 6c 42 61 73 |Catalog,|GUtilBas|
|00002230| 65 28 70 63 29 0a 09 6d | 6f 76 65 6d 2e 6c 09 28 |e(pc)..m|ovem.l.(|
|00002240| 73 70 29 2b 2c 64 30 2d | 61 36 0a 09 72 74 73 0a |sp)+,d0-|a6..rts.|
|00002250| 0a 3b 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.;------|--------|
|00002260| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 20 50 72 6f 63 65 73 |--------|- Proces|
|00002270| 73 20 61 6c 6c 20 77 69 | 6e 64 6f 77 20 65 76 65 |s all wi|ndow eve|
|00002280| 6e 74 73 20 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |nts ----|--------|
|00002290| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0a |--------|-------.|
|000022a0| 57 49 4e 44 4f 57 3a 09 | 73 65 74 09 33 32 09 09 |WINDOW:.|set.32..|
|000022b0| 09 3b 20 53 74 61 63 6b | 20 6f 66 66 73 65 74 20 |.; Stack| offset |
|000022c0| 66 6f 72 20 77 69 6e 64 | 6f 77 20 61 64 64 72 65 |for wind|ow addre|
|000022d0| 73 73 0a 0a 70 72 6f 63 | 65 73 73 5f 65 76 65 6e |ss..proc|ess_even|
|000022e0| 74 73 3a 0a 09 6d 6f 76 | 65 6d 2e 6c 09 64 30 2d |ts:..mov|em.l.d0-|
|000022f0| 61 36 2c 2d 28 73 70 29 | 0a 2e 57 61 69 74 45 76 |a6,-(sp)|..WaitEv|
|00002300| 65 6e 74 3a 0a 09 6d 6f | 76 65 2e 6c 09 5f 41 62 |ent:..mo|ve.l._Ab|
|00002310| 73 45 78 65 63 42 61 73 | 65 2e 77 2c 61 36 0a 09 |sExecBas|e.w,a6..|
|00002320| 6d 6f 76 65 2e 6c 09 57 | 49 4e 44 4f 57 28 73 70 |move.l.W|INDOW(sp|
|00002330| 29 2c 61 30 09 09 3b 20 | 47 65 74 20 70 6f 69 6e |),a0..; |Get poin|
|00002340| 74 65 72 20 74 6f 20 77 | 69 6e 64 6f 77 0a 09 6d |ter to w|indow..m|
|00002350| 6f 76 65 2e 6c 09 77 64 | 5f 55 73 65 72 50 6f 72 |ove.l.wd|_UserPor|
|00002360| 74 28 61 30 29 2c 61 30 | 09 3b 20 47 65 74 20 55 |t(a0),a0|.; Get U|
|00002370| 73 65 72 50 6f 72 74 0a | 09 43 61 6c 6c 4c 69 62 |serPort.|.CallLib|
|00002380| 09 57 61 69 74 50 6f 72 | 74 09 09 3b 20 57 61 69 |.WaitPor|t..; Wai|
|00002390| 74 20 66 6f 72 20 61 20 | 6d 65 73 73 61 67 65 0a |t for a |message.|
|000023a0| 2e 47 65 74 45 76 65 6e | 74 3a 0a 09 6d 6f 76 65 |.GetEven|t:..move|
|000023b0| 2e 6c 09 57 49 4e 44 4f | 57 28 73 70 29 2c 61 30 |.l.WINDO|W(sp),a0|
|000023c0| 09 09 3b 20 47 65 74 20 | 77 69 6e 64 6f 77 20 70 |..; Get |window p|
|000023d0| 6f 69 6e 74 65 72 0a 09 | 62 73 72 2e 77 09 47 65 |ointer..|bsr.w.Ge|
|000023e0| 74 49 4d 65 73 73 61 67 | 65 09 09 3b 20 47 65 74 |tIMessag|e..; Get|
|000023f0| 20 74 68 65 20 6d 65 73 | 73 61 67 65 20 61 6e 64 | the mes|sage and|
|00002400| 20 70 72 6f 63 65 73 73 | 20 52 45 46 52 45 53 48 | process| REFRESH|
|00002410| 0a 09 62 6d 69 2e 73 09 | 2e 47 65 74 45 76 65 6e |..bmi.s.|.GetEven|
|00002420| 74 09 09 3b 20 47 65 74 | 20 6e 65 78 74 20 65 76 |t..; Get| next ev|
|00002430| 65 6e 74 20 69 66 20 49 | 44 43 4d 50 5f 52 45 46 |ent if I|DCMP_REF|
|00002440| 52 45 53 48 57 49 4e 0a | 09 62 65 71 2e 73 09 2e |RESHWIN.|.beq.s..|
|00002450| 57 61 69 74 45 76 65 6e | 74 09 09 3b 20 43 6f 6e |WaitEven|t..; Con|
|00002460| 74 69 6e 75 65 20 77 61 | 69 74 69 6e 67 20 69 66 |tinue wa|iting if|
|00002470| 20 6e 6f 20 6d 65 73 73 | 61 67 65 0a 0a 2e 63 68 | no mess|age...ch|
|00002480| 65 63 6b 6d 65 6e 75 73 | 3a 0a 09 63 6d 70 2e 6c |eckmenus|:..cmp.l|
|00002490| 09 23 49 44 43 4d 50 5f | 4d 45 4e 55 50 49 43 4b |.#IDCMP_|MENUPICK|
|000024a0| 2c 64 33 09 3b 20 41 6e | 79 20 6d 65 6e 75 20 70 |,d3.; An|y menu p|
|000024b0| 69 63 6b 65 64 20 3f 0a | 09 62 6e 65 2e 62 09 2e |icked ?.|.bne.b..|
|000024c0| 63 68 65 63 6b 67 61 64 | 75 70 0a 2e 63 68 65 63 |checkgad|up..chec|
|000024d0| 6b 69 74 65 6d 3a 0a 09 | 6d 6f 76 65 2e 77 09 64 |kitem:..|move.w.d|
|000024e0| 32 2c 64 30 09 09 09 3b | 20 50 61 63 6b 65 64 20 |2,d0...;| Packed |
|000024f0| 6d 65 6e 75 20 6e 75 6d | 62 65 72 20 74 6f 20 44 |menu num|ber to D|
|00002500| 30 0a 09 6d 6f 76 65 2e | 6c 09 6d 65 6e 75 73 74 |0..move.|l.menust|
|00002510| 72 69 70 28 61 35 29 2c | 61 30 09 3b 20 4d 65 6e |rip(a5),|a0.; Men|
|00002520| 75 73 74 72 69 70 20 61 | 64 64 72 65 73 73 0a 09 |ustrip a|ddress..|
|00002530| 6d 6f 76 65 2e 6c 09 49 | 6e 74 75 69 42 61 73 65 |move.l.I|ntuiBase|
|00002540| 28 70 63 29 2c 61 36 0a | 09 43 61 6c 6c 4c 69 62 |(pc),a6.|.CallLib|
|00002550| 09 49 74 65 6d 41 64 64 | 72 65 73 73 09 09 3b 20 |.ItemAdd|ress..; |
|00002560| 47 65 74 20 61 64 64 72 | 65 73 73 20 6f 66 20 74 |Get addr|ess of t|
|00002570| 68 69 73 20 6d 65 6e 75 | 20 69 74 65 6d 0a 09 74 |his menu| item..t|
|00002580| 73 74 2e 6c 09 64 30 0a | 09 62 65 71 2e 62 09 2e |st.l.d0.|.beq.b..|
|00002590| 47 65 74 45 76 65 6e 74 | 09 09 3b 20 4e 6f 20 69 |GetEvent|..; No i|
|000025a0| 74 65 6d 0a 09 6d 6f 76 | 65 2e 6c 09 64 30 2c 61 |tem..mov|e.l.d0,a|
|000025b0| 30 09 09 09 3b 20 47 65 | 74 20 75 73 65 72 64 61 |0...; Ge|t userda|
|000025c0| 74 61 20 66 72 6f 6d 20 | 69 74 65 6d 0a 09 6d 6f |ta from |item..mo|
|000025d0| 76 65 2e 6c 09 6d 69 5f | 53 49 5a 45 4f 46 28 61 |ve.l.mi_|SIZEOF(a|
|000025e0| 30 29 2c 64 30 09 3b 20 | 4d 65 6e 75 49 74 65 6d |0),d0.; |MenuItem|
|000025f0| 2d 3e 55 73 65 72 44 61 | 74 61 0a 09 6d 6f 76 65 |->UserDa|ta..move|
|00002600| 2e 77 09 6d 69 5f 4e 65 | 78 74 53 65 6c 65 63 74 |.w.mi_Ne|xtSelect|
|00002610| 28 61 30 29 2c 64 32 09 | 3b 20 47 65 74 20 6e 65 |(a0),d2.|; Get ne|
|00002620| 78 74 20 73 65 6c 65 63 | 74 65 64 20 6d 65 6e 75 |xt selec|ted menu|
|00002630| 20 69 74 65 6d 0a 0a 09 | 63 6d 70 2e 77 09 23 4d | item...|cmp.w.#M|
|00002640| 4e 49 5f 50 52 4a 5f 51 | 55 49 54 2c 64 30 09 3b |NI_PRJ_Q|UIT,d0.;|
|00002650| 20 43 68 65 63 6b 20 66 | 6f 72 20 51 75 69 74 20 | Check f|or Quit |
|00002660| 6d 65 6e 75 20 69 74 65 | 6d 0a 09 62 65 71 2e 77 |menu ite|m..beq.w|
|00002670| 09 2e 45 78 69 74 09 09 | 09 3b 20 45 78 69 74 20 |..Exit..|.; Exit |
|00002680| 69 6d 6d 65 64 69 61 74 | 65 6c 79 0a 0a 09 63 6d |immediat|ely...cm|
|00002690| 70 2e 77 09 23 4d 4e 49 | 5f 50 52 4a 5f 41 42 4f |p.w.#MNI|_PRJ_ABO|
|000026a0| 55 54 2c 64 30 09 3b 20 | 43 68 65 63 6b 20 66 6f |UT,d0.; |Check fo|
|000026b0| 72 20 41 62 6f 75 74 20 | 73 65 6c 65 63 74 69 6f |r About |selectio|
|000026c0| 6e 0a 09 62 6e 65 2e 62 | 09 2e 63 68 65 63 6b 6e |n..bne.b|..checkn|
|000026d0| 65 78 74 6d 6e 69 0a 09 | 62 73 72 2e 77 09 41 62 |extmni..|bsr.w.Ab|
|000026e0| 6f 75 74 09 09 09 3b 20 | 44 69 73 70 6c 61 79 20 |out...; |Display |
|000026f0| 74 68 65 20 69 6e 66 6f | 72 6d 61 74 69 6f 6e 20 |the info|rmation |
|00002700| 72 65 71 75 65 73 74 65 | 72 0a 09 62 72 61 2e 62 |requeste|r..bra.b|
|00002710| 09 2e 63 68 65 63 6b 69 | 74 65 6d 09 09 3b 20 43 |..checki|tem..; C|
|00002720| 68 65 63 6b 20 6e 65 78 | 74 20 69 74 65 6d 0a 2e |heck nex|t item..|
|00002730| 63 68 65 63 6b 6e 65 78 | 74 6d 6e 69 3a 0a 09 62 |checknex|tmni:..b|
|00002740| 72 61 2e 62 09 2e 63 68 | 65 63 6b 69 74 65 6d 09 |ra.b..ch|eckitem.|
|00002750| 09 3b 20 43 68 65 63 6b | 20 6e 65 78 74 20 69 74 |.; Check| next it|
|00002760| 65 6d 0a 0a 3b 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |em..;---|--------|
|00002770| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 20 43 68 |--------|----- Ch|
|00002780| 65 63 6b 20 66 6f 72 20 | 67 61 64 67 65 74 20 75 |eck for |gadget u|
|00002790| 70 20 65 76 65 6e 74 73 | 20 2d 2d 2d 2d 2d 2d 2d |p events| -------|
|000027a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000027b0| 2d 2d 0a 2e 63 68 65 63 | 6b 67 61 64 75 70 3a 0a |--..chec|kgadup:.|
|000027c0| 09 63 6d 70 2e 6c 09 23 | 49 44 43 4d 50 5f 47 41 |.cmp.l.#|IDCMP_GA|
|000027d0| 44 47 45 54 55 50 2c 64 | 33 09 3b 20 41 6e 79 20 |DGETUP,d|3.; Any |
|000027e0| 67 61 64 67 65 74 20 72 | 65 6c 65 61 73 65 64 20 |gadget r|eleased |
|000027f0| 3f 0a 09 62 6e 65 2e 77 | 09 2e 43 68 65 63 6b 47 |?..bne.w|..CheckG|
|00002800| 61 64 44 6e 09 09 3b 20 | 4e 6f 70 65 21 20 43 68 |adDn..; |Nope! Ch|
|00002810| 65 63 6b 20 66 6f 72 20 | 67 61 64 67 65 74 20 64 |eck for |gadget d|
|00002820| 6f 77 6e 0a 09 6d 6f 76 | 65 2e 77 09 67 67 5f 47 |own..mov|e.w.gg_G|
|00002830| 61 64 67 65 74 49 44 28 | 61 32 29 2c 64 31 09 3b |adgetID(|a2),d1.;|
|00002840| 20 47 65 74 20 47 61 64 | 67 65 74 49 44 0a 0a 09 | Get Gad|getID...|
|00002850| 6d 6f 76 65 2e 6c 09 44 | 6f 73 42 61 73 65 28 70 |move.l.D|osBase(p|
|00002860| 63 29 2c 61 36 0a 09 63 | 6d 70 2e 77 09 23 46 49 |c),a6..c|mp.w.#FI|
|00002870| 52 53 54 5f 47 41 44 2c | 64 31 09 09 3b 20 43 68 |RST_GAD,|d1..; Ch|
|00002880| 65 63 6b 20 66 6f 72 20 | 66 69 72 73 74 20 67 61 |eck for |first ga|
|00002890| 64 67 65 74 0a 09 62 6e | 65 2e 62 09 2e 63 68 65 |dget..bn|e.b..che|
|000028a0| 63 6b 73 65 63 6f 6e 64 | 0a 09 62 63 68 67 09 23 |cksecond|..bchg.#|
|000028b0| 31 2c 24 62 66 65 30 30 | 31 0a 09 6d 6f 76 65 71 |1,$bfe00|1..moveq|
|000028c0| 2e 6c 09 23 32 35 2c 64 | 31 0a 09 43 61 6c 6c 4c |.l.#25,d|1..CallL|
|000028d0| 69 62 09 44 65 6c 61 79 | 0a 09 62 63 68 67 09 23 |ib.Delay|..bchg.#|
|000028e0| 31 2c 24 62 66 65 30 30 | 31 0a 09 62 72 61 2e 62 |1,$bfe00|1..bra.b|
|000028f0| 09 2e 47 65 74 45 76 65 | 6e 74 0a 0a 2e 63 68 65 |..GetEve|nt...che|
|00002900| 63 6b 73 65 63 6f 6e 64 | 3a 0a 09 63 6d 70 2e 77 |cksecond|:..cmp.w|
|00002910| 09 23 53 45 43 4f 4e 44 | 5f 47 41 44 2c 64 31 09 |.#SECOND|_GAD,d1.|
|00002920| 09 3b 20 43 68 65 63 6b | 20 66 6f 72 20 73 65 63 |.; Check| for sec|
|00002930| 6f 6e 64 20 67 61 64 67 | 65 74 0a 09 62 6e 65 2e |ond gadg|et..bne.|
|00002940| 62 09 2e 63 68 65 63 6b | 74 68 69 72 64 0a 09 6d |b..check|third..m|
|00002950| 6f 76 65 71 2e 6c 09 23 | 32 2d 31 2c 64 32 0a 2e |oveq.l.#|2-1,d2..|
|00002960| 62 6c 69 6e 6b 32 3a 0a | 09 62 63 68 67 09 23 31 |blink2:.|.bchg.#1|
|00002970| 2c 24 62 66 65 30 30 31 | 0a 09 6d 6f 76 65 71 2e |,$bfe001|..moveq.|
|00002980| 6c 09 23 32 35 2c 64 31 | 0a 09 43 61 6c 6c 4c 69 |l.#25,d1|..CallLi|
|00002990| 62 09 44 65 6c 61 79 0a | 09 62 63 68 67 09 23 31 |b.Delay.|.bchg.#1|
|000029a0| 2c 24 62 66 65 30 30 31 | 0a 09 6d 6f 76 65 71 2e |,$bfe001|..moveq.|
|000029b0| 6c 09 23 32 35 2c 64 31 | 0a 09 43 61 6c 6c 4c 69 |l.#25,d1|..CallLi|
|000029c0| 62 09 44 65 6c 61 79 0a | 09 64 62 72 61 09 64 32 |b.Delay.|.dbra.d2|
|000029d0| 2c 2e 62 6c 69 6e 6b 32 | 0a 0a 09 62 72 61 2e 77 |,.blink2|...bra.w|
|000029e0| 09 2e 47 65 74 45 76 65 | 6e 74 0a 0a 2e 63 68 65 |..GetEve|nt...che|
|000029f0| 63 6b 74 68 69 72 64 3a | 0a 09 63 6d 70 2e 77 09 |ckthird:|..cmp.w.|
|00002a00| 23 54 48 49 52 44 5f 47 | 41 44 2c 64 31 09 09 3b |#THIRD_G|AD,d1..;|
|00002a10| 20 43 68 65 63 6b 20 66 | 6f 72 20 74 68 69 72 64 | Check f|or third|
|00002a20| 20 67 61 64 67 65 74 0a | 09 62 6e 65 2e 62 09 2e | gadget.|.bne.b..|
|00002a30| 63 68 65 63 6b 6e 65 78 | 74 67 61 64 0a 09 6d 6f |checknex|tgad..mo|
|00002a40| 76 65 71 2e 6c 09 23 33 | 2d 31 2c 64 32 0a 2e 62 |veq.l.#3|-1,d2..b|
|00002a50| 6c 69 6e 6b 33 3a 0a 09 | 62 63 68 67 09 23 31 2c |link3:..|bchg.#1,|
|00002a60| 24 62 66 65 30 30 31 0a | 09 6d 6f 76 65 71 2e 6c |$bfe001.|.moveq.l|
|00002a70| 09 23 32 35 2c 64 31 0a | 09 43 61 6c 6c 4c 69 62 |.#25,d1.|.CallLib|
|00002a80| 09 44 65 6c 61 79 0a 09 | 62 63 68 67 09 23 31 2c |.Delay..|bchg.#1,|
|00002a90| 24 62 66 65 30 30 31 0a | 09 6d 6f 76 65 71 2e 6c |$bfe001.|.moveq.l|
|00002aa0| 09 23 32 35 2c 64 31 0a | 09 43 61 6c 6c 4c 69 62 |.#25,d1.|.CallLib|
|00002ab0| 09 44 65 6c 61 79 0a 09 | 64 62 72 61 09 64 32 2c |.Delay..|dbra.d2,|
|00002ac0| 2e 62 6c 69 6e 6b 33 0a | 0a 09 62 72 61 2e 77 09 |.blink3.|..bra.w.|
|00002ad0| 2e 47 65 74 45 76 65 6e | 74 0a 0a 2e 63 68 65 63 |.GetEven|t...chec|
|00002ae0| 6b 6e 65 78 74 67 61 64 | 3a 0a 09 62 72 61 2e 77 |knextgad|:..bra.w|
|00002af0| 09 2e 47 65 74 45 76 65 | 6e 74 0a 0a 3b 2d 2d 2d |..GetEve|nt..;---|
|00002b00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002b10| 2d 2d 2d 20 43 68 65 63 | 6b 20 66 6f 72 20 67 61 |--- Chec|k for ga|
|00002b20| 64 67 65 74 20 64 6f 77 | 6e 20 65 76 65 6e 74 73 |dget dow|n events|
|00002b30| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | -------|--------|
|00002b40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0a 2e 43 68 65 63 |--------|--..Chec|
|00002b50| 6b 47 61 64 44 6e 3a 0a | 09 63 6d 70 2e 6c 09 23 |kGadDn:.|.cmp.l.#|
|00002b60| 49 44 43 4d 50 5f 47 41 | 44 47 45 54 44 4f 57 4e |IDCMP_GA|DGETDOWN|
|00002b70| 2c 64 33 09 3b 20 47 61 | 64 67 65 74 20 64 6f 77 |,d3.; Ga|dget dow|
|00002b80| 6e 20 6d 65 73 73 61 67 | 65 20 3f 0a 09 62 6e 65 |n messag|e ?..bne|
|00002b90| 2e 62 09 2e 43 68 65 63 | 6b 43 6c 6f 73 65 0a 09 |.b..Chec|kClose..|
|00002ba0| 6d 6f 76 65 2e 77 09 67 | 67 5f 47 61 64 67 65 74 |move.w.g|g_Gadget|
|00002bb0| 49 44 28 61 32 29 2c 64 | 31 09 3b 20 47 65 74 20 |ID(a2),d|1.; Get |
|00002bc0| 47 61 64 67 65 74 49 44 | 0a 0a 09 62 72 61 2e 77 |GadgetID|...bra.w|
|00002bd0| 09 2e 47 65 74 45 76 65 | 6e 74 0a 0a 3b 2d 2d 2d |..GetEve|nt..;---|
|00002be0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002bf0| 2d 2d 2d 2d 2d 20 43 68 | 65 63 6b 20 66 6f 72 20 |----- Ch|eck for |
|00002c00| 74 68 65 20 63 6c 6f 73 | 65 20 67 61 64 67 65 74 |the clos|e gadget|
|00002c10| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | -------|--------|
|00002c20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0a 2e 43 68 65 63 6b |--------|-..Check|
|00002c30| 43 6c 6f 73 65 3a 0a 09 | 63 6d 70 2e 6c 09 23 49 |Close:..|cmp.l.#I|
|00002c40| 44 43 4d 50 5f 43 4c 4f | 53 45 57 49 4e 44 4f 57 |DCMP_CLO|SEWINDOW|
|00002c50| 2c 64 33 09 3b 20 43 6c | 6f 73 65 20 67 61 64 67 |,d3.; Cl|ose gadg|
|00002c60| 65 74 20 70 72 65 73 73 | 65 64 20 3f 0a 09 62 6e |et press|ed ?..bn|
|00002c70| 65 2e 77 09 2e 47 65 74 | 45 76 65 6e 74 09 09 3b |e.w..Get|Event..;|
|00002c80| 20 4e 6f 70 65 21 20 47 | 65 74 20 6e 65 78 74 20 | Nope! G|et next |
|00002c90| 6d 65 73 73 61 67 65 0a | 2e 45 78 69 74 0a 09 6d |message.|.Exit..m|
|00002ca0| 6f 76 65 6d 2e 6c 09 28 | 73 70 29 2b 2c 64 30 2d |ovem.l.(|sp)+,d0-|
|00002cb0| 61 36 0a 09 72 74 73 0a | 09 0a 3b 2d 2d 2d 2d 2d |a6..rts.|..;-----|
|00002cc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002cd0| 2d 20 47 65 74 20 61 20 | 6d 65 73 73 61 67 65 20 |- Get a |message |
|00002ce0| 66 72 6f 6d 20 74 68 65 | 20 77 69 6e 64 6f 77 20 |from the| window |
|00002cf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002d00| 2d 2d 2d 2d 2d 2d 2d 2d | 0a 3b 20 49 6e 70 75 74 |--------|.; Input|
|00002d10| 3a 0a 3b 09 41 30 20 3d | 20 70 6f 69 6e 74 65 72 |:.;.A0 =| pointer|
|00002d20| 20 74 6f 20 77 69 6e 64 | 6f 77 0a 3b 20 4f 75 74 | to wind|ow.; Out|
|00002d30| 70 75 74 3a 0a 3b 09 41 | 32 20 3d 20 4d 65 73 73 |put:.;.A|2 = Mess|
|00002d40| 61 67 65 20 49 41 64 64 | 72 65 73 73 0a 3b 09 44 |age IAdd|ress.;.D|
|00002d50| 32 20 3d 20 4d 65 73 73 | 61 67 65 20 43 6f 64 65 |2 = Mess|age Code|
|00002d60| 0a 3b 09 44 33 20 3d 20 | 4d 65 73 73 61 67 65 20 |.;.D3 = |Message |
|00002d70| 43 6c 61 73 73 0a 3b 20 | 46 6c 61 67 73 3a 0a 3b |Class.; |Flags:.;|
|00002d80| 09 20 5a 20 3d 20 20 31 | 20 66 6f 72 20 6e 6f 20 |. Z = 1| for no |
|00002d90| 6d 65 73 73 61 67 65 20 | 28 75 73 65 20 42 45 51 |message |(use BEQ|
|00002da0| 29 0a 3b 09 20 5a 20 3d | 20 20 30 20 66 6f 72 20 |).;. Z =| 0 for |
|00002db0| 61 20 76 61 6c 69 64 20 | 6d 65 73 73 61 67 65 20 |a valid |message |
|00002dc0| 6f 74 68 65 72 20 74 68 | 61 6e 20 49 44 43 4d 50 |other th|an IDCMP|
|00002dd0| 5f 52 45 46 52 45 53 48 | 57 49 4e 44 4f 57 0a 3b |_REFRESH|WINDOW.;|
|00002de0| 09 20 4e 20 3d 20 20 31 | 20 66 6f 72 20 61 20 49 |. N = 1| for a I|
|00002df0| 44 43 4d 50 5f 52 45 46 | 52 45 53 48 57 49 4e 44 |DCMP_REF|RESHWIND|
|00002e00| 4f 57 20 6d 65 73 73 61 | 67 65 20 28 75 73 65 20 |OW messa|ge (use |
|00002e10| 42 4d 49 29 0a 3b 0a 3b | 2d 2d 2d 2d 2d 2d 2d 2d |BMI).;.;|--------|
|00002e20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002e30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002e40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002e50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002e60| 2d 2d 2d 2d 2d 2d 0a 47 | 65 74 49 4d 65 73 73 61 |------.G|etIMessa|
|00002e70| 67 65 3a 0a 09 6d 6f 76 | 65 2e 6c 09 61 30 2c 2d |ge:..mov|e.l.a0,-|
|00002e80| 28 73 70 29 09 09 3b 20 | 53 61 76 65 20 77 69 6e |(sp)..; |Save win|
|00002e90| 64 6f 77 20 70 6f 69 6e | 74 65 72 0a 09 6d 6f 76 |dow poin|ter..mov|
|00002ea0| 65 2e 6c 09 77 64 5f 55 | 73 65 72 50 6f 72 74 28 |e.l.wd_U|serPort(|
|00002eb0| 61 30 29 2c 61 30 09 3b | 20 47 65 74 20 55 73 65 |a0),a0.;| Get Use|
|00002ec0| 72 50 6f 72 74 0a 0a 09 | 43 61 6c 6c 4c 69 62 09 |rPort...|CallLib.|
|00002ed0| 47 55 5f 47 65 74 49 4d | 73 67 2c 47 55 74 69 6c |GU_GetIM|sg,GUtil|
|00002ee0| 42 61 73 65 28 70 63 29 | 0a 09 62 65 71 2e 73 09 |Base(pc)|..beq.s.|
|00002ef0| 2e 4e 6f 4d 65 73 73 61 | 67 65 09 09 3b 20 4e 6f |.NoMessa|ge..; No|
|00002f00| 20 6d 65 73 73 61 67 65 | 20 2d 20 72 65 74 75 72 | message| - retur|
|00002f10| 6e 0a 09 6d 6f 76 65 2e | 6c 09 64 30 2c 61 31 0a |n..move.|l.d0,a1.|
|00002f20| 09 6d 6f 76 65 2e 6c 09 | 69 6d 5f 49 41 64 64 72 |.move.l.|im_IAddr|
|00002f30| 65 73 73 28 61 31 29 2c | 61 32 09 3b 20 49 41 64 |ess(a1),|a2.; IAd|
|00002f40| 64 72 65 73 73 20 74 6f | 20 41 32 0a 09 6d 6f 76 |dress to| A2..mov|
|00002f50| 65 71 2e 6c 09 23 30 2c | 64 32 09 09 09 3b 20 43 |eq.l.#0,|d2...; C|
|00002f60| 6c 65 61 72 20 63 6f 64 | 65 20 6c 6f 6e 67 77 6f |lear cod|e longwo|
|00002f70| 72 64 0a 09 6d 6f 76 65 | 2e 77 09 69 6d 5f 43 6f |rd..move|.w.im_Co|
|00002f80| 64 65 28 61 31 29 2c 64 | 32 09 09 3b 20 43 6f 64 |de(a1),d|2..; Cod|
|00002f90| 65 20 74 6f 20 44 32 0a | 09 6d 6f 76 65 2e 6c 09 |e to D2.|.move.l.|
|00002fa0| 69 6d 5f 43 6c 61 73 73 | 28 61 31 29 2c 64 33 09 |im_Class|(a1),d3.|
|00002fb0| 09 3b 20 43 6c 61 73 73 | 20 74 6f 20 44 33 0a 09 |.; Class| to D3..|
|00002fc0| 43 61 6c 6c 4c 69 62 09 | 47 55 5f 52 65 70 6c 79 |CallLib.|GU_Reply|
|00002fd0| 49 4d 73 67 09 09 3b 20 | 52 65 70 6c 79 20 74 68 |IMsg..; |Reply th|
|00002fe0| 65 20 6d 65 73 73 61 67 | 65 0a 0a 09 63 6d 70 2e |e messag|e...cmp.|
|00002ff0| 6c 09 23 49 44 43 4d 50 | 5f 52 45 46 52 45 53 48 |l.#IDCMP|_REFRESH|
|00003000| 57 49 4e 44 4f 57 2c 64 | 33 09 3b 20 44 6f 20 77 |WINDOW,d|3.; Do w|
|00003010| 69 6e 64 6f 77 20 6e 65 | 65 64 20 74 6f 20 62 65 |indow ne|ed to be|
|00003020| 20 72 65 66 72 65 73 68 | 65 64 20 3f 0a 09 62 6e | refresh|ed ?..bn|
|00003030| 65 2e 62 09 2e 4e 6f 4d | 65 73 73 61 67 65 09 09 |e.b..NoM|essage..|
|00003040| 3b 20 4e 6f 70 65 21 20 | 43 68 65 63 6b 20 6e 65 |; Nope! |Check ne|
|00003050| 78 74 20 6d 65 73 73 61 | 67 65 21 0a 09 6d 6f 76 |xt messa|ge!..mov|
|00003060| 65 2e 6c 09 28 73 70 29 | 2c 61 30 0a 09 43 61 6c |e.l.(sp)|,a0..Cal|
|00003070| 6c 4c 69 62 09 47 55 5f | 42 65 67 69 6e 52 65 66 |lLib.GU_|BeginRef|
|00003080| 72 65 73 68 09 09 3b 20 | 53 74 61 72 74 20 72 65 |resh..; |Start re|
|00003090| 66 72 65 73 68 69 6e 67 | 20 77 69 6e 64 6f 77 0a |freshing| window.|
|000030a0| 09 6d 6f 76 65 2e 6c 09 | 28 73 70 29 2c 61 30 0a |.move.l.|(sp),a0.|
|000030b0| 09 6d 6f 76 65 2e 6c 09 | 70 72 69 76 5f 69 6e 66 |.move.l.|priv_inf|
|000030c0| 6f 28 61 35 29 2c 61 31 | 0a 09 43 61 6c 6c 4c 69 |o(a5),a1|..CallLi|
|000030d0| 62 09 47 55 5f 52 65 66 | 72 65 73 68 42 6f 78 65 |b.GU_Ref|reshBoxe|
|000030e0| 73 0a 09 6d 6f 76 65 71 | 2e 6c 09 23 54 52 55 45 |s..moveq|.l.#TRUE|
|000030f0| 2c 64 30 0a 09 43 61 6c | 6c 4c 69 62 09 47 55 5f |,d0..Cal|lLib.GU_|
|00003100| 45 6e 64 52 65 66 72 65 | 73 68 09 09 3b 20 52 65 |EndRefre|sh..; Re|
|00003110| 66 72 65 73 68 69 6e 67 | 20 64 6f 6e 65 0a 09 6d |freshing| done..m|
|00003120| 6f 76 65 71 2e 6c 09 23 | 2d 31 2c 64 30 09 09 09 |oveq.l.#|-1,d0...|
|00003130| 3b 20 53 65 74 20 4e 20 | 66 6c 61 67 0a 2e 4e 6f |; Set N |flag..No|
|00003140| 4d 65 73 73 61 67 65 3a | 0a 09 6d 6f 76 65 2e 6c |Message:|..move.l|
|00003150| 09 28 73 70 29 2b 2c 61 | 30 0a 09 72 74 73 0a 0a |.(sp)+,a|0..rts..|
|00003160| 3b 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |;-------|--------|
|00003170| 2d 2d 2d 2d 2d 2d 2d 2d | 20 47 65 74 20 61 20 73 |--------| Get a s|
|00003180| 74 72 69 6e 67 20 66 72 | 6f 6d 20 74 68 65 20 63 |tring fr|om the c|
|00003190| 61 74 61 6c 6f 67 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |atalog -|--------|
|000031a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0a 3b |--------|------.;|
|000031b0| 20 49 6e 70 75 74 73 3a | 0a 3b 09 44 30 20 2d 20 | Inputs:|.;.D0 - |
|000031c0| 49 44 20 6f 66 20 73 74 | 72 69 6e 67 20 74 6f 20 |ID of st|ring to |
|000031d0| 67 65 74 0a 3b 20 52 65 | 73 75 6c 74 3a 0a 3b 09 |get.; Re|sult:.;.|
|000031e0| 44 30 20 2d 20 4c 6f 63 | 61 6c 69 7a 65 64 20 6f |D0 - Loc|alized o|
|000031f0| 72 20 64 65 66 61 75 6c | 74 20 73 74 72 69 6e 67 |r defaul|t string|
|00003200| 0a 3b 0a 47 65 74 4c 6f | 63 53 74 72 3a 0a 09 6d |.;.GetLo|cStr:..m|
|00003210| 6f 76 65 6d 2e 6c 09 64 | 31 2f 61 30 2d 61 31 2c |ovem.l.d|1/a0-a1,|
|00003220| 2d 28 73 70 29 0a 09 6c | 65 61 2e 6c 09 41 70 70 |-(sp)..l|ea.l.App|
|00003230| 53 74 72 69 6e 67 73 28 | 70 63 29 2c 61 31 09 3b |Strings(|pc),a1.;|
|00003240| 20 47 65 74 20 64 65 66 | 61 75 6c 74 20 73 74 72 | Get def|ault str|
|00003250| 69 6e 67 73 0a 09 6d 6f | 76 65 2e 6c 09 63 61 74 |ings..mo|ve.l.cat|
|00003260| 61 6c 6f 67 28 70 63 29 | 2c 61 30 09 09 3b 20 47 |alog(pc)|,a0..; G|
|00003270| 65 74 20 63 61 74 61 6c | 6f 67 20 70 6f 69 6e 74 |et catal|og point|
|00003280| 65 72 0a 09 6d 6f 76 65 | 2e 6c 09 47 55 74 69 6c |er..move|.l.GUtil|
|00003290| 42 61 73 65 28 70 63 29 | 2c 61 36 0a 09 43 61 6c |Base(pc)|,a6..Cal|
|000032a0| 6c 4c 69 62 09 47 55 5f | 47 65 74 4c 6f 63 61 6c |lLib.GU_|GetLocal|
|000032b0| 65 53 74 72 09 09 3b 20 | 47 65 74 20 74 68 65 20 |eStr..; |Get the |
|000032c0| 6c 6f 63 61 6c 69 7a 65 | 64 20 73 74 72 69 6e 67 |localize|d string|
|000032d0| 0a 09 6d 6f 76 65 6d 2e | 6c 09 28 73 70 29 2b 2c |..movem.|l.(sp)+,|
|000032e0| 64 31 2f 61 30 2d 61 31 | 0a 09 72 74 73 0a 0a 3b |d1/a0-a1|..rts..;|
|000032f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003300| 2d 2d 2d 2d 2d 2d 2d 20 | 53 68 6f 77 20 73 6f 6d |------- |Show som|
|00003310| 65 20 69 6e 66 6f 20 61 | 62 6f 75 74 20 74 68 65 |e info a|bout the|
|00003320| 20 70 72 6f 67 72 61 6d | 20 2d 2d 2d 2d 2d 2d 2d | program| -------|
|00003330| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0a 41 |--------|------.A|
|00003340| 62 6f 75 74 3a 0a 09 6c | 65 61 2e 6c 09 46 6d 74 |bout:..l|ea.l.Fmt|
|00003350| 50 61 72 61 6d 73 28 61 | 35 29 2c 61 30 09 3b 20 |Params(a|5),a0.; |
|00003360| 47 65 74 20 70 61 72 61 | 6d 65 74 65 72 20 62 6c |Get para|meter bl|
|00003370| 6f 63 6b 0a 09 6c 65 61 | 2e 6c 09 76 65 72 73 69 |ock..lea|.l.versi|
|00003380| 6f 6e 28 70 63 29 2c 61 | 31 09 09 3b 20 49 6e 73 |on(pc),a|1..; Ins|
|00003390| 65 72 74 20 76 65 72 73 | 69 6f 6e 20 73 74 72 69 |ert vers|ion stri|
|000033a0| 6e 67 20 70 6f 69 6e 74 | 65 72 0a 09 6d 6f 76 65 |ng point|er..move|
|000033b0| 2e 6c 09 61 31 2c 28 61 | 30 29 2b 0a 09 6c 65 61 |.l.a1,(a|0)+..lea|
|000033c0| 2e 6c 09 64 61 74 65 28 | 70 63 29 2c 61 31 09 09 |.l.date(|pc),a1..|
|000033d0| 3b 20 49 6e 73 65 72 74 | 20 64 61 74 65 20 73 74 |; Insert| date st|
|000033e0| 72 69 6e 67 20 70 6f 69 | 6e 74 65 72 0a 09 6d 6f |ring poi|nter..mo|
|000033f0| 76 65 2e 6c 09 61 31 2c | 28 61 30 29 2b 0a 09 6c |ve.l.a1,|(a0)+..l|
|00003400| 65 61 2e 6c 09 61 75 74 | 68 6f 72 28 70 63 29 2c |ea.l.aut|hor(pc),|
|00003410| 61 31 09 09 3b 20 49 6e | 73 65 72 74 20 61 75 74 |a1..; In|sert aut|
|00003420| 68 6f 72 20 73 74 72 69 | 6e 67 20 70 6f 69 6e 74 |hor stri|ng point|
|00003430| 65 72 0a 09 6d 6f 76 65 | 2e 6c 09 61 31 2c 28 61 |er..move|.l.a1,(a|
|00003440| 30 29 2b 0a 0a 09 6d 6f | 76 65 71 2e 6c 09 23 41 |0)+...mo|veq.l.#A|
|00003450| 42 4f 55 54 5f 54 45 58 | 54 2c 64 30 09 09 3b 20 |BOUT_TEX|T,d0..; |
|00003460| 47 65 74 20 6c 6f 63 61 | 6c 69 7a 65 64 20 61 62 |Get loca|lized ab|
|00003470| 6f 75 74 20 74 65 78 74 | 0a 09 62 73 72 2e 77 09 |out text|..bsr.w.|
|00003480| 47 65 74 4c 6f 63 53 74 | 72 0a 09 6d 6f 76 65 2e |GetLocSt|r..move.|
|00003490| 6c 09 64 30 2c 61 30 0a | 09 6d 6f 76 65 71 2e 6c |l.d0,a0.|.moveq.l|
|000034a0| 09 23 41 42 4f 55 54 5f | 54 49 54 2c 64 30 09 09 |.#ABOUT_|TIT,d0..|
|000034b0| 3b 20 47 65 74 20 6c 6f | 63 61 6c 69 7a 65 64 20 |; Get lo|calized |
|000034c0| 74 69 74 6c 65 20 74 65 | 78 74 0a 09 62 73 72 2e |title te|xt..bsr.|
|000034d0| 77 09 47 65 74 4c 6f 63 | 53 74 72 0a 09 6d 6f 76 |w.GetLoc|Str..mov|
|000034e0| 65 2e 6c 09 64 30 2c 61 | 31 0a 09 6d 6f 76 65 71 |e.l.d0,a|1..moveq|
|000034f0| 2e 6c 09 23 41 42 4f 55 | 54 5f 4f 4b 2c 64 30 09 |.l.#ABOU|T_OK,d0.|
|00003500| 09 3b 20 47 65 74 20 6c | 6f 63 61 6c 69 7a 65 64 |.; Get l|ocalized|
|00003510| 20 67 61 64 67 65 74 20 | 74 65 78 74 0a 09 62 73 | gadget |text..bs|
|00003520| 72 2e 77 09 47 65 74 4c | 6f 63 53 74 72 0a 09 62 |r.w.GetL|ocStr..b|
|00003530| 73 72 2e 62 09 44 6f 52 | 65 71 75 65 73 74 65 72 |sr.b.DoR|equester|
|00003540| 0a 09 72 74 73 0a 0a 3b | 2d 2d 2d 2d 2d 2d 2d 2d |..rts..;|--------|
|00003550| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003560| 2d 20 44 69 73 70 6c 61 | 79 20 61 20 72 65 71 75 |- Displa|y a requ|
|00003570| 65 73 74 65 72 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ester --|--------|
|00003580| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003590| 2d 2d 2d 2d 2d 2d 0a 3b | 20 50 75 72 70 6f 73 65 |------.;| Purpose|
|000035a0| 3a 0a 3b 09 44 69 73 70 | 6c 61 79 20 61 20 72 65 |:.;.Disp|lay a re|
|000035b0| 71 75 65 73 74 65 72 20 | 6f 6e 20 74 68 65 20 73 |quester |on the s|
|000035c0| 61 6d 65 20 73 63 72 65 | 65 6e 20 61 73 20 74 68 |ame scre|en as th|
|000035d0| 65 20 70 72 6f 67 72 61 | 6d 20 6d 61 69 6e 20 77 |e progra|m main w|
|000035e0| 69 6e 64 6f 77 2e 0a 3b | 09 42 6c 6f 63 6b 20 61 |indow..;|.Block a|
|000035f0| 6c 6c 20 69 6e 70 75 74 | 20 74 6f 20 74 68 65 20 |ll input| to the |
|00003600| 6d 61 69 6e 20 77 69 6e | 64 6f 77 20 77 68 69 6c |main win|dow whil|
|00003610| 65 20 74 68 65 20 72 65 | 71 75 65 73 74 65 72 20 |e the re|quester |
|00003620| 69 73 20 75 70 2e 0a 3b | 20 49 6e 70 75 74 73 3a |is up..;| Inputs:|
|00003630| 0a 3b 09 44 30 20 2d 20 | 47 61 64 67 65 74 20 66 |.;.D0 - |Gadget f|
|00003640| 6f 72 6d 61 74 20 73 74 | 72 69 6e 67 0a 3b 09 41 |ormat st|ring.;.A|
|00003650| 30 20 2d 20 50 6f 69 6e | 74 65 72 20 74 6f 20 72 |0 - Poin|ter to r|
|00003660| 65 71 75 65 73 74 65 72 | 20 62 6f 64 79 20 74 65 |equester| body te|
|00003670| 78 74 0a 3b 09 41 31 20 | 2d 20 50 6f 69 6e 74 65 |xt.;.A1 |- Pointe|
|00003680| 72 20 74 6f 20 72 65 71 | 75 65 73 74 65 72 20 74 |r to req|uester t|
|00003690| 69 74 6c 65 20 74 65 78 | 74 0a 3b 2d 2d 2d 2d 2d |itle tex|t.;-----|
|000036a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000036b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000036c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000036d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000036e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0a 44 6f 52 65 71 75 |--------|-.DoRequ|
|000036f0| 65 73 74 65 72 3a 0a 09 | 6d 6f 76 65 6d 2e 6c 09 |ester:..|movem.l.|
|00003700| 64 30 2d 64 31 2f 61 30 | 2d 61 33 2f 61 36 2c 2d |d0-d1/a0|-a3/a6,-|
|00003710| 28 73 70 29 0a 09 6d 6f | 76 65 2e 6c 09 61 31 2c |(sp)..mo|ve.l.a1,|
|00003720| 61 32 09 09 09 3b 20 53 | 61 76 65 20 52 65 71 75 |a2...; S|ave Requ|
|00003730| 65 73 74 65 72 20 74 69 | 74 6c 65 20 70 6f 69 6e |ester ti|tle poin|
|00003740| 74 65 72 0a 09 6c 65 61 | 2e 6c 09 2e 6d 79 65 61 |ter..lea|.l..myea|
|00003750| 73 79 73 74 72 75 63 74 | 28 70 63 29 2c 61 31 09 |systruct|(pc),a1.|
|00003760| 3b 20 50 6f 69 6e 74 65 | 72 20 74 6f 20 45 61 73 |; Pointe|r to Eas|
|00003770| 79 53 74 72 75 63 74 0a | 09 6d 6f 76 65 2e 6c 09 |yStruct.|.move.l.|
|00003780| 64 30 2c 2e 67 61 64 67 | 66 6f 72 6d 28 61 31 29 |d0,.gadg|form(a1)|
|00003790| 09 3b 20 49 6e 73 65 72 | 74 20 67 61 64 67 65 74 |.; Inser|t gadget|
|000037a0| 20 66 6f 72 6d 61 74 20 | 73 74 72 69 6e 67 0a 09 | format |string..|
|000037b0| 6d 6f 76 65 2e 6c 09 61 | 30 2c 65 73 5f 54 65 78 |move.l.a|0,es_Tex|
|000037c0| 74 46 6f 72 6d 61 74 28 | 61 31 29 09 3b 20 53 65 |tFormat(|a1).; Se|
|000037d0| 74 20 70 6f 69 6e 74 65 | 72 20 74 6f 20 62 6f 64 |t pointe|r to bod|
|000037e0| 79 20 74 65 78 74 0a 09 | 6d 6f 76 65 2e 6c 09 61 |y text..|move.l.a|
|000037f0| 32 2c 65 73 5f 54 69 74 | 6c 65 28 61 31 29 09 09 |2,es_Tit|le(a1)..|
|00003800| 3b 20 53 65 74 20 70 6f | 69 6e 74 65 72 20 74 6f |; Set po|inter to|
|00003810| 20 74 69 74 6c 65 20 74 | 65 78 74 0a 09 09 0a 09 | title t|ext.....|
|00003820| 6d 6f 76 65 2e 6c 09 6d | 61 69 6e 5f 77 69 6e 28 |move.l.m|ain_win(|
|00003830| 61 35 29 2c 61 30 09 09 | 3b 20 57 69 6e 64 6f 77 |a5),a0..|; Window|
|00003840| 0a 09 6d 6f 76 65 2e 6c | 09 47 55 74 69 6c 42 61 |..move.l|.GUtilBa|
|00003850| 73 65 28 70 63 29 2c 61 | 36 0a 09 43 61 6c 6c 4c |se(pc),a|6..CallL|
|00003860| 69 62 09 47 55 5f 42 6c | 6f 63 6b 49 6e 70 75 74 |ib.GU_Bl|ockInput|
|00003870| 09 09 3b 20 42 6c 6f 63 | 6b 20 69 6e 70 75 74 20 |..; Bloc|k input |
|00003880| 74 6f 20 6d 61 69 6e 20 | 77 69 6e 64 6f 77 0a 09 |to main |window..|
|00003890| 73 75 62 61 2e 6c 09 61 | 32 2c 61 32 09 09 09 3b |suba.l.a|2,a2...;|
|000038a0| 20 4e 6f 20 74 65 72 6d | 69 6e 61 74 69 6e 67 20 | No term|inating |
|000038b0| 49 44 43 4d 50 20 66 6c | 61 67 73 0a 09 6c 65 61 |IDCMP fl|ags..lea|
|000038c0| 2e 6c 09 46 6d 74 50 61 | 72 61 6d 73 28 61 35 29 |.l.FmtPa|rams(a5)|
|000038d0| 2c 61 33 09 3b 20 50 6f | 69 6e 74 65 72 20 74 6f |,a3.; Po|inter to|
|000038e0| 20 70 61 72 61 6d 65 74 | 65 72 73 20 28 32 20 6c | paramet|ers (2 l|
|000038f0| 6f 6e 67 77 6f 72 64 73 | 29 0a 09 43 61 6c 6c 4c |ongwords|)..CallL|
|00003900| 69 62 09 45 61 73 79 52 | 65 71 75 65 73 74 41 72 |ib.EasyR|equestAr|
|00003910| 67 73 2c 49 6e 74 75 69 | 42 61 73 65 28 70 63 29 |gs,Intui|Base(pc)|
|00003920| 2c 6b 65 65 70 0a 09 6d | 6f 76 65 2e 6c 09 6d 61 |,keep..m|ove.l.ma|
|00003930| 69 6e 5f 77 69 6e 28 61 | 35 29 2c 61 30 0a 09 43 |in_win(a|5),a0..C|
|00003940| 61 6c 6c 4c 69 62 09 47 | 55 5f 46 72 65 65 49 6e |allLib.G|U_FreeIn|
|00003950| 70 75 74 09 09 3b 20 55 | 6e 62 6c 6f 63 6b 20 69 |put..; U|nblock i|
|00003960| 6e 70 75 74 20 74 6f 20 | 6d 61 69 6e 20 77 69 6e |nput to |main win|
|00003970| 64 6f 77 0a 0a 09 6d 6f | 76 65 6d 2e 6c 09 28 73 |dow...mo|vem.l.(s|
|00003980| 70 29 2b 2c 64 30 2d 64 | 31 2f 61 30 2d 61 33 2f |p)+,d0-d|1/a0-a3/|
|00003990| 61 36 0a 09 72 74 73 0a | 0a 2e 6d 79 65 61 73 79 |a6..rts.|..myeasy|
|000039a0| 73 74 72 75 63 74 3a 0a | 09 64 63 2e 6c 09 45 61 |struct:.|.dc.l.Ea|
|000039b0| 73 79 53 74 72 75 63 74 | 5f 53 49 5a 45 4f 46 0a |syStruct|_SIZEOF.|
|000039c0| 09 64 63 2e 6c 09 30 2c | 30 09 09 09 3b 20 46 6c |.dc.l.0,|0...; Fl|
|000039d0| 61 67 73 20 61 6e 64 20 | 72 65 71 75 65 73 74 65 |ags and |requeste|
|000039e0| 72 20 74 69 74 6c 65 0a | 09 64 63 2e 6c 09 30 09 |r title.|.dc.l.0.|
|000039f0| 09 09 3b 20 42 6f 64 79 | 20 74 65 78 74 0a 2e 67 |..; Body| text..g|
|00003a00| 61 64 67 66 6f 72 6d 3a | 09 65 71 75 09 2a 2d 2e |adgform:|.equ.*-.|
|00003a10| 6d 79 65 61 73 79 73 74 | 72 75 63 74 0a 09 64 63 |myeasyst|ruct..dc|
|00003a20| 2e 6c 09 30 09 09 09 3b | 20 47 61 64 67 65 74 20 |.l.0...;| Gadget |
|00003a30| 74 65 78 74 0a 09 65 76 | 65 6e 0a 0a 3b 2d 2d 2d |text..ev|en..;---|
|00003a40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 20 57 69 6e |--------|---- Win|
|00003a60| 64 6f 77 20 64 61 74 61 | 73 20 2d 2d 2d 2d 2d 2d |dow data|s ------|
|00003a70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0a 0a 49 4e 54 55 |--------|--..INTU|
|00003a90| 49 49 44 43 4d 50 3a 09 | 65 71 75 09 49 44 43 4d |IIDCMP:.|equ.IDCM|
|00003aa0| 50 5f 52 45 46 52 45 53 | 48 57 49 4e 44 4f 57 21 |P_REFRES|HWINDOW!|
|00003ab0| 49 44 43 4d 50 5f 43 4c | 4f 53 45 57 49 4e 44 4f |IDCMP_CL|OSEWINDO|
|00003ac0| 57 21 49 44 43 4d 50 5f | 56 41 4e 49 4c 4c 41 4b |W!IDCMP_|VANILLAK|
|00003ad0| 45 59 0a 57 49 4e 47 41 | 44 53 3a 09 65 71 75 09 |EY.WINGA|DS:.equ.|
|00003ae0| 57 46 4c 47 5f 44 52 41 | 47 42 41 52 21 57 46 4c |WFLG_DRA|GBAR!WFL|
|00003af0| 47 5f 44 45 50 54 48 47 | 41 44 47 45 54 21 57 46 |G_DEPTHG|ADGET!WF|
|00003b00| 4c 47 5f 43 4c 4f 53 45 | 47 41 44 47 45 54 0a 0a |LG_CLOSE|GADGET..|
|00003b10| 77 69 6e 64 6f 77 5f 74 | 61 67 73 3a 0a 09 64 63 |window_t|ags:..dc|
|00003b20| 2e 6c 09 57 41 5f 4c 65 | 66 74 2c 09 30 2c 09 57 |.l.WA_Le|ft,.0,.W|
|00003b30| 41 5f 54 6f 70 2c 09 30 | 0a 77 69 6e 74 6f 70 3a |A_Top,.0|.wintop:|
|00003b40| 09 65 71 75 09 2a 2d 77 | 69 6e 64 6f 77 5f 74 61 |.equ.*-w|indow_ta|
|00003b50| 67 73 2d 34 0a 77 69 6e | 77 69 64 3a 09 65 71 75 |gs-4.win|wid:.equ|
|00003b60| 09 2a 2d 77 69 6e 64 6f | 77 5f 74 61 67 73 2b 34 |.*-windo|w_tags+4|
|00003b70| 0a 09 64 63 2e 6c 09 57 | 41 5f 49 6e 6e 65 72 57 |..dc.l.W|A_InnerW|
|00003b80| 69 64 74 68 2c 09 30 2c | 09 57 41 5f 49 6e 6e 65 |idth,.0,|.WA_Inne|
|00003b90| 72 48 65 69 67 68 74 2c | 30 0a 77 69 6e 68 65 69 |rHeight,|0.winhei|
|00003ba0| 3a 09 65 71 75 09 2a 2d | 77 69 6e 64 6f 77 5f 74 |:.equ.*-|window_t|
|00003bb0| 61 67 73 2d 34 0a 09 64 | 63 2e 6c 09 57 41 5f 49 |ags-4..d|c.l.WA_I|
|00003bc0| 44 43 4d 50 2c 09 4c 49 | 53 54 56 49 45 57 49 44 |DCMP,.LI|STVIEWID|
|00003bd0| 43 4d 50 21 49 4e 54 55 | 49 49 44 43 4d 50 21 49 |CMP!INTU|IIDCMP!I|
|00003be0| 44 43 4d 50 5f 4d 45 4e | 55 50 49 43 4b 0a 09 64 |DCMP_MEN|UPICK..d|
|00003bf0| 63 2e 6c 09 57 41 5f 46 | 6c 61 67 73 2c 09 57 49 |c.l.WA_F|lags,.WI|
|00003c00| 4e 47 41 44 53 21 57 46 | 4c 47 5f 41 43 54 49 56 |NGADS!WF|LG_ACTIV|
|00003c10| 41 54 45 21 57 46 4c 47 | 5f 53 4d 41 52 54 5f 52 |ATE!WFLG|_SMART_R|
|00003c20| 45 46 52 45 53 48 0a 09 | 64 63 2e 6c 09 57 41 5f |EFRESH..|dc.l.WA_|
|00003c30| 4e 65 77 4c 6f 6f 6b 4d | 65 6e 75 73 2c 54 52 55 |NewLookM|enus,TRU|
|00003c40| 45 0a 09 64 63 2e 6c 09 | 57 41 5f 47 61 64 67 65 |E..dc.l.|WA_Gadge|
|00003c50| 74 73 2c 09 30 0a 67 6c | 69 73 74 3a 09 65 71 75 |ts,.0.gl|ist:.equ|
|00003c60| 09 2a 2d 34 0a 09 64 63 | 2e 6c 09 57 41 5f 54 69 |.*-4..dc|.l.WA_Ti|
|00003c70| 74 6c 65 2c 09 4d 61 69 | 6e 57 54 69 74 6c 65 0a |tle,.Mai|nWTitle.|
|00003c80| 09 64 63 2e 6c 09 57 41 | 5f 5a 6f 6f 6d 2c 09 7a |.dc.l.WA|_Zoom,.z|
|00003c90| 6f 6f 6d 73 0a 65 6d 70 | 74 79 74 61 67 3a 0a 09 |ooms.emp|tytag:..|
|00003ca0| 64 63 2e 6c 09 54 41 47 | 5f 44 4f 4e 45 0a 0a 7a |dc.l.TAG|_DONE..z|
|00003cb0| 6f 6f 6d 73 3a 09 64 63 | 2e 77 09 30 2c 31 31 2c |ooms:.dc|.w.0,11,|
|00003cc0| 32 34 30 2c 31 31 0a 7a | 6f 6f 6d 79 3a 09 65 71 |240,11.z|oomy:.eq|
|00003cd0| 75 09 2a 2d 77 69 6e 64 | 6f 77 5f 74 61 67 73 2d |u.*-wind|ow_tags-|
|00003ce0| 36 0a 7a 6f 6f 6d 77 3a | 09 65 71 75 09 2a 2d 77 |6.zoomw:|.equ.*-w|
|00003cf0| 69 6e 64 6f 77 5f 74 61 | 67 73 2d 34 0a 7a 6f 6f |indow_ta|gs-4.zoo|
|00003d00| 6d 68 3a 09 65 71 75 09 | 2a 2d 77 69 6e 64 6f 77 |mh:.equ.|*-window|
|00003d10| 5f 74 61 67 73 2d 32 0a | 0a 6c 61 79 6f 75 74 6d |_tags-2.|.layoutm|
|00003d20| 65 6e 75 74 61 67 73 3a | 0a 09 64 63 2e 6c 09 47 |enutags:|..dc.l.G|
|00003d30| 54 4d 4e 5f 4e 65 77 4c | 6f 6f 6b 4d 65 6e 75 73 |TMN_NewL|ookMenus|
|00003d40| 2c 09 54 52 55 45 2c 09 | 54 41 47 5f 44 4f 4e 45 |,.TRUE,.|TAG_DONE|
|00003d50| 0a 09 0a 4d 61 69 6e 57 | 54 69 74 6c 65 3a 09 5f |...MainW|Title:._|
|00003d60| 50 52 4f 47 4e 41 4d 45 | 0a 09 09 64 63 2e 62 09 |PROGNAME|...dc.b.|
|00003d70| 22 76 22 0a 09 09 5f 56 | 45 52 53 49 4f 4e 0a 6d |"v"..._V|ERSION.m|
|00003d80| 6f 72 65 74 69 74 6c 65 | 3a 09 64 63 2e 62 09 22 |oretitle|:.dc.b."|
|00003d90| 20 a9 20 31 39 39 35 20 | 62 79 20 22 0a 09 09 5f | . 1995 |by "..._|
|00003da0| 53 48 4f 52 54 41 55 54 | 48 4f 52 0a 0a 09 65 76 |SHORTAUT|HOR...ev|
|00003db0| 65 6e 0a 0a 3b 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |en..;---|--------|
|00003dc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 20 44 61 |--------|----- Da|
|00003dd0| 74 61 73 20 66 6f 72 20 | 4c 61 79 6f 75 74 47 61 |tas for |LayoutGa|
|00003de0| 64 67 65 74 73 41 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |dgetsA -|--------|
|00003df0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003e00| 2d 2d 0a 4c 61 79 6f 75 | 74 54 61 67 73 3a 0a 09 |--.Layou|tTags:..|
|00003e10| 64 63 2e 6c 09 47 55 5f | 52 69 67 68 74 45 78 74 |dc.l.GU_|RightExt|
|00003e20| 72 65 6d 65 2c 09 66 61 | 72 72 69 67 68 74 0a 09 |reme,.fa|rright..|
|00003e30| 64 63 2e 6c 09 47 55 5f | 4c 6f 77 65 72 45 78 74 |dc.l.GU_|LowerExt|
|00003e40| 72 65 6d 65 2c 09 66 61 | 72 62 6f 74 74 6f 6d 0a |reme,.fa|rbottom.|
|00003e50| 74 61 3a 09 64 63 2e 6c | 09 47 55 5f 44 65 66 54 |ta:.dc.l|.GU_DefT|
|00003e60| 65 78 74 41 74 74 72 2c | 09 09 30 0a 63 61 74 3a |extAttr,|..0.cat:|
|00003e70| 09 64 63 2e 6c 09 47 55 | 5f 43 61 74 61 6c 6f 67 |.dc.l.GU|_Catalog|
|00003e80| 2c 09 09 30 0a 09 64 63 | 2e 6c 09 47 55 5f 41 70 |,..0..dc|.l.GU_Ap|
|00003e90| 70 53 74 72 69 6e 67 73 | 2c 09 09 41 70 70 53 74 |pStrings|,..AppSt|
|00003ea0| 72 69 6e 67 73 0a 09 64 | 63 2e 6c 09 54 41 47 5f |rings..d|c.l.TAG_|
|00003eb0| 44 4f 4e 45 0a 0a 74 65 | 78 74 61 74 74 72 3a 09 |DONE..te|xtattr:.|
|00003ec0| 65 71 75 09 74 61 2b 34 | 09 0a 63 61 74 61 6c 6f |equ.ta+4|..catalo|
|00003ed0| 67 3a 09 65 71 75 09 63 | 61 74 2b 34 0a 0a 66 61 |g:.equ.c|at+4..fa|
|00003ee0| 72 72 69 67 68 74 3a 09 | 64 63 2e 6c 09 30 0a 66 |rright:.|dc.l.0.f|
|00003ef0| 61 72 62 6f 74 74 6f 6d | 3a 09 64 63 2e 6c 09 30 |arbottom|:.dc.l.0|
|00003f00| 0a 0a 3b 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..;-----|--------|
|00003f10| 2d 2d 2d 2d 2d 20 44 61 | 74 61 20 66 6f 72 20 6c |----- Da|ta for l|
|00003f20| 6f 63 61 6c 69 7a 69 6e | 67 20 6f 66 20 74 68 65 |ocalizin|g of the|
|00003f30| 20 70 72 6f 67 72 61 6d | 20 2d 2d 2d 2d 2d 2d 2d | program| -------|
|00003f40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f50| 0a 0a 42 45 56 45 4c 42 | 4f 58 5f 31 3a 09 65 71 |..BEVELB|OX_1:.eq|
|00003f60| 75 09 30 0a 46 49 52 53 | 54 5f 47 41 44 3a 09 65 |u.0.FIRS|T_GAD:.e|
|00003f70| 71 75 09 31 0a 53 45 43 | 4f 4e 44 5f 47 41 44 3a |qu.1.SEC|OND_GAD:|
|00003f80| 09 65 71 75 09 32 0a 54 | 48 49 52 44 5f 47 41 44 |.equ.2.T|HIRD_GAD|
|00003f90| 3a 09 65 71 75 09 33 0a | 4d 4e 55 5f 50 52 4a 5f |:.equ.3.|MNU_PRJ_|
|00003fa0| 54 49 54 4c 45 3a 09 65 | 71 75 09 34 0a 4d 4e 49 |TITLE:.e|qu.4.MNI|
|00003fb0| 5f 50 52 4a 5f 4f 50 45 | 4e 3a 09 65 71 75 09 35 |_PRJ_OPE|N:.equ.5|
|00003fc0| 0a 4d 4e 49 5f 50 52 4a | 5f 53 41 56 45 3a 09 65 |.MNI_PRJ|_SAVE:.e|
|00003fd0| 71 75 09 36 0a 4d 4e 49 | 5f 50 52 4a 5f 50 52 49 |qu.6.MNI|_PRJ_PRI|
|00003fe0| 4e 54 3a 09 65 71 75 09 | 37 0a 4d 4e 53 5f 50 52 |NT:.equ.|7.MNS_PR|
|00003ff0| 4a 5f 50 52 49 4e 54 5f | 44 52 41 46 54 3a 09 65 |J_PRINT_|DRAFT:.e|
|00004000| 71 75 09 38 0a 4d 4e 53 | 5f 50 52 4a 5f 50 52 49 |qu.8.MNS|_PRJ_PRI|
|00004010| 4e 54 5f 4e 4c 51 3a 09 | 65 71 75 09 39 0a 4d 4e |NT_NLQ:.|equ.9.MN|
|00004020| 49 5f 50 52 4a 5f 41 42 | 4f 55 54 3a 09 65 71 75 |I_PRJ_AB|OUT:.equ|
|00004030| 09 31 30 0a 4d 4e 49 5f | 50 52 4a 5f 51 55 49 54 |.10.MNI_|PRJ_QUIT|
|00004040| 3a 09 65 71 75 09 31 31 | 0a 4d 4e 55 5f 45 44 49 |:.equ.11|.MNU_EDI|
|00004050| 54 5f 54 49 54 4c 45 3a | 09 65 71 75 09 31 32 0a |T_TITLE:|.equ.12.|
|00004060| 4d 4e 49 5f 45 44 49 54 | 5f 43 55 54 3a 09 65 71 |MNI_EDIT|_CUT:.eq|
|00004070| 75 09 31 33 0a 4d 4e 49 | 5f 45 44 49 54 5f 43 4f |u.13.MNI|_EDIT_CO|
|00004080| 50 59 3a 09 65 71 75 09 | 31 34 0a 4d 4e 49 5f 45 |PY:.equ.|14.MNI_E|
|00004090| 44 49 54 5f 50 41 53 54 | 45 3a 09 65 71 75 09 31 |DIT_PAST|E:.equ.1|
|000040a0| 35 0a 4d 4e 49 5f 45 44 | 49 54 5f 55 4e 44 4f 3a |5.MNI_ED|IT_UNDO:|
|000040b0| 09 65 71 75 09 31 36 0a | 41 42 4f 55 54 5f 54 49 |.equ.16.|ABOUT_TI|
|000040c0| 54 3a 09 65 71 75 09 31 | 37 0a 41 42 4f 55 54 5f |T:.equ.1|7.ABOUT_|
|000040d0| 54 45 58 54 3a 09 65 71 | 75 09 31 38 0a 41 42 4f |TEXT:.eq|u.18.ABO|
|000040e0| 55 54 5f 4f 4b 3a 09 65 | 71 75 09 31 39 0a 0a 41 |UT_OK:.e|qu.19..A|
|000040f0| 70 70 53 74 72 69 6e 67 | 73 3a 0a 09 64 63 2e 6c |ppString|s:..dc.l|
|00004100| 09 42 45 56 45 4c 42 4f | 58 5f 31 2c 09 42 45 56 |.BEVELBO|X_1,.BEV|
|00004110| 45 4c 42 4f 58 5f 31 5f | 53 54 52 0a 09 64 63 2e |ELBOX_1_|STR..dc.|
|00004120| 6c 09 46 49 52 53 54 5f | 47 41 44 2c 09 46 49 52 |l.FIRST_|GAD,.FIR|
|00004130| 53 54 5f 47 41 44 5f 53 | 54 52 0a 09 64 63 2e 6c |ST_GAD_S|TR..dc.l|
|00004140| 09 53 45 43 4f 4e 44 5f | 47 41 44 2c 09 53 45 43 |.SECOND_|GAD,.SEC|
|00004150| 4f 4e 44 5f 47 41 44 5f | 53 54 52 0a 09 64 63 2e |OND_GAD_|STR..dc.|
|00004160| 6c 09 54 48 49 52 44 5f | 47 41 44 2c 09 54 48 49 |l.THIRD_|GAD,.THI|
|00004170| 52 44 5f 47 41 44 5f 53 | 54 52 0a 09 64 63 2e 6c |RD_GAD_S|TR..dc.l|
|00004180| 09 4d 4e 55 5f 50 52 4a | 5f 54 49 54 4c 45 2c 09 |.MNU_PRJ|_TITLE,.|
|00004190| 4d 4e 55 5f 50 52 4a 5f | 54 49 54 4c 45 5f 53 54 |MNU_PRJ_|TITLE_ST|
|000041a0| 52 0a 09 64 63 2e 6c 09 | 4d 4e 49 5f 50 52 4a 5f |R..dc.l.|MNI_PRJ_|
|000041b0| 4f 50 45 4e 2c 09 4d 4e | 49 5f 50 52 4a 5f 4f 50 |OPEN,.MN|I_PRJ_OP|
|000041c0| 45 4e 5f 53 54 52 0a 09 | 64 63 2e 6c 09 4d 4e 49 |EN_STR..|dc.l.MNI|
|000041d0| 5f 50 52 4a 5f 53 41 56 | 45 2c 09 4d 4e 49 5f 50 |_PRJ_SAV|E,.MNI_P|
|000041e0| 52 4a 5f 53 41 56 45 5f | 53 54 52 0a 09 64 63 2e |RJ_SAVE_|STR..dc.|
|000041f0| 6c 09 4d 4e 49 5f 50 52 | 4a 5f 50 52 49 4e 54 2c |l.MNI_PR|J_PRINT,|
|00004200| 09 4d 4e 49 5f 50 52 4a | 5f 50 52 49 4e 54 5f 53 |.MNI_PRJ|_PRINT_S|
|00004210| 54 52 0a 09 64 63 2e 6c | 09 4d 4e 53 5f 50 52 4a |TR..dc.l|.MNS_PRJ|
|00004220| 5f 50 52 49 4e 54 5f 44 | 52 41 46 54 2c 09 4d 4e |_PRINT_D|RAFT,.MN|
|00004230| 53 5f 50 52 4a 5f 50 52 | 49 4e 54 5f 44 52 41 46 |S_PRJ_PR|INT_DRAF|
|00004240| 54 5f 53 54 52 0a 09 64 | 63 2e 6c 09 4d 4e 53 5f |T_STR..d|c.l.MNS_|
|00004250| 50 52 4a 5f 50 52 49 4e | 54 5f 4e 4c 51 2c 09 4d |PRJ_PRIN|T_NLQ,.M|
|00004260| 4e 53 5f 50 52 4a 5f 50 | 52 49 4e 54 5f 4e 4c 51 |NS_PRJ_P|RINT_NLQ|
|00004270| 5f 53 54 52 0a 09 64 63 | 2e 6c 09 4d 4e 49 5f 50 |_STR..dc|.l.MNI_P|
|00004280| 52 4a 5f 41 42 4f 55 54 | 2c 09 4d 4e 49 5f 50 52 |RJ_ABOUT|,.MNI_PR|
|00004290| 4a 5f 41 42 4f 55 54 5f | 53 54 52 0a 09 64 63 2e |J_ABOUT_|STR..dc.|
|000042a0| 6c 09 4d 4e 49 5f 50 52 | 4a 5f 51 55 49 54 2c 09 |l.MNI_PR|J_QUIT,.|
|000042b0| 4d 4e 49 5f 50 52 4a 5f | 51 55 49 54 5f 53 54 52 |MNI_PRJ_|QUIT_STR|
|000042c0| 0a 09 64 63 2e 6c 09 4d | 4e 55 5f 45 44 49 54 5f |..dc.l.M|NU_EDIT_|
|000042d0| 54 49 54 4c 45 2c 09 4d | 4e 55 5f 45 44 49 54 5f |TITLE,.M|NU_EDIT_|
|000042e0| 54 49 54 4c 45 5f 53 54 | 52 0a 09 64 63 2e 6c 09 |TITLE_ST|R..dc.l.|
|000042f0| 4d 4e 49 5f 45 44 49 54 | 5f 43 55 54 2c 09 4d 4e |MNI_EDIT|_CUT,.MN|
|00004300| 49 5f 45 44 49 54 5f 43 | 55 54 5f 53 54 52 0a 09 |I_EDIT_C|UT_STR..|
|00004310| 64 63 2e 6c 09 4d 4e 49 | 5f 45 44 49 54 5f 43 4f |dc.l.MNI|_EDIT_CO|
|00004320| 50 59 2c 09 4d 4e 49 5f | 45 44 49 54 5f 43 4f 50 |PY,.MNI_|EDIT_COP|
|00004330| 59 5f 53 54 52 0a 09 64 | 63 2e 6c 09 4d 4e 49 5f |Y_STR..d|c.l.MNI_|
|00004340| 45 44 49 54 5f 50 41 53 | 54 45 2c 09 4d 4e 49 5f |EDIT_PAS|TE,.MNI_|
|00004350| 45 44 49 54 5f 50 41 53 | 54 45 5f 53 54 52 0a 09 |EDIT_PAS|TE_STR..|
|00004360| 64 63 2e 6c 09 4d 4e 49 | 5f 45 44 49 54 5f 55 4e |dc.l.MNI|_EDIT_UN|
|00004370| 44 4f 2c 09 4d 4e 49 5f | 45 44 49 54 5f 55 4e 44 |DO,.MNI_|EDIT_UND|
|00004380| 4f 5f 53 54 52 0a 09 64 | 63 2e 6c 09 41 42 4f 55 |O_STR..d|c.l.ABOU|
|00004390| 54 5f 54 49 54 2c 09 41 | 42 4f 55 54 5f 54 49 54 |T_TIT,.A|BOUT_TIT|
|000043a0| 5f 53 54 52 0a 09 64 63 | 2e 6c 09 41 42 4f 55 54 |_STR..dc|.l.ABOUT|
|000043b0| 5f 54 45 58 54 2c 09 41 | 42 4f 55 54 5f 54 45 58 |_TEXT,.A|BOUT_TEX|
|000043c0| 54 5f 53 54 52 0a 09 64 | 63 2e 6c 09 41 42 4f 55 |T_STR..d|c.l.ABOU|
|000043d0| 54 5f 4f 4b 2c 09 41 42 | 4f 55 54 5f 4f 4b 5f 53 |T_OK,.AB|OUT_OK_S|
|000043e0| 54 52 0a 0a 42 45 56 45 | 4c 42 4f 58 5f 31 5f 53 |TR..BEVE|LBOX_1_S|
|000043f0| 54 52 3a 0a 09 64 63 2e | 62 09 27 47 61 64 67 65 |TR:..dc.|b.'Gadge|
|00004400| 74 73 27 2c 30 0a 46 49 | 52 53 54 5f 47 41 44 5f |ts',0.FI|RST_GAD_|
|00004410| 53 54 52 3a 0a 09 64 63 | 2e 62 09 27 5f 46 69 72 |STR:..dc|.b.'_Fir|
|00004420| 73 74 20 47 61 64 67 65 | 74 27 2c 30 0a 53 45 43 |st Gadge|t',0.SEC|
|00004430| 4f 4e 44 5f 47 41 44 5f | 53 54 52 3a 0a 09 64 63 |OND_GAD_|STR:..dc|
|00004440| 2e 62 09 27 5f 53 65 63 | 6f 6e 64 20 47 61 64 67 |.b.'_Sec|ond Gadg|
|00004450| 65 74 27 2c 30 0a 54 48 | 49 52 44 5f 47 41 44 5f |et',0.TH|IRD_GAD_|
|00004460| 53 54 52 3a 0a 09 64 63 | 2e 62 09 27 5f 54 68 69 |STR:..dc|.b.'_Thi|
|00004470| 72 64 20 47 61 64 67 65 | 74 27 2c 30 0a 4d 4e 55 |rd Gadge|t',0.MNU|
|00004480| 5f 50 52 4a 5f 54 49 54 | 4c 45 5f 53 54 52 3a 0a |_PRJ_TIT|LE_STR:.|
|00004490| 09 64 63 2e 62 09 27 20 | 27 2c 24 30 30 2c 27 50 |.dc.b.' |',$00,'P|
|000044a0| 72 6f 6a 65 63 74 27 2c | 30 0a 4d 4e 49 5f 50 52 |roject',|0.MNI_PR|
|000044b0| 4a 5f 4f 50 45 4e 5f 53 | 54 52 3a 0a 09 64 63 2e |J_OPEN_S|TR:..dc.|
|000044c0| 62 09 27 4f 27 2c 24 30 | 30 2c 27 4f 70 65 6e 2e |b.'O',$0|0,'Open.|
|000044d0| 2e 2e 27 2c 30 0a 4d 4e | 49 5f 50 52 4a 5f 53 41 |..',0.MN|I_PRJ_SA|
|000044e0| 56 45 5f 53 54 52 3a 0a | 09 64 63 2e 62 09 27 53 |VE_STR:.|.dc.b.'S|
|000044f0| 27 2c 24 30 30 2c 27 53 | 61 76 65 2e 2e 2e 27 2c |',$00,'S|ave...',|
|00004500| 30 0a 4d 4e 49 5f 50 52 | 4a 5f 50 52 49 4e 54 5f |0.MNI_PR|J_PRINT_|
|00004510| 53 54 52 3a 0a 09 64 63 | 2e 62 09 27 20 27 2c 24 |STR:..dc|.b.' ',$|
|00004520| 30 30 2c 27 50 72 69 6e | 74 2e 2e 2e 27 2c 30 0a |00,'Prin|t...',0.|
|00004530| 4d 4e 53 5f 50 52 4a 5f | 50 52 49 4e 54 5f 44 52 |MNS_PRJ_|PRINT_DR|
|00004540| 41 46 54 5f 53 54 52 3a | 0a 09 64 63 2e 62 09 27 |AFT_STR:|..dc.b.'|
|00004550| 20 27 2c 24 30 30 2c 27 | 44 72 61 66 74 27 2c 30 | ',$00,'|Draft',0|
|00004560| 0a 4d 4e 53 5f 50 52 4a | 5f 50 52 49 4e 54 5f 4e |.MNS_PRJ|_PRINT_N|
|00004570| 4c 51 5f 53 54 52 3a 0a | 09 64 63 2e 62 09 27 20 |LQ_STR:.|.dc.b.' |
|00004580| 27 2c 24 30 30 2c 27 4e | 4c 51 27 2c 30 0a 4d 4e |',$00,'N|LQ',0.MN|
|00004590| 49 5f 50 52 4a 5f 41 42 | 4f 55 54 5f 53 54 52 3a |I_PRJ_AB|OUT_STR:|
|000045a0| 0a 09 64 63 2e 62 09 27 | 3f 27 2c 24 30 30 2c 27 |..dc.b.'|?',$00,'|
|000045b0| 41 62 6f 75 74 27 2c 30 | 0a 4d 4e 49 5f 50 52 4a |About',0|.MNI_PRJ|
|000045c0| 5f 51 55 49 54 5f 53 54 | 52 3a 0a 09 64 63 2e 62 |_QUIT_ST|R:..dc.b|
|000045d0| 09 27 51 27 2c 24 30 30 | 2c 27 51 75 69 74 27 2c |.'Q',$00|,'Quit',|
|000045e0| 30 0a 4d 4e 55 5f 45 44 | 49 54 5f 54 49 54 4c 45 |0.MNU_ED|IT_TITLE|
|000045f0| 5f 53 54 52 3a 0a 09 64 | 63 2e 62 09 27 20 27 2c |_STR:..d|c.b.' ',|
|00004600| 24 30 30 2c 27 45 64 69 | 74 27 2c 30 0a 4d 4e 49 |$00,'Edi|t',0.MNI|
|00004610| 5f 45 44 49 54 5f 43 55 | 54 5f 53 54 52 3a 0a 09 |_EDIT_CU|T_STR:..|
|00004620| 64 63 2e 62 09 27 58 27 | 2c 24 30 30 2c 27 43 75 |dc.b.'X'|,$00,'Cu|
|00004630| 74 27 2c 30 0a 4d 4e 49 | 5f 45 44 49 54 5f 43 4f |t',0.MNI|_EDIT_CO|
|00004640| 50 59 5f 53 54 52 3a 0a | 09 64 63 2e 62 09 27 43 |PY_STR:.|.dc.b.'C|
|00004650| 27 2c 24 30 30 2c 27 43 | 6f 70 79 27 2c 30 0a 4d |',$00,'C|opy',0.M|
|00004660| 4e 49 5f 45 44 49 54 5f | 50 41 53 54 45 5f 53 54 |NI_EDIT_|PASTE_ST|
|00004670| 52 3a 0a 09 64 63 2e 62 | 09 27 56 27 2c 24 30 30 |R:..dc.b|.'V',$00|
|00004680| 2c 27 50 61 73 74 65 27 | 2c 30 0a 4d 4e 49 5f 45 |,'Paste'|,0.MNI_E|
|00004690| 44 49 54 5f 55 4e 44 4f | 5f 53 54 52 3a 0a 09 64 |DIT_UNDO|_STR:..d|
|000046a0| 63 2e 62 09 27 55 27 2c | 24 30 30 2c 27 55 6e 64 |c.b.'U',|$00,'Und|
|000046b0| 6f 27 2c 30 0a 41 42 4f | 55 54 5f 54 49 54 5f 53 |o',0.ABO|UT_TIT_S|
|000046c0| 54 52 3a 0a 09 64 63 2e | 62 09 27 20 20 20 20 20 |TR:..dc.|b.' |
|000046d0| 20 20 20 20 20 20 20 20 | 20 20 41 62 6f 75 74 20 | | About |
|000046e0| 41 6e 79 50 72 6f 67 72 | 61 6d 27 2c 30 0a 41 42 |AnyProgr|am',0.AB|
|000046f0| 4f 55 54 5f 54 45 58 54 | 5f 53 54 52 3a 0a 09 64 |OUT_TEXT|_STR:..d|
|00004700| 63 2e 62 09 27 41 6e 79 | 50 72 6f 67 72 61 6d 20 |c.b.'Any|Program |
|00004710| 76 25 73 20 28 25 73 29 | 27 2c 24 30 61 2c 24 30 |v%s (%s)|',$0a,$0|
|00004720| 61 2c 27 43 6f 70 79 72 | 69 67 68 74 20 a9 20 31 |a,'Copyr|ight . 1|
|00004730| 39 39 35 20 62 79 3a 25 | 73 54 68 69 73 20 70 72 |995 by:%|sThis pr|
|00004740| 6f 67 72 61 6d 20 69 73 | 20 44 69 73 6b 57 61 72 |ogram is| DiskWar|
|00004750| 65 2e 20 53 65 6e 64 20 | 6d 65 20 6f 6e 65 20 6f |e. Send |me one o|
|00004760| 72 27 2c 24 30 61 2c 27 | 6d 6f 72 65 20 20 64 69 |r',$0a,'|more di|
|00004770| 73 6b 73 20 20 77 69 74 | 68 20 20 66 72 65 65 6c |sks wit|h freel|
|00004780| 79 20 20 64 69 73 74 72 | 69 62 75 74 61 62 6c 65 |y distr|ibutable|
|00004790| 27 2c 24 30 61 2c 27 70 | 72 6f 67 72 61 6d 73 20 |',$0a,'p|rograms |
|000047a0| 69 66 20 79 6f 75 20 75 | 73 65 20 69 74 2e 27 2c |if you u|se it.',|
|000047b0| 24 30 61 2c 24 30 61 2c | 27 42 75 67 20 72 65 70 |$0a,$0a,|'Bug rep|
|000047c0| 6f 72 74 73 20 61 6e 64 | 20 20 73 75 67 67 65 73 |orts and| sugges|
|000047d0| 74 69 6f 6e 73 20 73 68 | 6f 75 6c 64 20 61 6c 73 |tions sh|ould als|
|000047e0| 6f 27 2c 24 30 61 2c 27 | 62 65 20 73 65 6e 74 20 |o',$0a,'|be sent |
|000047f0| 74 6f 20 74 68 65 20 73 | 61 6d 65 20 61 64 64 72 |to the s|ame addr|
|00004800| 65 73 73 2e 27 2c 24 30 | 61 2c 24 30 61 2c 27 54 |ess.',$0|a,$0a,'T|
|00004810| 68 69 73 20 70 72 6f 67 | 72 61 6d 20 75 73 65 73 |his prog|ram uses|
|00004820| 20 67 61 64 75 74 69 6c | 2e 6c 69 62 72 61 72 79 | gadutil|.library|
|00004830| 2c 20 77 68 69 63 68 27 | 2c 24 30 61 2c 27 69 73 |, which'|,$0a,'is|
|00004840| 20 43 6f 70 79 72 69 67 | 68 74 20 a9 20 31 39 39 | Copyrig|ht . 199|
|00004850| 34 2d 31 39 39 35 20 62 | 79 20 50 2d 4f 20 59 6c |4-1995 b|y P-O Yl|
|00004860| 69 6e 69 65 6d 69 27 2c | 24 30 61 2c 27 61 6e 64 |iniemi',|$0a,'and|
|00004870| 20 53 74 61 66 66 61 6e | 20 48 e4 6d e4 6c e4 2e | Staffan| H.m.l..|
|00004880| 27 2c 30 0a 41 42 4f 55 | 54 5f 4f 4b 5f 53 54 52 |',0.ABOU|T_OK_STR|
|00004890| 3a 0a 09 64 63 2e 62 09 | 27 4f 4b 27 2c 30 0a 0a |:..dc.b.|'OK',0..|
|000048a0| 63 61 74 61 6c 6f 67 6e | 61 6d 65 3a 09 64 63 2e |catalogn|ame:.dc.|
|000048b0| 62 09 27 61 6e 79 70 72 | 6f 67 72 61 6d 2e 63 61 |b.'anypr|ogram.ca|
|000048c0| 74 61 6c 6f 67 27 2c 30 | 0a 0a 3b 2d 2d 2d 2d 2d |talog',0|..;-----|
|000048d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000048e0| 2d 2d 2d 20 45 6e 64 20 | 6f 66 20 6c 6f 63 61 6c |--- End |of local|
|000048f0| 69 7a 69 6e 67 20 64 61 | 74 61 73 20 2d 2d 2d 2d |izing da|tas ----|
|00004900| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004910| 2d 2d 2d 2d 2d 2d 2d 2d | 0a 0a 76 65 72 73 69 6f |--------|..versio|
|00004920| 6e 3a 09 5f 56 45 52 53 | 49 4f 4e 0a 65 6d 70 73 |n:._VERS|ION.emps|
|00004930| 74 72 3a 09 09 64 63 2e | 62 09 30 0a 64 61 74 65 |tr:..dc.|b.0.date|
|00004940| 3a 09 09 5f 44 41 54 45 | 0a 09 09 64 63 2e 62 09 |:.._DATE|...dc.b.|
|00004950| 30 0a 61 75 74 68 6f 72 | 3a 09 09 5f 46 55 4c 4c |0.author|:.._FULL|
|00004960| 41 55 54 48 4f 52 0a 09 | 09 65 76 65 6e 0a 3b 2d |AUTHOR..|.even.;-|
|00004970| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004980| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 20 47 61 64 |--------|---- Gad|
|00004990| 67 65 74 20 64 61 74 61 | 73 20 2d 2d 2d 2d 2d 2d |get data|s ------|
|000049a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000049b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0a 4c 45 46 |--------|----.LEF|
|000049c0| 54 5f 4f 46 46 53 45 54 | 3a 09 65 71 75 09 36 0a |T_OFFSET|:.equ.6.|
|000049d0| 54 4f 50 5f 4f 46 46 53 | 45 54 3a 09 65 71 75 09 |TOP_OFFS|ET:.equ.|
|000049e0| 33 0a 0a 53 74 64 47 54 | 54 61 67 73 3a 0a 09 64 |3..StdGT|Tags:..d|
|000049f0| 63 2e 6c 09 47 54 5f 55 | 6e 64 65 72 73 63 6f 72 |c.l.GT_U|nderscor|
|00004a00| 65 2c 09 27 5f 27 2c 09 | 09 54 41 47 5f 44 4f 4e |e,.'_',.|.TAG_DON|
|00004a10| 45 0a 09 0a 42 65 76 65 | 6c 42 6f 78 5f 31 3a 0a |E...Beve|lBox_1:.|
|00004a20| 09 64 63 2e 6c 09 47 55 | 5f 47 61 64 67 65 74 4b |.dc.l.GU|_GadgetK|
|00004a30| 69 6e 64 2c 09 42 45 56 | 45 4c 42 4f 58 5f 4b 49 |ind,.BEV|ELBOX_KI|
|00004a40| 4e 44 2c 09 47 55 5f 4c | 65 66 74 2c 09 4c 45 46 |ND,.GU_L|eft,.LEF|
|00004a50| 54 5f 4f 46 46 53 45 54 | 0a 09 64 63 2e 6c 09 47 |T_OFFSET|..dc.l.G|
|00004a60| 55 5f 54 6f 70 2c 09 09 | 54 4f 50 5f 4f 46 46 53 |U_Top,..|TOP_OFFS|
|00004a70| 45 54 2c 09 47 55 5f 4c | 6f 63 61 6c 65 54 65 78 |ET,.GU_L|ocaleTex|
|00004a80| 74 2c 09 42 45 56 45 4c | 42 4f 58 5f 31 0a 09 64 |t,.BEVEL|BOX_1..d|
|00004a90| 63 2e 6c 09 47 55 5f 41 | 64 6a 75 73 74 54 6f 70 |c.l.GU_A|djustTop|
|00004aa0| 2c 09 2d 34 0a 09 64 63 | 2e 6c 09 47 55 5f 41 6c |,.-4..dc|.l.GU_Al|
|00004ab0| 69 67 6e 52 69 67 68 74 | 2c 09 46 49 52 53 54 5f |ignRight|,.FIRST_|
|00004ac0| 47 41 44 2c 09 47 55 5f | 41 64 64 57 69 64 74 68 |GAD,.GU_|AddWidth|
|00004ad0| 2c 09 38 0a 09 64 63 2e | 6c 09 47 55 5f 41 6c 69 |,.8..dc.|l.GU_Ali|
|00004ae0| 67 6e 42 6f 74 74 6f 6d | 2c 09 54 48 49 52 44 5f |gnBottom|,.THIRD_|
|00004af0| 47 41 44 2c 09 47 55 5f | 41 64 64 48 65 69 67 68 |GAD,.GU_|AddHeigh|
|00004b00| 74 2c 09 49 4e 54 45 52 | 48 45 49 47 48 54 0a 0a |t,.INTER|HEIGHT..|
|00004b10| 09 64 63 2e 6c 09 47 55 | 42 42 5f 46 6c 61 67 73 |.dc.l.GU|BB_Flags|
|00004b20| 2c 09 42 42 5f 54 45 58 | 54 5f 49 4e 2c 09 47 55 |,.BB_TEX|T_IN,.GU|
|00004b30| 42 42 5f 54 65 78 74 50 | 65 6e 2c 09 53 48 49 4e |BB_TextP|en,.SHIN|
|00004b40| 45 50 45 4e 0a 09 64 63 | 2e 6c 09 47 55 42 42 5f |EPEN..dc|.l.GUBB_|
|00004b50| 46 72 61 6d 65 54 79 70 | 65 2c 09 42 46 54 5f 52 |FrameTyp|e,.BFT_R|
|00004b60| 49 44 47 45 2c 09 47 55 | 42 42 5f 52 65 63 65 73 |IDGE,.GU|BB_Reces|
|00004b70| 73 65 64 2c 09 54 52 55 | 45 0a 09 64 63 2e 6c 09 |sed,.TRU|E..dc.l.|
|00004b80| 54 41 47 5f 44 4f 4e 45 | 0a 0a 46 69 72 73 74 5f |TAG_DONE|..First_|
|00004b90| 47 61 64 3a 0a 09 64 63 | 2e 6c 09 47 55 5f 47 61 |Gad:..dc|.l.GU_Ga|
|00004ba0| 64 67 65 74 4b 69 6e 64 | 2c 09 42 55 54 54 4f 4e |dgetKind|,.BUTTON|
|00004bb0| 5f 4b 49 4e 44 2c 09 47 | 55 5f 4c 6f 63 61 6c 65 |_KIND,.G|U_Locale|
|00004bc0| 54 65 78 74 2c 09 46 49 | 52 53 54 5f 47 41 44 0a |Text,.FI|RST_GAD.|
|00004bd0| 09 64 63 2e 6c 09 47 55 | 5f 41 64 64 4c 65 66 74 |.dc.l.GU|_AddLeft|
|00004be0| 2c 09 49 4e 54 45 52 57 | 49 44 54 48 2c 09 47 55 |,.INTERW|IDTH,.GU|
|00004bf0| 5f 41 64 6a 75 73 74 54 | 6f 70 2c 09 30 0a 09 64 |_AdjustT|op,.0..d|
|00004c00| 63 2e 6c 09 47 55 5f 41 | 75 74 6f 57 69 64 74 68 |c.l.GU_A|utoWidth|
|00004c10| 2c 09 35 30 2c 09 09 47 | 55 5f 41 75 74 6f 48 65 |,.50,..G|U_AutoHe|
|00004c20| 69 67 68 74 2c 09 34 0a | 53 74 64 42 75 74 74 6f |ight,.4.|StdButto|
|00004c30| 6e 54 61 67 73 3a 0a 09 | 64 63 2e 6c 09 47 55 5f |nTags:..|dc.l.GU_|
|00004c40| 46 6c 61 67 73 2c 09 50 | 4c 41 43 45 54 45 58 54 |Flags,.P|LACETEXT|
|00004c50| 5f 49 4e 0a 53 74 64 47 | 61 64 54 61 67 73 3a 0a |_IN.StdG|adTags:.|
|00004c60| 09 64 63 2e 6c 09 47 55 | 5f 4c 61 62 65 6c 48 6f |.dc.l.GU|_LabelHo|
|00004c70| 74 6b 65 79 2c 09 54 52 | 55 45 09 09 47 55 5f 54 |tkey,.TR|UE..GU_T|
|00004c80| 65 78 74 41 74 74 72 2c | 09 6d 79 74 65 78 74 61 |extAttr,|.mytexta|
|00004c90| 74 74 72 0a 09 64 63 2e | 6c 09 54 41 47 5f 44 4f |ttr..dc.|l.TAG_DO|
|00004ca0| 4e 45 0a 0a 53 65 63 6f | 6e 64 5f 47 61 64 3a 0a |NE..Seco|nd_Gad:.|
|00004cb0| 09 64 63 2e 6c 09 47 55 | 5f 47 61 64 67 65 74 4b |.dc.l.GU|_GadgetK|
|00004cc0| 69 6e 64 2c 09 42 55 54 | 54 4f 4e 5f 4b 49 4e 44 |ind,.BUT|TON_KIND|
|00004cd0| 2c 09 47 55 5f 4c 6f 63 | 61 6c 65 54 65 78 74 2c |,.GU_Loc|aleText,|
|00004ce0| 09 53 45 43 4f 4e 44 5f | 47 41 44 0a 09 64 63 2e |.SECOND_|GAD..dc.|
|00004cf0| 6c 09 47 55 5f 41 6c 69 | 67 6e 4c 65 66 74 2c 09 |l.GU_Ali|gnLeft,.|
|00004d00| 46 49 52 53 54 5f 47 41 | 44 2c 09 47 55 5f 54 6f |FIRST_GA|D,.GU_To|
|00004d10| 70 52 65 6c 2c 09 46 49 | 52 53 54 5f 47 41 44 0a |pRel,.FI|RST_GAD.|
|00004d20| 09 64 63 2e 6c 09 47 55 | 5f 44 75 70 65 48 65 69 |.dc.l.GU|_DupeHei|
|00004d30| 67 68 74 2c 09 46 49 52 | 53 54 5f 47 41 44 2c 09 |ght,.FIR|ST_GAD,.|
|00004d40| 47 55 5f 44 75 70 65 57 | 69 64 74 68 2c 09 46 49 |GU_DupeW|idth,.FI|
|00004d50| 52 53 54 5f 47 41 44 0a | 09 64 63 2e 6c 09 47 55 |RST_GAD.|.dc.l.GU|
|00004d60| 5f 41 64 64 54 6f 70 2c | 09 49 4e 54 45 52 48 45 |_AddTop,|.INTERHE|
|00004d70| 49 47 48 54 2c 09 54 41 | 47 5f 4d 4f 52 45 2c 09 |IGHT,.TA|G_MORE,.|
|00004d80| 53 74 64 42 75 74 74 6f | 6e 54 61 67 73 0a 0a 54 |StdButto|nTags..T|
|00004d90| 68 69 72 64 5f 47 61 64 | 3a 0a 09 64 63 2e 6c 09 |hird_Gad|:..dc.l.|
|00004da0| 47 55 5f 47 61 64 67 65 | 74 4b 69 6e 64 2c 09 42 |GU_Gadge|tKind,.B|
|00004db0| 55 54 54 4f 4e 5f 4b 49 | 4e 44 2c 09 47 55 5f 4c |UTTON_KI|ND,.GU_L|
|00004dc0| 6f 63 61 6c 65 54 65 78 | 74 2c 09 54 48 49 52 44 |ocaleTex|t,.THIRD|
|00004dd0| 5f 47 41 44 0a 09 64 63 | 2e 6c 09 47 55 5f 41 6c |_GAD..dc|.l.GU_Al|
|00004de0| 69 67 6e 4c 65 66 74 2c | 09 46 49 52 53 54 5f 47 |ignLeft,|.FIRST_G|
|00004df0| 41 44 2c 09 47 55 5f 54 | 6f 70 52 65 6c 2c 09 53 |AD,.GU_T|opRel,.S|
|00004e00| 45 43 4f 4e 44 5f 47 41 | 44 0a 09 64 63 2e 6c 09 |ECOND_GA|D..dc.l.|
|00004e10| 47 55 5f 44 75 70 65 48 | 65 69 67 68 74 2c 09 46 |GU_DupeH|eight,.F|
|00004e20| 49 52 53 54 5f 47 41 44 | 2c 09 47 55 5f 44 75 70 |IRST_GAD|,.GU_Dup|
|00004e30| 65 57 69 64 74 68 2c 09 | 46 49 52 53 54 5f 47 41 |eWidth,.|FIRST_GA|
|00004e40| 44 0a 09 64 63 2e 6c 09 | 47 55 5f 41 64 64 54 6f |D..dc.l.|GU_AddTo|
|00004e50| 70 2c 09 49 4e 54 45 52 | 48 45 49 47 48 54 2c 09 |p,.INTER|HEIGHT,.|
|00004e60| 54 41 47 5f 4d 4f 52 45 | 2c 09 53 74 64 42 75 74 |TAG_MORE|,.StdBut|
|00004e70| 74 6f 6e 54 61 67 73 0a | 0a 67 61 64 67 65 74 73 |tonTags.|.gadgets|
|00004e80| 3a 0a 09 47 41 44 47 45 | 54 09 42 45 56 45 4c 42 |:..GADGE|T.BEVELB|
|00004e90| 4f 58 5f 31 2c 09 42 65 | 76 65 6c 42 6f 78 5f 31 |OX_1,.Be|velBox_1|
|00004ea0| 2c 09 53 74 64 47 54 54 | 61 67 73 0a 09 47 41 44 |,.StdGTT|ags..GAD|
|00004eb0| 47 45 54 09 46 49 52 53 | 54 5f 47 41 44 2c 09 46 |GET.FIRS|T_GAD,.F|
|00004ec0| 69 72 73 74 5f 47 61 64 | 2c 09 53 74 64 47 54 54 |irst_Gad|,.StdGTT|
|00004ed0| 61 67 73 0a 09 47 41 44 | 47 45 54 09 53 45 43 4f |ags..GAD|GET.SECO|
|00004ee0| 4e 44 5f 47 41 44 2c 09 | 53 65 63 6f 6e 64 5f 47 |ND_GAD,.|Second_G|
|00004ef0| 61 64 2c 09 53 74 64 47 | 54 54 61 67 73 0a 09 47 |ad,.StdG|TTags..G|
|00004f00| 41 44 47 45 54 09 54 48 | 49 52 44 5f 47 41 44 2c |ADGET.TH|IRD_GAD,|
|00004f10| 09 54 68 69 72 64 5f 47 | 61 64 2c 09 53 74 64 47 |.Third_G|ad,.StdG|
|00004f20| 54 54 61 67 73 0a 09 47 | 41 44 47 45 54 09 2d 31 |TTags..G|ADGET.-1|
|00004f30| 2c 09 4e 55 4c 4c 2c 09 | 4e 55 4c 4c 0a 0a 4e 65 |,.NULL,.|NULL..Ne|
|00004f40| 77 4d 65 6e 75 73 3a 09 | 0a 09 4c 4f 43 4d 45 4e |wMenus:.|..LOCMEN|
|00004f50| 55 09 4e 4d 5f 54 49 54 | 4c 45 2c 20 4d 4e 55 5f |U.NM_TIT|LE, MNU_|
|00004f60| 50 52 4a 5f 54 49 54 4c | 45 2c 30 2c 09 30 2c 09 |PRJ_TITL|E,0,.0,.|
|00004f70| 30 09 3b 20 7c 20 50 72 | 6f 6a 65 63 74 20 7c 0a |0.; | Pr|oject |.|
|00004f80| 09 4c 4f 43 4d 45 4e 55 | 09 4e 4d 5f 49 54 45 4d |.LOCMENU|.NM_ITEM|
|00004f90| 2c 20 20 4d 4e 49 5f 50 | 52 4a 5f 4f 50 45 4e 2c |, MNI_P|RJ_OPEN,|
|00004fa0| 09 30 2c 09 30 2c 4d 4e | 49 5f 50 52 4a 5f 4f 50 |.0,.0,MN|I_PRJ_OP|
|00004fb0| 45 4e 09 3b 20 4f 70 65 | 6e 2e 2e 2e 20 5b 4f 5d |EN.; Ope|n... [O]|
|00004fc0| 0a 09 4c 4f 43 4d 45 4e | 55 09 4e 4d 5f 49 54 45 |..LOCMEN|U.NM_ITE|
|00004fd0| 4d 2c 20 20 4d 4e 49 5f | 50 52 4a 5f 53 41 56 45 |M, MNI_|PRJ_SAVE|
|00004fe0| 2c 09 30 2c 09 30 2c 4d | 4e 49 5f 50 52 4a 5f 53 |,.0,.0,M|NI_PRJ_S|
|00004ff0| 41 56 45 09 3b 20 53 61 | 76 65 2e 2e 2e 20 5b 53 |AVE.; Sa|ve... [S|
|00005000| 5d 0a 09 4c 4f 43 4d 45 | 4e 55 09 4e 4d 5f 49 54 |]..LOCME|NU.NM_IT|
|00005010| 45 4d 2c 20 20 4e 4d 5f | 42 41 52 4c 41 42 45 4c |EM, NM_|BARLABEL|
|00005020| 2c 09 30 2c 09 30 2c 09 | 30 09 3b 20 2d 2d 2d 2d |,.0,.0,.|0.; ----|
|00005030| 2d 2d 2d 2d 2d 2d 2d 0a | 0a 09 4c 4f 43 4d 45 4e |-------.|..LOCMEN|
|00005040| 55 09 4e 4d 5f 49 54 45 | 4d 2c 20 20 4d 4e 49 5f |U.NM_ITE|M, MNI_|
|00005050| 50 52 4a 5f 50 52 49 4e | 54 2c 30 2c 09 30 2c 09 |PRJ_PRIN|T,0,.0,.|
|00005060| 30 09 3b 20 50 72 69 6e | 74 2e 2e 2e 0a 09 4c 4f |0.; Prin|t.....LO|
|00005070| 43 4d 45 4e 55 09 4e 4d | 5f 53 55 42 2c 4d 4e 53 |CMENU.NM|_SUB,MNS|
|00005080| 5f 50 52 4a 5f 50 52 49 | 4e 54 5f 44 52 41 46 54 |_PRJ_PRI|NT_DRAFT|
|00005090| 2c 30 2c 30 2c 4d 4e 53 | 5f 50 52 4a 5f 50 52 49 |,0,0,MNS|_PRJ_PRI|
|000050a0| 4e 54 5f 44 52 41 46 54 | 20 3b 20 20 20 20 20 44 |NT_DRAFT| ; D|
|000050b0| 72 61 66 74 0a 09 4c 4f | 43 4d 45 4e 55 09 4e 4d |raft..LO|CMENU.NM|
|000050c0| 5f 53 55 42 2c 09 20 20 | 4d 4e 53 5f 50 52 4a 5f |_SUB,. |MNS_PRJ_|
|000050d0| 50 52 49 4e 54 5f 4e 4c | 51 2c 30 2c 30 2c 4d 4e |PRINT_NL|Q,0,0,MN|
|000050e0| 53 5f 50 52 4a 5f 50 52 | 49 4e 54 5f 4e 4c 51 20 |S_PRJ_PR|INT_NLQ |
|000050f0| 20 3b 20 20 20 20 20 4e | 4c 51 0a 09 4c 4f 43 4d | ; N|LQ..LOCM|
|00005100| 45 4e 55 09 4e 4d 5f 49 | 54 45 4d 2c 20 20 4e 4d |ENU.NM_I|TEM, NM|
|00005110| 5f 42 41 52 4c 41 42 45 | 4c 2c 09 30 2c 09 30 2c |_BARLABE|L,.0,.0,|
|00005120| 09 30 09 3b 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.0.; ---|--------|
|00005130| 0a 09 4c 4f 43 4d 45 4e | 55 09 4e 4d 5f 49 54 45 |..LOCMEN|U.NM_ITE|
|00005140| 4d 2c 20 20 4d 4e 49 5f | 50 52 4a 5f 41 42 4f 55 |M, MNI_|PRJ_ABOU|
|00005150| 54 2c 30 2c 09 30 2c 4d | 4e 49 5f 50 52 4a 5f 41 |T,0,.0,M|NI_PRJ_A|
|00005160| 42 4f 55 54 09 3b 20 41 | 62 6f 75 74 20 20 20 5b |BOUT.; A|bout [|
|00005170| 3f 5d 0a 09 4c 4f 43 4d | 45 4e 55 20 4e 4d 5f 49 |?]..LOCM|ENU NM_I|
|00005180| 54 45 4d 2c 20 20 4d 4e | 49 5f 50 52 4a 5f 51 55 |TEM, MN|I_PRJ_QU|
|00005190| 49 54 2c 09 30 2c 09 30 | 2c 4d 4e 49 5f 50 52 4a |IT,.0,.0|,MNI_PRJ|
|000051a0| 5f 51 55 49 54 09 3b 20 | 51 75 69 74 20 20 20 20 |_QUIT.; |Quit |
|000051b0| 5b 51 5d 0a 0a 09 4c 4f | 43 4d 45 4e 55 09 4e 4d |[Q]...LO|CMENU.NM|
|000051c0| 5f 45 4e 44 2c 09 20 20 | 4e 55 4c 4c 2c 09 09 30 |_END,. |NULL,..0|
|000051d0| 2c 09 30 2c 09 30 0a 0a | 3b 2d 2d 2d 2d 2d 2d 2d |,.0,.0..|;-------|
|000051e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000051f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 20 42 53 |--------|----- BS|
|00005200| 53 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |S ------|--------|
|00005210| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005220| 2d 2d 2d 2d 2d 2d 0a 09 | 53 45 43 54 49 4f 4e 09 |------..|SECTION.|
|00005230| 4d 65 6d 54 65 73 74 5f | 42 53 53 2c 42 53 53 0a |MemTest_|BSS,BSS.|
|00005240| 09 0a 09 53 54 52 55 43 | 54 55 52 45 09 4d 65 6d |...STRUC|TURE.Mem|
|00005250| 54 65 73 74 5f 42 53 53 | 2c 30 0a 09 09 4c 4f 4e |Test_BSS|,0...LON|
|00005260| 47 09 57 42 4d 65 73 73 | 61 67 65 0a 0a 09 09 4c |G.WBMess|age....L|
|00005270| 4f 4e 47 09 73 63 72 65 | 65 6e 09 09 3b 20 4c 6f |ONG.scre|en..; Lo|
|00005280| 63 6b 65 64 20 70 75 62 | 6c 69 63 20 73 63 72 65 |cked pub|lic scre|
|00005290| 65 6e 0a 09 09 4c 4f 4e | 47 09 70 72 69 76 5f 69 |en...LON|G.priv_i|
|000052a0| 6e 66 6f 09 3b 20 50 72 | 69 76 61 74 65 49 6e 66 |nfo.; Pr|ivateInf|
|000052b0| 6f 20 66 72 6f 6d 20 47 | 55 5f 4c 61 79 6f 75 74 |o from G|U_Layout|
|000052c0| 47 61 64 67 65 74 73 41 | 0a 09 09 4c 4f 4e 47 09 |GadgetsA|...LONG.|
|000052d0| 6d 61 69 6e 5f 77 69 6e | 09 3b 20 54 68 65 20 70 |main_win|.; The p|
|000052e0| 72 6f 67 72 61 6d 27 73 | 20 6d 61 69 6e 20 77 69 |rogram's| main wi|
|000052f0| 6e 64 6f 77 0a 09 09 4c | 4f 4e 47 09 6d 65 6e 75 |ndow...L|ONG.menu|
|00005300| 73 74 72 69 70 09 3b 20 | 4d 65 6e 75 73 20 66 6f |strip.; |Menus fo|
|00005310| 72 20 6d 61 69 6e 20 77 | 69 6e 64 6f 77 0a 09 09 |r main w|indow...|
|00005320| 53 54 52 55 43 54 09 46 | 6d 74 50 61 72 61 6d 73 |STRUCT.F|mtParams|
|00005330| 2c 31 32 09 3b 20 33 20 | 6c 6f 6e 67 77 6f 72 64 |,12.; 3 |longword|
|00005340| 73 20 66 6f 72 20 74 65 | 78 74 20 66 6f 72 6d 61 |s for te|xt forma|
|00005350| 74 74 69 6e 67 0a 09 4c | 41 42 45 4c 09 42 53 53 |tting..L|ABEL.BSS|
|00005360| 5f 53 49 5a 45 4f 46 0a | 09 09 0a 42 53 53 5f 44 |_SIZEOF.|...BSS_D|
|00005370| 61 74 61 3a 09 64 73 2e | 62 09 42 53 53 5f 53 49 |ata:.ds.|b.BSS_SI|
|00005380| 5a 45 4f 46 0a | |ZEOF. | |
+--------+-------------------------+-------------------------+--------+--------+
