_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

SIDEBORDER.SEQ

FILE INFORMATION

FILENAME(S): SIDEBORDER.SEQ

FILE TYPE(S): SEQ

FILE SIZE: 3.1K

FIRST SEEN: 2025-11-30 01:12:58

APPEARS ON: 1 disk(s)

FILE HASH

d23eda0bbee952b3d243a20f33fa738322b07475a153095ddb9fdb91962c0c2f

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
10204 SEITE A SIDEBORDER.SEQ SEQ C64er 30 8 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 20 20 20 20 20 20 20 20  20 2A 3D 20 24 31 30 30  |         *= $100|
00000010: 30 20 20 20 20 20 20 3B  53 54 41 52 54 41 44 52  |0      ;STARTADR|
00000020: 20 42 45 49 0D 20 20 20  20 20 20 20 20 20 20 20  | BEI.           |
00000030: 20 20 20 20 20 20 20 20  20 20 20 20 3B 56 49 53  |            ;VIS|
00000040: 41 53 53 20 5C 42 41 20  24 31 30 30 30 0D 3B 2A  |ASS \BA $1000.;*|
00000050: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000060: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000070: 2A 2A 2A 2A 2A 2A 0D 3B  2A 20 53 49 44 45 42 4F  |******.;* SIDEBO|
00000080: 52 44 45 52 20 53 50 52  49 54 45 53 20 28 57 29  |RDER SPRITES (W)|
00000090: 20 42 59 20 50 49 54 20  49 4E 20 39 32 20 2A 0D  | BY PIT IN 92 *.|
000000A0: 3B 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |;***************|
000000B0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000000C0: 2A 2A 2A 2A 2A 2A 2A 2A  0D 0D 20 20 20 20 20 20  |********..      |
000000D0: 20 20 20 53 45 49 20 20  20 20 20 20 20 20 20 20  |   SEI          |
000000E0: 20 3B 49 52 51 20 53 50  45 52 52 45 4E 0D 20 20  | ;IRQ SPERREN.  |
000000F0: 20 20 20 20 20 20 20 4A  53 52 20 53 50 52 49 54  |       JSR SPRIT|
00000100: 45 53 20 20 20 3B 53 50  52 49 54 45 53 20 53 45  |ES   ;SPRITES SE|
00000110: 54 5A 45 4E 0D 20 20 20  20 20 20 20 20 20 4C 44  |TZEN.         LD|
00000120: 41 20 23 24 46 39 20 20  20 20 20 20 3B 52 41 53  |A #$F9      ;RAS|
00000130: 54 45 52 2D 49 52 51 20  42 45 49 0D 20 20 20 20  |TER-IRQ BEI.    |
00000140: 20 20 20 20 20 53 54 41  20 24 44 30 31 32 20 20  |     STA $D012  |
00000150: 20 20 20 3B 24 46 39 0D  20 20 20 20 20 20 20 20  |   ;$F9.        |
00000160: 20 4C 44 41 20 23 24 30  31 20 20 20 20 20 20 3B  | LDA #$01      ;|
00000170: 4E 55 52 20 52 41 53 54  45 52 2D 49 52 51 0D 20  |NUR RASTER-IRQ. |
00000180: 20 20 20 20 20 20 20 20  53 54 41 20 24 44 30 31  |        STA $D01|
00000190: 41 20 20 20 20 20 3B 5A  55 4C 41 53 53 45 4E 0D  |A     ;ZULASSEN.|
000001A0: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 24 37  |         LDA #$7|
000001B0: 44 20 20 20 20 20 20 3B  54 49 4D 45 52 0D 20 20  |D      ;TIMER.  |
000001C0: 20 20 20 20 20 20 20 53  54 41 20 24 44 43 30 44  |       STA $DC0D|
000001D0: 20 20 20 20 20 3B 53 45  54 5A 45 4E 0D 20 20 20  |     ;SETZEN.   |
000001E0: 20 20 20 20 20 20 4C 44  41 20 23 3C 53 54 41 52  |      LDA #<STAR|
000001F0: 54 20 20 20 3B 49 52 51  2D 56 45 4B 54 4F 52 45  |T   ;IRQ-VEKTORE|
00000200: 4E 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |N.         STA $|
00000210: 30 33 31 34 20 20 20 20  20 3B 41 55 46 20 22 53  |0314     ;AUF "S|
00000220: 54 41 52 54 22 0D 20 20  20 20 20 20 20 20 20 4C  |TART".         L|
00000230: 44 41 20 23 3E 53 54 41  52 54 20 20 20 3B 56 45  |DA #>START   ;VE|
00000240: 52 42 49 45 47 45 4E 0D  20 20 20 20 20 20 20 20  |RBIEGEN.        |
00000250: 20 53 54 41 20 24 30 33  31 35 20 20 20 20 20 3B  | STA $0315     ;|
00000260: 0D 20 20 20 20 20 20 20  20 20 43 4C 49 20 20 20  |.         CLI   |
00000270: 20 20 20 20 20 20 20 20  3B 49 52 51 20 46 52 45  |        ;IRQ FRE|
00000280: 49 47 45 42 45 4E 0D 20  20 20 20 20 20 20 20 20  |IGEBEN.         |
00000290: 52 54 53 20 20 20 20 20  20 20 20 20 20 20 3B 41  |RTS           ;A|
000002A0: 42 20 49 4E 53 20 42 41  53 49 43 0D 3B 2D 2D 2D  |B INS BASIC.;---|
000002B0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000002C0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000002D0: 2D 2D 2D 2D 0D 53 54 41  52 54 20 20 20 20 4C 44  |----.START    LD|
000002E0: 41 20 23 25 30 30 30 31  30 30 31 31 3B 55 50 2F  |A #%00010011;UP/|
000002F0: 44 4F 57 4E 2D 42 4F 52  44 45 52 0D 20 20 20 20  |DOWN-BORDER.    |
00000300: 20 20 20 20 20 53 54 41  20 24 44 30 31 31 20 20  |     STA $D011  |
00000310: 20 20 20 3B 41 55 53 53  43 48 41 4C 54 45 4E 0D  |   ;AUSSCHALTEN.|
00000320: 20 20 20 20 20 20 20 20  20 4C 44 41 20 24 44 30  |         LDA $D0|
00000330: 32 31 20 20 20 20 20 3B  46 41 52 42 45 4E 0D 20  |21     ;FARBEN. |
00000340: 20 20 20 20 20 20 20 20  53 54 41 20 24 44 30 32  |        STA $D02|
00000350: 30 20 20 20 20 20 3B 53  45 54 5A 45 4E 0D 20 20  |0     ;SETZEN.  |
00000360: 20 20 20 20 20 20 20 4E  4F 50 20 20 20 20 20 20  |       NOP      |
00000370: 20 20 20 20 20 3B 38 20  5A 59 4B 4C 45 4E 0D 20  |     ;8 ZYKLEN. |
00000380: 20 20 20 20 20 20 20 20  4E 4F 50 20 20 20 20 20  |        NOP     |
00000390: 20 20 20 20 20 20 3B 57  41 52 54 45 4E 0D 20 20  |      ;WARTEN.  |
000003A0: 20 20 20 20 20 20 20 4E  4F 50 20 20 20 20 20 20  |       NOP      |
000003B0: 20 20 20 20 20 3B 0D 20  20 20 20 20 20 20 20 20  |     ;.         |
000003C0: 4E 4F 50 20 20 20 20 20  20 20 20 20 20 20 3B 0D  |NOP           ;.|
000003D0: 20 20 20 20 20 20 20 20  20 4C 44 58 20 23 24 33  |         LDX #$3|
000003E0: 31 20 20 20 20 20 20 3B  0D 20 20 20 20 20 20 20  |1      ;.       |
000003F0: 20 20 4C 44 59 20 23 24  30 38 20 20 20 20 20 20  |  LDY #$08      |
00000400: 3B 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |;---------------|
00000410: 2D 0D 52 5A 59 41 55 53  20 20 20 44 45 59 20 20  |-.RZYAUS   DEY  |
00000420: 20 20 20 20 20 20 20 20  20 3B 0D 20 20 20 20 20  |         ;.     |
00000430: 20 20 20 20 42 4E 45 20  52 5A 59 41 55 53 20 20  |    BNE RZYAUS  |
00000440: 20 20 3B 20 52 41 53 54  45 52 0D 43 4F 4E 54 49  |  ; RASTER.CONTI|
00000450: 20 20 20 20 4E 4F 50 20  20 20 20 20 20 20 20 20  |    NOP         |
00000460: 20 20 3B 20 20 20 20 5A  59 4B 4C 45 4E 0D 20 20  |  ;    ZYKLEN.  |
00000470: 20 20 20 20 20 20 20 4E  4F 50 20 20 20 20 20 20  |       NOP      |
00000480: 20 20 20 20 20 3B 20 20  20 20 20 20 20 41 55 53  |     ;       AUS|
00000490: 47 4C 45 49 43 48 0D 20  20 20 20 20 20 20 20 20  |GLEICH.         |
000004A0: 4E 4F 50 20 20 20 20 20  20 20 20 20 20 20 3B 0D  |NOP           ;.|
000004B0: 20 20 20 20 20 20 20 20  20 44 45 43 20 24 44 30  |         DEC $D0|
000004C0: 31 36 20 20 20 20 20 3B  53 43 52 4F 4C 4C 2D 52  |16     ;SCROLL-R|
000004D0: 45 47 0D 20 20 20 20 20  20 20 20 20 49 4E 43 20  |EG.         INC |
000004E0: 24 44 30 31 36 20 20 20  20 20 3B 53 43 48 41 4C  |$D016     ;SCHAL|
000004F0: 54 45 4E 0D 20 20 20 20  20 20 20 20 20 4E 4F 50  |TEN.         NOP|
00000500: 20 20 20 20 20 20 20 20  20 20 20 3B 0D 20 20 20  |           ;.   |
00000510: 20 20 20 20 20 20 4E 4F  50 20 20 20 20 20 20 20  |      NOP       |
00000520: 20 20 20 20 3B 20 52 41  53 54 45 52 0D 20 20 20  |    ; RASTER.   |
00000530: 20 20 20 20 20 20 4E 4F  50 20 20 20 20 20 20 20  |      NOP       |
00000540: 20 20 20 20 3B 20 20 20  20 5A 59 4B 4C 45 4E 0D  |    ;    ZYKLEN.|
00000550: 20 20 20 20 20 20 20 20  20 4E 4F 50 20 20 20 20  |         NOP    |
00000560: 20 20 20 20 20 20 20 3B  20 20 20 20 20 20 20 41  |       ;       A|
00000570: 55 53 47 4C 45 49 43 48  0D 20 20 20 20 20 20 20  |USGLEICH.       |
00000580: 20 20 4E 4F 50 20 20 20  20 20 20 20 20 20 20 20  |  NOP           |
00000590: 3B 0D 20 20 20 20 20 20  20 20 20 4E 4F 50 20 20  |;.         NOP  |
000005A0: 20 20 20 20 20 20 20 20  20 3B 0D 20 20 20 20 20  |         ;.     |
000005B0: 20 20 20 20 4E 4F 50 20  20 20 20 20 20 20 20 20  |    NOP         |
000005C0: 20 20 3B 20 52 41 53 54  45 52 0D 20 20 20 20 20  |  ; RASTER.     |
000005D0: 20 20 20 20 4E 4F 50 20  20 20 20 20 20 20 20 20  |    NOP         |
000005E0: 20 20 3B 20 20 20 20 5A  59 4B 4C 45 4E 0D 20 20  |  ;    ZYKLEN.  |
000005F0: 20 20 20 20 20 20 20 4E  4F 50 20 20 20 20 20 20  |       NOP      |
00000600: 20 20 20 20 20 3B 20 20  20 20 20 20 20 41 55 53  |     ;       AUS|
00000610: 47 4C 45 49 43 48 0D 20  20 20 20 20 20 20 20 20  |GLEICH.         |
00000620: 4E 4F 50 20 20 20 20 20  20 20 20 20 20 20 3B 0D  |NOP           ;.|
00000630: 20 20 20 20 20 20 20 20  20 42 49 54 20 24 30 30  |         BIT $00|
00000640: 20 20 20 20 20 20 20 3B  2D 2D 2D 2D 2D 2D 2D 2D  |       ;--------|
00000650: 2D 2D 2D 2D 2D 2D 2D 2D  0D 20 20 20 20 20 20 20  |--------.       |
00000660: 20 20 44 45 58 20 20 20  20 20 20 20 20 20 20 20  |  DEX           |
00000670: 3B 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 43  |;.         BNE C|
00000680: 4F 4E 54 49 20 20 20 20  20 3B 0D 0D 20 20 20 20  |ONTI     ;..    |
00000690: 20 20 20 20 20 4C 44 41  20 23 24 30 30 20 20 20  |     LDA #$00   |
000006A0: 20 20 20 3B 52 41 53 54  45 52 2D 49 52 51 0D 20  |   ;RASTER-IRQ. |
000006B0: 20 20 20 20 20 20 20 20  53 54 41 20 24 44 30 31  |        STA $D01|
000006C0: 32 20 20 20 20 20 3B 41  55 46 20 5A 45 49 4C 45  |2     ;AUF ZEILE|
000006D0: 20 24 30 30 0D 20 20 20  20 20 20 20 20 20 4C 44  | $00.         LD|
000006E0: 41 20 23 3C 52 45 41 44  59 20 20 20 3B 55 4E 44  |A #<READY   ;UND|
000006F0: 20 49 52 51 0D 20 20 20  20 20 20 20 20 20 53 54  | IRQ.         ST|
00000700: 41 20 24 30 33 31 34 20  20 20 20 20 3B 41 55 46  |A $0314     ;AUF|
00000710: 20 4E 41 45 43 48 53 54  45 0D 20 20 20 20 20 20  | NAECHSTE.      |
00000720: 20 20 20 4C 44 59 20 23  3E 52 45 41 44 59 20 20  |   LDY #>READY  |
00000730: 20 3B 52 4F 55 54 49 4E  45 0D 20 20 20 20 20 20  | ;ROUTINE.      |
00000740: 20 20 20 53 54 59 20 24  30 33 31 35 20 20 20 20  |   STY $0315    |
00000750: 20 3B 0D 0D 20 20 20 20  20 20 20 20 20 4C 44 41  | ;..         LDA|
00000760: 20 24 44 30 31 39 20 20  20 20 20 3B 49 52 52 28  | $D019     ;IRR(|
00000770: 49 52 51 20 52 45 51 20  52 45 47 29 0D 20 20 20  |IRQ REQ REG).   |
00000780: 20 20 20 20 20 20 53 54  41 20 24 44 30 31 39 20  |      STA $D019 |
00000790: 20 20 20 20 3B 4C 4F 45  53 43 48 45 4E 0D 20 20  |    ;LOESCHEN.  |
000007A0: 20 20 20 20 20 20 20 4A  4D 50 20 24 45 41 33 31  |       JMP $EA31|
000007B0: 20 20 20 20 20 3B 55 4E  44 20 41 4C 54 45 52 20  |     ;UND ALTER |
000007C0: 49 52 51 0D 3B 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |IRQ.;-----------|
000007D0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000007E0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 0D 52 45 41  |------------.REA|
000007F0: 44 59 20 20 20 20 4C 44  41 20 23 24 31 42 20 20  |DY    LDA #$1B  |
00000800: 20 20 20 20 3B 55 50 2F  44 4F 57 4E 2D 42 4F 52  |    ;UP/DOWN-BOR|
00000810: 44 45 52 53 0D 20 20 20  20 20 20 20 20 20 53 54  |DERS.         ST|
00000820: 41 20 24 44 30 31 31 20  20 20 20 20 3B 41 4E 53  |A $D011     ;ANS|
00000830: 43 48 41 4C 54 45 4E 0D  0D 20 20 20 20 20 20 20  |CHALTEN..       |
00000840: 20 20 4C 44 41 20 23 24  46 39 20 20 20 20 20 20  |  LDA #$F9      |
00000850: 3B 55 4E 44 20 52 41 53  54 45 52 2D 49 52 51 0D  |;UND RASTER-IRQ.|
00000860: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 44 30  |         STA $D0|
00000870: 31 32 20 20 20 20 20 3B  57 49 45 44 45 52 20 41  |12     ;WIEDER A|
00000880: 55 46 20 24 46 39 0D 0D  20 20 20 20 20 20 20 20  |UF $F9..        |
00000890: 20 4C 44 41 20 23 3C 53  54 41 52 54 20 20 20 3B  | LDA #<START   ;|
000008A0: 49 52 51 20 57 49 45 44  45 52 0D 20 20 20 20 20  |IRQ WIEDER.     |
000008B0: 20 20 20 20 53 54 41 20  24 30 33 31 34 20 20 20  |    STA $0314   |
000008C0: 20 20 3B 41 55 46 20 44  49 45 20 41 4C 54 45 0D  |  ;AUF DIE ALTE.|
000008D0: 20 20 20 20 20 20 20 20  20 4C 44 59 20 23 3E 53  |         LDY #>S|
000008E0: 54 41 52 54 20 20 20 3B  52 4F 55 54 49 4E 45 0D  |TART   ;ROUTINE.|
000008F0: 20 20 20 20 20 20 20 20  20 53 54 59 20 24 30 33  |         STY $03|
00000900: 31 35 20 20 20 20 20 3B  56 45 52 42 49 45 47 45  |15     ;VERBIEGE|
00000910: 4E 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 24  |N.         LDA $|
00000920: 44 30 31 39 20 20 20 20  20 3B 49 52 52 0D 20 20  |D019     ;IRR.  |
00000930: 20 20 20 20 20 20 20 53  54 41 20 24 44 30 31 39  |       STA $D019|
00000940: 20 20 20 20 20 3B 4C 4F  45 53 43 48 45 4E 0D 20  |     ;LOESCHEN. |
00000950: 20 20 20 20 20 20 20 20  4A 4D 50 20 24 45 41 33  |        JMP $EA3|
00000960: 31 20 20 20 20 20 3B 55  4E 44 20 41 4C 54 45 52  |1     ;UND ALTER|
00000970: 20 49 52 51 0D 3B 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  | IRQ.;----------|
00000980: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000990: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 0D 53 50  |-------------.SP|
000009A0: 52 49 54 45 53 20 20 4C  44 58 20 23 24 30 30 20  |RITES  LDX #$00 |
000009B0: 20 20 20 20 20 3B 5A 41  45 48 4C 45 52 20 41 55  |     ;ZAEHLER AU|
000009C0: 46 20 24 30 30 0D 53 50  52 31 20 20 20 20 20 4C  |F $00.SPR1     L|
000009D0: 44 41 20 53 50 52 44 41  54 45 53 2C 58 3B 53 50  |DA SPRDATES,X;SP|
000009E0: 52 2D 50 4F 53 49 54 49  4F 4E 45 4E 0D 20 20 20  |R-POSITIONEN.   |
000009F0: 20 20 20 20 20 20 53 54  41 20 24 44 30 30 30 2C  |      STA $D000,|
00000A00: 58 20 20 20 3B 48 4F 4C  45 4E 20 55 4E 44 20 49  |X   ;HOLEN UND I|
00000A10: 4E 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |N.         STA $|
00000A20: 44 30 32 37 2C 58 20 20  20 3B 50 4F 53 2B 46 41  |D027,X   ;POS+FA|
00000A30: 52 42 2D 52 45 47 0D 20  20 20 20 20 20 20 20 20  |RB-REG.         |
00000A40: 49 4E 58 20 20 20 20 20  20 20 20 20 20 20 3B 53  |INX           ;S|
00000A50: 43 48 52 45 49 42 45 4E  0D 20 20 20 20 20 20 20  |CHREIBEN.       |
00000A60: 20 20 43 50 58 20 23 24  31 31 20 20 20 20 20 20  |  CPX #$11      |
00000A70: 3B 28 4D 53 42 2D 42 59  54 45 20 24 44 30 31 30  |;(MSB-BYTE $D010|
00000A80: 29 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 53  |).         BNE S|
00000A90: 50 52 31 20 20 20 20 20  20 3B 0D 20 20 20 20 20  |PR1      ;.     |
00000AA0: 20 20 20 20 4C 44 41 20  23 24 30 30 20 20 20 20  |    LDA #$00    |
00000AB0: 20 20 3B 53 50 52 49 54  45 42 4C 4F 43 4B 50 4F  |  ;SPRITEBLOCKPO|
00000AC0: 49 4E 54 0D 20 20 20 20  20 20 20 20 20 53 54 41  |INT.         STA|
00000AD0: 20 24 30 37 46 38 20 20  20 20 20 3B 41 55 46 20  | $07F8     ;AUF |
00000AE0: 24 30 30 20 28 5A 45 52  4F 50 29 0D 20 20 20 20  |$00 (ZEROP).    |
00000AF0: 20 20 20 20 20 53 54 41  20 24 44 30 32 31 20 20  |     STA $D021  |
00000B00: 20 20 20 3B 0D 20 20 20  20 20 20 20 20 20 4C 44  |   ;.         LD|
00000B10: 41 20 23 24 46 46 20 20  20 20 20 20 3B 41 4C 4C  |A #$FF      ;ALL|
00000B20: 45 20 53 50 52 49 54 45  53 0D 20 20 20 20 20 20  |E SPRITES.      |
00000B30: 20 20 20 53 54 41 20 24  44 30 31 35 20 20 20 20  |   STA $D015    |
00000B40: 20 3B 41 4E 53 43 48 41  4C 54 45 4E 0D 20 20 20  | ;ANSCHALTEN.   |
00000B50: 20 20 20 20 20 20 52 54  53 20 20 20 20 20 20 20  |      RTS       |
00000B60: 20 20 20 20 3B 55 4E 44  20 5A 55 52 55 45 43 4B  |    ;UND ZURUECK|
00000B70: 0D 0D 3B 2D 2D 2D 2D 2D  2D 50 4F 53 49 54 49 4F  |..;------POSITIO|
00000B80: 4E 53 20 54 41 42 45 4C  4C 45 2D 2D 2D 2D 2D 2D  |NS TABELLE------|
00000B90: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 0D 53 50 52 44 41  |----------.SPRDA|
00000BA0: 54 45 53 20 2E 42 59 54  45 20 24 30 31 2C 24 46  |TES .BYTE $01,$F|
00000BB0: 41 2C 24 32 31 2C 24 46  41 3B 50 4F 53 20 30 2D  |A,$21,$FA;POS 0-|
00000BC0: 37 0D 20 20 20 20 20 20  20 20 20 2E 42 59 54 45  |7.         .BYTE|
00000BD0: 20 24 38 31 2C 24 46 41  2C 24 41 31 2C 24 46 41  | $81,$FA,$A1,$FA|
00000BE0: 0D 20 20 20 20 20 20 20  20 20 2E 42 59 54 45 20  |.         .BYTE |
00000BF0: 24 43 31 2C 24 46 41 2C  24 45 31 2C 24 46 41 0D  |$C1,$FA,$E1,$FA.|
00000C00: 20 20 20 20 20 20 20 20  20 2E 42 59 54 45 20 24  |         .BYTE $|
00000C10: 34 31 2C 24 46 41 2C 24  36 31 2C 24 46 41 0D 20  |41,$FA,$61,$FA. |
00000C20: 20 20 20 20 20 20 20 20  2E 42 59 54 45 20 25 31  |        .BYTE %1|
00000C30: 31 30 30 30 30 30 30 20  20 3B 4D 53 42 0D 3B 2D  |1000000  ;MSB.;-|
00000C40: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000C50: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000C60: 2D 2D 2D 2D 2D 2D 0D 0D                           |------..        |
         *= $1000      ;STARTADR BEI.   
                    ;VISASS \BA $1000.;*
**************************************.;
* SIDEBORDER SPRITES (W) BY PIT IN 92 *.
;***************************************
..         SEI           ;IRQ SPERREN.  
       JSR SPRITES   ;SPRITES SETZEN.   
      LDA #$F9      ;RASTER-IRQ BEI.    
     STA $D012     ;$F9.         LDA #$0
1      ;NUR RASTER-IRQ.         STA $D01
A     ;ZULASSEN.         LDA #$7D      ;
TIMER.         STA $DC0D     ;SETZEN.   
      LDA #<START   ;IRQ-VEKTOREN.      
   STA $0314     ;AUF "START".         L
DA #>START   ;VERBIEGEN.         STA $03
15     ;.         CLI           ;IRQ FRE
IGEBEN.         RTS           ;AB INS BA
SIC.;-----------------------------------
----.START    LDA #%00010011;UP/DOWN-BOR
DER.         STA $D011     ;AUSSCHALTEN.
         LDA $D021     ;FARBEN.         
STA $D020     ;SETZEN.         NOP      
     ;8 ZYKLEN.         NOP           ;W
ARTEN.         NOP           ;.         
NOP           ;.         LDX #$31      ;
.         LDY #$08      ;---------------
-.RZYAUS   DEY           ;.         BNE 
RZYAUS    ; RASTER.CONTI    NOP         
  ;    ZYKLEN.         NOP           ;  
     AUSGLEICH.         NOP           ;.
         DEC $D016     ;SCROLL-REG.     
    INC $D016     ;SCHALTEN.         NOP
           ;.         NOP           ; RA
STER.         NOP           ;    ZYKLEN.
         NOP           ;       AUSGLEICH
.         NOP           ;.         NOP  
         ;.         NOP           ; RAST
ER.         NOP           ;    ZYKLEN.  
       NOP           ;       AUSGLEICH. 
        NOP           ;.         BIT $00
       ;----------------.         DEX   
        ;.         BNE CONTI     ;..    
     LDA #$00      ;RASTER-IRQ.         
STA $D012     ;AUF ZEILE $00.         LD
A #<READY   ;UND IRQ.         STA $0314 
    ;AUF NAECHSTE.         LDY #>READY  
 ;ROUTINE.         STY $0315     ;..    
     LDA $D019     ;IRR(IRQ REQ REG).   
      STA $D019     ;LOESCHEN.         J
MP $EA31     ;UND ALTER IRQ.;-----------
----------------------------.READY    LD
A #$1B      ;UP/DOWN-BORDERS.         ST
A $D011     ;ANSCHALTEN..         LDA #$
F9      ;UND RASTER-IRQ.         STA $D0
12     ;WIEDER AUF $F9..         LDA #<S
TART   ;IRQ WIEDER.         STA $0314   
  ;AUF DIE ALTE.         LDY #>START   ;
ROUTINE.         STY $0315     ;VERBIEGE
N.         LDA $D019     ;IRR.         S
TA $D019     ;LOESCHEN.         JMP $EA3
1     ;UND ALTER IRQ.;------------------
---------------------.SPRITES  LDX #$00 
     ;ZAEHLER AUF $00.SPR1     LDA SPRDA
TES,X;SPR-POSITIONEN.         STA $D000,
X   ;HOLEN UND IN.         STA $D027,X  
 ;POS+FARB-REG.         INX           ;S
CHREIBEN.         CPX #$11      ;(MSB-BY
TE $D010).         BNE SPR1      ;.     
    LDA #$00      ;SPRITEBLOCKPOINT.    
     STA $07F8     ;AUF $00 (ZEROP).    
     STA $D021     ;.         LDA #$FF  
    ;ALLE SPRITES.         STA $D015    
 ;ANSCHALTEN.         RTS           ;UND
 ZURUECK..;------POSITIONS TABELLE------
----------.SPRDATES .BYTE $01,$FA,$21,$F
A;POS 0-7.         .BYTE $81,$FA,$A1,$FA
.         .BYTE $C1,$FA,$E1,$FA.        
 .BYTE $41,$FA,$61,$FA.         .BYTE %1
1000000  ;MSB.;-------------------------
--------------..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL