home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1995-11-08 | 10.3 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 27 f4 20 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |...'. **|********|
|00000010| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000020| 2a 2a 2a 2a 2a 2a 2a 0d | 00 14 27 f4 20 2a 20 4d |*******.|..'. * M|
|00000030| 55 4c 54 49 2d 43 4f 4c | 4f 55 52 45 44 20 43 48 |ULTI-COL|OURED CH|
|00000040| 41 52 41 43 54 45 52 20 | 53 45 54 53 20 2a 0d 00 |ARACTER |SETS *..|
|00000050| 1e 27 f4 20 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.'. ****|********|
|00000060| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000070| 2a 2a 2a 2a 2a 0d 00 28 | 04 0d 00 32 08 2a 52 41 |*****..(|...2.*RA|
|00000080| 4d 0d 00 3c 07 eb 31 33 | 0d 00 46 05 87 0d 00 50 |M..<..13|..F....P|
|00000090| 04 0d 00 5a 26 de 20 61 | 25 20 38 20 3a 20 f4 20 |...Z&. a|% 8 : . |
|000000a0| 55 73 65 64 20 66 6f 72 | 20 73 63 72 65 65 6e 20 |Used for| screen |
|000000b0| 61 64 64 72 65 73 73 0d | 00 64 04 0d 00 6e 0c 61 |address.|.d...n.a|
|000000c0| 25 21 30 3d 31 34 38 0d | 00 78 0b 61 25 21 34 3d |%!0=148.|.x.a%!4=|
|000000d0| 2d 31 0d 00 82 21 c8 99 | 22 4f 53 5f 52 65 61 64 |-1...!..|"OS_Read|
|000000e0| 56 64 75 56 61 72 69 61 | 62 6c 65 73 22 2c 61 25 |VduVaria|bles",a%|
|000000f0| 2c 61 25 0d 00 8c 0b 73 | 63 72 3d 21 61 25 0d 00 |,a%....s|cr=!a%..|
|00000100| 96 04 0d 00 a0 23 ee 20 | 85 20 fb 31 32 38 c8 9c |.....#. |. .128..|
|00000110| 30 3a f6 3a f1 20 22 20 | 41 54 20 4c 49 4e 45 20 |0:.:. " |AT LINE |
|00000120| 22 3b 9e 3a e0 0d 00 aa | 04 0d 00 b4 24 f4 20 2a |";.:....|....$. *|
|00000130| 20 47 45 54 20 41 4d 4f | 55 4e 54 20 46 4f 52 20 | GET AMO|UNT FOR |
|00000140| 50 41 4c 45 54 54 45 20 | 54 41 42 4c 45 0d 00 be |PALETTE |TABLE...|
|00000150| 04 0d 00 c8 39 c8 99 22 | 43 6f 6c 6f 75 72 54 72 |....9.."|ColourTr|
|00000160| 61 6e 73 5f 52 65 61 64 | 50 61 6c 65 74 74 65 22 |ans_Read|Palette"|
|00000170| 2c 2d 31 2c 2d 31 2c 30 | 2c 30 2c 30 20 b8 20 52 |,-1,-1,0|,0,0 . R|
|00000180| 30 2c 52 31 2c 52 32 2c | 52 33 0d 00 d2 23 de 20 |0,R1,R2,|R3...#. |
|00000190| 70 61 6c 65 74 74 65 25 | 20 52 33 20 3a 20 f4 20 |palette%| R3 : . |
|000001a0| 48 6f 6c 64 73 20 70 61 | 6c 65 74 74 65 0d 00 dc |Holds pa|lette...|
|000001b0| 35 c8 99 22 43 6f 6c 6f | 75 72 54 72 61 6e 73 5f |5.."Colo|urTrans_|
|000001c0| 52 65 61 64 50 61 6c 65 | 74 74 65 22 2c 2d 31 2c |ReadPale|tte",-1,|
|000001d0| 2d 31 2c 70 61 6c 65 74 | 74 65 25 2c 31 30 32 34 |-1,palet|te%,1024|
|000001e0| 2c 30 0d 00 e6 04 0d 00 | f0 22 de 20 62 69 6e 25 |,0......|.". bin%|
|000001f0| 20 39 20 3a 20 f4 20 48 | 6f 6c 64 73 20 62 69 6e | 9 : . H|olds bin|
|00000200| 61 72 79 20 64 61 74 61 | 0d 00 fa 21 de 20 65 78 |ary data|...!. ex|
|00000210| 25 20 31 36 20 3a 20 f4 | 20 46 6f 72 20 31 36 20 |% 16 : .| For 16 |
|00000220| 2a 20 31 36 20 64 61 74 | 61 0d 01 04 04 0d 01 0e |* 16 dat|a.......|
|00000230| 13 f4 20 2a 20 43 6f 6e | 73 74 61 6e 74 73 20 2a |.. * Con|stants *|
|00000240| 0d 01 18 04 0d 01 22 25 | 4d 41 58 58 25 3d 31 36 |......"%|MAXX%=16|
|00000250| 20 20 20 20 20 20 3a 20 | f4 20 4d 61 78 20 58 20 | : |. Max X |
|00000260| 67 72 69 64 20 73 69 7a | 65 0d 01 2c 25 4d 41 58 |grid siz|e..,%MAX|
|00000270| 59 25 3d 31 36 20 20 20 | 20 20 20 3a 20 f4 20 4d |Y%=16 | : . M|
|00000280| 61 78 20 59 20 67 72 69 | 64 20 73 69 7a 65 0d 01 |ax Y gri|d size..|
|00000290| 36 21 4d 41 58 4f 50 54 | 25 3d 31 30 20 20 20 20 |6!MAXOPT|%=10 |
|000002a0| 3a 20 f4 20 4d 61 78 20 | 6f 70 74 69 6f 6e 73 0d |: . Max |options.|
|000002b0| 01 40 2c 4d 41 58 53 49 | 5a 45 25 3d 32 35 35 20 |.@,MAXSI|ZE%=255 |
|000002c0| 20 3a 20 f4 20 4d 61 78 | 20 6e 6f 2e 20 6f 66 20 | : . Max| no. of |
|000002d0| 63 68 61 72 73 20 74 6f | 20 64 6f 0d 01 4a 24 43 |chars to| do..J$C|
|000002e0| 58 25 3d 38 20 20 20 20 | 20 20 20 20 20 3a 20 f4 |X%=8 | : .|
|000002f0| 20 43 75 72 72 65 6e 74 | 20 58 20 73 69 7a 65 0d | Current| X size.|
|00000300| 01 54 24 43 59 25 3d 38 | 20 20 20 20 20 20 20 20 |.T$CY%=8| |
|00000310| 20 3a 20 f4 20 43 75 72 | 72 65 6e 74 20 59 20 73 | : . Cur|rent Y s|
|00000320| 69 7a 65 0d 01 5e 04 0d | 01 68 23 de 20 6f 70 74 |ize..^..|.h#. opt|
|00000330| 69 6f 6e 73 24 28 4d 41 | 58 4f 50 54 25 29 20 3a |ions$(MA|XOPT%) :|
|00000340| 20 f4 20 4f 70 74 69 6f | 6e 73 0d 01 72 33 de 20 | . Optio|ns..r3. |
|00000350| 64 61 74 25 28 4d 41 58 | 53 49 5a 45 25 2c 4d 41 |dat%(MAX|SIZE%,MA|
|00000360| 58 58 25 2c 4d 41 58 59 | 25 29 20 3a 20 f4 20 43 |XX%,MAXY|%) : . C|
|00000370| 68 61 72 61 63 74 65 72 | 20 64 61 74 61 0d 01 7c |haracter| data..||
|00000380| 04 0d 01 86 18 f4 20 2a | 20 43 6c 65 61 72 20 61 |...... *| Clear a|
|00000390| 6c 6c 20 64 61 74 61 20 | 2a 0d 01 90 04 0d 01 9a |ll data |*.......|
|000003a0| 13 f1 22 50 6c 65 61 73 | 65 20 77 61 69 74 3a 22 |.."Pleas|e wait:"|
|000003b0| 0d 01 a4 5a e3 20 6c 6f | 6f 70 25 3d 30 20 b8 20 |...Z. lo|op%=0 . |
|000003c0| 4d 41 58 53 49 5a 45 25 | 3a e3 20 58 25 3d 31 20 |MAXSIZE%|:. X%=1 |
|000003d0| b8 20 4d 41 58 58 25 3a | e3 20 59 25 3d 31 20 b8 |. MAXX%:|. Y%=1 .|
|000003e0| 20 4d 41 58 59 25 3a 64 | 61 74 25 28 6c 6f 6f 70 | MAXY%:d|at%(loop|
|000003f0| 25 2c 58 25 2c 59 25 29 | 3d 26 30 30 3a ed 3a ed |%,X%,Y%)|=&00:.:.|
|00000400| 3a f1 22 2e 22 3b 3a ed | 3a db 0d 01 ae 04 0d 01 |:.".";:.|:.......|
|00000410| b8 13 f4 20 2a 20 52 65 | 61 64 20 44 61 74 61 20 |... * Re|ad Data |
|00000420| 2a 0d 01 c2 04 0d 01 cc | 1d 43 4f 4c 25 3d 26 46 |*.......|.COL%=&F|
|00000430| 46 46 46 46 46 30 30 20 | 3a 20 f4 20 43 6f 6c 6f |FFFFF00 |: . Colo|
|00000440| 75 72 0d 01 d6 28 6e 75 | 6d 6f 70 74 25 3d 31 20 |ur...(nu|mopt%=1 |
|00000450| 20 20 20 20 20 3a 20 f4 | 20 4e 75 6d 62 65 72 20 | : .| Number |
|00000460| 6f 66 20 6f 70 74 69 6f | 6e 73 0d 01 e0 31 50 53 |of optio|ns...1PS|
|00000470| 25 3d 30 20 20 20 20 20 | 20 20 20 20 20 3a 20 f4 |%=0 | : .|
|00000480| 20 50 6f 73 69 74 69 6f | 6e 20 69 6e 20 63 68 61 | Positio|n in cha|
|00000490| 72 61 63 74 65 72 20 64 | 61 74 61 0d 01 ea 04 0d |racter d|ata.....|
|000004a0| 01 f4 20 f4 20 2a 20 52 | 65 64 65 66 69 6e 65 20 |.. . * R|edefine |
|000004b0| 63 68 61 72 61 63 74 65 | 72 20 32 35 35 20 2a 0d |characte|r 255 *.|
|000004c0| 01 fe 04 0d 02 08 2c ef | 20 32 33 2c 32 35 35 2c |......,.| 23,255,|
|000004d0| 26 46 46 2c 26 38 31 2c | 26 38 31 2c 26 38 31 2c |&FF,&81,|&81,&81,|
|000004e0| 26 38 31 2c 26 38 31 2c | 26 38 31 2c 26 46 46 0d |&81,&81,|&81,&FF.|
|000004f0| 02 12 04 0d 02 1c 05 f5 | 0d 02 26 1d 20 20 20 20 |........|..&. |
|00000500| 20 20 f3 20 6f 70 74 69 | 6f 6e 73 24 28 6e 75 6d | . opti|ons$(num|
|00000510| 6f 70 74 25 29 0d 02 30 | 2d 20 20 20 20 20 20 e7 |opt%)..0|- .|
|00000520| 20 6f 70 74 69 6f 6e 73 | 24 28 6e 75 6d 6f 70 74 | options|$(numopt|
|00000530| 25 29 3c 3e 22 2a 22 8c | 6e 75 6d 6f 70 74 25 2b |%)<>"*".|numopt%+|
|00000540| 3d 31 0d 02 3a 1b fd 20 | 6f 70 74 69 6f 6e 73 24 |=1..:.. |options$|
|00000550| 28 6e 75 6d 6f 70 74 25 | 29 3d 22 2a 22 0d 02 44 |(numopt%|)="*"..D|
|00000560| 04 0d 02 4e 14 fb 31 32 | 38 c8 9c 30 3a fb 31 33 |...N..12|8..0:.13|
|00000570| c8 9c 31 39 32 0d 02 58 | 0f f1 8a 30 2c 31 36 29 |..192..X|...0,16)|
|00000580| 22 58 3a 22 0d 02 62 0f | f1 8a 36 2c 31 36 29 22 |"X:"..b.|..6,16)"|
|00000590| 59 3a 22 0d 02 6c 12 f1 | 8a 31 31 2c 31 36 29 22 |Y:"..l..|.11,16)"|
|000005a0| 43 4f 4c 3a 22 0d 02 76 | 10 f1 8a 31 37 2c 31 36 |COL:"..v|...17,16|
|000005b0| 29 22 49 3a 22 0d 02 80 | 04 0d 02 8a 18 f4 20 2a |)"I:"...|...... *|
|000005c0| 20 44 69 73 70 6c 61 79 | 20 63 6f 6c 6f 75 72 20 | Display| colour |
|000005d0| 2a 0d 02 94 04 0d 02 9e | 2c c8 99 22 43 6f 6c 6f |*.......|,.."Colo|
|000005e0| 75 72 54 72 61 6e 73 5f | 53 65 74 54 65 78 74 43 |urTrans_|SetTextC|
|000005f0| 6f 6c 6f 75 72 22 2c 43 | 4f 4c 25 2c 2c 2c 31 32 |olour",C|OL%,,,12|
|00000600| 38 0d 02 a8 0f f1 8a 31 | 35 2c 31 36 29 22 20 22 |8......1|5,16)" "|
|00000610| 0d 02 b2 04 0d 02 bc 13 | f2 44 69 73 70 6c 61 79 |........|.Display|
|00000620| 43 6f 6c 6f 75 72 73 0d | 02 c6 19 f2 44 69 73 70 |Colours.|....Disp|
|00000630| 6c 61 79 47 72 69 64 28 | 43 58 25 2c 43 59 25 29 |layGrid(|CX%,CY%)|
|00000640| 0d 02 d0 1c f2 44 69 73 | 70 6c 61 79 4f 70 74 69 |.....Dis|playOpti|
|00000650| 6f 6e 73 28 6e 75 6d 6f | 70 74 25 29 0d 02 da 15 |ons(numo|pt%)....|
|00000660| f2 44 69 73 70 6c 61 79 | 44 61 74 61 28 50 53 25 |.Display|Data(PS%|
|00000670| 29 0d 02 e4 19 f2 44 69 | 73 70 6c 61 79 41 74 53 |).....Di|splayAtS|
|00000680| 63 72 65 65 6e 28 50 53 | 25 29 0d 02 ee 08 c8 97 |creen(PS|%)......|
|00000690| 20 ee 0d 02 f8 05 f5 0d | 03 02 45 20 20 20 20 20 | .......|..E |
|000006a0| 20 f2 4d 65 73 73 61 67 | 65 28 22 55 73 65 20 6c | .Messag|e("Use l|
|000006b0| 65 66 74 20 62 75 74 74 | 6f 6e 20 74 6f 20 70 6c |eft butt|on to pl|
|000006c0| 61 63 65 20 63 75 72 72 | 65 6e 74 20 63 6f 6c 6f |ace curr|ent colo|
|000006d0| 75 72 20 6f 72 20 74 6f | 22 2c 30 29 0d 03 0c 3f |ur or to|",0)...?|
|000006e0| 20 20 20 20 20 20 f2 4d | 65 73 73 61 67 65 28 22 | .M|essage("|
|000006f0| 73 65 6c 65 63 74 20 6e | 65 77 20 63 6f 6c 6f 72 |select n|ew color|
|00000700| 2c 20 72 69 67 68 74 20 | 74 6f 20 72 65 6d 6f 76 |, right |to remov|
|00000710| 65 20 70 69 78 65 6c 22 | 2c 31 29 0d 03 16 0b 20 |e pixel"|,1).... |
|00000720| 20 20 20 20 20 f5 0d 03 | 20 1a 20 20 20 20 20 20 | ...| . |
|00000730| 20 20 20 20 20 20 c8 97 | 58 25 2c 59 25 2c 5a 25 | ..|X%,Y%,Z%|
|00000740| 0d 03 2a 04 0d 03 34 4f | 20 20 20 20 20 20 20 20 |..*...4O| |
|00000750| 20 20 20 20 41 43 54 58 | 25 3d 28 58 25 3e 3e 35 | ACTX|%=(X%>>5|
|00000760| 29 3a 41 43 54 59 25 3d | 33 31 2d 28 59 25 3e 3e |):ACTY%=|31-(Y%>>|
|00000770| 35 29 20 3a 20 f4 20 43 | 6f 6e 76 65 72 74 20 6d |5) : . C|onvert m|
|00000780| 6f 75 73 65 20 63 6f 6f | 72 64 73 20 74 6f 20 58 |ouse coo|rds to X|
|00000790| 2c 20 59 0d 03 3e 18 20 | 20 20 20 20 20 20 20 20 |, Y..>. | |
|000007a0| 20 20 20 fb 36 33 c8 9c | 31 39 32 0d 03 48 2d 20 | .63..|192..H- |
|000007b0| 20 20 20 20 20 20 20 20 | 20 20 20 f1 8a 32 2c 31 | | ..2,1|
|000007c0| 36 29 c2 22 30 30 30 22 | 2b c1 c3 28 41 43 54 58 |6)."000"|+..(ACTX|
|000007d0| 25 29 2c 31 29 2c 33 29 | 0d 03 52 2d 20 20 20 20 |%),1),3)|..R- |
|000007e0| 20 20 20 20 20 20 20 20 | f1 8a 38 2c 31 36 29 c2 | |..8,16).|
|000007f0| 22 30 30 30 22 2b c1 c3 | 28 41 43 54 59 25 29 2c |"000"+..|(ACTY%),|
|00000800| 31 29 2c 33 29 0d 03 5c | 04 0d 03 66 2d 20 20 20 |1),3)..\|...f- |
|00000810| 20 20 20 20 20 20 20 20 | 20 f4 20 2a 20 43 68 65 | | . * Che|
|00000820| 63 6b 20 74 6f 20 73 65 | 65 20 69 66 20 69 6e 20 |ck to se|e if in |
|00000830| 61 72 65 61 20 2a 0d 03 | 70 04 0d 03 7a 1d 20 20 |area *..|p...z. |
|00000840| 20 20 20 20 20 20 20 20 | 20 20 e7 20 41 43 54 59 | | . ACTY|
|00000850| 25 3c 43 59 25 20 8c 0d | 03 84 1f 20 20 20 20 20 |%<CY% ..|... |
|00000860| 20 20 20 20 20 20 20 20 | 20 e7 20 41 43 54 58 25 | | . ACTX%|
|00000870| 3c 43 58 25 20 8c 0d 03 | 8e 1b 20 20 20 20 20 20 |<CX% ...|.. |
|00000880| 20 20 20 20 20 20 20 20 | 20 20 c8 8e 20 5a 25 20 | | .. Z% |
|00000890| ca 0d 03 98 35 20 20 20 | 20 20 20 20 20 20 20 20 |....5 | |
|000008a0| 20 20 20 20 20 20 20 20 | 20 c9 20 34 3a f4 20 4c | | . 4:. L|
|000008b0| 65 66 74 20 6d 6f 75 73 | 65 20 62 75 74 74 6f 6e |eft mous|e button|
|000008c0| 20 2d 20 41 64 64 0d 03 | a2 30 20 20 20 20 20 20 | - Add..|.0 |
|000008d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000008e0| 20 20 f2 50 6c 6f 74 28 | 41 43 54 58 25 2c 41 43 | .Plot(|ACTX%,AC|
|000008f0| 54 59 25 2c b9 29 0d 03 | ac 35 20 20 20 20 20 20 |TY%,.)..|.5 |
|00000900| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 c9 20 | | . |
|00000910| 32 3a f4 20 4d 69 64 64 | 6c 65 20 62 75 74 74 6f |2:. Midd|le butto|
|00000920| 6e 20 2d 20 4f 70 74 69 | 6f 6e 73 0d 03 b6 24 20 |n - Opti|ons...$ |
|00000930| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000940| 20 20 20 20 20 20 20 f2 | 4f 70 74 69 6f 6e 73 0d | .|Options.|
|00000950| 03 c0 29 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..) | |
|00000960| 20 20 20 20 20 20 20 20 | 20 20 20 f2 43 6c 65 61 | | .Clea|
|00000970| 72 4d 65 73 73 61 67 65 | 0d 03 ca 39 20 20 20 20 |rMessage|...9 |
|00000980| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000990| c9 20 31 3a f4 20 52 69 | 67 68 74 20 6d 6f 75 73 |. 1:. Ri|ght mous|
|000009a0| 65 20 62 75 74 74 6f 6e | 20 2d 20 52 65 6d 6f 76 |e button| - Remov|
|000009b0| 65 0d 03 d4 30 20 20 20 | 20 20 20 20 20 20 20 20 |e...0 | |
|000009c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 f2 50 6c | | .Pl|
|000009d0| 6f 74 28 41 43 54 58 25 | 2c 41 43 54 59 25 2c a3 |ot(ACTX%|,ACTY%,.|
|000009e0| 29 0d 03 de 15 20 20 20 | 20 20 20 20 20 20 20 20 |).... | |
|000009f0| 20 20 20 20 20 cb 0d 03 | e8 13 20 20 20 20 20 20 | ...|.. |
|00000a00| 20 20 20 20 20 20 20 20 | cd 0d 03 f2 11 20 20 20 | |..... |
|00000a10| 20 20 20 20 20 20 20 20 | 20 cc 0d 03 fc 32 20 20 | | ....2 |
|00000a20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 f4 20 | | . |
|00000a30| 2a 20 49 6e 20 63 6f 6c | 6f 75 72 20 73 65 6c 65 |* In col|our sele|
|00000a40| 63 74 69 6f 6e 20 61 72 | 65 61 20 2a 0d 04 06 04 |ction ar|ea *....|
|00000a50| 0d 04 10 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |... | |
|00000a60| 20 20 20 20 e7 20 41 43 | 54 59 25 3e 31 37 20 8c | . AC|TY%>17 .|
|00000a70| 0d 04 1a 35 20 20 20 20 | 20 20 20 20 20 20 20 20 |...5 | |
|00000a80| 20 20 20 20 20 20 e7 20 | 28 41 43 54 59 25 3d 32 | . |(ACTY%=2|
|00000a90| 34 80 41 43 54 58 25 3e | 31 35 29 84 41 43 54 59 |4.ACTX%>|15).ACTY|
|00000aa0| 25 3e 32 34 8c 0d 04 24 | 29 20 20 20 20 20 20 20 |%>24...$|) |
|00000ab0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 41 43 54 | | ACT|
|00000ac0| 59 25 3d 32 34 3a 41 43 | 54 58 25 3d 31 35 0d 04 |Y%=24:AC|TX%=15..|
|00000ad0| 2e 17 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.. | |
|00000ae0| 20 20 20 20 cd 0d 04 38 | 04 0d 04 42 28 20 20 20 | ...8|...B( |
|00000af0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 59 | | Y|
|00000b00| 25 3d 28 41 43 54 59 25 | 2d 31 38 29 2a 34 30 2a |%=(ACTY%|-18)*40*|
|00000b10| 34 0d 04 4c 20 20 20 20 | 20 20 20 20 20 20 20 20 |4..L | |
|00000b20| 20 20 20 20 20 20 20 58 | 25 3d 41 43 54 58 25 2a | X|%=ACTX%*|
|00000b30| 34 0d 04 56 04 0d 04 60 | 1d 20 20 20 20 20 20 20 |4..V...`|. |
|00000b40| 20 20 20 20 20 20 20 20 | 20 20 20 c8 8e 20 5a 25 | | .. Z%|
|00000b50| 20 ca 0d 04 6a 2f 20 20 | 20 20 20 20 20 20 20 20 | ...j/ | |
|00000b60| 20 20 20 20 20 20 20 20 | 20 20 20 20 c9 20 34 3a | | . 4:|
|00000b70| f4 20 50 69 63 6b 20 6e | 65 77 20 63 6f 6c 6f 75 |. Pick n|ew colou|
|00000b80| 72 0d 04 74 04 0d 04 7e | 34 20 20 20 20 20 20 20 |r..t...~|4 |
|00000b90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000ba0| 20 20 20 43 4f 4c 25 3d | 21 28 70 61 6c 65 74 74 | COL%=|!(palett|
|00000bb0| 65 25 2b 59 25 2b 58 25 | 29 0d 04 88 46 20 20 20 |e%+Y%+X%|)...F |
|00000bc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000bd0| 20 20 20 20 20 20 20 c8 | 99 22 43 6f 6c 6f 75 72 | .|."Colour|
|00000be0| 54 72 61 6e 73 5f 53 65 | 74 54 65 78 74 43 6f 6c |Trans_Se|tTextCol|
|00000bf0| 6f 75 72 22 2c 43 4f 4c | 25 2c 2c 2c 31 32 38 0d |our",COL|%,,,128.|
|00000c00| 04 92 29 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..) | |
|00000c10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 f1 8a 31 | | ..1|
|00000c20| 35 2c 31 36 29 22 20 22 | 0d 04 9c 16 20 20 20 20 |5,16)" "|.... |
|00000c30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 cb 0d 04 | | ...|
|00000c40| a6 14 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.. | |
|00000c50| 20 cd 0d 04 b0 12 20 20 | 20 20 20 20 20 20 20 20 | ..... | |
|00000c60| 20 20 20 cd 0d 04 ba 04 | 0d 04 c4 25 20 20 20 20 | .....|...% |
|00000c70| 20 20 20 20 20 20 20 20 | 20 f4 20 2a 20 4e 6f 77 | | . * Now|
|00000c80| 20 63 68 65 63 6b 20 6b | 65 79 73 20 2a 0d 04 ce | check k|eys *...|
|00000c90| 04 0d 04 d8 2a 20 20 20 | 20 20 20 20 20 20 20 20 |....* | |
|00000ca0| 20 20 c8 99 22 4f 53 5f | 42 79 74 65 22 2c 31 32 | .."OS_|Byte",12|
|00000cb0| 32 20 b8 20 52 30 2c 6b | 65 79 25 0d 04 e2 04 0d |2 . R0,k|ey%.....|
|00000cc0| 04 ec 1a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |... | |
|00000cd0| c8 8e 20 6b 65 79 25 20 | ca 0d 04 f6 2a 20 20 20 |.. key% |....* |
|00000ce0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 c9 20 | | . |
|00000cf0| 35 38 3a f4 20 4e 65 78 | 74 20 63 68 61 72 61 63 |58:. Nex|t charac|
|00000d00| 74 65 72 0d 05 00 2b 20 | 20 20 20 20 20 20 20 20 |ter...+ | |
|00000d10| 20 20 20 20 20 20 20 20 | 20 20 20 20 f2 55 70 64 | | .Upd|
|00000d20| 61 74 65 43 75 72 72 65 | 6e 74 28 2b 31 29 0d 05 |ateCurre|nt(+1)..|
|00000d30| 0a 2e 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.. | |
|00000d40| 20 20 20 c9 20 35 39 3a | f4 20 50 72 65 76 69 6f | . 59:|. Previo|
|00000d50| 75 73 20 63 68 61 72 61 | 63 74 65 72 0d 05 14 2b |us chara|cter...+|
|00000d60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000d70| 20 20 20 20 20 f2 55 70 | 64 61 74 65 43 75 72 72 | .Up|dateCurr|
|00000d80| 65 6e 74 28 2d 31 29 0d | 05 1e 12 20 20 20 20 20 |ent(-1).|... |
|00000d90| 20 20 20 20 20 20 20 20 | cb 0d 05 28 11 20 20 20 | |...(. |
|00000da0| 20 20 20 fd 20 5a 25 3c | 3e 30 0d 05 32 07 fd 20 | . Z%<|>0..2.. |
|00000db0| a3 0d 05 3c 05 e0 0d 05 | 46 04 0d 05 50 22 f4 20 |...<....|F...P". |
|00000dc0| 2a 20 55 70 64 61 74 65 | 20 63 75 72 72 65 6e 74 |* Update| current|
|00000dd0| 20 63 68 61 72 61 63 74 | 65 72 20 2a 0d 05 5a 04 | charact|er *..Z.|
|00000de0| 0d 05 64 19 dd f2 55 70 | 64 61 74 65 43 75 72 72 |..d...Up|dateCurr|
|00000df0| 65 6e 74 28 64 69 72 25 | 29 0d 05 6e 10 20 20 20 |ent(dir%|)..n. |
|00000e00| 50 53 25 2b 3d 64 69 72 | 25 0d 05 78 10 20 20 20 |PS%+=dir|%..x. |
|00000e10| e7 20 50 53 25 3c 30 20 | 8c 0d 05 82 0e 20 20 20 |. PS%<0 |..... |
|00000e20| 20 20 50 53 25 3d 30 0d | 05 8c 08 20 20 20 cc 0d | PS%=0.|... ..|
|00000e30| 05 96 1b 20 20 20 20 20 | 20 20 e7 20 50 53 25 3e |... | . PS%>|
|00000e40| 4d 41 58 53 49 5a 45 25 | 20 8c 0d 05 a0 19 20 20 |MAXSIZE%| ..... |
|00000e50| 20 20 20 20 20 20 20 50 | 53 25 3d 4d 41 58 53 49 | P|S%=MAXSI|
|00000e60| 5a 45 25 0d 05 aa 0c 20 | 20 20 20 20 20 20 cd 0d |ZE%.... | ..|
|00000e70| 05 b4 08 20 20 20 cd 0d | 05 be 18 20 20 20 f2 44 |... ..|... .D|
|00000e80| 69 73 70 6c 61 79 44 61 | 74 61 28 50 53 25 29 0d |isplayDa|ta(PS%).|
|00000e90| 05 c8 1c 20 20 20 f2 44 | 69 73 70 6c 61 79 41 74 |... .D|isplayAt|
|00000ea0| 53 63 72 65 65 6e 28 50 | 53 25 29 0d 05 d2 05 e1 |Screen(P|S%).....|
|00000eb0| 0d 05 dc 04 0d 05 e6 1a | f4 20 2a 20 44 69 73 70 |........|. * Disp|
|00000ec0| 6c 61 79 20 6d 65 73 73 | 61 67 65 73 20 2a 0d 05 |lay mess|ages *..|
|00000ed0| f0 04 0d 05 fa 17 dd f2 | 4d 65 73 73 61 67 65 28 |........|Message(|
|00000ee0| 74 65 78 74 24 2c 4c 25 | 29 0d 06 04 08 ea 20 54 |text$,L%|)..... T|
|00000ef0| 24 0d 06 0e 04 0d 06 18 | 18 20 20 20 54 24 3d 74 |$.......|. T$=t|
|00000f00| 65 78 74 24 2b c4 34 30 | 2c 22 20 22 29 0d 06 22 |ext$+.40|," ").."|
|00000f10| 17 20 20 20 fb 31 32 38 | c8 9c 30 3a fb 33 30 c8 |. .128|..0:.30.|
|00000f20| 9c 31 39 32 0d 06 2c 19 | 20 20 20 f1 8a 30 2c 33 |.192..,.| ..0,3|
|00000f30| 30 2b 4c 25 29 c0 54 24 | 2c 34 30 29 3b 0d 06 36 |0+L%).T$|,40);..6|
|00000f40| 05 e1 0d 06 40 04 0d 06 | 4a 12 dd f2 43 6c 65 61 |....@...|J...Clea|
|00000f50| 72 4d 65 73 73 61 67 65 | 0d 06 54 0b ea 20 6c 6f |rMessage|..T.. lo|
|00000f60| 6f 70 25 0d 06 5e 04 0d | 06 68 14 20 20 20 fb 31 |op%..^..|.h. .1|
|00000f70| 32 38 c8 9c 30 3a fb 30 | c8 9c 30 0d 06 72 29 20 |28..0:.0|..0..r) |
|00000f80| 20 20 e3 6c 6f 6f 70 25 | 3d 33 30 b8 33 31 3a f1 | .loop%|=30.31:.|
|00000f90| 8a 30 2c 6c 6f 6f 70 25 | 29 c4 33 39 2c 22 20 22 |.0,loop%|).39," "|
|00000fa0| 29 3b 3a ed 0d 06 7c 05 | e1 0d 06 86 04 0d 06 90 |);:...|.|........|
|00000fb0| 11 f4 20 2a 20 4f 70 74 | 69 6f 6e 73 20 2a 0d 06 |.. * Opt|ions *..|
|00000fc0| 9a 04 0d 06 a4 0d dd f2 | 4f 70 74 69 6f 6e 73 0d |........|Options.|
|00000fd0| 06 ae 0e ea 20 41 24 2c | 6c 6f 6f 70 25 0d 06 b8 |.... A$,|loop%...|
|00000fe0| 04 0d 06 c2 08 20 20 20 | f5 0d 06 cc 35 20 20 20 |..... |....5 |
|00000ff0| 20 20 20 20 20 20 f2 4d | 65 73 73 61 67 65 28 22 | .M|essage("|
|00001000| 50 6c 65 61 73 65 20 73 | 65 6c 65 63 74 20 61 6e |Please s|elect an|
|00001010| 20 6f 70 74 69 6f 6e 20 | 6f 72 22 2c 30 29 0d 06 | option |or",0)..|
|00001020| d6 2f 20 20 20 20 20 20 | 20 20 20 f2 4d 65 73 73 |./ | .Mess|
|00001030| 61 67 65 28 22 70 72 65 | 73 73 20 52 45 54 55 52 |age("pre|ss RETUR|
|00001040| 4e 20 74 6f 20 65 78 69 | 74 22 2c 31 29 0d 06 e0 |N to exi|t",1)...|
|00001050| 1d 20 20 20 20 20 20 20 | 20 20 c8 99 22 4f 53 5f |. | .."OS_|
|00001060| 42 79 74 65 22 2c 31 35 | 2c 30 0d 06 ea 0e 20 20 |Byte",15|,0.... |
|00001070| 20 20 20 20 20 20 20 f5 | 0d 06 f4 17 20 20 20 20 | .|.... |
|00001080| 20 20 20 20 20 20 20 20 | 20 20 20 41 24 3d be 0d | | A$=..|
|00001090| 06 fe 37 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |..7 | |
|000010a0| 20 20 e7 20 41 24 3e 3d | 22 61 22 20 80 20 41 24 | . A$>=|"a" . A$|
|000010b0| 3c 3d 22 7a 22 20 8c 20 | 41 24 3d bd 28 97 28 41 |<="z" . |A$=.(.(A|
|000010c0| 24 29 2d 33 32 29 0d 07 | 08 35 20 20 20 20 20 20 |$)-32)..|.5 |
|000010d0| 20 20 20 fd 20 28 41 24 | 3e 3d 22 41 22 20 80 20 | . (A$|>="A" . |
|000010e0| 41 24 3c 3d bd 28 36 35 | 2b 6e 75 6d 6f 70 74 25 |A$<=.(65|+numopt%|
|000010f0| 29 29 20 84 20 41 24 3d | bd 31 33 0d 07 12 1c 20 |)) . A$=|.13.... |
|00001100| 20 20 20 20 20 20 20 20 | f2 4d 65 73 73 61 67 65 | |.Message|
|00001110| 28 22 20 22 2c 30 29 0d | 07 1c 1c 20 20 20 20 20 |(" ",0).|... |
|00001120| 20 20 20 20 f2 4d 65 73 | 73 61 67 65 28 22 20 22 | .Mes|sage(" "|
|00001130| 2c 31 29 0d 07 26 14 20 | 20 20 20 20 20 20 20 20 |,1)..&. | |
|00001140| c8 8e 20 41 24 20 ca 0d | 07 30 1d 20 20 20 20 20 |.. A$ ..|.0. |
|00001150| 20 20 20 20 20 20 20 20 | c9 20 22 41 22 3a f4 20 | |. "A":. |
|00001160| 51 75 69 74 0d 07 3a 16 | 20 20 20 20 20 20 20 20 |Quit..:.| |
|00001170| 20 20 20 20 20 20 20 20 | 20 e0 0d 07 44 1f 20 20 | | ...D. |
|00001180| 20 20 20 20 20 20 20 20 | 20 20 20 c9 20 22 42 22 | | . "B"|
|00001190| 3a f4 20 53 61 76 65 20 | 31 0d 07 4e 1b 20 20 20 |:. Save |1..N. |
|000011a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 f2 53 | | .S|
|000011b0| 61 76 65 31 0d 07 58 1f | 20 20 20 20 20 20 20 20 |ave1..X.| |
|000011c0| 20 20 20 20 20 c9 20 22 | 43 22 3a f4 20 4c 6f 61 | . "|C":. Loa|
|000011d0| 64 20 31 0d 07 62 1b 20 | 20 20 20 20 20 20 20 20 |d 1..b. | |
|000011e0| 20 20 20 20 20 20 20 20 | f2 4c 6f 61 64 31 0d 07 | |.Load1..|
|000011f0| 6c 21 20 20 20 20 20 20 | 20 20 20 20 20 20 20 c9 |l! | .|
|00001200| 20 22 44 22 3a f4 20 53 | 61 76 65 20 61 6c 6c 0d | "D":. S|ave all.|
|00001210| 07 76 1d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.v. | |
|00001220| 20 20 20 20 f2 53 61 76 | 65 41 6c 6c 0d 07 80 21 | .Sav|eAll...!|
|00001230| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 c9 20 22 | | . "|
|00001240| 45 22 3a f4 20 4c 6f 61 | 64 20 61 6c 6c 0d 07 8a |E":. Loa|d all...|
|00001250| 1d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00001260| 20 20 f2 4c 6f 61 64 41 | 6c 6c 0d 07 94 21 20 20 | .LoadA|ll...! |
|00001270| 20 20 20 20 20 20 20 20 | 20 20 20 c9 20 22 46 22 | | . "F"|
|00001280| 3a f4 20 47 65 74 20 63 | 68 61 72 0d 07 9e 1b 20 |:. Get c|har.... |
|00001290| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000012a0| f2 47 65 74 43 48 0d 07 | a8 1e 20 20 20 20 20 20 |.GetCH..|.. |
|000012b0| 20 20 20 20 20 20 20 c9 | 20 22 47 22 3a f4 20 31 | .| "G":. 1|
|000012c0| 36 2a 31 36 0d 07 b2 22 | 20 20 20 20 20 20 20 20 |6*16..."| |
|000012d0| 20 20 20 20 20 20 20 20 | 20 43 58 25 3d 31 36 3a | | CX%=16:|
|000012e0| 43 59 25 3d 31 36 0d 07 | bc 26 20 20 20 20 20 20 |CY%=16..|.& |
|000012f0| 20 20 20 20 20 20 20 20 | 20 20 20 f2 44 69 73 70 | | .Disp|
|00001300| 6c 61 79 44 61 74 61 28 | 50 53 25 29 0d 07 c6 04 |layData(|PS%)....|
|00001310| 0d 07 d0 1c 20 20 20 20 | 20 20 20 20 20 20 20 20 |.... | |
|00001320| 20 c9 20 22 48 22 3a f4 | 20 38 2a 38 0d 07 da 24 | . "H":.| 8*8...$|
|00001330| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001340| 20 e3 20 6c 6f 6f 70 25 | 3d 30 b8 43 59 25 2d 31 | . loop%|=0.CY%-1|
|00001350| 0d 07 e4 2b 20 20 20 20 | 20 20 20 20 20 20 20 20 |...+ | |
|00001360| 20 20 20 20 20 20 20 20 | f1 8a 30 2c 6c 6f 6f 70 | |..0,loop|
|00001370| 25 29 c4 43 58 25 2c 22 | 20 22 29 0d 07 ee 16 20 |%).CX%,"| ").... |
|00001380| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001390| ed 0d 07 f8 20 20 20 20 | 20 20 20 20 20 20 20 20 |.... | |
|000013a0| 20 20 20 20 20 20 43 58 | 25 3d 38 3a 43 59 25 3d | CX|%=8:CY%=|
|000013b0| 38 0d 08 02 26 20 20 20 | 20 20 20 20 20 20 20 20 |8...& | |
|000013c0| 20 20 20 20 20 20 f2 44 | 69 73 70 6c 61 79 44 61 | .D|isplayDa|
|000013d0| 74 61 28 50 53 25 29 0d | 08 0c 04 0d 08 16 0d 20 |ta(PS%).|....... |
|000013e0| 20 20 20 20 20 20 20 cb | 0d 08 20 0e 20 20 20 fd | .|.. . .|
|000013f0| 41 24 3d bd 31 33 0d 08 | 2a 05 e1 0d 08 34 04 0d |A$=.13..|*....4..|
|00001400| 08 3e 12 f4 20 2a 20 47 | 65 74 20 63 68 61 72 20 |.>.. * G|et char |
|00001410| 2a 0d 08 48 04 0d 08 52 | 0b dd f2 47 65 74 43 48 |*..H...R|...GetCH|
|00001420| 0d 08 5c 08 ea 20 41 24 | 0d 08 66 04 0d 08 70 17 |..\.. A$|..f...p.|
|00001430| 20 20 20 c8 99 22 4f 53 | 5f 42 79 74 65 22 2c 31 | .."OS|_Byte",1|
|00001440| 35 2c 30 0d 08 7a 04 0d | 08 84 17 20 20 20 fb 31 |5,0..z..|... .1|
|00001450| 32 c8 9c 31 39 32 3a fb | 31 32 38 c8 9c 30 0d 08 |2..192:.|128..0..|
|00001460| 8e 38 20 20 20 f1 8a 30 | 2c 33 30 29 22 45 6e 74 |.8 ..0|,30)"Ent|
|00001470| 65 72 20 63 68 61 72 61 | 63 74 65 72 20 74 68 61 |er chara|cter tha|
|00001480| 74 20 79 6f 75 20 77 61 | 6e 74 20 74 6f 20 67 65 |t you wa|nt to ge|
|00001490| 74 20 3a 20 22 3b 0d 08 | 98 04 0d 08 a2 0b 20 20 |t : ";..|...... |
|000014a0| 20 41 24 3d be 0d 08 ac | 0b 20 20 20 f1 20 41 24 | A$=....|. . A$|
|000014b0| 0d 08 b6 04 0d 08 c0 10 | 20 20 20 3f 28 61 25 29 |........| ?(a%)|
|000014c0| 3d 97 41 24 0d 08 ca 18 | 20 20 20 c8 99 22 4f 53 |=.A$....| .."OS|
|000014d0| 5f 57 6f 72 64 22 2c 31 | 30 2c 61 25 0d 08 d4 04 |_Word",1|0,a%....|
|000014e0| 0d 08 de 14 20 20 20 e3 | 20 6c 6f 6f 70 25 3d 30 |.... .| loop%=0|
|000014f0| 20 b8 20 37 0d 08 e8 1a | 20 20 20 20 20 20 54 25 | . 7....| T%|
|00001500| 3d 3f 28 61 25 2b 6c 6f | 6f 70 25 2b 31 29 0d 08 |=?(a%+lo|op%+1)..|
|00001510| f2 29 20 20 20 20 20 20 | c8 99 22 4f 53 5f 43 6f |.) |.."OS_Co|
|00001520| 6e 76 65 72 74 42 69 6e | 61 72 79 31 22 2c 54 25 |nvertBin|ary1",T%|
|00001530| 2c 62 69 6e 25 2c 39 0d | 08 fc 04 0d 09 06 12 20 |,bin%,9.|....... |
|00001540| 20 20 20 20 20 e3 20 58 | 25 3d 30 b8 37 0d 09 10 | . X|%=0.7...|
|00001550| 17 20 20 20 20 20 20 20 | 20 20 e7 20 43 58 25 3d |. | . CX%=|
|00001560| 31 36 20 8c 0d 09 1a 27 | 20 20 20 20 20 20 20 20 |16 ....'| |
|00001570| 20 20 20 3f 28 65 78 25 | 2b 28 58 25 2a 32 29 29 | ?(ex%|+(X%*2))|
|00001580| 3d 3f 28 62 69 6e 25 2b | 58 25 29 0d 09 24 29 20 |=?(bin%+|X%)..$) |
|00001590| 20 20 20 20 20 20 20 20 | 20 20 3f 28 65 78 25 2b | | ?(ex%+|
|000015a0| 28 58 25 2a 32 29 2b 31 | 29 3d 3f 28 62 69 6e 25 |(X%*2)+1|)=?(bin%|
|000015b0| 2b 58 25 29 0d 09 2e 0e | 20 20 20 20 20 20 20 20 |+X%)....| |
|000015c0| 20 cc 0d 09 38 25 20 20 | 20 20 20 20 20 20 20 20 | ...8% | |
|000015d0| 20 20 20 3f 28 65 78 25 | 2b 58 25 29 3d 3f 28 62 | ?(ex%|+X%)=?(b|
|000015e0| 69 6e 25 2b 58 25 29 0d | 09 42 0e 20 20 20 20 20 |in%+X%).|.B. |
|000015f0| 20 20 20 20 cd 0d 09 4c | 0b 20 20 20 20 20 20 ed | ...L|. .|
|00001600| 0d 09 56 04 0d 09 60 2b | 20 20 20 20 20 20 f4 20 |..V...`+| . |
|00001610| 2a 20 4e 6f 77 20 63 6f | 6e 76 65 72 74 20 74 6f |* Now co|nvert to|
|00001620| 20 63 75 72 72 65 6e 74 | 20 63 6f 6c 6f 75 72 0d | current| colour.|
|00001630| 09 6a 04 0d 09 74 18 20 | 20 20 20 20 20 e3 20 58 |.j...t. | . X|
|00001640| 25 3d 30 20 b8 20 43 58 | 25 2d 31 0d 09 7e 1e 20 |%=0 . CX|%-1..~. |
|00001650| 20 20 20 20 20 20 20 20 | 54 25 3d 3f 28 65 78 25 | |T%=?(ex%|
|00001660| 2b 58 25 29 2d 97 22 30 | 22 0d 09 88 15 20 20 20 |+X%)-."0|".... |
|00001670| 20 20 20 20 20 20 e7 20 | 54 25 3e 30 20 8c 0d 09 | . |T%>0 ...|
|00001680| 92 19 20 20 20 20 20 20 | 20 20 20 20 20 e7 20 43 |.. | . C|
|00001690| 59 25 3d 31 36 20 8c 0d | 09 9c 26 20 20 20 20 20 |Y%=16 ..|..& |
|000016a0| 20 20 20 20 20 20 20 20 | f2 50 6c 6f 74 28 58 25 | |.Plot(X%|
|000016b0| 2c 28 6c 6f 6f 70 25 2a | 32 29 2c b9 29 0d 09 a6 |,(loop%*|2),.)...|
|000016c0| 28 20 20 20 20 20 20 20 | 20 20 20 20 20 20 f2 50 |( | .P|
|000016d0| 6c 6f 74 28 58 25 2c 28 | 6c 6f 6f 70 25 2a 32 29 |lot(X%,(|loop%*2)|
|000016e0| 2b 31 2c b9 29 0d 09 b0 | 10 20 20 20 20 20 20 20 |+1,.)...|. |
|000016f0| 20 20 20 20 cc 0d 09 ba | 24 20 20 20 20 20 20 20 | ....|$ |
|00001700| 20 20 20 20 20 20 20 20 | f2 50 6c 6f 74 28 58 25 | |.Plot(X%|
|00001710| 2c 6c 6f 6f 70 25 2c b9 | 29 0d 09 c4 10 20 20 20 |,loop%,.|).... |
|00001720| 20 20 20 20 20 20 20 20 | cd 0d 09 ce 0e 20 20 20 | |..... |
|00001730| 20 20 20 20 20 20 cc 0d | 09 d8 1b 20 20 20 20 20 | ..|... |
|00001740| 20 20 20 20 20 20 20 20 | e7 20 43 59 25 3d 31 36 | |. CY%=16|
|00001750| 20 8c 0d 09 e2 28 20 20 | 20 20 20 20 20 20 20 20 | ....( | |
|00001760| 20 20 20 20 20 f2 50 6c | 6f 74 28 58 25 2c 28 6c | .Pl|ot(X%,(l|
|00001770| 6f 6f 70 25 2a 32 29 2c | a3 29 0d 09 ec 2a 20 20 |oop%*2),|.)...* |
|00001780| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 f2 50 6c | | .Pl|
|00001790| 6f 74 28 58 25 2c 28 6c | 6f 6f 70 25 2a 32 29 2b |ot(X%,(l|oop%*2)+|
|000017a0| 31 2c a3 29 0d 09 f6 12 | 20 20 20 20 20 20 20 20 |1,.)....| |
|000017b0| 20 20 20 20 20 cc 0d 0a | 00 26 20 20 20 20 20 20 | ...|.& |
|000017c0| 20 20 20 20 20 20 20 20 | 20 20 20 f2 50 6c 6f 74 | | .Plot|
|000017d0| 28 58 25 2c 6c 6f 6f 70 | 25 2c a3 29 0d 0a 0a 12 |(X%,loop|%,.)....|
|000017e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 cd 0d 0a | | ...|
|000017f0| 14 0e 20 20 20 20 20 20 | 20 20 20 cd 0d 0a 1e 0a |.. | .....|
|00001800| 20 20 20 20 20 ed 0d 0a | 28 04 0d 0a 32 08 20 20 | ...|(...2. |
|00001810| 20 ed 0d 0a 3c 05 e1 0d | 0a 46 04 0d 0a 50 16 f4 | ...<...|.F...P..|
|00001820| 20 2a 20 47 65 74 20 66 | 69 6c 65 6e 61 6d 65 20 | * Get f|ilename |
|00001830| 2a 0d 0a 5a 04 0d 0a 64 | 0e dd a4 46 69 6c 65 6e |*..Z...d|...Filen|
|00001840| 61 6d 65 0d 0a 6e 08 ea | 20 46 24 0d 0a 78 04 0d |ame..n..| F$..x..|
|00001850| 0a 82 17 20 20 20 c8 99 | 22 4f 53 5f 42 79 74 65 |... ..|"OS_Byte|
|00001860| 22 2c 31 35 2c 30 0d 0a | 8c 0c 20 20 20 46 24 3d |",15,0..|.. F$=|
|00001870| 22 22 0d 0a 96 17 20 20 | 20 fb 31 32 38 c8 9c 30 |"".... | .128..0|
|00001880| 3a fb 36 33 c8 9c 31 39 | 32 0d 0a a0 27 20 20 20 |:.63..19|2...' |
|00001890| e8 20 86 20 8a 30 2c 33 | 30 29 22 45 6e 74 65 72 |. . .0,3|0)"Enter|
|000018a0| 20 66 69 6c 65 6e 61 6d | 65 20 3a 20 22 3b 46 24 | filenam|e : ";F$|
|000018b0| 0d 0a aa 0a 20 20 20 3d | 46 24 0d 0a b4 0a 45 4e |.... =|F$....EN|
|000018c0| 44 44 45 46 0d 0a be 04 | 0d 0a c8 0d dd f2 4c 6f |DDEF....|......Lo|
|000018d0| 61 64 41 6c 6c 0d 0a d2 | 11 ea 20 46 24 2c 41 25 |adAll...|.. F$,A%|
|000018e0| 2c 58 25 2c 59 25 0d 0a | dc 04 0d 0a e6 1c 20 20 |,X%,Y%..|...... |
|000018f0| 20 46 24 3d a4 46 69 6c | 65 6e 61 6d 65 3a e7 46 | F$=.Fil|ename:.F|
|00001900| 24 3d 22 22 8c e1 0d 0a | f0 04 0d 0a fa 0e 20 20 |$=""....|...... |
|00001910| 20 41 25 3d 8e 20 46 24 | 0d 0b 04 0d 20 20 20 e7 | A%=. F$|.... .|
|00001920| 41 25 3d 30 8c 0d 0b 0e | 11 20 20 20 20 20 fb 31 |A%=0....|. .1|
|00001930| 32 c8 9c 31 39 32 0d 0b | 18 37 20 20 20 20 20 f1 |2..192..|.7 .|
|00001940| 8a 30 2c 33 30 29 22 2a | 20 55 4e 41 42 4c 45 20 |.0,30)"*| UNABLE |
|00001950| 54 4f 20 4c 4f 41 44 20 | 44 41 54 41 2e 20 20 50 |TO LOAD |DATA. P|
|00001960| 52 45 53 53 20 41 20 4b | 45 59 20 2a 22 0d 0b 22 |RESS A K|EY *".."|
|00001970| 0d 20 20 20 20 20 46 24 | 3d be 0d 0b 2c 08 20 20 |. F$|=...,. |
|00001980| 20 cc 0d 0b 36 13 20 20 | 20 20 20 20 20 fb 31 35 | ...6. | .15|
|00001990| c8 9c 31 39 32 0d 0b 40 | 2b 20 20 20 20 20 20 20 |..192..@|+ |
|000019a0| f1 8a 30 2c 33 30 29 22 | 4c 6f 61 64 69 6e 67 20 |..0,30)"|Loading |
|000019b0| 61 6c 6c 20 63 68 61 72 | 61 63 74 65 72 73 20 22 |all char|acters "|
|000019c0| 0d 0b 4a 04 0d 0b 54 23 | 20 20 20 20 20 20 20 f2 |..J...T#| .|
|000019d0| 44 61 74 61 4c 6f 61 64 | 28 30 2c 4d 41 58 53 49 |DataLoad|(0,MAXSI|
|000019e0| 5a 45 25 2c 41 25 29 0d | 0b 5e 1c 20 20 20 20 20 |ZE%,A%).|.^. |
|000019f0| 20 20 f2 44 69 73 70 6c | 61 79 44 61 74 61 28 50 | .Displ|ayData(P|
|00001a00| 53 25 29 0d 0b 68 20 20 | 20 20 20 20 20 20 f2 44 |S%)..h | .D|
|00001a10| 69 73 70 6c 61 79 41 74 | 53 63 72 65 65 6e 28 50 |isplayAt|Screen(P|
|00001a20| 53 25 29 0d 0b 72 08 20 | 20 20 cd 0d 0b 7c 0b 20 |S%)..r. | ...|. |
|00001a30| 20 20 d9 23 41 25 0d 0b | 86 05 e1 0d 0b 90 04 0d | .#A%..|........|
|00001a40| 0b 9a 0b dd f2 4c 6f 61 | 64 31 0d 0b a4 11 ea 20 |.....Loa|d1..... |
|00001a50| 46 24 2c 41 25 2c 58 25 | 2c 59 25 0d 0b ae 04 0d |F$,A%,X%|,Y%.....|
|00001a60| 0b b8 1c 20 20 20 46 24 | 3d a4 46 69 6c 65 6e 61 |... F$|=.Filena|
|00001a70| 6d 65 3a e7 46 24 3d 22 | 22 8c e1 0d 0b c2 04 0d |me:.F$="|".......|
|00001a80| 0b cc 0e 20 20 20 41 25 | 3d 8e 20 46 24 0d 0b d6 |... A%|=. F$...|
|00001a90| 0d 20 20 20 e7 41 25 3d | 30 8c 0d 0b e0 11 20 20 |. .A%=|0..... |
|00001aa0| 20 20 20 fb 31 32 c8 9c | 31 39 32 0d 0b ea 37 20 | .12..|192...7 |
|00001ab0| 20 20 20 20 f1 8a 30 2c | 33 30 29 22 2a 20 55 4e | ..0,|30)"* UN|
|00001ac0| 41 42 4c 45 20 54 4f 20 | 4c 4f 41 44 20 44 41 54 |ABLE TO |LOAD DAT|
|00001ad0| 41 2e 20 20 50 52 45 53 | 53 20 41 20 4b 45 59 20 |A. PRES|S A KEY |
|00001ae0| 2a 22 0d 0b f4 0d 20 20 | 20 20 20 46 24 3d be 0d |*".... | F$=..|
|00001af0| 0b fe 08 20 20 20 cc 0d | 0c 08 13 20 20 20 20 20 |... ..|... |
|00001b00| 20 20 fb 31 35 c8 9c 31 | 39 32 0d 0c 12 28 20 20 | .15..1|92...( |
|00001b10| 20 20 20 20 20 f1 8a 30 | 2c 33 30 29 22 4c 6f 61 | ..0|,30)"Loa|
|00001b20| 64 69 6e 67 20 31 20 63 | 68 61 72 61 63 74 65 72 |ding 1 c|haracter|
|00001b30| 20 22 0d 0c 1c 04 0d 0c | 26 20 20 20 20 20 20 20 | "......|& |
|00001b40| 20 f2 44 61 74 61 4c 6f | 61 64 28 50 53 25 2c 50 | .DataLo|ad(PS%,P|
|00001b50| 53 25 2c 41 25 29 0d 0c | 30 1c 20 20 20 20 20 20 |S%,A%)..|0. |
|00001b60| 20 f2 44 69 73 70 6c 61 | 79 44 61 74 61 28 50 53 | .Displa|yData(PS|
|00001b70| 25 29 0d 0c 3a 20 20 20 | 20 20 20 20 20 f2 44 69 |%)..: | .Di|
|00001b80| 73 70 6c 61 79 41 74 53 | 63 72 65 65 6e 28 50 53 |splayAtS|creen(PS|
|00001b90| 25 29 0d 0c 44 08 20 20 | 20 cd 0d 0c 4e 0b 20 20 |%)..D. | ...N. |
|00001ba0| 20 d9 23 41 25 0d 0c 58 | 05 e1 0d 0c 62 04 0d 0c | .#A%..X|....b...|
|00001bb0| 6c 1d f4 20 2a 20 53 61 | 76 65 20 61 6c 6c 20 63 |l.. * Sa|ve all c|
|00001bc0| 68 61 72 61 63 74 65 72 | 73 20 2a 0d 0c 76 04 0d |haracter|s *..v..|
|00001bd0| 0c 80 0d dd f2 53 61 76 | 65 41 6c 6c 0d 0c 8a 11 |.....Sav|eAll....|
|00001be0| ea 20 46 24 2c 41 25 2c | 58 25 2c 59 25 0d 0c 94 |. F$,A%,|X%,Y%...|
|00001bf0| 04 0d 0c 9e 1c 20 20 20 | 46 24 3d a4 46 69 6c 65 |..... |F$=.File|
|00001c00| 6e 61 6d 65 3a e7 46 24 | 3d 22 22 8c e1 0d 0c a8 |name:.F$|="".....|
|00001c10| 0e 20 20 20 41 25 3d ae | 20 46 24 0d 0c b2 0f 20 |. A%=.| F$.... |
|00001c20| 20 20 e7 20 41 25 3d 30 | 20 8c 0d 0c bc 11 20 20 | . A%=0| ..... |
|00001c30| 20 20 20 fb 31 32 c8 9c | 31 39 32 0d 0c c6 37 20 | .12..|192...7 |
|00001c40| 20 20 20 20 f1 8a 30 2c | 33 30 29 22 2a 20 55 4e | ..0,|30)"* UN|
|00001c50| 41 42 4c 45 20 54 4f 20 | 53 41 56 45 20 44 41 54 |ABLE TO |SAVE DAT|
|00001c60| 41 2e 20 20 50 52 45 53 | 53 20 41 20 4b 45 59 20 |A. PRES|S A KEY |
|00001c70| 2a 22 0d 0c d0 0d 20 20 | 20 20 20 46 24 3d be 0d |*".... | F$=..|
|00001c80| 0c da 08 20 20 20 cc 0d | 0c e4 13 20 20 20 20 20 |... ..|... |
|00001c90| 20 20 fb 31 35 c8 9c 31 | 39 32 0d 0c ee 2b 20 20 | .15..1|92...+ |
|00001ca0| 20 20 20 20 20 f1 8a 30 | 2c 33 30 29 22 53 61 76 | ..0|,30)"Sav|
|00001cb0| 69 6e 67 20 61 6c 6c 20 | 63 68 61 72 61 63 74 65 |ing all |characte|
|00001cc0| 72 73 20 20 22 0d 0c f8 | 04 0d 0d 02 23 20 20 20 |rs "...|....# |
|00001cd0| 20 20 20 20 f2 44 61 74 | 61 53 61 76 65 28 30 2c | .Dat|aSave(0,|
|00001ce0| 4d 41 58 53 49 5a 45 25 | 2c 41 25 29 0d 0d 0c 04 |MAXSIZE%|,A%)....|
|00001cf0| 0d 0d 16 08 20 20 20 cd | 0d 0d 20 0b 20 20 20 d9 |.... .|.. . .|
|00001d00| 23 41 25 0d 0d 2a 05 e1 | 0d 0d 34 04 0d 0d 3e 1a |#A%..*..|..4...>.|
|00001d10| f4 20 2a 20 53 61 76 65 | 20 31 20 63 68 61 72 61 |. * Save| 1 chara|
|00001d20| 63 74 65 72 20 2a 0d 0d | 48 04 0d 0d 52 0b dd f2 |cter *..|H...R...|
|00001d30| 53 61 76 65 31 0d 0d 5c | 11 ea 20 46 24 2c 41 25 |Save1..\|.. F$,A%|
|00001d40| 2c 58 25 2c 59 25 0d 0d | 66 04 0d 0d 70 1c 20 20 |,X%,Y%..|f...p. |
|00001d50| 20 46 24 3d a4 46 69 6c | 65 6e 61 6d 65 3a e7 46 | F$=.Fil|ename:.F|
|00001d60| 24 3d 22 22 8c e1 0d 0d | 7a 0e 20 20 20 41 25 3d |$=""....|z. A%=|
|00001d70| ae 20 46 24 0d 0d 84 0f | 20 20 20 e7 20 41 25 3d |. F$....| . A%=|
|00001d80| 30 20 8c 0d 0d 8e 11 20 | 20 20 20 20 fb 31 32 c8 |0 ..... | .12.|
|00001d90| 9c 31 39 32 0d 0d 98 37 | 20 20 20 20 20 f1 8a 30 |.192...7| ..0|
|00001da0| 2c 33 30 29 22 2a 20 55 | 4e 41 42 4c 45 20 54 4f |,30)"* U|NABLE TO|
|00001db0| 20 53 41 56 45 20 44 41 | 54 41 2e 20 20 50 52 45 | SAVE DA|TA. PRE|
|00001dc0| 53 53 20 41 20 4b 45 59 | 20 2a 22 0d 0d a2 0d 20 |SS A KEY| *".... |
|00001dd0| 20 20 20 20 46 24 3d be | 0d 0d ac 08 20 20 20 cc | F$=.|.... .|
|00001de0| 0d 0d b6 13 20 20 20 20 | 20 20 20 fb 31 35 c8 9c |.... | .15..|
|00001df0| 31 39 32 0d 0d c0 29 20 | 20 20 20 20 20 20 f1 8a |192...) | ..|
|00001e00| 30 2c 33 30 29 22 53 61 | 76 69 6e 67 20 31 20 63 |0,30)"Sa|ving 1 c|
|00001e10| 68 61 72 61 63 74 65 72 | 20 20 20 22 0d 0d ca 04 |haracter| "....|
|00001e20| 0d 0d d4 20 20 20 20 20 | 20 20 20 f2 44 61 74 61 |... | .Data|
|00001e30| 53 61 76 65 28 50 53 25 | 2c 50 53 25 2c 41 25 29 |Save(PS%|,PS%,A%)|
|00001e40| 0d 0d de 04 0d 0d e8 08 | 20 20 20 cd 0d 0d f2 0b |........| .....|
|00001e50| 20 20 20 d9 23 41 25 0d | 0d fc 05 e1 0d 0e 06 04 | .#A%.|........|
|00001e60| 0d 0e 10 16 f4 20 2a 20 | 47 65 6e 65 72 61 6c 20 |..... * |General |
|00001e70| 4c 6f 61 64 20 2a 0d 0e | 1a 04 0d 0e 24 23 dd f2 |Load *..|....$#..|
|00001e80| 44 61 74 61 4c 6f 61 64 | 28 73 74 61 72 74 25 2c |DataLoad|(start%,|
|00001e90| 65 6e 64 25 2c 68 61 6e | 64 6c 65 25 29 0d 0e 2e |end%,han|dle%)...|
|00001ea0| 1f ea 20 58 25 2c 59 25 | 2c 6c 6f 6f 70 25 2c 78 |.. X%,Y%|,loop%,x|
|00001eb0| 73 69 7a 65 25 2c 79 73 | 69 7a 65 25 0d 0e 38 04 |size%,ys|ize%..8.|
|00001ec0| 0d 0e 42 17 20 20 20 fb | 35 36 c8 9c 31 39 32 3a |..B. .|56..192:|
|00001ed0| fb 31 32 38 c8 9c 30 0d | 0e 4c 1b 20 20 20 f1 8a |.128..0.|.L. ..|
|00001ee0| 30 2c 33 31 29 22 4c 6f | 61 64 69 6e 67 20 3a 20 |0,31)"Lo|ading : |
|00001ef0| 22 3b 0d 0e 56 04 0d 0e | 60 13 20 20 20 6c 6f 6f |";..V...|`. loo|
|00001f00| 70 25 3d 73 74 61 72 74 | 25 0d 0e 6a 15 20 20 20 |p%=start|%..j. |
|00001f10| c8 95 20 ac 20 c5 23 68 | 61 6e 64 6c 65 25 0d 0e |.. . .#h|andle%..|
|00001f20| 74 04 0d 0e 7e 23 20 20 | 20 20 20 20 f4 20 2a 20 |t...~# | . * |
|00001f30| 47 65 74 20 73 69 7a 65 | 20 6f 66 20 6c 65 74 74 |Get size| of lett|
|00001f40| 65 72 73 20 2a 0d 0e 88 | 04 0d 0e 92 2b 20 20 20 |ers *...|....+ |
|00001f50| 20 20 20 78 73 69 7a 65 | 25 3d 9a 23 68 61 6e 64 | xsize|%=.#hand|
|00001f60| 6c 65 25 3a 79 73 69 7a | 65 25 3d 9a 23 68 61 6e |le%:ysiz|e%=.#han|
|00001f70| 64 6c 65 25 0d 0e 9c 04 | 0d 0e a6 18 20 20 20 20 |dle%....|.... |
|00001f80| 20 20 e3 59 25 3d 30 b8 | 79 73 69 7a 65 25 2d 31 | .Y%=0.|ysize%-1|
|00001f90| 0d 0e b0 1b 20 20 20 20 | 20 20 20 20 20 e3 58 25 |.... | .X%|
|00001fa0| 3d 30 b8 78 73 69 7a 65 | 25 2d 31 0d 0e ba 2f 20 |=0.xsize|%-1.../ |
|00001fb0| 20 20 20 20 20 20 20 20 | 20 20 20 64 61 74 25 28 | | dat%(|
|00001fc0| 6c 6f 6f 70 25 2c 58 25 | 2b 31 2c 59 25 2b 31 29 |loop%,X%|+1,Y%+1)|
|00001fd0| 3d 9a 23 68 61 6e 64 6c | 65 25 0d 0e c4 0e 20 20 |=.#handl|e%.... |
|00001fe0| 20 20 20 20 20 20 20 ed | 0d 0e ce 0b 20 20 20 20 | .|.... |
|00001ff0| 20 20 ed 0d 0e d8 29 20 | 20 20 20 20 20 f1 8a 31 | ....) | ..1|
|00002000| 30 2c 33 31 29 c2 22 30 | 30 30 22 2b c1 c3 28 6c |0,31)."0|00"+..(l|
|00002010| 6f 6f 70 25 29 2c 31 29 | 2c 33 29 3b 0d 0e e2 12 |oop%),1)|,3);....|
|00002020| 20 20 20 20 20 20 6c 6f | 6f 70 25 2b 3d 31 0d 0e | lo|op%+=1..|
|00002030| ec 04 0d 0e f6 08 20 20 | 20 ce 0d 0f 00 05 e1 0d |...... | .......|
|00002040| 0f 0a 04 0d 0f 14 16 f4 | 20 2a 20 47 65 6e 65 72 |........| * Gener|
|00002050| 61 6c 20 73 61 76 65 20 | 2a 0d 0f 1e 04 0d 0f 28 |al save |*......(|
|00002060| 23 dd f2 44 61 74 61 53 | 61 76 65 28 73 74 61 72 |#..DataS|ave(star|
|00002070| 74 25 2c 65 6e 64 25 2c | 68 61 6e 64 6c 65 25 29 |t%,end%,|handle%)|
|00002080| 0d 0f 32 11 ea 20 58 25 | 2c 59 25 2c 6c 6f 6f 70 |..2.. X%|,Y%,loop|
|00002090| 25 0d 0f 3c 04 0d 0f 46 | 17 20 20 20 fb 35 36 c8 |%..<...F|. .56.|
|000020a0| 9c 31 39 32 3a fb 31 32 | 38 c8 9c 30 0d 0f 50 1a |.192:.12|8..0..P.|
|000020b0| 20 20 20 f1 8a 30 2c 33 | 31 29 22 53 61 76 69 6e | ..0,3|1)"Savin|
|000020c0| 67 20 3a 20 22 3b 0d 0f | 5a 04 0d 0f 64 1c 20 20 |g : ";..|Z...d. |
|000020d0| 20 e3 20 6c 6f 6f 70 25 | 3d 73 74 61 72 74 25 20 | . loop%|=start% |
|000020e0| b8 20 65 6e 64 25 0d 0f | 6e 21 20 20 20 20 20 20 |. end%..|n! |
|000020f0| d5 23 68 61 6e 64 6c 65 | 25 2c 43 58 25 20 3a 20 |.#handle|%,CX% : |
|00002100| f4 20 53 69 7a 65 73 0d | 0f 78 17 20 20 20 20 20 |. Sizes.|.x. |
|00002110| 20 d5 23 68 61 6e 64 6c | 65 25 2c 43 59 25 0d 0f | .#handl|e%,CY%..|
|00002120| 82 15 20 20 20 20 20 20 | e3 59 25 3d 30 b8 43 59 |.. |.Y%=0.CY|
|00002130| 25 2d 31 0d 0f 8c 18 20 | 20 20 20 20 20 20 20 20 |%-1.... | |
|00002140| e3 58 25 3d 30 b8 43 58 | 25 2d 31 0d 0f 96 2f 20 |.X%=0.CX|%-1.../ |
|00002150| 20 20 20 20 20 20 20 20 | 20 20 20 d5 23 68 61 6e | | .#han|
|00002160| 64 6c 65 25 2c 64 61 74 | 25 28 6c 6f 6f 70 25 2c |dle%,dat|%(loop%,|
|00002170| 58 25 2b 31 2c 59 25 2b | 31 29 0d 0f a0 0e 20 20 |X%+1,Y%+|1).... |
|00002180| 20 20 20 20 20 20 20 ed | 0d 0f aa 0b 20 20 20 20 | .|.... |
|00002190| 20 20 ed 0d 0f b4 28 20 | 20 20 20 20 20 f1 8a 39 | ....( | ..9|
|000021a0| 2c 33 31 29 c2 22 30 30 | 30 22 2b c1 c3 28 6c 6f |,31)."00|0"+..(lo|
|000021b0| 6f 70 25 29 2c 31 29 2c | 33 29 3b 0d 0f be 08 20 |op%),1),|3);.... |
|000021c0| 20 20 ed 0d 0f c8 05 e1 | 0d 0f d2 04 0d 0f dc 17 | ......|........|
|000021d0| f4 20 2a 20 50 6c 6f 74 | 20 61 20 63 6f 6c 6f 75 |. * Plot| a colou|
|000021e0| 72 20 2a 0d 0f e6 04 0d | 0f f0 14 dd f2 50 6c 6f |r *.....|.....Plo|
|000021f0| 74 28 58 25 2c 59 25 2c | 54 25 29 0d 0f fa 09 ea |t(X%,Y%,|T%).....|
|00002200| 20 67 63 25 0d 10 04 04 | 0d 10 0e 0f 20 20 20 e7 | gc%....|.... .|
|00002210| 20 54 25 3d b9 20 8c 0d | 10 18 31 20 20 20 20 20 | T%=. ..|..1 |
|00002220| c8 99 22 43 6f 6c 6f 75 | 72 54 72 61 6e 73 5f 53 |.."Colou|rTrans_S|
|00002230| 65 74 54 65 78 74 43 6f | 6c 6f 75 72 22 2c 43 4f |etTextCo|lour",CO|
|00002240| 4c 25 2c 2c 2c 31 32 38 | 0d 10 22 34 20 20 20 20 |L%,,,128|.."4 |
|00002250| 20 c8 99 22 43 6f 6c 6f | 75 72 54 72 61 6e 73 5f | .."Colo|urTrans_|
|00002260| 53 65 74 54 65 78 74 43 | 6f 6c 6f 75 72 22 2c 26 |SetTextC|olour",&|
|00002270| 46 46 46 46 46 46 30 30 | 2c 2c 2c 30 0d 10 2c 36 |FFFFFF00|,,,0..,6|
|00002280| 20 20 20 20 20 c8 99 22 | 43 6f 6c 6f 75 72 54 72 | .."|ColourTr|
|00002290| 61 6e 73 5f 52 65 74 75 | 72 6e 43 6f 6c 6f 75 72 |ans_Retu|rnColour|
|000022a0| 4e 75 6d 62 65 72 22 2c | 43 4f 4c 25 20 b8 20 67 |Number",|COL% . g|
|000022b0| 63 25 0d 10 36 29 20 20 | 20 20 20 3f 28 73 63 72 |c%..6) | ?(scr|
|000022c0| 2b 28 28 59 25 2b 31 32 | 30 29 2a 33 32 30 29 2b |+((Y%+12|0)*320)+|
|000022d0| 33 30 30 2b 58 25 29 3d | 67 63 25 0d 10 40 20 20 |300+X%)=|gc%..@ |
|000022e0| 20 20 20 20 64 61 74 25 | 28 50 53 25 2c 58 25 2b | dat%|(PS%,X%+|
|000022f0| 31 2c 59 25 2b 31 29 3d | 67 63 25 0d 10 4a 08 20 |1,Y%+1)=|gc%..J. |
|00002300| 20 20 cc 0d 10 54 38 20 | 20 20 20 20 20 20 c8 99 | ...T8 | ..|
|00002310| 22 43 6f 6c 6f 75 72 54 | 72 61 6e 73 5f 53 65 74 |"ColourT|rans_Set|
|00002320| 54 65 78 74 43 6f 6c 6f | 75 72 22 2c 26 30 30 30 |TextColo|ur",&000|
|00002330| 30 30 30 30 30 2c 2c 2c | 31 32 38 0d 10 5e 36 20 |00000,,,|128..^6 |
|00002340| 20 20 20 20 20 20 c8 99 | 22 43 6f 6c 6f 75 72 54 | ..|"ColourT|
|00002350| 72 61 6e 73 5f 53 65 74 | 54 65 78 74 43 6f 6c 6f |rans_Set|TextColo|
|00002360| 75 72 22 2c 26 46 46 46 | 46 46 46 30 30 2c 2c 2c |ur",&FFF|FFF00,,,|
|00002370| 30 0d 10 68 2b 20 20 20 | 20 20 20 20 3f 28 73 63 |0..h+ | ?(sc|
|00002380| 72 2b 28 28 59 25 2b 31 | 32 30 29 2a 33 32 30 29 |r+((Y%+1|20)*320)|
|00002390| 2b 33 30 30 2b 58 25 29 | 3d 26 30 30 0d 10 72 22 |+300+X%)|=&00..r"|
|000023a0| 20 20 20 20 20 20 20 64 | 61 74 25 28 50 53 25 2c | d|at%(PS%,|
|000023b0| 58 25 2b 31 2c 59 25 2b | 31 29 3d 26 30 30 0d 10 |X%+1,Y%+|1)=&00..|
|000023c0| 7c 08 20 20 20 cd 0d 10 | 86 13 20 20 20 f1 8a 58 ||. ...|.. ..X|
|000023d0| 25 2c 59 25 29 bd 32 35 | 35 0d 10 90 05 e1 0d 10 |%,Y%).25|5.......|
|000023e0| 9a 04 0d 10 a4 16 f4 20 | 2a 20 44 69 73 70 6c 61 |....... |* Displa|
|000023f0| 79 20 67 72 69 64 20 2a | 0d 10 ae 04 0d 10 b8 20 |y grid *|....... |
|00002400| dd f2 44 69 73 70 6c 61 | 79 47 72 69 64 28 58 53 |..Displa|yGrid(XS|
|00002410| 49 5a 45 25 2c 59 53 49 | 5a 45 25 29 0d 10 c2 0b |IZE%,YSI|ZE%)....|
|00002420| ea 20 58 25 2c 59 25 0d | 10 cc 04 0d 10 d6 16 20 |. X%,Y%.|....... |
|00002430| 20 fb 31 32 38 c8 9c 30 | 3a fb 36 33 c8 9c 31 39 | .128..0|:.63..19|
|00002440| 32 0d 10 e0 14 20 20 e3 | 58 25 3d 30 b8 58 53 49 |2.... .|X%=0.XSI|
|00002450| 5a 45 25 2d 31 0d 10 ea | 17 20 20 20 20 20 e3 59 |ZE%-1...|. .Y|
|00002460| 25 3d 30 b8 59 53 49 5a | 45 25 2d 31 0d 10 f4 18 |%=0.YSIZ|E%-1....|
|00002470| 20 20 20 20 20 20 20 20 | f1 8a 58 25 2c 59 25 29 | |..X%,Y%)|
|00002480| bd 32 35 35 0d 10 fe 0a | 20 20 20 20 20 ed 0d 11 |.255....| ...|
|00002490| 08 07 20 20 ed 0d 11 12 | 05 e1 0d 11 1c 04 0d 11 |.. ....|........|
|000024a0| 26 1d f4 20 2a 20 44 69 | 73 70 6c 61 79 20 61 6c |&.. * Di|splay al|
|000024b0| 6c 20 63 6f 6c 6f 75 72 | 73 20 2a 0d 11 30 04 0d |l colour|s *..0..|
|000024c0| 11 3a 14 dd f2 44 69 73 | 70 6c 61 79 43 6f 6c 6f |.:...Dis|playColo|
|000024d0| 75 72 73 0d 11 44 0b ea | 20 58 25 2c 59 25 0d 11 |urs..D..| X%,Y%..|
|000024e0| 4e 04 0d 11 58 10 20 20 | 20 20 f1 8a 30 2c 31 38 |N...X. | ..0,18|
|000024f0| 29 3b 0d 11 62 11 20 20 | 20 20 e3 58 25 3d 30 b8 |);..b. | .X%=0.|
|00002500| 32 35 35 0d 11 6c 41 20 | 20 20 20 20 20 20 c8 99 |255..lA | ..|
|00002510| 22 43 6f 6c 6f 75 72 54 | 72 61 6e 73 5f 53 65 74 |"ColourT|rans_Set|
|00002520| 54 65 78 74 43 6f 6c 6f | 75 72 22 2c 21 28 70 61 |TextColo|ur",!(pa|
|00002530| 6c 65 74 74 65 25 2b 28 | 58 25 2a 34 29 29 2c 2c |lette%+(|X%*4)),,|
|00002540| 2c 31 32 38 0d 11 76 10 | 20 20 20 20 20 20 20 f1 |,128..v.| .|
|00002550| 22 20 22 3b 0d 11 80 09 | 20 20 20 20 ed 0d 11 8a |" ";....| ....|
|00002560| 05 e1 0d 11 94 04 0d 11 | 9e 1d f4 20 2a 20 44 69 |........|... * Di|
|00002570| 73 70 6c 61 79 20 61 6c | 6c 20 6f 70 74 69 6f 6e |splay al|l option|
|00002580| 73 20 2a 0d 11 a8 04 0d | 11 b2 1d dd f2 44 69 73 |s *.....|.....Dis|
|00002590| 70 6c 61 79 4f 70 74 69 | 6f 6e 73 28 6e 75 6d 6f |playOpti|ons(numo|
|000025a0| 70 74 25 29 0d 11 bc 0b | ea 20 6c 6f 6f 70 25 0d |pt%)....|. loop%.|
|000025b0| 11 c6 04 0d 11 d0 18 20 | 20 20 20 fb 31 32 38 c8 |....... | .128.|
|000025c0| 9c 30 3a fb 36 33 c8 9c | 31 39 32 0d 11 da 0f 20 |.0:.63..|192.... |
|000025d0| 20 20 20 6c 6f 6f 70 25 | 3d 31 0d 11 e4 04 0d 11 | loop%|=1......|
|000025e0| ee 09 20 20 20 20 f5 0d | 11 f8 38 20 20 20 20 20 |.. ..|..8 |
|000025f0| 20 20 20 20 20 f1 8a 31 | 38 2c 6c 6f 6f 70 25 29 | ..1|8,loop%)|
|00002600| bd 28 36 34 2b 6c 6f 6f | 70 25 29 22 20 3a 20 22 |.(64+loo|p%)" : "|
|00002610| 6f 70 74 69 6f 6e 73 24 | 28 6c 6f 6f 70 25 29 0d |options$|(loop%).|
|00002620| 12 02 16 20 20 20 20 20 | 20 20 20 20 20 6c 6f 6f |... | loo|
|00002630| 70 25 2b 3d 31 0d 12 0c | 1c 20 20 20 20 fd 6f 70 |p%+=1...|. .op|
|00002640| 74 69 6f 6e 73 24 28 6c | 6f 6f 70 25 29 3d 22 2a |tions$(l|oop%)="*|
|00002650| 22 0d 12 16 05 e1 0d 12 | 20 04 0d 12 2a 16 f4 20 |".......| ...*.. |
|00002660| 2a 20 44 69 73 70 6c 61 | 79 20 64 61 74 61 20 2a |* Displa|y data *|
|00002670| 0d 12 34 04 0d 12 3e 19 | dd f2 44 69 73 70 6c 61 |..4...>.|..Displa|
|00002680| 79 44 61 74 61 28 77 68 | 69 63 68 25 29 0d 12 48 |yData(wh|ich%)..H|
|00002690| 0e ea 20 58 25 2c 59 25 | 2c 51 25 0d 12 52 04 0d |.. X%,Y%|,Q%..R..|
|000026a0| 12 5c 12 20 20 20 e3 59 | 25 3d 30 b8 43 59 25 2d |.\. .Y|%=0.CY%-|
|000026b0| 31 0d 12 66 15 20 20 20 | 20 20 20 e3 58 25 3d 30 |1..f. | .X%=0|
|000026c0| b8 43 58 25 2d 31 0d 12 | 70 26 20 20 20 20 20 20 |.CX%-1..|p& |
|000026d0| 20 20 20 51 25 3d 64 61 | 74 25 28 77 68 69 63 68 | Q%=da|t%(which|
|000026e0| 25 2c 58 25 2b 31 2c 59 | 25 2b 31 29 0d 12 7a 43 |%,X%+1,Y|%+1)..zC|
|000026f0| 20 20 20 20 20 20 20 20 | 20 c8 99 22 43 6f 6c 6f | | .."Colo|
|00002700| 75 72 54 72 61 6e 73 5f | 53 65 74 54 65 78 74 43 |urTrans_|SetTextC|
|00002710| 6f 6c 6f 75 72 22 2c 21 | 28 70 61 6c 65 74 74 65 |olour",!|(palette|
|00002720| 25 2b 28 51 25 2a 34 29 | 29 2c 2c 2c 31 32 38 0d |%+(Q%*4)|),,,128.|
|00002730| 12 84 38 20 20 20 20 20 | 20 20 20 20 c8 99 22 43 |..8 | .."C|
|00002740| 6f 6c 6f 75 72 54 72 61 | 6e 73 5f 53 65 74 54 65 |olourTra|ns_SetTe|
|00002750| 78 74 43 6f 6c 6f 75 72 | 22 2c 26 46 46 46 46 46 |xtColour|",&FFFFF|
|00002760| 46 30 30 2c 2c 2c 30 0d | 12 8e 19 20 20 20 20 20 |F00,,,0.|... |
|00002770| 20 20 20 20 f1 8a 58 25 | 2c 59 25 29 bd 32 35 35 | ..X%|,Y%).255|
|00002780| 0d 12 98 0b 20 20 20 20 | 20 20 ed 0d 12 a2 08 20 |.... | ..... |
|00002790| 20 20 ed 0d 12 ac 04 0d | 12 b6 17 20 20 20 fb 31 | ......|... .1|
|000027a0| 32 38 c8 9c 30 3a fb 33 | 34 c8 9c 31 39 32 0d 12 |28..0:.3|4..192..|
|000027b0| c0 23 20 20 20 f1 8a 31 | 39 2c 31 36 29 c2 22 30 |.# ..1|9,16)."0|
|000027c0| 30 30 22 2b c1 c3 28 50 | 53 25 29 2c 31 29 2c 33 |00"+..(P|S%),1),3|
|000027d0| 29 0d 12 ca 05 e1 0d 12 | d4 04 0d 12 de 1d dd f2 |).......|........|
|000027e0| 44 69 73 70 6c 61 79 41 | 74 53 63 72 65 65 6e 28 |DisplayA|tScreen(|
|000027f0| 77 68 69 63 68 25 29 0d | 12 e8 0b ea 20 58 25 2c |which%).|.... X%,|
|00002800| 59 25 0d 12 f2 04 0d 12 | fc 14 20 20 20 e3 59 25 |Y%......|.. .Y%|
|00002810| 3d 30 b8 4d 41 58 59 25 | 2d 31 0d 13 06 17 20 20 |=0.MAXY%|-1.... |
|00002820| 20 20 20 20 e3 58 25 3d | 30 b8 4d 41 58 58 25 2d | .X%=|0.MAXX%-|
|00002830| 31 0d 13 10 26 20 20 20 | 20 20 20 20 20 20 51 25 |1...& | Q%|
|00002840| 3d 64 61 74 25 28 77 68 | 69 63 68 25 2c 58 25 2b |=dat%(wh|ich%,X%+|
|00002850| 31 2c 59 25 2b 31 29 0d | 13 1a 2c 20 20 20 20 20 |1,Y%+1).|.., |
|00002860| 20 20 20 20 3f 28 73 63 | 72 2b 28 28 59 25 2b 31 | ?(sc|r+((Y%+1|
|00002870| 32 30 29 2a 33 32 30 29 | 2b 33 30 30 2b 58 25 29 |20)*320)|+300+X%)|
|00002880| 3d 51 25 0d 13 24 0b 20 | 20 20 20 20 20 ed 0d 13 |=Q%..$. | ...|
|00002890| 2e 08 20 20 20 ed 0d 13 | 38 05 e1 0d 13 42 04 0d |.. ...|8....B..|
|000028a0| 13 4c 0e f4 20 2a 20 44 | 41 54 41 20 2a 0d 13 56 |.L.. * D|ATA *..V|
|000028b0| 04 0d 13 60 14 dc 20 22 | 51 75 69 74 20 70 72 6f |...`.. "|Quit pro|
|000028c0| 67 72 61 6d 22 0d 13 6a | 16 dc 20 22 53 61 76 65 |gram"..j|.. "Save|
|000028d0| 20 63 68 61 72 61 63 74 | 65 72 22 0d 13 74 16 dc | charact|er"..t..|
|000028e0| 20 22 4c 6f 61 64 20 63 | 68 61 72 61 63 74 65 72 | "Load c|haracter|
|000028f0| 22 0d 13 7e 10 dc 20 22 | 53 61 76 65 20 61 6c 6c |"..~.. "|Save all|
|00002900| 22 0d 13 88 10 dc 20 22 | 4c 6f 61 64 20 61 6c 6c |"..... "|Load all|
|00002910| 22 0d 13 92 16 dc 20 22 | 47 65 74 20 41 53 43 49 |"..... "|Get ASCI|
|00002920| 49 20 63 68 61 72 22 0d | 13 9c 11 dc 20 22 55 73 |I char".|.... "Us|
|00002930| 65 20 31 36 2a 31 36 22 | 0d 13 a6 0f dc 20 22 55 |e 16*16"|..... "U|
|00002940| 73 65 20 38 2a 38 22 0d | 13 b0 09 dc 20 22 2a 22 |se 8*8".|.... "*"|
|00002950| 0d ff | |.. | |
+--------+-------------------------+-------------------------+--------+--------+
