HI-SCROLLER.SRC
FILE INFORMATION
FILENAME(S): HI-SCROLLER.SRC
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-11-30 01:13:14
APPEARS ON: 1 disk(s)
FILE HASH
70fc399d784f6ceeeae68c40e7d02919f5e9a5de063081a8dfb6d34f373f43bc
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 15720 SEITE A | HI-SCROLLER.SRC | PRG | C64er | 3 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1F 08 DE 03 9E 34 30 39 36 AC 39 3A 2E 4F |.......4096.9:.O| 00000010: 50 54 20 50 2C 4F 4F 3A AC B2 34 39 31 35 32 00 |PT P,OO:..49152.| 00000020: 2D 08 E8 03 4A 4D 50 20 52 49 47 48 54 00 3A 08 |-...JMP RIGHT.:.| 00000030: F2 03 4A 4D 50 20 4C 45 46 54 00 45 08 FC 03 4A |..JMP LEFT.E...J| 00000040: 4D 50 20 55 50 00 52 08 06 04 4A 4D 50 20 44 4F |MP UP.R...JMP DO| 00000050: 57 4E 00 63 08 10 04 47 52 41 46 20 B2 20 24 32 |WN.c...GRAF . $2| 00000060: 30 30 30 00 89 08 1A 04 3B 23 23 23 23 23 23 23 |000.....;#######| 00000070: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################| 00000080: 23 23 23 23 23 23 23 23 23 00 AF 08 24 04 3B 23 |#########...$.;#| 00000090: 23 23 20 5A 59 4C 2E 20 52 49 47 48 54 20 53 43 |## ZYL. RIGHT SC| 000000A0: 52 4F 4C 4C 49 4E 47 20 20 20 20 20 23 23 23 00 |ROLLING ###.| 000000B0: D5 08 2E 04 3B 23 23 23 23 23 23 23 23 23 23 23 |....;###########| 000000C0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################| 000000D0: 23 23 23 23 23 00 F2 08 38 04 52 49 47 48 54 20 |#####...8.RIGHT | 000000E0: 4C 44 41 20 23 B3 47 52 41 46 3A 53 54 41 20 24 |LDA #.GRAF:STA $| 000000F0: 46 43 00 15 09 42 04 4C 44 58 20 23 B1 47 52 41 |FC...B.LDX #.GRA| 00000100: 46 3A 53 54 58 20 24 46 44 3A 49 4E 58 3A 53 54 |F:STX $FD:INX:ST| 00000110: 58 20 24 46 42 00 30 09 4C 04 4C 44 41 20 23 B3 |X $FB.0.L.LDA #.| 00000120: 47 52 41 46 AA 33 31 32 3A 53 54 41 20 24 46 41 |GRAF.312:STA $FA| 00000130: 00 53 09 56 04 4C 44 41 20 23 38 3A 53 54 41 20 |.S.V.LDA #8:STA | 00000140: 24 31 34 3A 4C 44 41 20 23 32 35 3A 53 54 41 20 |$14:LDA #25:STA | 00000150: 24 31 35 00 69 09 60 04 41 32 20 4C 44 59 20 23 |$15.i.`.A2 LDY #| 00000160: 30 3A 4C 44 58 20 23 34 30 00 81 09 6A 04 4C 44 |0:LDX #40...j.LD| 00000170: 41 20 28 24 46 41 29 2C 59 3A 53 54 41 20 24 46 |A ($FA),Y:STA $F| 00000180: 45 00 8F 09 74 04 41 31 20 52 B0 20 24 46 45 00 |E...t.A1 R. $FE.| 00000190: AC 09 7E 04 4C 44 41 20 28 24 46 43 29 2C 59 3A |..~.LDA ($FC),Y:| 000001A0: 53 54 41 20 24 46 45 3A 52 B0 20 41 00 CF 09 88 |STA $FE:R. A....| 000001B0: 04 53 54 41 20 28 24 46 43 29 2C 59 3A 4C 44 41 |.STA ($FC),Y:LDA| 000001C0: 20 24 46 43 3A 43 4C 43 3A 41 44 43 20 23 38 00 | $FC:CLC:ADC #8.| 000001D0: F2 09 92 04 53 54 41 20 24 46 43 3A 4C 44 41 20 |....STA $FC:LDA | 000001E0: 24 46 44 3A 41 44 43 20 23 30 3A 53 54 41 20 24 |$FD:ADC #0:STA $| 000001F0: 46 44 00 01 0A 9C 04 44 45 58 3A 42 4E 45 20 41 |FD.....DEX:BNE A| 00000200: 31 00 29 0A A6 04 44 45 43 20 24 46 44 3A 4C 44 |1.)...DEC $FD:LD| 00000210: 41 20 24 46 43 3A 53 45 43 3A 53 42 43 20 23 36 |A $FC:SEC:SBC #6| 00000220: 33 3A 53 54 41 20 24 46 43 00 44 0A B0 04 4C 44 |3:STA $FC.D...LD| 00000230: 41 20 24 46 44 3A 53 42 43 20 23 30 3A 53 54 41 |A $FD:SBC #0:STA| 00000240: 20 24 46 44 00 5F 0A BA 04 49 4E 43 20 24 46 41 | $FD._...INC $FA| 00000250: 3A 42 4E 45 20 41 34 3A 49 4E 43 20 24 46 42 00 |:BNE A4:INC $FB.| 00000260: 75 0A C4 04 41 34 20 44 45 43 20 24 31 34 3A 42 |u...A4 DEC $14:B| 00000270: 4E 45 20 41 32 00 9D 0A CE 04 49 4E 43 20 24 46 |NE A2.....INC $F| 00000280: 42 3A 4C 44 41 20 24 46 41 3A 43 4C 43 3A 41 44 |B:LDA $FA:CLC:AD| 00000290: 43 20 23 35 36 3A 53 54 41 20 24 46 41 00 B8 0A |C #56:STA $FA...| 000002A0: D8 04 4C 44 41 20 24 46 42 3A 41 44 43 20 23 30 |..LDA $FB:ADC #0| 000002B0: 3A 53 54 41 20 24 46 42 00 E0 0A E2 04 49 4E 43 |:STA $FB.....INC| 000002C0: 20 24 46 44 3A 4C 44 41 20 24 46 43 3A 43 4C 43 | $FD:LDA $FC:CLC| 000002D0: 3A 41 44 43 20 23 35 36 3A 53 54 41 20 24 46 43 |:ADC #56:STA $FC| 000002E0: 00 FB 0A EC 04 4C 44 41 20 24 46 44 3A 41 44 43 |.....LDA $FD:ADC| 000002F0: 20 23 30 3A 53 54 41 20 24 46 44 00 21 0B F6 04 | #0:STA $FD.!...| 00000300: 4C 44 41 20 23 38 3A 53 54 41 20 24 31 34 3A 44 |LDA #8:STA $14:D| 00000310: 45 43 20 24 31 35 3A 42 4E 45 20 41 32 3A 52 54 |EC $15:BNE A2:RT| 00000320: 53 00 47 0B 00 05 3B 23 23 23 23 23 23 23 23 23 |S.G...;#########| 00000330: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################| 00000340: 23 23 23 23 23 23 23 00 6D 0B 0A 05 3B 23 23 23 |#######.m...;###| 00000350: 20 5A 59 4C 2E 20 4C 45 46 54 20 53 43 52 4F 4C | ZYL. LEFT SCROL| 00000360: 4C 49 4E 47 20 20 20 20 20 20 23 23 23 00 93 0B |LING ###...| 00000370: 14 05 3B 23 23 23 23 23 23 23 23 23 23 23 23 23 |..;#############| 00000380: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################| 00000390: 23 23 23 00 AF 0B 1E 05 4C 45 46 54 20 4C 44 41 |###.....LEFT LDA| 000003A0: 20 23 B3 47 52 41 46 3A 53 54 41 20 24 46 41 00 | #.GRAF:STA $FA.| 000003B0: D2 0B 28 05 4C 44 58 20 23 B1 47 52 41 46 3A 53 |..(.LDX #.GRAF:S| 000003C0: 54 58 20 24 46 42 3A 49 4E 58 3A 53 54 58 20 24 |TX $FB:INX:STX $| 000003D0: 46 44 00 ED 0B 32 05 4C 44 41 20 23 B3 47 52 41 |FD...2.LDA #.GRA| 000003E0: 46 AA 33 31 32 3A 53 54 41 20 24 46 43 00 10 0C |F.312:STA $FC...| 000003F0: 3C 05 4C 44 41 20 23 38 3A 53 54 41 20 24 31 34 |<.LDA #8:STA $14| 00000400: 3A 4C 44 41 20 23 32 35 3A 53 54 41 20 24 31 35 |:LDA #25:STA $15| 00000410: 00 27 0C 46 05 41 41 32 20 4C 44 59 20 23 30 3A |.'.F.AA2 LDY #0:| 00000420: 4C 44 58 20 23 34 30 00 3E 0C 50 05 4C 44 41 20 |LDX #40.>.P.LDA | 00000430: 28 24 46 41 29 2C 59 3A 53 54 41 20 24 32 00 4D |($FA),Y:STA $2.M| 00000440: 0C 5A 05 41 41 31 20 52 4F 4C 20 24 32 00 76 0C |.Z.AA1 ROL $2.v.| 00000450: 64 05 4C 44 41 20 28 24 46 43 29 2C 59 3A 53 54 |d.LDA ($FC),Y:ST| 00000460: 41 20 24 32 3A 52 4F 4C 20 41 3A 53 54 41 20 28 |A $2:ROL A:STA (| 00000470: 24 46 43 29 2C 59 00 95 0C 6E 05 4C 44 41 20 24 |$FC),Y...n.LDA $| 00000480: 46 43 3A 53 45 43 3A 53 42 43 20 23 38 3A 53 54 |FC:SEC:SBC #8:ST| 00000490: 41 20 24 46 43 00 B0 0C 78 05 4C 44 41 20 24 46 |A $FC...x.LDA $F| 000004A0: 44 3A 53 42 43 20 23 30 3A 53 54 41 20 24 46 44 |D:SBC #0:STA $FD| 000004B0: 00 C0 0C 82 05 44 45 58 3A 42 4E 45 20 41 41 31 |.....DEX:BNE AA1| 000004C0: 00 E0 0C 8C 05 4C 44 41 20 24 46 43 3A 43 4C 43 |.....LDA $FC:CLC| 000004D0: 3A 41 44 43 20 23 36 35 3A 53 54 41 20 24 46 43 |:ADC #65:STA $FC| 000004E0: 00 FB 0C 96 05 4C 44 41 20 24 46 44 3A 41 44 43 |.....LDA $FD:ADC| 000004F0: 20 23 31 3A 53 54 41 20 24 46 44 00 17 0D A0 05 | #1:STA $FD.....| 00000500: 49 4E 43 20 24 46 41 3A 42 4E 45 20 41 41 34 3A |INC $FA:BNE AA4:| 00000510: 49 4E 43 20 24 46 42 00 2F 0D AA 05 41 41 34 20 |INC $FB./...AA4 | 00000520: 44 45 43 20 24 31 34 3A 42 4E 45 20 41 41 32 00 |DEC $14:BNE AA2.| 00000530: 4F 0D B4 05 4C 44 41 20 24 46 43 3A 43 4C 43 3A |O...LDA $FC:CLC:| 00000540: 41 44 43 20 23 35 36 3A 53 54 41 20 24 46 43 00 |ADC #56:STA $FC.| 00000550: 6A 0D BE 05 4C 44 41 20 24 46 44 3A 41 44 43 20 |j...LDA $FD:ADC | 00000560: 23 31 3A 53 54 41 20 24 46 44 00 8A 0D C8 05 4C |#1:STA $FD.....L| 00000570: 44 41 20 24 46 41 3A 43 4C 43 3A 41 44 43 20 23 |DA $FA:CLC:ADC #| 00000580: 35 36 3A 53 54 41 20 24 46 41 00 A5 0D D2 05 4C |56:STA $FA.....L| 00000590: 44 41 20 24 46 42 3A 41 44 43 20 23 31 3A 53 54 |DA $FB:ADC #1:ST| 000005A0: 41 20 24 46 42 00 C8 0D DC 05 4C 44 41 20 23 38 |A $FB.....LDA #8| 000005B0: 3A 53 54 41 20 24 31 34 3A 44 45 43 20 24 31 35 |:STA $14:DEC $15| 000005C0: 3A 42 4E 45 20 41 41 32 00 D0 0D E6 05 52 54 53 |:BNE AA2.....RTS| 000005D0: 00 F6 0D F0 05 3B 23 23 23 23 23 23 23 23 23 23 |.....;##########| 000005E0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################| 000005F0: 23 23 23 23 23 23 00 1C 0E FA 05 3B 23 23 23 20 |######.....;### | 00000600: 5A 59 4C 2E 20 55 50 20 53 43 52 4F 4C 4C 49 4E |ZYL. UP SCROLLIN| 00000610: 47 20 20 20 20 20 20 20 20 23 23 23 00 42 0E 04 |G ###.B..| 00000620: 06 3B 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |.;##############| 00000630: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################| 00000640: 23 23 00 68 0E 0E 06 55 50 20 4C 44 58 20 23 B3 |##.h...UP LDX #.| 00000650: 47 52 41 46 3A 53 54 58 20 24 46 41 3A 49 4E 58 |GRAF:STX $FA:INX| 00000660: 3A 53 54 58 20 24 46 43 00 87 0E 18 06 4C 44 41 |:STX $FC.....LDA| 00000670: 20 23 B1 47 52 41 46 3A 53 54 41 20 24 46 42 3A | #.GRAF:STA $FB:| 00000680: 53 54 41 20 24 46 44 00 A2 0E 22 06 4C 44 41 20 |STA $FD...".LDA | 00000690: 23 B3 47 52 41 46 AB 33 31 33 3A 53 54 41 20 24 |#.GRAF.313:STA $| 000006A0: 31 34 00 BD 0E 2C 06 4C 44 41 20 23 B1 47 52 41 |14...,.LDA #.GRA| 000006B0: 46 AB 33 31 33 3A 53 54 41 20 24 31 35 00 D1 0E |F.313:STA $15...| 000006C0: 36 06 4C 44 41 20 23 34 30 3A 53 54 41 20 24 46 |6.LDA #40:STA $F| 000006D0: 45 00 E7 0E 40 06 55 34 20 4C 44 58 20 23 32 34 |E...@.U4 LDX #24| 000006E0: 3A 4C 44 59 20 23 30 00 FB 0E 4A 06 4C 44 41 20 |:LDY #0...J.LDA | 000006F0: 28 24 46 41 29 2C 59 3A 50 48 41 00 1A 0F 54 06 |($FA),Y:PHA...T.| 00000700: 55 31 20 4C 44 41 20 28 24 46 43 29 2C 59 3A 53 |U1 LDA ($FC),Y:S| 00000710: 54 41 20 28 24 46 41 29 2C 59 00 30 0F 5E 06 49 |TA ($FA),Y.0.^.I| 00000720: 4E 59 3A 43 50 59 20 23 37 3A 42 4E 45 20 55 31 |NY:CPY #7:BNE U1| 00000730: 00 4B 0F 68 06 55 33 20 4C 44 41 20 24 46 41 3A |.K.h.U3 LDA $FA:| 00000740: 43 4C 43 3A 41 44 43 20 23 36 34 00 6E 0F 72 06 |CLC:ADC #64.n.r.| 00000750: 53 54 41 20 24 46 41 3A 4C 44 41 20 24 46 42 3A |STA $FA:LDA $FB:| 00000760: 41 44 43 20 23 31 3A 53 54 41 20 24 46 42 00 86 |ADC #1:STA $FB..| 00000770: 0F 7C 06 4C 44 41 20 24 46 43 3A 43 4C 43 3A 41 |.|.LDA $FC:CLC:A| 00000780: 44 43 20 23 36 34 00 A9 0F 86 06 53 54 41 20 24 |DC #64.....STA $| 00000790: 46 43 3A 4C 44 41 20 24 46 44 3A 41 44 43 20 23 |FC:LDA $FD:ADC #| 000007A0: 31 3A 53 54 41 20 24 46 44 00 C1 0F 90 06 4C 44 |1:STA $FD.....LD| 000007B0: 41 20 24 31 34 3A 43 4C 43 3A 41 44 43 20 23 36 |A $14:CLC:ADC #6| 000007C0: 34 00 E4 0F 9A 06 53 54 41 20 24 31 34 3A 4C 44 |4.....STA $14:LD| 000007D0: 41 20 24 31 35 3A 41 44 43 20 23 31 3A 53 54 41 |A $15:ADC #1:STA| 000007E0: 20 24 31 35 00 07 10 A4 06 4C 44 59 20 23 30 3A | $15.....LDY #0:| 000007F0: 4C 44 41 20 28 24 46 41 29 2C 59 3A 53 54 41 20 |LDA ($FA),Y:STA | 00000800: 28 24 31 34 29 2C 59 00 2A 10 AE 06 55 32 20 4C |($14),Y.*...U2 L| 00000810: 44 41 20 28 24 46 43 29 2C 59 3A 53 54 41 20 28 |DA ($FC),Y:STA (| 00000820: 24 46 41 29 2C 59 3A 49 4E 59 00 47 10 B8 06 43 |$FA),Y:INY.G...C| 00000830: 50 59 20 23 37 3A 42 4E 45 20 55 32 3A 44 45 58 |PY #7:BNE U2:DEX| 00000840: 3A 42 4E 45 20 55 33 00 5F 10 C2 06 44 45 59 3A |:BNE U3._...DEY:| 00000850: 50 4C 41 3A 53 54 41 20 28 24 46 43 29 2C 59 00 |PLA:STA ($FC),Y.| 00000860: 80 10 CC 06 4C 44 41 20 24 46 41 3A 53 45 43 3A |....LDA $FA:SEC:| 00000870: 53 42 43 20 23 32 34 38 3A 53 54 41 20 24 46 41 |SBC #248:STA $FA| 00000880: 00 9C 10 D6 06 4C 44 41 20 24 46 42 3A 53 42 43 |.....LDA $FB:SBC| 00000890: 20 23 32 39 3A 53 54 41 20 24 46 42 00 BD 10 E0 | #29:STA $FB....| 000008A0: 06 4C 44 41 20 24 46 43 3A 53 45 43 3A 53 42 43 |.LDA $FC:SEC:SBC| 000008B0: 20 23 32 34 38 3A 53 54 41 20 24 46 43 00 D9 10 | #248:STA $FC...| 000008C0: EA 06 4C 44 41 20 24 46 44 3A 53 42 43 20 23 32 |..LDA $FD:SBC #2| 000008D0: 39 3A 53 54 41 20 24 46 44 00 FA 10 F4 06 4C 44 |9:STA $FD.....LD| 000008E0: 41 20 24 31 34 3A 53 45 43 3A 53 42 43 20 23 32 |A $14:SEC:SBC #2| 000008F0: 34 38 3A 53 54 41 20 24 31 34 00 16 11 FE 06 4C |48:STA $14.....L| 00000900: 44 41 20 24 31 35 3A 53 42 43 20 23 32 39 3A 53 |DA $15:SBC #29:S| 00000910: 54 41 20 24 31 35 00 29 11 08 07 44 45 43 20 24 |TA $15.)...DEC $| 00000920: 46 45 3A 42 4E 45 20 55 35 00 31 11 12 07 52 54 |FE:BNE U5.1...RT| 00000930: 53 00 3F 11 1C 07 55 35 20 4A 4D 50 20 55 34 00 |S.?...U5 JMP U4.| 00000940: 65 11 26 07 3B 23 23 23 23 23 23 23 23 23 23 23 |e.&.;###########| 00000950: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################| 00000960: 23 23 23 23 23 00 8B 11 30 07 3B 23 23 23 20 5A |#####...0.;### Z| 00000970: 59 4C 2E 20 44 4F 57 4E 20 53 43 52 4F 4C 4C 49 |YL. DOWN SCROLLI| 00000980: 4E 47 20 20 20 20 20 20 23 23 23 00 B1 11 3A 07 |NG ###...:.| 00000990: 3B 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |;###############| 000009A0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################| 000009B0: 23 00 DE 11 44 07 44 4F 57 4E 20 4C 44 58 20 23 |#...D.DOWN LDX #| 000009C0: B3 47 52 41 46 AA 37 36 38 30 3A 53 54 58 20 24 |.GRAF.7680:STX $| 000009D0: 46 41 3A 49 4E 58 3A 53 54 58 20 24 46 43 00 02 |FA:INX:STX $FC..| 000009E0: 12 4E 07 4C 44 41 20 23 B1 47 52 41 46 AA 37 36 |.N.LDA #.GRAF.76| 000009F0: 38 30 3A 53 54 41 20 24 46 42 3A 53 54 41 20 24 |80:STA $FB:STA $| 00000A00: 46 44 00 1E 12 58 07 4C 44 41 20 23 B3 47 52 41 |FD...X.LDA #.GRA| 00000A10: 46 AA 37 39 39 34 3A 53 54 41 20 24 31 34 00 3A |F.7994:STA $14.:| 00000A20: 12 62 07 4C 44 41 20 23 B1 47 52 41 46 AA 37 39 |.b.LDA #.GRAF.79| 00000A30: 39 34 3A 53 54 41 20 24 31 35 00 4E 12 6C 07 4C |94:STA $15.N.l.L| 00000A40: 44 41 20 23 34 30 3A 53 54 41 20 24 46 45 00 64 |DA #40:STA $FE.d| 00000A50: 12 76 07 44 34 20 4C 44 59 20 23 36 3A 4C 44 58 |.v.D4 LDY #6:LDX| 00000A60: 20 23 32 34 00 78 12 80 07 4C 44 41 20 28 24 46 | #24.x...LDA ($F| 00000A70: 43 29 2C 59 3A 50 48 41 00 9B 12 8A 07 44 31 20 |C),Y:PHA.....D1 | 00000A80: 4C 44 41 20 28 24 46 41 29 2C 59 3A 53 54 41 20 |LDA ($FA),Y:STA | 00000A90: 28 24 46 43 29 2C 59 3A 44 45 59 00 A6 12 94 07 |($FC),Y:DEY.....| 00000AA0: 42 50 4C 20 44 31 00 C1 12 9E 07 44 33 20 4C 44 |BPL D1.....D3 LD| 00000AB0: 41 20 24 46 41 3A 53 45 43 3A 53 42 43 20 23 36 |A $FA:SEC:SBC #6| 00000AC0: 34 00 E4 12 A8 07 53 54 41 20 24 46 41 3A 4C 44 |4.....STA $FA:LD| 00000AD0: 41 20 24 46 42 3A 53 42 43 20 23 31 3A 53 54 41 |A $FB:SBC #1:STA| 00000AE0: 20 24 46 42 00 FC 12 B2 07 4C 44 41 20 24 46 43 | $FB.....LDA $FC| 00000AF0: 3A 53 45 43 3A 53 42 43 20 23 36 34 00 1F 13 BC |:SEC:SBC #64....| 00000B00: 07 53 54 41 20 24 46 43 3A 4C 44 41 20 24 46 44 |.STA $FC:LDA $FD| 00000B10: 3A 53 42 43 20 23 31 3A 53 54 41 20 24 46 44 00 |:SBC #1:STA $FD.| 00000B20: 37 13 C6 07 4C 44 41 20 24 31 34 3A 53 45 43 3A |7...LDA $14:SEC:| 00000B30: 53 42 43 20 23 36 34 00 5A 13 D0 07 53 54 41 20 |SBC #64.Z...STA | 00000B40: 24 31 34 3A 4C 44 41 20 24 31 35 3A 53 42 43 20 |$14:LDA $15:SBC | 00000B50: 23 31 3A 53 54 41 20 24 31 35 00 7D 13 DA 07 4C |#1:STA $15.}...L| 00000B60: 44 59 20 23 36 3A 4C 44 41 20 28 24 46 43 29 2C |DY #6:LDA ($FC),| 00000B70: 59 3A 53 54 41 20 28 24 31 34 29 2C 59 00 A0 13 |Y:STA ($14),Y...| 00000B80: E4 07 44 32 20 4C 44 41 20 28 24 46 41 29 2C 59 |..D2 LDA ($FA),Y| 00000B90: 3A 53 54 41 20 28 24 46 43 29 2C 59 3A 44 45 59 |:STA ($FC),Y:DEY| 00000BA0: 00 B6 13 EE 07 42 50 4C 20 44 32 3A 44 45 58 3A |.....BPL D2:DEX:| 00000BB0: 42 4E 45 20 44 33 00 D1 13 F8 07 50 4C 41 3A 4C |BNE D3.....PLA:L| 00000BC0: 44 59 20 23 30 3A 53 54 41 20 28 24 46 41 29 2C |DY #0:STA ($FA),| 00000BD0: 59 00 F0 13 02 08 4C 44 41 20 24 46 41 3A 43 4C |Y.....LDA $FA:CL| 00000BE0: 43 3A 41 44 43 20 23 38 3A 53 54 41 20 24 46 41 |C:ADC #8:STA $FA| 00000BF0: 00 0C 14 0C 08 4C 44 41 20 24 46 42 3A 41 44 43 |.....LDA $FB:ADC| 00000C00: 20 23 33 30 3A 53 54 41 20 24 46 42 00 2B 14 16 | #30:STA $FB.+..| 00000C10: 08 4C 44 41 20 24 46 43 3A 43 4C 43 3A 41 44 43 |.LDA $FC:CLC:ADC| 00000C20: 20 23 38 3A 53 54 41 20 24 46 43 00 47 14 20 08 | #8:STA $FC.G. .| 00000C30: 4C 44 41 20 24 46 44 3A 41 44 43 20 23 33 30 3A |LDA $FD:ADC #30:| 00000C40: 53 54 41 20 24 46 44 00 66 14 2A 08 4C 44 41 20 |STA $FD.f.*.LDA | 00000C50: 24 31 34 3A 43 4C 43 3A 41 44 43 20 23 38 3A 53 |$14:CLC:ADC #8:S| 00000C60: 54 41 20 24 31 34 00 82 14 34 08 4C 44 41 20 24 |TA $14...4.LDA $| 00000C70: 31 35 3A 41 44 43 20 23 33 30 3A 53 54 41 20 24 |15:ADC #30:STA $| 00000C80: 31 35 00 99 14 3E 08 44 45 43 20 24 46 45 3A 42 |15...>.DEC $FE:B| 00000C90: 4E 45 20 44 35 3A 52 54 53 00 A7 14 48 08 44 35 |NE D5:RTS...H.D5| 00000CA0: 20 4A 4D 50 20 44 34 00 00 00 | JMP D4... |
.......4096.9:.OPT P,OO:..49152.-...JMP RIGHT.:...JMP LEFT.E...JMP UP.R...JMP DO WN.C...GRAF . $2000.....;############### #################...$.;### ZYL. RIGHT SC ROLLING ###.U...;################### #############...8.RIGHT LDA #.GRAF:STA $ FC...B.LDX #.GRAF:STX $FD:INX:STX $FB.0. L.LDA #.GRAF.312:STA $FA.S.V.LDA #8:STA $14:LDA #25:STA $15.I.`.A2 LDY #0:LDX #4 0...J.LDA ($FA),Y:STA $FE...T.A1 R. $FE. ..~.LDA ($FC),Y:STA $FE:R. A.O...STA ($F C),Y:LDA $FC:CLC:ADC #8.....STA $FC:LDA $FD:ADC #0:STA $FD.....DEX:BNE A1.)...DE C $FD:LDA $FC:SEC:SBC #63:STA $FC.D...LD A $FD:SBC #0:STA $FD._...INC $FA:BNE A4: INC $FB.U.D.A4 DEC $14:BNE A2...N.INC $F B:LDA $FA:CLC:ADC #56:STA $FA...X.LDA $F B:ADC #0:STA $FB.....INC $FD:LDA $FC:CLC :ADC #56:STA $FC.....LDA $FD:ADC #0:STA $FD.!...LDA #8:STA $14:DEC $15:BNE A2:RT S.G...;################################. M...;### ZYL. LEFT SCROLLING ###... ..;################################..... LEFT LDA #.GRAF:STA $FA.R.(.LDX #.GRAF:S TX $FB:INX:STX $FD...2.LDA #.GRAF.312:ST A $FC...<.LDA #8:STA $14:LDA #25:STA $15 .'.F.AA2 LDY #0:LDX #40.>.P.LDA ($FA),Y: STA $2.M.Z.AA1 ROL $2.V.D.LDA ($FC),Y:ST A $2:ROL A:STA ($FC),Y...N.LDA $FC:SEC:S BC #8:STA $FC...X.LDA $FD:SBC #0:STA $FD .....DEX:BNE AA1.....LDA $FC:CLC:ADC #65 :STA $FC.....LDA $FD:ADC #1:STA $FD... . INC $FA:BNE AA4:INC $FB./...AA4 DEC $14: BNE AA2.O...LDA $FC:CLC:ADC #56:STA $FC. J...LDA $FD:ADC #1:STA $FD...H.LDA $FA:C LC:ADC #56:STA $FA...R.LDA $FB:ADC #1:ST A $FB.H...LDA #8:STA $14:DEC $15:BNE AA2 .P...RTS.....;########################## ######.....;### ZYL. UP SCROLLING ###.B...;############################## ##.H...UP LDX #.GRAF:STX $FA:INX:STX $FC .....LDA #.GRAF:STA $FB:STA $FD...".LDA #.GRAF.313:STA $14...,.LDA #.GRAF.313:ST A $15.Q.6.LDA #40:STA $FE...@.U4 LDX #24 :LDY #0...J.LDA ($FA),Y:PHA...T.U1 LDA ( $FC),Y:STA ($FA),Y.0.^.INY:CPY #7:BNE U1 .K.H.U3 LDA $FA:CLC:ADC #64.N.R.STA $FA: LDA $FB:ADC #1:STA $FB...|.LDA $FC:CLC:A DC #64.....STA $FC:LDA $FD:ADC #1:STA $F D.A...LDA $14:CLC:ADC #64.....STA $14:LD A $15:ADC #1:STA $15.....LDY #0:LDA ($FA ),Y:STA ($14),Y.*...U2 LDA ($FC),Y:STA ( $FA),Y:INY.G...CPY #7:BNE U2:DEX:BNE U3. _.B.DEY:PLA:STA ($FC),Y...L.LDA $FA:SEC: SBC #248:STA $FA...V.LDA $FB:SBC #29:STA $FB.....LDA $FC:SEC:SBC #248:STA $FC.Y. ..LDA $FD:SBC #29:STA $FD.....LDA $14:SE C:SBC #248:STA $14.....LDA $15:SBC #29:S TA $15.)...DEC $FE:BNE U5.1...RTS.?...U5 JMP U4.E.&.;########################### #####...0.;### ZYL. DOWN SCROLLING ###...:.;############################### #...D.DOWN LDX #.GRAF.7680:STX $FA:INX:S TX $FC...N.LDA #.GRAF.7680:STA $FB:STA $ FD...X.LDA #.GRAF.7994:STA $14.:.B.LDA # .GRAF.7994:STA $15.N.L.LDA #40:STA $FE.D .V.D4 LDY #6:LDX #24.X...LDA ($FC),Y:PHA .....D1 LDA ($FA),Y:STA ($FC),Y:DEY..... BPL D1.A...D3 LDA $FA:SEC:SBC #64.....ST A $FA:LDA $FB:SBC #1:STA $FB.....LDA $FC :SEC:SBC #64.....STA $FC:LDA $FD:SBC #1: STA $FD.7.F.LDA $14:SEC:SBC #64.Z.P.STA $14:LDA $15:SBC #1:STA $15.}.Z.LDY #6:LD A ($FC),Y:STA ($14),Y. ...D2 LDA ($FA),Y :STA ($FC),Y:DEY.....BPL D2:DEX:BNE D3.Q ...PLA:LDY #0:STA ($FA),Y.....LDA $FA:CL C:ADC #8:STA $FA.....LDA $FB:ADC #30:STA $FB.+...LDA $FC:CLC:ADC #8:STA $FC.G. . LDA $FD:ADC #30:STA $FD.F.*.LDA $14:CLC: ADC #8:STA $14...4.LDA $15:ADC #30:STA $ 15...>.DEC $FE:BNE D5:RTS...H.D5 JMP D4. ..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL