SCROLLY1
FILE INFORMATION
FILENAME(S): SCROLLY1
FILE TYPE(S): PRG
FILE SIZE: 4K
FIRST SEEN: 2025-11-30 21:09:45
APPEARS ON: 1 disk(s)
FILE HASH
c77e299a3fe37a79cd801e0291753792c680028dd376249a16d00dbbe7bd286b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PAL | SCROLLY1 | PRG | DuncanTwain | 12 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 E8 03 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 ED 03 53 |OO:..$4000.*...S| 00000020: 45 54 20 B2 20 24 30 45 30 30 00 39 08 EE 03 B0 |ET . $0E00.9....| 00000030: 47 20 B2 20 24 44 30 30 30 00 55 08 F2 03 3A 20 |G . $D000.U...: | 00000040: 20 53 45 49 3A 4C 44 41 20 23 24 33 33 3A 53 54 | SEI:LDA #$33:ST| 00000050: 41 20 24 30 31 00 6E 08 F3 03 3A 20 20 4C 44 58 |A $01.n...: LDX| 00000060: 20 23 B3 B0 47 3A 4C 44 59 20 23 B1 B0 47 00 85 | #..G:LDY #..G..| 00000070: 08 F4 03 3A 20 20 53 54 58 20 24 46 42 3A 53 54 |...: STX $FB:ST| 00000080: 59 20 24 46 43 00 A0 08 F5 03 3A 20 20 4C 44 58 |Y $FC.....: LDX| 00000090: 20 23 B3 53 45 54 3A 4C 44 59 20 23 B1 53 45 54 | #.SET:LDY #.SET| 000000A0: 00 B7 08 F6 03 3A 20 20 53 54 58 20 24 46 44 3A |.....: STX $FD:| 000000B0: 53 54 59 20 24 46 45 00 D0 08 F7 03 3A 20 20 4C |STY $FE.....: L| 000000C0: 44 58 20 23 24 30 32 3A 4C 44 59 20 23 24 30 30 |DX #$02:LDY #$00| 000000D0: 00 E3 08 F8 03 41 41 20 4C 44 41 20 28 24 46 42 |.....AA LDA ($FB| 000000E0: 29 2C 59 00 01 09 F9 03 3A 20 20 53 54 41 20 28 |),Y.....: STA (| 000000F0: 24 46 44 29 2C 59 3A 49 4E 59 3A 42 4E 45 20 41 |$FD),Y:INY:BNE A| 00000100: 41 00 23 09 FA 03 3A 20 20 49 4E 43 20 24 46 43 |A.#...: INC $FC| 00000110: 3A 49 4E 43 20 24 46 45 3A 44 45 58 3A 42 4E 45 |:INC $FE:DEX:BNE| 00000120: 20 41 41 00 3B 09 FB 03 3A 20 20 4C 44 41 20 23 | AA.;...: LDA #| 00000130: 24 33 37 3A 53 54 41 20 24 30 31 00 53 09 FC 03 |$37:STA $01.S...| 00000140: 3A 20 20 4C 44 41 20 23 B3 54 58 3A 53 54 41 20 |: LDA #.TX:STA | 00000150: 24 46 42 00 6B 09 06 04 3A 20 20 4C 44 41 20 23 |$FB.k...: LDA #| 00000160: B1 54 58 3A 53 54 41 20 24 46 43 00 84 09 10 04 |.TX:STA $FC.....| 00000170: 3A 20 20 4C 44 41 20 23 24 30 31 3A 4C 44 58 20 |: LDA #$01:LDX | 00000180: 23 24 30 30 00 A9 09 1A 04 41 30 20 53 54 41 20 |#$00.....A0 STA | 00000190: 24 44 30 32 37 2C 58 3A 49 4E 58 3A 43 50 58 20 |$D027,X:INX:CPX | 000001A0: 23 38 3A 42 4E 45 20 41 30 00 C2 09 24 04 3A 20 |#8:BNE A0...$.: | 000001B0: 20 4C 44 58 20 23 24 30 30 3A 4C 44 41 20 23 24 | LDX #$00:LDA #$| 000001C0: 30 30 00 E7 09 2E 04 41 31 20 53 54 41 20 24 30 |00.....A1 STA $0| 000001D0: 32 41 41 2C 58 3A 49 4E 58 3A 43 50 58 20 23 38 |2AA,X:INX:CPX #8| 000001E0: 3A 42 4E 45 20 41 31 00 01 0A 38 04 3A 20 20 53 |:BNE A1...8.: S| 000001F0: 54 41 20 24 33 46 46 46 3A 4C 44 58 20 23 24 30 |TA $3FFF:LDX #$0| 00000200: 30 00 14 0A 42 04 41 32 20 53 54 41 20 24 30 38 |0...B.A2 STA $08| 00000210: 30 30 2C 58 00 27 0A 44 04 3A 20 20 53 54 41 20 |00,X.'.D.: STA | 00000220: 24 30 39 30 30 2C 58 00 3A 0A 4C 04 3A 20 20 53 |$0900,X.:.L.: S| 00000230: 54 41 20 24 30 41 30 30 2C 58 00 4D 0A 56 04 3A |TA $0A00,X.M.V.:| 00000240: 20 20 53 54 41 20 24 30 42 30 30 2C 58 00 60 0A | STA $0B00,X.`.| 00000250: 60 04 3A 20 20 53 54 41 20 24 30 43 30 30 2C 58 |`.: STA $0C00,X| 00000260: 00 72 0A 6A 04 3A 20 20 49 4E 58 3A 42 4E 45 20 |.r.j.: INX:BNE | 00000270: 41 32 00 8B 0A 74 04 3A 20 20 4C 44 58 20 23 24 |A2...t.: LDX #$| 00000280: 30 30 3A 4C 44 59 20 23 24 32 34 00 A2 0A 7E 04 |00:LDY #$24...~.| 00000290: 41 33 20 54 59 41 3A 53 54 41 20 24 30 37 46 38 |A3 TYA:STA $07F8| 000002A0: 2C 58 00 C1 0A 88 04 3A 20 20 49 4E 58 3A 49 4E |,X.....: INX:IN| 000002B0: 59 3A 43 50 59 20 23 24 32 43 3A 42 4E 45 20 41 |Y:CPY #$2C:BNE A| 000002C0: 33 00 E5 0A 92 04 3A 20 20 4C 44 41 20 23 24 46 |3.....: LDA #$F| 000002D0: 46 3A 53 54 41 20 24 44 30 31 35 3A 53 54 41 20 |F:STA $D015:STA | 000002E0: 24 44 30 31 44 00 FF 0A 9C 04 3A 20 20 4C 44 41 |$D01D.....: LDA| 000002F0: 20 23 24 30 30 3A 53 54 41 20 24 44 30 31 37 00 | #$00:STA $D017.| 00000300: 19 0B A6 04 3A 20 20 4C 44 41 20 23 24 43 30 3A |....: LDA #$C0:| 00000310: 53 54 41 20 24 44 30 31 30 00 29 0B B0 04 3A 20 |STA $D010.)...: | 00000320: 20 4C 44 58 20 23 24 30 30 00 45 0B BA 04 41 34 | LDX #$00.E...A4| 00000330: 20 4C 44 41 20 50 30 2C 58 3A 53 54 41 20 24 44 | LDA P0,X:STA $D| 00000340: 30 30 30 2C 58 00 60 0B C4 04 3A 20 20 49 4E 58 |000,X.`...: INX| 00000350: 3A 43 50 58 20 23 24 31 30 3A 42 4E 45 20 41 34 |:CPX #$10:BNE A4| 00000360: 00 7A 0B CE 04 3A 20 20 4C 44 41 20 23 24 31 42 |.z...: LDA #$1B| 00000370: 3A 53 54 41 20 24 44 30 31 31 00 94 0B D8 04 3A |:STA $D011.....:| 00000380: 20 20 4C 44 41 20 23 24 30 31 3A 53 54 41 20 24 | LDA #$01:STA $| 00000390: 44 30 31 41 00 AE 0B E2 04 3A 20 20 4C 44 41 20 |D01A.....: LDA | 000003A0: 23 24 37 46 3A 53 54 41 20 24 44 43 30 44 00 C8 |#$7F:STA $DC0D..| 000003B0: 0B EC 04 3A 20 20 4C 44 41 20 23 B3 49 31 3A 53 |...: LDA #.I1:S| 000003C0: 54 41 20 24 30 33 31 34 00 E2 0B F6 04 3A 20 20 |TA $0314.....: | 000003D0: 4C 44 41 20 23 B1 49 31 3A 53 54 41 20 24 30 33 |LDA #.I1:STA $03| 000003E0: 31 35 00 06 0C F8 04 3A 20 20 4C 44 41 20 23 24 |15.....: LDA #$| 000003F0: 30 30 3A 53 54 41 20 24 44 30 32 30 3A 53 54 41 |00:STA $D020:STA| 00000400: 20 24 44 30 32 31 00 20 0C FA 04 3A 20 20 4C 44 | $D021. ...: LD| 00000410: 41 20 23 24 30 35 3A 53 54 41 20 24 30 32 38 36 |A #$05:STA $0286| 00000420: 00 42 0C 00 05 3A 20 20 43 4C 49 3A 4C 44 41 20 |.B...: CLI:LDA | 00000430: 23 24 39 33 3A 4A 53 52 20 24 46 46 44 32 3A 52 |#$93:JSR $FFD2:R| 00000440: 54 53 00 66 0C 0A 05 49 31 20 4C 44 41 20 23 24 |TS.f...I1 LDA #$| 00000450: 30 31 3A 53 54 41 20 24 44 30 31 39 3A 53 54 41 |01:STA $D019:STA| 00000460: 20 24 44 30 31 41 00 80 0C 14 05 3A 20 20 4C 44 | $D01A.....: LD| 00000470: 41 20 23 24 31 33 3A 53 54 41 20 24 44 30 31 31 |A #$13:STA $D011| 00000480: 00 9A 0C 1E 05 3A 20 20 4C 44 41 20 23 24 30 32 |.....: LDA #$02| 00000490: 3A 53 54 41 20 24 44 30 31 32 00 B4 0C 28 05 3A |:STA $D012...(.:| 000004A0: 20 20 4C 44 41 20 23 B3 49 32 3A 53 54 41 20 24 | LDA #.I2:STA $| 000004B0: 30 33 31 34 00 CE 0C 32 05 3A 20 20 4C 44 41 20 |0314...2.: LDA | 000004C0: 23 B1 49 32 3A 53 54 41 20 24 30 33 31 35 00 DF |#.I2:STA $0315..| 000004D0: 0C 3C 05 3A 20 20 4A 4D 50 20 24 46 45 42 43 00 |.<.: JMP $FEBC.| 000004E0: 03 0D 46 05 49 32 20 4C 44 41 20 23 24 30 31 3A |..F.I2 LDA #$01:| 000004F0: 53 54 41 20 24 44 30 31 39 3A 53 54 41 20 24 44 |STA $D019:STA $D| 00000500: 30 31 41 00 1D 0D 50 05 3A 20 20 4C 44 41 20 23 |01A...P.: LDA #| 00000510: 24 31 41 3A 53 54 41 20 24 44 30 31 31 00 37 0D |$1A:STA $D011.7.| 00000520: 5A 05 3A 20 20 4C 44 41 20 23 24 46 39 3A 53 54 |Z.: LDA #$F9:ST| 00000530: 41 20 24 44 30 31 32 00 51 0D 64 05 3A 20 20 4C |A $D012.Q.d.: L| 00000540: 44 41 20 23 B3 49 31 3A 53 54 41 20 24 30 33 31 |DA #.I1:STA $031| 00000550: 34 00 6B 0D 6E 05 3A 20 20 4C 44 41 20 23 B1 49 |4.k.n.: LDA #.I| 00000560: 31 3A 53 54 41 20 24 30 33 31 35 00 79 0D 78 05 |1:STA $0315.y.x.| 00000570: 3A 20 20 4A 53 52 20 4A 30 00 90 0D 82 05 3B 20 |: JSR J0.....; | 00000580: 20 4B 45 59 20 43 48 45 43 4B 20 8B 20 B9 53 2E | KEY CHECK . .S.| 00000590: 00 A1 0D 8C 05 3A 20 20 4A 4D 50 20 24 45 41 33 |.....: JMP $EA3| 000005A0: 31 00 B5 0D 96 05 4A 30 20 4C 44 58 20 23 24 30 |1.....J0 LDX #$0| 000005B0: 30 3A 43 4C 43 00 C8 0D A0 05 4A 31 20 52 4F 4C |0:CLC.....J1 ROL| 000005C0: 20 24 30 42 30 30 2C 58 00 DB 0D AA 05 3A 20 20 | $0B00,X.....: | 000005D0: 52 4F 4C 20 24 30 41 43 32 2C 58 00 EE 0D B4 05 |ROL $0AC2,X.....| 000005E0: 3A 20 20 52 4F 4C 20 24 30 41 43 31 2C 58 00 01 |: ROL $0AC1,X..| 000005F0: 0E BE 05 3A 20 20 52 4F 4C 20 24 30 41 43 30 2C |...: ROL $0AC0,| 00000600: 58 00 14 0E C8 05 3A 20 20 52 4F 4C 20 24 30 41 |X.....: ROL $0A| 00000610: 38 32 2C 58 00 27 0E D2 05 3A 20 20 52 4F 4C 20 |82,X.'...: ROL | 00000620: 24 30 41 38 31 2C 58 00 3A 0E DC 05 3A 20 20 52 |$0A81,X.:...: R| 00000630: 4F 4C 20 24 30 41 38 30 2C 58 00 4D 0E E6 05 3A |OL $0A80,X.M...:| 00000640: 20 20 52 4F 4C 20 24 30 41 34 32 2C 58 00 60 0E | ROL $0A42,X.`.| 00000650: F0 05 3A 20 20 52 4F 4C 20 24 30 41 34 31 2C 58 |..: ROL $0A41,X| 00000660: 00 73 0E FA 05 3A 20 20 52 4F 4C 20 24 30 41 34 |.s...: ROL $0A4| 00000670: 30 2C 58 00 86 0E 04 06 3A 20 20 52 4F 4C 20 24 |0,X.....: ROL $| 00000680: 30 41 30 32 2C 58 00 99 0E 0E 06 3A 20 20 52 4F |0A02,X.....: RO| 00000690: 4C 20 24 30 41 30 31 2C 58 00 AC 0E 18 06 3A 20 |L $0A01,X.....: | 000006A0: 20 52 4F 4C 20 24 30 41 30 30 2C 58 00 BF 0E 22 | ROL $0A00,X..."| 000006B0: 06 3A 20 20 52 4F 4C 20 24 30 39 43 32 2C 58 00 |.: ROL $09C2,X.| 000006C0: D2 0E 2C 06 3A 20 20 52 4F 4C 20 24 30 39 43 31 |..,.: ROL $09C1| 000006D0: 2C 58 00 E5 0E 36 06 3A 20 20 52 4F 4C 20 24 30 |,X...6.: ROL $0| 000006E0: 39 43 30 2C 58 00 F8 0E 40 06 3A 20 20 52 4F 4C |9C0,X...@.: ROL| 000006F0: 20 24 30 39 38 32 2C 58 00 0B 0F 4A 06 3A 20 20 | $0982,X...J.: | 00000700: 52 4F 4C 20 24 30 39 38 31 2C 58 00 1E 0F 54 06 |ROL $0981,X...T.| 00000710: 3A 20 20 52 4F 4C 20 24 30 39 38 30 2C 58 00 31 |: ROL $0980,X.1| 00000720: 0F 5E 06 3A 20 20 52 4F 4C 20 24 30 39 34 32 2C |.^.: ROL $0942,| 00000730: 58 00 44 0F 68 06 3A 20 20 52 4F 4C 20 24 30 39 |X.D.h.: ROL $09| 00000740: 34 31 2C 58 00 57 0F 72 06 3A 20 20 52 4F 4C 20 |41,X.W.r.: ROL | 00000750: 24 30 39 34 30 2C 58 00 6A 0F 7C 06 3A 20 20 52 |$0940,X.j.|.: R| 00000760: 4F 4C 20 24 30 39 30 32 2C 58 00 7D 0F 86 06 3A |OL $0902,X.}...:| 00000770: 20 20 52 4F 4C 20 24 30 39 30 31 2C 58 00 90 0F | ROL $0901,X...| 00000780: 90 06 3A 20 20 52 4F 4C 20 24 30 39 30 30 2C 58 |..: ROL $0900,X| 00000790: 00 B3 0F 9A 06 3A 20 20 49 4E 58 3A 49 4E 58 3A |.....: INX:INX:| 000007A0: 49 4E 58 3A 43 50 58 20 23 24 33 46 3A 42 4E 45 |INX:CPX #$3F:BNE| 000007B0: 20 4A 31 00 C4 0F A4 06 3A 20 20 49 4E 43 20 24 | J1.....: INC $| 000007C0: 30 32 41 46 00 E3 0F AE 06 3A 20 20 4C 44 41 20 |02AF.....: LDA | 000007D0: 24 30 32 41 46 3A 43 4D 50 20 23 32 3A 42 4E 45 |$02AF:CMP #2:BNE| 000007E0: 20 4A 34 00 05 10 B8 06 3A 20 20 4C 44 41 20 23 | J4.....: LDA #| 000007F0: 30 3A 53 54 41 20 24 30 32 41 46 3A 49 4E 43 20 |0:STA $02AF:INC | 00000800: 24 30 32 42 30 00 26 10 C2 06 3A 20 20 4C 44 41 |$02B0.&...: LDA| 00000810: 20 24 30 32 42 30 3A 43 4D 50 20 23 24 33 30 3A | $02B0:CMP #$30:| 00000820: 42 4E 45 20 4A 32 00 40 10 CC 06 3A 20 20 4C 44 |BNE J2.@...: LD| 00000830: 41 20 23 24 30 30 3A 53 54 41 20 24 30 32 42 30 |A #$00:STA $02B0| 00000840: 00 50 10 D6 06 4A 32 20 4C 44 58 20 23 24 30 30 |.P...J2 LDX #$00| 00000850: 00 63 10 E0 06 4A 33 20 4C 44 41 20 24 44 30 32 |.c...J3 LDA $D02| 00000860: 38 2C 58 00 76 10 EA 06 3A 20 20 53 54 41 20 24 |8,X.v...: STA $| 00000870: 44 30 32 37 2C 58 00 91 10 F4 06 3A 20 20 49 4E |D027,X.....: IN| 00000880: 58 3A 43 50 58 20 23 24 30 38 3A 42 4E 45 20 4A |X:CPX #$08:BNE J| 00000890: 33 00 A2 10 FE 06 3A 20 20 4C 44 58 20 24 30 32 |3.....: LDX $02| 000008A0: 42 30 00 B2 10 08 07 3A 20 20 4C 44 41 20 43 4C |B0.....: LDA CL| 000008B0: 2C 58 00 C3 10 12 07 3A 20 20 53 54 41 20 24 44 |,X.....: STA $D| 000008C0: 30 32 45 00 D4 10 1C 07 4A 34 20 49 4E 43 20 24 |02E.....J4 INC $| 000008D0: 30 32 42 31 00 E5 10 26 07 3A 20 20 4C 44 41 20 |02B1...&.: LDA | 000008E0: 24 30 32 42 31 00 FC 10 30 07 3A 20 20 43 4D 50 |$02B1...0.: CMP| 000008F0: 20 23 24 30 38 3A 42 45 51 20 4B 30 00 07 11 3A | #$08:BEQ K0...:| 00000900: 07 3A 20 20 52 54 53 00 21 11 44 07 4B 30 20 4C |.: RTS.!.D.K0 L| 00000910: 44 41 20 23 24 30 30 3A 53 54 41 20 24 30 32 42 |DA #$00:STA $02B| 00000920: 31 00 3C 11 4E 07 3A 20 20 49 4E 43 20 24 30 32 |1.<.N.: INC $02| 00000930: 42 33 3A 4C 44 41 20 24 30 32 42 33 00 53 11 58 |B3:LDA $02B3.S.X| 00000940: 07 3A 20 20 43 4D 50 20 23 24 30 38 3A 42 4E 45 |.: CMP #$08:BNE| 00000950: 20 4B 31 00 6D 11 62 07 3A 20 20 4C 44 41 20 23 | K1.m.b.: LDA #| 00000960: 24 30 30 3A 53 54 41 20 24 30 32 42 33 00 87 11 |$00:STA $02B3...| 00000970: 6C 07 4B 31 20 4C 44 58 20 24 30 32 42 33 3A 4C |l.K1 LDX $02B3:L| 00000980: 44 41 20 43 32 2C 58 00 A0 11 76 07 3A 20 20 53 |DA C2,X...v.: S| 00000990: 54 41 20 4B 33 AA 31 3A 4C 44 59 20 23 24 30 30 |TA K3.1:LDY #$00| 000009A0: 00 B6 11 80 07 3A 20 20 49 4E 43 20 24 46 42 3A |.....: INC $FB:| 000009B0: 42 4E 45 20 4B 32 00 C5 11 8A 07 3A 20 20 49 4E |BNE K2.....: IN| 000009C0: 43 20 24 46 43 00 D8 11 94 07 4B 32 20 4C 44 41 |C $FC.....K2 LDA| 000009D0: 20 28 24 46 42 29 2C 59 00 EF 11 9E 07 3A 20 20 | ($FB),Y.....: | 000009E0: 43 4D 50 20 23 24 46 46 3A 42 4E 45 20 4C 30 00 |CMP #$FF:BNE L0.| 000009F0: 07 12 A8 07 3A 20 20 4C 44 41 20 23 B3 54 58 3A |....: LDA #.TX:| 00000A00: 53 54 41 20 24 46 42 00 1F 12 B2 07 3A 20 20 4C |STA $FB.....: L| 00000A10: 44 41 20 23 B1 54 58 3A 53 54 41 20 24 46 43 00 |DA #.TX:STA $FC.| 00000A20: 2A 12 BC 07 3A 20 20 52 54 53 00 38 12 C6 07 4C |*...: RTS.8...L| 00000A30: 30 20 AF 20 23 24 33 46 00 49 12 D0 07 3A 20 20 |0 . #$3F.I...: | 00000A40: 53 54 41 20 24 30 32 41 42 00 57 12 DA 07 3A 20 |STA $02AB.W...: | 00000A50: 20 4A 53 52 20 4D 30 00 71 12 E4 07 3A 20 20 4C | JSR M0.q...: L| 00000A60: 44 41 20 23 24 30 30 3A 53 54 41 20 24 44 43 30 |DA #$00:STA $DC0| 00000A70: 45 00 89 12 EE 07 3A 20 20 4C 44 41 20 23 24 33 |E.....: LDA #$3| 00000A80: 33 3A 53 54 41 20 24 30 31 00 9E 12 F8 07 3A 20 |3:STA $01.....: | 00000A90: 20 4C 44 58 20 23 30 3A 4C 44 59 20 23 30 00 B1 | LDX #0:LDY #0..| 00000AA0: 12 02 08 4C 31 20 4C 44 41 20 28 24 46 44 29 2C |...L1 LDA ($FD),| 00000AB0: 59 00 C4 12 0C 08 4B 33 20 53 54 41 20 24 30 42 |Y.....K3 STA $0B| 00000AC0: 30 39 2C 58 00 E9 12 16 08 3A 20 20 49 4E 59 3A |09,X.....: INY:| 00000AD0: 49 4E 58 3A 49 4E 58 3A 49 4E 58 3A 43 50 59 20 |INX:INX:INX:CPY | 00000AE0: 23 38 3A 42 4E 45 20 4C 31 00 01 13 20 08 3A 20 |#8:BNE L1... .: | 00000AF0: 20 4C 44 41 20 23 24 33 37 3A 53 54 41 20 24 30 | LDA #$37:STA $0| 00000B00: 31 00 1F 13 2A 08 3A 20 20 4C 44 41 20 23 24 30 |1...*.: LDA #$0| 00000B10: 31 3A 53 54 41 20 24 44 43 30 45 3A 52 54 53 00 |1:STA $DC0E:RTS.| 00000B20: 37 13 34 08 4D 30 20 4C 44 41 20 23 38 3A 53 54 |7.4.M0 LDA #8:ST| 00000B30: 41 20 24 30 32 41 41 00 50 13 3E 08 3A 20 20 4C |A $02AA.P.>.: L| 00000B40: 44 41 20 23 B3 53 45 54 3A 53 54 41 20 24 46 44 |DA #.SET:STA $FD| 00000B50: 00 69 13 48 08 3A 20 20 4C 44 41 20 23 B1 53 45 |.i.H.: LDA #.SE| 00000B60: 54 3A 53 54 41 20 24 46 45 00 7E 13 52 08 3A 20 |T:STA $FE.~.R.: | 00000B70: 20 4C 44 59 20 24 30 32 41 42 3A 49 4E 59 00 90 | LDY $02AB:INY..| 00000B80: 13 5C 08 4D 31 20 44 45 59 3A 42 45 51 20 4D 33 |.\.M1 DEY:BEQ M3| 00000B90: 00 AD 13 66 08 3A 20 20 4C 44 41 20 24 46 44 3A |...f.: LDA $FD:| 00000BA0: 43 4C 43 3A 41 44 43 20 24 30 32 41 41 00 C3 13 |CLC:ADC $02AA...| 00000BB0: 70 08 3A 20 20 53 54 41 20 24 46 44 3A 42 43 43 |p.: STA $FD:BCC| 00000BC0: 20 4D 32 00 D2 13 7A 08 3A 20 20 49 4E 43 20 24 | M2...z.: INC $| 00000BD0: 46 45 00 E0 13 84 08 4D 32 20 4A 4D 50 20 4D 31 |FE.....M2 JMP M1| 00000BE0: 00 EB 13 8E 08 4D 33 20 52 54 53 00 05 14 98 08 |.....M3 RTS.....| 00000BF0: 43 4C 20 B2 AC 20 3A 20 2E 42 59 54 45 20 24 30 |CL .. : .BYTE $0| 00000C00: 31 2C 24 30 31 00 1F 14 A2 08 3A 20 20 20 20 20 |1,$01.....: | 00000C10: 20 20 2E 42 59 54 45 20 24 30 41 2C 24 30 41 00 | .BYTE $0A,$0A.| 00000C20: 39 14 AC 08 3A 20 20 20 20 20 20 20 2E 42 59 54 |9...: .BYT| 00000C30: 45 20 24 30 32 2C 24 30 32 00 53 14 B6 08 3A 20 |E $02,$02.S...: | 00000C40: 20 20 20 20 20 20 2E 42 59 54 45 20 24 30 41 2C | .BYTE $0A,| 00000C50: 24 30 41 00 6D 14 C0 08 3A 20 20 20 20 20 20 20 |$0A.m...: | 00000C60: 2E 42 59 54 45 20 24 30 31 2C 24 30 31 00 87 14 |.BYTE $01,$01...| 00000C70: CA 08 3A 20 20 20 20 20 20 20 2E 42 59 54 45 20 |..: .BYTE | 00000C80: 24 30 44 2C 24 30 44 00 A1 14 D4 08 3A 20 20 20 |$0D,$0D.....: | 00000C90: 20 20 20 20 2E 42 59 54 45 20 24 30 35 2C 24 30 | .BYTE $05,$0| 00000CA0: 35 00 BB 14 DE 08 3A 20 20 20 20 20 20 20 2E 42 |5.....: .B| 00000CB0: 59 54 45 20 24 30 44 2C 24 30 44 00 D5 14 E0 08 |YTE $0D,$0D.....| 00000CC0: 3A 20 20 20 20 20 20 20 2E 42 59 54 45 20 24 30 |: .BYTE $0| 00000CD0: 31 2C 24 30 31 00 EF 14 E8 08 3A 20 20 20 20 20 |1,$01.....: | 00000CE0: 20 20 2E 42 59 54 45 20 24 30 37 2C 24 30 37 00 | .BYTE $07,$07.| 00000CF0: 09 15 F2 08 3A 20 20 20 20 20 20 20 2E 42 59 54 |....: .BYT| 00000D00: 45 20 24 30 38 2C 24 30 38 00 23 15 FC 08 3A 20 |E $08,$08.#...: | 00000D10: 20 20 20 20 20 20 2E 42 59 54 45 20 24 30 39 2C | .BYTE $09,| 00000D20: 24 30 39 00 3D 15 06 09 3A 20 20 20 20 20 20 20 |$09.=...: | 00000D30: 2E 42 59 54 45 20 24 30 38 2C 24 30 38 00 57 15 |.BYTE $08,$08.W.| 00000D40: 10 09 3A 20 20 20 20 20 20 20 2E 42 59 54 45 20 |..: .BYTE | 00000D50: 24 30 37 2C 24 30 37 00 71 15 1A 09 3A 20 20 20 |$07,$07.q...: | 00000D60: 20 20 20 20 2E 42 59 54 45 20 24 30 31 2C 24 30 | .BYTE $01,$0| 00000D70: 31 00 8B 15 24 09 3A 20 20 20 20 20 20 20 2E 42 |1...$.: .B| 00000D80: 59 54 45 20 24 30 45 2C 24 30 45 00 A5 15 2E 09 |YTE $0E,$0E.....| 00000D90: 3A 20 20 20 20 20 20 20 2E 42 59 54 45 20 24 30 |: .BYTE $0| 00000DA0: 36 2C 24 30 36 00 BF 15 2F 09 3A 20 20 20 20 20 |6,$06.../.: | 00000DB0: 20 20 2E 42 59 54 45 20 24 30 45 2C 24 30 45 00 | .BYTE $0E,$0E.| 00000DC0: D9 15 30 09 3A 20 20 20 20 20 20 20 2E 42 59 54 |..0.: .BYT| 00000DD0: 45 20 24 30 31 2C 24 30 31 00 F3 15 33 09 3A 20 |E $01,$01...3.: | 00000DE0: 20 20 20 20 20 20 2E 42 59 54 45 20 24 30 46 2C | .BYTE $0F,| 00000DF0: 24 30 46 00 0D 16 38 09 3A 20 20 20 20 20 20 20 |$0F...8.: | 00000E00: 2E 42 59 54 45 20 24 30 43 2C 24 30 43 00 27 16 |.BYTE $0C,$0C.'.| 00000E10: 42 09 3A 20 20 20 20 20 20 20 2E 42 59 54 45 20 |B.: .BYTE | 00000E20: 24 30 42 2C 24 30 42 00 41 16 4C 09 3A 20 20 20 |$0B,$0B.A.L.: | 00000E30: 20 20 20 20 2E 42 59 54 45 20 24 30 43 2C 24 30 | .BYTE $0C,$0| 00000E40: 43 00 5B 16 56 09 3A 20 20 20 20 20 20 20 2E 42 |C.[.V.: .B| 00000E50: 59 54 45 20 24 30 46 2C 24 30 46 00 7F 16 60 09 |YTE $0F,$0F...`.| 00000E60: 43 32 20 B2 AC 20 3A 20 2E 42 59 54 45 20 39 2C |C2 .. : .BYTE 9,| 00000E70: 39 2C 39 2C 39 2C 39 2C 39 2C 39 2C 39 2C 39 00 |9,9,9,9,9,9,9,9.| 00000E80: 99 16 C4 09 50 30 20 B2 AC 20 3A 20 2E 42 59 54 |....P0 .. : .BYT| 00000E90: 45 20 24 30 30 2C 24 46 45 00 B3 16 CE 09 3A 20 |E $00,$FE.....: | 00000EA0: 20 20 20 20 20 20 2E 42 59 54 45 20 24 33 30 2C | .BYTE $30,| 00000EB0: 24 46 45 00 CD 16 D0 09 3A 20 20 20 20 20 20 20 |$FE.....: | 00000EC0: 2E 42 59 54 45 20 24 36 30 2C 24 46 45 00 E7 16 |.BYTE $60,$FE...| 00000ED0: D2 09 3A 20 20 20 20 20 20 20 2E 42 59 54 45 20 |..: .BYTE | 00000EE0: 24 39 30 2C 24 46 45 00 01 17 D4 09 3A 20 20 20 |$90,$FE.....: | 00000EF0: 20 20 20 20 2E 42 59 54 45 20 24 43 30 2C 24 46 | .BYTE $C0,$F| 00000F00: 45 00 1B 17 D6 09 3A 20 20 20 20 20 20 20 2E 42 |E.....: .B| 00000F10: 59 54 45 20 24 46 30 2C 24 46 45 00 35 17 D8 09 |YTE $F0,$FE.5...| 00000F20: 3A 20 20 20 20 20 20 20 2E 42 59 54 45 20 24 32 |: .BYTE $2| 00000F30: 30 2C 24 46 45 00 4F 17 DA 09 3A 20 20 20 20 20 |0,$FE.O...: | 00000F40: 20 20 2E 42 59 54 45 20 24 35 30 2C 24 46 45 00 | .BYTE $50,$FE.| 00000F50: 74 17 E2 09 54 58 20 B2 AC 20 3A 20 2E C6 20 22 |t...TX .. : .. "| 00000F60: 20 41 44 44 20 46 52 4F 4D 20 43 46 4E 20 33 30 | ADD FROM CFN 30| 00000F70: 30 31 20 22 00 97 17 E4 09 2E C6 20 22 20 50 52 |01 "....... " PR| 00000F80: 45 53 45 4E 54 53 20 41 20 47 41 4D 45 2C 20 43 |ESENTS A GAME, C| 00000F90: 52 41 43 4B 45 44 22 00 BB 17 E6 09 2E C6 20 22 |RACKED"....... "| 00000FA0: 20 49 4E 20 31 39 38 37 2C 20 41 4E 44 20 4E 4F | IN 1987, AND NO| 00000FB0: 54 20 4F 4E 4C 59 20 43 52 41 22 00 E0 17 E8 09 |T ONLY CRA".....| 00000FC0: 2E C6 20 22 43 4B 45 44 20 42 55 54 20 44 45 53 |.. "CKED BUT DES| 00000FD0: 54 52 4F 59 45 44 20 41 53 20 57 45 4C 4C 21 22 |TROYED AS WELL!"| 00000FE0: 00 05 18 EA 09 2E C6 20 22 20 20 20 20 20 20 20 |....... " | 00000FF0: 4C 45 4B 4B 45 52 20 21 21 21 22 3A 2E 42 59 54 |LEKKER !!!":.BYT| 00001000: 45 20 24 46 46 00 00 00 |E $FF... |
.......700:.OPT OO:..$4000.*...SET . $0E
00.9....G . $D000.U...: SEI:LDA #$33:ST
A $01.N...: LDX #..G:LDY #..G.....: ST
X $FB:STY $FC. ...: LDX #.SET:LDY #.SET
.....: STX $FD:STY $FE.P...: LDX #$02:
LDY #$00.....AA LDA ($FB),Y.....: STA (
$FD),Y:INY:BNE AA.#...: INC $FC:INC $FE
:DEX:BNE AA.;...: LDA #$37:STA $01.S...
: LDA #.TX:STA $FB.K...: LDA #.TX:STA
$FC.....: LDA #$01:LDX #$00.....A0 STA
$D027,X:INX:CPX #8:BNE A0.B.$.: LDX #$0
0:LDA #$00.....A1 STA $02AA,X:INX:CPX #8
:BNE A1...8.: STA $3FFF:LDX #$00...B.A2
STA $0800,X.'.D.: STA $0900,X.:.L.: S
TA $0A00,X.M.V.: STA $0B00,X.`.`.: STA
$0C00,X.R.J.: INX:BNE A2...T.: LDX #$
00:LDY #$24...~.A3 TYA:STA $07F8,X.A...:
INX:INY:CPY #$2C:BNE A3.....: LDA #$F
F:STA $D015:STA $D01D.....: LDA #$00:ST
A $D017.....: LDA #$C0:STA $D010.)...:
LDX #$00.E...A4 LDA P0,X:STA $D000,X.`.
D.: INX:CPX #$10:BNE A4.Z.N.: LDA #$1B
:STA $D011...X.: LDA #$01:STA $D01A....
.: LDA #$7F:STA $DC0D.H...: LDA #.I1:S
TA $0314.....: LDA #.I1:STA $0315.....:
LDA #$00:STA $D020:STA $D021. ...: LD
A #$05:STA $0286.B...: CLI:LDA #$93:JSR
$FFD2:RTS.F...I1 LDA #$01:STA $D019:STA
$D01A.....: LDA #$13:STA $D011.....:
LDA #$02:STA $D012...(.: LDA #.I2:STA $
0314.N.2.: LDA #.I2:STA $0315...<.: JM
P $FEBC...F.I2 LDA #$01:STA $D019:STA $D
01A...P.: LDA #$1A:STA $D011.7.Z.: LDA
#$F9:STA $D012.Q.D.: LDA #.I1:STA $031
4.K.N.: LDA #.I1:STA $0315.Y.X.: JSR J
0.....; KEY CHECK . .S......: JMP $EA3
1.....J0 LDX #$00:CLC.H. .J1 ROL $0B00,X
.....: ROL $0AC2,X.....: ROL $0AC1,X..
...: ROL $0AC0,X...H.: ROL $0A82,X.'.R
.: ROL $0A81,X.:...: ROL $0A80,X.M...:
ROL $0A42,X.`...: ROL $0A41,X.S...:
ROL $0A40,X.....: ROL $0A02,X.....: RO
L $0A01,X.....: ROL $0A00,X...".: ROL
$09C2,X.R.,.: ROL $09C1,X...6.: ROL $0
9C0,X...@.: ROL $0982,X...J.: ROL $098
1,X...T.: ROL $0980,X.1.^.: ROL $0942,
X.D.H.: ROL $0941,X.W.R.: ROL $0940,X.
J.|.: ROL $0902,X.}...: ROL $0901,X...
..: ROL $0900,X.....: INX:INX:INX:CPX
#$3F:BNE J1.D...: INC $02AF.....: LDA
$02AF:CMP #2:BNE J4.....: LDA #0:STA $0
2AF:INC $02B0.&.B.: LDA $02B0:CMP #$30:
BNE J2.@.L.: LDA #$00:STA $02B0.P.V.J2
LDX #$00.C...J3 LDA $D028,X.V...: STA $
D027,X.....: INX:CPX #$08:BNE J3.....:
LDX $02B0.....: LDA CL,X.C...: STA $D
02E.T...J4 INC $02B1...&.: LDA $02B1...
0.: CMP #$08:BEQ K0...:.: RTS.!.D.K0 L
DA #$00:STA $02B1.<.N.: INC $02B3:LDA $
02B3.S.X.: CMP #$08:BNE K1.M.B.: LDA #
$00:STA $02B3...L.K1 LDX $02B3:LDA C2,X.
.V.: STA K3.1:LDY #$00.....: INC $FB:
BNE K2.E...: INC $FC.X...K2 LDA ($FB),Y
.....: CMP #$FF:BNE L0.....: LDA #.TX:
STA $FB.....: LDA #.TX:STA $FC.*...: R
TS.8.F.L0 . #$3F.I.P.: STA $02AB.W.Z.:
JSR M0.Q...: LDA #$00:STA $DC0E.....:
LDA #$33:STA $01.....: LDX #0:LDY #0..
...L1 LDA ($FD),Y.D...K3 STA $0B09,X....
.: INY:INX:INX:INX:CPY #8:BNE L1... .:
LDA #$37:STA $01...*.: LDA #$01:STA $D
C0E:RTS.7.4.M0 LDA #8:STA $02AA.P.>.: L
DA #.SET:STA $FD.I.H.: LDA #.SET:STA $F
E.~.R.: LDY $02AB:INY...\.M1 DEY:BEQ M3
...F.: LDA $FD:CLC:ADC $02AA.C.P.: STA
$FD:BCC M2.R.Z.: INC $FE.....M2 JMP M1
.....M3 RTS.....CL .. : .BYTE $01,$01...
..: .BYTE $0A,$0A.9...: .BYT
E $02,$02.S...: .BYTE $0A,$0A.M...
: .BYTE $01,$01...J.: .BYTE
$0D,$0D...T.: .BYTE $05,$05.....:
.BYTE $0D,$0D.U...: .BYTE $0
1,$01.....: .BYTE $07,$07.....:
.BYTE $08,$08.#...: .BYTE $09,
$09.=...: .BYTE $08,$08.W...:
.BYTE $07,$07.Q...: .BYTE $01,$0
1...$.: .BYTE $0E,$0E.....:
.BYTE $06,$06.../.: .BYTE $0E,$0E.
Y.0.: .BYTE $01,$01...3.: .B
YTE $0F,$0F...8.: .BYTE $0C,$0C.'.
B.: .BYTE $0B,$0B.A.L.: .BYT
E $0C,$0C.[.V.: .BYTE $0F,$0F..`.
C2 .. : .BYTE 9,9,9,9,9,9,9,9,9...D.P0 .
. : .BYTE $00,$FE...N.: .BYTE $30,
$FE.M.P.: .BYTE $60,$FE...R.:
.BYTE $90,$FE...T.: .BYTE $C0,$F
E...V.: .BYTE $F0,$FE.5.X.:
.BYTE $20,$FE.O.Z.: .BYTE $50,$FE.
T...TX .. : .F " ADD FROM CFN 3001 "....
..F " PRESENTS A GAME, CRACKED"......F "
IN 1987, AND NOT ONLY CRA"......F "CKED
BUT DESTROYED AS WELL!"......F "
LEKKER !!!":.BYTE $FF...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL