CHIP CHAT #2
FILE INFORMATION
FILENAME(S): CHIP CHAT #2
FILE TYPE(S): PRG
FILE SIZE: 3.8K
FIRST SEEN: 2025-11-30 21:12:23
APPEARS ON: 1 disk(s)
FILE HASH
fa72b23b78868ef1e3caab9e00ea7e535650c185224f8d5932bdd94814a4a788
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| YC JUNE 86 | CHIP CHAT #2 | PRG | DuncanTwain | 13 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3D 08 0A 00 8F 20 2A 2A 20 54 48 49 53 20 |..=.... ** THIS |
00000010: 57 49 4C 4C 20 4E 4F 54 20 57 4F 52 4B 20 4F 4E |WILL NOT WORK ON|
00000020: 20 55 4E 45 58 50 41 4E 44 45 44 20 56 49 43 53 | UNEXPANDED VICS|
00000030: 20 2E 2E 2E 2E 2E 2E 2E 53 4F 52 52 59 00 85 08 | .......SORRY...|
00000040: 14 00 8F 20 2A 2A 20 46 4F 52 20 56 49 43 2D 32 |... ** FOR VIC-2|
00000050: 30 20 4F 57 4E 45 52 53 20 49 20 48 41 56 45 20 |0 OWNERS I HAVE |
00000060: 4C 49 4D 49 54 45 44 20 54 48 45 20 53 43 52 45 |LIMITED THE SCRE|
00000070: 45 4E 20 53 49 5A 45 20 54 4F 20 32 32 20 43 4F |EN SIZE TO 22 CO|
00000080: 4C 55 4D 4E 53 00 C3 08 1E 00 8F 20 2A 2A 20 4F |LUMNS...... ** O|
00000090: 57 4E 45 52 53 20 4F 46 20 56 49 43 2D 32 30 53 |WNERS OF VIC-20S|
000000A0: 20 53 48 4F 55 4C 44 20 55 53 45 20 54 48 45 20 | SHOULD USE THE |
000000B0: 52 45 4D 4D 45 44 20 49 4E 53 54 52 55 43 54 49 |REMMED INSTRUCTI|
000000C0: 4F 4E 53 00 C9 08 28 00 3A 00 DB 08 32 00 81 41 |ONS...(.:...2..A|
000000D0: B2 31 A4 33 33 3A 87 41 24 3A 82 00 F9 08 3C 00 |.1.33:.A$:....<.|
000000E0: 41 43 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |AC$."...........|
000000F0: 1D 1D 1D 1D 1D 1D 1D 1D 22 00 03 09 46 00 99 22 |........"...F.."|
00000100: 93 22 3B 00 21 09 50 00 81 41 B2 31 A4 31 35 3A |.";.!.P..A.1.15:|
00000110: 87 41 24 3A 99 41 43 24 22 20 20 20 22 41 24 3A |.A$:.AC$" "A$:|
00000120: 82 00 43 09 5A 00 8F 20 2A 2A 2A 20 4F 4E 20 56 |..C.Z.. *** ON V|
00000130: 49 43 2D 32 30 20 4F 4D 49 54 20 41 43 24 22 20 |IC-20 OMIT AC$" |
00000140: 20 20 22 00 5D 09 64 00 99 22 11 11 11 50 52 45 | ".].d.."...PRE|
00000150: 53 53 20 53 50 41 43 45 2D 42 41 52 22 00 72 09 |SS SPACE-BAR".r.|
00000160: 6E 00 A1 41 24 3A 8B 41 24 B3 B1 22 20 22 A7 31 |n..A$:.A$.." ".1|
00000170: 31 30 00 A2 09 78 00 99 22 13 22 3B 3A 8F 20 2A |10...x..".";:. *|
00000180: 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 20 4F 4E 20 56 49 |********* ON VI|
00000190: 43 2D 32 30 20 55 53 45 20 50 52 49 4E 54 22 93 |C-20 USE PRINT".|
000001A0: 22 3B 00 BB 09 82 00 8D 37 32 30 3A 99 22 13 22 |";......720:."."|
000001B0: 3A 58 58 B2 35 30 3A 50 41 B2 37 00 D6 09 8C 00 |:XX.50:PA.7.....|
000001C0: 52 24 B2 22 13 11 11 11 11 11 11 11 11 11 11 11 |R$."............|
000001D0: 11 11 11 11 11 22 00 11 0A 96 00 44 42 24 28 31 |.....".....DB$(1|
000001E0: 29 B2 22 20 20 20 92 20 20 12 20 20 20 22 3A 44 |)." . . ":D|
000001F0: 42 24 28 32 29 B2 22 20 20 20 92 20 12 20 22 3A |B$(2)." . . ":|
00000200: 44 42 24 28 33 29 B2 22 20 20 20 20 92 20 20 12 |DB$(3)." . .|
00000210: 22 00 2F 0A A0 00 42 31 24 B2 22 11 9D 9D 92 20 |"./...B1$.".... |
00000220: 20 12 22 3A 42 30 24 B2 22 11 9D 9D 20 20 22 00 | .":B0$."... ".|
00000230: 4A 0A AA 00 44 24 28 31 29 B2 22 20 20 22 AA 42 |J...D$(1)." ".B|
00000240: 31 24 AA 42 30 24 AA 42 30 24 00 65 0A B4 00 44 |1$.B0$.B0$.e...D|
00000250: 24 28 32 29 B2 22 20 20 22 AA 42 30 24 AA 42 31 |$(2)." ".B0$.B1|
00000260: 24 AA 42 30 24 00 82 0A BE 00 44 24 28 33 29 B2 |$.B0$.....D$(3).|
00000270: 22 92 20 20 12 22 AA 42 30 24 AA 42 30 24 AA 42 |". .".B0$.B0$.B|
00000280: 31 24 00 AA 0A C8 00 52 45 24 B2 22 C2 9D 91 5E |1$.....RE$."...^|
00000290: 9D 91 C2 9D 91 22 3A 52 30 24 B2 22 20 9D 91 20 |.....":R0$." .. |
000002A0: 9D 91 20 9D 91 9D C2 20 9D 22 00 C9 0A D2 00 81 |.. .... ."......|
000002B0: 41 B2 31 A4 36 3A 52 45 24 28 41 29 B2 52 45 24 |A.1.6:RE$(A).RE$|
000002C0: AA 52 45 24 28 41 AB 31 29 00 FA 0A DC 00 8B 41 |.RE$(A.1)......A|
000002D0: B2 33 A7 52 45 24 28 33 29 B2 52 45 24 28 33 29 |.3.RE$(3).RE$(3)|
000002E0: AA 22 C2 9D 91 22 3A 52 45 24 28 30 29 B2 52 45 |."...":RE$(0).RE|
000002F0: 24 28 30 29 AA 22 20 9D 91 22 00 12 0B E6 00 52 |$(0)." ..".....R|
00000300: 45 24 28 30 29 B2 52 45 24 28 30 29 AA 52 30 24 |E$(0).RE$(0).R0$|
00000310: 3A 82 00 42 0B F0 00 81 41 B2 31 A4 36 3A 52 45 |:..B....A.1.6:RE|
00000320: 24 28 41 29 B2 52 24 AA 22 11 11 11 11 1D 22 AA |$(A).R$.".....".|
00000330: 41 43 24 AA 52 45 24 28 41 29 AA 22 9D 5F AE 22 |AC$.RE$(A)."._."|
00000340: 3A 82 00 63 0B FA 00 52 45 24 28 30 29 B2 52 24 |:..c...RE$(0).R$|
00000350: AA 22 11 11 11 11 1D 22 AA 41 43 24 AA 52 45 24 |.".....".AC$.RE$|
00000360: 28 30 29 00 8F 0B 04 01 4D 24 28 31 29 B2 22 5F |(0).....M$(1)."_|
00000370: 2D 2D BD 91 9D C2 91 9D C2 91 9D B0 2D 22 3A 4D |--..........-":M|
00000380: 24 28 32 29 B2 22 5F 2D 2D AE 11 9D AD 2D 22 00 |$(2)."_--....-".|
00000390: B4 0B 0E 01 4D 24 28 30 29 B2 22 C2 20 20 20 22 |....M$(0).". "|
000003A0: AA 52 30 24 AA 22 20 20 C2 11 11 11 11 9D 9D 9D |.R0$." ........|
000003B0: 20 20 C2 22 00 DF 0B 18 01 81 41 B2 30 A4 32 3A | ."......A.0.2:|
000003C0: 4D 24 28 41 29 B2 52 24 AA 22 91 91 91 22 AA C8 |M$(A).R$."..."..|
000003D0: 28 41 43 24 2C 37 29 AA 4D 24 28 41 29 3A 82 00 |(AC$,7).M$(A):..|
000003E0: EF 0B 22 01 42 B2 31 37 3A 81 41 B2 31 A4 36 00 |..".B.17:.A.1.6.|
000003F0: 18 0C 2C 01 41 43 24 28 41 29 B2 C8 28 52 24 2C |..,.AC$(A)..(R$,|
00000400: 42 AB 33 AC 28 41 AB 31 29 29 AA 22 11 22 AA C9 |B.3.(A.1))."."..|
00000410: 28 41 43 24 2C 31 34 29 00 26 0C 36 01 8B 41 B2 |(AC$,14).&.6..A.|
00000420: 32 A7 42 B2 31 36 00 2C 0C 40 01 82 00 60 0C 4A |2.B.16.,.@...`.J|
00000430: 01 81 41 B2 31 A4 33 3A 41 43 24 28 41 29 B2 C8 |..A.1.3:AC$(A)..|
00000440: 28 41 43 24 28 41 29 2C C3 28 41 43 24 28 41 29 |(AC$(A),.(AC$(A)|
00000450: 29 AB B6 28 B5 28 31 AB 34 AD 41 29 29 29 3A 82 |)..(.(1.4.A))):.|
00000460: 00 8F 0C 54 01 4D 44 24 B2 C8 28 52 24 2C 31 34 |...T.MD$..(R$,14|
00000470: 29 AA 22 1D 1D 22 3A 52 30 24 B2 22 C2 11 9D 22 |)."..":R0$."..."|
00000480: 3A 59 41 24 B2 41 43 24 AA 22 2D AE 11 9D 22 00 |:YA$.AC$."-...".|
00000490: CC 0C 5E 01 81 41 B2 31 A4 36 3A 44 50 24 B2 44 |..^..A.1.6:DP$.D|
000004A0: 50 24 AA 52 30 24 3A 82 3A 41 42 24 B2 59 41 24 |P$.R0$:.:AB$.YA$|
000004B0: AA 44 50 24 AA 44 50 24 3A 44 50 24 B2 59 41 24 |.DP$.DP$:DP$.YA$|
000004C0: AA 44 50 24 3A 59 41 24 B2 41 42 24 00 04 0D 68 |.DP$:YA$.AB$...h|
000004D0: 01 41 42 24 B2 C8 28 52 24 2C 38 29 AA 41 42 24 |.AB$..(R$,8).AB$|
000004E0: 3A 44 50 24 B2 C8 28 52 24 2C 31 31 29 AA 44 50 |:DP$..(R$,11).DP|
000004F0: 24 AA 22 9D 2D BD 22 3A 59 41 24 B2 22 13 11 22 |$.".-.":YA$.".."|
00000500: AA 59 41 24 00 19 0D 72 01 53 54 24 B2 C8 28 41 |.YA$...r.ST$..(A|
00000510: 43 24 2C 39 29 AA 22 2B 22 00 1F 0D 7C 01 3A 00 |C$,9)."+"...|.:.|
00000520: 47 0D 86 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |G....***********|
00000530: 20 4D 41 49 4E 20 50 52 4F 47 20 2A 2A 2A 2A 2A | MAIN PROG *****|
00000540: 2A 2A 2A 2A 2A 2A 2E 00 77 0D 90 01 81 4C B2 31 |******..w....L.1|
00000550: A4 34 3A 8D 36 39 30 3A 99 52 45 24 28 57 29 3A |.4:.690:.RE$(W):|
00000560: 8D 31 31 35 30 3A 82 3A 8F 20 4C 44 59 23 30 37 |.1150:.:. LDY#07|
00000570: 3A 4C 44 41 23 32 30 00 A2 0D 9A 01 81 42 4C B2 |:LDA#20......BL.|
00000580: 37 A4 30 20 A9 AB 31 3A 59 50 24 B2 22 9D 2D BD |7.0 ..1:YP$.".-.|
00000590: 22 3A 8C 3A 42 4C 24 B2 C9 28 C4 28 42 4C 29 2C |":.:BL$..(.(BL),|
000005A0: 31 29 00 B6 0D A4 01 8B 42 4C B2 36 A7 58 58 B2 |1)......BL.6.XX.|
000005B0: 30 3A 50 41 B2 33 00 C5 0D AE 01 8B 42 4C B2 35 |0:PA.3......BL.5|
000005C0: A7 50 41 B2 30 00 F2 0D B8 01 81 4C B2 30 A4 32 |.PA.0......L.0.2|
000005D0: 3A 8D 36 39 30 3A 99 52 45 24 28 57 29 3A 8D 31 |:.690:.RE$(W):.1|
000005E0: 31 35 30 3A 82 3A 8F 20 53 54 41 20 30 38 30 30 |150:.:. STA 0800|
000005F0: 2C 59 00 08 0E C2 01 8D 37 31 30 3A 43 24 B2 22 |,Y......710:C$."|
00000600: 1D 1D 30 22 AA 42 4C 24 00 25 0E CC 01 50 4F 24 |..0".BL$.%...PO$|
00000610: B2 41 43 24 28 36 29 AA 22 9D 9D 22 AA 43 24 3A |.AC$(6)."..".C$:|
00000620: 8D 31 31 39 30 00 3A 0E D6 01 87 57 3A 8D 31 31 |.1190.:....W:.11|
00000630: 35 30 3A 99 52 45 24 28 30 29 00 5D 0E E0 01 99 |50:.RE$(0).]....|
00000640: 4D 24 28 32 29 3A 50 4F 24 B2 4D 44 24 AA 22 30 |M$(2):PO$.MD$."0|
00000650: 38 30 22 AA 42 4C 24 3A 8D 31 31 39 30 00 8D 0E |80".BL$:.1190...|
00000660: EA 01 43 24 B2 22 12 22 AA CA 28 22 31 33 31 39 |..C$."."..("1319|
00000670: 31 33 33 34 33 39 33 31 33 35 33 32 22 2C 42 4C |133439313532",BL|
00000680: AC 32 AA 31 2C 32 29 3A 8D 31 31 32 30 00 BC 0E |.2.1,2):.1120...|
00000690: F4 01 54 24 B2 22 13 24 30 38 30 22 AA C9 28 C4 |..T$.".$080"..(.|
000006A0: 28 42 4C 29 2C 31 29 AA 22 11 9D 9D 9D 9D 9D 22 |(BL),1)."......"|
000006B0: AA C9 28 53 54 24 2C 42 4C AA 33 29 00 DC 0E FE |..(ST$,BL.3)....|
000006C0: 01 99 54 41 42 24 3A 50 4F 24 B2 41 43 24 28 34 |..TAB$:PO$.AC$(4|
000006D0: 29 AA 22 32 30 22 3A 8D 31 31 39 30 00 FE 0E 08 |)."20":.1190....|
000006E0: 02 8D 31 30 30 30 3A 99 52 45 24 28 30 29 3A 8D |..1000:.RE$(0):.|
000006F0: 31 30 30 30 3A 87 43 24 3A 8D 31 31 32 30 00 13 |1000:.C$:.1120..|
00000700: 0F 12 02 99 22 13 11 20 D5 2D 2D 2D 2D 2D 2D 2D |....".. .-------|
00000710: 2D C9 22 00 24 0F 1C 02 50 4F 24 B2 54 24 3A 8D |-.".$...PO$.T$:.|
00000720: 31 31 39 30 00 3F 0F 26 02 99 22 13 11 11 22 3B |1190.?.&.."...";|
00000730: C9 28 41 43 24 2C 42 4C AA 32 29 3B 22 20 22 00 |.(AC$,BL.2);" ".|
00000740: 56 0F 30 02 8D 36 39 30 3A 99 52 45 24 28 57 29 |V.0..690:.RE$(W)|
00000750: 3A 8D 31 31 35 30 00 72 0F 3A 02 59 50 24 B2 22 |:.1150.r.:.YP$."|
00000760: C2 11 9D C2 11 9D C2 11 9D 9D 2D BD 22 3A 8D 37 |..........-.":.7|
00000770: 31 30 00 98 0F 44 02 43 24 B2 22 30 22 AA C9 28 |10...D.C$."0"..(|
00000780: C4 28 42 4C AB 31 29 2C 31 29 3A 8B 42 4C B2 30 |.(BL.1),1):.BL.0|
00000790: A7 43 24 B2 22 2D 31 22 00 AD 0F 4E 02 87 57 3A |.C$."-1"...N..W:|
000007A0: 8D 31 31 35 30 3A 99 52 45 24 28 30 29 00 CD 0F |.1150:.RE$(0)...|
000007B0: 58 02 81 4C B2 30 A4 31 3A 8D 36 39 30 3A 99 52 |X..L.0.1:.690:.R|
000007C0: 45 24 28 57 29 3A 8D 31 31 36 30 3A 82 00 EE 0F |E$(W):.1160:....|
000007D0: 62 02 8B 42 4C B2 30 A7 87 41 24 2C 41 24 3A 58 |b..BL.0..A$,A$:X|
000007E0: 58 B2 35 30 3A 50 41 B2 37 3A 89 36 33 30 00 FE |X.50:PA.7:.630..|
000007F0: 0F 6C 02 87 43 24 2C 57 3A 8D 31 31 36 30 00 25 |.l..C$,W:.1160.%|
00000800: 10 76 02 8D 39 36 30 3A 99 44 50 24 3A 81 44 B2 |.v..960:.DP$:.D.|
00000810: 30 A4 58 58 AC 31 30 3A 82 3A 99 52 45 24 28 30 |0.XX.10:.:.RE$(0|
00000820: 29 3A 82 42 4C 00 3C 10 80 02 8D 36 39 30 3A 99 |):.BL.<....690:.|
00000830: 52 45 24 28 57 29 3A 8D 31 31 35 30 00 57 10 8A |RE$(W):.1150.W..|
00000840: 02 99 22 13 11 11 11 11 1D 1D 52 45 41 44 59 22 |..".......READY"|
00000850: 3A 58 58 B2 32 35 30 00 71 10 94 02 50 4F 24 B2 |:XX.250.q...PO$.|
00000860: 22 13 11 11 11 11 11 1D 1D 20 22 3A 8D 31 31 39 |"........ ":.119|
00000870: 30 00 7A 10 9E 02 99 22 93 22 00 80 10 A8 02 80 |0.z...."."......|
00000880: 00 AE 10 B2 02 8D 31 30 36 30 3A 8D 31 31 30 30 |......1060:.1100|
00000890: 3A 87 43 24 3A 8D 31 31 32 30 3A 81 41 B2 30 A4 |:.C$:.1120:.A.0.|
000008A0: 31 3A 8D 39 39 30 3A 82 3A 87 43 24 2C 57 00 B4 |1:.990:.:.C$,W..|
000008B0: 10 BC 02 8E 00 C8 10 C6 02 99 59 41 24 AA 59 50 |..........YA$.YP|
000008C0: 24 3A 8D 39 36 30 3A 8E 00 E3 10 D0 02 99 22 24 |$:.960:......."$|
000008D0: 30 38 30 30 20 28 43 36 34 29 20 2D 2D 2D 2D 2D |0800 (C64) -----|
000008E0: 2D 2D 22 00 FF 10 DA 02 99 22 20 D5 2B 2D 2D 2D |--"......" .+---|
000008F0: 2D 2D 2D 2D C9 C2 20 20 20 20 20 20 20 C2 22 00 |----.. .".|
00000900: 1D 11 E4 02 99 22 20 C2 53 59 53 34 39 31 35 32 |....." .SYS49152|
00000910: C2 20 C2 12 59 20 52 45 47 20 92 C2 22 00 38 11 |. ..Y REG ..".8.|
00000920: EE 02 99 22 20 C2 20 20 20 20 20 20 20 20 C2 20 |..." . . |
00000930: 2D 2D 2D 2D 2D 2D 2D 22 00 54 11 F8 02 99 22 20 |-------".T...." |
00000940: C2 20 20 20 20 20 20 20 20 C2 C2 20 20 20 20 20 |. .. |
00000950: 20 20 C2 22 00 71 11 02 03 99 22 20 C2 20 20 20 | .".q...." . |
00000960: 20 20 20 20 20 C2 C2 12 58 20 52 45 47 20 92 C2 | ...X REG ..|
00000970: 22 00 8C 11 0C 03 99 22 20 C2 20 20 20 20 20 20 |"......" . |
00000980: 20 20 C2 20 2D 2D 2D 2D 2D 2D 2D 22 00 A8 11 16 | . -------"....|
00000990: 03 99 22 20 C2 20 20 20 20 20 20 20 20 C2 C2 20 |.." . .. |
000009A0: 20 20 20 20 20 20 C2 22 00 C5 11 20 03 99 22 20 | ."... .." |
000009B0: C2 20 20 20 20 20 20 20 20 C2 C2 12 20 41 43 43 |. ... ACC|
000009C0: 20 20 92 C2 22 00 E0 11 2A 03 99 22 20 CA B9 B9 | .."...*.." ...|
000009D0: B9 B9 B9 B9 B9 B9 CB 20 2D 2D 2D 2D 2D 2D 2D 22 |....... -------"|
000009E0: 00 01 12 34 03 99 22 20 20 C2 12 53 43 52 45 45 |...4.." ..SCREE|
000009F0: 4E 92 20 20 20 C2 12 20 43 30 30 30 20 20 92 C2 |N. .. C000 ..|
00000A00: 22 00 20 12 3E 03 99 22 20 20 20 20 20 20 20 20 |". .>.." |
00000A10: 20 20 20 20 C2 12 50 52 4F 47 52 41 4D 92 C2 22 | ..PROGRAM.."|
00000A20: 00 3E 12 48 03 99 22 20 2D 2D 2D 2D 2D 2D 20 20 |.>.H.." ------ |
00000A30: 20 20 C2 12 43 4F 55 4E 54 45 52 92 C2 22 00 58 | ..COUNTER..".X|
00000A40: 12 52 03 99 22 20 C2 20 20 20 20 20 C2 20 20 20 |.R.." . . |
00000A50: 2D 2D 2D 2D 2D 2D 2D 22 00 73 12 5C 03 99 22 20 |-------".s.\.." |
00000A60: C2 20 20 20 20 20 C2 20 20 20 C2 20 20 20 20 20 |. . . |
00000A70: 20 C2 22 00 8F 12 66 03 99 22 20 12 20 20 20 92 | ."...f.." . .|
00000A80: 2D 2D 2D 2D C2 41 44 44 52 45 53 53 92 C2 22 00 |----.ADDRESS..".|
00000A90: AA 12 70 03 99 22 20 20 20 20 20 20 20 20 20 20 |..p.." |
00000AA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 C6 12 7A 03 99 |---------"...z..|
00000AB0: 22 20 20 12 20 20 92 2D 2D 2D 2D 20 C2 20 20 20 |" . .---- . |
00000AC0: 20 20 20 20 C2 22 00 E8 12 84 03 99 22 20 12 20 | ."......" . |
00000AD0: 20 20 44 41 54 41 92 C2 20 20 C2 12 20 44 45 43 | DATA.. .. DEC|
00000AE0: 4F 44 45 52 20 92 C2 22 00 FB 12 8E 03 99 22 20 |ODER .."......" |
00000AF0: 20 20 12 20 42 55 53 53 92 C2 22 00 22 13 98 03 | . BUSS.."."...|
00000B00: 99 22 20 12 20 20 20 20 20 92 20 20 12 20 20 20 |." . . . |
00000B10: 20 92 20 12 20 20 20 20 20 92 20 12 20 20 20 20 | . . . . |
00000B20: 92 22 00 49 13 A2 03 99 22 20 12 20 20 20 20 20 |.".I...." . |
00000B30: 92 20 20 12 20 20 20 20 92 20 12 20 20 20 20 20 |. . . . |
00000B40: 92 20 12 20 20 20 20 92 22 00 4F 13 AC 03 8E 00 |. . .".O.....|
00000B50: 60 13 B6 03 8F 20 2A 2A 2A 2A 20 44 45 4C 41 59 |`.... **** DELAY|
00000B60: 00 6E 13 C0 03 81 44 B2 30 A4 58 58 3A 82 00 74 |.n....D.0.XX:..t|
00000B70: 13 CA 03 8E 00 88 13 D4 03 8F 20 2A 2A 2A 2A 20 |.......... **** |
00000B80: 44 41 54 41 20 42 55 53 00 9A 13 DE 03 81 20 42 |DATA BUS...... B|
00000B90: B2 31 A4 33 3A 89 31 30 31 30 00 A9 13 E8 03 81 |.1.3:.1010......|
00000BA0: 20 42 B2 33 A4 31 A9 AB 31 00 BC 13 F2 03 99 52 | B.3.1..1......R|
00000BB0: 24 3B 22 1D 12 22 3B 44 24 28 42 29 00 E7 13 FC |$;"..";D$(B)....|
00000BC0: 03 81 43 B2 31 A4 32 3A 99 22 1D 12 22 44 42 24 |..C.1.2:.".."DB$|
00000BD0: 28 42 29 44 42 24 28 42 29 44 42 24 28 42 29 44 |(B)DB$(B)DB$(B)D|
00000BE0: 42 24 28 42 29 3A 82 00 F2 13 06 04 8D 39 36 30 |B$(B):.......960|
00000BF0: 3A 82 00 F8 13 10 04 8E 00 0C 14 1A 04 8F 20 2A |:............. *|
00000C00: 2A 2A 2A 20 50 43 20 56 41 4C 55 45 00 14 14 24 |*** PC VALUE...$|
00000C10: 04 87 50 24 00 3E 14 2E 04 50 4F 24 B2 41 43 24 |..P$.>...PO$.AC$|
00000C20: 28 33 29 AA 22 9D 20 22 AA 50 24 AA 22 20 20 22 |(3).". ".P$." "|
00000C30: 3A 8D 31 31 39 30 3A 99 22 12 22 50 4F 24 00 4B |:.1190:."."PO$.K|
00000C40: 14 38 04 99 4D 24 28 31 29 3A 8E 00 5D 14 42 04 |.8..M$(1):..].B.|
00000C50: 8F 20 2A 2A 2A 2A 20 4D 45 4D 4C 4F 43 00 6F 14 |. **** MEMLOC.o.|
00000C60: 4C 04 8D 39 36 30 3A 99 4D 44 24 50 24 3A 8E 00 |L..960:.MD$P$:..|
00000C70: 82 14 56 04 8F 20 2A 2A 2A 2A 20 4D 45 4D 43 4F |..V.. **** MEMCO|
00000C80: 4E 54 00 9C 14 60 04 50 4F 24 B2 4D 44 24 AA 22 |NT...`.PO$.MD$."|
00000C90: 11 1D 22 AA 43 24 3A 8D 31 31 39 30 00 A9 14 6A |..".C$:.1190...j|
00000CA0: 04 99 4D 24 28 30 29 3A 8E 00 BC 14 74 04 8F 20 |..M$(0):....t.. |
00000CB0: 2A 2A 2A 2A 20 44 45 43 4F 44 45 52 00 D7 14 7E |**** DECODER...~|
00000CC0: 04 8B 57 B2 31 A7 99 41 43 24 28 57 29 22 20 20 |..W.1..AC$(W)" |
00000CD0: 20 20 20 20 20 20 22 00 EF 14 88 04 50 4F 24 B2 | ".....PO$.|
00000CE0: 41 43 24 28 57 29 AA 43 24 3A 8D 31 31 39 30 00 |AC$(W).C$:.1190.|
00000CF0: FD 14 92 04 99 52 45 24 28 30 29 3A 8E 00 0E 15 |.....RE$(0):....|
00000D00: 9C 04 8F 20 2A 2A 2A 2A 20 46 4C 41 53 48 00 38 |... **** FLASH.8|
00000D10: 15 A6 04 81 41 B2 30 A4 50 41 3A 99 22 12 22 50 |....A.0.PA:."."P|
00000D20: 4F 24 22 92 22 3A 8D 39 36 30 3A 99 50 4F 24 3A |O$".":.960:.PO$:|
00000D30: 8D 39 36 30 3A 82 3A 8E 00 48 15 B0 04 8F 20 2A |.960:.:..H.... *|
00000D40: 2A 2A 2A 20 44 41 54 41 00 80 15 BA 04 83 43 30 |*** DATA......C0|
00000D50: 30 34 2C 39 39 2C 22 53 54 41 20 20 20 2C 59 22 |04,99,"STA ,Y"|
00000D60: 2C 31 2C 43 30 30 35 2C 30 30 2C 22 20 20 30 30 |,1,C005,00," 00|
00000D70: 22 2C 32 2C 43 30 30 36 2C 30 38 2C 30 38 2C 32 |",2,C006,08,08,2|
00000D80: 00 8A 15 C4 04 83 32 2C 32 30 00 A6 15 CE 04 83 |......2,20......|
00000D90: 43 30 30 37 2C 38 38 2C 22 44 45 59 20 20 20 20 |C007,88,"DEY |
00000DA0: 20 22 2C 31 2C 36 00 DA 15 D8 04 83 43 30 30 38 | ",1,6......C008|
00000DB0: 2C 31 30 2C 42 50 4C 2C 31 2C 43 30 30 39 2C 46 |,10,BPL,1,C009,F|
00000DC0: 41 2C 22 1D 1D 1D 1D 24 46 41 22 2C 31 2C 22 1D |A,"....$FA",1,".|
00000DD0: 1D 1D 24 43 30 30 34 22 2C 31 00 F4 15 E2 04 83 |..$C004",1......|
00000DE0: 43 30 30 41 2C 36 30 2C 22 52 54 53 20 20 20 20 |C00A,60,"RTS |
00000DF0: 20 22 2C 31 00 1F 16 EC 04 83 43 50 55 20 44 45 | ",1......CPU DE|
00000E00: 4D 4F 4E 53 54 52 41 54 49 4F 4E 2C 22 2D 2D 2D |MONSTRATION,"---|
00000E10: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |--------------".|
00000E20: 54 16 F6 04 83 54 48 49 53 20 50 52 4F 47 52 41 |T....THIS PROGRA|
00000E30: 4D 20 57 49 4C 4C 2C 53 48 4F 57 20 48 4F 57 20 |M WILL,SHOW HOW |
00000E40: 54 48 45 20 43 50 55 2C 45 58 45 43 55 54 45 53 |THE CPU,EXECUTES|
00000E50: 20 54 48 45 00 8A 16 00 05 83 46 4F 4C 4C 4F 57 | THE......FOLLOW|
00000E60: 49 4E 47 20 52 4F 55 54 49 4E 45 2C 22 11 43 30 |ING ROUTINE,".C0|
00000E70: 30 30 20 4C 44 59 23 20 24 30 37 22 2C 43 30 30 |00 LDY# $07",C00|
00000E80: 32 20 4C 44 41 23 20 24 32 30 00 C5 16 0A 05 83 |2 LDA# $20......|
00000E90: 22 43 30 30 34 20 53 54 41 20 20 24 30 38 30 30 |"C004 STA $0800|
00000EA0: 2C 59 22 2C 43 30 30 37 20 44 45 59 2C 43 30 30 |,Y",C007 DEY,C00|
00000EB0: 38 20 42 50 4C 20 20 24 43 30 30 34 2C 43 30 30 |8 BPL $C004,C00|
00000EC0: 41 20 52 54 53 00 FB 16 14 05 83 22 11 54 48 49 |A RTS......".THI|
00000ED0: 53 20 57 4F 55 4C 44 20 43 4C 45 41 52 22 2C 50 |S WOULD CLEAR",P|
00000EE0: 41 52 54 20 4F 46 20 54 48 45 20 53 43 52 45 45 |ART OF THE SCREE|
00000EF0: 4E 20 4F 4E 20 41 20 43 36 34 2E 00 1C 17 1E 05 |N ON A C64......|
00000F00: 83 43 30 30 30 2E 41 30 2E 4C 44 59 23 2C 31 2E |.C000.A0.LDY#,1.|
00000F10: 43 30 30 31 2C 30 37 2C 30 37 2C 36 00 3D 17 28 |C001,07,07,6.=.(|
00000F20: 05 83 43 30 30 32 2C 41 39 2C 4C 44 41 23 2C 31 |..C002,A9,LDA#,1|
00000F30: 2C 43 30 30 33 2C 32 30 2C 32 30 2C 34 00 00 00 |,C003,20,20,4...|
..=.... ** THIS WILL NOT WORK ON UNEXPAN
DED VICS .......SORRY...... ** FOR VIC-2
0 OWNERS I HAVE LIMITED THE SCREEN SIZE
TO 22 COLUMNS.C.... ** OWNERS OF VIC-20S
SHOULD USE THE REMMED INSTRUCTIONS.I.(.
:...2..A.1.33:.A$:....<.AC$."...........
........"...F..".";.!.P..A.1.15:.A$:.AC$
" "A$:..C.Z.. *** ON VIC-20 OMIT AC$"
".].D.."...PRESS SPACE-BAR".R.N..A$:.A
$.." ".110...X..".";:. ********** ON VI
C-20 USE PRINT".";......720:.".":XX.50:P
A.7.V...R$.".................".....DB$(1
)." . . ":DB$(2)." . . ":DB$(3)."
. ."./. .B1$.".... .":B0$."... ".
J...D$(1)." ".B1$.B0$.B0$.E...D$(2)."
".B0$.B1$.B0$.....D$(3).". .".B0$.B0$.B
1$...H.RE$."B..^..B..":R0$." .. .. ...B
.".I.R..A.1.6:RE$(A).RE$.RE$(A.1)......A
.3.RE$(3).RE$(3)."B..":RE$(0).RE$(0)." .
.".....RE$(0).RE$(0).R0$:..B....A.1.6:RE
$(A).R$.".....".AC$.RE$(A)."._.":..C...R
E$(0).R$.".....".AC$.RE$(0).....M$(1)."_
--...B..B...-":M$(2)."_--....-".....M$(0
)."B ".R0$." B....... B"......A.0.2:
M$(A).R$."...".H(AC$,7).M$(A):....".B.17
:.A.1.6...,.AC$(A).H(R$,B.3.(A.1)).".".I
(AC$,14).&.6..A.2.B.16.,.@...`.J..A.1.3:
AC$(A).H(AC$(A),C(AC$(A))..(.(1.4.A))):.
...T.MD$.H(R$,14)."..":R0$."B..":YA$.AC$
."-...".L.^..A.1.6:DP$.DP$.R0$:.:AB$.YA$
.DP$.DP$:DP$.YA$.DP$:YA$.AB$...H.AB$.H(R
$,8).AB$:DP$.H(R$,11).DP$.".-.":YA$.".."
.YA$...R.ST$.H(AC$,9)."+"...|.:.G....***
******** MAIN PROG ***********..W....L.1
.4:.690:.RE$(W):.1150:.:. LDY#07:LDA#20.
.....BL.7.0 ..1:YP$.".-.":.:BL$.I(D(BL),
1)......BL.6.XX.0:PA.3.E....BL.5.PA.0...
...L.0.2:.690:.RE$(W):.1150:.:. STA 0800
,Y...B..710:C$."..0".BL$.%.L.PO$.AC$(6).
"..".C$:.1190.:.V..W:.1150:.RE$(0).]....
M$(2):PO$.MD$."080".BL$:.1190.....C$."."
.J("1319133439313532",BL.2.1,2):.1120...
..T$.".$080".I(D(BL),1)."......".I(ST$,B
L.3)......TAB$:PO$.AC$(4)."20":.1190....
..1000:.RE$(0):.1000:.C$:.1120......"..
U--------I".$...PO$.T$:.1190.?.&.."...";
I(AC$,BL.2);" ".V.0..690:.RE$(W):.1150.R
.:.YP$."B..B..B...-.":.710...D.C$."0".I(
D(BL.1),1):.BL.0.C$."-1"...N..W:.1150:.R
E$(0).M.X..L.0.1:.690:.RE$(W):.1160:....
B..BL.0..A$,A$:XX.50:PA.7:.630...L..C$,W
:.1160.%.V..960:.DP$:.D.0.XX.10:.:.RE$(0
):.BL.<....690:.RE$(W):.1150.W....".....
..READY":XX.250.Q...PO$."........ ":.119
0.Z...."."............1060:.1100:.C$:.11
20:.A.0.1:.990:.:.C$,W.......H.F..YA$.YP
$:.960:....P.."$0800 (C64) -------"...Z.
." U+-------IB B"......" BSYS49152
B B.Y REG .B".8...." B B -------"
.T...." B BB B".Q...." B
BB.X REG .B"......" B B ----
---"......" B BB B".E. .."
B BB. ACC .B"...*.." J........K
-------"...4.." B.SCREEN. B. C000 .B
". .>.." B.PROGRAM.B".>.H.."
------ B.COUNTER.B".X.R.." B B
-------".S.\.." B B B B"...F.
." . .----BADDRESS.B"...P.."
---------".F.Z.." . .---- B B"..
...." . DATA.B B. DECODER .B"......"
. BUSS.B"."...." . . . . .
. . .".I...." . . . . .
. . .".O.....`.... **** DELAY.N....D.
0.XX:..T.J.....T.. **** DATA BUS...... B
.1.3:.1010...... B.3.1..1......R$;"..";D
$(B)......C.1.2:.".."DB$(B)DB$(B)DB$(B)D
B$(B):.......960:............. **** PC V
ALUE...$..P$.>...PO$.AC$(3).". ".P$." "
:.1190:."."PO$.K.8..M$(1):..].B.. **** M
EMLOC.O.L..960:.MD$P$:....V.. **** MEMCO
NT...`.PO$.MD$."..".C$:.1190...J..M$(0):
....T.. **** DECODER.W.~..W.1..AC$(W)"
".....PO$.AC$(W).C$:.1190......RE$
(0):....... **** FLASH.8....A.0.PA:."."P
O$".":.960:.PO$:.960:.:..H.... **** DATA
......C004,99,"STA ,Y",1,C005,00," 00
",2,C006,08,08,2...D..2,20...N..C007,88,
"DEY ",1,6.Z.X..C008,10,BPL,1,C009,F
A,"....$FA",1,"...$C004",1......C00A,60,
"RTS ",1......CPU DEMONSTRATION,"---
--------------".T....THIS PROGRAM WILL,S
HOW HOW THE CPU,EXECUTES THE......FOLLOW
ING ROUTINE,".C000 LDY# $07",C002 LDA# $
20.E...."C004 STA $0800,Y",C007 DEY,C00
8 BPL $C004,C00A RTS......".THIS WOULD
CLEAR",PART OF THE SCREEN ON A C64......
.C000.A0.LDY#,1.C001,07,07,6.=.(..C002,A
9,LDA#,1,C003,20,20,4...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL