home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / commercial / sherston / aztecs next >
ArcFS Archive  |  1994-10-18  |  366.0 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: ArcFS Archive (archive/arcFS).

You can browse this item here: aztecs

ConfidenceProgramDetectionMatch TypeSupport
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 | 50 07 00 00 f4 08 00 00 |Archive.|P.......|
|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 41 5a 54 45 43 53 | 00 00 00 00 ff ff ff ff |.!AZTECS|........|
|00000070| 45 ff ff ff 8a 78 93 9f | 33 00 00 00 ff ff ff ff |E....x..|3.......|
|00000080| a4 04 00 80 82 21 50 61 | 6c 65 74 74 65 00 54 00 |.....!Pa|lette.T.|
|00000090| 78 00 00 00 44 ed ff ff | cc 09 58 15 33 00 e0 fa |x...D...|..X.3...|
|000000a0| 78 00 00 00 24 00 00 00 | 82 21 52 55 4e 00 00 74 |x...$...|.!RUN..t|
|000000b0| 65 44 54 00 af 01 00 00 | 44 eb ff ff 30 17 93 f9 |eDT.....|D...0...|
|000000c0| 33 00 f3 c4 af 01 00 00 | c0 00 00 00 82 21 72 75 |3.......|.....!ru|
|000000d0| 6e 69 6d 61 67 65 00 00 | 95 2c 00 00 44 fb ff ff |nimage..|.,..D...|
|000000e0| 9d a6 8d fa 33 00 58 c4 | 95 2c 00 00 93 02 00 00 |....3.X.|.,......|
|000000f0| 82 21 53 50 52 49 54 45 | 53 00 54 00 5c 05 00 00 |.!SPRITE|S.T.\...|
|00000100| 44 f9 ff ff 27 25 21 94 | 33 00 aa 60 5c 05 00 00 |D...'%!.|3..`\...|
|00000110| 4c 2f 00 00 82 61 7a 74 | 65 63 6c 69 62 00 54 00 |L/...azt|eclib.T.|
|00000120| 88 52 00 00 44 fb ff ff | 8b af 8d fa 33 00 77 89 |.R..D...|....3.w.|
|00000130| 88 52 00 00 cc 34 00 00 | 82 41 7a 74 65 63 73 52 |.R...4..|.AztecsR|
|00000140| 4d 00 54 00 3c 01 00 00 | 44 fa ff ff ec 12 d7 bc |M.T.<...|D.......|
|00000150| 33 00 bd 16 3c 01 00 00 | 78 87 00 00 82 61 7a 5f |3...<...|x....az_|
|00000160| 74 69 74 6c 65 5f 63 00 | 6c 58 00 00 44 f9 ff ff |title_c.|lX..D...|
|00000170| e7 a1 93 f9 33 00 f6 57 | 6c 58 00 00 d8 88 00 00 |....3..W|lX......|
|00000180| 82 62 6f 75 6e 63 65 00 | 65 44 54 00 c0 0d 00 00 |.bounce.|eDT.....|
|00000190| 44 fa ff ff d5 4e 00 a0 | 33 00 dd 96 c0 0d 00 00 |D....N..|3.......|
|000001a0| 68 e1 00 00 82 62 75 74 | 74 6f 6e 73 5f 63 00 00 |h....but|tons_c..|
|000001b0| e4 13 00 00 44 f9 ff ff | f0 72 92 a6 33 00 64 bf |....D...|.r..3.d.|
|000001c0| e4 13 00 00 4c ef 00 00 | 82 63 6f 64 65 00 00 74 |....L...|.code..t|
|000001d0| 65 44 54 00 88 0e 00 00 | 44 fd ff ff 00 2b f9 e4 |eDT.....|D....+..|
|000001e0| 33 00 28 a1 88 0e 00 00 | 54 03 01 00 82 63 6f 6e |3.(.....|T....con|
|000001f0| 63 68 32 00 65 44 54 00 | 56 3c 00 00 44 fa ff ff |ch2.eDT.|V<..D...|
|00000200| 27 cb 08 a0 33 00 61 9f | 56 3c 00 00 00 12 01 00 |'...3.a.|V<......|
|00000210| 82 4f 4e 45 00 74 00 74 | 65 44 54 00 ff ff ff ff |.ONE.t.t|eDT.....|
|00000220| 45 ff ff ff 0e 79 93 9f | 33 00 00 00 ff ff ff ff |E....y..|3.......|
|00000230| 38 04 00 80 82 63 61 6c | 65 6e 64 61 72 5f 63 00 |8....cal|endar_c.|
|00000240| 50 c6 00 00 44 f9 ff ff | ad 10 9d 82 33 00 73 93 |P...D...|....3.s.|
|00000250| 50 c6 00 00 7a 4e 01 00 | 82 63 68 69 6e 31 5f 63 |P...zN..|.chin1_c|
|00000260| 00 00 00 00 04 68 00 00 | 44 f9 ff ff 5d d4 e9 9c |.....h..|D...]...|
|00000270| 33 00 3a 86 04 68 00 00 | ee 14 02 00 82 63 68 69 |3.:..h..|.....chi|
|00000280| 6e 32 5f 63 00 00 00 00 | a4 ba 00 00 44 f9 ff ff |n2_c....|....D...|
|00000290| 1c 42 54 ae 33 00 16 e8 | a4 ba 00 00 16 7d 02 00 |.BT.3...|.....}..|
|000002a0| 82 63 6f 6e 63 68 5f 63 | 00 00 00 00 78 27 00 00 |.conch_c|....x'..|
|000002b0| 44 f9 ff ff 62 7f ba 66 | 33 00 ae 4b 78 27 00 00 |D...b..f|3..Kx'..|
|000002c0| de 37 03 00 82 64 65 6d | 6f 31 00 00 00 00 00 00 |.7...dem|o1......|
|000002d0| 59 5d 00 00 44 fb ff ff | b9 ca a0 fa 33 00 95 f5 |Y]..D...|....3...|
|000002e0| 59 5d 00 00 7a 5f 03 00 | 82 64 65 6d 6f 32 00 00 |Y]..z_..|.demo2..|
|000002f0| 00 00 00 00 c7 10 00 00 | 44 fb ff ff 1d f1 a0 fa |........|D.......|
|00000300| 33 00 41 3b c7 10 00 00 | f7 bc 03 00 82 64 65 6d |3.A;....|.....dem|
|00000310| 6f 33 00 00 00 00 00 00 | 39 6d 00 00 44 fb ff ff |o3......|9m..D...|
|00000320| 6e 5f a1 fa 33 00 3d 91 | 39 6d 00 00 e2 cd 03 00 |n_..3.=.|9m......|
|00000330| 82 64 69 67 00 00 00 00 | 00 00 00 00 98 08 00 00 |.dig....|........|
|00000340| 44 fa ff ff 28 54 01 a0 | 33 00 b1 6e 98 08 00 00 |D...(T..|3..n....|
|00000350| 3f 3b 04 00 82 64 75 6e | 67 62 6f 61 74 5f 63 00 |?;...dun|gboat_c.|
|00000360| f4 19 00 00 44 f9 ff ff | 05 51 22 fa 33 00 8d e9 |....D...|.Q".3...|
|00000370| f4 19 00 00 fb 43 04 00 | 82 69 6e 6e 65 7a 61 5f |.....C..|.inneza_|
|00000380| 63 00 00 00 2c 6f 00 00 | 44 f9 ff ff 26 00 27 fa |c...,o..|D...&.'.|
|00000390| 33 00 85 c3 2c 6f 00 00 | 13 5e 04 00 82 6a 70 69 |3...,o..|.^...jpi|
|000003a0| 6e 66 6f 5f 63 00 00 00 | dc 05 00 00 44 f9 ff ff |nfo_c...|....D...|
|000003b0| 00 6d 53 a7 33 00 17 66 | dc 05 00 00 63 cd 04 00 |.mS.3..f|....c...|
|000003c0| 82 6d 6f 75 6e 74 73 5f | 63 00 00 00 90 0a 00 00 |.mounts_|c.......|
|000003d0| 44 f9 ff ff 5b 3f a8 61 | 33 00 33 0a 90 0a 00 00 |D...[?.a|3.3.....|
|000003e0| 63 d3 04 00 82 6f 75 74 | 62 65 72 6d 5f 63 00 00 |c....out|berm_c..|
|000003f0| bc 6c 00 00 44 f9 ff ff | 0e af e8 f6 33 00 11 ae |.l..D...|....3...|
|00000400| bc 6c 00 00 17 de 04 00 | 82 70 65 6f 70 6c 65 5f |.l......|.people_|
|00000410| 63 00 00 00 f0 2a 00 00 | 44 f9 ff ff e6 07 69 aa |c....*..|D.....i.|
|00000420| 33 00 04 3b f0 2a 00 00 | f7 4a 05 00 82 73 74 65 |3..;.*..|.J...ste|
|00000430| 70 00 00 00 00 00 00 00 | 2c 07 00 00 44 fa ff ff |p.......|,...D...|
|00000440| ff f8 fc 9f 33 00 be 9f | 2c 07 00 00 0b 76 05 00 |....3...|,....v..|
|00000450| 82 79 61 70 00 00 00 00 | 00 00 00 00 5c 0f 00 00 |.yap....|....\...|
|00000460| 44 fa ff ff dc 4d 57 ae | 33 00 e7 bf 5c 0f 00 00 |D....MW.|3...\...|
|00000470| 5b 7d 05 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |[}......|........|
|00000480| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000490| 00 00 00 00 00 00 00 00 | 82 53 70 72 69 74 65 73 |........|.Sprites|
|000004a0| 00 44 54 00 94 1a 00 00 | 44 f9 ff ff ca 02 4e ab |.DT.....|D.....N.|
|000004b0| 33 00 26 74 94 1a 00 00 | db 8c 05 00 82 54 65 6d |3.&t....|.....Tem|
|000004c0| 70 6c 61 74 65 73 00 00 | 21 03 00 00 44 ec ff ff |plates..|!...D...|
|000004d0| f8 74 83 f9 33 00 3c e8 | 21 03 00 00 93 a7 05 00 |.t..3.<.|!.......|
|000004e0| 00 21 42 6f 6f 74 00 74 | 65 44 54 00 8a 00 00 00 |.!Boot.t|eDT.....|
|000004f0| 44 eb ff ff b4 b0 53 43 | 03 00 33 81 8a 00 00 00 |D.....SC|..3.....|
|00000500| f4 02 00 00 01 21 46 6f | 6e 74 73 00 00 00 00 00 |.....!Fo|nts.....|
|00000510| ff ff ff ff 45 ff ff ff | eb 79 93 9f 33 00 00 00 |....E...|.y..3...|
|00000520| ff ff ff ff 08 07 00 80 | 01 21 42 6f 6f 74 00 00 |........|.!Boot..|
|00000530| 00 00 00 00 29 03 00 00 | 44 eb ff ff b7 45 a6 fc |....)...|D....E..|
|00000540| 33 00 f0 7c 29 03 00 00 | d8 aa 05 00 01 21 42 6f |3..|)...|.....!Bo|
|00000550| 6f 74 52 4f 32 00 00 00 | 48 01 00 00 43 eb ff ff |otRO2...|H...C...|
|00000560| 8e 6e c9 00 33 00 2d 08 | 48 01 00 00 d8 aa 05 00 |.n..3.-.|H.......|
|00000570| 01 21 52 75 6e 00 00 00 | 00 00 00 00 d7 01 00 00 |.!Run...|........|
|00000580| 44 eb ff ff 88 8f a6 fc | 33 00 1b 08 d7 01 00 00 |D.......|3.......|
|00000590| d8 aa 05 00 01 21 52 75 | 6e 52 4f 32 00 00 00 00 |.....!Ru|nRO2....|
|000005a0| 30 01 00 00 43 eb ff ff | 51 68 c9 00 33 00 bb ed |0...C...|Qh..3...|
|000005b0| 30 01 00 00 d8 aa 05 00 | 01 21 53 70 72 69 74 65 |0.......|.!Sprite|
|000005c0| 73 00 00 00 e4 03 00 00 | 41 f9 ff ff 24 19 20 2a |s.......|A...$. *|
|000005d0| 33 00 c2 74 e4 03 00 00 | d8 aa 05 00 01 21 53 70 |3..t....|.....!Sp|
|000005e0| 72 69 74 65 73 32 32 00 | 64 07 00 00 43 f9 ff ff |rites22.|d...C...|
|000005f0| d8 67 7b 29 33 00 27 bb | 64 07 00 00 d8 aa 05 00 |.g{)3.'.|d.......|
|00000600| 01 21 53 70 72 69 74 65 | 73 32 33 00 14 03 00 00 |.!Sprite|s23.....|
|00000610| 43 f9 ff ff c0 e8 7b 29 | 33 00 67 68 14 03 00 00 |C.....{)|3.gh....|
|00000620| d8 aa 05 00 01 46 6f 6e | 74 73 00 00 00 00 00 00 |.....Fon|ts......|
|00000630| 48 77 00 00 43 fa ff ff | b0 6a 79 00 33 00 53 ee |Hw..C...|.jy.3.S.|
|00000640| 48 77 00 00 d8 aa 05 00 | 01 53 75 70 65 72 00 00 |Hw......|.Super..|
|00000650| 00 00 00 00 ff 08 00 00 | 41 fa ff ff dc 71 2b e9 |........|A....q+.|
|00000660| b3 00 00 51 ff 08 00 00 | d8 aa 05 00 01 54 61 62 |...Q....|.....Tab|
|00000670| 6c 6f 69 64 00 00 00 00 | ff ff ff ff 45 ff ff ff |loid....|....E...|
|00000680| 2d 7a 93 9f 33 00 00 00 | ff ff ff ff e4 06 00 80 |-z..3...|........|
|00000690| 01 6d 65 64 69 75 6d 00 | 00 00 00 00 ff ff ff ff |.medium.|........|
|000006a0| 45 ff ff ff 33 7a 93 9f | 33 00 00 00 ff ff ff ff |E...3z..|3.......|
|000006b0| c0 06 00 80 01 49 6e 74 | 4d 65 74 72 69 63 73 00 |.....Int|Metrics.|
|000006c0| c4 0a 00 00 43 f6 ff ff | 09 6c db 24 33 00 13 99 |....C...|.l.$3...|
|000006d0| c4 0a 00 00 d8 aa 05 00 | 01 4f 75 74 6c 69 6e 65 |........|.Outline|
|000006e0| 73 00 00 00 08 67 00 00 | 43 f6 ff ff f6 6a db 24 |s....g..|C....j.$|
|000006f0| 33 00 db 8f 08 67 00 00 | d8 aa 05 00 01 00 00 00 |3....g..|........|
|00000700| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000710| 00 00 00 00 00 00 00 00 | 00 00 00 00 4c ba 65 be |........|....L.e.|
|00000720| 01 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000730| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000740| 4c ba 65 be 01 00 00 00 | 00 00 00 00 00 00 00 00 |L.e.....|........|
|00000750| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000760| 00 00 00 00 4c ba 65 be | 82 21 52 65 61 64 4d 65 |....L.e.|.!ReadMe|
|00000770| 31 73 74 00 01 04 00 00 | 45 ff ff ff 5c 97 4d 9c |1st.....|E...\.M.|
|00000780| 33 00 79 aa 01 04 00 00 | d8 aa 05 00 00 00 00 00 |3.y.....|........|
|00000790| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007b0| 74 65 63 24 44 69 72 3e | 2e 63 6f 6e 63 68 32 0a |tec$Dir>|.conch2.|
|000007c0| 52 4d 45 6e 73 75 72 65 | 20 62 6f 75 6e 63 65 20 |RMEnsure| bounce |
|000007d0| 20 20 52 4d 4c 6f 61 64 | 20 3c 41 7a 74 65 63 24 | RMLoad| <Aztec$|
|000007e0| 44 69 72 3e 2e 62 6f 75 | 6e 63 65 0a 57 69 6d 70 |Dir>.bou|nce.Wimp|
|000007f0| 53 6c 6f 74 20 2d 6d 69 | 6e 20 34 30 30 4b 20 2d |Slot -mi|n 400K -|
|00000800| 6d 61 78 20 34 30 30 4b | 0a 53 65 74 4d 61 63 72 |max 400K|.SetMacr|
|00000810| 6f 20 41 6c 69 61 73 24 | 52 75 6e 54 79 70 65 5f |o Alias$|RunType_|
|00000820| 61 65 38 20 52 75 6e 20 | 3c 41 7a 74 65 63 24 44 |ae8 Run |<Aztec$D|
|00000830| 69 72 3e 2e 21 52 75 6e | 20 25 25 2a 30 0a 53 65 |ir>.!Run| %%*0.Se|
|00000840| 74 20 46 69 6c 65 24 54 | 79 70 65 5f 61 65 38 20 |t File$T|ype_ae8 |
|00000850| 53 61 76 65 47 61 6d 65 | 0a 53 65 74 20 41 7a 74 |SaveGame|.Set Azt|
|00000860| 65 63 24 53 74 61 74 75 | 73 20 46 72 65 73 68 0a |ec$Statu|s Fresh.|
|00000870| 42 41 53 49 43 20 2d 71 | 75 69 74 20 3c 41 7a 74 |BASIC -q|uit <Azt|
|00000880| 65 63 24 44 69 72 3e 2e | 21 52 75 6e 49 6d 61 67 |ec$Dir>.|!RunImag|
|00000890| 65 0a 0a 46 69 6c 65 44 | 61 74 61 82 21 72 75 6e |e..FileD|ata.!run|
|000008a0| 69 6d 61 67 65 00 00 95 | 2c 00 00 44 fb ff ff 9d |image...|,..D....|
|000008b0| a6 8d fa 03 00 58 c4 0d | 00 00 34 f4 ff 53 43 53 |.....X..|..4..SCS|
|000008c0| 49 3a 3a 53 43 53 49 44 | 69 73 63 34 2e 24 2e 43 |I::SCSID|isc4.$.C|
|000008d0| 6f 76 65 72 44 69 73 6b | 73 2e 21 41 5a 54 45 43 |overDisk|s.!AZTEC|
|000008e0| 53 2e 21 72 75 6e 69 6d | 61 67 65 0d 00 01 0d 2a |S.!runim|age....*|
|000008f0| 46 58 32 32 46 69 6c 65 | 44 61 74 61 82 21 50 61 |FX22File|Data.!Pa|
|00000900| 6c 65 74 74 65 00 54 00 | 78 00 00 00 44 ed ff ff |lette.T.|x...D...|
|00000910| cc 09 58 15 03 00 e0 fa | 13 00 10 f0 f0 f0 13 01 |..X.....|........|
|00000920| 10 a0 a0 a0 13 02 10 60 | 60 60 13 03 10 00 00 00 |.......`|``......|
|00000930| 13 04 10 00 00 90 13 05 | 10 00 30 f0 13 06 10 00 |........|..0.....|
|00000940| c0 f0 13 07 10 f0 80 00 | 13 08 10 d0 00 00 13 09 |........|........|
|00000950| 10 f0 f0 00 13 0a 10 80 | 10 00 13 0b 10 f0 c0 90 |........|........|
|00000960| 13 0c 10 00 70 20 13 0d | 10 00 b0 00 13 0e 10 00 |....p ..|........|
|00000970| f0 20 13 0f 10 b0 50 00 | 13 00 18 70 70 70 13 01 |. ....P.|...ppp..|
|00000980| 19 00 f0 f0 13 02 19 00 | 00 90 13 03 19 f0 00 00 |........|........|
|00000990| 46 69 6c 65 44 61 74 61 | 82 21 52 55 4e 00 00 74 |FileData|.!RUN..t|
|000009a0| 65 44 54 00 af 01 00 00 | 44 eb ff ff 30 17 93 f9 |eDT.....|D...0...|
|000009b0| 03 00 f3 c4 7c 20 52 75 | 6e 20 66 69 6c 65 20 66 |....| Ru|n file f|
|000009c0| 6f 72 20 41 7a 74 65 63 | 73 20 56 65 72 73 69 6f |or Aztec|s Versio|
|000009d0| 6e 20 31 2e 30 31 20 28 | 37 20 4f 63 74 20 31 39 |n 1.01 (|7 Oct 19|
|000009e0| 39 33 29 0a 57 69 6d 70 | 53 6c 6f 74 20 2d 6d 69 |93).Wimp|Slot -mi|
|000009f0| 6e 20 33 32 4b 20 2d 6d | 61 78 20 33 32 4b 0a 49 |n 32K -m|ax 32K.I|
|00000a00| 63 6f 6e 53 70 72 69 74 | 65 73 20 3c 4f 62 65 79 |conSprit|es <Obey|
|00000a10| 24 44 69 72 3e 2e 21 53 | 70 72 69 74 65 73 0a 53 |$Dir>.!S|prites.S|
|00000a20| 65 74 20 41 7a 74 65 63 | 24 44 69 72 20 3c 4f 62 |et Aztec|$Dir <Ob|
|00000a30| 65 79 24 44 49 52 3e 0a | 52 4d 4c 6f 61 64 20 3c |ey$DIR>.|RMLoad <|
|00000a40| 41 7a 74 65 63 24 44 69 | 72 3e 2e 41 7a 74 65 63 |Aztec$Di|r>.Aztec|
|00000a50| 73 52 4d 0a 52 4d 4b 69 | 6c 6c 20 41 7a 74 65 63 |sRM.RMKi|ll Aztec|
|00000a60| 73 52 4d 0a 52 4d 45 6e | 73 75 72 65 20 63 6f 6e |sRM.RMEn|sure con|
|00000a70| 63 68 32 20 20 20 52 4d | 4c 6f 61 64 20 3c 41 7a |ch2 RM|Load <Az|
|00000a80| 74 65 63 24 44 69 72 3e | 2e 63 6f 6e 63 68 32 0a |tec$Dir>|.conch2.|
|00000a90| 52 4d 45 6e 73 75 72 65 | 20 62 6f 75 6e 63 65 20 |RMEnsure| bounce |
|00000aa0| 20 20 52 4d 4c 6f 61 64 | 20 3c 41 7a 74 65 63 24 | RMLoad| <Aztec$|
|00000ab0| 44 69 72 3e 2e 62 6f 75 | 6e 63 65 0a 57 69 6d 70 |Dir>.bou|nce.Wimp|
|00000ac0| 53 6c 6f 74 20 2d 6d 69 | 6e 20 34 30 30 4b 20 2d |Slot -mi|n 400K -|
|00000ad0| 6d 61 78 20 34 30 30 4b | 0a 53 65 74 4d 61 63 72 |max 400K|.SetMacr|
|00000ae0| 6f 20 41 6c 69 61 73 24 | 52 75 6e 54 79 70 65 5f |o Alias$|RunType_|
|00000af0| 61 65 38 20 52 75 6e 20 | 3c 41 7a 74 65 63 24 44 |ae8 Run |<Aztec$D|
|00000b00| 69 72 3e 2e 21 52 75 6e | 20 25 25 2a 30 0a 53 65 |ir>.!Run| %%*0.Se|
|00000b10| 74 20 46 69 6c 65 24 54 | 79 70 65 5f 61 65 38 20 |t File$T|ype_ae8 |
|00000b20| 53 61 76 65 47 61 6d 65 | 0a 53 65 74 20 41 7a 74 |SaveGame|.Set Azt|
|00000b30| 65 63 24 53 74 61 74 75 | 73 20 46 72 65 73 68 0a |ec$Statu|s Fresh.|
|00000b40| 42 41 53 49 43 20 2d 71 | 75 69 74 20 3c 41 7a 74 |BASIC -q|uit <Azt|
|00000b50| 65 63 24 44 69 72 3e 2e | 21 52 75 6e 49 6d 61 67 |ec$Dir>.|!RunImag|
|00000b60| 65 0a 0a 46 69 6c 65 44 | 61 74 61 82 21 72 75 6e |e..FileD|ata.!run|
|00000b70| 69 6d 61 67 65 00 00 95 | 2c 00 00 44 fb ff ff 9d |image...|,..D....|
|00000b80| a6 8d fa 03 00 58 c4 0d | 00 00 34 f4 ff 53 43 53 |.....X..|..4..SCS|
|00000b90| 49 3a 3a 53 43 53 49 44 | 69 73 63 34 2e 24 2e 43 |I::SCSID|isc4.$.C|
|00000ba0| 6f 76 65 72 44 69 73 6b | 73 2e 21 41 5a 54 45 43 |overDisk|s.!AZTEC|
|00000bb0| 53 2e 21 72 75 6e 69 6d | 61 67 65 0d 00 01 0d 2a |S.!runim|age....*|
|00000bc0| 46 58 32 32 30 2c 32 37 | 0d 00 02 0e de 20 62 6c |FX220,27|..... bl|
|00000bd0| 6b 25 20 32 35 36 0d 00 | 03 1e 41 25 3d 93 3a d3 |k% 256..|..A%=.:.|
|00000be0| 3d 26 31 33 32 30 30 3a | 6f 6c 64 68 69 6d 65 6d |=&13200:|oldhimem|
|00000bf0| 25 3d 41 25 0d 00 04 0b | 77 6f 72 6b 25 3d 93 0d |%=A%....|work%=..|
|00000c00| 00 05 43 4d 41 58 57 49 | 4e 44 49 4e 44 25 3d 34 |..CMAXWI|NDIND%=4|
|00000c10| 30 39 36 3a 4d 41 58 57 | 49 4e 44 53 54 52 25 3d |096:MAXW|INDSTR%=|
|00000c20| 34 30 39 36 3a 53 50 52 | 49 54 45 53 45 58 54 25 |4096:SPR|ITESEXT%|
|00000c30| 3d 38 30 30 30 3a 70 64 | 62 73 25 3d 26 34 30 30 |=8000:pd|bs%=&400|
|00000c40| 30 30 0d 00 06 30 77 69 | 6e 64 69 6e 64 25 3d 77 |00...0wi|ndind%=w|
|00000c50| 6f 72 6b 25 3a 77 69 6e | 64 73 74 72 25 3d 77 69 |ork%:win|dstr%=wi|
|00000c60| 6e 64 69 6e 64 25 2b 4d | 41 58 57 49 4e 44 49 4e |ndind%+M|AXWINDIN|
|00000c70| 44 25 0d 00 07 4d 77 69 | 6e 64 70 74 72 6c 69 73 |D%...Mwi|ndptrlis|
|00000c80| 74 25 3d 77 69 6e 64 73 | 74 72 25 2b 4d 41 58 57 |t%=winds|tr%+MAXW|
|00000c90| 49 4e 44 53 54 52 25 20 | 3a 20 77 70 74 72 6c 69 |INDSTR% |: wptrli|
|00000ca0| 73 74 25 3d 77 69 6e 64 | 70 74 72 6c 69 73 74 25 |st%=wind|ptrlist%|
|00000cb0| 2b 34 30 3a 42 25 3d 77 | 69 6e 64 73 74 72 25 0d |+40:B%=w|indstr%.|
|00000cc0| 00 08 1b 6d 79 73 70 72 | 69 74 65 73 25 3d 77 70 |...myspr|ites%=wp|
|00000cd0| 74 72 6c 69 73 74 25 2b | 34 30 0d 00 09 0e 6d 63 |trlist%+|40....mc|
|00000ce0| 25 3d 26 31 37 41 30 30 | 0d 00 0a 12 6d 65 6d 74 |%=&17A00|....memt|
|00000cf0| 6f 70 25 3d 26 34 45 43 | 30 30 0d 00 0b 41 c8 99 |op%=&4EC|00...A..|
|00000d00| 20 22 57 69 6d 70 5f 49 | 6e 69 74 69 61 6c 69 73 | "Wimp_I|nitialis|
|00000d10| 65 22 2c 32 30 30 2c 26 | 34 42 35 33 34 31 35 34 |e",200,&|4B534154|
|00000d20| 2c 22 41 7a 74 65 63 73 | 22 20 b8 20 77 69 6d 70 |,"Aztecs|" . wimp|
|00000d30| 76 65 72 25 2c 74 61 73 | 6b 68 25 0d 00 0c 57 ee |ver%,tas|kh%...W.|
|00000d40| 85 20 f2 65 72 72 6f 72 | 28 f6 24 2b 22 20 28 49 |. .error|(.$+" (I|
|00000d50| 6e 74 65 72 6e 61 6c 20 | 65 72 72 6f 72 20 63 6f |nternal |error co|
|00000d60| 64 65 20 22 2b c3 9e 2b | 22 29 22 2b bd 30 2c 9f |de "+..+|")"+.0,.|
|00000d70| 29 3a c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |):.. "Wi|mp_Close|
|00000d80| 44 6f 77 6e 22 2c 2c 26 | 34 42 35 33 34 31 35 34 |Down",,&|4B534154|
|00000d90| 3a e0 0d 00 0d 3e de 20 | 69 62 6e 61 6d 65 25 20 |:....>. |ibname% |
|00000da0| 32 30 2c 65 72 72 62 6c | 6b 25 20 32 30 30 2c 6d |20,errbl|k% 200,m|
|00000db0| 65 6e 75 25 20 31 30 32 | 34 2c 62 6c 6b 32 25 20 |enu% 102|4,blk2% |
|00000dc0| 32 35 36 2c 70 64 62 62 | 75 66 66 25 20 32 35 36 |256,pdbb|uff% 256|
|00000dd0| 0d 00 0e 20 f7 3a 73 65 | 74 32 77 25 3d 30 3a 73 |... .:se|t2w%=0:s|
|00000de0| 65 74 75 70 77 25 3d 30 | 3a 71 75 69 74 25 3d a3 |etupw%=0|:quit%=.|
|00000df0| 0d 00 0f 2b e7 20 a4 72 | 65 61 64 73 79 73 76 61 |...+. .r|eadsysva|
|00000e00| 72 28 22 41 7a 74 65 63 | 24 53 74 61 74 75 73 22 |r("Aztec|$Status"|
|00000e10| 29 3d 22 46 72 65 73 68 | 22 20 8c 0d 00 10 1c 20 |)="Fresh|" ..... |
|00000e20| 20 e7 20 ac 20 a4 61 7a | 74 65 63 73 69 73 72 75 | . . .az|tecsisru|
|00000e30| 6e 6e 69 6e 67 20 8c 0d | 00 11 20 20 20 20 20 ff |nning ..|.. .|
|00000e40| 22 53 65 74 20 41 7a 74 | 65 63 24 69 73 72 75 6e |"Set Azt|ec$isrun|
|00000e50| 6e 69 6e 67 20 31 22 0d | 00 12 07 20 20 cc 0d 00 |ning 1".|... ...|
|00000e60| 13 4e 20 20 20 20 f2 65 | 72 72 6f 72 28 22 41 7a |.N .e|rror("Az|
|00000e70| 74 65 63 73 20 69 73 20 | 61 6c 72 65 61 64 79 20 |tecs is |already |
|00000e80| 72 75 6e 6e 69 6e 67 22 | 2c 30 29 3a c8 99 20 22 |running"|,0):.. "|
|00000e90| 57 69 6d 70 5f 43 6c 6f | 73 65 44 6f 77 6e 22 2c |Wimp_Clo|seDown",|
|00000ea0| 2c 26 34 42 35 33 34 31 | 35 34 3a e0 0d 00 14 07 |,&4B5341|54:.....|
|00000eb0| 20 20 cd 0d 00 15 2d 20 | 20 21 6d 79 73 70 72 69 | ....- | !myspri|
|00000ec0| 74 65 73 25 3d 53 50 52 | 49 54 45 53 45 58 54 25 |tes%=SPR|ITESEXT%|
|00000ed0| 3a 6d 79 73 70 72 69 74 | 65 73 25 21 38 3d 31 36 |:mysprit|es%!8=16|
|00000ee0| 0d 00 16 26 20 20 c8 99 | 20 22 4f 53 5f 53 70 72 |...& ..| "OS_Spr|
|00000ef0| 69 74 65 4f 70 22 2c 26 | 31 30 39 2c 6d 79 73 70 |iteOp",&|109,mysp|
|00000f00| 72 69 74 65 73 25 0d 00 | 17 3c 20 20 c8 99 20 22 |rites%..|.< .. "|
|00000f10| 4f 53 5f 53 70 72 69 74 | 65 4f 70 22 2c 26 31 30 |OS_Sprit|eOp",&10|
|00000f20| 41 2c 6d 79 73 70 72 69 | 74 65 73 25 2c 22 3c 41 |A,myspri|tes%,"<A|
|00000f30| 7a 74 65 63 24 44 69 72 | 3e 2e 53 70 72 69 74 65 |ztec$Dir|>.Sprite|
|00000f40| 73 22 0d 00 18 2e 20 20 | ff 22 4c 4f 41 44 20 3c |s".... |."LOAD <|
|00000f50| 41 7a 74 65 63 24 44 69 | 72 3e 2e 63 6f 64 65 20 |Aztec$Di|r>.code |
|00000f60| 22 2b c3 7e 6d 63 25 3a | 41 25 3d 77 6f 72 6b 25 |"+.~mc%:|A%=work%|
|00000f70| 0d 00 19 32 20 20 77 70 | 74 72 31 25 3d 77 69 6e |...2 wp|tr1%=win|
|00000f80| 64 73 74 72 25 3a 77 70 | 74 72 32 25 3d 77 69 6e |dstr%:wp|tr2%=win|
|00000f90| 64 69 6e 64 25 3a 77 69 | 6e 64 63 6f 75 6e 74 25 |dind%:wi|ndcount%|
|00000fa0| 3d 31 0d 00 1a 35 20 20 | c8 99 20 22 57 69 6d 70 |=1...5 |.. "Wimp|
|00000fb0| 5f 4f 70 65 6e 54 65 6d | 70 6c 61 74 65 22 2c 2c |_OpenTem|plate",,|
|00000fc0| 22 3c 41 7a 74 65 63 24 | 44 69 72 3e 2e 54 65 6d |"<Aztec$|Dir>.Tem|
|00000fd0| 70 6c 61 74 65 73 22 0d | 00 1b 3a 20 20 f2 6c 6f |plates".|..: .lo|
|00000fe0| 61 64 5f 74 65 6d 70 6c | 61 74 65 28 22 70 72 6f |ad_templ|ate("pro|
|00000ff0| 67 69 6e 66 6f 22 29 3a | f2 6c 6f 61 64 5f 74 65 |ginfo"):|.load_te|
|00001000| 6d 70 6c 61 74 65 28 22 | 63 72 61 70 6f 6c 61 22 |mplate("|crapola"|
|00001010| 29 0d 00 1c 10 20 20 f2 | 72 65 61 64 73 6f 75 6e |).... .|readsoun|
|00001020| 64 0d 00 1d 05 cc 0d 00 | 1e 32 20 20 c8 99 20 22 |d.......|.2 .. "|
|00001030| 57 69 6d 70 5f 53 65 74 | 4d 6f 64 65 22 2c bb a4 |Wimp_Set|Mode",..|
|00001040| 72 65 61 64 73 79 73 76 | 61 72 28 22 41 7a 74 65 |readsysv|ar("Azte|
|00001050| 63 24 4d 6f 64 65 22 29 | 0d 00 1f 05 cd 0d 00 20 |c$Mode")|....... |
|00001060| 0f f2 72 65 73 65 74 73 | 6f 75 6e 64 0d 00 21 30 |..resets|ound..!0|
|00001070| 61 24 3d a4 63 6f 6e 76 | 65 72 74 74 6f 6c 6f 77 |a$=.conv|erttolow|
|00001080| 65 72 28 a4 72 65 61 64 | 73 79 73 76 61 72 28 22 |er(.read|sysvar("|
|00001090| 41 7a 74 65 63 24 44 69 | 72 22 29 29 0d 00 22 27 |Aztec$Di|r")).."'|
|000010a0| e7 a7 61 24 2c 22 61 64 | 66 73 3a 3a 61 7a 74 65 |..a$,"ad|fs::azte|
|000010b0| 63 73 22 29 3c 3e 30 3a | 59 25 3d 30 3a 8b 3a 59 |cs")<>0:|Y%=0:.:Y|
|000010c0| 25 3d 31 0d 00 23 30 c8 | 99 20 22 57 69 6d 70 5f |%=1..#0.|. "Wimp_|
|000010d0| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 77 |CreateWi|ndow",,w|
|000010e0| 70 74 72 6c 69 73 74 25 | 21 30 20 b8 20 69 6e 66 |ptrlist%|!0 . inf|
|000010f0| 6f 77 25 0d 00 24 2f c8 | 99 20 22 57 69 6d 70 5f |ow%..$/.|. "Wimp_|
|00001100| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 77 |CreateWi|ndow",,w|
|00001110| 70 74 72 6c 69 73 74 25 | 21 34 20 b8 20 6d 73 67 |ptrlist%|!4 . msg|
|00001120| 77 25 0d 00 25 1b c8 99 | 20 22 57 69 6d 70 5f 43 |w%..%...| "Wimp_C|
|00001130| 6c 6f 73 65 54 65 6d 70 | 6c 61 74 65 22 0d 00 26 |loseTemp|late"..&|
|00001140| 17 e7 59 25 3d 30 f2 68 | 69 64 65 5f 6c 6f 67 6f |..Y%=0.h|ide_logo|
|00001150| 73 61 76 65 0d 00 27 0c | f2 62 61 72 69 63 6f 6e |save..'.|.baricon|
|00001160| 0d 00 28 37 ee 20 85 20 | f2 65 72 72 6f 72 28 f6 |..(7. . |.error(.|
|00001170| 24 2b 22 20 28 49 6e 74 | 65 72 6e 61 6c 20 65 72 |$+" (Int|ernal er|
|00001180| 72 6f 72 20 63 6f 64 65 | 20 22 2b c3 9e 2b 22 29 |ror code| "+..+")|
|00001190| 22 2b bd 30 2c 9f 29 0d | 00 29 14 f5 20 f2 65 76 |"+.0,.).|.).. .ev|
|000011a0| 65 6e 74 3a fd 20 71 75 | 69 74 25 0d 00 2a 22 c8 |ent:. qu|it%..*".|
|000011b0| 99 20 22 57 69 6d 70 5f | 43 6c 6f 73 65 44 6f 77 |. "Wimp_|CloseDow|
|000011c0| 6e 22 2c 2c 26 34 42 35 | 33 34 31 35 34 0d 00 2b |n",,&4B5|34154..+|
|000011d0| 1c ff 22 53 65 74 20 41 | 7a 74 65 63 24 69 73 72 |.."Set A|ztec$isr|
|000011e0| 75 6e 6e 69 6e 67 20 30 | 22 0d 00 2c 39 c8 99 20 |unning 0|"..,9.. |
|000011f0| 22 58 4f 53 5f 4d 6f 64 | 75 6c 65 22 2c 34 2c 22 |"XOS_Mod|ule",4,"|
|00001200| 62 6f 75 6e 63 65 22 3a | c8 99 20 22 58 4f 53 5f |bounce":|.. "XOS_|
|00001210| 4d 6f 64 75 6c 65 22 2c | 34 2c 22 63 6f 6e 63 68 |Module",|4,"conch|
|00001220| 32 22 0d 00 2d 09 2a 51 | 55 49 54 0d 00 2e 05 e0 |2"..-.*Q|UIT.....|
|00001230| 0d 00 2f 04 0d 00 30 15 | dd a4 61 7a 74 65 63 73 |../...0.|..aztecs|
|00001240| 69 73 72 75 6e 6e 69 6e | 67 0d 00 31 07 ea 20 85 |isrunnin|g..1.. .|
|00001250| 0d 00 32 0e ee 85 ea 3a | f7 20 85 3a 3d 30 0d 00 |..2....:|. .:=0..|
|00001260| 33 3c c8 99 20 22 4f 53 | 5f 52 65 61 64 56 61 72 |3<.. "OS|_ReadVar|
|00001270| 56 61 6c 22 2c 22 41 7a | 74 65 63 24 69 73 72 75 |Val","Az|tec$isru|
|00001280| 6e 6e 69 6e 67 22 2c 62 | 6c 6b 25 2c 32 35 36 2c |nning",b|lk%,256,|
|00001290| 30 2c 30 20 b8 20 2c 2c | 61 25 0d 00 34 25 61 24 |0,0 . ,,|a%..4%a$|
|000012a0| 3d 22 22 3a e3 41 25 3d | 30 b8 61 25 2d 31 3a 61 |="":.A%=|0.a%-1:a|
|000012b0| 24 2b 3d bd 28 62 6c 6b | 25 3f 41 25 29 3a ed 0d |$+=.(blk|%?A%):..|
|000012c0| 00 35 07 f7 20 85 0d 00 | 36 0f e7 61 24 3d 22 31 |.5.. ...|6..a$="1|
|000012d0| 22 3a 3d 2d 31 0d 00 37 | 06 3d 30 0d 00 38 04 0d |":=-1..7|.=0..8..|
|000012e0| 00 39 0b dd f2 65 76 65 | 6e 74 0d 00 3a 28 c8 99 |.9...eve|nt..:(..|
|000012f0| 20 22 57 69 6d 70 5f 50 | 6f 6c 6c 22 2c 25 31 31 | "Wimp_P|oll",%11|
|00001300| 30 30 30 31 2c 62 6c 6b | 25 20 b8 20 65 25 2c 65 |0001,blk|% . e%,e|
|00001310| 62 25 0d 00 3b 0b c8 8e | 20 65 25 20 ca 0d 00 3c |b%..;...| e% ...<|
|00001320| 12 20 20 c9 20 31 3a 20 | f2 72 65 64 72 61 77 0d |. . 1: |.redraw.|
|00001330| 00 3d 1a 20 20 c9 20 32 | 3a 20 f2 6f 70 65 6e 77 |.=. . 2|: .openw|
|00001340| 69 6e 64 28 62 6c 6b 25 | 29 0d 00 3e 1b 20 20 c9 |ind(blk%|)..>. .|
|00001350| 20 33 3a 20 f2 63 6c 6f | 73 65 77 69 6e 64 28 62 | 3: .clo|sewind(b|
|00001360| 6c 6b 25 29 0d 00 3f 26 | 20 20 c9 20 36 3a 20 f2 |lk%)..?&| . 6: .|
|00001370| 63 6c 69 63 6b 28 65 62 | 25 21 38 2c 65 62 25 21 |click(eb|%!8,eb%!|
|00001380| 31 32 2c 65 62 25 21 31 | 36 29 0d 00 40 14 20 20 |12,eb%!1|6)..@. |
|00001390| c9 20 38 3a 20 f2 6b 65 | 79 65 76 65 6e 74 0d 00 |. 8: .ke|yevent..|
|000013a0| 41 16 20 20 c9 20 39 3a | 20 f2 6d 65 6e 75 73 65 |A. . 9:| .menuse|
|000013b0| 6c 65 63 74 0d 00 42 05 | cb 0d 00 43 05 e1 0d 00 |lect..B.|...C....|
|000013c0| 44 04 0d 00 45 0c dd f2 | 72 65 64 72 61 77 0d 00 |D...E...|redraw..|
|000013d0| 46 27 ef 32 33 2c 32 32 | 34 2c 31 37 30 2c 38 35 |F'.23,22|4,170,85|
|000013e0| 2c 31 37 30 2c 38 35 2c | 31 37 30 2c 38 35 2c 31 |,170,85,|170,85,1|
|000013f0| 37 30 2c 38 35 0d 00 47 | 28 c8 99 20 22 57 69 6d |70,85..G|(.. "Wim|
|00001400| 70 5f 52 65 64 72 61 77 | 57 69 6e 64 6f 77 22 2c |p_Redraw|Window",|
|00001410| 2c 62 6c 6b 25 20 b8 20 | 6d 6f 72 65 25 0d 00 48 |,blk% . |more%..H|
|00001420| 31 78 30 25 3d 62 6c 6b | 25 21 34 3a 79 30 25 3d |1x0%=blk|%!4:y0%=|
|00001430| 62 6c 6b 25 21 38 3a 78 | 31 25 3d 62 6c 6b 25 21 |blk%!8:x|1%=blk%!|
|00001440| 31 32 3a 79 31 25 3d 62 | 6c 6b 25 21 31 36 0d 00 |12:y1%=b|lk%!16..|
|00001450| 49 0c c8 95 20 6d 6f 72 | 65 25 0d 00 4a 2b 20 20 |I... mor|e%..J+ |
|00001460| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 52 65 63 74 |.. "Wimp|_GetRect|
|00001470| 61 6e 67 6c 65 22 2c 2c | 62 6c 6b 25 20 b8 20 6d |angle",,|blk% . m|
|00001480| 6f 72 65 25 3a 0d 00 4b | 05 ce 0d 00 4c 05 e1 0d |ore%:..K|....L...|
|00001490| 00 4d 04 0d 00 4e 0e dd | f2 6b 65 79 65 76 65 6e |.M...N..|.keyeven|
|000014a0| 74 0d 00 4f 20 c8 99 20 | 22 57 69 6d 70 5f 50 72 |t..O .. |"Wimp_Pr|
|000014b0| 6f 63 65 73 73 4b 65 79 | 22 2c 62 6c 6b 25 21 32 |ocessKey|",blk%!2|
|000014c0| 34 0d 00 50 05 e1 0d 00 | 51 04 0d 00 52 14 dd a4 |4..P....|Q...R...|
|000014d0| 72 65 61 64 73 79 73 76 | 61 72 28 61 24 29 0d 00 |readsysv|ar(a$)..|
|000014e0| 53 4f c8 99 20 22 4f 53 | 5f 52 65 61 64 56 61 72 |SO.. "OS|_ReadVar|
|000014f0| 56 61 6c 22 2c 61 24 2c | 62 6c 6b 25 2c 32 35 36 |Val",a$,|blk%,256|
|00001500| 2c 30 2c 30 20 b8 20 2c | 2c 61 25 3a 61 24 3d 22 |,0,0 . ,|,a%:a$="|
|00001510| 22 3a e3 41 25 3d 30 b8 | 61 25 2d 31 3a 61 24 2b |":.A%=0.|a%-1:a$+|
|00001520| 3d bd 28 62 6c 6b 25 3f | 41 25 29 3a ed 0d 00 54 |=.(blk%?|A%):...T|
|00001530| 07 3d 61 24 0d 00 55 04 | 0d 00 56 12 dd f2 6f 70 |.=a$..U.|..V...op|
|00001540| 65 6e 77 69 6e 64 28 62 | 25 29 0d 00 57 1c c8 99 |enwind(b|%)..W...|
|00001550| 20 22 57 69 6d 70 5f 4f | 70 65 6e 57 69 6e 64 6f | "Wimp_O|penWindo|
|00001560| 77 22 2c 2c 62 25 0d 00 | 58 05 e1 0d 00 59 04 0d |w",,b%..|X....Y..|
|00001570| 00 5a 13 dd f2 63 6c 6f | 73 65 77 69 6e 64 28 62 |.Z...clo|sewind(b|
|00001580| 25 29 0d 00 5b 1d c8 99 | 20 22 57 69 6d 70 5f 43 |%)..[...| "Wimp_C|
|00001590| 6c 6f 73 65 57 69 6e 64 | 6f 77 22 2c 2c 62 25 0d |loseWind|ow",,b%.|
|000015a0| 00 5c 05 e1 0d 00 5d 04 | 0d 00 5e 14 dd a4 72 65 |.\....].|..^...re|
|000015b0| 61 64 73 74 72 69 6e 67 | 28 70 25 29 0d 00 5f 32 |adstring|(p%).._2|
|000015c0| ea 61 24 3a 61 24 3d 22 | 22 3a c8 95 20 a9 61 24 |.a$:a$="|":.. .a$|
|000015d0| 3c 32 35 35 20 80 20 3f | 70 25 3e 33 31 20 61 24 |<255 . ?|p%>31 a$|
|000015e0| 2b 3d bd 3f 70 25 3a 70 | 25 2b 3d 31 3a ce 0d 00 |+=.?p%:p|%+=1:...|
|000015f0| 60 07 3d 61 24 0d 00 61 | 04 0d 00 62 0b dd a4 69 |`.=a$..a|...b...i|
|00001600| 73 76 67 61 0d 00 63 21 | e7 a4 69 73 73 65 6c 65 |svga..c!|..issele|
|00001610| 63 74 65 64 28 73 65 74 | 75 70 77 25 2c 33 33 29 |cted(set|upw%,33)|
|00001620| 8c 3a 3d 2d 31 0d 00 64 | 06 3d 30 0d 00 65 04 0d |.:=-1..d|.=0..e..|
|00001630| 00 66 0f dd a4 69 73 63 | 67 61 6f 6e 6c 79 0d 00 |.f...isc|gaonly..|
|00001640| 67 29 c8 99 22 4f 53 5f | 43 68 65 63 6b 4d 6f 64 |g).."OS_|CheckMod|
|00001650| 65 56 61 6c 69 64 22 2c | 32 37 20 b8 20 72 65 67 |eValid",|27 . reg|
|00001660| 30 25 3b 66 6c 61 25 0d | 00 68 25 e7 28 28 66 6c |0%;fla%.|.h%.((fl|
|00001670| 61 25 80 25 31 30 29 3d | 25 31 30 29 80 28 72 65 |a%.%10)=|%10).(re|
|00001680| 67 30 25 3d 2d 31 29 8c | 3a 3d 2d 31 0d 00 69 06 |g0%=-1).|:=-1..i.|
|00001690| 3d 30 0d 00 6a 04 0d 00 | 6b 1a dd f2 6c 6f 61 64 |=0..j...|k...load|
|000016a0| 5f 74 65 6d 70 6c 61 74 | 65 28 6e 61 6d 65 24 29 |_templat|e(name$)|
|000016b0| 0d 00 6c 4e 77 70 74 72 | 6c 69 73 74 25 21 28 28 |..lNwptr|list%!((|
|000016c0| 77 69 6e 64 63 6f 75 6e | 74 25 2d 31 29 2a 34 29 |windcoun|t%-1)*4)|
|000016d0| 3d 77 70 74 72 31 25 3a | 77 69 6e 64 70 74 72 6c |=wptr1%:|windptrl|
|000016e0| 69 73 74 25 21 28 28 77 | 69 6e 64 63 6f 75 6e 74 |ist%!((w|indcount|
|000016f0| 25 2d 31 29 2a 34 29 3d | 77 70 74 72 32 25 0d 00 |%-1)*4)=|wptr2%..|
|00001700| 6d 54 c8 99 20 22 57 69 | 6d 70 5f 4c 6f 61 64 54 |mT.. "Wi|mp_LoadT|
|00001710| 65 6d 70 6c 61 74 65 22 | 2c 2c 77 70 74 72 31 25 |emplate"|,,wptr1%|
|00001720| 2c 77 70 74 72 32 25 2c | 77 69 6e 64 69 6e 64 25 |,wptr2%,|windind%|
|00001730| 2b 4d 41 58 57 49 4e 44 | 49 4e 44 25 2c 2d 31 2c |+MAXWIND|IND%,-1,|
|00001740| 6e 61 6d 65 24 2c 30 20 | b8 20 2c 2c 77 70 74 72 |name$,0 |. ,,wptr|
|00001750| 32 25 0d 00 6e 3e 6e 25 | 3d 77 70 74 72 31 25 21 |2%..n>n%|=wptr1%!|
|00001760| 38 34 3a e3 49 25 3d 30 | b8 28 6e 25 2d 31 29 2a |84:.I%=0|.(n%-1)*|
|00001770| 33 32 88 33 32 3a 64 25 | 3d 77 70 74 72 31 25 2b |32.32:d%|=wptr1%+|
|00001780| 38 38 2b 49 25 3a 66 25 | 3d 28 64 25 21 31 36 29 |88+I%:f%|=(d%!16)|
|00001790| 0d 00 6f 2f 20 20 e7 28 | 66 25 80 32 35 38 29 3d |..o/ .(|f%.258)=|
|000017a0| 32 35 38 20 80 20 28 66 | 25 80 31 29 3d 30 20 64 |258 . (f|%.1)=0 d|
|000017b0| 25 21 32 34 3d 6d 79 73 | 70 72 69 74 65 73 25 0d |%!24=mys|prites%.|
|000017c0| 00 70 41 20 20 e7 20 77 | 69 6d 70 76 65 72 25 3c |.pA . w|impver%<|
|000017d0| 33 30 30 20 80 20 28 6e | 61 6d 65 24 3d 22 73 65 |300 . (n|ame$="se|
|000017e0| 74 75 70 22 84 6e 61 6d | 65 24 3d 22 73 65 74 32 |tup".nam|e$="set2|
|000017f0| 22 84 6e 61 6d 65 24 3d | 22 6d 73 67 22 29 20 8c |".name$=|"msg") .|
|00001800| 0d 00 71 5d 20 20 20 20 | e7 28 66 25 80 32 35 39 |..q] |.(f%.259|
|00001810| 29 3d 32 35 37 20 80 20 | 64 25 21 32 34 3c 3e 2d |)=257 . |d%!24<>-|
|00001820| 31 20 8c 20 e7 a7 a4 72 | 65 61 64 73 74 72 69 6e |1 . ...r|eadstrin|
|00001830| 67 28 64 25 21 32 34 29 | 2c 22 62 32 22 29 3c 3e |g(d%!24)|,"b2")<>|
|00001840| 30 20 66 25 3d 28 66 25 | 80 26 30 46 46 30 30 46 |0 f%=(f%|.&0FF00F|
|00001850| 46 46 29 84 26 43 30 30 | 46 39 30 30 30 0d 00 72 |FF).&C00|F9000..r|
|00001860| 2a 20 20 20 20 e7 28 66 | 25 80 26 45 30 30 30 29 |* .(f|%.&E000)|
|00001870| 3d 26 45 30 30 30 20 64 | 25 21 34 2b 3d 34 3a 64 |=&E000 d|%!4+=4:d|
|00001880| 25 21 31 32 2d 3d 34 0d | 00 73 15 20 20 20 20 e7 |%!12-=4.|.s. .|
|00001890| 28 66 25 80 32 35 38 29 | 3d 32 20 8c 0d 00 74 1f |(f%.258)|=2 ...t.|
|000018a0| 20 20 20 20 20 20 61 24 | 3d a4 72 65 61 64 73 74 | a$|=.readst|
|000018b0| 72 69 6e 67 28 64 25 2b | 32 30 29 0d 00 75 2f 20 |ring(d%+|20)..u/ |
|000018c0| 20 20 20 20 20 c8 99 20 | 22 58 57 69 6d 70 5f 53 | .. |"XWimp_S|
|000018d0| 70 72 69 74 65 4f 70 22 | 2c 34 30 2c 2c 61 24 20 |priteOp"|,40,,a$ |
|000018e0| b8 20 2c 2c 2c 77 25 2c | 68 25 0d 00 76 15 20 20 |. ,,,w%,|h%..v. |
|000018f0| 20 20 20 20 e7 28 77 25 | 84 68 25 29 3d 30 8c 0d | .(w%|.h%)=0..|
|00001900| 00 77 32 20 20 20 20 20 | 20 20 20 66 25 3d 66 25 |.w2 | f%=f%|
|00001910| 84 32 35 36 3a 24 77 70 | 74 72 32 25 3d 61 24 3a |.256:$wp|tr2%=a$:|
|00001920| 3f 28 77 70 74 72 32 25 | 2b 28 a9 61 24 29 29 3d |?(wptr2%|+(.a$))=|
|00001930| 30 0d 00 78 43 20 20 20 | 20 20 20 20 20 64 25 21 |0..xC | d%!|
|00001940| 32 30 3d 77 70 74 72 32 | 25 3a 64 25 21 32 34 3d |20=wptr2|%:d%!24=|
|00001950| 6d 79 73 70 72 69 74 65 | 73 25 3a 64 25 21 32 38 |mysprite|s%:d%!28|
|00001960| 3d a9 61 24 3a 77 70 74 | 72 32 25 2b 3d a9 28 61 |=.a$:wpt|r2%+=.(a|
|00001970| 24 29 2b 31 0d 00 79 0b | 20 20 20 20 20 20 cd 0d |$)+1..y.| ..|
|00001980| 00 7a 09 20 20 20 20 cd | 0d 00 7b 10 20 20 20 20 |.z. .|..{. |
|00001990| 64 25 21 31 36 3d 66 25 | 0d 00 7c 07 20 20 cd 0d |d%!16=f%|..|. ..|
|000019a0| 00 7d 05 ed 0d 00 7e 2d | 77 70 74 72 31 25 2b 3d |.}....~-|wptr1%+=|
|000019b0| 38 38 2b 28 28 77 70 74 | 72 31 25 21 38 34 29 2a |88+((wpt|r1%!84)*|
|000019c0| 33 32 29 3a 77 69 6e 64 | 63 6f 75 6e 74 25 2b 3d |32):wind|count%+=|
|000019d0| 31 0d 00 7f 05 e1 0d 00 | 80 04 0d 00 81 0d dd f2 |1.......|........|
|000019e0| 62 61 72 69 63 6f 6e 0d | 00 82 15 24 69 62 6e 61 |baricon.|...$ibna|
|000019f0| 6d 65 25 3d 22 66 72 61 | 6d 65 31 22 0d 00 83 34 |me%="fra|me1"...4|
|00001a00| 21 62 6c 6b 25 3d 2d 31 | 3a 62 6c 6b 25 21 34 3d |!blk%=-1|:blk%!4=|
|00001a10| 30 3a 62 6c 6b 25 21 38 | 3d 30 3a 62 6c 6b 25 21 |0:blk%!8|=0:blk%!|
|00001a20| 31 32 3d 36 32 3a 62 6c | 6b 25 21 31 36 3d 37 32 |12=62:bl|k%!16=72|
|00001a30| 0d 00 84 4a 62 6c 6b 25 | 21 32 30 3d 26 31 30 30 |...Jblk%|!20=&100|
|00001a40| 30 33 31 33 41 3a 62 6c | 6b 25 21 32 34 3d 69 62 |0313A:bl|k%!24=ib|
|00001a50| 6e 61 6d 65 25 3a 62 6c | 6b 25 21 32 38 3d 6d 79 |name%:bl|k%!28=my|
|00001a60| 73 70 72 69 74 65 73 25 | 3a 62 6c 6b 25 21 33 32 |sprites%|:blk%!32|
|00001a70| 3d a9 24 69 62 6e 61 6d | 65 25 0d 00 85 25 c8 99 |=.$ibnam|e%...%..|
|00001a80| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 49 63 6f | "Wimp_C|reateIco|
|00001a90| 6e 22 2c 2c 62 6c 6b 25 | 20 b8 20 69 62 68 25 0d |n",,blk%| . ibh%.|
|00001aa0| 00 86 05 e1 0d 00 87 04 | 0d 00 88 12 dd a4 66 69 |........|......fi|
|00001ab0| 6c 65 74 79 70 65 28 61 | 24 29 0d 00 89 1b c8 99 |letype(a|$)......|
|00001ac0| 20 22 58 4f 53 5f 46 69 | 6c 65 22 2c 35 2c 61 24 | "XOS_Fi|le",5,a$|
|00001ad0| 20 b8 20 61 25 0d 00 8a | 07 3d 61 25 0d 00 8b 04 | . a%...|.=a%....|
|00001ae0| 0d 00 8c 18 dd f2 65 72 | 72 6f 72 28 6d 73 67 24 |......er|ror(msg$|
|00001af0| 2c 65 72 72 6e 6f 25 29 | 0d 00 8d 07 d9 23 30 0d |,errno%)|.....#0.|
|00001b00| 00 8e 21 21 65 72 72 62 | 6c 6b 25 3d 39 39 3a 24 |..!!errb|lk%=99:$|
|00001b10| 28 65 72 72 62 6c 6b 25 | 2b 34 29 3d 6d 73 67 24 |(errblk%|+4)=msg$|
|00001b20| 0d 00 8f 2c c8 99 20 22 | 57 69 6d 70 5f 52 65 70 |...,.. "|Wimp_Rep|
|00001b30| 6f 72 74 45 72 72 6f 72 | 22 2c 65 72 72 62 6c 6b |ortError|",errblk|
|00001b40| 25 2c 30 2c 22 41 7a 74 | 65 63 73 22 0d 00 90 05 |%,0,"Azt|ecs"....|
|00001b50| e1 0d 00 91 04 0d 00 92 | 19 dd f2 73 65 6c 65 63 |........|...selec|
|00001b60| 74 69 63 6e 28 77 25 2c | 69 25 2c 66 25 29 0d 00 |ticn(w%,|i%,f%)..|
|00001b70| 93 46 21 62 6c 6b 25 3d | 77 25 3a 62 6c 6b 25 21 |.F!blk%=|w%:blk%!|
|00001b80| 34 3d 69 25 3a 62 6c 6b | 25 21 31 32 3d 28 31 3c |4=i%:blk|%!12=(1<|
|00001b90| 3c 32 31 29 3a e7 66 25 | 3d 30 20 62 6c 6b 25 21 |<21):.f%|=0 blk%!|
|00001ba0| 38 3d 30 3a 8b 20 62 6c | 6b 25 21 38 3d 62 6c 6b |8=0:. bl|k%!8=blk|
|00001bb0| 25 21 31 32 0d 00 94 20 | c8 99 20 22 57 69 6d 70 |%!12... |.. "Wimp|
|00001bc0| 5f 53 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_SetIcon|State",,|
|00001bd0| 62 6c 6b 25 0d 00 95 05 | e1 0d 00 96 04 0d 00 97 |blk%....|........|
|00001be0| 19 dd f2 67 65 74 69 63 | 6f 6e 73 74 61 74 65 28 |...getic|onstate(|
|00001bf0| 77 25 2c 69 25 29 0d 00 | 98 33 21 62 6c 6b 25 3d |w%,i%)..|.3!blk%=|
|00001c00| 77 25 3a 62 6c 6b 25 21 | 34 3d 69 25 3a c8 99 20 |w%:blk%!|4=i%:.. |
|00001c10| 22 57 69 6d 70 5f 47 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Ge|tIconSta|
|00001c20| 74 65 22 2c 2c 62 6c 6b | 25 0d 00 99 05 e1 0d 00 |te",,blk|%.......|
|00001c30| 9a 04 0d 00 9b 17 dd a4 | 69 73 73 65 6c 65 63 74 |........|isselect|
|00001c40| 65 64 28 77 25 2c 69 25 | 29 0d 00 9c 18 f2 67 65 |ed(w%,i%|).....ge|
|00001c50| 74 69 63 6f 6e 73 74 61 | 74 65 28 77 25 2c 69 25 |ticonsta|te(w%,i%|
|00001c60| 29 0d 00 9d 20 3d 28 28 | 62 6c 6b 25 21 32 34 29 |)... =((|blk%!24)|
|00001c70| 80 28 31 3c 3c 32 31 29 | 29 3d 28 31 3c 3c 32 31 |.(1<<21)|)=(1<<21|
|00001c80| 29 0d 00 9e 04 0d 00 9f | 18 dd a4 63 6f 6e 76 65 |).......|...conve|
|00001c90| 72 74 74 6f 6c 6f 77 65 | 72 28 61 24 29 0d 00 a0 |rttolowe|r(a$)...|
|00001ca0| 15 ea 20 6c 25 2c 62 24 | 2c 63 68 25 3a 62 24 3d |.. l%,b$|,ch%:b$=|
|00001cb0| 22 22 0d 00 a1 0d e3 6c | 25 3d 31 b8 a9 61 24 0d |"".....l|%=1..a$.|
|00001cc0| 00 a2 14 63 68 25 3d 97 | 28 c1 61 24 2c 6c 25 2c |...ch%=.|(.a$,l%,|
|00001cd0| 31 29 29 0d 00 a3 21 e7 | 28 63 68 25 3e 26 34 30 |1))...!.|(ch%>&40|
|00001ce0| 29 80 28 63 68 25 3c 26 | 35 42 29 3a 63 68 25 2b |).(ch%<&|5B):ch%+|
|00001cf0| 3d 26 32 30 0d 00 a4 0c | 62 24 2b 3d bd 63 68 25 |=&20....|b$+=.ch%|
|00001d00| 0d 00 a5 05 ed 0d 00 a6 | 07 3d 62 24 0d 00 a7 04 |........|.=b$....|
|00001d10| 0d 00 a8 32 dd a4 6c 65 | 61 66 28 66 24 29 20 49 |...2..le|af(f$) I|
|00001d20| 25 3d a9 66 24 3a c8 95 | 49 25 3e 31 80 c1 66 24 |%=.f$:..|I%>1..f$|
|00001d30| 2c 49 25 2c 31 29 3c 3e | 22 2e 22 49 25 2d 3d 31 |,I%,1)<>|"."I%-=1|
|00001d40| 3a ce 0d 00 a9 17 e7 c1 | 66 24 2c 49 25 2c 31 29 |:.......|f$,I%,1)|
|00001d50| 3d 22 2e 22 49 25 2b 3d | 31 0d 00 aa 0c 3d c1 66 |="."I%+=|1....=.f|
|00001d60| 24 2c 49 25 29 0d 00 ab | 04 0d 00 ac 19 dd a4 67 |$,I%)...|.......g|
|00001d70| 65 74 69 63 6e 73 74 72 | 69 6e 67 28 77 25 2c 69 |eticnstr|ing(w%,i|
|00001d80| 25 29 0d 00 ad 33 21 62 | 6c 6b 25 3d 77 25 3a 62 |%)...3!b|lk%=w%:b|
|00001d90| 6c 6b 25 21 34 3d 69 25 | 3a c8 99 20 22 57 69 6d |lk%!4=i%|:.. "Wim|
|00001da0| 70 5f 47 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_GetIco|nState",|
|00001db0| 2c 62 6c 6b 25 0d 00 ae | 19 3d a4 72 65 61 64 73 |,blk%...|.=.reads|
|00001dc0| 74 72 69 6e 67 28 62 6c | 6b 25 21 32 38 29 0d 00 |tring(bl|k%!28)..|
|00001dd0| af 04 0d 00 b0 1c dd f2 | 70 75 74 69 63 6e 73 74 |........|puticnst|
|00001de0| 72 69 6e 67 28 77 25 2c | 69 25 2c 61 24 29 0d 00 |ring(w%,|i%,a$)..|
|00001df0| b1 33 21 62 6c 6b 25 3d | 77 25 3a 62 6c 6b 25 21 |.3!blk%=|w%:blk%!|
|00001e00| 34 3d 69 25 3a c8 99 20 | 22 57 69 6d 70 5f 47 65 |4=i%:.. |"Wimp_Ge|
|00001e10| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 62 6c 6b |tIconSta|te",,blk|
|00001e20| 25 0d 00 b2 24 24 28 62 | 6c 6b 25 21 32 38 29 3d |%...$$(b|lk%!28)=|
|00001e30| 61 24 3a 3f 28 28 62 6c | 6b 25 21 32 38 29 2b a9 |a$:?((bl|k%!28)+.|
|00001e40| 61 24 29 3d 30 0d 00 b3 | 33 62 6c 6b 25 21 38 3d |a$)=0...|3blk%!8=|
|00001e50| 30 3a 62 6c 6b 25 21 31 | 32 3d 30 3a c8 99 20 22 |0:blk%!1|2=0:.. "|
|00001e60| 57 69 6d 70 5f 53 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Set|IconStat|
|00001e70| 65 22 2c 2c 62 6c 6b 25 | 0d 00 b4 05 e1 0d 00 b5 |e",,blk%|........|
|00001e80| 04 0d 00 b6 17 dd f2 63 | 6c 69 63 6b 28 62 75 74 |.......c|lick(but|
|00001e90| 25 2c 77 25 2c 69 25 29 | 0d 00 b7 0b c8 8e 20 77 |%,w%,i%)|...... w|
|00001ea0| 25 20 ca 0d 00 b8 0b 20 | 20 c9 20 2d 32 3a 0d 00 |% ..... | . -2:..|
|00001eb0| b9 11 20 20 20 20 c8 8e | 20 62 75 74 25 20 ca 0d |.. ..| but% ..|
|00001ec0| 00 ba 43 20 20 20 20 20 | 20 c9 20 32 3a 20 f2 6d |..C | . 2: .m|
|00001ed0| 61 73 74 65 72 5f 6d 65 | 6e 75 28 22 41 7a 74 65 |aster_me|nu("Azte|
|00001ee0| 63 73 22 2c 22 49 6e 66 | 6f 2c 4d 65 73 73 61 67 |cs","Inf|o,Messag|
|00001ef0| 65 2c 51 75 69 74 2c 22 | 2c 21 65 62 25 2c 32 35 |e,Quit,"|,!eb%,25|
|00001f00| 36 29 0d 00 bb 19 20 20 | 20 20 20 20 c9 20 34 3a |6).... | . 4:|
|00001f10| 20 f2 73 74 61 72 74 67 | 61 6d 65 0d 00 bc 09 20 | .startg|ame.... |
|00001f20| 20 20 20 cb 0d 00 bd 05 | cb 0d 00 be 05 e1 0d 00 | .....|........|
|00001f30| bf 04 0d 00 c0 17 dd f2 | 73 75 62 6d 65 6e 75 28 |........|submenu(|
|00001f40| 6d 25 2c 69 25 2c 68 25 | 29 0d 00 c1 16 6d 25 2b |m%,i%,h%|)....m%+|
|00001f50| 3d 32 38 2b 28 28 69 25 | 2d 31 29 2a 32 34 29 0d |=28+((i%|-1)*24).|
|00001f60| 00 c2 0b 6d 25 21 34 3d | 68 25 0d 00 c3 05 e1 0d |...m%!4=|h%......|
|00001f70| 00 c4 04 0d 00 c5 22 dd | f2 6d 61 73 74 65 72 5f |......".|.master_|
|00001f80| 6d 65 6e 75 28 74 69 74 | 6c 65 24 2c 6d 24 2c 78 |menu(tit|le$,m$,x|
|00001f90| 25 2c 79 25 29 0d 00 c6 | 21 f2 63 72 65 61 74 65 |%,y%)...|!.create|
|00001fa0| 5f 6d 65 6e 75 28 6d 65 | 6e 75 25 2c 74 69 74 6c |_menu(me|nu%,titl|
|00001fb0| 65 24 2c 6d 24 29 0d 00 | c7 34 f2 73 75 62 6d 65 |e$,m$)..|.4.subme|
|00001fc0| 6e 75 28 6d 65 6e 75 25 | 2c 31 2c 69 6e 66 6f 77 |nu(menu%|,1,infow|
|00001fd0| 25 29 3a f2 73 75 62 6d | 65 6e 75 28 6d 65 6e 75 |%):.subm|enu(menu|
|00001fe0| 25 2c 32 2c 6d 73 67 77 | 25 29 0d 00 c8 32 c8 99 |%,2,msgw|%)...2..|
|00001ff0| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e | "Wimp_C|reateMen|
|00002000| 75 22 2c 2c 6d 65 6e 75 | 25 2c 78 25 2d 6d 65 6e |u",,menu|%,x%-men|
|00002010| 75 25 21 31 36 20 2f 20 | 32 2c 79 25 0d 00 c9 10 |u%!16 / |2,y%....|
|00002020| 63 75 72 72 6d 65 6e 75 | 25 3d 2d 31 0d 00 ca 05 |currmenu|%=-1....|
|00002030| e1 0d 00 cb 04 0d 00 cc | 1f dd f2 63 72 65 61 74 |........|...creat|
|00002040| 65 5f 6d 65 6e 75 28 6d | 25 2c 74 69 74 6c 65 24 |e_menu(m|%,title$|
|00002050| 2c 6d 24 29 0d 00 cd 0d | ea 20 69 25 2c 6d 61 78 |,m$)....|. i%,max|
|00002060| 25 0d 00 ce 0e 24 6d 25 | 3d 74 69 74 6c 65 24 0d |%....$m%|=title$.|
|00002070| 00 cf 34 6d 25 3f 31 32 | 3d 37 3a 6d 25 3f 31 33 |..4m%?12|=7:m%?13|
|00002080| 3d 32 3a 6d 25 3f 31 34 | 3d 37 3a 6d 25 3f 31 35 |=2:m%?14|=7:m%?15|
|00002090| 3d 30 3a 6d 25 21 32 30 | 3d 34 30 3a 6d 25 21 32 |=0:m%!20|=40:m%!2|
|000020a0| 34 3d 30 0d 00 d0 1d 69 | 25 3d 6d 25 2b 32 38 3a |4=0....i|%=m%+28:|
|000020b0| 6d 61 78 25 3d a9 28 74 | 69 74 6c 65 24 29 2d 32 |max%=.(t|itle$)-2|
|000020c0| 0d 00 d1 05 f5 0d 00 d2 | 11 20 20 61 25 3d a7 6d |........|. a%=.m|
|000020d0| 24 2c 22 2c 22 29 0d 00 | d3 18 20 20 69 24 3d c0 |$,",")..|.. i$=.|
|000020e0| 6d 24 2c 61 25 2d 31 29 | 3a 21 69 25 3d 30 0d 00 |m$,a%-1)|:!i%=0..|
|000020f0| d4 0f 20 20 f5 3a 6d 6f | 72 65 25 3d a3 0d 00 d5 |.. .:mo|re%=....|
|00002100| 27 20 20 20 20 e7 c0 69 | 24 2c 31 29 3d 22 3e 22 |' ..i|$,1)=">"|
|00002110| 20 21 69 25 3d 28 21 69 | 25 29 84 38 3a 6d 6f 72 | !i%=(!i|%).8:mor|
|00002120| 65 25 3d b9 0d 00 d6 27 | 20 20 20 20 e7 c0 69 24 |e%=....'| ..i$|
|00002130| 2c 31 29 3d 22 21 22 20 | 21 69 25 3d 28 21 69 25 |,1)="!" |!i%=(!i%|
|00002140| 29 84 31 3a 6d 6f 72 65 | 25 3d b9 0d 00 d7 1f 20 |).1:more|%=..... |
|00002150| 20 20 20 e7 20 6d 6f 72 | 65 25 20 69 24 3d c2 69 | . mor|e% i$=.i|
|00002160| 24 2c a9 28 69 24 29 2d | 31 29 0d 00 d8 1b 20 20 |$,.(i$)-|1).... |
|00002170| fd 20 ac 20 6d 6f 72 65 | 25 3a 24 28 69 25 2b 31 |. . more|%:$(i%+1|
|00002180| 32 29 3d 69 24 0d 00 d9 | 17 20 20 e7 20 61 25 3e |2)=i$...|. . a%>|
|00002190| 6d 61 78 25 20 6d 61 78 | 25 3d 61 25 0d 00 da 1b |max% max|%=a%....|
|000021a0| 20 20 69 25 21 34 3d 30 | 3a 69 25 21 38 3d 26 30 | i%!4=0|:i%!8=&0|
|000021b0| 37 30 30 30 30 32 31 0d | 00 db 14 20 20 6d 24 20 |7000021.|... m$ |
|000021c0| 3d 20 c1 6d 24 2c 61 25 | 2b 31 29 0d 00 dc 13 20 |= .m$,a%|+1).... |
|000021d0| 20 c8 8e 20 24 28 69 25 | 2b 31 32 29 20 ca 0d 00 | .. $(i%|+12) ...|
|000021e0| dd 07 20 20 cb 0d 00 de | 12 20 20 69 25 20 3d 20 |.. ....|. i% = |
|000021f0| 69 25 20 2b 20 32 34 0d | 00 df 0d fd 20 6d 24 20 |i% + 24.|.... m$ |
|00002200| 3d 20 22 22 0d 00 e0 1a | 69 25 21 2d 32 34 20 3d |= ""....|i%!-24 =|
|00002210| 20 28 69 25 21 2d 32 34 | 29 84 20 26 38 30 0d 00 | (i%!-24|). &80..|
|00002220| e1 13 6d 25 21 31 36 20 | 3d 20 6d 61 78 25 2a 31 |..m%!16 |= max%*1|
|00002230| 36 0d 00 e2 05 e1 0d 00 | e3 04 0d 00 e4 10 dd f2 |6.......|........|
|00002240| 6d 65 6e 75 73 65 6c 65 | 63 74 0d 00 e5 23 c8 99 |menusele|ct...#..|
|00002250| 20 22 57 69 6d 70 5f 47 | 65 74 50 6f 69 6e 74 65 | "Wimp_G|etPointe|
|00002260| 72 49 6e 66 6f 22 2c 2c | 62 6c 6b 32 25 0d 00 e6 |rInfo",,|blk2%...|
|00002270| 18 63 75 72 72 6d 65 6e | 75 62 75 74 25 3d 62 6c |.currmen|ubut%=bl|
|00002280| 6b 32 25 21 38 0d 00 e7 | 12 c8 8e 20 63 75 72 72 |k2%!8...|... curr|
|00002290| 6d 65 6e 75 25 20 ca 0d | 00 e8 0b 20 20 c9 20 2d |menu% ..|... . -|
|000022a0| 31 3a 0d 00 e9 11 20 20 | 20 20 c8 8e 20 21 65 62 |1:.... | .. !eb|
|000022b0| 25 20 ca 0d 00 ea 1b 20 | 20 20 20 20 20 c9 20 30 |% ..... | . 0|
|000022c0| 3a 20 f2 63 68 65 63 6b | 61 64 6a 75 73 74 0d 00 |: .check|adjust..|
|000022d0| eb 1b 20 20 20 20 20 20 | c9 20 31 3a 20 f2 63 68 |.. |. 1: .ch|
|000022e0| 65 63 6b 61 64 6a 75 73 | 74 0d 00 ec 16 20 20 20 |eckadjus|t.... |
|000022f0| 20 20 20 c9 20 32 3a 20 | 71 75 69 74 25 3d b9 0d | . 2: |quit%=..|
|00002300| 00 ed 09 20 20 20 20 cb | 0d 00 ee 05 cb 0d 00 ef |... .|........|
|00002310| 05 e1 0d 00 f0 04 0d 00 | f1 11 dd f2 63 68 65 63 |........|....chec|
|00002320| 6b 61 64 6a 75 73 74 0d | 00 f2 37 e7 63 75 72 72 |kadjust.|..7.curr|
|00002330| 6d 65 6e 75 62 75 74 25 | 3d 31 3a c8 99 20 22 57 |menubut%|=1:.. "W|
|00002340| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|00002350| 2c 6d 65 6e 75 25 2c 31 | 30 30 2c 31 30 30 0d 00 |,menu%,1|00,100..|
|00002360| f3 05 e1 0d 00 f4 04 0d | 00 f5 13 dd f2 68 69 64 |........|.....hid|
|00002370| 65 5f 6c 6f 67 6f 73 61 | 76 65 0d 00 f6 33 f4 21 |e_logosa|ve...3.!|
|00002380| 62 6c 6b 25 3d 33 37 30 | 3a 62 6c 6b 25 21 34 3d |blk%=370|:blk%!4=|
|00002390| 2d 31 30 36 38 3a 62 6c | 6b 25 21 38 3d 39 32 38 |-1068:bl|k%!8=928|
|000023a0| 3a 62 6c 6b 25 21 31 32 | 3d 2d 33 34 34 0d 00 f7 |:blk%!12|=-344...|
|000023b0| 25 21 62 6c 6b 25 3d 33 | 37 30 3a 62 6c 6b 25 21 |%!blk%=3|70:blk%!|
|000023c0| 38 3d 39 32 38 3a 62 6c | 6b 25 21 31 32 3d 2d 33 |8=928:bl|k%!12=-3|
|000023d0| 34 34 0d 00 f8 2b e7 20 | a4 69 73 63 67 61 6f 6e |44...+. |.iscgaon|
|000023e0| 6c 79 3a 62 6c 6b 25 21 | 34 3d 2d 39 39 36 3a 8b |ly:blk%!|4=-996:.|
|000023f0| 3a 62 6c 6b 25 21 34 3d | 2d 31 31 31 36 0d 00 f9 |:blk%!4=|-1116...|
|00002400| 24 c8 99 20 22 57 69 6d | 70 5f 53 65 74 45 78 74 |$.. "Wim|p_SetExt|
|00002410| 65 6e 74 22 2c 73 65 74 | 75 70 77 25 2c 62 6c 6b |ent",set|upw%,blk|
|00002420| 25 0d 00 fa 05 e1 0d 00 | fb 04 0d 00 fc 14 dd a4 |%.......|........|
|00002430| 72 65 61 64 76 64 75 76 | 61 72 28 61 25 29 0d 00 |readvduv|ar(a%)..|
|00002440| fd 39 21 62 6c 6b 25 3d | 61 25 3a 62 6c 6b 25 21 |.9!blk%=|a%:blk%!|
|00002450| 34 3d 2d 31 3a c8 99 20 | 22 4f 53 5f 52 65 61 64 |4=-1:.. |"OS_Read|
|00002460| 56 64 75 56 61 72 69 61 | 62 6c 65 73 22 2c 62 6c |VduVaria|bles",bl|
|00002470| 6b 25 2c 62 6c 6b 25 0d | 00 fe 0a 3d 21 62 6c 6b |k%,blk%.|...=!blk|
|00002480| 25 0d 00 ff 04 0d 01 00 | 19 dd a4 63 68 65 63 6b |%.......|...check|
|00002490| 66 6f 6e 74 28 61 24 2c | 41 25 2c 42 25 29 0d 01 |font(a$,|A%,B%)..|
|000024a0| 01 07 ea 20 85 0d 01 02 | 0c ee 20 85 20 ea 3a 3d |... ....|.. . .:=|
|000024b0| 30 0d 01 03 29 c8 99 20 | 22 46 6f 6e 74 5f 46 69 |0...).. |"Font_Fi|
|000024c0| 6e 64 46 6f 6e 74 22 2c | 2c 61 24 2c 41 25 2c 42 |ndFont",|,a$,A%,B|
|000024d0| 25 2c 30 2c 30 20 b8 20 | 68 25 0d 01 04 1d c8 99 |%,0,0 . |h%......|
|000024e0| 20 22 46 6f 6e 74 5f 4c | 6f 73 65 46 6f 6e 74 22 | "Font_L|oseFont"|
|000024f0| 2c 68 25 3a f7 20 85 0d | 01 05 06 3d b9 0d 01 06 |,h%:. ..|...=....|
|00002500| 04 0d 01 07 0f dd f2 72 | 65 61 64 73 6f 75 6e 64 |.......r|eadsound|
|00002510| 0d 01 08 39 c8 99 20 22 | 53 6f 75 6e 64 5f 52 65 |...9.. "|Sound_Re|
|00002520| 61 64 43 6f 6e 74 72 6f | 6c 42 6c 6f 63 6b 22 2c |adContro|lBlock",|
|00002530| 31 2c 30 20 b8 20 2c 2c | 61 25 3a 61 25 3d 28 61 |1,0 . ,,|a%:a%=(a|
|00002540| 25 3e 3e 38 29 80 32 35 | 35 0d 01 09 29 c8 99 20 |%>>8).25|5...).. |
|00002550| 22 53 6f 75 6e 64 5f 43 | 6f 6e 66 69 67 75 72 65 |"Sound_C|onfigure|
|00002560| 22 2c 30 2c 30 2c 30 20 | b8 20 41 25 2c 42 25 2c |",0,0,0 |. A%,B%,|
|00002570| 43 25 0d 01 0a 34 ff 22 | 53 65 74 20 41 7a 74 65 |C%...4."|Set Azte|
|00002580| 63 24 63 68 61 6e 31 20 | 22 2b c3 61 25 3a ff 22 |c$chan1 |"+.a%:."|
|00002590| 53 65 74 20 41 7a 74 65 | 63 24 6e 63 68 61 6e 73 |Set Azte|c$nchans|
|000025a0| 20 22 2b c3 41 25 0d 01 | 0b 35 ff 22 53 65 74 20 | "+.A%..|.5."Set |
|000025b0| 41 7a 74 65 63 24 73 61 | 6d 70 73 7a 20 22 2b c3 |Aztec$sa|mpsz "+.|
|000025c0| 42 25 3a ff 22 53 65 74 | 20 41 7a 74 65 63 24 70 |B%:."Set| Aztec$p|
|000025d0| 65 72 69 6f 64 20 22 2b | c3 43 25 0d 01 0c 32 c8 |eriod "+|.C%...2.|
|000025e0| 99 20 22 53 6f 75 6e 64 | 5f 56 6f 6c 75 6d 65 22 |. "Sound|_Volume"|
|000025f0| 2c 30 20 b8 20 41 25 3a | ff 22 53 65 74 20 41 7a |,0 . A%:|."Set Az|
|00002600| 74 65 63 24 76 6f 6c 20 | 22 2b c3 41 25 0d 01 0d |tec$vol |"+.A%...|
|00002610| 05 e1 0d 01 0e 04 0d 01 | 0f 10 dd f2 72 65 73 65 |........|....rese|
|00002620| 74 73 6f 75 6e 64 0d 01 | 10 31 ff 22 63 68 61 6e |tsound..|.1."chan|
|00002630| 6e 65 6c 76 6f 69 63 65 | 20 31 20 22 2b a4 72 65 |nelvoice| 1 "+.re|
|00002640| 61 64 73 79 73 76 61 72 | 28 22 41 7a 74 65 63 24 |adsysvar|("Aztec$|
|00002650| 63 68 61 6e 31 22 29 0d | 01 11 43 41 25 3d bb a4 |chan1").|..CA%=..|
|00002660| 72 65 61 64 73 79 73 76 | 61 72 28 22 41 7a 74 65 |readsysv|ar("Azte|
|00002670| 63 24 6e 63 68 61 6e 73 | 22 29 3a 42 25 3d bb a4 |c$nchans|"):B%=..|
|00002680| 72 65 61 64 73 79 73 76 | 61 72 28 22 41 7a 74 65 |readsysv|ar("Azte|
|00002690| 63 24 73 61 6d 70 73 7a | 22 29 0d 01 12 41 43 25 |c$sampsz|")...AC%|
|000026a0| 3d bb a4 72 65 61 64 73 | 79 73 76 61 72 28 22 41 |=..reads|ysvar("A|
|000026b0| 7a 74 65 63 24 70 65 72 | 69 6f 64 22 29 3a c8 99 |ztec$per|iod"):..|
|000026c0| 20 22 53 6f 75 6e 64 5f | 43 6f 6e 66 69 67 75 72 | "Sound_|Configur|
|000026d0| 65 22 2c 41 25 2c 42 25 | 2c 43 25 0d 01 13 2f c8 |e",A%,B%|,C%.../.|
|000026e0| 99 20 22 53 6f 75 6e 64 | 5f 56 6f 6c 75 6d 65 22 |. "Sound|_Volume"|
|000026f0| 2c bb a4 72 65 61 64 73 | 79 73 76 61 72 28 22 41 |,..reads|ysvar("A|
|00002700| 7a 74 65 63 24 76 6f 6c | 22 29 0d 01 14 05 e1 0d |ztec$vol|")......|
|00002710| 01 15 04 0d 01 16 0f dd | f2 73 74 61 72 74 67 61 |........|.startga|
|00002720| 6d 65 0d 01 17 38 c8 99 | 20 22 46 6f 6e 74 5f 52 |me...8..| "Font_R|
|00002730| 65 61 64 46 6f 6e 74 4d | 61 78 22 20 b8 20 66 6d |eadFontM|ax" . fm|
|00002740| 25 2c 66 6d 31 25 2c 66 | 6d 32 25 2c 66 6d 33 25 |%,fm1%,f|m2%,fm3%|
|00002750| 2c 66 6d 34 25 2c 66 6d | 35 25 0d 01 18 43 e7 66 |,fm4%,fm|5%...C.f|
|00002760| 6d 32 25 3c 35 37 36 30 | 30 20 c8 99 20 22 46 6f |m2%<5760|0 .. "Fo|
|00002770| 6e 74 5f 53 65 74 46 6f | 6e 74 4d 61 78 22 2c 66 |nt_SetFo|ntMax",f|
|00002780| 6d 25 2c 66 6d 31 25 2c | 35 37 36 30 30 2c 35 37 |m%,fm1%,|57600,57|
|00002790| 36 30 30 2c 66 6d 34 25 | 2c 66 6d 35 25 0d 01 19 |600,fm4%|,fm5%...|
|000027a0| 32 c8 99 20 22 4f 53 5f | 42 79 74 65 22 2c 31 33 |2.. "OS_|Byte",13|
|000027b0| 35 20 b8 20 2c 2c 61 25 | 3a ff 22 53 65 74 20 41 |5 . ,,a%|:."Set A|
|000027c0| 7a 74 65 63 24 4d 6f 64 | 65 20 22 2b c3 61 25 0d |ztec$Mod|e "+.a%.|
|000027d0| 01 1a 23 2a 53 65 74 20 | 41 7a 74 65 63 24 63 68 |..#*Set |Aztec$ch|
|000027e0| 61 69 6e 64 69 72 20 3c | 41 7a 74 65 63 24 44 69 |aindir <|Aztec$Di|
|000027f0| 72 3e 0d 01 1b 0a 48 25 | 3d 6d 63 25 0d 01 1c 59 |r>....H%|=mc%...Y|
|00002800| e7 a4 63 68 65 63 6b 66 | 6f 6e 74 28 22 54 61 62 |..checkf|ont("Tab|
|00002810| 6c 6f 69 64 2e 6d 65 64 | 69 75 6d 22 2c 33 32 30 |loid.med|ium",320|
|00002820| 2c 33 36 30 29 3d a3 20 | f2 65 72 72 6f 72 28 22 |,360)=. |.error("|
|00002830| 46 6f 6e 74 3a 27 54 61 | 62 6c 6f 69 64 2e 4d 65 |Font:'Ta|bloid.Me|
|00002840| 64 69 75 6d 27 20 6e 6f | 74 20 66 6f 75 6e 64 22 |dium' no|t found"|
|00002850| 2c 30 29 3a e1 0d 01 1d | 12 e7 20 a4 69 73 63 67 |,0):....|.. .iscg|
|00002860| 61 6f 6e 6c 79 20 8c 0d | 01 1e 6b c8 99 20 22 57 |aonly ..|..k.. "W|
|00002870| 69 6d 70 5f 53 65 74 4d | 6f 64 65 22 2c 31 35 3a |imp_SetM|ode",15:|
|00002880| e7 28 a4 72 65 61 64 76 | 64 75 76 61 72 28 31 35 |.(.readv|duvar(15|
|00002890| 30 29 2f 31 30 32 34 29 | 3c 31 36 30 20 f2 65 72 |0)/1024)|<160 .er|
|000028a0| 72 6f 72 28 22 4e 6f 74 | 20 65 6e 6f 75 67 68 20 |ror("Not| enough |
|000028b0| 6d 65 6d 6f 72 79 20 74 | 6f 20 63 68 61 6e 67 65 |memory t|o change|
|000028c0| 20 73 63 72 65 65 6e 20 | 6d 6f 64 65 22 2c 31 29 | screen |mode",1)|
|000028d0| 3a e1 0d 01 1f 05 cc 0d | 01 20 6b c8 99 20 22 57 |:.......|. k.. "W|
|000028e0| 69 6d 70 5f 53 65 74 4d | 6f 64 65 22 2c 32 38 3a |imp_SetM|ode",28:|
|000028f0| e7 28 a4 72 65 61 64 76 | 64 75 76 61 72 28 31 35 |.(.readv|duvar(15|
|00002900| 30 29 2f 31 30 32 34 29 | 3c 33 30 30 20 f2 65 72 |0)/1024)|<300 .er|
|00002910| 72 6f 72 28 22 4e 6f 74 | 20 65 6e 6f 75 67 68 20 |ror("Not| enough |
|00002920| 6d 65 6d 6f 72 79 20 74 | 6f 20 63 68 61 6e 67 65 |memory t|o change|
|00002930| 20 73 63 72 65 65 6e 20 | 6d 6f 64 65 22 2c 31 29 | screen |mode",1)|
|00002940| 3a e1 0d 01 21 05 cd 0d | 01 22 22 c8 99 20 22 57 |:...!...|."".. "W|
|00002950| 69 6d 70 5f 43 6c 6f 73 | 65 44 6f 77 6e 22 2c 2c |imp_Clos|eDown",,|
|00002960| 26 34 42 35 33 34 31 35 | 34 0d 01 23 2b f2 72 65 |&4B53415|4..#+.re|
|00002970| 61 64 73 6f 75 6e 64 3a | c8 99 20 22 53 6f 75 6e |adsound:|.. "Soun|
|00002980| 64 5f 43 6f 6e 66 69 67 | 75 72 65 22 2c 32 2c 30 |d_Config|ure",2,0|
|00002990| 2c 31 30 30 0d 01 24 15 | 2a 43 68 61 6e 6e 65 6c |,100..$.|*Channel|
|000029a0| 56 6f 69 63 65 20 31 20 | 32 0d 01 25 15 2a 43 68 |Voice 1 |2..%.*Ch|
|000029b0| 61 6e 6e 65 6c 56 6f 69 | 63 65 20 32 20 36 0d 01 |annelVoi|ce 2 6..|
|000029c0| 26 1e c8 99 20 22 53 6f | 75 6e 64 5f 56 6f 6c 75 |&... "So|und_Volu|
|000029d0| 6d 65 22 2c 31 32 37 3a | 4f 25 3d 31 0d 01 27 0f |me",127:|O%=1..'.|
|000029e0| d3 3d 6f 6c 64 68 69 6d | 65 6d 25 0d 01 28 12 e7 |.=oldhim|em%..(..|
|000029f0| 20 a4 69 73 63 67 61 6f | 6e 6c 79 20 8c 0d 01 29 | .iscgao|nly ...)|
|00002a00| 10 eb 31 32 3a 48 25 21 | 26 46 30 3d 31 0d 01 2a |..12:H%!|&F0=1..*|
|00002a10| 05 cc 0d 01 2b 10 eb 32 | 37 3a 48 25 21 26 46 30 |....+..2|7:H%!&F0|
|00002a20| 3d 32 0d 01 2c 05 cd 0d | 01 2d 3c f2 70 61 6c 65 |=2..,...|.-<.pale|
|00002a30| 74 74 65 3a ef 32 36 3a | ef 31 38 2c 30 2c 31 33 |tte:.26:|.18,0,13|
|00002a40| 31 3a e3 6b 25 3d 32 b8 | 31 88 2d 31 3a c8 99 22 |1:.k%=2.|1.-1:.."|
|00002a50| 4f 53 5f 42 79 74 65 22 | 2c 31 31 32 2c 6b 25 3a |OS_Byte"|,112,k%:|
|00002a60| da 3a ed 0d 01 2e 63 ee | 85 20 c8 99 22 4f 53 5f |.:....c.|. .."OS_|
|00002a70| 42 79 74 65 22 2c 32 35 | 30 2c 30 2c 32 35 35 20 |Byte",25|0,0,255 |
|00002a80| b8 20 2c 73 63 72 25 3a | c8 99 22 4f 53 5f 42 79 |. ,scr%:|.."OS_By|
|00002a90| 74 65 22 2c 31 31 33 2c | 73 63 72 25 3a f1 20 f6 |te",113,|scr%:. .|
|00002aa0| 24 2b 22 20 28 49 6e 74 | 65 72 6e 61 6c 20 65 72 |$+" (Int|ernal er|
|00002ab0| 72 6f 72 20 63 6f 64 65 | 20 22 2b c3 9e 2b 22 29 |ror code| "+..+")|
|00002ac0| 22 2b bd 30 3a e0 0d 01 | 2f 0e f2 63 68 65 63 6b |"+.0:...|/..check|
|00002ad0| 61 72 6d 33 0d 01 30 19 | c8 99 20 22 4f 53 5f 52 |arm3..0.|.. "OS_R|
|00002ae0| 65 6d 6f 76 65 43 75 72 | 73 6f 72 73 22 0d 01 31 |emoveCur|sors"..1|
|00002af0| 1a de 20 69 6e 70 75 74 | 5f 64 69 73 6b 5f 6e 61 |.. input|_disk_na|
|00002b00| 6d 65 25 20 32 35 36 0d | 01 32 20 f2 70 75 6c 6c |me% 256.|.2 .pull|
|00002b10| 5f 76 61 72 69 61 62 6c | 65 73 3a f2 69 6e 69 74 |_variabl|es:.init|
|00002b20| 69 61 6c 6c 69 73 65 0d | 01 33 0e f4 50 52 4f 43 |iallise.|.3..PROC|
|00002b30| 74 69 74 6c 65 0d 01 34 | 43 e3 6a 25 3d 33 32 b8 |title..4|C.j%=32.|
|00002b40| 31 32 36 3a f2 77 6f 72 | 64 73 28 39 32 30 2c 2d |126:.wor|ds(920,-|
|00002b50| 32 30 30 2c 2d 31 2c bd | 28 6a 25 29 29 3a f2 77 |200,-1,.|(j%)):.w|
|00002b60| 6f 72 64 73 28 39 32 30 | 2c 2d 32 30 30 2c 30 2c |ords(920|,-200,0,|
|00002b70| bd 28 6a 25 29 29 3a ed | 0d 01 35 0e f4 50 52 4f |.(j%)):.|..5..PRO|
|00002b80| 43 67 6f 5f 6f 6e 0d 01 | 36 09 f2 6c 69 6e 6b 0d |Cgo_on..|6..link.|
|00002b90| 01 37 05 e0 0d 01 38 04 | 0d 01 39 0f dd f2 63 68 |.7....8.|..9...ch|
|00002ba0| 65 63 6b 61 72 6d 33 0d | 01 3a 0c 48 25 21 26 44 |eckarm3.|.:.H%!&D|
|00002bb0| 43 3d 30 0d 01 3b 09 74 | 31 25 3d 91 0d 01 3c 11 |C=0..;.t|1%=...<.|
|00002bc0| e3 6b 25 3d 30 b8 32 30 | 30 30 30 3a ed 0d 01 3d |.k%=0.20|000:...=|
|00002bd0| 09 74 32 25 3d 91 0d 01 | 3e 1a e7 28 74 32 25 2d |.t2%=...|>..(t2%-|
|00002be0| 74 31 25 29 3c 31 35 3a | 48 25 21 26 44 43 3d 31 |t1%)<15:|H%!&DC=1|
|00002bf0| 0d 01 3f 05 e1 0d 01 40 | 04 0d 01 41 14 dd f2 70 |..?....@|...A...p|
|00002c00| 75 6c 6c 5f 76 61 72 69 | 61 62 6c 65 73 0d 01 42 |ull_vari|ables..B|
|00002c10| 14 66 6f 6e 74 73 25 3d | 21 28 48 25 2b 26 30 30 |.fonts%=|!(H%+&00|
|00002c20| 29 0d 01 43 16 6c 65 74 | 74 65 72 73 25 3d 21 28 |)..C.let|ters%=!(|
|00002c30| 48 25 2b 26 30 34 29 0d | 01 44 18 73 70 5f 6f 6e |H%+&04).|.D.sp_on|
|00002c40| 5f 76 67 61 25 3d 21 28 | 48 25 2b 26 30 38 29 0d |_vga%=!(|H%+&08).|
|00002c50| 01 45 15 70 75 74 5f 73 | 70 25 3d 21 28 48 25 2b |.E.put_s|p%=!(H%+|
|00002c60| 26 30 43 29 0d 01 46 16 | 73 70 5f 6e 61 6d 65 25 |&0C)..F.|sp_name%|
|00002c70| 3d 21 28 48 25 2b 26 31 | 30 29 0d 01 47 15 64 72 |=!(H%+&1|0)..G.dr|
|00002c80| 61 77 69 74 25 3d 21 28 | 48 25 2b 26 31 34 29 0d |awit%=!(|H%+&14).|
|00002c90| 01 48 16 63 6f 70 79 73 | 63 72 25 3d 21 28 48 25 |.H.copys|cr%=!(H%|
|00002ca0| 2b 26 31 38 29 0d 01 49 | 17 63 72 75 6e 63 68 73 |+&18)..I|.crunchs|
|00002cb0| 70 25 3d 21 28 48 25 2b | 26 31 43 29 0d 01 4a 17 |p%=!(H%+|&1C)..J.|
|00002cc0| 65 78 70 61 6e 64 73 70 | 25 3d 21 28 48 25 2b 26 |expandsp|%=!(H%+&|
|00002cd0| 32 30 29 0d 01 4b 16 63 | 73 70 6e 61 6d 65 25 3d |20)..K.c|spname%=|
|00002ce0| 21 28 48 25 2b 26 32 34 | 29 0d 01 4c 16 6e 73 70 |!(H%+&24|)..L.nsp|
|00002cf0| 6e 61 6d 65 25 3d 21 28 | 48 25 2b 26 32 38 29 0d |name%=!(|H%+&28).|
|00002d00| 01 4d 18 62 6c 6f 77 75 | 70 73 63 72 25 3d 21 28 |.M.blowu|pscr%=!(|
|00002d10| 48 25 2b 26 32 43 29 0d | 01 4e 18 73 70 5f 6f 6e |H%+&2C).|.N.sp_on|
|00002d20| 5f 63 67 61 25 3d 21 28 | 48 25 2b 26 33 30 29 0d |_cga%=!(|H%+&30).|
|00002d30| 01 4f 17 73 63 72 6f 6c | 6c 64 6e 25 3d 21 28 48 |.O.scrol|ldn%=!(H|
|00002d40| 25 2b 26 33 34 29 0d 01 | 50 17 73 63 72 6f 6c 6c |%+&34)..|P.scroll|
|00002d50| 75 70 25 3d 21 28 48 25 | 2b 26 33 38 29 0d 01 51 |up%=!(H%|+&38)..Q|
|00002d60| 16 63 6f 70 69 72 6f 77 | 25 3d 21 28 48 25 2b 26 |.copirow|%=!(H%+&|
|00002d70| 33 43 29 0d 01 52 04 0d | 01 53 1b 41 52 45 41 25 |3C)..R..|.S.AREA%|
|00002d80| 3d 48 25 2b 34 2a 31 30 | 32 34 3a f4 20 34 4b 20 |=H%+4*10|24:. 4K |
|00002d90| 6d 63 0d 01 54 05 e1 0d | 01 55 04 0d 01 56 11 dd |mc..T...|.U...V..|
|00002da0| f2 69 6e 69 74 69 61 6c | 6c 69 73 65 0d 01 57 1a |.initial|lise..W.|
|00002db0| de 20 69 6e 70 75 74 5f | 64 69 73 6b 5f 6e 61 6d |. input_|disk_nam|
|00002dc0| 65 25 20 32 35 36 0d 01 | 58 16 f4 44 49 4d 20 73 |e% 256..|X..DIM s|
|00002dd0| 6f 75 6e 64 76 6f 6c 25 | 28 31 35 29 0d 01 59 0f |oundvol%|(15)..Y.|
|00002de0| f4 52 45 53 54 4f 52 45 | 20 2b 30 0d 01 5a 43 f4 |.RESTORE| +0..ZC.|
|00002df0| 44 41 54 41 20 31 2c 36 | 33 2c 37 39 2c 38 38 2c |DATA 1,6|3,79,88,|
|00002e00| 39 35 2c 31 30 30 2c 31 | 30 34 2c 31 30 38 2c 31 |95,100,1|04,108,1|
|00002e10| 31 31 2c 31 31 34 2c 31 | 31 37 2c 31 32 30 2c 31 |11,114,1|17,120,1|
|00002e20| 32 32 2c 31 32 34 2c 31 | 32 36 2c 31 32 37 0d 01 |22,124,1|26,127..|
|00002e30| 5b 27 f4 46 4f 52 69 25 | 3d 30 54 4f 31 35 3a 52 |['.FORi%|=0TO15:R|
|00002e40| 45 41 44 73 6f 75 6e 64 | 76 6f 6c 25 28 69 25 29 |EADsound|vol%(i%)|
|00002e50| 3a 4e 45 58 54 0d 01 5c | 24 21 41 52 45 41 25 3d |:NEXT..\|$!AREA%=|
|00002e60| 28 32 31 36 2a 31 30 32 | 34 29 2b 35 31 32 3a 41 |(216*102|4)+512:A|
|00002e70| 52 45 41 25 21 38 3d 31 | 36 0d 01 5d 2b f4 50 52 |REA%!8=1|6..]+.PR|
|00002e80| 4f 43 70 61 6c 65 74 74 | 65 3a 21 41 52 45 41 25 |OCpalett|e:!AREA%|
|00002e90| 3d 32 32 30 2a 31 30 32 | 34 3a 41 52 45 41 25 21 |=220*102|4:AREA%!|
|00002ea0| 38 3d 31 36 0d 01 5e 49 | de 20 53 43 41 4c 45 25 |8=16..^I|. SCALE%|
|00002eb0| 20 31 36 3a 53 43 41 4c | 45 25 21 30 3d 31 36 3a | 16:SCAL|E%!0=16:|
|00002ec0| 53 43 41 4c 45 25 21 34 | 3d 31 36 2a 28 48 25 21 |SCALE%!4|=16*(H%!|
|00002ed0| 26 46 30 29 3a 53 43 41 | 4c 45 25 21 38 3d 31 36 |&F0):SCA|LE%!8=16|
|00002ee0| 3a 53 43 41 4c 45 25 21 | 31 32 3d 31 36 0d 01 5f |:SCALE%!|12=16.._|
|00002ef0| 1f c8 99 20 22 4f 53 5f | 53 70 72 69 74 65 4f 70 |... "OS_|SpriteOp|
|00002f00| 22 2c 26 31 30 39 2c 41 | 52 45 41 25 0d 01 60 29 |",&109,A|REA%..`)|
|00002f10| c8 99 20 22 4f 53 5f 42 | 79 74 65 22 2c 31 31 33 |.. "OS_B|yte",113|
|00002f20| 2c 31 3a c8 99 20 22 4f | 53 5f 42 79 74 65 22 2c |,1:.. "O|S_Byte",|
|00002f30| 31 31 32 2c 32 0d 01 61 | 22 21 62 6c 6b 25 3d 31 |112,2..a|"!blk%=1|
|00002f40| 34 39 3a 62 6c 6b 25 21 | 34 3d 31 34 38 3a 62 6c |49:blk%!|4=148:bl|
|00002f50| 6b 25 21 38 3d 2d 31 0d | 01 62 26 c8 99 20 22 4f |k%!8=-1.|.b&.. "O|
|00002f60| 53 5f 52 65 61 64 56 64 | 75 56 61 72 69 61 62 6c |S_ReadVd|uVariabl|
|00002f70| 65 73 22 2c 62 6c 6b 25 | 2c 62 6c 6b 25 0d 01 63 |es",blk%|,blk%..c|
|00002f80| 24 21 28 48 25 2b 26 43 | 30 29 3d 21 62 6c 6b 25 |$!(H%+&C|0)=!blk%|
|00002f90| 3a 21 28 48 25 2b 26 43 | 34 29 3d 62 6c 6b 25 21 |:!(H%+&C|4)=blk%!|
|00002fa0| 34 0d 01 64 42 e7 21 28 | 48 25 2b 26 46 30 29 3d |4..dB.!(|H%+&F0)=|
|00002fb0| 31 3a 48 25 21 26 43 30 | 3d 28 48 25 21 26 43 30 |1:H%!&C0|=(H%!&C0|
|00002fc0| 29 2b 28 31 36 2a 33 32 | 30 29 3a 48 25 21 26 43 |)+(16*32|0):H%!&C|
|00002fd0| 34 3d 28 48 25 21 26 43 | 34 29 2b 28 31 36 2a 33 |4=(H%!&C|4)+(16*3|
|00002fe0| 32 30 29 0d 01 65 16 c8 | 99 20 22 4f 53 5f 42 79 |20)..e..|. "OS_By|
|00002ff0| 74 65 22 2c 31 31 32 2c | 31 0d 01 66 37 21 28 48 |te",112,|1..f7!(H|
|00003000| 25 2b 26 43 38 29 3d 41 | 52 45 41 25 20 3a 20 f4 |%+&C8)=A|REA% : .|
|00003010| 20 73 74 6f 72 65 20 73 | 74 61 72 74 20 6f 66 20 | store s|tart of |
|00003020| 55 73 65 72 20 73 70 72 | 69 74 65 20 61 72 65 61 |User spr|ite area|
|00003030| 0d 01 67 0c 61 61 3d b3 | 28 2d 91 29 0d 01 68 2b |..g.aa=.|(-.)..h+|
|00003040| 6c 65 66 74 25 3d 31 32 | 3a 6c 6f 77 25 3d 32 35 |left%=12|:low%=25|
|00003050| 36 3a 72 69 67 68 74 25 | 3d 31 32 36 37 3a 68 69 |6:right%|=1267:hi|
|00003060| 67 68 25 3d 39 34 37 0d | 01 69 05 e1 0d 01 6a 04 |gh%=947.|.i....j.|
|00003070| 0d 01 6b 0d dd f2 70 61 | 6c 65 74 74 65 0d 01 6c |..k...pa|lette..l|
|00003080| 08 f7 20 2b 30 0d 01 6d | 9e dc 20 32 35 35 2c 32 |.. +0..m|.. 255,2|
|00003090| 35 35 2c 32 35 35 2c 31 | 37 30 2c 31 37 30 2c 31 |55,255,1|70,170,1|
|000030a0| 37 30 2c 31 30 32 2c 31 | 30 32 2c 31 30 32 2c 30 |70,102,1|02,102,0|
|000030b0| 2c 30 2c 30 2c 30 2c 30 | 2c 31 35 33 2c 30 2c 35 |,0,0,0,0|,153,0,5|
|000030c0| 31 2c 32 35 35 2c 30 2c | 32 30 34 2c 32 35 35 2c |1,255,0,|204,255,|
|000030d0| 32 35 35 2c 31 33 36 2c | 30 2c 32 32 31 2c 30 2c |255,136,|0,221,0,|
|000030e0| 30 2c 32 35 35 2c 32 35 | 35 2c 30 2c 31 33 36 2c |0,255,25|5,0,136,|
|000030f0| 31 37 2c 30 2c 32 35 35 | 2c 32 30 34 2c 31 35 33 |17,0,255|,204,153|
|00003100| 2c 30 2c 31 31 39 2c 33 | 34 2c 30 2c 31 38 37 2c |,0,119,3|4,0,187,|
|00003110| 30 2c 30 2c 32 35 35 2c | 33 34 2c 31 38 37 2c 38 |0,0,255,|34,187,8|
|00003120| 35 2c 30 0d 01 6e 32 e3 | 20 69 25 3d 30 20 b8 20 |5,0..n2.| i%=0 . |
|00003130| 31 35 3a f3 20 72 25 2c | 20 67 25 2c 20 62 25 3a |15:. r%,| g%, b%:|
|00003140| ef 20 31 39 2c 69 25 2c | 31 36 2c 72 25 2c 67 25 |. 19,i%,|16,r%,g%|
|00003150| 2c 62 25 3a ed 0d 01 6f | 05 e1 0d 01 70 04 0d 01 |,b%:...o|....p...|
|00003160| 71 0a dd f2 6c 69 6e 6b | 0d 01 72 5a e7 59 25 3d |q...link|..rZ.Y%=|
|00003170| 30 20 74 65 73 74 25 3d | 30 3a f5 3a f2 66 6c 6f |0 test%=|0:.:.flo|
|00003180| 70 70 79 5f 64 69 73 6b | 28 22 41 5a 54 45 43 20 |ppy_disk|("AZTEC |
|00003190| 44 45 4d 4f 22 2c 22 24 | 2e 21 41 5a 54 45 43 53 |DEMO","$|.!AZTECS|
|000031a0| 2e 4f 4e 45 2e 64 65 6d | 6f 31 22 2c 22 24 2e 21 |.ONE.dem|o1","$.!|
|000031b0| 41 7a 74 65 63 73 22 29 | 3a fd 65 72 72 6f 72 25 |Aztecs")|:.error%|
|000031c0| 3d 30 0d 01 73 2d 66 69 | 6c 65 24 3d 22 3c 41 7a |=0..s-fi|le$="<Az|
|000031d0| 74 65 63 24 63 68 61 69 | 6e 64 69 72 3e 2e 4f 4e |tec$chai|ndir>.ON|
|000031e0| 45 2e 64 65 6d 6f 31 22 | 3a 2a 46 58 32 32 39 0d |E.demo1"|:*FX229.|
|000031f0| 01 74 0d 2a 46 58 32 32 | 30 2c 31 37 0d 01 75 1c |.t.*FX22|0,17..u.|
|00003200| 41 25 3d 6d 65 6d 74 6f | 70 25 2b 34 3a d0 3d 41 |A%=memto|p%+4:.=A|
|00003210| 25 3a d7 66 69 6c 65 24 | 0d 01 76 05 fa 0d 01 77 |%:.file$|..v....w|
|00003220| 04 0d 01 78 24 dd f2 66 | 6c 6f 70 70 79 5f 64 69 |...x$..f|loppy_di|
|00003230| 73 6b 28 64 6e 61 6d 65 | 24 2c 70 61 74 68 24 2c |sk(dname|$,path$,|
|00003240| 73 65 74 24 29 0d 01 79 | 3a c8 99 20 22 4f 53 5f |set$)..y|:.. "OS_|
|00003250| 53 70 72 69 74 65 4f 70 | 22 2c 26 31 31 30 2c 41 |SpriteOp|",&110,A|
|00003260| 52 45 41 25 2c 22 6c 6f | 61 64 73 63 22 2c 30 2c |REA%,"lo|adsc",0,|
|00003270| 34 30 30 2c 34 33 36 2c | 38 38 30 2c 36 33 36 0d |400,436,|880,636.|
|00003280| 01 7a 06 ea 85 0d 01 7b | 72 ee 85 ea 3a f7 20 85 |.z.....{|r...:. .|
|00003290| 3a c8 99 20 22 4f 53 5f | 53 70 72 69 74 65 4f 70 |:.. "OS_|SpriteOp|
|000032a0| 22 2c 26 31 33 34 2c 41 | 52 45 41 25 2c 22 6c 6f |",&134,A|REA%,"lo|
|000032b0| 61 64 73 63 22 2c 34 30 | 30 2c 34 33 36 2c 30 3a |adsc",40|0,436,0:|
|000032c0| c8 99 20 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 |.. "OS_S|priteOp"|
|000032d0| 2c 26 31 31 39 2c 41 52 | 45 41 25 2c 22 6c 6f 61 |,&119,AR|EA%,"loa|
|000032e0| 64 73 63 22 3a 65 72 72 | 6f 72 25 3d 31 3a 74 65 |dsc":err|or%=1:te|
|000032f0| 73 74 25 3d 31 3a e1 0d | 01 7c 8a f4 4f 4e 45 52 |st%=1:..|.|..ONER|
|00003300| 52 4f 52 4c 4f 43 41 4c | 20 53 59 53 22 4f 53 5f |RORLOCAL| SYS"OS_|
|00003310| 42 79 74 65 22 2c 32 35 | 30 2c 30 2c 32 35 35 20 |Byte",25|0,0,255 |
|00003320| 54 4f 20 2c 73 63 72 25 | 3a 53 59 53 22 4f 53 5f |TO ,scr%|:SYS"OS_|
|00003330| 42 79 74 65 22 2c 31 31 | 33 2c 73 63 72 25 3a 50 |Byte",11|3,scr%:P|
|00003340| 52 49 4e 54 20 52 45 50 | 4f 52 54 24 2b 22 20 28 |RINT REP|ORT$+" (|
|00003350| 49 6e 74 65 72 6e 61 6c | 20 65 72 72 6f 72 20 63 |Internal| error c|
|00003360| 6f 64 65 20 22 2b 53 54 | 52 24 45 52 4c 2b 22 29 |ode "+ST|R$ERL+")|
|00003370| 22 2b 43 48 52 24 30 3a | 78 3d 47 45 54 3a 45 4e |"+CHR$0:|x=GET:EN|
|00003380| 44 0d 01 7d 05 f5 0d 01 | 7e 0e 20 20 65 72 72 6f |D..}....|~. erro|
|00003390| 72 25 3d 30 0d 01 7f 10 | 20 20 e7 74 65 73 74 25 |r%=0....| .test%|
|000033a0| 3d 31 20 8c 0d 01 80 21 | 20 20 20 20 f2 62 6f 72 |=1 ....!| .bor|
|000033b0| 64 65 72 73 28 34 30 30 | 2c 34 33 36 2c 38 38 30 |ders(400|,436,880|
|000033c0| 2c 36 33 36 29 0d 01 81 | 13 20 20 20 20 f2 6d 6f |,636)...|. .mo|
|000033d0| 75 73 65 5f 66 75 6c 6c | 0d 01 82 2d 20 20 20 20 |use_full|...- |
|000033e0| f2 77 6f 72 64 73 28 34 | 33 30 2c 35 37 32 2c 2d |.words(4|30,572,-|
|000033f0| 31 2c 22 50 6c 65 61 73 | 65 20 70 6c 61 63 65 20 |1,"Pleas|e place |
|00003400| 74 68 65 22 29 0d 01 83 | 21 20 20 20 20 f2 77 6f |the")...|! .wo|
|00003410| 72 64 73 28 34 33 30 2c | 35 31 38 2c 2d 31 2c 64 |rds(430,|518,-1,d|
|00003420| 6e 61 6d 65 24 29 0d 01 | 84 19 20 20 20 20 6f 6b |name$)..|.. ok|
|00003430| 78 25 3d 37 36 30 3a 6f | 6b 79 25 3d 34 35 36 0d |x%=760:o|ky%=456.|
|00003440| 01 85 49 20 20 20 20 e6 | 30 2c 33 3a ef 32 35 2c |..I .|0,3:.25,|
|00003450| 34 2c 6f 6b 78 25 3b 6f | 6b 79 25 3b 32 35 2c 31 |4,okx%;o|ky%;25,1|
|00003460| 2c 31 30 30 3b 30 3b 32 | 35 2c 31 2c 30 3b 35 36 |,100;0;2|5,1,0;56|
|00003470| 3b 32 35 2c 31 2c 2d 31 | 30 30 3b 30 3b 32 35 2c |;25,1,-1|00;0;25,|
|00003480| 31 2c 30 3b 2d 35 36 3b | 0d 01 86 2d 20 20 20 20 |1,0;-56;|...- |
|00003490| e6 30 2c 30 3a ef 32 35 | 2c 34 2c 6f 6b 78 25 2b |.0,0:.25|,4,okx%+|
|000034a0| 32 3b 6f 6b 79 25 2b 34 | 3b 32 35 2c 39 37 2c 39 |2;oky%+4|;25,97,9|
|000034b0| 36 3b 34 38 3b 0d 01 87 | 32 20 20 20 20 f2 77 6f |6;48;...|2 .wo|
|000034c0| 72 64 73 28 34 33 30 2c | 34 36 34 2c 2d 31 2c 22 |rds(430,|464,-1,"|
|000034d0| 64 69 73 6b 20 69 6e 20 | 64 72 69 76 65 20 30 20 |disk in |drive 0 |
|000034e0| 20 20 20 4f 4b 22 29 0d | 01 88 0b 20 20 20 20 c8 | OK").|... .|
|000034f0| 97 ee 0d 01 89 51 20 20 | 20 20 f5 3a c8 97 6d 78 |.....Q | .:..mx|
|00003500| 25 2c 6d 79 25 2c 6d 63 | 25 3a fd 6d 63 25 3d 34 |%,my%,mc|%:.mc%=4|
|00003510| 20 80 20 6d 78 25 3e 6f | 6b 78 25 20 80 20 6d 78 | . mx%>o|kx% . mx|
|00003520| 25 3c 6f 6b 78 25 2b 31 | 30 30 20 80 20 6d 79 25 |%<okx%+1|00 . my%|
|00003530| 3e 6f 6b 79 25 20 80 20 | 6d 79 25 3c 6f 6b 79 25 |>oky% . |my%<oky%|
|00003540| 2b 35 38 0d 01 8a 07 20 | 20 cd 0d 01 8b 0b 20 20 |+58.... | ..... |
|00003550| 2a 41 44 46 53 0d 01 8c | 0e 20 20 2a 4d 4f 55 4e |*ADFS...|. *MOUN|
|00003560| 54 20 30 0d 01 8d 25 20 | 20 c8 99 22 4f 53 5f 47 |T 0...% | .."OS_G|
|00003570| 42 50 42 22 2c 35 2c 2c | 69 6e 70 75 74 5f 64 69 |BPB",5,,|input_di|
|00003580| 73 6b 5f 6e 61 6d 65 25 | 0d 01 8e 29 20 20 6c 65 |sk_name%|...) le|
|00003590| 6e 5f 64 5f 6e 25 3d 3f | 69 6e 70 75 74 5f 64 69 |n_d_n%=?|input_di|
|000035a0| 73 6b 5f 6e 61 6d 65 25 | 3a 6e 61 6d 65 24 3d 22 |sk_name%|:name$="|
|000035b0| 22 0d 01 8f 15 20 20 e3 | 64 6e 25 3d 31 b8 6c 65 |".... .|dn%=1.le|
|000035c0| 6e 5f 64 5f 6e 25 0d 01 | 90 48 20 20 e7 3f 28 69 |n_d_n%..|.H .?(i|
|000035d0| 6e 70 75 74 5f 64 69 73 | 6b 5f 6e 61 6d 65 25 2b |nput_dis|k_name%+|
|000035e0| 64 6e 25 29 3e 33 31 3a | 6e 61 6d 65 24 3d 6e 61 |dn%)>31:|name$=na|
|000035f0| 6d 65 24 2b bd 28 3f 28 | 69 6e 70 75 74 5f 64 69 |me$+.(?(|input_di|
|00003600| 73 6b 5f 6e 61 6d 65 25 | 2b 64 6e 25 29 29 0d 01 |sk_name%|+dn%))..|
|00003610| 91 07 20 20 ed 0d 01 92 | 22 20 20 6e 61 6d 65 24 |.. ....|" name$|
|00003620| 3d a4 63 6f 6e 76 65 72 | 74 74 6f 6c 6f 77 65 72 |=.conver|ttolower|
|00003630| 28 6e 61 6d 65 24 29 0d | 01 93 34 20 20 c8 99 20 |(name$).|..4 .. |
|00003640| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 26 31 |"OS_Spri|teOp",&1|
|00003650| 32 32 2c 41 52 45 41 25 | 2c 22 6c 6f 61 64 73 63 |22,AREA%|,"loadsc|
|00003660| 22 2c 34 30 30 2c 34 33 | 36 2c 30 0d 01 94 20 20 |",400,43|6,0... |
|00003670| 20 e7 6e 61 6d 65 24 3c | 3e 22 61 77 66 65 62 39 | .name$<|>"awfeb9|
|00003680| 34 22 3a 65 72 72 6f 72 | 25 3d 31 0d 01 95 0d 20 |4":error|%=1.... |
|00003690| 20 74 65 73 74 25 3d 31 | 0d 01 96 21 20 20 ff 22 | test%=1|...! ."|
|000036a0| 53 45 54 20 41 7a 74 65 | 63 24 63 68 61 69 6e 64 |SET Azte|c$chaind|
|000036b0| 69 72 20 22 2b 73 65 74 | 24 0d 01 97 22 20 20 c8 |ir "+set|$..." .|
|000036c0| 99 20 22 58 4f 53 5f 46 | 69 6e 64 22 2c 26 34 30 |. "XOS_F|ind",&40|
|000036d0| 2c 70 61 74 68 24 20 b8 | 20 68 25 0d 01 98 17 fd |,path$ .| h%.....|
|000036e0| 68 25 80 28 65 72 72 6f | 72 25 3d 30 29 3a d9 23 |h%.(erro|r%=0):.#|
|000036f0| 68 25 0d 01 99 32 c8 99 | 20 22 4f 53 5f 53 70 72 |h%...2..| "OS_Spr|
|00003700| 69 74 65 4f 70 22 2c 26 | 31 32 32 2c 41 52 45 41 |iteOp",&|122,AREA|
|00003710| 25 2c 22 6c 6f 61 64 73 | 63 22 2c 34 30 30 2c 34 |%,"loads|c",400,4|
|00003720| 33 36 2c 30 0d 01 9a 28 | c8 99 20 22 4f 53 5f 53 |36,0...(|.. "OS_S|
|00003730| 70 72 69 74 65 4f 70 22 | 2c 26 31 31 39 2c 41 52 |priteOp"|,&119,AR|
|00003740| 45 41 25 2c 22 6c 6f 61 | 64 73 63 22 0d 01 9b 07 |EA%,"loa|dsc"....|
|00003750| f7 20 85 0d 01 9c 05 e1 | 0d 01 9d 04 0d 01 9e 1e |. ......|........|
|00003760| dd f2 77 6f 72 64 73 28 | 41 25 2c 42 25 2c 62 69 |..words(|A%,B%,bi|
|00003770| 67 25 2c 77 6f 72 64 73 | 24 29 0d 01 9f 2c 45 25 |g%,words|$)...,E%|
|00003780| 3d 33 3a e7 62 69 67 25 | 3a 43 25 3d 33 32 30 3a |=3:.big%|:C%=320:|
|00003790| 44 25 3d 33 36 30 3a 8b | 3a 43 25 3d 32 34 30 3a |D%=360:.|:C%=240:|
|000037a0| 44 25 3d 32 37 30 0d 01 | a0 42 e3 6c 65 74 74 25 |D%=270..|.B.lett%|
|000037b0| 3d 31 b8 a9 28 77 6f 72 | 64 73 24 29 3a 3f 28 6c |=1..(wor|ds$):?(l|
|000037c0| 65 74 74 65 72 73 25 2b | 28 6c 65 74 74 25 2d 31 |etters%+|(lett%-1|
|000037d0| 29 29 3d 97 28 c1 77 6f | 72 64 73 24 2c 6c 65 74 |))=.(.wo|rds$,let|
|000037e0| 74 25 2c 31 29 29 3a ed | 0d 01 a1 1d 3f 28 6c 65 |t%,1)):.|....?(le|
|000037f0| 74 74 65 72 73 25 2b a9 | 28 77 6f 72 64 73 24 29 |tters%+.|(words$)|
|00003800| 29 3d 26 30 44 0d 01 a2 | 0c d6 20 66 6f 6e 74 73 |)=&0D...|.. fonts|
|00003810| 25 0d 01 a3 05 e1 0d 01 | a4 04 0d ff 46 69 6c 65 |%.......|....File|
|00003820| 44 61 74 61 82 21 53 50 | 52 49 54 45 53 00 54 00 |Data.!SP|RITES.T.|
|00003830| 5c 05 00 00 44 f9 ff ff | 27 25 21 94 03 00 aa 60 |\...D...|'%!....`|
|00003840| 04 00 00 00 10 00 00 00 | 60 05 00 00 94 01 00 00 |........|`.......|
|00003850| 21 61 7a 74 65 63 73 00 | 00 00 00 00 04 00 00 00 |!aztecs.|........|
|00003860| 11 00 00 00 00 00 00 00 | 0f 00 00 00 2c 00 00 00 |........|....,...|
|00003870| 2c 00 00 00 0c 00 00 00 | 77 77 77 77 77 77 77 77 |,.......|wwwwwwww|
|00003880| 77 77 77 77 77 77 77 77 | 77 77 11 11 71 88 88 88 |wwwwwwww|ww..q...|
|00003890| 88 88 88 88 88 88 88 88 | 88 88 88 88 88 17 11 11 |........|........|
|000038a0| 11 87 88 88 88 88 88 88 | 88 88 88 88 88 88 88 88 |........|........|
|000038b0| 78 11 11 11 11 71 77 77 | 77 77 77 77 77 77 77 77 |x....qww|wwwwwwww|
|000038c0| 77 77 77 77 17 11 11 11 | 11 97 79 99 c7 cc cc cc |wwww....|..y.....|
|000038d0| cc cc cc cc cc 7c 99 97 | 79 11 11 11 71 99 97 79 |.....|..|y...q..y|
|000038e0| 7c 77 77 77 cc cc 77 77 | 77 c7 97 79 99 17 77 77 ||www..ww|w..y..ww|
|000038f0| 97 79 99 c7 07 00 07 00 | c7 7c 00 70 00 70 7c 99 |.y......|.|.p.p|.|
|00003900| 97 79 77 77 97 79 99 c7 | 7c 77 77 77 cc cc 77 77 |.yww.y..||www..ww|
|00003910| 77 c7 7c 99 97 79 77 77 | 97 79 99 c7 cc cc cc 7c |w.|..yww|.y.....||
|00003920| cc cc c7 cc cc cc 7c 99 | 97 79 11 11 97 77 77 77 |......|.|.y...www|
|00003930| c7 cc cc c7 cc cc 7c cc | cc 7c 77 77 77 79 11 11 |......|.|.|wwwy..|
|00003940| 71 ff ff ff 7f cc cc 7c | 77 77 c7 cc cc f7 ff ff |q......||ww......|
|00003950| ff 17 11 11 f7 ff 77 f7 | ff c7 cc cc cc cc cc cc |......w.|........|
|00003960| 7c ff 7f 77 ff 7f 11 11 | 71 7f aa 7a 7f cc 7c 77 ||..w....|q..z..|w|
|00003970| 77 77 77 c7 cc f7 a7 aa | f7 17 11 11 11 77 aa 7a |www.....|.....w.z|
|00003980| c7 cc 07 70 bb bb 07 70 | cc 7c a7 aa 77 11 11 11 |...p...p|.|..w...|
|00003990| 11 71 aa 7a c7 cc 7c b7 | bb bb 7b c7 cc 7c a7 aa |.q.z..|.|..{..|..|
|000039a0| 17 11 11 11 11 71 aa 7a | 71 c7 cc b7 bb bb 7b cc |.....q.z|q.....{.|
|000039b0| 7c 17 a7 aa 17 11 11 11 | 11 11 77 17 11 71 77 b7 ||.......|..w..qw.|
|000039c0| bb bb 7b 77 17 11 71 77 | 11 11 11 11 11 11 11 11 |..{w..qw|........|
|000039d0| 11 11 11 71 bb bb 17 11 | 11 11 11 11 11 11 88 88 |...q....|........|
|000039e0| 98 00 00 00 73 6d 21 61 | 7a 74 65 63 73 00 00 00 |....sm!a|ztecs...|
|000039f0| 02 00 00 00 08 00 00 00 | 00 00 00 00 17 00 00 00 |........|........|
|00003a00| 2c 00 00 00 2c 00 00 00 | 0c 00 00 00 88 88 88 88 |,...,...|........|
|00003a10| 88 88 88 88 88 88 88 f0 | 81 88 88 88 88 88 88 88 |........|........|
|00003a20| 88 88 18 f0 71 99 79 cc | cc cc cc cc 97 99 17 f0 |....q.y.|........|
|00003a30| 97 99 c7 7c 77 cc 77 c7 | 7c 99 79 f0 97 99 c7 77 |...|w.w.||.y....w|
|00003a40| 70 cc 07 77 7c 99 79 f0 | 77 77 c7 cc cc cc cc cc |p..w|.y.|ww......|
|00003a50| 7c 77 77 70 f7 ff 77 cc | 77 77 77 cc 77 ff 7f a0 ||wwp..w.|www.w...|
|00003a60| f7 ff 17 77 00 bb 00 77 | 71 ff 7f 90 71 77 11 11 |...w...w|q...qw..|
|00003a70| b7 bb 7b 11 11 77 17 88 | 00 02 00 00 66 69 6c 65 |..{..w..|....file|
|00003a80| 5f 61 65 38 00 00 00 00 | 04 00 00 00 10 00 00 00 |_ae8....|........|
|00003a90| 00 00 00 00 07 00 00 00 | ac 00 00 00 ac 00 00 00 |........|........|
|00003aa0| 0c 00 00 00 00 ff ff ff | 00 ff ff ff 00 dd dd dd |........|........|
|00003ab0| 00 dd dd dd 00 bb bb bb | 00 bb bb bb 00 99 99 99 |........|........|
|00003ac0| 00 99 99 99 00 77 77 77 | 00 77 77 77 00 55 55 55 |.....www|.www.UUU|
|00003ad0| 00 55 55 55 00 33 33 33 | 00 33 33 33 00 00 00 00 |.UUU.333|.333....|
|00003ae0| 00 00 00 00 00 00 44 99 | 00 00 44 99 00 ee ee 00 |......D.|..D.....|
|00003af0| 00 ee ee 00 00 00 cc 00 | 00 00 cc 00 00 dd 00 00 |........|........|
|00003b00| 00 dd 00 00 00 ee ee bb | 00 ee ee bb 00 55 88 00 |........|.....U..|
|00003b10| 00 55 88 00 00 ff bb 00 | 00 ff bb 00 00 00 bb ff |.U......|........|
|00003b20| 00 00 bb ff 77 77 77 77 | 77 77 77 77 77 77 77 77 |....wwww|wwwwwwww|
|00003b30| 77 77 77 77 77 00 00 00 | 77 00 00 00 00 00 00 00 |wwwww...|w.......|
|00003b40| 00 00 00 00 00 00 00 00 | 77 00 00 00 77 00 00 00 |........|w...w...|
|00003b50| 00 70 07 00 00 00 70 07 | 00 b0 0b 00 77 00 00 00 |.p....p.|....w...|
|00003b60| 77 00 00 00 00 70 07 00 | 00 00 70 07 b0 0b 00 00 |w....p..|..p.....|
|00003b70| 77 00 00 00 77 00 00 00 | 00 70 07 00 00 00 70 b7 |w...w...|.p....p.|
|00003b80| 0b 00 00 00 77 00 00 00 | 77 00 77 77 77 77 77 77 |....w...|w.wwwwww|
|00003b90| 77 77 b7 7b 77 77 77 00 | 77 00 00 00 77 00 00 00 |ww.{www.|w...w...|
|00003ba0| 00 70 07 00 00 b0 7b 07 | 00 00 00 00 77 00 00 00 |.p....{.|....w...|
|00003bb0| 77 00 00 00 00 70 07 00 | b0 0b 70 07 00 00 00 00 |w....p..|..p.....|
|00003bc0| 77 00 00 00 77 00 00 00 | 00 70 07 b0 0b 00 70 07 |w...w...|.p....p.|
|00003bd0| 00 00 00 00 77 00 00 00 | 77 00 00 00 00 70 b7 0b |....w...|w....p..|
|00003be0| 00 00 70 07 00 00 00 00 | 77 00 00 00 77 00 77 77 |..p.....|w...w.ww|
|00003bf0| 77 b7 7b 77 77 77 77 77 | 77 77 77 00 77 00 44 99 |w.{wwwww|www.w.D.|
|00003c00| 77 00 00 00 b0 7b 07 00 | 00 00 70 07 00 00 00 00 |w....{..|..p.....|
|00003c10| 77 55 88 00 77 00 00 b0 | 0b 70 07 00 00 00 70 07 |wU..w...|.p....p.|
|00003c20| 00 00 00 00 77 bb bb fb | 77 00 b0 0b 00 70 07 00 |....w...|w....p..|
|00003c30| 00 00 70 07 00 00 00 00 | 77 00 00 00 77 00 00 00 |..p.....|w...w...|
|00003c40| 00 00 00 00 00 00 00 00 | 00 00 00 00 77 ee ee fb |........|....w...|
|00003c50| 77 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |w.......|........|
|00003c60| 77 00 bb ff 77 77 77 77 | 77 77 77 77 77 77 77 77 |w...wwww|wwwwwwww|
|00003c70| 77 77 77 77 77 77 77 77 | 24 01 00 00 73 6d 61 6c |wwwwwwww|$...smal|
|00003c80| 6c 5f 61 65 38 00 00 00 | 02 00 00 00 09 00 00 00 |l_ae8...|........|
|00003c90| 00 00 00 00 07 00 00 00 | ac 00 00 00 ac 00 00 00 |........|........|
|00003ca0| 0c 00 00 00 00 ff ff ff | 00 ff ff ff 00 dd dd dd |........|........|
|00003cb0| 00 dd dd dd 00 bb bb bb | 00 bb bb bb 00 99 99 99 |........|........|
|00003cc0| 00 99 99 99 00 77 77 77 | 00 77 77 77 00 55 55 55 |.....www|.www.UUU|
|00003cd0| 00 55 55 55 00 33 33 33 | 00 33 33 33 00 00 00 00 |.UUU.333|.333....|
|00003ce0| 00 00 00 00 00 00 44 99 | 00 00 44 99 00 ee ee 00 |......D.|..D.....|
|00003cf0| 00 ee ee 00 00 00 cc 00 | 00 00 cc 00 00 dd 00 00 |........|........|
|00003d00| 00 dd 00 00 00 ee ee bb | 00 ee ee bb 00 55 88 00 |........|.....U..|
|00003d10| 00 55 88 00 00 ff bb 00 | 00 ff bb 00 00 00 bb ff |.U......|........|
|00003d20| 00 00 bb ff 77 77 77 77 | 77 77 77 77 77 00 00 00 |....wwww|wwwww...|
|00003d30| 77 00 00 05 00 50 00 0b | 77 00 00 00 77 00 00 05 |w....P..|w...w...|
|00003d40| 00 50 bb 00 77 00 00 00 | 77 50 55 55 55 b5 55 05 |.P..w...|wPUUU.U.|
|00003d50| 77 00 00 00 77 00 00 05 | b0 5b 00 00 77 00 00 00 |w...w...|.[..w...|
|00003d60| 77 00 00 b5 0b 50 00 00 | 77 00 00 00 77 50 55 5b |w....P..|w...wPU[|
|00003d70| 55 55 55 05 77 00 00 00 | 77 00 bb 05 00 50 00 00 |UUU.w...|w....P..|
|00003d80| 77 00 00 00 77 b0 00 05 | 00 50 00 00 77 6c 73 48 |w...w...|.P..wlsH|
|00003d90| 77 77 77 77 77 77 77 77 | 77 00 00 00 46 69 6c 65 |wwwwwwww|w...File|
|00003da0| 44 61 74 61 82 61 7a 74 | 65 63 6c 69 62 00 54 00 |Data.azt|eclib.T.|
|00003db0| 88 52 00 00 45 fd ff ff | ac 78 93 9f 03 00 77 89 |.R..E...|.x....w.|
|00003dc0| 0d 00 00 33 f4 ff 53 43 | 53 49 3a 3a 53 43 53 49 |...3..SC|SI::SCSI|
|00003dd0| 44 69 73 63 34 2e 24 2e | 43 6f 76 65 72 44 69 73 |Disc4.$.|CoverDis|
|00003de0| 6b 73 2e 21 41 5a 54 45 | 43 53 2e 61 7a 74 65 63 |ks.!AZTE|CS.aztec|
|00003df0| 6c 69 62 0d 00 01 20 f4 | 20 3e 61 7a 74 65 63 6c |lib... .| >aztecl|
|00003e00| 69 62 20 63 6f 6e 74 61 | 69 6e 73 20 50 52 4f 43 |ib conta|ins PROC|
|00003e10| 53 20 2d 0d 00 02 04 0d | 00 03 14 dd f2 70 75 6c |S -.....|.....pul|
|00003e20| 6c 5f 76 61 72 69 61 62 | 6c 65 73 0d 00 04 14 66 |l_variab|les....f|
|00003e30| 6f 6e 74 73 25 3d 21 28 | 48 25 2b 26 30 30 29 0d |onts%=!(|H%+&00).|
|00003e40| 00 05 16 6c 65 74 74 65 | 72 73 25 3d 21 28 48 25 |...lette|rs%=!(H%|
|00003e50| 2b 26 30 34 29 0d 00 06 | 18 73 70 5f 6f 6e 5f 76 |+&04)...|.sp_on_v|
|00003e60| 67 61 25 3d 21 28 48 25 | 2b 26 30 38 29 0d 00 07 |ga%=!(H%|+&08)...|
|00003e70| 15 70 75 74 5f 73 70 25 | 3d 21 28 48 25 2b 26 30 |.put_sp%|=!(H%+&0|
|00003e80| 43 29 0d 00 08 16 73 70 | 5f 6e 61 6d 65 25 3d 21 |C)....sp|_name%=!|
|00003e90| 28 48 25 2b 26 31 30 29 | 0d 00 09 15 64 72 61 77 |(H%+&10)|....draw|
|00003ea0| 69 74 25 3d 21 28 48 25 | 2b 26 31 34 29 0d 00 0a |it%=!(H%|+&14)...|
|00003eb0| 16 63 6f 70 79 73 63 72 | 25 3d 21 28 48 25 2b 26 |.copyscr|%=!(H%+&|
|00003ec0| 31 38 29 0d 00 0b 17 63 | 72 75 6e 63 68 73 70 25 |18)....c|runchsp%|
|00003ed0| 3d 21 28 48 25 2b 26 31 | 43 29 0d 00 0c 17 65 78 |=!(H%+&1|C)....ex|
|00003ee0| 70 61 6e 64 73 70 25 3d | 21 28 48 25 2b 26 32 30 |pandsp%=|!(H%+&20|
|00003ef0| 29 0d 00 0d 16 63 73 70 | 6e 61 6d 65 25 3d 21 28 |)....csp|name%=!(|
|00003f00| 48 25 2b 26 32 34 29 0d | 00 0e 16 6e 73 70 6e 61 |H%+&24).|...nspna|
|00003f10| 6d 65 25 3d 21 28 48 25 | 2b 26 32 38 29 0d 00 0f |me%=!(H%|+&28)...|
|00003f20| 18 62 6c 6f 77 75 70 73 | 63 72 25 3d 21 28 48 25 |.blowups|cr%=!(H%|
|00003f30| 2b 26 32 43 29 0d 00 10 | 18 73 70 5f 6f 6e 5f 63 |+&2C)...|.sp_on_c|
|00003f40| 67 61 25 3d 21 28 48 25 | 2b 26 33 30 29 0d 00 11 |ga%=!(H%|+&30)...|
|00003f50| 17 73 63 72 6f 6c 6c 64 | 6e 25 3d 21 28 48 25 2b |.scrolld|n%=!(H%+|
|00003f60| 26 33 34 29 0d 00 12 17 | 73 63 72 6f 6c 6c 75 70 |&34)....|scrollup|
|00003f70| 25 3d 21 28 48 25 2b 26 | 33 38 29 0d 00 13 16 63 |%=!(H%+&|38)....c|
|00003f80| 6f 70 69 72 6f 77 25 3d | 21 28 48 25 2b 26 33 43 |opirow%=|!(H%+&3C|
|00003f90| 29 0d 00 14 04 0d 00 15 | 1b 41 52 45 41 25 3d 48 |).......|.AREA%=H|
|00003fa0| 25 2b 34 2a 31 30 32 34 | 3a f4 20 34 4b 20 6d 63 |%+4*1024|:. 4K mc|
|00003fb0| 0d 00 16 05 e1 0d 00 17 | 04 0d 00 18 51 dd f2 70 |........|....Q..p|
|00003fc0| 75 74 5f 73 70 28 41 25 | 2c 42 25 2c 43 25 2c 44 |ut_sp(A%|,B%,C%,D|
|00003fd0| 25 2c 45 25 2c 46 25 2c | 47 25 2c 73 70 5f 6e 61 |%,E%,F%,|G%,sp_na|
|00003fe0| 6d 65 24 2c 77 6c 65 66 | 74 25 2c 77 62 6f 74 74 |me$,wlef|t%,wbott|
|00003ff0| 6f 6d 25 2c 77 72 69 67 | 68 74 25 2c 77 74 6f 70 |om%,wrig|ht%,wtop|
|00004000| 25 2c 6f 72 69 65 6e 74 | 25 29 0d 00 19 85 f4 20 |%,orient|%)..... |
|00004010| 41 25 3d 73 63 72 65 65 | 6e 2c 28 42 25 2c 43 25 |A%=scree|n,(B%,C%|
|00004020| 29 3d 28 78 2c 79 29 2c | 44 25 3d 6d 61 73 6b 20 |)=(x,y),|D%=mask |
|00004030| 63 6f 6c 2c 45 25 46 25 | 47 25 3d 62 65 68 69 6e |col,E%F%|G%=behin|
|00004040| 64 20 63 6f 6c 73 2e 77 | 6c 2c 77 62 2c 77 72 2c |d cols.w|l,wb,wr,|
|00004050| 77 74 3d 77 69 6e 64 6f | 77 20 66 6f 72 20 73 70 |wt=windo|w for sp|
|00004060| 2e 6f 72 69 65 6e 74 25 | 3d 30 30 6e 6f 72 6d 61 |.orient%|=00norma|
|00004070| 6c 2c 26 30 31 6d 69 72 | 72 6f 72 2c 26 31 30 75 |l,&01mir|ror,&10u|
|00004080| 70 73 64 69 65 64 6e 2c | 26 31 31 62 6f 74 68 0d |psdiedn,|&11both.|
|00004090| 00 1a 2f 21 28 48 25 2b | 26 43 43 29 3d 6f 72 69 |../!(H%+|&CC)=ori|
|000040a0| 65 6e 74 25 3e 3e 3e 34 | 3a 21 28 48 25 2b 26 44 |ent%>>>4|:!(H%+&D|
|000040b0| 30 29 3d 6f 72 69 65 6e | 74 25 80 26 30 46 0d 00 |0)=orien|t%.&0F..|
|000040c0| 1b 46 e3 6c 65 74 74 25 | 3d 31 b8 a9 28 73 70 5f |.F.lett%|=1..(sp_|
|000040d0| 6e 61 6d 65 24 29 3a 3f | 28 73 70 5f 6e 61 6d 65 |name$):?|(sp_name|
|000040e0| 25 2b 28 6c 65 74 74 25 | 2d 31 29 29 3d 97 28 c1 |%+(lett%|-1))=.(.|
|000040f0| 73 70 5f 6e 61 6d 65 24 | 2c 6c 65 74 74 25 2c 31 |sp_name$|,lett%,1|
|00004100| 29 29 3a ed 0d 00 1c 47 | e7 a9 28 73 70 5f 6e 61 |)):....G|..(sp_na|
|00004110| 6d 65 24 29 3c 31 32 3a | e3 6c 65 74 74 25 3d a9 |me$)<12:|.lett%=.|
|00004120| 28 73 70 5f 6e 61 6d 65 | 24 29 2b 31 b8 31 32 3a |(sp_name|$)+1.12:|
|00004130| 3f 28 73 70 5f 6e 61 6d | 65 25 2b 28 6c 65 74 74 |?(sp_nam|e%+(lett|
|00004140| 25 2d 31 29 29 3d 26 30 | 30 3a ed 0d 00 1d 3f c8 |%-1))=&0|0:....?.|
|00004150| 99 20 22 4f 53 5f 53 70 | 72 69 74 65 4f 70 22 2c |. "OS_Sp|riteOp",|
|00004160| 26 31 32 38 2c 41 52 45 | 41 25 2c 73 70 5f 6e 61 |&128,ARE|A%,sp_na|
|00004170| 6d 65 24 20 b8 20 2c 2c | 2c 73 70 5f 77 69 64 65 |me$ . ,,|,sp_wide|
|00004180| 25 2c 73 70 5f 68 69 74 | 65 25 0d 00 1e 2f 73 70 |%,sp_hit|e%.../sp|
|00004190| 5f 68 69 74 65 25 3d 73 | 70 5f 68 69 74 65 25 2d |_hite%=s|p_hite%-|
|000041a0| 31 3a 73 70 5f 77 69 64 | 65 25 3d 28 73 70 5f 77 |1:sp_wid|e%=(sp_w|
|000041b0| 69 64 65 25 2f 32 29 2d | 31 0d 00 1f 22 79 5f 72 |ide%/2)-|1..."y_r|
|000041c0| 6f 77 25 3d a8 28 43 25 | 2f 34 29 3a 78 5f 62 79 |ow%=.(C%|/4):x_by|
|000041d0| 74 65 25 3d a8 28 42 25 | 2f 34 29 0d 00 20 11 73 |te%=.(B%|/4).. .s|
|000041e0| 70 5f 76 69 73 69 62 6c | 65 25 3d 30 0d 00 21 83 |p_visibl|e%=0..!.|
|000041f0| e7 20 28 79 5f 72 6f 77 | 25 3e a8 28 77 74 6f 70 |. (y_row|%>.(wtop|
|00004200| 25 20 2f 20 34 29 29 20 | 84 20 28 28 79 5f 72 6f |% / 4)) |. ((y_ro|
|00004210| 77 25 2b 73 70 5f 68 69 | 74 65 25 29 3c a8 28 77 |w%+sp_hi|te%)<.(w|
|00004220| 62 6f 74 74 6f 6d 25 20 | 2f 20 34 29 29 20 84 20 |bottom% |/ 4)) . |
|00004230| 28 28 78 5f 62 79 74 65 | 25 2b 73 70 5f 77 69 64 |((x_byte|%+sp_wid|
|00004240| 65 25 29 3c a8 28 77 6c | 65 66 74 25 20 2f 20 34 |e%)<.(wl|eft% / 4|
|00004250| 29 29 20 84 20 28 78 5f | 62 79 74 65 25 3e a8 28 |)) . (x_|byte%>.(|
|00004260| 77 72 69 67 68 74 25 20 | 2f 20 34 29 29 20 8c 0d |wright% |/ 4)) ..|
|00004270| 00 22 12 20 73 70 5f 76 | 69 73 69 62 6c 65 25 3d |.". sp_v|isible%=|
|00004280| 31 0d 00 23 05 cc 0d 00 | 24 37 20 f2 63 61 6c 63 |1..#....|$7 .calc|
|00004290| 5f 45 30 20 3a 20 f4 20 | 21 28 48 25 2b 26 45 30 |_E0 : . |!(H%+&E0|
|000042a0| 29 20 3d 20 73 74 61 72 | 74 20 72 6f 77 20 69 6e |) = star|t row in|
|000042b0| 20 73 70 72 69 74 65 20 | 69 6d 61 67 65 0d 00 25 | sprite |image..%|
|000042c0| 3c 20 f2 63 61 6c 63 5f | 45 34 20 3a 20 f4 20 21 |< .calc_|E4 : . !|
|000042d0| 28 48 25 2b 26 45 34 29 | 20 3d 20 6e 6f 2e 72 6f |(H%+&E4)| = no.ro|
|000042e0| 77 73 2d 31 20 6f 66 20 | 73 70 72 69 74 65 20 74 |ws-1 of |sprite t|
|000042f0| 6f 20 64 69 73 70 6c 61 | 79 0d 00 26 42 20 f2 63 |o displa|y..&B .c|
|00004300| 61 6c 63 5f 45 38 20 3a | 20 f4 20 21 28 48 25 2b |alc_E8 :| . !(H%+|
|00004310| 26 45 38 29 20 3d 20 73 | 74 61 72 74 69 6e 67 20 |&E8) = s|tarting |
|00004320| 62 79 74 65 20 6e 6f 2e | 20 69 6e 20 65 61 63 68 |byte no.| in each|
|00004330| 20 73 70 72 69 74 65 20 | 72 6f 77 0d 00 27 3f 20 | sprite |row..'? |
|00004340| f2 63 61 6c 63 5f 45 43 | 20 3a 20 f4 20 21 28 48 |.calc_EC| : . !(H|
|00004350| 25 2b 26 45 43 29 20 3d | 20 6e 6f 2e 62 79 74 65 |%+&EC) =| no.byte|
|00004360| 73 2d 31 20 74 6f 20 64 | 69 73 70 6c 61 79 20 69 |s-1 to d|isplay i|
|00004370| 6e 20 65 61 63 68 20 72 | 6f 77 0d 00 28 05 cd 0d |n each r|ow..(...|
|00004380| 00 29 1c e7 73 70 5f 76 | 69 73 69 62 6c 65 25 3d |.)..sp_v|isible%=|
|00004390| 30 3a d6 20 70 75 74 5f | 73 70 25 0d 00 2a 05 e1 |0:. put_|sp%..*..|
|000043a0| 0d 00 2b 04 0d 00 2c 0d | dd f2 63 61 6c 63 5f 45 |..+...,.|..calc_E|
|000043b0| 30 0d 00 2d 2b 20 20 e7 | 20 28 79 5f 72 6f 77 25 |0..-+ .| (y_row%|
|000043c0| 2b 73 70 5f 68 69 74 65 | 25 29 20 3c 3d 20 a8 28 |+sp_hite|%) <= .(|
|000043d0| 77 74 6f 70 25 20 2f 20 | 34 29 20 8c 0d 00 2e 1b |wtop% / |4) .....|
|000043e0| 20 20 20 20 e7 20 28 6f | 72 69 65 6e 74 25 3e 3e | . (o|rient%>>|
|000043f0| 3e 34 29 3d 30 20 8c 0d | 00 2f 15 20 20 20 20 20 |>4)=0 ..|./. |
|00004400| 20 21 28 48 25 2b 26 45 | 30 29 3d 30 0d 00 30 09 | !(H%+&E|0)=0..0.|
|00004410| 20 20 20 20 cc 0d 00 31 | 1c 20 20 20 20 20 20 21 | ...1|. !|
|00004420| 28 48 25 2b 26 45 30 29 | 3d 73 70 5f 68 69 74 65 |(H%+&E0)|=sp_hite|
|00004430| 25 0d 00 32 09 20 20 20 | 20 cd 0d 00 33 13 20 20 |%..2. | ...3. |
|00004440| 20 20 21 28 48 25 2b 26 | 44 34 29 3d 30 0d 00 34 | !(H%+&|D4)=0..4|
|00004450| 07 20 20 cc 0d 00 35 1b | 20 20 20 20 e7 20 28 6f |. ...5.| . (o|
|00004460| 72 69 65 6e 74 25 3e 3e | 3e 34 29 3d 30 20 8c 0d |rient%>>|>4)=0 ..|
|00004470| 00 36 32 20 20 20 20 20 | 20 21 28 48 25 2b 26 45 |.62 | !(H%+&E|
|00004480| 30 29 3d 73 70 5f 68 69 | 74 65 25 2d 28 a8 28 77 |0)=sp_hi|te%-(.(w|
|00004490| 74 6f 70 25 20 2f 20 34 | 29 2d 79 5f 72 6f 77 25 |top% / 4|)-y_row%|
|000044a0| 29 0d 00 37 09 20 20 20 | 20 cc 0d 00 38 27 20 20 |)..7. | ...8' |
|000044b0| 20 20 20 20 21 28 48 25 | 2b 26 45 30 29 3d a8 28 | !(H%|+&E0)=.(|
|000044c0| 77 74 6f 70 25 20 2f 20 | 34 29 2d 79 5f 72 6f 77 |wtop% / |4)-y_row|
|000044d0| 25 0d 00 39 09 20 20 20 | 20 cd 0d 00 3a 30 20 20 |%..9. | ...:0 |
|000044e0| 20 20 21 28 48 25 2b 26 | 44 34 29 3d 73 70 5f 68 | !(H%+&|D4)=sp_h|
|000044f0| 69 74 65 25 2d 28 a8 28 | 77 74 6f 70 25 20 2f 20 |ite%-(.(|wtop% / |
|00004500| 34 29 2d 79 5f 72 6f 77 | 25 29 0d 00 3b 07 20 20 |4)-y_row|%)..;. |
|00004510| cd 0d 00 3c 05 e1 0d 00 | 3d 04 0d 00 3e 0d dd f2 |...<....|=...>...|
|00004520| 63 61 6c 63 5f 45 34 0d | 00 3f 23 20 20 e7 20 a8 |calc_E4.|.?# . .|
|00004530| 28 77 62 6f 74 74 6f 6d | 25 20 2f 20 34 29 20 3c |(wbottom|% / 4) <|
|00004540| 3d 20 79 5f 72 6f 77 25 | 20 8c 0d 00 40 1b 20 20 |= y_row%| ...@. |
|00004550| 20 20 e7 20 28 6f 72 69 | 65 6e 74 25 3e 3e 3e 34 | . (ori|ent%>>>4|
|00004560| 29 3d 30 20 8c 0d 00 41 | 26 20 20 20 20 20 20 21 |)=0 ...A|& !|
|00004570| 28 48 25 2b 26 45 34 29 | 3d 73 70 5f 68 69 74 65 |(H%+&E4)|=sp_hite|
|00004580| 25 2d 21 28 48 25 2b 26 | 45 30 29 0d 00 42 09 20 |%-!(H%+&|E0)..B. |
|00004590| 20 20 20 cc 0d 00 43 1d | 20 20 20 20 20 20 21 28 | ...C.| !(|
|000045a0| 48 25 2b 26 45 34 29 3d | 21 28 48 25 2b 26 45 30 |H%+&E4)=|!(H%+&E0|
|000045b0| 29 0d 00 44 09 20 20 20 | 20 cd 0d 00 45 07 20 20 |)..D. | ...E. |
|000045c0| cc 0d 00 46 1b 20 20 20 | 20 e7 20 28 6f 72 69 65 |...F. | . (orie|
|000045d0| 6e 74 25 3e 3e 3e 34 29 | 3d 30 20 8c 0d 00 47 3f |nt%>>>4)|=0 ...G?|
|000045e0| 20 20 20 20 20 20 21 28 | 48 25 2b 26 45 34 29 3d | !(|H%+&E4)=|
|000045f0| 73 70 5f 68 69 74 65 25 | 2d 28 a8 28 77 62 6f 74 |sp_hite%|-(.(wbot|
|00004600| 74 6f 6d 25 20 2f 20 34 | 29 2d 79 5f 72 6f 77 25 |tom% / 4|)-y_row%|
|00004610| 29 2d 21 28 48 25 2b 26 | 45 30 29 0d 00 48 09 20 |)-!(H%+&|E0)..H. |
|00004620| 20 20 20 cc 0d 00 49 34 | 20 20 20 20 20 20 21 28 | ...I4| !(|
|00004630| 48 25 2b 26 45 34 29 3d | 79 5f 72 6f 77 25 2b 21 |H%+&E4)=|y_row%+!|
|00004640| 28 48 25 2b 26 45 30 29 | 2d a8 28 77 62 6f 74 74 |(H%+&E0)|-.(wbott|
|00004650| 6f 6d 25 20 2f 20 34 29 | 0d 00 4a 09 20 20 20 20 |om% / 4)|..J. |
|00004660| cd 0d 00 4b 07 20 20 cd | 0d 00 4c 05 e1 0d 00 4d |...K. .|..L....M|
|00004670| 04 0d 00 4e 0d dd f2 63 | 61 6c 63 5f 45 38 0d 00 |...N...c|alc_E8..|
|00004680| 4f 22 20 20 e7 20 78 5f | 62 79 74 65 25 20 3e 3d |O" . x_|byte% >=|
|00004690| 20 a8 28 77 6c 65 66 74 | 25 20 2f 20 34 29 20 8c | .(wleft|% / 4) .|
|000046a0| 0d 00 50 1b 20 20 20 20 | e7 20 28 6f 72 69 65 6e |..P. |. (orien|
|000046b0| 74 25 80 26 30 46 29 3d | 30 20 8c 0d 00 51 15 20 |t%.&0F)=|0 ...Q. |
|000046c0| 20 20 20 20 20 21 28 48 | 25 2b 26 45 38 29 3d 30 | !(H|%+&E8)=0|
|000046d0| 0d 00 52 09 20 20 20 20 | cc 0d 00 53 1c 20 20 20 |..R. |...S. |
|000046e0| 20 20 20 21 28 48 25 2b | 26 45 38 29 3d 73 70 5f | !(H%+|&E8)=sp_|
|000046f0| 77 69 64 65 25 0d 00 54 | 09 20 20 20 20 cd 0d 00 |wide%..T|. ...|
|00004700| 55 13 20 20 20 20 21 28 | 48 25 2b 26 44 38 29 3d |U. !(|H%+&D8)=|
|00004710| 30 0d 00 56 07 20 20 cc | 0d 00 57 1b 20 20 20 20 |0..V. .|..W. |
|00004720| e7 20 28 6f 72 69 65 6e | 74 25 80 26 30 46 29 3d |. (orien|t%.&0F)=|
|00004730| 30 20 8c 0d 00 58 29 20 | 20 20 20 20 20 21 28 48 |0 ...X) | !(H|
|00004740| 25 2b 26 45 38 29 3d a8 | 28 77 6c 65 66 74 25 20 |%+&E8)=.|(wleft% |
|00004750| 2f 20 34 29 2d 78 5f 62 | 79 74 65 25 0d 00 59 09 |/ 4)-x_b|yte%..Y.|
|00004760| 20 20 20 20 cc 0d 00 5a | 34 20 20 20 20 20 20 21 | ...Z|4 !|
|00004770| 28 48 25 2b 26 45 38 29 | 3d 73 70 5f 77 69 64 65 |(H%+&E8)|=sp_wide|
|00004780| 25 2d 28 a8 28 77 6c 65 | 66 74 25 20 2f 20 34 29 |%-(.(wle|ft% / 4)|
|00004790| 2d 78 5f 62 79 74 65 25 | 29 0d 00 5b 09 20 20 20 |-x_byte%|)..[. |
|000047a0| 20 cd 0d 00 5c 27 20 20 | 20 20 21 28 48 25 2b 26 | ...\' | !(H%+&|
|000047b0| 44 38 29 3d a8 28 77 6c | 65 66 74 25 20 2f 20 34 |D8)=.(wl|eft% / 4|
|000047c0| 29 2d 78 5f 62 79 74 65 | 25 0d 00 5d 07 20 20 cd |)-x_byte|%..]. .|
|000047d0| 0d 00 5e 05 e1 0d 00 5f | 04 0d 00 60 0d dd f2 63 |..^...._|...`...c|
|000047e0| 61 6c 63 5f 45 43 0d 00 | 61 30 20 20 e7 20 28 78 |alc_EC..|a0 . (x|
|000047f0| 5f 62 79 74 65 25 20 2b | 20 73 70 5f 77 69 64 65 |_byte% +| sp_wide|
|00004800| 25 29 20 3c 3d 20 a8 28 | 77 72 69 67 68 74 25 20 |%) <= .(|wright% |
|00004810| 2f 20 34 29 20 8c 0d 00 | 62 1b 20 20 20 20 e7 20 |/ 4) ...|b. . |
|00004820| 28 6f 72 69 65 6e 74 25 | 80 26 30 46 29 3d 30 20 |(orient%|.&0F)=0 |
|00004830| 8c 0d 00 63 26 20 20 20 | 20 20 20 21 28 48 25 2b |...c& | !(H%+|
|00004840| 26 45 43 29 3d 73 70 5f | 77 69 64 65 25 2d 21 28 |&EC)=sp_|wide%-!(|
|00004850| 48 25 2b 26 45 38 29 0d | 00 64 09 20 20 20 20 cc |H%+&E8).|.d. .|
|00004860| 0d 00 65 1d 20 20 20 20 | 20 20 21 28 48 25 2b 26 |..e. | !(H%+&|
|00004870| 45 43 29 3d 21 28 48 25 | 2b 26 45 38 29 0d 00 66 |EC)=!(H%|+&E8)..f|
|00004880| 09 20 20 20 20 cd 0d 00 | 67 07 20 20 cc 0d 00 68 |. ...|g. ...h|
|00004890| 1b 20 20 20 20 e7 20 28 | 6f 72 69 65 6e 74 25 80 |. . (|orient%.|
|000048a0| 26 30 46 29 3d 30 20 8c | 0d 00 69 34 20 20 20 20 |&0F)=0 .|..i4 |
|000048b0| 20 20 21 28 48 25 2b 26 | 45 43 29 3d a8 28 77 72 | !(H%+&|EC)=.(wr|
|000048c0| 69 67 68 74 25 20 2f 20 | 34 29 2d 78 5f 62 79 74 |ight% / |4)-x_byt|
|000048d0| 65 25 2d 21 28 48 25 2b | 26 45 38 29 0d 00 6a 09 |e%-!(H%+|&E8)..j.|
|000048e0| 20 20 20 20 cc 0d 00 6b | 3f 20 20 20 20 20 20 21 | ...k|? !|
|000048f0| 28 48 25 2b 26 45 43 29 | 3d 21 28 48 25 2b 26 45 |(H%+&EC)|=!(H%+&E|
|00004900| 38 29 2d 28 78 5f 62 79 | 74 65 25 2b 73 70 5f 77 |8)-(x_by|te%+sp_w|
|00004910| 69 64 65 25 2d a8 28 77 | 72 69 67 68 74 25 20 2f |ide%-.(w|right% /|
|00004920| 20 34 29 29 0d 00 6c 09 | 20 20 20 20 cd 0d 00 6d | 4))..l.| ...m|
|00004930| 07 20 20 cd 0d 00 6e 05 | e1 0d 00 6f 04 0d 00 70 |. ...n.|...o...p|
|00004940| 0d dd f2 70 61 6c 65 74 | 74 65 0d 00 71 08 f7 20 |...palet|te..q.. |
|00004950| 2b 30 0d 00 72 9e dc 20 | 32 35 35 2c 32 35 35 2c |+0..r.. |255,255,|
|00004960| 32 35 35 2c 31 37 30 2c | 31 37 30 2c 31 37 30 2c |255,170,|170,170,|
|00004970| 31 30 32 2c 31 30 32 2c | 31 30 32 2c 30 2c 30 2c |102,102,|102,0,0,|
|00004980| 30 2c 30 2c 30 2c 31 35 | 33 2c 30 2c 35 31 2c 32 |0,0,0,15|3,0,51,2|
|00004990| 35 35 2c 30 2c 32 30 34 | 2c 32 35 35 2c 32 35 35 |55,0,204|,255,255|
|000049a0| 2c 31 33 36 2c 30 2c 32 | 32 31 2c 30 2c 30 2c 32 |,136,0,2|21,0,0,2|
|000049b0| 35 35 2c 32 35 35 2c 30 | 2c 31 33 36 2c 31 37 2c |55,255,0|,136,17,|
|000049c0| 30 2c 32 35 35 2c 32 30 | 34 2c 31 35 33 2c 30 2c |0,255,20|4,153,0,|
|000049d0| 31 31 39 2c 33 34 2c 30 | 2c 31 38 37 2c 30 2c 30 |119,34,0|,187,0,0|
|000049e0| 2c 32 35 35 2c 33 34 2c | 31 38 37 2c 38 35 2c 30 |,255,34,|187,85,0|
|000049f0| 0d 00 73 32 e3 20 69 25 | 3d 30 20 b8 20 31 35 3a |..s2. i%|=0 . 15:|
|00004a00| f3 20 72 25 2c 20 67 25 | 2c 20 62 25 3a ef 20 31 |. r%, g%|, b%:. 1|
|00004a10| 39 2c 69 25 2c 31 36 2c | 72 25 2c 67 25 2c 62 25 |9,i%,16,|r%,g%,b%|
|00004a20| 3a ed 0d 00 74 05 e1 0d | 00 75 04 0d 00 76 12 dd |:...t...|.u...v..|
|00004a30| f2 77 61 69 74 28 64 65 | 6c 61 79 25 29 0d 00 77 |.wait(de|lay%)..w|
|00004a40| 17 61 25 3d 91 3a f5 fd | 91 3e 3d 61 25 2b 64 65 |.a%=.:..|.>=a%+de|
|00004a50| 6c 61 79 25 0d 00 78 05 | e1 0d 00 79 04 0d 00 7a |lay%..x.|...y...z|
|00004a60| 1e dd f2 77 6f 72 64 73 | 28 41 25 2c 42 25 2c 62 |...words|(A%,B%,b|
|00004a70| 69 67 25 2c 77 6f 72 64 | 73 24 29 0d 00 7b 2c 45 |ig%,word|s$)..{,E|
|00004a80| 25 3d 33 3a e7 62 69 67 | 25 3a 43 25 3d 33 32 30 |%=3:.big|%:C%=320|
|00004a90| 3a 44 25 3d 33 36 30 3a | 8b 3a 43 25 3d 32 34 30 |:D%=360:|.:C%=240|
|00004aa0| 3a 44 25 3d 32 37 30 0d | 00 7c 42 e3 6c 65 74 74 |:D%=270.|.|B.lett|
|00004ab0| 25 3d 31 b8 a9 28 77 6f | 72 64 73 24 29 3a 3f 28 |%=1..(wo|rds$):?(|
|00004ac0| 6c 65 74 74 65 72 73 25 | 2b 28 6c 65 74 74 25 2d |letters%|+(lett%-|
|00004ad0| 31 29 29 3d 97 28 c1 77 | 6f 72 64 73 24 2c 6c 65 |1))=.(.w|ords$,le|
|00004ae0| 74 74 25 2c 31 29 29 3a | ed 0d 00 7d 1d 3f 28 6c |tt%,1)):|...}.?(l|
|00004af0| 65 74 74 65 72 73 25 2b | a9 28 77 6f 72 64 73 24 |etters%+|.(words$|
|00004b00| 29 29 3d 26 30 44 0d 00 | 7e 0c d6 20 66 6f 6e 74 |))=&0D..|~.. font|
|00004b10| 73 25 0d 00 7f 05 e1 0d | 00 80 04 0d 00 81 20 dd |s%......|...... .|
|00004b20| f2 6a 70 77 6f 72 64 73 | 28 41 25 2c 42 25 2c 62 |.jpwords|(A%,B%,b|
|00004b30| 69 67 25 2c 77 6f 72 64 | 73 24 29 0d 00 82 2c 45 |ig%,word|s$)...,E|
|00004b40| 25 3d 35 3a e7 62 69 67 | 25 3a 43 25 3d 33 32 30 |%=5:.big|%:C%=320|
|00004b50| 3a 44 25 3d 33 36 30 3a | 8b 3a 43 25 3d 32 34 30 |:D%=360:|.:C%=240|
|00004b60| 3a 44 25 3d 32 37 30 0d | 00 83 42 e3 6c 65 74 74 |:D%=270.|..B.lett|
|00004b70| 25 3d 31 b8 a9 28 77 6f | 72 64 73 24 29 3a 3f 28 |%=1..(wo|rds$):?(|
|00004b80| 6c 65 74 74 65 72 73 25 | 2b 28 6c 65 74 74 25 2d |letters%|+(lett%-|
|00004b90| 31 29 29 3d 97 28 c1 77 | 6f 72 64 73 24 2c 6c 65 |1))=.(.w|ords$,le|
|00004ba0| 74 74 25 2c 31 29 29 3a | ed 0d 00 84 1d 3f 28 6c |tt%,1)):|.....?(l|
|00004bb0| 65 74 74 65 72 73 25 2b | a9 28 77 6f 72 64 73 24 |etters%+|.(words$|
|00004bc0| 29 29 3d 26 30 44 0d 00 | 85 0c d6 20 66 6f 6e 74 |))=&0D..|... font|
|00004bd0| 73 25 0d 00 86 05 e1 0d | 00 87 04 0d 00 88 0f dd |s%......|........|
|00004be0| f2 73 63 72 63 6f 70 79 | 32 31 0d 00 89 20 c8 99 |.scrcopy|21... ..|
|00004bf0| 20 22 4f 53 5f 42 79 74 | 65 22 2c 31 31 33 2c 32 | "OS_Byt|e",113,2|
|00004c00| 3a 41 25 3d 32 3a 42 25 | 3d 31 0d 00 8a 0e d6 20 |:A%=2:B%|=1..... |
|00004c10| 63 6f 70 79 73 63 72 25 | 0d 00 8b 31 c8 96 3a c8 |copyscr%|...1..:.|
|00004c20| 99 20 22 4f 53 5f 42 79 | 74 65 22 2c 31 31 33 2c |. "OS_By|te",113,|
|00004c30| 31 3a c8 99 20 22 4f 53 | 5f 42 79 74 65 22 2c 31 |1:.. "OS|_Byte",1|
|00004c40| 31 32 2c 31 3a ef 20 32 | 36 0d 00 8c 05 e1 0d 00 |12,1:. 2|6.......|
|00004c50| 8d 04 0d 00 8e 25 dd f2 | 73 63 72 63 6f 70 79 32 |.....%..|scrcopy2|
|00004c60| 31 65 78 70 28 41 25 2c | 42 25 2c 43 25 2c 44 25 |1exp(A%,|B%,C%,D%|
|00004c70| 2c 45 25 2c 46 25 29 0d | 00 8f 10 d6 20 62 6c 6f |,E%,F%).|.... blo|
|00004c80| 77 75 70 73 63 72 25 0d | 00 90 05 e1 0d 00 91 04 |wupscr%.|........|
|00004c90| 0d 00 92 20 dd f2 65 78 | 70 6c 6f 64 65 28 78 70 |... ..ex|plode(xp|
|00004ca0| 6f 73 25 2c 79 70 6f 73 | 25 2c 61 75 74 6f 25 29 |os%,ypos|%,auto%)|
|00004cb0| 0d 00 93 3c f4 20 43 25 | 3d 72 69 67 68 74 20 73 |...<. C%|=right s|
|00004cc0| 70 65 65 64 3a 44 25 3d | 64 6f 77 6e 20 73 70 65 |peed:D%=|down spe|
|00004cd0| 65 64 3a 45 25 3d 6c 65 | 66 74 20 73 70 65 65 64 |ed:E%=le|ft speed|
|00004ce0| 3a 46 25 3d 75 70 20 73 | 70 65 65 64 0d 00 94 32 |:F%=up s|peed...2|
|00004cf0| 41 25 3d a8 28 78 70 6f | 73 25 2f 34 29 3a 42 25 |A%=.(xpo|s%/4):B%|
|00004d00| 3d 32 34 30 2d a8 28 79 | 70 6f 73 25 2f 34 29 3a |=240-.(y|pos%/4):|
|00004d10| e7 42 25 3e 31 37 37 3a | 42 25 3d 31 37 37 0d 00 |.B%>177:|B%=177..|
|00004d20| 95 0b e7 61 75 74 6f 25 | 8c 0d 00 96 2c 43 25 3d |...auto%|....,C%=|
|00004d30| 33 31 39 2d 41 25 3a 44 | 25 3d 31 37 39 2d 42 25 |319-A%:D|%=179-B%|
|00004d40| 3a 45 25 3d 41 25 3a 46 | 25 3d 42 25 3a 66 61 63 |:E%=A%:F|%=B%:fac|
|00004d50| 74 25 3d 43 25 0d 00 97 | 16 e7 44 25 3c 66 61 63 |t%=C%...|..D%<fac|
|00004d60| 74 25 3a 66 61 63 74 25 | 3d 44 25 0d 00 98 16 e7 |t%:fact%|=D%.....|
|00004d70| 45 25 3c 66 61 63 74 25 | 3a 66 61 63 74 25 3d 45 |E%<fact%|:fact%=E|
|00004d80| 25 0d 00 99 16 e7 46 25 | 3c 66 61 63 74 25 3a 66 |%.....F%|<fact%:f|
|00004d90| 61 63 74 25 3d 46 25 0d | 00 9a 3f 43 25 3d a8 28 |act%=F%.|..?C%=.(|
|00004da0| 43 25 2f 66 61 63 74 25 | 29 3a 44 25 3d a8 28 44 |C%/fact%|):D%=.(D|
|00004db0| 25 2f 66 61 63 74 25 29 | 3a 45 25 3d a8 28 45 25 |%/fact%)|:E%=.(E%|
|00004dc0| 2f 66 61 63 74 25 29 3a | 46 25 3d a8 28 46 25 2f |/fact%):|F%=.(F%/|
|00004dd0| 66 61 63 74 25 29 0d 00 | 9b 0e e7 43 25 3e 36 3a |fact%)..|...C%>6:|
|00004de0| 43 25 3d 36 0d 00 9c 0e | e7 44 25 3e 36 3a 44 25 |C%=6....|.D%>6:D%|
|00004df0| 3d 36 0d 00 9d 0e e7 45 | 25 3e 36 3a 45 25 3d 36 |=6.....E|%>6:E%=6|
|00004e00| 0d 00 9e 0e e7 46 25 3e | 36 3a 46 25 3d 36 0d 00 |.....F%>|6:F%=6..|
|00004e10| 9f 05 cd 0d 00 a0 30 42 | 25 3d 28 48 25 21 26 46 |......0B|%=(H%!&F|
|00004e20| 30 29 2a 42 25 3a 44 25 | 3d 28 48 25 21 26 46 30 |0)*B%:D%|=(H%!&F0|
|00004e30| 29 2a 44 25 3a 46 25 3d | 28 48 25 21 26 46 30 29 |)*D%:F%=|(H%!&F0)|
|00004e40| 2a 46 25 0d 00 a1 24 f2 | 73 63 72 63 6f 70 79 32 |*F%...$.|scrcopy2|
|00004e50| 31 65 78 70 28 41 25 2c | 42 25 2c 43 25 2c 44 25 |1exp(A%,|B%,C%,D%|
|00004e60| 2c 45 25 2c 46 25 29 0d | 00 a2 05 e1 0d 00 a3 04 |,E%,F%).|........|
|00004e70| 0d 00 a4 14 dd f2 6c 69 | 62 5f 69 6e 69 74 69 61 |......li|b_initia|
|00004e80| 6c 69 73 65 0d 00 a5 8e | f4 4f 4e 45 52 52 4f 52 |lise....|.ONERROR|
|00004e90| 20 53 59 53 22 4f 53 5f | 42 79 74 65 22 2c 32 35 | SYS"OS_|Byte",25|
|00004ea0| 30 2c 30 2c 32 35 35 20 | 54 4f 20 2c 73 63 72 25 |0,0,255 |TO ,scr%|
|00004eb0| 3a 53 59 53 22 4f 53 5f | 42 79 74 65 22 2c 31 31 |:SYS"OS_|Byte",11|
|00004ec0| 33 2c 73 63 72 25 3a 50 | 52 49 4e 54 20 52 45 50 |3,scr%:P|RINT REP|
|00004ed0| 4f 52 54 24 2b 22 20 28 | 49 6e 74 65 72 6e 61 6c |ORT$+" (|Internal|
|00004ee0| 20 65 72 72 6f 72 20 63 | 6f 64 65 20 22 2b 53 54 | error c|ode "+ST|
|00004ef0| 52 24 45 52 4c 2b 22 29 | 22 2b 43 48 52 24 30 3a |R$ERL+")|"+CHR$0:|
|00004f00| 78 3d 47 45 54 3a 50 52 | 4f 43 64 65 73 6b 5f 74 |x=GET:PR|OCdesk_t|
|00004f10| 6f 70 0d 00 a6 10 ee 85 | 3a f2 64 65 73 6b 5f 74 |op......|:.desk_t|
|00004f20| 6f 70 0d 00 a7 1c f2 70 | 75 6c 6c 5f 76 61 72 69 |op.....p|ull_vari|
|00004f30| 61 62 6c 65 73 3a f2 70 | 61 6c 65 74 74 65 0d 00 |ables:.p|alette..|
|00004f40| a8 55 de 20 53 43 41 4c | 45 25 20 31 36 3a 21 28 |.U. SCAL|E% 16:!(|
|00004f50| 53 43 41 4c 45 25 2b 30 | 29 3d 31 36 3a 21 28 53 |SCALE%+0|)=16:!(S|
|00004f60| 43 41 4c 45 25 2b 34 29 | 3d 31 36 2a 28 48 25 21 |CALE%+4)|=16*(H%!|
|00004f70| 26 46 30 29 3a 21 28 53 | 43 41 4c 45 25 2b 38 29 |&F0):!(S|CALE%+8)|
|00004f80| 3d 31 36 3a 21 28 53 43 | 41 4c 45 25 2b 31 32 29 |=16:!(SC|ALE%+12)|
|00004f90| 3d 31 36 0d 00 a9 3c c8 | 99 20 22 4f 53 5f 53 70 |=16...<.|. "OS_Sp|
|00004fa0| 72 69 74 65 4f 70 22 2c | 26 31 30 41 2c 41 52 45 |riteOp",|&10A,ARE|
|00004fb0| 41 25 2c 22 3c 41 5a 54 | 45 43 24 63 68 61 69 6e |A%,"<AZT|EC$chain|
|00004fc0| 64 69 72 3e 2e 62 75 74 | 74 6f 6e 73 5f 63 22 0d |dir>.but|tons_c".|
|00004fd0| 00 aa 2b 6c 65 66 74 25 | 3d 31 32 3a 6c 6f 77 25 |..+left%|=12:low%|
|00004fe0| 3d 32 35 36 3a 72 69 67 | 68 74 25 3d 31 32 36 37 |=256:rig|ht%=1267|
|00004ff0| 3a 68 69 67 68 25 3d 39 | 34 37 0d 00 ab 39 ef 20 |:high%=9|47...9. |
|00005000| 32 33 2c 31 37 2c 34 2c | 31 2c 30 2c 30 2c 30 2c |23,17,4,|1,0,0,0,|
|00005010| 30 2c 30 2c 30 20 3a 20 | f4 20 52 49 53 43 20 4f |0,0,0 : |. RISC O|
|00005020| 53 20 69 6e 74 65 72 6c | 65 61 76 69 6e 67 20 45 |S interl|eaving E|
|00005030| 43 46 73 0d 00 ac 1a de | 20 69 6e 70 75 74 5f 64 |CFs.....| input_d|
|00005040| 69 73 6b 5f 6e 61 6d 65 | 25 20 32 35 36 0d 00 ad |isk_name|% 256...|
|00005050| 32 de 20 70 64 72 65 63 | 74 25 20 31 36 2c 70 64 |2. pdrec|t% 16,pd|
|00005060| 72 65 63 74 32 25 20 31 | 36 2c 70 64 74 72 61 6e |rect2% 1|6,pdtran|
|00005070| 73 25 20 31 36 2c 70 64 | 70 6c 6f 74 25 20 38 0d |s% 16,pd|plot% 8.|
|00005080| 00 ae 26 de 20 73 63 61 | 6c 65 25 20 31 36 2c 63 |..&. sca|le% 16,c|
|00005090| 74 72 61 6e 73 25 20 32 | 35 36 2c 70 61 6c 74 61 |trans% 2|56,palta|
|000050a0| 62 25 20 36 34 0d 00 af | 0e 6d 61 78 62 75 74 25 |b% 64...|.maxbut%|
|000050b0| 3d 31 33 0d 00 b0 98 de | 20 63 6f 6f 72 64 73 25 |=13.....| coords%|
|000050c0| 28 6d 61 78 62 75 74 25 | 2c 31 29 2c 77 69 64 74 |(maxbut%|,1),widt|
|000050d0| 68 25 28 6d 61 78 62 75 | 74 25 29 2c 68 65 69 67 |h%(maxbu|t%),heig|
|000050e0| 68 74 25 28 6d 61 78 62 | 75 74 25 29 2c 65 63 5f |ht%(maxb|ut%),ec_|
|000050f0| 77 69 64 74 68 25 28 6d | 61 78 62 75 74 25 29 2c |width%(m|axbut%),|
|00005100| 65 63 5f 68 65 69 67 68 | 74 25 28 6d 61 78 62 75 |ec_heigh|t%(maxbu|
|00005110| 74 25 29 2c 62 75 74 74 | 79 70 65 25 28 6d 61 78 |t%),butt|ype%(max|
|00005120| 62 75 74 25 29 2c 6c 61 | 62 65 6c 73 24 28 6d 61 |but%),la|bels$(ma|
|00005130| 78 62 75 74 25 29 2c 6c | 61 62 5f 6f 66 66 73 25 |xbut%),l|ab_offs%|
|00005140| 28 6d 61 78 62 75 74 25 | 2c 31 29 0d 00 b1 19 de |(maxbut%|,1).....|
|00005150| 20 62 75 74 24 28 32 2c | 33 29 2c 62 6f 78 25 28 | but$(2,|3),box%(|
|00005160| 34 2c 31 29 0d 00 b2 48 | 62 75 74 24 28 30 2c 30 |4,1)...H|but$(0,0|
|00005170| 29 3d 22 62 75 74 74 6f | 6e 5f 6f 66 66 22 3a 62 |)="butto|n_off":b|
|00005180| 75 74 24 28 31 2c 30 29 | 3d 22 62 75 74 74 6f 6e |ut$(1,0)|="button|
|00005190| 5f 6f 76 65 72 22 3a 62 | 75 74 24 28 32 2c 30 29 |_over":b|ut$(2,0)|
|000051a0| 3d 22 62 75 74 74 6f 6e | 5f 6f 6e 22 0d 00 b3 3f |="button|_on"...?|
|000051b0| 62 75 74 24 28 30 2c 31 | 29 3d 22 62 75 74 5f 6f |but$(0,1|)="but_o|
|000051c0| 66 66 22 3a 62 75 74 24 | 28 31 2c 31 29 3d 22 62 |ff":but$|(1,1)="b|
|000051d0| 75 74 5f 6f 76 65 72 22 | 3a 62 75 74 24 28 32 2c |ut_over"|:but$(2,|
|000051e0| 31 29 3d 22 62 75 74 5f | 6f 6e 22 0d 00 b4 3c 62 |1)="but_|on"...<b|
|000051f0| 75 74 24 28 30 2c 32 29 | 3d 22 62 75 5f 6f 66 66 |ut$(0,2)|="bu_off|
|00005200| 22 3a 62 75 74 24 28 31 | 2c 32 29 3d 22 62 75 5f |":but$(1|,2)="bu_|
|00005210| 6f 76 65 72 22 3a 62 75 | 74 24 28 32 2c 32 29 3d |over":bu|t$(2,2)=|
|00005220| 22 62 75 5f 6f 6e 22 0d | 00 b5 42 62 75 74 24 28 |"bu_on".|..Bbut$(|
|00005230| 30 2c 33 29 3d 22 62 75 | 74 74 5f 6f 66 66 22 3a |0,3)="bu|tt_off":|
|00005240| 62 75 74 24 28 31 2c 33 | 29 3d 22 62 75 74 74 5f |but$(1,3|)="butt_|
|00005250| 6f 76 65 72 22 3a 62 75 | 74 24 28 32 2c 33 29 3d |over":bu|t$(2,3)=|
|00005260| 22 62 75 74 74 5f 6f 6e | 22 0d 00 b6 0f f2 65 78 |"butt_on|".....ex|
|00005270| 70 61 6e 64 62 75 74 73 | 0d 00 b7 25 f2 69 6e 69 |pandbuts|...%.ini|
|00005280| 74 5f 62 75 74 73 28 31 | 30 30 30 2c 32 30 2c 31 |t_buts(1|000,20,1|
|00005290| 38 2c 31 36 2c 32 34 2c | 32 34 2c 31 29 0d 00 b8 |8,16,24,|24,1)...|
|000052a0| 11 6d 61 78 73 6f 75 6e | 64 73 25 3d 32 30 0d 00 |.maxsoun|ds%=20..|
|000052b0| b9 1c de 20 73 6f 75 6e | 64 6d 6f 64 73 24 28 6d |... soun|dmods$(m|
|000052c0| 61 78 73 6f 75 6e 64 73 | 25 29 0d 00 ba 08 f7 20 |axsounds|%)..... |
|000052d0| 2b 30 0d 00 bb 2b dc 20 | 64 69 67 2c 6c 69 67 68 |+0...+. |dig,ligh|
|000052e0| 74 6e 2c 67 72 75 6e 74 | 2c 67 72 69 6e 64 2c 63 |tn,grunt|,grind,c|
|000052f0| 6c 69 63 6b 2c 74 75 72 | 6b 2c 79 61 70 0d 00 bc |lick,tur|k,yap...|
|00005300| 34 dc 20 73 6e 6f 72 65 | 2c 68 69 63 63 75 70 2c |4. snore|,hiccup,|
|00005310| 73 77 61 6c 6c 6f 77 2c | 66 6c 61 72 65 75 70 2c |swallow,|flareup,|
|00005320| 73 74 65 70 2c 73 74 61 | 62 2c 4d 61 72 6b 65 64 |step,sta|b,Marked|
|00005330| 34 0d 00 bd 35 dc 20 73 | 6f 6f 74 74 68 72 2c 4d |4...5. s|ootthr,M|
|00005340| 41 52 4b 45 44 33 2c 65 | 6e 67 69 6e 65 2c 67 6f |ARKED3,e|ngine,go|
|00005350| 61 6c 2c 73 74 65 61 6d | 2c 72 61 73 70 6c 67 2c |al,steam|,rasplg,|
|00005360| 72 61 73 70 73 68 0d 00 | be 27 e3 6b 25 3d 30 b8 |raspsh..|.'.k%=0.|
|00005370| 6d 61 78 73 6f 75 6e 64 | 73 25 3a f3 20 73 6f 75 |maxsound|s%:. sou|
|00005380| 6e 64 6d 6f 64 73 24 28 | 6b 25 29 3a ed 0d 00 bf |ndmods$(|k%):....|
|00005390| 05 e1 0d 00 c0 04 0d 00 | c1 10 dd f2 65 78 70 61 |........|....expa|
|000053a0| 6e 64 62 75 74 73 0d 00 | c2 2c e3 6b 25 3d 30 b8 |ndbuts..|.,.k%=0.|
|000053b0| 32 3a e3 6c 25 3d 30 b8 | 33 3a f2 65 78 70 61 6e |2:.l%=0.|3:.expan|
|000053c0| 64 28 62 75 74 24 28 6b | 25 2c 6c 25 29 29 3a ed |d(but$(k|%,l%)):.|
|000053d0| 3a ed 0d 00 c3 14 f2 65 | 78 70 61 6e 64 28 22 6d |:......e|xpand("m|
|000053e0| 6f 75 73 65 22 29 0d 00 | c4 05 e1 0d 00 c5 04 0d |ouse")..|........|
|000053f0| 00 c6 36 dd f2 69 6e 69 | 74 5f 62 75 74 73 28 78 |..6..ini|t_buts(x|
|00005400| 63 6f 25 2c 79 63 6f 25 | 2c 77 69 64 25 2c 68 65 |co%,yco%|,wid%,he|
|00005410| 69 25 2c 78 6f 66 66 25 | 2c 79 6f 66 66 25 2c 62 |i%,xoff%|,yoff%,b|
|00005420| 75 74 74 25 29 0d 00 c7 | 14 e3 20 62 25 3d 30 20 |utt%)...|.. b%=0 |
|00005430| b8 20 6d 61 78 62 75 74 | 25 0d 00 c8 29 63 6f 6f |. maxbut|%...)coo|
|00005440| 72 64 73 25 28 62 25 2c | 30 29 3d 78 63 6f 25 3a |rds%(b%,|0)=xco%:|
|00005450| 63 6f 6f 72 64 73 25 28 | 62 25 2c 31 29 3d 79 63 |coords%(|b%,1)=yc|
|00005460| 6f 25 0d 00 c9 24 77 69 | 64 74 68 25 28 62 25 29 |o%...$wi|dth%(b%)|
|00005470| 3d 77 69 64 25 3a 68 65 | 69 67 68 74 25 28 62 25 |=wid%:he|ight%(b%|
|00005480| 29 3d 68 65 69 25 0d 00 | ca 2f 6c 61 62 5f 6f 66 |)=hei%..|./lab_of|
|00005490| 66 73 25 28 62 25 2c 30 | 29 3d 78 6f 66 66 25 3a |fs%(b%,0|)=xoff%:|
|000054a0| 6c 61 62 5f 6f 66 66 73 | 25 28 62 25 2c 31 29 3d |lab_offs|%(b%,1)=|
|000054b0| 79 6f 66 66 25 0d 00 cb | 16 62 75 74 74 79 70 65 |yoff%...|.buttype|
|000054c0| 25 28 62 25 29 3d 62 75 | 74 74 25 0d 00 cc 05 ed |%(b%)=bu|tt%.....|
|000054d0| 0d 00 cd 05 e1 0d 00 ce | 04 0d 00 cf 0e dd f2 64 |........|.......d|
|000054e0| 65 73 6b 5f 74 6f 70 0d | 00 d0 36 d8 3a de 62 75 |esk_top.|..6.:.bu|
|000054f0| 66 25 20 34 3a e3 69 25 | 3d 31 b8 31 36 3a c8 96 |f% 4:.i%|=1.16:..|
|00005500| 3a e3 63 25 3d 30 b8 31 | 36 3a e7 63 25 3c 31 36 |:.c%=0.1|6:.c%<16|
|00005510| 76 25 3d 31 36 20 8b 20 | 76 25 3d 32 34 0d 00 d1 |v%=16 . |v%=24...|
|00005520| 50 c8 99 22 4f 53 5f 52 | 65 61 64 50 61 6c 65 74 |P.."OS_R|eadPalet|
|00005530| 74 65 22 2c 63 25 2c 76 | 25 20 b8 20 2c 2c 64 25 |te",c%,v|% . ,,d%|
|00005540| 3a 21 62 75 66 25 3d 64 | 25 3a e3 62 25 3d 31 b8 |:!buf%=d|%:.b%=1.|
|00005550| 33 3a e7 62 75 66 25 3f | 62 25 3e 30 62 75 66 25 |3:.buf%?|b%>0buf%|
|00005560| 3f 62 25 2d 3d 31 36 3a | ed 3a 8b 3a ed 0d 00 d2 |?b%-=16:|.:.:....|
|00005570| 25 ef 31 39 2c 63 25 2c | 76 25 2c 62 75 66 25 3f |%.19,c%,|v%,buf%?|
|00005580| 31 2c 62 75 66 25 3f 32 | 2c 62 75 66 25 3f 33 3a |1,buf%?2|,buf%?3:|
|00005590| ed 2c 0d 00 d3 09 2a 46 | 58 31 35 0d 00 d4 0c 2a |.,....*F|X15....*|
|000055a0| 46 58 32 32 35 2c 31 0d | 00 d5 20 2a 4b 45 59 30 |FX225,1.|.. *KEY0|
|000055b0| 20 50 41 47 45 3d 26 38 | 46 30 30 7c 4d 4f 4c 44 | PAGE=&8|F00|MOLD|
|000055c0| 7c 4d 52 55 4e 7c 4d 0d | 00 d6 10 2a 46 58 31 33 ||MRUN|M.|...*FX13|
|000055d0| 38 2c 30 2c 31 32 38 0d | 00 d7 0a 2a 42 41 53 49 |8,0,128.|...*BASI|
|000055e0| 43 0d 00 d8 05 fa 0d 00 | d9 04 0d 00 da 20 dd f2 |C.......|..... ..|
|000055f0| 61 64 64 5f 73 70 28 73 | 63 72 25 2c 73 70 72 24 |add_sp(s|cr%,spr$|
|00005600| 2c 43 25 2c 44 25 2c 47 | 25 29 0d 00 db 21 e7 73 |,C%,D%,G|%)...!.s|
|00005610| 63 72 25 3d 31 3a 41 25 | 3d 48 25 21 26 43 30 3a |cr%=1:A%|=H%!&C0:|
|00005620| 8b 3a 41 25 3d 48 25 21 | 26 43 34 0d 00 dc 35 c8 |.:A%=H%!|&C4...5.|
|00005630| 99 20 22 4f 53 5f 53 70 | 72 69 74 65 4f 70 22 2c |. "OS_Sp|riteOp",|
|00005640| 26 31 31 38 2c 41 52 45 | 41 25 2c 73 70 72 24 20 |&118,ARE|A%,spr$ |
|00005650| b8 20 2c 2c 42 25 3a 42 | 25 2b 3d 42 25 21 33 32 |. ,,B%:B|%+=B%!32|
|00005660| 0d 00 dd 10 e7 28 48 25 | 21 26 46 30 29 3d 32 8c |.....(H%|!&F0)=2.|
|00005670| 0d 00 de 0b 44 25 3d 32 | 2a 44 25 0d 00 df 10 d6 |....D%=2|*D%.....|
|00005680| 20 73 70 5f 6f 6e 5f 76 | 67 61 25 0d 00 e0 05 cc | sp_on_v|ga%.....|
|00005690| 0d 00 e1 10 d6 20 73 70 | 5f 6f 6e 5f 63 67 61 25 |..... sp|_on_cga%|
|000056a0| 0d 00 e2 05 cd 0d 00 e3 | 05 e1 0d 00 e4 04 0d 00 |........|........|
|000056b0| e5 0b dd f2 67 6f 5f 6f | 6e 0d 00 e6 13 63 6f 6f |....go_o|n....coo|
|000056c0| 72 64 73 25 28 30 2c 31 | 29 3d 32 30 0d 00 e7 19 |rds%(0,1|)=20....|
|000056d0| 6c 61 62 65 6c 73 24 28 | 30 29 3d 22 20 20 47 6f |labels$(|0)=" Go|
|000056e0| 20 20 6f 6e 22 0d 00 e8 | 18 f2 63 68 6f 6f 73 65 | on"...|..choose|
|000056f0| 5f 62 75 74 28 31 2c 31 | 2c 32 2c 30 29 0d 00 e9 |_but(1,1|,2,0)...|
|00005700| 05 e1 0d 00 ea 04 0d 00 | eb 0d dd f2 6a 70 67 6f |........|....jpgo|
|00005710| 5f 6f 6e 0d 00 ec 13 63 | 6f 6f 72 64 73 25 28 30 |_on....c|oords%(0|
|00005720| 2c 31 29 3d 32 34 0d 00 | ed 19 6c 61 62 65 6c 73 |,1)=24..|..labels|
|00005730| 24 28 30 29 3d 22 20 20 | 47 6f 20 20 6f 6e 22 0d |$(0)=" |Go on".|
|00005740| 00 ee 19 f2 63 68 6f 6f | 73 65 5f 62 75 74 28 31 |....choo|se_but(1|
|00005750| 2c 31 2c 32 2c 31 38 29 | 0d 00 ef 10 f2 6a 70 63 |,1,2,18)|.....jpc|
|00005760| 6c 65 61 72 74 65 78 74 | 0d 00 f0 05 e1 0d 00 f1 |leartext|........|
|00005770| 04 0d 00 f2 0c dd f2 6a | 70 69 6e 66 6f 0d 00 f3 |.......j|pinfo...|
|00005780| 3f c8 99 20 22 4f 53 5f | 53 70 72 69 74 65 4f 70 |?.. "OS_|SpriteOp|
|00005790| 22 2c 26 31 30 42 2c 41 | 52 45 41 25 2c 22 3c 41 |",&10B,A|REA%,"<A|
|000057a0| 5a 54 45 43 24 63 68 61 | 69 6e 64 69 72 3e 2e 4f |ZTEC$cha|indir>.O|
|000057b0| 4e 45 2e 6a 70 69 6e 66 | 6f 5f 63 22 0d 00 f4 59 |NE.jpinf|o_c"...Y|
|000057c0| f4 49 46 28 4c 25 3e 32 | 30 30 30 29 41 4e 44 28 |.IF(L%>2|000)AND(|
|000057d0| 4c 25 3c 33 30 30 30 29 | 3a 53 59 53 20 22 4f 53 |L%<3000)|:SYS "OS|
|000057e0| 5f 53 70 72 69 74 65 4f | 70 22 2c 26 31 30 42 2c |_SpriteO|p",&10B,|
|000057f0| 41 52 45 41 25 2c 22 3c | 41 5a 54 45 43 24 63 68 |AREA%,"<|AZTEC$ch|
|00005800| 61 69 6e 64 69 72 3e 2e | 54 57 4f 2e 6a 70 69 6e |aindir>.|TWO.jpin|
|00005810| 66 6f 5f 63 22 0d 00 f5 | 4d f4 49 46 4c 25 3e 33 |fo_c"...|M.IFL%>3|
|00005820| 30 30 30 3a 53 59 53 20 | 22 4f 53 5f 53 70 72 69 |000:SYS |"OS_Spri|
|00005830| 74 65 4f 70 22 2c 26 31 | 30 42 2c 41 52 45 41 25 |teOp",&1|0B,AREA%|
|00005840| 2c 22 3c 41 5a 54 45 43 | 24 63 68 61 69 6e 64 69 |,"<AZTEC|$chaindi|
|00005850| 72 3e 2e 54 48 52 45 45 | 2e 6a 70 69 6e 66 6f 5f |r>.THREE|.jpinfo_|
|00005860| 63 22 0d 00 f6 24 f2 69 | 6e 69 74 5f 62 75 74 73 |c"...$.i|nit_buts|
|00005870| 28 39 30 30 2c 34 30 2c | 32 34 2c 31 36 2c 32 36 |(900,40,|24,16,26|
|00005880| 2c 32 34 2c 31 29 0d 00 | f7 1e 6c 61 62 65 6c 73 |,24,1)..|..labels|
|00005890| 24 28 30 29 3d 22 20 4a | 65 74 2d 70 61 63 20 69 |$(0)=" J|et-pac i|
|000058a0| 6e 66 6f 22 0d 00 f8 19 | f2 63 68 6f 6f 73 65 5f |nfo"....|.choose_|
|000058b0| 62 75 74 28 31 2c 31 2c | 32 2c 31 36 29 0d 00 f9 |but(1,1,|2,16)...|
|000058c0| 0b ef 31 38 2c 30 2c 35 | 0d 00 fa 0e e3 6b 25 3d |..18,0,5|.....k%=|
|000058d0| 32 b8 31 88 2d 31 0d 00 | fb 16 c8 99 22 4f 53 5f |2.1.-1..|...."OS_|
|000058e0| 42 79 74 65 22 2c 31 31 | 32 2c 6b 25 0d 00 fc 5a |Byte",11|2,k%...Z|
|000058f0| ef 32 35 2c 34 2c 31 32 | 3b 31 32 3b 3a ef 32 35 |.25,4,12|;12;:.25|
|00005900| 2c 31 30 31 2c 31 32 36 | 36 3b 31 38 3b 3a ef 32 |,101,126|6;18;:.2|
|00005910| 35 2c 31 30 31 2c 31 32 | 36 30 3b 6c 6f 77 25 2d |5,101,12|60;low%-|
|00005920| 32 32 3b 3a ef 32 35 2c | 31 30 31 2c 31 32 3b 6c |22;:.25,|101,12;l|
|00005930| 6f 77 25 2d 32 38 3b 3a | ef 32 35 2c 31 30 31 2c |ow%-28;:|.25,101,|
|00005940| 31 38 3b 31 32 3b 0d 00 | fd 05 ed 0d 00 fe 3f f2 |18;12;..|......?.|
|00005950| 61 64 64 5f 73 70 28 31 | 2c 22 6a 70 69 6e 66 6f |add_sp(1|,"jpinfo|
|00005960| 22 2c 31 30 32 2c 31 37 | 38 2c 36 29 3a f2 61 64 |",102,17|8,6):.ad|
|00005970| 64 5f 73 70 28 32 2c 22 | 6a 70 69 6e 66 6f 22 2c |d_sp(2,"|jpinfo",|
|00005980| 31 30 32 2c 31 37 38 2c | 36 29 0d 00 ff 25 f2 69 |102,178,|6)...%.i|
|00005990| 6e 69 74 5f 62 75 74 73 | 28 31 30 30 30 2c 32 30 |nit_buts|(1000,20|
|000059a0| 2c 31 38 2c 31 36 2c 32 | 34 2c 32 34 2c 31 29 0d |,18,16,2|4,24,1).|
|000059b0| 01 00 05 e1 0d 01 01 04 | 0d 01 02 0b dd f2 6a 70 |........|......jp|
|000059c0| 65 6e 64 0d 01 03 27 f2 | 64 65 6c 65 74 65 28 22 |end...'.|delete("|
|000059d0| 6a 70 69 6e 66 6f 22 29 | 3a f2 64 65 6c 65 74 65 |jpinfo")|:.delete|
|000059e0| 28 22 6a 70 73 63 61 6e | 22 29 0d 01 04 25 f2 69 |("jpscan|")...%.i|
|000059f0| 6e 69 74 5f 62 75 74 73 | 28 31 30 30 30 2c 32 34 |nit_buts|(1000,24|
|00005a00| 2c 32 32 2c 31 36 2c 32 | 36 2c 32 34 2c 31 29 0d |,22,16,2|6,24,1).|
|00005a10| 01 05 1d 6c 61 62 65 6c | 73 24 28 30 29 3d 22 20 |...label|s$(0)=" |
|00005a20| 4a 65 74 2d 70 61 63 20 | 6f 66 66 22 0d 01 06 19 |Jet-pac |off"....|
|00005a30| f2 63 68 6f 6f 73 65 5f | 62 75 74 28 31 2c 31 2c |.choose_|but(1,1,|
|00005a40| 32 2c 31 36 29 0d 01 07 | 39 f2 6a 70 65 64 67 65 |2,16)...|9.jpedge|
|00005a50| 73 3a c8 99 22 4f 53 5f | 42 79 74 65 22 2c 31 31 |s:.."OS_|Byte",11|
|00005a60| 32 2c 32 3a f2 6a 70 65 | 64 67 65 73 3a c8 99 22 |2,2:.jpe|dges:.."|
|00005a70| 4f 53 5f 42 79 74 65 22 | 2c 31 31 32 2c 31 0d 01 |OS_Byte"|,112,1..|
|00005a80| 08 07 ef 32 36 0d 01 09 | 25 f2 69 6e 69 74 5f 62 |...26...|%.init_b|
|00005a90| 75 74 73 28 31 30 30 30 | 2c 32 30 2c 31 38 2c 31 |uts(1000|,20,18,1|
|00005aa0| 36 2c 32 34 2c 32 34 2c | 31 29 0d 01 0a 05 e1 0d |6,24,24,|1)......|
|00005ab0| 01 0b 04 0d 01 0c 0d dd | f2 6a 70 65 64 67 65 73 |........|.jpedges|
|00005ac0| 0d 01 0d 2a ef 31 38 2c | 30 2c 32 3a ef 32 35 2c |...*.18,|0,2:.25,|
|00005ad0| 34 2c 30 3b 32 34 34 3b | 3a ef 32 35 2c 31 30 31 |4,0;244;|:.25,101|
|00005ae0| 2c 31 32 37 38 3b 32 34 | 36 3b 0d 01 0e 2a ef 31 |,1278;24|6;...*.1|
|00005af0| 38 2c 30 2c 30 3a ef 32 | 35 2c 34 2c 38 3b 32 34 |8,0,0:.2|5,4,8;24|
|00005b00| 30 3b 3a ef 32 35 2c 31 | 30 31 2c 31 32 36 38 3b |0;:.25,1|01,1268;|
|00005b10| 32 34 32 3b 0d 01 0f 2a | ef 31 38 2c 30 2c 33 3a |242;...*|.18,0,3:|
|00005b20| ef 32 35 2c 34 2c 38 3b | 32 33 36 3b 3a ef 32 35 |.25,4,8;|236;:.25|
|00005b30| 2c 31 30 31 2c 31 32 36 | 38 3b 32 33 38 3b 0d 01 |,101,126|8;238;..|
|00005b40| 10 3c ef 31 38 2c 30 2c | 30 3a ef 32 35 2c 34 2c |.<.18,0,|0:.25,4,|
|00005b50| 31 32 3b 32 33 32 3b 3a | ef 32 35 2c 31 30 31 2c |12;232;:|.25,101,|
|00005b60| 31 32 36 36 3b 32 33 34 | 3b 3a ef 32 35 2c 31 30 |1266;234|;:.25,10|
|00005b70| 31 2c 31 32 36 34 3b 31 | 32 3b 0d 01 11 39 ef 31 |1,1264;1|2;...9.1|
|00005b80| 38 2c 30 2c 32 3a ef 32 | 35 2c 34 2c 31 32 3b 32 |8,0,2:.2|5,4,12;2|
|00005b90| 33 30 3b 3a ef 32 35 2c | 31 30 31 2c 31 34 3b 31 |30;:.25,|101,14;1|
|00005ba0| 32 3b 3a ef 32 35 2c 31 | 30 31 2c 31 32 36 32 3b |2;:.25,1|01,1262;|
|00005bb0| 31 34 3b 0d 01 12 2a ef | 31 38 2c 30 2c 31 3a ef |14;...*.|18,0,1:.|
|00005bc0| 32 35 2c 34 2c 31 36 3b | 31 36 3b 3a ef 32 35 2c |25,4,16;|16;:.25,|
|00005bd0| 31 30 31 2c 31 32 36 32 | 3b 32 33 30 3b 0d 01 13 |101,1262|;230;...|
|00005be0| 05 e1 0d 01 14 04 0d 01 | 15 0b dd f2 79 65 73 6e |........|....yesn|
|00005bf0| 6f 0d 01 16 25 f2 69 6e | 69 74 5f 62 75 74 73 28 |o...%.in|it_buts(|
|00005c00| 31 30 32 30 2c 34 30 2c | 31 36 2c 31 36 2c 32 38 |1020,40,|16,16,28|
|00005c10| 2c 32 34 2c 31 29 0d 01 | 17 3c 63 6f 6f 72 64 73 |,24,1)..|.<coords|
|00005c20| 25 28 30 2c 30 29 3d 38 | 32 30 3a 6c 61 62 65 6c |%(0,0)=8|20:label|
|00005c30| 73 24 28 30 29 3d 22 20 | 20 20 20 4e 6f 22 3a 6c |s$(0)=" | No":l|
|00005c40| 61 62 65 6c 73 24 28 31 | 29 3d 22 20 20 20 59 65 |abels$(1|)=" Ye|
|00005c50| 73 22 0d 01 18 18 f2 63 | 68 6f 6f 73 65 5f 62 75 |s".....c|hoose_bu|
|00005c60| 74 28 31 2c 32 2c 32 2c | 30 29 0d 01 19 25 f2 69 |t(1,2,2,|0)...%.i|
|00005c70| 6e 69 74 5f 62 75 74 73 | 28 31 30 30 30 2c 32 30 |nit_buts|(1000,20|
|00005c80| 2c 31 38 2c 31 36 2c 32 | 34 2c 32 34 2c 31 29 0d |,18,16,2|4,24,1).|
|00005c90| 01 1a 05 e1 0d 01 1b 04 | 0d 01 1c 19 dd f2 70 6f |........|......po|
|00005ca0| 73 62 75 74 74 6f 6e 73 | 28 6e 6f 62 75 74 73 25 |sbuttons|(nobuts%|
|00005cb0| 29 0d 01 1d 0c 74 6f 74 | 77 69 25 3d 30 0d 01 1e |)....tot|wi%=0...|
|00005cc0| 13 e3 6b 25 3d 30 b8 6e | 6f 62 75 74 73 25 2d 31 |..k%=0.n|obuts%-1|
|00005cd0| 0d 01 1f 42 e7 28 62 75 | 74 74 79 70 65 25 28 6b |...B.(bu|ttype%(k|
|00005ce0| 25 29 3d 30 29 84 28 62 | 75 74 74 79 70 65 25 28 |%)=0).(b|uttype%(|
|00005cf0| 6b 25 29 3d 31 29 3a 74 | 6f 74 77 69 25 2b 3d 31 |k%)=1):t|otwi%+=1|
|00005d00| 37 36 2a 28 77 69 64 74 | 68 25 28 6b 25 29 2f 31 |76*(widt|h%(k%)/1|
|00005d10| 36 29 0d 01 20 2f e7 62 | 75 74 74 79 70 65 25 28 |6).. /.b|uttype%(|
|00005d20| 6b 25 29 3d 33 3a 74 6f | 74 77 69 25 2b 3d 33 35 |k%)=3:to|twi%+=35|
|00005d30| 32 2a 28 77 69 64 74 68 | 25 28 6b 25 29 2f 31 36 |2*(width|%(k%)/16|
|00005d40| 29 0d 01 21 05 ed 0d 01 | 22 3e 67 61 70 25 3d 28 |)..!....|">gap%=(|
|00005d50| 31 32 38 30 2d 32 34 2d | 74 6f 74 77 69 25 29 2f |1280-24-|totwi%)/|
|00005d60| 28 6e 6f 62 75 74 73 25 | 2b 31 29 3a 74 6f 74 77 |(nobuts%|+1):totw|
|00005d70| 69 25 3d 67 61 70 25 2b | 31 32 3a 62 75 74 63 6e |i%=gap%+|12:butcn|
|00005d80| 74 25 3d 30 0d 01 23 05 | f5 0d 01 24 1d 63 6f 6f |t%=0..#.|...$.coo|
|00005d90| 72 64 73 25 28 62 75 74 | 63 6e 74 25 2c 30 29 3d |rds%(but|cnt%,0)=|
|00005da0| 74 6f 74 77 69 25 0d 01 | 25 58 e7 28 62 75 74 74 |totwi%..|%X.(butt|
|00005db0| 79 70 65 25 28 62 75 74 | 63 6e 74 25 29 3d 30 29 |ype%(but|cnt%)=0)|
|00005dc0| 84 28 62 75 74 74 79 70 | 65 25 28 62 75 74 63 6e |.(buttyp|e%(butcn|
|00005dd0| 74 25 29 3d 31 29 3a 74 | 6f 74 77 69 25 2b 3d 67 |t%)=1):t|otwi%+=g|
|00005de0| 61 70 25 2b 28 31 37 36 | 2a 28 77 69 64 74 68 25 |ap%+(176|*(width%|
|00005df0| 28 62 75 74 63 6e 74 25 | 29 2f 31 36 29 29 0d 01 |(butcnt%|)/16))..|
|00005e00| 26 40 e7 62 75 74 74 79 | 70 65 25 28 62 75 74 63 |&@.butty|pe%(butc|
|00005e10| 6e 74 25 29 3d 33 3a 74 | 6f 74 77 69 25 2b 3d 67 |nt%)=3:t|otwi%+=g|
|00005e20| 61 70 25 2b 28 33 35 32 | 2a 28 77 69 64 74 68 25 |ap%+(352|*(width%|
|00005e30| 28 62 75 74 63 6e 74 25 | 29 2f 31 36 29 29 0d 01 |(butcnt%|)/16))..|
|00005e40| 27 0e 62 75 74 63 6e 74 | 25 2b 3d 31 0d 01 28 14 |'.butcnt|%+=1..(.|
|00005e50| fd 62 75 74 63 6e 74 25 | 3d 6e 6f 62 75 74 73 25 |.butcnt%|=nobuts%|
|00005e60| 0d 01 29 05 e1 0d 01 2a | 04 0d 01 2b 2f dd f2 63 |..)....*|...+/..c|
|00005e70| 68 6f 6f 73 65 5f 62 75 | 74 28 73 63 72 25 2c 62 |hoose_bu|t(scr%,b|
|00005e80| 75 74 5f 6e 6f 25 2c 6c | 61 62 5f 79 6e 25 2c 63 |ut_no%,l|ab_yn%,c|
|00005e90| 6f 6e 74 72 6f 6c 25 29 | 0d 01 2c 61 f4 20 73 63 |ontrol%)|..,a. sc|
|00005ea0| 72 25 3d 73 63 72 65 65 | 6e 20 6e 75 6d 62 65 72 |r%=scree|n number|
|00005eb0| 2c 20 62 75 74 5f 6e 6f | 25 3d 6e 75 6d 62 65 72 |, but_no|%=number|
|00005ec0| 20 6f 66 20 62 75 74 74 | 6f 6e 73 20 74 6f 20 70 | of butt|ons to p|
|00005ed0| 6c 6f 74 2c 20 6c 61 62 | 5f 79 6e 25 3d 31 20 69 |lot, lab|_yn%=1 i|
|00005ee0| 66 20 6c 61 62 65 6c 20 | 73 70 72 69 74 65 20 65 |f label |sprite e|
|00005ef0| 6c 73 65 20 77 6f 72 64 | 73 0d 01 2d 6b f4 20 63 |lse word|s..-k. c|
|00005f00| 6f 6e 74 72 6f 6c 25 20 | 64 65 66 69 6e 65 73 20 |ontrol% |defines |
|00005f10| 76 61 72 69 6f 75 73 20 | 6f 70 74 69 6f 6e 73 20 |various |options |
|00005f20| 64 65 70 65 6e 64 65 6e | 74 20 6f 6e 20 62 69 74 |dependen|t on bit|
|00005f30| 20 73 65 74 74 69 6e 67 | 73 20 2d 20 75 6e 73 65 | setting|s - unse|
|00005f40| 74 20 28 69 65 2e 20 30 | 29 20 20 20 20 20 20 20 |t (ie. 0|) |
|00005f50| 20 20 20 20 20 20 20 20 | 20 20 73 65 74 20 28 69 | | set (i|
|00005f60| 65 20 31 29 0d 01 2e 76 | f4 20 20 20 20 20 20 20 |e 1)...v|. |
|00005f70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005f80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005f90| 20 20 20 20 20 20 20 20 | 20 20 20 20 62 69 74 20 | | bit |
|00005fa0| 20 20 30 20 20 20 20 6c | 6f 6f 70 20 69 6e 20 50 | 0 l|oop in P|
|00005fb0| 52 4f 43 20 75 6e 74 69 | 6c 20 63 68 6f 73 65 6e |ROC unti|l chosen|
|00005fc0| 20 20 20 20 20 73 69 6e | 67 6c 65 20 70 61 73 73 | sin|gle pass|
|00005fd0| 20 74 68 72 75 20 50 52 | 4f 43 0d 01 2f 71 f4 20 | thru PR|OC../q. |
|00005fe0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005ff0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00006000| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00006010| 20 20 20 20 20 20 20 20 | 31 20 20 20 20 63 6c 65 | |1 cle|
|00006020| 61 72 20 74 65 78 74 20 | 61 72 65 61 20 61 66 74 |ar text |area aft|
|00006030| 65 72 20 63 68 6f 69 63 | 65 20 20 64 6f 6e 27 74 |er choic|e don't|
|00006040| 20 63 6c 65 61 72 20 74 | 65 78 74 0d 01 30 6a f4 | clear t|ext..0j.|
|00006050| 20 20 20 20 4e 42 20 62 | 69 74 73 20 32 20 61 6e | NB b|its 2 an|
|00006060| 64 20 33 20 6f 66 20 63 | 6f 6e 74 72 6f 6c 25 20 |d 3 of c|ontrol% |
|00006070| 61 72 65 20 6e 6f 77 20 | 69 67 6e 6f 72 65 64 20 |are now |ignored |
|00006080| 20 20 20 58 58 58 20 20 | 20 32 20 20 20 20 4d 4f | XXX | 2 MO|
|00006090| 55 53 45 20 74 6f 20 72 | 69 67 68 74 20 6f 66 20 |USE to r|ight of |
|000060a0| 6c 61 73 74 20 62 6f 78 | 20 20 20 20 73 65 65 20 |last box| see |
|000060b0| 62 69 74 20 33 0d 01 31 | 88 f4 20 20 20 20 20 20 |bit 3..1|.. |
|000060c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000060d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000060e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 58 58 58 | | XXX|
|000060f0| 20 20 20 33 20 20 20 20 | 4d 4f 55 53 45 20 74 6f | 3 |MOUSE to|
|00006100| 20 62 65 6c 6f 77 20 63 | 68 6f 69 63 65 20 20 20 | below c|hoice |
|00006110| 20 20 20 20 20 20 4d 4f | 55 53 45 20 74 6f 20 72 | MO|USE to r|
|00006120| 69 67 68 74 20 6f 66 20 | 63 68 6f 69 63 65 20 28 |ight of |choice (|
|00006130| 69 66 20 62 69 74 20 32 | 20 73 65 74 29 0d 01 32 |if bit 2| set)..2|
|00006140| 81 f4 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.. | |
|00006150| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00006160| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00006170| 20 20 20 20 20 20 20 20 | 20 20 20 34 20 20 20 20 | | 4 |
|00006180| 75 73 65 20 50 52 4f 43 | 77 6f 72 64 73 20 28 62 |use PROC|words (b|
|00006190| 6c 61 63 6b 20 77 6f 72 | 64 73 29 20 20 20 75 73 |lack wor|ds) us|
|000061a0| 65 20 50 52 4f 43 6a 70 | 77 6f 72 64 73 20 28 63 |e PROCjp|words (c|
|000061b0| 6f 6c 6f 75 72 65 64 20 | 77 6f 72 64 73 29 0d 01 |oloured |words)..|
|000061c0| 33 2d 20 20 e7 28 63 6f | 6e 74 72 6f 6c 25 80 31 |3- .(co|ntrol%.1|
|000061d0| 29 3d 31 3a 6f 6e 65 6c | 6f 6f 70 25 3d b9 3a 8b |)=1:onel|oop%=.:.|
|000061e0| 3a 6f 6e 65 6c 6f 6f 70 | 25 3d a3 0d 01 34 31 20 |:oneloop|%=...41 |
|000061f0| 20 e7 28 63 6f 6e 74 72 | 6f 6c 25 80 32 29 3d 30 | .(contr|ol%.2)=0|
|00006200| 3a 63 6c 65 61 72 74 65 | 78 74 25 3d b9 3a 8b 3a |:clearte|xt%=.:.:|
|00006210| 63 6c 65 61 72 74 65 78 | 74 25 3d a3 0d 01 35 31 |cleartex|t%=...51|
|00006220| 20 20 e7 28 63 6f 6e 74 | 72 6f 6c 25 80 31 36 29 | .(cont|rol%.16)|
|00006230| 3d 31 36 3a 69 6e 6a 65 | 74 70 61 63 25 3d b9 3a |=16:inje|tpac%=.:|
|00006240| 8b 3a 69 6e 6a 65 74 70 | 61 63 25 3d a3 0d 01 36 |.:injetp|ac%=...6|
|00006250| 3f f4 49 46 28 63 6f 6e | 74 72 6f 6c 25 41 4e 44 |?.IF(con|trol%AND|
|00006260| 34 29 3d 30 3a 6d 6f 75 | 73 65 72 69 67 68 74 25 |4)=0:mou|seright%|
|00006270| 3d 54 52 55 45 3a 45 4c | 53 45 3a 6d 6f 75 73 65 |=TRUE:EL|SE:mouse|
|00006280| 72 69 67 68 74 25 3d 46 | 41 4c 53 45 0d 01 37 52 |right%=F|ALSE..7R|
|00006290| f4 49 46 4e 4f 54 6d 6f | 75 73 65 72 69 67 68 74 |.IFNOTmo|useright|
|000062a0| 25 54 48 45 4e 3a 49 46 | 28 63 6f 6e 74 72 6f 6c |%THEN:IF|(control|
|000062b0| 25 41 4e 44 38 29 3d 30 | 3a 6d 6f 75 73 65 64 6f |%AND8)=0|:mousedo|
|000062c0| 77 6e 25 3d 54 52 55 45 | 3a 45 4c 53 45 3a 6d 6f |wn%=TRUE|:ELSE:mo|
|000062d0| 75 73 65 64 6f 77 6e 25 | 3d 46 41 4c 53 45 0d 01 |usedown%|=FALSE..|
|000062e0| 38 12 20 20 e7 20 6f 6e | 65 6c 6f 6f 70 25 20 8c |8. . on|eloop% .|
|000062f0| 0d 01 39 55 20 20 20 20 | e7 20 66 69 72 73 74 6c |..9U |. firstl|
|00006300| 6f 6f 70 25 3d b9 20 3a | 20 f2 73 65 74 75 70 5f |oop%=. :| .setup_|
|00006310| 62 75 74 73 28 73 63 72 | 25 29 20 3a 20 63 68 6f |buts(scr|%) : cho|
|00006320| 73 65 6e 25 3d 32 30 20 | 3a 20 6c 61 73 74 5f 70 |sen%=20 |: last_p|
|00006330| 6f 73 25 3d 32 30 20 3a | 20 66 69 72 73 74 6c 6f |os%=20 :| firstlo|
|00006340| 6f 70 25 3d a3 0d 01 3a | 07 20 20 cc 0d 01 3b 19 |op%=...:|. ...;.|
|00006350| 20 20 20 20 f2 73 65 74 | 75 70 5f 62 75 74 73 28 | .set|up_buts(|
|00006360| 73 63 72 25 29 0d 01 3c | 18 20 20 20 20 c8 99 22 |scr%)..<|. .."|
|00006370| 4f 53 5f 42 79 74 65 22 | 2c 32 31 2c 39 0d 01 3d |OS_Byte"|,21,9..=|
|00006380| 0c 20 20 20 20 c8 97 20 | ee 0d 01 3e 13 20 20 20 |. .. |...>. |
|00006390| 20 f2 6d 6f 75 73 65 5f | 74 65 78 74 0d 01 3f 14 | .mouse_|text..?.|
|000063a0| 20 20 20 20 6c 61 73 74 | 5f 70 6f 73 25 3d 32 30 | last|_pos%=20|
|000063b0| 0d 01 40 12 20 20 20 20 | 63 68 6f 73 65 6e 25 3d |..@. |chosen%=|
|000063c0| 32 30 0d 01 41 07 20 20 | cd 0d 01 42 0b 20 20 2a |20..A. |...B. *|
|000063d0| 46 58 31 35 0d 01 43 07 | 20 20 f5 0d 01 44 29 20 |FX15..C.| ...D) |
|000063e0| 20 20 20 e7 20 ac 6f 6e | 65 6c 6f 6f 70 25 20 3a | . .on|eloop% :|
|000063f0| 20 c8 97 20 6d 5f 78 25 | 2c 6d 5f 79 25 2c 6d 5f | .. m_x%|,m_y%,m_|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.