CLONE2
FILE INFORMATION
FILENAME(S): CLONE2
FILE TYPE(S): PRG
FILE SIZE: 5.8K
FIRST SEEN: 2025-11-30 19:47:40
APPEARS ON: 1 disk(s)
FILE HASH
538461ff1c617aad963f8961987b2bd24c93c8ea7b89683d0ac5d4df2b42ff4f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SUPERCLONE 118A | CLONE2 | PRG | Curtcool, Frank | 22 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 E8 03 8F 20 54 42 45 44 49 54 4F 52 |..$.... TBEDITOR|
00000010: 20 2D 2D 20 45 44 49 54 20 54 52 41 43 4B 2F 42 | -- EDIT TRACK/B|
00000020: 4C 4F 43 4B 00 59 08 E9 03 97 20 35 31 2C 30 3A |LOCK.Y.... 51,0:|
00000030: 97 20 35 32 2C 34 30 3A 97 20 35 35 2C 30 3A 97 |. 52,40:. 55,0:.|
00000040: 20 35 36 2C 34 30 3A 97 20 36 34 33 2C 30 3A 97 | 56,40:. 643,0:.|
00000050: 20 36 34 34 2C 34 30 3A 9C 00 84 08 EA 03 52 36 | 644,40:......R6|
00000060: B2 C2 28 31 38 36 29 3A 97 20 35 33 32 38 30 2C |..(186):. 53280,|
00000070: 30 3A 97 20 35 33 32 38 31 2C 30 3A 97 20 36 34 |0:. 53281,0:. 64|
00000080: 36 2C 31 35 00 9E 08 EC 03 86 20 53 28 33 35 29 |6,15...... S(35)|
00000090: 2C 44 52 28 31 36 29 2C 44 43 28 31 36 29 00 AC |,DR(16),DC(16)..|
000000A0: 08 F2 03 44 44 B2 C2 28 31 38 36 29 00 D5 08 F4 |...DD..(186)....|
000000B0: 03 58 58 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |.XX$."..........|
000000C0: 22 3A 58 58 24 B2 58 58 24 AA 58 58 24 AA 58 58 |":XX$.XX$.XX$.XX|
000000D0: 24 AA 58 58 24 00 FA 08 F6 03 59 59 24 B2 22 11 |$.XX$.....YY$.".|
000000E0: 11 11 11 11 11 11 11 11 11 22 3A 59 59 24 B2 59 |.........":YY$.Y|
000000F0: 59 24 AA 59 59 24 AA 59 59 24 00 15 09 F8 03 48 |Y$.YY$.YY$.....H|
00000100: 58 24 B2 22 30 31 32 33 34 35 36 37 38 39 41 42 |X$."0123456789AB|
00000110: 43 44 45 46 22 00 3C 09 FC 03 58 44 24 B2 22 38 |CDEF".<...XD$."8|
00000120: 20 22 3A 58 54 24 B2 22 31 38 22 3A 58 42 24 B2 | ":XT$."18":XB$.|
00000130: 22 31 20 22 3A 58 4D 24 B2 22 41 22 00 55 09 4C |"1 ":XM$."A".U.L|
00000140: 04 81 20 54 B2 31 20 A4 20 31 37 3A 53 28 54 29 |.. T.1 . 17:S(T)|
00000150: B2 32 30 3A 82 00 6E 09 56 04 81 20 54 B2 31 38 |.20:..n.V.. T.18|
00000160: A4 20 32 34 3A 53 28 54 29 B2 31 38 3A 82 00 87 |. 24:S(T).18:...|
00000170: 09 60 04 81 20 54 B2 32 35 A4 20 33 30 3A 53 28 |.`.. T.25. 30:S(|
00000180: 54 29 B2 31 37 3A 82 00 A0 09 6A 04 81 20 54 B2 |T).17:....j.. T.|
00000190: 33 31 A4 20 33 35 3A 53 28 54 29 B2 31 36 3A 82 |31. 35:S(T).16:.|
000001A0: 00 D2 09 B0 04 83 20 35 2C 36 2C 37 2C 38 2C 31 |...... 5,6,7,8,1|
000001B0: 30 2C 31 31 2C 31 32 2C 31 33 2C 31 35 2C 31 36 |0,11,12,13,15,16|
000001C0: 2C 31 37 2C 31 38 2C 32 30 2C 32 31 2C 32 32 2C |,17,18,20,21,22,|
000001D0: 32 33 00 04 0A BA 04 83 20 33 2C 35 2C 37 2C 39 |23...... 3,5,7,9|
000001E0: 2C 31 32 2C 31 34 2C 31 36 2C 31 38 2C 32 31 2C |,12,14,16,18,21,|
000001F0: 32 33 2C 32 35 2C 32 37 2C 33 30 2C 33 32 2C 33 |23,25,27,30,32,3|
00000200: 34 2C 33 36 00 1F 0A C4 04 81 20 4A 4A B2 31 20 |4,36...... JJ.1 |
00000210: A4 20 31 36 3A 87 20 44 52 28 4A 4A 29 3A 82 00 |. 16:. DR(JJ):..|
00000220: 3A 0A CE 04 81 20 4A 4A B2 31 20 A4 20 31 36 3A |:.... JJ.1 . 16:|
00000230: 87 20 44 43 28 4A 4A 29 3A 82 00 4D 0A D0 07 8F |. DC(JJ):..M....|
00000240: 20 50 45 52 46 4F 52 4D 20 45 44 49 54 00 68 0A | PERFORM EDIT.h.|
00000250: DA 07 8D 20 36 30 30 30 3A 8F 20 43 52 45 41 54 |... 6000:. CREAT|
00000260: 45 20 53 43 52 45 45 4E 00 88 0A E4 07 8D 20 37 |E SCREEN...... 7|
00000270: 30 30 30 3A 8F 20 52 45 41 44 20 53 43 52 45 45 |000:. READ SCREE|
00000280: 4E 20 48 45 41 44 45 52 00 9C 0A E9 07 8B 20 4D |N HEADER...... M|
00000290: 24 B2 22 58 22 20 89 20 39 30 30 30 00 B5 0A EE |$."X" . 9000....|
000002A0: 07 8D 20 37 31 30 30 3A 8F 20 44 49 53 50 4C 41 |.. 7100:. DISPLA|
000002B0: 59 20 54 2F 42 00 D1 0A F8 07 8D 20 37 32 30 30 |Y T/B...... 7200|
000002C0: 3A 8F 20 41 43 43 45 50 54 20 43 48 41 4E 47 45 |:. ACCEPT CHANGE|
000002D0: 53 00 ED 0A FD 07 8B 20 52 43 B2 39 32 20 B0 20 |S...... RC.92 . |
000002E0: 52 43 B2 31 36 39 20 89 20 32 30 30 30 00 00 0B |RC.169 . 2000...|
000002F0: 02 08 8B 20 52 43 B2 31 33 20 89 20 32 30 31 30 |... RC.13 . 2010|
00000300: 00 12 0B 0C 08 8D 20 37 30 37 30 3A 89 20 32 30 |...... 7070:. 20|
00000310: 33 30 00 35 0B EC 13 53 53 B2 35 34 32 37 32 3A |30.5...SS.54272:|
00000320: 81 20 4C B2 30 20 A4 20 32 34 3A 97 20 53 53 AA |. L.0 . 24:. SS.|
00000330: 4C 2C 30 3A 82 00 6E 0B 0A 14 97 20 53 53 AA 30 |L,0:..n.... SS.0|
00000340: 31 2C 39 35 3A 97 20 53 53 AA 35 2C 31 35 3A 97 |1,95:. SS.5,15:.|
00000350: 20 53 53 AA 31 35 2C 33 30 3A 97 20 53 53 AA 32 | SS.15,30:. SS.2|
00000360: 34 2C 31 35 3A 97 20 53 53 AA 34 2C 32 31 00 8C |4,15:. SS.4,21..|
00000370: 0B 3C 14 81 20 54 54 B2 31 20 A4 20 32 30 30 20 |.<.. TT.1 . 200 |
00000380: 3A 82 3A 97 20 53 53 AA 34 2C 32 30 00 A8 0B 4B |:.:. SS.4,20...K|
00000390: 14 81 20 4C B2 32 34 A4 20 30 20 3A 97 20 53 53 |.. L.24. 0 :. SS|
000003A0: AA 4C 2C 30 3A 82 3A 8E 00 BC 0B 70 17 8F 20 43 |.L,0:.:....p.. C|
000003B0: 52 45 41 54 45 20 53 43 52 45 45 4E 00 FF 0B 7A |REATE SCREEN...z|
000003C0: 17 99 22 93 11 45 44 49 54 4F 52 20 20 20 20 44 |.."..EDITOR D|
000003D0: 52 49 56 45 3D 22 3B 58 44 24 3B 22 20 54 52 2E |RIVE=";XD$;" TR.|
000003E0: 3D 22 3B 58 54 24 3B 22 20 53 54 2E 3D 22 3B 58 |=";XT$;" ST.=";X|
000003F0: 42 24 3B 22 20 4D 4F 44 4F 3D 22 3B 58 4D 24 00 |B$;" MODO=";XM$.|
00000400: 2E 0C 84 17 99 3A 99 22 20 20 20 30 20 31 20 32 |.....:." 0 1 2|
00000410: 20 33 20 20 34 20 35 20 36 20 37 20 20 38 20 39 | 3 4 5 6 7 8 9|
00000420: 20 41 20 42 20 20 43 20 44 20 45 20 46 22 00 6C | A B C D E F".l|
00000430: 0C 8E 17 99 3A 41 41 24 B2 22 30 31 32 33 20 34 |....:AA$."0123 4|
00000440: 35 36 37 20 38 39 41 42 20 43 44 45 46 22 3A 81 |567 89AB CDEF":.|
00000450: 20 49 B2 31 20 A4 20 31 39 3A 99 20 22 A0 22 3B | I.1 . 19:. ".";|
00000460: CA 28 41 41 24 2C 49 2C 31 29 3A 82 00 72 0C D3 |.(AA$,I,1):..r..|
00000470: 17 8E 00 8B 0C 58 1B 8F 20 52 45 41 44 20 48 45 |.....X.. READ HE|
00000480: 41 44 45 52 20 46 49 45 4C 44 53 00 95 0C 5D 1B |ADER FIELDS...].|
00000490: 59 59 25 B2 31 00 D7 0C 62 1B 58 58 25 B2 31 36 |YY%.1...b.XX%.16|
000004A0: 3A 44 46 B2 C5 28 58 44 24 29 3A 56 4C B2 38 3A |:DF..(XD$):VL.8:|
000004B0: 56 48 B2 31 31 3A 8D 20 38 38 30 30 3A 44 B2 56 |VH.11:. 8800:D.V|
000004C0: 3A 8B 20 44 B2 38 38 20 A7 20 4D 24 B2 22 58 22 |:. D.88 . M$."X"|
000004D0: 3A 89 20 37 30 39 39 00 EB 0C 67 1B 8B 20 41 41 |:. 7099...g.. AA|
000004E0: B2 31 35 37 20 89 20 37 30 31 30 00 2D 0D 6C 1B |.157 . 7010.-.l.|
000004F0: 58 58 25 B2 32 33 3A 44 46 B2 C5 28 58 54 24 29 |XX%.23:DF..(XT$)|
00000500: 3A 56 4C B2 31 3A 56 48 B2 33 35 3A 8D 20 38 38 |:VL.1:VH.35:. 88|
00000510: 30 30 3A 54 B2 56 3A 8B 20 54 B2 38 38 20 A7 20 |00:T.V:. T.88 . |
00000520: 4D 24 B2 22 58 22 3A 89 20 37 30 39 39 00 41 0D |M$."X":. 7099.A.|
00000530: 6F 1B 8B 20 41 41 B2 31 35 37 20 89 20 37 30 31 |o.. AA.157 . 701|
00000540: 30 00 4F 0D 71 1B 44 46 B2 C5 28 58 42 24 29 00 |0.O.q.DF..(XB$).|
00000550: 89 0D 76 1B 58 58 25 B2 33 30 3A 56 4C B2 30 3A |..v.XX%.30:VL.0:|
00000560: 56 48 B2 53 28 54 29 3A 8D 20 38 38 30 30 3A 42 |VH.S(T):. 8800:B|
00000570: B2 56 3A 8B 20 42 B2 38 38 20 A7 20 4D 24 B2 22 |.V:. B.88 . M$."|
00000580: 58 22 3A 89 20 37 30 39 39 00 9D 0D 7B 1B 8B 20 |X":. 7099...{.. |
00000590: 41 41 B2 31 35 37 20 89 20 37 30 32 30 00 B8 0D |AA.157 . 7020...|
000005A0: 80 1B 9E 20 35 31 30 32 34 2C 33 38 2C 31 3A 41 |... 51024,38,1:A|
000005B0: 41 B2 C2 28 32 35 35 29 00 CC 0D 83 1B 8B 20 41 |A..(255)...... A|
000005C0: 41 B2 31 35 37 20 89 20 37 30 33 30 00 0A 0E 85 |A.157 . 7030....|
000005D0: 1B 8B 20 41 41 B2 31 33 20 B0 20 41 41 B2 31 37 |.. AA.13 . AA.17|
000005E0: 20 B0 20 41 41 B2 31 34 35 20 B0 20 41 41 B2 32 | . AA.145 . AA.2|
000005F0: 39 20 B0 20 41 41 B2 31 35 37 20 A7 20 4D 24 B2 |9 . AA.157 . M$.|
00000600: 58 4D 24 3A 89 20 37 30 37 30 00 30 0E 8A 1B 8B |XM$:. 7070.0....|
00000610: 20 41 41 B2 36 35 20 B0 20 41 41 B2 37 32 20 A7 | AA.65 . AA.72 .|
00000620: 20 4D 24 B2 C7 28 41 41 29 3A 89 20 37 30 37 30 | M$..(AA):. 7070|
00000630: 00 5D 0E 94 1B 8B 20 41 41 B2 38 38 20 B0 20 41 |.].... AA.88 . A|
00000640: 41 B2 39 32 20 B0 20 41 41 B2 31 36 39 20 A7 20 |A.92 . AA.169 . |
00000650: 4D 24 B2 22 58 22 3A 89 20 37 30 39 39 00 85 0E |M$."X":. 7099...|
00000660: 99 1B 99 22 13 22 3B C8 28 58 58 24 2C 33 38 29 |...".";.(XX$,38)|
00000670: 3B C8 28 59 59 24 2C 31 29 3B 58 4D 24 3B 3A 89 |;.(YY$,1);XM$;:.|
00000680: 20 37 30 34 30 00 9E 0E 9E 1B 4C 4C B2 35 30 31 | 7040.....LL.501|
00000690: 32 34 3A 49 49 B2 54 3A 8D 20 38 31 30 30 00 B7 |24:II.T:. 8100..|
000006A0: 0E A0 1B 4C 4C B2 35 30 31 32 37 3A 49 49 B2 42 |...LL.50127:II.B|
000006B0: 3A 8D 20 38 31 30 30 00 F2 0E A2 1B 97 20 35 30 |:. 8100...... 50|
000006C0: 31 33 37 2C 34 38 3A 97 20 35 30 31 33 38 2C 34 |137,48:. 50138,4|
000006D0: 38 3A 97 20 35 30 31 33 39 2C 34 38 3A 97 20 35 |8:. 50139,48:. 5|
000006E0: 30 31 31 35 2C 32 35 35 3A 97 20 35 30 31 31 32 |0115,255:. 50112|
000006F0: 2C 44 00 FF 0E BB 1B 8D 20 37 33 30 30 3A 8E 00 |,D...... 7300:..|
00000700: 1A 0F BC 1B 8F 20 52 45 41 44 20 41 4E 44 20 44 |..... READ AND D|
00000710: 49 53 50 4C 41 59 20 54 2F 42 00 2E 0F C6 1B 53 |ISPLAY T/B.....S|
00000720: 59 B2 34 39 39 32 30 3A 8D 20 38 33 30 30 00 47 |Y.49920:. 8300.G|
00000730: 0F D0 1B 8B 20 4D 24 B2 22 48 22 20 A7 20 97 20 |.... M$."H" . . |
00000740: 35 30 36 39 31 2C 30 00 60 0F DA 1B 8B 20 4D 24 |50691,0.`.... M$|
00000750: B2 22 41 22 20 A7 20 97 20 35 30 36 39 31 2C 31 |."A" . . 50691,1|
00000760: 00 77 0F E4 1B 97 20 35 30 36 39 32 2C 31 3A 20 |.w.... 50692,1: |
00000770: 8F 20 43 4F 4C 4F 52 00 9F 0F EE 1B 97 20 35 30 |. COLOR...... 50|
00000780: 36 38 38 2C 30 3A 97 20 35 30 36 38 39 2C 31 39 |688,0:. 50689,19|
00000790: 36 3A 8F 20 44 41 54 41 20 42 55 46 46 45 52 00 |6:. DATA BUFFER.|
000007A0: C2 0F F8 1B 97 20 35 30 36 39 33 2C 32 30 33 3A |..... 50693,203:|
000007B0: 97 20 35 30 36 39 34 2C 34 3A 8F 20 53 43 52 45 |. 50694,4:. SCRE|
000007C0: 45 4E 00 ED 0F 02 1C 97 20 35 30 36 39 35 2C 32 |EN...... 50695,2|
000007D0: 30 33 3A 97 20 35 30 36 39 36 2C 32 31 36 3A 8F |03:. 50696,216:.|
000007E0: 20 43 4F 4C 4F 52 20 4D 45 4D 4F 52 59 00 03 10 | COLOR MEMORY...|
000007F0: 0C 1C 9E 20 35 30 37 30 34 3A 8F 20 44 49 53 50 |... 50704:. DISP|
00000800: 4C 41 59 00 0F 10 16 1C 97 20 31 39 38 2C 30 00 |LAY...... 198,0.|
00000810: 15 10 1F 1C 8E 00 2A 10 20 1C 8F 20 41 43 43 45 |......*. .. ACCE|
00000820: 50 54 20 43 48 41 4E 47 45 53 00 46 10 22 1C 43 |PT CHANGES.F.".C|
00000830: 4C B2 31 3A 52 57 B2 31 3A 4C 4C B2 35 30 31 37 |L.1:RW.1:LL.5017|
00000840: 36 3A 43 48 B2 30 00 5C 10 2A 1C 8B 20 4D 24 B2 |6:CH.0.\.*.. M$.|
00000850: 22 48 22 20 A7 20 8D 20 38 32 30 30 00 72 10 2C |"H" . . 8200.r.,|
00000860: 1C 8B 20 4D 24 B2 22 41 22 20 A7 20 8D 20 38 32 |.. M$."A" . . 82|
00000870: 35 30 00 90 10 2F 1C 8B 20 52 43 B2 31 34 30 20 |50.../.. RC.140 |
00000880: A7 20 9E 20 35 32 34 38 30 3A 89 20 37 32 30 30 |. . 52480:. 7200|
00000890: 00 AC 10 31 1C 8B 20 52 43 B2 39 32 20 B0 20 52 |...1.. RC.92 . R|
000008A0: 43 B2 31 36 39 20 89 20 37 32 39 39 00 C9 10 34 |C.169 . 7299...4|
000008B0: 1C 8B 20 52 43 B2 31 33 36 20 A7 20 8D 20 38 31 |.. RC.136 . . 81|
000008C0: 35 30 3A 89 20 37 32 31 30 00 F1 10 36 1C 8B 20 |50:. 7210...6.. |
000008D0: 52 43 B2 31 39 20 A7 20 43 4C B2 31 3A 52 57 B2 |RC.19 . CL.1:RW.|
000008E0: 31 3A 4C 4C B2 35 30 31 37 36 3A 89 20 37 32 31 |1:LL.50176:. 721|
000008F0: 30 00 28 11 39 1C 8B 20 52 43 B2 31 33 20 B0 20 |0.(.9.. RC.13 . |
00000900: 52 43 B2 31 33 33 20 B0 20 52 43 B2 31 33 34 20 |RC.133 . RC.134 |
00000910: B0 20 52 43 B2 31 33 35 20 B0 20 52 43 B2 31 33 |. RC.135 . RC.13|
00000920: 39 20 89 20 37 32 35 30 00 3C 11 3B 1C 8B 20 52 |9 . 7250.<.;.. R|
00000930: 43 B2 31 34 35 20 89 20 37 32 34 34 00 50 11 3D |C.145 . 7244.P.=|
00000940: 1C 8B 20 52 43 B2 31 37 20 20 89 20 37 32 34 36 |.. RC.17 . 7246|
00000950: 00 64 11 3E 1C 8B 20 52 43 B2 31 35 37 20 89 20 |.d.>.. RC.157 . |
00000960: 37 32 33 34 00 78 11 40 1C 8B 20 52 43 B2 32 39 |7234.x.@.. RC.29|
00000970: 20 20 89 20 37 32 34 30 00 83 11 41 1C 89 20 37 | . 7240...A.. 7|
00000980: 32 34 30 00 C6 11 42 1C 4C 4C B2 4C 4C AB 31 3A |240...B.LL.LL.1:|
00000990: 43 4C B2 43 4C AB 31 3A 8B 20 43 4C B2 30 20 A7 |CL.CL.1:. CL.0 .|
000009A0: 20 43 4C B2 31 36 3A 52 57 B2 52 57 AB 31 3A 8B | CL.16:RW.RW.1:.|
000009B0: 20 52 57 B2 30 20 A7 20 52 57 B2 31 36 3A 4C 4C | RW.0 . RW.16:LL|
000009C0: B2 35 30 34 33 31 00 D1 11 44 1C 89 20 37 32 31 |.50431...D.. 721|
000009D0: 30 00 14 12 48 1C 4C 4C B2 4C 4C AA 31 3A 43 4C |0...H.LL.LL.1:CL|
000009E0: B2 43 4C AA 31 3A 8B 20 43 4C B2 31 37 20 A7 20 |.CL.1:. CL.17 . |
000009F0: 43 4C B2 31 3A 52 57 B2 52 57 AA 31 3A 8B 20 52 |CL.1:RW.RW.1:. R|
00000A00: 57 B2 31 37 20 A7 20 52 57 B2 31 3A 4C 4C B2 35 |W.17 . RW.1:LL.5|
00000A10: 30 31 37 36 00 1F 12 4A 1C 89 20 37 32 31 30 00 |0176...J.. 7210.|
00000A20: 51 12 4C 1C 4C 4C B2 4C 4C AB 31 36 3A 52 57 B2 |Q.L.LL.LL.16:RW.|
00000A30: 52 57 AB 31 3A 8B 20 4C 4C B3 35 30 31 37 36 20 |RW.1:. LL.50176 |
00000A40: A7 20 4C 4C B2 4C 4C AA 32 35 36 3A 52 57 B2 31 |. LL.LL.256:RW.1|
00000A50: 36 00 5C 12 4D 1C 89 20 37 32 31 30 00 8D 12 4E |6.\.M.. 7210...N|
00000A60: 1C 4C 4C B2 4C 4C AA 31 36 3A 52 57 B2 52 57 AA |.LL.LL.16:RW.RW.|
00000A70: 31 3A 8B 20 4C 4C B1 35 30 34 33 31 20 A7 20 4C |1:. LL.50431 . L|
00000A80: 4C B2 4C 4C AB 32 35 36 3A 52 57 B2 31 00 98 12 |L.LL.256:RW.1...|
00000A90: 4F 1C 89 20 37 32 31 30 00 B6 12 52 1C 8B 20 43 |O.. 7210...R.. C|
00000AA0: 48 B3 B1 30 20 A7 20 53 59 B2 35 30 34 33 32 3A |H..0 . SY.50432:|
00000AB0: 8D 20 38 33 30 30 00 ED 12 53 1C 8B 20 52 43 B2 |. 8300...S.. RC.|
00000AC0: 31 33 33 20 A7 20 42 B2 42 AA 31 3A 8B 20 42 B1 |133 . B.B.1:. B.|
00000AD0: 53 28 54 29 20 A7 20 42 B2 30 3A 54 B2 54 AA 31 |S(T) . B.0:T.T.1|
00000AE0: 3A 8B 20 54 B2 33 36 20 A7 20 54 B2 31 00 01 13 |:. T.36 . T.1...|
00000AF0: 54 1C 8B 20 52 43 B2 31 33 33 20 89 20 37 32 36 |T.. RC.133 . 726|
00000B00: 30 00 14 13 55 1C 8B 20 52 43 B2 31 33 20 89 20 |0...U.. RC.13 . |
00000B10: 37 32 39 39 00 2C 13 56 1C 8B 20 52 43 B2 31 33 |7299.,.V.. RC.13|
00000B20: 39 20 A7 20 54 B2 31 38 3A 42 B2 31 00 4F 13 57 |9 . T.18:B.1.O.W|
00000B30: 1C 8B 20 52 43 B2 31 33 34 20 A7 20 42 B2 42 AB |.. RC.134 . B.B.|
00000B40: 31 3A 8B 20 42 B1 B2 30 20 89 20 37 32 36 30 00 |1:. B..0 . 7260.|
00000B50: 71 13 58 1C 8B 20 52 43 B2 31 33 34 20 A7 20 54 |q.X.. RC.134 . T|
00000B60: B2 54 AB 31 3A 8B 20 54 B2 30 20 A7 20 54 B2 33 |.T.1:. T.0 . T.3|
00000B70: 35 00 87 13 59 1C 8B 20 52 43 B2 31 33 34 20 A7 |5...Y.. RC.134 .|
00000B80: 20 42 B2 53 28 54 29 00 C0 13 5A 1C 8B 20 52 43 | B.S(T)...Z.. RC|
00000B90: B2 31 33 35 20 A7 20 54 B2 C2 28 4C 4C 29 3A 42 |.135 . T..(LL):B|
00000BA0: B2 C2 28 4C 4C AA 31 29 3A 8B 20 54 B3 31 20 B0 |..(LL.1):. T.1 .|
00000BB0: 20 54 B1 33 35 20 A7 20 54 B2 31 38 3A 42 B2 31 | T.35 . T.18:B.1|
00000BC0: 00 D9 13 5B 1C 8B 20 42 B3 30 20 B0 20 42 B1 53 |...[.. B.0 . B.S|
00000BD0: 28 54 29 20 A7 20 42 B2 31 00 09 14 5C 1C 99 22 |(T) . B.1...\.."|
00000BE0: 13 22 3B C8 28 59 59 24 2C 31 29 3B C8 28 58 58 |.";.(YY$,1);.(XX|
00000BF0: 24 2C 32 33 29 3B 22 20 20 9D 9D 22 3B CA 28 C4 |$,23);" ..";.(.|
00000C00: 28 54 29 2C 32 2C 32 29 3B 00 39 14 61 1C 99 22 |(T),2,2);.9.a.."|
00000C10: 13 22 3B C8 28 59 59 24 2C 31 29 3B C8 28 58 58 |.";.(YY$,1);.(XX|
00000C20: 24 2C 33 30 29 3B 22 20 20 9D 9D 22 3B CA 28 C4 |$,30);" ..";.(.|
00000C30: 28 42 29 2C 32 2C 32 29 3B 00 3F 14 83 1C 8E 00 |(B),2,2);.?.....|
00000C40: 5C 14 84 1C 8F 20 44 45 46 41 55 4C 54 20 56 41 |\.... DEFAULT VA|
00000C50: 4C 55 45 53 20 55 50 44 41 54 45 44 00 89 14 86 |LUES UPDATED....|
00000C60: 1C 58 44 24 B2 CA 28 C4 28 44 29 2C 32 2C 32 29 |.XD$..(.(D),2,2)|
00000C70: 3A 8B 20 C3 28 58 44 24 29 B2 31 20 A7 20 58 44 |:. .(XD$).1 . XD|
00000C80: 24 B2 58 44 24 AA 22 A0 22 00 B6 14 88 1C 58 54 |$.XD$.".".....XT|
00000C90: 24 B2 CA 28 C4 28 54 29 2C 32 2C 32 29 3A 8B 20 |$..(.(T),2,2):. |
00000CA0: C3 28 58 54 24 29 B2 31 20 A7 20 58 54 24 B2 58 |.(XT$).1 . XT$.X|
00000CB0: 54 24 AA 22 A0 22 00 E3 14 8A 1C 58 42 24 B2 CA |T$.".".....XB$..|
00000CC0: 28 C4 28 42 29 2C 32 2C 32 29 3A 8B 20 C3 28 58 |(.(B),2,2):. .(X|
00000CD0: 42 24 29 B2 31 20 A7 20 58 42 24 B2 58 42 24 AA |B$).1 . XB$.XB$.|
00000CE0: 22 A0 22 00 EE 14 8C 1C 58 4D 24 B2 4D 24 00 F4 |".".....XM$.M$..|
00000CF0: 14 8D 1C 8E 00 07 15 14 1E 52 52 B2 31 38 3A 97 |.........RR.18:.|
00000D00: 20 36 34 36 2C 31 30 00 45 15 19 1E 8B C5 28 41 | 646,10.E.....(A|
00000D10: 38 24 29 B3 B1 30 A7 99 22 13 22 3B C8 28 59 59 |8$)..0..".";.(YY|
00000D20: 24 2C 37 29 3B A6 30 35 29 3B 41 38 24 3B 22 20 |$,7);.05);A8$;" |
00000D30: 22 3B 42 38 24 3B 22 20 22 3B 43 38 24 3B 22 20 |";B8$;" ";C8$;" |
00000D40: 22 3B 44 38 24 00 7E 15 1E 1E 99 20 22 13 22 3B |";D8$.~.... ".";|
00000D50: C7 28 52 52 29 3B C8 28 59 59 24 2C 35 29 3B A6 |.(RR);.(YY$,5);.|
00000D60: 30 33 29 3B 22 45 2D 52 2D 52 2D 4F 2D 52 22 3B |03);"E-R-R-O-R";|
00000D70: 3A 8B 52 52 B2 31 38 A7 8D 20 35 31 30 30 00 9F |:.RR.18.. 5100..|
00000D80: 15 28 1E 52 52 B2 28 52 52 B2 31 38 29 AC AB 31 |.(.RR.(RR.18)..1|
00000D90: 34 36 AA 28 52 52 B3 B1 31 38 29 AC AB 31 38 00 |46.(RR..18)..18.|
00000DA0: D3 15 32 1E 42 24 B2 22 22 3A 81 20 49 B2 31 20 |..2.B$."":. I.1 |
00000DB0: A4 20 36 30 3A A1 20 41 24 3A 42 24 B2 42 24 AA |. 60:. A$:B$.B$.|
00000DC0: 41 24 3A 82 3A 8B 20 42 24 B2 22 22 20 89 20 37 |A$:.:. B$."" . 7|
00000DD0: 37 31 30 00 0D 16 77 1E 99 C7 28 31 34 36 29 3B |710...w...(146);|
00000DE0: 3A 97 36 34 36 2C 31 35 3A 97 31 38 36 2C 44 44 |:.646,15:.186,DD|
00000DF0: 3A 97 35 30 31 31 33 2C 30 3A 97 31 34 34 2C 30 |:.50113,0:.144,0|
00000E00: 3A 41 38 24 B2 22 22 3A 89 32 30 31 30 00 43 16 |:A8$."":.2010.C.|
00000E10: A4 1F 44 31 B2 B5 28 49 49 AD 31 30 29 3A 44 32 |..D1..(II.10):D2|
00000E20: B2 49 49 AB 44 31 AC 31 30 3A 97 20 4C 4C 2C 44 |.II.D1.10:. LL,D|
00000E30: 31 AA 34 38 3A 97 20 4C 4C AA 31 2C 44 32 AA 34 |1.48:. LL.1,D2.4|
00000E40: 38 3A 8E 00 5C 16 D6 1F 4A 4A B2 30 3A 8B 20 4D |8:..\...JJ.0:. M|
00000E50: 24 B2 22 41 22 20 A7 20 4A 4A B2 31 00 70 16 D8 |$."A" . JJ.1.p..|
00000E60: 1F 8B 20 4A 4A B2 30 20 A7 20 4D 24 B2 22 41 22 |.. JJ.0 . M$."A"|
00000E70: 00 84 16 D9 1F 8B 20 4A 4A B2 31 20 A7 20 4D 24 |...... JJ.1 . M$|
00000E80: B2 22 48 22 00 8F 16 E0 1F 58 4D 24 B2 4D 24 00 |."H".....XM$.M$.|
00000E90: B0 16 E2 1F 99 22 13 22 3B C8 28 58 58 24 2C 33 |.....".";.(XX$,3|
00000EA0: 38 29 3B C8 28 59 59 24 2C 31 29 3B 58 4D 24 3B |8);.(YY$,1);XM$;|
00000EB0: 00 BB 16 EA 1F 8D 20 37 31 32 30 00 C1 16 07 20 |...... 7120.... |
00000EC0: 8E 00 E3 16 08 20 8F 20 47 45 54 20 48 20 4D 4F |..... . GET H MO|
00000ED0: 44 45 20 41 54 20 52 57 2C 43 4C 20 49 4E 54 4F |DE AT RW,CL INTO|
00000EE0: 20 4C 4C 00 FD 16 0F 20 58 58 25 B2 44 43 28 43 | LL.... XX%.DC(C|
00000EF0: 4C 29 3A 59 59 25 B2 44 52 28 52 57 29 00 21 17 |L):YY%.DR(RW).!.|
00000F00: 12 20 9E 20 35 31 30 32 34 2C 58 58 25 2C 59 59 |. . 51024,XX%,YY|
00000F10: 25 3A 4A 4A B2 C2 28 32 35 35 29 3A 52 43 B2 4A |%:JJ..(255):RC.J|
00000F20: 4A 00 46 17 13 20 8B 20 4A 4A B2 39 32 20 B0 20 |J.F.. . JJ.92 . |
00000F30: 4A 4A B2 31 36 39 20 B0 20 4A 4A B2 31 34 30 20 |JJ.169 . JJ.140 |
00000F40: 89 20 38 32 34 39 00 65 17 14 20 8B 20 4A 4A B1 |. 8249.e.. . JJ.|
00000F50: B2 31 33 33 20 AF 20 4A 4A B3 B2 31 33 39 20 89 |.133 . JJ..139 .|
00000F60: 20 38 32 34 39 00 A2 17 17 20 8B 20 4A 4A B2 31 | 8249.... . JJ.1|
00000F70: 33 20 B0 20 4A 4A B2 31 34 35 20 B0 20 4A 4A B2 |3 . JJ.145 . JJ.|
00000F80: 31 37 20 B0 20 4A 4A B2 32 39 20 B0 20 4A 4A B2 |17 . JJ.29 . JJ.|
00000F90: 31 35 37 20 B0 20 4A 4A B2 31 39 20 89 20 38 32 |157 . JJ.19 . 82|
00000FA0: 34 39 00 C7 17 18 20 8B 20 4A 4A B1 34 37 20 AF |49.... . JJ.47 .|
00000FB0: 20 4A 4A B3 35 38 20 A7 20 56 B2 4A 4A AB 34 38 | JJ.58 . V.JJ.48|
00000FC0: 3A 89 20 38 32 32 30 00 EC 17 19 20 8B 20 4A 4A |:. 8220.... . JJ|
00000FD0: B1 36 34 20 AF 20 4A 4A B3 37 31 20 A7 20 56 B2 |.64 . JJ.71 . V.|
00000FE0: 4A 4A AB 35 35 3A 89 20 38 32 32 30 00 F7 17 1A |JJ.55:. 8220....|
00000FF0: 20 89 20 38 32 31 30 00 27 18 1C 20 53 4D B2 31 | . 8210.'.. SM.1|
00001000: 30 32 34 AA 59 59 25 AC 34 30 AA 58 58 25 3A 97 |024.YY%.40.XX%:.|
00001010: 20 53 4D 2C C2 28 53 4D 29 AA 31 32 38 3A 58 58 | SM,.(SM).128:XX|
00001020: 25 B2 58 58 25 AA 31 00 4B 18 1D 20 9E 20 35 31 |%.XX%.1.K.. . 51|
00001030: 30 32 34 2C 58 58 25 2C 59 59 25 3A 4A 4A B2 C2 |024,XX%,YY%:JJ..|
00001040: 28 32 35 35 29 3A 52 43 B2 4A 4A 00 6A 18 1E 20 |(255):RC.JJ.j.. |
00001050: 8B 20 4A 4A B1 B2 31 33 33 20 AF 20 4A 4A B3 B2 |. JJ..133 . JJ..|
00001060: 31 33 39 20 89 20 38 32 34 39 00 A7 18 21 20 8B |139 . 8249...! .|
00001070: 20 4A 4A B2 31 33 20 B0 20 4A 4A B2 31 34 35 20 | JJ.13 . JJ.145 |
00001080: B0 20 4A 4A B2 31 37 20 B0 20 4A 4A B2 32 39 20 |. JJ.17 . JJ.29 |
00001090: B0 20 4A 4A B2 31 35 37 20 B0 20 4A 4A B2 31 39 |. JJ.157 . JJ.19|
000010A0: 20 89 20 38 32 34 39 00 D3 18 22 20 8B 20 4A 4A | . 8249..." . JJ|
000010B0: B1 34 37 20 AF 20 4A 4A B3 35 38 20 A7 20 56 B2 |.47 . JJ.58 . V.|
000010C0: 31 36 AC 56 AA 28 4A 4A AB 34 38 29 3A 89 20 38 |16.V.(JJ.48):. 8|
000010D0: 32 33 30 00 FF 18 23 20 8B 20 4A 4A B1 36 34 20 |230...# . JJ.64 |
000010E0: AF 20 4A 4A B3 37 31 20 A7 20 56 B2 31 36 AC 56 |. JJ.71 . V.16.V|
000010F0: AA 28 4A 4A AB 35 35 29 3A 89 20 38 32 33 30 00 |.(JJ.55):. 8230.|
00001100: 0A 19 24 20 89 20 38 32 32 31 00 41 19 26 20 53 |..$ . 8221.A.& S|
00001110: 4D B2 31 30 32 34 AA 59 59 25 AC 34 30 AA 58 58 |M.1024.YY%.40.XX|
00001120: 25 3A 97 20 53 4D 2C C2 28 53 4D 29 AA 31 32 38 |%:. SM,.(SM).128|
00001130: 3A 97 20 4C 4C 2C 56 3A 43 48 B2 31 3A 52 43 B2 |:. LL,V:CH.1:RC.|
00001140: 30 00 47 19 39 20 8E 00 69 19 3A 20 8F 20 47 45 |0.G.9 ..i.: . GE|
00001150: 54 20 41 20 4D 4F 44 45 20 41 54 20 52 57 2C 43 |T A MODE AT RW,C|
00001160: 4C 20 49 4E 54 4F 20 4C 4C 00 83 19 41 20 58 58 |L INTO LL...A XX|
00001170: 25 B2 44 43 28 43 4C 29 3A 59 59 25 B2 44 52 28 |%.DC(CL):YY%.DR(|
00001180: 52 57 29 00 A7 19 44 20 9E 20 35 31 30 32 34 2C |RW)...D . 51024,|
00001190: 58 58 25 2C 59 59 25 3A 4A 4A B2 C2 28 32 35 35 |XX%,YY%:JJ..(255|
000011A0: 29 3A 52 43 B2 4A 4A 00 CC 19 45 20 8B 20 4A 4A |):RC.JJ...E . JJ|
000011B0: B2 39 32 20 B0 20 4A 4A B2 31 36 39 20 B0 20 4A |.92 . JJ.169 . J|
000011C0: 4A B2 31 34 30 20 89 20 38 32 39 39 00 EB 19 46 |J.140 . 8299...F|
000011D0: 20 8B 20 4A 4A B1 B2 31 33 33 20 AF 20 4A 4A B3 | . JJ..133 . JJ.|
000011E0: B2 31 33 39 20 89 20 38 32 39 39 00 28 1A 49 20 |.139 . 8299.(.I |
000011F0: 8B 20 4A 4A B2 31 33 20 B0 20 4A 4A B2 31 34 35 |. JJ.13 . JJ.145|
00001200: 20 B0 20 4A 4A B2 31 37 20 B0 20 4A 4A B2 32 39 | . JJ.17 . JJ.29|
00001210: 20 B0 20 4A 4A B2 31 35 37 20 B0 20 4A 4A B2 31 | . JJ.157 . JJ.1|
00001220: 39 20 89 20 38 32 39 39 00 43 1A 4A 20 8B 20 4A |9 . 8299.C.J . J|
00001230: 4A B1 33 31 20 AF 20 4A 4A B3 39 35 20 89 20 38 |J.31 . JJ.95 . 8|
00001240: 32 37 30 00 60 1A 4B 20 8B 20 4A 4A B2 31 36 30 |270.`.K . JJ.160|
00001250: 20 20 20 20 20 20 20 20 20 20 89 20 38 32 37 30 | . 8270|
00001260: 00 6B 1A 4C 20 89 20 38 32 36 30 00 A3 1A 4E 20 |.k.L . 8260...N |
00001270: 53 4D B2 31 30 32 34 AA 59 59 25 AC 34 30 AA 58 |SM.1024.YY%.40.X|
00001280: 58 25 3A 97 20 53 4D 2C C2 28 53 4D 29 AA 31 32 |X%:. SM,.(SM).12|
00001290: 38 3A 97 20 4C 4C 2C 4A 4A 3A 43 48 B2 31 3A 52 |8:. LL,JJ:CH.1:R|
000012A0: 43 B2 30 00 A9 1A 6B 20 8E 00 CE 1A 6C 20 41 38 |C.0...k ....l A8|
000012B0: 24 B2 22 22 3A 9E 20 53 59 3A 8B 20 C2 28 35 30 |$."":. SY:. .(50|
000012C0: 31 31 33 29 B3 B1 30 20 89 20 37 37 30 30 00 08 |113)..0 . 7700..|
000012D0: 1B 76 20 9F 20 31 35 2C 44 2C 31 35 3A 84 31 35 |.v . 15,D,15:.15|
000012E0: 2C 41 38 24 2C 42 38 24 2C 43 38 24 2C 44 38 24 |,A8$,B8$,C8$,D8$|
000012F0: 3A A0 20 31 35 3A 8B 20 C5 28 41 38 24 29 B3 B1 |:. 15:. .(A8$)..|
00001300: 30 20 89 20 37 37 30 30 00 0E 1B 80 20 8E 00 3E |0 . 7700.... ..>|
00001310: 1B FC 21 99 22 93 11 11 11 11 11 11 20 20 20 20 |..!."....... |
00001320: 20 20 20 20 20 20 20 20 43 4F 50 59 52 49 47 48 | COPYRIGH|
00001330: 54 20 4E 4F 54 49 43 45 3A 22 3A 99 3A 99 00 6C |T NOTICE:":.:..l|
00001340: 1B 10 22 99 22 20 20 20 28 43 29 20 31 39 38 33 |.."." (C) 1983|
00001350: 20 42 59 20 43 48 52 49 53 53 20 43 4F 4E 53 55 | BY CHRISS CONSU|
00001360: 4C 54 41 4E 54 53 20 49 4E 43 2E 22 00 94 1B 1A |LTANTS INC."....|
00001370: 22 99 3A 99 22 20 20 20 20 20 20 20 20 20 20 41 |".:." A|
00001380: 4C 4C 20 52 49 47 48 54 53 20 52 45 53 45 52 56 |LL RIGHTS RESERV|
00001390: 45 44 2E 22 00 A9 1B 5F 22 81 20 54 B2 31 20 A4 |ED."..._". T.1 .|
000013A0: 20 31 30 30 30 3A 82 3A 8E 00 CD 1B 60 22 8F 20 | 1000:.:....`". |
000013B0: 47 45 54 20 32 20 44 49 47 49 54 20 56 41 4C 55 |GET 2 DIGIT VALU|
000013C0: 45 20 41 54 20 58 58 25 2C 59 59 25 2E 00 E6 1B |E AT XX%,YY%....|
000013D0: 61 22 8F 20 56 3D 20 56 41 4C 55 45 20 52 45 54 |a". V= VALUE RET|
000013E0: 55 52 4E 45 44 2E 00 09 1C 62 22 8F 20 56 4C 3D |URNED....b". VL=|
000013F0: 4C 4F 57 20 4C 49 4D 49 54 20 46 4F 52 20 56 2E |LOW LIMIT FOR V.|
00001400: 20 56 48 3D 48 49 47 48 2E 00 27 1C 63 22 8F 20 | VH=HIGH..'.c". |
00001410: 44 46 3D 44 45 46 41 55 4C 54 20 56 41 4C 55 45 |DF=DEFAULT VALUE|
00001420: 20 46 4F 52 20 56 2E 00 4C 1C 64 22 8F 20 56 3D | FOR V..L.d". V=|
00001430: 38 38 20 49 46 20 22 58 22 20 54 59 50 45 44 20 |88 IF "X" TYPED |
00001440: 46 4F 52 20 31 53 54 20 43 48 41 52 00 72 1C 66 |FOR 1ST CHAR.r.f|
00001450: 22 44 46 24 B2 CA 28 C4 28 44 46 29 2C 32 2C 32 |"DF$..(.(DF),2,2|
00001460: 29 AA 22 A0 22 3A 44 46 24 B2 C8 28 44 46 24 2C |).".":DF$..(DF$,|
00001470: 32 29 00 9F 1C 6A 22 99 22 13 22 3B C8 28 58 58 |2)...j".".";.(XX|
00001480: 24 2C 58 58 25 29 3B C8 28 59 59 24 2C 59 59 25 |$,XX%);.(YY$,YY%|
00001490: 29 3B 44 46 24 3B 3A 56 B2 C5 28 44 46 24 29 00 |);DF$;:V..(DF$).|
000014A0: CD 1C 74 22 9E 20 35 31 30 32 34 2C 58 58 25 2C |..t". 51024,XX%,|
000014B0: 59 59 25 3A 41 41 B2 C2 28 32 35 35 29 3A 8B 20 |YY%:AA..(255):. |
000014C0: 41 41 B2 31 35 37 20 89 20 38 38 39 39 00 F8 1C |AA.157 . 8899...|
000014D0: 79 22 8B 20 41 41 B2 38 38 20 B0 20 41 41 B2 39 |y". AA.88 . AA.9|
000014E0: 32 20 B0 20 41 41 B2 31 36 39 20 A7 20 56 B2 38 |2 . AA.169 . V.8|
000014F0: 38 3A 89 20 38 38 39 39 00 34 1D 7E 22 8B 20 41 |8:. 8899.4.~". A|
00001500: 41 B2 31 33 20 B0 20 41 41 B2 31 37 20 B0 20 41 |A.13 . AA.17 . A|
00001510: 41 B2 31 34 35 20 B0 20 41 41 B2 32 39 20 B0 20 |A.145 . AA.29 . |
00001520: 41 41 B2 31 35 37 20 A7 20 56 B2 44 46 3A 89 20 |AA.157 . V.DF:. |
00001530: 38 38 39 39 00 58 1D 80 22 8B 20 41 41 B1 31 33 |8899.X..". AA.13|
00001540: 33 20 AF 20 41 41 B3 31 34 31 20 A7 20 56 B2 44 |3 . AA.141 . V.D|
00001550: 46 3A 89 20 38 38 39 39 00 7B 1D 83 22 8B 20 41 |F:. 8899.{..". A|
00001560: 41 B2 33 32 20 B0 20 41 41 B2 31 36 30 20 A7 20 |A.32 . AA.160 . |
00001570: 41 31 B2 30 3A 89 20 38 38 35 30 00 A1 1D 88 22 |A1.0:. 8850...."|
00001580: 8B 20 41 41 B1 34 37 20 AF 20 41 41 B3 35 38 20 |. AA.47 . AA.58 |
00001590: A7 20 41 31 B2 41 41 AB 34 38 3A 89 20 38 38 35 |. A1.AA.48:. 885|
000015A0: 30 00 AC 1D 8D 22 89 20 38 38 31 30 00 BC 1D 92 |0....". 8810....|
000015B0: 22 8F 20 32 4E 44 20 44 49 47 49 54 00 DC 1D 94 |". 2ND DIGIT....|
000015C0: 22 9E 20 35 31 30 32 34 2C 58 58 25 AA 31 2C 59 |". 51024,XX%.1,Y|
000015D0: 59 25 3A 41 41 B2 C2 28 32 35 35 29 00 00 1E 95 |Y%:AA..(255)....|
000015E0: 22 8B 20 41 41 B2 39 32 20 B0 20 41 41 B2 31 36 |". AA.92 . AA.16|
000015F0: 39 20 A7 20 41 41 B2 38 38 3A 89 20 38 38 39 39 |9 . AA.88:. 8899|
00001600: 00 31 1E 97 22 8B 20 41 41 B2 33 32 20 B0 20 41 |.1..". AA.32 . A|
00001610: 41 B2 31 36 30 20 B0 20 41 41 B2 31 33 20 A7 20 |A.160 . AA.13 . |
00001620: 41 32 B2 41 31 3A 41 31 B2 30 3A 89 20 38 38 37 |A2.A1:A1.0:. 887|
00001630: 30 00 57 1E 9C 22 8B 20 41 41 B1 34 37 20 AF 20 |0.W..". AA.47 . |
00001640: 41 41 B3 35 38 20 A7 20 41 32 B2 41 41 AB 34 38 |AA.58 . A2.AA.48|
00001650: 3A 89 20 38 38 37 30 00 84 1E A1 22 99 22 13 22 |:. 8870...."."."|
00001660: 3B C8 28 58 58 24 2C 58 58 25 AA 31 29 3B C8 28 |;.(XX$,XX%.1);.(|
00001670: 59 59 24 2C 59 59 25 29 3B 22 A0 22 3B 3A 89 20 |YY$,YY%);".";:. |
00001680: 38 38 35 30 00 A8 1E A6 22 56 B2 31 30 AC 41 31 |8850...."V.10.A1|
00001690: AA 41 32 3A 8B 20 56 B3 56 4C 20 B0 20 56 B1 56 |.A2:. V.VL . V.V|
000016A0: 48 20 89 20 38 38 31 30 00 DF 1E C3 22 99 22 13 |H . 8810....".".|
000016B0: 22 3B C8 28 58 58 24 2C 58 58 25 29 3B C8 28 59 |";.(XX$,XX%);.(Y|
000016C0: 59 24 2C 59 59 25 29 3B C8 28 CA 28 C4 28 56 29 |Y$,YY%);.(.(.(V)|
000016D0: 2C 32 2C 32 29 AA 22 A0 22 2C 32 29 3B 3A 8E 00 |,2,2).".",2);:..|
000016E0: F4 1E 28 23 97 20 31 38 36 2C 52 36 3A 9E 20 35 |..(#. 186,R6:. 5|
000016F0: 31 37 31 32 00 1B 1F 0E 27 9F 20 31 35 2C 38 2C |1712....'. 15,8,|
00001700: 31 35 2C 22 49 30 22 3A A0 20 31 35 3A 94 22 40 |15,"I0":. 15:."@|
00001710: 30 3A 43 4C 4F 4E 45 32 22 2C 38 00 00 00 01 FF |0:CLONE2",8.....|
00001720: 00 31 FF 00 00 |.1... |
..$.... TBEDITOR -- EDIT TRACK/BLOCK.Y..
.. 51,0:. 52,40:. 55,0:. 56,40:. 643,0:.
644,40:......R6.B(186):. 53280,0:. 5328
1,0:. 646,15...... S(35),DR(16),DC(16)..
...DD.B(186).U...XX$."..........":XX$.XX
$.XX$.XX$.XX$.....YY$."..........":YY$.Y
Y$.YY$.YY$.....HX$."0123456789ABCDEF".<.
..XD$."8 ":XT$."18":XB$."1 ":XM$."A".U.L
.. T.1 . 17:S(T).20:..N.V.. T.18. 24:S(T
).18:....`.. T.25. 30:S(T).17:.. .J.. T.
31. 35:S(T).16:..R.... 5,6,7,8,10,11,12,
13,15,16,17,18,20,21,22,23...... 3,5,7,9
,12,14,16,18,21,23,25,27,30,32,34,36...D
.. JJ.1 . 16:. DR(JJ):..:.N.. JJ.1 . 16:
. DC(JJ):..M.P.. PERFORM EDIT.H.Z.. 6000
:. CREATE SCREEN...... 7000:. READ SCREE
N HEADER...... M$."X" . 9000...... 7100:
. DISPLAY T/B.Q.... 7200:. ACCEPT CHANGE
S...... RC.92 . RC.169 . 2000...... RC.1
3 . 2010...... 7070:. 2030.5...SS.54272:
. L.0 . 24:. SS.L,0:..N.... SS.01,95:. S
S.5,15:. SS.15,30:. SS.24,15:. SS.4,21..
.<.. TT.1 . 200 :.:. SS.4,20...K.. L.24.
0 :. SS.L,0:.:....P.. CREATE SCREEN...Z
.."..EDITOR DRIVE=";XD$;" TR.=";XT$;"
ST.=";XB$;" MODO=";XM$......:." 0 1 2
3 4 5 6 7 8 9 A B C D E F".L....:AA$
."0123 4567 89AB CDEF":. I.1 . 19:. " ";
J(AA$,I,1):..R.S.....X.. READ HEADER FIE
LDS...].YY%.1.W.B.XX%.16:DF.E(XD$):VL.8:
VH.11:. 8800:D.V:. D.88 . M$."X":. 7099.
..G.. AA.157 . 7010.-.L.XX%.23:DF.E(XT$)
:VL.1:VH.35:. 8800:T.V:. T.88 . M$."X":.
7099.A.O.. AA.157 . 7010.O.Q.DF.E(XB$).
..V.XX%.30:VL.0:VH.S(T):. 8800:B.V:. B.8
8 . M$."X":. 7099...{.. AA.157 . 7020...
... 51024,38,1:AA.B(255).L.... AA.157 .
7030...... AA.13 . AA.17 . AA.145 . AA.2
9 . AA.157 . M$.XM$:. 7070.0.... AA.65 .
AA.72 . M$.G(AA):. 7070.].... AA.88 . A
A.92 . AA.169 . M$."X":. 7099......".";H
(XX$,38);H(YY$,1);XM$;:. 7040.....LL.501
24:II.T:. 8100... .LL.50127:II.B:. 8100.
..... 50137,48:. 50138,48:. 50139,48:. 5
0115,255:. 50112,D...... 7300:....... RE
AD AND DISPLAY T/B...F.SY.49920:. 8300.G
.P.. M$."H" . . 50691,0.`.Z.. M$."A" . .
50691,1.W.... 50692,1: . COLOR...... 50
688,0:. 50689,196:. DATA BUFFER.B.... 50
693,203:. 50694,4:. SCREEN...... 50695,2
03:. 50696,216:. COLOR MEMORY...... 5070
4:. DISPLAY...... 198,0.......*. .. ACCE
PT CHANGES.F.".CL.1:RW.1:LL.50176:CH.0.\
.*.. M$."H" . . 8200.R.,.. M$."A" . . 82
50.../.. RC.140 . . 52480:. 7200...1.. R
C.92 . RC.169 . 7299.I.4.. RC.136 . . 81
50:. 7210...6.. RC.19 . CL.1:RW.1:LL.501
76:. 7210.(.9.. RC.13 . RC.133 . RC.134
. RC.135 . RC.139 . 7250.<.;.. RC.145 .
7244.P.=.. RC.17 . 7246.D.>.. RC.157 .
7234.X.@.. RC.29 . 7240...A.. 7240.F.B.
LL.LL.1:CL.CL.1:. CL.0 . CL.16:RW.RW.1:.
RW.0 . RW.16:LL.50431.Q.D.. 7210...H.LL
.LL.1:CL.CL.1:. CL.17 . CL.1:RW.RW.1:. R
W.17 . RW.1:LL.50176...J.. 7210.Q.L.LL.L
L.16:RW.RW.1:. LL.50176 . LL.LL.256:RW.1
6.\.M.. 7210...N.LL.LL.16:RW.RW.1:. LL.5
0431 . LL.LL.256:RW.1...O.. 7210...R.. C
H..0 . SY.50432:. 8300...S.. RC.133 . B.
B.1:. B.S(T) . B.0:T.T.1:. T.36 . T.1...
T.. RC.133 . 7260...U.. RC.13 . 7299.,.V
.. RC.139 . T.18:B.1.O.W.. RC.134 . B.B.
1:. B..0 . 7260.Q.X.. RC.134 . T.T.1:. T
.0 . T.35...Y.. RC.134 . B.S(T)...Z.. RC
.135 . T.B(LL):B.B(LL.1):. T.1 . T.35 .
T.18:B.1.Y.[.. B.0 . B.S(T) . B.1...\.."
.";H(YY$,1);H(XX$,23);" ..";J(D(T),2,2)
;.9.A..".";H(YY$,1);H(XX$,30);" ..";J(D
(B),2,2);.?.....\.... DEFAULT VALUES UPD
ATED.....XD$.J(D(D),2,2):. C(XD$).1 . XD
$.XD$." ".....XT$.J(D(T),2,2):. C(XT$).1
. XT$.XT$." ".....XB$.J(D(B),2,2):. C(X
B$).1 . XB$.XB$." ".....XM$.M$..........
.RR.18:. 646,10.E....E(A8$)..0..".";H(YY
$,7);.05);A8$;" ";B8$;" ";C8$;" ";D8$.~.
... ".";G(RR);H(YY$,5);.03);"E-R-R-O-R";
:.RR.18.. 5100...(.RR.(RR.18)..146.(RR..
18)..18.S.2.B$."":. I.1 . 60:. A$:B$.B$.
A$:.:. B$."" . 7710...W..G(146);:.646,15
:.186,DD:.50113,0:.144,0:A8$."":.2010.C.
..D1..(II.10):D2.II.D1.10:. LL,D1.48:. L
L.1,D2.48:..\.V.JJ.0:. M$."A" . JJ.1.P.X
.. JJ.0 . M$."A"...Y.. JJ.1 . M$."H"....
.XM$.M$......".";H(XX$,38);H(YY$,1);XM$;
...... 7120.A.. ..... . GET H MODE AT RW
,CL INTO LL.... XX%.DC(CL):YY%.DR(RW).!.
. . 51024,XX%,YY%:JJ.B(255):RC.JJ.F.. .
JJ.92 . JJ.169 . JJ.140 . 8249.E.. . JJ.
.133 . JJ..139 . 8249.... . JJ.13 . JJ.1
45 . JJ.17 . JJ.29 . JJ.157 . JJ.19 . 82
49.G.. . JJ.47 . JJ.58 . V.JJ.48:. 8220.
... . JJ.64 . JJ.71 . V.JJ.55:. 8220....
. 8210.'.. SM.1024.YY%.40.XX%:. SM,B(SM
).128:XX%.XX%.1.K.. . 51024,XX%,YY%:JJ.B
(255):RC.JJ.J.. . JJ..133 . JJ..139 . 82
49...! . JJ.13 . JJ.145 . JJ.17 . JJ.29
. JJ.157 . JJ.19 . 8249.S." . JJ.47 . JJ
.58 . V.16.V.(JJ.48):. 8230...# . JJ.64
. JJ.71 . V.16.V.(JJ.55):. 8230...$ . 82
21.A.& SM.1024.YY%.40.XX%:. SM,B(SM).128
:. LL,V:CH.1:RC.0.G.9 ..I.: . GET A MODE
AT RW,CL INTO LL...A XX%.DC(CL):YY%.DR(
RW)...D . 51024,XX%,YY%:JJ.B(255):RC.JJ.
L.E . JJ.92 . JJ.169 . JJ.140 . 8299...F
. JJ..133 . JJ..139 . 8299.(.I . JJ.13
. JJ.145 . JJ.17 . JJ.29 . JJ.157 . JJ.1
9 . 8299.C.J . JJ.31 . JJ.95 . 8270.`.K
. JJ.160 . 8270.K.L . 8260...N
SM.1024.YY%.40.XX%:. SM,B(SM).128:. LL,J
J:CH.1:RC.0...K ..N.L A8$."":. SY:. B(50
113)..0 . 7700...V . 15,D,15:.15,A8$,B8$
,C8$,D8$: 15:. E(A8$)..0 . 7700.... ..>
..!."....... COPYRIGHT NOTICE
:":.:..L.."." (C) 1983 BY CHRISS CONSU
LTANTS INC."....".:." ALL RIGHT
S RESERVED."..._". T.1 . 1000:.:..M.`".
GET 2 DIGIT VALUE AT XX%,YY%....A". V= V
ALUE RETURNED....B". VL=LOW LIMIT FOR V.
VH=HIGH..'.C". DF=DEFAULT VALUE FOR V..
L.D". V=88 IF "X" TYPED FOR 1ST CHAR.R.F
"DF$.J(D(DF),2,2)." ":DF$.H(DF$,2)...J".
".";H(XX$,XX%);H(YY$,YY%);DF$;:V.E(DF$).
M.T". 51024,XX%,YY%:AA.B(255):. AA.157 .
8899...Y". AA.88 . AA.92 . AA.169 . V.8
8:. 8899.4.~". AA.13 . AA.17 . AA.145 .
AA.29 . AA.157 . V.DF:. 8899.X..". AA.13
3 . AA.141 . V.DF:. 8899.{..". AA.32 . A
A.160 . A1.0:. 8850....". AA.47 . AA.58
. A1.AA.48:. 8850....". 8810....". 2ND D
IGIT....". 51024,XX%.1,YY%:AA.B(255)....
". AA.92 . AA.169 . AA.88:. 8899.1..". A
A.32 . AA.160 . AA.13 . A2.A1:A1.0:. 887
0.W..". AA.47 . AA.58 . A2.AA.48:. 8870.
...".".";H(XX$,XX%.1);H(YY$,YY%);" ";:.
8850...."V.10.A1.A2:. V.VL . V.VH . 8810
...C".".";H(XX$,XX%);H(YY$,YY%);H(J(D(V)
,2,2)." ",2);:....(#. 186,R6:. 51712....
'. 15,8,15,"I0": 15:."@0:CLONE2",8.....
.1...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL