home *** CD-ROM | disk | FTP | other *** search
/ APDL Public Domain 1 / APDL_PD1A.iso / fontutils / systemfont / chardef < prev    next >
ArcFS Archive  |  1995-10-01  |  13.2 KB

open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


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

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 | 44 01 00 00 a4 01 00 00 |Archive.|D.......|
|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 43 68 61 72 44 65 | 66 00 00 00 ff ff ff ff |.!CharDe|f.......|
|00000070| 44 fd ff ff a2 3c 45 78 | 00 00 00 00 ff ff ff ff |D....<Ex|........|
|00000080| 20 01 00 80 82 21 50 61 | 6c 65 74 74 65 00 83 03 | ....!Pa|lette...|
|00000090| 78 00 00 00 44 ed ff ff | dc f1 45 78 03 00 fb 4c |x...D...|..Ex...L|
|000000a0| 78 00 00 00 24 00 00 00 | 82 21 52 75 6e 00 00 00 |x...$...|.!Run...|
|000000b0| 98 ef 83 03 18 00 00 00 | 44 eb ff ff 78 54 45 78 |........|D...xTEx|
|000000c0| 03 00 f8 8c 18 00 00 00 | c0 00 00 00 82 21 73 70 |........|.....!sp|
|000000d0| 72 69 74 65 73 00 83 03 | e0 02 00 00 44 f9 ff ff |rites...|....D...|
|000000e0| cc 4c 49 78 03 00 99 0d | e0 02 00 00 fc 00 00 00 |.LIx....|........|
|000000f0| 82 43 68 61 72 42 6f 6f | 74 00 83 03 39 01 00 00 |.CharBoo|t...9...|
|00000100| 44 fb ff ff 42 f3 46 78 | 03 00 19 55 39 01 00 00 |D...B.Fx|...U9...|
|00000110| 00 04 00 00 82 43 68 61 | 72 44 65 66 69 6e 65 00 |.....Cha|rDefine.|
|00000120| 58 23 00 00 44 fb ff ff | 69 c9 47 78 03 00 ff 71 |X#..D...|i.Gx...q|
|00000130| 58 23 00 00 5d 05 00 00 | 82 43 68 61 72 46 57 50 |X#..]...|.CharFWP|
|00000140| 00 ef 83 03 5b 0a 00 00 | 44 ff ff ff 76 ff 49 78 |....[...|D...v.Ix|
|00000150| 03 00 f0 cc 5b 0a 00 00 | d9 28 00 00 00 00 00 00 |....[...|.(......|
|00000160| 00 00 00 00 98 ef 83 03 | d4 f3 83 03 10 74 84 03 |........|.....t..|
|00000170| 84 84 84 03 c0 04 85 03 | c0 e6 8d 03 bc e5 8d 03 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| b0 01 00 00 46 69 6c 65 | 44 61 74 61 82 21 50 61 |....File|Data.!Pa|
|000001b0| 6c 65 74 74 65 00 83 03 | 78 00 00 00 44 ed ff ff |lette...|x...D...|
|000001c0| dc f1 45 78 03 00 fb 4c | 13 00 10 f0 f0 f0 13 01 |..Ex...L|........|
|000001d0| 10 f0 00 00 13 02 10 e0 | a0 00 13 03 10 90 90 90 |........|........|
|000001e0| 13 04 10 70 70 70 13 05 | 10 50 50 50 13 06 10 30 |...ppp..|.PPP...0|
|000001f0| 30 30 13 07 10 00 00 00 | 13 08 10 00 40 90 13 09 |00......|....@...|
|00000200| 10 e0 e0 00 13 0a 10 00 | c0 00 13 0b 10 d0 00 00 |........|........|
|00000210| 13 0c 10 e0 e0 b0 13 0d | 10 50 80 00 13 0e 10 f0 |........|.P......|
|00000220| b0 00 13 0f 10 00 b0 f0 | 13 00 18 70 70 70 13 01 |........|...ppp..|
|00000230| 19 00 f0 f0 13 02 19 00 | 00 90 13 03 19 f0 00 00 |........|........|
|00000240| 46 69 6c 65 44 61 74 61 | 82 21 52 75 6e 00 00 00 |FileData|.!Run...|
|00000250| 98 ef 83 03 18 00 00 00 | 44 eb ff ff 78 54 45 78 |........|D...xTEx|
|00000260| 03 00 f8 8c 52 55 4e 20 | 3c 4f 62 65 79 24 44 69 |....RUN |<Obey$Di|
|00000270| 72 3e 2e 43 68 61 72 62 | 6f 6f 74 0a 46 69 6c 65 |r>.Charb|oot.File|
|00000280| 44 61 74 61 82 21 73 70 | 72 69 74 65 73 00 83 03 |Data.!sp|rites...|
|00000290| e0 02 00 00 44 f9 ff ff | cc 4c 49 78 03 00 99 0d |....D...|.LIx....|
|000002a0| 01 00 00 00 10 00 00 00 | e4 02 00 00 d4 02 00 00 |........|........|
|000002b0| 21 63 68 61 72 64 65 66 | 00 00 00 00 04 00 00 00 |!chardef|........|
|000002c0| 10 00 00 00 00 00 00 00 | 07 00 00 00 2c 00 00 00 |........|....,...|
|000002d0| 80 01 00 00 0c 00 00 00 | 77 77 77 77 77 77 77 77 |........|wwwwwwww|
|000002e0| 77 77 77 77 77 77 77 77 | 77 00 00 00 77 77 77 77 |wwwwwwww|w...wwww|
|000002f0| 77 77 77 77 77 77 77 77 | 77 77 77 77 77 00 00 00 |wwwwwwww|wwwww...|
|00000300| 77 77 77 77 77 77 77 77 | 47 44 44 44 74 77 77 77 |wwwwwwww|GDDDtwww|
|00000310| 77 00 00 00 77 77 77 77 | 77 77 77 77 77 44 44 44 |w...wwww|wwwwwDDD|
|00000320| 74 77 77 77 77 00 00 00 | 77 77 77 77 77 77 77 77 |twwww...|wwwwwwww|
|00000330| 77 74 77 77 77 77 77 77 | 77 00 00 00 77 77 77 77 |wtwwwwww|w...wwww|
|00000340| 77 77 77 77 47 74 77 77 | 77 77 77 77 77 00 00 00 |wwwwGtww|wwwww...|
|00000350| 77 77 77 77 77 77 77 77 | 47 77 77 47 44 74 77 77 |wwwwwwww|GwwGDtww|
|00000360| 77 00 00 00 77 77 77 77 | 77 77 77 77 77 74 77 77 |w...wwww|wwwwwtww|
|00000370| 44 77 77 77 77 00 00 00 | 77 77 77 77 77 77 77 77 |Dwwww...|wwwwwwww|
|00000380| 77 74 77 77 77 77 77 77 | 77 00 00 00 77 77 77 77 |wtwwwwww|w...wwww|
|00000390| 77 77 77 77 77 74 77 77 | 77 77 77 77 77 00 00 00 |wwwwwtww|wwwww...|
|000003a0| 77 77 77 77 77 77 77 77 | 47 74 77 77 77 77 77 77 |wwwwwwww|Gtwwwwww|
|000003b0| 77 00 00 00 77 77 77 77 | 77 77 77 77 47 74 77 47 |w...wwww|wwwwGtwG|
|000003c0| 44 74 77 77 77 00 00 00 | 77 77 77 77 77 77 77 47 |Dtwww...|wwwwwwwG|
|000003d0| 44 74 77 47 74 77 77 77 | 77 00 00 00 77 77 77 77 |DtwGtwww|w...wwww|
|000003e0| 77 77 77 44 44 74 77 47 | 74 77 77 77 77 00 00 00 |wwwDDtwG|twwww...|
|000003f0| 77 77 77 77 77 77 77 77 | 77 77 77 77 77 77 77 77 |wwwwwwww|wwwwwwww|
|00000400| 77 00 00 00 77 77 77 77 | 77 77 77 77 77 77 77 77 |w...wwww|wwwwwwww|
|00000410| 77 77 77 77 77 00 00 00 | 77 77 77 77 77 77 77 77 |wwwww...|wwwwwwww|
|00000420| 77 77 77 77 77 77 77 77 | 77 00 00 00 00 f0 ff ff |wwwwwwww|w.......|
|00000430| ff ff ff 0f 00 00 00 00 | 00 00 00 00 00 ff ff ff |........|........|
|00000440| 00 f0 ff ff ff ff ff 0f | 00 00 00 00 00 00 00 00 |........|........|
|00000450| 00 ff ff ff ff ff 0f 00 | 00 00 f0 ff 0f 00 00 00 |........|........|
|00000460| 00 00 00 00 00 ff ff ff | ff ff 0f 00 00 00 f0 ff |........|........|
|00000470| 0f 00 00 00 00 00 00 00 | 00 ff ff ff ff ff 0f 00 |........|........|
|00000480| 00 00 f0 ff 0f f0 ff ff | ff ff ff ff 00 ff ff ff |........|........|
|00000490| ff ff 0f 00 00 00 f0 ff | 0f f0 ff ff ff ff ff ff |........|........|
|000004a0| 00 ff ff ff ff ff ff ff | ff ff ff ff 0f f0 ff 0f |........|........|
|000004b0| 00 00 00 ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000004c0| 0f f0 ff 0f 00 00 00 ff | ff ff ff ff ff ff 0f 00 |........|........|
|000004d0| 00 00 f0 ff 0f f0 ff 0f | 00 00 00 ff ff ff ff ff |........|........|
|000004e0| ff ff 0f 00 00 00 f0 ff | 0f f0 ff ff ff ff ff ff |........|........|
|000004f0| 00 ff ff ff ff ff 0f 00 | 00 00 f0 ff 0f f0 ff ff |........|........|
|00000500| ff ff ff ff 00 ff ff ff | ff ff 0f 00 00 00 f0 ff |........|........|
|00000510| 0f f0 ff 0f 00 00 00 ff | ff ff ff ff 00 00 00 00 |........|........|
|00000520| 00 00 00 00 00 f0 ff 0f | 00 00 00 ff ff ff ff ff |........|........|
|00000530| 00 00 00 00 00 00 00 00 | 00 f0 ff 0f 00 00 00 ff |........|........|
|00000540| ff ff ff ff 00 00 00 00 | 00 00 00 00 00 f0 ff ff |........|........|
|00000550| ff ff ff ff 00 ff ff ff | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 f0 ff ff ff ff ff ff | 00 ff ff ff 00 00 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 ff ff ff |........|........|
|00000580| 46 69 6c 65 44 61 74 61 | 82 43 68 61 72 42 6f 6f |FileData|.CharBoo|
|00000590| 74 00 83 03 39 01 00 00 | 44 fb ff ff 42 f3 46 78 |t...9...|D...B.Fx|
|000005a0| 03 00 19 55 0d 00 0a 0f | f4 20 3e 43 68 61 72 42 |...U....|. >CharB|
|000005b0| 6f 6f 74 0d 00 14 28 f4 | 20 43 4f 50 59 52 49 47 |oot...(.| COPYRIG|
|000005c0| 48 54 20 4c 45 53 4c 49 | 45 20 41 20 48 41 59 2c |HT LESLI|E A HAY,|
|000005d0| 20 4d 41 52 43 48 20 31 | 39 38 39 0d 00 1e 2b f4 | MARCH 1|989...+.|
|000005e0| 20 41 52 43 48 49 4d 45 | 44 45 53 20 43 48 41 52 | ARCHIME|DES CHAR|
|000005f0| 41 43 54 45 52 20 44 45 | 46 49 4e 49 4e 47 20 50 |ACTER DE|FINING P|
|00000600| 52 4f 47 52 41 4d 0d 00 | 28 11 73 74 61 72 74 25 |ROGRAM..|(.start%|
|00000610| 3d 26 35 30 30 30 30 0d | 00 32 0f de 20 62 75 66 |=&50000.|.2.. buf|
|00000620| 66 25 20 26 33 30 0d 00 | 3c 11 e3 20 54 25 3d 33 |f% &30..|<.. T%=3|
|00000630| 32 20 b8 20 32 35 35 0d | 00 46 10 e7 20 54 25 3d |2 . 255.|.F.. T%=|
|00000640| 31 32 37 20 8c 20 ed 0d | 00 50 2d 3f 62 75 66 66 |127 . ..|.P-?buff|
|00000650| 25 3d 54 25 3a c8 99 20 | 22 4f 53 5f 57 6f 72 64 |%=T%:.. |"OS_Word|
|00000660| 22 2c 26 30 41 2c 62 75 | 66 66 25 20 b8 20 2c 62 |",&0A,bu|ff% . ,b|
|00000670| 75 66 66 25 0d 00 5a 43 | 21 28 73 74 61 72 74 25 |uff%..ZC|!(start%|
|00000680| 2b 28 54 25 2d 33 32 29 | 2a 38 29 3d 21 28 62 75 |+(T%-32)|*8)=!(bu|
|00000690| 66 66 25 2b 31 29 3a 21 | 28 73 74 61 72 74 25 2b |ff%+1):!|(start%+|
|000006a0| 28 54 25 2d 33 32 29 2a | 38 2b 34 29 3d 21 28 62 |(T%-32)*|8+4)=!(b|
|000006b0| 75 66 66 25 2b 35 29 0d | 00 64 08 ed 20 54 25 0d |uff%+5).|.d.. T%.|
|000006c0| 00 6e 1c d7 22 3c 4f 62 | 65 79 24 44 69 72 3e 2e |.n.."<Ob|ey$Dir>.|
|000006d0| 43 68 61 72 44 65 66 69 | 6e 65 22 0d ff 46 69 6c |CharDefi|ne"..Fil|
|000006e0| 65 44 61 74 61 82 43 68 | 61 72 44 65 66 69 6e 65 |eData.Ch|arDefine|
|000006f0| 00 58 23 00 00 44 fb ff | ff 69 c9 47 78 03 00 ff |.X#..D..|.i.Gx...|
|00000700| 71 0d 00 0a 11 f4 20 3e | 43 68 61 72 44 65 66 69 |q..... >|CharDefi|
|00000710| 6e 65 0d 00 14 28 f4 20 | 43 4f 50 59 52 49 47 48 |ne...(. |COPYRIGH|
|00000720| 54 20 4c 45 53 4c 49 45 | 20 41 20 48 41 59 2c 20 |T LESLIE| A HAY, |
|00000730| 4d 41 52 43 48 20 31 39 | 38 39 0d 00 1e 2b f4 20 |MARCH 19|89...+. |
|00000740| 41 52 43 48 49 4d 45 44 | 45 53 20 43 48 41 52 41 |ARCHIMED|ES CHARA|
|00000750| 43 54 45 52 20 44 45 46 | 49 4e 49 4e 47 20 50 52 |CTER DEF|INING PR|
|00000760| 4f 47 52 41 4d 0d 00 23 | 36 de 20 77 5f 70 61 6c |OGRAM..#|6. w_pal|
|00000770| 65 74 74 65 25 20 26 35 | 30 3a c8 99 20 22 57 69 |ette% &5|0:.. "Wi|
|00000780| 6d 70 5f 52 65 61 64 50 | 61 6c 65 74 74 65 22 2c |mp_ReadP|alette",|
|00000790| 2c 77 5f 70 61 6c 65 74 | 74 65 25 0d 00 28 20 eb |,w_palet|te%..( .|
|000007a0| 31 32 3a 2a 52 75 6e 20 | 3c 4f 62 65 79 24 44 69 |12:*Run |<Obey$Di|
|000007b0| 72 3e 2e 21 50 61 6c 65 | 74 74 65 0d 00 32 05 87 |r>.!Pale|tte..2..|
|000007c0| 0d 00 3c 0b e6 20 31 33 | 34 3a da 0d 00 46 19 ef |..<.. 13|4:...F..|
|000007d0| 20 31 39 2c 30 2c 32 34 | 2c 32 35 30 2c 32 31 30 | 19,0,24|,250,210|
|000007e0| 2c 32 30 30 0d 00 50 07 | e6 20 35 0d 00 5a 25 df |,200..P.|. 5..Z%.|
|000007f0| 20 31 32 37 39 2c 30 3a | df 20 31 32 37 39 2c 31 | 1279,0:|. 1279,1|
|00000800| 30 32 33 3a df 30 2c 31 | 30 32 33 3a df 30 2c 30 |023:.0,1|023:.0,0|
|00000810| 0d 00 64 21 de 20 62 75 | 66 66 25 20 26 33 30 2c |..d!. bu|ff% &30,|
|00000820| 63 6f 6d 28 32 30 2c 33 | 29 2c 6e 25 28 38 2c 38 |com(20,3|),n%(8,8|
|00000830| 29 0d 00 6e 11 73 74 61 | 72 74 25 3d 26 35 30 30 |)..n.sta|rt%=&500|
|00000840| 30 30 0d 00 78 28 64 65 | 66 61 75 6c 74 24 3d 22 |00..x(de|fault$="|
|00000850| 44 65 66 61 75 6c 74 20 | 20 20 22 3a 66 69 6c 65 |Default | ":file|
|00000860| 24 3d 64 65 66 61 75 6c | 74 24 0d 00 82 11 e3 20 |$=defaul|t$..... |
|00000870| 54 25 3d 33 32 20 b8 20 | 32 35 35 0d 00 8c 10 e7 |T%=32 . |255.....|
|00000880| 20 54 25 3d 31 32 37 20 | 8c 20 ed 0d 00 96 0d 41 | T%=127 |. .....A|
|00000890| 24 3d 41 24 2b bd 54 25 | 0d 00 a0 08 ed 20 54 25 |$=A$+.T%|..... T%|
|000008a0| 0d 00 aa 12 62 78 25 3d | 31 30 3a 62 79 25 3d 38 |....bx%=|10:by%=8|
|000008b0| 39 32 0d 00 b4 0d 21 62 | 75 66 66 25 3d 36 35 0d |92....!b|uff%=65.|
|000008c0| 00 be 09 68 63 25 3d 30 | 0d 00 c8 0c 2a 50 4f 49 |...hc%=0|....*POI|
|000008d0| 4e 54 45 52 0d 00 d2 17 | f2 77 69 6e 64 6f 77 28 |NTER....|.window(|
|000008e0| 22 2a 22 2c 32 2c 33 30 | 2c 31 29 0d 00 dc 1a f2 |"*",2,30|,1).....|
|000008f0| 77 69 6e 64 6f 77 28 22 | 4c 6f 61 64 22 2c 36 2c |window("|Load",6,|
|00000900| 33 30 2c 32 29 0d 00 e6 | 1b f2 77 69 6e 64 6f 77 |30,2)...|..window|
|00000910| 28 22 53 61 76 65 22 2c | 31 33 2c 33 30 2c 33 29 |("Save",|13,30,3)|
|00000920| 0d 00 f0 1b f2 77 69 6e | 64 6f 77 28 22 51 75 69 |.....win|dow("Qui|
|00000930| 74 22 2c 32 30 2c 33 30 | 2c 34 29 0d 00 fa 1e f2 |t",20,30|,4).....|
|00000940| 77 69 6e 64 6f 77 28 22 | 20 20 20 20 20 20 22 2c |window("| ",|
|00000950| 32 37 2c 33 30 2c 31 32 | 29 0d 01 04 1a f2 77 69 |27,30,12|).....wi|
|00000960| 6e 64 6f 77 28 22 59 65 | 73 22 2c 33 36 2c 33 30 |ndow("Ye|s",36,30|
|00000970| 2c 30 29 0d 01 0e 19 f2 | 77 69 6e 64 6f 77 28 22 |,0).....|window("|
|00000980| 4e 6f 22 2c 34 32 2c 33 | 30 2c 30 29 0d 01 18 41 |No",42,3|0,0)...A|
|00000990| f2 77 69 6e 64 6f 77 28 | 22 20 43 48 41 52 41 43 |.window(|" CHARAC|
|000009a0| 54 45 52 20 44 45 46 49 | 4e 45 52 20 2d 20 22 2b |TER DEFI|NER - "+|
|000009b0| bd 31 36 39 2b 22 20 4c | 41 48 2c 20 4d 41 52 43 |.169+" L|AH, MARC|
|000009c0| 48 20 38 39 20 22 2c 32 | 2c 31 2c 37 29 0d 01 22 |H 89 ",2|,1,7).."|
|000009d0| 22 f2 77 69 6e 64 6f 77 | 28 22 46 69 6c 65 3a 22 |".window|("File:"|
|000009e0| 2b 66 69 6c 65 24 2c 31 | 37 2c 32 36 2c 38 29 0d |+file$,1|7,26,8).|
|000009f0| 01 2c 20 f2 77 69 6e 64 | 6f 77 28 22 52 65 73 65 |., .wind|ow("Rese|
|00000a00| 74 20 61 6c 6c 22 2c 33 | 35 2c 32 36 2c 39 29 0d |t all",3|5,26,9).|
|00000a10| 01 36 0f ee 20 85 20 f2 | 65 72 72 6f 72 73 0d 01 |.6.. . .|errors..|
|00000a20| 40 05 f5 0d 01 4a 19 e7 | 20 68 63 25 3c 3e 3f 62 |@....J..| hc%<>?b|
|00000a30| 75 66 66 25 20 f2 73 63 | 72 65 65 6e 0d 01 54 05 |uff% .sc|reen..T.|
|00000a40| f5 0d 01 5e 0f c8 97 20 | 61 25 2c 62 25 2c 63 25 |...^... |a%,b%,c%|
|00000a50| 0d 01 68 0a 49 3d a6 28 | 30 29 0d 01 72 19 fd 20 |..h.I=.(|0)..r.. |
|00000a60| 28 49 3e 33 31 20 80 20 | 49 3c 32 35 35 29 20 84 |(I>31 . |I<255) .|
|00000a70| 20 63 25 0d 01 7c 0a e7 | 20 63 25 20 8c 0d 01 86 | c%..|..| c% ....|
|00000a80| 22 e7 20 a4 69 73 74 68 | 69 73 61 63 6f 6d 6d 28 |". .isth|isacomm(|
|00000a90| 61 25 2c 62 25 29 20 8c | 20 e5 20 8d 44 54 41 0d |a%,b%) .| . .DTA.|
|00000aa0| 01 90 2b e7 20 28 61 25 | 3e 39 20 80 20 61 25 3c |..+. (a%|>9 . a%<|
|00000ab0| 36 35 31 29 20 80 20 28 | 62 25 3e 32 34 39 20 80 |651) . (|b%>249 .|
|00000ac0| 20 62 25 3c 38 39 31 29 | 20 8c 0d 01 9a 3a e6 20 | b%<891)| ....:. |
|00000ad0| 31 3a c8 93 20 20 31 30 | 2b 28 61 25 20 81 20 38 |1:.. 10|+(a% . 8|
|00000ae0| 30 29 2a 38 30 2c 38 31 | 32 2d 28 37 2d 28 62 25 |0)*80,81|2-(7-(b%|
|00000af0| 2d 32 35 30 29 20 81 20 | 38 30 29 2a 38 30 2c 38 |-250) . |80)*80,8|
|00000b00| 30 2c 38 30 0d 01 a4 11 | 6f 61 25 3d 61 25 3a 6f |0,80....|oa%=a%:o|
|00000b10| 62 25 3d 62 25 0d 01 ae | 13 f2 77 61 69 74 66 6f |b%=b%...|..waitfo|
|00000b20| 72 72 65 6c 65 61 73 65 | 0d 01 b8 10 e7 20 74 69 |rrelease|..... ti|
|00000b30| 6d 65 6f 75 74 25 20 8c | 0d 01 c2 3c e6 20 34 3a |meout% .|...<. 4:|
|00000b40| c8 93 20 20 31 30 2b 28 | 6f 61 25 20 81 20 38 30 |.. 10+(|oa% . 80|
|00000b50| 29 2a 38 30 2c 38 31 32 | 2d 28 37 2d 28 6f 62 25 |)*80,812|-(7-(ob%|
|00000b60| 2d 32 35 30 29 20 81 20 | 38 30 29 2a 38 30 2c 38 |-250) . |80)*80,8|
|00000b70| 30 2c 38 30 0d 01 cc 06 | ef 37 0d 01 d6 2a f2 6d |0,80....|.7...*.m|
|00000b80| 65 73 73 61 67 65 28 22 | 43 61 6e 27 74 20 77 61 |essage("|Can't wa|
|00000b90| 69 74 20 61 6c 6c 20 64 | 61 79 20 2e 2e 2e 2e 2e |it all d|ay .....|
|00000ba0| 22 2c 31 29 0d 01 e0 12 | 64 75 6d 6d 79 25 3d a4 |",1)....|dummy%=.|
|00000bb0| 61 63 63 65 70 74 0d 01 | ea 0a e5 20 8d 44 54 41 |accept..|... .DTA|
|00000bc0| 0d 01 f4 05 cd 0d 01 fe | 0d f2 72 65 64 65 66 69 |........|..redefi|
|00000bd0| 6e 65 0d 02 08 17 f2 73 | 69 6e 67 6c 65 28 68 63 |ne.....s|ingle(hc|
|00000be0| 25 29 3a f2 74 61 62 6c | 65 0d 02 12 0a e5 20 8d |%):.tabl|e..... .|
|00000bf0| 44 54 41 0d 02 1c 05 cd | 0d 02 26 16 63 68 61 25 |DTA.....|..&.cha%|
|00000c00| 3d a4 61 73 63 69 69 28 | 61 25 2c 62 25 29 0d 02 |=.ascii(|a%,b%)..|
|00000c10| 30 27 e7 20 63 68 61 25 | 3e 30 20 80 20 63 68 61 |0'. cha%|>0 . cha|
|00000c20| 25 3c 3e 68 63 25 20 49 | 3d 63 68 61 25 20 8b 20 |%<>hc% I|=cha% . |
|00000c30| 49 3d 68 63 25 0d 02 3a | 05 cd 0d 02 44 0c 3f 62 |I=hc%..:|....D.?b|
|00000c40| 75 66 66 25 3d 49 0d 02 | 4e 06 fd a3 0d 02 53 24 |uff%=I..|N.....S$|
|00000c50| c8 99 20 22 57 69 6d 70 | 5f 53 65 74 50 61 6c 65 |.. "Wimp|_SetPale|
|00000c60| 74 74 65 22 2c 2c 77 5f | 70 61 6c 65 74 74 65 25 |tte",,w_|palette%|
|00000c70| 0d 02 58 05 e0 0d 02 62 | 0d dd 20 f2 62 69 6e 61 |..X....b|.. .bina|
|00000c80| 72 79 0d 02 6c 11 e3 20 | 6c 69 6e 65 25 3d 30 20 |ry..l.. |line%=0 |
|00000c90| b8 20 37 0d 02 76 17 63 | 68 25 3d 62 75 66 66 25 |. 7..v.c|h%=buff%|
|00000ca0| 3f 28 6c 69 6e 65 25 2b | 31 29 0d 02 80 12 62 78 |?(line%+|1)....bx|
|00000cb0| 25 3d 31 30 3a 62 79 25 | 2d 3d 38 30 0d 02 8a 15 |%=10:by%|-=80....|
|00000cc0| e3 20 62 69 74 25 3d 37 | 20 b8 20 30 20 88 20 2d |. bit%=7| . 0 . -|
|00000cd0| 31 0d 02 94 17 e7 20 63 | 68 25 20 81 20 28 31 3c |1..... c|h% . (1<|
|00000ce0| 3c 62 69 74 25 29 20 8c | 0d 02 9e 12 63 68 25 2d |<bit%) .|....ch%-|
|00000cf0| 3d 28 31 3c 3c 62 69 74 | 25 29 0d 02 a8 0b f2 62 |=(1<<bit|%).....b|
|00000d00| 6f 78 28 b9 29 0d 02 b2 | 05 cc 0d 02 bc 0b f2 62 |ox(.)...|.......b|
|00000d10| 6f 78 28 a3 29 0d 02 c6 | 05 cd 0d 02 d0 0a ed 20 |ox(.)...|....... |
|00000d20| 62 69 74 25 0d 02 da 0b | ed 20 6c 69 6e 65 25 0d |bit%....|. line%.|
|00000d30| 02 e4 05 e1 0d 02 ee 12 | dd 20 f2 62 6f 78 28 6f |........|. .box(o|
|00000d40| 6e 6f 66 66 25 29 0d 02 | f8 0e e7 20 6f 6e 6f 66 |noff%)..|... onof|
|00000d50| 66 25 20 8c 0d 03 02 07 | e6 20 32 0d 03 0c 14 c8 |f% .....|. 2.....|
|00000d60| 93 20 c8 90 20 62 78 25 | 2c 62 79 25 2c 38 30 0d |. .. bx%|,by%,80.|
|00000d70| 03 16 07 e6 20 34 0d 03 | 20 11 c8 93 20 62 78 25 |.... 4..| ... bx%|
|00000d80| 2c 62 79 25 2c 38 30 0d | 03 2a 05 cc 0d 03 34 07 |,by%,80.|.*....4.|
|00000d90| e6 20 33 0d 03 3e 14 c8 | 93 20 c8 90 20 62 78 25 |. 3..>..|. .. bx%|
|00000da0| 2c 62 79 25 2c 38 30 0d | 03 48 07 e6 20 34 0d 03 |,by%,80.|.H.. 4..|
|00000db0| 52 11 c8 93 20 62 78 25 | 2c 62 79 25 2c 38 30 0d |R... bx%|,by%,80.|
|00000dc0| 03 5c 05 cd 0d 03 66 0b | 62 78 25 2b 3d 38 30 0d |.\....f.|bx%+=80.|
|00000dd0| 03 70 05 e1 0d 03 7a 11 | dd 20 f2 73 69 6e 67 6c |.p....z.|. .singl|
|00000de0| 65 28 63 25 29 0d 03 84 | 0d fb 20 31 32 38 3a fb |e(c%)...|.. 128:.|
|00000df0| 20 37 0d 03 8e 1d e7 20 | 63 25 3c 31 30 30 20 63 | 7..... |c%<100 c|
|00000e00| 63 24 3d 22 20 22 20 8b | 20 63 63 24 3d 22 22 0d |c$=" " .| cc$="".|
|00000e10| 03 98 35 f2 77 69 6e 64 | 6f 77 28 22 43 48 52 24 |..5.wind|ow("CHR$|
|00000e20| 28 22 2b 63 63 24 2b c3 | 28 63 25 29 2b 22 29 3d |("+cc$+.|(c%)+")=|
|00000e30| 22 2b bd 28 63 25 29 2b | 22 20 22 2c 32 2c 32 36 |"+.(c%)+|" ",2,26|
|00000e40| 2c 31 30 29 0d 03 a2 1c | 76 64 75 24 3d 22 56 44 |,10)....|vdu$="VD|
|00000e50| 55 20 32 33 2c 22 2b 63 | 63 24 2b c3 28 63 25 29 |U 23,"+c|c$+.(c%)|
|00000e60| 0d 03 ac 47 e3 20 49 25 | 3d 31 20 b8 20 38 3a e7 |...G. I%|=1 . 8:.|
|00000e70| 20 62 75 66 66 25 3f 49 | 25 3c 31 30 20 63 63 24 | buff%?I|%<10 cc$|
|00000e80| 3d 22 20 20 22 20 8b 20 | e7 20 62 75 66 66 25 3f |=" " . |. buff%?|
|00000e90| 49 25 3c 31 30 30 20 63 | 63 24 3d 22 20 22 20 8b |I%<100 c|c$=" " .|
|00000ea0| 20 63 63 24 3d 22 22 0d | 03 b6 25 76 64 75 24 3d | cc$="".|..%vdu$=|
|00000eb0| 76 64 75 24 2b 22 2c 22 | 2b 63 63 24 2b c3 28 62 |vdu$+","|+cc$+.(b|
|00000ec0| 75 66 66 25 3f 49 25 29 | 3a ed 49 25 0d 03 c0 19 |uff%?I%)|:.I%....|
|00000ed0| f2 77 69 6e 64 6f 77 28 | 76 64 75 24 2c 32 2c 32 |.window(|vdu$,2,2|
|00000ee0| 38 2c 31 31 29 0d 03 ca | 05 e1 0d 03 d4 0c dd 20 |8,11)...|....... |
|00000ef0| f2 74 61 62 6c 65 0d 03 | de 0e e3 20 54 3d 30 20 |.table..|... T=0 |
|00000f00| b8 20 31 33 0d 03 e8 10 | f1 8a 34 36 2c 32 2b 54 |. 13....|..46,2+T|
|00000f10| 2a 32 29 3b 0d 03 f2 0e | e3 20 49 3d 30 20 b8 20 |*2);....|. I=0 . |
|00000f20| 31 35 0d 03 fc 09 fb 20 | 31 32 38 0d 04 06 09 f1 |15..... |128.....|
|00000f30| 22 20 22 3b 0d 04 10 27 | e7 20 97 28 c1 41 24 2c |" ";...'|. .(.A$,|
|00000f40| 54 2a 31 36 2b 49 2c 31 | 29 29 3d 3f 62 75 66 66 |T*16+I,1|))=?buff|
|00000f50| 25 20 8c 20 fb 20 31 32 | 38 2b 31 0d 04 1a 13 f1 |% . . 12|8+1.....|
|00000f60| c1 41 24 2c 54 2a 31 36 | 2b 49 2c 31 29 3b 0d 04 |.A$,T*16|+I,1);..|
|00000f70| 24 06 ed 49 0d 04 2e 09 | f1 22 20 22 3b 0d 04 38 |$..I....|." ";..8|
|00000f80| 06 ed 54 0d 04 42 0a f2 | 63 6f 64 65 73 0d 04 4c |..T..B..|codes..L|
|00000f90| 05 e1 0d 04 56 0f dd 20 | f2 72 65 64 65 66 69 6e |....V.. |.redefin|
|00000fa0| 65 0d 04 60 17 62 69 74 | 25 3d 37 2d 28 61 25 2d |e..`.bit|%=7-(a%-|
|00000fb0| 31 30 29 20 81 20 38 30 | 0d 04 6a 19 69 6e 64 78 |10) . 80|..j.indx|
|00000fc0| 25 3d 38 2d 28 62 25 2d | 32 35 30 29 20 81 20 38 |%=8-(b%-|250) . 8|
|00000fd0| 30 0d 04 74 1b 62 78 25 | 3d 31 30 2b 28 28 61 25 |0..t.bx%|=10+((a%|
|00000fe0| 2d 31 30 29 81 20 38 30 | 29 2a 38 30 0d 04 7e 14 |-10). 80|)*80..~.|
|00000ff0| 62 79 25 3d 38 39 32 2d | 69 6e 64 78 25 2a 38 30 |by%=892-|indx%*80|
|00001000| 0d 04 88 16 50 25 3d b0 | 62 78 25 2b 32 30 2c 62 |....P%=.|bx%+20,b|
|00001010| 79 25 2b 32 30 29 0d 04 | 92 0c e7 20 50 25 3d 32 |y%+20)..|... P%=2|
|00001020| 20 8c 0d 04 9c 0b f2 62 | 6f 78 28 a3 29 0d 04 a6 | ......b|ox(.)...|
|00001030| 05 cc 0d 04 b0 0b f2 62 | 6f 78 28 b9 29 0d 04 ba |.......b|ox(.)...|
|00001040| 05 cd 0d 04 c4 19 62 75 | 66 66 25 3f 69 6e 64 78 |......bu|ff%?indx|
|00001050| 25 3d a4 61 6c 74 65 72 | 62 69 74 0d 04 ce 0c ef |%=.alter|bit.....|
|00001060| 20 32 33 2c 68 63 25 0d | 04 d8 0e e3 20 54 25 3d | 23,hc%.|.... T%=|
|00001070| 31 20 b8 20 38 0d 04 e2 | 0e ef 20 62 75 66 66 25 |1 . 8...|.. buff%|
|00001080| 3f 54 25 0d 04 ec 05 ed | 0d 04 f6 0e 3f 62 75 66 |?T%.....|....?buf|
|00001090| 66 25 3d 68 63 25 0d 05 | 00 05 e1 0d 05 0a 0f dd |f%=hc%..|........|
|000010a0| 20 a4 61 6c 74 65 72 62 | 69 74 0d 05 14 0c 76 61 | .alterb|it....va|
|000010b0| 6c 75 65 25 3d 30 0d 05 | 1e 13 e3 20 54 25 3d 37 |lue%=0..|... T%=7|
|000010c0| 20 b8 20 30 20 88 20 2d | 31 0d 05 28 2f e7 20 b0 | . 0 . -|1..(/. .|
|000010d0| 33 30 2b 54 25 2a 38 30 | 2c 62 79 25 2b 32 30 29 |30+T%*80|,by%+20)|
|000010e0| 3d 32 20 8c 20 76 61 6c | 75 65 25 2b 3d 28 31 3c |=2 . val|ue%+=(1<|
|000010f0| 3c 28 37 2d 54 25 29 29 | 0d 05 32 05 ed 0d 05 3c |<(7-T%))|..2....<|
|00001100| 0b 3d 76 61 6c 75 65 25 | 0d 05 46 15 dd 20 f2 77 |.=value%|..F.. .w|
|00001110| 61 69 74 66 6f 72 72 65 | 6c 65 61 73 65 0d 05 50 |aitforre|lease..P|
|00001120| 16 74 69 6d 65 25 3d 91 | 3a 74 69 6d 65 6f 75 74 |.time%=.|:timeout|
|00001130| 25 3d a3 0d 05 5a 05 f5 | 0d 05 64 0f c8 97 20 61 |%=...Z..|..d... a|
|00001140| 25 2c 62 25 2c 63 25 0d | 05 6e 18 fd 20 63 25 3d |%,b%,c%.|.n.. c%=|
|00001150| 30 20 84 20 91 3e 74 69 | 6d 65 25 2b 32 30 30 0d |0 . .>ti|me%+200.|
|00001160| 05 78 1e e7 20 91 3e 74 | 69 6d 65 25 2b 32 30 30 |.x.. .>t|ime%+200|
|00001170| 20 8c 20 74 69 6d 65 6f | 75 74 25 3d b9 0d 05 82 | . timeo|ut%=....|
|00001180| 05 e1 0d 05 8c 10 dd 20 | f2 6f 73 63 6c 69 3a eb |....... |.oscli:.|
|00001190| 31 32 0d 05 96 14 f1 8a | 31 2c 31 29 3b 3a e8 20 |12......|1,1);:. |
|000011a0| 22 2a 22 6f 73 24 0d 05 | a0 10 e7 20 6f 73 24 3d |"*"os$..|... os$=|
|000011b0| 22 22 20 8c 20 f9 0d 05 | aa 0a ff 28 6f 73 24 29 |"" . ...|...(os$)|
|000011c0| 0d 05 b4 26 f1 8a 35 35 | 2c 33 30 29 3b 22 50 72 |...&..55|,30);"Pr|
|000011d0| 65 73 73 20 61 20 6b 65 | 79 20 74 6f 20 63 6f 6e |ess a ke|y to con|
|000011e0| 74 69 6e 75 65 22 0d 05 | be 07 47 3d a5 0d 05 c8 |tinue"..|..G=....|
|000011f0| 05 f9 0d 05 d2 05 e1 0d | 05 dc 10 dd 20 f2 65 72 |........|.... .er|
|00001200| 72 6f 72 73 3a ef 37 0d | 05 e6 14 e7 20 9f 3d 31 |rors:.7.|.... .=1|
|00001210| 37 20 8c 20 f2 71 75 69 | 74 3a e1 0d 05 f0 2c 65 |7 . .qui|t:....,e|
|00001220| 24 3d f6 24 2b 22 20 61 | 74 20 22 2b c3 28 9e 29 |$=.$+" a|t "+.(.)|
|00001230| 2b c4 36 36 2d a9 28 f6 | 24 29 2d a9 28 c3 28 9e |+.66-.(.|$)-.(.(.|
|00001240| 29 29 2c 22 2d 22 29 0d | 05 fa 17 f2 77 69 6e 64 |)),"-").|....wind|
|00001250| 6f 77 28 65 24 2c 34 2c | 31 34 2c 31 34 29 0d 06 |ow(e$,4,|14,14)..|
|00001260| 04 12 64 75 6d 6d 79 25 | 3d a4 61 63 63 65 70 74 |..dummy%|=.accept|
|00001270| 0d 06 0e 2b f2 79 65 73 | 3a c8 99 20 22 57 69 6d |...+.yes|:.. "Wim|
|00001280| 70 5f 53 65 74 50 61 6c | 65 74 74 65 22 2c 2c 77 |p_SetPal|ette",,w|
|00001290| 5f 70 61 6c 65 74 74 65 | 25 3a e0 0d 06 18 05 e1 |_palette|%:......|
|000012a0| 0d 06 22 1f dd 20 f2 77 | 69 6e 64 6f 77 28 74 65 |..".. .w|indow(te|
|000012b0| 78 74 24 2c 61 63 25 2c | 64 6f 25 2c 6e 25 29 0d |xt$,ac%,|do%,n%).|
|000012c0| 06 2c 06 c8 96 0d 06 36 | 18 6c 25 3d a9 28 74 65 |.,.....6|.l%=.(te|
|000012d0| 78 74 24 29 2a 31 36 3a | 68 25 3d 33 32 0d 06 40 |xt$)*16:|h%=32..@|
|000012e0| 1e 73 78 25 3d 61 63 25 | 2a 31 36 3a 73 79 25 3d |.sx%=ac%|*16:sy%=|
|000012f0| 28 33 31 2d 64 6f 25 29 | 2a 33 32 0d 06 4a 21 e7 |(31-do%)|*32..J!.|
|00001300| 20 6e 25 3e 30 20 e6 20 | 35 20 8b 20 e7 20 6e 25 | n%>0 . |5 . . n%|
|00001310| 3d 30 20 e6 20 36 20 8b | 20 e6 20 37 0d 06 54 23 |=0 . 6 .| . 7..T#|
|00001320| c8 93 20 c8 90 20 73 78 | 25 2d 31 32 2c 73 79 25 |.. .. sx|%-12,sy%|
|00001330| 2d 31 32 2c 6c 25 2b 32 | 34 2c 68 25 2b 32 34 0d |-12,l%+2|4,h%+24.|
|00001340| 06 5e 21 e7 20 6e 25 3e | 30 20 e6 20 33 20 8b 20 |.^!. n%>|0 . 3 . |
|00001350| e7 20 6e 25 3d 30 20 e6 | 20 36 20 8b 20 e6 20 30 |. n%=0 .| 6 . . 0|
|00001360| 0d 06 68 21 c8 93 20 c8 | 90 20 73 78 25 2d 38 2c |..h!.. .|. sx%-8,|
|00001370| 73 79 25 2d 38 2c 6c 25 | 2b 31 36 2c 68 25 2b 31 |sy%-8,l%|+16,h%+1|
|00001380| 36 0d 06 72 37 e7 20 6e | 25 3e 30 20 fb 20 30 3a |6..r7. n|%>0 . 0:|
|00001390| fb 20 31 32 38 2b 33 20 | 8b 20 e7 20 6e 25 3d 30 |. 128+3 |. . n%=0|
|000013a0| 20 fb 20 36 3a fb 20 31 | 32 38 2b 36 20 8b 20 fb | . 6:. 1|28+6 . .|
|000013b0| 20 37 3a fb 20 31 32 38 | 0d 06 7c 14 f1 8a 61 63 | 7:. 128|..|...ac|
|000013c0| 25 2c 64 6f 25 29 3b 74 | 65 78 74 24 0d 06 86 18 |%,do%);t|ext$....|
|000013d0| 63 6f 6d 28 94 28 6e 25 | 29 2c 30 29 3d 2d 28 6e |com(.(n%|),0)=-(n|
|000013e0| 25 3e 30 29 0d 06 90 16 | 63 6f 6d 28 94 28 6e 25 |%>0)....|com(.(n%|
|000013f0| 29 2c 31 29 3d 73 78 25 | 2d 38 0d 06 9a 16 63 6f |),1)=sx%|-8....co|
|00001400| 6d 28 94 28 6e 25 29 2c | 32 29 3d 73 79 25 2d 38 |m(.(n%),|2)=sy%-8|
|00001410| 0d 06 a4 23 63 6f 6d 28 | 94 28 6e 25 29 2c 33 29 |...#com(|.(n%),3)|
|00001420| 3d 63 6f 6d 28 94 28 6e | 25 29 2c 31 29 2b 6c 25 |=com(.(n|%),1)+l%|
|00001430| 2b 31 36 0d 06 ae 0d fb | 20 37 3a fb 20 31 32 38 |+16.....| 7:. 128|
|00001440| 0d 06 b8 13 e7 20 6e 25 | 3d 31 32 20 f2 73 63 72 |..... n%|=12 .scr|
|00001450| 6f 6c 6c 0d 06 c2 05 e1 | 0d 06 cc 19 dd 20 a4 69 |oll.....|..... .i|
|00001460| 73 74 68 69 73 61 63 6f | 6d 6d 28 78 25 2c 79 25 |sthisaco|mm(x%,y%|
|00001470| 29 0d 06 d6 0f e3 20 54 | 25 3d 31 20 b8 20 32 30 |)..... T|%=1 . 20|
|00001480| 0d 06 e0 1a e7 20 63 6f | 6d 28 54 25 2c 30 29 3c |..... co|m(T%,0)<|
|00001490| 31 20 8c 20 e5 20 8d 74 | 40 47 0d 06 ea 44 e7 20 |1 . . .t|@G...D. |
|000014a0| 78 25 3e 63 6f 6d 28 54 | 25 2c 31 29 20 80 20 79 |x%>com(T|%,1) . y|
|000014b0| 25 3e 63 6f 6d 28 54 25 | 2c 32 29 20 80 20 78 25 |%>com(T%|,2) . x%|
|000014c0| 3c 63 6f 6d 28 54 25 2c | 33 29 20 80 20 79 25 3c |<com(T%,|3) . y%<|
|000014d0| 63 6f 6d 28 54 25 2c 32 | 29 2b 34 38 20 8c 0d 06 |com(T%,2|)+48 ...|
|000014e0| f4 15 c8 8e 20 54 25 2a | 63 6f 6d 28 54 25 2c 30 |.... T%*|com(T%,0|
|000014f0| 29 20 ca 0d 06 fe 0e c9 | 20 31 3a f2 6f 73 63 6c |) ......| 1:.oscl|
|00001500| 69 0d 07 08 0d c9 20 32 | 3a f2 6c 6f 61 64 0d 07 |i..... 2|:.load..|
|00001510| 12 0d c9 20 33 3a f2 73 | 61 76 65 0d 07 1c 0d c9 |... 3:.s|ave.....|
|00001520| 20 34 3a f2 71 75 69 74 | 0d 07 26 0f c9 20 37 3a | 4:.quit|..&.. 7:|
|00001530| f2 68 65 61 64 65 72 0d | 07 30 0d c9 20 38 3a f2 |.header.|.0.. 8:.|
|00001540| 66 69 6c 65 0d 07 3a 0e | c9 20 39 3a f2 72 65 73 |file..:.|. 9:.res|
|00001550| 65 74 0d 07 44 0e c9 20 | 31 30 3a f2 63 6f 70 79 |et..D.. |10:.copy|
|00001560| 0d 07 4e 0d c9 20 31 31 | 3a f2 76 64 75 0d 07 58 |..N.. 11|:.vdu..X|
|00001570| 13 c9 20 31 32 3a f2 74 | 72 61 6e 73 66 6f 72 6d |.. 12:.t|ransform|
|00001580| 0d 07 62 05 cb 0d 07 6c | 06 3d 31 0d 07 76 05 cd |..b....l|.=1..v..|
|00001590| 0d 07 80 05 ed 0d 07 8a | 06 3d 30 0d 07 94 0b dd |........|.=0.....|
|000015a0| 20 f2 71 75 69 74 0d 07 | 9e 1c f2 77 69 6e 64 6f | .quit..|...windo|
|000015b0| 77 28 22 51 75 69 74 22 | 2c 32 30 2c 33 30 2c 2d |w("Quit"|,20,30,-|
|000015c0| 34 29 0d 07 a8 13 f2 77 | 61 69 74 66 6f 72 72 65 |4).....w|aitforre|
|000015d0| 6c 65 61 73 65 0d 07 b2 | 31 f2 6d 65 73 73 61 67 |lease...|1.messag|
|000015e0| 65 28 22 61 72 65 20 79 | 6f 75 20 53 55 52 45 20 |e("are y|ou SURE |
|000015f0| 79 6f 75 20 77 61 6e 74 | 20 74 6f 20 51 55 49 54 |you want| to QUIT|
|00001600| 20 3f 22 2c 31 29 0d 07 | bc 1a f2 77 69 6e 64 6f | ?",1)..|...windo|
|00001610| 77 28 22 59 65 73 22 2c | 33 36 2c 33 30 2c 35 29 |w("Yes",|36,30,5)|
|00001620| 0d 07 c6 19 f2 77 69 6e | 64 6f 77 28 22 4e 6f 22 |.....win|dow("No"|
|00001630| 2c 34 32 2c 33 30 2c 36 | 29 0d 07 d0 82 e7 20 28 |,42,30,6|)..... (|
|00001640| a4 61 63 63 65 70 74 20 | 80 20 61 3e 63 6f 6d 28 |.accept |. a>com(|
|00001650| 35 2c 31 29 20 80 20 61 | 3c 63 6f 6d 28 35 2c 33 |5,1) . a|<com(5,3|
|00001660| 29 20 80 20 62 3e 63 6f | 6d 28 35 2c 32 29 20 80 |) . b>co|m(5,2) .|
|00001670| 20 62 3c 63 6f 6d 28 35 | 2c 32 29 2b 34 38 29 20 | b<com(5|,2)+48) |
|00001680| 84 20 49 24 3d 22 59 22 | 20 84 20 49 24 3d 22 79 |. I$="Y"| . I$="y|
|00001690| 22 20 8c 20 f2 79 65 73 | 3a c8 99 20 22 57 69 6d |" . .yes|:.. "Wim|
|000016a0| 70 5f 53 65 74 50 61 6c | 65 74 74 65 22 2c 2c 77 |p_SetPal|ette",,w|
|000016b0| 5f 70 61 6c 65 74 74 65 | 25 3a e0 0d 07 da 07 f2 |_palette|%:......|
|000016c0| 6e 6f 0d 07 e4 1b f2 77 | 69 6e 64 6f 77 28 22 51 |no.....w|indow("Q|
|000016d0| 75 69 74 22 2c 32 30 2c | 33 30 2c 34 29 0d 07 ee |uit",20,|30,4)...|
|000016e0| 05 e1 0d 07 f8 0a dd 20 | f2 79 65 73 0d 08 02 29 |....... |.yes...)|
|000016f0| f2 6d 65 73 73 61 67 65 | 28 22 50 72 6f 67 72 61 |.message|("Progra|
|00001700| 6d 20 66 69 6e 69 73 68 | 65 64 20 2e 2e 2e 2e 2e |m finish|ed .....|
|00001710| 2e 22 2c 33 29 0d 08 0c | 1b f2 77 69 6e 64 6f 77 |.",3)...|..window|
|00001720| 28 22 59 65 73 22 2c 33 | 36 2c 33 30 2c 2d 35 29 |("Yes",3|6,30,-5)|
|00001730| 0d 08 16 05 e1 0d 08 20 | 09 dd 20 f2 6e 6f 0d 08 |....... |.. .no..|
|00001740| 2a 0d f2 62 6c 61 6e 6b | 69 6e 70 0d 08 34 1a f2 |*..blank|inp..4..|
|00001750| 77 69 6e 64 6f 77 28 22 | 59 65 73 22 2c 33 36 2c |window("|Yes",36,|
|00001760| 33 30 2c 30 29 0d 08 3e | 19 f2 77 69 6e 64 6f 77 |30,0)..>|..window|
|00001770| 28 22 4e 6f 22 2c 34 32 | 2c 33 30 2c 30 29 0d 08 |("No",42|,30,0)..|
|00001780| 48 05 e1 0d 08 52 0b dd | 20 f2 6c 6f 61 64 0d 08 |H....R..| .load..|
|00001790| 5c 1b f2 77 69 6e 64 6f | 77 28 22 4c 6f 61 64 22 |\..windo|w("Load"|
|000017a0| 2c 36 2c 33 30 2c 2d 32 | 29 0d 08 66 2d c8 95 20 |,6,30,-2|)..f-.. |
|000017b0| c2 66 69 6c 65 24 29 3d | 22 20 22 3a 66 69 6c 65 |.file$)=|" ":file|
|000017c0| 24 3d c0 66 69 6c 65 24 | 2c a9 28 66 69 6c 65 24 |$=.file$|,.(file$|
|000017d0| 29 2d 31 29 3a ce 0d 08 | 70 51 e7 20 66 69 6c 65 |)-1):...|pQ. file|
|000017e0| 24 3d 22 22 20 f2 6d 65 | 73 73 61 67 65 28 22 59 |$="" .me|ssage("Y|
|000017f0| 6f 75 20 6e 65 65 64 20 | 74 6f 20 65 64 69 74 20 |ou need |to edit |
|00001800| 74 68 65 20 66 69 6c 65 | 20 6e 61 6d 65 22 2c 31 |the file| name",1|
|00001810| 29 3a 64 75 6d 6d 79 25 | 3d a4 61 63 63 65 70 74 |):dummy%|=.accept|
|00001820| 3a e5 20 8d 74 62 48 0d | 08 7a 27 f2 6d 65 73 73 |:. .tbH.|.z'.mess|
|00001830| 61 67 65 28 22 4c 6f 61 | 64 69 6e 67 20 66 69 6c |age("Loa|ding fil|
|00001840| 65 20 3a 20 22 2b 66 69 | 6c 65 24 2c 32 29 0d 08 |e : "+fi|le$,2)..|
|00001850| 84 0e 58 3d 8e 28 66 69 | 6c 65 24 29 0d 08 8e 3c |..X=.(fi|le$)...<|
|00001860| e7 20 58 3d 30 20 8c 20 | f2 6d 65 73 73 61 67 65 |. X=0 . |.message|
|00001870| 28 22 4e 6f 20 73 75 63 | 68 20 66 69 6c 65 22 2c |("No suc|h file",|
|00001880| 31 29 3a 64 75 6d 6d 79 | 25 3d a4 61 63 63 65 70 |1):dummy|%=.accep|
|00001890| 74 3a e5 20 8d 74 62 48 | 0d 08 98 0d f2 67 65 74 |t:. .tbH|.....get|
|000018a0| 63 6f 64 65 73 0d 08 a2 | 08 d9 20 23 30 0d 08 ac |codes...|.. #0...|
|000018b0| 0d f2 62 6c 61 6e 6b 69 | 6e 70 0d 08 b6 1a f2 77 |..blanki|np.....w|
|000018c0| 69 6e 64 6f 77 28 22 4c | 6f 61 64 22 2c 36 2c 33 |indow("L|oad",6,3|
|000018d0| 30 2c 32 29 0d 08 c0 05 | e1 0d 08 ca 0b dd 20 f2 |0,2)....|...... .|
|000018e0| 73 61 76 65 0d 08 d4 1c | f2 77 69 6e 64 6f 77 28 |save....|.window(|
|000018f0| 22 53 61 76 65 22 2c 31 | 33 2c 33 30 2c 2d 33 29 |"Save",1|3,30,-3)|
|00001900| 0d 08 de 2d c8 95 20 c2 | 66 69 6c 65 24 29 3d 22 |...-.. .|file$)="|
|00001910| 20 22 3a 66 69 6c 65 24 | 3d c0 66 69 6c 65 24 2c | ":file$|=.file$,|
|00001920| a9 28 66 69 6c 65 24 29 | 2d 31 29 3a ce 0d 08 e8 |.(file$)|-1):....|
|00001930| 4f e7 20 66 69 6c 65 24 | 3d 22 22 20 f2 6d 65 73 |O. file$|="" .mes|
|00001940| 73 61 67 65 28 22 59 6f | 75 20 6e 65 65 64 20 74 |sage("Yo|u need t|
|00001950| 6f 20 6d 61 6b 65 20 61 | 20 66 69 6c 65 20 6e 61 |o make a| file na|
|00001960| 6d 65 22 2c 31 29 3a 64 | 75 6d 6d 79 25 3d a4 61 |me",1):d|ummy%=.a|
|00001970| 63 63 65 70 74 3a e5 20 | 8d 54 5a 49 0d 08 f2 26 |ccept:. |.TZI...&|
|00001980| f2 6d 65 73 73 61 67 65 | 28 22 53 61 76 69 6e 67 |.message|("Saving|
|00001990| 20 66 69 6c 65 20 3a 20 | 22 2b 66 69 6c 65 24 2c | file : |"+file$,|
|000019a0| 32 29 0d 08 fc 0e 58 3d | ae 28 66 69 6c 65 24 29 |2)....X=|.(file$)|
|000019b0| 0d 09 06 23 e7 20 58 3d | 30 20 ff 28 22 63 72 65 |...#. X=|0 .("cre|
|000019c0| 61 74 65 20 22 2b 66 69 | 6c 65 24 29 3a e5 20 8d |ate "+fi|le$):. .|
|000019d0| 64 7c 48 0d 09 10 0e f2 | 73 65 6e 64 63 6f 64 65 |d|H.....|sendcode|
|000019e0| 73 0d 09 1a 08 d9 20 23 | 30 0d 09 24 27 f2 62 6c |s..... #|0..$'.bl|
|000019f0| 61 6e 6b 69 6e 70 3a f2 | 77 69 6e 64 6f 77 28 22 |ankinp:.|window("|
|00001a00| 53 61 76 65 22 2c 31 33 | 2c 33 30 2c 33 29 3a e1 |Save",13|,30,3):.|
|00001a10| 0d 09 2e 0f dd 20 f2 62 | 6c 61 6e 6b 69 6e 70 0d |..... .b|lankinp.|
|00001a20| 09 38 1b e6 20 36 3a c8 | 93 20 c8 90 20 37 32 30 |.8.. 6:.|. .. 720|
|00001a30| 2c 31 30 2c 35 36 30 2c | 38 30 0d 09 42 05 e1 0d |,10,560,|80..B...|
|00001a40| 09 4c 15 dd 20 f2 6d 65 | 73 73 61 67 65 28 73 24 |.L.. .me|ssage(s$|
|00001a50| 2c 63 25 29 0d 09 56 0d | f2 62 6c 61 6e 6b 69 6e |,c%)..V.|.blankin|
|00001a60| 70 0d 09 60 15 f1 8a 34 | 36 2c 33 30 29 3b c4 33 |p..`...4|6,30);.3|
|00001a70| 33 2c 22 20 22 29 0d 09 | 6a 15 fb 20 63 25 3a f1 |3," ")..|j.. c%:.|
|00001a80| 8a 34 37 2c 33 30 29 3b | 73 24 3b 0d 09 74 05 e1 |.47,30);|s$;..t..|
|00001a90| 0d 09 7e 0d dd 20 a4 61 | 63 63 65 70 74 0d 09 88 |..~.. .a|ccept...|
|00001aa0| 13 49 24 3d 22 22 3a 62 | 75 74 74 6f 6e 25 3d 30 |.I$="":b|utton%=0|
|00001ab0| 0d 09 92 21 f5 3a c8 97 | 20 61 2c 62 2c 63 3a 49 |...!.:..| a,b,c:I|
|00001ac0| 24 3d bf 28 30 29 3a fd | 49 24 3e 22 22 20 84 20 |$=.(0):.|I$>"" . |
|00001ad0| 63 0d 09 9c 21 e7 20 63 | 20 62 75 74 74 6f 6e 25 |c...!. c| button%|
|00001ae0| 3d 31 3a f5 3a c8 97 20 | 61 2c 62 2c 63 3a fd 63 |=1:.:.. |a,b,c:.c|
|00001af0| 3d 30 0d 09 a6 0d f2 62 | 6c 61 6e 6b 69 6e 70 0d |=0.....b|lankinp.|
|00001b00| 09 b0 0c 3d 62 75 74 74 | 6f 6e 25 0d 09 ba 0b dd |...=butt|on%.....|
|00001b10| 20 f2 66 69 6c 65 0d 09 | c4 0c 66 69 6c 65 24 3d | .file..|..file$=|
|00001b20| 22 22 0d 09 ce 2d f2 77 | 69 6e 64 6f 77 28 22 46 |""...-.w|indow("F|
|00001b30| 69 6c 65 3a 20 20 20 20 | 20 20 20 20 20 20 22 2b |ile: | "+|
|00001b40| 66 69 6c 65 24 2c 31 37 | 2c 32 36 2c 2d 38 29 0d |file$,17|,26,-8).|
|00001b50| 09 d8 05 f5 0d 09 e2 09 | 48 24 3d 22 22 0d 09 ec |........|H$=""...|
|00001b60| 13 f5 3a c8 97 20 61 2c | 62 2c 63 3a fd 63 3d 30 |..:.. a,|b,c:.c=0|
|00001b70| 0d 09 f6 05 f5 0d 0a 00 | 0b 48 24 3d bf 28 30 29 |........|.H$=.(0)|
|00001b80| 0d 0a 0a 0c c8 97 20 61 | 2c 62 2c 63 0d 0a 14 0e |...... a|,b,c....|
|00001b90| fd 48 24 3e 22 22 20 84 | 20 63 0d 0a 1e 39 e7 20 |.H$>"" .| c...9. |
|00001ba0| 48 24 3d bd 28 31 33 29 | 20 84 20 63 20 c8 95 20 |H$=.(13)| . c .. |
|00001bb0| a9 28 66 69 6c 65 24 29 | 3c 31 30 3a 66 69 6c 65 |.(file$)|<10:file|
|00001bc0| 24 3d 66 69 6c 65 24 2b | 22 20 22 3a ce 3a 48 24 |$=file$+|" ":.:H$|
|00001bd0| 3d 22 22 0d 0a 28 40 e7 | 20 48 24 3d bd 31 32 37 |=""..(@.| H$=.127|
|00001be0| 20 66 69 6c 65 24 3d c0 | 66 69 6c 65 24 29 20 8b | file$=.|file$) .|
|00001bf0| 20 e7 20 a9 28 66 69 6c | 65 24 29 3c 31 30 20 66 | . .(fil|e$)<10 f|
|00001c00| 69 6c 65 24 3d 66 69 6c | 65 24 2b 48 24 20 8b 20 |ile$=fil|e$+H$ . |
|00001c10| ef 20 37 0d 0a 32 35 f2 | 77 69 6e 64 6f 77 28 22 |. 7..25.|window("|
|00001c20| 46 69 6c 65 3a 22 2b 66 | 69 6c 65 24 2b c4 31 30 |File:"+f|ile$+.10|
|00001c30| 2d a9 28 66 69 6c 65 24 | 29 2c 22 20 22 29 2c 31 |-.(file$|)," "),1|
|00001c40| 37 2c 32 36 2c 2d 38 29 | 0d 0a 3c 0e fd 48 24 3d |7,26,-8)|..<..H$=|
|00001c50| 22 22 20 84 20 63 0d 0a | 46 16 e7 20 63 20 64 75 |"" . c..|F.. c du|
|00001c60| 6d 6d 79 25 3d a4 61 63 | 63 65 70 74 0d 0a 50 34 |mmy%=.ac|cept..P4|
|00001c70| f2 77 69 6e 64 6f 77 28 | 22 46 69 6c 65 3a 22 2b |.window(|"File:"+|
|00001c80| 66 69 6c 65 24 2b c4 31 | 30 2d a9 28 66 69 6c 65 |file$+.1|0-.(file|
|00001c90| 24 29 2c 22 20 22 29 2c | 31 37 2c 32 36 2c 38 29 |$)," "),|17,26,8)|
|00001ca0| 0d 0a 5a 05 e1 0d 0a 64 | 15 dd 20 a4 61 73 63 69 |..Z....d|.. .asci|
|00001cb0| 69 28 61 61 25 2c 62 62 | 25 29 0d 0a 6e 24 61 63 |i(aa%,bb|%)..n$ac|
|00001cc0| 25 3d 28 61 61 25 20 81 | 20 31 36 29 3a 64 6f 25 |%=(aa% .| 16):do%|
|00001cd0| 3d 33 31 2d 28 62 62 25 | 20 81 20 33 32 29 0d 0a |=31-(bb%| . 32)..|
|00001ce0| 78 25 e7 20 a8 28 64 6f | 25 2f 32 29 3c 3e 64 6f |x%. .(do|%/2)<>do|
|00001cf0| 25 2f 32 20 84 20 28 61 | 63 25 3c 34 37 29 20 8c |%/2 . (a|c%<47) .|
|00001d00| 20 3d 30 0d 0a 82 28 3d | 97 28 c1 41 24 2c 28 28 | =0...(=|.(.A$,((|
|00001d10| 64 6f 25 2f 32 2d 31 29 | 2a 31 36 29 2b 28 61 63 |do%/2-1)|*16)+(ac|
|00001d20| 25 2d 34 36 29 2f 32 2c | 31 29 29 0d 0a 8c 0d dd |%-46)/2,|1)).....|
|00001d30| 20 f2 68 65 61 64 65 72 | 0d 0a 96 4d e7 20 61 25 | .header|...M. a%|
|00001d40| 3c 33 36 30 20 f2 6d 65 | 73 73 61 67 65 28 22 45 |<360 .me|ssage("E|
|00001d50| 48 20 6e 6f 2c 20 73 6f | 72 72 79 2c 20 63 61 6e |H no, so|rry, can|
|00001d60| 27 74 20 63 68 61 6e 67 | 65 20 74 68 61 74 20 21 |'t chang|e that !|
|00001d70| 22 2c 31 29 3a 64 75 6d | 6d 79 25 3d a4 61 63 63 |",1):dum|my%=.acc|
|00001d80| 65 70 74 3a e1 0d 0a a0 | 43 f2 6d 65 73 73 61 67 |ept:....|C.messag|
|00001d90| 65 28 22 41 52 47 48 20 | 4e 4f 20 2d 20 74 68 61 |e("ARGH |NO - tha|
|00001da0| 74 20 6d 65 20 63 72 65 | 64 69 74 20 74 68 65 72 |t me cre|dit ther|
|00001db0| 65 20 21 22 2c 33 29 3a | 64 75 6d 6d 79 25 3d a4 |e !",3):|dummy%=.|
|00001dc0| 61 63 63 65 70 74 3a e1 | 0d 0a aa 1b dd 20 f2 73 |accept:.|..... .s|
|00001dd0| 65 6e 64 63 6f 64 65 73 | 3a 68 63 25 3d 3f 62 75 |endcodes|:hc%=?bu|
|00001de0| 66 66 25 0d 0a b4 1b e3 | 20 54 25 3d 33 32 20 b8 |ff%.....| T%=32 .|
|00001df0| 20 32 35 35 3a 3f 62 75 | 66 66 25 3d 54 25 0d 0a | 255:?bu|ff%=T%..|
|00001e00| be 23 c8 99 20 22 4f 53 | 5f 57 6f 72 64 22 2c 26 |.#.. "OS|_Word",&|
|00001e10| 30 41 2c 62 75 66 66 25 | 20 b8 20 2c 62 75 66 66 |0A,buff%| . ,buff|
|00001e20| 25 0d 0a c8 0e e3 20 49 | 25 3d 31 20 b8 20 38 0d |%..... I|%=1 . 8.|
|00001e30| 0a d2 10 d5 23 58 2c 62 | 75 66 66 25 3f 49 25 0d |....#X,b|uff%?I%.|
|00001e40| 0a dc 07 ed 49 25 0d 0a | e6 07 ed 54 25 0d 0a f0 |....I%..|...T%...|
|00001e50| 0e 3f 62 75 66 66 25 3d | 68 63 25 0d 0a fa 05 e1 |.?buff%=|hc%.....|
|00001e60| 0d 0b 04 1a dd 20 f2 67 | 65 74 63 6f 64 65 73 3a |..... .g|etcodes:|
|00001e70| 68 63 25 3d 3f 62 75 66 | 66 25 0d 0b 0e 11 e3 20 |hc%=?buf|f%..... |
|00001e80| 54 25 3d 33 32 20 b8 20 | 32 35 35 0d 0b 18 0b ef |T%=32 . |255.....|
|00001e90| 20 32 33 2c 54 25 0d 0b | 22 0e e3 20 49 25 3d 31 | 23,T%..|".. I%=1|
|00001ea0| 20 b8 20 38 0d 0b 2c 09 | ef 20 9a 23 58 0d 0b 36 | . 8..,.|. .#X..6|
|00001eb0| 07 ed 49 25 0d 0b 40 07 | ed 54 25 0d 0b 4a 14 3f |..I%..@.|.T%..J.?|
|00001ec0| 62 75 66 66 25 3d 36 35 | 3a 68 63 25 3d 36 35 0d |buff%=65|:hc%=65.|
|00001ed0| 0b 54 0b f2 73 63 72 65 | 65 6e 0d 0b 5e 05 e1 0d |.T..scre|en..^...|
|00001ee0| 0b 68 30 dd 20 f2 72 65 | 73 65 74 3a f2 77 69 6e |.h0. .re|set:.win|
|00001ef0| 64 6f 77 28 22 52 65 73 | 65 74 20 61 6c 6c 22 2c |dow("Res|et all",|
|00001f00| 33 35 2c 32 36 2c 2d 39 | 29 3a fb 20 31 32 38 0d |35,26,-9|):. 128.|
|00001f10| 0b 72 26 f2 6d 65 73 73 | 61 67 65 28 22 52 65 73 |.r&.mess|age("Res|
|00001f20| 65 74 74 69 6e 67 20 63 | 68 61 72 61 63 74 65 72 |etting c|haracter|
|00001f30| 73 22 2c 33 29 0d 0b 7c | 11 e3 20 54 25 3d 33 32 |s",3)..||.. T%=32|
|00001f40| 20 b8 20 32 35 35 0d 0b | 86 0b ef 20 32 33 2c 54 | . 255..|... 23,T|
|00001f50| 25 0d 0b 90 0e e3 20 49 | 25 3d 30 20 b8 20 37 0d |%..... I|%=0 . 7.|
|00001f60| 0b 9a 1c ef 20 3f 28 73 | 74 61 72 74 25 2b 28 54 |.... ?(s|tart%+(T|
|00001f70| 25 2d 33 32 29 2a 38 2b | 49 25 29 0d 0b a4 07 ed |%-32)*8+|I%).....|
|00001f80| 49 25 0d 0b ae 07 ed 54 | 25 0d 0b b8 0e 3f 62 75 |I%.....T|%....?bu|
|00001f90| 66 66 25 3d 68 63 25 0d | 0b c2 0b f2 73 63 72 65 |ff%=hc%.|....scre|
|00001fa0| 65 6e 0d 0b cc 0d f2 62 | 6c 61 6e 6b 69 6e 70 0d |en.....b|lankinp.|
|00001fb0| 0b d6 20 f2 77 69 6e 64 | 6f 77 28 22 52 65 73 65 |.. .wind|ow("Rese|
|00001fc0| 74 20 61 6c 6c 22 2c 33 | 35 2c 32 36 2c 39 29 0d |t all",3|5,26,9).|
|00001fd0| 0b e0 05 e1 0d 0b ea 10 | dd 20 f2 76 64 75 3a fb |........|. .vdu:.|
|00001fe0| 20 31 32 38 0d 0b f4 0e | e7 20 61 25 3c 32 30 30 | 128....|. a%<200|
|00001ff0| 20 8c 0d 0b fe 38 f2 6d | 65 73 73 61 67 65 28 22 | ....8.m|essage("|
|00002000| 45 6e 74 65 72 20 41 53 | 43 49 49 20 6e 75 6d 62 |Enter AS|CII numb|
|00002010| 65 72 20 3a 20 22 2c 33 | 29 3a f1 8a 36 39 2c 33 |er : ",3|):..69,3|
|00002020| 30 29 3b 3a e8 22 22 61 | 73 25 0d 0c 08 25 e7 20 |0);:.""a|s%...%. |
|00002030| 61 73 25 3c 33 32 20 84 | 20 61 73 25 3e 32 35 35 |as%<32 .| as%>255|
|00002040| 20 f2 62 6c 61 6e 6b 69 | 6e 70 3a ef 37 3a e1 0d | .blanki|np:.7:..|
|00002050| 0c 12 1e 3f 62 75 66 66 | 25 3d 61 73 25 3a 68 63 |...?buff|%=as%:hc|
|00002060| 25 3d 61 73 25 3a f2 73 | 63 72 65 65 6e 0d 0c 1c |%=as%:.s|creen...|
|00002070| 0f f2 62 6c 61 6e 6b 69 | 6e 70 3a e1 0d 0c 26 05 |..blanki|np:...&.|
|00002080| cd 0d 0c 30 19 6c 25 3d | 28 28 61 25 2d 32 30 30 |...0.l%=|((a%-200|
|00002090| 29 20 81 20 36 34 20 29 | 2b 31 0d 0c 3a 41 f2 6d |) . 64 )|+1..:A.m|
|000020a0| 65 73 73 61 67 65 28 22 | 45 6e 74 65 72 20 56 44 |essage("|Enter VD|
|000020b0| 55 20 6c 69 6e 65 20 22 | 2b c3 28 6c 25 29 2b 22 |U line "|+.(l%)+"|
|000020c0| 20 76 61 6c 75 65 22 2c | 33 29 3a f1 8a 36 39 2c | value",|3):..69,|
|000020d0| 33 30 29 3b 3a e8 22 22 | 61 73 25 0d 0c 44 1c e7 |30);:.""|as%..D..|
|000020e0| 20 61 73 25 3e 32 35 35 | 20 f2 62 6c 61 6e 6b 69 | as%>255| .blanki|
|000020f0| 6e 70 3a ef 37 3a e1 0d | 0c 4e 1e 3f 28 62 75 66 |np:.7:..|.N.?(buf|
|00002100| 66 25 2b 6c 25 29 3d 61 | 73 25 3a 3f 62 75 66 66 |f%+l%)=a|s%:?buff|
|00002110| 25 3d 68 63 25 0d 0c 58 | 27 ef 20 32 33 2c 68 63 |%=hc%..X|'. 23,hc|
|00002120| 25 3a e3 20 49 25 3d 31 | 20 b8 20 38 3a ef 20 3f |%:. I%=1| . 8:. ?|
|00002130| 28 62 75 66 66 25 2b 49 | 25 29 3a ed 0d 0c 62 0b |(buff%+I|%):...b.|
|00002140| f2 73 63 72 65 65 6e 0d | 0c 6c 0d f2 62 6c 61 6e |.screen.|.l..blan|
|00002150| 6b 69 6e 70 0d 0c 76 05 | e1 0d 0c 80 10 dd 20 f2 |kinp..v.|...... .|
|00002160| 63 6f 64 65 73 3a ef 20 | 35 0d 0c 8a 0e e3 20 54 |codes:. |5..... T|
|00002170| 25 3d 31 20 b8 20 38 0d | 0c 94 23 e6 20 36 3a c8 |%=1 . 8.|..#. 6:.|
|00002180| 93 20 c8 90 20 34 31 2a | 31 36 2c 39 31 36 2d 54 |. .. 41*|16,916-T|
|00002190| 25 2a 38 30 2c 37 30 2c | 33 34 0d 0c 9e 2c e6 20 |%*80,70,|34...,. |
|000021a0| 30 3a ec 20 34 31 2a 31 | 36 2c 39 34 38 2d 54 25 |0:. 41*1|6,948-T%|
|000021b0| 2a 38 30 3a f1 22 3d 26 | 22 3b 7e 3f 28 62 75 66 |*80:."=&|";~?(buf|
|000021c0| 66 25 2b 54 25 29 0d 0c | a8 05 ed 0d 0c b2 0b ef |f%+T%)..|........|
|000021d0| 20 34 3a 87 3a e1 0d 0c | bc 14 dd 20 f2 63 6f 70 | 4:.:...|... .cop|
|000021e0| 79 3a 68 68 63 25 3d 68 | 63 25 0d 0c c6 2b f2 77 |y:hhc%=h|c%...+.w|
|000021f0| 69 6e 64 6f 77 28 22 43 | 6f 70 79 20 3a 22 2b bd |indow("C|opy :"+.|
|00002200| 68 63 25 2b 22 20 74 6f | 20 3f 22 2c 32 2c 32 36 |hc%+" to| ?",2,26|
|00002210| 2c 2d 31 30 29 0d 0c d0 | 12 64 75 6d 6d 79 25 3d |,-10)...|.dummy%=|
|00002220| a4 61 63 63 65 70 74 0d | 0c da 2f f2 6d 65 73 73 |.accept.|../.mess|
|00002230| 61 67 65 28 22 43 6c 69 | 63 6b 20 6f 6e 20 63 68 |age("Cli|ck on ch|
|00002240| 61 72 61 63 74 65 72 20 | 74 6f 20 63 6f 70 79 20 |aracter |to copy |
|00002250| 74 6f 22 2c 33 29 0d 0c | e4 12 64 75 6d 6d 79 25 |to",3)..|..dummy%|
|00002260| 3d a4 61 63 63 65 70 74 | 0d 0c ee 14 63 68 61 25 |=.accept|....cha%|
|00002270| 3d a4 61 73 63 69 69 28 | 61 2c 62 29 0d 0c f8 1f |=.ascii(|a,b)....|
|00002280| e7 20 63 68 61 25 3e 30 | 20 80 20 63 68 61 25 3c |. cha%>0| . cha%<|
|00002290| 3e 68 63 25 20 8b 20 8d | 54 6a 4d 0d 0d 02 0d ef |>hc% . .|TjM.....|
|000022a0| 20 32 33 2c 63 68 61 25 | 0d 0d 0c 1e e3 20 54 25 | 23,cha%|..... T%|
|000022b0| 3d 31 20 b8 20 38 3a ef | 20 3f 28 62 75 66 66 25 |=1 . 8:.| ?(buff%|
|000022c0| 2b 54 25 29 3a ed 0d 0d | 16 17 3f 62 75 66 66 25 |+T%):...|..?buff%|
|000022d0| 3d 68 68 63 25 3a 62 79 | 25 3d 38 39 32 0d 0d 20 |=hhc%:by|%=892.. |
|000022e0| 0b f2 73 63 72 65 65 6e | 0d 0d 2a 35 f2 77 69 6e |..screen|..*5.win|
|000022f0| 64 6f 77 28 22 43 48 52 | 24 28 22 2b 63 63 24 2b |dow("CHR|$("+cc$+|
|00002300| c3 28 63 25 29 2b 22 29 | 3d 22 2b bd 28 63 25 29 |.(c%)+")|="+.(c%)|
|00002310| 2b 22 20 22 2c 32 2c 32 | 36 2c 31 30 29 0d 0d 34 |+" ",2,2|6,10)..4|
|00002320| 05 e1 0d 0d 3e 0d dd 20 | f2 73 63 72 6f 6c 6c 0d |....>.. |.scroll.|
|00002330| 0d 48 06 e6 34 0d 0d 52 | 14 73 63 78 25 3d 34 38 |.H..4..R|.scx%=48|
|00002340| 30 3a 73 63 79 25 3d 34 | 38 0d 0d 5c 17 c8 8f 20 |0:scy%=4|8..\... |
|00002350| c8 90 20 73 63 78 25 2c | 73 63 79 25 2d 34 2c 38 |.. scx%,|scy%-4,8|
|00002360| 0d 0d 66 06 e6 30 0d 0d | 70 27 ec 20 73 63 78 25 |..f..0..|p'. scx%|
|00002370| 2d 33 36 2c 73 63 79 25 | 2d 31 36 3a df 20 73 63 |-36,scy%|-16:. sc|
|00002380| 78 25 2d 33 36 2c 73 63 | 79 25 2b 31 36 0d 0d 7a |x%-36,sc|y%+16..z|
|00002390| 27 ec 20 73 63 78 25 2d | 33 35 2c 73 63 79 25 2d |'. scx%-|35,scy%-|
|000023a0| 31 36 3a df 20 73 63 78 | 25 2d 33 35 2c 73 63 79 |16:. scx|%-35,scy|
|000023b0| 25 2b 31 36 0d 0d 84 21 | ec 20 73 63 78 25 2b 32 |%+16...!|. scx%+2|
|000023c0| 30 2c 73 63 79 25 3a df | 20 73 63 78 25 2b 34 34 |0,scy%:.| scx%+44|
|000023d0| 2c 73 63 79 25 0d 0d 8e | 26 ec 20 73 63 78 25 2d |,scy%...|&. scx%-|
|000023e0| 38 2c 73 63 79 25 2d 32 | 30 3a df 20 73 63 78 25 |8,scy%-2|0:. scx%|
|000023f0| 2b 31 36 2c 73 63 79 25 | 2d 32 30 0d 0d 98 38 ec |+16,scy%|-20...8.|
|00002400| 20 73 63 78 25 2d 31 32 | 2c 73 63 79 25 2b 31 32 | scx%-12|,scy%+12|
|00002410| 3a df 20 73 63 78 25 2d | 34 2c 73 63 79 25 2b 31 |:. scx%-|4,scy%+1|
|00002420| 36 3a df 20 73 63 78 25 | 2d 31 32 2c 73 63 79 25 |6:. scx%|-12,scy%|
|00002430| 2b 32 30 0d 0d a2 37 ec | 20 73 63 78 25 2b 34 2c |+20...7.| scx%+4,|
|00002440| 73 63 79 25 2b 31 32 3a | df 20 73 63 78 25 2b 31 |scy%+12:|. scx%+1|
|00002450| 32 2c 73 63 79 25 2b 31 | 36 3a df 20 73 63 78 25 |2,scy%+1|6:. scx%|
|00002460| 2b 34 2c 73 63 79 25 2b | 32 30 0d 0d ac 39 ec 20 |+4,scy%+|20...9. |
|00002470| 73 63 78 25 2d 31 32 2c | 73 63 79 25 2d 31 36 3a |scx%-12,|scy%-16:|
|00002480| df 20 73 63 78 25 2d 32 | 30 2c 73 63 79 25 2d 32 |. scx%-2|0,scy%-2|
|00002490| 30 3a df 20 73 63 78 25 | 2d 31 32 2c 73 63 79 25 |0:. scx%|-12,scy%|
|000024a0| 2d 32 34 0d 0d b6 08 e6 | 20 31 31 0d 0d c0 30 c8 |-24.....| 11...0.|
|000024b0| 8f 20 c8 90 20 73 63 78 | 25 2d 34 34 2c 73 63 79 |. .. scx|%-44,scy|
|000024c0| 25 2c 34 3a c8 8f 20 c8 | 90 20 73 63 78 25 2b 33 |%,4:.. .|. scx%+3|
|000024d0| 32 2c 73 63 79 25 2b 31 | 32 2c 34 0d 0d ca 08 e6 |2,scy%+1|2,4.....|
|000024e0| 20 31 32 0d 0d d4 30 c8 | 8f 20 c8 90 20 73 63 78 | 12...0.|. .. scx|
|000024f0| 25 2b 33 32 2c 73 63 79 | 25 2d 31 32 2c 34 3a c8 |%+32,scy|%-12,4:.|
|00002500| 8f 20 c8 90 20 73 63 78 | 25 2d 32 36 2c 73 63 79 |. .. scx|%-26,scy|
|00002510| 25 2c 34 0d 0d de 05 e1 | 0d 0d e8 10 dd 20 f2 74 |%,4.....|..... .t|
|00002520| 72 61 6e 73 66 6f 72 6d | 0d 0d f2 16 e7 20 61 25 |ransform|..... a%|
|00002530| 3c 34 36 30 20 8c 20 f2 | 76 65 72 74 3a e1 0d 0d |<460 . .|vert:...|
|00002540| fc 17 e7 20 61 25 3e 35 | 30 30 20 8c 20 f2 68 6f |... a%>5|00 . .ho|
|00002550| 72 69 7a 3a e1 0d 0e 06 | 16 e7 20 62 25 3c 33 36 |riz:....|.. b%<36|
|00002560| 20 8c 20 f2 73 68 69 66 | 74 3a e1 0d 0e 10 17 e7 | . .shif|t:......|
|00002570| 20 62 25 3e 36 30 20 8c | 20 f2 72 6f 74 61 74 65 | b%>60 .| .rotate|
|00002580| 3a e1 0d 0e 1a 0d f2 6f | 72 69 67 69 6e 61 6c 0d |:......o|riginal.|
|00002590| 0e 24 05 e1 0d 0e 2e 0b | dd 20 f2 76 65 72 74 0d |.$......|. .vert.|
|000025a0| 0e 38 0f ef 20 32 33 2c | 3f 62 75 66 66 25 0d 0e |.8.. 23,|?buff%..|
|000025b0| 42 0e e3 20 6c 25 3d 31 | 20 b8 20 38 0d 0e 4c 25 |B.. l%=1| . 8..L%|
|000025c0| 61 24 3d a4 54 6f 42 69 | 6e 61 72 79 28 3f 28 62 |a$=.ToBi|nary(?(b|
|000025d0| 75 66 66 25 2b 6c 25 29 | 2c 38 29 3a 62 24 3d 22 |uff%+l%)|,8):b$="|
|000025e0| 22 0d 0e 56 25 e3 20 49 | 25 3d 38 20 b8 20 31 20 |"..V%. I|%=8 . 1 |
|000025f0| 88 20 2d 31 3a 62 24 3d | 62 24 2b c1 61 24 2c 49 |. -1:b$=|b$+.a$,I|
|00002600| 25 2c 31 29 3a ed 0d 0e | 60 18 76 64 75 25 3d a4 |%,1):...|`.vdu%=.|
|00002610| 46 72 6f 6d 42 69 6e 61 | 72 79 28 62 24 29 0d 0e |FromBina|ry(b$)..|
|00002620| 6a 1b ef 20 76 64 75 25 | 3a 3f 28 62 75 66 66 25 |j.. vdu%|:?(buff%|
|00002630| 2b 6c 25 29 3d 76 64 75 | 25 0d 0e 74 07 ed 6c 25 |+l%)=vdu|%..t..l%|
|00002640| 0d 0e 7e 0b f2 73 63 72 | 65 65 6e 0d 0e 88 05 e1 |..~..scr|een.....|
|00002650| 0d 0e 92 0c dd 20 f2 68 | 6f 72 69 7a 0d 0e 9c 0f |..... .h|oriz....|
|00002660| ef 20 32 33 2c 3f 62 75 | 66 66 25 0d 0e a6 13 e3 |. 23,?bu|ff%.....|
|00002670| 20 49 25 3d 38 20 b8 20 | 31 20 88 20 2d 31 0d 0e | I%=8 . |1 . -1..|
|00002680| b0 11 ef 20 3f 28 62 75 | 66 66 25 2b 49 25 29 0d |... ?(bu|ff%+I%).|
|00002690| 0e ba 05 ed 0d 0e c4 0b | f2 73 63 72 65 65 6e 0d |........|.screen.|
|000026a0| 0e ce 05 e1 0d 0e d8 0b | dd 20 f2 66 69 6c 6c 0d |........|. .fill.|
|000026b0| 0e e2 0e e3 20 54 25 3d | 31 20 b8 20 38 0d 0e ec |.... T%=|1 . 8...|
|000026c0| 1f 61 24 3d a4 54 6f 42 | 69 6e 61 72 79 28 3f 28 |.a$=.ToB|inary(?(|
|000026d0| 62 75 66 66 25 2b 54 25 | 29 2c 38 29 0d 0e f6 29 |buff%+T%|),8)...)|
|000026e0| e3 20 6c 25 3d 31 20 b8 | 20 38 3a 6e 25 28 54 25 |. l%=1 .| 8:n%(T%|
|000026f0| 2c 6c 25 29 3d bb 28 c1 | 61 24 2c 6c 25 2c 31 29 |,l%)=.(.|a$,l%,1)|
|00002700| 29 3a ed 6c 25 0d 0f 00 | 07 ed 54 25 0d 0f 0a 05 |):.l%...|..T%....|
|00002710| e1 0d 0f 14 0c dd 20 f2 | 73 68 69 66 74 0d 0f 1e |...... .|shift...|
|00002720| 09 f2 66 69 6c 6c 0d 0f | 28 0f ef 20 32 33 2c 3f |..fill..|(.. 23,?|
|00002730| 62 75 66 66 25 0d 0f 32 | 0e e3 20 4a 25 3d 31 20 |buff%..2|.. J%=1 |
|00002740| b8 20 38 0d 0f 3c 18 62 | 24 3d c3 28 6e 25 28 4a |. 8..<.b|$=.(n%(J|
|00002750| 25 2c 31 29 29 3a 61 24 | 3d 22 22 0d 0f 46 0e e3 |%,1)):a$|=""..F..|
|00002760| 20 47 25 3d 32 20 b8 20 | 38 0d 0f 50 16 61 24 3d | G%=2 . |8..P.a$=|
|00002770| 61 24 2b c3 28 6e 25 28 | 4a 25 2c 47 25 29 29 0d |a$+.(n%(|J%,G%)).|
|00002780| 0f 5a 07 ed 47 25 0d 0f | 64 0c 61 24 3d 61 24 2b |.Z..G%..|d.a$=a$+|
|00002790| 62 24 0d 0f 6e 15 ef 20 | a4 46 72 6f 6d 42 69 6e |b$..n.. |.FromBin|
|000027a0| 61 72 79 28 61 24 29 0d | 0f 78 07 ed 4a 25 0d 0f |ary(a$).|.x..J%..|
|000027b0| 82 0b f2 73 63 72 65 65 | 6e 0d 0f 8c 05 e1 0d 0f |...scree|n.......|
|000027c0| 96 0d dd 20 f2 72 6f 74 | 61 74 65 0d 0f a0 09 f2 |... .rot|ate.....|
|000027d0| 66 69 6c 6c 0d 0f aa 0b | f2 73 77 69 74 63 68 0d |fill....|.switch.|
|000027e0| 0f b4 0b f2 73 63 72 65 | 65 6e 0d 0f be 05 e1 0d |....scre|en......|
|000027f0| 0f c8 0d dd 20 f2 73 77 | 69 74 63 68 0d 0f d2 0f |.... .sw|itch....|
|00002800| ef 20 32 33 2c 3f 62 75 | 66 66 25 0d 0f dc 0e e3 |. 23,?bu|ff%.....|
|00002810| 20 4b 25 3d 31 20 b8 20 | 38 0d 0f e6 09 61 24 3d | K%=1 . |8....a$=|
|00002820| 22 22 0d 0f f0 13 e3 20 | 49 25 3d 38 20 b8 20 31 |""..... |I%=8 . 1|
|00002830| 20 88 20 2d 31 0d 0f fa | 16 61 24 3d 61 24 2b c3 | . -1...|.a$=a$+.|
|00002840| 28 6e 25 28 49 25 2c 4b | 25 29 29 0d 10 04 07 ed |(n%(I%,K|%)).....|
|00002850| 49 25 0d 10 0e 15 ef 20 | a4 46 72 6f 6d 42 69 6e |I%..... |.FromBin|
|00002860| 61 72 79 28 61 24 29 0d | 10 18 07 ed 4b 25 0d 10 |ary(a$).|....K%..|
|00002870| 22 05 e1 0d 10 2c 0f dd | 20 f2 6f 72 69 67 69 6e |"....,..| .origin|
|00002880| 61 6c 0d 10 36 0f ef 20 | 32 33 2c 3f 62 75 66 66 |al..6.. |23,?buff|
|00002890| 25 0d 10 40 0e e3 20 49 | 25 3d 30 20 b8 20 37 0d |%..@.. I|%=0 . 7.|
|000028a0| 10 4a 20 ef 20 3f 28 73 | 74 61 72 74 25 2b 28 3f |.J . ?(s|tart%+(?|
|000028b0| 62 75 66 66 25 2d 33 32 | 29 2a 38 2b 49 25 29 0d |buff%-32|)*8+I%).|
|000028c0| 10 54 05 ed 0d 10 5e 0b | f2 73 63 72 65 65 6e 0d |.T....^.|.screen.|
|000028d0| 10 68 05 e1 0d 10 72 0d | dd 20 f2 73 63 72 65 65 |.h....r.|. .scree|
|000028e0| 6e 0d 10 7c 23 c8 99 20 | 22 4f 53 5f 57 6f 72 64 |n..|#.. |"OS_Word|
|000028f0| 22 2c 26 30 41 2c 62 75 | 66 66 25 20 b8 20 2c 62 |",&0A,bu|ff% . ,b|
|00002900| 75 66 66 25 0d 10 86 0c | f2 73 63 72 65 65 6e 32 |uff%....|.screen2|
|00002910| 0d 10 90 05 e1 0d 10 9a | 0e dd 20 f2 73 63 72 65 |........|.. .scre|
|00002920| 65 6e 32 0d 10 a4 0b 62 | 79 25 3d 38 39 32 0d 10 |en2....b|y%=892..|
|00002930| ae 13 f2 73 69 6e 67 6c | 65 28 3f 62 75 66 66 25 |...singl|e(?buff%|
|00002940| 29 0d 10 b8 0b f2 62 69 | 6e 61 72 79 0d 10 c2 0a |).....bi|nary....|
|00002950| f2 74 61 62 6c 65 0d 10 | cc 0e 68 63 25 3d 3f 62 |.table..|..hc%=?b|
|00002960| 75 66 66 25 0d 10 d6 05 | e1 0d 10 e0 1a dd 20 a4 |uff%....|...... .|
|00002970| 54 6f 42 69 6e 61 72 79 | 28 6e 75 6d 25 2c 62 69 |ToBinary|(num%,bi|
|00002980| 74 25 29 0d 10 ea 13 ea | 20 6e 75 6d 24 2c 6e 24 |t%).....| num$,n$|
|00002990| 3a 6e 24 3d 22 22 0d 10 | f4 26 62 69 74 25 3d 28 |:n$=""..|.&bit%=(|
|000029a0| 62 69 74 25 20 81 20 34 | 29 2a 34 2d 28 28 62 69 |bit% . 4|)*4-((bi|
|000029b0| 74 25 20 83 20 34 29 3e | 30 29 2a 34 0d 10 fe 2e |t% . 4)>|0)*4....|
|000029c0| c8 99 20 22 4f 53 5f 43 | 6f 6e 76 65 72 74 42 69 |.. "OS_C|onvertBi|
|000029d0| 6e 61 72 79 34 22 2c 6e | 75 6d 25 2c 33 32 2c 6e |nary4",n|um%,32,n|
|000029e0| 75 6d 24 20 b8 20 6e 75 | 6d 24 0d 11 08 10 3d c2 |um$ . nu|m$....=.|
|000029f0| 6e 75 6d 24 2c 62 69 74 | 25 29 0d 11 12 1c dd 20 |num$,bit|%)..... |
|00002a00| a4 46 72 6f 6d 42 69 6e | 61 72 79 28 6e 75 6d 24 |.FromBin|ary(num$|
|00002a10| 29 3a 6e 25 3d 30 0d 11 | 1c 13 e3 20 54 25 3d 38 |):n%=0..|... T%=8|
|00002a20| 20 b8 20 31 20 88 20 2d | 31 0d 11 26 22 6e 25 3d | . 1 . -|1..&"n%=|
|00002a30| 6e 25 2b 28 bb 28 c1 6e | 75 6d 24 2c 54 25 2c 31 |n%+(.(.n|um$,T%,1|
|00002a40| 29 29 3c 3c 28 38 2d 54 | 25 29 29 0d 11 30 05 ed |))<<(8-T|%))..0..|
|00002a50| 0d 11 3a 07 3d 6e 25 0d | ff 46 69 6c 65 44 61 74 |..:.=n%.|.FileDat|
|00002a60| 61 82 43 68 61 72 46 57 | 50 00 ef 83 03 5b 0a 00 |a.CharFW|P....[..|
|00002a70| 00 44 ff ff ff 76 ff 49 | 78 03 00 f0 cc 20 20 20 |.D...v.I|x.... |
|00002a80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002a90| 20 20 20 41 52 43 48 49 | 4d 45 44 45 53 20 43 48 | ARCHI|MEDES CH|
|00002aa0| 41 52 41 43 54 45 52 20 | 44 45 46 49 4e 45 52 0a |ARACTER |DEFINER.|
|00002ab0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002ac0| 20 20 20 43 4f 50 59 52 | 49 47 48 54 20 4c 45 53 | COPYR|IGHT LES|
|00002ad0| 4c 49 45 20 41 20 48 41 | 59 2c 20 4d 41 52 43 48 |LIE A HA|Y, MARCH|
|00002ae0| 20 31 39 38 39 0a 0a 0a | 4d 6f 64 69 66 69 65 64 | 1989...|Modified|
|00002af0| 20 73 6c 69 67 68 74 6c | 79 20 74 6f 20 72 75 6e | slightl|y to run|
|00002b00| 20 66 72 6f 6d 20 64 65 | 73 6b 74 6f 70 20 77 69 | from de|sktop wi|
|00002b10| 74 68 20 6f 77 6e 20 70 | 61 6c 65 74 74 65 20 62 |th own p|alette b|
|00002b20| 79 20 44 61 76 69 64 20 | 48 6f 6c 64 65 6e 2c 0a |y David |Holden,.|
|00002b30| 46 65 62 72 75 61 72 79 | 20 31 39 39 33 2e 20 49 |February| 1993. I|
|00002b40| 66 20 79 6f 75 20 64 6f | 6e 27 74 20 6c 69 6b 65 |f you do|n't like|
|00002b50| 20 74 68 65 20 63 6f 6c | 6f 75 72 73 20 6d 6f 64 | the col|ours mod|
|00002b60| 69 66 79 20 74 68 65 20 | 66 69 6c 65 20 21 70 61 |ify the |file !pa|
|00002b70| 6c 65 74 74 65 20 69 6e | 0a 74 68 65 20 61 70 70 |lette in|.the app|
|00002b80| 6c 69 63 61 74 69 6f 6e | 20 64 69 72 65 63 74 6f |lication| directo|
|00002b90| 72 79 2e 20 54 68 69 73 | 20 69 73 20 61 20 73 74 |ry. This| is a st|
|00002ba0| 61 6e 64 61 72 64 20 57 | 69 6d 70 20 50 61 6c 65 |andard W|imp Pale|
|00002bb0| 74 74 65 20 66 69 6c 65 | 2e 0a 0a 0a 54 68 69 73 |tte file|....This|
|00002bc0| 20 70 72 6f 67 72 61 6d | 20 77 61 73 20 77 72 69 | program| was wri|
|00002bd0| 74 74 65 6e 20 74 6f 20 | 61 69 64 20 69 6e 20 64 |tten to |aid in d|
|00002be0| 65 66 69 6e 69 6e 67 20 | 61 6e 64 20 65 78 61 6d |efining |and exam|
|00002bf0| 69 6e 69 6e 67 20 74 68 | 65 20 63 68 61 72 61 63 |ining th|e charac|
|00002c00| 74 65 72 73 20 0a 66 72 | 6f 6d 20 20 41 73 63 69 |ters .fr|om Asci|
|00002c10| 69 20 33 32 20 74 6f 20 | 41 73 63 69 69 20 32 35 |i 32 to |Ascii 25|
|00002c20| 35 2e 20 20 41 6c 6c 20 | 74 68 65 20 70 72 6f 67 |5. All |the prog|
|00002c30| 72 61 6d 20 66 75 6e 63 | 74 69 6f 6e 73 20 61 72 |ram func|tions ar|
|00002c40| 65 20 61 76 61 69 6c 61 | 62 6c 65 20 62 79 20 0a |e availa|ble by .|
|00002c50| 73 65 6c 65 63 74 69 6e | 67 20 77 69 74 68 20 74 |selectin|g with t|
|00002c60| 68 65 20 6d 6f 75 73 65 | 20 28 61 6e 79 20 62 75 |he mouse| (any bu|
|00002c70| 74 74 6f 6e 29 2c 20 61 | 6e 64 20 69 6e 20 74 68 |tton), a|nd in th|
|00002c80| 65 20 63 61 73 65 20 6f | 66 20 63 68 61 72 61 63 |e case o|f charac|
|00002c90| 74 65 72 20 0a 73 65 6c | 65 63 74 69 6f 6e 2c 20 |ter .sel|ection, |
|00002ca0| 62 79 20 65 69 74 68 65 | 72 20 6d 6f 75 73 65 20 |by eithe|r mouse |
|00002cb0| 6f 72 20 6b 65 79 62 6f | 61 72 64 2e 20 20 4d 6f |or keybo|ard. Mo|
|00002cc0| 73 74 20 69 63 6f 6e 73 | 20 61 72 65 20 73 65 6c |st icons| are sel|
|00002cd0| 66 20 65 78 70 6c 61 6e | 61 74 6f 72 79 2c 20 0a |f explan|atory, .|
|00002ce0| 77 69 74 68 20 6f 6e 65 | 20 65 78 63 65 70 74 69 |with one| excepti|
|00002cf0| 6f 6e 2c 20 77 68 65 72 | 65 20 6c 61 63 6b 20 6f |on, wher|e lack o|
|00002d00| 66 20 72 6f 6f 6d 20 6d | 65 61 6e 74 20 63 72 61 |f room m|eant cra|
|00002d10| 6d 6d 69 6e 67 20 73 65 | 76 65 72 61 6c 20 66 75 |mming se|veral fu|
|00002d20| 6e 63 74 69 6f 6e 73 20 | 0a 6f 6e 74 6f 20 6f 6e |nctions |.onto on|
|00002d30| 65 20 69 63 6f 6e 20 2d | 20 69 6e 20 77 68 69 63 |e icon -| in whic|
|00002d40| 68 20 63 61 73 65 2c 20 | 6d 6f 75 73 65 20 73 65 |h case, |mouse se|
|00002d50| 6c 65 63 74 69 6f 6e 20 | 73 74 69 6c 6c 20 61 70 |lection |still ap|
|00002d60| 70 6c 69 65 73 2c 20 62 | 75 74 20 77 69 6c 6c 20 |plies, b|ut will |
|00002d70| 0a 64 65 70 65 6e 64 20 | 6f 6e 20 77 68 69 63 68 |.depend |on which|
|00002d80| 20 70 61 72 74 20 6f 66 | 20 74 68 65 20 69 63 6f | part of| the ico|
|00002d90| 6e 20 69 73 20 73 65 6c | 65 63 74 65 64 2e 0a 0a |n is sel|ected...|
|00002da0| 49 63 6f 6e 73 20 65 78 | 69 73 74 20 66 6f 72 20 |Icons ex|ist for |
|00002db0| 6c 6f 61 64 69 6e 67 20 | 66 69 6c 65 73 2c 20 73 |loading |files, s|
|00002dc0| 61 76 69 6e 67 20 66 69 | 6c 65 73 2c 20 71 75 69 |aving fi|les, qui|
|00002dd0| 74 74 69 6e 67 20 74 68 | 65 20 70 72 6f 67 72 61 |tting th|e progra|
|00002de0| 6d 2c 20 61 63 63 65 73 | 73 20 0a 74 6f 20 6f 70 |m, acces|s .to op|
|00002df0| 65 72 61 74 69 6e 67 20 | 73 79 73 74 65 6d 2c 20 |erating |system, |
|00002e00| 72 65 73 65 74 74 69 6e | 67 20 65 6e 74 69 72 65 |resettin|g entire|
|00002e10| 20 63 68 61 72 61 63 74 | 65 72 20 73 65 74 2c 20 | charact|er set, |
|00002e20| 63 6f 70 79 69 6e 67 20 | 74 68 65 20 0a 64 69 73 |copying |the .dis|
|00002e30| 70 6c 61 79 65 64 20 63 | 68 61 72 61 63 74 65 72 |played c|haracter|
|00002e40| 20 74 6f 20 61 6e 6f 74 | 68 65 72 20 63 68 61 72 | to anot|her char|
|00002e50| 61 63 74 65 72 20 61 6e | 64 20 6f 6e 65 20 6f 74 |acter an|d one ot|
|00002e60| 68 65 72 20 6d 69 78 74 | 75 72 65 20 69 63 6f 6e |her mixt|ure icon|
|00002e70| 2e 0a 0a 54 68 65 20 6d | 69 78 65 64 20 66 75 6e |...The m|ixed fun|
|00002e80| 63 74 69 6f 6e 20 69 63 | 6f 6e 2c 20 67 69 76 65 |ction ic|on, give|
|00002e90| 73 20 6d 69 72 72 6f 72 | 20 6c 65 66 74 2f 72 69 |s mirror| left/ri|
|00002ea0| 67 68 74 2c 20 6d 69 72 | 72 6f 72 20 74 6f 70 2f |ght, mir|ror top/|
|00002eb0| 62 6f 74 74 6f 6d 2c 20 | 0a 72 65 73 65 74 20 74 |bottom, |.reset t|
|00002ec0| 68 65 20 64 69 73 70 6c | 61 79 65 64 20 63 68 61 |he displ|ayed cha|
|00002ed0| 72 61 63 74 65 72 2c 20 | 72 6f 74 61 74 65 20 72 |racter, |rotate r|
|00002ee0| 69 67 68 74 20 61 6e 64 | 20 73 68 69 66 74 20 6c |ight and| shift l|
|00002ef0| 65 66 74 2e 20 54 68 65 | 73 65 20 0a 66 75 6e 63 |eft. The|se .func|
|00002f00| 74 69 6f 6e 73 20 61 72 | 65 20 6d 6f 72 65 20 65 |tions ar|e more e|
|00002f10| 61 73 69 6c 79 20 66 6f | 75 6e 64 20 62 79 20 74 |asily fo|und by t|
|00002f20| 72 69 61 6c 20 61 6e 64 | 20 65 72 72 6f 72 2c 20 |rial and| error, |
|00002f30| 62 75 74 20 62 61 73 69 | 63 61 6c 6c 79 2c 20 74 |but basi|cally, t|
|00002f40| 68 65 20 0a 63 65 6e 74 | 72 65 20 70 6f 72 74 69 |he .cent|re porti|
|00002f50| 6f 6e 20 28 66 69 6c 6c | 65 64 20 63 69 72 63 6c |on (fill|ed circl|
|00002f60| 65 29 20 64 6f 65 73 20 | 74 68 65 20 72 65 73 65 |e) does |the rese|
|00002f70| 74 2c 20 6d 69 72 72 6f | 72 20 66 75 6e 63 74 69 |t, mirro|r functi|
|00002f80| 6f 6e 73 20 61 72 65 20 | 6f 6e 65 20 0a 61 74 20 |ons are |one .at |
|00002f90| 65 61 63 68 20 65 6e 64 | 20 6f 66 20 74 68 65 20 |each end| of the |
|00002fa0| 69 63 6f 6e 2c 20 72 6f | 74 61 74 65 20 69 73 20 |icon, ro|tate is |
|00002fb0| 61 74 20 63 65 6e 74 72 | 65 20 74 6f 70 20 61 6e |at centr|e top an|
|00002fc0| 64 20 73 68 69 66 74 20 | 6c 65 66 74 20 61 74 20 |d shift |left at |
|00002fd0| 63 65 6e 74 72 65 20 0a | 62 6f 74 74 6f 6d 2e 0a |centre .|bottom..|
|00002fe0| 54 68 65 20 63 6f 70 79 | 20 66 75 6e 63 74 69 6f |The copy| functio|
|00002ff0| 6e 20 69 73 20 72 65 61 | 63 68 65 64 20 62 79 20 |n is rea|ched by |
|00003000| 63 6c 69 63 6b 69 6e 67 | 20 6f 76 65 72 20 74 68 |clicking| over th|
|00003010| 65 20 27 43 48 52 24 28 | 3f 3f 29 3d 27 20 62 6f |e 'CHR$(|??)=' bo|
|00003020| 78 2c 20 61 6e 64 0a 77 | 68 69 6c 65 20 61 63 74 |x, and.w|hile act|
|00003030| 69 76 65 2c 20 77 69 6c | 6c 20 70 6c 61 63 65 20 |ive, wil|l place |
|00003040| 61 20 63 6f 70 79 20 6f | 66 20 74 68 65 20 63 75 |a copy o|f the cu|
|00003050| 72 72 65 6e 74 20 63 68 | 61 72 61 63 74 65 72 20 |rrent ch|aracter |
|00003060| 74 6f 20 61 20 73 65 6c | 65 63 74 65 64 20 0a 70 |to a sel|ected .p|
|00003070| 6f 73 69 74 69 6f 6e 20 | 77 69 74 68 69 6e 20 74 |osition |within t|
|00003080| 68 65 20 63 68 61 72 61 | 63 74 65 72 20 74 61 62 |he chara|cter tab|
|00003090| 6c 65 2e 0a 0a 57 68 65 | 6e 20 74 68 65 20 70 72 |le...Whe|n the pr|
|000030a0| 6f 67 72 61 6d 20 69 73 | 20 66 69 72 73 74 20 72 |ogram is| first r|
|000030b0| 75 6e 20 28 62 79 20 62 | 6f 6f 74 69 6e 67 20 66 |un (by b|ooting f|
|000030c0| 72 6f 6d 20 74 68 65 20 | 64 69 73 63 29 2c 20 74 |rom the |disc), t|
|000030d0| 68 65 20 63 68 61 72 61 | 63 74 65 72 20 0a 73 65 |he chara|cter .se|
|000030e0| 74 20 69 73 20 73 61 76 | 65 64 20 74 6f 20 65 6e |t is sav|ed to en|
|000030f0| 61 62 6c 65 20 74 68 65 | 20 72 65 73 65 74 20 61 |able the| reset a|
|00003100| 6c 6c 20 69 63 6f 6e 20 | 62 75 74 74 6f 6e 20 74 |ll icon |button t|
|00003110| 6f 20 66 75 6e 63 74 69 | 6f 6e 20 63 6f 72 72 65 |o functi|on corre|
|00003120| 63 74 6c 79 2c 20 0a 61 | 6e 64 20 74 68 65 73 65 |ctly, .a|nd these|
|00003130| 20 77 69 6c 6c 20 62 65 | 20 74 68 65 20 63 68 61 | will be| the cha|
|00003140| 72 61 63 74 65 72 73 20 | 70 72 65 73 65 6e 74 65 |racters |presente|
|00003150| 64 20 77 68 65 6e 20 74 | 68 69 73 20 72 65 73 65 |d when t|his rese|
|00003160| 74 74 69 6e 67 20 69 73 | 20 64 6f 6e 65 2e 0a 0a |tting is| done...|
|00003170| 54 68 65 20 63 75 72 72 | 65 6e 74 20 63 68 61 72 |The curr|ent char|
|00003180| 61 63 74 65 72 20 69 73 | 20 64 69 73 70 6c 61 79 |acter is| display|
|00003190| 65 64 20 69 6e 20 61 20 | 6c 61 72 67 65 20 38 20 |ed in a |large 8 |
|000031a0| 78 20 38 20 67 72 69 64 | 2c 20 61 6e 64 20 74 68 |x 8 grid|, and th|
|000031b0| 69 73 20 0a 63 68 61 72 | 61 63 74 65 72 20 63 61 |is .char|acter ca|
|000031c0| 6e 20 62 65 20 63 68 61 | 6e 67 65 64 20 62 79 20 |n be cha|nged by |
|000031d0| 73 65 6c 65 63 74 69 6e | 67 20 66 72 6f 6d 20 74 |selectin|g from t|
|000031e0| 68 65 20 63 68 61 72 61 | 63 74 65 72 20 74 61 62 |he chara|cter tab|
|000031f0| 6c 65 20 77 69 74 68 20 | 74 68 65 20 0a 6d 6f 75 |le with |the .mou|
|00003200| 73 65 2c 20 6f 72 20 62 | 79 20 70 72 65 73 73 69 |se, or b|y pressi|
|00003210| 6e 67 20 61 20 6b 65 79 | 62 6f 61 72 64 20 6b 65 |ng a key|board ke|
|00003220| 79 2e 20 54 68 6f 73 65 | 20 63 68 61 72 61 63 74 |y. Those| charact|
|00003230| 65 72 73 20 6e 6f 74 20 | 61 76 61 69 6c 61 62 6c |ers not |availabl|
|00003240| 65 20 6f 6e 20 0a 74 68 | 65 20 6b 65 79 62 6f 61 |e on .th|e keyboa|
|00003250| 72 64 20 63 61 6e 20 6f | 6e 6c 79 20 62 65 20 73 |rd can o|nly be s|
|00003260| 65 6c 65 63 74 65 64 20 | 62 79 20 74 68 65 20 6d |elected |by the m|
|00003270| 6f 75 73 65 20 66 72 6f | 6d 20 74 68 65 20 63 68 |ouse fro|m the ch|
|00003280| 61 72 61 63 74 65 72 20 | 74 61 62 6c 65 2e 0a 0a |aracter |table...|
|00003290| 50 72 65 73 73 69 6e 67 | 20 61 20 6d 6f 75 73 65 |Pressing| a mouse|
|000032a0| 20 62 75 74 74 6f 6e 20 | 6f 76 65 72 20 61 20 63 | button |over a c|
|000032b0| 68 61 72 61 63 74 65 72 | 20 67 72 69 64 20 73 71 |haracter| grid sq|
|000032c0| 75 61 72 65 20 77 69 6c | 6c 20 69 6e 76 65 72 74 |uare wil|l invert|
|000032d0| 20 74 68 65 20 0a 73 71 | 75 61 72 65 2c 20 61 6e | the .sq|uare, an|
|000032e0| 64 20 72 65 64 65 66 69 | 6e 65 20 74 68 65 20 63 |d redefi|ne the c|
|000032f0| 68 61 72 61 63 74 65 72 | 20 74 6f 20 73 75 69 74 |haracter| to suit|
|00003300| 20 74 68 65 20 6e 65 77 | 20 73 68 61 70 65 2e 20 | the new| shape. |
|00003310| 20 54 68 65 20 6f 6e 20 | 73 63 72 65 65 6e 20 0a | The on |screen .|
|00003320| 64 69 73 70 6c 61 79 65 | 64 20 63 68 61 72 61 63 |displaye|d charac|
|00003330| 74 65 72 73 20 61 72 65 | 20 61 6c 6c 20 65 66 66 |ters are| all eff|
|00003340| 65 63 74 65 64 2c 20 62 | 75 74 20 6f 6e 6c 79 20 |ected, b|ut only |
|00003350| 69 66 20 61 20 73 63 72 | 65 65 6e 20 77 72 69 74 |if a scr|een writ|
|00003360| 65 20 69 73 20 0a 70 65 | 72 66 6f 72 6d 65 64 20 |e is .pe|rformed |
|00003370| 66 6f 72 20 74 68 65 20 | 65 6e 74 69 72 65 20 73 |for the |entire s|
|00003380| 63 72 65 65 6e 2c 20 6f | 72 20 66 6f 72 20 61 6e |creen, o|r for an|
|00003390| 20 69 63 6f 6e 20 62 6f | 78 2e 20 46 6f 72 20 65 | icon bo|x. For e|
|000033a0| 78 61 6d 70 6c 65 2c 20 | 69 66 20 79 6f 75 20 0a |xample, |if you .|
|000033b0| 72 65 64 65 66 69 6e 65 | 20 74 68 65 20 63 68 61 |redefine| the cha|
|000033c0| 72 61 63 74 65 72 20 27 | 41 27 2c 20 74 68 65 6e |racter '|A', then|
|000033d0| 20 61 6e 79 20 74 69 6d | 65 20 74 68 61 74 20 74 | any tim|e that t|
|000033e0| 65 78 74 20 69 73 20 77 | 72 69 74 74 65 6e 20 74 |ext is w|ritten t|
|000033f0| 6f 20 74 68 65 20 0a 73 | 63 72 65 65 6e 2c 20 74 |o the .s|creen, t|
|00003400| 68 65 6e 20 74 68 65 20 | 6e 65 77 20 73 68 61 70 |hen the |new shap|
|00003410| 65 20 77 69 6c 6c 20 62 | 65 20 75 73 65 64 2e 20 |e will b|e used. |
|00003420| 0a 0a 49 6e 66 6f 72 6d | 61 74 69 6f 6e 20 74 65 |..Inform|ation te|
|00003430| 78 74 20 69 73 20 70 72 | 65 73 65 6e 74 65 64 20 |xt is pr|esented |
|00003440| 66 72 6f 6d 20 74 69 6d | 65 20 74 6f 20 74 69 6d |from tim|e to tim|
|00003450| 65 20 61 74 20 74 68 65 | 20 6c 6f 77 65 72 20 72 |e at the| lower r|
|00003460| 69 67 68 74 20 0a 70 6f | 72 74 69 6f 6e 20 6f 66 |ight .po|rtion of|
|00003470| 20 74 68 65 20 73 63 72 | 65 65 6e 20 2d 20 74 68 | the scr|een - th|
|00003480| 69 73 20 63 6f 75 6c 64 | 20 62 65 20 61 20 70 72 |is could| be a pr|
|00003490| 6f 6d 70 74 20 66 6f 72 | 20 61 20 66 69 6c 65 20 |ompt for| a file |
|000034a0| 6e 61 6d 65 2c 20 6f 72 | 20 61 20 0a 6d 65 73 73 |name, or| a .mess|
|000034b0| 61 67 65 20 74 68 61 74 | 20 61 20 66 69 6c 65 20 |age that| a file |
|000034c0| 64 6f 65 73 6e 27 74 20 | 65 78 69 73 74 20 65 74 |doesn't |exist et|
|000034d0| 63 2e 0a 0a 0a 0a 0a 0a | |c.......| |
+--------+-------------------------+-------------------------+--------+--------+