NOT WORKING
FILE INFORMATION
FILENAME(S): NOT WORKING
FILE TYPE(S): PRG
FILE SIZE: 3.4K
FIRST SEEN: 2025-11-30 21:09:45
APPEARS ON: 1 disk(s)
FILE HASH
024e48b3c877f3f7ee35bbc8f6b3f068e8c54d4019fbb7fef8fc6758adb45cc1
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PAL | NOT WORKING | PRG | DuncanTwain | 13 | 18 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 0A 00 9E 37 30 30 3A 2E 4F 50 54 20 |.......700:.OPT |
00000010: 4F 4F 3A AC B2 24 34 30 30 30 00 2A 08 14 00 53 |OO:..$4000.*...S|
00000020: 45 54 20 B2 20 24 30 43 30 30 00 36 08 1E 00 3A |ET . $0C00.6...:|
00000030: 20 20 20 53 45 49 00 47 08 28 00 3A 20 20 20 4C | SEI.G.(.: L|
00000040: 44 41 20 23 24 37 46 00 59 08 32 00 3A 20 20 20 |DA #$7F.Y.2.: |
00000050: 53 54 41 20 24 44 43 30 44 00 6B 08 3C 00 3A 20 |STA $DC0D.k.<.: |
00000060: 20 20 4C 44 41 20 23 B1 49 51 31 00 7D 08 46 00 | LDA #.IQ1.}.F.|
00000070: 3A 20 20 20 53 54 41 20 24 30 33 31 35 00 8F 08 |: STA $0315...|
00000080: 50 00 3A 20 20 20 53 54 41 20 24 44 30 31 41 00 |P.: STA $D01A.|
00000090: A1 08 5A 00 3A 20 20 20 4C 44 41 20 23 B3 49 51 |..Z.: LDA #.IQ|
000000A0: 31 00 B3 08 64 00 3A 20 20 20 53 54 41 20 24 30 |1...d.: STA $0|
000000B0: 33 31 34 00 C3 08 6E 00 3A 20 20 20 53 54 41 20 |314...n.: STA |
000000C0: 24 30 32 00 D4 08 78 00 3A 20 20 20 4C 44 41 20 |$02...x.: LDA |
000000D0: 23 24 30 31 00 E4 08 82 00 3A 20 20 20 53 54 41 |#$01.....: STA|
000000E0: 20 24 46 46 00 F5 08 8C 00 3A 20 20 20 4C 44 41 | $FF.....: LDA|
000000F0: 20 23 24 30 36 00 07 09 96 00 3A 20 20 20 53 54 | #$06.....: ST|
00000100: 41 20 24 44 30 32 35 00 18 09 A0 00 3A 20 20 20 |A $D025.....: |
00000110: 4C 44 41 20 23 24 30 45 00 2A 09 AA 00 3A 20 20 |LDA #$0E.*...: |
00000120: 20 53 54 41 20 24 44 30 32 36 00 3A 09 B4 00 3A | STA $D026.:...:|
00000130: 20 20 20 4A 53 52 20 49 4E 31 00 46 09 BE 00 3A | JSR IN1.F...:|
00000140: 20 20 20 43 4C 49 00 52 09 C8 00 3A 20 20 20 52 | CLI.R...: R|
00000150: 54 53 00 63 09 D2 00 41 30 20 20 4C 44 58 20 23 |TS.c...A0 LDX #|
00000160: 24 30 46 00 77 09 DC 00 41 31 20 20 52 4F 4C 20 |$0F.w...A1 ROL |
00000170: 24 30 41 30 32 2C 58 00 8B 09 E6 00 3A 20 20 20 |$0A02,X.....: |
00000180: 52 4F 4C 20 24 30 41 30 31 2C 58 00 9F 09 F0 00 |ROL $0A01,X.....|
00000190: 3A 20 20 20 52 4F 4C 20 24 30 41 30 30 2C 58 00 |: ROL $0A00,X.|
000001A0: B3 09 FA 00 3A 20 20 20 52 4F 4C 20 24 30 39 43 |....: ROL $09C|
000001B0: 32 2C 58 00 C7 09 FF 00 3A 20 20 20 52 4F 4C 20 |2,X.....: ROL |
000001C0: 24 30 39 43 31 2C 58 00 DB 09 04 01 3A 20 20 20 |$09C1,X.....: |
000001D0: 52 4F 4C 20 24 30 39 43 30 2C 58 00 EF 09 0E 01 |ROL $09C0,X.....|
000001E0: 3A 20 20 20 52 4F 4C 20 24 30 39 38 32 2C 58 00 |: ROL $0982,X.|
000001F0: 03 0A 18 01 3A 20 20 20 52 4F 4C 20 24 30 39 38 |....: ROL $098|
00000200: 31 2C 58 00 17 0A 22 01 3A 20 20 20 52 4F 4C 20 |1,X...".: ROL |
00000210: 24 30 39 38 30 2C 58 00 2B 0A 2C 01 3A 20 20 20 |$0980,X.+.,.: |
00000220: 52 4F 4C 20 24 30 39 34 32 2C 58 00 3F 0A 36 01 |ROL $0942,X.?.6.|
00000230: 3A 20 20 20 52 4F 4C 20 24 30 39 34 31 2C 58 00 |: ROL $0941,X.|
00000240: 53 0A 40 01 3A 20 20 20 52 4F 4C 20 24 30 39 34 |S.@.: ROL $094|
00000250: 30 2C 58 00 67 0A 4A 01 3A 20 20 20 52 4F 4C 20 |0,X.g.J.: ROL |
00000260: 24 30 39 30 32 2C 58 00 7B 0A 54 01 3A 20 20 20 |$0902,X.{.T.: |
00000270: 52 4F 4C 20 24 30 39 30 31 2C 58 00 8F 0A 5E 01 |ROL $0901,X...^.|
00000280: 3A 20 20 20 52 4F 4C 20 24 30 39 30 30 2C 58 00 |: ROL $0900,X.|
00000290: A3 0A 68 01 3A 20 20 20 52 4F 4C 20 24 30 38 43 |..h.: ROL $08C|
000002A0: 32 2C 58 00 B7 0A 72 01 3A 20 20 20 52 4F 4C 20 |2,X...r.: ROL |
000002B0: 24 30 38 43 31 2C 58 00 CB 0A 7C 01 3A 20 20 20 |$08C1,X...|.: |
000002C0: 52 4F 4C 20 24 30 38 43 30 2C 58 00 DF 0A 86 01 |ROL $08C0,X.....|
000002D0: 3A 20 20 20 52 4F 4C 20 24 30 38 38 32 2C 58 00 |: ROL $0882,X.|
000002E0: F3 0A 90 01 3A 20 20 20 52 4F 4C 20 24 30 38 38 |....: ROL $088|
000002F0: 31 2C 58 00 07 0B 9A 01 3A 20 20 20 52 4F 4C 20 |1,X.....: ROL |
00000300: 24 30 38 38 30 2C 58 00 1B 0B A4 01 3A 20 20 20 |$0880,X.....: |
00000310: 52 4F 4C 20 24 30 38 34 32 2C 58 00 2F 0B AE 01 |ROL $0842,X./...|
00000320: 3A 20 20 20 52 4F 4C 20 24 30 38 34 31 2C 58 00 |: ROL $0841,X.|
00000330: 43 0B B8 01 3A 20 20 20 52 4F 4C 20 24 30 38 34 |C...: ROL $084|
00000340: 30 2C 58 00 57 0B C2 01 3A 20 20 20 52 4F 4C 20 |0,X.W...: ROL |
00000350: 24 30 38 30 32 2C 58 00 6B 0B CC 01 3A 20 20 20 |$0802,X.k...: |
00000360: 52 4F 4C 20 24 30 38 30 31 2C 58 00 7F 0B D6 01 |ROL $0801,X.....|
00000370: 3A 20 20 20 52 4F 4C 20 24 30 38 30 30 2C 58 00 |: ROL $0800,X.|
00000380: A3 0B F4 01 3A 20 20 20 49 4E 58 3A 49 4E 58 3A |....: INX:INX:|
00000390: 49 4E 58 3A 43 50 58 20 23 24 33 46 3A 42 4E 45 |INX:CPX #$3F:BNE|
000003A0: 20 41 31 00 B3 0B FE 01 3A 20 20 20 49 4E 43 20 | A1.....: INC |
000003B0: 24 30 32 00 D3 0B 08 02 3A 20 20 20 4C 44 41 20 |$02.....: LDA |
000003C0: 24 30 32 3A 43 4D 50 20 23 24 30 38 3A 42 4E 45 |$02:CMP #$08:BNE|
000003D0: 20 42 33 00 EC 0B 12 02 3A 20 20 20 4C 44 41 20 | B3.....: LDA |
000003E0: 23 24 30 30 3A 53 54 41 20 24 30 32 00 FD 0B 30 |#$00:STA $02...0|
000003F0: 02 42 30 20 20 4C 44 41 20 54 45 58 54 00 0E 0C |.B0 LDA TEXT...|
00000400: 3A 02 3A 20 20 20 43 4D 50 20 23 24 46 46 00 1D |:.: CMP #$FF..|
00000410: 0C 44 02 3A 20 20 20 42 45 51 20 42 34 00 31 0C |.D.: BEQ B4.1.|
00000420: 4E 02 3A 20 20 20 41 53 4C 3A 41 53 4C 3A 41 53 |N.: ASL:ASL:AS|
00000430: 4C 00 40 0C 58 02 3A 20 20 20 42 43 43 20 42 31 |L.@.X.: BCC B1|
00000440: 00 51 0C 62 02 3A 20 20 20 49 4E 43 20 42 32 AA |.Q.b.: INC B2.|
00000450: 32 00 62 0C 6C 02 42 31 20 20 53 54 41 20 42 32 |2.b.l.B1 STA B2|
00000460: AA 31 00 73 0C 76 02 3A 20 20 20 4C 44 58 20 23 |.1.s.v.: LDX #|
00000470: 24 30 30 00 84 0C 80 02 3A 20 20 20 4C 44 59 20 |$00.....: LDY |
00000480: 23 24 30 30 00 96 0C 8A 02 42 32 20 20 4C 44 41 |#$00.....B2 LDA|
00000490: 20 53 45 54 2C 59 00 AA 0C 94 02 3A 20 20 20 53 | SET,Y.....: S|
000004A0: 54 41 20 24 30 41 31 31 2C 58 00 CA 0C 9E 02 3A |TA $0A11,X.....:|
000004B0: 20 20 20 49 4E 58 3A 49 4E 58 3A 49 4E 58 3A 49 | INX:INX:INX:I|
000004C0: 4E 58 3A 49 4E 58 3A 49 4E 58 00 D6 0C A8 02 3A |NX:INX:INX.....:|
000004D0: 20 20 20 49 4E 59 00 E7 0C BC 02 3A 20 20 20 43 | INY.....: C|
000004E0: 50 59 20 23 24 30 38 00 F6 0C C6 02 3A 20 20 20 |PY #$08.....: |
000004F0: 42 4E 45 20 42 32 00 11 0D D0 02 3A 20 20 20 4C |BNE B2.....: L|
00000500: 44 41 20 23 B1 53 45 54 3A 53 54 41 20 42 32 AA |DA #.SET:STA B2.|
00000510: 32 00 2C 0D DA 02 3A 20 20 20 4C 44 41 20 23 B3 |2.,...: LDA #.|
00000520: 53 45 54 3A 53 54 41 20 42 32 AA 31 00 3D 0D E4 |SET:STA B2.1.=..|
00000530: 02 3A 20 20 20 49 4E 43 20 42 30 AA 31 00 4C 0D |.: INC B0.1.L.|
00000540: EE 02 3A 20 20 20 42 4E 45 20 42 33 00 5D 0D F8 |..: BNE B3.]..|
00000550: 02 3A 20 20 20 49 4E 43 20 42 30 AA 32 00 69 0D |.: INC B0.2.i.|
00000560: 02 03 42 33 20 20 52 54 53 00 7C 0D 0C 03 42 34 |..B3 RTS.|...B4|
00000570: 20 20 4C 44 41 20 23 B3 54 45 58 54 00 8D 0D 16 | LDA #.TEXT....|
00000580: 03 3A 20 20 20 53 54 41 20 42 30 AA 31 00 A0 0D |.: STA B0.1...|
00000590: 20 03 3A 20 20 20 4C 44 41 20 23 B1 54 45 58 54 | .: LDA #.TEXT|
000005A0: 00 B8 0D 2A 03 3A 20 20 20 53 54 41 20 42 30 AA |...*.: STA B0.|
000005B0: 32 3A 4A 4D 50 20 42 30 00 C9 0D 3E 03 49 51 31 |2:JMP B0...>.IQ1|
000005C0: 20 4C 44 41 20 23 24 30 30 00 DB 0D 48 03 3A 20 | LDA #$00...H.: |
000005D0: 20 20 53 54 41 20 24 44 30 32 31 00 EC 0D 52 03 | STA $D021...R.|
000005E0: 3A 20 20 20 4C 44 58 20 23 24 33 30 00 FD 0D 5C |: LDX #$30...\|
000005F0: 03 3A 20 20 20 4C 44 41 20 23 24 31 30 00 0F 0E |.: LDA #$10...|
00000600: 66 03 3A 20 20 20 53 54 41 20 24 44 30 31 31 00 |f.: STA $D011.|
00000610: 20 0E 70 03 3A 20 20 20 4C 44 59 20 23 24 30 31 | .p.: LDY #$01|
00000620: 00 2C 0E 7A 03 49 30 20 20 44 45 59 00 3B 0E 84 |.,.z.I0 DEY.;..|
00000630: 03 3A 20 20 20 42 4E 45 20 49 30 00 4B 0E 89 03 |.: BNE I0.K...|
00000640: 49 37 20 20 4E 4F 50 3A 4E 4F 50 00 5D 0E 8E 03 |I7 NOP:NOP.]...|
00000650: 49 31 20 20 44 45 43 20 24 44 30 31 36 00 6F 0E |I1 DEC $D016.o.|
00000660: 98 03 3A 20 20 20 49 4E 43 20 24 44 30 31 36 00 |..: INC $D016.|
00000670: 8C 0E A2 03 3A 20 20 20 4E 4F 50 3A 4E 4F 50 3A |....: NOP:NOP:|
00000680: 4E 4F 50 3A 4E 4F 50 3A 4E 4F 50 3A 00 AC 0E AC |NOP:NOP:NOP:....|
00000690: 03 3A 20 20 20 4E 4F 50 3A 4E 4F 50 3A 4E 4F 50 |.: NOP:NOP:NOP|
000006A0: 3A 4E 4F 50 3A 4E 4F 50 3A 4E 4F 50 00 BC 0E B6 |:NOP:NOP:NOP....|
000006B0: 03 3A 20 20 20 42 49 54 20 24 44 30 00 CF 0E C0 |.: BIT $D0....|
000006C0: 03 3A 20 20 20 44 45 58 3A 42 4E 45 20 49 37 00 |.: DEX:BNE I7.|
000006D0: E0 0E CA 03 3A 20 20 20 4C 44 41 20 23 24 44 30 |....: LDA #$D0|
000006E0: 00 F2 0E D4 03 3A 20 20 20 53 54 41 20 24 44 30 |.....: STA $D0|
000006F0: 31 32 00 0D 0F DE 03 3A 20 20 20 4C 44 41 20 23 |12.....: LDA #|
00000700: 24 30 30 3A 53 54 41 20 24 44 30 32 31 00 29 0F |$00:STA $D021.).|
00000710: E6 03 3A 20 20 20 4C 44 41 20 23 B3 49 51 32 3A |..: LDA #.IQ2:|
00000720: 53 54 41 20 24 30 33 31 34 00 45 0F E7 03 3A 20 |STA $0314.E...: |
00000730: 20 20 4C 44 41 20 23 B1 49 51 32 3A 53 54 41 20 | LDA #.IQ2:STA |
00000740: 24 30 33 31 35 00 60 0F E8 03 3A 20 20 20 4C 44 |$0315.`...: LD|
00000750: 41 20 23 24 31 42 3A 53 54 41 20 24 44 30 31 31 |A #$1B:STA $D011|
00000760: 00 6F 0F F2 03 3A 20 20 20 4A 53 52 20 41 30 00 |.o...: JSR A0.|
00000770: 81 0F F7 03 3A 20 20 20 4A 4D 50 20 24 45 41 33 |....: JMP $EA3|
00000780: 31 00 9C 0F FC 03 45 30 20 20 4C 44 41 20 23 24 |1.....E0 LDA #$|
00000790: 43 31 3A 53 54 41 20 24 44 30 31 30 00 B7 0F 06 |C1:STA $D010....|
000007A0: 04 3A 20 20 20 4C 44 41 20 23 24 30 30 3A 53 54 |.: LDA #$00:ST|
000007B0: 41 20 24 44 30 31 43 00 DC 0F 10 04 3A 20 20 20 |A $D01C.....: |
000007C0: 4C 44 41 20 23 24 46 46 3A 53 54 41 20 24 44 30 |LDA #$FF:STA $D0|
000007D0: 31 35 3A 53 54 41 20 24 44 30 31 44 00 ED 0F 1A |15:STA $D01D....|
000007E0: 04 3A 20 20 20 4C 44 58 20 23 24 30 30 00 FF 0F |.: LDX #$00...|
000007F0: 24 04 45 31 20 20 4C 44 41 20 50 52 54 2C 58 00 |$.E1 LDA PRT,X.|
00000800: 13 10 2E 04 3A 20 20 20 53 54 41 20 24 44 30 30 |....: STA $D00|
00000810: 30 2C 58 00 2F 10 38 04 3A 20 20 20 49 4E 58 3A |0,X./.8.: INX:|
00000820: 43 50 58 20 23 24 31 30 3A 42 4E 45 20 45 31 00 |CPX #$10:BNE E1.|
00000830: 40 10 3A 04 3A 20 20 20 4C 44 58 20 23 24 30 30 |@.:.: LDX #$00|
00000840: 00 52 10 3C 04 45 33 20 20 4C 44 41 20 43 4F 4C |.R.<.E3 LDA COL|
00000850: 2C 58 00 66 10 3E 04 3A 20 20 20 53 54 41 20 24 |,X.f.>.: STA $|
00000860: 44 30 32 37 2C 58 00 82 10 40 04 3A 20 20 20 49 |D027,X...@.: I|
00000870: 4E 58 3A 43 50 58 20 23 24 30 38 3A 42 4E 45 20 |NX:CPX #$08:BNE |
00000880: 45 33 00 9C 10 42 04 3A 20 20 20 4C 44 58 20 23 |E3...B.: LDX #|
00000890: 24 30 30 3A 4C 44 41 20 23 24 32 30 00 B0 10 4C |$00:LDA #$20...L|
000008A0: 04 45 32 20 20 53 54 41 20 24 30 37 46 38 2C 58 |.E2 STA $07F8,X|
000008B0: 00 D5 10 56 04 3A 20 20 20 43 4C 43 3A 41 44 43 |...V.: CLC:ADC|
000008C0: 20 23 31 3A 49 4E 58 3A 43 50 58 20 23 38 3A 42 | #1:INX:CPX #8:B|
000008D0: 4E 45 20 45 32 00 E5 10 6A 04 46 30 20 20 44 45 |NE E2...j.F0 DE|
000008E0: 43 20 24 46 46 00 F5 10 74 04 3A 20 20 20 4C 44 |C $FF...t.: LD|
000008F0: 41 20 24 46 46 00 04 11 7E 04 3A 20 20 20 42 4E |A $FF...~.: BN|
00000900: 45 20 46 32 00 2A 11 88 04 3A 20 20 20 4C 44 41 |E F2.*...: LDA|
00000910: 20 23 32 3A 53 54 41 20 24 46 46 3A 4C 44 59 20 | #2:STA $FF:LDY |
00000920: 43 4F 4C 3A 4C 44 58 20 23 30 00 3E 11 92 04 46 |COL:LDX #0.>...F|
00000930: 31 20 20 4C 44 41 20 43 4F 4C AA 31 2C 58 00 50 |1 LDA COL.1,X.P|
00000940: 11 9C 04 3A 20 20 20 53 54 41 20 43 4F 4C 2C 58 |...: STA COL,X|
00000950: 00 6C 11 A6 04 3A 20 20 20 49 4E 58 3A 43 50 58 |.l...: INX:CPX|
00000960: 20 23 24 31 38 3A 42 4E 45 20 46 31 00 7F 11 AB | #$18:BNE F1....|
00000970: 04 3A 20 20 20 53 54 59 20 43 4F 4C AA 32 33 00 |.: STY COL.23.|
00000980: 8B 11 B0 04 46 32 20 20 52 54 53 00 9C 11 BA 04 |....F2 RTS.....|
00000990: 49 51 32 20 4C 44 41 20 23 24 46 39 00 AE 11 C4 |IQ2 LDA #$F9....|
000009A0: 04 3A 20 20 20 53 54 41 20 24 44 30 31 32 00 CA |.: STA $D012..|
000009B0: 11 CE 04 3A 20 20 20 4C 44 41 20 23 B3 49 51 31 |...: LDA #.IQ1|
000009C0: 3A 53 54 41 20 24 30 33 31 34 00 E6 11 D8 04 3A |:STA $0314.....:|
000009D0: 20 20 20 4C 44 41 20 23 B1 49 51 31 3A 53 54 41 | LDA #.IQ1:STA|
000009E0: 20 24 30 33 31 35 00 01 12 E2 04 3A 20 20 20 4C | $0315.....: L|
000009F0: 44 41 20 23 24 31 42 3A 53 54 41 20 24 44 30 31 |DA #$1B:STA $D01|
00000A00: 31 00 1C 12 EC 04 3A 20 20 20 4C 44 41 20 23 24 |1.....: LDA #$|
00000A10: 30 31 3A 53 54 41 20 24 44 30 31 39 00 35 12 F6 |01:STA $D019.5..|
00000A20: 04 3A 20 20 20 4A 53 52 20 45 30 3A 4A 4D 50 20 |.: JSR E0:JMP |
00000A30: 24 45 41 38 31 00 51 12 00 05 49 4E 31 20 4C 44 |$EA81.Q...IN1 LD|
00000A40: 41 20 23 B3 54 45 58 54 3A 53 54 41 20 42 30 AA |A #.TEXT:STA B0.|
00000A50: 31 00 6D 12 0A 05 3A 20 20 20 4C 44 41 20 23 B1 |1.m...: LDA #.|
00000A60: 54 45 58 54 3A 53 54 41 20 42 30 AA 32 00 80 12 |TEXT:STA B0.2...|
00000A70: 14 05 3A 20 20 20 4C 44 58 20 23 30 3A 54 58 41 |..: LDX #0:TXA|
00000A80: 00 94 12 1E 05 49 4E 32 20 53 54 41 20 24 30 38 |.....IN2 STA $08|
00000A90: 30 30 2C 58 00 A8 12 28 05 3A 20 20 20 53 54 41 |00,X...(.: STA|
00000AA0: 20 24 30 39 30 30 2C 58 00 BC 12 32 05 3A 20 20 | $0900,X...2.: |
00000AB0: 20 53 54 41 20 24 30 41 30 30 2C 58 00 D0 12 3C | STA $0A00,X...<|
00000AC0: 05 3A 20 20 20 49 4E 58 3A 42 4E 45 20 49 4E 32 |.: INX:BNE IN2|
00000AD0: 00 E2 12 46 05 3A 20 20 20 53 54 58 20 24 44 30 |...F.: STX $D0|
00000AE0: 32 30 00 F5 12 50 05 3A 20 20 20 4A 53 52 20 47 |20...P.: JSR G|
00000AF0: 30 3A 52 54 53 00 12 13 78 05 47 30 20 20 53 45 |0:RTS...x.G0 SE|
00000B00: 49 3A 4C 44 41 20 23 24 33 33 3A 53 54 41 20 24 |I:LDA #$33:STA $|
00000B10: 30 31 00 24 13 82 05 3A 20 20 20 4C 44 41 20 23 |01.$...: LDA #|
00000B20: B3 53 45 54 00 34 13 8C 05 3A 20 20 20 53 54 41 |.SET.4...: STA|
00000B30: 20 24 46 44 00 46 13 96 05 3A 20 20 20 4C 44 41 | $FD.F...: LDA|
00000B40: 20 23 B1 53 45 54 00 56 13 A0 05 3A 20 20 20 53 | #.SET.V...: S|
00000B50: 54 41 20 24 46 45 00 67 13 A2 05 3A 20 20 20 4C |TA $FE.g...: L|
00000B60: 44 41 20 23 24 30 30 00 77 13 A4 05 3A 20 20 20 |DA #$00.w...: |
00000B70: 53 54 41 20 24 46 42 00 88 13 A6 05 3A 20 20 20 |STA $FB.....: |
00000B80: 4C 44 41 20 23 24 44 30 00 98 13 A8 05 3A 20 20 |LDA #$D0.....: |
00000B90: 20 53 54 41 20 24 46 43 00 B2 13 AA 05 3A 20 20 | STA $FC.....: |
00000BA0: 20 4C 44 58 20 23 24 30 34 3A 4C 44 59 20 23 24 | LDX #$04:LDY #$|
00000BB0: 30 30 00 C6 13 B4 05 47 31 20 20 4C 44 41 20 28 |00.....G1 LDA (|
00000BC0: 24 46 42 29 2C 59 00 DA 13 BE 05 3A 20 20 20 53 |$FB),Y.....: S|
00000BD0: 54 41 20 28 24 46 44 29 2C 59 00 ED 13 C8 05 3A |TA ($FD),Y.....:|
00000BE0: 20 20 20 49 4E 59 3A 42 4E 45 20 47 31 00 10 14 | INY:BNE G1...|
00000BF0: D2 05 3A 20 20 20 49 4E 43 20 24 46 43 3A 49 4E |..: INC $FC:IN|
00000C00: 43 20 24 46 45 3A 44 45 58 3A 42 4E 45 20 47 31 |C $FE:DEX:BNE G1|
00000C10: 00 31 14 DC 05 3A 20 20 20 4C 44 41 20 23 24 33 |.1...: LDA #$3|
00000C20: 37 3A 53 54 41 20 24 30 31 3A 43 4C 49 3A 52 54 |7:STA $01:CLI:RT|
00000C30: 53 00 3C 14 E6 05 50 52 54 20 B2 AC 00 5A 14 F0 |S.<...PRT ...Z..|
00000C40: 05 3A 20 20 20 2E 42 59 54 45 20 24 46 31 2C 24 |.: .BYTE $F1,$|
00000C50: 46 41 2C 24 32 39 2C 24 46 41 00 78 14 FA 05 3A |FA,$29,$FA.x...:|
00000C60: 20 20 20 2E 42 59 54 45 20 24 35 39 2C 24 46 41 | .BYTE $59,$FA|
00000C70: 2C 24 38 39 2C 24 46 41 00 96 14 04 06 3A 20 20 |,$89,$FA.....: |
00000C80: 20 2E 42 59 54 45 20 24 42 39 2C 24 46 41 2C 24 | .BYTE $B9,$FA,$|
00000C90: 45 39 2C 24 46 41 00 B4 14 0E 06 3A 20 20 20 2E |E9,$FA.....: .|
00000CA0: 42 59 54 45 20 24 31 39 2C 24 46 41 2C 24 34 39 |BYTE $19,$FA,$49|
00000CB0: 2C 24 46 41 00 BF 14 40 06 43 4F 4C 20 B2 AC 00 |,$FA...@.COL ...|
00000CC0: DD 14 4A 06 3A 20 20 20 2E 42 59 54 45 20 24 30 |..J.: .BYTE $0|
00000CD0: 43 2C 24 30 43 2C 24 30 43 2C 24 30 43 00 FB 14 |C,$0C,$0C,$0C...|
00000CE0: 54 06 3A 20 20 20 2E 42 59 54 45 20 24 30 42 2C |T.: .BYTE $0B,|
00000CF0: 24 30 42 2C 24 30 42 2C 24 30 42 00 19 15 5E 06 |$0B,$0B,$0B...^.|
00000D00: 3A 20 20 20 2E 42 59 54 45 20 24 30 31 2C 24 30 |: .BYTE $01,$0|
00000D10: 31 2C 24 30 31 2C 24 30 31 00 37 15 68 06 3A 20 |1,$01,$01.7.h.: |
00000D20: 20 20 2E 42 59 54 45 20 24 30 42 2C 24 30 42 2C | .BYTE $0B,$0B,|
00000D30: 24 30 42 2C 24 30 42 00 55 15 72 06 3A 20 20 20 |$0B,$0B.U.r.: |
00000D40: 2E 42 59 54 45 20 24 30 43 2C 24 30 43 2C 24 30 |.BYTE $0C,$0C,$0|
00000D50: 43 2C 24 30 43 00 73 15 7C 06 3A 20 20 20 2E 42 |C,$0C.s.|.: .B|
00000D60: 59 54 45 20 24 30 46 2C 24 30 46 2C 24 30 46 2C |YTE $0F,$0F,$0F,|
00000D70: 24 30 46 00 7F 15 86 06 54 45 58 54 20 B2 AC 00 |$0F.....TEXT ...|
00000D80: 97 15 A4 06 3A 20 20 20 2E 42 59 54 45 20 33 2C |....: .BYTE 3,|
00000D90: 36 2C 31 34 2C 33 32 00 A9 15 AE 06 3A 20 20 20 |6,14,32.....: |
00000DA0: 2E 42 59 54 45 20 24 46 46 00 00 00 |.BYTE $FF... |
.......700:.OPT OO:..$4000.*...SET . $0C
00.6...: SEI.G.(.: LDA #$7F.Y.2.:
STA $DC0D.K.<.: LDA #.IQ1.}.F.: STA
$0315...P.: STA $D01A...Z.: LDA #.IQ
1...D.: STA $0314.C.N.: STA $02.T.X.
: LDA #$01.....: STA $FF.....: LDA
#$06.....: STA $D025... .: LDA #$0E
.*...: STA $D026.:...: JSR IN1.F...:
CLI.R.H.: RTS.C.R.A0 LDX #$0F.W...
A1 ROL $0A02,X.....: ROL $0A01,X.....
: ROL $0A00,X.....: ROL $09C2,X.G...
: ROL $09C1,X.....: ROL $09C0,X.....
: ROL $0982,X.....: ROL $0981,X...".
: ROL $0980,X.+.,.: ROL $0942,X.?.6.
: ROL $0941,X.S.@.: ROL $0940,X.G.J.
: ROL $0902,X.{.T.: ROL $0901,X...^.
: ROL $0900,X...H.: ROL $08C2,X...R.
: ROL $08C1,X.K.|.: ROL $08C0,X.....
: ROL $0882,X.....: ROL $0881,X.....
: ROL $0880,X.....: ROL $0842,X./...
: ROL $0841,X.C...: ROL $0840,X.W.B.
: ROL $0802,X.K.L.: ROL $0801,X..V.
: ROL $0800,X.....: INX:INX:INX:CPX
#$3F:BNE A1.....: INC $02.S...: LDA
$02:CMP #$08:BNE B3.....: LDA #$00:STA
$02...0.B0 LDA TEXT...:.: CMP #$FF..
.D.: BEQ B4.1.N.: ASL:ASL:ASL.@.X.:
BCC B1.Q.B.: INC B2.2.B.L.B1 STA B2
.1.S.V.: LDX #$00.....: LDY #$00....
.B2 LDA SET,Y.....: STA $0A11,X.J...:
INX:INX:INX:INX:INX:INX.V...: INY..
...: CPY #$08...F.: BNE B2...P.: L
DA #.SET:STA B2.2.,.Z.: LDA #.SET:STA
B2.1.=...: INC B0.1.L...: BNE B3.]..
.: INC B0.2.I...B3 RTS.|...B4 LDA #.
TEXT.....: STA B0.1. . .: LDA #.TEXT
...*.: STA B0.2:JMP B0.I.>.IQ1 LDA #$0
0...H.: STA $D021...R.: LDX #$30...\
.: LDA #$10...F.: STA $D011. .P.:
LDY #$01.,.Z.I0 DEY.;...: BNE I0.K...
I7 NOP:NOP.]...I1 DEC $D016.O...: IN
C $D016.....: NOP:NOP:NOP:NOP:NOP:....
.: NOP:NOP:NOP:NOP:NOP:NOP.....: BIT
$D0.O...: DEX:BNE I7...J.: LDA #$D0
...T.: STA $D012.....: LDA #$00:STA
$D021.)...: LDA #.IQ2:STA $0314.E...:
LDA #.IQ2:STA $0315.`...: LDA #$1B:S
TA $D011.O...: JSR A0.....: JMP $EA3
1.....E0 LDA #$C1:STA $D010.....: LDA
#$00:STA $D01C.....: LDA #$FF:STA $D0
15:STA $D01D.....: LDX #$00...$.E1 LD
A PRT,X.....: STA $D000,X./.8.: INX:
CPX #$10:BNE E1.@.:.: LDX #$00.R.<.E3
LDA COL,X.F.>.: STA $D027,X...@.: I
NX:CPX #$08:BNE E3...B.: LDX #$00:LDA
#$20...L.E2 STA $07F8,X.U.V.: CLC:ADC
#1:INX:CPX #8:BNE E2...J.F0 DEC $FF...
T.: LDA $FF...~.: BNE F2.*...: LDA
#2:STA $FF:LDY COL:LDX #0.>...F1 LDA C
OL.1,X.P...: STA COL,X.L...: INX:CPX
#$18:BNE F1....: STY COL.23.....F2
RTS.....IQ2 LDA #$F9...D.: STA $D012.J
.N.: LDA #.IQ1:STA $0314...X.: LDA #
.IQ1:STA $0315.....: LDA #$1B:STA $D01
1.....: LDA #$01:STA $D019.5...: JSR
E0:JMP $EA81.Q...IN1 LDA #.TEXT:STA B0.
1.M...: LDA #.TEXT:STA B0.2.....: LD
X #0:TXA.....IN2 STA $0800,X...(.: STA
$0900,X...2.: STA $0A00,X.P.<.: INX
:BNE IN2...F.: STX $D020...P.: JSR G
0:RTS...X.G0 SEI:LDA #$33:STA $01.$...:
LDA #.SET.4...: STA $FD.F...: LDA
#.SET.V. .: STA $FE.G...: LDA #$00.
W...: STA $FB.....: LDA #$D0.....:
STA $FC.....: LDX #$04:LDY #$00.F...G
1 LDA ($FB),Y.Z...: STA ($FD),Y...H.:
INY:BNE G1...R.: INC $FC:INC $FE:DE
X:BNE G1.1...: LDA #$37:STA $01:CLI:RT
S.<...PRT ...Z...: .BYTE $F1,$FA,$29,$
FA.X...: .BYTE $59,$FA,$89,$FA.....:
.BYTE $B9,$FA,$E9,$FA.....: .BYTE $19
,$FA,$49,$FA...@.COL .....J.: .BYTE $0
C,$0C,$0C,$0C...T.: .BYTE $0B,$0B,$0B,
$0B...^.: .BYTE $01,$01,$01,$01.7.H.:
.BYTE $0B,$0B,$0B,$0B.U.R.: .BYTE $0
C,$0C,$0C,$0C.S.|.: .BYTE $0F,$0F,$0F,
$0F....TEXT .......: .BYTE 3,6,14,32.
....: .BYTE $FF...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL