/ ArtWorks ClipArt 1 / CLIPART.iso / demos / artworks / _fontview / _runimage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1e 20 ee 20 85 | 20 e7 20 a4 45 72 72 6f |.... . .| . .Erro|
|00000010| 72 20 8c 20 f2 43 6c 6f | 73 65 44 6f 77 6e 0d 00 |r . .Clo|seDown..|
|00000020| 14 10 20 f2 49 6e 69 74 | 69 61 6c 69 73 65 0d 00 |.. .Init|ialise..|
|00000030| 1e 0e 20 f2 4d 61 69 6e | 4c 6f 6f 70 0d 00 28 0f |.. .Main|Loop..(.|
|00000040| 20 f2 43 6c 6f 73 65 44 | 6f 77 6e 0d 00 32 06 20 | .CloseD|own..2. |
|00000050| 3a 0d 00 3c 0f 20 dd f2 | 4d 61 69 6e 4c 6f 6f 70 |:..<. ..|MainLoop|
|00000060| 0d 00 46 1e 20 ee 20 85 | 20 e7 20 a4 45 72 72 6f |..F. . .| . .Erro|
|00000070| 72 20 8c 20 f2 43 6c 6f | 73 65 44 6f 77 6e 0d 00 |r . .Clo|seDown..|
|00000080| 50 06 20 f5 0d 00 5a 30 | 20 20 20 c8 99 20 22 57 |P. ...Z0|   .. "W|
|00000090| 69 6d 70 5f 50 6f 6c 6c | 22 2c 30 2c 50 6f 6c 6c |imp_Poll|",0,Poll|
|000000a0| 42 6c 6b 20 b8 20 52 65 | 61 73 6f 6e 2c 50 6f 6c |Blk . Re|ason,Pol|
|000000b0| 6c 42 6c 6b 0d 00 64 12 | 20 20 20 c8 8e 20 52 65 |lBlk..d.|   .. Re|
|000000c0| 61 73 6f 6e 20 ca 0d 00 | 6e 1b 20 20 20 c9 20 31 |ason ...|n.   . 1|
|000000d0| 3a f2 52 65 64 72 61 77 | 28 50 6f 6c 6c 42 6c 6b |:.Redraw|(PollBlk|
|000000e0| 29 0d 00 78 1f 20 20 20 | c9 20 32 3a f2 4f 70 65 |)..x.   |. 2:.Ope|
|000000f0| 6e 57 69 6e 64 6f 77 28 | 50 6f 6c 6c 42 6c 6b 29 |nWindow(|PollBlk)|
|00000100| 0d 00 82 20 20 20 20 c9 | 20 33 3a f2 43 6c 6f 73 |...    .| 3:.Clos|
|00000110| 65 57 69 6e 64 6f 77 28 | 50 6f 6c 6c 42 6c 6b 29 |eWindow(|PollBlk)|
|00000120| 0d 00 8c 20 20 20 20 c9 | 20 36 3a f2 42 75 74 74 |...    .| 6:.Butt|
|00000130| 6f 6e 50 72 65 73 73 28 | 50 6f 6c 6c 42 6c 6b 29 |onPress(|PollBlk)|
|00000140| 0d 00 96 1d 20 20 20 c9 | 20 37 3a f2 44 72 61 67 |....   .| 7:.Drag|
|00000150| 44 6f 6e 65 28 50 6f 6c | 6c 42 6c 6b 29 0d 00 a0 |Done(Pol|lBlk)...|
|00000160| 18 20 20 20 c9 20 38 3a | f2 4b 65 79 28 50 6f 6c |.   . 8:|.Key(Pol|
|00000170| 6c 42 6c 6b 29 0d 00 aa | 1f 20 20 20 c9 20 39 3a |lBlk)...|.   . 9:|
|00000180| f2 4d 65 6e 75 53 65 6c | 65 63 74 28 50 6f 6c 6c |.MenuSel|ect(Poll|
|00000190| 42 6c 6b 29 0d 00 b4 27 | 20 20 20 c9 20 31 37 2c |Blk)...'|   . 17,|
|000001a0| 31 38 3a f2 52 65 63 65 | 69 76 65 4d 65 73 73 61 |18:.Rece|iveMessa|
|000001b0| 67 65 28 50 6f 6c 6c 42 | 6c 6b 29 0d 00 be 08 20 |ge(PollB|lk).... |
|000001c0| 20 20 cb 0d 00 c8 1e 20 | fd 20 43 43 52 65 6c 65 |  ..... |. CCRele|
|000001d0| 61 73 65 41 50 72 6f 64 | 75 63 74 4f 6e 54 69 6d |aseAProd|uctOnTim|
|000001e0| 65 0d 00 d2 06 20 e1 0d | 00 dc 06 20 3a 0d 00 e6 |e.... ..|... :...|
|000001f0| 11 20 dd f2 49 6e 69 74 | 69 61 6c 69 73 65 0d 00 |. ..Init|ialise..|
|00000200| f0 0e 20 f2 57 49 4d 50 | 49 6e 69 74 0d 00 fa 0f |.. .WIMP|Init....|
|00000210| 20 f2 56 61 72 69 61 62 | 6c 65 73 0d 01 04 0c 20 | .Variab|les.... |
|00000220| f2 42 6c 6f 63 6b 73 0d | 01 0e 0f 20 f2 54 65 6d |.Blocks.|... .Tem|
|00000230| 70 6c 61 74 65 73 0d 01 | 18 12 20 f2 47 65 74 46 |plates..|.. .GetF|
|00000240| 6f 6e 74 4e 61 6d 65 73 | 0d 01 22 26 20 f2 41 6c |ontNames|.."& .Al|
|00000250| 74 65 72 49 63 6f 6e 28 | 49 6e 66 6f 48 61 6e 64 |terIcon(|InfoHand|
|00000260| 6c 65 2c 31 2c 41 70 70 | 4e 61 6d 65 24 29 0d 01 |le,1,App|Name$)..|
|00000270| 2c 26 20 f2 41 6c 74 65 | 72 49 63 6f 6e 28 49 6e |,& .Alte|rIcon(In|
|00000280| 66 6f 48 61 6e 64 6c 65 | 2c 32 2c 50 75 72 70 6f |foHandle|,2,Purpo|
|00000290| 73 65 24 29 0d 01 36 25 | 20 f2 41 6c 74 65 72 49 |se$)..6%| .AlterI|
|000002a0| 63 6f 6e 28 49 6e 66 6f | 48 61 6e 64 6c 65 2c 33 |con(Info|Handle,3|
|000002b0| 2c 41 75 74 68 6f 72 24 | 29 0d 01 40 26 20 f2 41 |,Author$|)..@& .A|
|000002c0| 6c 74 65 72 49 63 6f 6e | 28 49 6e 66 6f 48 61 6e |lterIcon|(InfoHan|
|000002d0| 64 6c 65 2c 34 2c 56 65 | 72 73 69 6f 6e 24 29 0d |dle,4,Ve|rsion$).|
|000002e0| 01 4a 10 20 f2 53 70 72 | 69 74 65 49 6e 69 74 0d |.J. .Spr|iteInit.|
|000002f0| 01 54 37 20 49 63 6f 6e | 42 61 72 49 63 6f 6e 48 |.T7 Icon|BarIconH|
|00000300| 61 6e 64 6c 65 3d a4 49 | 63 6f 6e 42 61 72 28 36 |andle=.I|conBar(6|
|00000310| 38 2c 36 38 2c 41 70 70 | 4e 61 6d 65 24 2c 52 4d |8,68,App|Name$,RM|
|00000320| 41 41 72 65 61 29 0d 01 | 5e 12 20 f2 4d 61 6b 65 |AArea)..|^. .Make|
|00000330| 4d 61 69 6e 4d 65 6e 75 | 0d 01 68 06 20 e1 0d 01 |MainMenu|..h. ...|
|00000340| 72 06 20 3a 0d 01 7c 10 | 20 dd f2 56 61 72 69 61 |r. :..|.| ..Varia|
|00000350| 62 6c 65 73 0d 01 86 12 | 20 43 75 72 72 65 6e 74 |bles....| Current|
|00000360| 46 6f 6e 74 3d 31 0d 01 | 90 1e 20 43 43 52 65 6c |Font=1..|.. CCRel|
|00000370| 65 61 73 65 41 50 72 6f | 64 75 63 74 4f 6e 54 69 |easeAPro|ductOnTi|
|00000380| 6d 65 3d a3 0d 01 9a 19 | 20 41 70 70 4e 61 6d 65 |me=.....| AppName|
|00000390| 24 3d 22 21 46 6f 6e 74 | 56 69 65 77 22 0d 01 a4 |$="!Font|View"...|
|000003a0| 24 20 50 75 72 70 6f 73 | 65 24 3d 22 41 72 74 57 |$ Purpos|e$="ArtW|
|000003b0| 6f 72 6b 73 20 46 6f 6e | 74 20 56 69 65 77 65 72 |orks Fon|t Viewer|
|000003c0| 22 0d 01 ae 27 20 41 75 | 74 68 6f 72 24 3d 22 a9 |"...' Au|thor$=".|
|000003d0| 20 43 6f 6d 70 75 74 65 | 72 20 43 6f 6e 63 65 70 | Compute|r Concep|
|000003e0| 74 73 20 31 39 39 33 22 | 0d 01 b8 25 20 56 65 72 |ts 1993"|...% Ver|
|000003f0| 73 69 6f 6e 24 3d 22 31 | 2e 30 30 20 31 38 74 68 |sion$="1|.00 18th|
|00000400| 20 41 75 67 75 73 74 20 | 31 39 39 33 22 0d 01 c2 | August |1993"...|
|00000410| 18 20 53 70 72 74 42 6c | 6b 53 69 7a 65 3d 38 30 |. SprtBl|kSize=80|
|00000420| 2a 31 30 32 34 0d 01 cc | 0e 20 54 6f 70 47 61 70 |*1024...|. TopGap|
|00000430| 3d 37 36 0d 01 d6 0e 20 | 4d 79 48 69 6d 65 6d 3d |=76.... |MyHimem=|
|00000440| 93 0d 01 e0 15 20 4d 61 | 69 6e 57 69 6e 64 6f 77 |..... Ma|inWindow|
|00000450| 4f 70 65 6e 3d a3 0d 01 | ea 11 20 57 69 6e 64 6f |Open=...|.. Windo|
|00000460| 77 4d 69 6e 58 3d 30 0d | 01 f4 13 20 57 69 6e 64 |wMinX=0.|... Wind|
|00000470| 6f 77 4d 69 6e 59 3d 34 | 30 30 0d 01 fe 14 20 57 |owMinY=4|00.... W|
|00000480| 69 6e 64 6f 77 4d 61 78 | 58 3d 31 35 30 30 0d 02 |indowMax|X=1500..|
|00000490| 08 14 20 57 69 6e 64 6f | 77 4d 61 78 59 3d 31 30 |.. Windo|wMaxY=10|
|000004a0| 30 30 0d 02 12 16 20 57 | 69 6e 64 6f 77 53 63 72 |00.... W|indowScr|
|000004b0| 6f 6c 6c 58 3d 32 30 30 | 0d 02 1c 16 20 57 69 6e |ollX=200|.... Win|
|000004c0| 64 6f 77 53 63 72 6f 6c | 6c 59 3d 32 30 30 0d 02 |dowScrol|lY=200..|
|000004d0| 26 0e 20 53 74 61 72 74 | 75 70 3d b9 0d 02 30 06 |&. Start|up=...0.|
|000004e0| 20 e1 0d 02 3a 06 20 3a | 0d 02 44 0d 20 dd f2 42 | ...:. :|..D. ..B|
|000004f0| 6c 6f 63 6b 73 0d 02 4e | 16 20 53 74 72 42 6c 6b |locks..N|. StrBlk|
|00000500| 53 69 7a 65 3d 33 32 2a | 32 32 31 0d 02 58 12 20 |Size=32*|221..X. |
|00000510| de 20 50 6f 6c 6c 42 6c | 6b 20 35 31 32 0d 02 62 |. PollBl|k 512..b|
|00000520| 0f 20 de 20 42 6c 6b 20 | 31 30 32 34 0d 02 6c 1b |. . Blk |1024..l.|
|00000530| 20 de 20 57 69 6e 64 6f | 77 42 6c 6b 20 38 38 2b | . Windo|wBlk 88+|
|00000540| 28 33 32 2a 32 30 29 0d | 02 76 1b 20 de 20 53 74 |(32*20).|.v. . St|
|00000550| 72 42 6c 6b 50 74 72 20 | 53 74 72 42 6c 6b 53 69 |rBlkPtr |StrBlkSi|
|00000560| 7a 65 0d 02 80 16 20 de | 20 53 74 72 42 6c 6b 50 |ze.... .| StrBlkP|
|00000570| 74 72 32 20 31 32 2a 33 | 0d 02 8a 12 20 de 20 49 |tr2 12*3|.... . I|
|00000580| 63 6f 6e 42 6c 6b 20 32 | 35 36 0d 02 94 0f 20 de |conBlk 2|56.... .|
|00000590| 20 49 42 6c 6b 20 32 35 | 36 0d 02 9e 28 20 de 20 | IBlk 25|6...( . |
|000005a0| 4d 65 6e 75 42 6c 6b 20 | 31 32 38 2c 20 4d 65 6e |MenuBlk |128, Men|
|000005b0| 75 42 6c 6b 32 20 35 30 | 2b 28 32 32 31 2a 32 34 |uBlk2 50|+(221*24|
|000005c0| 29 0d 02 a8 1e 20 f4 20 | 44 49 4d 20 53 70 72 74 |).... . |DIM Sprt|
|000005d0| 42 6c 6b 20 53 70 72 74 | 42 6c 6b 53 69 7a 65 0d |Blk Sprt|BlkSize.|
|000005e0| 02 b2 1a 20 de 20 4d 61 | 69 6e 57 42 6c 6b 20 38 |... . Ma|inWBlk 8|
|000005f0| 38 2b 28 31 32 2a 33 32 | 29 0d 02 bc 1a 20 de 20 |8+(12*32|).... . |
|00000600| 49 6e 64 69 72 65 63 74 | 69 6f 6e 42 6c 6b 20 31 |Indirect|ionBlk 1|
|00000610| 30 32 34 0d 02 c6 1a 20 | de 20 49 6e 66 6f 57 42 |024.... |. InfoWB|
|00000620| 6c 6b 20 38 38 2b 28 33 | 32 2a 33 32 29 0d 02 d0 |lk 88+(3|2*32)...|
|00000630| 12 20 de 20 53 63 61 6c | 65 42 6c 6b 20 31 36 0d |. . Scal|eBlk 16.|
|00000640| 02 da 13 20 de 20 54 72 | 61 6e 73 42 6c 6b 20 32 |... . Tr|ansBlk 2|
|00000650| 35 36 0d 02 e4 11 20 de | 20 49 63 6f 6e 42 6c 6b |56.... .| IconBlk|
|00000660| 20 33 36 0d 02 ee 06 20 | e1 0d 02 f8 06 20 3a 0d | 36.... |..... :.|
|00000670| 03 02 11 20 dd f2 53 70 | 72 69 74 65 49 6e 69 74 |... ..Sp|riteInit|
|00000680| 0d 03 0c 2c 20 ff 28 22 | 49 43 4f 4e 53 50 52 49 |..., .("|ICONSPRI|
|00000690| 54 45 53 20 3c 46 6f 6e | 74 56 69 65 77 24 44 69 |TES <Fon|tView$Di|
|000006a0| 72 3e 2e 53 70 72 69 74 | 65 73 22 29 0d 03 16 2e |r>.Sprit|es")....|
|000006b0| 20 c8 99 20 22 57 69 6d | 70 5f 42 61 73 65 4f 66 | .. "Wim|p_BaseOf|
|000006c0| 53 70 72 69 74 65 73 22 | 20 b8 20 52 4f 4d 41 72 |Sprites"| . ROMAr|
|000006d0| 65 61 2c 52 4d 41 41 72 | 65 61 0d 03 20 06 20 e1 |ea,RMAAr|ea.. . .|
|000006e0| 0d 03 2a 06 20 3a 0d 03 | 34 12 20 dd f2 53 70 72 |..*. :..|4. ..Spr|
|000006f0| 69 74 65 53 65 74 55 70 | 0d 03 3e 46 20 e7 20 ac |iteSetUp|..>F . .|
|00000700| 20 a4 65 6e 73 75 72 65 | 6d 65 6d 28 93 2c 53 70 | .ensure|mem(.,Sp|
|00000710| 72 74 42 6c 6b 53 69 7a | 65 29 20 8c 20 85 20 31 |rtBlkSiz|e) . . 1|
|00000720| 2c 22 4e 6f 20 72 6f 6f | 6d 20 74 6f 20 6c 6f 61 |,"No roo|m to loa|
|00000730| 64 20 53 70 72 69 74 65 | 20 66 69 6c 65 22 0d 03 |d Sprite| file"..|
|00000740| 48 0e 20 53 70 72 74 42 | 6c 6b 3d 93 0d 03 52 15 |H. SprtB|lk=...R.|
|00000750| 20 f2 49 6e 69 74 53 70 | 72 69 74 65 42 6c 6f 63 | .InitSp|riteBloc|
|00000760| 6b 0d 03 5c 50 f4 20 53 | 59 53 20 22 4f 53 5f 53 |k..\P. S|YS "OS_S|
|00000770| 70 72 69 74 65 4f 70 22 | 2c 31 30 2b 32 35 36 2c |priteOp"|,10+256,|
|00000780| 53 70 72 74 42 6c 6b 2c | 22 3c 46 6f 6e 74 56 69 |SprtBlk,|"<FontVi|
|00000790| 65 77 24 44 69 72 3e 2e | 46 6f 6e 74 73 2e 22 2b |ew$Dir>.|Fonts."+|
|000007a0| 53 54 52 24 28 43 75 72 | 72 65 6e 74 46 6f 6e 74 |STR$(Cur|rentFont|
|000007b0| 29 0d 03 66 1f 20 f2 43 | 68 61 6e 67 65 46 6f 6e |)..f. .C|hangeFon|
|000007c0| 74 28 b9 2c 43 75 72 72 | 65 6e 74 46 6f 6e 74 29 |t(.,Curr|entFont)|
|000007d0| 0d 03 70 2e 20 f2 53 70 | 72 69 74 65 49 6e 66 6f |..p. .Sp|riteInfo|
|000007e0| 28 53 70 72 74 42 6c 6b | 2c 22 46 6f 6e 74 22 2c |(SprtBlk|,"Font",|
|000007f0| 57 69 64 74 68 2c 53 70 | 72 69 74 65 59 29 0d 03 |Width,Sp|riteY)..|
|00000800| 7a 06 20 e1 0d 03 84 06 | 20 3a 0d 03 8e 16 20 dd |z. .....| :.... .|
|00000810| f2 49 6e 69 74 53 70 72 | 69 74 65 42 6c 6f 63 6b |.InitSpr|iteBlock|
|00000820| 0d 03 98 1a 20 53 70 72 | 74 42 6c 6b 21 30 3d 53 |.... Spr|tBlk!0=S|
|00000830| 70 72 74 42 6c 6b 53 69 | 7a 65 0d 03 a2 10 20 53 |prtBlkSi|ze.... S|
|00000840| 70 72 74 42 6c 6b 21 34 | 3d 30 0d 03 ac 11 20 53 |prtBlk!4|=0.... S|
|00000850| 70 72 74 42 6c 6b 21 38 | 3d 31 36 0d 03 b6 12 20 |prtBlk!8|=16.... |
|00000860| 53 70 72 74 42 6c 6b 21 | 31 32 3d 31 36 0d 03 c0 |SprtBlk!|12=16...|
|00000870| 06 20 e1 0d 03 ca 06 20 | 3a 0d 03 d4 13 20 dd a4 |. ..... |:.... ..|
|00000880| 53 71 75 61 72 65 50 69 | 78 65 6c 73 0d 03 de 2a |SquarePi|xels...*|
|00000890| 20 c8 99 20 22 4f 53 5f | 52 65 61 64 4d 6f 64 65 | .. "OS_|ReadMode|
|000008a0| 56 61 72 69 61 62 6c 65 | 22 2c eb 2c 34 20 b8 20 |Variable|",.,4 . |
|000008b0| 2c 2c 58 45 69 67 0d 03 | e8 2a 20 c8 99 20 22 4f |,,XEig..|.* .. "O|
|000008c0| 53 5f 52 65 61 64 4d 6f | 64 65 56 61 72 69 61 62 |S_ReadMo|deVariab|
|000008d0| 6c 65 22 2c eb 2c 35 20 | b8 20 2c 2c 59 45 69 67 |le",.,5 |. ,,YEig|
|000008e0| 0d 03 f2 12 20 e7 20 58 | 45 69 67 3d 59 45 69 67 |.... . X|Eig=YEig|
|000008f0| 20 8c 0d 03 fc 09 20 20 | 20 3d b9 0d 04 06 06 20 | .....  | =..... |
|00000900| cc 0d 04 10 09 20 20 20 | 3d a3 0d 04 1a 06 20 cd |.....   |=..... .|
|00000910| 0d 04 24 06 20 3a 0d 04 | 2e 0f 20 dd f2 57 49 4d |..$. :..|.. ..WIM|
|00000920| 50 49 6e 69 74 0d 04 38 | 3f 20 c8 99 20 22 57 69 |PInit..8|? .. "Wi|
|00000930| 6d 70 5f 49 6e 69 74 69 | 61 6c 69 73 65 22 2c 32 |mp_Initi|alise",2|
|00000940| 30 30 2c 26 34 42 35 33 | 34 31 35 34 2c 22 46 6f |00,&4B53|4154,"Fo|
|00000950| 6e 74 20 56 69 65 77 65 | 72 22 20 b8 20 56 65 72 |nt Viewe|r" . Ver|
|00000960| 73 69 6f 6e 0d 04 42 06 | 20 e1 0d 04 4c 06 20 3a |sion..B.| ...L. :|
|00000970| 0d 04 56 13 20 dd f2 47 | 65 74 46 6f 6e 74 4e 61 |..V. ..G|etFontNa|
|00000980| 6d 65 73 0d 04 60 20 20 | 58 25 3d 8e 28 22 3c 46 |mes..`  |X%=.("<F|
|00000990| 6f 6e 74 56 69 65 77 24 | 44 69 72 3e 2e 4c 69 73 |ontView$|Dir>.Lis|
|000009a0| 74 22 29 0d 04 6a 0c 20 | 63 6f 75 6e 74 3d 30 0d |t")..j. |count=0.|
|000009b0| 04 74 0e 20 c8 95 20 ac | 20 c5 23 58 25 0d 04 7e |.t. .. .| .#X%..~|
|000009c0| 0e 20 20 20 73 24 3d be | 23 58 25 0d 04 88 0f 20 |.   s$=.|#X%.... |
|000009d0| 20 20 63 6f 75 6e 74 2b | 3d 31 0d 04 92 06 20 ce |  count+|=1.... .|
|000009e0| 0d 04 9c 13 20 4e 75 6d | 46 6f 6e 74 73 3d 63 6f |.... Num|Fonts=co|
|000009f0| 75 6e 74 0d 04 a6 16 20 | de 20 46 6f 6e 74 24 28 |unt.... |. Font$(|
|00000a00| 4e 75 6d 46 6f 6e 74 73 | 29 0d 04 b0 0b 20 cf 23 |NumFonts|).... .#|
|00000a10| 58 25 3d 30 0d 04 ba 10 | 20 4d 61 78 4c 65 6e 67 |X%=0....| MaxLeng|
|00000a20| 74 68 3d 30 0d 04 c4 12 | 20 e3 20 4e 3d 31 20 b8 |th=0....| . N=1 .|
|00000a30| 20 63 6f 75 6e 74 0d 04 | ce 0e 20 20 20 53 24 3d | count..|..   S$=|
|00000a40| be 23 58 25 0d 04 d8 12 | 20 20 20 46 6f 6e 74 24 |.#X%....|   Font$|
|00000a50| 28 4e 29 3d 53 24 0d 04 | e2 2a 20 20 20 e7 20 a9 |(N)=S$..|.*   . .|
|00000a60| 28 53 24 29 3e 4d 61 78 | 4c 65 6e 67 74 68 20 8c |(S$)>Max|Length .|
|00000a70| 20 4d 61 78 4c 65 6e 67 | 74 68 3d a9 28 53 24 29 | MaxLeng|th=.(S$)|
|00000a80| 0d 04 ec 08 20 ed 20 4e | 0d 04 f6 09 20 d9 23 58 |.... . N|.... .#X|
|00000a90| 25 0d 05 00 25 20 4c 6f | 6e 67 65 73 74 46 6f 6e |%...% Lo|ngestFon|
|00000aa0| 74 4e 61 6d 65 3d 31 36 | 2a 28 4d 61 78 4c 65 6e |tName=16|*(MaxLen|
|00000ab0| 67 74 68 2b 31 29 0d 05 | 0a 06 20 e1 0d 05 14 06 |gth+1)..|.. .....|
|00000ac0| 20 3a 0d 05 1e 0f 20 dd | f2 4f 70 65 6e 4d 61 69 | :.... .|.OpenMai|
|00000ad0| 6e 0d 05 28 70 20 f2 4f | 70 65 6e 57 69 6e 64 6f |n..(p .O|penWindo|
|00000ae0| 77 44 65 66 28 4d 61 69 | 6e 48 61 6e 64 6c 65 2c |wDef(Mai|nHandle,|
|00000af0| 4d 61 69 6e 57 42 6c 6b | 2c 57 69 6e 64 6f 77 4d |MainWBlk|,WindowM|
|00000b00| 69 6e 58 2c 57 69 6e 64 | 6f 77 4d 69 6e 59 2c 57 |inX,Wind|owMinY,W|
|00000b10| 69 6e 64 6f 77 4d 61 78 | 58 2c 57 69 6e 64 6f 77 |indowMax|X,Window|
|00000b20| 4d 61 78 59 2c 57 69 6e | 64 6f 77 53 63 72 6f 6c |MaxY,Win|dowScrol|
|00000b30| 6c 58 2c 57 69 6e 64 6f | 77 53 63 72 6f 6c 6c 59 |lX,Windo|wScrollY|
|00000b40| 29 0d 05 32 17 20 f2 49 | 6e 69 74 53 70 72 69 74 |)..2. .I|nitSprit|
|00000b50| 65 46 6f 72 4d 6f 64 65 | 0d 05 3c 30 20 f2 53 70 |eForMode|..<0 .Sp|
|00000b60| 72 69 74 65 49 6e 66 6f | 28 53 70 72 74 42 6c 6b |riteInfo|(SprtBlk|
|00000b70| 2c 22 46 6f 6e 74 22 2c | 53 70 72 69 74 65 58 2c |,"Font",|SpriteX,|
|00000b80| 53 70 72 69 74 65 59 29 | 0d 05 46 21 20 f2 52 65 |SpriteY)|..F! .Re|
|00000b90| 73 69 7a 65 4d 61 69 6e | 28 53 70 72 69 74 65 58 |sizeMain|(SpriteX|
|00000ba0| 2c 53 70 72 69 74 65 59 | 29 0d 05 50 06 20 e1 0d |,SpriteY|)..P. ..|
|00000bb0| 05 5a 06 20 3a 0d 05 64 | 46 20 dd f2 4f 70 65 6e |.Z. :..d|F ..Open|
|00000bc0| 57 69 6e 64 6f 77 44 65 | 66 28 48 61 6e 64 6c 65 |WindowDe|f(Handle|
|00000bd0| 2c 42 6c 6f 63 6b 2c 58 | 4d 69 6e 2c 59 4d 69 6e |,Block,X|Min,YMin|
|00000be0| 2c 58 4d 61 78 2c 59 4d | 61 78 2c 53 63 72 6f 6c |,XMax,YM|ax,Scrol|
|00000bf0| 6c 58 2c 53 63 72 6f 6c | 6c 59 29 0d 05 6e 11 20 |lX,Scrol|lY)..n. |
|00000c00| 42 6c 6b 21 30 3d 48 61 | 6e 64 6c 65 0d 05 78 0f |Blk!0=Ha|ndle..x.|
|00000c10| 20 42 6c 6b 21 34 3d 58 | 4d 69 6e 0d 05 82 0f 20 | Blk!4=X|Min.... |
|00000c20| 42 6c 6b 21 38 3d 59 4d | 69 6e 0d 05 8c 10 20 42 |Blk!8=YM|in.... B|
|00000c30| 6c 6b 21 31 32 3d 58 4d | 61 78 0d 05 96 10 20 42 |lk!12=XM|ax.... B|
|00000c40| 6c 6b 21 31 36 3d 59 4d | 61 78 0d 05 a0 13 20 42 |lk!16=YM|ax.... B|
|00000c50| 6c 6b 21 32 30 3d 53 63 | 72 6f 6c 6c 58 0d 05 aa |lk!20=Sc|rollX...|
|00000c60| 13 20 42 6c 6b 21 32 34 | 3d 53 63 72 6f 6c 6c 59 |. Blk!24|=ScrollY|
|00000c70| 0d 05 b4 0e 20 42 6c 6b | 21 32 38 3d 2d 31 0d 05 |.... Blk|!28=-1..|
|00000c80| be 1e 20 c8 99 20 22 57 | 69 6d 70 5f 4f 70 65 6e |.. .. "W|imp_Open|
|00000c90| 57 69 6e 64 6f 77 22 2c | 2c 42 6c 6b 0d 05 c8 06 |Window",|,Blk....|
|00000ca0| 20 e1 0d 05 d2 06 20 3a | 0d 05 dc 17 20 dd f2 43 | ..... :|.... ..C|
|00000cb0| 6c 6f 73 65 57 69 6e 64 | 6f 77 28 42 6c 6b 29 0d |loseWind|ow(Blk).|
|00000cc0| 05 e6 1f 20 c8 99 20 22 | 57 69 6d 70 5f 43 6c 6f |... .. "|Wimp_Clo|
|00000cd0| 73 65 57 69 6e 64 6f 77 | 22 2c 2c 42 6c 6b 0d 05 |seWindow|",,Blk..|
|00000ce0| f0 19 20 e7 20 42 6c 6b | 21 30 3d 4d 61 69 6e 48 |.. . Blk|!0=MainH|
|00000cf0| 61 6e 64 6c 65 20 8c 0d | 05 fa 25 20 20 20 f2 52 |andle ..|..%   .R|
|00000d00| 65 74 75 72 6e 4d 65 6d | 6f 72 79 3a 4d 61 69 6e |eturnMem|ory:Main|
|00000d10| 57 69 6e 64 6f 77 4f 70 | 65 6e 3d a3 0d 06 04 24 |WindowOp|en=....$|
|00000d20| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 57 |   .. "W|imp_GetW|
|00000d30| 69 6e 64 6f 77 53 74 61 | 74 65 22 2c 2c 42 6c 6b |indowSta|te",,Blk|
|00000d40| 0d 06 0e 18 20 20 20 20 | 57 69 6e 64 6f 77 4d 69 |....    |WindowMi|
|00000d50| 6e 58 3d 42 6c 6b 21 34 | 0d 06 18 18 20 20 20 20 |nX=Blk!4|....    |
|00000d60| 57 69 6e 64 6f 77 4d 69 | 6e 59 3d 42 6c 6b 21 38 |WindowMi|nY=Blk!8|
|00000d70| 0d 06 22 19 20 20 20 20 | 57 69 6e 64 6f 77 4d 61 |..".    |WindowMa|
|00000d80| 78 58 3d 42 6c 6b 21 31 | 32 0d 06 2c 19 20 20 20 |xX=Blk!1|2..,.   |
|00000d90| 20 57 69 6e 64 6f 77 4d | 61 78 59 3d 42 6c 6b 21 | WindowM|axY=Blk!|
|00000da0| 31 36 0d 06 36 1c 20 20 | 20 20 57 69 6e 64 6f 77 |16..6.  |  Window|
|00000db0| 53 63 72 6f 6c 6c 58 3d | 42 6c 6b 21 32 30 0d 06 |ScrollX=|Blk!20..|
|00000dc0| 40 1c 20 20 20 20 57 69 | 6e 64 6f 77 53 63 72 6f |@.    Wi|ndowScro|
|00000dd0| 6c 6c 59 3d 42 6c 6b 21 | 32 34 0d 06 4a 06 20 cd |llY=Blk!|24..J. .|
|00000de0| 0d 06 54 06 20 e1 0d 06 | 5e 06 20 3a 0d 06 68 16 |..T. ...|^. :..h.|
|00000df0| 20 dd f2 4f 70 65 6e 57 | 69 6e 64 6f 77 28 42 6c | ..OpenW|indow(Bl|
|00000e00| 6b 29 0d 06 72 1e 20 c8 | 99 20 22 57 69 6d 70 5f |k)..r. .|. "Wimp_|
|00000e10| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 42 6c 6b |OpenWind|ow",,Blk|
|00000e20| 0d 06 7c 06 20 e1 0d 06 | 86 06 20 3a 0d 06 90 10 |..|. ...|.. :....|
|00000e30| 20 dd f2 54 65 6d 70 6c | 61 74 65 73 0d 06 9a 17 | ..Templ|ates....|
|00000e40| 20 4d 61 69 6e 57 42 6c | 6b 53 69 7a 65 3d 31 36 | MainWBl|kSize=16|
|00000e50| 33 38 34 0d 06 a4 37 20 | c8 99 20 22 57 69 6d 70 |384...7 |.. "Wimp|
|00000e60| 5f 4f 70 65 6e 54 65 6d | 70 6c 61 74 65 22 2c 2c |_OpenTem|plate",,|
|00000e70| 22 3c 46 6f 6e 74 56 69 | 65 77 24 44 69 72 3e 2e |"<FontVi|ew$Dir>.|
|00000e80| 54 65 6d 70 6c 61 74 65 | 73 22 0d 06 ae 62 20 c8 |Template|s"...b .|
|00000e90| 99 20 22 57 69 6d 70 5f | 4c 6f 61 64 54 65 6d 70 |. "Wimp_|LoadTemp|
|00000ea0| 6c 61 74 65 22 2c 2c 4d | 61 69 6e 57 42 6c 6b 2c |late",,M|ainWBlk,|
|00000eb0| 49 6e 64 69 72 65 63 74 | 69 6f 6e 42 6c 6b 2c 49 |Indirect|ionBlk,I|
|00000ec0| 6e 64 69 72 65 63 74 69 | 6f 6e 42 6c 6b 2b 31 30 |ndirecti|onBlk+10|
|00000ed0| 32 34 2c 2d 31 2c 22 4d | 61 69 6e 22 2c 30 20 b8 |24,-1,"M|ain",0 .|
|00000ee0| 20 2c 2c 49 6e 64 69 72 | 46 72 65 65 0d 06 b8 4f | ,,Indir|Free...O|
|00000ef0| 20 c8 99 20 22 57 69 6d | 70 5f 4c 6f 61 64 54 65 | .. "Wim|p_LoadTe|
|00000f00| 6d 70 6c 61 74 65 22 2c | 2c 49 6e 66 6f 57 42 6c |mplate",|,InfoWBl|
|00000f10| 6b 2c 49 6e 64 69 72 46 | 72 65 65 2c 49 6e 64 69 |k,IndirF|ree,Indi|
|00000f20| 72 65 63 74 69 6f 6e 42 | 6c 6b 2b 31 30 32 34 2c |rectionB|lk+1024,|
|00000f30| 2d 31 2c 22 49 6e 66 6f | 22 2c 30 0d 06 c2 1c 20 |-1,"Info|",0.... |
|00000f40| c8 99 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 54 65 |.. "Wimp|_CloseTe|
|00000f50| 6d 70 6c 61 74 65 22 0d | 06 cc 32 20 c8 99 20 22 |mplate".|..2 .. "|
|00000f60| 57 69 6d 70 5f 43 72 65 | 61 74 65 57 69 6e 64 6f |Wimp_Cre|ateWindo|
|00000f70| 77 22 2c 2c 4d 61 69 6e | 57 42 6c 6b 20 b8 20 4d |w",,Main|WBlk . M|
|00000f80| 61 69 6e 48 61 6e 64 6c | 65 0d 06 d6 32 20 c8 99 |ainHandl|e...2 ..|
|00000f90| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 57 69 6e | "Wimp_C|reateWin|
|00000fa0| 64 6f 77 22 2c 2c 49 6e | 66 6f 57 42 6c 6b 20 b8 |dow",,In|foWBlk .|
|00000fb0| 20 49 6e 66 6f 48 61 6e | 64 6c 65 0d 06 e0 06 20 | InfoHan|dle.... |
|00000fc0| e1 0d 06 ea 06 20 3a 0d | 06 f4 0b 20 dd f2 57 6f |..... :.|... ..Wo|
|00000fd0| 72 6b 0d 06 fe 06 20 e1 | 0d 07 08 06 20 3a 0d 07 |rk.... .|.... :..|
|00000fe0| 12 17 20 dd f2 42 75 74 | 74 6f 6e 50 72 65 73 73 |.. ..But|tonPress|
|00000ff0| 28 42 6c 6b 29 0d 07 1c | 47 20 e7 20 28 28 42 6c |(Blk)...|G . ((Bl|
|00001000| 6b 21 38 20 80 20 25 30 | 30 31 29 3c 3e 30 29 20 |k!8 . %0|01)<>0) |
|00001010| 80 20 42 6c 6b 21 31 32 | 3d 4d 61 69 6e 48 61 6e |. Blk!12|=MainHan|
|00001020| 64 6c 65 20 80 20 42 6c | 6b 21 31 36 3d 34 20 8c |dle . Bl|k!16=4 .|
|00001030| 20 f2 49 6e 63 46 6f 6e | 74 4e 75 6d 0d 07 26 47 | .IncFon|tNum..&G|
|00001040| 20 e7 20 28 28 42 6c 6b | 21 38 20 80 20 25 30 30 | . ((Blk|!8 . %00|
|00001050| 31 29 3c 3e 30 29 20 80 | 20 42 6c 6b 21 31 32 3d |1)<>0) .| Blk!12=|
|00001060| 4d 61 69 6e 48 61 6e 64 | 6c 65 20 80 20 42 6c 6b |MainHand|le . Blk|
|00001070| 21 31 36 3d 36 20 8c 20 | f2 44 65 63 46 6f 6e 74 |!16=6 . |.DecFont|
|00001080| 4e 75 6d 0d 07 30 47 20 | e7 20 28 28 42 6c 6b 21 |Num..0G |. ((Blk!|
|00001090| 38 20 80 20 25 31 30 30 | 29 3c 3e 30 29 20 80 20 |8 . %100|)<>0) . |
|000010a0| 42 6c 6b 21 31 32 3d 4d | 61 69 6e 48 61 6e 64 6c |Blk!12=M|ainHandl|
|000010b0| 65 20 80 20 42 6c 6b 21 | 31 36 3d 36 20 8c 20 f2 |e . Blk!|16=6 . .|
|000010c0| 49 6e 63 46 6f 6e 74 4e | 75 6d 0d 07 3a 47 20 e7 |IncFontN|um..:G .|
|000010d0| 20 28 28 42 6c 6b 21 38 | 20 80 20 25 31 30 30 29 | ((Blk!8| . %100)|
|000010e0| 3c 3e 30 29 20 80 20 42 | 6c 6b 21 31 32 3d 4d 61 |<>0) . B|lk!12=Ma|
|000010f0| 69 6e 48 61 6e 64 6c 65 | 20 80 20 42 6c 6b 21 31 |inHandle| . Blk!1|
|00001100| 36 3d 34 20 8c 20 f2 44 | 65 63 46 6f 6e 74 4e 75 |6=4 . .D|ecFontNu|
|00001110| 6d 0d 07 44 65 20 e7 20 | 28 42 6c 6b 21 38 20 80 |m..De . |(Blk!8 .|
|00001120| 20 25 31 31 31 29 20 80 | 20 42 6c 6b 21 31 32 3d | %111) .| Blk!12=|
|00001130| 4d 61 69 6e 48 61 6e 64 | 6c 65 20 80 20 28 42 6c |MainHand|le . (Bl|
|00001140| 6b 21 31 36 3d 30 20 84 | 20 42 6c 6b 21 31 36 3d |k!16=0 .| Blk!16=|
|00001150| 32 20 84 20 42 6c 6b 21 | 31 36 3d 35 29 20 8c 20 |2 . Blk!|16=5) . |
|00001160| f2 4d 61 69 6e 4d 65 6e | 75 28 42 6c 6b 21 30 2c |.MainMen|u(Blk!0,|
|00001170| 42 6c 6b 21 34 29 0d 07 | 4e 56 20 e7 20 28 42 6c |Blk!4)..|NV . (Bl|
|00001180| 6b 21 38 20 80 20 25 30 | 31 30 29 20 80 20 42 6c |k!8 . %0|10) . Bl|
|00001190| 6b 21 31 32 3d 2d 32 20 | 80 20 42 6c 6b 21 31 36 |k!12=-2 |. Blk!16|
|000011a0| 3d 49 63 6f 6e 42 61 72 | 49 63 6f 6e 48 61 6e 64 |=IconBar|IconHand|
|000011b0| 6c 65 20 8c 20 f2 49 6e | 66 6f 4d 65 6e 75 28 42 |le . .In|foMenu(B|
|000011c0| 6c 6b 21 30 2c 31 37 36 | 2d 32 35 29 0d 07 58 4c |lk!0,176|-25)..XL|
|000011d0| 20 e7 20 28 42 6c 6b 21 | 38 20 80 20 25 31 30 30 | . (Blk!|8 . %100|
|000011e0| 29 20 80 20 42 6c 6b 21 | 31 32 3d 2d 32 20 80 20 |) . Blk!|12=-2 . |
|000011f0| 42 6c 6b 21 31 36 3d 49 | 63 6f 6e 42 61 72 49 63 |Blk!16=I|conBarIc|
|00001200| 6f 6e 48 61 6e 64 6c 65 | 20 8c 20 f2 4f 70 65 6e |onHandle| . .Open|
|00001210| 57 69 6e 49 66 4e 6f 74 | 0d 07 62 06 20 e1 0d 07 |WinIfNot|..b. ...|
|00001220| 6c 06 20 3a 0d 07 76 13 | 20 dd f2 4f 70 65 6e 57 |l. :..v.| ..OpenW|
|00001230| 69 6e 49 66 4e 6f 74 0d | 07 80 19 20 e7 20 4d 61 |inIfNot.|... . Ma|
|00001240| 69 6e 57 69 6e 64 6f 77 | 4f 70 65 6e 3d a3 20 8c |inWindow|Open=. .|
|00001250| 0d 07 8a 13 20 20 20 f2 | 53 70 72 69 74 65 53 65 |....   .|SpriteSe|
|00001260| 74 55 70 0d 07 94 21 20 | 20 20 f2 43 68 61 6e 67 |tUp...! |  .Chang|
|00001270| 65 46 6f 6e 74 28 a3 2c | 43 75 72 72 65 6e 74 46 |eFont(.,|CurrentF|
|00001280| 6f 6e 74 29 0d 07 9e 10 | 20 20 20 f2 4f 70 65 6e |ont)....|   .Open|
|00001290| 4d 61 69 6e 0d 07 a8 17 | 20 20 20 4d 61 69 6e 57 |Main....|   MainW|
|000012a0| 69 6e 64 6f 77 4f 70 65 | 6e 3d b9 0d 07 b2 06 20 |indowOpe|n=..... |
|000012b0| cd 0d 07 bc 06 20 e1 0d | 07 c6 06 20 3a 0d 07 d0 |..... ..|... :...|
|000012c0| 11 20 dd f2 49 6e 63 46 | 6f 6e 74 4e 75 6d 0d 07 |. ..IncF|ontNum..|
|000012d0| da 2a 20 e7 20 53 74 61 | 72 74 75 70 3d b9 20 8c |.* . Sta|rtup=. .|
|000012e0| 20 53 74 61 72 74 75 70 | 3d a3 3a 43 75 72 72 65 | Startup|=.:Curre|
|000012f0| 6e 74 46 6f 6e 74 3d 30 | 0d 07 e4 1d 20 e7 20 43 |ntFont=0|.... . C|
|00001300| 75 72 72 65 6e 74 46 6f | 6e 74 3c 4e 75 6d 46 6f |urrentFo|nt<NumFo|
|00001310| 6e 74 73 20 8c 0d 07 ee | 23 20 20 20 f2 43 68 61 |nts ....|#   .Cha|
|00001320| 6e 67 65 46 6f 6e 74 28 | a3 2c 43 75 72 72 65 6e |ngeFont(|.,Curren|
|00001330| 74 46 6f 6e 74 2b 31 29 | 0d 07 f8 06 20 cd 0d 08 |tFont+1)|.... ...|
|00001340| 02 06 20 e1 0d 08 0c 06 | 20 3a 0d 08 16 11 20 dd |.. .....| :.... .|
|00001350| f2 44 65 63 46 6f 6e 74 | 4e 75 6d 0d 08 20 2a 20 |.DecFont|Num.. * |
|00001360| e7 20 53 74 61 72 74 75 | 70 3d b9 20 8c 20 53 74 |. Startu|p=. . St|
|00001370| 61 72 74 75 70 3d a3 3a | 43 75 72 72 65 6e 74 46 |artup=.:|CurrentF|
|00001380| 6f 6e 74 3d 32 0d 08 2a | 16 20 e7 20 43 75 72 72 |ont=2..*|. . Curr|
|00001390| 65 6e 74 46 6f 6e 74 3e | 31 20 8c 0d 08 34 23 20 |entFont>|1 ...4# |
|000013a0| 20 20 f2 43 68 61 6e 67 | 65 46 6f 6e 74 28 a3 2c |  .Chang|eFont(.,|
|000013b0| 43 75 72 72 65 6e 74 46 | 6f 6e 74 2d 31 29 0d 08 |CurrentF|ont-1)..|
|000013c0| 3e 06 20 cd 0d 08 48 06 | 20 e1 0d 08 52 06 20 3a |>. ...H.| ...R. :|
|000013d0| 0d 08 5c 26 20 dd f2 4d | 65 6e 75 53 65 74 55 70 |..\& ..M|enuSetUp|
|000013e0| 28 42 6c 6b 2c 4d 65 6e | 75 54 69 74 6c 65 24 2c |(Blk,Men|uTitle$,|
|000013f0| 57 69 64 74 68 29 0d 08 | 66 14 20 24 42 6c 6b 3d |Width)..|f. $Blk=|
|00001400| 4d 65 6e 75 54 69 74 6c | 65 24 0d 08 70 0d 20 42 |MenuTitl|e$..p. B|
|00001410| 6c 6b 3f 31 32 3d 37 0d | 08 7a 0d 20 42 6c 6b 3f |lk?12=7.|.z. Blk?|
|00001420| 31 33 3d 32 0d 08 84 0d | 20 42 6c 6b 3f 31 34 3d |13=2....| Blk?14=|
|00001430| 37 0d 08 8e 0d 20 42 6c | 6b 3f 31 35 3d 30 0d 08 |7.... Bl|k?15=0..|
|00001440| 98 11 20 42 6c 6b 21 31 | 36 3d 57 69 64 74 68 0d |.. Blk!1|6=Width.|
|00001450| 08 a2 0e 20 42 6c 6b 21 | 32 30 3d 34 30 0d 08 ac |... Blk!|20=40...|
|00001460| 0d 20 42 6c 6b 21 32 34 | 3d 30 0d 08 b6 06 20 e1 |. Blk!24|=0.... .|
|00001470| 0d 08 c0 06 20 3a 0d 08 | ca 33 20 dd f2 4d 65 6e |.... :..|.3 ..Men|
|00001480| 75 49 74 65 6d 28 f8 20 | 53 74 72 42 2c 4d 42 6c |uItem(. |StrB,MBl|
|00001490| 6b 2c 46 6c 61 67 73 2c | 53 75 62 2c 49 63 6f 6e |k,Flags,|Sub,Icon|
|000014a0| 46 6c 61 67 73 2c 4d 24 | 29 0d 08 d4 11 20 4d 42 |Flags,M$|).... MB|
|000014b0| 6c 6b 21 30 3d 46 6c 61 | 67 73 0d 08 de 0f 20 4d |lk!0=Fla|gs.... M|
|000014c0| 42 6c 6b 21 34 3d 53 75 | 62 0d 08 e8 15 20 4d 42 |Blk!4=Su|b.... MB|
|000014d0| 6c 6b 21 38 3d 49 63 6f | 6e 46 6c 61 67 73 0d 08 |lk!8=Ico|nFlags..|
|000014e0| f2 1e 20 e7 20 28 49 63 | 6f 6e 46 6c 61 67 73 20 |.. . (Ic|onFlags |
|000014f0| 80 20 31 3c 3c 38 29 3c | 3e 30 20 8c 0d 08 fc 0f |. 1<<8)<|>0 .....|
|00001500| 20 20 20 24 53 74 72 42 | 3d 4d 24 0d 09 06 13 20 |   $StrB|=M$.... |
|00001510| 20 20 4d 42 6c 6b 21 31 | 32 3d 53 74 72 42 0d 09 |  MBlk!1|2=StrB..|
|00001520| 10 10 20 20 20 4d 42 6c | 6b 21 31 36 3d 30 0d 09 |..   MBl|k!16=0..|
|00001530| 1a 14 20 20 20 4d 42 6c | 6b 21 32 30 3d a9 28 4d |..   MBl|k!20=.(M|
|00001540| 24 29 0d 09 24 14 20 20 | 20 53 74 72 42 2b 3d a9 |$)..$.  | StrB+=.|
|00001550| 28 4d 24 29 2b 31 0d 09 | 2e 41 20 20 20 e7 20 53 |(M$)+1..|.A   . S|
|00001560| 74 72 42 3e 28 53 74 72 | 42 2b 53 74 72 42 29 20 |trB>(Str|B+StrB) |
|00001570| 8c 20 85 20 30 2c 22 4e | 6f 74 20 65 6e 6f 75 67 |. . 0,"N|ot enoug|
|00001580| 68 20 73 70 61 63 65 20 | 74 6f 20 6d 61 6b 65 20 |h space |to make |
|00001590| 6d 65 6e 75 22 3a e0 0d | 09 38 06 20 cc 0d 09 42 |menu":..|.8. ...B|
|000015a0| 2d 20 20 20 e3 20 46 3d | 30 20 b8 20 31 31 3a 4d |-   . F=|0 . 11:M|
|000015b0| 42 6c 6b 3f 28 46 2b 31 | 32 29 3d 97 28 c1 4d 24 |Blk?(F+1|2)=.(.M$|
|000015c0| 2c 46 2b 31 2c 31 29 29 | 3a ed 0d 09 4c 06 20 cd |,F+1,1))|:...L. .|
|000015d0| 0d 09 56 06 20 e1 0d 09 | 60 06 20 3a 0d 09 6a 14 |..V. ...|`. :..j.|
|000015e0| 20 dd f2 49 6e 66 6f 4d | 65 6e 75 28 58 2c 59 29 | ..InfoM|enu(X,Y)|
|000015f0| 0d 09 74 16 20 53 74 72 | 42 6c 6b 3d 53 74 72 42 |..t. Str|Blk=StrB|
|00001600| 6c 6b 50 74 72 32 0d 09 | 7e 29 20 f2 4d 65 6e 75 |lkPtr2..|~) .Menu|
|00001610| 53 65 74 55 70 28 4d 65 | 6e 75 42 6c 6b 2c 22 20 |SetUp(Me|nuBlk," |
|00001620| 46 6f 6e 74 56 69 65 77 | 20 22 2c 31 35 30 29 0d |FontView| ",150).|
|00001630| 09 88 61 20 f2 4d 65 6e | 75 49 74 65 6d 28 53 74 |..a .Men|uItem(St|
|00001640| 72 42 6c 6b 2c 4d 65 6e | 75 42 6c 6b 2b 32 38 2c |rBlk,Men|uBlk+28,|
|00001650| 26 30 30 2c 49 6e 66 6f | 48 61 6e 64 6c 65 2c 25 |&00,Info|Handle,%|
|00001660| 30 30 30 30 30 31 31 31 | 30 30 30 30 30 30 30 30 |00000111|00000000|
|00001670| 31 30 30 31 30 30 30 30 | 30 30 30 31 30 30 30 31 |10010000|00010001|
|00001680| 2c 22 49 6e 66 6f 20 20 | 20 20 20 20 20 20 22 29 |,"Info  |      ")|
|00001690| 0d 09 92 59 20 f2 4d 65 | 6e 75 49 74 65 6d 28 53 |...Y .Me|nuItem(S|
|000016a0| 74 72 42 6c 6b 2c 4d 65 | 6e 75 42 6c 6b 2b 35 32 |trBlk,Me|nuBlk+52|
|000016b0| 2c 26 38 30 2c 2d 31 2c | 25 30 30 30 30 30 31 31 |,&80,-1,|%0000011|
|000016c0| 31 30 30 30 30 30 30 30 | 30 31 30 30 31 30 30 30 |10000000|01001000|
|000016d0| 30 30 30 30 31 30 30 30 | 31 2c 22 51 75 69 74 20 |00001000|1,"Quit |
|000016e0| 20 20 20 20 20 20 20 22 | 29 0d 09 9c 2c 20 c8 99 |       "|)..., ..|
|000016f0| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e | "Wimp_C|reateMen|
|00001700| 75 22 2c 2c 4d 65 6e 75 | 42 6c 6b 2c 58 2d 38 30 |u",,Menu|Blk,X-80|
|00001710| 2c 59 2b 32 38 0d 09 a6 | 1a 20 49 6e 66 6f 4d 65 |,Y+28...|. InfoMe|
|00001720| 6e 75 3d b9 3a 4d 61 69 | 6e 4d 65 6e 75 3d a3 0d |nu=.:Mai|nMenu=..|
|00001730| 09 b0 06 20 e1 0d 09 ba | 06 20 3a 0d 09 c4 15 20 |... ....|. :.... |
|00001740| dd f2 4d 61 69 6e 4d 65 | 6e 75 32 28 58 2c 59 29 |..MainMe|nu2(X,Y)|
|00001750| 0d 09 ce 2a 20 f2 4d 65 | 6e 75 53 65 74 55 70 28 |...* .Me|nuSetUp(|
|00001760| 4d 65 6e 75 42 6c 6b 32 | 2c 22 20 46 6f 6e 74 56 |MenuBlk2|," FontV|
|00001770| 69 65 77 20 22 2c 31 35 | 30 29 0d 09 d8 5b 20 f2 |iew ",15|0)...[ .|
|00001780| 4d 65 6e 75 49 74 65 6d | 28 4d 65 6e 75 42 6c 6b |MenuItem|(MenuBlk|
|00001790| 32 2b 32 38 2c 26 30 30 | 2c 49 6e 66 6f 48 61 6e |2+28,&00|,InfoHan|
|000017a0| 64 6c 65 2c 25 30 30 30 | 30 30 31 31 31 30 30 30 |dle,%000|00111000|
|000017b0| 30 30 30 30 30 31 30 30 | 31 30 30 30 30 30 30 30 |00000100|10000000|
|000017c0| 31 30 30 30 31 2c 22 49 | 6e 66 6f 20 20 20 20 20 |10001,"I|nfo     |
|000017d0| 20 20 20 22 29 0d 09 e2 | 53 20 f2 4d 65 6e 75 49 |   ")...|S .MenuI|
|000017e0| 74 65 6d 28 4d 65 6e 75 | 42 6c 6b 32 2b 35 32 2c |tem(Menu|Blk2+52,|
|000017f0| 26 38 30 2c 2d 31 2c 25 | 30 30 30 30 30 31 31 31 |&80,-1,%|00000111|
|00001800| 30 30 30 30 30 30 30 30 | 31 30 30 31 30 30 30 30 |00000000|10010000|
|00001810| 30 30 30 31 30 30 30 31 | 2c 22 4f 70 74 69 6f 6e |00010001|,"Option|
|00001820| 20 20 20 20 20 20 22 29 | 0d 09 ec 27 20 c8 99 20 |      ")|...' .. |
|00001830| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00001840| 22 2c 2c 4d 65 6e 75 42 | 6c 6b 32 2c 58 2c 59 0d |",,MenuB|lk2,X,Y.|
|00001850| 09 f6 1a 20 4d 61 69 6e | 4d 65 6e 75 3d b9 3a 49 |... Main|Menu=.:I|
|00001860| 6e 66 6f 4d 65 6e 75 3d | a3 0d 0a 00 06 20 e1 0d |nfoMenu=|..... ..|
|00001870| 0a 0a 06 20 3a 0d 0a 14 | 14 20 dd f2 4d 61 69 6e |... :...|. ..Main|
|00001880| 4d 65 6e 75 28 58 2c 59 | 29 0d 0a 1e 16 20 c8 99 |Menu(X,Y|).... ..|
|00001890| 20 22 48 6f 75 72 67 6c | 61 73 73 5f 4f 6e 22 0d | "Hourgl|ass_On".|
|000018a0| 0a 28 27 20 c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |.(' .. "|Wimp_Cre|
|000018b0| 61 74 65 4d 65 6e 75 22 | 2c 2c 4d 65 6e 75 42 6c |ateMenu"|,,MenuBl|
|000018c0| 6b 32 2c 58 2c 59 0d 0a | 32 1a 20 4d 61 69 6e 4d |k2,X,Y..|2. MainM|
|000018d0| 65 6e 75 3d b9 3a 49 6e | 66 6f 4d 65 6e 75 3d a3 |enu=.:In|foMenu=.|
|000018e0| 0d 0a 3c 17 20 c8 99 20 | 22 48 6f 75 72 67 6c 61 |..<. .. |"Hourgla|
|000018f0| 73 73 5f 4f 66 66 22 0d | 0a 46 06 20 e1 0d 0a 50 |ss_Off".|.F. ...P|
|00001900| 06 20 3a 0d 0a 5a 13 20 | dd f2 4d 61 6b 65 4d 61 |. :..Z. |..MakeMa|
|00001910| 69 6e 4d 65 6e 75 0d 0a | 64 15 20 53 74 72 42 6c |inMenu..|d. StrBl|
|00001920| 6b 3d 53 74 72 42 6c 6b | 50 74 72 0d 0a 6e 36 20 |k=StrBlk|Ptr..n6 |
|00001930| f2 4d 65 6e 75 53 65 74 | 55 70 28 4d 65 6e 75 42 |.MenuSet|Up(MenuB|
|00001940| 6c 6b 32 2c 22 20 46 6f | 6e 74 56 69 65 77 20 22 |lk2," Fo|ntView "|
|00001950| 2c 4c 6f 6e 67 65 73 74 | 46 6f 6e 74 4e 61 6d 65 |,Longest|FontName|
|00001960| 29 0d 0a 78 19 20 e3 20 | 4e 3d 31 20 b8 20 28 4e |)..x. . |N=1 . (N|
|00001970| 75 6d 46 6f 6e 74 73 2d | 31 29 0d 0a 82 12 20 20 |umFonts-|1)....  |
|00001980| 20 53 24 3d 46 6f 6e 74 | 24 28 4e 29 0d 0a 8c 5e | S$=Font|$(N)...^|
|00001990| 20 f2 4d 65 6e 75 49 74 | 65 6d 28 53 74 72 42 6c | .MenuIt|em(StrBl|
|000019a0| 6b 2c 4d 65 6e 75 42 6c | 6b 32 2b 32 38 2b 28 28 |k,MenuBl|k2+28+((|
|000019b0| 4e 2d 31 29 2a 32 34 29 | 2c 26 30 30 2c 2d 31 2c |N-1)*24)|,&00,-1,|
|000019c0| 25 30 30 30 30 30 31 31 | 31 30 30 30 30 30 30 30 |%0000011|10000000|
|000019d0| 30 31 30 30 31 30 30 30 | 31 30 30 30 31 30 30 30 |01001000|10001000|
|000019e0| 31 2c 53 24 2b bd 28 30 | 29 29 0d 0a 96 08 20 ed |1,S$+.(0|)).... .|
|000019f0| 20 4e 0d 0a a0 17 20 53 | 24 3d 46 6f 6e 74 24 28 | N.... S|$=Font$(|
|00001a00| 4e 75 6d 46 6f 6e 74 73 | 29 0d 0a aa 5e 20 f2 4d |NumFonts|)...^ .M|
|00001a10| 65 6e 75 49 74 65 6d 28 | 53 74 72 42 6c 6b 2c 4d |enuItem(|StrBlk,M|
|00001a20| 65 6e 75 42 6c 6b 32 2b | 32 38 2b 28 28 4e 2d 31 |enuBlk2+|28+((N-1|
|00001a30| 29 2a 32 34 29 2c 26 38 | 30 2c 2d 31 2c 25 30 30 |)*24),&8|0,-1,%00|
|00001a40| 30 30 30 31 31 31 30 30 | 30 30 30 30 30 30 31 30 |00011100|00000010|
|00001a50| 30 31 30 30 30 31 30 30 | 30 31 30 30 30 31 2c 53 |01000100|010001,S|
|00001a60| 24 2b bd 28 30 29 29 0d | 0a b4 06 20 e1 0d 0a be |$+.(0)).|... ....|
|00001a70| 06 20 3a 0d 0a c8 1a 20 | dd f2 52 65 63 65 69 76 |. :.... |..Receiv|
|00001a80| 65 4d 65 73 73 61 67 65 | 28 42 6c 6b 29 0d 0a d2 |eMessage|(Blk)...|
|00001a90| 25 20 e7 20 42 6c 6b 21 | 31 36 3d 30 20 8c 20 c8 |% . Blk!|16=0 . .|
|00001aa0| 99 20 22 57 69 6d 70 5f | 43 6c 6f 73 65 44 6f 77 |. "Wimp_|CloseDow|
|00001ab0| 6e 22 0d 0a dc 35 20 e7 | 20 42 6c 6b 21 31 36 3d |n"...5 .| Blk!16=|
|00001ac0| 26 34 30 30 43 31 20 80 | 20 4d 61 69 6e 57 69 6e |&400C1 .| MainWin|
|00001ad0| 64 6f 77 4f 70 65 6e 3d | b9 20 8c 20 f2 4d 6f 64 |dowOpen=|. . .Mod|
|00001ae0| 65 43 68 61 6e 67 65 0d | 0a e6 06 20 e1 0d 0a f0 |eChange.|... ....|
|00001af0| 06 20 3a 0d 0a fa 11 20 | dd f2 4d 6f 64 65 43 68 |. :.... |..ModeCh|
|00001b00| 61 6e 67 65 0d 0b 04 21 | 20 20 20 f2 43 68 61 6e |ange...!|   .Chan|
|00001b10| 67 65 46 6f 6e 74 28 a3 | 2c 43 75 72 72 65 6e 74 |geFont(.|,Current|
|00001b20| 46 6f 6e 74 29 0d 0b 0e | 19 20 20 20 f2 49 6e 69 |Font)...|.   .Ini|
|00001b30| 74 53 70 72 69 74 65 46 | 6f 72 4d 6f 64 65 0d 0b |tSpriteF|orMode..|
|00001b40| 18 06 20 e1 0d 0b 22 06 | 20 3a 0d 0b 2c 18 20 dd |.. ...".| :..,. .|
|00001b50| f2 49 6e 69 74 53 70 72 | 69 74 65 46 6f 72 4d 6f |.InitSpr|iteForMo|
|00001b60| 64 65 0d 0b 36 44 20 20 | c8 99 20 22 57 69 6d 70 |de..6D  |.. "Wimp|
|00001b70| 5f 52 65 61 64 50 69 78 | 54 72 61 6e 73 22 2c 32 |_ReadPix|Trans",2|
|00001b80| 35 36 2c 53 70 72 74 42 | 6c 6b 2c 22 66 6f 6e 74 |56,SprtB|lk,"font|
|00001b90| 22 2c 2c 2c 2c 53 63 61 | 6c 65 42 6c 6b 2c 54 72 |",,,,Sca|leBlk,Tr|
|00001ba0| 61 6e 73 42 6c 6b 0d 0b | 40 06 20 e1 0d 0b 4a 06 |ansBlk..|@. ...J.|
|00001bb0| 20 3a 0d 0b 54 10 20 dd | f2 43 6c 6f 73 65 44 6f | :..T. .|.CloseDo|
|00001bc0| 77 6e 0d 0b 5e 18 20 c8 | 99 20 22 57 69 6d 70 5f |wn..^. .|. "Wimp_|
|00001bd0| 43 6c 6f 73 65 44 6f 77 | 6e 22 0d 0b 68 06 20 e0 |CloseDow|n"..h. .|
|00001be0| 0d 0b 72 06 20 e1 0d 0b | 7c 06 20 3a 0d 0b 86 2d |..r. ...||. :...-|
|00001bf0| 20 dd a4 49 63 6f 6e 42 | 61 72 28 58 53 69 7a 65 | ..IconB|ar(XSize|
|00001c00| 2c 59 53 69 7a 65 2c 53 | 70 72 74 4e 61 6d 65 24 |,YSize,S|prtName$|
|00001c10| 2c 53 70 72 74 42 6c 6b | 29 0d 0b 90 11 20 49 63 |,SprtBlk|).... Ic|
|00001c20| 6f 6e 42 6c 6b 21 30 3d | 2d 31 0d 0b 9a 10 20 49 |onBlk!0=|-1.... I|
|00001c30| 63 6f 6e 42 6c 6b 21 34 | 3d 30 0d 0b a4 10 20 49 |conBlk!4|=0.... I|
|00001c40| 63 6f 6e 42 6c 6b 21 38 | 3d 30 0d 0b ae 15 20 49 |conBlk!8|=0.... I|
|00001c50| 63 6f 6e 42 6c 6b 21 31 | 32 3d 58 53 69 7a 65 0d |conBlk!1|2=XSize.|
|00001c60| 0b b8 15 20 49 63 6f 6e | 42 6c 6b 21 31 36 3d 59 |... Icon|Blk!16=Y|
|00001c70| 53 69 7a 65 0d 0b c2 15 | 20 49 63 6f 6e 42 6c 6b |Size....| IconBlk|
|00001c80| 21 32 30 3d 26 32 31 30 | 32 0d 0b cc 14 20 de 20 |!20=&210|2.... . |
|00001c90| 49 63 6f 6e 42 6c 6b 21 | 32 34 20 31 31 0d 0b d6 |IconBlk!|24 11...|
|00001ca0| 1c 20 24 28 49 63 6f 6e | 42 6c 6b 21 32 34 29 3d |. $(Icon|Blk!24)=|
|00001cb0| 53 70 72 74 4e 61 6d 65 | 24 0d 0b e0 17 20 49 63 |SprtName|$.... Ic|
|00001cc0| 6f 6e 42 6c 6b 21 32 38 | 3d 53 70 72 74 42 6c 6b |onBlk!28|=SprtBlk|
|00001cd0| 0d 0b ea 12 20 49 63 6f | 6e 42 6c 6b 21 33 32 3d |.... Ico|nBlk!32=|
|00001ce0| 31 31 0d 0b f4 2b 20 c8 | 99 20 22 57 69 6d 70 5f |11...+ .|. "Wimp_|
|00001cf0| 43 72 65 61 74 65 49 63 | 6f 6e 22 2c 2c 49 63 6f |CreateIc|on",,Ico|
|00001d00| 6e 42 6c 6b 20 b8 20 48 | 61 6e 64 6c 65 0d 0b fe |nBlk . H|andle...|
|00001d10| 0c 20 3d 48 61 6e 64 6c | 65 0d 0c 08 06 20 3a 0d |. =Handl|e.... :.|
|00001d20| 0c 12 12 20 dd f2 52 65 | 64 72 61 77 28 42 6c 6b |... ..Re|draw(Blk|
|00001d30| 29 0d 0c 1c 2a 20 e7 20 | 42 6c 6b 21 30 3d 4d 61 |)...* . |Blk!0=Ma|
|00001d40| 69 6e 48 61 6e 64 6c 65 | 20 8c 20 f2 52 65 64 72 |inHandle| . .Redr|
|00001d50| 61 77 4d 61 69 6e 28 42 | 6c 6b 29 0d 0c 26 06 20 |awMain(B|lk)..&. |
|00001d60| e1 0d 0c 30 06 20 3a 0d | 0c 3a 16 20 dd f2 52 65 |...0. :.|.:. ..Re|
|00001d70| 64 72 61 77 4d 61 69 6e | 28 42 6c 6b 29 0d 0c 44 |drawMain|(Blk)..D|
|00001d80| 27 20 c8 99 20 22 57 69 | 6d 70 5f 52 65 64 72 61 |' .. "Wi|mp_Redra|
|00001d90| 77 57 69 6e 64 6f 77 22 | 2c 2c 42 6c 6b 20 b8 20 |wWindow"|,,Blk . |
|00001da0| 4d 6f 72 65 0d 0c 4e 18 | 20 f2 47 65 74 4f 72 69 |More..N.| .GetOri|
|00001db0| 67 28 42 6c 6b 2c 58 43 | 2c 59 43 29 0d 0c 58 0c |g(Blk,XC|,YC)..X.|
|00001dc0| 20 c8 95 20 4d 6f 72 65 | 0d 0c 62 1e 20 f2 44 72 | .. More|..b. .Dr|
|00001dd0| 61 77 28 58 43 2c 28 59 | 43 2b 36 30 29 2d 53 70 |aw(XC,(Y|C+60)-Sp|
|00001de0| 72 69 74 65 59 29 0d 0c | 6c 27 20 c8 99 20 22 57 |riteY)..|l' .. "W|
|00001df0| 69 6d 70 5f 47 65 74 52 | 65 63 74 61 6e 67 6c 65 |imp_GetR|ectangle|
|00001e00| 22 2c 2c 42 6c 6b 20 b8 | 20 4d 6f 72 65 0d 0c 76 |",,Blk .| More..v|
|00001e10| 06 20 ce 0d 0c 80 06 20 | e1 0d 0c 8a 06 20 3a 0d |. ..... |..... :.|
|00001e20| 0c 94 1d 20 dd f2 47 65 | 74 4f 72 69 67 28 42 6c |... ..Ge|tOrig(Bl|
|00001e30| 6b 2c f8 20 58 43 2c f8 | 20 59 43 29 0d 0c 9e 14 |k,. XC,.| YC)....|
|00001e40| 20 58 43 3d 42 6c 6b 21 | 34 2d 42 6c 6b 21 32 30 | XC=Blk!|4-Blk!20|
|00001e50| 0d 0c a8 15 20 59 43 3d | 42 6c 6b 21 31 36 2d 42 |.... YC=|Blk!16-B|
|00001e60| 6c 6b 21 32 34 0d 0c b2 | 06 20 e1 0d 0c bc 06 20 |lk!24...|. ..... |
|00001e70| 3a 0d 0c c6 12 20 dd f2 | 44 72 61 77 28 78 30 2c |:.... ..|Draw(x0,|
|00001e80| 79 30 29 0d 0c d0 0c 20 | 4d 6f 64 65 3d 32 30 0d |y0).... |Mode=20.|
|00001e90| 0c da 0c 20 58 52 65 73 | 3d 36 38 0d 0c e4 1b 20 |... XRes|=68.... |
|00001ea0| c8 99 20 22 57 69 6d 70 | 5f 53 65 74 43 6f 6c 6f |.. "Wimp|_SetColo|
|00001eb0| 75 72 22 2c 31 31 0d 0c | ee 44 20 c8 99 20 22 4f |ur",11..|.D .. "O|
|00001ec0| 53 5f 52 65 61 64 4d 6f | 64 65 56 61 72 69 61 62 |S_ReadMo|deVariab|
|00001ed0| 6c 65 22 2c 2d 31 2c 34 | 20 b8 20 2c 2c 4e 65 77 |le",-1,4| . ,,New|
|00001ee0| 58 3a 4e 65 77 58 3d 28 | 31 32 38 30 2f 28 31 32 |X:NewX=(|1280/(12|
|00001ef0| 38 30 3e 3e 4e 65 77 58 | 29 29 0d 0c f8 46 20 c8 |80>>NewX|))...F .|
|00001f00| 99 20 22 4f 53 5f 52 65 | 61 64 4d 6f 64 65 56 61 |. "OS_Re|adModeVa|
|00001f10| 72 69 61 62 6c 65 22 2c | 4d 6f 64 65 2c 34 20 b8 |riable",|Mode,4 .|
|00001f20| 20 2c 2c 4f 6c 64 58 3a | 4f 6c 64 58 3d 28 31 32 | ,,OldX:|OldX=(12|
|00001f30| 38 30 2f 28 31 32 38 30 | 3e 3e 4f 6c 64 58 29 29 |80/(1280|>>OldX))|
|00001f40| 0d 0d 02 44 20 c8 99 20 | 22 4f 53 5f 52 65 61 64 |...D .. |"OS_Read|
|00001f50| 4d 6f 64 65 56 61 72 69 | 61 62 6c 65 22 2c 2d 31 |ModeVari|able",-1|
|00001f60| 2c 35 20 b8 20 2c 2c 4e | 65 77 59 3a 4e 65 77 59 |,5 . ,,N|ewY:NewY|
|00001f70| 3d 28 31 30 32 34 2f 28 | 31 30 32 34 3e 3e 4e 65 |=(1024/(|1024>>Ne|
|00001f80| 77 59 29 29 0d 0d 0c 46 | 20 c8 99 20 22 4f 53 5f |wY))...F| .. "OS_|
|00001f90| 52 65 61 64 4d 6f 64 65 | 56 61 72 69 61 62 6c 65 |ReadMode|Variable|
|00001fa0| 22 2c 4d 6f 64 65 2c 35 | 20 b8 20 2c 2c 4f 6c 64 |",Mode,5| . ,,Old|
|00001fb0| 59 3a 4f 6c 64 59 3d 28 | 31 30 32 34 2f 28 31 30 |Y:OldY=(|1024/(10|
|00001fc0| 32 34 3e 3e 4f 6c 64 59 | 29 29 0d 0d 16 10 20 e7 |24>>OldY|)).... .|
|00001fd0| 20 eb 3c 3e 4d 6f 64 65 | 20 8c 0d 0d 20 45 20 20 | .<>Mode| ... E  |
|00001fe0| 20 c8 99 20 22 57 69 6d | 70 5f 52 65 61 64 50 69 | .. "Wim|p_ReadPi|
|00001ff0| 78 54 72 61 6e 73 22 2c | 32 35 36 2c 53 70 72 74 |xTrans",|256,Sprt|
|00002000| 42 6c 6b 2c 22 66 6f 6e | 74 22 2c 2c 2c 2c 53 63 |Blk,"fon|t",,,,Sc|
|00002010| 61 6c 65 42 6c 6b 2c 54 | 72 61 6e 73 42 6c 6b 0d |aleBlk,T|ransBlk.|
|00002020| 0d 2a 50 20 20 20 c8 99 | 20 22 4f 53 5f 53 70 72 |.*P   ..| "OS_Spr|
|00002030| 69 74 65 4f 70 22 2c 33 | 30 38 2c 53 70 72 74 42 |iteOp",3|08,SprtB|
|00002040| 6c 6b 2c 22 66 6f 6e 74 | 22 2c 78 30 2c 79 30 2d |lk,"font|",x0,y0-|
|00002050| 28 58 52 65 73 2a 4f 6c | 64 58 29 2c 30 2c 53 63 |(XRes*Ol|dX),0,Sc|
|00002060| 61 6c 65 42 6c 6b 2c 54 | 72 61 6e 73 42 6c 6b 0d |aleBlk,T|ransBlk.|
|00002070| 0d 34 06 20 cc 0d 0d 3e | 41 20 20 20 c8 99 20 22 |.4. ...>|A   .. "|
|00002080| 4f 53 5f 53 70 72 69 74 | 65 4f 70 22 2c 32 35 36 |OS_Sprit|eOp",256|
|00002090| 2b 33 34 2c 53 70 72 74 | 42 6c 6b 2c 22 66 6f 6e |+34,Sprt|Blk,"fon|
|000020a0| 74 22 2c 78 30 2c 79 30 | 2d 28 58 52 65 73 2a 4f |t",x0,y0|-(XRes*O|
|000020b0| 6c 64 58 29 2c 30 0d 0d | 48 06 20 cd 0d 0d 52 06 |ldX),0..|H. ...R.|
|000020c0| 20 e1 0d 0d 5c 06 20 3a | 0d 0d 66 0c 20 dd a4 45 | ...\. :|..f. ..E|
|000020d0| 72 72 6f 72 0d 0d 70 0b | 20 21 42 6c 6b 3d 9f 0d |rror..p.| !Blk=..|
|000020e0| 0d 7a 26 20 24 28 42 6c | 6b 2b 34 29 3d f6 24 2b |.z& $(Bl|k+4)=.$+|
|000020f0| 22 20 61 74 20 6c 69 6e | 65 20 22 2b c3 28 9e 29 |" at lin|e "+.(.)|
|00002100| 2b bd 28 30 29 0d 0d 84 | 35 20 c8 99 20 22 57 69 |+.(0)...|5 .. "Wi|
|00002110| 6d 70 5f 52 65 70 6f 72 | 74 45 72 72 6f 72 22 2c |mp_Repor|tError",|
|00002120| 42 6c 6b 2c 33 2c 41 70 | 70 4e 61 6d 65 24 20 b8 |Blk,3,Ap|pName$ .|
|00002130| 20 2c 52 65 73 70 6f 6e | 73 65 0d 0d 8e 27 20 e7 | ,Respon|se...' .|
|00002140| 20 52 65 73 70 6f 6e 73 | 65 3d 32 20 8c 20 f2 43 | Respons|e=2 . .C|
|00002150| 6c 6f 73 65 44 6f 77 6e | 3a 3d b9 3a 20 8b 20 3d |loseDown|:=.: . =|
|00002160| a3 0d 0d 98 06 20 3a 0d | 0d a2 16 20 dd f2 4d 65 |..... :.|... ..Me|
|00002170| 6e 75 53 65 6c 65 63 74 | 28 42 6c 6b 29 0d 0d ac |nuSelect|(Blk)...|
|00002180| 28 20 e7 20 49 6e 66 6f | 4d 65 6e 75 3d b9 20 80 |( . Info|Menu=. .|
|00002190| 20 42 6c 6b 21 30 3d 31 | 20 8c 20 f2 43 6c 6f 73 | Blk!0=1| . .Clos|
|000021a0| 65 44 6f 77 6e 0d 0d b6 | 13 20 e7 20 4d 61 69 6e |eDown...|. . Main|
|000021b0| 4d 65 6e 75 3d b9 20 8c | 0d 0d c0 10 20 20 20 53 |Menu=. .|....   S|
|000021c0| 74 61 72 74 75 70 3d a3 | 0d 0d ca 18 20 20 20 4e |tartup=.|....   N|
|000021d0| 65 77 46 6f 6e 74 3d 28 | 42 6c 6b 21 30 29 2b 31 |ewFont=(|Blk!0)+1|
|000021e0| 0d 0d d4 1f 20 20 20 e7 | 20 4e 65 77 46 6f 6e 74 |....   .| NewFont|
|000021f0| 3c 3e 43 75 72 72 65 6e | 74 46 6f 6e 74 20 8c 0d |<>Curren|tFont ..|
|00002200| 0d de 1f 20 20 20 20 20 | f2 43 68 61 6e 67 65 46 |...     |.ChangeF|
|00002210| 6f 6e 74 28 a3 2c 4e 65 | 77 46 6f 6e 74 29 0d 0d |ont(.,Ne|wFont)..|
|00002220| e8 08 20 20 20 cd 0d 0d | f2 24 20 20 20 c8 99 20 |..   ...|.$   .. |
|00002230| 22 57 69 6d 70 5f 47 65 | 74 50 6f 69 6e 74 65 72 |"Wimp_Ge|tPointer|
|00002240| 49 6e 66 6f 22 2c 2c 42 | 6c 6b 0d 0d fc 19 20 20 |Info",,B|lk....  |
|00002250| 20 e7 20 28 42 6c 6b 21 | 38 29 20 80 20 25 30 30 | . (Blk!|8) . %00|
|00002260| 31 20 8c 0d 0e 06 33 20 | 20 20 20 20 c8 99 20 22 |1 ....3 |    .. "|
|00002270| 57 69 6d 70 5f 43 72 65 | 61 74 65 4d 65 6e 75 22 |Wimp_Cre|ateMenu"|
|00002280| 2c 2c 4d 65 6e 75 42 6c | 6b 32 2c 42 6c 6b 21 30 |,,MenuBl|k2,Blk!0|
|00002290| 2c 42 6c 6b 21 34 0d 0e | 10 08 20 20 20 cd 0d 0e |,Blk!4..|..   ...|
|000022a0| 1a 06 20 cd 0d 0e 24 06 | 20 e1 0d 0e 2e 06 20 3a |.. ...$.| ..... :|
|000022b0| 0d 0e 38 24 20 dd f2 41 | 6c 74 65 72 49 63 6f 6e |..8$ ..A|lterIcon|
|000022c0| 28 57 48 61 6e 64 6c 65 | 2c 49 48 61 6e 64 6c 65 |(WHandle|,IHandle|
|000022d0| 2c 53 24 29 0d 0e 42 0f | 20 53 24 3d 53 24 2b bd |,S$)..B.| S$=S$+.|
|000022e0| 28 30 29 0d 0e 4c 20 20 | 42 6c 6b 21 30 3d 57 48 |(0)..L  |Blk!0=WH|
|000022f0| 61 6e 64 6c 65 3a 42 6c | 6b 21 34 3d 49 48 61 6e |andle:Bl|k!4=IHan|
|00002300| 64 6c 65 0d 0e 56 20 20 | c8 99 20 22 57 69 6d 70 |dle..V  |.. "Wimp|
|00002310| 5f 47 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_GetIcon|State",,|
|00002320| 42 6c 6b 0d 0e 60 11 20 | 24 28 42 6c 6b 21 32 38 |Blk..`. |$(Blk!28|
|00002330| 29 3d 53 24 0d 0e 6a 0c | 20 42 6c 6b 21 38 3d 30 |)=S$..j.| Blk!8=0|
|00002340| 0d 0e 74 0d 20 42 6c 6b | 21 31 32 3d 30 0d 0e 7e |..t. Blk|!12=0..~|
|00002350| 20 20 c8 99 20 22 57 69 | 6d 70 5f 53 65 74 49 63 |  .. "Wi|mp_SetIc|
|00002360| 6f 6e 53 74 61 74 65 22 | 2c 2c 42 6c 6b 0d 0e 88 |onState"|,,Blk...|
|00002370| 06 20 e1 0d 0e 92 06 20 | 3a 0d 0e 9c 15 20 dd f2 |. ..... |:.... ..|
|00002380| 46 6f 72 63 65 28 57 48 | 61 6e 64 6c 65 29 0d 0e |Force(WH|andle)..|
|00002390| a6 33 20 c8 99 20 22 57 | 69 6d 70 5f 46 6f 72 63 |.3 .. "W|imp_Forc|
|000023a0| 65 52 65 64 72 61 77 22 | 2c 57 48 61 6e 64 6c 65 |eRedraw"|,WHandle|
|000023b0| 2c 30 2c 2d 31 30 30 30 | 30 2c 31 30 30 30 30 2c |,0,-1000|0,10000,|
|000023c0| 30 0d 0e b0 06 20 e1 0d | 0e ba 06 20 3a 0d 0e c4 |0.... ..|... :...|
|000023d0| 12 20 dd f2 43 72 65 61 | 74 65 49 63 6f 6e 73 0d |. ..Crea|teIcons.|
|000023e0| 0e ce 4d 20 f2 43 72 65 | 61 74 65 55 73 65 72 49 |..M .Cre|ateUserI|
|000023f0| 63 6f 6e 28 4d 61 69 6e | 48 61 6e 64 6c 65 2c 30 |con(Main|Handle,0|
|00002400| 2c 33 38 34 2c 25 30 30 | 31 30 2c 30 2c 25 31 30 |,384,%00|10,0,%10|
|00002410| 2c 32 37 30 2c 33 38 34 | 2c 22 53 43 52 45 45 4e |,270,384|,"SCREEN|
|00002420| 44 55 4d 50 22 2c 37 2c | 30 2c 30 29 0d 0e d8 4f |DUMP",7,|0,0)...O|
|00002430| 20 f2 43 72 65 61 74 65 | 55 73 65 72 49 63 6f 6e | .Create|UserIcon|
|00002440| 28 4d 61 69 6e 48 61 6e | 64 6c 65 2c 38 30 2c 33 |(MainHan|dle,80,3|
|00002450| 30 30 2c 25 30 30 31 30 | 2c 49 63 6f 6e 42 6c 6b |00,%0010|,IconBlk|
|00002460| 2c 25 30 31 2c 31 36 30 | 2c 33 32 2c 22 43 6f 6c |,%01,160|,32,"Col|
|00002470| 6f 75 72 22 2c 37 2c 32 | 2c 31 29 0d 0e e2 55 20 |our",7,2|,1)...U |
|00002480| f2 43 72 65 61 74 65 55 | 73 65 72 49 63 6f 6e 28 |.CreateU|serIcon(|
|00002490| 4d 61 69 6e 48 61 6e 64 | 6c 65 2c 36 30 2c 33 35 |MainHand|le,60,35|
|000024a0| 30 2c 25 30 30 31 30 2c | 49 63 6f 6e 42 6c 6b 2b |0,%0010,|IconBlk+|
|000024b0| 31 32 2c 25 30 31 2c 31 | 36 30 2c 33 32 2c 22 44 |12,%01,1|60,32,"D|
|000024c0| 72 61 67 20 4d 65 21 22 | 2c 37 2c 31 31 2c 31 29 |rag Me!"|,7,11,1)|
|000024d0| 0d 0e ec 06 20 e1 0d 0e | f6 06 20 3a 0d 0f 00 5d |.... ...|.. :...]|
|000024e0| 20 dd f2 43 72 65 61 74 | 65 55 73 65 72 49 63 6f | ..Creat|eUserIco|
|000024f0| 6e 28 57 48 61 6e 64 6c | 65 2c 58 50 6f 73 2c 59 |n(WHandl|e,XPos,Y|
|00002500| 50 6f 73 2c 42 75 74 74 | 6f 6e 2c 41 64 64 72 2c |Pos,Butt|on,Addr,|
|00002510| 53 70 72 74 54 78 74 2c | 57 69 64 74 68 2c 48 65 |SprtTxt,|Width,He|
|00002520| 69 67 68 74 2c 53 24 2c | 46 47 43 6f 6c 2c 42 47 |ight,S$,|FGCol,BG|
|00002530| 43 6f 6c 2c 46 69 6c 6c | 29 0d 0f 0a 34 20 46 6c |Col,Fill|)...4 Fl|
|00002540| 61 67 73 3d 25 30 30 30 | 30 30 30 30 30 30 30 30 |ags=%000|00000000|
|00002550| 30 30 30 30 30 30 30 30 | 30 30 30 30 30 30 30 30 |00000000|00000000|
|00002560| 30 30 30 30 30 30 30 30 | 31 31 30 30 30 0d 0f 14 |00000000|11000...|
|00002570| 13 20 46 6c 61 67 73 2b | 3d 53 70 72 74 54 78 74 |. Flags+|=SprtTxt|
|00002580| 0d 0f 1e 16 20 46 6c 61 | 67 73 2b 3d 42 75 74 74 |.... Fla|gs+=Butt|
|00002590| 6f 6e 3c 3c 31 32 0d 0f | 28 15 20 46 6c 61 67 73 |on<<12..|(. Flags|
|000025a0| 2b 3d 46 47 43 6f 6c 3c | 3c 32 34 0d 0f 32 15 20 |+=FGCol<|<24..2. |
|000025b0| 46 6c 61 67 73 2b 3d 42 | 47 43 6f 6c 3c 3c 32 38 |Flags+=B|GCol<<28|
|000025c0| 0d 0f 3c 13 20 46 6c 61 | 67 73 2b 3d 46 69 6c 6c |..<. Fla|gs+=Fill|
|000025d0| 3c 3c 35 0d 0f 46 3c 20 | f2 4d 61 6b 65 49 63 6f |<<5..F< |.MakeIco|
|000025e0| 6e 28 57 48 61 6e 64 6c | 65 2c 46 6c 61 67 73 2c |n(WHandl|e,Flags,|
|000025f0| 58 50 6f 73 2c 59 50 6f | 73 2c 41 64 64 72 2c 57 |XPos,YPo|s,Addr,W|
|00002600| 69 64 74 68 2c 48 65 69 | 67 68 74 2c 53 24 29 0d |idth,Hei|ght,S$).|
|00002610| 0f 50 06 20 e1 0d 0f 5a | 06 20 3a 0d 0f 64 3d 20 |.P. ...Z|. :..d= |
|00002620| dd f2 4d 61 6b 65 49 63 | 6f 6e 28 57 48 61 6e 64 |..MakeIc|on(WHand|
|00002630| 6c 65 2c 46 6c 61 67 73 | 2c 58 50 6f 73 2c 59 50 |le,Flags|,XPos,YP|
|00002640| 6f 73 2c 41 64 64 72 2c | 57 69 64 74 68 2c 48 65 |os,Addr,|Width,He|
|00002650| 69 67 68 74 2c 53 24 29 | 0d 0f 6e 13 20 49 42 6c |ight,S$)|..n. IBl|
|00002660| 6b 21 30 3d 57 48 61 6e | 64 6c 65 0d 0f 78 10 20 |k!0=WHan|dle..x. |
|00002670| 49 42 6c 6b 21 34 3d 58 | 50 6f 73 0d 0f 82 13 20 |IBlk!4=X|Pos.... |
|00002680| 49 42 6c 6b 21 38 3d 2d | 31 2a 59 50 6f 73 0d 0f |IBlk!8=-|1*YPos..|
|00002690| 8c 17 20 49 42 6c 6b 21 | 31 32 3d 58 50 6f 73 2b |.. IBlk!|12=XPos+|
|000026a0| 57 69 64 74 68 0d 0f 96 | 19 20 49 42 6c 6b 21 31 |Width...|. IBlk!1|
|000026b0| 36 3d 2d 59 50 6f 73 2b | 48 65 69 67 68 74 0d 0f |6=-YPos+|Height..|
|000026c0| a0 12 20 49 42 6c 6b 21 | 32 30 3d 46 6c 61 67 73 |.. IBlk!|20=Flags|
|000026d0| 0d 0f aa 10 20 e7 20 41 | 64 64 72 3c 3e 30 20 8c |.... . A|ddr<>0 .|
|000026e0| 0d 0f b4 34 20 49 42 6c | 6b 21 32 34 3d 41 64 64 |...4 IBl|k!24=Add|
|000026f0| 72 3a 24 41 64 64 72 3d | 53 24 2b bd 28 30 29 3a |r:$Addr=|S$+.(0):|
|00002700| 49 42 6c 6b 21 32 38 3d | 2d 31 3a 42 6c 6b 21 33 |IBlk!28=|-1:Blk!3|
|00002710| 32 3d 31 32 0d 0f be 12 | 20 49 42 6c 6b 21 32 30 |2=12....| IBlk!20|
|00002720| 2b 3d 31 3c 3c 38 0d 0f | c8 06 20 cc 0d 0f d2 17 |+=1<<8..|.. .....|
|00002730| 20 24 28 49 42 6c 6b 2b | 32 34 29 3d 53 24 2b bd | $(IBlk+|24)=S$+.|
|00002740| 28 30 29 0d 0f dc 06 20 | cd 0d 0f e6 1f 20 c8 99 |(0).... |..... ..|
|00002750| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 49 63 6f | "Wimp_C|reateIco|
|00002760| 6e 22 2c 2c 49 42 6c 6b | 0d 0f f0 06 20 e1 0d 0f |n",,IBlk|.... ...|
|00002770| fa 06 20 3a 0d 10 04 1f | 20 dd f2 44 72 61 67 42 |.. :....| ..DragB|
|00002780| 6f 78 28 57 48 61 6e 64 | 6c 65 2c 49 48 61 6e 64 |ox(WHand|le,IHand|
|00002790| 6c 65 29 0d 10 0e 17 20 | 44 72 61 67 43 6f 6c 3d |le).... |DragCol=|
|000027a0| 49 48 61 6e 64 6c 65 2d | 38 33 0d 10 18 12 20 42 |IHandle-|83.... B|
|000027b0| 6c 6b 21 30 3d 57 48 61 | 6e 64 6c 65 0d 10 22 22 |lk!0=WHa|ndle..""|
|000027c0| 20 c8 99 20 22 57 69 6d | 70 5f 47 65 74 57 69 6e | .. "Wim|p_GetWin|
|000027d0| 64 6f 77 53 74 61 74 65 | 22 2c 2c 42 6c 6b 0d 10 |dowState|",,Blk..|
|000027e0| 2c 13 20 58 3d 42 6c 6b | 21 34 2d 42 6c 6b 21 32 |,. X=Blk|!4-Blk!2|
|000027f0| 30 0d 10 36 14 20 59 3d | 42 6c 6b 21 31 36 2d 42 |0..6. Y=|Blk!16-B|
|00002800| 6c 6b 21 32 34 0d 10 40 | 12 20 42 6c 6b 21 34 3d |lk!24..@|. Blk!4=|
|00002810| 49 48 61 6e 64 6c 65 0d | 10 4a 20 20 c8 99 20 22 |IHandle.|.J  .. "|
|00002820| 57 69 6d 70 5f 47 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Get|IconStat|
|00002830| 65 22 2c 2c 42 6c 6b 0d | 10 54 12 20 42 6c 6b 21 |e",,Blk.|.T. Blk!|
|00002840| 30 3d 57 48 61 6e 64 6c | 65 0d 10 5e 0c 20 42 6c |0=WHandl|e..^. Bl|
|00002850| 6b 21 34 3d 35 0d 10 68 | 0d 20 42 6c 6b 21 38 2b |k!4=5..h|. Blk!8+|
|00002860| 3d 58 0d 10 72 0e 20 42 | 6c 6b 21 31 32 2b 3d 59 |=X..r. B|lk!12+=Y|
|00002870| 0d 10 7c 0e 20 42 6c 6b | 21 31 36 2b 3d 58 0d 10 |..|. Blk|!16+=X..|
|00002880| 86 0e 20 42 6c 6b 21 32 | 30 2b 3d 59 0d 10 90 0d |.. Blk!2|0+=Y....|
|00002890| 20 42 6c 6b 21 32 34 3d | 30 0d 10 9a 0d 20 42 6c | Blk!24=|0.... Bl|
|000028a0| 6b 21 32 38 3d 30 0d 10 | a4 15 20 42 6c 6b 21 33 |k!28=0..|.. Blk!3|
|000028b0| 32 3d 26 37 46 46 46 46 | 46 46 46 0d 10 ae 12 20 |2=&7FFFF|FFF.... |
|000028c0| 42 6c 6b 21 33 36 3d 42 | 6c 6b 21 33 32 0d 10 b8 |Blk!36=B|lk!32...|
|000028d0| 1b 20 c8 99 20 22 57 69 | 6d 70 5f 44 72 61 67 42 |. .. "Wi|mp_DragB|
|000028e0| 6f 78 22 2c 2c 42 6c 6b | 0d 10 c2 0b 20 44 72 61 |ox",,Blk|.... Dra|
|000028f0| 67 3d b9 0d 10 cc 06 20 | e1 0d 10 d6 06 20 3a 0d |g=..... |..... :.|
|00002900| 10 e0 2a 20 dd f2 43 68 | 61 6e 67 65 53 70 72 69 |..* ..Ch|angeSpri|
|00002910| 74 65 28 57 48 61 6e 64 | 6c 65 2c 49 48 61 6e 64 |te(WHand|le,IHand|
|00002920| 6c 65 2c 4e 61 6d 65 24 | 29 0d 10 ea 1f 20 21 42 |le,Name$|).... !B|
|00002930| 6c 6b 3d 57 48 61 6e 64 | 6c 65 3a 42 6c 6b 21 34 |lk=WHand|le:Blk!4|
|00002940| 3d 49 48 61 6e 64 6c 65 | 0d 10 f4 20 20 c8 99 20 |=IHandle|...  .. |
|00002950| 22 57 69 6d 70 5f 47 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Ge|tIconSta|
|00002960| 74 65 22 2c 2c 42 6c 6b | 0d 10 fe 15 20 58 3d 42 |te",,Blk|.... X=B|
|00002970| 6c 6b 21 38 3a 59 3d 42 | 6c 6b 21 31 32 0d 11 08 |lk!8:Y=B|lk!12...|
|00002980| 1e 20 c8 99 20 22 57 69 | 6d 70 5f 44 65 6c 65 74 |. .. "Wi|mp_Delet|
|00002990| 65 49 63 6f 6e 22 2c 2c | 42 6c 6b 0d 11 12 39 20 |eIcon",,|Blk...9 |
|000029a0| f2 43 72 65 61 74 65 55 | 73 65 72 49 63 6f 6e 28 |.CreateU|serIcon(|
|000029b0| 57 48 61 6e 64 6c 65 2c | 58 2c 2d 59 2c 25 30 30 |WHandle,|X,-Y,%00|
|000029c0| 31 30 2c 30 2c 25 31 30 | 2c 33 32 2c 4e 61 6d 65 |10,0,%10|,32,Name|
|000029d0| 24 2c 37 29 0d 11 1c 33 | 20 42 6c 6b 21 30 3d 4d |$,7)...3| Blk!0=M|
|000029e0| 61 69 6e 48 61 6e 64 6c | 65 3a 42 6c 6b 21 34 3d |ainHandl|e:Blk!4=|
|000029f0| 48 61 6e 64 6c 65 3a 42 | 6c 6b 21 38 3d 30 3a 42 |Handle:B|lk!8=0:B|
|00002a00| 6c 6b 21 31 32 3d 30 0d | 11 26 20 20 c8 99 20 22 |lk!12=0.|.&  .. "|
|00002a10| 57 69 6d 70 5f 53 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Set|IconStat|
|00002a20| 65 22 2c 2c 42 6c 6b 0d | 11 30 06 20 e1 0d 11 3a |e",,Blk.|.0. ...:|
|00002a30| 06 20 3a 0d 11 44 14 20 | dd f2 44 72 61 67 44 6f |. :..D. |..DragDo|
|00002a40| 6e 65 28 42 6c 6b 29 0d | 11 4e 22 20 c8 99 20 22 |ne(Blk).|.N" .. "|
|00002a50| 57 69 6d 70 5f 47 65 74 | 50 6f 69 6e 74 65 72 49 |Wimp_Get|PointerI|
|00002a60| 6e 66 6f 22 2c 2c 42 6c | 6b 0d 11 58 35 20 e7 20 |nfo",,Bl|k..X5 . |
|00002a70| 42 6c 6b 21 31 32 3c 3e | 4d 61 69 6e 48 61 6e 64 |Blk!12<>|MainHand|
|00002a80| 6c 65 20 84 20 42 6c 6b | 21 31 36 3d 2d 31 20 84 |le . Blk|!16=-1 .|
|00002a90| 20 42 6c 6b 21 31 36 3e | 35 39 20 8c 20 e1 0d 11 | Blk!16>|59 . ...|
|00002aa0| 62 10 20 49 63 6f 6e 3d | 42 6c 6b 21 31 36 0d 11 |b. Icon=|Blk!16..|
|00002ab0| 6c 06 20 e1 0d 11 76 06 | 20 3a 0d 11 80 2a 20 dd |l. ...v.| :...* .|
|00002ac0| f2 41 6c 74 65 72 49 63 | 6f 6e 32 28 57 48 61 6e |.AlterIc|on2(WHan|
|00002ad0| 64 6c 65 2c 49 48 61 6e | 64 6c 65 2c 53 74 72 69 |dle,IHan|dle,Stri|
|00002ae0| 6e 67 24 29 0d 11 8a 19 | 20 53 74 72 69 6e 67 24 |ng$)....| String$|
|00002af0| 3d 53 74 72 69 6e 67 24 | 2b bd 28 30 29 0d 11 94 |=String$|+.(0)...|
|00002b00| 12 20 42 6c 6b 21 30 3d | 57 48 61 6e 64 6c 65 0d |. Blk!0=|WHandle.|
|00002b10| 11 9e 12 20 42 6c 6b 21 | 34 3d 49 48 61 6e 64 6c |... Blk!|4=IHandl|
|00002b20| 65 0d 11 a8 20 20 c8 99 | 20 22 57 69 6d 70 5f 47 |e...  ..| "Wimp_G|
|00002b30| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 42 6c |etIconSt|ate",,Bl|
|00002b40| 6b 0d 11 b2 20 20 e7 20 | 28 42 6c 6b 21 32 34 20 |k...  . |(Blk!24 |
|00002b50| 80 20 25 31 30 30 30 30 | 30 30 30 30 29 3e 30 20 |. %10000|0000)>0 |
|00002b60| 8c 0d 11 bc 14 20 24 42 | 6c 6b 21 32 38 3d 53 74 |..... $B|lk!28=St|
|00002b70| 72 69 6e 67 24 0d 11 c6 | 06 20 cc 0d 11 d0 16 20 |ring$...|. ..... |
|00002b80| 24 28 42 6c 6b 2b 32 38 | 29 3d 53 74 72 69 6e 67 |$(Blk+28|)=String|
|00002b90| 24 0d 11 da 06 20 cd 0d | 11 e4 0c 20 42 6c 6b 21 |$.... ..|... Blk!|
|00002ba0| 38 3d 30 0d 11 ee 0d 20 | 42 6c 6b 21 31 32 3d 30 |8=0.... |Blk!12=0|
|00002bb0| 0d 11 f8 20 20 c8 99 20 | 22 57 69 6d 70 5f 53 65 |...  .. |"Wimp_Se|
|00002bc0| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 42 6c 6b |tIconSta|te",,Blk|
|00002bd0| 0d 12 02 06 20 e1 0d 12 | 0c 06 20 3a 0d 12 16 38 |.... ...|.. :...8|
|00002be0| 20 dd 20 f2 57 72 69 74 | 65 49 63 6f 6e 54 65 78 | . .Writ|eIconTex|
|00002bf0| 74 28 57 48 61 6e 64 6c | 65 2c 57 69 6e 64 6f 77 |t(WHandl|e,Window|
|00002c00| 42 6c 6b 2c 49 48 61 6e | 64 6c 65 2c 53 74 72 69 |Blk,IHan|dle,Stri|
|00002c10| 6e 67 24 29 0d 12 20 0d | 20 ea 20 49 2c 54 2c 70 |ng$).. .| . I,T,p|
|00002c20| 25 0d 12 2a 21 20 41 64 | 64 72 3d 57 69 6e 64 6f |%..*! Ad|dr=Windo|
|00002c30| 77 42 6c 6b 2b 38 38 2b | 33 32 2a 49 48 61 6e 64 |wBlk+88+|32*IHand|
|00002c40| 6c 65 0d 12 34 15 20 49 | 3d 26 31 30 30 20 80 20 |le..4. I|=&100 . |
|00002c50| 41 64 64 72 21 31 36 0d | 12 3e 12 20 54 3d 31 20 |Addr!16.|.>. T=1 |
|00002c60| 80 20 41 64 64 72 21 31 | 36 0d 12 48 0e 20 e7 20 |. Addr!1|6..H. . |
|00002c70| 54 3d 30 20 8c 20 e1 0d | 12 52 0c 20 e7 20 49 3d |T=0 . ..|.R. . I=|
|00002c80| 30 20 8c 0d 12 5c 2c 20 | 20 20 e7 20 a9 28 53 74 |0 ...\, |  . .(St|
|00002c90| 72 69 6e 67 24 29 3c 3d | 31 31 20 8c 20 24 28 41 |ring$)<=|11 . $(A|
|00002ca0| 64 64 72 2b 32 30 29 3d | 53 74 72 69 6e 67 24 0d |ddr+20)=|String$.|
|00002cb0| 12 66 06 20 cc 0d 12 70 | 36 20 20 20 e7 20 28 20 |.f. ...p|6   . ( |
|00002cc0| a9 28 53 74 72 69 6e 67 | 24 29 3c 28 41 64 64 72 |.(String|$)<(Addr|
|00002cd0| 21 32 38 29 20 29 20 8c | 20 24 28 41 64 64 72 21 |!28) ) .| $(Addr!|
|00002ce0| 32 30 29 3d 53 74 72 69 | 6e 67 24 0d 12 7a 06 20 |20)=Stri|ng$..z. |
|00002cf0| cd 0d 12 84 20 20 42 6c | 6b 21 30 3d 57 48 61 6e |....  Bl|k!0=WHan|
|00002d00| 64 6c 65 3a 42 6c 6b 21 | 34 3d 49 48 61 6e 64 6c |dle:Blk!|4=IHandl|
|00002d10| 65 0d 12 8e 20 20 c8 99 | 20 22 57 69 6d 70 5f 47 |e...  ..| "Wimp_G|
|00002d20| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 42 6c |etIconSt|ate",,Bl|
|00002d30| 6b 0d 12 98 3d 20 c8 99 | 20 22 57 69 6d 70 5f 46 |k...= ..| "Wimp_F|
|00002d40| 6f 72 63 65 52 65 64 72 | 61 77 22 2c 57 48 61 6e |orceRedr|aw",WHan|
|00002d50| 64 6c 65 2c 42 6c 6b 21 | 38 2c 42 6c 6b 21 31 32 |dle,Blk!|8,Blk!12|
|00002d60| 2c 42 6c 6b 21 31 36 2c | 42 6c 6b 21 32 30 0d 12 |,Blk!16,|Blk!20..|
|00002d70| a2 06 20 e1 0d 12 ac 06 | 20 3a 0d 12 b6 36 20 dd |.. .....| :...6 .|
|00002d80| f2 57 72 69 74 65 49 63 | 6f 6e 53 74 72 69 6e 67 |.WriteIc|onString|
|00002d90| 28 57 42 6c 6f 63 6b 2c | 57 48 61 6e 64 6c 65 2c |(WBlock,|WHandle,|
|00002da0| 49 48 61 6e 64 6c 65 2c | 53 74 72 69 6e 67 24 29 |IHandle,|String$)|
|00002db0| 0d 12 c0 12 20 42 6c 6b | 21 30 3d 57 48 61 6e 64 |.... Blk|!0=WHand|
|00002dc0| 6c 65 0d 12 ca 12 20 42 | 6c 6b 21 34 3d 49 48 61 |le.... B|lk!4=IHa|
|00002dd0| 6e 64 6c 65 0d 12 d4 20 | 20 c8 99 20 22 57 69 6d |ndle... | .. "Wim|
|00002de0| 70 5f 47 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_GetIco|nState",|
|00002df0| 2c 42 6c 6b 0d 12 de 1d | 20 50 74 72 3d 57 42 6c |,Blk....| Ptr=WBl|
|00002e00| 6f 63 6b 2b 38 38 2b 33 | 32 2a 49 48 61 6e 64 6c |ock+88+3|2*IHandl|
|00002e10| 65 0d 12 e8 33 20 e7 20 | 50 74 72 21 31 36 20 80 |e...3 . |Ptr!16 .|
|00002e20| 20 26 31 30 30 20 8c 20 | 49 3d 31 3a 41 64 64 72 | &100 . |I=1:Addr|
|00002e30| 3d 50 74 72 21 32 30 20 | 8b 20 49 3d 30 3a 41 64 |=Ptr!20 |. I=0:Ad|
|00002e40| 64 72 3d 30 0d 12 f2 0f | 20 58 50 6f 73 3d 42 6c |dr=0....| XPos=Bl|
|00002e50| 6b 21 38 0d 12 fc 13 20 | 59 50 6f 73 3d 2d 28 42 |k!8.... |YPos=-(B|
|00002e60| 6c 6b 21 31 32 29 0d 13 | 06 18 20 57 69 64 74 68 |lk!12)..|.. Width|
|00002e70| 3d 28 42 6c 6b 21 31 36 | 29 2d 58 50 6f 73 0d 13 |=(Blk!16|)-XPos..|
|00002e80| 10 1b 20 48 65 69 67 68 | 74 3d 28 28 42 6c 6b 21 |.. Heigh|t=((Blk!|
|00002e90| 32 30 29 29 2b 59 50 6f | 73 0d 13 1a 11 20 46 6c |20))+YPo|s.... Fl|
|00002ea0| 61 67 73 3d 42 6c 6b 21 | 32 34 0d 13 24 23 20 e7 |ags=Blk!|24..$# .|
|00002eb0| 20 28 46 6c 61 67 73 20 | 80 20 31 3c 3c 38 29 20 | (Flags |. 1<<8) |
|00002ec0| 8c 20 46 6c 61 67 73 2d | 3d 31 3c 3c 38 0d 13 2e |. Flags-|=1<<8...|
|00002ed0| 1e 20 c8 99 20 22 57 69 | 6d 70 5f 44 65 6c 65 74 |. .. "Wi|mp_Delet|
|00002ee0| 65 49 63 6f 6e 22 2c 2c | 42 6c 6b 0d 13 38 41 20 |eIcon",,|Blk..8A |
|00002ef0| f2 4d 61 6b 65 49 63 6f | 6e 28 57 48 61 6e 64 6c |.MakeIco|n(WHandl|
|00002f00| 65 2c 46 6c 61 67 73 2c | 58 50 6f 73 2c 59 50 6f |e,Flags,|XPos,YPo|
|00002f10| 73 2c 41 64 64 72 2c 57 | 69 64 74 68 2c 48 65 69 |s,Addr,W|idth,Hei|
|00002f20| 67 68 74 2c 53 74 72 69 | 6e 67 24 29 0d 13 42 06 |ght,Stri|ng$)..B.|
|00002f30| 20 e1 0d 13 4c 06 20 3a | 0d 13 56 27 20 dd f2 52 | ...L. :|..V' ..R|
|00002f40| 65 74 69 74 6c 65 32 28 | 57 42 6c 6f 63 6b 2c 57 |etitle2(|WBlock,W|
|00002f50| 48 61 6e 64 6c 65 2c 53 | 74 72 69 6e 67 24 29 0d |Handle,S|tring$).|
|00002f60| 13 60 12 20 42 6c 6b 21 | 30 3d 57 48 61 6e 64 6c |.`. Blk!|0=WHandl|
|00002f70| 65 0d 13 6a 24 20 f4 20 | 53 59 53 20 22 57 69 6d |e..j$ . |SYS "Wim|
|00002f80| 70 5f 47 65 74 57 69 6e | 64 6f 77 49 6e 66 6f 22 |p_GetWin|dowInfo"|
|00002f90| 2c 2c 42 6c 6b 0d 13 74 | 1f 20 c8 99 20 22 57 69 |,,Blk..t|. .. "Wi|
|00002fa0| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|00002fb0| 2c 42 6c 6b 0d 13 7e 28 | 20 e7 20 57 42 6c 6f 63 |,Blk..~(| . WBloc|
|00002fc0| 6b 21 35 36 20 80 20 31 | 3c 3c 38 20 8c 20 41 64 |k!56 . 1|<<8 . Ad|
|00002fd0| 64 72 3d 57 42 6c 6f 63 | 6b 21 37 32 0d 13 88 17 |dr=WBloc|k!72....|
|00002fe0| 20 24 41 64 64 72 3d 53 | 74 72 69 6e 67 24 2b bd | $Addr=S|tring$+.|
|00002ff0| 28 30 29 0d 13 92 1e 20 | c8 99 20 22 57 69 6d 70 |(0).... |.. "Wimp|
|00003000| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 42 6c |_OpenWin|dow",,Bl|
|00003010| 6b 0d 13 9c 06 20 e1 0d | 13 a6 06 20 3a 0d 13 b0 |k.... ..|... :...|
|00003020| 1f 20 dd f2 44 72 61 67 | 42 6f 78 28 57 48 61 6e |. ..Drag|Box(WHan|
|00003030| 64 6c 65 2c 49 48 61 6e | 64 6c 65 29 0d 13 ba 12 |dle,IHan|dle)....|
|00003040| 20 42 6c 6b 21 30 3d 57 | 48 61 6e 64 6c 65 0d 13 | Blk!0=W|Handle..|
|00003050| c4 22 20 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 57 |." .. "W|imp_GetW|
|00003060| 69 6e 64 6f 77 53 74 61 | 74 65 22 2c 2c 42 6c 6b |indowSta|te",,Blk|
|00003070| 0d 13 ce 13 20 58 3d 42 | 6c 6b 21 34 2d 42 6c 6b |.... X=B|lk!4-Blk|
|00003080| 21 32 30 0d 13 d8 14 20 | 59 3d 42 6c 6b 21 31 36 |!20.... |Y=Blk!16|
|00003090| 2d 42 6c 6b 21 32 34 0d | 13 e2 12 20 42 6c 6b 21 |-Blk!24.|... Blk!|
|000030a0| 34 3d 49 48 61 6e 64 6c | 65 0d 13 ec 20 20 c8 99 |4=IHandl|e...  ..|
|000030b0| 20 22 57 69 6d 70 5f 47 | 65 74 49 63 6f 6e 53 74 | "Wimp_G|etIconSt|
|000030c0| 61 74 65 22 2c 2c 42 6c | 6b 0d 13 f6 12 20 42 6c |ate",,Bl|k.... Bl|
|000030d0| 6b 21 30 3d 57 48 61 6e | 64 6c 65 0d 14 00 0c 20 |k!0=WHan|dle.... |
|000030e0| 42 6c 6b 21 34 3d 35 0d | 14 0a 0d 20 42 6c 6b 21 |Blk!4=5.|... Blk!|
|000030f0| 38 2b 3d 58 0d 14 14 0e | 20 42 6c 6b 21 31 32 2b |8+=X....| Blk!12+|
|00003100| 3d 59 0d 14 1e 0e 20 42 | 6c 6b 21 31 36 2b 3d 58 |=Y.... B|lk!16+=X|
|00003110| 0d 14 28 0e 20 42 6c 6b | 21 32 30 2b 3d 59 0d 14 |..(. Blk|!20+=Y..|
|00003120| 32 0d 20 42 6c 6b 21 32 | 34 3d 30 0d 14 3c 0d 20 |2. Blk!2|4=0..<. |
|00003130| 42 6c 6b 21 32 38 3d 30 | 0d 14 46 15 20 42 6c 6b |Blk!28=0|..F. Blk|
|00003140| 21 33 32 3d 26 37 46 46 | 46 46 46 46 46 0d 14 50 |!32=&7FF|FFFFF..P|
|00003150| 12 20 42 6c 6b 21 33 36 | 3d 42 6c 6b 21 33 32 0d |. Blk!36|=Blk!32.|
|00003160| 14 5a 1b 20 c8 99 20 22 | 57 69 6d 70 5f 44 72 61 |.Z. .. "|Wimp_Dra|
|00003170| 67 42 6f 78 22 2c 2c 42 | 6c 6b 0d 14 64 0b 20 44 |gBox",,B|lk..d. D|
|00003180| 72 61 67 3d b9 0d 14 6e | 06 20 e1 0d 14 78 06 20 |rag=...n|. ...x. |
|00003190| 3a 0d 14 82 0f 20 dd f2 | 44 72 61 67 44 6f 6e 65 |:.... ..|DragDone|
|000031a0| 0d 14 8c 06 20 e1 0d 14 | 96 06 20 3a 0d 14 a0 12 |.... ...|.. :....|
|000031b0| 20 dd a4 4c 65 61 66 28 | 50 61 74 68 24 29 0d 14 | ..Leaf(|Path$)..|
|000031c0| aa 13 20 c8 95 20 a7 50 | 61 74 68 24 2c 22 2e 22 |.. .. .P|ath$,"."|
|000031d0| 29 0d 14 b4 20 20 50 61 | 74 68 24 3d c1 50 61 74 |)...  Pa|th$=.Pat|
|000031e0| 68 24 2c a7 50 61 74 68 | 24 2c 22 2e 22 29 2b 31 |h$,.Path|$,".")+1|
|000031f0| 29 0d 14 be 06 20 ce 0d | 14 c8 0b 20 3d 50 61 74 |).... ..|... =Pat|
|00003200| 68 24 0d 14 d2 06 20 3a | 0d 14 dc 1e 20 dd f2 43 |h$.... :|.... ..C|
|00003210| 68 61 6e 67 65 46 6f 6e | 74 28 55 70 64 61 74 65 |hangeFon|t(Update|
|00003220| 2c 46 6f 6e 74 29 0d 14 | e6 3b 20 f4 20 49 66 20 |,Font)..|.; . If |
|00003230| 55 70 64 61 74 65 20 69 | 73 20 74 72 75 65 20 74 |Update i|s true t|
|00003240| 68 65 6e 20 74 68 65 20 | 77 69 6e 64 6f 77 20 69 |hen the |window i|
|00003250| 73 20 72 65 64 72 61 77 | 6e 20 77 68 65 74 68 65 |s redraw|n whethe|
|00003260| 72 0d 14 f0 1e 20 f4 20 | 69 74 20 69 73 20 6e 65 |r.... . |it is ne|
|00003270| 63 65 73 73 61 72 79 20 | 6f 72 20 6e 6f 74 2e 0d |cessary |or not..|
|00003280| 14 fa 3a 20 f4 20 49 46 | 20 28 46 6f 6e 74 3d 43 |..: . IF| (Font=C|
|00003290| 75 72 72 65 6e 74 46 6f | 6e 74 29 20 41 4e 44 20 |urrentFo|nt) AND |
|000032a0| 55 70 64 61 74 65 3d 46 | 41 4c 53 45 20 54 48 45 |Update=F|ALSE THE|
|000032b0| 4e 20 45 4e 44 50 52 4f | 43 0d 15 04 15 20 43 75 |N ENDPRO|C.... Cu|
|000032c0| 72 72 65 6e 74 46 6f 6e | 74 3d 46 6f 6e 74 0d 15 |rrentFon|t=Font..|
|000032d0| 0e 15 20 f2 49 6e 69 74 | 53 70 72 69 74 65 42 6c |.. .Init|SpriteBl|
|000032e0| 6f 63 6b 0d 15 18 16 20 | e7 20 a4 53 71 75 61 72 |ock.... |. .Squar|
|000032f0| 65 50 69 78 65 6c 73 20 | 8c 0d 15 22 19 20 20 20 |ePixels |...".   |
|00003300| 4d 6f 64 65 44 69 72 24 | 3d 22 46 6f 6e 74 73 32 |ModeDir$|="Fonts2|
|00003310| 30 22 0d 15 2c 06 20 cc | 0d 15 36 19 20 20 20 4d |0"..,. .|..6.   M|
|00003320| 6f 64 65 44 69 72 24 3d | 22 46 6f 6e 74 73 31 32 |odeDir$=|"Fonts12|
|00003330| 22 0d 15 40 06 20 cd 0d | 15 4a 12 20 e7 20 53 74 |"..@. ..|.J. . St|
|00003340| 61 72 74 75 70 3d b9 20 | 8c 0d 15 54 4e 20 20 20 |artup=. |...TN   |
|00003350| c8 99 20 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 |.. "OS_S|priteOp"|
|00003360| 2c 31 30 2b 32 35 36 2c | 53 70 72 74 42 6c 6b 2c |,10+256,|SprtBlk,|
|00003370| 22 3c 46 6f 6e 74 56 69 | 65 77 24 44 69 72 3e 2e |"<FontVi|ew$Dir>.|
|00003380| 22 2b 4d 6f 64 65 44 69 | 72 24 2b 22 2e 30 2e 53 |"+ModeDi|r$+".0.S|
|00003390| 74 61 72 74 75 70 22 0d | 15 5e 2f 20 20 20 f2 57 |tartup".|.^/   .W|
|000033a0| 72 69 74 65 49 63 6f 6e | 54 65 78 74 28 4d 61 69 |riteIcon|Text(Mai|
|000033b0| 6e 48 61 6e 64 6c 65 2c | 4d 61 69 6e 57 42 6c 6b |nHandle,|MainWBlk|
|000033c0| 2c 35 2c 22 22 29 0d 15 | 68 06 20 cc 0d 15 72 18 |,5,"")..|h. ...r.|
|000033d0| 20 20 20 44 69 72 24 3d | c3 28 46 6f 6e 74 20 81 |   Dir$=|.(Font .|
|000033e0| 20 37 35 29 0d 15 7c 56 | 20 20 20 c8 99 20 22 4f | 75)..|V|   .. "O|
|000033f0| 53 5f 53 70 72 69 74 65 | 4f 70 22 2c 31 30 2b 32 |S_Sprite|Op",10+2|
|00003400| 35 36 2c 53 70 72 74 42 | 6c 6b 2c 22 3c 46 6f 6e |56,SprtB|lk,"<Fon|
|00003410| 74 56 69 65 77 24 44 69 | 72 3e 2e 22 2b 4d 6f 64 |tView$Di|r>."+Mod|
|00003420| 65 44 69 72 24 2b 22 2e | 22 2b 44 69 72 24 2b 22 |eDir$+".|"+Dir$+"|
|00003430| 2e 22 2b c3 28 46 6f 6e | 74 29 0d 15 86 3f 20 20 |."+.(Fon|t)...?  |
|00003440| 20 f2 57 72 69 74 65 49 | 63 6f 6e 54 65 78 74 28 | .WriteI|conText(|
|00003450| 4d 61 69 6e 48 61 6e 64 | 6c 65 2c 4d 61 69 6e 57 |MainHand|le,MainW|
|00003460| 42 6c 6b 2c 35 2c 46 6f | 6e 74 24 28 43 75 72 72 |Blk,5,Fo|nt$(Curr|
|00003470| 65 6e 74 46 6f 6e 74 29 | 29 0d 15 90 06 20 cd 0d |entFont)|).... ..|
|00003480| 15 9a 4d 20 c8 99 20 22 | 57 69 6d 70 5f 46 6f 72 |..M .. "|Wimp_For|
|00003490| 63 65 52 65 64 72 61 77 | 22 2c 4d 61 69 6e 48 61 |ceRedraw|",MainHa|
|000034a0| 6e 64 6c 65 2c 30 2c 2d | 31 30 30 30 30 2c 31 30 |ndle,0,-|10000,10|
|000034b0| 30 30 30 2c 2d 54 6f 70 | 47 61 70 20 3a 20 f4 20 |000,-Top|Gap : . |
|000034c0| 77 61 73 20 2d 56 69 73 | 4d 69 6e 59 0d 15 a4 06 |was -Vis|MinY....|
|000034d0| 20 e1 0d 15 ae 06 20 3a | 0d 15 b8 2d 20 dd f2 53 | ..... :|...- ..S|
|000034e0| 70 72 69 74 65 49 6e 66 | 6f 28 42 6c 6b 2c 4e 61 |priteInf|o(Blk,Na|
|000034f0| 6d 65 24 2c f8 20 57 69 | 64 74 68 2c f8 20 48 65 |me$,. Wi|dth,. He|
|00003500| 69 67 68 74 29 0d 15 c2 | 40 20 c8 99 20 22 4f 53 |ight)...|@ .. "OS|
|00003510| 5f 53 70 72 69 74 65 4f | 70 22 2c 34 30 2b 32 35 |_SpriteO|p",40+25|
|00003520| 36 2c 42 6c 6b 2c 4e 61 | 6d 65 24 20 b8 20 2c 2c |6,Blk,Na|me$ . ,,|
|00003530| 2c 57 69 64 74 68 50 2c | 48 65 69 67 68 74 50 2c |,WidthP,|HeightP,|
|00003540| 2c 4d 6f 64 65 0d 15 cc | 2d 20 c8 99 20 22 4f 53 |,Mode...|- .. "OS|
|00003550| 5f 52 65 61 64 4d 6f 64 | 65 56 61 72 69 61 62 6c |_ReadMod|eVariabl|
|00003560| 65 22 2c 4d 6f 64 65 2c | 34 20 b8 20 2c 2c 58 45 |e",Mode,|4 . ,,XE|
|00003570| 69 67 0d 15 d6 2d 20 c8 | 99 20 22 4f 53 5f 52 65 |ig...- .|. "OS_Re|
|00003580| 61 64 4d 6f 64 65 56 61 | 72 69 61 62 6c 65 22 2c |adModeVa|riable",|
|00003590| 4d 6f 64 65 2c 35 20 b8 | 20 2c 2c 59 45 69 67 0d |Mode,5 .| ,,YEig.|
|000035a0| 15 e0 17 20 57 69 64 74 | 68 3d 57 69 64 74 68 50 |... Widt|h=WidthP|
|000035b0| 3c 3c 58 45 69 67 0d 15 | ea 19 20 48 65 69 67 68 |<<XEig..|.. Heigh|
|000035c0| 74 3d 48 65 69 67 68 74 | 50 3c 3c 59 45 69 67 0d |t=Height|P<<YEig.|
|000035d0| 15 f4 06 20 e1 0d 15 fe | 06 20 3a 0d 16 08 16 20 |... ....|. :.... |
|000035e0| dd f2 52 65 73 69 7a 65 | 4d 61 69 6e 28 57 2c 48 |..Resize|Main(W,H|
|000035f0| 29 0d 16 12 1b 20 57 69 | 6e 64 6f 77 42 6c 6b 21 |).... Wi|ndowBlk!|
|00003600| 30 3d 4d 61 69 6e 48 61 | 6e 64 6c 65 0d 16 1c 27 |0=MainHa|ndle...'|
|00003610| 20 c8 99 20 22 57 69 6d | 70 5f 47 65 74 57 69 6e | .. "Wim|p_GetWin|
|00003620| 64 6f 77 49 6e 66 6f 22 | 2c 2c 57 69 6e 64 6f 77 |dowInfo"|,,Window|
|00003630| 42 6c 6b 0d 16 26 19 20 | 53 63 72 6f 6c 6c 58 3d |Blk..&. |ScrollX=|
|00003640| 57 69 6e 64 6f 77 42 6c | 6b 21 32 30 0d 16 30 19 |WindowBl|k!20..0.|
|00003650| 20 53 63 72 6f 6c 6c 59 | 3d 57 69 6e 64 6f 77 42 | ScrollY|=WindowB|
|00003660| 6c 6b 21 32 34 0d 16 3a | 18 20 57 41 4d 69 6e 58 |lk!24..:|. WAMinX|
|00003670| 3d 57 69 6e 64 6f 77 42 | 6c 6b 21 34 34 0d 16 44 |=WindowB|lk!44..D|
|00003680| 18 20 57 41 4d 69 6e 59 | 3d 57 69 6e 64 6f 77 42 |. WAMinY|=WindowB|
|00003690| 6c 6b 21 34 38 0d 16 4e | 18 20 57 41 4d 61 78 58 |lk!48..N|. WAMaxX|
|000036a0| 3d 57 69 6e 64 6f 77 42 | 6c 6b 21 35 32 0d 16 58 |=WindowB|lk!52..X|
|000036b0| 18 20 57 41 4d 61 78 59 | 3d 57 69 6e 64 6f 77 42 |. WAMaxY|=WindowB|
|000036c0| 6c 6b 21 35 36 0d 16 62 | 18 20 56 69 73 4d 69 6e |lk!56..b|. VisMin|
|000036d0| 58 3d 57 69 6e 64 6f 77 | 42 6c 6b 21 34 0d 16 6c |X=Window|Blk!4..l|
|000036e0| 18 20 56 69 73 4d 69 6e | 59 3d 57 69 6e 64 6f 77 |. VisMin|Y=Window|
|000036f0| 42 6c 6b 21 38 0d 16 76 | 19 20 56 69 73 4d 61 78 |Blk!8..v|. VisMax|
|00003700| 58 3d 57 69 6e 64 6f 77 | 42 6c 6b 21 31 32 0d 16 |X=Window|Blk!12..|
|00003710| 80 19 20 56 69 73 4d 61 | 78 59 3d 57 69 6e 64 6f |.. VisMa|xY=Windo|
|00003720| 77 42 6c 6b 21 31 36 0d | 16 8a 17 20 57 69 6e 64 |wBlk!16.|... Wind|
|00003730| 6f 77 42 6c 6b 21 30 3d | 57 41 4d 69 6e 58 0d 16 |owBlk!0=|WAMinX..|
|00003740| 94 1a 20 57 69 6e 64 6f | 77 42 6c 6b 21 34 3d 2d |.. Windo|wBlk!4=-|
|00003750| 48 2d 54 6f 70 47 61 70 | 0d 16 9e 19 20 57 69 6e |H-TopGap|.... Win|
|00003760| 64 6f 77 42 6c 6b 21 38 | 3d 57 2d 57 41 4d 69 6e |dowBlk!8|=W-WAMin|
|00003770| 58 0d 16 a8 13 20 57 69 | 6e 64 6f 77 42 6c 6b 21 |X.... Wi|ndowBlk!|
|00003780| 31 32 3d 30 0d 16 b2 2d | 20 c8 99 20 22 57 69 6d |12=0...-| .. "Wim|
|00003790| 70 5f 53 65 74 45 78 74 | 65 6e 74 22 2c 4d 61 69 |p_SetExt|ent",Mai|
|000037a0| 6e 48 61 6e 64 6c 65 2c | 57 69 6e 64 6f 77 42 6c |nHandle,|WindowBl|
|000037b0| 6b 0d 16 bc 1b 20 57 69 | 6e 64 6f 77 42 6c 6b 21 |k.... Wi|ndowBlk!|
|000037c0| 30 3d 4d 61 69 6e 48 61 | 6e 64 6c 65 0d 16 c6 18 |0=MainHa|ndle....|
|000037d0| 20 57 69 6e 64 6f 77 42 | 6c 6b 21 34 3d 56 69 73 | WindowB|lk!4=Vis|
|000037e0| 4d 69 6e 58 0d 16 d0 18 | 20 57 69 6e 64 6f 77 42 |MinX....| WindowB|
|000037f0| 6c 6b 21 38 3d 56 69 73 | 4d 69 6e 59 0d 16 da 17 |lk!8=Vis|MinY....|
|00003800| 20 57 69 6e 64 6f 77 42 | 6c 6b 21 31 32 3d 31 30 | WindowB|lk!12=10|
|00003810| 30 30 30 0d 16 e4 19 20 | 57 69 6e 64 6f 77 42 6c |000.... |WindowBl|
|00003820| 6b 21 31 36 3d 56 69 73 | 4d 61 78 59 0d 16 ee 19 |k!16=Vis|MaxY....|
|00003830| 20 57 69 6e 64 6f 77 42 | 6c 6b 21 32 30 3d 53 63 | WindowB|lk!20=Sc|
|00003840| 72 6f 6c 6c 58 0d 16 f8 | 19 20 57 69 6e 64 6f 77 |rollX...|. Window|
|00003850| 42 6c 6b 21 32 34 3d 53 | 63 72 6f 6c 6c 59 0d 17 |Blk!24=S|crollY..|
|00003860| 02 14 20 57 69 6e 64 6f | 77 42 6c 6b 21 32 38 3d |.. Windo|wBlk!28=|
|00003870| 2d 31 0d 17 0c 24 20 c8 | 99 20 22 57 69 6d 70 5f |-1...$ .|. "Wimp_|
|00003880| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 57 69 6e |OpenWind|ow",,Win|
|00003890| 64 6f 77 42 6c 6b 0d 17 | 16 06 20 e1 0d 17 20 06 |dowBlk..|.. ... .|
|000038a0| 20 3a 0d 17 2a 1c 20 dd | a4 65 6e 73 75 72 65 6d | :..*. .|.ensurem|
|000038b0| 65 6d 28 70 74 72 2c 6e | 65 65 64 65 64 29 0d 17 |em(ptr,n|eeded)..|
|000038c0| 34 0f 20 ea 20 6e 65 77 | 68 69 6d 65 6d 0d 17 3e |4. . new|himem..>|
|000038d0| 1e 20 e7 20 70 74 72 2b | 6e 65 65 64 65 64 3c 4d |. . ptr+|needed<M|
|000038e0| 79 48 69 6d 65 6d 20 8c | 20 3d b9 0d 17 48 30 20 |yHimem .| =...H0 |
|000038f0| c8 99 22 57 69 6d 70 5f | 53 6c 6f 74 53 69 7a 65 |.."Wimp_|SlotSize|
|00003900| 22 2c 2d 31 2c 2d 31 20 | b8 20 63 75 72 72 65 6e |",-1,-1 |. curren|
|00003910| 74 2c 6e 65 78 74 2c 66 | 72 65 65 0d 17 52 18 20 |t,next,f|ree..R. |
|00003920| 6e 65 77 68 69 6d 65 6d | 3d 70 74 72 2b 6e 65 65 |newhimem|=ptr+nee|
|00003930| 64 65 64 0d 17 5c 17 20 | 6e 65 77 68 69 6d 65 6d |ded..\. |newhimem|
|00003940| 2b 3d 38 2a 31 30 32 34 | 2d 31 0d 17 66 27 20 6e |+=8*1024|-1..f' n|
|00003950| 65 77 68 69 6d 65 6d 3d | 6e 65 77 68 69 6d 65 6d |ewhimem=|newhimem|
|00003960| 20 80 20 28 ac 20 28 38 | 2a 31 30 32 34 2d 31 29 | . (. (8|*1024-1)|
|00003970| 29 0d 17 70 38 20 e7 20 | 6e 65 77 68 69 6d 65 6d |)..p8 . |newhimem|
|00003980| 2d 4d 79 48 69 6d 65 6d | 3e 66 72 65 65 20 8c 20 |-MyHimem|>free . |
|00003990| 85 20 31 2c 22 4d 65 6d | 6f 72 79 20 63 6c 61 69 |. 1,"Mem|ory clai|
|000039a0| 6d 20 66 61 69 6c 65 64 | 22 0d 17 7a 21 20 6e 65 |m failed|"..z! ne|
|000039b0| 78 74 3d 6e 65 78 74 2d | 28 6e 65 77 68 69 6d 65 |xt=next-|(newhime|
|000039c0| 6d 2d 4d 79 48 69 6d 65 | 6d 29 0d 17 84 27 20 63 |m-MyHime|m)...' c|
|000039d0| 75 72 72 65 6e 74 3d 63 | 75 72 72 65 6e 74 2b 28 |urrent=c|urrent+(|
|000039e0| 6e 65 77 68 69 6d 65 6d | 2d 4d 79 48 69 6d 65 6d |newhimem|-MyHimem|
|000039f0| 29 0d 17 8e 35 20 c8 99 | 22 57 69 6d 70 5f 53 6c |)...5 ..|"Wimp_Sl|
|00003a00| 6f 74 53 69 7a 65 22 2c | 63 75 72 72 65 6e 74 2c |otSize",|current,|
|00003a10| 2d 31 20 b8 20 63 75 72 | 72 65 6e 74 2c 6e 65 78 |-1 . cur|rent,nex|
|00003a20| 74 2c 66 72 65 65 0d 17 | 98 1a 20 4d 79 48 69 6d |t,free..|.. MyHim|
|00003a30| 65 6d 3d 63 75 72 72 65 | 6e 74 2b 26 38 30 30 30 |em=curre|nt+&8000|
|00003a40| 0d 17 a2 07 20 3d b9 0d | 17 ac 06 20 3a 0d 17 b6 |.... =..|... :...|
|00003a50| 13 20 dd f2 52 65 74 75 | 72 6e 4d 65 6d 6f 72 79 |. ..Retu|rnMemory|
|00003a60| 0d 17 c0 10 20 4d 79 48 | 69 6d 65 6d 20 3d 20 93 |.... MyH|imem = .|
|00003a70| 0d 17 ca 21 20 c8 99 22 | 57 69 6d 70 5f 53 6c 6f |...! .."|Wimp_Slo|
|00003a80| 74 53 69 7a 65 22 2c 93 | 2d 26 38 30 30 30 2c 2d |tSize",.|-&8000,-|
|00003a90| 31 0d 17 d4 06 20 e1 0d | ff                      |1.... ..|.       |
+--------+-------------------------+-------------------------+--------+--------+