CLONE2
FILE INFORMATION
FILENAME(S): CLONE2
FILE TYPE(S): PRG
FILE SIZE: 5.8K
FIRST SEEN: 2025-10-19 22:48:37
APPEARS ON: 1 disk(s)
FILE HASH
0d794cc6d0610651c2263a53f931877bed07d79d2191e33ea8d3d6c66315917c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| COPY DISK | CLONE2 | PRG | Radd Maxx | 26 | 3 | 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 83 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 00 9D 08 EC 03 86 20 53 28 33 35 29 2C |6,1...... S(35),|
00000090: 44 52 28 31 36 29 2C 44 43 28 31 36 29 00 AB 08 |DR(16),DC(16)...|
000000A0: F2 03 44 44 B2 C2 28 31 38 36 29 00 D4 08 F4 03 |..DD..(186).....|
000000B0: 58 58 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 |XX$.".........."|
000000C0: 3A 58 58 24 B2 58 58 24 AA 58 58 24 AA 58 58 24 |:XX$.XX$.XX$.XX$|
000000D0: AA 58 58 24 00 F9 08 F6 03 59 59 24 B2 22 11 11 |.XX$.....YY$."..|
000000E0: 11 11 11 11 11 11 11 11 22 3A 59 59 24 B2 59 59 |........":YY$.YY|
000000F0: 24 AA 59 59 24 AA 59 59 24 00 14 09 F8 03 48 58 |$.YY$.YY$.....HX|
00000100: 24 B2 22 30 31 32 33 34 35 36 37 38 39 41 42 43 |$."0123456789ABC|
00000110: 44 45 46 22 00 3B 09 FC 03 58 44 24 B2 22 38 20 |DEF".;...XD$."8 |
00000120: 22 3A 58 54 24 B2 22 31 38 22 3A 58 42 24 B2 22 |":XT$."18":XB$."|
00000130: 31 20 22 3A 58 4D 24 B2 22 41 22 00 54 09 4C 04 |1 ":XM$."A".T.L.|
00000140: 81 20 54 B2 31 20 A4 20 31 37 3A 53 28 54 29 B2 |. T.1 . 17:S(T).|
00000150: 32 30 3A 82 00 6D 09 56 04 81 20 54 B2 31 38 A4 |20:..m.V.. T.18.|
00000160: 20 32 34 3A 53 28 54 29 B2 31 38 3A 82 00 86 09 | 24:S(T).18:....|
00000170: 60 04 81 20 54 B2 32 35 A4 20 33 30 3A 53 28 54 |`.. T.25. 30:S(T|
00000180: 29 B2 31 37 3A 82 00 9F 09 6A 04 81 20 54 B2 33 |).17:....j.. T.3|
00000190: 31 A4 20 33 35 3A 53 28 54 29 B2 31 36 3A 82 00 |1. 35:S(T).16:..|
000001A0: D1 09 B0 04 83 20 35 2C 36 2C 37 2C 38 2C 31 30 |..... 5,6,7,8,10|
000001B0: 2C 31 31 2C 31 32 2C 31 33 2C 31 35 2C 31 36 2C |,11,12,13,15,16,|
000001C0: 31 37 2C 31 38 2C 32 30 2C 32 31 2C 32 32 2C 32 |17,18,20,21,22,2|
000001D0: 33 00 03 0A BA 04 83 20 33 2C 35 2C 37 2C 39 2C |3...... 3,5,7,9,|
000001E0: 31 32 2C 31 34 2C 31 36 2C 31 38 2C 32 31 2C 32 |12,14,16,18,21,2|
000001F0: 33 2C 32 35 2C 32 37 2C 33 30 2C 33 32 2C 33 34 |3,25,27,30,32,34|
00000200: 2C 33 36 00 1E 0A C4 04 81 20 4A 4A B2 31 20 A4 |,36...... JJ.1 .|
00000210: 20 31 36 3A 87 20 44 52 28 4A 4A 29 3A 82 00 39 | 16:. DR(JJ):..9|
00000220: 0A CE 04 81 20 4A 4A B2 31 20 A4 20 31 36 3A 87 |.... JJ.1 . 16:.|
00000230: 20 44 43 28 4A 4A 29 3A 82 00 4C 0A D0 07 8F 20 | DC(JJ):..L.... |
00000240: 50 45 52 46 4F 52 4D 20 45 44 49 54 00 67 0A DA |PERFORM EDIT.g..|
00000250: 07 8D 20 36 30 30 30 3A 8F 20 43 52 45 41 54 45 |.. 6000:. CREATE|
00000260: 20 53 43 52 45 45 4E 00 87 0A E4 07 8D 20 37 30 | SCREEN...... 70|
00000270: 30 30 3A 8F 20 52 45 41 44 20 53 43 52 45 45 4E |00:. READ SCREEN|
00000280: 20 48 45 41 44 45 52 00 9B 0A E9 07 8B 20 4D 24 | HEADER...... M$|
00000290: B2 22 58 22 20 89 20 39 30 30 30 00 B4 0A EE 07 |."X" . 9000.....|
000002A0: 8D 20 37 31 30 30 3A 8F 20 44 49 53 50 4C 41 59 |. 7100:. DISPLAY|
000002B0: 20 54 2F 42 00 D0 0A F8 07 8D 20 37 32 30 30 3A | T/B...... 7200:|
000002C0: 8F 20 41 43 43 45 50 54 20 43 48 41 4E 47 45 53 |. ACCEPT CHANGES|
000002D0: 00 EC 0A FD 07 8B 20 52 43 B2 39 32 20 B0 20 52 |...... RC.92 . R|
000002E0: 43 B2 31 36 39 20 89 20 32 30 30 30 00 FF 0A 02 |C.169 . 2000....|
000002F0: 08 8B 20 52 43 B2 31 33 20 89 20 32 30 31 30 00 |.. RC.13 . 2010.|
00000300: 11 0B 0C 08 8D 20 37 30 37 30 3A 89 20 32 30 33 |..... 7070:. 203|
00000310: 30 00 34 0B EC 13 53 53 B2 35 34 32 37 32 3A 81 |0.4...SS.54272:.|
00000320: 20 4C B2 30 20 A4 20 32 34 3A 97 20 53 53 AA 4C | L.0 . 24:. SS.L|
00000330: 2C 30 3A 82 00 6D 0B 0A 14 97 20 53 53 AA 30 31 |,0:..m.... SS.01|
00000340: 2C 39 35 3A 97 20 53 53 AA 35 2C 31 35 3A 97 20 |,95:. SS.5,15:. |
00000350: 53 53 AA 31 35 2C 33 30 3A 97 20 53 53 AA 32 34 |SS.15,30:. SS.24|
00000360: 2C 31 35 3A 97 20 53 53 AA 34 2C 32 31 00 8B 0B |,15:. SS.4,21...|
00000370: 3C 14 81 20 54 54 B2 31 20 A4 20 32 30 30 20 3A |<.. TT.1 . 200 :|
00000380: 82 3A 97 20 53 53 AA 34 2C 32 30 00 A7 0B 4B 14 |.:. SS.4,20...K.|
00000390: 81 20 4C B2 32 34 A4 20 30 20 3A 97 20 53 53 AA |. L.24. 0 :. SS.|
000003A0: 4C 2C 30 3A 82 3A 8E 00 BB 0B 70 17 8F 20 43 52 |L,0:.:....p.. CR|
000003B0: 45 41 54 45 20 53 43 52 45 45 4E 00 FE 0B 7A 17 |EATE SCREEN...z.|
000003C0: 99 22 93 11 54 42 2F 45 44 49 54 4F 52 20 20 44 |."..TB/EDITOR D|
000003D0: 49 53 4B 3D 22 3B 58 44 24 3B 22 20 54 52 4B 3D |ISK=";XD$;" TRK=|
000003E0: 22 3B 58 54 24 3B 22 20 42 4C 4B 3D 22 3B 58 42 |";XT$;" BLK=";XB|
000003F0: 24 3B 22 20 4D 4F 44 45 3D 22 3B 58 4D 24 00 2D |$;" MODE=";XM$.-|
00000400: 0C 84 17 99 3A 99 22 20 20 20 30 20 31 20 32 20 |....:." 0 1 2 |
00000410: 33 20 20 34 20 35 20 36 20 37 20 20 38 20 39 20 |3 4 5 6 7 8 9 |
00000420: 41 20 42 20 20 43 20 44 20 45 20 46 22 00 6B 0C |A B C D E F".k.|
00000430: 8E 17 99 3A 41 41 24 B2 22 30 31 32 33 20 34 35 |...:AA$."0123 45|
00000440: 36 37 20 38 39 41 42 20 43 44 45 46 22 3A 81 20 |67 89AB CDEF":. |
00000450: 49 B2 31 20 A4 20 31 39 3A 99 20 22 A0 22 3B CA |I.1 . 19:. ".";.|
00000460: 28 41 41 24 2C 49 2C 31 29 3A 82 00 71 0C D3 17 |(AA$,I,1):..q...|
00000470: 8E 00 8A 0C 58 1B 8F 20 52 45 41 44 20 48 45 41 |....X.. READ HEA|
00000480: 44 45 52 20 46 49 45 4C 44 53 00 94 0C 5D 1B 59 |DER FIELDS...].Y|
00000490: 59 25 B2 31 00 D6 0C 62 1B 58 58 25 B2 31 36 3A |Y%.1...b.XX%.16:|
000004A0: 44 46 B2 C5 28 58 44 24 29 3A 56 4C B2 38 3A 56 |DF..(XD$):VL.8:V|
000004B0: 48 B2 31 31 3A 8D 20 38 38 30 30 3A 44 B2 56 3A |H.11:. 8800:D.V:|
000004C0: 8B 20 44 B2 38 38 20 A7 20 4D 24 B2 22 58 22 3A |. D.88 . M$."X":|
000004D0: 89 20 37 30 39 39 00 EA 0C 67 1B 8B 20 41 41 B2 |. 7099...g.. AA.|
000004E0: 31 35 37 20 89 20 37 30 31 30 00 2C 0D 6C 1B 58 |157 . 7010.,.l.X|
000004F0: 58 25 B2 32 33 3A 44 46 B2 C5 28 58 54 24 29 3A |X%.23:DF..(XT$):|
00000500: 56 4C B2 31 3A 56 48 B2 33 35 3A 8D 20 38 38 30 |VL.1:VH.35:. 880|
00000510: 30 3A 54 B2 56 3A 8B 20 54 B2 38 38 20 A7 20 4D |0:T.V:. T.88 . M|
00000520: 24 B2 22 58 22 3A 89 20 37 30 39 39 00 40 0D 6F |$."X":. 7099.@.o|
00000530: 1B 8B 20 41 41 B2 31 35 37 20 89 20 37 30 31 30 |.. AA.157 . 7010|
00000540: 00 4E 0D 71 1B 44 46 B2 C5 28 58 42 24 29 00 88 |.N.q.DF..(XB$)..|
00000550: 0D 76 1B 58 58 25 B2 33 30 3A 56 4C B2 30 3A 56 |.v.XX%.30:VL.0:V|
00000560: 48 B2 53 28 54 29 3A 8D 20 38 38 30 30 3A 42 B2 |H.S(T):. 8800:B.|
00000570: 56 3A 8B 20 42 B2 38 38 20 A7 20 4D 24 B2 22 58 |V:. B.88 . M$."X|
00000580: 22 3A 89 20 37 30 39 39 00 9C 0D 7B 1B 8B 20 41 |":. 7099...{.. A|
00000590: 41 B2 31 35 37 20 89 20 37 30 32 30 00 B7 0D 80 |A.157 . 7020....|
000005A0: 1B 9E 20 35 31 30 32 34 2C 33 38 2C 31 3A 41 41 |.. 51024,38,1:AA|
000005B0: B2 C2 28 32 35 35 29 00 CB 0D 83 1B 8B 20 41 41 |..(255)...... AA|
000005C0: B2 31 35 37 20 89 20 37 30 33 30 00 09 0E 85 1B |.157 . 7030.....|
000005D0: 8B 20 41 41 B2 31 33 20 B0 20 41 41 B2 31 37 20 |. AA.13 . AA.17 |
000005E0: B0 20 41 41 B2 31 34 35 20 B0 20 41 41 B2 32 39 |. AA.145 . AA.29|
000005F0: 20 B0 20 41 41 B2 31 35 37 20 A7 20 4D 24 B2 58 | . AA.157 . M$.X|
00000600: 4D 24 3A 89 20 37 30 37 30 00 2F 0E 8A 1B 8B 20 |M$:. 7070./.... |
00000610: 41 41 B2 36 35 20 B0 20 41 41 B2 37 32 20 A7 20 |AA.65 . AA.72 . |
00000620: 4D 24 B2 C7 28 41 41 29 3A 89 20 37 30 37 30 00 |M$..(AA):. 7070.|
00000630: 5C 0E 94 1B 8B 20 41 41 B2 38 38 20 B0 20 41 41 |\.... AA.88 . AA|
00000640: B2 39 32 20 B0 20 41 41 B2 31 36 39 20 A7 20 4D |.92 . AA.169 . M|
00000650: 24 B2 22 58 22 3A 89 20 37 30 39 39 00 84 0E 99 |$."X":. 7099....|
00000660: 1B 99 22 13 22 3B C8 28 58 58 24 2C 33 38 29 3B |..".";.(XX$,38);|
00000670: C8 28 59 59 24 2C 31 29 3B 58 4D 24 3B 3A 89 20 |.(YY$,1);XM$;:. |
00000680: 37 30 34 30 00 9D 0E 9E 1B 4C 4C B2 35 30 31 32 |7040.....LL.5012|
00000690: 34 3A 49 49 B2 54 3A 8D 20 38 31 30 30 00 B6 0E |4:II.T:. 8100...|
000006A0: A0 1B 4C 4C B2 35 30 31 32 37 3A 49 49 B2 42 3A |..LL.50127:II.B:|
000006B0: 8D 20 38 31 30 30 00 F1 0E A2 1B 97 20 35 30 31 |. 8100...... 501|
000006C0: 33 37 2C 34 38 3A 97 20 35 30 31 33 38 2C 34 38 |37,48:. 50138,48|
000006D0: 3A 97 20 35 30 31 33 39 2C 34 38 3A 97 20 35 30 |:. 50139,48:. 50|
000006E0: 31 31 35 2C 32 35 35 3A 97 20 35 30 31 31 32 2C |115,255:. 50112,|
000006F0: 44 00 FE 0E BB 1B 8D 20 37 33 30 30 3A 8E 00 19 |D...... 7300:...|
00000700: 0F BC 1B 8F 20 52 45 41 44 20 41 4E 44 20 44 49 |.... READ AND DI|
00000710: 53 50 4C 41 59 20 54 2F 42 00 2D 0F C6 1B 53 59 |SPLAY T/B.-...SY|
00000720: B2 34 39 39 32 30 3A 8D 20 38 33 30 30 00 46 0F |.49920:. 8300.F.|
00000730: D0 1B 8B 20 4D 24 B2 22 48 22 20 A7 20 97 20 35 |... M$."H" . . 5|
00000740: 30 36 39 31 2C 30 00 5F 0F DA 1B 8B 20 4D 24 B2 |0691,0._.... M$.|
00000750: 22 41 22 20 A7 20 97 20 35 30 36 39 31 2C 31 00 |"A" . . 50691,1.|
00000760: 76 0F E4 1B 97 20 35 30 36 39 32 2C 31 3A 20 8F |v.... 50692,1: .|
00000770: 20 43 4F 4C 4F 52 00 9E 0F EE 1B 97 20 35 30 36 | COLOR...... 506|
00000780: 38 38 2C 30 3A 97 20 35 30 36 38 39 2C 31 39 36 |88,0:. 50689,196|
00000790: 3A 8F 20 44 41 54 41 20 42 55 46 46 45 52 00 C1 |:. DATA BUFFER..|
000007A0: 0F F8 1B 97 20 35 30 36 39 33 2C 32 30 33 3A 97 |.... 50693,203:.|
000007B0: 20 35 30 36 39 34 2C 34 3A 8F 20 53 43 52 45 45 | 50694,4:. SCREE|
000007C0: 4E 00 EC 0F 02 1C 97 20 35 30 36 39 35 2C 32 30 |N...... 50695,20|
000007D0: 33 3A 97 20 35 30 36 39 36 2C 32 31 36 3A 8F 20 |3:. 50696,216:. |
000007E0: 43 4F 4C 4F 52 20 4D 45 4D 4F 52 59 00 02 10 0C |COLOR MEMORY....|
000007F0: 1C 9E 20 35 30 37 30 34 3A 8F 20 44 49 53 50 4C |.. 50704:. DISPL|
00000800: 41 59 00 0E 10 16 1C 97 20 31 39 38 2C 30 00 14 |AY...... 198,0..|
00000810: 10 1F 1C 8E 00 29 10 20 1C 8F 20 41 43 43 45 50 |.....). .. ACCEP|
00000820: 54 20 43 48 41 4E 47 45 53 00 45 10 22 1C 43 4C |T CHANGES.E.".CL|
00000830: B2 31 3A 52 57 B2 31 3A 4C 4C B2 35 30 31 37 36 |.1:RW.1:LL.50176|
00000840: 3A 43 48 B2 30 00 5B 10 2A 1C 8B 20 4D 24 B2 22 |:CH.0.[.*.. M$."|
00000850: 48 22 20 A7 20 8D 20 38 32 30 30 00 71 10 2C 1C |H" . . 8200.q.,.|
00000860: 8B 20 4D 24 B2 22 41 22 20 A7 20 8D 20 38 32 35 |. M$."A" . . 825|
00000870: 30 00 8F 10 2F 1C 8B 20 52 43 B2 31 34 30 20 A7 |0.../.. RC.140 .|
00000880: 20 9E 20 35 32 34 38 30 3A 89 20 37 32 30 30 00 | . 52480:. 7200.|
00000890: AB 10 31 1C 8B 20 52 43 B2 39 32 20 B0 20 52 43 |..1.. RC.92 . RC|
000008A0: B2 31 36 39 20 89 20 37 32 39 39 00 C8 10 34 1C |.169 . 7299...4.|
000008B0: 8B 20 52 43 B2 31 33 36 20 A7 20 8D 20 38 31 35 |. RC.136 . . 815|
000008C0: 30 3A 89 20 37 32 31 30 00 F0 10 36 1C 8B 20 52 |0:. 7210...6.. R|
000008D0: 43 B2 31 39 20 A7 20 43 4C B2 31 3A 52 57 B2 31 |C.19 . CL.1:RW.1|
000008E0: 3A 4C 4C B2 35 30 31 37 36 3A 89 20 37 32 31 30 |:LL.50176:. 7210|
000008F0: 00 27 11 39 1C 8B 20 52 43 B2 31 33 20 B0 20 52 |.'.9.. RC.13 . R|
00000900: 43 B2 31 33 33 20 B0 20 52 43 B2 31 33 34 20 B0 |C.133 . RC.134 .|
00000910: 20 52 43 B2 31 33 35 20 B0 20 52 43 B2 31 33 39 | RC.135 . RC.139|
00000920: 20 89 20 37 32 35 30 00 3B 11 3B 1C 8B 20 52 43 | . 7250.;.;.. RC|
00000930: B2 31 34 35 20 89 20 37 32 34 34 00 4F 11 3D 1C |.145 . 7244.O.=.|
00000940: 8B 20 52 43 B2 31 37 20 20 89 20 37 32 34 36 00 |. RC.17 . 7246.|
00000950: 63 11 3E 1C 8B 20 52 43 B2 31 35 37 20 89 20 37 |c.>.. RC.157 . 7|
00000960: 32 33 34 00 77 11 40 1C 8B 20 52 43 B2 32 39 20 |234.w.@.. RC.29 |
00000970: 20 89 20 37 32 34 30 00 82 11 41 1C 89 20 37 32 | . 7240...A.. 72|
00000980: 34 30 00 C5 11 42 1C 4C 4C B2 4C 4C AB 31 3A 43 |40...B.LL.LL.1:C|
00000990: 4C B2 43 4C AB 31 3A 8B 20 43 4C B2 30 20 A7 20 |L.CL.1:. CL.0 . |
000009A0: 43 4C B2 31 36 3A 52 57 B2 52 57 AB 31 3A 8B 20 |CL.16:RW.RW.1:. |
000009B0: 52 57 B2 30 20 A7 20 52 57 B2 31 36 3A 4C 4C B2 |RW.0 . RW.16:LL.|
000009C0: 35 30 34 33 31 00 D0 11 44 1C 89 20 37 32 31 30 |50431...D.. 7210|
000009D0: 00 13 12 48 1C 4C 4C B2 4C 4C AA 31 3A 43 4C B2 |...H.LL.LL.1:CL.|
000009E0: 43 4C AA 31 3A 8B 20 43 4C B2 31 37 20 A7 20 43 |CL.1:. CL.17 . C|
000009F0: 4C B2 31 3A 52 57 B2 52 57 AA 31 3A 8B 20 52 57 |L.1:RW.RW.1:. RW|
00000A00: B2 31 37 20 A7 20 52 57 B2 31 3A 4C 4C B2 35 30 |.17 . RW.1:LL.50|
00000A10: 31 37 36 00 1E 12 4A 1C 89 20 37 32 31 30 00 50 |176...J.. 7210.P|
00000A20: 12 4C 1C 4C 4C B2 4C 4C AB 31 36 3A 52 57 B2 52 |.L.LL.LL.16:RW.R|
00000A30: 57 AB 31 3A 8B 20 4C 4C B3 35 30 31 37 36 20 A7 |W.1:. LL.50176 .|
00000A40: 20 4C 4C B2 4C 4C AA 32 35 36 3A 52 57 B2 31 36 | LL.LL.256:RW.16|
00000A50: 00 5B 12 4D 1C 89 20 37 32 31 30 00 8C 12 4E 1C |.[.M.. 7210...N.|
00000A60: 4C 4C B2 4C 4C AA 31 36 3A 52 57 B2 52 57 AA 31 |LL.LL.16:RW.RW.1|
00000A70: 3A 8B 20 4C 4C B1 35 30 34 33 31 20 A7 20 4C 4C |:. LL.50431 . LL|
00000A80: B2 4C 4C AB 32 35 36 3A 52 57 B2 31 00 97 12 4F |.LL.256:RW.1...O|
00000A90: 1C 89 20 37 32 31 30 00 B5 12 52 1C 8B 20 43 48 |.. 7210...R.. CH|
00000AA0: B3 B1 30 20 A7 20 53 59 B2 35 30 34 33 32 3A 8D |..0 . SY.50432:.|
00000AB0: 20 38 33 30 30 00 EC 12 53 1C 8B 20 52 43 B2 31 | 8300...S.. RC.1|
00000AC0: 33 33 20 A7 20 42 B2 42 AA 31 3A 8B 20 42 B1 53 |33 . B.B.1:. B.S|
00000AD0: 28 54 29 20 A7 20 42 B2 30 3A 54 B2 54 AA 31 3A |(T) . B.0:T.T.1:|
00000AE0: 8B 20 54 B2 33 36 20 A7 20 54 B2 31 00 00 13 54 |. T.36 . T.1...T|
00000AF0: 1C 8B 20 52 43 B2 31 33 33 20 89 20 37 32 36 30 |.. RC.133 . 7260|
00000B00: 00 13 13 55 1C 8B 20 52 43 B2 31 33 20 89 20 37 |...U.. RC.13 . 7|
00000B10: 32 39 39 00 2B 13 56 1C 8B 20 52 43 B2 31 33 39 |299.+.V.. RC.139|
00000B20: 20 A7 20 54 B2 31 38 3A 42 B2 31 00 4E 13 57 1C | . T.18:B.1.N.W.|
00000B30: 8B 20 52 43 B2 31 33 34 20 A7 20 42 B2 42 AB 31 |. RC.134 . B.B.1|
00000B40: 3A 8B 20 42 B1 B2 30 20 89 20 37 32 36 30 00 70 |:. B..0 . 7260.p|
00000B50: 13 58 1C 8B 20 52 43 B2 31 33 34 20 A7 20 54 B2 |.X.. RC.134 . T.|
00000B60: 54 AB 31 3A 8B 20 54 B2 30 20 A7 20 54 B2 33 35 |T.1:. T.0 . T.35|
00000B70: 00 86 13 59 1C 8B 20 52 43 B2 31 33 34 20 A7 20 |...Y.. RC.134 . |
00000B80: 42 B2 53 28 54 29 00 BF 13 5A 1C 8B 20 52 43 B2 |B.S(T)...Z.. RC.|
00000B90: 31 33 35 20 A7 20 54 B2 C2 28 4C 4C 29 3A 42 B2 |135 . T..(LL):B.|
00000BA0: C2 28 4C 4C AA 31 29 3A 8B 20 54 B3 31 20 B0 20 |.(LL.1):. T.1 . |
00000BB0: 54 B1 33 35 20 A7 20 54 B2 31 38 3A 42 B2 31 00 |T.35 . T.18:B.1.|
00000BC0: D8 13 5B 1C 8B 20 42 B3 30 20 B0 20 42 B1 53 28 |..[.. B.0 . B.S(|
00000BD0: 54 29 20 A7 20 42 B2 31 00 08 14 5C 1C 99 22 13 |T) . B.1...\..".|
00000BE0: 22 3B C8 28 59 59 24 2C 31 29 3B C8 28 58 58 24 |";.(YY$,1);.(XX$|
00000BF0: 2C 32 33 29 3B 22 20 20 9D 9D 22 3B CA 28 C4 28 |,23);" ..";.(.(|
00000C00: 54 29 2C 32 2C 32 29 3B 00 38 14 61 1C 99 22 13 |T),2,2);.8.a..".|
00000C10: 22 3B C8 28 59 59 24 2C 31 29 3B C8 28 58 58 24 |";.(YY$,1);.(XX$|
00000C20: 2C 33 30 29 3B 22 20 20 9D 9D 22 3B CA 28 C4 28 |,30);" ..";.(.(|
00000C30: 42 29 2C 32 2C 32 29 3B 00 3E 14 83 1C 8E 00 5B |B),2,2);.>.....[|
00000C40: 14 84 1C 8F 20 44 45 46 41 55 4C 54 20 56 41 4C |.... DEFAULT VAL|
00000C50: 55 45 53 20 55 50 44 41 54 45 44 00 88 14 86 1C |UES UPDATED.....|
00000C60: 58 44 24 B2 CA 28 C4 28 44 29 2C 32 2C 32 29 3A |XD$..(.(D),2,2):|
00000C70: 8B 20 C3 28 58 44 24 29 B2 31 20 A7 20 58 44 24 |. .(XD$).1 . XD$|
00000C80: B2 58 44 24 AA 22 A0 22 00 B5 14 88 1C 58 54 24 |.XD$.".".....XT$|
00000C90: B2 CA 28 C4 28 54 29 2C 32 2C 32 29 3A 8B 20 C3 |..(.(T),2,2):. .|
00000CA0: 28 58 54 24 29 B2 31 20 A7 20 58 54 24 B2 58 54 |(XT$).1 . XT$.XT|
00000CB0: 24 AA 22 A0 22 00 E2 14 8A 1C 58 42 24 B2 CA 28 |$.".".....XB$..(|
00000CC0: C4 28 42 29 2C 32 2C 32 29 3A 8B 20 C3 28 58 42 |.(B),2,2):. .(XB|
00000CD0: 24 29 B2 31 20 A7 20 58 42 24 B2 58 42 24 AA 22 |$).1 . XB$.XB$."|
00000CE0: A0 22 00 ED 14 8C 1C 58 4D 24 B2 4D 24 00 F3 14 |.".....XM$.M$...|
00000CF0: 8D 1C 8E 00 06 15 14 1E 52 52 B2 31 38 3A 97 20 |........RR.18:. |
00000D00: 36 34 36 2C 31 30 00 44 15 19 1E 8B C5 28 41 38 |646,10.D.....(A8|
00000D10: 24 29 B3 B1 30 A7 99 22 13 22 3B C8 28 59 59 24 |$)..0..".";.(YY$|
00000D20: 2C 37 29 3B A6 30 35 29 3B 41 38 24 3B 22 20 22 |,7);.05);A8$;" "|
00000D30: 3B 42 38 24 3B 22 20 22 3B 43 38 24 3B 22 20 22 |;B8$;" ";C8$;" "|
00000D40: 3B 44 38 24 00 7D 15 1E 1E 99 20 22 13 22 3B C7 |;D8$.}.... ".";.|
00000D50: 28 52 52 29 3B C8 28 59 59 24 2C 35 29 3B A6 30 |(RR);.(YY$,5);.0|
00000D60: 33 29 3B 22 45 2D 52 2D 52 2D 4F 2D 52 22 3B 3A |3);"E-R-R-O-R";:|
00000D70: 8B 52 52 B2 31 38 A7 8D 20 35 31 30 30 00 9E 15 |.RR.18.. 5100...|
00000D80: 28 1E 52 52 B2 28 52 52 B2 31 38 29 AC AB 31 34 |(.RR.(RR.18)..14|
00000D90: 36 AA 28 52 52 B3 B1 31 38 29 AC AB 31 38 00 D2 |6.(RR..18)..18..|
00000DA0: 15 32 1E 42 24 B2 22 22 3A 81 20 49 B2 31 20 A4 |.2.B$."":. I.1 .|
00000DB0: 20 36 30 3A A1 20 41 24 3A 42 24 B2 42 24 AA 41 | 60:. A$:B$.B$.A|
00000DC0: 24 3A 82 3A 8B 20 42 24 B2 22 22 20 89 20 37 37 |$:.:. B$."" . 77|
00000DD0: 31 30 00 0B 16 77 1E 99 C7 28 31 34 36 29 3B 3A |10...w...(146);:|
00000DE0: 97 36 34 36 2C 31 3A 97 31 38 36 2C 44 44 3A 97 |.646,1:.186,DD:.|
00000DF0: 35 30 31 31 33 2C 30 3A 97 31 34 34 2C 30 3A 41 |50113,0:.144,0:A|
00000E00: 38 24 B2 22 22 3A 89 32 30 31 30 00 41 16 A4 1F |8$."":.2010.A...|
00000E10: 44 31 B2 B5 28 49 49 AD 31 30 29 3A 44 32 B2 49 |D1..(II.10):D2.I|
00000E20: 49 AB 44 31 AC 31 30 3A 97 20 4C 4C 2C 44 31 AA |I.D1.10:. LL,D1.|
00000E30: 34 38 3A 97 20 4C 4C AA 31 2C 44 32 AA 34 38 3A |48:. LL.1,D2.48:|
00000E40: 8E 00 5A 16 D6 1F 4A 4A B2 30 3A 8B 20 4D 24 B2 |..Z...JJ.0:. M$.|
00000E50: 22 41 22 20 A7 20 4A 4A B2 31 00 6E 16 D8 1F 8B |"A" . JJ.1.n....|
00000E60: 20 4A 4A B2 30 20 A7 20 4D 24 B2 22 41 22 00 82 | JJ.0 . M$."A"..|
00000E70: 16 D9 1F 8B 20 4A 4A B2 31 20 A7 20 4D 24 B2 22 |.... JJ.1 . M$."|
00000E80: 48 22 00 8D 16 E0 1F 58 4D 24 B2 4D 24 00 AE 16 |H".....XM$.M$...|
00000E90: E2 1F 99 22 13 22 3B C8 28 58 58 24 2C 33 38 29 |...".";.(XX$,38)|
00000EA0: 3B C8 28 59 59 24 2C 31 29 3B 58 4D 24 3B 00 B9 |;.(YY$,1);XM$;..|
00000EB0: 16 EA 1F 8D 20 37 31 32 30 00 BF 16 07 20 8E 00 |.... 7120.... ..|
00000EC0: E1 16 08 20 8F 20 47 45 54 20 48 20 4D 4F 44 45 |... . GET H MODE|
00000ED0: 20 41 54 20 52 57 2C 43 4C 20 49 4E 54 4F 20 4C | AT RW,CL INTO L|
00000EE0: 4C 00 FB 16 0F 20 58 58 25 B2 44 43 28 43 4C 29 |L.... XX%.DC(CL)|
00000EF0: 3A 59 59 25 B2 44 52 28 52 57 29 00 1F 17 12 20 |:YY%.DR(RW).... |
00000F00: 9E 20 35 31 30 32 34 2C 58 58 25 2C 59 59 25 3A |. 51024,XX%,YY%:|
00000F10: 4A 4A B2 C2 28 32 35 35 29 3A 52 43 B2 4A 4A 00 |JJ..(255):RC.JJ.|
00000F20: 44 17 13 20 8B 20 4A 4A B2 39 32 20 B0 20 4A 4A |D.. . JJ.92 . JJ|
00000F30: B2 31 36 39 20 B0 20 4A 4A B2 31 34 30 20 89 20 |.169 . JJ.140 . |
00000F40: 38 32 34 39 00 63 17 14 20 8B 20 4A 4A B1 B2 31 |8249.c.. . JJ..1|
00000F50: 33 33 20 AF 20 4A 4A B3 B2 31 33 39 20 89 20 38 |33 . JJ..139 . 8|
00000F60: 32 34 39 00 A0 17 17 20 8B 20 4A 4A B2 31 33 20 |249.... . JJ.13 |
00000F70: B0 20 4A 4A B2 31 34 35 20 B0 20 4A 4A B2 31 37 |. JJ.145 . JJ.17|
00000F80: 20 B0 20 4A 4A B2 32 39 20 B0 20 4A 4A B2 31 35 | . JJ.29 . JJ.15|
00000F90: 37 20 B0 20 4A 4A B2 31 39 20 89 20 38 32 34 39 |7 . JJ.19 . 8249|
00000FA0: 00 C5 17 18 20 8B 20 4A 4A B1 34 37 20 AF 20 4A |.... . JJ.47 . J|
00000FB0: 4A B3 35 38 20 A7 20 56 B2 4A 4A AB 34 38 3A 89 |J.58 . V.JJ.48:.|
00000FC0: 20 38 32 32 30 00 EA 17 19 20 8B 20 4A 4A B1 36 | 8220.... . JJ.6|
00000FD0: 34 20 AF 20 4A 4A B3 37 31 20 A7 20 56 B2 4A 4A |4 . JJ.71 . V.JJ|
00000FE0: AB 35 35 3A 89 20 38 32 32 30 00 F5 17 1A 20 89 |.55:. 8220.... .|
00000FF0: 20 38 32 31 30 00 25 18 1C 20 53 4D B2 31 30 32 | 8210.%.. SM.102|
00001000: 34 AA 59 59 25 AC 34 30 AA 58 58 25 3A 97 20 53 |4.YY%.40.XX%:. S|
00001010: 4D 2C C2 28 53 4D 29 AA 31 32 38 3A 58 58 25 B2 |M,.(SM).128:XX%.|
00001020: 58 58 25 AA 31 00 49 18 1D 20 9E 20 35 31 30 32 |XX%.1.I.. . 5102|
00001030: 34 2C 58 58 25 2C 59 59 25 3A 4A 4A B2 C2 28 32 |4,XX%,YY%:JJ..(2|
00001040: 35 35 29 3A 52 43 B2 4A 4A 00 68 18 1E 20 8B 20 |55):RC.JJ.h.. . |
00001050: 4A 4A B1 B2 31 33 33 20 AF 20 4A 4A B3 B2 31 33 |JJ..133 . JJ..13|
00001060: 39 20 89 20 38 32 34 39 00 A5 18 21 20 8B 20 4A |9 . 8249...! . J|
00001070: 4A B2 31 33 20 B0 20 4A 4A B2 31 34 35 20 B0 20 |J.13 . JJ.145 . |
00001080: 4A 4A B2 31 37 20 B0 20 4A 4A B2 32 39 20 B0 20 |JJ.17 . JJ.29 . |
00001090: 4A 4A B2 31 35 37 20 B0 20 4A 4A B2 31 39 20 89 |JJ.157 . JJ.19 .|
000010A0: 20 38 32 34 39 00 D1 18 22 20 8B 20 4A 4A B1 34 | 8249..." . JJ.4|
000010B0: 37 20 AF 20 4A 4A B3 35 38 20 A7 20 56 B2 31 36 |7 . JJ.58 . V.16|
000010C0: AC 56 AA 28 4A 4A AB 34 38 29 3A 89 20 38 32 33 |.V.(JJ.48):. 823|
000010D0: 30 00 FD 18 23 20 8B 20 4A 4A B1 36 34 20 AF 20 |0...# . JJ.64 . |
000010E0: 4A 4A B3 37 31 20 A7 20 56 B2 31 36 AC 56 AA 28 |JJ.71 . V.16.V.(|
000010F0: 4A 4A AB 35 35 29 3A 89 20 38 32 33 30 00 08 19 |JJ.55):. 8230...|
00001100: 24 20 89 20 38 32 32 31 00 3F 19 26 20 53 4D B2 |$ . 8221.?.& SM.|
00001110: 31 30 32 34 AA 59 59 25 AC 34 30 AA 58 58 25 3A |1024.YY%.40.XX%:|
00001120: 97 20 53 4D 2C C2 28 53 4D 29 AA 31 32 38 3A 97 |. SM,.(SM).128:.|
00001130: 20 4C 4C 2C 56 3A 43 48 B2 31 3A 52 43 B2 30 00 | LL,V:CH.1:RC.0.|
00001140: 45 19 39 20 8E 00 67 19 3A 20 8F 20 47 45 54 20 |E.9 ..g.: . GET |
00001150: 41 20 4D 4F 44 45 20 41 54 20 52 57 2C 43 4C 20 |A MODE AT RW,CL |
00001160: 49 4E 54 4F 20 4C 4C 00 81 19 41 20 58 58 25 B2 |INTO LL...A XX%.|
00001170: 44 43 28 43 4C 29 3A 59 59 25 B2 44 52 28 52 57 |DC(CL):YY%.DR(RW|
00001180: 29 00 A5 19 44 20 9E 20 35 31 30 32 34 2C 58 58 |)...D . 51024,XX|
00001190: 25 2C 59 59 25 3A 4A 4A B2 C2 28 32 35 35 29 3A |%,YY%:JJ..(255):|
000011A0: 52 43 B2 4A 4A 00 CA 19 45 20 8B 20 4A 4A B2 39 |RC.JJ...E . JJ.9|
000011B0: 32 20 B0 20 4A 4A B2 31 36 39 20 B0 20 4A 4A B2 |2 . JJ.169 . JJ.|
000011C0: 31 34 30 20 89 20 38 32 39 39 00 E9 19 46 20 8B |140 . 8299...F .|
000011D0: 20 4A 4A B1 B2 31 33 33 20 AF 20 4A 4A B3 B2 31 | JJ..133 . JJ..1|
000011E0: 33 39 20 89 20 38 32 39 39 00 26 1A 49 20 8B 20 |39 . 8299.&.I . |
000011F0: 4A 4A B2 31 33 20 B0 20 4A 4A B2 31 34 35 20 B0 |JJ.13 . JJ.145 .|
00001200: 20 4A 4A B2 31 37 20 B0 20 4A 4A B2 32 39 20 B0 | JJ.17 . JJ.29 .|
00001210: 20 4A 4A B2 31 35 37 20 B0 20 4A 4A B2 31 39 20 | JJ.157 . JJ.19 |
00001220: 89 20 38 32 39 39 00 41 1A 4A 20 8B 20 4A 4A B1 |. 8299.A.J . JJ.|
00001230: 33 31 20 AF 20 4A 4A B3 39 35 20 89 20 38 32 37 |31 . JJ.95 . 827|
00001240: 30 00 5E 1A 4B 20 8B 20 4A 4A B2 31 36 30 20 20 |0.^.K . JJ.160 |
00001250: 20 20 20 20 20 20 20 20 89 20 38 32 37 30 00 69 | . 8270.i|
00001260: 1A 4C 20 89 20 38 32 36 30 00 A1 1A 4E 20 53 4D |.L . 8260...N SM|
00001270: B2 31 30 32 34 AA 59 59 25 AC 34 30 AA 58 58 25 |.1024.YY%.40.XX%|
00001280: 3A 97 20 53 4D 2C C2 28 53 4D 29 AA 31 32 38 3A |:. SM,.(SM).128:|
00001290: 97 20 4C 4C 2C 4A 4A 3A 43 48 B2 31 3A 52 43 B2 |. LL,JJ:CH.1:RC.|
000012A0: 30 00 A7 1A 6B 20 8E 00 CC 1A 6C 20 41 38 24 B2 |0...k ....l A8$.|
000012B0: 22 22 3A 9E 20 53 59 3A 8B 20 C2 28 35 30 31 31 |"":. SY:. .(5011|
000012C0: 33 29 B3 B1 30 20 89 20 37 37 30 30 00 06 1B 76 |3)..0 . 7700...v|
000012D0: 20 9F 20 31 35 2C 44 2C 31 35 3A 84 31 35 2C 41 | . 15,D,15:.15,A|
000012E0: 38 24 2C 42 38 24 2C 43 38 24 2C 44 38 24 3A A0 |8$,B8$,C8$,D8$:.|
000012F0: 20 31 35 3A 8B 20 C5 28 41 38 24 29 B3 B1 30 20 | 15:. .(A8$)..0 |
00001300: 89 20 37 37 30 30 00 0C 1B 80 20 8E 00 3C 1B FC |. 7700.... ..<..|
00001310: 21 99 22 93 11 11 11 11 11 11 20 20 20 20 20 20 |!."....... |
00001320: 20 20 20 20 20 20 43 4F 50 59 52 49 47 48 54 20 | COPYRIGHT |
00001330: 4E 4F 54 49 43 45 3A 22 3A 99 3A 99 00 6A 1B 10 |NOTICE:":.:..j..|
00001340: 22 99 22 20 20 20 28 43 29 20 31 39 38 33 20 42 |"." (C) 1983 B|
00001350: 59 20 43 48 52 49 53 53 20 43 4F 4E 53 55 4C 54 |Y CHRISS CONSULT|
00001360: 41 4E 54 53 20 49 4E 43 2E 22 00 92 1B 1A 22 99 |ANTS INC."....".|
00001370: 3A 99 22 20 20 20 20 20 20 20 20 20 20 41 4C 4C |:." ALL|
00001380: 20 52 49 47 48 54 53 20 52 45 53 45 52 56 45 44 | RIGHTS RESERVED|
00001390: 2E 22 00 A7 1B 5F 22 81 20 54 B2 31 20 A4 20 31 |."..._". T.1 . 1|
000013A0: 30 30 30 3A 82 3A 8E 00 CB 1B 60 22 8F 20 47 45 |000:.:....`". GE|
000013B0: 54 20 32 20 44 49 47 49 54 20 56 41 4C 55 45 20 |T 2 DIGIT VALUE |
000013C0: 41 54 20 58 58 25 2C 59 59 25 2E 00 E4 1B 61 22 |AT XX%,YY%....a"|
000013D0: 8F 20 56 3D 20 56 41 4C 55 45 20 52 45 54 55 52 |. V= VALUE RETUR|
000013E0: 4E 45 44 2E 00 07 1C 62 22 8F 20 56 4C 3D 4C 4F |NED....b". VL=LO|
000013F0: 57 20 4C 49 4D 49 54 20 46 4F 52 20 56 2E 20 56 |W LIMIT FOR V. V|
00001400: 48 3D 48 49 47 48 2E 00 25 1C 63 22 8F 20 44 46 |H=HIGH..%.c". DF|
00001410: 3D 44 45 46 41 55 4C 54 20 56 41 4C 55 45 20 46 |=DEFAULT VALUE F|
00001420: 4F 52 20 56 2E 00 4A 1C 64 22 8F 20 56 3D 38 38 |OR V..J.d". V=88|
00001430: 20 49 46 20 22 58 22 20 54 59 50 45 44 20 46 4F | IF "X" TYPED FO|
00001440: 52 20 31 53 54 20 43 48 41 52 00 70 1C 66 22 44 |R 1ST CHAR.p.f"D|
00001450: 46 24 B2 CA 28 C4 28 44 46 29 2C 32 2C 32 29 AA |F$..(.(DF),2,2).|
00001460: 22 A0 22 3A 44 46 24 B2 C8 28 44 46 24 2C 32 29 |".":DF$..(DF$,2)|
00001470: 00 9D 1C 6A 22 99 22 13 22 3B C8 28 58 58 24 2C |...j".".";.(XX$,|
00001480: 58 58 25 29 3B C8 28 59 59 24 2C 59 59 25 29 3B |XX%);.(YY$,YY%);|
00001490: 44 46 24 3B 3A 56 B2 C5 28 44 46 24 29 00 CB 1C |DF$;:V..(DF$)...|
000014A0: 74 22 9E 20 35 31 30 32 34 2C 58 58 25 2C 59 59 |t". 51024,XX%,YY|
000014B0: 25 3A 41 41 B2 C2 28 32 35 35 29 3A 8B 20 41 41 |%:AA..(255):. AA|
000014C0: B2 31 35 37 20 89 20 38 38 39 39 00 F6 1C 79 22 |.157 . 8899...y"|
000014D0: 8B 20 41 41 B2 38 38 20 B0 20 41 41 B2 39 32 20 |. AA.88 . AA.92 |
000014E0: B0 20 41 41 B2 31 36 39 20 A7 20 56 B2 38 38 3A |. AA.169 . V.88:|
000014F0: 89 20 38 38 39 39 00 32 1D 7E 22 8B 20 41 41 B2 |. 8899.2.~". AA.|
00001500: 31 33 20 B0 20 41 41 B2 31 37 20 B0 20 41 41 B2 |13 . AA.17 . AA.|
00001510: 31 34 35 20 B0 20 41 41 B2 32 39 20 B0 20 41 41 |145 . AA.29 . AA|
00001520: B2 31 35 37 20 A7 20 56 B2 44 46 3A 89 20 38 38 |.157 . V.DF:. 88|
00001530: 39 39 00 56 1D 80 22 8B 20 41 41 B1 31 33 33 20 |99.V..". AA.133 |
00001540: AF 20 41 41 B3 31 34 31 20 A7 20 56 B2 44 46 3A |. AA.141 . V.DF:|
00001550: 89 20 38 38 39 39 00 79 1D 83 22 8B 20 41 41 B2 |. 8899.y..". AA.|
00001560: 33 32 20 B0 20 41 41 B2 31 36 30 20 A7 20 41 31 |32 . AA.160 . A1|
00001570: B2 30 3A 89 20 38 38 35 30 00 9F 1D 88 22 8B 20 |.0:. 8850....". |
00001580: 41 41 B1 34 37 20 AF 20 41 41 B3 35 38 20 A7 20 |AA.47 . AA.58 . |
00001590: 41 31 B2 41 41 AB 34 38 3A 89 20 38 38 35 30 00 |A1.AA.48:. 8850.|
000015A0: AA 1D 8D 22 89 20 38 38 31 30 00 BA 1D 92 22 8F |...". 8810....".|
000015B0: 20 32 4E 44 20 44 49 47 49 54 00 DA 1D 94 22 9E | 2ND DIGIT....".|
000015C0: 20 35 31 30 32 34 2C 58 58 25 AA 31 2C 59 59 25 | 51024,XX%.1,YY%|
000015D0: 3A 41 41 B2 C2 28 32 35 35 29 00 FE 1D 95 22 8B |:AA..(255)....".|
000015E0: 20 41 41 B2 39 32 20 B0 20 41 41 B2 31 36 39 20 | AA.92 . AA.169 |
000015F0: A7 20 41 41 B2 38 38 3A 89 20 38 38 39 39 00 2F |. AA.88:. 8899./|
00001600: 1E 97 22 8B 20 41 41 B2 33 32 20 B0 20 41 41 B2 |..". AA.32 . AA.|
00001610: 31 36 30 20 B0 20 41 41 B2 31 33 20 A7 20 41 32 |160 . AA.13 . A2|
00001620: B2 41 31 3A 41 31 B2 30 3A 89 20 38 38 37 30 00 |.A1:A1.0:. 8870.|
00001630: 55 1E 9C 22 8B 20 41 41 B1 34 37 20 AF 20 41 41 |U..". AA.47 . AA|
00001640: B3 35 38 20 A7 20 41 32 B2 41 41 AB 34 38 3A 89 |.58 . A2.AA.48:.|
00001650: 20 38 38 37 30 00 82 1E A1 22 99 22 13 22 3B C8 | 8870....".".";.|
00001660: 28 58 58 24 2C 58 58 25 AA 31 29 3B C8 28 59 59 |(XX$,XX%.1);.(YY|
00001670: 24 2C 59 59 25 29 3B 22 A0 22 3B 3A 89 20 38 38 |$,YY%);".";:. 88|
00001680: 35 30 00 A6 1E A6 22 56 B2 31 30 AC 41 31 AA 41 |50...."V.10.A1.A|
00001690: 32 3A 8B 20 56 B3 56 4C 20 B0 20 56 B1 56 48 20 |2:. V.VL . V.VH |
000016A0: 89 20 38 38 31 30 00 DD 1E C3 22 99 22 13 22 3B |. 8810....".".";|
000016B0: C8 28 58 58 24 2C 58 58 25 29 3B C8 28 59 59 24 |.(XX$,XX%);.(YY$|
000016C0: 2C 59 59 25 29 3B C8 28 CA 28 C4 28 56 29 2C 32 |,YY%);.(.(.(V),2|
000016D0: 2C 32 29 AA 22 A0 22 2C 32 29 3B 3A 8E 00 F2 1E |,2).".",2);:....|
000016E0: 28 23 97 20 31 38 36 2C 52 36 3A 9E 20 35 31 37 |(#. 186,R6:. 517|
000016F0: 31 32 00 19 1F 0E 27 9F 20 31 35 2C 38 2C 31 35 |12....'. 15,8,15|
00001700: 2C 22 49 30 22 3A A0 20 31 35 3A 94 22 40 30 3A |,"I0":. 15:."@0:|
00001710: 43 4C 4F 4E 45 32 22 2C 38 00 00 00 29 |CLONE2",8...) |
..$.... 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,1...... S(35),DR(16),DC(16)...
..DD.B(186).T...XX$."..........":XX$.XX$
.XX$.XX$.XX$.....YY$."..........":YY$.YY
$.YY$.YY$.....HX$."0123456789ABCDEF".;..
.XD$."8 ":XT$."18":XB$."1 ":XM$."A".T.L.
. T.1 . 17:S(T).20:..M.V.. T.18. 24:S(T)
.18:....`.. T.25. 30:S(T).17:....J.. T.3
1. 35:S(T).16:..Q.... 5,6,7,8,10,11,12,1
3,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):..9.N.. JJ.1 . 16:.
DC(JJ):..L.P.. PERFORM EDIT.G.Z.. 6000:
. CREATE SCREEN...... 7000:. READ SCREEN
HEADER...... M$."X" . 9000...... 7100:.
DISPLAY T/B.P.... 7200:. ACCEPT CHANGES
...... RC.92 . RC.169 . 2000...... RC.13
. 2010...... 7070:. 2030.4...SS.54272:.
L.0 . 24:. SS.L,0:..M.... SS.01,95:. SS
.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.
."..TB/EDITOR DISK=";XD$;" TRK=";XT$;"
BLK=";XB$;" MODE=";XM$.-....:." 0 1 2
3 4 5 6 7 8 9 A B C D E F".K....:AA$.
"0123 4567 89AB CDEF":. I.1 . 19:. " ";J
(AA$,I,1):..Q.S.....X.. READ HEADER FIEL
DS...].YY%.1.V.B.XX%.16:DF.E(XD$):VL.8:V
H.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.@.O.. AA.157 . 7010.N.Q.DF.E(XB$)..
.V.XX%.30:VL.0:VH.S(T):. 8800:B.V:. B.88
. M$."X":. 7099...{.. AA.157 . 7020....
.. 51024,38,1:AA.B(255).K.... AA.157 . 7
030...... AA.13 . AA.17 . AA.145 . AA.29
. AA.157 . M$.XM$:. 7070./.... AA.65 .
AA.72 . M$.G(AA):. 7070.\.... AA.88 . AA
.92 . AA.169 . M$."X":. 7099......".";H(
XX$,38);H(YY$,1);XM$;:. 7040.....LL.5012
4:II.T:. 8100... .LL.50127:II.B:. 8100..
.... 50137,48:. 50138,48:. 50139,48:. 50
115,255:. 50112,D...... 7300:....... REA
D AND DISPLAY T/B.-.F.SY.49920:. 8300.F.
P.. M$."H" . . 50691,0._.Z.. M$."A" . .
50691,1.V.... 50692,1: . COLOR...... 506
88,0:. 50689,196:. DATA BUFFER.A.... 506
93,203:. 50694,4:. SCREEN...... 50695,20
3:. 50696,216:. COLOR MEMORY...... 50704
:. DISPLAY...... 198,0.......). .. ACCEP
T CHANGES.E.".CL.1:RW.1:LL.50176:CH.0.[.
*.. M$."H" . . 8200.Q.,.. M$."A" . . 825
0.../.. RC.140 . . 52480:. 7200...1.. RC
.92 . RC.169 . 7299.H.4.. RC.136 . . 815
0:. 7210...6.. RC.19 . CL.1:RW.1:LL.5017
6:. 7210.'.9.. RC.13 . RC.133 . RC.134 .
RC.135 . RC.139 . 7250.;.;.. RC.145 . 7
244.O.=.. RC.17 . 7246.C.>.. RC.157 . 7
234.W.@.. RC.29 . 7240...A.. 7240.E.B.L
L.LL.1:CL.CL.1:. CL.0 . CL.16:RW.RW.1:.
RW.0 . RW.16:LL.50431.P.D.. 7210...H.LL.
LL.1:CL.CL.1:. CL.17 . CL.1:RW.RW.1:. RW
.17 . RW.1:LL.50176...J.. 7210.P.L.LL.LL
.16:RW.RW.1:. LL.50176 . LL.LL.256:RW.16
.[.M.. 7210...N.LL.LL.16:RW.RW.1:. LL.50
431 . LL.LL.256:RW.1...O.. 7210...R.. CH
..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.N.W.. RC.134 . B.B.1
:. B..0 . 7260.P.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.X.[.. B.0 . B.S(T) . B.1...\..".
";H(YY$,1);H(XX$,23);" ..";J(D(T),2,2);
.8.A..".";H(YY$,1);H(XX$,30);" ..";J(D(
B),2,2);.>.....[.... DEFAULT VALUES UPDA
TED.....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(XB
$).1 . XB$.XB$." ".....XM$.M$...........
RR.18:. 646,10.D....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..1
8)..18.R.2.B$."":. I.1 . 60:. A$:B$.B$.A
$:.:. B$."" . 7710...W..G(146);:.646,1:.
186,DD:.50113,0:.144,0:A8$."":.2010.A...
D1..(II.10):D2.II.D1.10:. LL,D1.48:. LL.
1,D2.48:..Z.V.JJ.0:. M$."A" . JJ.1.N.X..
JJ.0 . M$."A"...Y.. JJ.1 . M$."H".....X
M$.M$......".";H(XX$,38);H(YY$,1);XM$;..
.... 7120.... ..... . GET H MODE AT RW,C
L INTO LL.... XX%.DC(CL):YY%.DR(RW)....
. 51024,XX%,YY%:JJ.B(255):RC.JJ.D.. . JJ
.92 . JJ.169 . JJ.140 . 8249.C.. . JJ..1
33 . JJ..139 . 8249. .. . JJ.13 . JJ.145
. JJ.17 . JJ.29 . JJ.157 . JJ.19 . 8249
.E.. . 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.I.. . 51024,XX%,YY%:JJ.B(2
55):RC.JJ.H.. . JJ..133 . JJ..139 . 8249
...! . JJ.13 . JJ.145 . JJ.17 . JJ.29 .
JJ.157 . JJ.19 . 8249.Q." . JJ.47 . JJ.5
8 . V.16.V.(JJ.48):. 8230...# . JJ.64 .
JJ.71 . V.16.V.(JJ.55):. 8230...$ . 8221
.?.& SM.1024.YY%.40.XX%:. SM,B(SM).128:.
LL,V:CH.1:RC.0.E.9 ..G.: . GET A MODE A
T RW,CL INTO LL...A XX%.DC(CL):YY%.DR(RW
)...D . 51024,XX%,YY%:JJ.B(255):RC.JJ.J.
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.19
. 8299.A.J . JJ.31 . JJ.95 . 8270.^.K .
JJ.160 . 8270.I.L . 8260...N SM
.1024.YY%.40.XX%:. SM,B(SM).128:. LL,JJ:
CH.1:RC.0...K ..L.L A8$."":. SY:. B(5011
3)..0 . 7700...V . 15,D,15:.15,A8$,B8$,C
8$,D8$: 15:. E(A8$)..0 . 7700.... ..<..
!."....... COPYRIGHT NOTICE:"
:.:..J.."." (C) 1983 BY CHRISS CONSULT
ANTS INC."....".:." ALL RIGHTS
RESERVED."..._". T.1 . 1000:.:..K.`". GE
T 2 DIGIT VALUE AT XX%,YY%....A". V= VAL
UE RETURNED....B". VL=LOW LIMIT FOR V. V
H=HIGH..%.C". DF=DEFAULT VALUE FOR V..J.
D". V=88 IF "X" TYPED FOR 1ST CHAR.P.F"D
F$.J(D(DF),2,2)." ":DF$.H(DF$,2)...J".".
";H(XX$,XX%);H(YY$,YY%);DF$;:V.E(DF$).K.
T". 51024,XX%,YY%:AA.B(255):. AA.157 . 8
899...Y". AA.88 . AA.92 . AA.169 . V.88:
. 8899.2.~". AA.13 . AA.17 . AA.145 . AA
.29 . AA.157 . V.DF:. 8899.V..". AA.133
. AA.141 . V.DF:. 8899.Y..". AA.32 . AA.
160 . A1.0:. 8850....". AA.47 . AA.58 .
A1.AA.48:. 8850....". 8810....". 2ND DIG
IT.Z..". 51024,XX%.1,YY%:AA.B(255)....".
AA.92 . AA.169 . AA.88:. 8899./..". AA.
32 . AA.160 . AA.13 . A2.A1:A1.0:. 8870.
U..". AA.47 . AA.58 . A2.AA.48:. 8870...
.".".";H(XX$,XX%.1);H(YY$,YY%);" ";:. 88
50...."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...)
> CLICK IMAGE PREVIEW FOR FULL MODAL