home *** CD-ROM | disk | FTP | other *** search
open in:
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: ArcFS Archive
(archive/arcFS).
Confidence | Program | Detection | Match Type | Support
|
---|
100%
| dexvert
| ArcFS Archive (archive/arcFS)
| magic
| Supported |
100%
| file
| RISC OS archive (ArcFS format)
| default
| |
99%
| file
| data
| default
| |
100%
| TrID
| Acorn ArcFS Archive
| default
| |
100%
| gt2
| Kopftext: 'Archive'
| default (weak)
| |
100%
| detectItEasy
| Archive: ArcFS
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 20 01 00 00 80 01 00 00 |Archive.| .......|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 4d 61 6e 64 65 6c | 42 00 00 00 ff ff ff ff |.!Mandel|B.......|
|00000070| 45 dc fd ff f5 24 f5 5d | 30 00 00 00 ff ff ff ff |E....$.]|0.......|
|00000080| fc 00 00 80 82 21 42 4f | 4f 54 00 00 20 8d 54 76 |.....!BO|OT.. .Tv|
|00000090| 61 00 00 00 43 eb ff ff | 68 f6 1f d6 03 00 53 8c |a...C...|h.....S.|
|000000a0| 61 00 00 00 24 00 00 00 | 82 21 52 65 61 64 4d 65 |a...$...|.!ReadMe|
|000000b0| 00 8d 54 76 f4 06 00 00 | 44 ff ff ff f3 c7 de 02 |..Tv....|D.......|
|000000c0| 03 00 ce e1 f4 06 00 00 | a9 00 00 00 82 21 52 55 |........|.....!RU|
|000000d0| 4e 00 04 00 20 8d 54 76 | c1 00 00 00 43 eb ff ff |N... .Tv|....C...|
|000000e0| 34 7c 20 d6 03 00 66 c4 | c1 00 00 00 c1 07 00 00 |4| ...f.|........|
|000000f0| 82 21 52 75 6e 49 6d 61 | 67 65 00 76 8a cd 00 00 |.!RunIma|ge.v....|
|00000100| 44 fb ff ff 95 54 df 02 | 03 00 f4 fa 8a cd 00 00 |D....T..|........|
|00000110| a6 08 00 00 82 21 53 50 | 52 49 54 45 53 00 54 76 |.....!SP|RITES.Tv|
|00000120| d8 07 00 00 43 f9 ff ff | 41 59 20 d6 03 00 9e f0 |....C...|AY .....|
|00000130| d8 07 00 00 54 d6 00 00 | 00 64 65 6c 42 00 04 00 |....T...|.delB...|
|00000140| 20 8d 54 76 41 20 8b 20 | f1 27 f6 24 3b 22 20 61 | .TvA . |.'.$;" a|
|00000150| 74 20 6c 69 6e 65 20 22 | 27 76 16 de 00 00 00 00 |t line "|'v......|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 d4 01 00 00 |........|........|
|00000180| 46 69 6c 65 44 61 74 61 | 82 21 42 4f 4f 54 00 00 |FileData|.!BOOT..|
|00000190| 20 8d 54 76 61 00 00 00 | 43 eb ff ff 68 f6 1f d6 | .Tva...|C...h...|
|000001a0| 03 00 53 8c 49 43 4f 4e | 53 50 52 49 54 45 53 20 |..S.ICON|SPRITES |
|000001b0| 3c 4f 42 45 59 24 44 49 | 52 3e 2e 21 53 50 52 49 |<OBEY$DI|R>.!SPRI|
|000001c0| 54 45 53 0a 53 45 54 20 | 46 69 6c 65 24 54 79 70 |TES.SET |File$Typ|
|000001d0| 65 5f 33 45 39 20 46 72 | 61 63 74 61 6c 0a 53 45 |e_3E9 Fr|actal.SE|
|000001e0| 54 20 41 6c 69 61 73 24 | 40 52 75 6e 54 79 70 65 |T Alias$|@RunType|
|000001f0| 5f 33 45 39 20 72 75 6e | 20 3c 4f 62 65 79 24 44 |_3E9 run| <Obey$D|
|00000200| 69 72 3e 20 0a 46 69 6c | 65 44 61 74 61 82 21 52 |ir> .Fil|eData.!R|
|00000210| 65 61 64 4d 65 00 8d 54 | 76 f4 06 00 00 44 ff ff |eadMe..T|v....D..|
|00000220| ff f3 c7 de 02 03 00 ce | e1 3e 20 21 4d 61 6e 64 |........|.> !Mand|
|00000230| 65 6c 42 2e 21 52 65 61 | 64 4d 65 20 20 20 20 20 |elB.!Rea|dMe |
|00000240| 20 20 20 20 20 20 20 20 | 20 20 32 35 2d 30 37 2d | | 25-07-|
|00000250| 39 32 0a 0a 54 68 69 73 | 20 4d 61 6e 64 65 6c 62 |92..This| Mandelb|
|00000260| 72 6f 74 20 70 72 6f 67 | 72 61 6d 20 75 73 65 73 |rot prog|ram uses|
|00000270| 20 61 20 66 61 73 74 20 | 41 52 4d 2d 63 6f 64 65 | a fast |ARM-code|
|00000280| 20 33 32 2d 42 69 74 20 | 66 69 78 65 64 20 70 6f | 32-Bit |fixed po|
|00000290| 69 6e 74 20 72 6f 75 74 | 69 6e 65 20 61 6e 64 0a |int rout|ine and.|
|000002a0| 6d 75 6c 74 69 74 61 73 | 6b 73 20 69 6e 20 74 68 |multitas|ks in th|
|000002b0| 65 20 64 65 73 6b 74 6f | 70 2e 0a 0a 42 79 20 64 |e deskto|p...By d|
|000002c0| 72 61 67 67 69 6e 67 20 | 61 20 72 65 63 74 61 6e |ragging |a rectan|
|000002d0| 67 6c 65 20 6f 76 65 72 | 20 74 68 65 20 77 69 6e |gle over| the win|
|000002e0| 64 6f 77 2c 20 79 6f 75 | 20 6d 61 79 20 7a 6f 6f |dow, you| may zoo|
|000002f0| 6d 20 69 6e 20 61 20 73 | 70 65 63 69 61 6c 20 70 |m in a s|pecial p|
|00000300| 61 72 74 20 6f 66 0a 74 | 68 65 20 66 72 61 63 74 |art of.t|he fract|
|00000310| 61 6c 2e 20 55 73 65 20 | 27 61 64 6a 75 73 74 20 |al. Use |'adjust |
|00000320| 68 65 69 67 68 74 27 20 | 6f 72 20 27 61 64 6a 75 |height' |or 'adju|
|00000330| 73 74 20 77 69 64 74 68 | 27 20 74 6f 20 61 64 6a |st width|' to adj|
|00000340| 75 73 74 20 74 68 65 20 | 0a 77 69 64 74 68 3a 68 |ust the |.width:h|
|00000350| 65 69 67 68 74 20 72 61 | 74 69 6f 20 74 6f 20 74 |eight ra|tio to t|
|00000360| 68 65 20 73 65 6c 65 63 | 74 65 64 20 72 65 63 74 |he selec|ted rect|
|00000370| 61 6e 67 6c 65 2e 0a 0a | 49 74 20 69 73 20 61 64 |angle...|It is ad|
|00000380| 76 69 73 61 62 6c 65 20 | 74 6f 20 69 6e 63 72 65 |visable |to incre|
|00000390| 61 73 65 20 74 68 65 20 | 76 61 6c 75 65 20 66 6f |ase the |value fo|
|000003a0| 72 20 27 64 65 70 74 68 | 27 20 69 66 20 79 6f 75 |r 'depth|' if you|
|000003b0| 20 7a 6f 6f 6d 20 69 6e | 2c 20 6f 74 68 65 72 77 | zoom in|, otherw|
|000003c0| 69 73 65 0a 74 68 65 20 | 62 6f 72 64 65 72 73 20 |ise.the |borders |
|000003d0| 6f 66 20 74 68 65 20 62 | 6c 61 63 6b 20 4d 61 6e |of the b|lack Man|
|000003e0| 64 65 6c 62 72 6f 74 20 | 61 72 65 61 20 61 72 65 |delbrot |area are|
|000003f0| 20 6e 6f 74 20 61 63 63 | 75 72 61 74 65 2e 0a 0a | not acc|urate...|
|00000400| 4e 6f 74 65 20 74 68 61 | 74 20 79 6f 75 20 6d 61 |Note tha|t you ma|
|00000410| 79 20 73 61 76 65 20 61 | 20 68 61 6c 66 2d 66 69 |y save a| half-fi|
|00000420| 6e 69 73 68 65 64 20 66 | 72 61 63 74 61 6c 20 61 |nished f|ractal a|
|00000430| 6e 64 20 72 65 2d 6c 6f | 61 64 20 69 74 20 61 6e |nd re-lo|ad it an|
|00000440| 64 20 63 6f 6e 74 69 6e | 75 65 0a 6c 61 74 65 72 |d contin|ue.later|
|00000450| 2e 0a 0a 43 79 63 6c 65 | 20 63 6f 6c 27 73 20 6d |...Cycle| col's m|
|00000460| 65 61 6e 73 20 74 68 61 | 74 20 74 68 65 20 63 6f |eans tha|t the co|
|00000470| 6c 6f 75 72 20 6f 66 20 | 61 6c 6c 20 70 69 78 65 |lour of |all pixe|
|00000480| 6c 73 20 61 72 65 20 69 | 6e 63 72 65 61 73 65 64 |ls are i|ncreased|
|00000490| 20 28 31 2d 2d 3e 32 2c | 20 32 2d 2d 3e 33 2c 0a | (1-->2,| 2-->3,.|
|000004a0| 2e 2e 2e 20 32 35 35 2d | 2d 3e 31 2c 20 30 20 73 |... 255-|->1, 0 s|
|000004b0| 74 61 79 73 20 30 29 2e | 20 54 68 69 73 20 69 73 |tays 0).| This is|
|000004c0| 20 6e 6f 74 20 73 75 70 | 70 6f 73 65 64 20 74 6f | not sup|posed to|
|000004d0| 20 62 65 20 75 73 65 64 | 20 61 73 20 73 6f 6d 65 | be used| as some|
|000004e0| 20 6b 69 6e 64 20 6f 66 | 0a 61 6e 69 6d 61 74 65 | kind of|.animate|
|000004f0| 64 20 65 66 66 65 63 74 | 20 62 75 74 20 6a 75 73 |d effect| but jus|
|00000500| 74 20 74 6f 20 63 68 6f | 6f 73 65 20 61 6e 20 61 |t to cho|ose an a|
|00000510| 70 70 72 6f 70 72 69 61 | 74 65 20 73 65 74 20 6f |ppropria|te set o|
|00000520| 66 20 63 6f 6c 6f 75 72 | 73 20 62 65 66 6f 72 65 |f colour|s before|
|00000530| 0a 73 61 76 69 6e 67 20 | 74 68 65 20 70 69 63 74 |.saving |the pict|
|00000540| 75 72 65 20 61 73 20 73 | 70 72 69 74 65 2e 20 4e |ure as s|prite. N|
|00000550| 6f 74 65 20 74 68 61 74 | 20 75 73 69 6e 67 20 74 |ote that| using t|
|00000560| 68 69 73 20 6f 70 74 69 | 6f 6e 20 77 68 69 6c 65 |his opti|on while|
|00000570| 20 74 68 65 20 70 69 63 | 74 75 72 65 0a 69 73 20 | the pic|ture.is |
|00000580| 6e 6f 74 20 79 65 74 20 | 72 65 61 64 79 20 63 61 |not yet |ready ca|
|00000590| 75 73 65 73 20 74 68 65 | 20 70 61 74 74 65 72 6e |uses the| pattern|
|000005a0| 73 20 74 6f 20 67 65 74 | 20 6f 75 74 20 6f 66 20 |s to get| out of |
|000005b0| 73 79 6e 63 2e 0a 0a 54 | 68 65 20 66 69 6c 65 74 |sync...T|he filet|
|000005c0| 79 70 65 20 66 6f 72 20 | 46 72 61 63 74 61 6c 73 |ype for |Fractals|
|000005d0| 20 69 73 20 26 33 45 39 | 2e 20 53 6f 72 72 79 2c | is &3E9|. Sorry,|
|000005e0| 20 74 68 69 73 20 69 73 | 20 6e 6f 74 20 61 6c 6c | this is| not all|
|000005f0| 6f 63 61 74 65 64 2c 20 | 73 6f 20 74 68 65 72 65 |ocated, |so there|
|00000600| 0a 6d 69 67 68 74 20 62 | 65 20 63 6c 61 73 68 65 |.might b|e clashe|
|00000610| 73 2e 20 4f 6c 64 65 72 | 20 76 65 72 73 69 6f 6e |s. Older| version|
|00000620| 73 20 75 73 65 64 20 66 | 69 6c 65 74 79 70 65 20 |s used f|iletype |
|00000630| 26 35 46 34 20 77 68 69 | 63 68 20 69 73 20 61 6c |&5F4 whi|ch is al|
|00000640| 72 65 61 64 79 0a 75 73 | 65 64 20 62 79 20 53 70 |ready.us|ed by Sp|
|00000650| 61 72 6b 2e 20 54 68 65 | 73 65 20 66 69 6c 65 73 |ark. The|se files|
|00000660| 20 63 61 6e 20 73 74 69 | 6c 6c 20 62 65 20 6c 6f | can sti|ll be lo|
|00000670| 61 64 65 64 2c 20 62 75 | 74 20 61 72 65 20 6e 6f |aded, bu|t are no|
|00000680| 74 20 72 65 63 6f 67 6e | 69 7a 65 64 0a 69 66 20 |t recogn|ized.if |
|00000690| 64 6f 75 62 6c 65 2d 63 | 6c 69 63 6b 65 64 2e 20 |double-c|licked. |
|000006a0| 4c 6f 61 64 20 74 68 65 | 6d 20 61 6e 64 20 73 61 |Load the|m and sa|
|000006b0| 76 65 20 74 68 65 6d 20 | 61 67 61 69 6e 20 74 6f |ve them |again to|
|000006c0| 20 73 65 74 20 74 68 65 | 69 72 20 66 69 6c 65 74 | set the|ir filet|
|000006d0| 79 70 65 0a 74 6f 20 26 | 33 45 39 20 28 49 20 68 |ype.to &|3E9 (I h|
|000006e0| 6f 70 65 2c 20 49 20 68 | 61 76 65 20 6d 6f 72 65 |ope, I h|ave more|
|000006f0| 20 6c 75 63 6b 20 74 68 | 69 73 20 74 69 6d 65 29 | luck th|is time)|
|00000700| 2e 20 42 79 20 74 68 65 | 20 77 61 79 3a 20 48 6f |. By the| way: Ho|
|00000710| 77 20 64 6f 20 49 20 67 | 65 74 0a 66 69 6c 65 74 |w do I g|et.filet|
|00000720| 79 70 65 73 20 66 6f 72 | 20 50 44 20 70 72 6f 67 |ypes for| PD prog|
|00000730| 72 61 6d 73 20 3f 20 57 | 72 69 74 65 20 6d 65 2c |rams ? W|rite me,|
|00000740| 20 69 66 20 79 6f 75 20 | 6b 6e 6f 77 20 21 0a 0a | if you |know !..|
|00000750| 42 79 20 73 70 65 63 69 | 66 79 69 6e 67 20 61 20 |By speci|fying a |
|00000760| 68 69 67 68 65 72 20 6e | 75 6d 62 65 72 20 69 6e |higher n|umber in|
|00000770| 20 74 68 65 20 43 6f 6e | 66 69 67 75 72 65 2d 3e | the Con|figure->|
|00000780| 54 69 6d 65 20 73 68 61 | 72 65 20 65 6e 74 72 79 |Time sha|re entry|
|00000790| 2c 20 79 6f 75 20 67 69 | 76 65 0a 4d 61 6e 64 65 |, you gi|ve.Mande|
|000007a0| 6c 42 20 61 20 68 69 67 | 68 65 72 20 70 72 69 6f |lB a hig|her prio|
|000007b0| 72 69 74 79 20 69 6e 20 | 62 61 63 6b 67 72 6f 75 |rity in |backgrou|
|000007c0| 6e 64 20 70 72 6f 63 65 | 73 73 69 6e 67 2e 20 48 |nd proce|ssing. H|
|000007d0| 6f 77 65 76 65 72 2c 20 | 74 68 69 73 20 73 6c 6f |owever, |this slo|
|000007e0| 77 73 20 64 6f 77 6e 0a | 6f 74 68 65 72 20 74 61 |ws down.|other ta|
|000007f0| 73 6b 73 2e 0a 0a 54 68 | 69 73 20 70 72 6f 67 72 |sks...Th|is progr|
|00000800| 61 6d 20 69 73 20 66 72 | 65 65 77 61 72 65 2c 20 |am is fr|eeware, |
|00000810| 69 2e 65 2e 20 69 74 20 | 6d 61 79 20 62 65 20 63 |i.e. it |may be c|
|00000820| 6f 70 69 65 64 20 66 72 | 65 65 6c 79 2c 20 70 72 |opied fr|eely, pr|
|00000830| 6f 76 69 64 65 64 20 74 | 68 61 74 20 6e 6f 0a 70 |ovided t|hat no.p|
|00000840| 61 72 74 20 6f 66 20 69 | 74 20 69 73 20 63 68 61 |art of i|t is cha|
|00000850| 6e 67 65 64 20 61 6e 64 | 20 74 68 61 74 20 69 74 |nged and| that it|
|00000860| 20 69 73 20 6e 6f 74 20 | 73 6f 6c 64 20 66 6f 72 | is not |sold for|
|00000870| 20 70 72 6f 66 69 74 2e | 0a 0a a9 20 31 39 39 31 | profit.|... 1991|
|00000880| 2c 20 31 39 39 32 2c 20 | 4d 61 72 74 69 6e 20 57 |, 1992, |Martin W|
|00000890| 75 65 72 74 68 6e 65 72 | 0a 20 20 20 20 20 20 20 |uerthner|. |
|000008a0| 20 20 20 20 20 20 20 4a | 61 68 6e 73 74 72 61 73 | J|ahnstras|
|000008b0| 73 65 20 31 38 0a 20 20 | 20 20 20 20 20 20 20 20 |se 18. | |
|000008c0| 20 20 20 20 37 30 33 34 | 20 47 61 65 72 74 72 69 | 7034| Gaertri|
|000008d0| 6e 67 65 6e 0a 20 20 20 | 20 20 20 20 20 20 20 20 |ngen. | |
|000008e0| 20 20 20 28 2b 34 39 29 | 20 37 30 33 34 2f 32 39 | (+49)| 7034/29|
|000008f0| 32 36 32 0a 20 20 20 20 | 20 20 20 20 0a 20 20 20 |262. | . |
|00000900| 20 20 20 20 20 20 20 20 | 20 20 20 28 47 65 72 6d | | (Germ|
|00000910| 61 6e 79 29 0a 20 20 20 | 20 20 20 20 20 46 69 6c |any). | Fil|
|00000920| 65 44 61 74 61 82 21 52 | 55 4e 00 04 00 20 8d 54 |eData.!R|UN... .T|
|00000930| 76 c1 00 00 00 43 eb ff | ff 34 7c 20 d6 03 00 66 |v....C..|.4| ...f|
|00000940| c4 57 49 4d 50 53 4c 4f | 54 20 31 32 38 4b 20 31 |.WIMPSLO|T 128K 1|
|00000950| 32 38 4b 0a 57 49 4d 50 | 53 4c 4f 54 20 38 30 4b |28K.WIMP|SLOT 80K|
|00000960| 20 38 30 4b 0a 53 45 54 | 20 4d 61 6e 64 65 6c 24 | 80K.SET| Mandel$|
|00000970| 44 69 72 20 3c 4f 62 65 | 79 24 44 69 72 3e 0a 49 |Dir <Obe|y$Dir>.I|
|00000980| 43 4f 4e 53 50 52 49 54 | 45 53 20 3c 4d 61 6e 64 |CONSPRIT|ES <Mand|
|00000990| 65 6c 24 44 49 52 3e 2e | 21 53 50 52 49 54 45 53 |el$DIR>.|!SPRITES|
|000009a0| 0a 53 45 54 20 46 69 6c | 65 24 54 79 70 65 5f 33 |.SET Fil|e$Type_3|
|000009b0| 45 39 20 46 72 61 63 74 | 61 6c 0a 53 45 54 20 41 |E9 Fract|al.SET A|
|000009c0| 6c 69 61 73 24 40 52 75 | 6e 54 79 70 65 5f 33 45 |lias$@Ru|nType_3E|
|000009d0| 39 20 72 75 6e 20 3c 4d | 61 6e 64 65 6c 24 44 69 |9 run <M|andel$Di|
|000009e0| 72 3e 20 0a 52 55 4e 20 | 3c 4d 61 6e 64 65 6c 24 |r> .RUN |<Mandel$|
|000009f0| 44 69 72 3e 2e 21 52 75 | 6e 49 6d 61 67 65 20 25 |Dir>.!Ru|nImage %|
|00000a00| 2a 30 46 69 6c 65 44 61 | 74 61 82 21 52 75 6e 49 |*0FileDa|ta.!RunI|
|00000a10| 6d 61 67 65 00 76 8a cd | 00 00 44 fb ff ff 95 54 |mage.v..|..D....T|
|00000a20| df 02 03 00 f4 fa 0d 00 | 0a 3c f4 20 3e 20 73 63 |........|.<. > sc|
|00000a30| 73 69 3a 3a 53 43 53 49 | 44 69 73 63 2e 24 2e 44 |si::SCSI|Disc.$.D|
|00000a40| 65 76 65 6c 6f 70 2e 46 | 72 61 63 74 61 6c 73 2e |evelop.F|ractals.|
|00000a50| 21 4d 61 6e 64 65 6c 42 | 2e 21 52 75 6e 49 6d 61 |!MandelB|.!RunIma|
|00000a60| 67 65 0d 00 14 04 0d 00 | 1e 1d f4 20 41 75 74 68 |ge......|... Auth|
|00000a70| 6f 72 3a 20 4d 61 72 74 | 69 6e 20 57 fc 72 74 68 |or: Mart|in W.rth|
|00000a80| 6e 65 72 0d 00 28 1b f4 | 20 20 20 20 20 20 20 20 |ner..(..| |
|00000a90| 20 4a 61 68 6e 73 74 72 | 61 df 65 20 31 38 0d 00 | Jahnstr|a.e 18..|
|00000aa0| 32 28 f4 20 20 20 20 20 | 20 20 20 20 37 30 33 34 |2(. | 7034|
|00000ab0| 20 47 e4 72 74 72 69 6e | 67 65 6e 20 20 28 47 65 | G.rtrin|gen (Ge|
|00000ac0| 72 6d 61 6e 79 29 0d 00 | 3c 05 f4 0d 00 46 1f f4 |rmany)..|<....F..|
|00000ad0| 20 20 20 20 20 20 20 20 | 20 54 65 6c 2e 3a 20 30 | | Tel.: 0|
|00000ae0| 37 30 33 34 2f 32 39 32 | 36 32 0d 00 50 05 f4 0d |7034/292|62..P...|
|00000af0| 00 5a 1e f4 20 54 68 69 | 73 20 70 72 6f 67 72 61 |.Z.. Thi|s progra|
|00000b00| 6d 20 69 73 20 46 72 65 | 65 77 61 72 65 0d 00 64 |m is Fre|eware..d|
|00000b10| 05 f4 0d 00 6e 04 0d 00 | 78 2c ee 20 85 3a f1 20 |....n...|x,. .:. |
|00000b20| f6 24 3b 22 20 28 69 6e | 74 65 72 6e 61 6c 20 65 |.$;" (in|ternal e|
|00000b30| 72 72 6f 72 20 63 6f 64 | 65 20 22 3b 9e 22 29 22 |rror cod|e ";.")"|
|00000b40| 3a e0 0d 00 82 38 63 6f | 64 65 6c 65 6e 25 3d 32 |:....8co|delen%=2|
|00000b50| 30 30 3a 63 6f 64 65 32 | 6c 65 6e 25 3d 34 30 30 |00:code2|len%=400|
|00000b60| 3a 63 6f 64 65 34 6c 65 | 6e 25 3d 31 30 30 30 3a |:code4le|n%=1000:|
|00000b70| 77 6c 65 6e 25 3d 32 38 | 30 30 0d 00 8c 1a 62 75 |wlen%=28|00....bu|
|00000b80| 66 66 6c 65 6e 25 3d 35 | 35 30 3a 71 6c 65 6e 25 |fflen%=5|50:qlen%|
|00000b90| 3d 31 30 30 0d 00 96 3d | de 20 4d 45 4e 55 25 20 |=100...=|. MENU% |
|00000ba0| 32 30 30 30 3a de 20 42 | 55 46 46 25 20 62 75 66 |2000:. B|UFF% buf|
|00000bb0| 66 6c 65 6e 25 2c 20 42 | 55 46 46 45 52 25 20 31 |flen%, B|UFFER% 1|
|00000bc0| 30 30 30 2c 20 4f 50 54 | 42 55 46 46 25 20 31 30 |000, OPT|BUFF% 10|
|00000bd0| 30 0d 00 a0 1e de 20 57 | 49 4e 44 4f 57 53 25 20 |0..... W|INDOWS% |
|00000be0| 77 6c 65 6e 25 2c 20 51 | 25 20 71 6c 65 6e 25 0d |wlen%, Q|% qlen%.|
|00000bf0| 00 aa 36 de 20 63 6f 64 | 65 25 20 63 6f 64 65 6c |..6. cod|e% codel|
|00000c00| 65 6e 25 2c 63 6f 64 65 | 32 25 20 63 6f 64 65 32 |en%,code|2% code2|
|00000c10| 6c 65 6e 25 2c 63 6f 64 | 65 34 25 20 63 6f 64 65 |len%,cod|e4% code|
|00000c20| 34 6c 65 6e 25 0d 00 b4 | 04 0d 00 c8 04 0d 00 d2 |4len%...|........|
|00000c30| 12 54 41 53 4b 3d 26 34 | 42 35 33 34 31 35 34 0d |.TASK=&4|B534154.|
|00000c40| 00 dc 3d c8 99 20 22 57 | 69 6d 70 5f 49 6e 69 74 |..=.. "W|imp_Init|
|00000c50| 69 61 6c 69 73 65 22 2c | 32 30 30 2c 54 41 53 4b |ialise",|200,TASK|
|00000c60| 2c 22 4d 61 6e 64 65 6c | 62 72 6f 74 22 20 b8 20 |,"Mandel|brot" . |
|00000c70| 54 41 53 4b 5f 48 41 4e | 44 4c 45 25 0d 00 e6 1b |TASK_HAN|DLE%....|
|00000c80| ee 20 85 20 f2 65 72 72 | 6f 72 62 6f 78 3a f2 66 |. . .err|orbox:.f|
|00000c90| 69 6e 69 73 68 3a e0 0d | 00 f0 04 0d 00 fa 21 4d |inish:..|......!M|
|00000ca0| 41 4e 44 45 4c 25 3d 93 | 3a 48 53 49 5a 45 3d 33 |ANDEL%=.|:HSIZE=3|
|00000cb0| 32 30 3a 56 53 49 5a 45 | 3d 31 32 38 0d 00 fc 0e |20:VSIZE|=128....|
|00000cc0| f2 61 73 73 65 6d 62 6c | 65 32 0d 01 04 04 0d 01 |.assembl|e2......|
|00000cd0| 0e 20 69 63 6f 6e 5f 68 | 25 3d a4 69 63 6f 6e 62 |. icon_h|%=.iconb|
|00000ce0| 61 72 28 22 21 6d 61 6e | 64 65 6c 62 22 29 0d 01 |ar("!man|delb")..|
|00000cf0| 18 04 0d 01 22 18 c8 99 | 20 22 4f 53 5f 47 65 74 |...."...| "OS_Get|
|00000d00| 45 6e 76 22 20 b8 20 45 | 56 24 0d 01 2c 09 46 24 |Env" . E|V$..,.F$|
|00000d10| 3d 22 22 0d 01 36 17 e7 | 20 a7 45 56 24 2c 22 20 |=""..6..| .EV$," |
|00000d20| 2d 71 75 69 74 20 22 29 | 20 8c 0d 01 40 12 20 50 |-quit ")| ...@. P|
|00000d30| 50 3d a7 45 56 24 2c 22 | 22 22 22 29 0d 01 4a 17 |P=.EV$,"|""")..J.|
|00000d40| 20 50 50 3d a7 45 56 24 | 2c 22 22 22 22 2c 50 50 | PP=.EV$|,"""",PP|
|00000d50| 2b 31 29 0d 01 54 06 20 | f5 0d 01 5e 0b 20 20 50 |+1)..T. |...^. P|
|00000d60| 50 2b 3d 31 0d 01 68 15 | 20 fd c1 45 56 24 2c 50 |P+=1..h.| ..EV$,P|
|00000d70| 50 2c 31 29 3c 3e 22 20 | 22 0d 01 72 10 20 46 24 |P,1)<>" |"..r. F$|
|00000d80| 3d c1 45 56 24 2c 50 50 | 29 0d 01 7c 05 cd 0d 01 |=.EV$,PP|)..|....|
|00000d90| 86 04 0d 01 90 0c f2 62 | 75 66 66 65 72 73 0d 01 |.......b|uffers..|
|00000da0| 9a 18 57 69 6d 70 24 3d | 22 3c 57 69 6d 70 24 53 |..Wimp$=|"<Wimp$S|
|00000db0| 63 72 61 70 3e 22 0d 01 | a4 29 46 72 61 63 74 61 |crap>"..|.)Fracta|
|00000dc0| 6c 54 79 70 65 31 3d 26 | 35 46 34 3a 46 72 61 63 |lType1=&|5F4:Frac|
|00000dd0| 74 61 6c 54 79 70 65 31 | 24 3d 22 35 46 34 22 0d |talType1|$="5F4".|
|00000de0| 01 ae 29 46 72 61 63 74 | 61 6c 54 79 70 65 32 3d |..)Fract|alType2=|
|00000df0| 26 33 45 39 3a 46 72 61 | 63 74 61 6c 54 79 70 65 |&3E9:Fra|ctalType|
|00000e00| 32 24 3d 22 33 45 39 22 | 0d 01 b8 41 56 65 72 73 |2$="3E9"|...AVers|
|00000e10| 69 6f 6e 24 3d 22 31 2e | 30 37 22 3a 46 69 6c 65 |ion$="1.|07":File|
|00000e20| 56 65 72 73 69 6f 6e 24 | 3d 22 30 30 30 22 3a 56 |Version$|="000":V|
|00000e30| 65 72 73 69 6f 6e 44 61 | 74 65 24 3d 22 32 35 2d |ersionDa|te$="25-|
|00000e40| 4a 75 6c 2d 31 39 39 32 | 22 0d 01 c2 04 0d 01 cc |Jul-1992|".......|
|00000e50| 04 0d 01 d6 20 52 43 3d | 30 3a 43 48 41 3d a3 3a |.... RC=|0:CHA=.:|
|00000e60| 54 49 54 24 3d 22 3c 75 | 6e 74 69 74 6c 65 64 3e |TIT$="<u|ntitled>|
|00000e70| 22 0d 01 e0 2b 44 49 53 | 50 4c 41 59 3d b9 3a 43 |"...+DIS|PLAY=.:C|
|00000e80| 41 4c 43 55 4c 41 54 45 | 3d a3 3a 43 41 4c 43 55 |ALCULATE|=.:CALCU|
|00000e90| 4c 41 54 45 44 3d a3 3a | 48 47 3d a3 0d 01 ea 20 |LATED=.:|HG=.... |
|00000ea0| 57 69 6e 64 6f 77 4f 70 | 65 6e 3d a3 3a 57 69 6e |WindowOp|en=.:Win|
|00000eb0| 64 6f 77 43 72 65 61 74 | 65 64 3d a3 0d 01 f4 2f |dowCreat|ed=..../|
|00000ec0| 5a 4f 4f 4d 42 4f 58 3d | a3 3a 53 56 42 4f 58 3d |ZOOMBOX=|.:SVBOX=|
|00000ed0| a3 3a 53 41 56 49 4e 47 | 3d a3 3a 41 77 61 69 74 |.:SAVING|=.:Await|
|00000ee0| 41 63 6b 3d a3 3a 41 43 | 4b 3d a3 0d 01 fe 18 44 |Ack=.:AC|K=.....D|
|00000ef0| 45 4c 53 43 52 41 50 3d | a3 3a 41 50 50 4c 4f 41 |ELSCRAP=|.:APPLOA|
|00000f00| 44 3d a3 0d 02 08 1d 54 | 53 48 41 52 45 3d 31 30 |D=.....T|SHARE=10|
|00000f10| 3a 48 5a 4f 4f 4d 3d 31 | 3a 56 5a 4f 4f 4d 3d 31 |:HZOOM=1|:VZOOM=1|
|00000f20| 0d 02 12 33 f2 72 65 61 | 64 76 64 75 69 6e 66 6f |...3.rea|dvduinfo|
|00000f30| 28 a3 29 3a 58 50 46 25 | 3d 48 46 41 4b 2a 48 5a |(.):XPF%|=HFAK*HZ|
|00000f40| 4f 4f 4d 3a 59 50 46 25 | 3d 56 46 41 4b 2a 56 5a |OOM:YPF%|=VFAK*VZ|
|00000f50| 4f 4f 4d 0d 02 1c 2d 48 | 53 49 5a 45 4e 3d 48 53 |OOM...-H|SIZEN=HS|
|00000f60| 49 5a 45 3a 56 53 49 5a | 45 4e 3d 56 53 49 5a 45 |IZE:VSIZ|EN=VSIZE|
|00000f70| 3a 43 4c 46 4c 47 3d b9 | 3a 43 53 49 5a 45 3d a3 |:CLFLG=.|:CSIZE=.|
|00000f80| 0d 02 26 2f 53 53 50 5a | 3d b9 3a 43 53 41 56 45 |..&/SSPZ|=.:CSAVE|
|00000f90| 3d b9 3a 54 41 4c 4c 3d | 51 25 3a 44 57 49 4e 44 |=.:TALL=|Q%:DWIND|
|00000fa0| 3d a3 3a 6f 5f 68 61 6e | 64 6c 65 25 3d 2d 31 0d |=.:o_han|dle%=-1.|
|00000fb0| 02 30 04 0d 02 3a 1a f2 | 69 6e 69 74 69 61 6c 69 |.0...:..|initiali|
|00000fc0| 73 65 5f 69 6e 66 6f 77 | 69 6e 64 6f 77 0d 02 44 |se_infow|indow..D|
|00000fd0| 1c f2 69 6e 69 74 69 61 | 6c 69 73 65 5f 76 61 6c |..initia|lise_val|
|00000fe0| 75 65 77 69 6e 64 6f 77 | 73 0d 02 4e 1c f2 69 6e |uewindow|s..N..in|
|00000ff0| 69 74 69 61 6c 69 73 65 | 5f 73 70 73 61 76 65 77 |itialise|_spsavew|
|00001000| 69 6e 64 6f 77 0d 02 58 | 3b f2 69 6e 69 74 69 61 |indow..X|;.initia|
|00001010| 6c 69 73 65 5f 73 61 76 | 65 77 69 6e 64 6f 77 28 |lise_sav|ewindow(|
|00001020| 22 66 69 6c 65 5f 22 2b | 46 72 61 63 74 61 6c 54 |"file_"+|FractalT|
|00001030| 79 70 65 32 24 2c 73 61 | 76 65 62 75 66 66 25 29 |ype2$,sa|vebuff%)|
|00001040| 0d 02 62 0f 57 49 4e 32 | 25 3d 57 49 4e 34 25 0d |..b.WIN2|%=WIN4%.|
|00001050| 02 6c 19 f2 69 6e 69 74 | 69 61 6c 69 73 65 5f 6d |.l..init|ialise_m|
|00001060| 65 6e 75 5f 74 72 65 65 | 0d 02 76 14 f2 69 6e 69 |enu_tree|..v..ini|
|00001070| 74 69 61 6c 69 73 65 5f | 63 61 6c 63 0d 02 80 0d |tialise_|calc....|
|00001080| 46 41 43 41 55 54 4f 3d | 31 0d 02 8a 3d 5a 4f 4f |FACAUTO=|1...=ZOO|
|00001090| 4d 41 55 54 4f 3d b9 3a | f2 73 65 74 28 22 41 75 |MAUTO=.:|.set("Au|
|000010a0| 74 6f 22 2c 4d 45 4e 55 | 25 2c 30 2c 30 29 3a f2 |to",MENU|%,0,0):.|
|000010b0| 73 65 74 28 22 5a 6f 6f | 6d 22 2c 4d 45 4e 55 25 |set("Zoo|m",MENU%|
|000010c0| 2c 38 2c 32 32 29 0d 02 | 94 1b f2 73 65 74 28 22 |,8,22)..|...set("|
|000010d0| 53 61 76 65 22 2c 4d 45 | 4e 55 25 2c 38 2c 32 32 |Save",ME|NU%,8,22|
|000010e0| 29 0d 02 9e 13 f2 72 65 | 61 64 76 64 75 69 6e 66 |).....re|advduinf|
|000010f0| 6f 28 b9 29 0d 02 a8 04 | 0d 02 b2 43 f4 20 74 68 |o(.)....|...C. th|
|00001100| 65 20 70 72 6f 67 72 61 | 6d 20 77 69 6c 6c 20 6a |e progra|m will j|
|00001110| 75 6d 70 20 74 6f 20 74 | 68 69 73 20 6c 69 6e 65 |ump to t|his line|
|00001120| 20 77 68 65 6e 65 76 65 | 72 20 6d 65 6d 6f 72 79 | wheneve|r memory|
|00001130| 20 61 6c 6c 6f 63 61 74 | 69 6f 6e 0d 02 bc 16 f4 | allocat|ion.....|
|00001140| 20 69 73 20 74 6f 20 62 | 65 20 63 68 61 6e 67 65 | is to b|e change|
|00001150| 64 0d 02 c6 04 0d 02 d0 | 20 6d 61 6e 64 65 6c 6d |d.......| mandelm|
|00001160| 61 78 25 3d 48 53 49 5a | 45 4e 2a 56 53 49 5a 45 |ax%=HSIZ|EN*VSIZE|
|00001170| 4e 2b 35 31 32 0d 02 da | 0c 4f 4c 44 48 49 25 3d |N+512...|.OLDHI%=|
|00001180| 93 0d 02 e4 04 0d 02 ee | 3b e0 3d 4d 41 4e 44 45 |........|;.=MANDE|
|00001190| 4c 25 2b 6d 61 6e 64 65 | 6c 6d 61 78 25 2b 31 30 |L%+mande|lmax%+10|
|000011a0| 32 34 20 3a f4 20 61 6c | 6c 6f 63 61 74 69 6f 6e |24 :. al|location|
|000011b0| 20 6f 66 20 65 78 74 72 | 61 20 6d 65 6d 6f 72 79 | of extr|a memory|
|000011c0| 0d 02 f8 04 0d 03 02 21 | e7 20 93 3c 4d 41 4e 44 |.......!|. .<MAND|
|000011d0| 45 4c 25 2b 6d 61 6e 64 | 65 6c 6d 61 78 25 2b 31 |EL%+mand|elmax%+1|
|000011e0| 30 32 34 20 8c 0d 03 0c | 1c 20 f4 20 61 6c 6c 6f |024 ....|. . allo|
|000011f0| 63 61 74 69 6f 6e 20 68 | 61 73 20 66 61 69 6c 65 |cation h|as faile|
|00001200| 64 0d 03 16 3e 20 f2 65 | 72 72 65 70 6f 72 74 28 |d...> .e|rreport(|
|00001210| 22 4d 61 6e 64 65 6c 62 | 72 6f 74 20 68 61 73 20 |"Mandelb|rot has |
|00001220| 72 75 6e 20 6f 75 74 20 | 6f 66 20 72 6f 6f 6d 22 |run out |of room"|
|00001230| 29 3a 46 24 3d 22 22 3a | 43 4c 46 4c 47 3d a3 0d |):F$="":|CLFLG=..|
|00001240| 03 20 28 20 e0 3d 4f 4c | 44 48 49 25 3a 6d 61 6e |. ( .=OL|DHI%:man|
|00001250| 64 65 6c 6d 61 78 25 3d | 48 53 49 5a 45 2a 56 53 |delmax%=|HSIZE*VS|
|00001260| 49 5a 45 2b 35 31 32 0d | 03 2a 05 cc 0d 03 34 1c |IZE+512.|.*....4.|
|00001270| 20 f4 20 73 75 63 63 65 | 73 73 66 75 6c 20 61 6c | . succe|ssful al|
|00001280| 6c 6f 63 61 74 69 6f 6e | 0d 03 3e 32 20 48 53 49 |location|..>2 HSI|
|00001290| 5a 45 3d 48 53 49 5a 45 | 4e 3a 56 53 49 5a 45 3d |ZE=HSIZE|N:VSIZE=|
|000012a0| 56 53 49 5a 45 4e 3a 21 | 63 79 63 61 64 72 3d 4d |VSIZEN:!|cycadr=M|
|000012b0| 41 4e 44 45 4c 25 2b 35 | 31 32 0d 03 48 1d 20 e7 |ANDEL%+5|12..H. .|
|000012c0| 20 43 53 49 5a 45 20 8c | 20 f2 65 6e 64 5f 6f 66 | CSIZE .| .end_of|
|000012d0| 5f 63 68 61 6e 67 65 0d | 03 52 05 cd 0d 03 5c 04 |_change.|.R....\.|
|000012e0| 0d 03 66 1b ee 20 85 20 | f2 65 72 72 6f 72 62 6f |..f.. . |.errorbo|
|000012f0| 78 3a f2 66 69 6e 69 73 | 68 3a e0 0d 03 70 04 0d |x:.finis|h:...p..|
|00001300| 03 7a 0e e7 20 46 24 3c | 3e 22 22 20 8c 0d 03 84 |.z.. F$<|>"" ....|
|00001310| 1b 20 e7 20 ac 20 a4 6c | 6f 61 64 20 8c 20 f2 63 |. . . .l|oad . .c|
|00001320| 6c 65 61 72 5f 61 6c 6c | 0d 03 8e 0c 20 e7 20 41 |lear_all|.... . A|
|00001330| 43 4b 20 8c 0d 03 98 24 | 20 20 21 42 55 46 46 45 |CK ....$| !BUFFE|
|00001340| 52 25 3d 32 30 3a 42 55 | 46 46 45 52 25 21 31 32 |R%=20:BU|FFER%!12|
|00001350| 3d 41 43 4b 52 45 46 25 | 0d 03 a2 12 20 20 42 55 |=ACKREF%|.... BU|
|00001360| 46 46 45 52 25 21 31 36 | 3d 34 0d 03 ac 2f 20 20 |FFER%!16|=4.../ |
|00001370| c8 99 20 22 57 69 6d 70 | 5f 53 65 6e 64 4d 65 73 |.. "Wimp|_SendMes|
|00001380| 73 61 67 65 22 2c 31 37 | 2c 42 55 46 46 45 52 25 |sage",17|,BUFFER%|
|00001390| 2c 41 43 4b 54 41 53 4b | 25 0d 03 b6 06 20 cd 0d |,ACKTASK|%.... ..|
|000013a0| 03 c0 05 cc 0d 03 ca 19 | 20 e7 20 43 4c 46 4c 47 |........| . CLFLG|
|000013b0| 20 8c 20 f2 63 6c 65 61 | 72 5f 61 6c 6c 0d 03 d4 | . .clea|r_all...|
|000013c0| 05 cd 0d 03 de 29 24 68 | 73 69 7a 65 62 75 66 66 |.....)$h|sizebuff|
|000013d0| 25 3d c3 48 53 49 5a 45 | 3a 24 76 73 69 7a 65 62 |%=.HSIZE|:$vsizeb|
|000013e0| 75 66 66 25 3d c3 56 53 | 49 5a 45 0d 03 e8 04 0d |uff%=.VS|IZE.....|
|000013f0| 03 f2 19 41 43 4b 3d a3 | 3a 43 4c 46 4c 47 3d b9 |...ACK=.|:CLFLG=.|
|00001400| 3a 43 53 49 5a 45 3d a3 | 0d 03 fc 2f e7 20 ac 20 |:CSIZE=.|.../. . |
|00001410| 57 69 6e 64 6f 77 43 72 | 65 61 74 65 64 20 8c 20 |WindowCr|eated . |
|00001420| f2 69 6e 69 74 69 61 6c | 69 73 65 5f 6d 61 69 6e |.initial|ise_main|
|00001430| 5f 77 69 6e 64 6f 77 0d | 04 06 04 0d 04 10 09 f2 |_window.|........|
|00001440| 6d 61 73 6b 0d 04 1a 05 | f5 0d 04 24 12 20 e7 20 |mask....|...$. . |
|00001450| 43 41 4c 43 41 4c 4f 4e | 45 20 8c 0d 04 2e 0b 20 |CALCALON|E ..... |
|00001460| 20 43 48 41 3d b9 0d 04 | 38 04 0d 04 42 16 20 20 | CHA=...|8...B. |
|00001470| 52 45 41 53 4f 4e 25 3d | ba 28 63 61 6c 63 61 29 |REASON%=|.(calca)|
|00001480| 0d 04 4c 04 0d 04 56 17 | 20 20 58 25 3d 21 58 41 |..L...V.| X%=!XA|
|00001490| 44 52 3a 59 25 3d 21 59 | 41 44 52 0d 04 60 20 20 |DR:Y%=!Y|ADR..` |
|000014a0| 20 58 50 3d 58 25 2a 58 | 50 46 25 3a 59 50 3d 56 | XP=X%*X|PF%:YP=V|
|000014b0| 46 41 4b 2b 59 25 2a 59 | 50 46 25 0d 04 6a 2a 20 |FAK+Y%*Y|PF%..j* |
|000014c0| 20 e7 20 52 45 41 53 4f | 4e 25 3c 30 20 80 20 44 | . REASO|N%<0 . D|
|000014d0| 49 53 50 4c 41 59 20 80 | 20 57 69 6e 64 6f 77 4f |ISPLAY .| WindowO|
|000014e0| 70 65 6e 20 8c 0d 04 74 | 25 20 20 20 21 42 55 46 |pen ...t|% !BUF|
|000014f0| 46 45 52 25 3d 77 69 6e | 64 6f 77 5f 68 25 3a 42 |FER%=win|dow_h%:B|
|00001500| 55 46 46 45 52 25 21 34 | 3d 30 0d 04 7e 24 20 20 |UFFER%!4|=0..~$ |
|00001510| 20 42 55 46 46 45 52 25 | 21 38 3d 2d 59 50 2d 56 | BUFFER%|!8=-YP-V|
|00001520| 46 41 4b 2a 56 5a 4f 4f | 4d 2b 56 46 41 4b 0d 04 |FAK*VZOO|M+VFAK..|
|00001530| 88 2d 20 20 20 42 55 46 | 46 45 52 25 21 31 32 3d |.- BUF|FER%!12=|
|00001540| 48 45 58 54 3a 42 55 46 | 46 45 52 25 21 31 36 3d |HEXT:BUF|FER%!16=|
|00001550| 2d 4c 55 59 50 25 2b 56 | 46 41 4b 0d 04 92 2e 20 |-LUYP%+V|FAK.... |
|00001560| 20 20 c8 99 20 22 57 69 | 6d 70 5f 55 70 64 61 74 | .. "Wi|mp_Updat|
|00001570| 65 57 69 6e 64 6f 77 22 | 2c 2c 42 55 46 46 45 52 |eWindow"|,,BUFFER|
|00001580| 25 20 b8 20 4d 4f 52 45 | 25 0d 04 9c 24 20 20 20 |% . MORE|%...$ |
|00001590| 4c 55 59 25 3d 59 25 3a | 21 4c 55 59 41 44 52 3d |LUY%=Y%:|!LUYADR=|
|000015a0| 4c 55 59 25 3a 4c 55 59 | 50 25 3d 59 50 0d 04 a6 |LUY%:LUY|P%=YP...|
|000015b0| 13 20 20 20 f2 72 65 64 | 72 61 77 5f 63 6f 72 65 |. .red|raw_core|
|000015c0| 0d 04 b0 07 20 20 cd 0d | 04 ba 43 20 20 e7 20 48 |.... ..|..C . H|
|000015d0| 47 20 8c 20 c8 99 20 22 | 48 6f 75 72 67 6c 61 73 |G . .. "|Hourglas|
|000015e0| 73 5f 50 65 72 63 65 6e | 74 61 67 65 22 2c 28 31 |s_Percen|tage",(1|
|000015f0| 30 30 2a 28 59 25 2a 48 | 53 49 5a 45 2b 58 25 29 |00*(Y%*H|SIZE+X%)|
|00001600| 29 20 81 20 4c 41 52 47 | 45 25 0d 04 c4 1e 20 20 |) . LARG|E%.... |
|00001610| e7 20 52 45 41 53 4f 4e | 25 3d 2d 31 20 8c 20 f2 |. REASON|%=-1 . .|
|00001620| 63 61 6c 63 5f 65 6e 64 | 0d 04 ce 06 20 cc 0d 04 |calc_end|.... ...|
|00001630| d8 2c 20 20 c8 99 20 22 | 57 69 6d 70 5f 50 6f 6c |., .. "|Wimp_Pol|
|00001640| 6c 22 2c 4d 41 53 4b 25 | 2c 42 55 46 46 45 52 25 |l",MASK%|,BUFFER%|
|00001650| 20 b8 20 52 45 41 53 4f | 4e 25 0d 04 e2 06 20 cd | . REASO|N%.... .|
|00001660| 0d 04 ec 17 20 e7 20 44 | 57 49 4e 44 20 8c 20 44 |.... . D|WIND . D|
|00001670| 57 49 4e 44 2b 3d 31 0d | 04 f6 66 20 e7 20 44 57 |WIND+=1.|..f . DW|
|00001680| 49 4e 44 3d 2d 31 20 8c | 20 42 55 46 46 45 52 25 |IND=-1 .| BUFFER%|
|00001690| 21 35 30 30 3d 6f 5f 68 | 61 6e 64 6c 65 25 3a c8 |!500=o_h|andle%:.|
|000016a0| 99 20 22 57 69 6d 70 5f | 44 65 6c 65 74 65 57 69 |. "Wimp_|DeleteWi|
|000016b0| 6e 64 6f 77 22 2c 2c 42 | 55 46 46 45 52 25 2b 35 |ndow",,B|UFFER%+5|
|000016c0| 30 30 3a 44 57 49 4e 44 | 3d a3 3a f2 6d 61 73 6b |00:DWIND|=.:.mask|
|000016d0| 3a 6f 5f 68 61 6e 64 6c | 65 25 3d 2d 31 0d 05 00 |:o_handl|e%=-1...|
|000016e0| 11 20 c8 8e 20 52 45 41 | 53 4f 4e 25 20 ca 0d 05 |. .. REA|SON% ...|
|000016f0| 0a 08 20 c9 20 30 0d 05 | 14 72 20 20 e7 20 41 77 |.. . 0..|.r . Aw|
|00001700| 61 69 74 41 63 6b 20 8c | 20 f2 65 72 72 65 70 6f |aitAck .| .errepo|
|00001710| 72 74 28 22 44 61 74 61 | 20 74 72 61 6e 73 66 65 |rt("Data| transfe|
|00001720| 72 20 66 61 69 6c 65 64 | 3a 20 52 65 63 65 69 76 |r failed|: Receiv|
|00001730| 65 72 20 64 69 65 64 22 | 29 3a ff 28 22 52 45 4d |er died"|):.("REM|
|00001740| 4f 56 45 20 3c 57 69 6d | 70 24 53 63 72 61 70 3e |OVE <Wim|p$Scrap>|
|00001750| 22 29 3a 41 77 61 69 74 | 41 63 6b 3d a3 3a 43 48 |"):Await|Ack=.:CH|
|00001760| 41 3d 6f 6c 64 43 48 41 | 0d 05 1e 1e 20 20 e7 20 |A=oldCHA|.... . |
|00001770| 43 41 4c 43 55 4c 41 54 | 45 20 8c 20 f2 63 61 6c |CALCULAT|E . .cal|
|00001780| 63 75 6c 61 74 65 0d 05 | 28 1d 20 20 e7 20 5a 4f |culate..|(. . ZO|
|00001790| 4f 4d 42 4f 58 20 8c 20 | f2 74 72 61 63 6b 5f 7a |OMBOX . |.track_z|
|000017a0| 6f 6f 6d 0d 05 32 36 20 | 20 e7 20 44 45 4c 53 43 |oom..26 | . DELSC|
|000017b0| 52 41 50 20 8c 20 ff 28 | 22 52 45 4d 4f 56 45 20 |RAP . .(|"REMOVE |
|000017c0| 3c 57 69 6d 70 24 53 63 | 72 61 70 3e 22 29 3a 44 |<Wimp$Sc|rap>"):D|
|000017d0| 45 4c 53 43 52 41 50 3d | a3 0d 05 3c 0b 20 20 f2 |ELSCRAP=|...<. .|
|000017e0| 6d 61 73 6b 0d 05 46 10 | 20 c9 20 31 3a f2 72 65 |mask..F.| . 1:.re|
|000017f0| 64 72 61 77 0d 05 50 08 | 20 c9 20 32 0d 05 5a 1d |draw..P.| . 2..Z.|
|00001800| 20 20 e7 20 21 42 55 46 | 46 45 52 25 3c 3e 6f 5f | . !BUF|FER%<>o_|
|00001810| 68 61 6e 64 6c 65 25 20 | 8c 0d 05 64 37 20 20 20 |handle% |...d7 |
|00001820| c8 99 20 22 57 69 6d 70 | 5f 4f 70 65 6e 57 69 6e |.. "Wimp|_OpenWin|
|00001830| 64 6f 77 22 2c 2c 42 55 | 46 46 45 52 25 3a 57 69 |dow",,BU|FFER%:Wi|
|00001840| 6e 64 6f 77 4f 70 65 6e | 3d b9 3a f2 6d 61 73 6b |ndowOpen|=.:.mask|
|00001850| 0d 05 6e 07 20 20 cd 0d | 05 78 3a 20 c9 20 33 3a |..n. ..|.x: . 3:|
|00001860| c8 99 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |.. "Wimp|_CloseWi|
|00001870| 6e 64 6f 77 22 2c 2c 42 | 55 46 46 45 52 25 3a 57 |ndow",,B|UFFER%:W|
|00001880| 69 6e 64 6f 77 4f 70 65 | 6e 3d a3 3a f2 6d 61 73 |indowOpe|n=.:.mas|
|00001890| 6b 0d 05 82 16 20 c9 20 | 34 3a f2 6c 65 61 76 65 |k.... . |4:.leave|
|000018a0| 5f 77 69 6e 64 6f 77 0d | 05 8c 16 20 c9 20 35 3a |_window.|... . 5:|
|000018b0| f2 65 6e 74 65 72 5f 77 | 69 6e 64 6f 77 0d 05 96 |.enter_w|indow...|
|000018c0| 14 20 c9 20 36 3a f2 63 | 68 65 63 6b 6d 6f 75 73 |. . 6:.c|heckmous|
|000018d0| 65 0d 05 a0 11 20 c9 20 | 37 3a f2 64 72 61 67 62 |e.... . |7:.dragb|
|000018e0| 6f 78 0d 05 aa 13 20 c9 | 20 38 3a f2 6b 65 79 73 |ox.... .| 8:.keys|
|000018f0| 74 72 6f 6b 65 0d 05 b4 | 15 20 c9 20 39 3a f2 6d |troke...|. . 9:.m|
|00001900| 65 6e 75 5f 73 65 6c 65 | 63 74 0d 05 be 15 20 c9 |enu_sele|ct.... .|
|00001910| 20 31 37 2c 31 38 3a f2 | 72 65 63 65 69 76 65 0d | 17,18:.|receive.|
|00001920| 05 c8 06 20 cb 0d 05 d2 | 07 fd 20 a3 0d 05 dc 04 |... ....|.. .....|
|00001930| 0d 05 e6 0b dd 20 f2 6d | 61 73 6b 0d 05 f0 46 20 |..... .m|ask...F |
|00001940| 4d 41 53 4b 25 3d 33 3c | 3c 31 31 20 84 20 28 ac |MASK%=3<|<11 . (.|
|00001950| 20 28 41 77 61 69 74 41 | 63 6b 20 84 20 43 41 4c | (AwaitA|ck . CAL|
|00001960| 43 55 4c 41 54 45 20 84 | 20 5a 4f 4f 4d 42 4f 58 |CULATE .| ZOOMBOX|
|00001970| 20 84 20 44 45 4c 53 43 | 52 41 50 29 20 80 20 31 | . DELSC|RAP) . 1|
|00001980| 29 0d 05 fa 57 20 43 41 | 4c 43 41 4c 4f 4e 45 3d |)...W CA|LCALONE=|
|00001990| 43 41 4c 43 55 4c 41 54 | 45 20 80 20 ac 20 28 41 |CALCULAT|E . . (A|
|000019a0| 77 61 69 74 41 63 6b 20 | 84 20 5a 4f 4f 4d 42 4f |waitAck |. ZOOMBO|
|000019b0| 58 20 84 20 44 45 4c 53 | 43 52 41 50 29 3a e7 20 |X . DELS|CRAP):. |
|000019c0| 43 41 4c 43 41 4c 4f 4e | 45 20 8c 20 21 4d 4b 41 |CALCALON|E . !MKA|
|000019d0| 44 52 3d 4d 41 53 4b 25 | 0d 06 04 05 e1 0d 06 0e |DR=MASK%|........|
|000019e0| 04 0d 06 18 11 dd 20 f2 | 74 72 61 63 6b 5f 7a 6f |...... .|track_zo|
|000019f0| 6f 6d 0d 06 22 0d 20 f2 | 70 6f 69 6e 74 65 72 0d |om..". .|pointer.|
|00001a00| 06 2c 48 20 e7 20 28 5a | 20 80 20 25 31 30 31 29 |.,H . (Z| . %101)|
|00001a10| 20 80 20 68 61 6e 64 6c | 65 25 3d 77 69 6e 64 6f | . handl|e%=windo|
|00001a20| 77 5f 68 25 20 80 20 69 | 63 6f 6e 25 3d 2d 31 20 |w_h% . i|con%=-1 |
|00001a30| 80 20 28 58 3c 3e 5a 42 | 58 41 20 84 20 59 3c 3e |. (X<>ZB|XA . Y<>|
|00001a40| 5a 42 59 41 29 20 8c 0d | 06 36 28 20 20 f2 75 70 |ZBYA) ..|.6( .up|
|00001a50| 64 61 74 65 5f 7a 6f 6f | 6d 62 6f 78 28 5a 42 58 |date_zoo|mbox(ZBX|
|00001a60| 2c 5a 42 59 2c 5a 42 58 | 41 2c 5a 42 59 41 29 0d |,ZBY,ZBX|A,ZBYA).|
|00001a70| 06 40 22 20 20 f2 75 70 | 64 61 74 65 5f 7a 6f 6f |.@" .up|date_zoo|
|00001a80| 6d 62 6f 78 28 5a 42 58 | 2c 5a 42 59 2c 58 2c 59 |mbox(ZBX|,ZBY,X,Y|
|00001a90| 29 0d 06 4a 13 20 20 5a | 42 58 41 3d 58 3a 5a 42 |)..J. Z|BXA=X:ZB|
|00001aa0| 59 41 3d 59 0d 06 54 06 | 20 cd 0d 06 5e 0c 20 e7 |YA=Y..T.| ...^. .|
|00001ab0| 20 5a 3d 30 20 8c 0d 06 | 68 14 20 20 f2 7a 6f 6f | Z=0 ...|h. .zoo|
|00001ac0| 6d 5f 65 6e 64 28 58 2c | 59 29 0d 06 72 06 20 cd |m_end(X,|Y)..r. .|
|00001ad0| 0d 06 7c 05 e1 0d 06 86 | 04 0d 06 90 12 dd 20 f2 |..|.....|...... .|
|00001ae0| 6d 65 6e 75 5f 73 65 6c | 65 63 74 0d 06 9a 0d 20 |menu_sel|ect.... |
|00001af0| f2 70 6f 69 6e 74 65 72 | 0d 06 a4 34 20 c8 99 20 |.pointer|...4 .. |
|00001b00| 22 57 69 6d 70 5f 44 65 | 63 6f 64 65 4d 65 6e 75 |"Wimp_De|codeMenu|
|00001b10| 22 2c 2c 43 55 52 52 4d | 45 4e 25 2c 42 55 46 46 |",,CURRM|EN%,BUFF|
|00001b20| 45 52 25 2c 4f 50 54 42 | 55 46 46 25 0d 06 ae 28 |ER%,OPTB|UFF%...(|
|00001b30| 20 e7 20 c0 24 4f 50 54 | 42 55 46 46 25 2c 31 34 | . .$OPT|BUFF%,14|
|00001b40| 29 3d 22 43 6f 6e 66 69 | 67 75 72 65 2e 54 69 6d |)="Confi|gure.Tim|
|00001b50| 65 22 20 8c 0d 06 b8 3f | 20 20 54 53 48 41 52 45 |e" ....?| TSHARE|
|00001b60| 3d bb 28 24 74 69 6d 65 | 62 75 66 66 25 29 3a e7 |=.($time|buff%):.|
|00001b70| 20 54 53 48 41 52 45 3d | 30 20 8c 20 54 53 48 41 | TSHARE=|0 . TSHA|
|00001b80| 52 45 3d 31 3a 24 74 69 | 6d 65 62 75 66 66 25 3d |RE=1:$ti|mebuff%=|
|00001b90| 22 31 22 0d 06 c2 12 20 | 20 21 54 41 4c 4c 3d 54 |"1".... | !TALL=T|
|00001ba0| 53 48 41 52 45 0d 06 cc | 06 20 cd 0d 06 d6 16 20 |SHARE...|. ..... |
|00001bb0| 49 49 24 3d c0 24 4f 50 | 54 42 55 46 46 25 2c 34 |II$=.$OP|TBUFF%,4|
|00001bc0| 29 0d 06 e0 13 20 e7 20 | 49 49 24 3d 22 52 65 73 |).... . |II$="Res|
|00001bd0| 65 22 20 8c 0d 06 ea 1c | 20 20 f2 63 61 6c 63 5f |e" .....| .calc_|
|00001be0| 6f 66 66 3a 43 41 4c 43 | 55 4c 41 54 45 44 3d a3 |off:CALC|ULATED=.|
|00001bf0| 0d 06 f4 27 20 20 f2 69 | 6e 69 74 69 61 6c 69 73 |...' .i|nitialis|
|00001c00| 65 5f 63 61 6c 63 3a f2 | 63 6c 65 61 72 5f 61 6c |e_calc:.|clear_al|
|00001c10| 6c 3a 43 48 41 3d a3 0d | 06 fe 34 20 20 c8 99 20 |l:CHA=..|..4 .. |
|00001c20| 22 57 69 6d 70 5f 46 6f | 72 63 65 52 65 64 72 61 |"Wimp_Fo|rceRedra|
|00001c30| 77 22 2c 77 69 6e 64 6f | 77 5f 68 25 2c 30 2c 2d |w",windo|w_h%,0,-|
|00001c40| 56 45 58 54 2c 48 45 58 | 54 2c 30 0d 07 08 1d 20 |VEXT,HEX|T,0.... |
|00001c50| 20 f2 73 65 74 28 22 53 | 61 76 65 22 2c 4d 45 4e | .set("S|ave",MEN|
|00001c60| 55 25 2c 38 2c 32 32 29 | 0d 07 12 30 20 20 c8 99 |U%,8,22)|...0 ..|
|00001c70| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e | "Wimp_C|reateMen|
|00001c80| 75 22 2c 2c 76 61 6c 75 | 65 5f 68 25 2c 58 2d 32 |u",,valu|e_h%,X-2|
|00001c90| 35 30 2c 59 2b 32 35 30 | 0d 07 1c 06 20 cd 0d 07 |50,Y+250|.... ...|
|00001ca0| 26 13 20 e7 20 49 49 24 | 3d 22 51 75 69 74 22 20 |&. . II$|="Quit" |
|00001cb0| 8c 0d 07 30 0f 20 20 e7 | 20 ac 20 43 48 41 20 8c |...0. .| . CHA .|
|00001cc0| 0d 07 3a 10 20 20 20 f2 | 66 69 6e 69 73 68 3a e0 |..:. .|finish:.|
|00001cd0| 0d 07 44 07 20 20 cc 0d | 07 4e 1d 20 20 20 e7 20 |..D. ..|.N. . |
|00001ce0| a4 63 6f 6e 66 69 72 6d | 20 8c 20 f2 66 69 6e 69 |.confirm| . .fini|
|00001cf0| 73 68 3a e0 0d 07 58 07 | 20 20 cd 0d 07 62 06 20 |sh:...X.| ...b. |
|00001d00| cd 0d 07 6c 13 20 e7 20 | 49 49 24 3d 22 43 6f 6e |...l. . |II$="Con|
|00001d10| 74 22 20 8c 0d 07 76 0e | 20 20 f2 63 61 6c 63 5f |t" ...v.| .calc_|
|00001d20| 6f 6e 0d 07 80 16 20 20 | e7 20 ac 20 43 41 4c 43 |on.... |. . CALC|
|00001d30| 55 4c 41 54 45 44 20 8c | 0d 07 8a 15 20 20 20 f2 |ULATED .|.... .|
|00001d40| 73 74 61 72 74 5f 63 61 | 6c 63 28 b9 29 0d 07 94 |start_ca|lc(.)...|
|00001d50| 2d 20 20 20 43 41 4c 43 | 55 4c 41 54 45 44 3d b9 |- CALC|ULATED=.|
|00001d60| 3a f2 72 65 73 65 74 28 | 22 53 61 76 65 22 2c 4d |:.reset(|"Save",M|
|00001d70| 45 4e 55 25 2c 38 2c 32 | 32 29 0d 07 9e 07 20 20 |ENU%,8,2|2).... |
|00001d80| cd 0d 07 a8 06 20 cd 0d | 07 b2 13 20 e7 20 49 49 |..... ..|... . II|
|00001d90| 24 3d 22 41 62 6f 72 22 | 20 8c 0d 07 bc 0f 20 20 |$="Abor"| ..... |
|00001da0| f2 63 61 6c 63 5f 6f 66 | 66 0d 07 c6 06 20 cd 0d |.calc_of|f.... ..|
|00001db0| 07 d0 1d 20 e7 20 c0 24 | 4f 50 54 42 55 46 46 25 |... . .$|OPTBUFF%|
|00001dc0| 2c 34 29 3d 22 5a 6f 6f | 6d 22 20 8c 0d 07 da 17 |,4)="Zoo|m" .....|
|00001dd0| 20 20 48 4f 3d 48 5a 4f | 4f 4d 3a 56 4f 3d 56 5a | HO=HZO|OM:VO=VZ|
|00001de0| 4f 4f 4d 0d 07 e4 2f 20 | 20 48 5a 4f 4f 4d 3d bb |OOM.../ | HZOOM=.|
|00001df0| 28 24 68 7a 6f 6f 6d 62 | 75 66 66 25 29 3a 56 5a |($hzoomb|uff%):VZ|
|00001e00| 4f 4f 4d 3d bb 28 24 76 | 7a 6f 6f 6d 62 75 66 66 |OOM=.($v|zoombuff|
|00001e10| 25 29 0d 07 ee 19 20 20 | e7 20 48 5a 4f 4f 4d 3d |%).... |. HZOOM=|
|00001e20| 30 20 8c 20 48 5a 4f 4f | 4d 3d 31 0d 07 f8 19 20 |0 . HZOO|M=1.... |
|00001e30| 20 e7 20 56 5a 4f 4f 4d | 3d 30 20 8c 20 56 5a 4f | . VZOOM|=0 . VZO|
|00001e40| 4f 4d 3d 31 0d 08 02 1f | 20 20 e7 20 48 4f 3c 3e |OM=1....| . HO<>|
|00001e50| 48 5a 4f 4f 4d 20 84 20 | 56 4f 3c 3e 56 5a 4f 4f |HZOOM . |VO<>VZOO|
|00001e60| 4d 20 8c 0d 08 0c 26 20 | 20 20 58 50 46 25 3d 48 |M ....& | XPF%=H|
|00001e70| 46 41 4b 2a 48 5a 4f 4f | 4d 3a 59 50 46 25 3d 56 |FAK*HZOO|M:YPF%=V|
|00001e80| 46 41 4b 2a 56 5a 4f 4f | 4d 0d 08 16 21 20 20 20 |FAK*VZOO|M...! |
|00001e90| 58 50 3d 58 25 2a 58 50 | 46 25 3a 59 50 3d 59 25 |XP=X%*XP|F%:YP=Y%|
|00001ea0| 2a 59 50 46 25 2b 56 46 | 41 4b 0d 08 20 20 20 20 |*YPF%+VF|AK.. |
|00001eb0| 20 f2 72 65 69 6e 69 74 | 69 61 6c 69 73 65 5f 6d | .reinit|ialise_m|
|00001ec0| 61 69 6e 5f 77 69 6e 64 | 6f 77 0d 08 2a 07 20 20 |ain_wind|ow..*. |
|00001ed0| cd 0d 08 34 4f 20 20 e7 | 20 48 5a 4f 4f 4d 3c 3e |...4O .| HZOOM<>|
|00001ee0| 31 20 84 20 56 5a 4f 4f | 4d 3c 3e 31 20 8c 20 f2 |1 . VZOO|M<>1 . .|
|00001ef0| 73 65 74 28 22 5a 6f 6f | 6d 22 2c 4d 45 4e 55 25 |set("Zoo|m",MENU%|
|00001f00| 2c 30 2c 30 29 20 8b 20 | f2 72 65 73 65 74 28 22 |,0,0) . |.reset("|
|00001f10| 5a 6f 6f 6d 22 2c 4d 45 | 4e 55 25 2c 30 2c 30 29 |Zoom",ME|NU%,0,0)|
|00001f20| 0d 08 3e 06 20 cd 0d 08 | 48 1e 20 e7 20 24 4f 50 |..>. ...|H. . $OP|
|00001f30| 54 42 55 46 46 25 3d 22 | 41 75 74 6f 2d 5a 6f 6f |TBUFF%="|Auto-Zoo|
|00001f40| 6d 22 20 8c 0d 08 52 33 | 20 20 5a 4f 4f 4d 41 55 |m" ...R3| ZOOMAU|
|00001f50| 54 4f 3d ac 20 5a 4f 4f | 4d 41 55 54 4f 3a f2 74 |TO=. ZOO|MAUTO:.t|
|00001f60| 6f 67 67 6c 65 28 22 41 | 75 74 6f 22 2c 4d 45 4e |oggle("A|uto",MEN|
|00001f70| 55 25 2c 30 2c 30 29 0d | 08 5c 20 20 20 f2 74 6f |U%,0,0).|.\ .to|
|00001f80| 67 67 6c 65 28 22 5a 6f | 6f 6d 22 2c 4d 45 4e 55 |ggle("Zo|om",MENU|
|00001f90| 25 2c 38 2c 32 32 29 0d | 08 66 37 20 20 e7 20 5a |%,8,22).|.f7 . Z|
|00001fa0| 4f 4f 4d 41 55 54 4f 20 | 8c 20 f2 61 75 74 6f 5f |OOMAUTO |. .auto_|
|00001fb0| 7a 6f 6f 6d 3a f2 72 65 | 69 6e 69 74 69 61 6c 69 |zoom:.re|initiali|
|00001fc0| 73 65 5f 6d 61 69 6e 5f | 77 69 6e 64 6f 77 0d 08 |se_main_|window..|
|00001fd0| 70 06 20 cd 0d 08 7a 24 | 20 e7 20 c0 24 4f 50 54 |p. ...z$| . .$OPT|
|00001fe0| 42 55 46 46 25 2c 31 30 | 29 3d 22 41 75 74 6f 2d |BUFF%,10|)="Auto-|
|00001ff0| 5a 6f 6f 6d 2e 22 20 8c | 0d 08 84 35 20 20 46 41 |Zoom." .|...5 FA|
|00002000| 43 41 55 54 4f 3d bb 24 | 61 75 74 6f 7a 6f 6f 6d |CAUTO=.$|autozoom|
|00002010| 62 75 66 66 25 3a e7 20 | 46 41 43 41 55 54 4f 3d |buff%:. |FACAUTO=|
|00002020| 30 20 8c 20 46 41 43 41 | 55 54 4f 3d 31 0d 08 8e |0 . FACA|UTO=1...|
|00002030| 1d 20 20 24 61 75 74 6f | 7a 6f 6f 6d 62 75 66 66 |. $auto|zoombuff|
|00002040| 25 3d c3 46 41 43 41 55 | 54 4f 0d 08 98 10 20 20 |%=.FACAU|TO.... |
|00002050| f2 61 75 74 6f 5f 7a 6f | 6f 6d 0d 08 a2 1f 20 20 |.auto_zo|om.... |
|00002060| f2 72 65 69 6e 69 74 69 | 61 6c 69 73 65 5f 6d 61 |.reiniti|alise_ma|
|00002070| 69 6e 5f 77 69 6e 64 6f | 77 0d 08 ac 06 20 cd 0d |in_windo|w.... ..|
|00002080| 08 b6 26 20 e7 20 c0 24 | 4f 50 54 42 55 46 46 25 |..& . .$|OPTBUFF%|
|00002090| 2c 31 32 29 3d 22 53 61 | 76 65 2e 46 72 61 63 74 |,12)="Sa|ve.Fract|
|000020a0| 61 6c 22 20 8c 0d 08 c0 | 16 20 20 f2 73 61 76 65 |al" ....|. .save|
|000020b0| 5f 62 79 5f 6e 61 6d 65 | 28 a3 29 0d 08 ca 06 20 |_by_name|(.).... |
|000020c0| cd 0d 08 d4 25 20 e7 20 | c0 24 4f 50 54 42 55 46 |....% . |.$OPTBUF|
|000020d0| 46 25 2c 31 31 29 3d 22 | 53 61 76 65 2e 53 70 72 |F%,11)="|Save.Spr|
|000020e0| 69 74 65 22 20 8c 0d 08 | de 16 20 20 f2 73 61 76 |ite" ...|.. .sav|
|000020f0| 65 5f 62 79 5f 6e 61 6d | 65 28 b9 29 0d 08 e8 06 |e_by_nam|e(.)....|
|00002100| 20 cd 0d 08 f2 20 20 e7 | 20 24 4f 50 54 42 55 46 | .... .| $OPTBUF|
|00002110| 46 25 3d 22 4e 65 77 20 | 66 72 61 63 74 61 6c 22 |F%="New |fractal"|
|00002120| 20 8c 0d 08 fc 30 20 20 | c8 99 20 22 57 69 6d 70 | ....0 |.. "Wimp|
|00002130| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 2c 2c 76 61 |_CreateM|enu",,va|
|00002140| 6c 75 65 5f 68 25 2c 58 | 2d 32 35 30 2c 59 2b 32 |lue_h%,X|-250,Y+2|
|00002150| 35 30 0d 09 06 06 20 cd | 0d 09 10 23 20 e7 20 24 |50.... .|...# . $|
|00002160| 4f 50 54 42 55 46 46 25 | 3d 22 43 75 72 72 65 6e |OPTBUFF%|="Curren|
|00002170| 74 20 76 61 6c 75 65 73 | 22 20 8c 0d 09 1a 29 20 |t values|" ....) |
|00002180| 20 c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 | .. "Wim|p_Create|
|00002190| 4d 65 6e 75 22 2c 2c 63 | 76 61 6c 75 65 5f 68 25 |Menu",,c|value_h%|
|000021a0| 2c 58 2c 59 0d 09 24 06 | 20 cd 0d 09 2e 13 20 e7 |,X,Y..$.| ..... .|
|000021b0| 20 49 49 24 3d 22 43 79 | 63 6c 22 20 8c 0d 09 38 | II$="Cy|cl" ...8|
|000021c0| 0c 20 20 f2 63 79 63 6c | 65 0d 09 92 06 20 cd 0d |. .cycl|e.... ..|
|000021d0| 09 9c 22 20 e7 20 28 5a | 20 80 20 31 29 20 80 20 |.." . (Z| . 1) . |
|000021e0| 43 55 52 52 4d 45 4e 25 | 3d 4d 45 4e 55 25 20 20 |CURRMEN%|=MENU% |
|000021f0| 8c 0d 09 a6 34 20 20 c8 | 99 20 22 57 69 6d 70 5f |....4 .|. "Wimp_|
|00002200| 43 72 65 61 74 65 4d 65 | 6e 75 22 2c 2c 4d 45 4e |CreateMe|nu",,MEN|
|00002210| 55 25 2c 58 2b 31 36 2a | 48 46 41 4b 2c 59 2b 38 |U%,X+16*|HFAK,Y+8|
|00002220| 2a 56 46 41 4b 0d 09 b0 | 06 20 cd 0d 09 ba 05 e1 |*VFAK...|. ......|
|00002230| 0d 09 c4 04 0d 09 c6 0c | dd 20 f2 63 79 63 6c 65 |........|. .cycle|
|00002240| 0d 09 c7 17 20 e7 20 ac | 20 43 41 4c 43 55 4c 41 |.... . .| CALCULA|
|00002250| 54 45 44 20 8c 20 e1 0d | 09 c7 0c 20 d6 20 63 79 |TED . ..|... . cy|
|00002260| 63 6c 65 0d 09 c8 10 20 | e7 20 44 49 53 50 4c 41 |cle.... |. DISPLA|
|00002270| 59 20 8c 0d 09 42 0e 20 | 20 59 25 3d 21 59 41 44 |Y ...B. | Y%=!YAD|
|00002280| 52 0d 09 4c 20 20 20 58 | 50 3d 58 25 2a 58 50 46 |R..L X|P=X%*XPF|
|00002290| 25 3a 59 50 3d 56 46 41 | 4b 2b 59 25 2a 59 50 46 |%:YP=VFA|K+Y%*YPF|
|000022a0| 25 0d 09 56 24 20 20 21 | 42 55 46 46 45 52 25 3d |%..V$ !|BUFFER%=|
|000022b0| 77 69 6e 64 6f 77 5f 68 | 25 3a 42 55 46 46 45 52 |window_h|%:BUFFER|
|000022c0| 25 21 34 3d 30 0d 09 60 | 15 20 20 42 55 46 46 45 |%!4=0..`|. BUFFE|
|000022d0| 52 25 21 38 3d 2d 56 45 | 58 54 0d 09 6a 22 20 20 |R%!8=-VE|XT..j" |
|000022e0| 42 55 46 46 45 52 25 21 | 31 32 3d 48 45 58 54 3a |BUFFER%!|12=HEXT:|
|000022f0| 42 55 46 46 45 52 25 21 | 31 36 3d 30 0d 09 74 2d |BUFFER%!|16=0..t-|
|00002300| 20 20 c8 99 20 22 57 69 | 6d 70 5f 55 70 64 61 74 | .. "Wi|mp_Updat|
|00002310| 65 57 69 6e 64 6f 77 22 | 2c 2c 42 55 46 46 45 52 |eWindow"|,,BUFFER|
|00002320| 25 20 b8 20 4d 4f 52 45 | 25 0d 09 7e 23 20 20 4c |% . MORE|%..~# L|
|00002330| 55 59 25 3d 59 25 3a 21 | 4c 55 59 41 44 52 3d 4c |UY%=Y%:!|LUYADR=L|
|00002340| 55 59 25 3a 4c 55 59 50 | 25 3d 59 50 0d 09 88 12 |UY%:LUYP|%=YP....|
|00002350| 20 20 f2 72 65 64 72 61 | 77 5f 63 6f 72 65 0d 09 | .redra|w_core..|
|00002360| 92 06 20 cd 0d 09 c7 05 | e1 0d 09 c8 04 0d 09 ce |.. .....|........|
|00002370| 11 dd 20 f2 63 68 65 63 | 6b 6d 6f 75 73 65 0d 09 |.. .chec|kmouse..|
|00002380| d8 27 20 58 3d 21 42 55 | 46 46 45 52 25 3a 59 3d |.' X=!BU|FFER%:Y=|
|00002390| 42 55 46 46 45 52 25 21 | 34 3a 5a 3d 42 55 46 46 |BUFFER%!|4:Z=BUFF|
|000023a0| 45 52 25 21 38 0d 09 e2 | 28 20 68 61 6e 64 6c 65 |ER%!8...|( handle|
|000023b0| 25 3d 42 55 46 46 45 52 | 25 21 31 32 3a 69 63 6f |%=BUFFER|%!12:ico|
|000023c0| 6e 25 3d 42 55 46 46 45 | 52 25 21 31 36 0d 09 ec |n%=BUFFE|R%!16...|
|000023d0| 1f 20 e7 20 5a 4f 4f 4d | 42 4f 58 20 8c 20 f2 7a |. . ZOOM|BOX . .z|
|000023e0| 6f 6f 6d 5f 65 6e 64 28 | 58 2c 59 29 0d 09 f6 11 |oom_end(|X,Y)....|
|000023f0| 20 e7 20 5a 20 80 20 25 | 30 31 30 20 8c 0d 0a 00 | . Z . %|010 ....|
|00002400| 14 20 20 e7 20 68 61 6e | 64 6c 65 25 3e 2d 31 20 |. . han|dle%>-1 |
|00002410| 8c 0d 0a 0a 35 20 20 20 | c8 99 20 22 57 69 6d 70 |....5 |.. "Wimp|
|00002420| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 2c 2c 4d 45 |_CreateM|enu",,ME|
|00002430| 4e 55 25 2c 58 2b 31 36 | 2a 48 46 41 4b 2c 59 2b |NU%,X+16|*HFAK,Y+|
|00002440| 38 2a 56 46 41 4b 0d 0a | 14 15 20 20 20 43 55 52 |8*VFAK..|.. CUR|
|00002450| 52 4d 45 4e 25 3d 4d 45 | 4e 55 25 0d 0a 1e 07 20 |RMEN%=ME|NU%.... |
|00002460| 20 cd 0d 0a 28 14 20 20 | e7 20 68 61 6e 64 6c 65 | ...(. |. handle|
|00002470| 25 3d 2d 32 20 8c 0d 0a | 32 2d 20 20 20 c8 99 20 |%=-2 ...|2- .. |
|00002480| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00002490| 22 2c 2c 49 43 4d 45 4e | 55 25 2c 58 2d 36 34 2c |",,ICMEN|U%,X-64,|
|000024a0| 32 31 36 0d 0a 3c 17 20 | 20 20 43 55 52 52 4d 45 |216..<. | CURRME|
|000024b0| 4e 25 3d 49 43 4d 45 4e | 55 25 0d 0a 46 07 20 20 |N%=ICMEN|U%..F. |
|000024c0| cd 0d 0a 50 06 20 cd 0d | 0a 5a 11 20 e7 20 5a 20 |...P. ..|.Z. . Z |
|000024d0| 80 20 25 31 30 31 20 8c | 0d 0a 64 3c 20 20 e7 20 |. %101 .|..d< . |
|000024e0| 68 61 6e 64 6c 65 25 3d | 77 69 6e 64 6f 77 5f 68 |handle%=|window_h|
|000024f0| 25 20 80 20 69 63 6f 6e | 25 3d 2d 31 20 80 20 44 |% . icon|%=-1 . D|
|00002500| 49 53 50 4c 41 59 20 80 | 20 ac 20 5a 4f 4f 4d 42 |ISPLAY .| . ZOOMB|
|00002510| 4f 58 20 8c 0d 0a 6e 2f | 20 20 20 5a 42 58 3d 58 |OX ...n/| ZBX=X|
|00002520| 3a 5a 42 59 3d 59 3a f2 | 75 70 64 61 74 65 5f 7a |:ZBY=Y:.|update_z|
|00002530| 6f 6f 6d 62 6f 78 28 5a | 42 58 2c 5a 42 59 2c 58 |oombox(Z|BX,ZBY,X|
|00002540| 2c 59 29 0d 0a 78 24 20 | 20 20 5a 42 58 41 3d 58 |,Y)..x$ | ZBXA=X|
|00002550| 3a 5a 42 59 41 3d 59 3a | 4f 43 41 4c 43 3d 43 41 |:ZBYA=Y:|OCALC=CA|
|00002560| 4c 43 55 4c 41 54 45 0d | 0a 82 28 20 20 20 5a 4f |LCULATE.|..( ZO|
|00002570| 4f 4d 42 4f 58 3d b9 3a | e7 20 43 41 4c 43 55 4c |OMBOX=.:|. CALCUL|
|00002580| 41 54 45 20 8c 20 f2 63 | 61 6c 63 5f 6f 66 66 0d |ATE . .c|alc_off.|
|00002590| 0a 8c 0c 20 20 20 f2 6d | 61 73 6b 0d 0a 96 07 20 |... .m|ask.... |
|000025a0| 20 cd 0d 0a a0 14 20 20 | e7 20 68 61 6e 64 6c 65 | ..... |. handle|
|000025b0| 25 3d 2d 32 20 8c 0d 0a | aa 15 20 20 20 e7 20 57 |%=-2 ...|.. . W|
|000025c0| 69 6e 64 6f 77 4f 70 65 | 6e 20 8c 0d 0a b4 3c 20 |indowOpe|n ....< |
|000025d0| 20 20 20 57 49 4e 32 25 | 21 2d 34 3d 77 69 6e 64 | WIN2%|!-4=wind|
|000025e0| 6f 77 5f 68 25 3a c8 99 | 20 22 57 69 6d 70 5f 47 |ow_h%:..| "Wimp_G|
|000025f0| 65 74 57 69 6e 64 6f 77 | 53 74 61 74 65 22 2c 2c |etWindow|State",,|
|00002600| 57 49 4e 32 25 2d 34 0d | 0a be 31 20 20 20 20 57 |WIN2%-4.|..1 W|
|00002610| 49 4e 32 25 21 32 34 3d | 2d 31 3a c8 99 20 22 57 |IN2%!24=|-1:.. "W|
|00002620| 69 6d 70 5f 4f 70 65 6e | 57 69 6e 64 6f 77 22 2c |imp_Open|Window",|
|00002630| 2c 57 49 4e 32 25 2d 34 | 0d 0a c8 08 20 20 20 cc |,WIN2%-4|.... .|
|00002640| 0d 0a d2 33 20 20 20 20 | e7 20 ac 20 57 69 6e 64 |...3 |. . Wind|
|00002650| 6f 77 43 72 65 61 74 65 | 64 20 8c 20 f2 69 6e 69 |owCreate|d . .ini|
|00002660| 74 69 61 6c 69 73 65 5f | 6d 61 69 6e 5f 77 69 6e |tialise_|main_win|
|00002670| 64 6f 77 0d 0a dc 1a 20 | 20 20 20 57 49 4e 32 25 |dow.... | WIN2%|
|00002680| 21 2d 34 3d 77 69 6e 64 | 6f 77 5f 68 25 0d 0a e6 |!-4=wind|ow_h%...|
|00002690| 29 20 20 20 20 c8 99 20 | 22 57 69 6d 70 5f 47 65 |) .. |"Wimp_Ge|
|000026a0| 74 57 69 6e 64 6f 77 53 | 74 61 74 65 22 2c 2c 57 |tWindowS|tate",,W|
|000026b0| 49 4e 32 25 2d 34 0d 0a | f0 25 20 20 20 20 c8 99 |IN2%-4..|.% ..|
|000026c0| 20 22 57 69 6d 70 5f 4f | 70 65 6e 57 69 6e 64 6f | "Wimp_O|penWindo|
|000026d0| 77 22 2c 2c 57 49 4e 32 | 25 2d 34 0d 0a fa 1a 20 |w",,WIN2|%-4.... |
|000026e0| 20 20 20 57 69 6e 64 6f | 77 4f 70 65 6e 3d b9 3a | Windo|wOpen=.:|
|000026f0| f2 6d 61 73 6b 0d 0b 04 | 31 20 20 20 20 e7 20 ac |.mask...|1 . .|
|00002700| 20 a4 76 61 6c 69 64 5f | 63 6f 6c 6f 75 72 73 20 | .valid_|colours |
|00002710| 8c 20 f2 64 69 73 70 5f | 6f 66 66 20 8b 20 f2 64 |. .disp_|off . .d|
|00002720| 69 73 70 5f 6f 6e 0d 0b | 0e 08 20 20 20 cd 0d 0b |isp_on..|.. ...|
|00002730| 18 07 20 20 cd 0d 0b 22 | 39 20 20 e7 20 28 68 61 |.. ..."|9 . (ha|
|00002740| 6e 64 6c 65 25 3d 73 61 | 76 65 5f 68 25 20 84 20 |ndle%=sa|ve_h% . |
|00002750| 68 61 6e 64 6c 65 25 3d | 73 70 73 61 76 65 5f 68 |handle%=|spsave_h|
|00002760| 25 29 20 80 20 69 63 6f | 6e 25 3d 32 20 8c 0d 0b |%) . ico|n%=2 ...|
|00002770| 2c 27 20 20 20 f2 73 61 | 76 65 5f 62 79 5f 6e 61 |,' .sa|ve_by_na|
|00002780| 6d 65 28 68 61 6e 64 6c | 65 25 3d 73 70 73 61 76 |me(handl|e%=spsav|
|00002790| 65 5f 68 25 29 0d 0b 36 | 2d 20 20 20 e7 20 ac 20 |e_h%)..6|- . . |
|000027a0| 28 5a 20 80 20 31 29 20 | 8c 20 c8 99 20 22 57 69 |(Z . 1) |. .. "Wi|
|000027b0| 6d 70 5f 43 72 65 61 74 | 65 4d 65 6e 75 22 2c 2c |mp_Creat|eMenu",,|
|000027c0| 2d 31 0d 0b 40 07 20 20 | cd 0d 0b 4a 24 20 20 e7 |-1..@. |...J$ .|
|000027d0| 20 68 61 6e 64 6c 65 25 | 3d 76 61 6c 75 65 5f 68 | handle%|=value_h|
|000027e0| 25 20 80 20 69 63 6f 6e | 25 3d 39 20 8c 0d 0b 54 |% . icon|%=9 ...T|
|000027f0| 1f 20 20 20 c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |. .. "|Wimp_Cre|
|00002800| 61 74 65 4d 65 6e 75 22 | 2c 2c 2d 31 0d 0b 5e 12 |ateMenu"|,,-1..^.|
|00002810| 20 20 20 f2 6e 65 77 5f | 76 61 6c 75 65 73 0d 0b | .new_|values..|
|00002820| 68 07 20 20 cd 0d 0b 72 | 24 20 20 e7 20 68 61 6e |h. ...r|$ . han|
|00002830| 64 6c 65 25 3d 76 61 6c | 75 65 5f 68 25 20 80 20 |dle%=val|ue_h% . |
|00002840| 69 63 6f 6e 25 3d 37 20 | 8c 0d 0b 7c 0f 20 20 20 |icon%=7 |...|. |
|00002850| e7 20 a4 6e 6f 6b 20 8c | 0d 0b 86 0e 20 20 20 20 |. .nok .|.... |
|00002860| f2 6e 65 77 5f 76 0d 0b | 90 39 20 20 20 20 e7 20 |.new_v..|.9 . |
|00002870| 56 53 4e 3d 30 20 8c 20 | f2 65 72 72 65 70 6f 72 |VSN=0 . |.errepor|
|00002880| 74 28 22 49 6e 76 61 6c | 69 64 20 76 61 6c 75 65 |t("Inval|id value|
|00002890| 20 66 6f 72 20 68 65 69 | 67 68 74 22 29 3a e1 0d | for hei|ght"):..|
|000028a0| 0b 9a 37 20 20 20 20 48 | 53 4e 3d 28 58 4d 41 58 |..7 H|SN=(XMAX|
|000028b0| 4e 2d 58 4d 49 4e 4e 29 | 2f 28 59 4d 41 58 4e 2d |N-XMINN)|/(YMAXN-|
|000028c0| 59 4d 49 4e 4e 29 2a 28 | 56 53 4e 2a 56 46 41 4b |YMINN)*(|VSN*VFAK|
|000028d0| 29 2f 48 46 41 4b 0d 0b | a4 1e 20 20 20 20 24 6e |)/HFAK..|.. $n|
|000028e0| 68 73 69 7a 65 62 75 66 | 66 25 3d c3 28 a8 28 48 |hsizebuf|f%=.(.(H|
|000028f0| 53 4e 29 29 0d 0b ae 33 | 20 20 20 20 c8 99 20 22 |SN))...3| .. "|
|00002900| 57 69 6d 70 5f 46 6f 72 | 63 65 52 65 64 72 61 77 |Wimp_For|ceRedraw|
|00002910| 22 2c 76 61 6c 75 65 5f | 68 25 2c 30 2c 2d 34 35 |",value_|h%,0,-45|
|00002920| 30 2c 35 35 30 2c 30 0d | 0b b8 08 20 20 20 cd 0d |0,550,0.|... ..|
|00002930| 0b c2 07 20 20 cd 0d 0b | cc 24 20 20 e7 20 68 61 |... ...|.$ . ha|
|00002940| 6e 64 6c 65 25 3d 76 61 | 6c 75 65 5f 68 25 20 80 |ndle%=va|lue_h% .|
|00002950| 20 69 63 6f 6e 25 3d 38 | 20 8c 0d 0b d6 0f 20 20 | icon%=8| ..... |
|00002960| 20 e7 20 a4 6e 6f 6b 20 | 8c 0d 0b e0 0e 20 20 20 | . .nok |..... |
|00002970| 20 f2 6e 65 77 5f 76 0d | 0b ea 38 20 20 20 20 e7 | .new_v.|..8 .|
|00002980| 20 48 53 4e 3d 30 20 8c | 20 f2 65 72 72 65 70 6f | HSN=0 .| .errepo|
|00002990| 72 74 28 22 49 6e 76 61 | 6c 69 64 20 76 61 6c 75 |rt("Inva|lid valu|
|000029a0| 65 20 66 6f 72 20 77 69 | 64 74 68 22 29 3a e1 0d |e for wi|dth"):..|
|000029b0| 0b f4 37 20 20 20 20 56 | 53 4e 3d 28 59 4d 41 58 |..7 V|SN=(YMAX|
|000029c0| 4e 2d 59 4d 49 4e 4e 29 | 2f 28 58 4d 41 58 4e 2d |N-YMINN)|/(XMAXN-|
|000029d0| 58 4d 49 4e 4e 29 2a 28 | 48 53 4e 2a 48 46 41 4b |XMINN)*(|HSN*HFAK|
|000029e0| 29 2f 56 46 41 4b 0d 0b | fe 1e 20 20 20 20 24 6e |)/VFAK..|.. $n|
|000029f0| 76 73 69 7a 65 62 75 66 | 66 25 3d c3 28 a8 28 56 |vsizebuf|f%=.(.(V|
|00002a00| 53 4e 29 29 0d 0c 08 33 | 20 20 20 20 c8 99 20 22 |SN))...3| .. "|
|00002a10| 57 69 6d 70 5f 46 6f 72 | 63 65 52 65 64 72 61 77 |Wimp_For|ceRedraw|
|00002a20| 22 2c 76 61 6c 75 65 5f | 68 25 2c 30 2c 2d 34 35 |",value_|h%,0,-45|
|00002a30| 30 2c 35 35 30 2c 30 0d | 0c 12 08 20 20 20 cd 0d |0,550,0.|... ..|
|00002a40| 0c 1c 07 20 20 cd 0d 0c | 26 06 20 cd 0d 0c 30 41 |... ...|&. ...0A|
|00002a50| 20 e7 20 5a 20 80 20 38 | 30 20 80 20 28 68 61 6e | . Z . 8|0 . (han|
|00002a60| 64 6c 65 25 3d 73 61 76 | 65 5f 68 25 20 84 20 68 |dle%=sav|e_h% . h|
|00002a70| 61 6e 64 6c 65 25 3d 73 | 70 73 61 76 65 5f 68 25 |andle%=s|psave_h%|
|00002a80| 29 20 80 20 69 63 6f 6e | 25 3d 30 20 8c 0d 0c 3a |) . icon|%=0 ...:|
|00002a90| 38 20 20 21 42 55 46 46 | 45 52 25 3d 68 61 6e 64 |8 !BUFF|ER%=hand|
|00002aa0| 6c 65 25 3a c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |le%:.. "|Wimp_Get|
|00002ab0| 57 69 6e 64 6f 77 53 74 | 61 74 65 22 2c 2c 42 55 |WindowSt|ate",,BU|
|00002ac0| 46 46 45 52 25 0d 0c 44 | 14 20 20 f2 77 69 6e 64 |FFER%..D|. .wind|
|00002ad0| 6f 77 5f 63 6f 6f 72 64 | 73 0d 0c 4e 26 20 20 21 |ow_coord|s..N& !|
|00002ae0| 42 55 46 46 45 52 25 3d | 68 61 6e 64 6c 65 25 3a |BUFFER%=|handle%:|
|00002af0| 42 55 46 46 45 52 25 21 | 34 3d 69 63 6f 6e 25 0d |BUFFER%!|4=icon%.|
|00002b00| 0c 58 25 20 20 c8 99 20 | 22 57 69 6d 70 5f 47 65 |.X% .. |"Wimp_Ge|
|00002b10| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 42 55 46 |tIconSta|te",,BUF|
|00002b20| 46 45 52 25 0d 0c 62 44 | 20 20 59 30 3d 59 31 2b |FER%..bD| Y0=Y1+|
|00002b30| 42 55 46 46 45 52 25 21 | 31 32 3a 58 31 3d 58 30 |BUFFER%!|12:X1=X0|
|00002b40| 2b 42 55 46 46 45 52 25 | 21 31 36 3a 58 30 2b 3d |+BUFFER%|!16:X0+=|
|00002b50| 42 55 46 46 45 52 25 21 | 38 3a 59 31 2b 3d 42 55 |BUFFER%!|8:Y1+=BU|
|00002b60| 46 46 45 52 25 21 32 30 | 0d 0c 6c 37 20 20 21 42 |FFER%!20|..l7 !B|
|00002b70| 55 46 46 45 52 25 3d 30 | 3a 42 55 46 46 45 52 25 |UFFER%=0|:BUFFER%|
|00002b80| 21 34 3d 35 3a 42 55 46 | 46 45 52 25 21 38 3d 58 |!4=5:BUF|FER%!8=X|
|00002b90| 30 3a 42 55 46 46 45 52 | 25 21 31 32 3d 59 30 0d |0:BUFFER|%!12=Y0.|
|00002ba0| 0c 76 3b 20 20 42 55 46 | 46 45 52 25 21 31 36 3d |.v; BUF|FER%!16=|
|00002bb0| 58 31 3a 42 55 46 46 45 | 52 25 21 32 30 3d 59 31 |X1:BUFFE|R%!20=Y1|
|00002bc0| 3a 42 55 46 46 45 52 25 | 21 32 34 3d 30 3a 42 55 |:BUFFER%|!24=0:BU|
|00002bd0| 46 46 45 52 25 21 32 38 | 3d 30 0d 0c 80 2f 20 20 |FFER%!28|=0.../ |
|00002be0| 42 55 46 46 45 52 25 21 | 33 32 3d 48 46 41 4b 2a |BUFFER%!|32=HFAK*|
|00002bf0| 48 52 45 53 3a 42 55 46 | 46 45 52 25 21 33 36 3d |HRES:BUF|FER%!36=|
|00002c00| 56 46 41 4b 2a 56 52 45 | 53 0d 0c 8a 20 20 20 c8 |VFAK*VRE|S... .|
|00002c10| 99 20 22 57 69 6d 70 5f | 44 72 61 67 42 6f 78 22 |. "Wimp_|DragBox"|
|00002c20| 2c 2c 42 55 46 46 45 52 | 25 0d 0c 94 33 20 20 53 |,,BUFFER|%...3 S|
|00002c30| 56 42 4f 58 3d b9 3a 53 | 42 55 54 54 4f 4e 25 3d |VBOX=.:S|BUTTON%=|
|00002c40| 5a 3a 53 56 54 59 50 45 | 3d 28 68 61 6e 64 6c 65 |Z:SVTYPE|=(handle|
|00002c50| 25 3d 73 70 73 61 76 65 | 5f 68 25 29 0d 0c 9e 32 |%=spsave|_h%)...2|
|00002c60| 20 20 e7 20 53 56 54 59 | 50 45 20 8c 20 53 56 42 | . SVTY|PE . SVB|
|00002c70| 25 3d 73 70 73 61 76 65 | 62 75 66 66 25 20 8b 20 |%=spsave|buff% . |
|00002c80| 53 56 42 25 3d 73 61 76 | 65 62 75 66 66 25 0d 0c |SVB%=sav|ebuff%..|
|00002c90| a8 06 20 cd 0d 0c b2 05 | e1 0d 0c bc 04 0d 0c c6 |.. .....|........|
|00002ca0| 0a dd 20 a4 6e 6f 6b 0d | 0c d0 08 20 ea 20 dc 0d |.. .nok.|... . ..|
|00002cb0| 0c da 0b 20 f7 20 8d 64 | 64 4c 0d 0c e4 32 20 dc |... . .d|dL...2 .|
|00002cc0| 20 22 72 65 61 6c 20 6d | 69 6e 22 2c 6e 78 6d 69 | "real m|in",nxmi|
|00002cd0| 6e 62 75 66 66 25 2c 22 | 72 65 61 6c 20 6d 61 78 |nbuff%,"|real max|
|00002ce0| 22 2c 6e 78 6d 61 78 62 | 75 66 66 25 0d 0c ee 3c |",nxmaxb|uff%...<|
|00002cf0| 20 dc 20 22 69 6d 61 67 | 69 6e 61 72 79 20 6d 69 | . "imag|inary mi|
|00002d00| 6e 22 2c 6e 79 6d 69 6e | 62 75 66 66 25 2c 22 69 |n",nymin|buff%,"i|
|00002d10| 6d 61 67 69 6e 61 72 79 | 20 6d 61 78 22 2c 6e 79 |maginary| max",ny|
|00002d20| 6d 61 78 62 75 66 66 25 | 0d 0c f8 0a 20 4e 4f 4b |maxbuff%|.... NOK|
|00002d30| 3d b9 0d 0d 02 0e 20 e3 | 20 4e 3d 31 20 b8 20 34 |=..... .| N=1 . 4|
|00002d40| 0d 0d 0c 0e 20 20 f3 20 | 56 24 2c 42 42 25 0d 0d |.... . |V$,BB%..|
|00002d50| 16 26 20 20 e7 20 ac 20 | a4 7a 74 65 73 74 28 24 |.& . . |.ztest($|
|00002d60| 42 42 25 29 20 84 20 94 | 28 bb 24 42 42 25 29 3e |BB%) . .|(.$BB%)>|
|00002d70| 3d 38 20 8c 0d 0d 20 29 | 20 20 20 f2 65 72 72 65 |=8 ... )| .erre|
|00002d80| 70 6f 72 74 28 22 49 6e | 76 61 6c 69 64 20 76 61 |port("In|valid va|
|00002d90| 6c 75 65 20 66 6f 72 20 | 22 2b 56 24 29 0d 0d 2a |lue for |"+V$)..*|
|00002da0| 0c 20 20 20 4e 4f 4b 3d | a3 0d 0d 34 07 20 20 cd |. NOK=|...4. .|
|00002db0| 0d 0d 3e 08 20 ed 20 4e | 0d 0d 48 08 3d 4e 4f 4b |..>. . N|..H.=NOK|
|00002dc0| 0d 0d 52 04 0d 0d 5c 11 | dd 20 f2 6e 65 77 5f 76 |..R...\.|. .new_v|
|00002dd0| 61 6c 75 65 73 0d 0d 66 | 0d 20 e7 20 a4 6e 6f 6b |alues..f|. . .nok|
|00002de0| 20 8c 0d 0d 70 29 20 20 | 58 4d 49 4e 3d bb 24 6e | ...p) |XMIN=.$n|
|00002df0| 78 6d 69 6e 62 75 66 66 | 25 3a 58 4d 41 58 3d bb |xminbuff|%:XMAX=.|
|00002e00| 24 6e 78 6d 61 78 62 75 | 66 66 25 0d 0d 7a 29 20 |$nxmaxbu|ff%..z) |
|00002e10| 20 59 4d 49 4e 3d bb 24 | 6e 79 6d 69 6e 62 75 66 | YMIN=.$|nyminbuf|
|00002e20| 66 25 3a 59 4d 41 58 3d | bb 24 6e 79 6d 61 78 62 |f%:YMAX=|.$nymaxb|
|00002e30| 75 66 66 25 0d 0d 84 14 | 20 20 54 4d 25 3d bb 24 |uff%....| TM%=.$|
|00002e40| 6e 74 6d 62 75 66 66 25 | 0d 0d 8e 2f 20 20 48 53 |ntmbuff%|.../ HS|
|00002e50| 49 5a 45 4e 3d bb 24 6e | 68 73 69 7a 65 62 75 66 |IZEN=.$n|hsizebuf|
|00002e60| 66 25 3a 56 53 49 5a 45 | 4e 3d bb 24 6e 76 73 69 |f%:VSIZE|N=.$nvsi|
|00002e70| 7a 65 62 75 66 66 25 0d | 0d 98 1b 20 20 e7 20 48 |zebuff%.|... . H|
|00002e80| 53 49 5a 45 4e 3c 32 20 | 8c 20 48 53 49 5a 45 4e |SIZEN<2 |. HSIZEN|
|00002e90| 3d 32 0d 0d a2 1b 20 20 | e7 20 56 53 49 5a 45 4e |=2.... |. VSIZEN|
|00002ea0| 3c 32 20 8c 20 56 53 49 | 5a 45 4e 3d 32 0d 0d ac |<2 . VSI|ZEN=2...|
|00002eb0| 3c 20 20 e7 20 48 53 49 | 5a 45 4e 2a 56 53 49 5a |< . HSI|ZEN*VSIZ|
|00002ec0| 45 4e 2b 35 31 32 3c 3e | 6d 61 6e 64 65 6c 6d 61 |EN+512<>|mandelma|
|00002ed0| 78 25 20 8c 20 46 24 3d | 22 22 3a 43 53 49 5a 45 |x% . F$=|"":CSIZE|
|00002ee0| 3d b9 3a e5 20 8d 64 50 | 42 0d 0d b6 14 20 20 f2 |=.:. .dP|B.... .|
|00002ef0| 65 6e 64 5f 6f 66 5f 63 | 68 61 6e 67 65 0d 0d c0 |end_of_c|hange...|
|00002f00| 06 20 cd 0d 0d ca 05 e1 | 0d 0d d4 04 0d 0d de 0c |. ......|........|
|00002f10| dd 20 f2 6e 65 77 5f 76 | 0d 0d e8 2a 20 58 4d 49 |. .new_v|...* XMI|
|00002f20| 4e 4e 3d bb 24 6e 78 6d | 69 6e 62 75 66 66 25 3a |NN=.$nxm|inbuff%:|
|00002f30| 58 4d 41 58 4e 3d bb 24 | 6e 78 6d 61 78 62 75 66 |XMAXN=.$|nxmaxbuf|
|00002f40| 66 25 0d 0d f2 2a 20 59 | 4d 49 4e 4e 3d bb 24 6e |f%...* Y|MINN=.$n|
|00002f50| 79 6d 69 6e 62 75 66 66 | 25 3a 59 4d 41 58 4e 3d |yminbuff|%:YMAXN=|
|00002f60| bb 24 6e 79 6d 61 78 62 | 75 66 66 25 0d 0d fc 28 |.$nymaxb|uff%...(|
|00002f70| 20 48 53 4e 3d bb 24 6e | 68 73 69 7a 65 62 75 66 | HSN=.$n|hsizebuf|
|00002f80| 66 25 3a 56 53 4e 3d bb | 24 6e 76 73 69 7a 65 62 |f%:VSN=.|$nvsizeb|
|00002f90| 75 66 66 25 0d 0e 06 05 | e1 0d 0e 10 04 0d 0e 1a |uff%....|........|
|00002fa0| 14 dd 20 f2 65 6e 64 5f | 6f 66 5f 63 68 61 6e 67 |.. .end_|of_chang|
|00002fb0| 65 0d 0e 24 2c 20 24 68 | 73 69 7a 65 62 75 66 66 |e..$, $h|sizebuff|
|00002fc0| 25 3d c3 48 53 49 5a 45 | 4e 3a 24 76 73 69 7a 65 |%=.HSIZE|N:$vsize|
|00002fd0| 62 75 66 66 25 3d c3 56 | 53 49 5a 45 4e 0d 0e 2e |buff%=.V|SIZEN...|
|00002fe0| 39 20 48 53 49 5a 45 3d | 48 53 49 5a 45 4e 3a 56 |9 HSIZE=|HSIZEN:V|
|00002ff0| 53 49 5a 45 3d 56 53 49 | 5a 45 4e 3a 6d 61 6e 64 |SIZE=VSI|ZEN:mand|
|00003000| 65 6c 6d 61 78 25 3d 48 | 53 49 5a 45 2a 56 53 49 |elmax%=H|SIZE*VSI|
|00003010| 5a 45 2b 35 31 32 0d 0e | 38 1f 20 21 63 79 63 6c |ZE+512..|8. !cycl|
|00003020| 65 6e 3d 28 48 53 49 5a | 45 2a 56 53 49 5a 45 2b |en=(HSIZ|E*VSIZE+|
|00003030| 33 29 81 20 34 0d 0e 42 | 0f 20 f2 61 75 74 6f 5f |3). 4..B|. .auto_|
|00003040| 7a 6f 6f 6d 0d 0e 4c 1e | 20 f2 72 65 69 6e 69 74 |zoom..L.| .reinit|
|00003050| 69 61 6c 69 73 65 5f 6d | 61 69 6e 5f 77 69 6e 64 |ialise_m|ain_wind|
|00003060| 6f 77 0d 0e 56 2b 20 f2 | 63 6f 70 79 5f 76 61 6c |ow..V+ .|copy_val|
|00003070| 75 65 73 3a f2 63 6c 65 | 61 72 5f 61 6c 6c 3a f2 |ues:.cle|ar_all:.|
|00003080| 73 74 61 72 74 5f 63 61 | 6c 63 28 b9 29 0d 0e 60 |start_ca|lc(.)..`|
|00003090| 1a 20 f2 63 61 6c 63 5f | 6f 6e 3a 43 41 4c 43 55 |. .calc_|on:CALCU|
|000030a0| 4c 41 54 45 44 3d b9 0d | 0e 6a 38 20 f2 72 65 73 |LATED=..|.j8 .res|
|000030b0| 65 74 28 22 41 62 6f 72 | 22 2c 4d 45 4e 55 25 2c |et("Abor|",MENU%,|
|000030c0| 38 2c 32 32 29 3a f2 72 | 65 73 65 74 28 22 53 61 |8,22):.r|eset("Sa|
|000030d0| 76 65 22 2c 4d 45 4e 55 | 25 2c 38 2c 32 32 29 0d |ve",MENU|%,8,22).|
|000030e0| 0e 74 24 20 43 48 41 3d | a3 3a f2 72 65 73 65 74 |.t$ CHA=|.:.reset|
|000030f0| 28 22 43 75 72 72 22 2c | 4d 45 4e 55 25 2c 38 2c |("Curr",|MENU%,8,|
|00003100| 32 32 29 0d 0e 7e 33 20 | c8 99 20 22 57 69 6d 70 |22)..~3 |.. "Wimp|
|00003110| 5f 46 6f 72 63 65 52 65 | 64 72 61 77 22 2c 77 69 |_ForceRe|draw",wi|
|00003120| 6e 64 6f 77 5f 68 25 2c | 30 2c 2d 56 45 58 54 2c |ndow_h%,|0,-VEXT,|
|00003130| 48 45 58 54 2c 30 0d 0e | 88 05 e1 0d 0e 92 04 0d |HEXT,0..|........|
|00003140| 0e 9c 1b dd 20 f2 73 61 | 76 65 5f 62 79 5f 6e 61 |.... .sa|ve_by_na|
|00003150| 6d 65 28 53 50 52 46 4c | 47 29 0d 0e a6 0f 20 e7 |me(SPRFL|G).... .|
|00003160| 20 53 50 52 46 4c 47 20 | 8c 0d 0e b0 41 20 20 21 | SPRFLG |....A !|
|00003170| 42 55 46 46 45 52 25 3d | 73 70 73 61 76 65 5f 68 |BUFFER%=|spsave_h|
|00003180| 25 3a 42 55 46 46 45 52 | 25 21 34 3d 32 3a 42 55 |%:BUFFER|%!4=2:BU|
|00003190| 46 46 45 52 25 21 38 3d | 31 3c 3c 32 31 3a 42 55 |FFER%!8=|1<<21:BU|
|000031a0| 46 46 45 52 25 21 31 32 | 3d 30 0d 0e ba 25 20 20 |FFER%!12|=0...% |
|000031b0| c8 99 20 22 57 69 6d 70 | 5f 53 65 74 49 63 6f 6e |.. "Wimp|_SetIcon|
|000031c0| 53 74 61 74 65 22 2c 2c | 42 55 46 46 45 52 25 0d |State",,|BUFFER%.|
|000031d0| 0e c4 16 20 20 53 56 42 | 25 3d 73 70 73 61 76 65 |... SVB|%=spsave|
|000031e0| 62 75 66 66 25 0d 0e ce | 18 20 20 e7 20 a4 72 65 |buff%...|. . .re|
|000031f0| 61 64 5f 6d 6f 64 65 3d | a3 20 8c 20 e1 0d 0e d8 |ad_mode=|. . ....|
|00003200| 06 20 cc 0d 0e e2 14 20 | 20 53 56 42 25 3d 73 61 |. ..... | SVB%=sa|
|00003210| 76 65 62 75 66 66 25 0d | 0e ec 06 20 cd 0d 0e f6 |vebuff%.|... ....|
|00003220| 14 20 e7 20 a7 24 53 56 | 42 25 2c 22 2e 22 29 20 |. . .$SV|B%,".") |
|00003230| 8c 0d 0f 00 14 20 20 e7 | 20 43 41 4c 43 55 4c 41 |..... .| CALCULA|
|00003240| 54 45 44 20 8c 0d 0f 0a | 0f 20 20 20 46 24 3d 24 |TED ....|. F$=$|
|00003250| 53 56 42 25 0d 0f 14 11 | 20 20 20 e7 20 53 50 52 |SVB%....| . SPR|
|00003260| 46 4c 47 20 8c 0d 0f 1e | 22 20 20 20 20 e7 20 a4 |FLG ....|" . .|
|00003270| 73 61 76 65 5f 73 70 72 | 69 74 65 28 46 24 2c 43 |save_spr|ite(F$,C|
|00003280| 53 41 56 45 29 20 8c 0d | 0f 28 3e 20 20 20 20 20 |SAVE) ..|.(> |
|00003290| e7 20 46 24 3c 3e 57 69 | 6d 70 24 20 8c 20 24 73 |. F$<>Wi|mp$ . $s|
|000032a0| 70 73 61 76 65 62 75 66 | 66 25 3d 46 24 20 8b 20 |psavebuf|f%=F$ . |
|000032b0| 24 73 70 73 61 76 65 62 | 75 66 66 25 3d 22 53 70 |$spsaveb|uff%="Sp|
|000032c0| 72 69 74 65 22 0d 0f 32 | 21 20 20 20 20 20 c8 99 |rite"..2|! ..|
|000032d0| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e | "Wimp_C|reateMen|
|000032e0| 75 22 2c 2c 2d 31 0d 0f | 3c 09 20 20 20 20 cd 0d |u",,-1..|<. ..|
|000032f0| 0f 46 08 20 20 20 cc 0d | 0f 50 0b 20 20 20 20 ea |.F. ..|.P. .|
|00003300| 20 85 0d 0f 5a 1d 20 20 | 20 20 ee 20 85 20 ea 3a | ...Z. | . . .:|
|00003310| f2 65 72 72 65 70 6f 72 | 74 28 f6 24 29 3a e1 0d |.errepor|t(.$):..|
|00003320| 0f 64 10 20 20 20 20 f2 | 6f 70 74 69 6f 6e 73 0d |.d. .|options.|
|00003330| 0f 6e 3b 20 20 20 20 ff | 28 22 53 41 56 45 20 22 |.n; .|("SAVE "|
|00003340| 2b 46 24 2b 22 20 22 2b | c3 7e 4d 41 4e 44 45 4c |+F$+" "+|.~MANDEL|
|00003350| 25 2b 22 2b 22 2b c3 7e | 28 48 53 49 5a 45 2a 56 |%+"+"+.~|(HSIZE*V|
|00003360| 53 49 5a 45 2b 35 31 32 | 29 29 0d 0f 78 2a 20 20 |SIZE+512|))..x* |
|00003370| 20 20 ff 28 22 53 45 54 | 54 59 50 45 20 22 2b 46 | .("SET|TYPE "+F|
|00003380| 24 2b 22 20 22 2b 46 72 | 61 63 74 61 6c 54 79 70 |$+" "+Fr|actalTyp|
|00003390| 65 32 24 29 0d 0f 82 0d | 20 20 20 20 43 48 41 3d |e2$)....| CHA=|
|000033a0| a3 0d 0f 8c 0b 20 20 20 | 20 f7 20 85 0d 0f 96 20 |..... | . .... |
|000033b0| 20 20 20 20 c8 99 20 22 | 57 69 6d 70 5f 43 72 65 | .. "|Wimp_Cre|
|000033c0| 61 74 65 4d 65 6e 75 22 | 2c 2c 2d 31 0d 0f a0 3a |ateMenu"|,,-1...:|
|000033d0| 20 20 20 20 e7 20 46 24 | 3c 3e 57 69 6d 70 24 20 | . F$|<>Wimp$ |
|000033e0| 8c 20 24 73 61 76 65 62 | 75 66 66 25 3d 46 24 20 |. $saveb|uff%=F$ |
|000033f0| 8b 20 24 73 61 76 65 62 | 75 66 66 25 3d 22 46 72 |. $saveb|uff%="Fr|
|00003400| 61 63 74 61 6c 22 0d 0f | aa 36 20 20 20 20 e7 20 |actal"..|.6 . |
|00003410| 54 49 54 24 3c 3e 46 24 | 20 8c 20 54 49 54 24 3d |TIT$<>F$| . TIT$=|
|00003420| 46 24 3a f2 72 65 69 6e | 69 74 69 61 6c 69 73 65 |F$:.rein|itialise|
|00003430| 5f 6d 61 69 6e 5f 77 69 | 6e 64 6f 77 0d 0f b4 08 |_main_wi|ndow....|
|00003440| 20 20 20 cd 0d 0f be 07 | 20 20 cd 0d 0f c8 06 20 | .....| ..... |
|00003450| cc 0d 0f d2 40 20 20 f2 | 65 72 72 65 70 6f 72 74 |....@ .|erreport|
|00003460| 28 22 54 6f 20 73 61 76 | 65 2c 20 64 72 61 67 20 |("To sav|e, drag |
|00003470| 74 68 65 20 69 63 6f 6e | 20 74 6f 20 61 20 64 69 |the icon| to a di|
|00003480| 72 65 63 74 6f 72 79 20 | 76 69 65 77 65 72 2e 22 |rectory |viewer."|
|00003490| 29 0d 0f dc 06 20 cd 0d | 0f e6 05 e1 0d 0f f0 04 |).... ..|........|
|000034a0| 0d 0f fa 10 dd 20 a4 72 | 65 61 64 5f 6d 6f 64 65 |..... .r|ead_mode|
|000034b0| 0d 10 04 36 20 c8 99 20 | 22 57 69 6d 70 5f 57 68 |...6 .. |"Wimp_Wh|
|000034c0| 69 63 68 49 63 6f 6e 22 | 2c 73 70 73 61 76 65 5f |ichIcon"|,spsave_|
|000034d0| 68 25 2c 42 55 46 46 45 | 52 25 2c 31 3c 3c 32 31 |h%,BUFFE|R%,1<<21|
|000034e0| 2c 31 3c 3c 32 31 0d 10 | 0e 48 20 e7 20 21 42 55 |,1<<21..|.H . !BU|
|000034f0| 46 46 45 52 25 3c 33 20 | 84 20 21 42 55 46 46 45 |FFER%<3 |. !BUFFE|
|00003500| 52 25 3e 35 20 8c 20 f2 | 65 72 72 65 70 6f 72 74 |R%>5 . .|erreport|
|00003510| 28 22 4e 6f 20 6d 6f 64 | 65 20 6f 70 74 69 6f 6e |("No mod|e option|
|00003520| 20 73 65 6c 65 63 74 65 | 64 22 29 3a 3d a3 0d 10 | selecte|d"):=...|
|00003530| 18 0e 20 53 53 4d 4f 44 | 45 3d 31 35 0d 10 22 12 |.. SSMOD|E=15..".|
|00003540| 20 c8 8e 20 21 42 55 46 | 46 45 52 25 20 ca 0d 10 | .. !BUF|FER% ...|
|00003550| 2c 08 20 c9 20 33 0d 10 | 36 26 20 20 e7 20 4e 43 |,. . 3..|6& . NC|
|00003560| 4f 4c 3d 36 34 20 8c 20 | 53 53 4d 4f 44 45 3d eb |OL=64 . |SSMODE=.|
|00003570| 20 8b 20 53 53 4d 4f 44 | 45 3d 31 35 0d 10 40 08 | . SSMOD|E=15..@.|
|00003580| 20 c9 20 34 0d 10 4a 0e | 20 20 53 53 4d 4f 44 45 | . 4..J.| SSMODE|
|00003590| 3d 30 0d 10 54 0c 20 20 | c8 8e 20 eb 20 ca 0d 10 |=0..T. |.. . ...|
|000035a0| 5e 14 20 20 20 c9 20 31 | 35 3a 53 53 4d 4f 44 45 |^. . 1|5:SSMODE|
|000035b0| 3d 30 0d 10 68 17 20 20 | 20 c9 20 31 33 2c 31 30 |=0..h. | . 13,10|
|000035c0| 3a 53 53 4d 4f 44 45 3d | 34 0d 10 72 15 20 20 20 |:SSMODE=|4..r. |
|000035d0| c9 20 32 31 3a 53 53 4d | 4f 44 45 3d 31 38 0d 10 |. 21:SSM|ODE=18..|
|000035e0| 7c 15 20 20 20 c9 20 32 | 38 3a 53 53 4d 4f 44 45 ||. . 2|8:SSMODE|
|000035f0| 3d 32 35 0d 10 86 07 20 | 20 cb 0d 10 90 08 20 c9 |=25.... | ..... .|
|00003600| 20 35 0d 10 9a 18 20 20 | 53 53 4d 4f 44 45 3d bb | 5.... |SSMODE=.|
|00003610| 24 6d 6f 64 65 62 75 66 | 66 25 0d 10 a4 06 20 cb |$modebuf|f%.... .|
|00003620| 0d 10 ae 45 20 e7 20 42 | 55 46 46 45 52 25 21 34 |...E . B|UFFER%!4|
|00003630| 3c 3e 2d 31 20 80 20 42 | 55 46 46 45 52 25 21 34 |<>-1 . B|UFFER%!4|
|00003640| 3c 3e 37 20 8c 20 f2 65 | 72 72 65 70 6f 72 74 28 |<>7 . .e|rreport(|
|00003650| 22 53 65 6c 65 63 74 69 | 6f 6e 20 65 72 72 6f 72 |"Selecti|on error|
|00003660| 22 29 3a 3d a3 0d 10 b8 | 24 20 e7 20 42 55 46 46 |"):=....|$ . BUFF|
|00003670| 45 52 25 21 34 3d 37 20 | 8c 20 53 53 50 5a 3d b9 |ER%!4=7 |. SSPZ=.|
|00003680| 20 8b 20 53 53 50 5a 3d | a3 0d 10 c2 2f 20 c8 99 | . SSPZ=|..../ ..|
|00003690| 20 22 4f 53 5f 52 65 61 | 64 4d 6f 64 65 56 61 72 | "OS_Rea|dModeVar|
|000036a0| 69 61 62 6c 65 22 2c 53 | 53 4d 4f 44 45 2c 30 20 |iable",S|SMODE,0 |
|000036b0| b8 20 2c 2c 4d 46 4c 25 | 0d 10 cc 2f 20 c8 99 20 |. ,,MFL%|.../ .. |
|000036c0| 22 4f 53 5f 52 65 61 64 | 4d 6f 64 65 56 61 72 69 |"OS_Read|ModeVari|
|000036d0| 61 62 6c 65 22 2c 53 53 | 4d 4f 44 45 2c 33 20 b8 |able",SS|MODE,3 .|
|000036e0| 20 2c 2c 4e 43 53 50 0d | 10 d6 2f 20 c8 99 20 22 | ,,NCSP.|../ .. "|
|000036f0| 4f 53 5f 52 65 61 64 4d | 6f 64 65 56 61 72 69 61 |OS_ReadM|odeVaria|
|00003700| 62 6c 65 22 2c 53 53 4d | 4f 44 45 2c 36 20 b8 20 |ble",SSM|ODE,6 . |
|00003710| 2c 2c 53 50 4c 4c 0d 10 | e0 34 20 c8 99 20 22 4f |,,SPLL..|.4 .. "O|
|00003720| 53 5f 52 65 61 64 4d 6f | 64 65 56 61 72 69 61 62 |S_ReadMo|deVariab|
|00003730| 6c 65 22 2c 53 53 4d 4f | 44 45 2c 31 31 20 b8 20 |le",SSMO|DE,11 . |
|00003740| 2c 2c 53 50 48 52 3b 46 | 4c 47 0d 10 ea 5a 20 e7 |,,SPHR;F|LG...Z .|
|00003750| 20 28 4d 46 4c 25 20 80 | 20 31 29 20 84 20 28 4e | (MFL% .| 1) . (N|
|00003760| 43 53 50 3c 3e 31 20 80 | 20 4e 43 53 50 3c 3e 36 |CSP<>1 .| NCSP<>6|
|00003770| 33 29 20 84 20 28 46 4c | 47 20 80 20 32 29 20 8c |3) . (FL|G . 2) .|
|00003780| 20 f2 65 72 72 65 70 6f | 72 74 28 22 49 6e 76 61 | .errepo|rt("Inva|
|00003790| 6c 69 64 20 73 70 72 69 | 74 65 20 6d 6f 64 65 22 |lid spri|te mode"|
|000037a0| 29 3a 3d a3 0d 10 f4 21 | 20 e7 20 4e 43 53 50 3d |):=....!| . NCSP=|
|000037b0| 31 20 8c 20 43 53 41 56 | 45 3d a3 20 8b 20 43 53 |1 . CSAV|E=. . CS|
|000037c0| 41 56 45 3d b9 0d 10 fe | 1c 20 50 4f 53 50 25 3d |AVE=....|. POSP%=|
|000037d0| 28 53 50 4c 4c 2b 31 29 | 2f 28 53 50 48 52 2b 31 |(SPLL+1)|/(SPHR+1|
|000037e0| 29 0d 11 08 06 3d b9 0d | 11 12 04 0d 11 1c 1c dd |)....=..|........|
|000037f0| 20 a4 73 61 76 65 5f 73 | 70 72 69 74 65 28 46 24 | .save_s|prite(F$|
|00003800| 2c 43 46 4c 41 47 29 0d | 11 26 3b 20 e7 20 53 53 |,CFLAG).|.&; . SS|
|00003810| 50 5a 20 8c 20 53 48 5a | 4f 4f 4d 3d 48 5a 4f 4f |PZ . SHZ|OOM=HZOO|
|00003820| 4d 3a 53 56 5a 4f 4f 4d | 3d 56 5a 4f 4f 4d 20 8b |M:SVZOOM|=VZOOM .|
|00003830| 20 53 48 5a 4f 4f 4d 3d | 31 3a 53 56 5a 4f 4f 4d | SHZOOM=|1:SVZOOM|
|00003840| 3d 31 0d 11 30 16 20 48 | 47 48 54 3d 56 53 49 5a |=1..0. H|GHT=VSIZ|
|00003850| 45 2a 53 56 5a 4f 4f 4d | 0d 11 3a 42 20 e7 20 43 |E*SVZOOM|..:B . C|
|00003860| 46 4c 41 47 20 8c 20 57 | 44 54 48 3d 48 53 49 5a |FLAG . W|DTH=HSIZ|
|00003870| 45 2a 53 48 5a 4f 4f 4d | 2a 50 4f 53 50 25 20 8b |E*SHZOOM|*POSP% .|
|00003880| 20 57 44 54 48 3d 28 48 | 53 49 5a 45 2a 53 48 5a | WDTH=(H|SIZE*SHZ|
|00003890| 4f 4f 4d 2b 37 29 20 81 | 20 38 0d 11 44 1b 20 57 |OOM+7) .| 8..D. W|
|000038a0| 4f 52 44 57 49 44 54 48 | 3d 28 57 44 54 48 2b 33 |ORDWIDTH|=(WDTH+3|
|000038b0| 29 20 81 20 34 0d 11 4e | 26 20 4c 41 53 54 4f 46 |) . 4..N|& LASTOF|
|000038c0| 46 3d 48 47 48 54 2a 34 | 2a 57 4f 52 44 57 49 44 |F=HGHT*4|*WORDWID|
|000038d0| 54 48 2b 34 2a 34 2b 31 | 31 2a 34 0d 11 58 17 20 |TH+4*4+1|1*4..X. |
|000038e0| 4e 58 54 53 50 52 49 3d | 4c 41 53 54 4f 46 46 2d |NXTSPRI=|LASTOFF-|
|000038f0| 31 36 0d 11 62 04 0d 11 | 6c 08 20 ea 20 85 0d 11 |16..b...|l. . ...|
|00003900| 76 17 20 ee 20 85 20 ea | 20 f2 65 72 72 6f 72 62 |v. . . .| .errorb|
|00003910| 6f 78 3a 3d a3 0d 11 80 | 0c 20 53 3d ae 28 46 24 |ox:=....|. S=.(F$|
|00003920| 29 0d 11 8a 33 20 e7 20 | 53 3d 30 20 8c 20 f2 65 |)...3 . |S=0 . .e|
|00003930| 72 72 65 70 6f 72 74 28 | 22 43 61 6e 27 74 20 6f |rreport(|"Can't o|
|00003940| 70 65 6e 20 6f 75 74 70 | 75 74 20 66 69 6c 65 22 |pen outp|ut file"|
|00003950| 29 3a 3d a3 0d 11 94 04 | 0d 11 9e 0a 20 50 25 3d |):=.....|.... P%=|
|00003960| 51 25 0d 11 a8 0b 20 5b | 4f 50 54 20 32 0d 11 b2 |Q%.... [|OPT 2...|
|00003970| 0b 20 45 51 55 44 20 31 | 0d 11 bc 0c 20 45 51 55 |. EQUD 1|.... EQU|
|00003980| 44 20 31 36 0d 11 c6 11 | 20 45 51 55 44 20 4c 41 |D 16....| EQUD LA|
|00003990| 53 54 4f 46 46 0d 11 d0 | 11 20 45 51 55 44 20 4e |STOFF...|. EQUD N|
|000039a0| 58 54 53 50 52 49 0d 11 | da 20 20 45 51 55 53 20 |XTSPRI..|. EQUS |
|000039b0| c0 22 66 72 61 63 74 61 | 6c 22 2b c4 31 32 2c bd |."fracta|l"+.12,.|
|000039c0| 30 29 2c 31 32 29 0d 11 | e4 15 20 45 51 55 44 20 |0),12)..|.. EQUD |
|000039d0| 57 4f 52 44 57 49 44 54 | 48 2d 31 0d 11 ee 10 20 |WORDWIDT|H-1.... |
|000039e0| 45 51 55 44 20 48 47 48 | 54 2d 31 0d 11 f8 0b 20 |EQUD HGH|T-1.... |
|000039f0| 45 51 55 44 20 30 0d 12 | 02 06 20 5d 0d 12 0c 0e |EQUD 0..|.. ]....|
|00003a00| 20 e7 20 43 46 4c 41 47 | 20 8c 0d 12 16 0c 20 20 | . CFLAG| ..... |
|00003a10| 5b 4f 50 54 20 32 0d 12 | 20 1e 20 20 45 51 55 44 |[OPT 2..| . EQUD|
|00003a20| 20 38 2a 28 57 44 54 48 | 20 83 20 34 29 2d 31 20 | 8*(WDTH| . 4)-1 |
|00003a30| 80 20 33 31 0d 12 2a 0f | 20 20 45 51 55 44 20 31 |. 31..*.| EQUD 1|
|00003a40| 31 2a 34 0d 12 34 0f 20 | 20 45 51 55 44 20 31 31 |1*4..4. | EQUD 11|
|00003a50| 2a 34 0d 12 3e 11 20 20 | 45 51 55 44 20 53 53 4d |*4..>. |EQUD SSM|
|00003a60| 4f 44 45 0d 12 48 07 20 | 20 5d 0d 12 52 06 20 cc |ODE..H. | ]..R. .|
|00003a70| 0d 12 5c 0c 20 20 5b 4f | 50 54 20 32 0d 12 66 20 |..\. [O|PT 2..f |
|00003a80| 20 20 45 51 55 44 20 28 | 48 53 49 5a 45 2a 53 48 | EQUD (|HSIZE*SH|
|00003a90| 5a 4f 4f 4d 2d 31 29 20 | 80 20 33 31 0d 12 70 0f |ZOOM-1) |. 31..p.|
|00003aa0| 20 20 45 51 55 44 20 31 | 31 2a 34 0d 12 7a 0f 20 | EQUD 1|1*4..z. |
|00003ab0| 20 45 51 55 44 20 31 31 | 2a 34 0d 12 84 11 20 20 | EQUD 11|*4.... |
|00003ac0| 45 51 55 44 20 53 53 4d | 4f 44 45 0d 12 8e 07 20 |EQUD SSM|ODE.... |
|00003ad0| 20 5d 0d 12 98 06 20 cd | 0d 12 a2 04 0d 12 ac 2f | ].... .|......./|
|00003ae0| 20 ee 20 85 20 ea 3a d9 | 23 53 3a ff 28 22 52 45 | . . .:.|#S:.("RE|
|00003af0| 4d 4f 56 45 20 22 2b 46 | 24 29 3a f2 65 72 72 65 |MOVE "+F|$):.erre|
|00003b00| 70 6f 72 74 28 f6 24 29 | 3a 3d a3 0d 12 b6 16 20 |port(.$)|:=..... |
|00003b10| c8 99 20 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 6e |.. "Hour|glass_On|
|00003b20| 22 0d 12 c0 13 20 e3 20 | 4e 25 3d 51 25 20 b8 20 |".... . |N%=Q% . |
|00003b30| 50 25 2d 31 0d 12 ca 11 | 20 d5 23 53 2c 3f 4e 25 |P%-1....| .#S,?N%|
|00003b40| 3a ed 20 4e 25 0d 12 d4 | 12 20 42 49 54 43 25 3d |:. N%...|. BITC%=|
|00003b50| 30 3a 42 42 25 3d 30 0d | 12 de 13 20 56 25 3d 4d |0:BB%=0.|... V%=M|
|00003b60| 41 4e 44 45 4c 25 2b 35 | 31 32 0d 12 e8 15 20 e3 |ANDEL%+5|12.... .|
|00003b70| 20 4e 25 3d 30 20 b8 20 | 56 53 49 5a 45 2d 31 0d | N%=0 . |VSIZE-1.|
|00003b80| 12 f2 2e 20 20 c8 99 20 | 22 48 6f 75 72 67 6c 61 |... .. |"Hourgla|
|00003b90| 73 73 5f 50 65 72 63 65 | 6e 74 61 67 65 22 2c 4e |ss_Perce|ntage",N|
|00003ba0| 25 2a 31 30 30 20 81 20 | 56 53 49 5a 45 0d 12 fc |%*100 . |VSIZE...|
|00003bb0| 0b 20 20 57 25 3d 56 25 | 0d 13 06 15 20 20 e3 20 |. W%=V%|.... . |
|00003bc0| 50 25 3d 31 20 b8 20 53 | 56 5a 4f 4f 4d 0d 13 10 |P%=1 . S|VZOOM...|
|00003bd0| 0c 20 20 20 56 25 3d 57 | 25 0d 13 1a 10 20 20 20 |. V%=W|%.... |
|00003be0| e7 20 43 46 4c 41 47 20 | 8c 0d 13 24 18 20 20 20 |. CFLAG |...$. |
|00003bf0| 20 e3 20 4d 25 3d 30 20 | b8 20 48 53 49 5a 45 2d | . M%=0 |. HSIZE-|
|00003c00| 31 0d 13 2e 1e 20 20 20 | 20 20 e3 20 4f 25 3d 31 |1.... | . O%=1|
|00003c10| 20 b8 20 53 48 5a 4f 4f | 4d 2a 50 4f 53 50 25 0d | . SHZOO|M*POSP%.|
|00003c20| 13 38 11 20 20 20 20 20 | 20 d5 23 53 2c 3f 56 25 |.8. | .#S,?V%|
|00003c30| 0d 13 42 0d 20 20 20 20 | 20 ed 20 4f 25 0d 13 4c |..B. | . O%..L|
|00003c40| 0e 20 20 20 20 20 56 25 | 2b 3d 31 0d 13 56 0c 20 |. V%|+=1..V. |
|00003c50| 20 20 20 ed 20 4d 25 0d | 13 60 17 20 20 20 20 e7 | . M%.|.`. .|
|00003c60| 20 57 44 54 48 20 83 20 | 34 3c 3e 30 20 8c 0d 13 | WDTH . |4<>0 ...|
|00003c70| 6a 22 20 20 20 20 20 e3 | 20 4d 25 3d 57 44 54 48 |j" .| M%=WDTH|
|00003c80| 20 b8 20 57 4f 52 44 57 | 49 44 54 48 2a 34 2d 31 | . WORDW|IDTH*4-1|
|00003c90| 0d 13 74 0f 20 20 20 20 | 20 20 d5 23 53 2c 30 0d |..t. | .#S,0.|
|00003ca0| 13 7e 0d 20 20 20 20 20 | ed 20 4d 25 0d 13 88 09 |.~. |. M%....|
|00003cb0| 20 20 20 20 cd 0d 13 92 | 08 20 20 20 cc 0d 13 9c | ....|. ....|
|00003cc0| 0f 20 20 20 20 42 59 54 | 43 25 3d 30 0d 13 a6 18 |. BYT|C%=0....|
|00003cd0| 20 20 20 20 e3 20 4d 25 | 3d 30 20 b8 20 48 53 49 | . M%|=0 . HSI|
|00003ce0| 5a 45 2d 31 0d 13 b0 18 | 20 20 20 20 20 e3 20 4f |ZE-1....| . O|
|00003cf0| 25 3d 31 20 b8 20 53 48 | 5a 4f 4f 4d 0d 13 ba 2e |%=1 . SH|ZOOM....|
|00003d00| 20 20 20 20 20 20 42 42 | 25 3d 28 42 42 25 3e 3e | BB|%=(BB%>>|
|00003d10| 31 29 2b 28 28 3f 56 25 | 20 80 20 31 29 3c 3c 37 |1)+((?V%| . 1)<<7|
|00003d20| 29 3a 42 49 54 43 25 2b | 3d 31 0d 13 c4 36 20 20 |):BITC%+|=1...6 |
|00003d30| 20 20 20 20 e7 20 42 49 | 54 43 25 3d 38 20 8c 20 | . BI|TC%=8 . |
|00003d40| d5 23 53 2c ac 20 42 42 | 25 3a 42 49 54 43 25 3d |.#S,. BB|%:BITC%=|
|00003d50| 30 3a 42 42 25 3d 30 3a | 42 59 54 43 25 2b 3d 31 |0:BB%=0:|BYTC%+=1|
|00003d60| 0d 13 ce 0d 20 20 20 20 | 20 ed 20 4f 25 0d 13 d8 |.... | . O%...|
|00003d70| 0e 20 20 20 20 20 56 25 | 2b 3d 31 0d 13 e2 0c 20 |. V%|+=1.... |
|00003d80| 20 20 20 ed 20 4d 25 0d | 13 ec 42 20 20 20 20 e7 | . M%.|..B .|
|00003d90| 20 42 49 54 43 25 3c 3e | 30 20 8c 20 42 42 25 3d | BITC%<>|0 . BB%=|
|00003da0| 42 42 25 3e 3e 28 38 2d | 42 49 54 43 25 29 3a d5 |BB%>>(8-|BITC%):.|
|00003db0| 23 53 2c ac 20 42 42 25 | 3a 42 49 54 43 25 3d 30 |#S,. BB%|:BITC%=0|
|00003dc0| 3a 42 59 54 43 25 2b 3d | 31 0d 13 f6 18 20 20 20 |:BYTC%+=|1.... |
|00003dd0| 20 e7 20 42 59 54 43 25 | 20 83 20 34 3c 3e 30 20 | . BYTC%| . 4<>0 |
|00003de0| 8c 0d 14 00 1e 20 20 20 | 20 20 e3 20 4e 3d 31 20 |..... | . N=1 |
|00003df0| b8 20 34 2d 28 42 59 54 | 43 25 20 83 20 34 29 0d |. 4-(BYT|C% . 4).|
|00003e00| 14 0a 0f 20 20 20 20 20 | 20 d5 23 53 2c 30 0d 14 |... | .#S,0..|
|00003e10| 14 0c 20 20 20 20 20 ed | 20 4e 0d 14 1e 09 20 20 |.. .| N.... |
|00003e20| 20 20 cd 0d 14 28 0d 20 | 20 20 20 42 42 25 3d 30 | ...(. | BB%=0|
|00003e30| 0d 14 32 08 20 20 20 cd | 0d 14 3c 0a 20 20 ed 20 |..2. .|..<. . |
|00003e40| 50 25 0d 14 46 09 20 ed | 20 4e 25 0d 14 50 08 20 |P%..F. .| N%..P. |
|00003e50| d9 23 53 0d 14 5a 1f 20 | ff 28 22 53 45 54 54 59 |.#S..Z. |.("SETTY|
|00003e60| 50 45 20 22 2b 46 24 2b | 22 20 53 50 52 49 54 45 |PE "+F$+|" SPRITE|
|00003e70| 22 29 0d 14 64 17 20 c8 | 99 20 22 48 6f 75 72 67 |")..d. .|. "Hourg|
|00003e80| 6c 61 73 73 5f 4f 66 66 | 22 0d 14 6e 08 20 f7 20 |lass_Off|"..n. . |
|00003e90| 85 0d 14 78 06 3d b9 0d | 14 82 04 0d 14 8c 13 dd |...x.=..|........|
|00003ea0| 20 f2 65 6e 74 65 72 5f | 77 69 6e 64 6f 77 0d 14 | .enter_|window..|
|00003eb0| 96 0d 20 f2 70 6f 69 6e | 74 65 72 0d 14 a0 1a 20 |.. .poin|ter.... |
|00003ec0| e7 20 68 61 6e 64 6c 65 | 25 3d 77 69 6e 64 6f 77 |. handle|%=window|
|00003ed0| 5f 68 25 20 8c 0d 14 aa | 1a 20 20 e7 20 43 41 4c |_h% ....|. . CAL|
|00003ee0| 43 55 4c 41 54 45 20 80 | 20 ac 20 48 47 20 8c 0d |CULATE .| . HG ..|
|00003ef0| 14 b4 22 20 20 20 c8 99 | 20 22 48 6f 75 72 67 6c |.." ..| "Hourgl|
|00003f00| 61 73 73 5f 53 74 61 72 | 74 22 2c 31 3a 48 47 3d |ass_Star|t",1:HG=|
|00003f10| b9 0d 14 be 3d 20 20 20 | c8 99 20 22 48 6f 75 72 |....= |.. "Hour|
|00003f20| 67 6c 61 73 73 5f 50 65 | 72 63 65 6e 74 61 67 65 |glass_Pe|rcentage|
|00003f30| 22 2c 28 31 30 30 2a 28 | 59 25 2a 48 53 49 5a 45 |",(100*(|Y%*HSIZE|
|00003f40| 2b 58 25 29 29 20 81 20 | 4c 41 52 47 45 25 0d 14 |+X%)) . |LARGE%..|
|00003f50| c8 07 20 20 cd 0d 14 d2 | 0e 20 20 e7 20 ac 20 48 |.. ....|. . . H|
|00003f60| 47 20 8c 0d 14 dc 3c 20 | 20 20 c8 99 20 22 57 69 |G ....< | .. "Wi|
|00003f70| 6d 70 5f 53 70 72 69 74 | 65 4f 70 22 2c 33 36 2c |mp_Sprit|eOp",36,|
|00003f80| 2c 22 70 74 72 5f 6d 61 | 6e 64 65 6c 22 2c 25 30 |,"ptr_ma|ndel",%0|
|00003f90| 31 30 30 30 31 30 2c 30 | 2c 37 2c 30 2c 2d 31 0d |100010,0|,7,0,-1.|
|00003fa0| 14 e6 07 20 20 cd 0d 14 | f0 06 20 cd 0d 14 fa 05 |... ...|.. .....|
|00003fb0| e1 0d 15 04 04 0d 15 0e | 13 dd 20 f2 6c 65 61 76 |........|.. .leav|
|00003fc0| 65 5f 77 69 6e 64 6f 77 | 0d 15 18 0b 20 e7 20 48 |e_window|.... . H|
|00003fd0| 47 20 8c 0d 15 22 1d 20 | 20 c8 99 20 22 48 6f 75 |G ...". | .. "Hou|
|00003fe0| 72 67 6c 61 73 73 5f 4f | 66 66 22 3a 48 47 3d a3 |rglass_O|ff":HG=.|
|00003ff0| 0d 15 2c 06 20 cc 0d 15 | 36 10 20 20 2a 50 4f 49 |..,. ...|6. *POI|
|00004000| 4e 54 45 52 20 31 0d 15 | 40 06 20 cd 0d 15 4a 05 |NTER 1..|@. ...J.|
|00004010| e1 0d 15 54 04 0d 15 5e | 10 dd 20 f2 6b 65 79 73 |...T...^|.. .keys|
|00004020| 74 72 6f 6b 65 0d 15 68 | 0a 50 52 46 4c 3d a3 0d |troke..h|.PRFL=..|
|00004030| 15 72 1a 20 e7 20 21 42 | 55 46 46 45 52 25 3d 76 |.r. . !B|UFFER%=v|
|00004040| 61 6c 75 65 5f 68 25 20 | 8c 0d 15 7c 15 20 20 c8 |alue_h% |...|. .|
|00004050| 8e 20 42 55 46 46 45 52 | 25 21 32 34 20 ca 0d 15 |. BUFFER|%!24 ...|
|00004060| 86 0c 20 20 c9 20 26 31 | 38 45 0d 15 90 23 20 20 |.. . &1|8E...# |
|00004070| 20 4e 49 3d 42 55 46 46 | 45 52 25 21 34 2b 31 3a | NI=BUFF|ER%!4+1:|
|00004080| e7 20 4e 49 3d 37 20 8c | 20 4e 49 3d 30 0d 15 9a |. NI=7 .| NI=0...|
|00004090| 42 20 20 20 c8 99 20 22 | 57 69 6d 70 5f 53 65 74 |B .. "|Wimp_Set|
|000040a0| 43 61 72 65 74 50 6f 73 | 69 74 69 6f 6e 22 2c 21 |CaretPos|ition",!|
|000040b0| 42 55 46 46 45 52 25 2c | 4e 49 2c 2c 2c 2d 31 2c |BUFFER%,|NI,,,-1,|
|000040c0| a4 73 74 72 69 6e 67 5f | 65 6e 64 28 4e 49 29 0d |.string_|end(NI).|
|000040d0| 15 a4 0d 20 20 20 50 52 | 46 4c 3d b9 0d 15 ae 0c |... PR|FL=.....|
|000040e0| 20 20 c9 20 26 31 38 46 | 0d 15 b8 24 20 20 20 4e | . &18F|...$ N|
|000040f0| 49 3d 42 55 46 46 45 52 | 25 21 34 2d 31 3a e7 20 |I=BUFFER|%!4-1:. |
|00004100| 4e 49 3d 2d 31 20 8c 20 | 4e 49 3d 36 0d 15 c2 42 |NI=-1 . |NI=6...B|
|00004110| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 53 65 74 43 | .. "W|imp_SetC|
|00004120| 61 72 65 74 50 6f 73 69 | 74 69 6f 6e 22 2c 21 42 |aretPosi|tion",!B|
|00004130| 55 46 46 45 52 25 2c 4e | 49 2c 2c 2c 2d 31 2c a4 |UFFER%,N|I,,,-1,.|
|00004140| 73 74 72 69 6e 67 5f 65 | 6e 64 28 4e 49 29 0d 15 |string_e|nd(NI)..|
|00004150| cc 0d 20 20 20 50 52 46 | 4c 3d b9 0d 15 d6 0b 20 |.. PRF|L=..... |
|00004160| 20 c9 20 26 30 44 0d 15 | e0 15 20 20 20 4e 49 3d | . &0D..|.. NI=|
|00004170| 42 55 46 46 45 52 25 21 | 34 2b 31 0d 15 ea 10 20 |BUFFER%!|4+1.... |
|00004180| 20 20 e7 20 4e 49 3c 3e | 37 20 8c 0d 15 f4 43 20 | . NI<>|7 ....C |
|00004190| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 53 65 74 43 | .. "W|imp_SetC|
|000041a0| 61 72 65 74 50 6f 73 69 | 74 69 6f 6e 22 2c 21 42 |aretPosi|tion",!B|
|000041b0| 55 46 46 45 52 25 2c 4e | 49 2c 2c 2c 2d 31 2c a4 |UFFER%,N|I,,,-1,.|
|000041c0| 73 74 72 69 6e 67 5f 65 | 6e 64 28 4e 49 29 0d 15 |string_e|nd(NI)..|
|000041d0| fe 08 20 20 20 cc 0d 16 | 08 2c 20 20 20 20 f2 6e |.. ...|., .n|
|000041e0| 65 77 5f 76 61 6c 75 65 | 73 3a c8 99 20 22 57 69 |ew_value|s:.. "Wi|
|000041f0| 6d 70 5f 43 72 65 61 74 | 65 4d 65 6e 75 22 2c 2c |mp_Creat|eMenu",,|
|00004200| 2d 31 0d 16 12 08 20 20 | 20 cd 0d 16 1c 0d 20 20 |-1.... | ..... |
|00004210| 20 50 52 46 4c 3d b9 0d | 16 26 07 20 20 cb 0d 16 | PRFL=..|.&. ...|
|00004220| 30 06 20 cd 0d 16 3a 4f | 20 e7 20 28 21 42 55 46 |0. ...:O| . (!BUF|
|00004230| 46 45 52 25 3d 73 61 76 | 65 5f 68 25 20 84 20 21 |FER%=sav|e_h% . !|
|00004240| 42 55 46 46 45 52 25 3d | 73 70 73 61 76 65 5f 68 |BUFFER%=|spsave_h|
|00004250| 25 29 20 80 20 42 55 46 | 46 45 52 25 21 34 3d 31 |%) . BUF|FER%!4=1|
|00004260| 20 80 20 42 55 46 46 45 | 52 25 21 32 34 3d 26 30 | . BUFFE|R%!24=&0|
|00004270| 44 20 8c 0d 16 44 27 20 | 20 f2 73 61 76 65 5f 62 |D ...D' | .save_b|
|00004280| 79 5f 6e 61 6d 65 28 21 | 42 55 46 46 45 52 25 3d |y_name(!|BUFFER%=|
|00004290| 73 70 73 61 76 65 5f 68 | 25 29 0d 16 4e 0c 20 20 |spsave_h|%)..N. |
|000042a0| 50 52 46 4c 3d b9 0d 16 | 58 06 20 cd 0d 16 5a 45 |PRFL=...|X. ...ZE|
|000042b0| 20 e7 20 21 42 55 46 46 | 45 52 25 3c 3e 73 61 76 | . !BUFF|ER%<>sav|
|000042c0| 65 5f 68 25 20 80 20 21 | 42 55 46 46 45 52 25 3c |e_h% . !|BUFFER%<|
|000042d0| 3e 76 61 6c 75 65 5f 68 | 25 20 80 20 21 42 55 46 |>value_h|% . !BUF|
|000042e0| 46 45 52 25 3c 3e 73 70 | 73 61 76 65 5f 68 25 20 |FER%<>sp|save_h% |
|000042f0| 8c 0d 16 5b 19 20 20 e7 | 20 42 55 46 46 45 52 25 |...[. .| BUFFER%|
|00004300| 21 32 34 3d 26 31 38 31 | 20 8c 0d 16 5c 14 20 20 |!24=&181| ...\. |
|00004310| 20 50 52 46 4c 3d b9 3a | f2 63 79 63 6c 65 0d 16 | PRFL=.:|.cycle..|
|00004320| 60 07 20 20 cd 0d 16 61 | 06 20 cd 0d 16 62 2f 20 |`. ...a|. ...b/ |
|00004330| e7 20 50 52 46 4c 3d a3 | 20 8c 20 c8 99 20 22 57 |. PRFL=.| . .. "W|
|00004340| 69 6d 70 5f 50 72 6f 63 | 65 73 73 4b 65 79 22 2c |imp_Proc|essKey",|
|00004350| 42 55 46 46 45 52 25 21 | 32 34 0d 16 6c 05 e1 0d |BUFFER%!|24..l...|
|00004360| 16 76 04 0d 16 80 17 dd | 20 a4 73 74 72 69 6e 67 |.v......| .string|
|00004370| 5f 65 6e 64 28 49 43 4f | 4e 29 0d 16 8a 09 20 f7 |_end(ICO|N).... .|
|00004380| 20 2b 31 0d 16 94 1e 20 | e3 20 4e 3d 31 20 b8 20 | +1.... |. N=1 . |
|00004390| 49 43 4f 4e 2b 31 3a f3 | 20 42 41 44 25 3a ed 20 |ICON+1:.| BAD%:. |
|000043a0| 4e 0d 16 9e 32 20 dc 20 | 68 73 69 7a 65 62 75 66 |N...2 . |hsizebuf|
|000043b0| 66 25 2c 76 73 69 7a 65 | 62 75 66 66 25 2c 6e 78 |f%,vsize|buff%,nx|
|000043c0| 6d 69 6e 62 75 66 66 25 | 2c 6e 78 6d 61 78 62 75 |minbuff%|,nxmaxbu|
|000043d0| 66 66 25 0d 16 a8 25 20 | dc 20 6e 79 6d 69 6e 62 |ff%...% |. nyminb|
|000043e0| 75 66 66 25 2c 6e 79 6d | 61 78 62 75 66 66 25 2c |uff%,nym|axbuff%,|
|000043f0| 6e 74 6d 62 75 66 66 25 | 0d 16 b2 0d 3d a9 28 24 |ntmbuff%|....=.($|
|00004400| 42 41 44 25 29 0d 16 bc | 04 0d 16 c6 0e dd 20 f2 |BAD%)...|...... .|
|00004410| 64 72 61 67 62 6f 78 0d | 16 d0 15 20 e7 20 68 61 |dragbox.|... . ha|
|00004420| 6e 64 6c 65 25 3d 2d 31 | 20 8c 20 e1 0d 16 da 38 |ndle%=-1| . ....8|
|00004430| 20 e7 20 a4 6c 65 61 66 | 28 24 53 56 42 25 29 3d | . .leaf|($SVB%)=|
|00004440| 22 22 20 8c 20 f2 65 72 | 72 65 70 6f 72 74 28 22 |"" . .er|report("|
|00004450| 49 6e 76 61 6c 69 64 20 | 46 69 6c 65 6e 61 6d 65 |Invalid |Filename|
|00004460| 22 29 3a e1 0d 16 e4 17 | 20 e7 20 a4 72 65 61 64 |"):.....| . .read|
|00004470| 5f 6d 6f 64 65 3d a3 20 | 8c 20 e1 0d 16 ee 0d 20 |_mode=. |. ..... |
|00004480| f2 70 6f 69 6e 74 65 72 | 0d 16 f8 5e 20 e7 20 68 |.pointer|...^ . h|
|00004490| 61 6e 64 6c 65 25 3d 77 | 69 6e 64 6f 77 5f 68 25 |andle%=w|indow_h%|
|000044a0| 20 84 20 28 68 61 6e 64 | 6c 65 25 3d 2d 32 20 80 | . (hand|le%=-2 .|
|000044b0| 20 69 63 6f 6e 25 3d 69 | 63 6f 6e 5f 68 25 29 20 | icon%=i|con_h%) |
|000044c0| 84 20 68 61 6e 64 6c 65 | 25 3d 73 70 73 61 76 65 |. handle|%=spsave|
|000044d0| 5f 68 25 20 84 20 68 61 | 6e 64 6c 65 25 3d 73 61 |_h% . ha|ndle%=sa|
|000044e0| 76 65 5f 68 25 8c 0d 17 | 02 2b 20 20 f2 65 72 72 |ve_h%...|.+ .err|
|000044f0| 65 70 6f 72 74 28 22 43 | 61 6e 27 74 20 73 61 76 |eport("C|an't sav|
|00004500| 65 20 69 6e 74 6f 20 6d | 79 73 65 6c 66 22 29 3a |e into m|yself"):|
|00004510| e1 0d 17 0c 06 20 cd 0d | 17 16 20 20 e7 20 68 61 |..... ..|.. . ha|
|00004520| 6e 64 6c 65 25 3e 3d 30 | 20 84 20 68 61 6e 64 6c |ndle%>=0| . handl|
|00004530| 65 25 3d 2d 32 20 8c 0d | 17 20 2d 20 20 21 42 55 |e%=-2 ..|. - !BU|
|00004540| 46 46 45 52 25 3d 34 34 | 2d 34 2a a8 28 2d 28 a9 |FFER%=44|-4*.(-(.|
|00004550| 28 a4 6c 65 61 66 28 24 | 53 56 42 25 29 29 2b 31 |(.leaf($|SVB%))+1|
|00004560| 29 2f 34 29 0d 17 2a 1f | 20 20 42 55 46 46 45 52 |)/4)..*.| BUFFER|
|00004570| 25 21 31 32 3d 30 3a 42 | 55 46 46 45 52 25 21 31 |%!12=0:B|UFFER%!1|
|00004580| 36 3d 31 0d 17 34 43 20 | 20 42 55 46 46 45 52 25 |6=1..4C | BUFFER%|
|00004590| 21 32 30 3d 68 61 6e 64 | 6c 65 25 3a 42 55 46 46 |!20=hand|le%:BUFF|
|000045a0| 45 52 25 21 32 34 3d 69 | 63 6f 6e 25 3a 42 55 46 |ER%!24=i|con%:BUF|
|000045b0| 46 45 52 25 21 32 38 3d | 58 3a 42 55 46 46 45 52 |FER%!28=|X:BUFFER|
|000045c0| 25 21 33 32 3d 59 0d 17 | 3e 10 20 20 e7 20 53 56 |%!32=Y..|>. . SV|
|000045d0| 54 59 50 45 20 8c 0d 17 | 48 27 20 20 20 53 53 57 |TYPE ...|H' SSW|
|000045e0| 3d 48 53 49 5a 45 3a e7 | 20 53 53 50 5a 20 8c 20 |=HSIZE:.| SSPZ . |
|000045f0| 53 53 57 3d 53 53 57 2a | 48 5a 4f 4f 4d 0d 17 52 |SSW=SSW*|HZOOM..R|
|00004600| 32 20 20 20 e7 20 ac 20 | 43 53 41 56 45 20 8c 20 |2 . . |CSAVE . |
|00004610| 53 53 57 3d 28 53 53 57 | 2b 37 29 20 81 20 38 20 |SSW=(SSW|+7) . 8 |
|00004620| 8b 20 53 53 57 3d 53 53 | 57 2a 50 4f 53 50 25 0d |. SSW=SS|W*POSP%.|
|00004630| 17 5c 27 20 20 20 53 53 | 48 3d 56 53 49 5a 45 3a |.\' SS|H=VSIZE:|
|00004640| e7 20 53 53 50 5a 20 8c | 20 53 53 56 3d 53 53 56 |. SSPZ .| SSV=SSV|
|00004650| 2a 56 5a 4f 4f 4d 0d 17 | 66 2a 20 20 20 42 55 46 |*VZOOM..|f* BUF|
|00004660| 46 45 52 25 21 33 36 3d | 34 2a 28 28 53 53 57 2b |FER%!36=|4*((SSW+|
|00004670| 33 29 20 81 20 34 29 2a | 53 53 48 2b 31 34 2a 34 |3) . 4)*|SSH+14*4|
|00004680| 0d 17 70 07 20 20 cc 0d | 17 7a 21 20 20 20 42 55 |..p. ..|.z! BU|
|00004690| 46 46 45 52 25 21 33 36 | 3d 48 53 49 5a 45 2a 56 |FFER%!36|=HSIZE*V|
|000046a0| 53 49 5a 45 2b 35 31 32 | 0d 17 84 07 20 20 cd 0d |SIZE+512|.... ..|
|000046b0| 17 8e 1d 20 20 42 55 46 | 46 45 52 25 21 34 30 3d |... BUF|FER%!40=|
|000046c0| 46 72 61 63 74 61 6c 54 | 79 70 65 32 0d 17 98 20 |FractalT|ype2... |
|000046d0| 20 20 e7 20 53 56 54 59 | 50 45 20 8c 20 42 55 46 | . SVTY|PE . BUF|
|000046e0| 46 45 52 25 21 34 30 3d | 26 46 46 39 0d 17 a2 23 |FER%!40=|&FF9...#|
|000046f0| 20 20 24 28 42 55 46 46 | 45 52 25 2b 34 34 29 3d | $(BUFF|ER%+44)=|
|00004700| a4 6c 65 61 66 28 24 53 | 56 42 25 29 2b bd 30 0d |.leaf($S|VB%)+.0.|
|00004710| 17 ac 34 20 20 c8 99 20 | 22 57 69 6d 70 5f 53 65 |..4 .. |"Wimp_Se|
|00004720| 6e 64 4d 65 73 73 61 67 | 65 22 2c 31 37 2c 42 55 |ndMessag|e",17,BU|
|00004730| 46 46 45 52 25 2c 68 61 | 6e 64 6c 65 25 2c 69 63 |FFER%,ha|ndle%,ic|
|00004740| 6f 6e 25 0d 17 b6 0e 20 | 20 53 41 56 49 4e 47 3d |on%.... | SAVING=|
|00004750| b9 0d 17 c0 06 20 cd 0d | 17 ca 05 e1 0d 17 d4 04 |..... ..|........|
|00004760| 0d 17 de 0f dd 20 a4 6c | 65 61 66 28 4e 24 29 0d |..... .l|eaf(N$).|
|00004770| 17 e8 0c 20 4e 3d a9 28 | 4e 24 29 0d 17 f2 1f 20 |... N=.(|N$).... |
|00004780| c8 95 20 a4 6c 65 74 74 | 65 72 28 c1 4e 24 2c 4e |.. .lett|er(.N$,N|
|00004790| 2c 31 29 29 20 80 20 4e | 3e 30 0d 17 fc 0b 20 20 |,1)) . N|>0.... |
|000047a0| 4e 3d 4e 2d 31 0d 18 06 | 06 20 ce 0d 18 10 0d 3d |N=N-1...|. .....=|
|000047b0| c1 4e 24 2c 4e 2b 31 29 | 0d 18 1a 04 0d 18 24 11 |.N$,N+1)|......$.|
|000047c0| dd 20 a4 6c 65 74 74 65 | 72 28 4c 24 29 0d 18 2e |. .lette|r(L$)...|
|000047d0| 08 ea 20 41 4c 0d 18 38 | 0d 20 41 4c 3d 97 28 4c |.. AL..8|. AL=.(L|
|000047e0| 24 29 0d 18 42 1a 3d 28 | 41 4c 3c 3e 97 22 2e 22 |$)..B.=(|AL<>."."|
|000047f0| 20 80 20 41 4c 3c 3e 97 | 22 3a 22 29 0d 18 4c 04 | . AL<>.|":")..L.|
|00004800| 0d 18 56 0e dd 20 f2 72 | 65 63 65 69 76 65 0d 18 |..V.. .r|eceive..|
|00004810| 60 23 20 52 45 46 25 3d | 42 55 46 46 45 52 25 21 |`# REF%=|BUFFER%!|
|00004820| 38 3a 54 41 53 4b 25 3d | 42 55 46 46 45 52 25 21 |8:TASK%=|BUFFER%!|
|00004830| 34 0d 18 6a 14 20 c8 8e | 20 42 55 46 46 45 52 25 |4..j. ..| BUFFER%|
|00004840| 21 31 36 20 ca 0d 18 74 | 08 20 c9 20 30 0d 18 7e |!16 ...t|. . 0..~|
|00004850| 0f 20 20 e7 20 ac 20 43 | 48 41 20 8c 0d 18 88 10 |. . . C|HA .....|
|00004860| 20 20 20 f2 66 69 6e 69 | 73 68 3a e0 0d 18 92 07 | .fini|sh:.....|
|00004870| 20 20 cc 0d 18 9c 2f 20 | 20 20 21 42 55 46 46 45 | ..../ | !BUFFE|
|00004880| 52 25 3d 32 30 3a 42 55 | 46 46 45 52 25 21 31 32 |R%=20:BU|FFER%!12|
|00004890| 3d 52 45 46 25 3a 42 55 | 46 46 45 52 25 21 31 36 |=REF%:BU|FFER%!16|
|000048a0| 3d 30 0d 18 a6 27 20 20 | 20 c8 99 20 22 57 69 6d |=0...' | .. "Wim|
|000048b0| 70 5f 53 65 6e 64 4d 65 | 73 73 61 67 65 22 2c 31 |p_SendMe|ssage",1|
|000048c0| 39 2c 42 55 46 46 45 52 | 25 0d 18 b0 1d 20 20 20 |9,BUFFER|%.... |
|000048d0| e7 20 a4 63 6f 6e 66 69 | 72 6d 20 8c 20 f2 66 69 |. .confi|rm . .fi|
|000048e0| 6e 69 73 68 3a e0 0d 18 | ba 07 20 20 cd 0d 18 c4 |nish:...|.. ....|
|000048f0| 0d 20 c9 20 26 34 30 30 | 43 31 0d 18 ce 2b 20 20 |. . &400|C1...+ |
|00004900| 48 46 4f 3d 48 46 41 4b | 3a 56 46 4f 3d 56 46 41 |HFO=HFAK|:VFO=VFA|
|00004910| 4b 3a 50 4f 4f 3d 50 4f | 46 46 25 3a 4e 43 4f 4f |K:POO=PO|FF%:NCOO|
|00004920| 3d 4e 43 4f 4c 0d 18 d8 | 15 20 20 f2 72 65 61 64 |=NCOL...|. .read|
|00004930| 76 64 75 69 6e 66 6f 28 | b9 29 0d 18 e2 3c 20 20 |vduinfo(|.)...< |
|00004940| e7 20 ac 20 a4 76 61 6c | 69 64 5f 63 6f 6c 6f 75 |. . .val|id_colou|
|00004950| 72 73 20 80 20 57 69 6e | 64 6f 77 4f 70 65 6e 20 |rs . Win|dowOpen |
|00004960| 8c 20 f2 64 69 73 70 5f | 6f 66 66 20 8b 20 f2 64 |. .disp_|off . .d|
|00004970| 69 73 70 5f 6f 6e 0d 18 | ec 39 20 20 e7 20 48 46 |isp_on..|.9 . HF|
|00004980| 41 4b 3c 3e 48 46 4f 20 | 84 20 56 46 41 4b 3c 3e |AK<>HFO |. VFAK<>|
|00004990| 56 46 4f 20 84 20 50 4f | 46 46 25 3c 3e 50 4f 4f |VFO . PO|FF%<>POO|
|000049a0| 20 84 20 4e 43 4f 4c 3c | 3e 4e 43 4f 4f 20 8c 0d | . NCOL<|>NCOO ..|
|000049b0| 18 f6 11 20 20 20 f2 61 | 75 74 6f 5f 7a 6f 6f 6d |... .a|uto_zoom|
|000049c0| 0d 19 00 20 20 20 20 f2 | 72 65 69 6e 69 74 69 61 |... .|reinitia|
|000049d0| 6c 69 73 65 5f 6d 61 69 | 6e 5f 77 69 6e 64 6f 77 |lise_mai|n_window|
|000049e0| 0d 19 0a 07 20 20 cd 0d | 19 14 16 20 20 58 50 3d |.... ..|... XP=|
|000049f0| 58 25 2a 48 46 41 4b 2a | 48 5a 4f 4f 4d 0d 19 1e |X%*HFAK*|HZOOM...|
|00004a00| 1b 20 20 59 50 3d 56 46 | 41 4b 2b 59 25 2a 56 46 |. YP=VF|AK+Y%*VF|
|00004a10| 41 4b 2a 56 5a 4f 4f 4d | 0d 19 28 25 20 20 58 50 |AK*VZOOM|..(% XP|
|00004a20| 46 25 3d 48 46 41 4b 2a | 48 5a 4f 4f 4d 3a 59 50 |F%=HFAK*|HZOOM:YP|
|00004a30| 46 25 3d 56 46 41 4b 2a | 56 5a 4f 4f 4d 0d 19 32 |F%=VFAK*|VZOOM..2|
|00004a40| 0e 20 20 f2 70 6f 69 6e | 74 65 72 0d 19 3c 26 20 |. .poin|ter..<& |
|00004a50| 20 e7 20 68 61 6e 64 6c | 65 25 3d 77 69 6e 64 6f | . handl|e%=windo|
|00004a60| 77 5f 68 25 20 80 20 69 | 63 6f 6e 25 3d 2d 31 20 |w_h% . i|con%=-1 |
|00004a70| 8c 0d 19 46 3c 20 20 20 | c8 99 20 22 57 69 6d 70 |...F< |.. "Wimp|
|00004a80| 5f 53 70 72 69 74 65 4f | 70 22 2c 33 36 2c 2c 22 |_SpriteO|p",36,,"|
|00004a90| 70 74 72 5f 6d 61 6e 64 | 65 6c 22 2c 25 30 31 30 |ptr_mand|el",%010|
|00004aa0| 30 30 31 30 2c 30 2c 37 | 2c 30 2c 2d 31 0d 19 50 |0010,0,7|,0,-1..P|
|00004ab0| 07 20 20 cd 0d 19 5a 08 | 20 c9 20 31 0d 19 64 44 |. ...Z.| . 1..dD|
|00004ac0| 20 20 c8 99 20 22 58 4f | 53 5f 52 65 61 64 56 61 | .. "XO|S_ReadVa|
|00004ad0| 72 56 61 6c 22 2c 22 57 | 69 6d 70 24 53 63 72 61 |rVal","W|imp$Scra|
|00004ae0| 70 22 2c 51 25 2c 71 6c | 65 6e 25 2c 30 2c 30 20 |p",Q%,ql|en%,0,0 |
|00004af0| b8 20 2c 2c 2c 50 4f 25 | 2c 54 59 3b 46 4c 47 25 |. ,,,PO%|,TY;FLG%|
|00004b00| 0d 19 6e 38 20 20 e7 20 | 46 4c 47 25 20 80 20 31 |..n8 . |FLG% . 1|
|00004b10| 20 8c 20 f2 65 72 72 65 | 70 6f 72 74 28 22 57 69 | . .erre|port("Wi|
|00004b20| 6d 70 24 53 63 72 61 70 | 20 6e 6f 74 20 64 65 66 |mp$Scrap| not def|
|00004b30| 69 6e 65 64 22 29 3a e1 | 0d 19 78 3b 20 20 e7 20 |ined"):.|..x; . |
|00004b40| 54 59 3d 31 20 8c 20 f2 | 65 72 72 65 70 6f 72 74 |TY=1 . .|erreport|
|00004b50| 28 22 49 6e 76 61 6c 69 | 64 20 63 6f 6e 74 65 6e |("Invali|d conten|
|00004b60| 74 20 6f 66 20 57 69 6d | 70 24 53 63 72 61 70 22 |t of Wim|p$Scrap"|
|00004b70| 29 3a e1 0d 19 82 43 20 | 20 42 55 46 46 45 52 25 |):....C | BUFFER%|
|00004b80| 21 31 32 3d 52 45 46 25 | 3a 42 55 46 46 45 52 25 |!12=REF%|:BUFFER%|
|00004b90| 21 33 36 3d 2d 31 3a 24 | 28 42 55 46 46 45 52 25 |!36=-1:$|(BUFFER%|
|00004ba0| 2b 34 34 29 3d 22 3c 57 | 69 6d 70 24 53 63 72 61 |+44)="<W|imp$Scra|
|00004bb0| 70 3e 22 2b bd 30 0d 19 | 8c 1f 20 20 42 55 46 46 |p>"+.0..|.. BUFF|
|00004bc0| 45 52 25 21 30 3d 36 30 | 3a 42 55 46 46 45 52 25 |ER%!0=60|:BUFFER%|
|00004bd0| 21 31 36 3d 32 0d 19 96 | 2c 20 20 c8 99 20 22 57 |!16=2...|, .. "W|
|00004be0| 69 6d 70 5f 53 65 6e 64 | 4d 65 73 73 61 67 65 22 |imp_Send|Message"|
|00004bf0| 2c 31 37 2c 42 55 46 46 | 45 52 25 2c 54 41 53 4b |,17,BUFF|ER%,TASK|
|00004c00| 25 0d 19 a0 0f 20 20 41 | 50 50 4c 4f 41 44 3d b9 |%.... A|PPLOAD=.|
|00004c10| 0d 19 aa 08 20 c9 20 33 | 0d 19 b4 14 20 20 e7 20 |.... . 3|.... . |
|00004c20| ac 20 41 77 61 69 74 41 | 63 6b 20 8c 0d 19 be 22 |. AwaitA|ck ...."|
|00004c30| 20 20 20 41 43 4b 54 41 | 53 4b 25 3d 54 41 53 4b | ACKTA|SK%=TASK|
|00004c40| 25 3a 41 43 4b 52 45 46 | 25 3d 52 45 46 25 0d 19 |%:ACKREF|%=REF%..|
|00004c50| c8 2f 20 20 20 e7 20 41 | 50 50 4c 4f 41 44 3d b9 |./ . A|PPLOAD=.|
|00004c60| 20 8c 20 41 50 50 4c 4f | 41 44 3d a3 3a 44 45 4c | . APPLO|AD=.:DEL|
|00004c70| 53 43 52 41 50 3d b9 3a | f2 6d 61 73 6b 0d 19 d2 |SCRAP=.:|.mask...|
|00004c80| 1d 20 20 20 46 24 3d a4 | 47 65 74 53 74 72 28 42 |. F$=.|GetStr(B|
|00004c90| 55 46 46 45 52 25 2b 34 | 34 29 0d 19 dc 21 20 20 |UFFER%+4|4)...! |
|00004ca0| 20 e7 20 43 48 41 20 8c | 20 4c 43 3d a4 63 6f 6e | . CHA .| LC=.con|
|00004cb0| 66 69 72 6d 20 8b 20 4c | 43 3d b9 0d 19 e6 21 20 |firm . L|C=....! |
|00004cc0| 20 20 e7 20 4c 43 20 8c | 20 41 43 4b 3d b9 3a e7 | . LC .| ACK=.:.|
|00004cd0| 20 ac 20 a4 6c 6f 61 64 | 20 8c 20 e1 0d 19 f0 07 | . .load| . .....|
|00004ce0| 20 20 cd 0d 19 fa 08 20 | c9 20 32 0d 1a 04 10 20 | ..... |. 2.... |
|00004cf0| 20 e7 20 53 41 56 49 4e | 47 20 8c 0d 1a 0e 1d 20 | . SAVIN|G ..... |
|00004d00| 20 20 46 24 3d a4 47 65 | 74 53 74 72 28 42 55 46 | F$=.Ge|tStr(BUF|
|00004d10| 46 45 52 25 2b 34 34 29 | 0d 1a 18 11 20 20 20 6f |FER%+44)|.... o|
|00004d20| 6c 64 43 48 41 3d 43 48 | 41 0d 1a 22 13 20 20 20 |ldCHA=CH|A..". |
|00004d30| e7 20 ac 20 53 56 54 59 | 50 45 20 8c 0d 1a 2c 0b |. . SVTY|PE ...,.|
|00004d40| 20 20 20 20 ea 20 85 0d | 1a 36 1d 20 20 20 20 ee | . ..|.6. .|
|00004d50| 20 85 20 ea 20 f2 65 72 | 72 65 70 6f 72 74 28 f6 | . . .er|report(.|
|00004d60| 24 29 3a e1 0d 1a 40 10 | 20 20 20 20 f2 6f 70 74 |$):...@.| .opt|
|00004d70| 69 6f 6e 73 0d 1a 4a 3f | 20 20 20 20 ff 28 22 53 |ions..J?| .("S|
|00004d80| 41 56 45 20 22 2b 46 24 | 2b 22 20 22 2b c3 7e 28 |AVE "+F$|+" "+.~(|
|00004d90| 4d 41 4e 44 45 4c 25 29 | 2b 22 20 2b 20 22 2b c3 |MANDEL%)|+" + "+.|
|00004da0| 7e 28 48 53 49 5a 45 2a | 56 53 49 5a 45 2b 35 31 |~(HSIZE*|VSIZE+51|
|00004db0| 32 29 29 0d 1a 54 2a 20 | 20 20 20 ff 28 22 53 45 |2))..T* | .("SE|
|00004dc0| 54 54 59 50 45 20 22 2b | 46 24 2b 22 20 22 2b 46 |TTYPE "+|F$+" "+F|
|00004dd0| 72 61 63 74 61 6c 54 79 | 70 65 32 24 29 0d 1a 5e |ractalTy|pe2$)..^|
|00004de0| 0b 20 20 20 20 f7 20 85 | 0d 1a 68 1a 20 20 20 20 |. . .|..h. |
|00004df0| e7 20 42 55 46 46 45 52 | 25 21 33 36 3c 3e 2d 31 |. BUFFER|%!36<>-1|
|00004e00| 20 8c 0d 1a 72 0e 20 20 | 20 20 20 43 48 41 3d a3 | ...r. | CHA=.|
|00004e10| 0d 1a 7c 45 20 20 20 20 | 20 e7 20 54 49 54 24 3c |..|E | . TIT$<|
|00004e20| 3e 46 24 20 8c 20 54 49 | 54 24 3d 46 24 3a 24 73 |>F$ . TI|T$=F$:$s|
|00004e30| 61 76 65 62 75 66 66 25 | 3d 46 24 3a f2 72 65 69 |avebuff%|=F$:.rei|
|00004e40| 6e 69 74 69 61 6c 69 73 | 65 5f 6d 61 69 6e 5f 77 |nitialis|e_main_w|
|00004e50| 69 6e 64 6f 77 0d 1a 86 | 09 20 20 20 20 cd 0d 1a |indow...|. ...|
|00004e60| 90 08 20 20 20 cc 0d 1a | 9a 22 20 20 20 20 e7 20 |.. ...|." . |
|00004e70| a4 73 61 76 65 5f 73 70 | 72 69 74 65 28 46 24 2c |.save_sp|rite(F$,|
|00004e80| 43 53 41 56 45 29 20 8c | 0d 1a a4 3e 20 20 20 20 |CSAVE) .|...> |
|00004e90| 20 e7 20 46 24 3c 3e 57 | 69 6d 70 24 20 8c 20 24 | . F$<>W|imp$ . $|
|00004ea0| 73 70 73 61 76 65 62 75 | 66 66 25 3d 46 24 20 8b |spsavebu|ff%=F$ .|
|00004eb0| 20 24 73 70 73 61 76 65 | 62 75 66 66 25 3d 22 53 | $spsave|buff%="S|
|00004ec0| 70 72 69 74 65 22 0d 1a | ae 09 20 20 20 20 cd 0d |prite"..|.. ..|
|00004ed0| 1a b8 08 20 20 20 cd 0d | 1a c2 37 20 20 20 42 55 |... ..|..7 BU|
|00004ee0| 46 46 45 52 25 21 31 36 | 3d 33 3a 42 55 46 46 45 |FFER%!16|=3:BUFFE|
|00004ef0| 52 25 21 31 32 3d 52 45 | 46 25 3a 24 28 42 55 46 |R%!12=RE|F%:$(BUF|
|00004f00| 46 45 52 25 2b 34 34 29 | 3d 46 24 2b bd 30 0d 1a |FER%+44)|=F$+.0..|
|00004f10| cc 24 20 20 20 21 42 55 | 46 46 45 52 25 3d 34 34 |.$ !BU|FFER%=44|
|00004f20| 2d 34 2a a8 28 2d 28 a9 | 28 46 24 29 2b 31 29 2f |-4*.(-(.|(F$)+1)/|
|00004f30| 34 29 0d 1a d6 2d 20 20 | 20 c8 99 20 22 57 69 6d |4)...- | .. "Wim|
|00004f40| 70 5f 53 65 6e 64 4d 65 | 73 73 61 67 65 22 2c 31 |p_SendMe|ssage",1|
|00004f50| 37 2c 42 55 46 46 45 52 | 25 2c 54 41 53 4b 25 0d |7,BUFFER|%,TASK%.|
|00004f60| 1a e0 20 20 20 20 53 41 | 56 49 4e 47 3d a3 3a 41 |.. SA|VING=.:A|
|00004f70| 77 61 69 74 41 63 6b 3d | b9 3a f2 6d 61 73 6b 0d |waitAck=|.:.mask.|
|00004f80| 1a ea 1f 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 43 |... ..| "Wimp_C|
|00004f90| 72 65 61 74 65 4d 65 6e | 75 22 2c 2c 2d 31 0d 1a |reateMen|u",,-1..|
|00004fa0| f4 07 20 20 cd 0d 1a fe | 08 20 c9 20 34 0d 1b 08 |.. ....|. . 4...|
|00004fb0| 23 20 20 e7 20 41 77 61 | 69 74 41 63 6b 20 8c 20 |# . Awa|itAck . |
|00004fc0| 41 77 61 69 74 41 63 6b | 3d a3 3a f2 6d 61 73 6b |AwaitAck|=.:.mask|
|00004fd0| 0d 1b 12 08 20 c9 20 35 | 0d 1b 1c 21 20 20 e7 20 |.... . 5|...! . |
|00004fe0| 42 55 46 46 45 52 25 21 | 34 30 3d 46 72 61 63 74 |BUFFER%!|40=Fract|
|00004ff0| 61 6c 54 79 70 65 32 20 | 8c 0d 1b 26 15 20 20 20 |alType2 |...&. |
|00005000| e7 20 ac 20 41 77 61 69 | 74 41 63 6b 20 8c 0d 1b |. . Awai|tAck ...|
|00005010| 30 23 20 20 20 20 41 43 | 4b 54 41 53 4b 25 3d 54 |0# AC|KTASK%=T|
|00005020| 41 53 4b 25 3a 41 43 4b | 52 45 46 25 3d 52 45 46 |ASK%:ACK|REF%=REF|
|00005030| 25 0d 1b 3a 1e 20 20 20 | 20 46 24 3d a4 47 65 74 |%..:. | F$=.Get|
|00005040| 53 74 72 28 42 55 46 46 | 45 52 25 2b 34 34 29 0d |Str(BUFF|ER%+44).|
|00005050| 1b 44 22 20 20 20 20 e7 | 20 43 48 41 20 8c 20 4c |.D" .| CHA . L|
|00005060| 43 3d a4 63 6f 6e 66 69 | 72 6d 20 8b 20 4c 43 3d |C=.confi|rm . LC=|
|00005070| b9 0d 1b 4e 22 20 20 20 | 20 e7 20 4c 43 20 8c 20 |...N" | . LC . |
|00005080| 41 43 4b 3d b9 3a e7 20 | ac 20 a4 6c 6f 61 64 20 |ACK=.:. |. .load |
|00005090| 8c 20 e1 0d 1b 58 08 20 | 20 20 cd 0d 1b 62 07 20 |. ...X. | ...b. |
|000050a0| 20 cd 0d 1b 6c 0b 20 c9 | 20 26 35 30 32 0d 1b 76 | ...l. .| &502..v|
|000050b0| 11 20 20 f2 68 65 6c 70 | 28 52 45 46 25 29 0d 1b |. .help|(REF%)..|
|000050c0| 80 06 20 cb 0d 1b 8a 05 | e1 0d 1b 94 04 0d 1b 9e |.. .....|........|
|000050d0| 11 dd 20 f2 68 65 6c 70 | 28 52 45 46 25 29 0d 1b |.. .help|(REF%)..|
|000050e0| a8 08 ea 20 54 24 0d 1b | b2 0a 20 54 24 3d 22 22 |... T$..|.. T$=""|
|000050f0| 0d 1b bc 14 20 c8 8e 20 | 42 55 46 46 45 52 25 21 |.... .. |BUFFER%!|
|00005100| 33 32 20 ca 0d 1b c6 09 | 20 c9 20 2d 32 0d 1b d0 |32 .....| . -2...|
|00005110| 4d 20 20 54 24 3d 22 54 | 68 69 73 20 69 73 20 74 |M T$="T|his is t|
|00005120| 68 65 20 4d 61 6e 64 65 | 6c 62 72 6f 74 20 69 63 |he Mande|lbrot ic|
|00005130| 6f 6e 2e 7c 4d 44 72 6f | 70 20 66 72 61 63 74 61 |on.|MDro|p fracta|
|00005140| 6c 20 66 69 6c 65 73 20 | 6f 6e 74 6f 20 74 68 69 |l files |onto thi|
|00005150| 73 20 69 63 6f 6e 2e 7c | 4d 22 0d 1b da 16 20 20 |s icon.||M".... |
|00005160| e7 20 ac 20 57 69 6e 64 | 6f 77 4f 70 65 6e 20 8c |. . Wind|owOpen .|
|00005170| 0d 1b e4 37 20 20 20 54 | 24 2b 3d 22 43 6c 69 63 |...7 T|$+="Clic|
|00005180| 6b 20 6f 6e 20 74 68 69 | 73 20 74 6f 20 6f 70 65 |k on thi|s to ope|
|00005190| 6e 20 61 20 4d 61 6e 64 | 65 6c 62 72 6f 74 20 77 |n a Mand|elbrot w|
|000051a0| 69 6e 64 6f 77 2e 22 0d | 1b ee 07 20 20 cc 0d 1b |indow.".|... ...|
|000051b0| f8 3a 20 20 20 54 24 2b | 3d 22 43 6c 69 63 6b 20 |.: T$+|="Click |
|000051c0| 6f 6e 20 74 68 69 73 20 | 74 6f 20 62 72 69 6e 67 |on this |to bring|
|000051d0| 20 74 68 65 20 77 69 6e | 64 6f 77 20 74 6f 20 74 | the win|dow to t|
|000051e0| 68 65 20 74 6f 70 2e 22 | 0d 1c 02 07 20 20 cd 0d |he top."|.... ..|
|000051f0| 1c 0c 10 20 c9 20 77 69 | 6e 64 6f 77 5f 68 25 0d |... . wi|ndow_h%.|
|00005200| 1c 16 17 20 20 e7 20 42 | 55 46 46 45 52 25 21 33 |... . B|UFFER%!3|
|00005210| 36 3d 2d 31 20 8c 0d 1c | 20 80 20 20 20 54 24 3d |6=-1 ...| . T$=|
|00005220| 22 54 68 69 73 20 69 73 | 20 74 68 65 20 4d 61 6e |"This is| the Man|
|00005230| 64 65 6c 62 72 6f 74 20 | 77 69 6e 64 6f 77 2e 7c |delbrot |window.||
|00005240| 4d 43 6c 69 63 6b 20 53 | 45 4c 45 43 54 20 61 6e |MClick S|ELECT an|
|00005250| 64 20 64 72 61 67 20 74 | 68 65 20 63 6f 72 6e 65 |d drag t|he corne|
|00005260| 72 20 6f 66 20 74 68 65 | 20 62 6f 78 20 74 6f 20 |r of the| box to |
|00005270| 7a 6f 6f 6d 20 61 20 70 | 61 72 69 63 75 6c 61 72 |zoom a p|aricular|
|00005280| 20 70 61 72 74 20 6f 66 | 20 74 68 65 20 66 72 61 | part of| the fra|
|00005290| 63 74 61 6c 2e 22 0d 1c | 2a 07 20 20 cd 0d 1c 34 |ctal."..|*. ...4|
|000052a0| 0f 20 c9 20 76 61 6c 75 | 65 5f 68 25 0d 1c 3e 41 |. . valu|e_h%..>A|
|000052b0| 20 20 54 24 3d 22 54 79 | 70 65 20 69 6e 20 6e 65 | T$="Ty|pe in ne|
|000052c0| 77 20 76 61 6c 75 65 73 | 20 61 6e 64 20 63 6f 6e |w values| and con|
|000052d0| 66 69 72 6d 20 74 68 65 | 6d 20 62 79 20 63 6c 69 |firm the|m by cli|
|000052e0| 63 6b 69 6e 67 20 6f 6e | 20 4f 4b 2e 22 0d 1c 48 |cking on| OK."..H|
|000052f0| 06 20 cb 0d 1c 52 0f 20 | e7 20 54 24 3c 3e 22 22 |. ...R. |. T$<>""|
|00005300| 20 8c 0d 1c 5c 45 20 20 | 42 55 46 46 45 52 25 21 | ...\E |BUFFER%!|
|00005310| 31 36 3d 26 35 30 33 3a | 42 55 46 46 45 52 25 21 |16=&503:|BUFFER%!|
|00005320| 31 32 3d 52 45 46 25 3a | 21 42 55 46 46 45 52 25 |12=REF%:|!BUFFER%|
|00005330| 3d 32 30 2d 34 2a a8 28 | 28 2d a9 28 54 24 29 2b |=20-4*.(|(-.(T$)+|
|00005340| 31 29 2f 34 29 2b 34 0d | 1c 66 19 20 20 24 28 42 |1)/4)+4.|.f. $(B|
|00005350| 55 46 46 45 52 25 2b 32 | 30 29 3d 54 24 2b bd 30 |UFFER%+2|0)=T$+.0|
|00005360| 0d 1c 70 2c 20 20 c8 99 | 20 22 57 69 6d 70 5f 53 |..p, ..| "Wimp_S|
|00005370| 65 6e 64 4d 65 73 73 61 | 67 65 22 2c 31 37 2c 42 |endMessa|ge",17,B|
|00005380| 55 46 46 45 52 25 2c 54 | 41 53 4b 25 0d 1c 7a 06 |UFFER%,T|ASK%..z.|
|00005390| 20 cd 0d 1c 84 05 e1 0d | 1c 8e 04 0d 1c 98 0e dd | .......|........|
|000053a0| 20 f2 70 6f 69 6e 74 65 | 72 0d 1c a2 21 20 c8 99 | .pointe|r...! ..|
|000053b0| 20 22 57 69 6d 70 5f 47 | 65 74 50 6f 69 6e 74 65 | "Wimp_G|etPointe|
|000053c0| 72 49 6e 66 6f 22 2c 2c | 51 25 0d 1c ac 32 20 58 |rInfo",,|Q%...2 X|
|000053d0| 3d 21 51 25 3a 59 3d 51 | 25 21 34 3a 5a 3d 51 25 |=!Q%:Y=Q|%!4:Z=Q%|
|000053e0| 21 38 3a 68 61 6e 64 6c | 65 25 3d 51 25 21 31 32 |!8:handl|e%=Q%!12|
|000053f0| 3a 69 63 6f 6e 25 3d 51 | 25 21 31 36 0d 1c b6 05 |:icon%=Q|%!16....|
|00005400| e1 0d 1c c0 04 0d 1c ca | 16 dd 20 f2 7a 6f 6f 6d |........|.. .zoom|
|00005410| 5f 65 6e 64 28 4d 58 2c | 4d 59 29 0d 1c d4 21 20 |_end(MX,|MY)...! |
|00005420| 5a 4f 4f 4d 42 4f 58 3d | a3 3a e7 20 4f 43 41 4c |ZOOMBOX=|.:. OCAL|
|00005430| 43 20 8c 20 f2 63 61 6c | 63 5f 6f 6e 0d 1c de 0a |C . .cal|c_on....|
|00005440| 20 f2 6d 61 73 6b 0d 1c | e8 27 20 f2 75 70 64 61 | .mask..|.' .upda|
|00005450| 74 65 5f 7a 6f 6f 6d 62 | 6f 78 28 5a 42 58 2c 5a |te_zoomb|ox(ZBX,Z|
|00005460| 42 59 2c 5a 42 58 41 2c | 5a 42 59 41 29 0d 1c f2 |BY,ZBXA,|ZBYA)...|
|00005470| 28 20 e7 20 94 28 5a 42 | 58 2d 5a 42 58 41 29 3e |( . .(ZB|X-ZBXA)>|
|00005480| 32 30 20 80 20 94 28 5a | 42 59 2d 5a 42 59 41 29 |20 . .(Z|BY-ZBYA)|
|00005490| 3e 32 30 20 8c 0d 1c fc | 26 20 20 e7 20 68 61 6e |>20 ....|& . han|
|000054a0| 64 6c 65 25 3d 77 69 6e | 64 6f 77 5f 68 25 20 80 |dle%=win|dow_h% .|
|000054b0| 20 69 63 6f 6e 25 3d 2d | 31 20 8c 0d 1d 06 19 20 | icon%=-|1 ..... |
|000054c0| 20 20 21 42 55 46 46 45 | 52 25 3d 77 69 6e 64 6f | !BUFFE|R%=windo|
|000054d0| 77 5f 68 25 0d 1d 10 28 | 20 20 20 c8 99 20 22 57 |w_h%...(| .. "W|
|000054e0| 69 6d 70 5f 47 65 74 57 | 69 6e 64 6f 77 53 74 61 |imp_GetW|indowSta|
|000054f0| 74 65 22 2c 2c 42 55 46 | 46 45 52 25 0d 1d 1a 15 |te",,BUF|FER%....|
|00005500| 20 20 20 f2 77 69 6e 64 | 6f 77 5f 63 6f 6f 72 64 | .wind|ow_coord|
|00005510| 73 0d 1d 24 40 20 20 20 | 4e 58 4d 49 4e 3d a4 78 |s..$@ |NXMIN=.x|
|00005520| 28 5a 42 58 29 3a 4e 58 | 4d 41 58 3d a4 78 28 5a |(ZBX):NX|MAX=.x(Z|
|00005530| 42 58 41 29 3a 4e 59 4d | 49 4e 3d a4 79 28 5a 42 |BXA):NYM|IN=.y(ZB|
|00005540| 59 29 3a 4e 59 4d 41 58 | 3d a4 79 28 5a 42 59 41 |Y):NYMAX|=.y(ZBYA|
|00005550| 29 0d 1d 2e 25 20 20 20 | e7 20 4e 58 4d 49 4e 3e |)...% |. NXMIN>|
|00005560| 4e 58 4d 41 58 20 8c 20 | c8 94 20 4e 58 4d 49 4e |NXMAX . |.. NXMIN|
|00005570| 2c 4e 58 4d 41 58 0d 1d | 38 25 20 20 20 e7 20 4e |,NXMAX..|8% . N|
|00005580| 59 4d 49 4e 3e 4e 59 4d | 41 58 20 8c 20 c8 94 20 |YMIN>NYM|AX . .. |
|00005590| 4e 59 4d 49 4e 2c 4e 59 | 4d 41 58 0d 1d 42 2c 20 |NYMIN,NY|MAX..B, |
|000055a0| 20 20 24 6e 78 6d 69 6e | 62 75 66 66 25 3d c3 4e | $nxmin|buff%=.N|
|000055b0| 58 4d 49 4e 3a 24 6e 78 | 6d 61 78 62 75 66 66 25 |XMIN:$nx|maxbuff%|
|000055c0| 3d c3 4e 58 4d 41 58 0d | 1d 4c 2c 20 20 20 24 6e |=.NXMAX.|.L, $n|
|000055d0| 79 6d 69 6e 62 75 66 66 | 25 3d c3 4e 59 4d 49 4e |yminbuff|%=.NYMIN|
|000055e0| 3a 24 6e 79 6d 61 78 62 | 75 66 66 25 3d c3 4e 59 |:$nymaxb|uff%=.NY|
|000055f0| 4d 41 58 0d 1d 56 33 20 | 20 20 c8 99 20 22 57 69 |MAX..V3 | .. "Wi|
|00005600| 6d 70 5f 43 72 65 61 74 | 65 4d 65 6e 75 22 2c 2c |mp_Creat|eMenu",,|
|00005610| 76 61 6c 75 65 5f 68 25 | 2c 4d 58 2d 35 31 36 2c |value_h%|,MX-516,|
|00005620| 4d 59 2b 33 37 38 0d 1d | 60 07 20 20 cd 0d 1d 6a |MY+378..|`. ...j|
|00005630| 06 20 cd 0d 1d 74 05 e1 | 0d 1d 7e 04 0d 1d 88 0d |. ...t..|..~.....|
|00005640| dd 20 a4 78 28 58 4b 57 | 29 0d 1d 92 26 3d 58 4d |. .x(XKW|)...&=XM|
|00005650| 49 4e 2b 44 58 2a 28 58 | 4b 57 2d 28 58 30 2d 53 |IN+DX*(X|KW-(X0-S|
|00005660| 43 58 29 29 2f 48 46 41 | 4b 2f 48 5a 4f 4f 4d 0d |CX))/HFA|K/HZOOM.|
|00005670| 1d 9c 04 0d 1d a6 0d dd | 20 a4 79 28 59 4b 57 29 |........| .y(YKW)|
|00005680| 0d 1d b0 26 3d 59 4d 41 | 58 2b 44 59 2a 28 28 59 |...&=YMA|X+DY*((Y|
|00005690| 31 2d 53 43 59 29 2d 59 | 4b 57 29 2f 56 46 41 4b |1-SCY)-Y|KW)/VFAK|
|000056a0| 2f 56 5a 4f 4f 4d 0d 1d | ba 04 0d 1d c4 22 dd 20 |/VZOOM..|.....". |
|000056b0| f2 75 70 64 61 74 65 5f | 7a 6f 6f 6d 62 6f 78 28 |.update_|zoombox(|
|000056c0| 58 31 2c 59 31 2c 58 32 | 2c 59 32 29 0d 1d ce 17 |X1,Y1,X2|,Y2)....|
|000056d0| 20 21 42 55 46 46 45 52 | 25 3d 77 69 6e 64 6f 77 | !BUFFER|%=window|
|000056e0| 5f 68 25 0d 1d d8 3d 20 | 42 55 46 46 45 52 25 21 |_h%...= |BUFFER%!|
|000056f0| 34 3d 30 3a 42 55 46 46 | 45 52 25 21 38 3d 2d 56 |4=0:BUFF|ER%!8=-V|
|00005700| 45 58 54 3a 42 55 46 46 | 45 52 25 21 31 32 3d 48 |EXT:BUFF|ER%!12=H|
|00005710| 45 58 54 3a 42 55 46 46 | 45 52 25 21 31 36 3d 30 |EXT:BUFF|ER%!16=0|
|00005720| 0d 1d e2 2c 20 c8 99 20 | 22 57 69 6d 70 5f 55 70 |..., .. |"Wimp_Up|
|00005730| 64 61 74 65 57 69 6e 64 | 6f 77 22 2c 2c 42 55 46 |dateWind|ow",,BUF|
|00005740| 46 45 52 25 20 b8 20 4d | 4f 52 45 25 0d 1d ec 0d |FER% . M|ORE%....|
|00005750| 20 c8 95 20 4d 4f 52 45 | 25 0d 1d f6 25 20 20 ec | .. MORE|%...% .|
|00005760| 20 58 31 2c 59 31 3a f0 | 20 26 30 45 2c 58 32 2c | X1,Y1:.| &0E,X2,|
|00005770| 59 31 3a f0 20 26 30 45 | 2c 58 32 2c 59 32 0d 1e |Y1:. &0E|,X2,Y2..|
|00005780| 00 1d 20 20 f0 20 26 30 | 45 2c 58 31 2c 59 32 3a |.. . &0|E,X1,Y2:|
|00005790| f0 20 26 30 45 2c 58 31 | 2c 59 31 0d 1e 0a 2d 20 |. &0E,X1|,Y1...- |
|000057a0| 20 c8 99 20 22 57 69 6d | 70 5f 47 65 74 52 65 63 | .. "Wim|p_GetRec|
|000057b0| 74 61 6e 67 6c 65 22 2c | 2c 42 55 46 46 45 52 25 |tangle",|,BUFFER%|
|000057c0| 20 b8 20 4d 4f 52 45 25 | 0d 1e 14 06 20 ce 0d 1e | . MORE%|.... ...|
|000057d0| 1e 05 e1 0d 1e 28 04 0d | 1e 32 10 dd 20 f2 63 61 |.....(..|.2.. .ca|
|000057e0| 6c 63 75 6c 61 74 65 0d | 1e 3c 0a 20 43 48 41 3d |lculate.|.<. CHA=|
|000057f0| b9 0d 1e 46 0d 20 d6 20 | 63 6f 64 65 34 25 0d 1e |...F. . |code4%..|
|00005800| 50 16 20 58 25 3d 21 58 | 41 44 52 3a 59 25 3d 21 |P. X%=!X|ADR:Y%=!|
|00005810| 59 41 44 52 0d 1e 5a 1f | 20 58 50 3d 58 25 2a 58 |YADR..Z.| XP=X%*X|
|00005820| 50 46 25 3a 59 50 3d 56 | 46 41 4b 2b 59 25 2a 59 |PF%:YP=V|FAK+Y%*Y|
|00005830| 50 46 25 0d 1e 64 1d 20 | e7 20 44 49 53 50 4c 41 |PF%..d. |. DISPLA|
|00005840| 59 20 80 20 57 69 6e 64 | 6f 77 4f 70 65 6e 20 8c |Y . Wind|owOpen .|
|00005850| 0d 1e 6e 1f 20 20 e7 20 | 59 25 3e 3d 56 53 49 5a |..n. . |Y%>=VSIZ|
|00005860| 45 20 84 20 59 25 2d 4c | 55 59 25 3e 33 20 8c 0d |E . Y%-L|UY%>3 ..|
|00005870| 1e 78 25 20 20 20 21 42 | 55 46 46 45 52 25 3d 77 |.x% !B|UFFER%=w|
|00005880| 69 6e 64 6f 77 5f 68 25 | 3a 42 55 46 46 45 52 25 |indow_h%|:BUFFER%|
|00005890| 21 34 3d 30 0d 1e 82 24 | 20 20 20 42 55 46 46 45 |!4=0...$| BUFFE|
|000058a0| 52 25 21 38 3d 2d 59 50 | 2d 56 46 41 4b 2a 56 5a |R%!8=-YP|-VFAK*VZ|
|000058b0| 4f 4f 4d 2b 56 46 41 4b | 0d 1e 8c 2d 20 20 20 42 |OOM+VFAK|...- B|
|000058c0| 55 46 46 45 52 25 21 31 | 32 3d 48 45 58 54 3a 42 |UFFER%!1|2=HEXT:B|
|000058d0| 55 46 46 45 52 25 21 31 | 36 3d 2d 4c 55 59 50 25 |UFFER%!1|6=-LUYP%|
|000058e0| 2b 56 46 41 4b 0d 1e 96 | 2e 20 20 20 c8 99 20 22 |+VFAK...|. .. "|
|000058f0| 57 69 6d 70 5f 55 70 64 | 61 74 65 57 69 6e 64 6f |Wimp_Upd|ateWindo|
|00005900| 77 22 2c 2c 42 55 46 46 | 45 52 25 20 b8 20 4d 4f |w",,BUFF|ER% . MO|
|00005910| 52 45 25 0d 1e a0 24 20 | 20 20 4c 55 59 25 3d 59 |RE%...$ | LUY%=Y|
|00005920| 25 3a 21 4c 55 59 41 44 | 52 3d 4c 55 59 25 3a 4c |%:!LUYAD|R=LUY%:L|
|00005930| 55 59 50 25 3d 59 50 0d | 1e aa 13 20 20 20 f2 72 |UYP%=YP.|... .r|
|00005940| 65 64 72 61 77 5f 63 6f | 72 65 0d 1e b4 07 20 20 |edraw_co|re.... |
|00005950| cd 0d 1e be 06 20 cd 0d | 1e c8 1c 20 e7 20 59 25 |..... ..|... . Y%|
|00005960| 3e 3d 56 53 49 5a 45 20 | 8c 20 f2 63 61 6c 63 5f |>=VSIZE |. .calc_|
|00005970| 65 6e 64 0d 1e d2 42 20 | e7 20 48 47 20 8c 20 c8 |end...B |. HG . .|
|00005980| 99 20 22 48 6f 75 72 67 | 6c 61 73 73 5f 50 65 72 |. "Hourg|lass_Per|
|00005990| 63 65 6e 74 61 67 65 22 | 2c 28 31 30 30 2a 28 59 |centage"|,(100*(Y|
|000059a0| 25 2a 48 53 49 5a 45 2b | 58 25 29 29 20 81 20 4c |%*HSIZE+|X%)) . L|
|000059b0| 41 52 47 45 25 0d 1e dc | 05 e1 0d 1e e6 04 0d 1e |ARGE%...|........|
|000059c0| f0 0f dd 20 f2 63 61 6c | 63 5f 65 6e 64 0d 1e fa |... .cal|c_end...|
|000059d0| 26 20 f2 63 61 6c 63 5f | 6f 66 66 3a f2 73 65 74 |& .calc_|off:.set|
|000059e0| 28 22 43 6f 6e 74 22 2c | 4d 45 4e 55 25 2c 38 2c |("Cont",|MENU%,8,|
|000059f0| 32 32 29 0d 1f 04 05 e1 | 0d 1f 0e 04 0d 1f 18 0d |22).....|........|
|00005a00| dd 20 f2 72 65 64 72 61 | 77 0d 1f 22 1d 20 e7 20 |. .redra|w..". . |
|00005a10| 43 41 4c 43 55 4c 41 54 | 45 44 20 80 20 44 49 53 |CALCULAT|ED . DIS|
|00005a20| 50 4c 41 59 20 8c 0d 1f | 2c 3c 20 20 59 50 52 3d |PLAY ...|,< YPR=|
|00005a30| 59 50 2b 56 46 41 4b 2a | 56 5a 4f 4f 4d 2d 56 46 |YP+VFAK*|VZOOM-VF|
|00005a40| 41 4b 3a e7 20 59 25 3d | 56 53 49 5a 45 20 8c 20 |AK:. Y%=|VSIZE . |
|00005a50| 59 50 52 3d 59 50 52 2d | 56 5a 4f 4f 4d 2a 56 46 |YPR=YPR-|VZOOM*VF|
|00005a60| 41 4b 0d 1f 36 2d 20 20 | c8 99 20 22 57 69 6d 70 |AK..6- |.. "Wimp|
|00005a70| 5f 52 65 64 72 61 77 57 | 69 6e 64 6f 77 22 2c 2c |_RedrawW|indow",,|
|00005a80| 42 55 46 46 45 52 25 20 | b8 20 4d 4f 52 45 25 0d |BUFFER% |. MORE%.|
|00005a90| 1f 40 12 20 20 f2 72 65 | 64 72 61 77 5f 63 6f 72 |.@. .re|draw_cor|
|00005aa0| 65 0d 1f 4a 06 20 cc 0d | 1f 54 2d 20 20 c8 99 20 |e..J. ..|.T- .. |
|00005ab0| 22 57 69 6d 70 5f 52 65 | 64 72 61 77 57 69 6e 64 |"Wimp_Re|drawWind|
|00005ac0| 6f 77 22 2c 2c 42 55 46 | 46 45 52 25 20 b8 20 4d |ow",,BUF|FER% . M|
|00005ad0| 4f 52 45 25 0d 1f 5e 0e | 20 20 c8 95 20 4d 4f 52 |ORE%..^.| .. MOR|
|00005ae0| 45 25 0d 1f 68 15 20 20 | 20 f2 77 69 6e 64 6f 77 |E%..h. | .window|
|00005af0| 5f 63 6f 6f 72 64 73 0d | 1f 72 1c 20 20 20 c8 99 |_coords.|.r. ..|
|00005b00| 20 22 57 69 6d 70 5f 53 | 65 74 43 6f 6c 6f 75 72 | "Wimp_S|etColour|
|00005b10| 22 2c 37 0d 1f 7c 24 20 | 20 20 c8 93 20 c8 90 20 |",7..|$ | .. .. |
|00005b20| 42 58 30 2c 42 59 30 2c | 42 58 31 2d 42 58 30 2c |BX0,BY0,|BX1-BX0,|
|00005b30| 42 59 31 2d 42 59 30 0d | 1f 86 2e 20 20 20 c8 99 |BY1-BY0.|... ..|
|00005b40| 20 22 57 69 6d 70 5f 47 | 65 74 52 65 63 74 61 6e | "Wimp_G|etRectan|
|00005b50| 67 6c 65 22 2c 2c 42 55 | 46 46 45 52 25 20 b8 20 |gle",,BU|FFER% . |
|00005b60| 4d 4f 52 45 25 0d 1f 90 | 07 20 20 ce 0d 1f 9a 06 |MORE%...|. .....|
|00005b70| 20 cd 0d 1f a4 05 e1 0d | 1f ae 04 0d 1f b8 04 0d | .......|........|
|00005b80| 1f c2 12 dd 20 f2 72 65 | 64 72 61 77 5f 63 6f 72 |.... .re|draw_cor|
|00005b90| 65 0d 1f cc 3b 20 59 50 | 52 3d 59 50 2b 56 46 41 |e...; YP|R=YP+VFA|
|00005ba0| 4b 2a 56 5a 4f 4f 4d 2d | 56 46 41 4b 3a e7 20 59 |K*VZOOM-|VFAK:. Y|
|00005bb0| 25 3d 56 53 49 5a 45 20 | 8c 20 59 50 52 3d 59 50 |%=VSIZE |. YPR=YP|
|00005bc0| 52 2d 56 5a 4f 4f 4d 2a | 56 46 41 4b 0d 1f d6 14 |R-VZOOM*|VFAK....|
|00005bd0| 20 48 5a 5a 3d 48 5a 4f | 4f 4d 2a 50 4f 46 46 25 | HZZ=HZO|OM*POFF%|
|00005be0| 0d 1f e0 0d 20 c8 95 20 | 4d 4f 52 45 25 0d 1f ea |.... .. |MORE%...|
|00005bf0| 14 20 20 f2 77 69 6e 64 | 6f 77 5f 63 6f 6f 72 64 |. .wind|ow_coord|
|00005c00| 73 0d 1f f4 30 20 20 57 | 59 4d 50 3d 59 31 2d 53 |s...0 W|YMP=Y1-S|
|00005c10| 43 59 2d 59 50 52 2d 56 | 46 41 4b 3a 57 58 4d 50 |CY-YPR-V|FAK:WXMP|
|00005c20| 3d 58 30 2d 53 43 58 2b | 48 45 58 54 2d 48 46 41 |=X0-SCX+|HEXT-HFA|
|00005c30| 4b 0d 1f fe 1d 20 20 e7 | 20 57 59 4d 50 3e 42 59 |K.... .| WYMP>BY|
|00005c40| 31 20 84 20 42 58 30 3e | 57 58 4d 50 20 8c 0d 20 |1 . BX0>|WXMP .. |
|00005c50| 08 1c 20 20 20 c8 99 20 | 22 57 69 6d 70 5f 53 65 |.. .. |"Wimp_Se|
|00005c60| 74 43 6f 6c 6f 75 72 22 | 2c 37 0d 20 12 24 20 20 |tColour"|,7. .$ |
|00005c70| 20 c8 93 20 c8 90 20 42 | 58 30 2c 42 59 30 2c 42 | .. .. B|X0,BY0,B|
|00005c80| 58 31 2d 42 58 30 2c 42 | 59 31 2d 42 59 30 0d 20 |X1-BX0,B|Y1-BY0. |
|00005c90| 1c 07 20 20 cc 0d 20 26 | 13 20 20 20 42 58 52 3d |.. .. &|. BXR=|
|00005ca0| 42 58 31 2d 48 46 41 4b | 0d 20 30 13 20 20 20 e7 |BX1-HFAK|. 0. .|
|00005cb0| 20 42 58 52 3e 57 58 4d | 50 20 8c 0d 20 3a 10 20 | BXR>WXM|P .. :. |
|00005cc0| 20 20 20 42 58 52 3d 57 | 58 4d 50 0d 20 44 1d 20 | BXR=W|XMP. D. |
|00005cd0| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 53 65 74 43 | .. "W|imp_SetC|
|00005ce0| 6f 6c 6f 75 72 22 2c 37 | 0d 20 4e 25 20 20 20 20 |olour",7|. N% |
|00005cf0| c8 93 20 c8 90 20 42 58 | 52 2c 42 59 30 2c 42 58 |.. .. BX|R,BY0,BX|
|00005d00| 31 2d 42 58 52 2c 42 59 | 31 2d 42 59 30 0d 20 58 |1-BXR,BY|1-BY0. X|
|00005d10| 08 20 20 20 cd 0d 20 62 | 0e 20 20 20 42 59 52 3d |. .. b|. BYR=|
|00005d20| 42 59 30 0d 20 6c 14 20 | 20 20 e7 20 57 59 4d 50 |BY0. l. | . WYMP|
|00005d30| 3e 3d 42 59 30 20 8c 0d | 20 76 15 20 20 20 20 42 |>=BY0 ..| v. B|
|00005d40| 59 52 3d 57 59 4d 50 2d | 56 46 41 4b 0d 20 80 1d |YR=WYMP-|VFAK. ..|
|00005d50| 20 20 20 20 c8 99 20 22 | 57 69 6d 70 5f 53 65 74 | .. "|Wimp_Set|
|00005d60| 43 6f 6c 6f 75 72 22 2c | 37 0d 20 8a 2b 20 20 20 |Colour",|7. .+ |
|00005d70| 20 c8 93 20 c8 90 20 42 | 58 30 2c 42 59 30 2c 42 | .. .. B|X0,BY0,B|
|00005d80| 58 31 2d 42 58 30 2c 57 | 59 4d 50 2d 56 46 41 4b |X1-BX0,W|YMP-VFAK|
|00005d90| 2d 42 59 30 0d 20 94 08 | 20 20 20 cd 0d 20 9e 2a |-BY0. ..| .. .*|
|00005da0| 20 20 20 57 4b 58 25 3d | 42 58 30 2d 28 58 30 2d | WKX%=|BX0-(X0-|
|00005db0| 53 43 58 29 3a 57 4b 59 | 25 3d 28 59 31 2d 53 43 |SCX):WKY|%=(Y1-SC|
|00005dc0| 59 29 2d 42 59 31 0d 20 | a8 34 20 20 20 44 25 3d |Y)-BY1. |.4 D%=|
|00005dd0| 57 4b 58 25 20 81 20 48 | 46 41 4b 20 81 20 48 5a |WKX% . H|FAK . HZ|
|00005de0| 4f 4f 4d 3a 45 25 3d 57 | 4b 59 25 20 81 20 56 46 |OOM:E%=W|KY% . VF|
|00005df0| 41 4b 20 81 20 56 5a 4f | 4f 4d 0d 20 b2 38 20 20 |AK . VZO|OM. .8 |
|00005e00| 20 44 58 5a 3d 28 57 4b | 58 25 20 81 20 48 46 41 | DXZ=(WK|X% . HFA|
|00005e10| 4b 29 20 83 20 48 5a 5a | 3a 44 59 5a 3d 28 57 4b |K) . HZZ|:DYZ=(WK|
|00005e20| 59 25 20 81 20 56 46 41 | 4b 29 20 83 20 56 5a 4f |Y% . VFA|K) . VZO|
|00005e30| 4f 4d 0d 20 bc 21 20 20 | 20 5a 25 3d 4d 41 4e 44 |OM. .! | Z%=MAND|
|00005e40| 45 4c 25 2b 35 31 32 2b | 48 53 49 5a 45 2a 45 25 |EL%+512+|HSIZE*E%|
|00005e50| 2b 44 25 0d 20 c6 29 20 | 20 20 21 58 45 41 44 52 |+D%. .) | !XEADR|
|00005e60| 3d 28 42 58 52 2b 48 46 | 41 4b 2d 42 58 30 29 20 |=(BXR+HF|AK-BX0) |
|00005e70| 81 20 48 46 41 4b 2a 50 | 4f 46 46 25 0d 20 d0 23 |. HFAK*P|OFF%. .#|
|00005e80| 20 20 20 21 59 45 41 44 | 52 3d 28 42 59 31 2d 56 | !YEAD|R=(BY1-V|
|00005e90| 46 41 4b 2d 42 59 52 29 | 20 81 20 56 46 41 4b 0d |FAK-BYR)| . VFAK.|
|00005ea0| 20 da 42 20 20 20 21 54 | 52 41 44 52 3d 53 43 52 | .B !T|RADR=SCR|
|00005eb0| 41 44 52 2b 28 56 4d 41 | 58 2d 42 59 31 2b 56 46 |ADR+(VMA|X-BY1+VF|
|00005ec0| 41 4b 29 2f 56 46 41 4b | 2a 4c 4c 25 2b 28 42 58 |AK)/VFAK|*LL%+(BX|
|00005ed0| 52 20 81 20 48 46 41 4b | 2b 31 29 2a 50 4f 46 46 |R . HFAK|+1)*POFF|
|00005ee0| 25 0d 20 e4 3e 20 20 20 | 21 59 5a 41 44 52 3d 44 |%. .> |!YZADR=D|
|00005ef0| 59 5a 3a 21 58 5a 41 44 | 52 3d 44 58 5a 3a 21 49 |YZ:!XZAD|R=DXZ:!I|
|00005f00| 44 41 44 52 3d 5a 25 3a | 21 49 53 41 44 52 3d 48 |DADR=Z%:|!ISADR=H|
|00005f10| 53 49 5a 45 3a 21 54 53 | 41 44 52 3d 4c 4c 25 0d |SIZE:!TS|ADR=LL%.|
|00005f20| 20 ee 1e 20 20 20 21 59 | 5a 4e 41 44 3d 56 5a 4f | .. !Y|ZNAD=VZO|
|00005f30| 4f 4d 3a 21 58 5a 4e 41 | 44 3d 48 5a 5a 0d 20 f8 |OM:!XZNA|D=HZZ. .|
|00005f40| 0f 20 20 20 d6 20 63 6f | 64 65 32 25 0d 21 02 07 |. . co|de2%.!..|
|00005f50| 20 20 cd 0d 21 0c 2d 20 | 20 c8 99 20 22 57 69 6d | ..!.- | .. "Wim|
|00005f60| 70 5f 47 65 74 52 65 63 | 74 61 6e 67 6c 65 22 2c |p_GetRec|tangle",|
|00005f70| 2c 42 55 46 46 45 52 25 | 20 b8 20 4d 4f 52 45 25 |,BUFFER%| . MORE%|
|00005f80| 0d 21 16 06 20 ce 0d 21 | 20 05 e1 0d 21 2a 04 0d |.!.. ..!| ...!*..|
|00005f90| 21 34 14 dd 20 f2 77 69 | 6e 64 6f 77 5f 63 6f 6f |!4.. .wi|ndow_coo|
|00005fa0| 72 64 73 0d 21 3e 1e 20 | 58 30 3d 42 55 46 46 45 |rds.!>. |X0=BUFFE|
|00005fb0| 52 25 21 34 3a 59 30 3d | 42 55 46 46 45 52 25 21 |R%!4:Y0=|BUFFER%!|
|00005fc0| 38 0d 21 48 20 20 58 31 | 3d 42 55 46 46 45 52 25 |8.!H X1|=BUFFER%|
|00005fd0| 21 31 32 3a 59 31 3d 42 | 55 46 46 45 52 25 21 31 |!12:Y1=B|UFFER%!1|
|00005fe0| 36 0d 21 52 22 20 53 43 | 58 3d 42 55 46 46 45 52 |6.!R" SC|X=BUFFER|
|00005ff0| 25 21 32 30 3a 53 43 59 | 3d 42 55 46 46 45 52 25 |%!20:SCY|=BUFFER%|
|00006000| 21 32 34 0d 21 5c 20 20 | 58 32 3d 42 55 46 46 45 |!24.!\ |X2=BUFFE|
|00006010| 52 25 21 32 38 3a 59 32 | 3d 42 55 46 46 45 52 25 |R%!28:Y2|=BUFFER%|
|00006020| 21 33 32 0d 21 66 20 20 | 58 33 3d 42 55 46 46 45 |!32.!f |X3=BUFFE|
|00006030| 52 25 21 33 36 3a 59 33 | 3d 42 55 46 46 45 52 25 |R%!36:Y3|=BUFFER%|
|00006040| 21 34 30 0d 21 70 20 20 | 42 58 30 3d 58 32 3a 42 |!40.!p |BX0=X2:B|
|00006050| 59 30 3d 59 32 3a 42 58 | 31 3d 58 33 3a 42 59 31 |Y0=Y2:BX|1=X3:BY1|
|00006060| 3d 59 33 0d 21 7a 05 e1 | 0d 21 84 04 0d 21 8e 0e |=Y3.!z..|.!...!..|
|00006070| dd 20 f2 6f 70 74 69 6f | 6e 73 0d 21 98 25 20 24 |. .optio|ns.!.% $|
|00006080| 4d 41 4e 44 45 4c 25 3d | 22 4d 44 42 22 2b 46 69 |MANDEL%=|"MDB"+Fi|
|00006090| 6c 65 56 65 72 73 69 6f | 6e 24 2b 22 20 20 22 0d |leVersio|n$+" ".|
|000060a0| 21 a2 11 20 4d 41 4e 44 | 45 4c 25 21 38 3d 58 25 |!.. MAND|EL%!8=X%|
|000060b0| 0d 21 ac 12 20 4d 41 4e | 44 45 4c 25 21 31 32 3d |.!.. MAN|DEL%!12=|
|000060c0| 59 25 0d 21 b6 13 20 4d | 41 4e 44 45 4c 25 21 31 |Y%.!.. M|ANDEL%!1|
|000060d0| 36 3d 54 4d 25 0d 21 c0 | 17 20 7c 28 4d 41 4e 44 |6=TM%.!.|. |(MAND|
|000060e0| 45 4c 25 2b 32 30 29 3d | 58 4d 49 4e 0d 21 ca 17 |EL%+20)=|XMIN.!..|
|000060f0| 20 7c 28 4d 41 4e 44 45 | 4c 25 2b 32 35 29 3d 59 | |(MANDE|L%+25)=Y|
|00006100| 4d 49 4e 0d 21 d4 17 20 | 7c 28 4d 41 4e 44 45 4c |MIN.!.. ||(MANDEL|
|00006110| 25 2b 33 30 29 3d 58 4d | 41 58 0d 21 de 17 20 7c |%+30)=XM|AX.!.. ||
|00006120| 28 4d 41 4e 44 45 4c 25 | 2b 33 35 29 3d 59 4d 41 |(MANDEL%|+35)=YMA|
|00006130| 58 0d 21 e8 15 20 4d 41 | 4e 44 45 4c 25 21 34 30 |X.!.. MA|NDEL%!40|
|00006140| 3d 48 53 49 5a 45 0d 21 | f2 15 20 4d 41 4e 44 45 |=HSIZE.!|.. MANDE|
|00006150| 4c 25 21 34 34 3d 56 53 | 49 5a 45 0d 21 fc 05 e1 |L%!44=VS|IZE.!...|
|00006160| 0d 22 06 04 0d 22 10 0e | dd 20 f2 63 61 6c 63 5f |."..."..|. .calc_|
|00006170| 6f 6e 0d 22 1a 14 20 24 | 63 61 6c 63 62 25 3d 22 |on.".. $|calcb%="|
|00006180| 41 62 6f 72 74 22 0d 22 | 24 0d 20 f2 70 6f 69 6e |Abort"."|$. .poin|
|00006190| 74 65 72 0d 22 2e 3d 20 | e7 20 68 61 6e 64 6c 65 |ter.".= |. handle|
|000061a0| 25 3d 77 69 6e 64 6f 77 | 5f 68 25 20 80 20 ac 20 |%=window|_h% . . |
|000061b0| 48 47 20 8c 20 c8 99 20 | 22 48 6f 75 72 67 6c 61 |HG . .. |"Hourgla|
|000061c0| 73 73 5f 53 74 61 72 74 | 22 2c 31 3a 48 47 3d b9 |ss_Start|",1:HG=.|
|000061d0| 0d 22 38 21 20 e7 20 ac | 20 43 41 4c 43 55 4c 41 |."8! . .| CALCULA|
|000061e0| 54 45 20 8c 20 f2 6e 65 | 77 5f 69 63 6f 6e 28 b9 |TE . .ne|w_icon(.|
|000061f0| 29 0d 22 42 16 20 43 41 | 4c 43 55 4c 41 54 45 3d |)."B. CA|LCULATE=|
|00006200| b9 3a f2 6d 61 73 6b 0d | 22 4c 05 e1 0d 22 56 04 |.:.mask.|"L..."V.|
|00006210| 0d 22 60 0f dd 20 f2 63 | 61 6c 63 5f 6f 66 66 0d |."`.. .c|alc_off.|
|00006220| 22 6a 17 20 24 63 61 6c | 63 62 25 3d 22 43 6f 6e |"j. $cal|cb%="Con|
|00006230| 74 69 6e 75 65 22 0d 22 | 74 23 20 e7 20 48 47 20 |tinue"."|t# . HG |
|00006240| 8c 20 c8 99 20 22 48 6f | 75 72 67 6c 61 73 73 5f |. .. "Ho|urglass_|
|00006250| 4f 66 66 22 3a 48 47 3d | a3 0d 22 7e 1f 20 e7 20 |Off":HG=|.."~. . |
|00006260| 43 41 4c 43 55 4c 41 54 | 45 20 8c 20 f2 6e 65 77 |CALCULAT|E . .new|
|00006270| 5f 69 63 6f 6e 28 a3 29 | 0d 22 88 16 20 43 41 4c |_icon(.)|.".. CAL|
|00006280| 43 55 4c 41 54 45 3d a3 | 3a f2 6d 61 73 6b 0d 22 |CULATE=.|:.mask."|
|00006290| 92 05 e1 0d 22 9c 04 0d | 22 a6 0f dd 20 f2 64 69 |...."...|"... .di|
|000062a0| 73 70 5f 6f 66 66 0d 22 | b0 14 20 44 49 53 50 4c |sp_off."|.. DISPL|
|000062b0| 41 59 3d a3 3a f2 6d 61 | 73 6b 0d 22 ba 05 e1 0d |AY=.:.ma|sk."....|
|000062c0| 22 c4 04 0d 22 ce 0e dd | 20 f2 64 69 73 70 5f 6f |"..."...| .disp_o|
|000062d0| 6e 0d 22 d8 14 20 44 49 | 53 50 4c 41 59 3d b9 3a |n.".. DI|SPLAY=.:|
|000062e0| f2 6d 61 73 6b 0d 22 e2 | 05 e1 0d 22 ec 04 0d 22 |.mask.".|..."..."|
|000062f0| f6 0b dd 20 a4 6c 6f 61 | 64 0d 23 00 0d 20 52 45 |... .loa|d.#.. RE|
|00006300| 53 55 4c 54 3d a3 0d 23 | 0a 08 20 ea 20 85 0d 23 |SULT=..#|.. . ..#|
|00006310| 14 27 20 ee 20 85 20 ea | 3a f2 65 72 72 65 70 6f |.' . . .|:.errepo|
|00006320| 72 74 28 22 49 6e 76 61 | 6c 69 64 20 66 69 6c 65 |rt("Inva|lid file|
|00006330| 22 29 3a 3d a3 0d 23 1e | 19 20 e7 20 a4 47 65 74 |"):=..#.|. . .Get|
|00006340| 46 69 6c 65 49 6e 66 6f | 28 46 24 29 20 8c 0d 23 |FileInfo|(F$) ..#|
|00006350| 28 0d 20 20 53 3d 8e 28 | 46 24 29 0d 23 32 22 20 |(. S=.(|F$).#2" |
|00006360| 20 56 24 3d 22 22 3a e3 | 20 4e 3d 31 20 b8 20 38 | V$="":.| N=1 . 8|
|00006370| 3a 56 24 2b 3d bd 9a 23 | 53 3a ed 20 4e 0d 23 3c |:V$+=..#|S:. N.#<|
|00006380| 09 20 20 d9 23 53 0d 23 | 46 34 20 20 e7 20 c0 56 |. .#S.#|F4 . .V|
|00006390| 24 2c 33 29 3c 3e 22 4d | 44 42 22 20 8c 20 f2 65 |$,3)<>"M|DB" . .e|
|000063a0| 72 72 65 70 6f 72 74 28 | 22 49 6e 76 61 6c 69 64 |rreport(|"Invalid|
|000063b0| 20 66 69 6c 65 22 29 3a | 3d a3 0d 23 50 68 20 20 | file"):|=..#Ph |
|000063c0| e7 20 c1 56 24 2c 34 2c | 33 29 3e 46 69 6c 65 56 |. .V$,4,|3)>FileV|
|000063d0| 65 72 73 69 6f 6e 24 20 | 8c 20 f2 65 72 72 65 70 |ersion$ |. .errep|
|000063e0| 6f 72 74 28 22 54 68 69 | 73 20 66 69 6c 65 20 62 |ort("Thi|s file b|
|000063f0| 65 6c 6f 6e 67 73 20 74 | 6f 20 61 20 6d 6f 72 65 |elongs t|o a more|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.