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 | 84 03 00 00 e4 03 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 45 43 51 52 54 00 | 00 00 00 00 ff ff ff ff |.!ECQRT.|........|
|00000070| 42 dc fd ff 24 a3 1a 8b | 30 00 00 00 ff ff ff ff |B...$...|0.......|
|00000080| 1c 02 00 80 82 21 42 6f | 6f 74 00 01 20 63 6f 6f |.....!Bo|ot.. coo|
|00000090| e7 00 00 00 41 eb ff ff | ff 50 11 ff 03 00 24 49 |....A...|.P....$I|
|000000a0| e7 00 00 00 24 00 00 00 | 82 21 48 65 6c 70 00 01 |....$...|.!Help..|
|000000b0| 20 63 6f 6f ca 0e 00 00 | 41 ff ff ff 48 fc 53 ff | coo....|A...H.S.|
|000000c0| 03 00 01 a3 ca 0e 00 00 | 2f 01 00 00 82 21 52 75 |........|/....!Ru|
|000000d0| 6e 00 87 01 20 63 6f 6f | f7 00 00 00 41 eb ff ff |n... coo|....A...|
|000000e0| 64 0e 32 fb 03 00 21 d7 | f7 00 00 00 1d 10 00 00 |d.2...!.|........|
|000000f0| 82 21 52 75 6e 49 6d 61 | 67 65 00 6f ac 3e 00 00 |.!RunIma|ge.o.>..|
|00000100| 41 fb ff ff 8c 5c 13 ff | 03 00 e0 a3 ac 3e 00 00 |A....\..|.....>..|
|00000110| 38 11 00 00 82 21 53 70 | 72 69 74 65 73 00 6f 6f |8....!Sp|rites.oo|
|00000120| b8 06 00 00 41 f9 ff ff | c4 5c a4 f6 03 00 88 8b |....A...|.\......|
|00000130| b8 06 00 00 08 50 00 00 | 82 51 52 54 44 65 66 73 |.....P..|.QRTDefs|
|00000140| 00 63 6f 6f ff ff ff ff | 42 dc fd ff a8 a4 1a 8b |.coo....|B.......|
|00000150| 30 00 00 00 ff ff ff ff | d4 01 00 80 82 21 43 61 |0.......|.....!Ca|
|00000160| 6d 65 72 61 00 00 00 00 | 55 00 00 00 41 fb ff ff |mera....|U...A...|
|00000170| 19 97 d2 f5 03 00 a7 ae | 55 00 00 00 e4 56 00 00 |........|U....V..|
|00000180| 82 21 4c 69 67 68 74 00 | 00 00 00 00 e5 00 00 00 |.!Light.|........|
|00000190| 41 fb ff ff 98 a9 7a fc | 03 00 57 5b e5 00 00 00 |A.....z.|..W[....|
|000001a0| 5d 57 00 00 82 21 52 75 | 6e 49 6d 61 67 65 00 00 |]W...!Ru|nImage..|
|000001b0| 1d 10 00 00 41 fb ff ff | 84 54 53 ff 03 00 22 3a |....A...|.TS...":|
|000001c0| 1d 10 00 00 66 58 00 00 | 82 21 53 75 6e 00 00 00 |....fX..|.!Sun...|
|000001d0| 00 00 00 00 e0 00 00 00 | 41 fb ff ff 5d a3 7a fc |........|A...].z.|
|000001e0| 03 00 52 cc e0 00 00 00 | a7 68 00 00 82 53 70 68 |..R.....|.h...Sph|
|000001f0| 65 72 65 00 00 00 00 00 | 0e 05 00 00 41 fb ff ff |ere.....|....A...|
|00000200| 8f e9 0d ff 03 00 3a 0a | 0e 05 00 00 ab 69 00 00 |......:.|.....i..|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 40 02 00 00 82 54 65 6d | 70 6c 61 74 65 73 00 6f |@....Tem|plates.o|
|00000240| c7 02 00 00 41 ec ff ff | 3e ff a3 f6 03 00 50 7f |....A...|>.....P.|
|00000250| c7 02 00 00 dd 6e 00 00 | 00 00 04 00 34 20 87 01 |.....n..|....4 ..|
|00000260| 20 63 6f 6f 72 64 69 6e | 61 74 65 73 20 69 6e 74 | coordin|ates int|
|00000270| 6f 0d 00 5a 41 f4 20 74 | 54 64 20 63 82 21 45 43 |o..ZA. t|Td c.!EC|
|00000280| 51 52 54 50 69 63 73 00 | ff ff ff ff 42 dc fd ff |QRTPics.|....B...|
|00000290| 5e a6 1a 8b 30 00 00 00 | ff ff ff ff 60 03 00 80 |^...0...|....`...|
|000002a0| 82 21 42 6f 6f 74 00 70 | 61 63 74 00 41 00 00 00 |.!Boot.p|act.A...|
|000002b0| 41 eb ff ff 4e 69 cf f5 | 03 00 c1 0e 41 00 00 00 |A...Ni..|....A...|
|000002c0| c8 71 00 00 82 21 52 75 | 6e 00 6d 70 61 63 74 00 |.q...!Ru|n.mpact.|
|000002d0| 8f 00 00 00 41 eb ff ff | 24 74 cf f5 03 00 20 97 |....A...|$t.... .|
|000002e0| 8f 00 00 00 2d 72 00 00 | 82 21 53 70 72 69 74 65 |....-r..|.!Sprite|
|000002f0| 73 00 74 00 e0 02 00 00 | 41 f9 ff ff c5 5e cf f5 |s.t.....|A....^..|
|00000300| 03 00 8a 6f e0 02 00 00 | e0 72 00 00 82 45 43 50 |...o....|.r...ECP|
|00000310| 69 63 73 00 61 63 74 00 | ff ff ff ff 42 dc fd ff |ics.act.|....B...|
|00000320| 9b a6 1a 8b 30 00 00 00 | ff ff ff ff 3c 03 00 80 |....0...|....<...|
|00000330| 82 51 52 54 00 00 00 00 | 00 00 00 00 5f 20 00 00 |.QRT....|...._ ..|
|00000340| 41 ff ff ff 61 d8 3d 91 | 03 00 f0 b4 5f 20 00 00 |A...a.=.|...._ ..|
|00000350| e4 75 00 00 82 53 70 68 | 65 72 65 00 00 00 00 00 |.u...Sph|ere.....|
|00000360| 2c 02 00 00 41 e1 fd ff | f4 86 5c fb 03 00 c7 b5 |,...A...|..\.....|
|00000370| 2c 02 00 00 67 96 00 00 | 00 00 00 00 00 00 00 00 |,...g...|........|
|00000380| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000390| 00 00 00 00 00 00 00 00 | 40 02 00 00 00 00 1d 07 |........|@.......|
|000003a0| 43 6f 6d 70 61 63 74 00 | 00 00 00 00 d8 00 00 00 |Compact.|........|
|000003b0| 7c ff ff ff f0 00 00 00 | a8 ff ff ff 26 ff 0e 07 ||.......|....&...|
|000003c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003e0| 40 02 00 00 46 69 6c 65 | 44 61 74 61 82 21 42 6f |@...File|Data.!Bo|
|000003f0| 6f 74 00 01 20 63 6f 6f | e7 00 00 00 41 eb ff ff |ot.. coo|....A...|
|00000400| ff 50 11 ff 03 00 24 49 | 53 65 74 20 45 43 51 52 |.P....$I|Set ECQR|
|00000410| 54 24 44 69 72 20 3c 4f | 62 65 79 24 44 69 72 3e |T$Dir <O|bey$Dir>|
|00000420| 0a 53 65 74 20 45 43 51 | 52 54 24 44 65 66 73 20 |.Set ECQ|RT$Defs |
|00000430| 3c 45 43 51 52 54 24 44 | 69 72 3e 2e 51 52 54 44 |<ECQRT$D|ir>.QRTD|
|00000440| 65 66 73 0a 49 63 6f 6e | 53 70 72 69 74 65 73 20 |efs.Icon|Sprites |
|00000450| 3c 4f 62 65 79 24 44 69 | 72 3e 2e 21 53 70 72 69 |<Obey$Di|r>.!Spri|
|00000460| 74 65 73 0a 7c 45 43 51 | 52 54 24 4f 70 74 69 6f |tes.|ECQ|RT$Optio|
|00000470| 6e 73 20 53 74 72 69 6e | 67 20 68 61 73 20 6f 70 |ns Strin|g has op|
|00000480| 74 69 6f 6e 73 20 61 73 | 20 66 6f 6c 6c 6f 77 73 |tions as| follows|
|00000490| 0a 7c 4d 76 76 76 3d 3e | 20 6d 69 72 72 6f 72 20 |.|Mvvv=>| mirror |
|000004a0| 28 76 76 76 2c 76 76 76 | 2c 76 76 76 29 20 77 69 |(vvv,vvv|,vvv) wi|
|000004b0| 6c 6c 20 62 65 20 61 64 | 64 65 64 20 74 6f 20 61 |ll be ad|ded to a|
|000004c0| 6c 6c 20 63 6f 6c 6f 75 | 72 73 0a 7c 44 65 66 61 |ll colou|rs.|Defa|
|000004d0| 75 6c 74 20 69 73 0a 7c | 53 65 74 20 45 43 51 52 |ult is.||Set ECQR|
|000004e0| 54 24 4f 70 74 69 6f 6e | 73 20 4d 30 2e 32 0a 46 |T$Option|s M0.2.F|
|000004f0| 69 6c 65 44 61 74 61 82 | 21 48 65 6c 70 00 01 20 |ileData.|!Help.. |
|00000500| 63 6f 6f ca 0e 00 00 41 | ff ff ff 48 fc 53 ff 03 |coo....A|...H.S..|
|00000510| 00 01 a3 56 65 72 73 69 | 6f 6e 20 31 2e 30 32 20 |...Versi|on 1.02 |
|00000520| 72 65 63 65 6e 74 20 61 | 64 64 69 74 69 6f 6e 73 |recent a|dditions|
|00000530| 3a 0a 20 41 64 64 65 64 | 20 42 45 47 49 4e 5f 42 |:. Added| BEGIN_B|
|00000540| 42 4f 58 20 61 6e 64 20 | 45 4e 44 5f 42 42 4f 58 |BOX and |END_BBOX|
|00000550| 20 64 69 72 65 63 74 69 | 76 65 73 20 2d 20 69 74 | directi|ves - it|
|00000560| 20 67 6f 65 73 20 61 20 | 4c 4f 54 20 66 61 73 74 | goes a |LOT fast|
|00000570| 65 72 20 6e 6f 77 21 0a | 20 41 64 64 65 64 20 4d |er now!.| Added M|
|00000580| 69 72 72 6f 72 20 6f 70 | 74 69 6f 6e 20 6f 6e 20 |irror op|tion on |
|00000590| 6d 65 6e 75 2c 20 72 65 | 73 75 6c 74 69 6e 67 20 |menu, re|sulting |
|000005a0| 6d 69 72 72 6f 72 20 64 | 69 72 65 63 74 69 76 65 |mirror d|irective|
|000005b0| 73 20 63 61 6e 20 62 65 | 20 6d 61 73 73 20 65 64 |s can be| mass ed|
|000005c0| 69 74 65 64 0a 74 6f 20 | 63 68 61 6e 67 65 20 74 |ited.to |change t|
|000005d0| 68 65 20 72 65 66 6c 65 | 63 74 69 76 69 74 79 20 |he refle|ctivity |
|000005e0| 6f 66 20 6f 62 6a 65 63 | 74 73 20 69 6e 20 74 68 |of objec|ts in th|
|000005f0| 65 20 51 52 54 20 66 69 | 6c 65 2e 20 53 65 65 20 |e QRT fi|le. See |
|00000600| 61 6c 73 6f 20 74 68 65 | 0a 21 45 43 51 52 54 2e |also the|.!ECQRT.|
|00000610| 21 42 6f 6f 74 20 66 69 | 6c 65 2e 20 0a 20 52 65 |!Boot fi|le. . Re|
|00000620| 6d 6f 76 65 64 20 62 75 | 67 73 20 69 6e 20 4d 65 |moved bu|gs in Me|
|00000630| 73 68 20 74 72 61 6e 73 | 6c 61 74 69 6f 6e 20 28 |sh trans|lation (|
|00000640| 69 2e 65 2e 20 73 77 61 | 70 70 69 6e 67 20 6f 66 |i.e. swa|pping of|
|00000650| 20 43 79 6c 69 6e 64 65 | 72 2f 54 6f 72 72 6f 69 | Cylinde|r/Torroi|
|00000660| 64 61 6c 0a 62 69 74 73 | 29 2e 0a 0a 0a 51 52 54 |dal.bits|)....QRT|
|00000670| 20 43 6f 6e 76 65 72 74 | 65 72 2e 2e 2e 57 68 61 | Convert|er...Wha|
|00000680| 74 20 74 6f 20 64 6f 2f | 48 6f 77 20 69 74 27 73 |t to do/|How it's|
|00000690| 20 64 6f 6e 65 0a 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d | done.==|========|
|000006a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000006b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 0a 0a |========|======..|
|000006c0| 54 68 65 20 73 79 73 74 | 65 6d 20 77 69 6c 6c 20 |The syst|em will |
|000006d0| 63 75 72 72 65 6e 74 6c | 79 20 63 6f 6e 76 65 72 |currentl|y conver|
|000006e0| 74 20 47 72 6f 75 70 73 | 2c 20 53 6f 6c 69 64 73 |t Groups|, Solids|
|000006f0| 20 61 6e 64 20 4d 65 73 | 68 65 73 20 6f 6e 6c 79 | and Mes|hes only|
|00000700| 2e 20 53 68 65 65 74 73 | 20 61 72 65 0a 68 61 72 |. Sheets| are.har|
|00000710| 64 21 20 41 6c 73 6f 20 | 70 61 74 68 73 20 61 72 |d! Also |paths ar|
|00000720| 65 20 66 6c 61 74 74 65 | 6e 65 64 20 28 42 61 64 |e flatte|ned (Bad|
|00000730| 6c 79 21 29 2e 0a 0a 49 | 6e 20 61 64 64 69 74 69 |ly!)...I|n additi|
|00000740| 6f 6e 20 61 6e 79 20 67 | 72 6f 75 70 20 66 6f 75 |on any g|roup fou|
|00000750| 6e 64 20 69 6e 20 74 68 | 65 20 73 74 72 75 63 74 |nd in th|e struct|
|00000760| 75 72 65 20 73 74 61 72 | 74 69 6e 67 20 77 69 74 |ure star|ting wit|
|00000770| 68 20 22 40 22 20 69 73 | 20 70 72 65 73 75 6d 65 |h "@" is| presume|
|00000780| 64 0a 74 6f 20 62 65 20 | 61 20 22 6b 6e 6f 77 6e |d.to be |a "known|
|00000790| 22 20 6f 62 6a 65 63 74 | 20 77 69 74 68 20 61 20 |" object| with a |
|000007a0| 22 6b 6e 6f 77 6e 22 20 | 74 72 61 6e 73 6c 61 74 |"known" |translat|
|000007b0| 69 6f 6e 2e 20 54 68 65 | 73 65 20 6f 62 6a 65 63 |ion. The|se objec|
|000007c0| 74 73 20 28 61 74 20 74 | 68 65 0a 74 69 6d 65 20 |ts (at t|he.time |
|000007d0| 6f 66 20 77 72 69 74 69 | 6e 67 20 6f 6e 6c 79 20 |of writi|ng only |
|000007e0| 74 68 65 20 73 70 68 65 | 72 65 29 20 61 72 65 20 |the sphe|re) are |
|000007f0| 68 65 6c 64 20 69 6e 20 | 74 68 65 20 3c 45 43 51 |held in |the <ECQ|
|00000800| 52 54 24 50 69 63 73 3e | 20 64 69 72 65 63 74 6f |RT$Pics>| directo|
|00000810| 72 79 2e 0a 0a 46 6f 72 | 20 65 61 63 68 20 22 6b |ry...For| each "k|
|00000820| 6e 6f 77 6e 22 20 6f 62 | 6a 65 63 74 20 73 75 70 |nown" ob|ject sup|
|00000830| 70 6f 72 74 65 64 20 74 | 68 65 72 65 20 65 78 69 |ported t|here exi|
|00000840| 73 74 73 20 61 20 45 75 | 63 6c 69 64 20 66 69 6c |sts a Eu|clid fil|
|00000850| 65 20 77 68 69 63 68 20 | 69 73 20 74 6f 20 62 65 |e which |is to be|
|00000860| 0a 75 73 65 64 20 61 73 | 20 61 20 62 75 69 6c 64 |.used as| a build|
|00000870| 69 6e 67 20 62 6c 6f 63 | 6b 2e 20 41 73 73 6f 63 |ing bloc|k. Assoc|
|00000880| 69 61 74 65 64 20 77 69 | 74 68 20 74 68 69 73 20 |iated wi|th this |
|00000890| 69 73 20 61 20 42 41 53 | 49 43 20 66 69 6c 65 20 |is a BAS|IC file |
|000008a0| 63 6f 6e 74 61 69 6e 69 | 6e 67 0a 6a 75 73 74 20 |containi|ng.just |
|000008b0| 6f 6e 65 20 66 75 6e 63 | 74 69 6f 6e 20 28 64 65 |one func|tion (de|
|000008c0| 72 69 76 65 64 20 66 72 | 6f 6d 20 74 68 65 20 6e |rived fr|om the n|
|000008d0| 61 6d 65 20 6f 66 20 74 | 68 65 20 6f 62 6a 65 63 |ame of t|he objec|
|000008e0| 74 29 20 77 68 69 63 68 | 20 69 73 20 75 73 65 64 |t) which| is used|
|000008f0| 20 74 6f 0a 63 6f 6e 73 | 74 72 75 63 74 20 61 20 | to.cons|truct a |
|00000900| 51 52 54 20 64 65 66 69 | 6e 69 74 69 69 6f 6e 20 |QRT defi|nitiion |
|00000910| 62 61 73 65 64 20 6f 6e | 20 69 6e 66 6f 72 6d 61 |based on| informa|
|00000920| 74 69 6f 6e 20 65 78 74 | 72 61 63 74 65 64 20 66 |tion ext|racted f|
|00000930| 72 6f 6d 20 74 68 65 0a | 70 6f 73 69 74 69 6f 6e |rom the.|position|
|00000940| 69 6e 67 20 6f 66 20 74 | 68 65 20 45 75 63 6c 69 |ing of t|he Eucli|
|00000950| 64 20 63 6f 6e 73 74 72 | 75 63 74 20 77 69 74 68 |d constr|uct with|
|00000960| 69 6e 20 74 68 65 20 66 | 69 6c 65 2e 0a 0a 46 69 |in the f|ile...Fi|
|00000970| 6c 65 73 20 73 75 69 74 | 61 62 6c 65 20 66 6f 72 |les suit|able for|
|00000980| 20 63 6f 6e 76 65 72 73 | 69 6f 6e 20 77 69 6c 6c | convers|ion will|
|00000990| 20 63 6f 6e 74 61 69 6e | 2e 2e 2e 0a 0a 20 53 6f | contain|..... So|
|000009a0| 6c 69 64 73 0a 20 4d 65 | 73 68 65 73 0a 20 47 72 |lids. Me|shes. Gr|
|000009b0| 6f 75 70 73 0a 20 4f 62 | 6a 65 63 74 73 20 77 69 |oups. Ob|jects wi|
|000009c0| 74 68 20 6e 61 6d 65 73 | 20 73 74 61 72 74 69 6e |th names| startin|
|000009d0| 67 20 77 69 74 68 20 22 | 40 22 20 66 72 6f 6d 20 |g with "|@" from |
|000009e0| 74 68 65 20 21 45 43 51 | 52 54 50 69 63 73 20 64 |the !ECQ|RTPics d|
|000009f0| 69 72 65 63 74 6f 72 79 | 0a 20 41 20 43 61 6d 65 |irectory|. A Came|
|00000a00| 72 61 20 63 61 6c 6c 65 | 64 20 24 2e 21 43 61 6d |ra calle|d $.!Cam|
|00000a10| 65 72 61 23 31 20 74 6f | 20 62 65 20 75 73 65 64 |era#1 to| be used|
|00000a20| 20 61 73 20 61 20 76 69 | 65 77 70 6f 69 6e 74 0a | as a vi|ewpoint.|
|00000a30| 0a 49 66 20 6e 6f 20 63 | 61 6d 65 72 61 20 69 73 |.If no c|amera is|
|00000a40| 20 66 6f 75 6e 64 20 74 | 68 65 20 63 61 6d 65 72 | found t|he camer|
|00000a50| 61 20 69 73 20 70 75 74 | 20 61 74 20 31 30 30 30 |a is put| at 1000|
|00000a60| 20 75 6e 69 74 73 20 69 | 6e 20 66 72 6f 6e 74 20 | units i|n front |
|00000a70| 6f 66 20 74 68 65 20 46 | 72 6f 6e 74 0a 76 69 65 |of the F|ront.vie|
|00000a80| 77 2e 20 43 75 72 72 65 | 6e 74 6c 79 20 63 61 6d |w. Curre|ntly cam|
|00000a90| 65 72 61 73 20 61 6c 77 | 61 79 73 20 70 6f 69 6e |eras alw|ays poin|
|00000aa0| 74 20 61 74 20 74 68 65 | 20 6f 72 69 67 69 6e 2c |t at the| origin,|
|00000ab0| 20 49 20 68 61 76 65 6e | 27 74 20 68 61 64 20 74 | I haven|'t had t|
|00000ac0| 69 6d 65 20 74 6f 0a 73 | 6f 72 74 20 6f 75 74 20 |ime to.s|ort out |
|00000ad0| 74 68 65 20 63 6f 72 72 | 65 63 74 20 6d 61 74 68 |the corr|ect math|
|00000ae0| 73 20 74 6f 20 74 61 6b | 65 20 64 69 72 65 63 74 |s to tak|e direct|
|00000af0| 69 6f 6e 20 6f 66 20 76 | 69 65 77 20 69 6e 74 6f |ion of v|iew into|
|00000b00| 20 61 63 63 6f 75 6e 74 | 2e 0a 0a 48 61 76 69 6e | account|...Havin|
|00000b10| 67 20 63 6f 6e 73 74 72 | 75 63 74 65 64 20 61 20 |g constr|ucted a |
|00000b20| 45 75 63 6c 69 64 20 66 | 69 6c 65 20 6f 66 20 74 |Euclid f|ile of t|
|00000b30| 68 65 20 72 69 67 68 74 | 20 73 6f 72 74 2e 2e 2e |he right| sort...|
|00000b40| 49 6e 76 6f 6b 65 20 74 | 68 65 20 45 43 51 52 54 |Invoke t|he ECQRT|
|00000b50| 0a 63 6f 6e 76 65 72 74 | 65 72 2e 20 44 72 6f 70 |.convert|er. Drop|
|00000b60| 20 61 20 45 75 63 6c 69 | 64 20 66 69 6c 65 20 6f | a Eucli|d file o|
|00000b70| 6e 74 6f 20 74 68 65 20 | 45 43 51 52 54 20 63 6f |nto the |ECQRT co|
|00000b80| 6e 76 65 72 74 65 72 2e | 20 44 72 61 67 20 74 68 |nverter.| Drag th|
|00000b90| 65 20 72 65 73 75 6c 74 | 69 6e 67 0a 44 69 72 65 |e result|ing.Dire|
|00000ba0| 63 74 6f 72 79 20 69 6e | 74 6f 20 61 20 66 69 6c |ctory in|to a fil|
|00000bb0| 65 72 20 77 69 6e 64 6f | 77 2e 20 4b 65 65 70 20 |er windo|w. Keep |
|00000bc0| 79 6f 75 72 20 66 69 6e | 67 65 72 73 20 63 72 6f |your fin|gers cro|
|00000bd0| 73 73 65 64 2e 20 54 68 | 65 20 64 69 72 65 63 74 |ssed. Th|e direct|
|00000be0| 6f 72 79 20 77 69 6c 6c | 0a 62 65 20 63 72 65 61 |ory will|.be crea|
|00000bf0| 74 65 64 20 69 66 20 69 | 74 20 64 6f 65 73 6e 27 |ted if i|t doesn'|
|00000c00| 74 20 61 6c 72 65 61 64 | 79 20 65 78 69 73 74 2c |t alread|y exist,|
|00000c10| 20 61 6e 64 20 61 20 66 | 69 6c 65 20 63 61 6c 6c | and a f|ile call|
|00000c20| 65 64 20 51 52 54 20 77 | 69 6c 6c 20 62 65 20 70 |ed QRT w|ill be p|
|00000c30| 6c 61 63 65 64 0a 69 6e | 20 74 68 65 20 64 69 72 |laced.in| the dir|
|00000c40| 65 63 74 6f 72 79 20 63 | 6f 6e 74 61 69 6e 69 6e |ectory c|ontainin|
|00000c50| 67 20 61 20 63 6f 6e 76 | 65 72 73 69 6f 6e 20 6f |g a conv|ersion o|
|00000c60| 66 20 74 68 65 20 45 75 | 63 6c 69 64 20 66 69 6c |f the Eu|clid fil|
|00000c70| 65 2e 0a 0a 46 69 6e 61 | 6c 6c 79 20 28 69 66 20 |e...Fina|lly (if |
|00000c80| 61 6c 6c 20 67 6f 65 73 | 20 77 65 6c 6c 21 29 20 |all goes| well!) |
|00000c90| 69 6e 76 6f 6b 65 20 51 | 52 54 20 61 6e 64 20 64 |invoke Q|RT and d|
|00000ca0| 72 6f 70 20 74 68 65 20 | 64 69 72 65 63 74 6f 72 |rop the |director|
|00000cb0| 79 20 63 6f 6e 74 61 69 | 6e 69 6e 67 20 74 68 65 |y contai|ning the|
|00000cc0| 0a 51 52 54 20 66 69 6c | 65 20 6f 6e 74 6f 20 74 |.QRT fil|e onto t|
|00000cd0| 68 65 20 77 69 6e 64 6f | 77 20 69 74 20 6f 70 65 |he windo|w it ope|
|00000ce0| 6e 73 2e 20 4b 65 65 70 | 20 79 6f 75 72 20 66 69 |ns. Keep| your fi|
|00000cf0| 6e 67 65 72 73 20 63 72 | 6f 73 73 65 64 20 61 67 |ngers cr|ossed ag|
|00000d00| 61 69 6e 2e 2e 2e 20 28 | 51 52 54 0a 74 65 6e 64 |ain... (|QRT.tend|
|00000d10| 73 20 74 6f 20 62 6f 6d | 62 20 6f 75 74 20 6f 63 |s to bom|b out oc|
|00000d20| 63 61 73 69 6f 6e 61 6c | 6c 79 29 2e 0a 0a 54 68 |casional|ly)...Th|
|00000d30| 65 20 72 65 73 75 6c 74 | 69 6e 67 20 73 70 72 69 |e result|ing spri|
|00000d40| 74 65 20 66 69 6c 65 20 | 77 69 6c 6c 20 61 6c 73 |te file |will als|
|00000d50| 6f 20 6c 61 6e 64 20 75 | 70 20 69 6e 20 74 68 65 |o land u|p in the|
|00000d60| 20 72 65 6c 65 76 61 6e | 74 20 64 69 72 65 63 74 | relevan|t direct|
|00000d70| 6f 72 79 2c 20 61 6e 64 | 0a 77 69 74 68 20 61 20 |ory, and|.with a |
|00000d80| 62 69 74 20 6f 66 20 6c | 75 63 6b 20 69 74 20 77 |bit of l|uck it w|
|00000d90| 69 6c 6c 20 6c 6f 6f 6b | 20 61 20 62 69 74 20 6c |ill look| a bit l|
|00000da0| 69 6b 65 20 74 68 65 20 | 73 63 65 6e 65 20 79 6f |ike the |scene yo|
|00000db0| 75 20 63 72 65 61 74 65 | 64 20 69 6e 20 45 75 63 |u create|d in Euc|
|00000dc0| 6c 69 64 21 0a 0a 49 66 | 20 61 6e 79 62 6f 64 79 |lid!..If| anybody|
|00000dd0| 20 68 61 73 20 74 69 6d | 65 20 74 6f 20 69 6e 63 | has tim|e to inc|
|00000de0| 72 65 61 73 65 20 74 68 | 65 20 6e 75 6d 62 65 72 |rease th|e number|
|00000df0| 20 6f 66 20 70 72 69 6d | 69 74 69 76 65 73 20 74 | of prim|itives t|
|00000e00| 72 61 6e 73 6c 61 74 65 | 64 20 62 79 20 74 68 69 |ranslate|d by thi|
|00000e10| 73 0a 6d 65 74 68 6f 64 | 2c 20 70 6c 65 61 73 65 |s.method|, please|
|00000e20| 20 73 65 6e 64 20 74 68 | 65 6d 20 69 6e 20 28 77 | send th|em in (w|
|00000e30| 69 74 68 20 74 68 65 20 | 61 73 73 6f 63 69 61 74 |ith the |associat|
|00000e40| 65 64 20 63 6f 6e 76 65 | 72 74 65 72 20 70 72 6f |ed conve|rter pro|
|00000e50| 67 72 61 6d 29 20 73 6f | 20 77 65 0a 63 61 6e 20 |gram) so| we.can |
|00000e60| 69 6e 63 6c 75 64 65 20 | 74 68 65 6d 20 6f 6e 20 |include |them on |
|00000e70| 6c 61 74 65 72 20 64 69 | 73 6b 73 2e 0a 0a 4e 6f |later di|sks...No|
|00000e80| 74 65 20 74 68 61 74 20 | 66 6f 72 20 22 40 22 2d |te that |for "@"-|
|00000e90| 74 79 70 65 20 6f 62 6a | 65 63 74 73 20 74 68 65 |type obj|ects the|
|00000ea0| 20 45 75 63 6c 69 64 20 | 74 6f 20 51 52 54 20 74 | Euclid |to QRT t|
|00000eb0| 72 61 6e 73 6c 61 74 69 | 6f 6e 20 6e 65 65 64 20 |ranslati|on need |
|00000ec0| 6e 6f 74 20 62 65 0a 65 | 78 61 63 74 2e 20 59 6f |not be.e|xact. Yo|
|00000ed0| 75 20 63 6f 75 6c 64 20 | 69 6e 64 65 70 65 6e 64 |u could |independ|
|00000ee0| 65 6e 74 6c 79 20 63 72 | 65 61 74 65 20 73 61 79 |ently cr|eate say|
|00000ef0| 20 61 20 43 61 72 20 69 | 6e 20 62 6f 74 68 20 45 | a Car i|n both E|
|00000f00| 75 63 6c 69 64 20 61 6e | 64 20 51 52 54 2c 20 77 |uclid an|d QRT, w|
|00000f10| 69 74 68 0a 61 20 6c 6f | 74 20 6d 6f 72 65 20 64 |ith.a lo|t more d|
|00000f20| 65 74 61 69 6c 20 69 6e | 20 74 68 65 20 51 52 54 |etail in| the QRT|
|00000f30| 20 76 65 72 73 69 6f 6e | 2e 20 54 68 65 20 45 75 | version|. The Eu|
|00000f40| 63 6c 69 64 20 63 6f 6e | 73 74 72 75 63 74 20 69 |clid con|struct i|
|00000f50| 73 20 73 69 6d 70 6c 79 | 20 74 68 65 72 65 0a 74 |s simply| there.t|
|00000f60| 6f 20 62 65 20 75 73 65 | 64 20 69 6e 20 74 68 65 |o be use|d in the|
|00000f70| 20 69 6e 74 65 72 61 63 | 74 69 76 65 20 70 72 6f | interac|tive pro|
|00000f80| 63 65 73 73 20 6f 66 20 | 64 65 73 69 67 6e 69 6e |cess of |designin|
|00000f90| 67 20 61 20 73 63 65 6e | 65 2e 0a 0a 46 75 72 74 |g a scen|e...Furt|
|00000fa0| 68 65 72 20 69 6e 66 6f | 72 6d 61 74 69 6f 6e 20 |her info|rmation |
|00000fb0| 69 73 20 74 6f 20 62 65 | 20 66 6f 75 6e 64 20 69 |is to be| found i|
|00000fc0| 6e 20 74 68 65 20 66 69 | 6c 65 20 3c 45 43 51 52 |n the fi|le <ECQR|
|00000fd0| 54 24 44 65 66 73 3e 2e | 53 70 68 65 72 65 20 77 |T$Defs>.|Sphere w|
|00000fe0| 68 69 63 68 20 69 73 0a | 74 68 65 20 42 41 53 49 |hich is.|the BASI|
|00000ff0| 43 20 66 75 6e 63 74 69 | 6f 6e 20 74 6f 20 63 6f |C functi|on to co|
|00001000| 6e 76 65 72 74 20 74 68 | 65 20 45 75 63 6c 69 64 |nvert th|e Euclid|
|00001010| 20 64 65 66 69 6e 69 74 | 69 6f 6e 20 63 6f 6e 74 | definit|ion cont|
|00001020| 61 69 6e 65 64 20 69 6e | 20 74 68 65 20 66 69 6c |ained in| the fil|
|00001030| 65 0a 3c 45 43 51 52 54 | 24 50 69 63 73 3e 2e 53 |e.<ECQRT|$Pics>.S|
|00001040| 70 68 65 72 65 2e 0a 0a | 52 41 4d 20 74 6f 20 52 |phere...|RAM to R|
|00001050| 41 4d 20 74 72 61 6e 73 | 66 65 72 20 69 73 20 6e |AM trans|fer is n|
|00001060| 6f 74 20 73 75 70 70 6f | 72 74 65 64 20 66 6f 72 |ot suppo|rted for|
|00001070| 20 45 75 63 6c 69 64 20 | 66 69 6c 65 73 20 69 6e | Euclid |files in|
|00001080| 2c 20 61 73 20 69 74 20 | 77 61 73 20 66 6f 75 6e |, as it |was foun|
|00001090| 64 20 74 6f 0a 62 65 20 | 75 6e 72 65 6c 69 61 62 |d to.be |unreliab|
|000010a0| 6c 65 2c 20 61 6e 64 20 | 49 20 64 69 64 6e 27 74 |le, and |I didn't|
|000010b0| 20 68 61 76 65 20 74 68 | 65 20 74 69 6d 65 20 74 | have th|e time t|
|000010c0| 6f 20 66 69 78 20 69 74 | 2e 0a 0a 49 74 20 63 6f |o fix it|...It co|
|000010d0| 75 6c 64 20 70 72 6f 62 | 61 62 6c 79 20 62 65 20 |uld prob|ably be |
|000010e0| 62 65 74 74 65 72 2c 20 | 61 6e 79 20 6f 66 66 65 |better, |any offe|
|000010f0| 72 73 3f 20 49 27 6d 20 | 73 75 72 65 20 75 73 69 |rs? I'm |sure usi|
|00001100| 6e 67 20 51 52 54 73 20 | 42 42 4f 58 0a 64 69 72 |ng QRTs |BBOX.dir|
|00001110| 65 63 74 74 69 76 65 73 | 20 63 6f 75 6c 64 20 73 |ecttives| could s|
|00001120| 70 65 65 64 20 74 68 69 | 6e 67 73 20 75 70 20 61 |peed thi|ngs up a|
|00001130| 20 62 69 74 2c 20 61 6e | 64 20 74 68 61 74 20 74 | bit, an|d that t|
|00001140| 68 69 73 20 63 6f 75 6c | 64 20 62 65 20 70 75 74 |his coul|d be put|
|00001150| 20 69 6e 0a 61 75 74 6f | 6d 61 74 69 63 61 6c 6c | in.auto|maticall|
|00001160| 79 2e 20 4f 66 20 63 6f | 75 72 73 65 20 73 68 65 |y. Of co|urse she|
|00001170| 65 74 73 20 73 68 6f 75 | 6c 64 20 62 65 20 70 6f |ets shou|ld be po|
|00001180| 73 73 69 62 6c 65 2e 0a | 0a 49 20 68 61 76 65 20 |ssible..|.I have |
|00001190| 67 61 69 6e 65 64 20 73 | 6f 6d 65 20 65 78 70 65 |gained s|ome expe|
|000011a0| 72 69 65 6e 63 65 20 69 | 6e 20 75 73 69 6e 67 20 |rience i|n using |
|000011b0| 74 68 65 20 63 6f 6e 76 | 65 72 74 65 72 20 64 75 |the conv|erter du|
|000011c0| 72 69 6e 67 20 74 68 65 | 20 64 65 62 75 67 67 69 |ring the| debuggi|
|000011d0| 6e 67 2e 2e 2e 0a 49 74 | 20 69 73 20 63 65 72 74 |ng....It| is cert|
|000011e0| 61 69 6e 6c 79 20 62 65 | 73 74 20 74 6f 20 64 6f |ainly be|st to do|
|000011f0| 20 61 20 31 2f 36 34 20 | 73 69 7a 65 64 20 70 69 | a 1/64 |sized pi|
|00001200| 63 74 75 72 65 20 66 69 | 72 73 74 20 74 6f 20 73 |cture fi|rst to s|
|00001210| 65 65 20 69 66 20 74 68 | 65 20 72 65 73 75 6c 74 |ee if th|e result|
|00001220| 0a 69 73 20 67 6f 69 6e | 67 20 74 6f 20 62 65 20 |.is goin|g to be |
|00001230| 72 6f 75 67 68 6c 79 20 | 72 69 67 68 74 2c 20 74 |roughly |right, t|
|00001240| 68 65 6e 20 61 20 66 75 | 6c 6c 20 73 69 7a 65 64 |hen a fu|ll sized|
|00001250| 20 6f 6e 65 2e 20 49 66 | 20 74 68 65 20 69 6d 61 | one. If| the ima|
|00001260| 67 65 20 73 65 65 6d 73 | 20 74 6f 6f 0a 64 61 72 |ge seems| too.dar|
|00001270| 6b 20 74 68 65 6e 20 79 | 6f 75 20 6e 65 65 64 20 |k then y|ou need |
|00001280| 74 6f 20 69 6e 63 72 65 | 61 73 65 20 74 68 65 20 |to incre|ase the |
|00001290| 22 64 69 73 74 22 20 70 | 61 72 61 6d 65 74 65 72 |"dist" p|arameter|
|000012a0| 20 6f 6e 20 74 68 65 20 | 4c 41 4d 50 20 64 69 72 | on the |LAMP dir|
|000012b0| 65 63 74 69 76 65 73 0a | 69 6e 20 74 68 65 20 51 |ectives.|in the Q|
|000012c0| 52 54 20 66 69 6c 65 20 | 28 75 73 65 20 21 45 64 |RT file |(use !Ed|
|000012d0| 69 74 29 2e 20 50 75 74 | 74 69 6e 67 20 61 20 63 |it). Put|ting a c|
|000012e0| 61 6d 65 72 61 20 69 6e | 74 6f 20 61 20 73 63 65 |amera in|to a sce|
|000012f0| 6e 65 20 72 61 74 68 65 | 72 20 74 68 65 6e 0a 72 |ne rathe|r then.r|
|00001300| 65 6c 79 69 6e 67 20 6f | 6e 20 74 68 65 20 22 63 |elying o|n the "c|
|00001310| 61 6d 65 72 61 20 61 74 | 20 31 30 30 30 20 75 6e |amera at| 1000 un|
|00001320| 69 74 73 22 20 69 73 20 | 6f 66 74 65 6e 20 62 65 |its" is |often be|
|00001330| 73 74 2e 0a 0a 57 68 65 | 6e 20 75 73 69 6e 67 20 |st...Whe|n using |
|00001340| 51 52 54 20 79 6f 75 20 | 63 61 6e 20 63 68 65 63 |QRT you |can chec|
|00001350| 6b 20 6f 6e 20 70 72 6f | 67 72 65 73 73 20 62 79 |k on pro|gress by|
|00001360| 20 75 73 69 6e 67 20 53 | 75 73 70 65 6e 64 2e 20 | using S|uspend. |
|00001370| 4f 6e 63 65 20 51 52 54 | 20 69 73 0a 73 75 73 70 |Once QRT| is.susp|
|00001380| 65 6e 64 65 64 20 79 6f | 75 20 63 61 6e 20 6c 6f |ended yo|u can lo|
|00001390| 6f 6b 20 61 74 20 74 68 | 65 20 49 4d 47 20 66 69 |ok at th|e IMG fi|
|000013a0| 6c 65 20 77 69 74 68 20 | 21 50 61 69 6e 74 2e 0a |le with |!Paint..|
|000013b0| 0a 20 54 6f 6e 79 20 43 | 68 65 61 6c 20 4f 63 74 |. Tony C|heal Oct|
|000013c0| 2e 20 31 39 38 39 0a 20 | 2d 2d 2d 2d 2d 2d 2d 2d |. 1989. |--------|
|000013d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0a 46 69 6c |--------|----.Fil|
|000013e0| 65 44 61 74 61 82 21 52 | 75 6e 00 87 01 20 63 6f |eData.!R|un... co|
|000013f0| 6f f7 00 00 00 41 eb ff | ff 64 0e 32 fb 03 00 21 |o....A..|.d.2...!|
|00001400| d7 53 65 74 20 45 43 51 | 52 54 24 44 69 72 20 3c |.Set ECQ|RT$Dir <|
|00001410| 4f 62 65 79 24 44 69 72 | 3e 0a 53 65 74 20 45 43 |Obey$Dir|>.Set EC|
|00001420| 51 52 54 24 44 65 66 73 | 20 3c 45 43 51 52 54 24 |QRT$Defs| <ECQRT$|
|00001430| 44 69 72 3e 2e 51 52 54 | 44 65 66 73 0a 49 63 6f |Dir>.QRT|Defs.Ico|
|00001440| 6e 53 70 72 69 74 65 73 | 20 3c 4f 62 65 79 24 44 |nSprites| <Obey$D|
|00001450| 69 72 3e 2e 21 53 70 72 | 69 74 65 73 0a 52 4d 45 |ir>.!Spr|ites.RME|
|00001460| 6e 73 75 72 65 20 45 75 | 63 6c 69 64 20 32 20 49 |nsure Eu|clid 2 I|
|00001470| 46 20 22 3c 45 75 63 6c | 69 64 24 44 69 72 3e 22 |F "<Eucl|id$Dir>"|
|00001480| 20 3d 20 22 22 20 54 48 | 45 4e 20 45 52 52 4f 52 | = "" TH|EN ERROR|
|00001490| 20 34 32 20 43 61 6e 27 | 74 20 66 69 6e 64 20 45 | 42 Can'|t find E|
|000014a0| 75 63 6c 69 64 20 4d 6f | 64 75 6c 65 0a 52 4d 45 |uclid Mo|dule.RME|
|000014b0| 6e 73 75 72 65 20 45 75 | 63 6c 69 64 20 32 20 52 |nsure Eu|clid 2 R|
|000014c0| 4d 4c 6f 61 64 20 3c 45 | 75 63 6c 69 64 24 44 69 |MLoad <E|uclid$Di|
|000014d0| 72 3e 2e 45 75 63 6c 69 | 64 0a 52 75 6e 20 3c 45 |r>.Eucli|d.Run <E|
|000014e0| 43 51 52 54 24 44 69 72 | 3e 2e 21 52 75 6e 49 6d |CQRT$Dir|>.!RunIm|
|000014f0| 61 67 65 20 25 2a 30 0a | 46 69 6c 65 44 61 74 61 |age %*0.|FileData|
|00001500| 82 21 52 75 6e 49 6d 61 | 67 65 00 6f ac 3e 00 00 |.!RunIma|ge.o.>..|
|00001510| 41 fb ff ff 8c 5c 13 ff | 03 00 e0 a3 0d 00 0a 1b |A....\..|........|
|00001520| f4 3e 3c 45 43 51 52 54 | 24 44 69 72 3e 2e 21 52 |.><ECQRT|$Dir>.!R|
|00001530| 75 6e 49 6d 61 67 65 0d | 00 14 3e f4 20 28 43 29 |unImage.|..>. (C)|
|00001540| 20 54 6f 6e 79 20 43 68 | 65 61 6c 20 28 41 63 65 | Tony Ch|eal (Ace|
|00001550| 20 43 6f 6d 70 75 74 69 | 6e 67 29 20 31 39 38 39 | Computi|ng) 1989|
|00001560| 20 66 6f 72 20 74 68 65 | 20 45 55 73 65 72 20 67 | for the| EUser g|
|00001570| 72 6f 75 70 2e 0d 00 1e | 46 f4 20 54 68 69 73 20 |roup....|F. This |
|00001580| 69 73 20 74 68 65 20 6d | 61 69 6e 20 64 72 69 76 |is the m|ain driv|
|00001590| 65 72 20 70 72 6f 67 72 | 61 6d 20 66 6f 72 20 74 |er progr|am for t|
|000015a0| 68 65 20 21 45 43 51 52 | 54 20 63 6f 6e 76 65 72 |he !ECQR|T conver|
|000015b0| 74 65 72 20 70 72 6f 67 | 72 61 6d 0d 00 28 1b f4 |ter prog|ram..(..|
|000015c0| 20 49 74 20 64 6f 65 73 | 20 74 68 65 20 66 6f 6c | It does| the fol|
|000015d0| 6c 6f 77 69 6e 67 0d 00 | 32 28 f4 20 4c 6f 74 73 |lowing..|2(. Lots|
|000015e0| 20 6f 66 20 69 6e 69 74 | 69 61 6c 69 73 61 74 69 | of init|ialisati|
|000015f0| 6f 6e 2e 2e 2e 69 6e 63 | 6c 75 64 69 6e 67 0d 00 |on...inc|luding..|
|00001600| 3c 3e f4 20 55 73 69 6e | 67 20 74 68 65 20 4c 49 |<>. Usin|g the LI|
|00001610| 42 52 41 52 59 20 66 75 | 6e 63 74 69 6f 6e 20 6f |BRARY fu|nction o|
|00001620| 6e 20 61 6c 6c 20 66 69 | 6c 65 73 20 69 6e 20 74 |n all fi|les in t|
|00001630| 68 65 20 64 69 72 65 63 | 74 6f 72 79 0d 00 46 16 |he direc|tory..F.|
|00001640| f4 20 3c 45 43 51 52 54 | 24 51 52 54 44 65 66 73 |. <ECQRT|$QRTDefs|
|00001650| 3e 2e 0d 00 50 2a f4 20 | 42 75 6e 67 73 20 61 20 |>...P*. |Bungs a |
|00001660| 70 72 65 74 74 79 20 69 | 63 6f 6e 20 6f 6e 20 74 |pretty i|con on t|
|00001670| 68 65 20 69 63 6f 6e 20 | 62 61 72 2e 0d 00 5a 41 |he icon |bar...ZA|
|00001680| f4 20 48 61 6e 67 73 20 | 61 72 6f 75 6e 64 20 75 |. Hangs |around u|
|00001690| 6e 74 69 6c 20 79 6f 75 | 20 64 72 6f 70 20 61 20 |ntil you| drop a |
|000016a0| 45 75 63 6c 69 64 20 66 | 69 6c 65 20 6f 6e 20 69 |Euclid f|ile on i|
|000016b0| 74 20 6f 72 20 51 75 69 | 74 20 69 74 2e 0d 00 64 |t or Qui|t it...d|
|000016c0| 46 f4 20 49 4d 4d 45 44 | 49 41 54 45 4c 59 20 70 |F. IMMED|IATELY p|
|000016d0| 6f 70 73 20 75 70 20 61 | 20 53 61 76 65 20 64 69 |ops up a| Save di|
|000016e0| 61 6c 6f 67 75 65 20 62 | 6f 78 20 61 6e 64 20 74 |alogue b|ox and t|
|000016f0| 68 65 6e 20 77 61 69 74 | 73 20 75 6e 74 69 6c 20 |hen wait|s until |
|00001700| 79 6f 75 0d 00 6e 26 f4 | 20 64 72 6f 70 20 74 68 |you..n&.| drop th|
|00001710| 65 20 64 69 72 65 63 74 | 6f 72 79 20 73 6f 6d 65 |e direct|ory some|
|00001720| 77 68 65 72 65 2e 2e 2e | 2e 0d 00 78 31 f4 20 54 |where...|...x1. T|
|00001730| 68 65 6e 20 69 74 20 6f | 70 65 6e 73 20 74 68 65 |hen it o|pens the|
|00001740| 20 66 69 6c 65 20 64 69 | 72 2e 51 52 54 20 66 6f | file di|r.QRT fo|
|00001750| 72 20 77 72 69 74 69 6e | 67 2e 0d 00 82 29 f4 20 |r writin|g....). |
|00001760| 4c 6f 61 64 73 20 74 68 | 65 20 45 75 63 6c 69 64 |Loads th|e Euclid|
|00001770| 20 66 69 6c 65 20 66 6f | 72 20 61 6e 61 6c 79 73 | file fo|r analys|
|00001780| 69 73 2e 0d 00 8c 17 f4 | 20 57 72 69 74 65 73 20 |is......| Writes |
|00001790| 61 20 70 72 65 61 6d 62 | 6c 65 0d 00 96 42 f4 20 |a preamb|le...B. |
|000017a0| 46 6f 72 20 65 61 63 68 | 20 6f 62 6a 65 63 74 20 |For each| object |
|000017b0| 68 75 6e 67 20 66 72 6f | 6d 20 74 68 65 20 24 20 |hung fro|m the $ |
|000017c0| 6f 62 6a 65 63 74 20 69 | 6e 20 74 68 65 20 45 75 |object i|n the Eu|
|000017d0| 63 6c 69 64 20 66 69 6c | 65 2e 2e 2e 0d 00 a0 4a |clid fil|e......J|
|000017e0| f4 20 20 45 78 74 72 61 | 63 74 73 20 75 73 65 66 |. Extra|cts usef|
|000017f0| 75 6c 20 69 6e 66 6f 72 | 6d 61 74 69 6f 6e 20 66 |ul infor|mation f|
|00001800| 72 6f 6d 20 74 68 65 20 | 74 72 61 6e 73 66 6f 72 |rom the |transfor|
|00001810| 6d 61 74 69 6f 6e 20 61 | 70 70 6c 69 65 64 20 74 |mation a|pplied t|
|00001820| 6f 20 65 61 63 68 0d 00 | aa 3d f4 20 20 43 61 6c |o each..|.=. Cal|
|00001830| 6c 73 20 74 68 65 20 66 | 75 6e 63 74 69 6f 6e 20 |ls the f|unction |
|00001840| 64 65 72 69 76 65 64 20 | 62 79 20 74 61 6b 69 6e |derived |by takin|
|00001850| 67 20 22 46 4e 22 2b 3c | 6f 62 6a 65 63 74 6e 61 |g "FN"+<|objectna|
|00001860| 6d 65 3e 0d 00 b4 41 f4 | 20 49 66 20 74 68 65 20 |me>...A.| If the |
|00001870| 6f 62 6a 65 63 74 20 6e | 61 6d 65 20 73 74 61 72 |object n|ame star|
|00001880| 74 73 20 77 69 74 68 20 | 22 21 22 20 69 74 20 69 |ts with |"!" it i|
|00001890| 73 20 72 65 70 6c 61 63 | 65 64 20 62 79 20 22 5f |s replac|ed by "_|
|000018a0| 22 20 74 6f 0d 00 be 48 | f4 20 63 6f 6d 70 6c 79 |" to...H|. comply|
|000018b0| 20 77 69 74 68 20 42 41 | 53 49 43 20 6e 61 6d 69 | with BA|SIC nami|
|000018c0| 6e 67 20 63 6f 6e 76 65 | 6e 74 69 6f 6e 73 2e 20 |ng conve|ntions. |
|000018d0| 54 68 69 73 20 64 65 61 | 6c 73 20 77 69 74 68 20 |This dea|ls with |
|000018e0| 74 68 65 20 73 74 61 6e | 64 61 72 64 0d 00 c8 47 |the stan|dard...G|
|000018f0| f4 20 21 4c 69 67 68 74 | 20 61 6e 64 20 21 43 61 |. !Light| and !Ca|
|00001900| 6d 65 72 61 20 6f 62 6a | 65 63 74 73 2e 20 54 68 |mera obj|ects. Th|
|00001910| 65 20 66 75 6e 63 74 69 | 6f 6e 20 46 4e 5f 43 61 |e functi|on FN_Ca|
|00001920| 6d 65 72 61 20 64 6f 65 | 73 20 6e 6f 74 68 69 6e |mera doe|s nothin|
|00001930| 67 2e 2e 0d 00 d2 4c f4 | 20 74 68 65 20 63 61 6d |g.....L.| the cam|
|00001940| 65 72 61 20 70 6f 73 69 | 74 69 6f 6e 20 69 73 20 |era posi|tion is |
|00001950| 61 6e 61 6c 79 73 65 64 | 20 62 79 20 74 68 69 73 |analysed| by this|
|00001960| 20 66 69 6c 65 2e 20 21 | 4c 69 67 68 74 20 77 69 | file. !|Light wi|
|00001970| 6c 6c 20 64 72 6f 70 20 | 61 20 6c 69 67 68 74 0d |ll drop |a light.|
|00001980| 00 dc 2b f4 20 69 6e 74 | 6f 20 74 68 65 20 73 63 |..+. int|o the sc|
|00001990| 65 6e 65 20 61 74 20 74 | 68 65 20 72 65 6c 65 76 |ene at t|he relev|
|000019a0| 61 6e 74 20 70 6f 69 6e | 74 2e 0d 00 e6 05 f4 0d |ant poin|t.......|
|000019b0| 00 f0 18 f4 20 57 72 69 | 74 65 73 20 61 20 70 6f |.... Wri|tes a po|
|000019c0| 73 74 61 6d 62 6c 65 0d | 00 fa 48 f4 20 43 6c 6f |stamble.|..H. Clo|
|000019d0| 73 65 73 20 74 68 65 20 | 66 69 6c 65 20 61 6e 64 |ses the |file and|
|000019e0| 20 73 68 75 74 73 20 75 | 70 20 75 6e 74 69 6c 20 | shuts u|p until |
|000019f0| 73 6f 6d 65 6f 6e 65 20 | 64 72 6f 70 73 20 6f 6e |someone |drops on|
|00001a00| 20 61 6e 6f 74 68 65 72 | 20 45 75 63 6c 69 64 0d | another| Euclid.|
|00001a10| 01 04 0b f4 20 66 69 6c | 65 2e 0d 01 0e 16 f4 20 |.... fil|e...... |
|00001a20| 53 6f 20 68 65 72 65 20 | 77 65 20 67 6f 2e 2e 2e |So here |we go...|
|00001a30| 0d 01 18 42 f4 20 54 68 | 69 73 20 70 72 6f 67 72 |...B. Th|is progr|
|00001a40| 61 6d 20 69 73 20 76 65 | 72 79 20 6f 76 65 72 73 |am is ve|ry overs|
|00001a50| 69 7a 65 64 2e 2e 2e 62 | 65 69 6e 67 20 61 20 68 |ized...b|eing a h|
|00001a60| 61 63 6b 65 64 20 64 6f | 77 6e 20 76 65 72 73 69 |acked do|wn versi|
|00001a70| 6f 6e 0d 01 22 3a f4 20 | 6f 66 20 76 61 72 69 6f |on..":. |of vario|
|00001a80| 75 73 20 6f 74 68 65 72 | 73 2c 20 77 69 74 68 6f |us other|s, witho|
|00001a90| 75 74 20 61 6c 6c 20 74 | 68 65 20 68 61 63 6b 69 |ut all t|he hacki|
|00001aa0| 6e 67 20 64 6f 6e 65 20 | 79 65 74 2e 0d 01 2c 18 |ng done |yet...,.|
|00001ab0| f4 20 49 20 68 6f 70 65 | 20 69 74 20 77 6f 72 6b |. I hope| it work|
|00001ac0| 73 21 21 21 0d 01 36 1b | 56 45 52 24 3d 22 31 2e |s!!!..6.|VER$="1.|
|00001ad0| 30 32 20 28 32 37 2d 4f | 63 74 2d 38 39 29 22 0d |02 (27-O|ct-89)".|
|00001ae0| 01 40 04 0d 01 4a 14 de | 46 25 28 32 35 35 29 2c |.@...J..|F%(255),|
|00001af0| 56 25 28 32 35 35 29 0d | 01 54 20 6d 61 74 3d 26 |V%(255).|.T mat=&|
|00001b00| 36 32 3a 46 25 28 26 36 | 32 29 3d 31 3a 56 25 28 |62:F%(&6|2)=1:V%(|
|00001b10| 26 36 32 29 3d 31 31 0d | 01 5e 17 74 72 61 6e 73 |&62)=11.|.^.trans|
|00001b20| 3d 26 35 30 3a 46 25 28 | 26 35 30 29 3d 38 0d 01 |=&50:F%(|&50)=8..|
|00001b30| 68 21 67 72 6f 75 70 3d | 26 34 30 3a 46 25 28 26 |h!group=|&40:F%(&|
|00001b40| 34 30 29 3d 38 3a 56 25 | 28 26 34 30 29 3d 32 0d |40)=8:V%|(&40)=2.|
|00001b50| 01 72 3e 73 6f 6c 69 64 | 3d 26 33 30 3a 46 25 28 |.r>solid|=&30:F%(|
|00001b60| 26 33 30 29 3d 38 3a 56 | 25 28 26 33 30 29 3d 32 |&30)=8:V|%(&30)=2|
|00001b70| 3a 6d 65 73 68 3d 26 33 | 31 3a 46 25 28 26 33 31 |:mesh=&3|1:F%(&31|
|00001b80| 29 3d 39 3a 56 25 28 26 | 33 31 29 3d 32 0d 01 7c |)=9:V%(&|31)=2..||
|00001b90| 40 73 68 65 65 74 3d 26 | 33 32 3a 46 25 28 26 33 |@sheet=&|32:F%(&3|
|00001ba0| 32 29 3d 31 35 3a 56 25 | 28 26 33 32 29 3d 32 3a |2)=15:V%|(&32)=2:|
|00001bb0| 6c 69 67 68 74 3d 26 33 | 46 3a 46 25 28 26 33 46 |light=&3|F:F%(&3F|
|00001bc0| 29 3d 31 3a 56 25 28 26 | 33 46 29 3d 36 0d 01 86 |)=1:V%(&|3F)=6...|
|00001bd0| 3e 70 6c 61 6e 65 3d 26 | 32 30 3a 46 25 28 26 32 |>plane=&|20:F%(&2|
|00001be0| 30 29 3d 31 3a 56 25 28 | 26 32 30 29 3d 33 3a 76 |0)=1:V%(|&20)=3:v|
|00001bf0| 61 6e 65 3d 26 32 31 3a | 46 25 28 26 32 31 29 3d |ane=&21:|F%(&21)=|
|00001c00| 31 3a 56 25 28 26 32 31 | 29 3d 35 0d 01 90 3e 70 |1:V%(&21|)=5...>p|
|00001c10| 61 74 68 3d 26 32 32 3a | 46 25 28 26 32 32 29 3d |ath=&22:|F%(&22)=|
|00001c20| 31 3a 56 25 28 26 32 32 | 29 3d 34 3a 76 70 61 74 |1:V%(&22|)=4:vpat|
|00001c30| 68 3d 26 32 33 3a 46 25 | 28 26 32 33 29 3d 31 3a |h=&23:F%|(&23)=1:|
|00001c40| 56 25 28 26 32 33 29 3d | 36 0d 01 9a 1b 46 25 28 |V%(&23)=|6....F%(|
|00001c50| 29 3d 46 25 28 29 2a 34 | 3a 56 25 28 29 3d 56 25 |)=F%()*4|:V%()=V%|
|00001c60| 28 29 2a 34 0d 01 a4 04 | 0d 01 ae 28 de 4d 28 32 |()*4....|...(.M(2|
|00001c70| 2c 32 29 2c 54 28 32 29 | 2c 58 28 32 29 2c 52 28 |,2),T(2)|,X(2),R(|
|00001c80| 32 2c 32 29 2c 56 28 32 | 29 2c 41 28 32 2c 32 29 |2,2),V(2|),A(2,2)|
|00001c90| 0d 01 b8 04 0d 01 c2 0b | de 46 4c 25 32 35 36 0d |........|.FL%256.|
|00001ca0| 01 cc 0d 43 25 3d 31 3a | 4f 25 3d 30 0d 01 d6 0a |...C%=1:|O%=0....|
|00001cb0| c8 95 43 25 3d 31 0d 01 | e0 3b c8 99 22 4f 53 5f |..C%=1..|.;.."OS_|
|00001cc0| 47 42 50 42 22 2c 39 2c | 22 3c 45 43 51 52 54 24 |GBPB",9,|"<ECQRT$|
|00001cd0| 44 65 66 73 3e 22 2c 46 | 4c 25 2c 43 25 2c 4f 25 |Defs>",F|L%,C%,O%|
|00001ce0| 2c 32 35 36 2c 22 2a 22 | b8 2c 2c 2c 43 25 2c 4f |,256,"*"|.,,,C%,O|
|00001cf0| 25 0d 01 ea 33 e7 43 25 | 3d 31 c8 9b 22 3c 45 43 |%...3.C%|=1.."<EC|
|00001d00| 51 52 54 24 44 65 66 73 | 3e 2e 22 2b a4 5a 53 28 |QRT$Defs|>."+.ZS(|
|00001d10| 46 4c 25 29 3a f4 50 52 | 49 4e 54 46 4e 5a 53 28 |FL%):.PR|INTFNZS(|
|00001d20| 46 4c 25 29 0d 01 f4 05 | ce 0d 01 fe 04 0d 02 08 |FL%)....|........|
|00001d30| 1b f4 3e 24 2e 21 4c 6f | 61 64 53 61 76 65 2e 21 |..>$.!Lo|adSave.!|
|00001d40| 52 75 6e 49 6d 61 67 65 | 0d 02 12 3a f4 20 28 43 |RunImage|...:. (C|
|00001d50| 29 20 54 6f 6e 79 20 43 | 68 65 61 6c 2f 41 63 65 |) Tony C|heal/Ace|
|00001d60| 20 43 6f 6d 70 75 74 69 | 6e 67 20 41 70 72 69 6c | Computi|ng April|
|00001d70| 20 31 39 38 38 20 56 65 | 72 73 69 6f 6e 20 32 2e | 1988 Ve|rsion 2.|
|00001d80| 30 30 0d 02 1c 04 0d 02 | 26 19 46 49 4e 25 3d 26 |00......|&.FIN%=&|
|00001d90| 44 45 31 3a 46 4f 55 54 | 25 3d 26 31 30 30 30 0d |DE1:FOUT|%=&1000.|
|00001da0| 02 30 1c ee 85 ef 34 2c | 33 30 3a f6 3a f1 9e 3b |.0....4,|30:.:..;|
|00001db0| 3a 47 47 25 3d a5 3a ef | 35 3a e0 0d 02 3a 10 f2 |:GG%=.:.|5:...:..|
|00001dc0| 57 69 6d 70 53 79 6d 62 | 6f 6c 73 0d 02 44 36 f2 |WimpSymb|ols..D6.|
|00001dd0| 53 74 61 72 74 28 22 45 | 43 51 52 54 22 2c 22 45 |Start("E|CQRT","E|
|00001de0| 43 51 52 54 22 2c 22 21 | 45 43 51 52 54 22 29 3a |CQRT","!|ECQRT"):|
|00001df0| 4d 46 3d a4 4f 70 74 56 | 28 22 4d 22 2c 30 2e 32 |MF=.OptV|("M",0.2|
|00001e00| 29 0d 02 4e 1a f2 4f 70 | 65 6e 54 65 6d 70 6c 61 |)..N..Op|enTempla|
|00001e10| 74 65 73 28 32 2c 33 30 | 30 30 29 0d 02 58 3b f2 |tes(2,30|00)..X;.|
|00001e20| 54 65 6d 70 6c 61 74 65 | 28 22 50 72 6f 67 49 6e |Template|("ProgIn|
|00001e30| 66 6f 22 29 3a f2 54 65 | 6d 70 6c 61 74 65 28 22 |fo"):.Te|mplate("|
|00001e40| 53 61 76 65 41 73 22 29 | 3a 54 25 28 57 25 2d 31 |SaveAs")|:T%(W%-1|
|00001e50| 29 21 36 34 3d 31 0d 02 | 62 13 f2 43 6c 6f 73 65 |)!64=1..|b..Close|
|00001e60| 54 65 6d 70 6c 61 74 65 | 73 0d 02 6c 09 f2 49 6e |Template|s..l..In|
|00001e70| 69 74 0d 02 76 30 e0 3d | e0 2b 26 34 30 30 30 3a |it..v0.=|.+&4000:|
|00001e80| d3 3d 93 2d 26 31 30 30 | 3a 48 45 41 50 25 3d 93 |.=.-&100|:HEAP%=.|
|00001e90| 3a f2 48 65 61 70 28 48 | 45 41 50 25 2c 26 31 30 |:.Heap(H|EAP%,&10|
|00001ea0| 30 29 0d 02 80 32 e7 45 | 24 3c 3e 22 22 24 28 42 |0)...2.E|$<>""$(B|
|00001eb0| 25 2b 34 34 29 3d 45 24 | 2b bd 30 3a 42 25 21 34 |%+44)=E$|+.0:B%!4|
|00001ec0| 30 3d 46 49 4e 25 3a f2 | 4c 6f 61 64 5f 49 63 6f |0=FIN%:.|Load_Ico|
|00001ed0| 6e 42 61 72 0d 02 8a 2a | 54 45 53 54 25 3d a4 56 |nBar...*|TEST%=.V|
|00001ee0| 61 72 56 61 6c 28 22 45 | 75 63 6c 69 64 24 54 65 |arVal("E|uclid$Te|
|00001ef0| 73 74 69 6e 67 22 29 3d | 22 54 72 75 65 22 0d 02 |sting")=|"True"..|
|00001f00| 94 05 f5 0d 02 9e 09 f2 | 50 6f 6c 6c 0d 02 a8 06 |........|Poll....|
|00001f10| fd 30 0d 02 b2 04 0d 02 | bc 0a dd f2 50 6f 6c 6c |.0......|....Poll|
|00001f20| 0d 02 c6 13 c8 99 50 6f | 6c 6c 2c 4d 25 2c 42 25 |......Po|ll,M%,B%|
|00001f30| b8 41 25 0d 02 d0 09 c8 | 8e 41 25 ca 0d 02 da 22 |.A%.....|.A%...."|
|00001f40| c9 30 3a 57 24 3d 50 4f | 4c 4c 59 24 3a 57 25 3d |.0:W$=PO|LLY$:W%=|
|00001f50| 44 57 25 3a 43 4f 25 3d | 43 25 28 57 25 29 0d 02 |DW%:CO%=|C%(W%)..|
|00001f60| e4 20 c9 31 2c 32 2c 33 | 2c 34 2c 35 2c 31 30 3a |. .1,2,3|,4,5,10:|
|00001f70| 57 24 3d a4 57 4e 61 6d | 65 28 21 42 25 29 0d 02 |W$=.WNam|e(!B%)..|
|00001f80| ee 06 c9 36 0d 02 f8 17 | 20 20 20 57 24 3d a4 57 |...6....| W$=.W|
|00001f90| 4e 61 6d 65 28 42 25 21 | 31 32 29 0d 03 02 1e 20 |Name(B%!|12).... |
|00001fa0| 20 20 58 25 3d 21 42 25 | 3a 59 25 3d 42 25 21 34 | X%=!B%|:Y%=B%!4|
|00001fb0| 3a 42 53 25 3d 42 25 21 | 38 0d 03 0c 33 20 20 20 |:BS%=B%!|8...3 |
|00001fc0| 4c 25 3d 28 42 53 25 80 | 26 34 29 3d 26 34 3a 52 |L%=(BS%.|&4)=&4:R|
|00001fd0| 25 3d 28 42 53 25 80 26 | 31 29 3d 26 31 3a 43 25 |%=(BS%.&|1)=&1:C%|
|00001fe0| 3d 28 42 53 25 80 26 32 | 29 3d 26 32 0d 03 16 3c |=(BS%.&2|)=&2...<|
|00001ff0| 20 20 20 44 4c 25 3d 28 | 42 53 25 80 26 34 30 29 | DL%=(|BS%.&40)|
|00002000| 3d 26 34 30 3a 44 52 25 | 3d 28 42 53 25 80 26 31 |=&40:DR%|=(BS%.&1|
|00002010| 30 29 3d 26 31 30 3a 44 | 43 25 3d 28 42 53 25 80 |0)=&10:D|C%=(BS%.|
|00002020| 26 32 30 29 3d 26 32 30 | 0d 03 20 42 20 20 20 4c |&20)=&20|.. B L|
|00002030| 4c 25 3d 28 42 53 25 80 | 26 34 30 30 29 3d 26 34 |L%=(BS%.|&400)=&4|
|00002040| 30 30 3a 52 52 25 3d 28 | 42 53 25 80 26 31 30 30 |00:RR%=(|BS%.&100|
|00002050| 29 3d 26 31 30 30 3a 43 | 43 25 3d 28 42 53 25 80 |)=&100:C|C%=(BS%.|
|00002060| 26 32 30 30 29 3d 26 32 | 30 30 0d 03 2a 0f c9 37 |&200)=&2|00..*..7|
|00002070| 3a 57 24 3d 44 52 41 47 | 24 0d 03 34 28 c9 38 3a |:W$=DRAG|$..4(.8:|
|00002080| 57 24 3d a4 57 4e 61 6d | 65 28 21 42 25 29 3a 4b |W$=.WNam|e(!B%):K|
|00002090| 24 3d bd 42 25 3f 32 34 | 3a 4b 25 3d 42 25 21 32 |$=.B%?24|:K%=B%!2|
|000020a0| 34 0d 03 3e 06 c9 39 0d | 03 48 1e 20 20 20 c8 99 |4..>..9.|.H. ..|
|000020b0| 47 65 74 50 2c 2c 42 31 | 25 3a 4d 50 25 3d 42 31 |GetP,,B1|%:MP%=B1|
|000020c0| 25 21 38 80 31 0d 03 52 | 1c 20 20 20 4d 45 25 3d |%!8.1..R|. ME%=|
|000020d0| 55 25 2b 32 38 2b 21 42 | 25 2a 32 34 3a 49 25 3d |U%+28+!B|%*24:I%=|
|000020e0| 34 0d 03 5c 2f 20 20 20 | c8 95 42 25 21 49 25 3e |4..\/ |..B%!I%>|
|000020f0| 3d 30 3a 4d 45 25 3d 4d | 45 25 21 34 2b 32 38 2b |=0:ME%=M|E%!4+28+|
|00002100| 42 25 21 49 25 2a 32 34 | 3a 49 25 2b 3d 34 3a ce |B%!I%*24|:I%+=4:.|
|00002110| 0d 03 66 39 20 20 20 57 | 24 3d c4 32 35 35 2c 22 |..f9 W|$=.255,"|
|00002120| 20 22 29 3a c8 99 44 65 | 63 6f 64 65 4d 2c 2c 55 | "):..De|codeM,,U|
|00002130| 25 2c 42 25 2c 57 24 20 | b8 20 2c 2c 2c 4d 24 3a |%,B%,W$ |. ,,,M$:|
|00002140| 57 24 3d 4d 24 2b 22 2e | 22 0d 03 70 29 20 20 20 |W$=M$+".|"..p) |
|00002150| 43 25 3d 30 3a f5 4a 25 | 3d a7 57 24 2c 22 2e 22 |C%=0:.J%|=.W$,"."|
|00002160| 29 3a 4d 24 28 43 25 29 | 3d c0 57 24 2c 4a 25 2d |):M$(C%)|=.W$,J%-|
|00002170| 31 29 0d 03 7a 22 20 20 | 20 57 24 3d c1 57 24 2c |1)..z" | W$=.W$,|
|00002180| 4a 25 2b 31 29 3a 43 25 | 2b 3d 31 3a fd 43 25 2a |J%+1):C%|+=1:.C%*|
|00002190| 34 3d 49 25 0d 03 84 26 | 20 20 20 57 24 3d c0 57 |4=I%...&| W$=.W|
|000021a0| 24 29 3a e7 57 24 3c 3e | 22 22 4d 24 28 43 25 2d |$):.W$<>|""M$(C%-|
|000021b0| 31 29 2b 3d 22 2e 22 2b | 57 24 0d 03 8e 21 20 20 |1)+="."+|W$...! |
|000021c0| 20 57 24 3d 4d 24 28 30 | 29 3a 57 25 3d 55 57 25 | W$=M$(0|):W%=UW%|
|000021d0| 3a 43 4f 25 3d 43 25 28 | 57 25 29 0d 03 98 0d c9 |:CO%=C%(|W%).....|
|000021e0| 31 37 2c 31 38 2c 31 39 | 0d 03 a2 44 f4 56 44 55 |17,18,19|...D.VDU|
|000021f0| 34 2c 33 30 3a 50 52 49 | 4e 54 41 25 3a 46 4f 52 |4,30:PRI|NTA%:FOR|
|00002200| 49 25 3d 30 54 4f 36 34 | 53 54 45 50 34 3a 50 52 |I%=0TO64|STEP4:PR|
|00002210| 49 4e 54 7e 42 25 21 49 | 25 3b 3a 4e 45 58 54 3a |INT~B%!I|%;:NEXT:|
|00002220| 56 44 55 35 3a 47 47 25 | 3d 47 45 54 0d 03 ac 29 |VDU5:GG%|=GET...)|
|00002230| 20 20 20 e7 41 25 3c 3e | 31 39 e3 49 25 3d 30 b8 | .A%<>|19.I%=0.|
|00002240| 26 31 30 30 88 34 3a 42 | 33 25 21 49 25 3d 42 25 |&100.4:B|3%!I%=B%|
|00002250| 21 49 25 3a ed 0d 03 b6 | 2a 20 20 20 57 24 3d 22 |!I%:....|* W$="|
|00002260| 43 65 6e 74 72 61 6c 22 | 3a 43 25 3d 42 25 21 31 |Central"|:C%=B%!1|
|00002270| 36 3a 41 25 3d 31 31 2d | 28 41 25 3d 31 39 29 0d |6:A%=11-|(A%=19).|
|00002280| 03 c0 0b 7f 3a 41 25 3d | 31 33 0d 03 ca 05 cb 0d |....:A%=|13......|
|00002290| 03 d4 0a e7 41 25 3d 31 | 8c 0d 03 de 19 20 20 20 |....A%=1|..... |
|000022a0| c8 99 52 65 64 72 61 77 | 57 2c 2c 42 25 20 b8 20 |..Redraw|W,,B% . |
|000022b0| 46 25 0d 03 e8 31 20 20 | 20 c8 95 46 25 3a 58 25 |F%...1 | ..F%:X%|
|000022c0| 3d 42 25 21 34 2d 42 25 | 21 32 30 3a 59 25 3d 42 |=B%!4-B%|!20:Y%=B|
|000022d0| 25 21 31 36 2d 42 25 21 | 32 34 3a 41 25 3d 31 3a |%!16-B%!|24:A%=1:|
|000022e0| f2 44 4f 0d 03 f2 18 20 | 20 20 c8 99 47 65 74 52 |.DO.... | ..GetR|
|000022f0| 2c 2c 42 25 20 b8 20 46 | 25 3a ce 0d 03 fc 05 cc |,,B% . F|%:......|
|00002300| 0d 04 06 0f e7 41 25 3c | 3d 31 32 3a f2 44 4f 0d |.....A%<|=12:.DO.|
|00002310| 04 10 05 cd 0d 04 1a 10 | e7 4d 50 25 f2 50 65 72 |........|.MP%.Per|
|00002320| 73 69 73 74 0d 04 24 05 | e1 0d 04 2e 04 0d 04 38 |sist..$.|.......8|
|00002330| 0e f4 44 45 46 50 52 4f | 43 44 4f 0d 04 42 1c ef |..DEFPRO|CDO..B..|
|00002340| 34 2c 33 30 3a f1 41 24 | 28 41 25 29 57 24 91 20 |4,30:.A$|(A%)W$. |
|00002350| 89 32 30 3b 3a ef 35 0d | 04 4c 16 54 25 3d 91 2b |.20;:.5.|.L.T%=.+|
|00002360| 35 30 3a f5 fd 91 3e 54 | 25 84 a6 2d 31 0d 04 56 |50:...>T|%..-1..V|
|00002370| 08 dd f2 44 4f 0d 04 60 | 13 ea 85 3a ee 85 ea 3a |...DO..`|...:...:|
|00002380| f2 42 41 44 44 4f 3a e1 | 0d 04 6a 18 56 25 3d a0 |.BADDO:.|..j.V%=.|
|00002390| 28 22 46 4e 22 2b 41 24 | 28 41 25 29 2b 57 24 29 |("FN"+A$|(A%)+W$)|
|000023a0| 0d 04 74 05 e1 0d 04 7e | 04 0d 04 88 0b dd f2 42 |..t....~|.......B|
|000023b0| 41 44 44 4f 0d 04 92 36 | e7 9f 3d 32 39 3a 45 24 |ADDO...6|..=29:E$|
|000023c0| 3d 22 22 3a 56 25 3d a0 | 28 22 46 4e 22 2b 41 24 |="":V%=.|("FN"+A$|
|000023d0| 28 41 25 29 2b 22 44 65 | 66 61 75 6c 74 22 29 3a |(A%)+"De|fault"):|
|000023e0| f2 50 65 72 73 69 73 74 | 3a e1 0d 04 9c 0c f2 45 |.Persist|:......E|
|000023f0| 72 72 6f 72 3a e1 0d 04 | a6 04 0d 04 b0 0b dd f2 |rror:...|........|
|00002400| 45 72 72 6f 72 0d 04 ba | 0b e7 54 45 53 54 25 8c |Error...|..TEST%.|
|00002410| 0d 04 c4 25 20 20 20 21 | 42 25 3d 9f 3a 24 28 42 |...% !|B%=.:$(B|
|00002420| 25 2b 34 29 3d f6 24 2b | 22 20 22 2b c3 9e 2b 22 |%+4)=.$+|" "+..+"|
|00002430| 20 22 2b bd 30 0d 04 ce | 2b 20 20 20 c8 99 22 57 | "+.0...|+ .."W|
|00002440| 69 6d 70 5f 52 65 70 6f | 72 74 45 72 72 6f 72 22 |imp_Repo|rtError"|
|00002450| 2c 42 25 2c 25 31 31 2c | 41 50 50 24 b8 2c 56 25 |,B%,%11,|APP$.,V%|
|00002460| 0d 04 d8 05 cc 0d 04 e2 | 1a 20 20 20 21 42 25 3d |........|. !B%=|
|00002470| 9f 3a 24 28 42 25 2b 34 | 29 3d f6 24 2b bd 30 0d |.:$(B%+4|)=.$+.0.|
|00002480| 04 ec 2a 20 20 20 c8 99 | 22 57 69 6d 70 5f 52 65 |..* ..|"Wimp_Re|
|00002490| 70 6f 72 74 45 72 72 6f | 72 22 2c 42 25 2c 25 31 |portErro|r",B%,%1|
|000024a0| 2c 41 50 50 24 b8 2c 56 | 25 0d 04 f6 05 cd 0d 05 |,APP$.,V|%.......|
|000024b0| 00 0e e7 56 25 3d 32 f2 | 51 75 69 74 0d 05 0a 05 |...V%=2.|Quit....|
|000024c0| e1 0d 05 14 04 0d 05 1e | 14 dd f2 50 65 72 73 69 |........|...Persi|
|000024d0| 73 74 3a e7 4d 50 25 8b | e1 0d 05 28 29 f2 54 69 |st:.MP%.|...().Ti|
|000024e0| 63 6b 4d 65 6e 75 3a c8 | 99 43 72 65 61 74 65 4d |ckMenu:.|.CreateM|
|000024f0| 2c 2c 55 25 2c 55 58 25 | 2c 55 59 25 3a 4d 50 25 |,,U%,UX%|,UY%:MP%|
|00002500| 3d a3 0d 05 32 05 e1 0d | 05 3c 04 0d 05 46 15 dd |=...2...|.<...F..|
|00002510| a4 4e 75 6c 6c 5f 44 65 | 66 61 75 6c 74 3a 3d 30 |.Null_De|fault:=0|
|00002520| 0d 05 50 14 dd a4 52 65 | 64 72 61 77 5f 44 65 66 |..P...Re|draw_Def|
|00002530| 61 75 6c 74 0d 05 5a 0e | c8 99 53 65 74 43 6f 6c |ault..Z.|..SetCol|
|00002540| 2c 36 0d 05 64 23 e3 49 | 25 3d 28 42 25 21 32 38 |,6..d#.I|%=(B%!28|
|00002550| 2d 58 25 29 81 35 30 b8 | 28 42 25 21 33 36 2d 58 |-X%).50.|(B%!36-X|
|00002560| 25 29 81 35 30 0d 05 6e | 25 ec 58 25 2b 49 25 2a |%).50..n|%.X%+I%*|
|00002570| 35 30 2c 42 25 21 33 32 | 3a df 58 25 2b 49 25 2a |50,B%!32|:.X%+I%*|
|00002580| 35 30 2c 42 25 21 34 30 | 3a ed 0d 05 78 23 e3 49 |50,B%!40|:...x#.I|
|00002590| 25 3d 28 42 25 21 33 32 | 2d 59 25 29 81 35 30 b8 |%=(B%!32|-Y%).50.|
|000025a0| 28 42 25 21 34 30 2d 59 | 25 29 81 35 30 0d 05 82 |(B%!40-Y|%).50...|
|000025b0| 25 ec 42 25 21 32 38 2c | 59 25 2b 49 25 2a 35 30 |%.B%!28,|Y%+I%*50|
|000025c0| 3a df 42 25 21 33 36 2c | 59 25 2b 49 25 2a 35 30 |:.B%!36,|Y%+I%*50|
|000025d0| 3a ed 0d 05 8c 06 3d 30 | 0d 05 96 04 0d 05 a0 21 |:.....=0|.......!|
|000025e0| dd a4 4f 70 65 6e 5f 44 | 65 66 61 75 6c 74 3a c8 |..Open_D|efault:.|
|000025f0| 99 4f 70 65 6e 57 2c 2c | 42 25 3a 3d 30 0d 05 aa |.OpenW,,|B%:=0...|
|00002600| 28 dd a4 43 6c 6f 73 65 | 5f 44 65 66 61 75 6c 74 |(..Close|_Default|
|00002610| 3a f2 44 65 6c 65 74 65 | 57 69 6e 64 6f 77 28 57 |:.Delete|Window(W|
|00002620| 25 29 3a 3d 30 0d 05 b4 | 16 dd a4 4c 65 61 76 65 |%):=0...|...Leave|
|00002630| 5f 44 65 66 61 75 6c 74 | 3a 3d 30 0d 05 be 16 dd |_Default|:=0.....|
|00002640| a4 45 6e 74 65 72 5f 44 | 65 66 61 75 6c 74 3a 3d |.Enter_D|efault:=|
|00002650| 30 0d 05 c8 17 dd a4 42 | 75 74 74 6f 6e 5f 44 65 |0......B|utton_De|
|00002660| 66 61 75 6c 74 3a 3d 30 | 0d 05 d2 1e dd a4 4b 65 |fault:=0|......Ke|
|00002670| 79 5f 44 65 66 61 75 6c | 74 3a c8 99 50 4b 65 79 |y_Defaul|t:..PKey|
|00002680| 2c 4b 25 3a 3d 30 0d 05 | dc 15 dd a4 4d 65 6e 75 |,K%:=0..|....Menu|
|00002690| 5f 44 65 66 61 75 6c 74 | 3a 3d 30 0d 05 e6 17 dd |_Default|:=0.....|
|000026a0| a4 53 63 72 6f 6c 6c 5f | 44 65 66 61 75 6c 74 3a |.Scroll_|Default:|
|000026b0| 3d 30 0d 05 f0 30 dd a4 | 45 6e 64 44 72 61 67 5f |=0...0..|EndDrag_|
|000026c0| 44 65 66 61 75 6c 74 3a | c8 99 44 72 61 67 2c 2c |Default:|..Drag,,|
|000026d0| 2d 31 3a ff 22 50 4f 49 | 4e 54 45 52 20 31 22 3a |-1:."POI|NTER 1":|
|000026e0| 3d 30 0d 05 fa 15 dd a4 | 4d 65 73 73 61 67 65 5f |=0......|Message_|
|000026f0| 43 65 6e 74 72 61 6c 0d | 06 04 09 c8 8e 43 25 ca |Central.|.....C%.|
|00002700| 0d 06 0e 0c c9 30 3a f2 | 51 75 69 74 0d 06 18 2a |.....0:.|Quit...*|
|00002710| c9 31 3a 57 24 3d a4 57 | 4e 61 6d 65 28 42 25 21 |.1:W$=.W|Name(B%!|
|00002720| 32 30 29 3a 56 25 3d a0 | 28 22 46 4e 53 61 76 65 |20):V%=.|("FNSave|
|00002730| 5f 22 2b 57 24 29 0d 06 | 22 33 c9 32 3a 57 25 3d |_"+W$)..|"3.2:W%=|
|00002740| 4d 53 47 53 25 3a 43 4f | 25 3d 43 25 28 57 25 29 |MSGS%:CO|%=C%(W%)|
|00002750| 3a 56 25 3d a0 28 22 46 | 4e 53 61 76 65 41 63 6b |:V%=.("F|NSaveAck|
|00002760| 5f 22 2b 4d 53 47 53 24 | 29 0d 06 2c 32 c9 33 3a |_"+MSGS$|)..,2.3:|
|00002770| 57 24 3d a4 57 4e 61 6d | 65 28 42 25 21 32 30 29 |W$=.WNam|e(B%!20)|
|00002780| 3a e7 53 43 52 41 50 25 | 53 43 52 41 50 25 3d 53 |:.SCRAP%|SCRAP%=S|
|00002790| 43 52 41 50 25 3d 42 25 | 21 31 32 0d 06 36 19 20 |CRAP%=B%|!12..6. |
|000027a0| 20 20 56 25 3d a0 28 22 | 46 4e 4c 6f 61 64 5f 22 | V%=.("|FNLoad_"|
|000027b0| 2b 57 24 29 0d 06 40 33 | c9 34 3a 57 25 3d 4d 53 |+W$)..@3|.4:W%=MS|
|000027c0| 47 4c 25 3a 43 4f 25 3d | 43 25 28 57 25 29 3a 56 |GL%:CO%=|C%(W%):V|
|000027d0| 25 3d a0 28 22 46 4e 4c | 6f 61 64 41 63 6b 5f 22 |%=.("FNL|oadAck_"|
|000027e0| 2b 4d 53 47 4c 24 29 0d | 06 4a 39 c9 35 3a f4 49 |+MSGL$).|.J9.5:.I|
|000027f0| 46 42 25 21 34 30 3d 46 | 49 4e 25 3a 57 24 3d 46 |FB%!40=F|IN%:W$=F|
|00002800| 4e 57 4e 61 6d 65 28 2d | 32 29 3a 56 25 3d 45 56 |NWName(-|2):V%=EV|
|00002810| 41 4c 28 22 46 4e 4c 6f | 61 64 5f 22 2b 57 24 29 |AL("FNLo|ad_"+W$)|
|00002820| 0d 06 54 30 c9 36 3a 57 | 25 3d 4d 53 47 46 25 3a |..T0.6:W|%=MSGF%:|
|00002830| 43 4f 25 3d 43 25 28 57 | 25 29 3a 56 25 3d a0 28 |CO%=C%(W|%):V%=.(|
|00002840| 22 46 4e 52 41 4d 46 5f | 22 2b 4d 53 47 46 24 29 |"FNRAMF_|"+MSGF$)|
|00002850| 0d 06 5e 30 c9 37 3a 57 | 25 3d 4d 53 47 54 25 3a |..^0.7:W|%=MSGT%:|
|00002860| 43 4f 25 3d 43 25 28 57 | 25 29 3a 56 25 3d a0 28 |CO%=C%(W|%):V%=.(|
|00002870| 22 46 4e 52 41 4d 54 5f | 22 2b 4d 53 47 54 24 29 |"FNRAMT_|"+MSGT$)|
|00002880| 0d 06 68 0f c9 38 3a f2 | 50 72 65 51 75 69 74 0d |..h..8:.|PreQuit.|
|00002890| 06 72 12 c9 39 3a f2 4e | 65 77 50 61 6c 65 74 74 |.r..9:.N|ewPalett|
|000028a0| 65 0d 06 7c 0f c9 26 35 | 30 32 3a f2 48 65 6c 70 |e..|..&5|02:.Help|
|000028b0| 0d 06 86 0b c9 26 34 30 | 30 43 30 0d 06 90 30 20 |.....&40|0C0...0 |
|000028c0| 20 20 55 53 25 3d 42 25 | 21 32 30 3a 53 58 25 3d | US%=B%|!20:SX%=|
|000028d0| 42 25 21 32 34 3a 53 59 | 25 3d 42 25 21 32 38 3a |B%!24:SY|%=B%!28:|
|000028e0| 43 4f 25 3d 43 25 28 55 | 57 25 29 0d 06 9a 30 20 |CO%=C%(U|W%)...0 |
|000028f0| 20 20 57 24 3d c4 32 35 | 35 2c 22 20 22 29 3a c8 | W$=.25|5," "):.|
|00002900| 99 44 65 63 6f 64 65 4d | 2c 2c 55 25 2c 42 25 2b |.DecodeM|,,U%,B%+|
|00002910| 33 32 2c 57 24 b8 2c 2c | 2c 4d 24 0d 06 a4 25 20 |32,W$.,,|,M$...% |
|00002920| 20 20 4c 24 3d a4 4c 65 | 61 66 28 4d 24 29 3a 4d | L$=.Le|af(M$):M|
|00002930| 24 3d c0 4d 24 2c a9 4d | 24 2d a9 4c 24 2d 31 29 |$=.M$,.M|$-.L$-1)|
|00002940| 0d 06 ae 0f 20 20 20 e7 | 55 53 25 3c 90 20 8c 0d |.... .|US%<. ..|
|00002950| 06 b8 2e 20 20 20 20 20 | 20 57 24 3d a4 57 4e 61 |... | W$=.WNa|
|00002960| 6d 65 28 55 53 25 29 3a | 56 25 3d a0 28 22 46 4e |me(US%):|V%=.("FN|
|00002970| 53 75 62 4d 65 6e 75 5f | 22 2b 57 24 29 0d 06 c2 |SubMenu_|"+W$)...|
|00002980| 08 20 20 20 cc 0d 06 cc | 1f 20 20 20 20 20 20 56 |. ....|. V|
|00002990| 25 3d a0 28 22 46 4e 53 | 75 62 4d 65 6e 75 5f 22 |%=.("FNS|ubMenu_"|
|000029a0| 2b 4c 24 29 0d 06 d6 08 | 20 20 20 cd 0d 06 e0 27 |+L$)....| ....'|
|000029b0| c8 99 22 57 69 6d 70 5f | 43 72 65 61 74 65 53 75 |.."Wimp_|CreateSu|
|000029c0| 62 4d 65 6e 75 22 2c 2c | 55 53 25 2c 53 58 25 2c |bMenu",,|US%,SX%,|
|000029d0| 53 59 25 0d 06 ea 17 c9 | 26 34 30 30 43 31 3a f2 |SY%.....|&400C1:.|
|000029e0| 4d 6f 64 65 43 68 61 6e | 67 65 0d 06 f4 30 c9 30 |ModeChan|ge...0.0|
|000029f0| 3a f4 26 34 30 30 43 35 | 3a 42 25 21 31 32 3d 42 |:.&400C5|:B%!12=B|
|00002a00| 25 21 38 3a 50 52 4f 43 | 4d 65 73 73 28 31 39 2c |%!8:PROC|Mess(19,|
|00002a10| 42 25 2c 42 25 21 34 2c | 30 29 0d 06 fe 21 20 20 |B%,B%!4,|0)...! |
|00002a20| 20 e7 42 25 21 32 30 3e | 48 45 41 50 25 2b 48 45 | .B%!20>|HEAP%+HE|
|00002a30| 41 50 25 21 38 2b 26 31 | 30 30 8c 0d 07 08 20 20 |AP%!8+&1|00.... |
|00002a40| 20 20 43 25 3d 42 25 21 | 32 30 2d 28 48 45 41 50 | C%=B%!|20-(HEAP|
|00002a50| 25 2b 48 45 41 50 25 21 | 31 32 29 0d 07 12 0e 20 |%+HEAP%!|12).... |
|00002a60| 20 20 e7 43 25 3e 3d 30 | 8c 0d 07 1c 26 20 20 20 | .C%>=0|....& |
|00002a70| 20 20 20 c8 99 53 6c 6f | 74 2c 42 25 21 32 30 2c | ..Slo|t,B%!20,|
|00002a80| 2d 31 b8 46 25 3a 46 25 | 2b 3d 26 38 30 30 30 0d |-1.F%:F%|+=&8000.|
|00002a90| 07 26 2d 20 20 20 20 20 | 20 c8 99 48 65 61 70 2c |.&- | ..Heap,|
|00002aa0| 35 2c 48 45 41 50 25 2c | 2c 46 25 2d 28 48 45 41 |5,HEAP%,|,F%-(HEA|
|00002ab0| 50 25 2b 48 45 41 50 25 | 21 31 32 29 0d 07 30 08 |P%+HEAP%|!12)..0.|
|00002ac0| 20 20 20 cc 0d 07 3a 1c | 20 20 20 20 20 20 c8 99 | ...:.| ..|
|00002ad0| 48 65 61 70 2c 35 2c 48 | 45 41 50 25 2c 2c 43 25 |Heap,5,H|EAP%,,C%|
|00002ae0| 0d 07 44 28 20 20 20 20 | 20 20 c8 99 53 6c 6f 74 |..D( | ..Slot|
|00002af0| 2c 48 45 41 50 25 2b 48 | 45 41 50 25 21 31 32 2d |,HEAP%+H|EAP%!12-|
|00002b00| 26 38 30 30 30 2c 2d 31 | 0d 07 4e 08 20 20 20 cd |&8000,-1|..N. .|
|00002b10| 0d 07 58 08 20 20 20 cd | 0d 07 62 05 cb 0d 07 6c |..X. .|..b....l|
|00002b20| 06 3d 30 0d 07 76 18 dd | a4 4d 65 73 73 61 67 65 |.=0..v..|.Message|
|00002b30| 5f 44 65 66 61 75 6c 74 | 3a 3d 30 0d 07 80 14 dd |_Default|:=0.....|
|00002b40| a4 42 6f 75 6e 63 65 5f | 43 65 6e 74 72 61 6c 0d |.Bounce_|Central.|
|00002b50| 07 8a 09 c8 8e 43 25 ca | 0d 07 94 1e c9 36 3a e7 |.....C%.|.....6:.|
|00002b60| 52 41 4d 25 f2 46 72 65 | 65 28 52 41 4d 25 29 3a |RAM%.Fre|e(RAM%):|
|00002b70| 52 41 4d 25 3d 30 0d 07 | 9e 2e e3 49 25 3d 30 b8 |RAM%=0..|...I%=0.|
|00002b80| 26 31 30 30 88 34 3a 42 | 25 21 49 25 3d 42 34 25 |&100.4:B|%!I%=B4%|
|00002b90| 21 49 25 3a ed 3a 3d a4 | 53 61 76 65 41 63 6b 53 |!I%:.:=.|SaveAckS|
|00002ba0| 63 72 61 70 0d 07 a8 3d | c9 37 3a e7 52 41 4d 4f |crap...=|.7:.RAMO|
|00002bb0| 55 54 25 52 41 4d 4f 55 | 54 25 3d 30 3a 52 41 4d |UT%RAMOU|T%=0:RAM|
|00002bc0| 4f 55 54 4c 25 3d 30 3a | 85 31 2c 22 44 61 74 61 |OUTL%=0:|.1,"Data|
|00002bd0| 20 74 72 61 6e 73 66 65 | 72 20 66 61 69 6c 65 64 | transfe|r failed|
|00002be0| 22 0d 07 b2 23 7f 3a 85 | 31 2c 22 4d 65 73 73 61 |"...#.:.|1,"Messa|
|00002bf0| 67 65 20 22 2b c3 7e 43 | 25 2b 22 20 62 6f 75 6e |ge "+.~C|%+" boun|
|00002c00| 63 65 64 22 0d 07 bc 05 | cb 0d 07 c6 06 3d 30 0d |ced"....|.....=0.|
|00002c10| 07 d0 17 dd a4 42 6f 75 | 6e 63 65 5f 44 65 66 61 |.....Bou|nce_Defa|
|00002c20| 75 6c 74 3a 3d 30 0d 07 | da 04 0d 07 e4 11 dd a4 |ult:=0..|........|
|00002c30| 52 41 4d 54 72 61 6e 73 | 66 65 72 0d 07 ee 30 4c |RAMTrans|fer...0L|
|00002c40| 25 3d 42 25 21 32 34 3a | 54 25 3d 42 25 21 34 3a |%=B%!24:|T%=B%!4:|
|00002c50| e7 52 41 4d 4f 55 54 4c | 25 3c 4c 25 3a 42 25 21 |.RAMOUTL|%<L%:B%!|
|00002c60| 32 34 3d 52 41 4d 4f 55 | 54 4c 25 0d 07 f8 26 f2 |24=RAMOU|TL%...&.|
|00002c70| 52 65 70 6c 79 41 63 6b | 28 37 29 3a 4d 53 47 46 |ReplyAck|(7):MSGF|
|00002c80| 25 3d 4d 53 47 25 3a 4d | 53 47 46 24 3d 4d 53 47 |%=MSG%:M|SGF$=MSG|
|00002c90| 24 0d 08 02 2a c8 99 54 | 72 61 6e 73 66 65 72 2c |$...*..T|ransfer,|
|00002ca0| 42 25 21 34 2c 52 41 4d | 4f 55 54 25 2c 54 25 2c |B%!4,RAM|OUT%,T%,|
|00002cb0| 42 25 21 32 30 2c 42 25 | 21 32 34 0d 08 0c 33 e7 |B%!20,B%|!24...3.|
|00002cc0| 52 41 4d 4f 55 54 4c 25 | 3c 4c 25 3a 52 41 4d 4f |RAMOUTL%|<L%:RAMO|
|00002cd0| 55 54 25 3d 30 8b 52 41 | 4d 4f 55 54 25 2b 3d 4c |UT%=0.RA|MOUT%+=L|
|00002ce0| 25 3a 52 41 4d 4f 55 54 | 4c 25 2d 3d 4c 25 0d 08 |%:RAMOUT|L%-=L%..|
|00002cf0| 16 06 3d 30 0d 08 20 04 | 0d 08 2a 0e dd a4 52 41 |..=0.. .|..*...RA|
|00002d00| 4d 46 65 74 63 68 0d 08 | 34 13 e7 42 25 21 32 34 |MFetch..|4..B%!24|
|00002d10| 3c 52 41 4d 49 4e 4c 25 | 8c 0d 08 3e 1d 20 20 20 |<RAMINL%|...>. |
|00002d20| 3d a0 28 22 46 4e 52 41 | 4d 54 45 6e 64 5f 22 2b |=.("FNRA|MTEnd_"+|
|00002d30| 4d 53 47 54 24 29 0d 08 | 48 05 cc 0d 08 52 20 20 |MSGT$)..|H....R |
|00002d40| 20 20 85 31 2c 22 44 61 | 74 61 20 74 72 61 6e 73 | .1,"Da|ta trans|
|00002d50| 66 65 72 20 66 61 69 6c | 65 64 22 0d 08 5c 05 cd |fer fail|ed"..\..|
|00002d60| 0d 08 66 06 3d 30 0d 08 | 70 04 0d 08 7a 12 dd a4 |..f.=0..|p...z...|
|00002d70| 53 61 76 65 41 63 6b 53 | 63 72 61 70 0d 08 84 44 |SaveAckS|crap...D|
|00002d80| 24 28 42 25 2b 34 34 29 | 3d 22 3c 57 69 6d 70 24 |$(B%+44)|="<Wimp$|
|00002d90| 53 63 72 61 70 3e 22 2b | bd 30 3a 42 25 21 33 36 |Scrap>"+|.0:B%!36|
|00002da0| 3d 2d 31 3a 21 42 25 3d | 36 30 3a f2 52 65 70 6c |=-1:!B%=|60:.Repl|
|00002db0| 79 28 32 29 3a 53 43 52 | 41 50 25 3d 42 25 21 38 |y(2):SCR|AP%=B%!8|
|00002dc0| 0d 08 8e 06 3d 30 0d 08 | 98 04 0d 08 a2 32 dd f2 |....=0..|.....2..|
|00002dd0| 52 65 73 74 6f 72 65 4d | 65 73 73 61 67 65 3a e3 |RestoreM|essage:.|
|00002de0| 49 25 3d 30 b8 26 31 30 | 30 88 34 3a 42 25 21 49 |I%=0.&10|0.4:B%!I|
|00002df0| 25 3d 42 33 25 21 49 25 | 3a ed 3a e1 0d 08 ac 04 |%=B3%!I%|:.:.....|
|00002e00| 0d 08 b6 0e dd f2 54 69 | 63 6b 4d 65 6e 75 0d 08 |......Ti|ckMenu..|
|00002e10| c0 15 57 25 3d 55 57 25 | 3a 43 4f 25 3d 43 25 28 |..W%=UW%|:CO%=C%(|
|00002e20| 57 25 29 0d 08 ca 0d c8 | 8e 57 24 28 57 25 29 ca |W%).....|.W$(W%).|
|00002e30| 0d 08 d4 27 c9 22 56 69 | 65 77 65 72 22 2c 22 56 |...'."Vi|ewer","V|
|00002e40| 69 65 77 4f 62 6a 65 63 | 74 22 3a f2 56 69 65 77 |iewObjec|t":.View|
|00002e50| 65 72 5f 4d 65 6e 75 0d | 08 de 1c c9 22 49 63 6f |er_Menu.|...."Ico|
|00002e60| 6e 42 61 72 22 3a f2 49 | 63 6f 6e 42 61 72 5f 4d |nBar":.I|conBar_M|
|00002e70| 65 6e 75 0d 08 e8 1a c9 | 22 4f 62 6a 65 63 74 22 |enu.....|"Object"|
|00002e80| 3a f2 4f 62 6a 65 63 74 | 5f 4d 65 6e 75 0d 08 f2 |:.Object|_Menu...|
|00002e90| 05 cb 0d 08 fc 05 e1 0d | 09 06 04 0d 09 10 17 dd |........|........|
|00002ea0| f2 53 65 74 56 53 74 72 | 28 57 25 2c 49 25 2c 53 |.SetVStr|(W%,I%,S|
|00002eb0| 24 29 0d 09 1a 35 21 42 | 31 25 3d 57 25 28 57 25 |$)...5!B|1%=W%(W%|
|00002ec0| 29 3a c8 99 47 65 74 57 | 49 2c 2c 42 31 25 3a 49 |):..GetW|I,,B1%:I|
|00002ed0| 25 3d 42 31 25 2b 31 31 | 36 2b 49 25 2a 33 32 3a |%=B1%+11|6+I%*32:|
|00002ee0| 24 21 49 25 3d 53 24 0d | 09 24 05 e1 0d 09 2e 04 |$!I%=S$.|.$......|
|00002ef0| 0d 09 38 31 dd f2 53 65 | 74 49 28 57 25 2c 49 25 |..81..Se|tI(W%,I%|
|00002f00| 2c 53 24 29 3a ea 46 25 | 3a 21 42 31 25 3d 57 25 |,S$):.F%|:!B1%=W%|
|00002f10| 28 57 25 29 3a c8 99 47 | 65 74 57 49 2c 2c 42 31 |(W%):..G|etWI,,B1|
|00002f20| 25 0d 09 42 37 e7 49 25 | 3e 3d 30 3a 49 25 3d 42 |%..B7.I%|>=0:I%=B|
|00002f30| 31 25 2b 31 31 32 2b 49 | 25 2a 33 32 3a 46 25 3d |1%+112+I|%*32:F%=|
|00002f40| 49 25 2d 34 8b 49 25 3d | 42 31 25 2b 37 36 3a 46 |I%-4.I%=|B1%+76:F|
|00002f50| 25 3d 42 31 25 2b 36 30 | 0d 09 4c 2a e7 21 46 25 |%=B1%+60|..L*.!F%|
|00002f60| 80 31 3c 3c 38 3a 24 21 | 49 25 3d c0 53 24 2c 49 |.1<<8:$!|I%=.S$,I|
|00002f70| 25 21 38 2d 31 29 8b 24 | 49 25 3d c0 53 24 2c 31 |%!8-1).$|I%=.S$,1|
|00002f80| 31 29 0d 09 56 05 e1 0d | 09 60 04 0d 09 6a 2e dd |1)..V...|.`...j..|
|00002f90| a4 47 65 74 49 28 57 25 | 2c 49 25 29 3a ea 46 25 |.GetI(W%|,I%):.F%|
|00002fa0| 3a 21 42 31 25 3d 57 25 | 28 57 25 29 3a c8 99 47 |:!B1%=W%|(W%):..G|
|00002fb0| 65 74 57 49 2c 2c 42 31 | 25 0d 09 74 37 e7 49 25 |etWI,,B1|%..t7.I%|
|00002fc0| 3e 3d 30 3a 49 25 3d 42 | 31 25 2b 31 31 32 2b 49 |>=0:I%=B|1%+112+I|
|00002fd0| 25 2a 33 32 3a 46 25 3d | 49 25 2d 34 8b 49 25 3d |%*32:F%=|I%-4.I%=|
|00002fe0| 42 31 25 2b 37 36 3a 46 | 25 3d 42 31 25 2b 36 30 |B1%+76:F|%=B1%+60|
|00002ff0| 0d 09 7e 18 e7 21 46 25 | 80 31 3c 3c 38 3a 3d 24 |..~..!F%|.1<<8:=$|
|00003000| 21 49 25 8b 3d 24 49 25 | 0d 09 88 04 0d 09 92 25 |!I%.=$I%|.......%|
|00003010| dd f2 53 65 74 49 46 28 | 57 25 2c 49 25 2c 53 24 |..SetIF(|W%,I%,S$|
|00003020| 29 3a f2 53 65 74 49 28 | 57 25 2c 49 25 2c 53 24 |):.SetI(|W%,I%,S$|
|00003030| 29 0d 09 9c 29 42 31 25 | 21 34 3d 49 25 3a 42 31 |)...)B1%|!4=I%:B1|
|00003040| 25 21 38 3d 30 3a 42 31 | 25 21 31 32 3d 30 3a c8 |%!8=0:B1|%!12=0:.|
|00003050| 99 53 65 74 49 2c 2c 42 | 31 25 0d 09 a6 05 e1 0d |.SetI,,B|1%......|
|00003060| 09 b0 04 0d 09 ba 18 dd | f2 53 74 61 72 74 28 54 |........|.Start(T|
|00003070| 24 2c 53 24 2c 49 24 29 | 3a ea dc 0d 09 c4 29 41 |$,S$,I$)|:.....)A|
|00003080| 50 50 24 3d 53 24 3a 57 | 3d 37 30 3a de 57 24 28 |PP$=S$:W|=70:.W$(|
|00003090| 57 29 2c 57 25 28 57 29 | 2c 43 25 28 57 29 2c 44 |W),W%(W)|,C%(W),D|
|000030a0| 25 28 57 29 0d 09 ce 2b | de 41 24 28 31 33 29 2c |%(W)...+|.A$(13),|
|000030b0| 4d 45 4e 55 25 35 30 30 | 30 2c 49 4e 44 25 36 30 |MENU%500|0,IND%60|
|000030c0| 30 2c 4d 24 28 31 30 29 | 2c 56 56 25 32 35 36 0d |0,M$(10)|,VV%256.|
|000030d0| 09 d8 16 de 57 50 25 38 | 30 3a f2 4d 6f 64 65 43 |....WP%8|0:.ModeC|
|000030e0| 68 61 6e 67 65 0d 09 e2 | 2e 54 57 25 3d 31 36 3a |hange...|.TW%=16:|
|000030f0| 54 48 25 3d 34 30 3a e3 | 49 25 3d 30 b8 31 33 3a |TH%=40:.|I%=0.13:|
|00003100| f3 41 24 3a 41 24 28 49 | 25 29 3d 41 24 2b 22 5f |.A$:A$(I|%)=A$+"_|
|00003110| 22 3a ed 0d 09 ec 46 dc | 4e 75 6c 6c 2c 52 65 64 |":....F.|Null,Red|
|00003120| 72 61 77 2c 4f 70 65 6e | 2c 43 6c 6f 73 65 2c 4c |raw,Open|,Close,L|
|00003130| 65 61 76 65 2c 45 6e 74 | 65 72 2c 42 75 74 74 6f |eave,Ent|er,Butto|
|00003140| 6e 2c 45 6e 64 44 72 61 | 67 2c 4b 65 79 2c 4d 65 |n,EndDra|g,Key,Me|
|00003150| 6e 75 2c 53 63 72 6f 6c | 6c 0d 09 f6 19 dc 4d 65 |nu,Scrol|l.....Me|
|00003160| 73 73 61 67 65 2c 42 6f | 75 6e 63 65 2c 4f 74 68 |ssage,Bo|unce,Oth|
|00003170| 65 72 0d 0a 00 35 57 25 | 28 30 29 3d 2d 32 3a 57 |er...5W%|(0)=-2:W|
|00003180| 24 28 30 29 3d 22 49 63 | 6f 6e 42 61 72 22 3a 57 |$(0)="Ic|onBar":W|
|00003190| 25 28 57 29 3d 2d 31 3a | 57 24 28 57 29 3d 22 44 |%(W)=-1:|W$(W)="D|
|000031a0| 65 66 61 75 6c 74 22 0d | 0a 0a 32 de 42 25 34 30 |efault".|..2.B%40|
|000031b0| 30 30 3a 42 31 25 3d 42 | 25 2b 31 30 30 30 3a 42 |00:B1%=B|%+1000:B|
|000031c0| 32 25 3d 42 25 2b 31 32 | 3a de 42 33 25 26 31 30 |2%=B%+12|:.B3%&10|
|000031d0| 34 2c 42 34 25 26 31 30 | 34 0d 0a 14 12 de 50 4f |4,B4%&10|4.....PO|
|000031e0| 47 25 38 2c 50 4d 41 54 | 25 31 36 0d 0a 1e 1c c8 |G%8,PMAT|%16.....|
|000031f0| 99 57 49 6e 69 74 2c 32 | 30 30 2c 26 34 42 35 33 |.WInit,2|00,&4B53|
|00003200| 34 31 35 34 2c 54 24 0d | 0a 28 3a 21 42 25 3d 2d |4154,T$.|.(:!B%=-|
|00003210| 31 3a 42 25 21 34 3d 30 | 3a 42 25 21 38 3d 30 3a |1:B%!4=0|:B%!8=0:|
|00003220| 42 25 21 31 32 3d 36 38 | 3a 42 25 21 31 36 3d 39 |B%!12=68|:B%!16=9|
|00003230| 30 3a 42 25 21 32 30 3d | 25 31 30 84 33 3c 3c 31 |0:B%!20=|%10.3<<1|
|00003240| 32 0d 0a 32 1d 24 28 42 | 25 2b 32 34 29 3d 49 24 |2..2.$(B|%+24)=I$|
|00003250| 3a c8 99 43 72 65 61 74 | 65 49 2c 2c 42 25 0d 0a |:..Creat|eI,,B%..|
|00003260| 3c 2a c8 99 46 69 6c 65 | 2c 35 2c 22 3c 4f 62 65 |<*..File|,5,"<Obe|
|00003270| 79 24 44 69 72 3e 2e 53 | 70 72 69 74 65 73 22 b8 |y$Dir>.S|prites".|
|00003280| 54 25 2c 2c 2c 2c 4c 25 | 0d 0a 46 0f 53 25 3d 31 |T%,,,,L%|..F.S%=1|
|00003290| 3a e7 54 25 3d 31 8c 0d | 0a 50 2f 4c 25 2b 3d 34 |:.T%=1..|.P/L%+=4|
|000032a0| 30 3a de 53 25 4c 25 3a | 21 53 25 3d 4c 25 3a 53 |0:.S%L%:|!S%=L%:S|
|000032b0| 25 21 34 3d 30 3a 53 25 | 21 38 3d 31 36 3a 53 25 |%!4=0:S%|!8=16:S%|
|000032c0| 21 31 32 3d 31 36 0d 0a | 5a 25 c8 99 53 4f 2c 26 |!12=16..|Z%..SO,&|
|000032d0| 31 30 41 2c 53 25 2c 22 | 3c 4f 62 65 79 24 44 69 |10A,S%,"|<Obey$Di|
|000032e0| 72 3e 2e 53 70 72 69 74 | 65 73 22 0d 0a 64 05 cd |r>.Sprit|es"..d..|
|000032f0| 0d 0a 6e 0b 53 50 52 25 | 3d 53 25 0d 0a 78 26 c8 |..n.SPR%|=S%..x&.|
|00003300| 99 22 4f 53 5f 47 65 74 | 45 6e 76 22 20 b8 20 45 |."OS_Get|Env" . E|
|00003310| 24 3a 49 25 3d a7 45 24 | 2c 22 2d 71 75 69 74 22 |$:I%=.E$|,"-quit"|
|00003320| 29 0d 0a 82 34 49 25 3d | a7 45 24 2c 22 22 22 22 |)...4I%=|.E$,""""|
|00003330| 2c 49 25 2b 31 29 3a 49 | 25 3d a7 45 24 2c 22 22 |,I%+1):I|%=.E$,""|
|00003340| 22 22 2c 49 25 2b 31 29 | 3a 45 24 3d c1 45 24 2c |"",I%+1)|:E$=.E$,|
|00003350| 49 25 2b 31 29 0d 0a 8c | 1c c8 95 c0 45 24 2c 31 |I%+1)...|....E$,1|
|00003360| 29 3d 22 20 22 3a 45 24 | 3d c1 45 24 2c 32 29 3a |)=" ":E$|=.E$,2):|
|00003370| ce 0d 0a 96 49 53 43 52 | 41 50 25 3d 30 3a 52 41 |....ISCR|AP%=0:RA|
|00003380| 4d 25 3d 30 3a 52 41 4d | 4f 55 54 25 3d 30 3a 52 |M%=0:RAM|OUT%=0:R|
|00003390| 41 4d 4f 55 54 4c 25 3d | 30 3a 52 41 4d 49 4e 25 |AMOUTL%=|0:RAMIN%|
|000033a0| 3d 30 3a 52 41 4d 49 4e | 4c 25 3d 30 3a 4d 50 25 |=0:RAMIN|L%=0:MP%|
|000033b0| 3d a3 3a 4d 25 3d 31 3c | 3c 30 0d 0a a0 05 e1 0d |=.:M%=1<|<0......|
|000033c0| 0a aa 04 0d 0a b4 2b dd | a4 52 65 61 64 4d 6f 64 |......+.|.ReadMod|
|000033d0| 65 28 56 25 29 3a c8 99 | 52 65 61 64 4d 6f 64 65 |e(V%):..|ReadMode|
|000033e0| 2c eb 2c 56 25 b8 2c 2c | 56 25 3a 3d 56 25 0d 0a |,.,V%.,,|V%:=V%..|
|000033f0| be 04 0d 0a c8 1a dd f2 | 4f 70 65 6e 54 65 6d 70 |........|OpenTemp|
|00003400| 6c 61 74 65 73 28 54 25 | 2c 4c 25 29 0d 0a d2 36 |lates(T%|,L%)...6|
|00003410| de 54 53 25 4c 25 3a 54 | 53 45 25 3d 54 53 25 2b |.TS%L%:T|SE%=TS%+|
|00003420| 4c 25 3a c8 99 4f 70 65 | 6e 54 2c 2c 22 3c 4f 62 |L%:..Ope|nT,,"<Ob|
|00003430| 65 79 24 44 69 72 3e 2e | 54 65 6d 70 6c 61 74 65 |ey$Dir>.|Template|
|00003440| 73 22 0d 0a dc 24 de 54 | 25 28 54 25 2d 31 29 2c |s"...$.T|%(T%-1),|
|00003450| 49 25 28 54 25 2d 31 29 | 2c 54 24 28 54 25 2d 31 |I%(T%-1)|,T$(T%-1|
|00003460| 29 3a 57 25 3d 30 0d 0a | e6 05 e1 0d 0a f0 04 0d |):W%=0..|........|
|00003470| 0a fa 14 dd f2 43 6c 6f | 73 65 54 65 6d 70 6c 61 |.....Clo|seTempla|
|00003480| 74 65 73 0d 0b 04 0c c8 | 99 43 6c 6f 73 65 54 0d |tes.....|.CloseT.|
|00003490| 0b 0e 05 e1 0d 0b 18 04 | 0d 0b 22 18 dd f2 54 65 |........|.."...Te|
|000034a0| 6d 70 6c 61 74 65 28 54 | 24 29 ea 54 25 2c 55 25 |mplate(T|$).T%,U%|
|000034b0| 0d 0b 2c 40 54 24 28 57 | 25 29 3d 54 24 3a 49 25 |..,@T$(W|%)=T$:I%|
|000034c0| 28 57 25 29 3d 54 53 25 | 3a c8 99 4c 6f 61 64 54 |(W%)=TS%|:..LoadT|
|000034d0| 2c 2c 42 25 2c 54 53 25 | 2c 54 53 45 25 2c 2d 31 |,,B%,TS%|,TSE%,-1|
|000034e0| 2c 54 24 b8 2c 2c 54 53 | 25 3a 54 53 25 2b 3d 32 |,T$.,,TS|%:TS%+=2|
|000034f0| 0d 0b 36 3e de 55 25 38 | 38 2b 42 25 21 38 34 2a |..6>.U%8|8+B%!84*|
|00003500| 33 32 3a 54 25 28 57 25 | 29 3d 55 25 3a e3 49 25 |32:T%(W%|)=U%:.I%|
|00003510| 3d 30 b8 38 34 2b 42 25 | 21 38 34 2a 33 32 88 34 |=0.84+B%|!84*32.4|
|00003520| 3a 55 25 21 49 25 3d 42 | 25 21 49 25 3a ed 0d 0b |:U%!I%=B|%!I%:...|
|00003530| 40 21 55 25 21 36 34 3d | 53 50 52 25 3a 55 25 21 |@!U%!64=|SPR%:U%!|
|00003540| 36 38 3d 26 31 30 30 30 | 31 3a 57 25 2b 3d 31 0d |68=&1000|1:W%+=1.|
|00003550| 0b 4a 05 e1 0d 0b 54 04 | 0d 0b 5e 2c dd a4 57 4e |.J....T.|..^,..WN|
|00003560| 61 6d 65 28 48 25 29 3a | 57 25 3d 2d 31 3a f5 57 |ame(H%):|W%=-1:.W|
|00003570| 25 2b 3d 31 3a fd 57 25 | 28 57 25 29 3d 48 25 84 |%+=1:.W%|(W%)=H%.|
|00003580| 57 25 3d 57 0d 0b 68 17 | e7 57 25 3d 31 30 30 57 |W%=W..h.|.W%=100W|
|00003590| 24 3d 22 44 65 66 61 75 | 6c 74 22 0d 0b 72 0b 3d |$="Defau|lt"..r.=|
|000035a0| 57 24 28 57 25 29 0d 0b | 7c 2e dd a4 4e 57 69 6e |W$(W%)..||...NWin|
|000035b0| 28 41 24 29 3a 57 25 3d | 2d 31 3a f5 57 25 2b 3d |(A$):W%=|-1:.W%+=|
|000035c0| 31 3a fd 57 24 28 57 25 | 29 3d 41 24 3a 3d 57 25 |1:.W$(W%|)=A$:=W%|
|000035d0| 28 57 25 29 0d 0b 86 2c | dd f2 57 4e 6f 28 48 25 |(W%)...,|..WNo(H%|
|000035e0| 29 3a 57 25 3d 2d 31 3a | f5 57 25 2b 3d 31 3a fd |):W%=-1:|.W%+=1:.|
|000035f0| 57 25 28 57 25 29 3d 48 | 25 84 57 25 3d 57 3a e1 |W%(W%)=H|%.W%=W:.|
|00003600| 0d 0b 90 30 dd a4 54 49 | 6e 64 65 78 28 54 24 29 |...0..TI|ndex(T$)|
|00003610| 3a ea 54 25 3a 54 25 3d | 2d 31 3a f5 54 25 2b 3d |:.T%:T%=|-1:.T%+=|
|00003620| 31 3a fd 54 24 28 54 25 | 29 3d 54 24 3a 3d 54 25 |1:.T$(T%|)=T$:=T%|
|00003630| 0d 0b 9a 04 0d 0b a4 1a | dd f2 43 72 65 61 74 65 |........|..Create|
|00003640| 57 69 6e 64 6f 77 31 28 | 54 24 29 ea 43 25 0d 0b |Window1(|T$).C%..|
|00003650| ae 24 57 25 3d 2d 31 3a | f5 57 25 2b 3d 31 3a fd |.$W%=-1:|.W%+=1:.|
|00003660| 57 25 28 57 25 29 3d 30 | 3a 57 24 28 57 25 29 3d |W%(W%)=0|:W$(W%)=|
|00003670| 54 24 0d 0b b8 38 4a 25 | 3d a4 54 49 6e 64 65 78 |T$...8J%|=.TIndex|
|00003680| 28 54 24 29 3a 54 25 3d | 54 25 28 4a 25 29 3a 43 |(T$):T%=|T%(J%):C|
|00003690| 25 3d a4 41 6c 6c 6f 63 | 42 28 49 25 28 4a 25 2b |%=.Alloc|B(I%(J%+|
|000036a0| 31 29 2d 49 25 28 4a 25 | 29 29 0d 0b c2 17 43 25 |1)-I%(J%|))....C%|
|000036b0| 28 57 25 29 3d 43 25 3a | 4a 25 3d 49 25 28 4a 25 |(W%)=C%:|J%=I%(J%|
|000036c0| 29 0d 0b cc 25 e3 49 25 | 3d 30 b8 54 25 21 38 34 |)...%.I%|=0.T%!84|
|000036d0| 2a 33 32 2b 38 34 88 34 | 3a 42 25 21 49 25 3d 54 |*32+84.4|:B%!I%=T|
|000036e0| 25 21 49 25 3a ed 0d 0b | d6 25 e3 46 25 3d 42 25 |%!I%:...|.%.F%=B%|
|000036f0| 2b 31 30 34 b8 42 25 2b | 31 30 34 2b 28 42 25 21 |+104.B%+|104+(B%!|
|00003700| 38 34 2d 31 29 2a 33 32 | 88 33 32 0d 0b e0 0e e7 |84-1)*32|.32.....|
|00003710| 21 46 25 80 31 3c 3c 38 | 8c 0d 0b ea 2f e7 46 25 |!F%.1<<8|..../.F%|
|00003720| 21 34 3e 3d 4a 25 3a 43 | 24 3d 24 28 46 25 21 34 |!4>=J%:C|$=$(F%!4|
|00003730| 29 3a 46 25 21 34 2b 3d | 43 25 2d 4a 25 3a 24 28 |):F%!4+=|C%-J%:$(|
|00003740| 46 25 21 34 29 3d 43 24 | 0d 0b f4 2f e7 46 25 21 |F%!4)=C$|.../.F%!|
|00003750| 38 3e 3d 4a 25 3a 43 24 | 3d 24 28 46 25 21 38 29 |8>=J%:C$|=$(F%!8)|
|00003760| 3a 46 25 21 38 2b 3d 43 | 25 2d 4a 25 3a 24 28 46 |:F%!8+=C|%-J%:$(F|
|00003770| 25 21 38 29 3d 43 24 0d | 0b fe 05 cd 0d 0c 08 05 |%!8)=C$.|........|
|00003780| ed 0d 0c 12 18 c8 99 43 | 72 65 61 74 65 57 2c 2c |.......C|reateW,,|
|00003790| 42 25 b8 57 25 28 57 25 | 29 0d 0c 1c 05 e1 0d 0c |B%.W%(W%|).......|
|000037a0| 26 04 0d 0c 30 33 dd f2 | 43 72 65 61 74 65 57 69 |&...03..|CreateWi|
|000037b0| 6e 64 6f 77 30 28 54 24 | 29 3a f2 43 72 65 61 74 |ndow0(T$|):.Creat|
|000037c0| 65 57 69 6e 64 6f 77 28 | 54 24 2c 30 2c 30 2c 30 |eWindow(|T$,0,0,0|
|000037d0| 2c 30 29 3a e1 0d 0c 3a | 22 dd f2 43 72 65 61 74 |,0):...:|"..Creat|
|000037e0| 65 57 69 6e 64 6f 77 28 | 54 24 2c 43 25 2c 4c 25 |eWindow(|T$,C%,L%|
|000037f0| 2c 58 25 2c 59 25 29 0d | 0c 44 24 57 25 3d 2d 31 |,X%,Y%).|.D$W%=-1|
|00003800| 3a f5 57 25 2b 3d 31 3a | fd 57 25 28 57 25 29 3d |:.W%+=1:|.W%(W%)=|
|00003810| 30 3a 57 24 28 57 25 29 | 3d 54 24 0d 0c 4e 1c 49 |0:W$(W%)|=T$..N.I|
|00003820| 25 3d a4 54 49 6e 64 65 | 78 28 54 24 29 3a 54 25 |%=.TInde|x(T$):T%|
|00003830| 3d 54 25 28 49 25 29 0d | 0c 58 25 e3 49 25 3d 30 |=T%(I%).|.X%.I%=0|
|00003840| b8 54 25 21 38 34 2a 33 | 32 2b 38 34 88 34 3a 42 |.T%!84*3|2+84.4:B|
|00003850| 25 21 49 25 3d 54 25 21 | 49 25 3a ed 0d 0c 62 0c |%!I%=T%!|I%:...b.|
|00003860| 42 25 21 32 34 3d 2d 31 | 0d 0c 6c 20 e7 58 25 42 |B%!24=-1|..l .X%B|
|00003870| 25 21 38 3d 42 25 21 38 | 2d 42 25 21 30 2b 58 25 |%!8=B%!8|-B%!0+X%|
|00003880| 3a 42 25 21 30 3d 58 25 | 0d 0c 76 22 e7 59 25 42 |:B%!0=X%|..v".Y%B|
|00003890| 25 21 34 3d 42 25 21 34 | 2d 42 25 21 31 32 2b 59 |%!4=B%!4|-B%!12+Y|
|000038a0| 25 3a 42 25 21 31 32 3d | 59 25 0d 0c 80 33 c8 99 |%:B%!12=|Y%...3..|
|000038b0| 43 72 65 61 74 65 57 2c | 2c 42 25 b8 57 25 28 57 |CreateW,|,B%.W%(W|
|000038c0| 25 29 3a 43 25 28 57 25 | 29 3d 43 25 3a e7 43 25 |%):C%(W%|)=C%:.C%|
|000038d0| 43 25 21 57 48 25 3d 57 | 25 28 57 25 29 0d 0c 8a |C%!WH%=W|%(W%)...|
|000038e0| 05 e1 0d 0c 94 04 0d 0c | 9e 20 dd f2 4f 70 65 6e |........|. ..Open|
|000038f0| 57 69 6e 64 6f 77 28 54 | 24 2c 43 25 2c 4c 25 2c |Window(T|$,C%,L%,|
|00003900| 58 25 2c 59 25 29 0d 0c | a8 43 f2 43 72 65 61 74 |X%,Y%)..|.C.Creat|
|00003910| 65 57 69 6e 64 6f 77 28 | 54 24 2c 43 25 2c 4c 25 |eWindow(|T$,C%,L%|
|00003920| 2c 58 25 2c 59 25 29 3a | 21 42 25 3d 57 25 28 57 |,X%,Y%):|!B%=W%(W|
|00003930| 25 29 3a c8 99 47 65 74 | 57 2c 2c 42 25 3a c8 99 |%):..Get|W,,B%:..|
|00003940| 4f 70 65 6e 57 2c 2c 42 | 25 0d 0c b2 05 e1 0d 0c |OpenW,,B|%.......|
|00003950| bc 04 0d 0c c6 1f dd f2 | 44 65 6c 65 74 65 57 69 |........|DeleteWi|
|00003960| 6e 64 6f 77 28 57 25 29 | 3a 54 45 4d 50 53 25 3d |ndow(W%)|:TEMPS%=|
|00003970| 30 0d 0c d0 29 21 42 25 | 3d 57 25 28 57 25 29 3a |0...)!B%|=W%(W%):|
|00003980| c8 99 43 6c 6f 73 65 57 | 2c 2c 42 25 3a c8 99 44 |..CloseW|,,B%:..D|
|00003990| 65 6c 65 74 65 57 2c 2c | 42 25 0d 0c da 33 57 25 |eleteW,,|B%...3W%|
|000039a0| 28 57 25 29 3d 30 3a 57 | 24 28 57 25 29 3d 22 22 |(W%)=0:W|$(W%)=""|
|000039b0| 3a 44 25 28 57 25 29 3d | 30 3a 43 24 28 57 25 29 |:D%(W%)=|0:C$(W%)|
|000039c0| 3d 22 22 3a 43 4e 25 28 | 57 25 29 3d 30 0d 0c e4 |="":CN%(|W%)=0...|
|000039d0| 21 e7 43 25 28 57 25 29 | f2 46 72 65 65 28 43 25 |!.C%(W%)|.Free(C%|
|000039e0| 28 57 25 29 29 3a 43 25 | 28 57 25 29 3d 30 0d 0c |(W%)):C%|(W%)=0..|
|000039f0| ee 05 e1 0d 0c f8 04 0d | 0d 02 22 dd f2 4d 65 6e |........|.."..Men|
|00003a00| 75 49 6e 69 74 3a 56 25 | 3d 4d 45 4e 55 25 3a 44 |uInit:V%|=MENU%:D|
|00003a10| 4d 25 3d 49 4e 44 25 3a | e1 0d 0d 0c 12 dd a4 4d |M%=IND%:|.......M|
|00003a20| 65 6e 75 54 28 54 24 2c | 4c 25 29 0d 0d 16 3f 24 |enuT(T$,|L%)...?$|
|00003a30| 56 25 3d 54 24 3a 56 25 | 21 31 36 3d 54 57 25 2a |V%=T$:V%|!16=TW%*|
|00003a40| 4c 25 3a 56 25 21 32 30 | 3d 34 34 3a 56 25 21 31 |L%:V%!20|=44:V%!1|
|00003a50| 32 3d 26 30 30 30 37 30 | 32 30 37 3a 56 25 21 32 |2=&00070|207:V%!2|
|00003a60| 34 3d 30 3a 56 25 2b 3d | 32 38 0d 0d 20 0a 3d 56 |4=0:V%+=|28.. .=V|
|00003a70| 25 2d 32 38 0d 0d 2a 04 | 0d 0d 34 3f dd f2 45 6e |%-28..*.|..4?..En|
|00003a80| 74 72 79 53 28 54 24 2c | 46 25 2c 53 25 2c 59 25 |tryS(T$,|F%,S%,Y%|
|00003a90| 29 3a 54 25 3d a4 45 6e | 74 72 79 53 28 54 24 2c |):T%=.En|tryS(T$,|
|00003aa0| 46 25 2c 53 25 29 3a f2 | 53 65 6c 65 63 74 28 54 |F%,S%):.|Select(T|
|00003ab0| 25 2c 59 25 29 3a e1 0d | 0d 3e 32 dd f2 45 6e 74 |%,Y%):..|.>2..Ent|
|00003ac0| 72 79 4c 28 54 24 2c 46 | 25 29 3a 54 25 3d a4 45 |ryL(T$,F|%):T%=.E|
|00003ad0| 6e 74 72 79 28 54 24 2c | 32 29 3a f2 54 69 63 6b |ntry(T$,|2):.Tick|
|00003ae0| 28 54 25 2c 46 25 29 3a | e1 0d 0d 48 34 dd f2 45 |(T%,F%):|...H4..E|
|00003af0| 6e 74 72 79 45 28 54 24 | 2c 46 25 29 3a 54 25 3d |ntryE(T$|,F%):T%=|
|00003b00| a4 45 6e 74 72 79 28 54 | 24 2c 26 38 30 29 3a f2 |.Entry(T|$,&80):.|
|00003b10| 54 69 63 6b 28 54 25 2c | 46 25 29 3a e1 0d 0d 52 |Tick(T%,|F%):...R|
|00003b20| 32 dd f2 45 6e 74 72 79 | 54 28 54 24 2c 46 25 29 |2..Entry|T(T$,F%)|
|00003b30| 3a 54 25 3d a4 45 6e 74 | 72 79 28 54 24 2c 30 29 |:T%=.Ent|ry(T$,0)|
|00003b40| 3a f2 54 69 63 6b 28 54 | 25 2c 46 25 29 3a e1 0d |:.Tick(T|%,F%):..|
|00003b50| 0d 5c 21 dd f2 45 6e 74 | 72 79 28 54 24 29 3a 54 |.\!..Ent|ry(T$):T|
|00003b60| 25 3d a4 45 6e 74 72 79 | 28 54 24 2c 30 29 3a e1 |%=.Entry|(T$,0):.|
|00003b70| 0d 0d 66 12 dd a4 45 6e | 74 72 79 28 54 24 2c 46 |..f...En|try(T$,F|
|00003b80| 25 29 0d 0d 70 41 e7 a9 | 54 24 3c 31 32 3a 24 28 |%)..pA..|T$<12:$(|
|00003b90| 56 25 2b 31 32 29 3d 54 | 24 3a 21 56 25 3d 46 25 |V%+12)=T|$:!V%=F%|
|00003ba0| 3a 56 25 21 34 3d 2d 31 | 3a 56 25 21 38 3d 31 84 |:V%!4=-1|:V%!8=1.|
|00003bb0| 37 3c 3c 32 34 3a 56 25 | 2b 3d 32 34 3a 3d 56 25 |7<<24:V%|+=24:=V%|
|00003bc0| 2d 32 34 0d 0d 7a 1f 3d | a4 45 6e 74 72 79 53 56 |-24..z.=|.EntrySV|
|00003bd0| 4c 28 54 24 2c 22 22 2c | 46 25 2c a9 54 24 2c 2d |L(T$,"",|F%,.T$,-|
|00003be0| 31 29 0d 0d 84 31 dd a4 | 45 6e 74 72 79 53 28 54 |1)...1..|EntryS(T|
|00003bf0| 24 2c 46 25 2c 53 25 29 | 3d a4 45 6e 74 72 79 53 |$,F%,S%)|=.EntryS|
|00003c00| 56 4c 28 54 24 2c 22 22 | 2c 46 25 2c a9 54 24 2c |VL(T$,""|,F%,.T$,|
|00003c10| 53 25 29 0d 0d 8e 1e dd | a4 45 6e 74 72 79 53 56 |S%).....|.EntrySV|
|00003c20| 4c 28 54 24 2c 56 24 2c | 46 25 2c 4c 25 2c 53 25 |L(T$,V$,|F%,L%,S%|
|00003c30| 29 0d 0d 98 30 24 28 56 | 25 2b 31 32 29 3d c0 54 |)...0$(V|%+12)=.T|
|00003c40| 24 2c 31 31 29 3a 21 56 | 25 3d 46 25 3a 56 25 21 |$,11):!V|%=F%:V%!|
|00003c50| 34 3d 53 25 3a 56 25 21 | 38 3d 31 84 37 3c 3c 32 |4=S%:V%!|8=1.7<<2|
|00003c60| 34 0d 0d a2 13 e7 28 21 | 56 25 80 34 29 84 4c 25 |4.....(!|V%.4).L%|
|00003c70| 3e 31 31 8c 0d 0d ac 27 | 20 20 20 56 25 21 32 30 |>11....'| V%!20|
|00003c80| 3d 4c 25 2b 31 3a 54 25 | 3d 44 4d 25 3a 44 4d 25 |=L%+1:T%|=DM%:DM%|
|00003c90| 2b 3d 28 4c 25 2b 34 29 | 80 ac 33 0d 0d b6 25 20 |+=(L%+4)|..3...% |
|00003ca0| 20 20 24 54 25 3d 54 24 | 3a 56 25 21 31 32 3d 54 | $T%=T$|:V%!12=T|
|00003cb0| 25 3a 56 25 21 38 3d 56 | 25 21 38 84 31 3c 3c 38 |%:V%!8=V|%!8.1<<8|
|00003cc0| 0d 0d c0 3c 20 20 20 e7 | 56 24 3d 22 22 56 25 21 |...< .|V$=""V%!|
|00003cd0| 31 36 3d 2d 31 8b 54 25 | 3d 44 4d 25 3a 44 4d 25 |16=-1.T%|=DM%:DM%|
|00003ce0| 2b 3d 28 a9 56 24 2b 34 | 29 80 ac 33 3a 24 54 25 |+=(.V$+4|)..3:$T%|
|00003cf0| 3d 56 24 3a 56 25 21 31 | 36 3d 54 25 0d 0d ca 05 |=V$:V%!1|6=T%....|
|00003d00| cd 0d 0d d4 11 56 25 2b | 3d 32 34 3a 3d 56 25 2d |.....V%+|=24:=V%-|
|00003d10| 32 34 0d 0d de 04 0d 0d | e8 36 dd f2 53 65 6c 65 |24......|.6..Sele|
|00003d20| 63 74 28 53 25 2c 54 25 | 29 3a 53 25 21 38 3d 53 |ct(S%,T%|):S%!8=S|
|00003d30| 25 21 38 80 ac 28 31 3c | 3c 32 32 29 84 28 2d 28 |%!8..(1<|<22).(-(|
|00003d40| 54 25 3d 30 29 3c 3c 32 | 32 29 3a e1 0d 0d f2 27 |T%=0)<<2|2):....'|
|00003d50| dd f2 54 69 63 6b 28 53 | 25 2c 54 25 29 3a 21 53 |..Tick(S|%,T%):!S|
|00003d60| 25 3d 21 53 25 80 ac 31 | 84 2d 28 54 25 3c 3e 30 |%=!S%..1|.-(T%<>0|
|00003d70| 29 3a e1 0d 0d fc 04 0d | 0e 06 3c dd a4 41 6c 6c |):......|..<..All|
|00003d80| 6f 63 28 4c 25 29 3a ea | 50 25 2c 46 25 3a c8 99 |oc(L%):.|P%,F%:..|
|00003d90| 58 48 65 61 70 2c 32 2c | 48 45 41 50 25 2c 2c 4c |XHeap,2,|HEAP%,,L|
|00003da0| 25 b8 2c 2c 50 25 3b 46 | 25 3a e7 46 25 80 31 8b |%.,,P%;F|%:.F%.1.|
|00003db0| 3d 50 25 0d 0e 10 36 c8 | 99 53 6c 6f 74 2c 48 45 |=P%...6.|.Slot,HE|
|00003dc0| 41 50 25 2b 48 45 41 50 | 25 21 38 2b 26 31 30 30 |AP%+HEAP|%!8+&100|
|00003dd0| 2b 4c 25 2d 26 38 30 30 | 30 2c 2d 31 b8 46 25 3a |+L%-&800|0,-1.F%:|
|00003de0| 46 25 2b 3d 26 38 30 30 | 30 0d 0e 1a 27 c8 99 48 |F%+=&800|0...'..H|
|00003df0| 65 61 70 2c 35 2c 48 45 | 41 50 25 2c 2c 46 25 2d |eap,5,HE|AP%,,F%-|
|00003e00| 28 48 45 41 50 25 2b 48 | 45 41 50 25 21 31 32 29 |(HEAP%+H|EAP%!12)|
|00003e10| 0d 0e 24 1f c8 99 48 65 | 61 70 2c 32 2c 48 45 41 |..$...He|ap,2,HEA|
|00003e20| 50 25 2c 2c 4c 25 b8 2c | 2c 50 25 3a 3d 50 25 0d |P%,,L%.,|,P%:=P%.|
|00003e30| 0e 2e 25 dd a4 41 6c 6c | 6f 63 42 28 4c 25 29 3a |..%..All|ocB(L%):|
|00003e40| ea 50 25 2c 49 25 3a 50 | 25 3d a4 41 6c 6c 6f 63 |.P%,I%:P|%=.Alloc|
|00003e50| 28 4c 25 29 0d 0e 38 1e | e3 49 25 3d 30 b8 4c 25 |(L%)..8.|.I%=0.L%|
|00003e60| 2d 34 88 34 3a 50 25 21 | 49 25 3d 30 3a ed 3a 3d |-4.4:P%!|I%=0:.:=|
|00003e70| 50 25 0d 0e 42 20 dd f2 | 46 72 65 65 28 50 25 29 |P%..B ..|Free(P%)|
|00003e80| 3a c8 99 48 65 61 70 2c | 33 2c 48 45 41 50 25 2c |:..Heap,|3,HEAP%,|
|00003e90| 50 25 0d 0e 4c 24 c8 99 | 48 65 61 70 2c 35 2c 48 |P%..L$..|Heap,5,H|
|00003ea0| 45 41 50 25 2c 2c 48 45 | 41 50 25 21 38 2d 48 45 |EAP%,,HE|AP%!8-HE|
|00003eb0| 41 50 25 21 31 32 0d 0e | 56 22 c8 99 53 6c 6f 74 |AP%!12..|V"..Slot|
|00003ec0| 2c 48 45 41 50 25 2b 48 | 45 41 50 25 21 31 32 2d |,HEAP%+H|EAP%!12-|
|00003ed0| 26 38 30 30 30 2c 2d 31 | 0d 0e 60 05 e1 0d 0e 6a |&8000,-1|..`....j|
|00003ee0| 3b dd a4 45 78 74 65 6e | 64 28 50 25 2c 4c 25 29 |;..Exten|d(P%,L%)|
|00003ef0| 3a c8 99 58 48 65 61 70 | 2c 34 2c 48 45 41 50 25 |:..XHeap|,4,HEAP%|
|00003f00| 2c 50 25 2c 4c 25 b8 2c | 2c 50 25 3b 46 25 3a e7 |,P%,L%.,|,P%;F%:.|
|00003f10| 46 25 80 31 8b 3d 50 25 | 0d 0e 74 36 c8 99 53 6c |F%.1.=P%|..t6..Sl|
|00003f20| 6f 74 2c 48 45 41 50 25 | 2b 48 45 41 50 25 21 38 |ot,HEAP%|+HEAP%!8|
|00003f30| 2b 26 31 30 30 2b 4c 25 | 2d 26 38 30 30 30 2c 2d |+&100+L%|-&8000,-|
|00003f40| 31 b8 46 25 3a 46 25 2b | 3d 26 38 30 30 30 0d 0e |1.F%:F%+|=&8000..|
|00003f50| 7e 27 c8 99 48 65 61 70 | 2c 35 2c 48 45 41 50 25 |~'..Heap|,5,HEAP%|
|00003f60| 2c 2c 46 25 2d 28 48 45 | 41 50 25 2b 48 45 41 50 |,,F%-(HE|AP%+HEAP|
|00003f70| 25 21 31 32 29 0d 0e 88 | 21 c8 99 48 65 61 70 2c |%!12)...|!..Heap,|
|00003f80| 34 2c 48 45 41 50 25 2c | 50 25 2c 4c 25 b8 2c 2c |4,HEAP%,|P%,L%.,,|
|00003f90| 50 25 3a 3d 50 25 0d 0e | 92 28 dd f2 48 65 61 70 |P%:=P%..|.(..Heap|
|00003fa0| 28 48 45 41 50 25 2c 4c | 25 29 3a c8 99 48 65 61 |(HEAP%,L|%):..Hea|
|00003fb0| 70 2c 2c 48 45 41 50 25 | 2c 2c 4c 25 3a e1 0d 0e |p,,HEAP%|,,L%:...|
|00003fc0| 9c 04 0d 0e a6 11 dd f2 | 57 69 6d 70 53 79 6d 62 |........|WimpSymb|
|00003fd0| 6f 6c 73 0d 0e b0 46 43 | 3d 26 34 30 30 43 30 3a |ols...FC|=&400C0:|
|00003fe0| 57 49 6e 69 74 3d 43 2b | 30 3a 43 72 65 61 74 65 |WInit=C+|0:Create|
|00003ff0| 57 3d 43 2b 31 3a 43 72 | 65 61 74 65 49 3d 43 2b |W=C+1:Cr|eateI=C+|
|00004000| 32 3a 44 65 6c 65 74 65 | 57 3d 43 2b 33 3a 44 65 |2:Delete|W=C+3:De|
|00004010| 6c 65 74 65 49 3d 43 2b | 34 0d 0e ba 43 4f 70 65 |leteI=C+|4...COpe|
|00004020| 6e 57 3d 43 2b 35 3a 43 | 6c 6f 73 65 57 3d 43 2b |nW=C+5:C|loseW=C+|
|00004030| 36 3a 50 6f 6c 6c 3d 43 | 2b 37 3a 52 65 64 72 61 |6:Poll=C|+7:Redra|
|00004040| 77 57 3d 43 2b 38 3a 55 | 70 64 61 74 65 57 3d 43 |wW=C+8:U|pdateW=C|
|00004050| 2b 39 3a 47 65 74 52 3d | 43 2b 26 41 0d 0e c4 41 |+9:GetR=|C+&A...A|
|00004060| 47 65 74 57 3d 43 2b 26 | 42 3a 47 65 74 57 49 3d |GetW=C+&|B:GetWI=|
|00004070| 43 2b 26 43 3a 53 65 74 | 49 3d 43 2b 26 44 3a 47 |C+&C:Set|I=C+&D:G|
|00004080| 65 74 49 3d 43 2b 26 45 | 3a 47 65 74 50 3d 43 2b |etI=C+&E|:GetP=C+|
|00004090| 26 46 3a 44 72 61 67 3d | 43 2b 26 31 30 0d 0e ce |&F:Drag=|C+&10...|
|000040a0| 42 46 6f 72 63 65 52 3d | 43 2b 26 31 31 3a 53 65 |BForceR=|C+&11:Se|
|000040b0| 74 43 3d 43 2b 26 31 32 | 3a 47 65 74 43 3d 43 2b |tC=C+&12|:GetC=C+|
|000040c0| 26 31 33 3a 43 72 65 61 | 74 65 4d 3d 43 2b 26 31 |&13:Crea|teM=C+&1|
|000040d0| 34 3a 44 65 63 6f 64 65 | 4d 3d 43 2b 26 31 35 0d |4:Decode|M=C+&15.|
|000040e0| 0e d8 4b 57 68 69 63 68 | 49 3d 43 2b 26 31 36 3a |..KWhich|I=C+&16:|
|000040f0| 53 65 74 45 3d 43 2b 26 | 31 37 3a 53 65 74 50 3d |SetE=C+&|17:SetP=|
|00004100| 43 2b 26 31 38 3a 4f 70 | 65 6e 54 3d 43 2b 26 31 |C+&18:Op|enT=C+&1|
|00004110| 39 3a 43 6c 6f 73 65 54 | 3d 43 2b 26 31 41 3a 4c |9:CloseT|=C+&1A:L|
|00004120| 6f 61 64 54 3d 43 2b 26 | 31 42 0d 0e e2 1b 50 4b |oadT=C+&|1B....PK|
|00004130| 65 79 3d 43 2b 26 31 43 | 3a 57 43 6c 6f 73 65 3d |ey=C+&1C|:WClose=|
|00004140| 43 2b 26 31 44 0d 0e ec | 0e 50 24 3d 22 57 69 6d |C+&1D...|.P$="Wim|
|00004150| 70 5f 22 0d 0e f6 17 53 | 6c 6f 74 3d a4 4e 28 22 |p_"....S|lot=.N("|
|00004160| 53 6c 6f 74 53 69 7a 65 | 22 29 0d 0f 00 3a 47 65 |SlotSize|")...:Ge|
|00004170| 74 4f 3d a4 4e 28 22 47 | 65 74 57 69 6e 64 6f 77 |tO=.N("G|etWindow|
|00004180| 4f 75 74 6c 69 6e 65 22 | 29 3a 52 65 61 64 57 50 |Outline"|):ReadWP|
|00004190| 61 6c 3d a4 4e 28 22 52 | 65 61 64 50 61 6c 65 74 |al=.N("R|eadPalet|
|000041a0| 74 65 22 29 0d 0f 0a 47 | 53 65 74 43 6f 6c 3d a4 |te")...G|SetCol=.|
|000041b0| 4e 28 22 53 65 74 43 6f | 6c 6f 75 72 22 29 3a 50 |N("SetCo|lour"):P|
|000041c0| 6c 6f 74 49 3d a4 4e 28 | 22 50 6c 6f 74 49 63 6f |lotI=.N(|"PlotIco|
|000041d0| 6e 22 29 3a 53 65 6e 64 | 4d 3d a4 4e 28 22 53 65 |n"):Send|M=.N("Se|
|000041e0| 6e 64 4d 65 73 73 61 67 | 65 22 29 0d 0f 14 20 54 |ndMessag|e")... T|
|000041f0| 72 61 6e 73 66 65 72 3d | a4 4e 28 22 54 72 61 6e |ransfer=|.N("Tran|
|00004200| 73 66 65 72 42 6c 6f 63 | 6b 22 29 0d 0f 1e 3e 50 |sferBloc|k")...>P|
|00004210| 24 3d 22 4f 53 5f 22 3a | 48 65 61 70 3d a4 4e 28 |$="OS_":|Heap=.N(|
|00004220| 22 48 65 61 70 22 29 3a | 53 4f 3d a4 4e 28 22 53 |"Heap"):|SO=.N("S|
|00004230| 70 72 69 74 65 4f 70 22 | 29 3a 46 69 6c 65 3d a4 |priteOp"|):File=.|
|00004240| 4e 28 22 46 69 6c 65 22 | 29 0d 0f 28 3c 52 65 61 |N("File"|)..(<Rea|
|00004250| 64 4d 6f 64 65 3d a4 4e | 28 22 52 65 61 64 4d 6f |dMode=.N|("ReadMo|
|00004260| 64 65 56 61 72 69 61 62 | 6c 65 22 29 3a 52 65 61 |deVariab|le"):Rea|
|00004270| 64 56 61 72 3d a4 4e 28 | 22 52 65 61 64 56 61 72 |dVar=.N(|"ReadVar|
|00004280| 56 61 6c 22 29 0d 0f 32 | 33 52 65 61 64 50 61 6c |Val")..2|3ReadPal|
|00004290| 3d a4 4e 28 22 52 65 61 | 64 50 61 6c 65 74 74 65 |=.N("Rea|dPalette|
|000042a0| 22 29 3a 43 6f 6e 66 69 | 72 6d 3d a4 4e 28 22 43 |"):Confi|rm=.N("C|
|000042b0| 6f 6e 66 69 72 6d 22 29 | 0d 0f 3c 2d 58 52 65 61 |onfirm")|..<-XRea|
|000042c0| 64 56 61 72 3d 52 65 61 | 64 56 61 72 20 84 31 3c |dVar=Rea|dVar .1<|
|000042d0| 3c 31 37 3a 58 48 65 61 | 70 3d 48 65 61 70 20 84 |<17:XHea|p=Heap .|
|000042e0| 31 3c 3c 31 37 0d 0f 46 | 23 43 3d 26 36 30 36 43 |1<<17..F|#C=&606C|
|000042f0| 30 3a 4f 6e 3d 43 3a 4f | 66 66 3d 43 2b 31 3a 53 |0:On=C:O|ff=C+1:S|
|00004300| 6d 61 73 68 3d 43 2b 32 | 0d 0f 50 05 e1 0d 0f 5a |mash=C+2|..P....Z|
|00004310| 04 0d 0f 64 33 dd f2 52 | 65 70 6c 79 28 42 25 21 |...d3..R|eply(B%!|
|00004320| 31 36 29 3a 42 25 21 31 | 32 3d 42 25 21 38 3a f2 |16):B%!1|2=B%!8:.|
|00004330| 4d 65 73 73 28 31 37 2c | 42 25 2c 42 25 21 34 2c |Mess(17,|B%,B%!4,|
|00004340| 30 29 3a e1 0d 0f 6e 44 | dd f2 52 65 70 6c 79 41 |0):...nD|..ReplyA|
|00004350| 63 6b 28 42 25 21 31 36 | 29 3a 42 25 21 31 32 3d |ck(B%!16|):B%!12=|
|00004360| 42 25 21 38 3a f2 4d 65 | 73 73 28 31 38 2c 42 25 |B%!8:.Me|ss(18,B%|
|00004370| 2c 42 25 21 34 2c 30 29 | 3a 4d 53 47 24 3d 57 24 |,B%!4,0)|:MSG$=W$|
|00004380| 3a 4d 53 47 25 3d 57 25 | 0d 0f 78 05 e1 0d 0f 82 |:MSG%=W%|..x.....|
|00004390| 2a dd f2 41 63 6b 3a 42 | 25 21 31 32 3d 42 25 21 |*..Ack:B|%!12=B%!|
|000043a0| 38 3a f2 4d 65 73 73 28 | 31 39 2c 42 25 2c 42 25 |8:.Mess(|19,B%,B%|
|000043b0| 21 34 2c 30 29 3a e1 0d | 0f 8c 2f dd f2 53 65 6e |!4,0):..|../..Sen|
|000043c0| 64 28 42 25 21 31 36 29 | 3a 42 25 21 31 32 3d 30 |d(B%!16)|:B%!12=0|
|000043d0| 3a f2 4d 65 73 73 28 31 | 37 2c 42 25 2c 42 25 21 |:.Mess(1|7,B%,B%!|
|000043e0| 34 2c 30 29 3a e1 0d 0f | 96 40 dd f2 53 65 6e 64 |4,0):...|.@..Send|
|000043f0| 41 63 6b 28 42 25 21 31 | 36 29 3a 42 25 21 31 32 |Ack(B%!1|6):B%!12|
|00004400| 3d 30 3a f2 4d 65 73 73 | 28 31 37 2c 42 25 2c 42 |=0:.Mess|(17,B%,B|
|00004410| 25 21 34 2c 30 29 3a 4d | 53 47 24 3d 57 24 3a 4d |%!4,0):M|SG$=W$:M|
|00004420| 53 47 25 3d 57 25 0d 0f | a0 05 e1 0d 0f aa 17 dd |SG%=W%..|........|
|00004430| f2 4d 65 73 73 28 54 25 | 2c 41 25 2c 57 25 2c 49 |.Mess(T%|,A%,W%,I|
|00004440| 25 29 0d 0f b4 4a f4 56 | 44 55 34 2c 33 30 3a 50 |%)...J.V|DU4,30:P|
|00004450| 52 49 4e 54 2d 54 25 7e | 57 25 49 25 3a 46 4f 52 |RINT-T%~|W%I%:FOR|
|00004460| 4a 25 3d 30 54 4f 36 34 | 53 54 45 50 34 3a 50 52 |J%=0TO64|STEP4:PR|
|00004470| 49 4e 54 7e 41 25 21 4a | 25 3b 3a 4e 45 58 54 3a |INT~A%!J|%;:NEXT:|
|00004480| 56 44 55 35 3a 47 47 25 | 3d 47 45 54 0d 0f be 17 |VDU5:GG%|=GET....|
|00004490| c8 99 53 65 6e 64 4d 2c | 54 25 2c 41 25 2c 57 25 |..SendM,|T%,A%,W%|
|000044a0| 2c 49 25 0d 0f c8 05 e1 | 0d 0f d2 04 0d 0f dc 36 |,I%.....|.......6|
|000044b0| dd a4 4e 28 53 24 29 3a | c8 99 22 4f 53 5f 53 57 |..N(S$):|.."OS_SW|
|000044c0| 49 4e 75 6d 62 65 72 46 | 72 6f 6d 53 74 72 69 6e |INumberF|romStrin|
|000044d0| 67 22 2c 2c 50 24 2b 53 | 24 20 b8 20 53 25 3a 3d |g",,P$+S|$ . S%:=|
|000044e0| 53 25 0d 0f e6 12 f4 2a | 4d 61 69 6e 20 50 72 6f |S%.....*|Main Pro|
|000044f0| 67 72 61 6d 0d 0f f0 04 | 0d 0f fa 0a dd f2 49 6e |gram....|......In|
|00004500| 69 74 0d 10 04 0c f2 53 | 79 6d 62 6f 6c 73 0d 10 |it.....S|ymbols..|
|00004510| 0e 2b 50 4f 4c 4c 59 24 | 3d 22 44 65 66 61 75 6c |.+POLLY$|="Defaul|
|00004520| 74 22 3a 44 52 41 47 24 | 3d 22 44 65 66 61 75 6c |t":DRAG$|="Defaul|
|00004530| 74 22 3a 48 4c 50 25 3d | 30 0d 10 18 2f f2 43 72 |t":HLP%=|0.../.Cr|
|00004540| 65 61 74 65 57 69 6e 64 | 6f 77 30 28 22 50 72 6f |eateWind|ow0("Pro|
|00004550| 67 49 6e 66 6f 22 29 3a | f2 53 65 74 49 28 57 25 |gInfo"):|.SetI(W%|
|00004560| 2c 34 2c 56 45 52 24 29 | 0d 10 22 1c f2 43 72 65 |,4,VER$)|.."..Cre|
|00004570| 61 74 65 57 69 6e 64 6f | 77 30 28 22 53 61 76 65 |ateWindo|w0("Save|
|00004580| 41 73 22 29 0d 10 2c 05 | e1 0d 10 36 04 0d 10 40 |As")..,.|...6...@|
|00004590| 0d dd f2 53 79 6d 62 6f | 6c 73 0d 10 4a 46 50 24 |...Symbo|ls..JFP$|
|000045a0| 3d 22 4f 53 5f 22 3a 47 | 42 50 42 3d a4 4e 28 22 |="OS_":G|BPB=.N("|
|000045b0| 47 42 50 42 22 29 3a 42 | 79 74 65 3d a4 4e 28 22 |GBPB"):B|yte=.N("|
|000045c0| 42 79 74 65 22 29 3a 52 | 65 61 64 50 61 6c 3d a4 |Byte"):R|eadPal=.|
|000045d0| 4e 28 22 52 65 61 64 50 | 61 6c 65 74 74 65 22 29 |N("ReadP|alette")|
|000045e0| 0d 10 54 05 e1 0d 10 5e | 04 0d 10 68 0d f4 2a 49 |..T....^|...h..*I|
|000045f0| 63 6f 6e 42 61 72 0d 10 | 72 04 0d 10 7c 14 dd a4 |conBar..|r...|...|
|00004600| 42 75 74 74 6f 6e 5f 49 | 63 6f 6e 42 61 72 0d 10 |Button_I|conBar..|
|00004610| 86 08 e7 43 25 8c 0d 10 | 90 14 20 20 20 f2 49 63 |...C%...|.. .Ic|
|00004620| 6f 6e 42 61 72 5f 4d 65 | 6e 75 0d 10 9a 1c 20 20 |onBar_Me|nu.... |
|00004630| 20 f2 50 6f 70 75 70 28 | 58 25 2d 36 34 2c 39 36 | .Popup(|X%-64,96|
|00004640| 2b 33 2a 34 34 29 0d 10 | a4 05 cd 0d 10 ae 06 3d |+3*44)..|.......=|
|00004650| 30 0d 10 b8 04 0d 10 c2 | 21 dd f2 4c 6f 61 64 5f |0.......|!..Load_|
|00004660| 49 63 6f 6e 42 61 72 3a | e7 42 25 21 34 30 3c 3e |IconBar:|.B%!40<>|
|00004670| 46 49 4e 25 3a e1 0d 10 | cc 11 46 24 3d a4 5a 53 |FIN%:...|..F$=.ZS|
|00004680| 28 42 25 2b 34 34 29 0d | 10 d6 30 c8 99 46 69 6c |(B%+44).|..0..Fil|
|00004690| 65 2c 35 2c 46 24 b8 2c | 2c 2c 2c 4c 25 3a 4c 25 |e,5,F$.,|,,,L%:L%|
|000046a0| 3d 4c 25 2b 26 31 30 30 | 3a 46 49 25 3d a4 41 6c |=L%+&100|:FI%=.Al|
|000046b0| 6c 6f 63 28 4c 25 29 0d | 10 e0 36 c8 99 22 45 75 |loc(L%).|..6.."Eu|
|000046c0| 63 6c 69 64 5f 49 6e 69 | 74 69 61 6c 69 73 65 22 |clid_Ini|tialise"|
|000046d0| 2c 2c 46 49 25 2c 4c 25 | 3a c8 99 22 45 75 63 6c |,,FI%,L%|:.."Eucl|
|000046e0| 69 64 5f 4c 6f 61 64 22 | 2c 2c 2c 46 24 0d 10 ea |id_Load"|,,,F$...|
|000046f0| 20 e7 53 43 52 41 50 25 | 3a c8 99 46 69 6c 65 2c | .SCRAP%|:..File,|
|00004700| 36 2c 46 24 3a 53 43 52 | 41 50 25 3d 30 0d 10 f4 |6,F$:SCR|AP%=0...|
|00004710| 18 f2 50 72 6f 63 65 73 | 73 46 69 6c 65 28 46 49 |..Proces|sFile(FI|
|00004720| 25 2c 4c 25 29 0d 10 fe | 05 e1 0d 11 08 04 0d 11 |%,L%)...|........|
|00004730| 12 12 dd a4 4c 6f 61 64 | 5f 49 63 6f 6e 42 61 72 |....Load|_IconBar|
|00004740| 0d 11 1c 2b f2 4c 6f 61 | 64 5f 49 63 6f 6e 42 61 |...+.Loa|d_IconBa|
|00004750| 72 3a f2 52 65 73 74 6f | 72 65 4d 65 73 73 61 67 |r:.Resto|reMessag|
|00004760| 65 3a f2 52 65 70 6c 79 | 28 34 29 0d 11 26 06 3d |e:.Reply|(4)..&.=|
|00004770| 30 0d 11 30 04 0d 11 3a | 22 dd a4 53 61 76 65 5f |0..0...:|"..Save_|
|00004780| 49 63 6f 6e 42 61 72 3a | e7 42 25 21 34 30 3c 3e |IconBar:|.B%!40<>|
|00004790| 46 49 4e 25 3a 3d 30 0d | 11 44 12 3d a4 53 61 76 |FIN%:=0.|.D.=.Sav|
|000047a0| 65 41 63 6b 53 63 72 61 | 70 0d 11 4e 04 0d 11 58 |eAckScra|p..N...X|
|000047b0| 0c f4 2a 53 61 76 65 41 | 73 0d 11 62 04 0d 11 6c |..*SaveA|s..b...l|
|000047c0| 39 dd f2 53 61 76 65 41 | 73 28 53 24 2c 54 25 2c |9..SaveA|s(S$,T%,|
|000047d0| 4c 25 2c 46 24 29 3a 53 | 56 45 24 3d 46 24 3a 53 |L%,F$):S|VE$=F$:S|
|000047e0| 56 45 25 3d 57 25 3a 53 | 56 4c 25 3d 4c 25 3a 53 |VE%=W%:S|VL%=L%:S|
|000047f0| 56 54 25 3d 54 25 0d 11 | 76 16 54 25 3d a4 4e 57 |VT%=T%..|v.T%=.NW|
|00004800| 69 6e 28 22 53 61 76 65 | 41 73 22 29 0d 11 80 31 |in("Save|As")...1|
|00004810| f2 53 65 74 49 28 57 25 | 2c 31 2c 53 24 29 3a f2 |.SetI(W%|,1,S$):.|
|00004820| 53 65 74 56 53 74 72 28 | 57 25 2c 30 2c 22 73 66 |SetVStr(|W%,0,"sf|
|00004830| 69 6c 65 5f 22 2b c3 7e | 53 56 54 25 29 0d 11 8a |ile_"+.~|SVT%)...|
|00004840| 1d f2 44 69 61 6c 6f 67 | 75 65 28 22 53 61 76 65 |..Dialog|ue("Save|
|00004850| 41 73 22 2c 34 38 2c 34 | 38 29 0d 11 94 05 e1 0d |As",48,4|8)......|
|00004860| 11 9e 04 0d 11 a8 18 dd | f2 44 69 61 6c 6f 67 75 |........|.Dialogu|
|00004870| 65 28 57 24 2c 58 25 2c | 59 25 29 0d 11 b2 3b 4d |e(W$,X%,|Y%)...;M|
|00004880| 50 25 3d a3 3a c8 99 47 | 65 74 50 2c 2c 42 31 25 |P%=.:..G|etP,,B1%|
|00004890| 3a c8 99 43 72 65 61 74 | 65 4d 2c 2c a4 4e 57 69 |:..Creat|eM,,.NWi|
|000048a0| 6e 28 57 24 29 2c 21 42 | 31 25 2d 58 25 2c 42 31 |n(W$),!B|1%-X%,B1|
|000048b0| 25 21 34 2b 59 25 0d 11 | bc 05 e1 0d 11 c6 04 0d |%!4+Y%..|........|
|000048c0| 11 d0 19 dd f2 53 44 69 | 61 6c 6f 67 75 65 28 57 |.....SDi|alogue(W|
|000048d0| 24 2c 58 25 2c 59 25 29 | 0d 11 da 3f c8 99 47 65 |$,X%,Y%)|...?..Ge|
|000048e0| 74 50 2c 2c 42 31 25 3a | 58 25 3d 21 42 31 25 2d |tP,,B1%:|X%=!B1%-|
|000048f0| 58 25 3a 59 25 3d 42 31 | 25 21 34 2b 59 25 3a 21 |X%:Y%=B1|%!4+Y%:!|
|00004900| 42 25 3d a4 4e 57 69 6e | 28 57 24 29 3a c8 99 47 |B%=.NWin|(W$):..G|
|00004910| 65 74 57 2c 2c 42 25 0d | 11 e4 47 42 25 21 31 32 |etW,,B%.|..GB%!12|
|00004920| 3d 42 25 21 31 32 2d 42 | 25 21 34 2b 58 25 3a 42 |=B%!12-B|%!4+X%:B|
|00004930| 25 21 34 3d 58 25 3a 42 | 25 21 38 3d 42 25 21 38 |%!4=X%:B|%!8=B%!8|
|00004940| 2d 42 25 21 31 36 2b 59 | 25 3a 42 25 21 31 36 3d |-B%!16+Y|%:B%!16=|
|00004950| 59 25 3a c8 99 4f 70 65 | 6e 57 2c 2c 42 25 0d 11 |Y%:..Ope|nW,,B%..|
|00004960| ee 05 e1 0d 11 f8 04 0d | 12 02 37 dd f2 43 44 69 |........|..7..CDi|
|00004970| 61 6c 6f 67 75 65 3a 21 | 42 25 3d 57 25 28 57 25 |alogue:!|B%=W%(W%|
|00004980| 29 3a c8 99 43 6c 6f 73 | 65 57 2c 2c 42 25 3a c8 |):..Clos|eW,,B%:.|
|00004990| 99 43 72 65 61 74 65 4d | 2c 2c 2d 31 3a e1 0d 12 |.CreateM|,,-1:...|
|000049a0| 0c 04 0d 12 16 13 dd a4 | 42 75 74 74 6f 6e 5f 53 |........|Button_S|
|000049b0| 61 76 65 41 73 0d 12 20 | 0c c8 8e 42 25 21 31 36 |aveAs.. |...B%!16|
|000049c0| ca 0d 12 2a 06 c9 30 0d | 12 34 09 e7 44 4c 25 8c |...*..0.|.4..DL%.|
|000049d0| 0d 12 3e 26 20 20 20 c8 | 99 47 65 74 57 49 2c 2c |..>& .|.GetWI,,|
|000049e0| 42 32 25 3a 58 25 3d 42 | 32 25 21 34 3a 59 25 3d |B2%:X%=B|2%!4:Y%=|
|000049f0| 42 32 25 21 31 36 0d 12 | 48 2f 20 20 20 42 32 25 |B2%!16..|H/ B2%|
|00004a00| 21 34 3d 35 3a 42 32 25 | 21 38 3d 58 25 2b 42 32 |!4=5:B2%|!8=X%+B2|
|00004a10| 25 21 39 32 3a 42 32 25 | 21 31 32 3d 59 25 2b 42 |%!92:B2%|!12=Y%+B|
|00004a20| 32 25 21 39 36 0d 12 52 | 2a 20 20 20 42 32 25 21 |2%!96..R|* B2%!|
|00004a30| 31 36 3d 58 25 2b 42 32 | 25 21 31 30 30 3a 42 32 |16=X%+B2|%!100:B2|
|00004a40| 25 21 32 30 3d 59 25 2b | 42 32 25 21 31 30 34 0d |%!20=Y%+|B2%!104.|
|00004a50| 12 5c 2b 20 20 20 42 32 | 25 21 32 34 3d 42 32 25 |.\+ B2|%!24=B2%|
|00004a60| 21 38 2d 42 25 21 30 3a | 42 32 25 21 32 38 3d 42 |!8-B%!0:|B2%!28=B|
|00004a70| 32 25 21 31 32 2d 42 25 | 21 34 0d 12 66 34 20 20 |2%!12-B%|!4..f4 |
|00004a80| 20 42 32 25 21 33 32 3d | 53 57 25 2b 42 32 25 21 | B2%!32=|SW%+B2%!|
|00004a90| 31 36 2d 42 25 21 30 3a | 42 32 25 21 33 36 3d 53 |16-B%!0:|B2%!36=S|
|00004aa0| 48 25 2b 42 32 25 21 32 | 30 2d 42 25 21 34 0d 12 |H%+B2%!2|0-B%!4..|
|00004ab0| 70 1b 20 20 20 c8 99 44 | 72 61 67 2c 2c 42 32 25 |p. ..D|rag,,B2%|
|00004ac0| 3a 44 52 41 47 24 3d 57 | 24 0d 12 7a 05 cd 0d 12 |:DRAG$=W|$..z....|
|00004ad0| 84 06 c9 32 0d 12 8e 46 | 20 20 20 f2 43 44 69 61 |...2...F| .CDia|
|00004ae0| 6c 6f 67 75 65 3a 42 25 | 21 31 36 3d 31 3a c8 99 |logue:B%|!16=1:..|
|00004af0| 47 65 74 49 2c 2c 42 25 | 2b 31 32 3a 46 24 3d 24 |GetI,,B%|+12:F$=$|
|00004b00| 28 42 25 21 34 30 29 3a | 57 25 3d 53 56 45 25 3a |(B%!40):|W%=SVE%:|
|00004b10| 43 4f 25 3d 43 25 28 57 | 25 29 0d 12 98 1b 20 20 |CO%=C%(W|%).... |
|00004b20| 20 3d a0 28 22 46 4e 53 | 61 76 65 41 73 5f 22 2b | =.("FNS|aveAs_"+|
|00004b30| 53 56 45 24 29 0d 12 a2 | 05 cb 0d 12 ac 06 3d 30 |SVE$)...|......=0|
|00004b40| 0d 12 b6 04 0d 12 c0 3d | dd a4 4b 65 79 5f 53 61 |.......=|..Key_Sa|
|00004b50| 76 65 41 73 3a e7 42 25 | 21 32 34 3d 26 44 3a 42 |veAs:.B%|!24=&D:B|
|00004b60| 25 21 31 32 3d 42 25 21 | 30 3a 42 25 21 31 36 3d |%!12=B%!|0:B%!16=|
|00004b70| 32 3a 3d a4 42 75 74 74 | 6f 6e 5f 53 61 76 65 41 |2:=.Butt|on_SaveA|
|00004b80| 73 0d 12 ca 11 3d a4 4b | 65 79 5f 44 65 66 61 75 |s....=.K|ey_Defau|
|00004b90| 6c 74 0d 12 d4 04 0d 12 | de 14 dd a4 45 6e 64 44 |lt......|....EndD|
|00004ba0| 72 61 67 5f 53 61 76 65 | 41 73 0d 12 e8 34 f2 43 |rag_Save|As...4.C|
|00004bb0| 44 69 61 6c 6f 67 75 65 | 3a c8 99 47 65 74 50 2c |Dialogue|:..GetP,|
|00004bc0| 2c 42 31 25 3a 42 25 21 | 32 30 3d 42 31 25 21 31 |,B1%:B%!|20=B1%!1|
|00004bd0| 32 3a 42 25 21 32 34 3d | 42 31 25 21 31 36 0d 12 |2:B%!24=|B1%!16..|
|00004be0| f2 32 42 25 21 33 36 3d | 53 56 4c 25 3a 42 25 21 |.2B%!36=|SVL%:B%!|
|00004bf0| 34 30 3d 46 4f 55 54 25 | 3a 24 28 42 25 2b 34 34 |40=FOUT%|:$(B%+44|
|00004c00| 29 3d a4 47 65 74 49 28 | 57 25 2c 31 29 2b bd 30 |)=.GetI(|W%,1)+.0|
|00004c10| 0d 12 fc 34 21 42 25 3d | 32 35 36 3a 42 25 21 31 |...4!B%=|256:B%!1|
|00004c20| 36 3d 31 3a 42 25 21 31 | 32 3d 30 3a f2 4d 65 73 |6=1:B%!1|2=0:.Mes|
|00004c30| 73 28 31 37 2c 42 25 2c | 42 25 21 32 30 2c 42 25 |s(17,B%,|B%!20,B%|
|00004c40| 21 32 34 29 0d 13 06 2f | 4d 53 47 53 24 3d 53 56 |!24).../|MSGS$=SV|
|00004c50| 45 24 3a 4d 53 47 53 25 | 3d 53 56 45 25 3a 4d 53 |E$:MSGS%|=SVE%:MS|
|00004c60| 47 46 24 3d 53 56 45 24 | 3a 4d 53 47 46 25 3d 53 |GF$=SVE$|:MSGF%=S|
|00004c70| 56 45 25 0d 13 10 06 3d | 30 0d 13 1a 04 0d 13 24 |VE%....=|0......$|
|00004c80| 0a f4 2a 4d 65 6e 75 0d | 13 2e 04 0d 13 38 17 dd |..*Menu.|.....8..|
|00004c90| a4 4d 3a 42 25 21 34 2d | 3d 31 3a 3d 42 25 21 34 |.M:B%!4-|=1:=B%!4|
|00004ca0| 2b 31 0d 13 42 1f dd a4 | 55 3a 42 25 21 34 2d 3d |+1..B...|U:B%!4-=|
|00004cb0| 31 3a e7 42 25 21 34 2b | 31 3a 3d 42 25 21 34 2b |1:.B%!4+|1:=B%!4+|
|00004cc0| 31 0d 13 4c 32 85 31 2c | 22 53 6f 72 72 79 20 6e |1..L2.1,|"Sorry n|
|00004cd0| 6f 74 20 69 6d 70 6c 65 | 6d 65 6e 74 65 64 2e 20 |ot imple|mented. |
|00004ce0| 48 69 74 20 4f 4b 20 74 | 6f 20 63 6f 6e 74 69 6e |Hit OK t|o contin|
|00004cf0| 75 65 22 0d 13 56 04 0d | 13 60 13 dd a4 53 74 72 |ue"..V..|.`...Str|
|00004d00| 69 70 4c 65 61 66 28 46 | 24 29 0d 13 6a 26 f5 46 |ipLeaf(F|$)..j&.F|
|00004d10| 24 3d c0 46 24 29 3a fd | c2 46 24 2c 31 29 3d 22 |$=.F$):.|.F$,1)="|
|00004d20| 2e 22 84 46 24 3d 22 22 | 3a 46 24 3d c0 46 24 29 |.".F$=""|:F$=.F$)|
|00004d30| 0d 13 74 07 3d 46 24 0d | 13 7e 04 0d 13 88 2e dd |..t.=F$.|.~......|
|00004d40| a4 4c 65 61 66 28 46 24 | 29 3a c8 95 a7 46 24 2c |.Leaf(F$|):...F$,|
|00004d50| 22 2e 22 29 3a 46 24 3d | c1 46 24 2c a7 46 24 2c |"."):F$=|.F$,.F$,|
|00004d60| 22 2e 22 29 2b 31 29 3a | ce 0d 13 92 07 3d 46 24 |".")+1):|.....=F$|
|00004d70| 0d 13 9c 04 0d 13 a6 23 | dd a4 53 74 72 69 70 53 |.......#|..StripS|
|00004d80| 70 61 63 65 28 46 24 29 | 3d a4 53 74 72 69 70 28 |pace(F$)|=.Strip(|
|00004d90| 46 24 2c 22 20 22 29 0d | 13 b0 22 dd a4 53 74 72 |F$," ").|.."..Str|
|00004da0| 69 70 48 61 73 68 28 46 | 24 29 3d a4 53 74 72 69 |ipHash(F|$)=.Stri|
|00004db0| 70 28 46 24 2c 22 23 22 | 29 0d 13 ba 2f dd a4 53 |p(F$,"#"|).../..S|
|00004dc0| 74 72 69 70 28 46 24 2c | 53 24 29 3a e7 a7 46 24 |trip(F$,|S$):..F$|
|00004dd0| 2c 53 24 29 3a 3d c0 46 | 24 2c a7 46 24 2c 53 24 |,S$):=.F|$,.F$,S$|
|00004de0| 29 2d 31 29 8b 3d 46 24 | 0d 13 c4 0c f4 2a 43 6f |)-1).=F$|.....*Co|
|00004df0| 6c 6f 75 72 0d 13 ce 04 | 0d 13 d8 10 dd f2 4d 6f |lour....|......Mo|
|00004e00| 64 65 43 68 61 6e 67 65 | 0d 13 e2 27 53 57 25 3d |deChange|...'SW%=|
|00004e10| 28 a4 52 65 61 64 4d 6f | 64 65 28 31 31 29 2b 31 |(.ReadMo|de(11)+1|
|00004e20| 29 3c 3c a4 52 65 61 64 | 4d 6f 64 65 28 34 29 0d |)<<.Read|Mode(4).|
|00004e30| 13 ec 27 53 48 25 3d 28 | a4 52 65 61 64 4d 6f 64 |..'SH%=(|.ReadMod|
|00004e40| 65 28 31 32 29 2b 31 29 | 3c 3c a4 52 65 61 64 4d |e(12)+1)|<<.ReadM|
|00004e50| 6f 64 65 28 35 29 0d 13 | f6 0f f2 4e 65 77 50 61 |ode(5)..|...NewPa|
|00004e60| 6c 65 74 74 65 0d 14 00 | 05 e1 0d 14 0a 04 0d 14 |lette...|........|
|00004e70| 14 10 dd f2 4e 65 77 50 | 61 6c 65 74 74 65 0d 14 |....NewP|alette..|
|00004e80| 1e 25 e3 49 25 3d 30 b8 | 57 3a e7 57 24 28 49 25 |.%.I%=0.|W:.W$(I%|
|00004e90| 29 3c 3e 22 22 f2 46 6f | 72 63 65 28 57 25 28 49 |)<>"".Fo|rce(W%(I|
|00004ea0| 25 29 29 0d 14 28 15 ed | 3a c8 99 52 65 61 64 57 |%))..(..|:..ReadW|
|00004eb0| 50 61 6c 2c 2c 57 50 25 | 0d 14 32 05 e1 0d 14 3c |Pal,,WP%|..2....<|
|00004ec0| 04 0d 14 46 18 dd a4 4d | 65 6e 75 5f 51 75 69 74 |...F...M|enu_Quit|
|00004ed0| 3a f2 51 75 69 74 3a 3d | 30 0d 14 50 23 dd f2 51 |:.Quit:=|0..P#..Q|
|00004ee0| 75 69 74 3a ff 22 50 4f | 49 4e 54 45 52 20 31 22 |uit:."PO|INTER 1"|
|00004ef0| 3a c8 99 57 43 6c 6f 73 | 65 3a c8 98 0d 14 5a 0f |:..WClos|e:....Z.|
|00004f00| dd f2 50 72 65 51 75 69 | 74 3a e1 0d 14 64 04 0d |..PreQui|t:...d..|
|00004f10| 14 6e 23 dd f2 49 63 6f | 6e 42 61 72 5f 4d 65 6e |.n#..Ico|nBar_Men|
|00004f20| 75 3a f2 4d 65 6e 75 49 | 6e 69 74 3a 55 57 25 3d |u:.MenuI|nit:UW%=|
|00004f30| 57 25 0d 14 78 1e 4d 69 | 72 72 6f 72 25 3d a4 4d |W%..x.Mi|rror%=.M|
|00004f40| 65 6e 75 54 28 22 4d 69 | 72 72 6f 72 22 2c 37 29 |enuT("Mi|rror",7)|
|00004f50| 0d 14 82 26 54 25 3d a4 | 45 6e 74 72 79 53 56 4c |...&T%=.|EntrySVL|
|00004f60| 28 c3 4d 46 2c 22 61 30 | 2d 39 2e 22 2c 26 38 34 |(.MF,"a0|-9.",&84|
|00004f70| 2c 35 2c 2d 31 29 0d 14 | 8c 04 0d 14 96 1a 4d 65 |,5,-1)..|......Me|
|00004f80| 6e 75 3d a4 4d 65 6e 75 | 54 28 22 45 43 51 52 54 |nu=.Menu|T("ECQRT|
|00004f90| 22 2c 37 29 0d 14 a0 29 | f2 45 6e 74 72 79 53 28 |",7)...)|.EntryS(|
|00004fa0| 22 49 6e 66 6f 22 2c 30 | 2c a4 4e 57 69 6e 28 22 |"Info",0|,.NWin("|
|00004fb0| 50 72 6f 67 49 6e 66 6f | 22 29 2c b9 29 0d 14 aa |ProgInfo|"),.)...|
|00004fc0| 21 f2 45 6e 74 72 79 53 | 28 22 4d 69 72 72 6f 72 |!.EntryS|("Mirror|
|00004fd0| 22 2c 30 2c 4d 69 72 72 | 6f 72 25 2c b9 29 0d 14 |",0,Mirr|or%,.)..|
|00004fe0| b4 15 f2 45 6e 74 72 79 | 45 28 22 51 75 69 74 22 |...Entry|E("Quit"|
|00004ff0| 2c a3 29 0d 14 be 05 e1 | 0d 14 c8 12 dd f2 50 6f |,.).....|......Po|
|00005000| 70 75 70 28 58 25 2c 59 | 25 29 0d 14 d2 2f c8 99 |pup(X%,Y|%).../..|
|00005010| 43 72 65 61 74 65 4d 2c | 2c 4d 65 6e 75 2c 58 25 |CreateM,|,Menu,X%|
|00005020| 2c 59 25 3a 55 25 3d 4d | 65 6e 75 3a 55 58 25 3d |,Y%:U%=M|enu:UX%=|
|00005030| 58 25 3a 55 59 25 3d 59 | 25 0d 14 dc 05 e1 0d 14 |X%:UY%=Y|%.......|
|00005040| e6 04 0d 14 f0 2d dd a4 | 4d 65 6e 75 5f 49 6e 66 |.....-..|Menu_Inf|
|00005050| 6f 3a f2 44 69 61 6c 6f | 67 75 65 28 22 50 72 6f |o:.Dialo|gue("Pro|
|00005060| 67 49 6e 66 6f 22 2c 36 | 34 2c 30 29 3a 3d 30 0d |gInfo",6|4,0):=0.|
|00005070| 14 fa 04 0d 15 04 1f 2a | 52 45 4d 20 45 43 51 52 |.......*|REM ECQR|
|00005080| 54 20 53 70 65 63 69 66 | 69 63 20 62 69 74 73 2e |T Specif|ic bits.|
|00005090| 2e 2e 0d 15 0e 04 0d 15 | 18 1e dd a4 4d 65 6e 75 |........|....Menu|
|000050a0| 5f 4d 69 72 72 6f 72 3a | 4d 46 3d bb 4d 24 28 31 |_Mirror:|MF=.M$(1|
|000050b0| 29 3a 3d 30 0d 15 22 04 | 0d 15 2c 18 dd f2 50 72 |):=0..".|..,...Pr|
|000050c0| 6f 63 65 73 73 46 69 6c | 65 28 46 25 2c 4c 25 29 |ocessFil|e(F%,L%)|
|000050d0| 0d 15 36 29 f2 53 61 76 | 65 41 73 28 22 45 75 63 |..6).Sav|eAs("Euc|
|000050e0| 6c 69 64 51 52 54 22 2c | 46 4f 55 54 25 2c 4c 25 |lidQRT",|FOUT%,L%|
|000050f0| 2c 22 45 43 51 52 54 22 | 29 0d 15 40 05 e1 0d 15 |,"ECQRT"|)..@....|
|00005100| 4a 04 0d 15 54 1f dd a4 | 53 61 76 65 41 63 6b 5f |J...T...|SaveAck_|
|00005110| 45 43 51 52 54 3a f2 43 | 6f 6e 76 65 72 74 3a 3d |ECQRT:.C|onvert:=|
|00005120| 30 0d 15 5e 1e dd a4 53 | 61 76 65 41 73 5f 45 43 |0..^...S|aveAs_EC|
|00005130| 51 52 54 3a f2 43 6f 6e | 76 65 72 74 3a 3d 30 0d |QRT:.Con|vert:=0.|
|00005140| 15 68 04 0d 15 72 32 dd | a4 5a 53 28 46 25 29 3a |.h...r2.|.ZS(F%):|
|00005150| ea 53 24 2c 49 25 3a c8 | 95 46 25 3f 49 25 3a 53 |.S$,I%:.|.F%?I%:S|
|00005160| 24 2b 3d bd 46 25 3f 49 | 25 3a 49 25 2b 3d 31 3a |$+=.F%?I|%:I%+=1:|
|00005170| ce 3a 3d 53 24 0d 15 7c | 04 0d 15 86 3f dd a4 56 |.:=S$..||....?..V|
|00005180| 61 72 56 61 6c 28 4e 24 | 29 3a ea 46 25 3a c8 99 |arVal(N$|):.F%:..|
|00005190| 58 52 65 61 64 56 61 72 | 2c 4e 24 2c 42 31 25 2c |XReadVar|,N$,B1%,|
|000051a0| 32 35 35 b8 2c 2c 46 25 | 3a 42 31 25 3f 46 25 3d |255.,,F%|:B1%?F%=|
|000051b0| 26 44 3a 3d 24 42 31 25 | 0d 15 90 43 dd a4 57 56 |&D:=$B1%|...C..WV|
|000051c0| 61 6c 28 4e 24 29 3a ea | 46 25 3a c8 99 58 52 65 |al(N$):.|F%:..XRe|
|000051d0| 61 64 56 61 72 2c 4e 24 | 2c 42 31 25 2c 32 35 35 |adVar,N$|,B1%,255|
|000051e0| 2c 43 25 b8 2c 2c 46 25 | 2c 43 25 3a 42 31 25 3f |,C%.,,F%|,C%:B1%?|
|000051f0| 46 25 3d 26 44 3a 3d 24 | 42 31 25 0d 15 9a 34 dd |F%=&D:=$|B1%...4.|
|00005200| a4 4f 70 74 28 4f 24 2c | 54 25 29 ea 4e 24 3a 4e |.Opt(O$,|T%).N$:N|
|00005210| 24 3d 22 20 22 2b a4 56 | 61 72 56 61 6c 28 22 45 |$=" "+.V|arVal("E|
|00005220| 75 63 6c 69 64 24 4f 70 | 74 69 6f 6e 73 22 29 0d |uclid$Op|tions").|
|00005230| 15 a4 13 e7 a7 4e 24 2c | 22 20 22 2b 4f 24 29 3a |.....N$,|" "+O$):|
|00005240| 3d b9 0d 15 ae 26 4f 24 | 3d bd 28 97 4f 24 82 26 |=....&O$|=.(.O$.&|
|00005250| 32 30 29 3a e7 a7 4e 24 | 2c 22 20 22 2b 4f 24 29 |20):..N$|," "+O$)|
|00005260| 3a 3d b9 20 8b 3d 54 25 | 0d 15 b8 36 dd a4 4f 70 |:=. .=T%|...6..Op|
|00005270| 74 56 28 4f 24 2c 54 29 | ea 4e 24 2c 49 25 3a 4e |tV(O$,T)|.N$,I%:N|
|00005280| 24 3d 22 20 22 2b a4 56 | 61 72 56 61 6c 28 22 45 |$=" "+.V|arVal("E|
|00005290| 43 51 52 54 24 4f 70 74 | 69 6f 6e 73 22 29 0d 15 |CQRT$Opt|ions")..|
|000052a0| c2 27 49 25 3d a7 4e 24 | 2c 22 20 22 2b 4f 24 29 |.'I%=.N$|," "+O$)|
|000052b0| 3a e7 49 25 3a 3d a4 56 | 41 4c 28 c1 4e 24 2c 49 |:.I%:=.V|AL(.N$,I|
|000052c0| 25 2b 32 29 29 0d 15 cc | 27 49 25 3d a7 4e 24 2c |%+2))...|'I%=.N$,|
|000052d0| 22 7e 22 2b 4f 24 29 3a | e7 49 25 3a 3d a4 56 41 |"~"+O$):|.I%:=.VA|
|000052e0| 4c 28 c1 4e 24 2c 49 25 | 2b 32 29 29 0d 15 d6 35 |L(.N$,I%|+2))...5|
|000052f0| 4f 24 3d bd 28 97 4f 24 | 82 26 32 30 29 3a 49 25 |O$=.(.O$|.&20):I%|
|00005300| 3d a7 4e 24 2c 22 20 22 | 2b 4f 24 29 3a e7 49 25 |=.N$," "|+O$):.I%|
|00005310| 3a 3d a4 56 41 4c 28 c1 | 4e 24 2c 49 25 2b 32 29 |:=.VAL(.|N$,I%+2)|
|00005320| 29 0d 15 e0 2a 49 25 3d | a7 4e 24 2c 22 7e 22 2b |)...*I%=|.N$,"~"+|
|00005330| 4f 24 29 3a e7 49 25 3a | 3d a4 56 41 4c 28 c1 4e |O$):.I%:|=.VAL(.N|
|00005340| 24 2c 49 25 2b 32 29 29 | 8b 3d 54 0d 15 ea 29 dd |$,I%+2))|.=T...).|
|00005350| a4 55 43 28 43 24 29 ea | 41 24 2c 49 25 3a e3 49 |.UC(C$).|A$,I%:.I|
|00005360| 25 3d 31 b8 a9 43 24 3a | 41 24 3d c1 43 24 2c 49 |%=1..C$:|A$=.C$,I|
|00005370| 25 2c 31 29 0d 15 f4 28 | e7 41 24 3e 3d 22 61 22 |%,1)...(|.A$>="a"|
|00005380| 80 41 24 3c 3d 22 7a 22 | c1 43 24 2c 49 25 2c 31 |.A$<="z"|.C$,I%,1|
|00005390| 29 3d bd 28 97 41 24 2d | 26 32 30 29 0d 15 fe 09 |)=.(.A$-|&20)....|
|000053a0| ed 3a 3d 43 24 0d 16 08 | 21 dd a4 56 41 4c 28 43 |.:=C$...|!..VAL(C|
|000053b0| 24 29 3a e7 97 43 24 3d | 97 22 26 22 3a 3d a0 43 |$):..C$=|."&":=.C|
|000053c0| 24 8b 3d bb 43 24 0d ff | 46 69 6c 65 44 61 74 61 |$.=.C$..|FileData|
|000053d0| 82 21 53 70 72 69 74 65 | 73 00 6f 6f b8 06 00 00 |.!Sprite|s.oo....|
|000053e0| 41 f9 ff ff c4 5c a4 f6 | 03 00 88 8b 03 00 00 00 |A....\..|........|
|000053f0| 10 00 00 00 bc 06 00 00 | d4 02 00 00 21 65 63 71 |........|....!ecq|
|00005400| 72 74 00 00 00 00 00 00 | 04 00 00 00 10 00 00 00 |rt......|........|
|00005410| 00 00 00 00 07 00 00 00 | 2c 00 00 00 80 01 00 00 |........|,.......|
|00005420| 0c 00 00 00 77 77 77 77 | 77 77 77 77 77 77 00 00 |....wwww|wwwwww..|
|00005430| 00 77 88 88 78 00 00 00 | 07 70 77 cc cc 77 00 00 |.w..x...|.pw..w..|
|00005440| 00 77 77 70 87 88 88 00 | 70 00 00 00 77 c7 cc 7c |.wwp....|p...w..||
|00005450| 77 77 70 77 00 77 77 77 | 07 77 87 88 78 00 00 00 |wwpw.www|.w..x...|
|00005460| d7 7d c7 cc cc 7c c7 cc | 7c 77 77 77 77 77 77 77 |.}...|..||wwwwwww|
|00005470| 77 00 00 00 d7 dd 7d c7 | cc cc cc 7c 77 77 77 77 |w.....}.|...|wwww|
|00005480| 77 77 77 77 70 00 00 00 | 77 dd dd 7d c7 cc 7c a7 |wwwwp...|w..}..|.|
|00005490| 7a 77 00 77 77 77 77 77 | 70 00 00 00 07 77 d7 dd |zw.wwwww|p....w..|
|000054a0| dd 77 aa aa 77 77 00 00 | 80 77 07 77 70 00 00 00 |.w..ww..|.w.wp...|
|000054b0| 07 00 77 d7 dd a7 7a 77 | 00 77 77 77 77 77 77 77 |..w...zw|.wwwwwww|
|000054c0| 70 00 00 00 77 77 77 77 | 77 77 77 77 77 77 77 77 |p...wwww|wwwwwwww|
|000054d0| 77 77 77 77 77 00 00 00 | 77 00 00 00 77 88 88 78 |wwwww...|w...w..x|
|000054e0| 77 00 00 00 00 00 00 08 | 77 00 00 00 77 77 00 88 |w.......|w...ww..|
|000054f0| 88 88 00 70 77 70 77 77 | 77 77 80 8f 77 00 00 00 |...pwpww|ww..w...|
|00005500| 77 77 87 08 77 87 88 78 | 77 77 ff ff 77 77 77 77 |ww..w..x|ww..wwww|
|00005510| 77 00 00 00 77 77 77 00 | 77 77 77 77 77 ff ff ff |w...www.|wwwww...|
|00005520| ff ff ff ff 77 00 00 00 | 77 77 77 77 77 77 77 70 |....w...|wwwwwwwp|
|00005530| 77 88 88 88 88 88 88 88 | 77 00 00 00 77 00 77 77 |w.......|w...w.ww|
|00005540| 77 77 00 70 77 ff ff ff | ff ff ff ff 77 00 00 00 |ww.pw...|....w...|
|00005550| 77 00 00 80 77 07 00 70 | 77 ff ff ff ff ff ff ff |w...w..p|w.......|
|00005560| 77 00 00 00 77 77 77 77 | 77 77 77 70 77 77 77 77 |w...wwww|wwwpwwww|
|00005570| 77 77 77 77 77 00 00 00 | ff ff ff ff ff ff ff ff |wwwww...|........|
|00005580| ff 0f 00 00 00 00 00 00 | 00 ff ff ff ff ff ff ff |........|........|
|00005590| ff ff ff ff ff 0f 00 00 | 00 00 00 00 00 ff ff ff |........|........|
|000055a0| ff ff ff ff ff ff ff ff | ff 0f 00 00 00 00 00 00 |........|........|
|000055b0| 00 ff ff ff ff ff ff ff | ff ff ff ff ff 0f 00 00 |........|........|
|000055c0| 00 00 00 00 00 ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000055d0| ff 0f 00 00 00 00 00 00 | 00 ff ff ff ff ff ff ff |........|........|
|000055e0| ff ff ff ff ff 0f 00 00 | 00 00 00 00 00 ff ff ff |........|........|
|000055f0| ff ff ff ff ff ff ff ff | ff 0f 00 00 00 00 00 00 |........|........|
|00005600| 00 ff ff ff ff ff ff ff | ff ff ff ff ff 0f 00 00 |........|........|
|00005610| 00 00 00 00 00 ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005620| ff 0f 00 00 00 00 00 00 | 00 ff ff ff 00 00 00 00 |........|........|
|00005630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 ff ff ff |........|........|
|00005640| 00 ff 00 00 00 00 00 00 | 00 f0 ff ff 0f 00 00 00 |........|........|
|00005650| 00 ff ff ff 00 ff 00 00 | f0 0f 00 00 f0 ff ff ff |........|........|
|00005660| ff ff ff ff 0f ff ff ff | 00 ff 00 00 f0 ff 00 00 |........|........|
|00005670| ff ff ff ff ff ff ff ff | ff ff ff ff 00 ff ff ff |........|........|
|00005680| ff ff ff 00 ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005690| 00 00 00 00 f0 ff 00 00 | ff ff ff ff ff ff ff ff |........|........|
|000056a0| ff ff ff ff 00 00 00 00 | f0 0f 00 00 ff ff ff ff |........|........|
|000056b0| ff ff ff ff ff ff ff ff | 00 00 00 00 00 00 00 00 |........|........|
|000056c0| ff ff ff ff ff ff ff ff | ff ff ff ff 04 01 00 00 |........|........|
|000056d0| 73 6d 21 65 63 71 72 74 | 00 00 00 00 02 00 00 00 |sm!ecqrt|........|
|000056e0| 08 00 00 00 00 00 00 00 | 07 00 00 00 2c 00 00 00 |........|....,...|
|000056f0| 98 00 00 00 0c 00 00 00 | 77 77 77 77 07 40 07 00 |........|wwww.@..|
|00005700| 00 00 00 00 77 50 c5 75 | 07 77 77 77 07 00 00 00 |....wP.u|.www....|
|00005710| 77 dd 0c 7a 07 47 77 77 | 07 00 00 00 77 00 ad 70 |w..z.Gww|....w..p|
|00005720| 07 70 00 70 07 00 00 00 | 77 77 77 77 77 77 77 77 |.p.p....|wwwwwwww|
|00005730| 77 00 00 00 70 07 00 00 | 77 f7 7f 87 77 00 00 00 |w...p...|w...w...|
|00005740| 70 77 77 34 77 88 88 88 | 78 00 00 00 70 77 77 77 |pww4w...|x...pwww|
|00005750| 77 ff ff ff 7f 00 00 00 | 00 00 70 54 77 77 77 77 |w.......|..pTwwww|
|00005760| 77 00 00 00 ff ff ff ff | 0f 00 00 00 00 ff ff ff |w.......|........|
|00005770| ff ff ff ff 0f 00 00 00 | 00 ff ff ff ff ff ff ff |........|........|
|00005780| 0f 00 00 00 00 ff ff ff | ff ff ff ff 0f 00 00 00 |........|........|
|00005790| 00 ff ff ff ff ff ff ff | 0f 00 00 00 00 ff ff ff |........|........|
|000057a0| f0 0f 00 00 00 ff ff 00 | 00 ff ff ff f0 0f f0 0f |........|........|
|000057b0| f0 ff ff ff ff ff ff ff | f0 ff ff ff f0 ff ff ff |........|........|
|000057c0| ff ff ff ff 00 00 f0 0f | f0 ff ff ff ff ff ff ff |........|........|
|000057d0| d4 02 00 00 66 69 6c 65 | 5f 31 30 30 30 00 00 00 |....file|_1000...|
|000057e0| 04 00 00 00 10 00 00 00 | 00 00 00 00 07 00 00 00 |........|........|
|000057f0| 2c 00 00 00 80 01 00 00 | 0c 00 00 00 00 00 00 00 |,.......|........|
|00005800| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005810| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005820| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005830| 00 00 00 00 00 00 00 00 | 00 00 00 77 77 77 77 77 |........|...wwwww|
|00005840| 77 00 00 00 00 00 00 00 | 00 00 00 00 00 00 70 f7 |w.......|......p.|
|00005850| ff ff ff ff 77 07 00 00 | 00 00 00 00 00 00 00 00 |....w...|........|
|00005860| 70 77 77 ff ff ff ff ff | 7f 77 77 77 77 77 77 77 |pww.....|.wwwwwww|
|00005870| 07 00 00 00 77 ff ff ff | ff ff ff ff ff ff ff ff |....w...|........|
|00005880| ff ff ff ff 77 00 00 00 | 77 ff ff ff ff ff ff ff |....w...|w.......|
|00005890| ff ff ff ff ff ff ff ff | 77 00 00 00 77 88 88 88 |........|w...w...|
|000058a0| 88 88 88 88 88 88 88 88 | 88 88 88 88 77 00 00 00 |........|....w...|
|000058b0| 77 ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |w.......|........|
|000058c0| 77 00 00 00 77 ff ff ff | ff ff ff ff ff ff ff ff |w...w...|........|
|000058d0| ff ff ff ff 77 00 00 00 | 77 ff ff ff ff ff ff ff |....w...|w.......|
|000058e0| ff ff ff ff ff ff ff ff | 77 00 00 00 77 ff ff ff |........|w...w...|
|000058f0| ff ff ff ff ff ff ff ff | ff ff ff ff 77 00 00 00 |........|....w...|
|00005900| 77 ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |w.......|........|
|00005910| 77 00 00 00 77 ff ff ff | ff ff ff ff ff ff ff ff |w...w...|........|
|00005920| ff ff ff ff 77 00 00 00 | 77 ff ff ff ff ff ff ff |....w...|w.......|
|00005930| ff ff ff ff ff ff ff ff | 77 00 00 00 77 77 77 77 |........|w...wwww|
|00005940| 77 77 77 77 77 77 77 77 | 77 77 77 77 77 f4 ff ff |wwwwwwww|wwwww...|
|00005950| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005980| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 ff |........|........|
|00005990| ff ff ff ff 0f 00 00 00 | 00 00 00 00 00 ff ff ff |........|........|
|000059a0| 00 00 f0 ff ff ff ff ff | ff 00 00 00 00 00 00 00 |........|........|
|000059b0| 00 ff ff ff f0 ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000059c0| ff ff ff ff 0f ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000059d0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000059e0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000059f0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a00| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a10| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a20| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a30| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a40| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a50| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a60| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a70| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a80| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a90| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005aa0| ff 4f 04 18 46 69 6c 65 | 44 61 74 61 82 21 43 61 |.O..File|Data.!Ca|
|00005ab0| 6d 65 72 61 00 00 00 00 | 55 00 00 00 41 fb ff ff |mera....|U...A...|
|00005ac0| 19 97 d2 f5 03 00 a7 ae | 0d 00 0a 1a f4 3e 3c 45 |........|.....><E|
|00005ad0| 43 51 52 54 24 44 65 66 | 73 3e 2e 21 43 61 6d 65 |CQRT$Def|s>.!Came|
|00005ae0| 72 61 0d 00 14 26 f4 20 | 43 61 6d 65 72 61 73 20 |ra...&. |Cameras |
|00005af0| 61 72 65 20 64 65 61 6c | 74 20 77 69 74 68 20 65 |are deal|t with e|
|00005b00| 6c 73 65 77 68 65 72 65 | 0d 00 1e 0d dd a4 5f 43 |lsewhere|......_C|
|00005b10| 61 6d 65 72 61 0d 00 28 | 06 3d 30 0d ff 46 69 6c |amera..(|.=0..Fil|
|00005b20| 65 44 61 74 61 82 21 4c | 69 67 68 74 00 00 00 00 |eData.!L|ight....|
|00005b30| 00 e5 00 00 00 41 fb ff | ff 98 a9 7a fc 03 00 57 |.....A..|...z...W|
|00005b40| 5b 0d 00 0a 19 f4 3e 3c | 45 43 51 52 54 24 44 65 |[.....><|ECQRT$De|
|00005b50| 66 73 3e 2e 21 4c 69 67 | 68 74 0d 00 14 46 f4 20 |fs>.!Lig|ht...F. |
|00005b60| 4c 69 67 68 74 73 20 64 | 72 6f 70 20 51 52 54 20 |Lights d|rop QRT |
|00005b70| 6c 69 67 68 74 73 20 69 | 6e 74 6f 20 74 68 65 20 |lights i|nto the |
|00005b80| 70 69 63 74 75 72 65 20 | 77 69 74 68 20 73 75 69 |picture |with sui|
|00005b90| 74 61 62 6c 65 20 70 61 | 72 61 6d 65 74 65 72 73 |table pa|rameters|
|00005ba0| 0d 00 1e 04 0d 00 28 0c | dd a4 5f 4c 69 67 68 74 |......(.|.._Light|
|00005bb0| 0d 00 32 13 f2 57 72 69 | 74 65 4b 28 22 4c 41 4d |..2..Wri|teK("LAM|
|00005bc0| 50 22 29 0d 00 3c 1e f2 | 57 72 69 74 65 50 28 22 |P")..<..|WriteP("|
|00005bd0| 6c 6f 63 22 2c a4 58 59 | 5a 28 30 2c 30 2c 30 29 |loc",.XY|Z(0,0,0)|
|00005be0| 29 0d 00 46 19 f2 57 72 | 69 74 65 50 28 22 72 61 |)..F..Wr|iteP("ra|
|00005bf0| 64 69 75 73 22 2c 22 35 | 22 29 0d 00 50 19 f2 57 |dius","5|")..P..W|
|00005c00| 72 69 74 65 50 28 22 64 | 69 73 74 22 2c 22 35 30 |riteP("d|ist","50|
|00005c10| 30 22 29 0d 00 5a 0b f2 | 57 72 69 74 65 42 0d 00 |0")..Z..|WriteB..|
|00005c20| 64 06 3d 30 0d ff 46 69 | 6c 65 44 61 74 61 82 21 |d.=0..Fi|leData.!|
|00005c30| 52 75 6e 49 6d 61 67 65 | 00 00 1d 10 00 00 41 fb |RunImage|......A.|
|00005c40| ff ff 84 54 53 ff 03 00 | 22 3a 0d 00 0a 1c f4 3e |...TS...|":.....>|
|00005c50| 3c 45 43 51 52 54 24 44 | 65 66 73 3e 2e 21 52 75 |<ECQRT$D|efs>.!Ru|
|00005c60| 6e 49 6d 61 67 65 0d 00 | 14 2b f4 20 28 43 29 20 |nImage..|.+. (C) |
|00005c70| 54 6f 6e 79 20 43 68 65 | 61 6c 2f 41 63 65 20 43 |Tony Che|al/Ace C|
|00005c80| 6f 6d 70 75 74 69 6e 67 | 20 4f 63 74 20 31 39 38 |omputing| Oct 198|
|00005c90| 39 0d 00 1e 04 0d 00 28 | 0d dd f2 43 6f 6e 76 65 |9......(|...Conve|
|00005ca0| 72 74 0d 00 32 11 51 24 | 3d a4 5a 53 28 42 25 2b |rt..2.Q$|=.ZS(B%+|
|00005cb0| 34 34 29 0d 00 3c 42 c8 | 99 22 4f 53 5f 46 69 6c |44)..<B.|."OS_Fil|
|00005cc0| 65 22 2c 38 2c 51 24 3a | c8 99 22 4f 53 5f 46 69 |e",8,Q$:|.."OS_Fi|
|00005cd0| 6c 65 22 2c 26 41 2c 51 | 24 2b 22 2e 51 52 54 22 |le",&A,Q|$+".QRT"|
|00005ce0| 2c 26 46 46 46 3a 51 25 | 3d ad 28 51 24 2b 22 2e |,&FFF:Q%|=.(Q$+".|
|00005cf0| 51 52 54 22 29 0d 00 46 | 3c ea 85 3a ee 85 f7 85 |QRT")..F|<..:....|
|00005d00| 3a c8 99 22 48 6f 75 72 | 67 6c 61 73 73 5f 53 6d |:.."Hour|glass_Sm|
|00005d10| 61 73 68 22 3a d9 23 51 | 25 3a f2 46 72 65 65 28 |ash":.#Q|%:.Free(|
|00005d20| 46 49 25 29 3a 85 9f 2c | f6 24 2b 22 20 22 2b c3 |FI%):..,|.$+" "+.|
|00005d30| 9e 0d 00 50 14 c8 99 22 | 48 6f 75 72 67 6c 61 73 |...P..."|Hourglas|
|00005d40| 73 5f 4f 6e 22 0d 00 5a | 48 4d 28 29 3d 31 2c 30 |s_On"..Z|HM()=1,0|
|00005d50| 2c 30 2c 30 2c 31 2c 30 | 2c 30 2c 30 2c 31 3a 54 |,0,0,1,0|,0,0,1:T|
|00005d60| 28 29 3d 30 2c 30 2c 30 | 3a 5a 4f 4f 4d 3d 31 3a |()=0,0,0|:ZOOM=1:|
|00005d70| f2 50 72 65 61 6d 62 6c | 65 3a f2 47 65 6e 43 6f |.Preambl|e:.GenCo|
|00005d80| 6e 76 65 72 74 28 46 49 | 25 21 36 34 29 0d 00 64 |nvert(FI|%!64)..d|
|00005d90| 15 c8 99 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 66 |..."Hour|glass_Of|
|00005da0| 66 22 0d 00 6e 13 d9 23 | 51 25 3a f2 46 72 65 65 |f"..n..#|Q%:.Free|
|00005db0| 28 46 49 25 29 0d 00 78 | 05 e1 0d 00 82 04 0d 00 |(FI%)..x|........|
|00005dc0| 8c 0e dd f2 50 72 65 61 | 6d 62 6c 65 0d 00 96 0b |....Prea|mble....|
|00005dd0| f2 57 72 69 74 65 43 0d | 00 a0 37 f2 57 72 69 74 |.WriteC.|..7.Writ|
|00005de0| 65 28 22 4f 75 74 70 75 | 74 20 66 72 6f 6d 20 45 |e("Outpu|t from E|
|00005df0| 43 51 52 54 20 45 75 63 | 6c 69 64 20 74 6f 20 51 |CQRT Euc|lid to Q|
|00005e00| 52 54 20 63 6f 6e 76 65 | 72 74 65 72 22 29 0d 00 |RT conve|rter")..|
|00005e10| aa 21 f2 57 72 69 74 65 | 28 22 28 43 29 20 54 6f |.!.Write|("(C) To|
|00005e20| 6e 79 20 43 68 65 61 6c | 20 31 39 38 39 22 29 0d |ny Cheal| 1989").|
|00005e30| 00 b4 0b f2 57 72 69 74 | 65 45 0d 00 be 24 f2 57 |....Writ|eE...$.W|
|00005e40| 72 69 74 65 28 22 46 49 | 4c 45 5f 4e 41 4d 45 20 |rite("FI|LE_NAME |
|00005e50| 3d 20 22 2b 51 24 2b 22 | 2e 52 41 57 22 29 0d 00 |= "+Q$+"|.RAW")..|
|00005e60| c8 2b c8 99 22 58 45 75 | 63 6c 69 64 5f 46 69 6e |.+.."XEu|clid_Fin|
|00005e70| 64 22 2c 2c 2c 22 24 2e | 21 43 61 6d 65 72 61 23 |d",,,"$.|!Camera#|
|00005e80| 31 22 b8 2c 54 25 3b 46 | 25 0d 00 d2 32 e7 46 25 |1".,T%;F|%...2.F%|
|00005e90| 80 31 3a 4c 24 3d 22 28 | 30 2c 30 2c 31 30 30 30 |.1:L$="(|0,0,1000|
|00005ea0| 29 22 8b 4c 24 3d a4 58 | 59 5a 28 54 25 21 34 2c |)".L$=.X|YZ(T%!4,|
|00005eb0| 54 25 21 38 2c 54 25 21 | 31 32 29 0d 00 dc 04 0d |T%!8,T%!|12).....|
|00005ec0| 00 e6 17 f2 57 72 69 74 | 65 4b 28 22 4f 42 53 45 |....Writ|eK("OBSE|
|00005ed0| 52 56 45 52 22 29 0d 00 | f0 15 f2 57 72 69 74 65 |RVER")..|...Write|
|00005ee0| 50 28 22 6c 6f 63 22 2c | 4c 24 29 0d 00 fa 1f f2 |P("loc",|L$).....|
|00005ef0| 57 72 69 74 65 50 28 22 | 6c 6f 6f 6b 61 74 22 2c |WriteP("|lookat",|
|00005f00| 22 28 30 2c 30 2c 30 29 | 22 29 0d 01 04 0b f2 57 |"(0,0,0)|").....W|
|00005f10| 72 69 74 65 42 0d 01 0e | 04 0d 01 18 12 f2 57 72 |riteB...|......Wr|
|00005f20| 69 74 65 4b 28 22 53 4b | 59 22 29 0d 01 22 20 f2 |iteK("SK|Y").." .|
|00005f30| 57 72 69 74 65 50 28 22 | 7a 65 6e 69 74 68 22 2c |WriteP("|zenith",|
|00005f40| a4 43 28 46 49 25 21 35 | 32 29 29 0d 01 2c 1f f2 |.C(FI%!5|2))..,..|
|00005f50| 57 72 69 74 65 50 28 22 | 68 6f 72 69 7a 22 2c a4 |WriteP("|horiz",.|
|00005f60| 43 28 46 49 25 21 35 32 | 29 29 0d 01 36 0b f2 57 |C(FI%!52|))..6..W|
|00005f70| 72 69 74 65 42 0d 01 40 | 04 0d 01 4a 13 f2 57 72 |riteB..@|...J..Wr|
|00005f80| 69 74 65 4b 28 22 4c 41 | 4d 50 22 29 0d 01 54 1e |iteK("LA|MP")..T.|
|00005f90| f2 57 72 69 74 65 50 28 | 22 6c 6f 63 22 2c 22 28 |.WriteP(|"loc","(|
|00005fa0| 30 2c 30 2c 31 30 30 29 | 22 29 0d 01 5e 19 f2 57 |0,0,100)|")..^..W|
|00005fb0| 72 69 74 65 50 28 22 72 | 61 64 69 75 73 22 2c 22 |riteP("r|adius","|
|00005fc0| 35 22 29 0d 01 68 19 f2 | 57 72 69 74 65 50 28 22 |5")..h..|WriteP("|
|00005fd0| 64 69 73 74 22 2c 22 35 | 30 30 22 29 0d 01 72 0b |dist","5|00")..r.|
|00005fe0| f2 57 72 69 74 65 42 0d | 01 7c 04 0d 01 86 05 e1 |.WriteB.|.|......|
|00005ff0| 0d 01 90 04 0d 01 9a 14 | dd f2 47 65 6e 43 6f 6e |........|..GenCon|
|00006000| 76 65 72 74 28 4f 25 29 | 0d 01 a4 09 e7 4f 25 8b |vert(O%)|.....O%.|
|00006010| e1 0d 01 ae 23 ea 50 25 | 2c 49 25 3a 4e 24 3d 24 |....#.P%|,I%:N$=$|
|00006020| 28 4f 25 2b 34 29 3a e7 | c0 4e 24 2c 31 29 3d 22 |(O%+4):.|.N$,1)="|
|00006030| 21 22 3a e1 0d 01 b8 19 | ea 4e 28 29 2c 55 28 29 |!":.....|.N(),U()|
|00006040| 3a de 4e 28 32 2c 32 29 | 2c 55 28 32 29 0d 01 c2 |:.N(2,2)|,U(2)...|
|00006050| 13 4e 28 29 3d 4d 28 29 | 3a 55 28 29 3d 54 28 29 |.N()=M()|:U()=T()|
|00006060| 0d 01 cc 09 e7 3f 4f 25 | 8c 0d 01 d6 0b c8 8e 4f |.....?O%|.......O|
|00006070| 25 3f 33 ca 0d 01 e0 1f | c9 73 6f 6c 69 64 3a f2 |%?3.....|.solid:.|
|00006080| 57 72 69 74 65 63 28 22 | 53 6f 6c 69 64 20 22 2b |Writec("|Solid "+|
|00006090| 4e 24 29 0d 01 ea 23 52 | 25 3d 4f 25 2b 46 25 28 |N$)...#R|%=O%+F%(|
|000060a0| 4f 25 3f 33 29 2b 56 25 | 28 4f 25 3f 33 29 2d 34 |O%?3)+V%|(O%?3)-4|
|000060b0| 3a e7 3f 4f 25 8c 0d 01 | f4 18 f2 57 72 69 74 65 |:.?O%...|...Write|
|000060c0| 28 22 42 45 47 49 4e 5f | 42 42 4f 58 22 29 0d 01 |("BEGIN_|BBOX")..|
|000060d0| fe 39 e3 4a 25 3d 31 b8 | 3f 4f 25 3a f2 50 6c 61 |.9.J%=1.|?O%:.Pla|
|000060e0| 6e 65 43 6f 6e 76 65 72 | 74 28 a4 43 28 52 25 21 |neConver|t(.C(R%!|
|000060f0| 2d 34 29 2c 21 52 25 29 | 3a 52 25 2b 3d 56 25 28 |-4),!R%)|:R%+=V%(|
|00006100| 4f 25 3f 33 29 3a ed 0d | 02 08 16 f2 57 72 69 74 |O%?3):..|....Writ|
|00006110| 65 28 22 45 4e 44 5f 42 | 42 4f 58 22 29 0d 02 12 |e("END_B|BOX")...|
|00006120| 05 cd 0d 02 1c 1d c9 6d | 65 73 68 3a f2 57 72 69 |.......m|esh:.Wri|
|00006130| 74 65 63 28 22 4d 65 73 | 68 20 22 2b 4e 24 29 0d |tec("Mes|h "+N$).|
|00006140| 02 26 18 f2 57 72 69 74 | 65 28 22 42 45 47 49 4e |.&..Writ|e("BEGIN|
|00006150| 5f 42 42 4f 58 22 29 0d | 02 30 0b e7 3f 4f 25 3e |_BBOX").|.0..?O%>|
|00006160| 31 8c 0d 02 3a 1d 52 25 | 3d 4f 25 2b 46 25 28 4f |1...:.R%|=O%+F%(O|
|00006170| 25 3f 33 29 2b 56 25 28 | 4f 25 3f 33 29 2d 34 0d |%?3)+V%(|O%?3)-4.|
|00006180| 02 44 3c e3 4a 25 3d 31 | b8 3f 4f 25 2d 31 3a f2 |.D<.J%=1|.?O%-1:.|
|00006190| 56 61 6e 65 43 6f 6e 76 | 65 72 74 28 21 52 25 2c |VaneConv|ert(!R%,|
|000061a0| 52 25 21 56 25 28 4f 25 | 3f 33 29 29 3a 52 25 2b |R%!V%(O%|?3)):R%+|
|000061b0| 3d 56 25 28 4f 25 3f 33 | 29 3a ed 0d 02 4e 3a e7 |=V%(O%?3|):...N:.|
|000061c0| 4f 25 21 33 32 80 31 3c | 3c 33 3a f2 56 61 6e 65 |O%!32.1<|<3:.Vane|
|000061d0| 43 6f 6e 76 65 72 74 28 | 21 52 25 2c 4f 25 21 28 |Convert(|!R%,O%!(|
|000061e0| 46 25 28 4f 25 3f 33 29 | 2b 56 25 28 4f 25 3f 33 |F%(O%?3)|+V%(O%?3|
|000061f0| 29 2d 34 29 29 0d 02 58 | 05 cd 0d 02 62 46 52 25 |)-4))..X|....bFR%|
|00006200| 3d 4f 25 2b 46 25 28 4f | 25 3f 33 29 2b 56 25 28 |=O%+F%(O|%?3)+V%(|
|00006210| 4f 25 3f 33 29 2d 34 3a | e7 4f 25 21 33 32 80 31 |O%?3)-4:|.O%!32.1|
|00006220| 3c 3c 34 3a f2 50 6c 61 | 6e 65 43 6f 6e 76 65 72 |<<4:.Pla|neConver|
|00006230| 74 28 a4 43 28 52 25 21 | 2d 34 29 2c 21 52 25 29 |t(.C(R%!|-4),!R%)|
|00006240| 0d 02 6c 41 52 25 2b 3d | 56 25 28 4f 25 3f 33 29 |..lAR%+=|V%(O%?3)|
|00006250| 2a 28 3f 4f 25 2d 31 29 | 3a e7 4f 25 21 33 32 80 |*(?O%-1)|:.O%!32.|
|00006260| 31 3c 3c 35 3a f2 50 6c | 61 6e 65 43 6f 6e 76 65 |1<<5:.Pl|aneConve|
|00006270| 72 74 28 a4 43 28 52 25 | 21 2d 34 29 2c 21 52 25 |rt(.C(R%|!-4),!R%|
|00006280| 29 0d 02 76 16 f2 57 72 | 69 74 65 28 22 45 4e 44 |)..v..Wr|ite("END|
|00006290| 5f 42 42 4f 58 22 29 0d | 02 80 1f c9 73 68 65 65 |_BBOX").|....shee|
|000062a0| 74 3a f2 57 72 69 74 65 | 63 28 22 53 68 65 65 74 |t:.Write|c("Sheet|
|000062b0| 20 22 2b 4e 24 29 0d 02 | 8a 1f c9 67 72 6f 75 70 | "+N$)..|...group|
|000062c0| 3a f2 57 72 69 74 65 63 | 28 22 47 72 6f 75 70 20 |:.Writec|("Group |
|000062d0| 22 2b 4e 24 29 0d 02 94 | 12 50 25 3d 4f 25 2b 33 |"+N$)...|.P%=O%+3|
|000062e0| 32 3a e7 3f 4f 25 8c 0d | 02 9e 18 f2 57 72 69 74 |2:.?O%..|....Writ|
|000062f0| 65 28 22 42 45 47 49 4e | 5f 42 42 4f 58 22 29 0d |e("BEGIN|_BBOX").|
|00006300| 02 a8 0d e3 49 25 3d 31 | b8 3f 4f 25 0d 02 b2 44 |....I%=1|.?O%...D|
|00006310| f2 54 72 61 6e 73 66 6f | 72 6d 28 21 50 25 29 3a |.Transfo|rm(!P%):|
|00006320| 4d 28 29 3d 4e 28 29 2e | 52 28 29 3a 54 28 29 3d |M()=N().|R():T()=|
|00006330| 4e 28 29 2e 56 28 29 3a | 54 28 29 3d 54 28 29 2b |N().V():|T()=T()+|
|00006340| 55 28 29 3a 4e 24 3d 24 | 28 50 25 21 34 2b 34 29 |U():N$=$|(P%!4+4)|
|00006350| 0d 02 bc 51 e7 c0 4e 24 | 2c 31 29 3d 22 21 22 3a |...Q..N$|,1)="!":|
|00006360| 54 25 3d a0 28 22 46 4e | 5f 22 2b c1 4e 24 2c 32 |T%=.("FN|_"+.N$,2|
|00006370| 29 29 8b e7 c0 4e 24 2c | 31 29 3d 22 40 22 54 25 |))...N$,|1)="@"T%|
|00006380| 3d a0 28 22 46 4e 22 2b | c1 4e 24 2c 32 29 29 8b |=.("FN"+|.N$,2)).|
|00006390| f2 47 65 6e 43 6f 6e 76 | 65 72 74 28 50 25 21 34 |.GenConv|ert(P%!4|
|000063a0| 29 0d 02 c6 0b 50 25 2b | 3d 38 3a ed 0d 02 d0 05 |)....P%+|=8:.....|
|000063b0| cd 0d 02 da 16 f2 57 72 | 69 74 65 28 22 45 4e 44 |......Wr|ite("END|
|000063c0| 5f 42 42 4f 58 22 29 0d | 02 e4 05 cb 0d 02 ee 05 |_BBOX").|........|
|000063d0| cd 0d 02 f8 05 e1 0d 03 | 02 04 0d 03 0c 2c dd f2 |........|.....,..|
|000063e0| 50 6c 61 6e 65 43 6f 6e | 76 65 72 74 28 43 24 2c |PlaneCon|vert(C$,|
|000063f0| 50 25 29 3a ea 43 25 2c | 4b 25 2c 52 25 2c 44 25 |P%):.C%,|K%,R%,D%|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
