home *** CD-ROM | disk | FTP | other *** search
Unknown | 1995-04-20 | 16.2 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
| |
100%
| TrID
| Sybase iAnywhere database files
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| f9 fa f9 fa 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 09 69 6e 63 |........|.....inc|
|00000030| 64 69 72 09 22 69 6e 63 | 6c 75 64 65 3a 22 0a 09 |dir."inc|lude:"..|
|00000040| 69 6e 63 6c 75 64 65 09 | 22 6c 69 62 72 61 72 69 |include.|"librari|
|00000050| 65 73 2f 67 61 64 74 6f | 6f 6c 73 2e 69 22 0a 09 |es/gadto|ols.i"..|
|00000060| 69 6e 63 6c 75 64 65 09 | 22 65 78 65 63 2f 65 78 |include.|"exec/ex|
|00000070| 65 63 62 61 73 65 2e 69 | 22 0a 0a 09 69 6e 63 6c |ecbase.i|"...incl|
|00000080| 75 64 65 09 22 6c 69 62 | 72 61 72 69 65 73 2f 67 |ude."lib|raries/g|
|00000090| 61 64 75 74 69 6c 2e 69 | 22 0a 09 69 6e 63 6c 75 |adutil.i|"..inclu|
|000000a0| 64 65 09 22 6c 69 62 72 | 61 72 69 65 73 2f 67 61 |de."libr|aries/ga|
|000000b0| 64 75 74 69 6c 5f 6c 69 | 62 2e 69 22 0a 09 0a 09 |dutil_li|b.i"....|
|000000c0| 69 6e 63 6c 75 64 65 09 | 22 4c 56 4f 73 2e 69 22 |include.|"LVOs.i"|
|000000d0| 0a 0a 3b 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..;-----|--------|
|000000e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000100| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000110| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000120| 0a 4e 45 58 54 44 52 49 | 56 45 5f 47 41 44 3a 09 |.NEXTDRI|VE_GAD:.|
|00000130| 65 71 75 09 31 0a 50 52 | 45 56 44 52 49 56 45 5f |equ.1.PR|EVDRIVE_|
|00000140| 47 41 44 3a 09 65 71 75 | 09 32 0a 52 45 51 55 45 |GAD:.equ|.2.REQUE|
|00000150| 53 54 45 52 5f 47 41 44 | 3a 09 65 71 75 09 33 0a |STER_GAD|:.equ.3.|
|00000160| 43 59 43 4c 45 5f 47 41 | 44 3a 09 65 71 75 09 34 |CYCLE_GA|D:.equ.4|
|00000170| 0a 4d 58 5f 47 41 44 3a | 09 09 65 71 75 09 35 0a |.MX_GAD:|..equ.5.|
|00000180| 43 41 4e 43 45 4c 5f 47 | 41 44 3a 09 65 71 75 09 |CANCEL_G|AD:.equ.|
|00000190| 36 0a 53 54 52 49 4e 47 | 5f 47 41 44 3a 09 65 71 |6.STRING|_GAD:.eq|
|000001a0| 75 09 37 0a 49 4e 54 5f | 47 41 44 3a 09 65 71 75 |u.7.INT_|GAD:.equ|
|000001b0| 09 38 0a 43 48 45 43 4b | 5f 47 41 44 3a 09 65 71 |.8.CHECK|_GAD:.eq|
|000001c0| 75 09 39 0a 4c 49 53 54 | 5f 47 41 44 3a 09 65 71 |u.9.LIST|_GAD:.eq|
|000001d0| 75 09 31 30 0a 53 4c 49 | 44 45 52 5f 47 41 44 3a |u.10.SLI|DER_GAD:|
|000001e0| 09 65 71 75 09 31 31 0a | 53 43 52 4f 4c 4c 45 52 |.equ.11.|SCROLLER|
|000001f0| 5f 47 41 44 3a 09 65 71 | 75 09 31 32 0a 50 41 4c |_GAD:.eq|u.12.PAL|
|00000200| 45 54 54 45 5f 47 41 44 | 3a 09 65 71 75 09 31 33 |ETTE_GAD|:.equ.13|
|00000210| 0a 0a 3b 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..;-----|--------|
|00000220| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000230| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000240| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000250| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000260| 0a 0a 4d 61 69 6e 3a 09 | 6c 65 61 2e 6c 09 42 53 |..Main:.|lea.l.BS|
|00000270| 53 5f 44 61 74 61 73 2c | 61 35 0a 09 6d 6f 76 65 |S_Datas,|a5..move|
|00000280| 2e 6c 09 5f 41 62 73 45 | 78 65 63 42 61 73 65 2e |.l._AbsE|xecBase.|
|00000290| 77 2c 61 36 0a 0a 09 6d | 6f 76 65 2e 6c 09 44 65 |w,a6...m|ove.l.De|
|000002a0| 76 69 63 65 4c 69 73 74 | 28 61 36 29 2c 4c 76 47 |viceList|(a6),LvG|
|000002b0| 61 64 54 61 67 73 2b 34 | 20 3b 20 53 65 74 20 6c |adTags+4| ; Set l|
|000002c0| 69 73 74 20 70 6f 69 6e | 74 65 72 20 66 6f 72 20 |ist poin|ter for |
|000002d0| 4c 69 73 74 56 69 65 77 | 20 67 61 64 67 65 74 0a |ListView| gadget.|
|000002e0| 0a 09 6c 65 61 2e 6c 09 | 4c 69 62 50 74 72 73 28 |..lea.l.|LibPtrs(|
|000002f0| 70 63 29 2c 61 32 0a 09 | 6d 6f 76 65 2e 77 09 28 |pc),a2..|move.w.(|
|00000300| 61 32 29 2b 2c 64 32 0a | 2e 4f 70 65 6e 4c 69 62 |a2)+,d2.|.OpenLib|
|00000310| 3a 09 09 09 09 3b 20 4f | 70 65 6e 20 61 6c 6c 20 |:....; O|pen all |
|00000320| 72 65 71 75 69 72 65 64 | 20 6c 69 62 72 61 72 69 |required| librari|
|00000330| 65 73 0a 09 6d 6f 76 65 | 2e 6c 09 28 61 32 29 2c |es..move|.l.(a2),|
|00000340| 61 31 0a 09 6d 6f 76 65 | 71 2e 6c 09 23 33 37 2c |a1..move|q.l.#37,|
|00000350| 64 30 0a 09 43 61 6c 6c | 4c 69 62 09 4f 70 65 6e |d0..Call|Lib.Open|
|00000360| 4c 69 62 72 61 72 79 0a | 09 6d 6f 76 65 2e 6c 09 |Library.|.move.l.|
|00000370| 64 30 2c 28 61 32 29 2b | 0a 09 64 62 65 71 09 64 |d0,(a2)+|..dbeq.d|
|00000380| 32 2c 2e 4f 70 65 6e 4c | 69 62 0a 09 62 65 71 2e |2,.OpenL|ib..beq.|
|00000390| 73 09 2e 43 6c 6f 73 65 | 4c 69 62 73 0a 0a 09 6c |s..Close|Libs...l|
|000003a0| 65 61 2e 6c 09 67 61 64 | 75 74 69 6c 6e 61 6d 65 |ea.l.gad|utilname|
|000003b0| 28 70 63 29 2c 61 31 0a | 09 6d 6f 76 65 71 2e 6c |(pc),a1.|.moveq.l|
|000003c0| 09 23 33 36 2c 64 30 0a | 09 43 61 6c 6c 4c 69 62 |.#36,d0.|.CallLib|
|000003d0| 09 4f 70 65 6e 4c 69 62 | 72 61 72 79 0a 09 6d 6f |.OpenLib|rary..mo|
|000003e0| 76 65 2e 6c 09 64 30 2c | 47 55 74 69 6c 42 61 73 |ve.l.d0,|GUtilBas|
|000003f0| 65 0a 09 62 65 71 2e 73 | 09 2e 43 6c 6f 73 65 4c |e..beq.s|..CloseL|
|00000400| 69 62 73 09 0a 0a 09 62 | 73 72 2e 73 09 4d 79 50 |ibs....b|sr.s.MyP|
|00000410| 72 6f 67 72 61 6d 0a 0a | 09 6d 6f 76 65 2e 6c 09 |rogram..|.move.l.|
|00000420| 47 55 74 69 6c 42 61 73 | 65 28 70 63 29 2c 61 31 |GUtilBas|e(pc),a1|
|00000430| 0a 09 43 61 6c 6c 4c 69 | 62 09 43 6c 6f 73 65 4c |..CallLi|b.CloseL|
|00000440| 69 62 72 61 72 79 0a 2e | 43 6c 6f 73 65 4c 69 62 |ibrary..|CloseLib|
|00000450| 73 3a 0a 09 6c 65 61 2e | 6c 09 4c 69 62 50 74 72 |s:..lea.|l.LibPtr|
|00000460| 73 28 70 63 29 2c 61 32 | 09 09 3b 20 43 6c 6f 73 |s(pc),a2|..; Clos|
|00000470| 65 20 61 6c 6c 20 6c 69 | 62 72 61 72 69 65 73 20 |e all li|braries |
|00000480| 74 68 61 74 20 77 65 72 | 65 20 6f 70 65 6e 65 64 |that wer|e opened|
|00000490| 0a 09 6d 6f 76 65 2e 77 | 09 28 61 32 29 2b 2c 64 |..move.w|.(a2)+,d|
|000004a0| 32 0a 2e 43 6c 6f 73 65 | 4c 69 62 3a 0a 09 6d 6f |2..Close|Lib:..mo|
|000004b0| 76 65 2e 6c 09 28 61 32 | 29 2b 2c 64 30 0a 09 62 |ve.l.(a2|)+,d0..b|
|000004c0| 65 71 2e 73 09 2e 4e 6f | 74 4f 70 65 6e 65 64 0a |eq.s..No|tOpened.|
|000004d0| 09 6d 6f 76 65 2e 6c 09 | 64 30 2c 61 31 0a 09 43 |.move.l.|d0,a1..C|
|000004e0| 61 6c 6c 4c 69 62 09 43 | 6c 6f 73 65 4c 69 62 72 |allLib.C|loseLibr|
|000004f0| 61 72 79 0a 09 64 62 72 | 61 09 64 32 2c 2e 43 6c |ary..dbr|a.d2,.Cl|
|00000500| 6f 73 65 4c 69 62 0a 2e | 4e 6f 74 4f 70 65 6e 65 |oseLib..|NotOpene|
|00000510| 64 3a 0a 09 6d 6f 76 65 | 71 2e 6c 09 23 30 2c 64 |d:..move|q.l.#0,d|
|00000520| 30 0a 09 72 74 73 0a 0a | 3b 2d 2d 2d 2d 2d 2d 2d |0..rts..|;-------|
|00000530| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000540| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 20 4d 61 69 6e 20 |--------|-- Main |
|00000550| 70 72 6f 67 72 61 6d 20 | 2d 2d 2d 2d 2d 2d 2d 2d |program |--------|
|00000560| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000570| 2d 2d 2d 2d 2d 2d 0a 4d | 79 50 72 6f 67 72 61 6d |------.M|yProgram|
|00000580| 3a 0a 09 6d 6f 76 65 6d | 2e 6c 09 64 30 2d 61 36 |:..movem|.l.d0-a6|
|00000590| 2c 2d 28 73 70 29 0a 09 | 62 73 72 2e 62 09 53 65 |,-(sp)..|bsr.b.Se|
|000005a0| 74 75 70 53 63 72 65 65 | 6e 09 09 3b 20 50 72 65 |tupScree|n..; Pre|
|000005b0| 70 61 72 65 20 73 63 72 | 65 65 6e 20 66 6f 72 20 |pare scr|een for |
|000005c0| 67 61 64 74 6f 6f 6c 73 | 0a 09 62 65 71 2e 73 09 |gadtools|..beq.s.|
|000005d0| 2e 66 72 65 65 73 63 72 | 65 65 6e 09 09 3b 20 45 |.freescr|een..; E|
|000005e0| 72 72 6f 72 21 0a 0a 09 | 6c 65 61 2e 6c 09 47 61 |rror!...|lea.l.Ga|
|000005f0| 64 67 65 74 44 61 74 61 | 73 31 28 70 63 29 2c 61 |dgetData|s1(pc),a|
|00000600| 33 09 3b 20 47 65 74 20 | 70 6f 69 6e 74 65 72 20 |3.; Get |pointer |
|00000610| 74 6f 20 67 61 64 67 65 | 74 20 64 61 74 61 73 0a |to gadge|t datas.|
|00000620| 09 73 75 62 61 2e 6c 09 | 61 34 2c 61 34 09 09 09 |.suba.l.|a4,a4...|
|00000630| 3b 20 44 6f 6e 27 74 20 | 73 61 76 65 20 70 6f 69 |; Don't |save poi|
|00000640| 6e 74 65 72 73 0a 09 6d | 6f 76 65 2e 6c 09 67 74 |nters..m|ove.l.gt|
|00000650| 5f 67 61 64 28 61 35 29 | 2c 61 30 09 09 3b 20 50 |_gad(a5)|,a0..; P|
|00000660| 72 65 76 69 6f 75 73 20 | 67 61 64 67 65 74 0a 09 |revious |gadget..|
|00000670| 62 73 72 2e 77 09 4d 61 | 6b 65 47 54 47 61 64 4c |bsr.w.Ma|keGTGadL|
|00000680| 69 73 74 0a 09 62 65 71 | 2e 73 09 2e 66 72 65 65 |ist..beq|.s..free|
|00000690| 73 63 72 65 65 6e 09 09 | 3b 20 45 72 72 6f 72 21 |screen..|; Error!|
|000006a0| 0a 0a 09 6c 65 61 2e 6c | 09 47 61 64 67 65 74 44 |...lea.l|.GadgetD|
|000006b0| 61 74 61 73 32 28 70 63 | 29 2c 61 33 09 3b 20 47 |atas2(pc|),a3.; G|
|000006c0| 65 74 20 70 6f 69 6e 74 | 65 72 20 74 6f 20 67 61 |et point|er to ga|
|000006d0| 64 67 65 74 20 64 61 74 | 61 73 0a 09 6c 65 61 2e |dget dat|as..lea.|
|000006e0| 6c 09 6d 78 5f 67 61 64 | 28 61 35 29 2c 61 34 09 |l.mx_gad|(a5),a4.|
|000006f0| 09 3b 20 53 61 76 65 20 | 70 6f 69 6e 74 65 72 73 |.; Save |pointers|
|00000700| 20 74 6f 20 63 72 65 61 | 74 65 64 20 67 61 64 67 | to crea|ted gadg|
|00000710| 65 74 73 0a 09 6d 6f 76 | 65 2e 6c 09 67 74 5f 67 |ets..mov|e.l.gt_g|
|00000720| 61 64 28 61 35 29 2c 61 | 30 09 09 3b 20 50 72 65 |ad(a5),a|0..; Pre|
|00000730| 76 69 6f 75 73 20 67 61 | 64 67 65 74 0a 09 62 73 |vious ga|dget..bs|
|00000740| 72 2e 77 09 4d 61 6b 65 | 47 54 47 61 64 4c 69 73 |r.w.Make|GTGadLis|
|00000750| 74 0a 09 62 65 71 2e 73 | 09 2e 66 72 65 65 73 63 |t..beq.s|..freesc|
|00000760| 72 65 65 6e 09 09 3b 20 | 45 72 72 6f 72 21 0a 09 |reen..; |Error!..|
|00000770| 0a 09 73 75 62 61 2e 6c | 09 61 30 2c 61 30 09 09 |..suba.l|.a0,a0..|
|00000780| 09 3b 20 4e 6f 20 4e 65 | 77 57 69 6e 64 6f 77 20 |.; No Ne|wWindow |
|00000790| 73 74 72 75 63 74 75 72 | 65 0a 09 6c 65 61 2e 6c |structur|e..lea.l|
|000007a0| 09 77 69 6e 74 61 67 73 | 28 70 63 29 2c 61 31 09 |.wintags|(pc),a1.|
|000007b0| 09 3b 20 54 61 67 20 70 | 6f 69 6e 74 65 72 0a 09 |.; Tag p|ointer..|
|000007c0| 6d 6f 76 65 2e 6c 09 49 | 6e 74 75 69 42 61 73 65 |move.l.I|ntuiBase|
|000007d0| 28 70 63 29 2c 61 36 0a | 09 43 61 6c 6c 4c 69 62 |(pc),a6.|.CallLib|
|000007e0| 09 4f 70 65 6e 57 69 6e | 64 6f 77 54 61 67 4c 69 |.OpenWin|dowTagLi|
|000007f0| 73 74 09 3b 20 4f 70 65 | 6e 20 74 68 65 20 77 69 |st.; Ope|n the wi|
|00000800| 6e 64 6f 77 0a 09 6d 6f | 76 65 2e 6c 09 64 30 2c |ndow..mo|ve.l.d0,|
|00000810| 6d 61 69 6e 5f 77 69 6e | 28 61 35 29 0a 09 62 65 |main_win|(a5)..be|
|00000820| 71 2e 73 09 2e 66 72 65 | 65 73 63 72 65 65 6e 09 |q.s..fre|escreen.|
|00000830| 09 3b 20 57 69 6e 64 6f | 77 20 66 61 69 6c 65 64 |.; Windo|w failed|
|00000840| 20 74 6f 20 6f 70 65 6e | 0a 0a 09 6d 6f 76 65 2e | to open|...move.|
|00000850| 6c 09 64 30 2c 61 30 09 | 09 09 3b 20 57 69 6e 64 |l.d0,a0.|..; Wind|
|00000860| 6f 77 20 70 6f 69 6e 74 | 65 72 20 74 6f 20 41 30 |ow point|er to A0|
|00000870| 0a 0a 09 6d 6f 76 65 2e | 6c 09 77 64 5f 55 73 65 |...move.|l.wd_Use|
|00000880| 72 50 6f 72 74 28 61 30 | 29 2c 61 31 09 3b 20 47 |rPort(a0|),a1.; G|
|00000890| 65 74 20 75 73 65 72 70 | 6f 72 74 20 66 6f 72 20 |et userp|ort for |
|000008a0| 77 69 6e 64 6f 77 0a 09 | 6d 6f 76 65 71 2e 6c 09 |window..|moveq.l.|
|000008b0| 23 31 2c 64 30 0a 09 6d | 6f 76 65 71 2e 6c 09 23 |#1,d0..m|oveq.l.#|
|000008c0| 30 2c 64 31 0a 09 6d 6f | 76 65 2e 62 09 4d 50 5f |0,d1..mo|ve.b.MP_|
|000008d0| 53 49 47 42 49 54 28 61 | 31 29 2c 64 31 09 3b 20 |SIGBIT(a|1),d1.; |
|000008e0| 4d 61 6b 65 20 73 69 67 | 6e 61 6c 20 6d 61 73 6b |Make sig|nal mask|
|000008f0| 0a 09 6c 73 6c 2e 6c 09 | 64 31 2c 64 30 0a 09 6d |..lsl.l.|d1,d0..m|
|00000900| 6f 76 65 2e 6c 09 64 30 | 2c 4d 61 69 6e 57 69 6e |ove.l.d0|,MainWin|
|00000910| 53 69 67 4d 61 73 6b 28 | 61 35 29 09 3b 20 53 61 |SigMask(|a5).; Sa|
|00000920| 76 65 20 66 6f 72 20 6c | 61 74 65 72 20 75 73 65 |ve for l|ater use|
|00000930| 0a 09 0a 09 73 75 62 61 | 2e 6c 09 61 31 2c 61 31 |....suba|.l.a1,a1|
|00000940| 0a 09 6d 6f 76 65 2e 6c | 09 47 54 6f 6f 6c 73 42 |..move.l|.GToolsB|
|00000950| 61 73 65 28 70 63 29 2c | 61 36 0a 09 43 61 6c 6c |ase(pc),|a6..Call|
|00000960| 4c 69 62 09 47 54 5f 52 | 65 66 72 65 73 68 57 69 |Lib.GT_R|efreshWi|
|00000970| 6e 64 6f 77 09 3b 20 52 | 65 66 72 65 73 68 20 74 |ndow.; R|efresh t|
|00000980| 68 65 20 67 61 64 67 65 | 74 73 0a 0a 09 6d 6f 76 |he gadge|ts...mov|
|00000990| 65 2e 6c 09 6d 61 69 6e | 5f 77 69 6e 28 61 35 29 |e.l.main|_win(a5)|
|000009a0| 2c 61 30 0a 09 62 73 72 | 2e 77 09 70 72 6f 63 65 |,a0..bsr|.w.proce|
|000009b0| 73 73 5f 77 69 6e 64 6f | 77 5f 65 76 65 6e 74 73 |ss_windo|w_events|
|000009c0| 09 3b 20 57 61 69 74 20 | 66 6f 72 20 63 6c 6f 73 |.; Wait |for clos|
|000009d0| 65 20 67 61 64 67 65 74 | 0a 0a 2e 63 6c 6f 73 65 |e gadget|...close|
|000009e0| 77 69 6e 64 6f 77 3a 0a | 09 6d 6f 76 65 2e 6c 09 |window:.|.move.l.|
|000009f0| 6d 61 69 6e 5f 77 69 6e | 28 61 35 29 2c 61 30 09 |main_win|(a5),a0.|
|00000a00| 09 3b 20 43 6c 6f 73 65 | 20 6f 75 72 20 77 69 6e |.; Close| our win|
|00000a10| 64 6f 77 0a 09 6d 6f 76 | 65 2e 6c 09 49 6e 74 75 |dow..mov|e.l.Intu|
|00000a20| 69 42 61 73 65 28 70 63 | 29 2c 61 36 0a 09 43 61 |iBase(pc|),a6..Ca|
|00000a30| 6c 6c 4c 69 62 09 43 6c | 6f 73 65 57 69 6e 64 6f |llLib.Cl|oseWindo|
|00000a40| 77 0a 2e 66 72 65 65 73 | 63 72 65 65 6e 3a 0a 09 |w..frees|creen:..|
|00000a50| 62 73 72 2e 62 09 46 72 | 65 65 53 63 72 65 65 6e |bsr.b.Fr|eeScreen|
|00000a60| 0a 09 6d 6f 76 65 6d 2e | 6c 09 28 73 70 29 2b 2c |..movem.|l.(sp)+,|
|00000a70| 64 30 2d 61 36 0a 09 72 | 74 73 0a 0a 3b 2d 2d 2d |d0-a6..r|ts..;---|
|00000a80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 20 53 65 |--------|----- Se|
|00000a90| 74 20 75 70 20 61 20 73 | 63 72 65 65 6e 20 66 6f |t up a s|creen fo|
|00000aa0| 72 20 75 73 69 6e 67 20 | 67 61 64 74 6f 6f 6c 73 |r using |gadtools|
|00000ab0| 2e 6c 69 62 72 61 72 79 | 20 2d 2d 2d 2d 2d 2d 2d |.library| -------|
|00000ac0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0a 3b 20 52 65 73 |--------|--.; Res|
|00000ad0| 75 6c 74 3a 0a 3b 09 5a | 20 66 6c 61 67 20 73 65 |ult:.;.Z| flag se|
|00000ae0| 74 20 69 6e 20 53 52 20 | 69 66 20 61 6e 79 74 68 |t in SR |if anyth|
|00000af0| 69 6e 67 20 77 65 6e 74 | 20 77 72 6f 6e 67 0a 3b |ing went| wrong.;|
|00000b00| 0a 53 65 74 75 70 53 63 | 72 65 65 6e 3a 0a 09 6d |.SetupSc|reen:..m|
|00000b10| 6f 76 65 2e 6c 09 61 36 | 2c 2d 28 73 70 29 0a 09 |ove.l.a6|,-(sp)..|
|00000b20| 73 75 62 61 2e 6c 09 61 | 30 2c 61 30 09 09 09 3b |suba.l.a|0,a0...;|
|00000b30| 20 4c 6f 63 6b 20 64 65 | 66 61 75 6c 74 20 70 75 | Lock de|fault pu|
|00000b40| 62 6c 69 63 20 73 63 72 | 65 65 6e 0a 09 43 61 6c |blic scr|een..Cal|
|00000b50| 6c 4c 69 62 09 4c 6f 63 | 6b 50 75 62 53 63 72 65 |lLib.Loc|kPubScre|
|00000b60| 65 6e 2c 49 6e 74 75 69 | 42 61 73 65 28 70 63 29 |en,Intui|Base(pc)|
|00000b70| 0a 09 6d 6f 76 65 2e 6c | 09 64 30 2c 6d 79 73 63 |..move.l|.d0,mysc|
|00000b80| 09 09 09 3b 20 53 61 76 | 65 20 73 63 72 65 65 6e |...; Sav|e screen|
|00000b90| 20 70 6f 69 6e 74 65 72 | 20 69 6e 20 77 69 6e 64 | pointer| in wind|
|00000ba0| 6f 77 20 74 61 67 73 0a | 09 62 65 71 2e 73 09 2e |ow tags.|.beq.s..|
|00000bb0| 65 72 72 6f 72 0a 0a 09 | 6d 6f 76 65 2e 6c 09 64 |error...|move.l.d|
|00000bc0| 30 2c 61 30 0a 09 6c 65 | 61 2e 6c 09 45 6d 70 74 |0,a0..le|a.l.Empt|
|00000bd0| 79 54 61 67 28 70 63 29 | 2c 61 31 09 09 3b 20 50 |yTag(pc)|,a1..; P|
|00000be0| 6f 69 6e 74 65 72 20 74 | 6f 20 61 6e 20 65 6d 70 |ointer t|o an emp|
|00000bf0| 74 79 20 74 61 67 20 6c | 69 73 74 0a 09 6d 6f 76 |ty tag l|ist..mov|
|00000c00| 65 2e 6c 09 47 54 6f 6f | 6c 73 42 61 73 65 28 70 |e.l.GToo|lsBase(p|
|00000c10| 63 29 2c 61 36 09 3b 20 | 47 65 74 20 56 69 73 75 |c),a6.; |Get Visu|
|00000c20| 61 6c 49 6e 66 6f 20 66 | 6f 72 20 73 63 72 65 65 |alInfo f|or scree|
|00000c30| 6e 0a 09 43 61 6c 6c 4c | 69 62 09 47 65 74 56 69 |n..CallL|ib.GetVi|
|00000c40| 73 75 61 6c 49 6e 66 6f | 41 0a 09 6d 6f 76 65 2e |sualInfo|A..move.|
|00000c50| 6c 09 64 30 2c 76 69 5f | 69 6e 66 28 61 35 29 0a |l.d0,vi_|inf(a5).|
|00000c60| 09 62 65 71 2e 73 09 2e | 65 72 72 6f 72 09 09 0a |.beq.s..|error...|
|00000c70| 0a 09 6c 65 61 2e 6c 09 | 67 6c 69 73 74 28 70 63 |..lea.l.|glist(pc|
|00000c80| 29 2c 61 30 09 09 3b 20 | 43 72 65 61 74 65 20 66 |),a0..; |Create f|
|00000c90| 69 72 73 74 20 22 67 61 | 64 67 65 74 22 0a 09 43 |irst "ga|dget"..C|
|00000ca0| 61 6c 6c 4c 69 62 09 43 | 72 65 61 74 65 43 6f 6e |allLib.C|reateCon|
|00000cb0| 74 65 78 74 0a 09 6d 6f | 76 65 2e 6c 09 64 30 2c |text..mo|ve.l.d0,|
|00000cc0| 67 74 5f 67 61 64 28 61 | 35 29 0a 09 0a 09 6c 65 |gt_gad(a|5)....le|
|00000cd0| 61 2e 6c 09 67 74 5f 6e | 67 28 61 35 29 2c 61 31 |a.l.gt_n|g(a5),a1|
|00000ce0| 09 09 3b 20 47 65 74 20 | 70 6f 69 6e 74 65 72 20 |..; Get |pointer |
|00000cf0| 74 6f 20 74 68 65 20 4e | 65 77 47 61 64 67 65 74 |to the N|ewGadget|
|00000d00| 20 73 74 72 75 63 74 0a | 09 6d 6f 76 65 2e 6c 09 | struct.|.move.l.|
|00000d10| 76 69 5f 69 6e 66 28 61 | 35 29 2c 67 6e 67 5f 56 |vi_inf(a|5),gng_V|
|00000d20| 69 73 75 61 6c 49 6e 66 | 6f 28 61 31 29 0a 09 6d |isualInf|o(a1)..m|
|00000d30| 6f 76 65 2e 6c 09 23 54 | 6f 70 61 7a 38 30 2c 67 |ove.l.#T|opaz80,g|
|00000d40| 6e 67 5f 54 65 78 74 41 | 74 74 72 28 61 31 29 0a |ng_TextA|ttr(a1).|
|00000d50| 0a 09 6d 6f 76 65 71 2e | 6c 09 23 31 2c 64 30 09 |..moveq.|l.#1,d0.|
|00000d60| 09 09 3b 20 41 64 6a 75 | 73 74 20 74 6f 70 6d 6f |..; Adju|st topmo|
|00000d70| 73 74 20 67 61 64 67 65 | 74 20 74 6f 20 66 6f 6e |st gadge|t to fon|
|00000d80| 74 20 73 69 7a 65 0a 09 | 6d 6f 76 65 2e 6c 09 6d |t size..|move.l.m|
|00000d90| 79 73 63 28 70 63 29 2c | 61 31 0a 09 61 64 64 2e |ysc(pc),|a1..add.|
|00000da0| 62 09 73 63 5f 57 42 6f | 72 54 6f 70 28 61 31 29 |b.sc_WBo|rTop(a1)|
|00000db0| 2c 64 30 09 3b 20 47 65 | 74 20 6d 79 73 63 2d 3e |,d0.; Ge|t mysc->|
|00000dc0| 57 42 6f 72 54 6f 70 20 | 2b 0a 09 6d 6f 76 65 2e |WBorTop |+..move.|
|00000dd0| 6c 09 73 63 5f 46 6f 6e | 74 28 61 31 29 2c 61 30 |l.sc_Fon|t(a1),a0|
|00000de0| 0a 09 61 64 64 2e 77 09 | 74 61 5f 59 53 69 7a 65 |..add.w.|ta_YSize|
|00000df0| 28 61 30 29 2c 64 30 09 | 09 3b 20 20 6d 79 73 63 |(a0),d0.|.; mysc|
|00000e00| 2d 3e 46 6f 6e 74 2d 3e | 74 61 5f 59 53 69 7a 65 |->Font->|ta_YSize|
|00000e10| 0a 09 6d 6f 76 65 2e 77 | 09 64 30 2c 54 6f 70 42 |..move.w|.d0,TopB|
|00000e20| 6f 72 4f 66 66 73 28 61 | 35 29 09 3b 20 53 61 76 |orOffs(a|5).; Sav|
|00000e30| 65 20 6f 66 66 73 65 74 | 20 76 61 6c 75 65 20 66 |e offset| value f|
|00000e40| 6f 72 20 6c 61 74 65 72 | 20 75 73 65 0a 2e 65 72 |or later| use..er|
|00000e50| 72 6f 72 3a 0a 09 6d 6f | 76 65 2e 6c 09 28 73 70 |ror:..mo|ve.l.(sp|
|00000e60| 29 2b 2c 61 36 0a 09 72 | 74 73 09 0a 0a 3b 2d 2d |)+,a6..r|ts...;--|
|00000e70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 20 43 |--------|------ C|
|00000e80| 6c 65 61 6e 20 75 70 20 | 61 66 74 65 72 20 75 73 |lean up |after us|
|00000e90| 69 6e 67 20 73 63 72 65 | 65 6e 20 66 6f 72 20 67 |ing scre|en for g|
|00000ea0| 61 64 74 6f 6f 6c 73 20 | 2d 2d 2d 2d 2d 2d 2d 2d |adtools |--------|
|00000eb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0a 3b 0a 46 72 |--------|---.;.Fr|
|00000ec0| 65 65 53 63 72 65 65 6e | 3a 0a 09 6d 6f 76 65 2e |eeScreen|:..move.|
|00000ed0| 6c 09 61 36 2c 2d 28 73 | 70 29 0a 09 6d 6f 76 65 |l.a6,-(s|p)..move|
|00000ee0| 2e 6c 09 67 6c 69 73 74 | 28 70 63 29 2c 61 30 09 |.l.glist|(pc),a0.|
|00000ef0| 09 3b 20 44 65 61 6c 6c | 6f 63 61 74 65 20 6d 65 |.; Deall|ocate me|
|00000f00| 6d 20 75 73 65 64 20 66 | 6f 72 20 67 61 64 67 65 |m used f|or gadge|
|00000f10| 74 73 0a 09 43 61 6c 6c | 4c 69 62 09 47 55 5f 46 |ts..Call|Lib.GU_F|
|00000f20| 72 65 65 47 61 64 67 65 | 74 73 2c 47 55 74 69 6c |reeGadge|ts,GUtil|
|00000f30| 42 61 73 65 28 70 63 29 | 0a 2e 46 72 65 65 56 69 |Base(pc)|..FreeVi|
|00000f40| 73 75 61 6c 3a 0a 09 6d | 6f 76 65 2e 6c 09 76 69 |sual:..m|ove.l.vi|
|00000f50| 5f 69 6e 66 28 61 35 29 | 2c 61 30 09 09 3b 20 46 |_inf(a5)|,a0..; F|
|00000f60| 72 65 65 20 74 68 65 20 | 56 69 73 75 61 6c 49 6e |ree the |VisualIn|
|00000f70| 66 6f 20 73 74 72 75 63 | 74 75 72 65 0a 09 43 61 |fo struc|ture..Ca|
|00000f80| 6c 6c 4c 69 62 09 46 72 | 65 65 56 69 73 75 61 6c |llLib.Fr|eeVisual|
|00000f90| 49 6e 66 6f 41 2c 47 54 | 6f 6f 6c 73 42 61 73 65 |InfoA,GT|oolsBase|
|00000fa0| 28 70 63 29 0a 2e 55 6e | 6c 6f 63 6b 53 63 3a 0a |(pc)..Un|lockSc:.|
|00000fb0| 09 73 75 62 61 2e 6c 09 | 61 30 2c 61 30 09 09 09 |.suba.l.|a0,a0...|
|00000fc0| 3b 20 55 6e 6c 6f 63 6b | 20 74 68 65 20 64 65 66 |; Unlock| the def|
|00000fd0| 61 75 6c 74 20 70 75 62 | 6c 69 63 20 73 63 72 65 |ault pub|lic scre|
|00000fe0| 65 6e 0a 09 6d 6f 76 65 | 2e 6c 09 6d 79 73 63 28 |en..move|.l.mysc(|
|00000ff0| 70 63 29 2c 64 30 09 09 | 3b 20 43 68 65 63 6b 20 |pc),d0..|; Check |
|00001000| 69 66 20 70 75 62 73 63 | 72 65 65 6e 20 70 6f 69 |if pubsc|reen poi|
|00001010| 6e 74 65 72 20 69 73 20 | 76 61 6c 69 64 0a 09 62 |nter is |valid..b|
|00001020| 65 71 2e 73 09 2e 4e 6f | 53 63 72 65 65 6e 09 09 |eq.s..No|Screen..|
|00001030| 3b 20 45 78 69 74 20 69 | 66 20 6e 6f 20 6c 6f 63 |; Exit i|f no loc|
|00001040| 6b 65 64 20 70 75 62 6c | 69 63 20 73 63 72 65 65 |ked publ|ic scree|
|00001050| 6e 0a 09 6d 6f 76 65 2e | 6c 09 64 30 2c 61 31 09 |n..move.|l.d0,a1.|
|00001060| 09 09 3b 20 55 6e 6c 6f | 63 6b 20 74 68 65 20 70 |..; Unlo|ck the p|
|00001070| 75 62 6c 69 63 20 73 63 | 72 65 65 6e 0a 09 6d 6f |ublic sc|reen..mo|
|00001080| 76 65 2e 6c 09 49 6e 74 | 75 69 42 61 73 65 28 70 |ve.l.Int|uiBase(p|
|00001090| 63 29 2c 61 36 0a 09 43 | 61 6c 6c 4c 69 62 09 55 |c),a6..C|allLib.U|
|000010a0| 6e 6c 6f 63 6b 50 75 62 | 53 63 72 65 65 6e 0a 2e |nlockPub|Screen..|
|000010b0| 4e 6f 53 63 72 65 65 6e | 3a 0a 09 6c 65 61 2e 6c |NoScreen|:..lea.l|
|000010c0| 09 52 65 6d 65 6d 62 65 | 72 4b 65 79 28 61 35 29 |.Remembe|rKey(a5)|
|000010d0| 2c 61 30 09 3b 20 41 6c | 77 61 79 73 20 73 61 66 |,a0.; Al|ways saf|
|000010e0| 65 20 74 6f 20 63 61 6c | 6c 20 46 72 65 65 52 65 |e to cal|l FreeRe|
|000010f0| 6d 65 6d 62 65 72 0a 09 | 6d 6f 76 65 71 2e 6c 09 |member..|moveq.l.|
|00001100| 23 54 52 55 45 2c 64 30 | 0a 09 43 61 6c 6c 4c 69 |#TRUE,d0|..CallLi|
|00001110| 62 09 46 72 65 65 52 65 | 6d 65 6d 62 65 72 0a 09 |b.FreeRe|member..|
|00001120| 6d 6f 76 65 2e 6c 09 28 | 73 70 29 2b 2c 61 36 0a |move.l.(|sp)+,a6.|
|00001130| 09 72 74 73 0a 0a 3b 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.rts..;-|--------|
|00001140| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001150| 2d 2d 2d 20 43 72 65 61 | 74 65 20 73 6f 6d 65 20 |--- Crea|te some |
|00001160| 67 61 64 67 65 74 73 20 | 2d 2d 2d 2d 2d 2d 2d 2d |gadgets |--------|
|00001170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001180| 2d 2d 2d 2d 2d 0a 3b 20 | 49 6e 70 75 74 73 3a 0a |-----.; |Inputs:.|
|00001190| 3b 09 41 30 20 2d 20 50 | 6f 69 6e 74 65 72 20 74 |;.A0 - P|ointer t|
|000011a0| 6f 20 70 72 65 76 69 6f | 75 73 20 67 61 64 67 65 |o previo|us gadge|
|000011b0| 74 20 28 66 72 6f 6d 20 | 43 72 65 61 74 65 43 6f |t (from |CreateCo|
|000011c0| 6e 74 65 78 74 20 69 66 | 20 66 69 72 73 74 20 67 |ntext if| first g|
|000011d0| 61 64 67 65 74 29 0a 3b | 09 41 33 20 2d 20 50 6f |adget).;|.A3 - Po|
|000011e0| 69 6e 74 65 72 20 74 6f | 20 67 61 64 67 65 74 20 |inter to| gadget |
|000011f0| 64 61 74 61 73 0a 3b 09 | 41 34 20 2d 20 50 6f 69 |datas.;.|A4 - Poi|
|00001200| 6e 74 65 72 20 74 6f 20 | 73 74 6f 72 61 67 65 20 |nter to |storage |
|00001210| 66 6f 72 20 67 61 64 67 | 65 74 20 70 6f 69 6e 74 |for gadg|et point|
|00001220| 65 72 73 20 6f 72 20 4e | 55 4c 4c 20 66 6f 72 20 |ers or N|ULL for |
|00001230| 6e 6f 20 73 74 6f 72 61 | 67 65 0a 3b 2d 2d 2d 2d |no stora|ge.;----|
|00001240| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001250| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001260| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001270| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001280| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0a 4d 61 6b 65 47 |--------|--.MakeG|
|00001290| 54 47 61 64 4c 69 73 74 | 3a 0a 09 6d 6f 76 65 6d |TGadList|:..movem|
|000012a0| 2e 6c 09 64 30 2d 64 33 | 2f 61 30 2d 61 34 2f 61 |.l.d0-d3|/a0-a4/a|
|000012b0| 36 2c 2d 28 73 70 29 0a | 09 6d 6f 76 65 2e 77 09 |6,-(sp).|.move.w.|
|000012c0| 28 61 33 29 2b 2c 64 32 | 0a 09 73 75 62 71 2e 77 |(a3)+,d2|..subq.w|
|000012d0| 09 23 31 2c 64 32 0a 09 | 6d 6f 76 65 2e 6c 09 47 |.#1,d2..|move.l.G|
|000012e0| 55 74 69 6c 42 61 73 65 | 28 70 63 29 2c 61 36 0a |UtilBase|(pc),a6.|
|000012f0| 2e 4d 61 6b 65 47 61 64 | 67 65 74 3a 0a 09 6c 65 |.MakeGad|get:..le|
|00001300| 61 2e 6c 09 67 74 5f 6e | 67 28 61 35 29 2c 61 31 |a.l.gt_n|g(a5),a1|
|00001310| 09 09 3b 20 4e 65 77 47 | 61 64 67 65 74 20 73 74 |..; NewG|adget st|
|00001320| 72 75 63 74 75 72 65 0a | 09 6d 6f 76 65 2e 77 09 |ructure.|.move.w.|
|00001330| 28 61 33 29 2b 2c 67 6e | 67 5f 4c 65 66 74 45 64 |(a3)+,gn|g_LeftEd|
|00001340| 67 65 28 61 31 29 0a 09 | 6d 6f 76 65 2e 77 09 54 |ge(a1)..|move.w.T|
|00001350| 6f 70 42 6f 72 4f 66 66 | 73 28 61 35 29 2c 64 30 |opBorOff|s(a5),d0|
|00001360| 0a 09 6d 6f 76 65 2e 77 | 09 28 61 33 29 2b 2c 67 |..move.w|.(a3)+,g|
|00001370| 6e 67 5f 54 6f 70 45 64 | 67 65 28 61 31 29 0a 09 |ng_TopEd|ge(a1)..|
|00001380| 61 64 64 2e 77 09 64 30 | 2c 67 6e 67 5f 54 6f 70 |add.w.d0|,gng_Top|
|00001390| 45 64 67 65 28 61 31 29 | 0a 09 6d 6f 76 65 2e 77 |Edge(a1)|..move.w|
|000013a0| 09 28 61 33 29 2b 2c 67 | 6e 67 5f 57 69 64 74 68 |.(a3)+,g|ng_Width|
|000013b0| 28 61 31 29 0a 09 6d 6f | 76 65 2e 77 09 28 61 33 |(a1)..mo|ve.w.(a3|
|000013c0| 29 2b 2c 67 6e 67 5f 48 | 65 69 67 68 74 28 61 31 |)+,gng_H|eight(a1|
|000013d0| 29 0a 09 6d 6f 76 65 2e | 77 09 28 61 33 29 2b 2c |)..move.|w.(a3)+,|
|000013e0| 67 6e 67 5f 47 61 64 67 | 65 74 49 44 28 61 31 29 |gng_Gadg|etID(a1)|
|000013f0| 0a 09 6d 6f 76 65 2e 6c | 09 28 61 33 29 2b 2c 64 |..move.l|.(a3)+,d|
|00001400| 30 09 09 3b 20 47 61 64 | 67 65 74 20 74 79 70 65 |0..; Gad|get type|
|00001410| 0a 09 6d 6f 76 65 2e 6c | 09 28 61 33 29 2b 2c 67 |..move.l|.(a3)+,g|
|00001420| 6e 67 5f 47 61 64 67 65 | 74 54 65 78 74 28 61 31 |ng_Gadge|tText(a1|
|00001430| 29 0a 09 6d 6f 76 65 2e | 6c 09 28 61 33 29 2b 2c |)..move.|l.(a3)+,|
|00001440| 61 32 09 09 3b 20 54 61 | 67 73 0a 09 6d 6f 76 65 |a2..; Ta|gs..move|
|00001450| 2e 6c 09 28 61 33 29 2b | 2c 67 6e 67 5f 46 6c 61 |.l.(a3)+|,gng_Fla|
|00001460| 67 73 28 61 31 29 09 3b | 20 46 6c 61 67 73 0a 09 |gs(a1).;| Flags..|
|00001470| 0a 09 43 61 6c 6c 4c 69 | 62 09 47 55 5f 43 72 65 |..CallLi|b.GU_Cre|
|00001480| 61 74 65 47 61 64 67 65 | 74 41 0a 0a 09 6d 6f 76 |ateGadge|tA...mov|
|00001490| 65 2e 6c 09 61 34 2c 64 | 31 09 09 09 3b 20 43 68 |e.l.a4,d|1...; Ch|
|000014a0| 65 63 6b 20 66 6f 72 20 | 4e 55 4c 4c 20 61 64 64 |eck for |NULL add|
|000014b0| 72 65 73 73 0a 09 62 65 | 71 2e 73 09 2e 64 6f 6e |ress..be|q.s..don|
|000014c0| 74 73 61 76 65 0a 09 6d | 6f 76 65 2e 6c 09 64 30 |tsave..m|ove.l.d0|
|000014d0| 2c 28 61 34 29 2b 09 09 | 3b 20 53 61 76 65 20 61 |,(a4)+..|; Save a|
|000014e0| 64 64 72 65 73 73 20 6f | 66 20 67 61 64 67 65 74 |ddress o|f gadget|
|000014f0| 0a 2e 64 6f 6e 74 73 61 | 76 65 3a 0a 09 6d 6f 76 |..dontsa|ve:..mov|
|00001500| 65 2e 6c 09 64 30 2c 61 | 30 0a 09 6d 6f 76 65 2e |e.l.d0,a|0..move.|
|00001510| 6c 09 64 30 2c 67 74 5f | 67 61 64 28 61 35 29 0a |l.d0,gt_|gad(a5).|
|00001520| 09 64 62 65 71 09 64 32 | 2c 2e 4d 61 6b 65 47 61 |.dbeq.d2|,.MakeGa|
|00001530| 64 67 65 74 0a 09 6d 6f | 76 65 6d 2e 6c 09 28 73 |dget..mo|vem.l.(s|
|00001540| 70 29 2b 2c 64 30 2d 64 | 33 2f 61 30 2d 61 34 2f |p)+,d0-d|3/a0-a4/|
|00001550| 61 36 0a 09 72 74 73 0a | 0a 3b 2d 2d 2d 2d 2d 2d |a6..rts.|.;------|
|00001560| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001570| 20 47 65 74 20 61 20 6d | 65 73 73 61 67 65 20 66 | Get a m|essage f|
|00001580| 72 6f 6d 20 74 68 65 20 | 77 69 6e 64 6f 77 20 2d |rom the |window -|
|00001590| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015a0| 2d 2d 2d 2d 2d 2d 2d 0a | 3b 20 49 6e 70 75 74 3a |-------.|; Input:|
|000015b0| 0a 3b 09 41 30 20 3d 20 | 70 6f 69 6e 74 65 72 20 |.;.A0 = |pointer |
|000015c0| 74 6f 20 77 69 6e 64 6f | 77 0a 3b 20 4f 75 74 70 |to windo|w.; Outp|
|000015d0| 75 74 3a 0a 3b 09 41 32 | 20 3d 20 4d 65 73 73 61 |ut:.;.A2| = Messa|
|000015e0| 67 65 20 49 41 64 64 72 | 65 73 73 0a 3b 09 44 32 |ge IAddr|ess.;.D2|
|000015f0| 20 3d 20 4d 65 73 73 61 | 67 65 20 43 6f 64 65 0a | = Messa|ge Code.|
|00001600| 3b 09 44 33 20 3d 20 4d | 65 73 73 61 67 65 20 43 |;.D3 = M|essage C|
|00001610| 6c 61 73 73 0a 3b 20 46 | 6c 61 67 73 3a 0a 3b 09 |lass.; F|lags:.;.|
|00001620| 20 5a 20 3d 20 20 31 20 | 66 6f 72 20 6e 6f 20 6d | Z = 1 |for no m|
|00001630| 65 73 73 61 67 65 20 28 | 75 73 65 20 42 45 51 29 |essage (|use BEQ)|
|00001640| 0a 3b 09 20 5a 20 3d 20 | 20 30 20 66 6f 72 20 61 |.;. Z = | 0 for a|
|00001650| 20 76 61 6c 69 64 20 6d | 65 73 73 61 67 65 20 6f | valid m|essage o|
|00001660| 74 68 65 72 20 74 68 61 | 6e 20 49 44 43 4d 50 5f |ther tha|n IDCMP_|
|00001670| 52 45 46 52 45 53 48 57 | 49 4e 44 4f 57 0a 3b 09 |REFRESHW|INDOW.;.|
|00001680| 20 4e 20 3d 20 20 31 20 | 66 6f 72 20 61 20 49 44 | N = 1 |for a ID|
|00001690| 43 4d 50 5f 52 45 46 52 | 45 53 48 57 49 4e 44 4f |CMP_REFR|ESHWINDO|
|000016a0| 57 20 6d 65 73 73 61 67 | 65 20 28 75 73 65 20 42 |W messag|e (use B|
|000016b0| 4d 49 29 0a 3b 0a 3b 2d | 2d 2d 2d 2d 2d 2d 2d 2d |MI).;.;-|--------|
|000016c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000016d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000016e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000016f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001700| 2d 2d 2d 2d 2d 0a 47 65 | 74 49 4d 65 73 73 61 67 |-----.Ge|tIMessag|
|00001710| 65 3a 0a 09 6d 6f 76 65 | 2e 6c 09 61 30 2c 2d 28 |e:..move|.l.a0,-(|
|00001720| 73 70 29 09 09 3b 20 53 | 61 76 65 20 77 69 6e 64 |sp)..; S|ave wind|
|00001730| 6f 77 20 70 6f 69 6e 74 | 65 72 0a 09 6d 6f 76 65 |ow point|er..move|
|00001740| 2e 6c 09 77 64 5f 55 73 | 65 72 50 6f 72 74 28 61 |.l.wd_Us|erPort(a|
|00001750| 30 29 2c 61 30 09 3b 20 | 47 65 74 20 55 73 65 72 |0),a0.; |Get User|
|00001760| 50 6f 72 74 0a 0a 09 43 | 61 6c 6c 4c 69 62 09 47 |Port...C|allLib.G|
|00001770| 55 5f 47 65 74 49 4d 73 | 67 2c 47 55 74 69 6c 42 |U_GetIMs|g,GUtilB|
|00001780| 61 73 65 28 70 63 29 0a | 09 62 65 71 2e 73 09 2e |ase(pc).|.beq.s..|
|00001790| 4e 6f 4d 65 73 73 61 67 | 65 09 09 3b 20 4e 6f 20 |NoMessag|e..; No |
|000017a0| 6d 65 73 73 61 67 65 20 | 2d 20 72 65 74 75 72 6e |message |- return|
|000017b0| 0a 0a 09 6d 6f 76 65 2e | 6c 09 64 30 2c 61 31 0a |...move.|l.d0,a1.|
|000017c0| 09 6d 6f 76 65 2e 6c 09 | 69 6d 5f 49 41 64 64 72 |.move.l.|im_IAddr|
|000017d0| 65 73 73 28 61 31 29 2c | 61 32 09 3b 20 49 41 64 |ess(a1),|a2.; IAd|
|000017e0| 64 72 65 73 73 20 74 6f | 20 41 32 0a 09 6d 6f 76 |dress to| A2..mov|
|000017f0| 65 71 2e 6c 09 23 30 2c | 64 32 09 09 09 3b 20 43 |eq.l.#0,|d2...; C|
|00001800| 6c 65 61 72 20 63 6f 64 | 65 20 6c 6f 6e 67 77 6f |lear cod|e longwo|
|00001810| 72 64 0a 09 6d 6f 76 65 | 2e 77 09 69 6d 5f 43 6f |rd..move|.w.im_Co|
|00001820| 64 65 28 61 31 29 2c 64 | 32 09 09 3b 20 43 6f 64 |de(a1),d|2..; Cod|
|00001830| 65 20 74 6f 20 44 32 0a | 09 6d 6f 76 65 2e 6c 09 |e to D2.|.move.l.|
|00001840| 69 6d 5f 43 6c 61 73 73 | 28 61 31 29 2c 64 33 09 |im_Class|(a1),d3.|
|00001850| 09 3b 20 43 6c 61 73 73 | 20 74 6f 20 44 33 0a 09 |.; Class| to D3..|
|00001860| 43 61 6c 6c 4c 69 62 09 | 47 54 5f 52 65 70 6c 79 |CallLib.|GT_Reply|
|00001870| 49 4d 73 67 2c 47 54 6f | 6f 6c 73 42 61 73 65 28 |IMsg,GTo|olsBase(|
|00001880| 70 63 29 09 3b 20 52 65 | 70 6c 79 20 74 68 65 20 |pc).; Re|ply the |
|00001890| 6d 65 73 73 61 67 65 0a | 0a 09 63 6d 70 2e 6c 09 |message.|..cmp.l.|
|000018a0| 23 49 44 43 4d 50 5f 52 | 45 46 52 45 53 48 57 49 |#IDCMP_R|EFRESHWI|
|000018b0| 4e 44 4f 57 2c 64 33 09 | 3b 20 44 6f 20 77 69 6e |NDOW,d3.|; Do win|
|000018c0| 64 6f 77 20 6e 65 65 64 | 20 74 6f 20 62 65 20 72 |dow need| to be r|
|000018d0| 65 66 72 65 73 68 65 64 | 20 3f 0a 09 62 6e 65 2e |efreshed| ?..bne.|
|000018e0| 62 09 2e 4e 6f 4d 65 73 | 73 61 67 65 09 09 3b 20 |b..NoMes|sage..; |
|000018f0| 4e 6f 70 65 21 20 43 68 | 65 63 6b 20 6e 65 78 74 |Nope! Ch|eck next|
|00001900| 20 6d 65 73 73 61 67 65 | 21 0a 09 6d 6f 76 65 2e | message|!..move.|
|00001910| 6c 09 28 73 70 29 2c 61 | 30 0a 09 43 61 6c 6c 4c |l.(sp),a|0..CallL|
|00001920| 69 62 09 47 54 5f 42 65 | 67 69 6e 52 65 66 72 65 |ib.GT_Be|ginRefre|
|00001930| 73 68 09 09 3b 20 53 74 | 61 72 74 20 72 65 66 72 |sh..; St|art refr|
|00001940| 65 73 68 69 6e 67 20 77 | 69 6e 64 6f 77 0a 09 6d |eshing w|indow..m|
|00001950| 6f 76 65 2e 6c 09 28 73 | 70 29 2c 61 30 0a 09 6d |ove.l.(s|p),a0..m|
|00001960| 6f 76 65 71 2e 6c 09 23 | 54 52 55 45 2c 64 30 0a |oveq.l.#|TRUE,d0.|
|00001970| 09 43 61 6c 6c 4c 69 62 | 09 47 54 5f 45 6e 64 52 |.CallLib|.GT_EndR|
|00001980| 65 66 72 65 73 68 09 09 | 3b 20 52 65 66 72 65 73 |efresh..|; Refres|
|00001990| 68 69 6e 67 20 64 6f 6e | 65 0a 09 6d 6f 76 65 71 |hing don|e..moveq|
|000019a0| 2e 6c 09 23 2d 31 2c 64 | 30 09 09 09 3b 20 53 65 |.l.#-1,d|0...; Se|
|000019b0| 74 20 4e 20 66 6c 61 67 | 0a 2e 4e 6f 4d 65 73 73 |t N flag|..NoMess|
|000019c0| 61 67 65 3a 0a 09 6d 6f | 76 65 2e 6c 09 28 73 70 |age:..mo|ve.l.(sp|
|000019d0| 29 2b 2c 61 30 0a 09 72 | 74 73 0a 0a 0a 0a 3b 2d |)+,a0..r|ts....;-|
|000019e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000019f0| 2d 20 57 61 69 74 20 66 | 6f 72 20 61 6e 64 20 70 |- Wait f|or and p|
|00001a00| 72 6f 63 65 73 73 20 77 | 69 6e 64 6f 77 20 65 76 |rocess w|indow ev|
|00001a10| 65 6e 74 73 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ents ---|--------|
|00001a20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0a 70 72 6f |--------|----.pro|
|00001a30| 63 65 73 73 5f 77 69 6e | 64 6f 77 5f 65 76 65 6e |cess_win|dow_even|
|00001a40| 74 73 3a 0a 09 6d 6f 76 | 65 6d 2e 6c 09 64 30 2d |ts:..mov|em.l.d0-|
|00001a50| 61 36 2c 2d 28 73 70 29 | 0a 2e 57 61 69 74 45 76 |a6,-(sp)|..WaitEv|
|00001a60| 65 6e 74 3a 0a 09 6d 6f | 76 65 2e 6c 09 5f 41 62 |ent:..mo|ve.l._Ab|
|00001a70| 73 45 78 65 63 42 61 73 | 65 2e 77 2c 61 36 0a 09 |sExecBas|e.w,a6..|
|00001a80| 6d 6f 76 65 2e 6c 09 4d | 61 69 6e 57 69 6e 53 69 |move.l.M|ainWinSi|
|00001a90| 67 4d 61 73 6b 28 61 35 | 29 2c 64 30 09 3b 20 47 |gMask(a5|),d0.; G|
|00001aa0| 65 74 20 73 69 67 6e 61 | 6c 20 6d 61 73 6b 20 66 |et signa|l mask f|
|00001ab0| 6f 72 20 6d 61 69 6e 20 | 77 69 6e 64 6f 77 0a 09 |or main |window..|
|00001ac0| 43 61 6c 6c 4c 69 62 09 | 57 61 69 74 09 09 09 3b |CallLib.|Wait...;|
|00001ad0| 20 57 61 69 74 20 66 6f | 72 20 61 20 6d 65 73 73 | Wait fo|r a mess|
|00001ae0| 61 67 65 0a 09 63 6d 70 | 2e 6c 09 4d 61 69 6e 57 |age..cmp|.l.MainW|
|00001af0| 69 6e 53 69 67 4d 61 73 | 6b 28 61 35 29 2c 64 30 |inSigMas|k(a5),d0|
|00001b00| 09 3b 20 43 68 65 63 6b | 20 66 6f 72 20 73 69 67 |.; Check| for sig|
|00001b10| 6e 61 6c 20 66 72 6f 6d | 20 6d 61 69 6e 20 77 69 |nal from| main wi|
|00001b20| 6e 64 6f 77 0a 09 62 6e | 65 2e 73 09 2e 57 61 69 |ndow..bn|e.s..Wai|
|00001b30| 74 45 76 65 6e 74 09 09 | 3b 20 57 61 69 74 20 66 |tEvent..|; Wait f|
|00001b40| 6f 72 20 65 76 65 6e 74 | 20 66 72 6f 6d 20 6d 61 |or event| from ma|
|00001b50| 69 6e 20 77 69 6e 64 6f | 77 0a 2e 47 65 74 45 76 |in windo|w..GetEv|
|00001b60| 65 6e 74 3a 0a 09 6d 6f | 76 65 2e 6c 09 33 32 28 |ent:..mo|ve.l.32(|
|00001b70| 73 70 29 2c 61 30 09 09 | 3b 20 47 65 74 20 77 69 |sp),a0..|; Get wi|
|00001b80| 6e 64 6f 77 20 70 6f 69 | 6e 74 65 72 0a 09 62 73 |ndow poi|nter..bs|
|00001b90| 72 2e 77 09 47 65 74 49 | 4d 65 73 73 61 67 65 09 |r.w.GetI|Message.|
|00001ba0| 09 3b 20 47 65 74 20 74 | 68 65 20 6d 65 73 73 61 |.; Get t|he messa|
|00001bb0| 67 65 20 61 6e 64 20 70 | 72 6f 63 65 73 73 20 52 |ge and p|rocess R|
|00001bc0| 45 46 52 45 53 48 0a 09 | 62 6d 69 2e 73 09 2e 47 |EFRESH..|bmi.s..G|
|00001bd0| 65 74 45 76 65 6e 74 09 | 09 3b 20 47 65 74 20 6e |etEvent.|.; Get n|
|00001be0| 65 78 74 20 65 76 65 6e | 74 20 69 66 20 49 44 43 |ext even|t if IDC|
|00001bf0| 4d 50 5f 52 45 46 52 45 | 53 48 57 49 4e 0a 09 62 |MP_REFRE|SHWIN..b|
|00001c00| 65 71 2e 73 09 2e 57 61 | 69 74 45 76 65 6e 74 09 |eq.s..Wa|itEvent.|
|00001c10| 09 3b 20 43 6f 6e 74 69 | 6e 75 65 20 77 61 69 74 |.; Conti|nue wait|
|00001c20| 69 6e 67 20 69 66 20 6e | 6f 20 6d 65 73 73 61 67 |ing if n|o messag|
|00001c30| 65 0a 0a 2e 63 68 65 63 | 6b 67 61 64 75 70 3a 0a |e...chec|kgadup:.|
|00001c40| 09 63 6d 70 2e 6c 09 23 | 49 44 43 4d 50 5f 47 41 |.cmp.l.#|IDCMP_GA|
|00001c50| 44 47 45 54 55 50 2c 64 | 33 09 3b 20 41 6e 79 20 |DGETUP,d|3.; Any |
|00001c60| 67 61 64 67 65 74 20 72 | 65 6c 65 61 73 65 64 20 |gadget r|eleased |
|00001c70| 3f 0a 09 62 6e 65 2e 77 | 09 2e 43 68 65 63 6b 47 |?..bne.w|..CheckG|
|00001c80| 61 64 44 6f 77 6e 09 09 | 3b 20 4e 6f 70 65 21 20 |adDown..|; Nope! |
|00001c90| 43 68 65 63 6b 20 66 6f | 72 20 67 61 64 67 65 74 |Check fo|r gadget|
|00001ca0| 20 64 6f 77 6e 20 6d 65 | 73 73 61 67 65 73 0a 09 | down me|ssages..|
|00001cb0| 6d 6f 76 65 2e 77 09 67 | 67 5f 47 61 64 67 65 74 |move.w.g|g_Gadget|
|00001cc0| 49 44 28 61 32 29 2c 64 | 31 09 3b 20 47 65 74 20 |ID(a2),d|1.; Get |
|00001cd0| 47 61 64 67 65 74 49 44 | 0a 09 62 63 68 67 09 23 |GadgetID|..bchg.#|
|00001ce0| 31 2c 24 62 66 65 30 30 | 31 0a 09 63 6d 70 2e 77 |1,$bfe00|1..cmp.w|
|00001cf0| 09 23 4e 45 58 54 44 52 | 49 56 45 5f 47 41 44 2c |.#NEXTDR|IVE_GAD,|
|00001d00| 64 31 09 3b 20 42 75 74 | 74 6f 6e 20 31 20 70 72 |d1.; But|ton 1 pr|
|00001d10| 65 73 73 65 64 20 3f 0a | 09 62 6e 65 2e 73 09 2e |essed ?.|.bne.s..|
|00001d20| 43 68 65 63 6b 42 75 74 | 74 6f 6e 32 09 09 3b 20 |CheckBut|ton2..; |
|00001d30| 4e 6f 70 65 21 20 43 68 | 65 63 6b 20 6d 6f 72 65 |Nope! Ch|eck more|
|00001d40| 20 67 61 64 67 65 74 73 | 0a 0a 09 6d 6f 76 65 2e | gadgets|...move.|
|00001d50| 6c 09 6d 78 5f 67 61 64 | 28 61 35 29 2c 61 30 09 |l.mx_gad|(a5),a0.|
|00001d60| 09 3b 20 4d 58 20 67 61 | 64 67 65 74 20 77 61 73 |.; MX ga|dget was|
|00001d70| 20 63 72 65 61 74 65 64 | 20 6c 61 73 74 0a 09 6d | created| last..m|
|00001d80| 6f 76 65 2e 6c 09 33 32 | 28 73 70 29 2c 61 31 09 |ove.l.32|(sp),a1.|
|00001d90| 09 3b 20 57 69 6e 64 6f | 77 20 70 6f 69 6e 74 65 |.; Windo|w pointe|
|00001da0| 72 0a 09 73 75 62 61 2e | 6c 09 61 32 2c 61 32 0a |r..suba.|l.a2,a2.|
|00001db0| 09 6c 65 61 2e 6c 09 61 | 63 74 28 70 63 29 2c 61 |.lea.l.a|ct(pc),a|
|00001dc0| 33 09 09 3b 20 54 61 67 | 73 0a 09 6d 6f 76 65 2e |3..; Tag|s..move.|
|00001dd0| 6c 09 34 28 61 33 29 2c | 64 30 09 09 3b 20 47 65 |l.4(a3),|d0..; Ge|
|00001de0| 74 20 63 75 72 72 65 6e | 74 20 61 63 74 69 76 65 |t curren|t active|
|00001df0| 20 65 6e 74 72 79 0a 09 | 61 64 64 71 2e 6c 09 23 | entry..|addq.l.#|
|00001e00| 31 2c 64 30 09 09 09 3b | 20 41 64 64 20 6f 6e 65 |1,d0...;| Add one|
|00001e10| 0a 09 63 6d 70 2e 6c 09 | 23 34 2c 64 30 09 09 09 |..cmp.l.|#4,d0...|
|00001e20| 3b 20 43 68 65 63 6b 20 | 66 6f 72 20 6d 61 78 20 |; Check |for max |
|00001e30| 76 61 6c 75 65 0a 09 62 | 6c 73 2e 73 09 2e 48 69 |value..b|ls.s..Hi|
|00001e40| 67 68 4f 6b 0a 09 6d 6f | 76 65 71 2e 6c 09 23 30 |ghOk..mo|veq.l.#0|
|00001e50| 2c 64 30 09 09 09 3b 20 | 41 63 74 69 76 61 74 65 |,d0...; |Activate|
|00001e60| 20 66 69 72 73 74 20 69 | 66 20 74 6f 6f 20 68 69 | first i|f too hi|
|00001e70| 67 68 20 76 61 6c 75 65 | 0a 2e 48 69 67 68 4f 6b |gh value|..HighOk|
|00001e80| 3a 0a 09 6d 6f 76 65 2e | 6c 09 64 30 2c 34 28 61 |:..move.|l.d0,4(a|
|00001e90| 33 29 0a 09 6d 6f 76 65 | 2e 6c 09 47 55 74 69 6c |3)..move|.l.GUtil|
|00001ea0| 42 61 73 65 28 70 63 29 | 2c 61 36 0a 09 43 61 6c |Base(pc)|,a6..Cal|
|00001eb0| 6c 4c 69 62 09 47 55 5f | 53 65 74 47 61 64 67 65 |lLib.GU_|SetGadge|
|00001ec0| 74 41 74 74 72 73 41 0a | 0a 09 62 72 61 2e 62 09 |tAttrsA.|..bra.b.|
|00001ed0| 2e 47 65 74 45 76 65 6e | 74 09 09 3b 20 47 65 74 |.GetEven|t..; Get|
|00001ee0| 20 6e 65 78 74 20 65 76 | 65 6e 74 0a 0a 2e 43 68 | next ev|ent...Ch|
|00001ef0| 65 63 6b 42 75 74 74 6f | 6e 32 3a 0a 09 63 6d 70 |eckButto|n2:..cmp|
|00001f00| 2e 77 09 23 50 52 45 56 | 44 52 49 56 45 5f 47 41 |.w.#PREV|DRIVE_GA|
|00001f10| 44 2c 64 31 09 3b 20 42 | 75 74 74 6f 6e 20 32 20 |D,d1.; B|utton 2 |
|00001f20| 70 72 65 73 73 65 64 20 | 3f 0a 09 62 6e 65 2e 73 |pressed |?..bne.s|
|00001f30| 09 2e 43 68 65 63 6b 42 | 75 74 74 6f 6e 33 0a 0a |..CheckB|utton3..|
|00001f40| 09 6d 6f 76 65 2e 6c 09 | 6d 78 5f 67 61 64 28 61 |.move.l.|mx_gad(a|
|00001f50| 35 29 2c 61 30 09 09 3b | 20 4d 58 20 67 61 64 67 |5),a0..;| MX gadg|
|00001f60| 65 74 20 77 61 73 20 63 | 72 65 61 74 65 64 20 6c |et was c|reated l|
|00001f70| 61 73 74 0a 09 6d 6f 76 | 65 2e 6c 09 33 32 28 73 |ast..mov|e.l.32(s|
|00001f80| 70 29 2c 61 31 09 09 3b | 20 57 69 6e 64 6f 77 20 |p),a1..;| Window |
|00001f90| 70 6f 69 6e 74 65 72 0a | 09 73 75 62 61 2e 6c 09 |pointer.|.suba.l.|
|00001fa0| 61 32 2c 61 32 0a 09 6c | 65 61 2e 6c 09 61 63 74 |a2,a2..l|ea.l.act|
|00001fb0| 28 70 63 29 2c 61 33 09 | 09 3b 20 54 61 67 73 0a |(pc),a3.|.; Tags.|
|00001fc0| 09 6d 6f 76 65 2e 6c 09 | 34 28 61 33 29 2c 64 30 |.move.l.|4(a3),d0|
|00001fd0| 09 09 3b 20 47 65 74 20 | 63 75 72 72 65 6e 74 20 |..; Get |current |
|00001fe0| 61 63 74 69 76 65 20 65 | 6e 74 72 79 0a 09 73 75 |active e|ntry..su|
|00001ff0| 62 71 2e 6c 09 23 31 2c | 64 30 09 09 09 3b 20 53 |bq.l.#1,|d0...; S|
|00002000| 75 62 74 72 61 63 74 20 | 6f 6e 65 0a 09 62 70 6c |ubtract |one..bpl|
|00002010| 2e 73 09 2e 4c 6f 77 4f | 6b 09 09 09 3b 20 4f 6b |.s..LowO|k...; Ok|
|00002020| 20 69 66 20 30 20 6f 72 | 20 67 72 65 61 74 65 72 | if 0 or| greater|
|00002030| 0a 09 6d 6f 76 65 71 2e | 6c 09 23 34 2c 64 30 09 |..moveq.|l.#4,d0.|
|00002040| 09 09 3b 20 54 6f 6f 20 | 6c 6f 77 20 2d 20 75 73 |..; Too |low - us|
|00002050| 65 20 6c 61 72 67 65 73 | 74 20 70 6f 73 73 69 62 |e larges|t possib|
|00002060| 6c 65 20 76 61 6c 75 65 | 0a 2e 4c 6f 77 4f 6b 3a |le value|..LowOk:|
|00002070| 0a 09 6d 6f 76 65 2e 6c | 09 64 30 2c 34 28 61 33 |..move.l|.d0,4(a3|
|00002080| 29 0a 09 6d 6f 76 65 2e | 6c 09 47 55 74 69 6c 42 |)..move.|l.GUtilB|
|00002090| 61 73 65 28 70 63 29 2c | 61 36 0a 09 43 61 6c 6c |ase(pc),|a6..Call|
|000020a0| 4c 69 62 09 47 55 5f 53 | 65 74 47 61 64 67 65 74 |Lib.GU_S|etGadget|
|000020b0| 41 74 74 72 73 41 0a 0a | 09 62 72 61 2e 62 09 2e |AttrsA..|.bra.b..|
|000020c0| 47 65 74 45 76 65 6e 74 | 0a 0a 2e 43 68 65 63 6b |GetEvent|...Check|
|000020d0| 42 75 74 74 6f 6e 33 3a | 0a 09 63 6d 70 2e 77 09 |Button3:|..cmp.w.|
|000020e0| 23 52 45 51 55 45 53 54 | 45 52 5f 47 41 44 2c 64 |#REQUEST|ER_GAD,d|
|000020f0| 31 09 3b 20 42 75 74 74 | 6f 6e 20 33 20 70 72 65 |1.; Butt|on 3 pre|
|00002100| 73 73 65 64 20 3f 0a 09 | 62 6e 65 2e 73 09 2e 43 |ssed ?..|bne.s..C|
|00002110| 68 65 63 6b 42 75 74 74 | 6f 6e 34 0a 0a 09 6d 6f |heckButt|on4...mo|
|00002120| 76 65 2e 6c 09 33 32 28 | 73 70 29 2c 61 30 09 09 |ve.l.32(|sp),a0..|
|00002130| 3b 20 42 6c 6f 63 6b 20 | 69 6e 70 75 74 20 6f 66 |; Block |input of|
|00002140| 20 6d 61 69 6e 20 77 69 | 6e 64 6f 77 0a 3b 09 62 | main wi|ndow.;.b|
|00002150| 73 72 2e 77 09 47 55 5f | 42 6c 6f 63 6b 49 6e 70 |sr.w.GU_|BlockInp|
|00002160| 75 74 0a 09 62 73 72 2e | 77 09 4f 70 65 6e 52 65 |ut..bsr.|w.OpenRe|
|00002170| 71 57 69 6e 09 09 3b 20 | 4f 70 65 6e 20 74 68 65 |qWin..; |Open the|
|00002180| 20 70 72 6f 67 72 65 73 | 73 20 72 65 71 75 65 73 | progres|s reques|
|00002190| 74 65 72 0a 09 6d 6f 76 | 65 2e 6c 09 33 32 28 73 |ter..mov|e.l.32(s|
|000021a0| 70 29 2c 61 30 09 09 3b | 20 55 6e 62 6c 6f 63 6b |p),a0..;| Unblock|
|000021b0| 20 69 6e 70 75 74 20 6f | 66 20 6d 61 69 6e 20 77 | input o|f main w|
|000021c0| 69 6e 64 6f 77 0a 3b 09 | 62 73 72 2e 77 09 47 55 |indow.;.|bsr.w.GU|
|000021d0| 5f 46 72 65 65 49 6e 70 | 75 74 0a 0a 09 62 72 61 |_FreeInp|ut...bra|
|000021e0| 2e 77 09 2e 47 65 74 45 | 76 65 6e 74 0a 0a 2e 43 |.w..GetE|vent...C|
|000021f0| 68 65 63 6b 42 75 74 74 | 6f 6e 34 3a 0a 09 63 6d |heckButt|on4:..cm|
|00002200| 70 2e 77 09 23 43 59 43 | 4c 45 5f 47 41 44 2c 64 |p.w.#CYC|LE_GAD,d|
|00002210| 31 09 09 3b 20 42 75 74 | 74 6f 6e 20 34 20 70 72 |1..; But|ton 4 pr|
|00002220| 65 73 73 65 64 20 3f 0a | 09 62 6e 65 2e 77 09 2e |essed ?.|.bne.w..|
|00002230| 47 65 74 45 76 65 6e 74 | 0a 09 62 63 68 67 09 23 |GetEvent|..bchg.#|
|00002240| 31 2c 24 62 66 65 30 30 | 31 0a 09 62 72 61 2e 77 |1,$bfe00|1..bra.w|
|00002250| 09 2e 47 65 74 45 76 65 | 6e 74 09 0a 0a 2e 43 68 |..GetEve|nt....Ch|
|00002260| 65 63 6b 47 61 64 44 6f | 77 6e 3a 0a 09 63 6d 70 |eckGadDo|wn:..cmp|
|00002270| 2e 6c 09 23 49 44 43 4d | 50 5f 47 41 44 47 45 54 |.l.#IDCM|P_GADGET|
|00002280| 44 4f 57 4e 2c 64 33 09 | 3b 20 43 68 65 63 6b 20 |DOWN,d3.|; Check |
|00002290| 66 6f 72 20 47 41 44 47 | 45 54 44 4f 57 4e 20 6d |for GADG|ETDOWN m|
|000022a0| 65 73 73 61 67 65 0a 09 | 62 6e 65 2e 73 09 2e 43 |essage..|bne.s..C|
|000022b0| 68 65 63 6b 4d 6f 75 73 | 65 0a 09 63 6d 70 2e 77 |heckMous|e..cmp.w|
|000022c0| 09 23 4d 58 5f 47 41 44 | 2c 67 67 5f 47 61 64 67 |.#MX_GAD|,gg_Gadg|
|000022d0| 65 74 49 44 28 61 32 29 | 09 3b 20 4d 58 20 67 61 |etID(a2)|.; MX ga|
|000022e0| 64 67 65 74 20 70 72 65 | 73 73 65 64 20 3f 0a 09 |dget pre|ssed ?..|
|000022f0| 62 6e 65 2e 77 09 2e 47 | 65 74 45 76 65 6e 74 0a |bne.w..G|etEvent.|
|00002300| 09 6d 6f 76 65 2e 6c 09 | 64 32 2c 61 63 74 2b 34 |.move.l.|d2,act+4|
|00002310| 09 09 3b 20 53 61 76 65 | 20 6e 65 77 20 61 63 74 |..; Save| new act|
|00002320| 69 76 65 20 65 6e 74 72 | 79 20 6e 75 6d 62 65 72 |ive entr|y number|
|00002330| 0a 09 62 72 61 2e 77 09 | 2e 47 65 74 45 76 65 6e |..bra.w.|.GetEven|
|00002340| 74 09 09 3b 20 47 65 74 | 20 6e 65 78 74 20 65 76 |t..; Get| next ev|
|00002350| 65 6e 74 0a 0a 2e 43 68 | 65 63 6b 4d 6f 75 73 65 |ent...Ch|eckMouse|
|00002360| 3a 0a 09 63 6d 70 2e 6c | 09 23 49 44 43 4d 50 5f |:..cmp.l|.#IDCMP_|
|00002370| 4d 4f 55 53 45 4d 4f 56 | 45 2c 64 33 0a 09 62 6e |MOUSEMOV|E,d3..bn|
|00002380| 65 2e 73 09 2e 43 68 65 | 63 6b 43 6c 6f 73 65 0a |e.s..Che|ckClose.|
|00002390| 09 62 63 68 67 09 23 31 | 2c 24 62 66 65 30 30 31 |.bchg.#1|,$bfe001|
|000023a0| 0a 09 62 72 61 2e 77 09 | 2e 47 65 74 45 76 65 6e |..bra.w.|.GetEven|
|000023b0| 74 0a 2e 43 68 65 63 6b | 43 6c 6f 73 65 3a 0a 09 |t..Check|Close:..|
|000023c0| 63 6d 70 2e 6c 09 23 49 | 44 43 4d 50 5f 43 4c 4f |cmp.l.#I|DCMP_CLO|
|000023d0| 53 45 57 49 4e 44 4f 57 | 2c 64 33 09 3b 20 43 6c |SEWINDOW|,d3.; Cl|
|000023e0| 6f 73 65 20 67 61 64 67 | 65 74 20 70 72 65 73 73 |ose gadg|et press|
|000023f0| 65 64 20 3f 0a 09 62 6e | 65 2e 77 09 2e 47 65 74 |ed ?..bn|e.w..Get|
|00002400| 45 76 65 6e 74 09 09 3b | 20 4e 6f 70 65 21 20 47 |Event..;| Nope! G|
|00002410| 65 74 20 6e 65 78 74 20 | 6d 65 73 73 61 67 65 0a |et next |message.|
|00002420| 2e 45 78 69 74 0a 09 6d | 6f 76 65 6d 2e 6c 09 28 |.Exit..m|ovem.l.(|
|00002430| 73 70 29 2b 2c 64 30 2d | 61 36 0a 09 72 74 73 0a |sp)+,d0-|a6..rts.|
|00002440| 0a 3b 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.;------|--------|
|00002450| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002460| 2d 2d 20 44 61 74 61 73 | 20 2d 2d 2d 2d 2d 2d 2d |-- Datas| -------|
|00002470| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002480| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0a |--------|-------.|
|00002490| 47 54 49 44 43 4d 50 31 | 3a 20 65 71 75 09 42 55 |GTIDCMP1|: equ.BU|
|000024a0| 54 54 4f 4e 49 44 43 4d | 50 21 43 59 43 4c 45 49 |TTONIDCM|P!CYCLEI|
|000024b0| 44 43 4d 50 21 53 54 52 | 49 4e 47 49 44 43 4d 50 |DCMP!STR|INGIDCMP|
|000024c0| 21 49 4e 54 45 47 45 52 | 49 44 43 4d 50 21 43 48 |!INTEGER|IDCMP!CH|
|000024d0| 45 43 4b 42 4f 58 49 44 | 43 4d 50 0a 47 54 49 44 |ECKBOXID|CMP.GTID|
|000024e0| 43 4d 50 32 3a 20 65 71 | 75 09 53 4c 49 44 45 52 |CMP2: eq|u.SLIDER|
|000024f0| 49 44 43 4d 50 21 4d 58 | 49 44 43 4d 50 21 4c 49 |IDCMP!MX|IDCMP!LI|
|00002500| 53 54 56 49 45 57 49 44 | 43 4d 50 0a 0a 49 4e 54 |STVIEWID|CMP..INT|
|00002510| 49 44 43 4d 50 31 3a 09 | 65 71 75 09 49 44 43 4d |IDCMP1:.|equ.IDCM|
|00002520| 50 5f 56 41 4e 49 4c 4c | 41 4b 45 59 21 49 44 43 |P_VANILL|AKEY!IDC|
|00002530| 4d 50 5f 52 41 57 4b 45 | 59 0a 49 4e 54 49 44 43 |MP_RAWKE|Y.INTIDC|
|00002540| 4d 50 32 3a 09 65 71 75 | 09 49 44 43 4d 50 5f 43 |MP2:.equ|.IDCMP_C|
|00002550| 4c 4f 53 45 57 49 4e 44 | 4f 57 21 49 44 43 4d 50 |LOSEWIND|OW!IDCMP|
|00002560| 5f 52 45 46 52 45 53 48 | 57 49 4e 44 4f 57 21 49 |_REFRESH|WINDOW!I|
|00002570| 44 43 4d 50 5f 49 4e 54 | 55 49 54 49 43 4b 53 0a |DCMP_INT|UITICKS.|
|00002580| 0a 49 44 43 4d 50 31 3a | 09 65 71 75 09 47 54 49 |.IDCMP1:|.equ.GTI|
|00002590| 44 43 4d 50 31 21 47 54 | 49 44 43 4d 50 32 21 49 |DCMP1!GT|IDCMP2!I|
|000025a0| 4e 54 49 44 43 4d 50 31 | 21 49 4e 54 49 44 43 4d |NTIDCMP1|!INTIDCM|
|000025b0| 50 32 0a 0a 77 69 6e 74 | 61 67 73 3a 0a 09 64 63 |P2..wint|ags:..dc|
|000025c0| 2e 6c 09 57 41 5f 54 69 | 74 6c 65 2c 09 77 69 6e |.l.WA_Ti|tle,.win|
|000025d0| 74 69 74 6c 65 2c 09 57 | 41 5f 49 44 43 4d 50 2c |title,.W|A_IDCMP,|
|000025e0| 09 49 44 43 4d 50 31 0a | 67 6c 3a 09 64 63 2e 6c |.IDCMP1.|gl:.dc.l|
|000025f0| 09 57 41 5f 47 61 64 67 | 65 74 73 2c 09 30 2c 09 |.WA_Gadg|ets,.0,.|
|00002600| 09 57 41 5f 43 6c 6f 73 | 65 47 61 64 67 65 74 2c |.WA_Clos|eGadget,|
|00002610| 09 54 52 55 45 0a 09 64 | 63 2e 6c 09 57 41 5f 57 |.TRUE..d|c.l.WA_W|
|00002620| 69 64 74 68 2c 09 35 32 | 30 2c 09 09 57 41 5f 49 |idth,.52|0,..WA_I|
|00002630| 6e 6e 65 72 48 65 69 67 | 68 74 2c 09 31 31 35 0a |nnerHeig|ht,.115.|
|00002640| 09 64 63 2e 6c 09 57 41 | 5f 46 6c 61 67 73 2c 09 |.dc.l.WA|_Flags,.|
|00002650| 57 46 4c 47 5f 52 45 50 | 4f 52 54 4d 4f 55 53 45 |WFLG_REP|ORTMOUSE|
|00002660| 0a 73 74 64 77 69 6e 74 | 61 67 73 3a 0a 09 64 63 |.stdwint|ags:..dc|
|00002670| 2e 6c 09 57 41 5f 44 72 | 61 67 42 61 72 2c 09 54 |.l.WA_Dr|agBar,.T|
|00002680| 52 55 45 2c 09 09 57 41 | 5f 44 65 70 74 68 47 61 |RUE,..WA|_DepthGa|
|00002690| 64 67 65 74 2c 09 54 52 | 55 45 0a 09 64 63 2e 6c |dget,.TR|UE..dc.l|
|000026a0| 09 57 41 5f 41 63 74 69 | 76 61 74 65 2c 09 54 52 |.WA_Acti|vate,.TR|
|000026b0| 55 45 2c 09 09 57 41 5f | 41 75 74 6f 41 64 6a 75 |UE,..WA_|AutoAdju|
|000026c0| 73 74 2c 09 54 52 55 45 | 0a 09 64 63 2e 6c 09 57 |st,.TRUE|..dc.l.W|
|000026d0| 41 5f 52 4d 42 54 72 61 | 70 2c 09 54 52 55 45 0a |A_RMBTra|p,.TRUE.|
|000026e0| 73 63 3a 09 64 63 2e 6c | 09 57 41 5f 50 75 62 53 |sc:.dc.l|.WA_PubS|
|000026f0| 63 72 65 65 6e 2c 09 30 | 2c 09 09 54 41 47 5f 44 |creen,.0|,..TAG_D|
|00002700| 4f 4e 45 09 0a 0a 67 6c | 69 73 74 3a 09 65 71 75 |ONE...gl|ist:.equ|
|00002710| 09 67 6c 2b 34 0a 6d 79 | 73 63 3a 09 65 71 75 09 |.gl+4.my|sc:.equ.|
|00002720| 73 63 2b 34 0a 0a 3b 2d | 2d 2d 2d 2d 2d 2d 2d 2d |sc+4..;-|--------|
|00002730| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002740| 2d 2d 20 44 61 74 61 20 | 66 6f 72 20 6d 61 69 6e |-- Data |for main|
|00002750| 20 70 72 6f 67 72 61 6d | 20 2d 2d 2d 2d 2d 2d 2d | program| -------|
|00002760| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002770| 2d 2d 2d 2d 0a 53 74 64 | 47 61 64 54 61 67 73 3a |----.Std|GadTags:|
|00002780| 09 64 63 2e 6c 09 47 54 | 5f 55 6e 64 65 72 73 63 |.dc.l.GT|_Undersc|
|00002790| 6f 72 65 2c 09 27 5f 27 | 2c 09 47 55 5f 4c 61 62 |ore,.'_'|,.GU_Lab|
|000027a0| 65 6c 48 6f 74 6b 65 79 | 2c 09 54 52 55 45 0a 45 |elHotkey|,.TRUE.E|
|000027b0| 6d 70 74 79 54 61 67 3a | 09 64 63 2e 6c 09 54 41 |mptyTag:|.dc.l.TA|
|000027c0| 47 5f 44 4f 4e 45 0a 54 | 6f 70 61 7a 38 30 3a 09 |G_DONE.T|opaz80:.|
|000027d0| 64 63 2e 6c 09 74 6f 70 | 61 7a 6e 61 6d 65 2c 24 |dc.l.top|azname,$|
|000027e0| 30 30 30 38 30 30 30 30 | 0a 0a 4c 69 62 50 74 72 |00080000|..LibPtr|
|000027f0| 73 3a 09 64 63 2e 77 09 | 35 2d 31 0a 49 6e 74 75 |s:.dc.w.|5-1.Intu|
|00002800| 69 42 61 73 65 3a 09 64 | 63 2e 6c 09 49 6e 74 75 |iBase:.d|c.l.Intu|
|00002810| 69 4e 61 6d 65 0a 47 54 | 6f 6f 6c 73 42 61 73 65 |iName.GT|oolsBase|
|00002820| 3a 09 64 63 2e 6c 09 47 | 54 6f 6f 6c 73 4e 61 6d |:.dc.l.G|ToolsNam|
|00002830| 65 0a 44 6f 73 42 61 73 | 65 3a 09 64 63 2e 6c 09 |e.DosBas|e:.dc.l.|
|00002840| 44 6f 73 4e 61 6d 65 0a | 47 66 78 42 61 73 65 3a |DosName.|GfxBase:|
|00002850| 09 64 63 2e 6c 09 47 66 | 78 4e 61 6d 65 0a 55 74 |.dc.l.Gf|xName.Ut|
|00002860| 69 6c 42 61 73 65 3a 09 | 64 63 2e 6c 09 55 74 69 |ilBase:.|dc.l.Uti|
|00002870| 6c 4e 61 6d 65 0a 0a 47 | 55 74 69 6c 42 61 73 65 |lName..G|UtilBase|
|00002880| 3a 09 64 63 2e 6c 09 30 | 0a 67 61 64 75 74 69 6c |:.dc.l.0|.gadutil|
|00002890| 6e 61 6d 65 3a 09 64 63 | 2e 62 09 22 67 61 64 75 |name:.dc|.b."gadu|
|000028a0| 74 69 6c 2e 6c 69 62 72 | 61 72 79 22 2c 30 0a 0a |til.libr|ary",0..|
|000028b0| 49 6e 74 75 69 4e 61 6d | 65 3a 09 64 63 2e 62 09 |IntuiNam|e:.dc.b.|
|000028c0| 22 69 6e 74 75 69 74 69 | 6f 6e 2e 6c 69 62 72 61 |"intuiti|on.libra|
|000028d0| 72 79 22 2c 30 0a 47 54 | 6f 6f 6c 73 4e 61 6d 65 |ry",0.GT|oolsName|
|000028e0| 3a 09 64 63 2e 62 09 22 | 67 61 64 74 6f 6f 6c 73 |:.dc.b."|gadtools|
|000028f0| 2e 6c 69 62 72 61 72 79 | 22 2c 30 0a 44 6f 73 4e |.library|",0.DosN|
|00002900| 61 6d 65 3a 09 64 63 2e | 62 09 22 64 6f 73 2e 6c |ame:.dc.|b."dos.l|
|00002910| 69 62 72 61 72 79 22 2c | 30 0a 47 66 78 4e 61 6d |ibrary",|0.GfxNam|
|00002920| 65 3a 09 64 63 2e 62 09 | 22 67 72 61 70 68 69 63 |e:.dc.b.|"graphic|
|00002930| 73 2e 6c 69 62 72 61 72 | 79 22 2c 30 0a 55 74 69 |s.librar|y",0.Uti|
|00002940| 6c 4e 61 6d 65 3a 09 64 | 63 2e 62 09 22 75 74 69 |lName:.d|c.b."uti|
|00002950| 6c 69 74 79 2e 6c 69 62 | 72 61 72 79 22 2c 30 0a |lity.lib|rary",0.|
|00002960| 0a 74 6f 70 61 7a 6e 61 | 6d 65 3a 09 64 63 2e 62 |.topazna|me:.dc.b|
|00002970| 09 27 74 6f 70 61 7a 2e | 66 6f 6e 74 27 2c 30 0a |.'topaz.|font',0.|
|00002980| 0a 77 69 6e 74 69 74 6c | 65 3a 09 64 63 2e 62 09 |.wintitl|e:.dc.b.|
|00002990| 22 47 61 64 54 6f 6f 6c | 73 20 47 61 64 67 65 74 |"GadTool|s Gadget|
|000029a0| 20 44 65 6d 6f 22 2c 30 | 0a 09 09 65 76 65 6e 0a | Demo",0|...even.|
|000029b0| 0a 3b 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.;------|--------|
|000029c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 20 47 61 64 |--------|---- Gad|
|000029d0| 67 65 74 20 64 61 74 61 | 73 20 2d 2d 2d 2d 2d 2d |get data|s ------|
|000029e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000029f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0a |--------|-------.|
|00002a00| 47 61 64 67 65 74 44 61 | 74 61 73 31 3a 0a 09 64 |GadgetDa|tas1:..d|
|00002a10| 63 2e 77 09 36 0a 09 64 | 63 2e 77 09 31 35 2c 09 |c.w.6..d|c.w.15,.|
|00002a20| 31 2c 09 31 30 30 2c 09 | 31 34 2c 09 4e 45 58 54 |1,.100,.|14,.NEXT|
|00002a30| 44 52 49 56 45 5f 47 41 | 44 0a 09 64 63 2e 6c 09 |DRIVE_GA|D..dc.l.|
|00002a40| 42 55 54 54 4f 4e 5f 4b | 49 4e 44 2c 09 4e 65 78 |BUTTON_K|IND,.Nex|
|00002a50| 74 44 72 69 76 65 54 78 | 74 2c 09 53 74 64 47 61 |tDriveTx|t,.StdGa|
|00002a60| 64 54 61 67 73 2c 09 50 | 4c 41 43 45 54 45 58 54 |dTags,.P|LACETEXT|
|00002a70| 5f 49 4e 0a 09 64 63 2e | 77 09 31 32 30 2c 09 31 |_IN..dc.|w.120,.1|
|00002a80| 2c 09 31 30 30 2c 09 31 | 34 2c 09 50 52 45 56 44 |,.100,.1|4,.PREVD|
|00002a90| 52 49 56 45 5f 47 41 44 | 0a 09 64 63 2e 6c 09 42 |RIVE_GAD|..dc.l.B|
|00002aa0| 55 54 54 4f 4e 5f 4b 49 | 4e 44 2c 09 50 72 65 76 |UTTON_KI|ND,.Prev|
|00002ab0| 44 72 69 76 65 54 78 74 | 2c 09 53 74 64 47 61 64 |DriveTxt|,.StdGad|
|00002ac0| 54 61 67 73 2c 09 50 4c | 41 43 45 54 45 58 54 5f |Tags,.PL|ACETEXT_|
|00002ad0| 49 4e 0a 09 64 63 2e 77 | 09 31 32 30 2c 09 33 33 |IN..dc.w|.120,.33|
|00002ae0| 2c 09 31 30 30 2c 09 31 | 34 2c 09 52 45 51 55 45 |,.100,.1|4,.REQUE|
|00002af0| 53 54 45 52 5f 47 41 44 | 0a 09 64 63 2e 6c 09 42 |STER_GAD|..dc.l.B|
|00002b00| 55 54 54 4f 4e 5f 4b 49 | 4e 44 2c 09 52 65 71 75 |UTTON_KI|ND,.Requ|
|00002b10| 65 73 74 65 72 54 78 74 | 2c 09 53 74 64 47 61 64 |esterTxt|,.StdGad|
|00002b20| 54 61 67 73 2c 09 50 4c | 41 43 45 54 45 58 54 5f |Tags,.PL|ACETEXT_|
|00002b30| 49 4e 0a 09 64 63 2e 77 | 09 31 30 30 2c 09 35 31 |IN..dc.w|.100,.51|
|00002b40| 2c 09 32 30 30 2c 09 31 | 34 2c 09 53 54 52 49 4e |,.200,.1|4,.STRIN|
|00002b50| 47 5f 47 41 44 0a 09 64 | 63 2e 6c 09 53 54 52 49 |G_GAD..d|c.l.STRI|
|00002b60| 4e 47 5f 4b 49 4e 44 2c | 09 53 74 72 69 6e 67 54 |NG_KIND,|.StringT|
|00002b70| 78 74 2c 09 53 74 64 47 | 61 64 54 61 67 73 2c 09 |xt,.StdG|adTags,.|
|00002b80| 50 4c 41 43 45 54 45 58 | 54 5f 4c 45 46 54 0a 09 |PLACETEX|T_LEFT..|
|00002b90| 64 63 2e 77 09 31 30 30 | 2c 09 36 36 2c 09 32 30 |dc.w.100|,.66,.20|
|00002ba0| 30 2c 09 31 34 2c 09 49 | 4e 54 5f 47 41 44 0a 09 |0,.14,.I|NT_GAD..|
|00002bb0| 64 63 2e 6c 09 49 4e 54 | 45 47 45 52 5f 4b 49 4e |dc.l.INT|EGER_KIN|
|00002bc0| 44 2c 09 49 6e 74 65 67 | 65 72 54 78 74 2c 09 53 |D,.Integ|erTxt,.S|
|00002bd0| 74 64 47 61 64 54 61 67 | 73 2c 09 50 4c 41 43 45 |tdGadTag|s,.PLACE|
|00002be0| 54 45 58 54 5f 4c 45 46 | 54 0a 09 64 63 2e 77 09 |TEXT_LEF|T..dc.w.|
|00002bf0| 39 30 2c 09 33 34 2c 09 | 32 36 2c 09 31 31 2c 09 |90,.34,.|26,.11,.|
|00002c00| 43 48 45 43 4b 5f 47 41 | 44 0a 09 64 63 2e 6c 09 |CHECK_GA|D..dc.l.|
|00002c10| 43 48 45 43 4b 42 4f 58 | 5f 4b 49 4e 44 2c 09 43 |CHECKBOX|_KIND,.C|
|00002c20| 68 65 63 6b 4d 65 54 78 | 74 2c 09 53 74 64 47 61 |heckMeTx|t,.StdGa|
|00002c30| 64 54 61 67 73 2c 09 50 | 4c 41 43 45 54 45 58 54 |dTags,.P|LACETEXT|
|00002c40| 5f 4c 45 46 54 0a 09 09 | 09 0a 47 61 64 67 65 74 |_LEFT...|..Gadget|
|00002c50| 44 61 74 61 73 32 3a 0a | 09 64 63 2e 77 09 36 0a |Datas2:.|.dc.w.6.|
|00002c60| 09 64 63 2e 77 09 32 38 | 30 2c 09 31 2c 09 30 2c |.dc.w.28|0,.1,.0,|
|00002c70| 09 30 2c 09 4d 58 5f 47 | 41 44 0a 09 64 63 2e 6c |.0,.MX_G|AD..dc.l|
|00002c80| 09 4d 58 5f 4b 49 4e 44 | 2c 09 30 2c 09 09 4d 78 |.MX_KIND|,.0,..Mx|
|00002c90| 54 61 67 73 2c 09 09 50 | 4c 41 43 45 54 45 58 54 |Tags,..P|LACETEXT|
|00002ca0| 5f 4c 45 46 54 0a 09 64 | 63 2e 77 09 33 30 35 2c |_LEFT..d|c.w.305,|
|00002cb0| 09 31 36 2c 09 32 30 30 | 2c 09 36 30 2c 09 4c 49 |.16,.200|,.60,.LI|
|00002cc0| 53 54 5f 47 41 44 0a 09 | 64 63 2e 6c 09 4c 49 53 |ST_GAD..|dc.l.LIS|
|00002cd0| 54 56 49 45 57 5f 4b 49 | 4e 44 2c 09 4c 69 73 74 |TVIEW_KI|ND,.List|
|00002ce0| 54 78 74 2c 09 4c 76 47 | 61 64 54 61 67 73 2c 09 |Txt,.LvG|adTags,.|
|00002cf0| 50 4c 41 43 45 54 45 58 | 54 5f 41 42 4f 56 45 21 |PLACETEX|T_ABOVE!|
|00002d00| 4e 47 5f 48 49 47 48 4c | 41 42 45 4c 0a 09 64 63 |NG_HIGHL|ABEL..dc|
|00002d10| 2e 77 09 31 32 30 2c 09 | 31 37 2c 09 31 30 30 2c |.w.120,.|17,.100,|
|00002d20| 09 31 34 2c 09 43 59 43 | 4c 45 5f 47 41 44 0a 09 |.14,.CYC|LE_GAD..|
|00002d30| 64 63 2e 6c 09 43 59 43 | 4c 45 5f 4b 49 4e 44 2c |dc.l.CYC|LE_KIND,|
|00002d40| 09 44 72 69 76 65 43 79 | 54 78 74 2c 09 43 79 63 |.DriveCy|Txt,.Cyc|
|00002d50| 6c 65 54 61 67 73 2c 09 | 50 4c 41 43 45 54 45 58 |leTags,.|PLACETEX|
|00002d60| 54 5f 4c 45 46 54 0a 09 | 64 63 2e 77 09 31 30 30 |T_LEFT..|dc.w.100|
|00002d70| 2c 09 38 32 2c 09 31 39 | 30 2c 09 31 34 2c 09 53 |,.82,.19|0,.14,.S|
|00002d80| 4c 49 44 45 52 5f 47 41 | 44 0a 09 64 63 2e 6c 09 |LIDER_GA|D..dc.l.|
|00002d90| 53 4c 49 44 45 52 5f 4b | 49 4e 44 2c 09 44 72 61 |SLIDER_K|IND,.Dra|
|00002da0| 67 4d 65 54 78 74 2c 09 | 53 6c 69 64 65 72 54 61 |gMeTxt,.|SliderTa|
|00002db0| 67 73 2c 09 50 4c 41 43 | 45 54 45 58 54 5f 4c 45 |gs,.PLAC|ETEXT_LE|
|00002dc0| 46 54 0a 09 64 63 2e 77 | 09 31 30 30 2c 09 39 38 |FT..dc.w|.100,.98|
|00002dd0| 2c 09 32 32 30 2c 09 31 | 34 2c 09 53 43 52 4f 4c |,.220,.1|4,.SCROL|
|00002de0| 4c 45 52 5f 47 41 44 0a | 09 64 63 2e 6c 09 53 43 |LER_GAD.|.dc.l.SC|
|00002df0| 52 4f 4c 4c 45 52 5f 4b | 49 4e 44 2c 09 53 63 72 |ROLLER_K|IND,.Scr|
|00002e00| 6f 6c 6c 4d 65 54 78 74 | 2c 09 53 63 72 6f 6c 6c |ollMeTxt|,.Scroll|
|00002e10| 65 72 54 61 67 73 2c 09 | 50 4c 41 43 45 54 45 58 |erTags,.|PLACETEX|
|00002e20| 54 5f 4c 45 46 54 0a 09 | 64 63 2e 77 09 33 34 30 |T_LEFT..|dc.w.340|
|00002e30| 2c 09 39 34 2c 09 31 36 | 36 2c 09 31 38 2c 09 50 |,.94,.16|6,.18,.P|
|00002e40| 41 4c 45 54 54 45 5f 47 | 41 44 0a 09 64 63 2e 6c |ALETTE_G|AD..dc.l|
|00002e50| 09 50 41 4c 45 54 54 45 | 5f 4b 49 4e 44 2c 09 50 |.PALETTE|_KIND,.P|
|00002e60| 61 6c 65 74 74 65 54 78 | 74 2c 09 50 61 6c 65 74 |aletteTx|t,.Palet|
|00002e70| 74 65 54 61 67 73 2c 09 | 50 4c 41 43 45 54 45 58 |teTags,.|PLACETEX|
|00002e80| 54 5f 41 42 4f 56 45 21 | 4e 47 5f 48 49 47 48 4c |T_ABOVE!|NG_HIGHL|
|00002e90| 41 42 45 4c 0a 09 0a 50 | 61 6c 65 74 74 65 54 61 |ABEL...P|aletteTa|
|00002ea0| 67 73 3a 09 64 63 2e 6c | 09 47 54 50 41 5f 44 65 |gs:.dc.l|.GTPA_De|
|00002eb0| 70 74 68 2c 09 32 2c 09 | 47 54 50 41 5f 49 6e 64 |pth,.2,.|GTPA_Ind|
|00002ec0| 69 63 61 74 6f 72 57 69 | 64 74 68 2c 09 33 36 0a |icatorWi|dth,.36.|
|00002ed0| 09 09 64 63 2e 6c 09 54 | 41 47 5f 4d 4f 52 45 2c |..dc.l.T|AG_MORE,|
|00002ee0| 09 53 74 64 47 61 64 54 | 61 67 73 0a 09 09 0a 53 |.StdGadT|ags....S|
|00002ef0| 63 72 6f 6c 6c 65 72 54 | 61 67 73 3a 09 64 63 2e |crollerT|ags:.dc.|
|00002f00| 6c 09 47 54 53 43 5f 54 | 6f 70 2c 09 31 31 30 2c |l.GTSC_T|op,.110,|
|00002f10| 09 47 54 53 43 5f 54 6f | 74 61 6c 2c 09 39 0a 09 |.GTSC_To|tal,.9..|
|00002f20| 09 64 63 2e 6c 09 47 54 | 53 43 5f 56 69 73 69 62 |.dc.l.GT|SC_Visib|
|00002f30| 6c 65 2c 09 35 2c 09 47 | 54 53 43 5f 41 72 72 6f |le,.5,.G|TSC_Arro|
|00002f40| 77 73 2c 09 31 36 0a 09 | 09 64 63 2e 6c 09 54 41 |ws,.16..|.dc.l.TA|
|00002f50| 47 5f 4d 4f 52 45 2c 09 | 53 74 64 47 61 64 54 61 |G_MORE,.|StdGadTa|
|00002f60| 67 73 0a 0a 53 6c 69 64 | 65 72 54 61 67 73 3a 09 |gs..Slid|erTags:.|
|00002f70| 64 63 2e 6c 09 47 54 53 | 4c 5f 4d 69 6e 2c 09 2d |dc.l.GTS|L_Min,.-|
|00002f80| 35 30 2c 09 47 54 53 4c | 5f 4d 61 78 2c 09 35 30 |50,.GTSL|_Max,.50|
|00002f90| 0a 09 09 64 63 2e 6c 09 | 47 54 53 4c 5f 4c 65 76 |...dc.l.|GTSL_Lev|
|00002fa0| 65 6c 2c 09 31 30 2c 09 | 47 54 53 4c 5f 4d 61 78 |el,.10,.|GTSL_Max|
|00002fb0| 4c 65 76 65 6c 4c 65 6e | 2c 33 0a 09 09 64 63 2e |LevelLen|,3...dc.|
|00002fc0| 6c 09 47 54 53 4c 5f 4c | 65 76 65 6c 46 6f 72 6d |l.GTSL_L|evelForm|
|00002fd0| 61 74 2c 09 73 6c 69 64 | 65 72 66 6f 72 6d 0a 09 |at,.slid|erform..|
|00002fe0| 09 64 63 2e 6c 09 47 54 | 53 4c 5f 4c 65 76 65 6c |.dc.l.GT|SL_Level|
|00002ff0| 50 6c 61 63 65 2c 09 50 | 4c 41 43 45 54 45 58 54 |Place,.P|LACETEXT|
|00003000| 5f 52 49 47 48 54 0a 09 | 09 64 63 2e 6c 09 54 41 |_RIGHT..|.dc.l.TA|
|00003010| 47 5f 4d 4f 52 45 2c 09 | 53 74 64 47 61 64 54 61 |G_MORE,.|StdGadTa|
|00003020| 67 73 0a 0a 4c 76 47 61 | 64 54 61 67 73 3a 09 64 |gs..LvGa|dTags:.d|
|00003030| 63 2e 6c 09 47 54 4c 56 | 5f 4c 61 62 65 6c 73 2c |c.l.GTLV|_Labels,|
|00003040| 09 4e 55 4c 4c 0a 09 09 | 64 63 2e 6c 09 47 54 4c |.NULL...|dc.l.GTL|
|00003050| 56 5f 53 68 6f 77 53 65 | 6c 65 63 74 65 64 2c 09 |V_ShowSe|lected,.|
|00003060| 4e 55 4c 4c 0a 09 09 64 | 63 2e 6c 09 54 41 47 5f |NULL...d|c.l.TAG_|
|00003070| 4d 4f 52 45 2c 09 53 74 | 64 47 61 64 54 61 67 73 |MORE,.St|dGadTags|
|00003080| 0a 0a 43 79 63 6c 65 54 | 61 67 73 3a 09 64 63 2e |..CycleT|ags:.dc.|
|00003090| 6c 09 47 54 43 59 5f 4c | 61 62 65 6c 73 2c 09 43 |l.GTCY_L|abels,.C|
|000030a0| 79 63 6c 65 54 65 78 74 | 0a 09 09 64 63 2e 6c 09 |ycleText|...dc.l.|
|000030b0| 54 41 47 5f 4d 4f 52 45 | 2c 09 53 74 64 47 61 64 |TAG_MORE|,.StdGad|
|000030c0| 54 61 67 73 0a 0a 4d 78 | 54 61 67 73 3a 09 09 64 |Tags..Mx|Tags:..d|
|000030d0| 63 2e 6c 09 47 54 4d 58 | 5f 4c 61 62 65 6c 73 2c |c.l.GTMX|_Labels,|
|000030e0| 09 43 79 63 6c 65 54 65 | 78 74 0a 09 09 64 63 2e |.CycleTe|xt...dc.|
|000030f0| 6c 09 47 54 4d 58 5f 53 | 70 61 63 69 6e 67 2c 09 |l.GTMX_S|pacing,.|
|00003100| 32 0a 61 63 74 3a 09 09 | 64 63 2e 6c 09 47 54 4d |2.act:..|dc.l.GTM|
|00003110| 58 5f 41 63 74 69 76 65 | 2c 09 32 2c 09 09 54 41 |X_Active|,.2,..TA|
|00003120| 47 5f 44 4f 4e 45 0a 0a | 43 79 63 6c 65 54 65 78 |G_DONE..|CycleTex|
|00003130| 74 3a 09 64 63 2e 6c 09 | 43 79 54 65 78 74 31 2c |t:.dc.l.|CyText1,|
|00003140| 43 79 54 65 78 74 32 2c | 43 79 54 65 78 74 33 2c |CyText2,|CyText3,|
|00003150| 43 79 54 65 78 74 34 2c | 43 79 54 65 78 74 35 2c |CyText4,|CyText5,|
|00003160| 30 0a 43 79 54 65 78 74 | 31 3a 09 64 63 2e 62 09 |0.CyText|1:.dc.b.|
|00003170| 22 44 46 30 3a 22 2c 30 | 0a 43 79 54 65 78 74 32 |"DF0:",0|.CyText2|
|00003180| 3a 09 64 63 2e 62 09 22 | 44 46 31 3a 22 2c 30 0a |:.dc.b."|DF1:",0.|
|00003190| 43 79 54 65 78 74 33 3a | 09 64 63 2e 62 09 22 44 |CyText3:|.dc.b."D|
|000031a0| 46 32 3a 22 2c 30 0a 43 | 79 54 65 78 74 34 3a 09 |F2:",0.C|yText4:.|
|000031b0| 64 63 2e 62 09 22 52 41 | 44 3a 22 2c 30 0a 43 79 |dc.b."RA|D:",0.Cy|
|000031c0| 54 65 78 74 35 3a 09 64 | 63 2e 62 09 22 53 44 30 |Text5:.d|c.b."SD0|
|000031d0| 3a 22 2c 30 0a 0a 61 63 | 74 69 76 65 6d 78 3a 09 |:",0..ac|tivemx:.|
|000031e0| 65 71 75 09 61 63 74 2b | 34 0a 0a 4e 65 78 74 44 |equ.act+|4..NextD|
|000031f0| 72 69 76 65 54 78 74 3a | 09 64 63 2e 62 09 22 5f |riveTxt:|.dc.b."_|
|00003200| 4e 65 78 74 20 64 72 69 | 76 65 22 2c 30 0a 50 72 |Next dri|ve",0.Pr|
|00003210| 65 76 44 72 69 76 65 54 | 78 74 3a 09 64 63 2e 62 |evDriveT|xt:.dc.b|
|00003220| 09 22 5f 50 72 65 76 20 | 64 72 69 76 65 22 2c 30 |."_Prev |drive",0|
|00003230| 0a 52 65 71 75 65 73 74 | 65 72 54 78 74 3a 09 64 |.Request|erTxt:.d|
|00003240| 63 2e 62 09 22 5f 52 65 | 71 75 65 73 74 65 72 22 |c.b."_Re|quester"|
|00003250| 2c 30 0a 44 72 69 76 65 | 43 79 54 78 74 3a 09 64 |,0.Drive|CyTxt:.d|
|00003260| 63 2e 62 09 22 5f 44 72 | 69 76 65 22 2c 30 0a 53 |c.b."_Dr|ive",0.S|
|00003270| 74 72 69 6e 67 54 78 74 | 3a 09 64 63 2e 62 09 22 |tringTxt|:.dc.b."|
|00003280| 5f 46 69 6c 65 6e 61 6d | 65 3a 22 2c 30 0a 49 6e |_Filenam|e:",0.In|
|00003290| 74 65 67 65 72 54 78 74 | 3a 09 64 63 2e 62 09 22 |tegerTxt|:.dc.b."|
|000032a0| 5f 49 6e 74 65 67 65 72 | 3a 22 2c 30 0a 43 68 65 |_Integer|:",0.Che|
|000032b0| 63 6b 4d 65 54 78 74 3a | 09 64 63 2e 62 09 22 43 |ckMeTxt:|.dc.b."C|
|000032c0| 5f 68 65 63 6b 20 6d 65 | 3a 22 2c 30 0a 4c 69 73 |_heck me|:",0.Lis|
|000032d0| 74 54 78 74 3a 09 64 63 | 2e 62 09 22 5f 53 65 6c |tTxt:.dc|.b."_Sel|
|000032e0| 65 63 74 20 61 6e 20 69 | 74 65 6d 3a 22 2c 30 0a |ect an i|tem:",0.|
|000032f0| 44 72 61 67 4d 65 54 78 | 74 3a 09 64 63 2e 62 09 |DragMeTx|t:.dc.b.|
|00003300| 22 44 72 61 5f 67 20 6d | 65 3a 22 2c 30 0a 73 6c |"Dra_g m|e:",0.sl|
|00003310| 69 64 65 72 66 6f 72 6d | 3a 09 64 63 2e 62 09 22 |iderform|:.dc.b."|
|00003320| 25 33 6c 64 22 2c 30 0a | 53 63 72 6f 6c 6c 4d 65 |%3ld",0.|ScrollMe|
|00003330| 54 78 74 3a 09 64 63 2e | 62 09 22 53 63 72 5f 6f |Txt:.dc.|b."Scr_o|
|00003340| 6c 6c 20 6d 65 3a 22 2c | 30 0a 50 61 6c 65 74 74 |ll me:",|0.Palett|
|00003350| 65 54 78 74 3a 09 64 63 | 2e 62 09 22 53 65 6c 65 |eTxt:.dc|.b."Sele|
|00003360| 63 74 20 5f 43 6f 6c 6f | 72 3a 22 2c 30 0a 09 65 |ct _Colo|r:",0..e|
|00003370| 76 65 6e 0a 0a 3b 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ven..;--|--------|
|00003380| 2d 2d 2d 2d 2d 2d 2d 20 | 4f 70 65 6e 20 61 20 77 |------- |Open a w|
|00003390| 69 6e 64 6f 77 20 74 6f | 20 75 73 65 20 61 73 20 |indow to| use as |
|000033a0| 61 20 72 65 71 75 65 73 | 74 65 72 20 2d 2d 2d 2d |a reques|ter ----|
|000033b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000033c0| 2d 0a 4f 70 65 6e 52 65 | 71 57 69 6e 3a 0a 09 6d |-.OpenRe|qWin:..m|
|000033d0| 6f 76 65 6d 2e 6c 09 64 | 30 2d 64 31 2f 61 30 2d |ovem.l.d|0-d1/a0-|
|000033e0| 61 31 2f 61 36 2c 2d 28 | 73 70 29 0a 09 6d 6f 76 |a1/a6,-(|sp)..mov|
|000033f0| 65 2e 6c 09 47 54 6f 6f | 6c 73 42 61 73 65 28 70 |e.l.GToo|lsBase(p|
|00003400| 63 29 2c 61 36 0a 0a 09 | 6c 65 61 2e 6c 09 72 65 |c),a6...|lea.l.re|
|00003410| 71 67 6c 69 73 74 28 70 | 63 29 2c 61 30 0a 09 43 |qglist(p|c),a0..C|
|00003420| 61 6c 6c 4c 69 62 09 43 | 72 65 61 74 65 43 6f 6e |allLib.C|reateCon|
|00003430| 74 65 78 74 09 09 3b 20 | 43 72 65 61 74 65 20 73 |text..; |Create s|
|00003440| 74 6f 72 61 67 65 20 66 | 6f 72 20 63 6f 6e 74 65 |torage f|or conte|
|00003450| 78 74 20 64 61 74 61 0a | 09 0a 09 6d 6f 76 65 2e |xt data.|...move.|
|00003460| 6c 09 64 30 2c 61 30 09 | 09 09 3b 20 50 72 65 76 |l.d0,a0.|..; Prev|
|00003470| 69 6f 75 73 20 67 61 64 | 67 65 74 20 28 43 72 65 |ious gad|get (Cre|
|00003480| 61 74 65 43 6f 6e 74 65 | 78 74 29 0a 09 6c 65 61 |ateConte|xt)..lea|
|00003490| 2e 6c 09 52 65 71 47 61 | 64 44 61 74 61 73 28 70 |.l.ReqGa|dDatas(p|
|000034a0| 63 29 2c 61 33 09 3b 20 | 47 65 74 20 70 6f 69 6e |c),a3.; |Get poin|
|000034b0| 74 65 72 20 74 6f 20 67 | 61 64 67 65 74 20 64 61 |ter to g|adget da|
|000034c0| 74 61 73 0a 09 73 75 62 | 61 2e 6c 09 61 34 2c 61 |tas..sub|a.l.a4,a|
|000034d0| 34 09 09 09 3b 20 44 6f | 6e 27 74 20 73 61 76 65 |4...; Do|n't save|
|000034e0| 20 67 61 64 67 65 74 20 | 70 6f 69 6e 74 65 72 73 | gadget |pointers|
|000034f0| 0a 09 62 73 72 2e 77 09 | 4d 61 6b 65 47 54 47 61 |..bsr.w.|MakeGTGa|
|00003500| 64 4c 69 73 74 0a 09 62 | 65 71 2e 73 09 2e 46 72 |dList..b|eq.s..Fr|
|00003510| 65 65 47 61 64 73 09 09 | 3b 20 45 72 72 6f 72 21 |eeGads..|; Error!|
|00003520| 0a 0a 09 73 75 62 61 2e | 6c 09 61 30 2c 61 30 09 |...suba.|l.a0,a0.|
|00003530| 09 09 3b 20 4e 6f 20 4e | 65 77 57 69 6e 64 6f 77 |..; No N|ewWindow|
|00003540| 20 73 74 72 75 63 74 75 | 72 65 0a 09 6c 65 61 2e | structu|re..lea.|
|00003550| 6c 09 52 65 71 57 69 6e | 54 61 67 73 28 70 63 29 |l.ReqWin|Tags(pc)|
|00003560| 2c 61 31 09 3b 20 54 61 | 67 20 70 6f 69 6e 74 65 |,a1.; Ta|g pointe|
|00003570| 72 0a 09 6d 6f 76 65 2e | 6c 09 49 6e 74 75 69 42 |r..move.|l.IntuiB|
|00003580| 61 73 65 28 70 63 29 2c | 61 36 0a 09 43 61 6c 6c |ase(pc),|a6..Call|
|00003590| 4c 69 62 09 4f 70 65 6e | 57 69 6e 64 6f 77 54 61 |Lib.Open|WindowTa|
|000035a0| 67 4c 69 73 74 09 3b 20 | 4f 70 65 6e 20 74 68 65 |gList.; |Open the|
|000035b0| 20 77 69 6e 64 6f 77 0a | 09 6d 6f 76 65 2e 6c 09 | window.|.move.l.|
|000035c0| 64 30 2c 72 65 71 5f 77 | 69 6e 28 61 35 29 0a 09 |d0,req_w|in(a5)..|
|000035d0| 62 65 71 2e 73 09 2e 46 | 72 65 65 47 61 64 73 09 |beq.s..F|reeGads.|
|000035e0| 09 3b 20 57 69 6e 64 6f | 77 20 66 61 69 6c 65 64 |.; Windo|w failed|
|000035f0| 20 74 6f 20 6f 70 65 6e | 0a 0a 09 6d 6f 76 65 2e | to open|...move.|
|00003600| 6c 09 64 30 2c 61 30 09 | 09 09 3b 20 57 69 6e 64 |l.d0,a0.|..; Wind|
|00003610| 6f 77 20 70 6f 69 6e 74 | 65 72 20 74 6f 20 41 30 |ow point|er to A0|
|00003620| 0a 09 73 75 62 61 2e 6c | 09 61 31 2c 61 31 0a 09 |..suba.l|.a1,a1..|
|00003630| 6d 6f 76 65 2e 6c 09 47 | 54 6f 6f 6c 73 42 61 73 |move.l.G|ToolsBas|
|00003640| 65 28 70 63 29 2c 61 36 | 0a 09 43 61 6c 6c 4c 69 |e(pc),a6|..CallLi|
|00003650| 62 09 47 54 5f 52 65 66 | 72 65 73 68 57 69 6e 64 |b.GT_Ref|reshWind|
|00003660| 6f 77 09 3b 20 52 65 66 | 72 65 73 68 20 74 68 65 |ow.; Ref|resh the|
|00003670| 20 67 61 64 67 65 74 73 | 0a 0a 09 6d 6f 76 65 2e | gadgets|...move.|
|00003680| 6c 09 72 65 71 5f 77 69 | 6e 28 61 35 29 2c 61 30 |l.req_wi|n(a5),a0|
|00003690| 09 09 3b 20 44 72 61 77 | 20 61 20 62 65 76 65 6c |..; Draw| a bevel|
|000036a0| 20 62 6f 78 20 66 6f 72 | 20 70 72 6f 67 72 65 73 | box for| progres|
|000036b0| 73 0a 09 6d 6f 76 65 2e | 6c 09 77 64 5f 52 50 6f |s..move.|l.wd_RPo|
|000036c0| 72 74 28 61 30 29 2c 61 | 30 09 09 3b 20 69 6e 64 |rt(a0),a|0..; ind|
|000036d0| 69 63 61 74 6f 72 0a 09 | 6c 65 61 2e 6c 09 42 65 |icator..|lea.l.Be|
|000036e0| 76 65 6c 42 6f 78 54 61 | 67 73 28 70 63 29 2c 61 |velBoxTa|gs(pc),a|
|000036f0| 31 0a 09 6d 6f 76 65 2e | 6c 09 76 69 5f 69 6e 66 |1..move.|l.vi_inf|
|00003700| 28 61 35 29 2c 34 28 61 | 31 29 0a 09 6d 6f 76 65 |(a5),4(a|1)..move|
|00003710| 71 2e 6c 09 23 32 30 2c | 64 30 0a 09 6d 6f 76 65 |q.l.#20,|d0..move|
|00003720| 71 2e 6c 09 23 35 2c 64 | 31 0a 09 61 64 64 2e 77 |q.l.#5,d|1..add.w|
|00003730| 09 54 6f 70 42 6f 72 4f | 66 66 73 28 61 35 29 2c |.TopBorO|ffs(a5),|
|00003740| 64 31 0a 09 6d 6f 76 65 | 2e 77 09 23 34 31 30 2c |d1..move|.w.#410,|
|00003750| 64 32 0a 09 6d 6f 76 65 | 71 2e 6c 09 23 31 34 2c |d2..move|q.l.#14,|
|00003760| 64 33 0a 09 43 61 6c 6c | 4c 69 62 09 44 72 61 77 |d3..Call|Lib.Draw|
|00003770| 42 65 76 65 6c 42 6f 78 | 41 0a 0a 09 6d 6f 76 65 |BevelBox|A...move|
|00003780| 2e 6c 09 47 66 78 42 61 | 73 65 28 70 63 29 2c 61 |.l.GfxBa|se(pc),a|
|00003790| 36 09 09 3b 20 43 68 61 | 6e 67 65 20 70 65 6e 20 |6..; Cha|nge pen |
|000037a0| 66 6f 72 20 52 61 73 74 | 50 6f 72 74 0a 09 6d 6f |for Rast|Port..mo|
|000037b0| 76 65 2e 6c 09 72 65 71 | 5f 77 69 6e 28 61 35 29 |ve.l.req|_win(a5)|
|000037c0| 2c 61 31 0a 09 6d 6f 76 | 65 2e 6c 09 77 64 5f 52 |,a1..mov|e.l.wd_R|
|000037d0| 50 6f 72 74 28 61 31 29 | 2c 61 31 0a 09 6d 6f 76 |Port(a1)|,a1..mov|
|000037e0| 65 71 2e 6c 09 23 33 2c | 64 30 0a 09 43 61 6c 6c |eq.l.#3,|d0..Call|
|000037f0| 4c 69 62 09 53 65 74 41 | 50 65 6e 0a 09 0a 09 6d |Lib.SetA|Pen....m|
|00003800| 6f 76 65 2e 6c 09 72 65 | 71 5f 77 69 6e 28 61 35 |ove.l.re|q_win(a5|
|00003810| 29 2c 61 30 0a 09 62 73 | 72 2e 73 09 50 72 6f 63 |),a0..bs|r.s.Proc|
|00003820| 65 73 73 52 65 71 45 76 | 65 6e 74 73 0a 0a 2e 43 |essReqEv|ents...C|
|00003830| 6c 6f 73 65 52 65 71 3a | 0a 09 6d 6f 76 65 2e 6c |loseReq:|..move.l|
|00003840| 09 72 65 71 5f 77 69 6e | 28 61 35 29 2c 61 30 09 |.req_win|(a5),a0.|
|00003850| 09 3b 20 43 6c 6f 73 65 | 20 6f 75 72 20 77 69 6e |.; Close| our win|
|00003860| 64 6f 77 0a 09 6d 6f 76 | 65 2e 6c 09 49 6e 74 75 |dow..mov|e.l.Intu|
|00003870| 69 42 61 73 65 28 70 63 | 29 2c 61 36 0a 09 43 61 |iBase(pc|),a6..Ca|
|00003880| 6c 6c 4c 69 62 09 43 6c | 6f 73 65 57 69 6e 64 6f |llLib.Cl|oseWindo|
|00003890| 77 0a 2e 46 72 65 65 47 | 61 64 73 3a 0a 09 6d 6f |w..FreeG|ads:..mo|
|000038a0| 76 65 2e 6c 09 47 54 6f | 6f 6c 73 42 61 73 65 28 |ve.l.GTo|olsBase(|
|000038b0| 70 63 29 2c 61 36 09 3b | 20 44 65 61 6c 6c 6f 63 |pc),a6.;| Dealloc|
|000038c0| 61 74 65 20 6d 65 6d 20 | 66 6f 72 20 67 61 64 67 |ate mem |for gadg|
|000038d0| 65 74 73 0a 09 6d 6f 76 | 65 2e 6c 09 72 65 71 67 |ets..mov|e.l.reqg|
|000038e0| 6c 69 73 74 28 70 63 29 | 2c 61 30 0a 09 43 61 6c |list(pc)|,a0..Cal|
|000038f0| 6c 4c 69 62 09 46 72 65 | 65 47 61 64 67 65 74 73 |lLib.Fre|eGadgets|
|00003900| 0a 2e 4e 6f 42 75 74 74 | 3a 0a 09 6d 6f 76 65 6d |..NoButt|:..movem|
|00003910| 2e 6c 09 28 73 70 29 2b | 2c 64 30 2d 64 31 2f 61 |.l.(sp)+|,d0-d1/a|
|00003920| 30 2d 61 31 2f 61 36 0a | 09 72 74 73 0a 0a 3b 2d |0-a1/a6.|.rts..;-|
|00003930| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 20 50 |--------|------ P|
|00003940| 72 6f 63 65 73 73 20 65 | 76 65 6e 74 73 20 66 6f |rocess e|vents fo|
|00003950| 72 20 72 65 71 75 65 73 | 74 65 72 20 77 69 6e 64 |r reques|ter wind|
|00003960| 6f 77 20 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ow -----|--------|
|00003970| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0a 50 72 6f 63 65 73 |--------|-.Proces|
|00003980| 73 52 65 71 45 76 65 6e | 74 73 3a 0a 09 6d 6f 76 |sReqEven|ts:..mov|
|00003990| 65 6d 2e 6c 09 64 30 2d | 64 33 2f 61 30 2d 61 33 |em.l.d0-|d3/a0-a3|
|000039a0| 2f 61 36 2c 2d 28 73 70 | 29 0a 09 6d 6f 76 65 2e |/a6,-(sp|)..move.|
|000039b0| 6c 09 61 30 2c 2d 28 73 | 70 29 0a 2e 57 61 69 74 |l.a0,-(s|p)..Wait|
|000039c0| 45 76 65 6e 74 3a 0a 09 | 6d 6f 76 65 2e 6c 09 28 |Event:..|move.l.(|
|000039d0| 73 70 29 2c 61 30 0a 09 | 6d 6f 76 65 2e 6c 09 77 |sp),a0..|move.l.w|
|000039e0| 64 5f 55 73 65 72 50 6f | 72 74 28 61 30 29 2c 61 |d_UserPo|rt(a0),a|
|000039f0| 30 09 3b 20 57 69 6e 64 | 6f 77 20 2d 3e 20 55 73 |0.; Wind|ow -> Us|
|00003a00| 65 72 50 6f 72 74 0a 09 | 6d 6f 76 65 2e 6c 09 5f |erPort..|move.l._|
|00003a10| 41 62 73 45 78 65 63 42 | 61 73 65 2c 61 36 0a 09 |AbsExecB|ase,a6..|
|00003a20| 43 61 6c 6c 4c 69 62 09 | 57 61 69 74 50 6f 72 74 |CallLib.|WaitPort|
|00003a30| 09 09 3b 20 57 61 69 74 | 20 66 6f 72 20 61 20 6d |..; Wait| for a m|
|00003a40| 65 73 73 61 67 65 0a 2e | 47 65 74 45 76 65 6e 74 |essage..|GetEvent|
|00003a50| 3a 0a 09 6d 6f 76 65 2e | 6c 09 28 73 70 29 2c 61 |:..move.|l.(sp),a|
|00003a60| 30 09 09 09 3b 20 47 65 | 74 20 55 73 65 72 50 6f |0...; Ge|t UserPo|
|00003a70| 72 74 20 70 6f 69 6e 74 | 65 72 0a 09 62 73 72 2e |rt point|er..bsr.|
|00003a80| 77 09 47 65 74 49 4d 65 | 73 73 61 67 65 0a 09 62 |w.GetIMe|ssage..b|
|00003a90| 6d 69 2e 73 09 2e 47 65 | 74 45 76 65 6e 74 09 09 |mi.s..Ge|tEvent..|
|00003aa0| 3b 20 45 76 65 6e 74 20 | 70 72 6f 63 65 73 73 65 |; Event |processe|
|00003ab0| 64 20 2d 20 67 65 74 20 | 6e 65 78 74 20 65 76 65 |d - get |next eve|
|00003ac0| 6e 74 0a 09 62 65 71 2e | 73 09 2e 57 61 69 74 45 |nt..beq.|s..WaitE|
|00003ad0| 76 65 6e 74 09 09 3b 20 | 4e 6f 20 6d 65 73 73 61 |vent..; |No messa|
|00003ae0| 67 65 20 2d 20 77 61 69 | 74 20 6d 6f 72 65 0a 09 |ge - wai|t more..|
|00003af0| 0a 09 63 6d 70 2e 6c 09 | 23 49 44 43 4d 50 5f 47 |..cmp.l.|#IDCMP_G|
|00003b00| 41 44 47 45 54 55 50 2c | 64 33 09 3b 20 41 6e 79 |ADGETUP,|d3.; Any|
|00003b10| 20 67 61 64 67 65 74 20 | 72 65 6c 65 61 73 65 64 | gadget |released|
|00003b20| 20 3f 0a 09 62 6e 65 2e | 73 09 2e 47 65 74 45 76 | ?..bne.|s..GetEv|
|00003b30| 65 6e 74 09 09 3b 20 4e | 6f 70 65 21 20 47 65 74 |ent..; N|ope! Get|
|00003b40| 20 6e 65 78 74 20 65 76 | 65 6e 74 0a 0a 09 63 6d | next ev|ent...cm|
|00003b50| 70 2e 77 09 23 43 41 4e | 43 45 4c 5f 47 41 44 2c |p.w.#CAN|CEL_GAD,|
|00003b60| 67 67 5f 47 61 64 67 65 | 74 49 44 28 61 32 29 0a |gg_Gadge|tID(a2).|
|00003b70| 09 62 65 71 2e 62 09 2e | 45 78 69 74 0a 09 62 72 |.beq.b..|Exit..br|
|00003b80| 61 2e 73 09 2e 47 65 74 | 45 76 65 6e 74 0a 2e 45 |a.s..Get|Event..E|
|00003b90| 78 69 74 0a 09 6d 6f 76 | 65 2e 6c 09 28 73 70 29 |xit..mov|e.l.(sp)|
|00003ba0| 2b 2c 61 30 0a 09 6d 6f | 76 65 6d 2e 6c 09 28 73 |+,a0..mo|vem.l.(s|
|00003bb0| 70 29 2b 2c 64 30 2d 64 | 33 2f 61 30 2d 61 33 2f |p)+,d0-d|3/a0-a3/|
|00003bc0| 61 36 0a 09 72 74 73 0a | 0a 3b 2d 2d 2d 2d 2d 2d |a6..rts.|.;------|
|00003bd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003be0| 2d 2d 20 44 61 74 61 20 | 66 6f 72 20 72 65 71 75 |-- Data |for requ|
|00003bf0| 65 73 74 65 72 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ester --|--------|
|00003c00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003c10| 2d 2d 0a 0a 49 44 43 4d | 50 33 3a 09 65 71 75 09 |--..IDCM|P3:.equ.|
|00003c20| 42 55 54 54 4f 4e 49 44 | 43 4d 50 21 49 44 43 4d |BUTTONID|CMP!IDCM|
|00003c30| 50 5f 52 45 46 52 45 53 | 48 57 49 4e 44 4f 57 21 |P_REFRES|HWINDOW!|
|00003c40| 49 44 43 4d 50 5f 56 41 | 4e 49 4c 4c 41 4b 45 59 |IDCMP_VA|NILLAKEY|
|00003c50| 21 49 44 43 4d 50 5f 52 | 41 57 4b 45 59 0a 0a 42 |!IDCMP_R|AWKEY..B|
|00003c60| 65 76 65 6c 42 6f 78 54 | 61 67 73 3a 0a 09 64 63 |evelBoxT|ags:..dc|
|00003c70| 2e 6c 09 47 54 5f 56 69 | 73 75 61 6c 49 6e 66 6f |.l.GT_Vi|sualInfo|
|00003c80| 2c 09 30 2c 09 47 54 42 | 42 5f 52 65 63 65 73 73 |,.0,.GTB|B_Recess|
|00003c90| 65 64 2c 09 54 52 55 45 | 0a 09 64 63 2e 6c 09 54 |ed,.TRUE|..dc.l.T|
|00003ca0| 41 47 5f 44 4f 4e 45 0a | 09 0a 52 65 71 47 61 64 |AG_DONE.|..ReqGad|
|00003cb0| 44 61 74 61 73 3a 0a 09 | 64 63 2e 77 09 31 0a 09 |Datas:..|dc.w.1..|
|00003cc0| 64 63 2e 77 09 31 37 35 | 2c 09 32 35 2c 09 31 30 |dc.w.175|,.25,.10|
|00003cd0| 30 2c 09 31 34 2c 09 43 | 41 4e 43 45 4c 5f 47 41 |0,.14,.C|ANCEL_GA|
|00003ce0| 44 0a 09 64 63 2e 6c 09 | 42 55 54 54 4f 4e 5f 4b |D..dc.l.|BUTTON_K|
|00003cf0| 49 4e 44 2c 09 43 61 6e | 63 65 6c 54 78 74 2c 09 |IND,.Can|celTxt,.|
|00003d00| 53 74 64 47 61 64 54 61 | 67 73 2c 09 50 4c 41 43 |StdGadTa|gs,.PLAC|
|00003d10| 45 54 45 58 54 5f 49 4e | 0a 0a 52 65 71 57 69 6e |ETEXT_IN|..ReqWin|
|00003d20| 54 61 67 73 3a 0a 09 64 | 63 2e 6c 09 57 41 5f 57 |Tags:..d|c.l.WA_W|
|00003d30| 69 64 74 68 2c 09 34 35 | 30 2c 09 09 57 41 5f 49 |idth,.45|0,..WA_I|
|00003d40| 6e 6e 65 72 48 65 69 67 | 68 74 2c 09 34 35 0a 09 |nnerHeig|ht,.45..|
|00003d50| 64 63 2e 6c 09 57 41 5f | 54 69 74 6c 65 2c 09 72 |dc.l.WA_|Title,.r|
|00003d60| 65 71 74 69 74 6c 65 2c | 09 57 41 5f 49 44 43 4d |eqtitle,|.WA_IDCM|
|00003d70| 50 2c 09 49 44 43 4d 50 | 33 0a 72 65 71 67 6c 3a |P,.IDCMP|3.reqgl:|
|00003d80| 09 64 63 2e 6c 09 57 41 | 5f 47 61 64 67 65 74 73 |.dc.l.WA|_Gadgets|
|00003d90| 2c 09 30 2c 09 09 54 41 | 47 5f 4d 4f 52 45 2c 09 |,.0,..TA|G_MORE,.|
|00003da0| 73 74 64 77 69 6e 74 61 | 67 73 0a 0a 72 65 71 67 |stdwinta|gs..reqg|
|00003db0| 6c 69 73 74 3a 09 65 71 | 75 09 72 65 71 67 6c 2b |list:.eq|u.reqgl+|
|00003dc0| 34 0a 0a 72 65 71 74 69 | 74 6c 65 3a 09 64 63 2e |4..reqti|tle:.dc.|
|00003dd0| 62 09 22 20 20 20 20 20 | 20 20 20 20 4d 79 20 70 |b." | My p|
|00003de0| 72 6f 67 72 65 73 73 20 | 72 65 71 75 65 73 74 65 |rogress |requeste|
|00003df0| 72 20 4e 4f 54 20 69 6e | 63 6c 75 64 65 64 21 21 |r NOT in|cluded!!|
|00003e00| 21 22 2c 30 0a 43 61 6e | 63 65 6c 54 78 74 3a 09 |!",0.Can|celTxt:.|
|00003e10| 64 63 2e 62 09 22 5f 43 | 61 6e 63 65 6c 22 2c 30 |dc.b."_C|ancel",0|
|00003e20| 0a 09 65 76 65 6e 0a 3b | 2d 2d 2d 2d 2d 2d 2d 2d |..even.;|--------|
|00003e30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003e40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003e50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003e60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003e70| 2d 2d 2d 0a 0a 3b 09 69 | 6e 63 6c 75 64 65 09 22 |---..;.i|nclude."|
|00003e80| 64 61 74 61 3a 53 6f 75 | 72 63 65 73 2f 52 6f 75 |data:Sou|rces/Rou|
|00003e90| 74 69 6e 65 73 2f 54 65 | 73 74 50 72 6f 67 73 2f |tines/Te|stProgs/|
|00003ea0| 48 6f 74 6b 65 79 52 6f | 75 74 69 6e 65 73 2e 73 |HotkeyRo|utines.s|
|00003eb0| 22 0a 0a 3b 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |"..;----|--------|
|00003ec0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003ed0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 20 42 53 53 20 2d 2d |--------|- BSS --|
|00003ee0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003ef0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f00| 2d 0a 09 53 54 52 55 43 | 54 55 52 45 09 42 53 53 |-..STRUC|TURE.BSS|
|00003f10| 2c 30 0a 09 09 57 4f 52 | 44 09 54 6f 70 42 6f 72 |,0...WOR|D.TopBor|
|00003f20| 4f 66 66 73 09 09 3b 20 | 54 6f 70 20 62 6f 72 64 |Offs..; |Top bord|
|00003f30| 65 72 20 6f 66 66 73 65 | 74 20 66 6f 72 20 67 61 |er offse|t for ga|
|00003f40| 64 67 65 74 73 0a 09 09 | 4c 4f 4e 47 09 76 69 5f |dgets...|LONG.vi_|
|00003f50| 69 6e 66 0a 09 09 4c 4f | 4e 47 09 52 65 6d 65 6d |inf...LO|NG.Remem|
|00003f60| 62 65 72 4b 65 79 09 09 | 3b 20 66 6f 72 20 41 6c |berKey..|; for Al|
|00003f70| 6c 6f 63 52 65 6d 65 6d | 62 65 72 20 6f 66 20 75 |locRemem|ber of u|
|00003f80| 73 65 72 64 61 74 61 0a | 0a 09 09 4c 4f 4e 47 09 |serdata.|...LONG.|
|00003f90| 6d 61 69 6e 5f 77 69 6e | 0a 09 09 4c 4f 4e 47 09 |main_win|...LONG.|
|00003fa0| 67 74 5f 67 61 64 0a 09 | 09 53 54 52 55 43 54 09 |gt_gad..|.STRUCT.|
|00003fb0| 67 74 5f 6e 67 2c 67 6e | 67 5f 53 49 5a 45 4f 46 |gt_ng,gn|g_SIZEOF|
|00003fc0| 09 3b 20 4e 65 77 47 61 | 64 67 65 74 20 73 74 72 |.; NewGa|dget str|
|00003fd0| 75 63 74 75 72 65 0a 09 | 09 4c 4f 4e 47 09 4d 61 |ucture..|.LONG.Ma|
|00003fe0| 69 6e 57 69 6e 53 69 67 | 4d 61 73 6b 09 09 3b 20 |inWinSig|Mask..; |
|00003ff0| 53 69 67 6e 61 6c 20 6d | 61 73 6b 20 66 6f 72 20 |Signal m|ask for |
|00004000| 6d 61 69 6e 20 77 69 6e | 64 6f 77 0a 0a 09 09 4c |main win|dow....L|
|00004010| 4f 4e 47 09 72 65 71 5f | 77 69 6e 0a 09 09 53 54 |ONG.req_|win...ST|
|00004020| 52 55 43 54 09 6d 79 72 | 65 71 2c 72 71 5f 53 49 |RUCT.myr|eq,rq_SI|
|00004030| 5a 45 4f 46 0a 0a 09 09 | 4c 4f 4e 47 09 6d 78 5f |ZEOF....|LONG.mx_|
|00004040| 67 61 64 09 09 09 3b 20 | 53 74 6f 72 61 67 65 20 |gad...; |Storage |
|00004050| 66 6f 72 20 73 6f 6d 65 | 20 67 61 64 67 65 74 20 |for some| gadget |
|00004060| 70 74 72 73 0a 09 09 4c | 4f 4e 47 09 6c 76 5f 67 |ptrs...L|ONG.lv_g|
|00004070| 61 64 0a 09 09 4c 4f 4e | 47 09 63 79 5f 67 61 64 |ad...LON|G.cy_gad|
|00004080| 0a 09 09 4c 4f 4e 47 09 | 73 6c 5f 67 61 64 0a 09 |...LONG.|sl_gad..|
|00004090| 09 4c 4f 4e 47 09 73 63 | 5f 67 61 64 0a 09 09 4c |.LONG.sc|_gad...L|
|000040a0| 4f 4e 47 09 70 61 5f 67 | 61 64 0a 09 4c 41 42 45 |ONG.pa_g|ad..LABE|
|000040b0| 4c 09 42 53 53 5f 53 69 | 7a 65 6f 66 0a 09 0a 09 |L.BSS_Si|zeof....|
|000040c0| 53 45 43 54 49 4f 4e 20 | 42 53 53 44 61 74 61 73 |SECTION |BSSDatas|
|000040d0| 2c 42 53 53 0a 42 53 53 | 5f 44 61 74 61 73 3a 0a |,BSS.BSS|_Datas:.|
|000040e0| 09 64 73 2e 62 09 42 53 | 53 5f 53 69 7a 65 6f 66 |.ds.b.BS|S_Sizeof|
|000040f0| 0a | |. | |
+--------+-------------------------+-------------------------+--------+--------+