BORD.SPRITES.SEQ
FILE INFORMATION
FILENAME(S): BORD.SPRITES.SEQ
FILE TYPE(S): SEQ
FILE SIZE: 1.6K
FIRST SEEN: 2025-11-30 18:06:03
APPEARS ON: 1 disk(s)
FILE HASH
f54360be1ad67831bb9e3bc39d57070a097f3f32200dd0abb1b9c484e3595fee
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TIGERDISK NUMMER | BORD.SPRITES.SEQ | SEQ | Xii | 33 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 0D 0D 20 20 20 20 20 20 20 20 20 20 20 2A 3D 20 |.. *= | 00000010: 32 31 30 30 20 20 20 3B 53 54 41 52 54 41 44 52 |2100 ;STARTADR| 00000020: 2E 0D 0D 20 20 20 3B 20 53 50 52 49 54 45 28 53 |... ; SPRITE(S| 00000030: 29 20 49 4E 49 54 2E 0D 20 20 20 3B 20 2D 2D 2D |) INIT.. ; ---| 00000040: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D 56 49 |------------..VI| 00000050: 43 20 20 20 20 20 20 20 20 3D 20 35 33 32 34 38 |C = 53248| 00000060: 0D 0D 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 |.. LDA| 00000070: 20 23 30 0D 20 20 20 20 20 20 20 20 20 20 20 53 | #0. S| 00000080: 54 41 20 24 44 30 32 31 20 3B 53 43 52 45 45 4E |TA $D021 ;SCREEN| 00000090: 20 28 53 43 48 57 41 52 5A 0D 20 20 20 20 20 20 | (SCHWARZ. | 000000A0: 20 20 20 20 20 4C 44 41 20 23 31 0D 20 20 20 20 | LDA #1. | 000000B0: 20 20 20 20 20 20 20 53 54 41 20 24 44 30 32 30 | STA $D020| 000000C0: 20 3B 43 4F 4C 4F 52 53 20 20 57 45 49 53 53 29 | ;COLORS WEISS)| 000000D0: 0D 0D 20 20 20 20 20 20 20 20 20 20 20 4C 44 58 |.. LDX| 000000E0: 20 23 36 33 0D 20 20 20 20 20 20 20 20 20 20 20 | #63. | 000000F0: 4C 44 41 20 23 24 46 46 20 20 20 3B 53 50 52 49 |LDA #$FF ;SPRI| 00000100: 54 45 20 42 45 53 54 45 48 54 0D 53 50 31 0D 20 |TE BESTEHT.SP1. | 00000110: 20 20 20 20 20 20 20 20 20 20 53 54 41 20 24 32 | STA $2| 00000120: 30 30 30 2C 58 3B 41 55 53 20 44 45 4D 20 42 59 |000,X;AUS DEM BY| 00000130: 54 45 53 0D 20 20 20 20 20 20 20 20 20 20 20 44 |TES. D| 00000140: 45 58 0D 20 20 20 20 20 20 20 20 20 20 20 42 50 |EX. BP| 00000150: 4C 20 53 50 31 20 20 20 20 3B 24 46 46 20 3D 20 |L SP1 ;$FF = | 00000160: 52 45 43 48 54 45 43 4B 0D 0D 20 20 20 20 20 20 |RECHTECK.. | 00000170: 20 20 20 20 20 4C 44 41 20 23 31 0D 20 20 20 20 | LDA #1. | 00000180: 20 20 20 20 20 20 20 53 54 41 20 56 49 43 2B 32 | STA VIC+2| 00000190: 31 20 3B 45 49 4E 20 53 50 52 49 54 45 20 41 4E |1 ;EIN SPRITE AN| 000001A0: 0D 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 20 |. LDA | 000001B0: 23 31 32 38 20 20 20 3B 53 50 52 49 54 45 20 4D |#128 ;SPRITE M| 000001C0: 55 53 54 45 52 0D 20 20 20 20 20 20 20 20 20 20 |USTER. | 000001D0: 20 53 54 41 20 32 30 34 30 20 20 20 3B 41 55 53 | STA 2040 ;AUS| 000001E0: 20 44 45 4D 20 31 32 38 20 42 4C 4F 43 4B 0D 20 | DEM 128 BLOCK. | 000001F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000200: 20 20 20 20 20 3B 3D 24 32 30 30 30 20 28 23 38 | ;=$2000 (#8| 00000210: 31 39 32 29 0D 0D 20 20 20 20 20 20 20 20 20 20 |192).. | 00000220: 20 4C 44 58 20 23 31 30 30 20 20 20 3B 53 50 52 | LDX #100 ;SPR| 00000230: 2E 20 58 2D 4B 4F 4F 52 44 2E 0D 20 20 20 20 20 |. X-KOORD.. | 00000240: 20 20 20 20 20 20 4C 44 59 20 23 32 35 30 20 20 | LDY #250 | 00000250: 20 3B 53 50 52 2E 20 59 2D 4B 4F 4F 52 44 2E 0D | ;SPR. Y-KOORD..| 00000260: 20 20 20 20 20 20 20 20 20 20 20 53 54 58 20 56 | STX V| 00000270: 49 43 20 20 20 20 3B 58 2D 4B 2E 20 53 45 54 5A |IC ;X-K. SETZ| 00000280: 45 4E 0D 20 20 20 20 20 20 20 20 20 20 20 53 54 |EN. ST| 00000290: 59 20 56 49 43 2B 31 20 20 3B 59 2D 4B 2E 20 53 |Y VIC+1 ;Y-K. S| 000002A0: 45 54 5A 45 4E 0D 0D 20 20 20 20 20 20 20 20 20 |ETZEN.. | 000002B0: 20 20 4C 44 41 20 23 31 20 20 20 20 20 3B 53 50 | LDA #1 ;SP| 000002C0: 52 49 54 45 20 46 41 52 42 45 0D 20 20 20 20 20 |RITE FARBE. | 000002D0: 20 20 20 20 20 20 53 54 41 20 24 44 30 32 37 20 | STA $D027 | 000002E0: 20 3B 3D 31 20 28 57 45 49 53 53 29 0D 0D 20 20 | ;=1 (WEISS).. | 000002F0: 20 3B 20 49 20 52 20 51 0D 20 20 20 3B 20 2D 2D | ; I R Q. ; --| 00000300: 2D 2D 2D 0D 0D 20 20 20 20 20 20 20 20 20 20 20 |---.. | 00000310: 53 45 49 0D 20 20 20 20 20 20 20 20 20 20 20 4C |SEI. L| 00000320: 44 41 20 23 3C 49 52 51 20 3B 49 52 51 2D 56 45 |DA #<IRQ ;IRQ-VE| 00000330: 43 54 4F 52 0D 20 20 20 20 20 20 20 20 20 20 20 |CTOR. | 00000340: 4C 44 58 20 23 3E 49 52 51 20 3B 41 55 46 20 4E |LDX #>IRQ ;AUF N| 00000350: 45 55 45 0D 20 20 20 20 20 20 20 20 20 20 20 53 |EUE. S| 00000360: 54 41 20 24 30 33 31 34 20 3B 41 44 52 45 53 53 |TA $0314 ;ADRESS| 00000370: 45 0D 20 20 20 20 20 20 20 20 20 20 20 53 54 58 |E. STX| 00000380: 20 24 30 33 31 35 20 3B 53 45 54 5A 45 4E 0D 0D | $0315 ;SETZEN..| 00000390: 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 | LDA #| 000003A0: 24 30 30 20 20 3B 49 2F 4F 2D 52 45 47 49 53 54 |$00 ;I/O-REGIST| 000003B0: 45 52 0D 20 20 20 20 20 20 20 20 20 20 20 53 54 |ER. ST| 000003C0: 41 20 24 44 43 30 45 20 3B 0D 20 20 20 20 20 20 |A $DC0E ;. | 000003D0: 20 20 20 20 20 4C 44 41 20 23 24 46 31 20 20 3B | LDA #$F1 ;| 000003E0: 46 55 45 52 20 45 49 4E 45 4E 0D 20 20 20 20 20 |FUER EINEN. | 000003F0: 20 20 20 20 20 20 53 54 41 20 24 44 30 31 41 20 | STA $D01A | 00000400: 3B 0D 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 |;. LDA| 00000410: 20 23 24 46 38 20 20 3B 52 41 53 54 45 52 2D 49 | #$F8 ;RASTER-I| 00000420: 52 51 0D 20 20 20 20 20 20 20 20 20 20 20 53 54 |RQ. ST| 00000430: 41 20 24 44 30 31 32 20 3B 0D 20 20 20 20 20 20 |A $D012 ;. | 00000440: 20 20 20 20 20 4C 44 41 20 23 24 30 31 20 20 3B | LDA #$01 ;| 00000450: 56 4F 52 42 45 52 45 49 54 45 4E 0D 20 20 20 20 |VORBEREITEN. | 00000460: 20 20 20 20 20 20 20 53 54 41 20 24 44 30 31 31 | STA $D011| 00000470: 0D 20 20 20 20 20 20 20 20 20 20 20 43 4C 49 0D |. CLI.| 00000480: 20 20 20 20 20 20 20 20 20 20 20 52 54 53 0D 0D | RTS..| 00000490: 0D 49 52 51 20 20 20 20 20 20 20 20 4C 44 58 20 |.IRQ LDX | 000004A0: 23 24 31 33 20 20 3B 41 42 20 48 49 45 52 20 57 |#$13 ;AB HIER W| 000004B0: 49 52 44 0D 20 20 20 20 20 20 20 20 20 20 20 53 |IRD. S| 000004C0: 54 58 20 24 44 30 31 31 20 3B 44 41 53 20 42 4F |TX $D011 ;DAS BO| 000004D0: 52 44 45 52 0D 20 20 20 20 20 20 20 20 20 20 20 |RDER. | 000004E0: 4C 44 41 20 24 44 30 31 32 20 3B 47 45 4F 45 46 |LDA $D012 ;GEOEF| 000004F0: 46 4E 45 54 0D 20 20 20 20 20 20 20 20 20 20 20 |FNET. | 00000500: 42 4E 45 20 49 52 51 0D 0D 20 20 20 20 20 20 20 |BNE IRQ.. | 00000510: 20 20 20 20 4C 44 58 20 23 24 31 42 20 20 3B 59 | LDX #$1B ;Y| 00000520: 2D 53 43 52 4F 4C 4C 2D 52 45 47 2E 0D 20 20 20 |-SCROLL-REG.. | 00000530: 20 20 20 20 20 20 20 20 53 54 58 20 24 44 30 31 | STX $D01| 00000540: 31 20 3B 41 55 46 20 53 54 41 4E 44 41 52 54 20 |1 ;AUF STANDART | 00000550: 57 45 52 54 0D 0D 20 20 20 20 20 20 20 20 20 20 |WERT.. | 00000560: 20 4C 44 41 20 23 24 30 31 20 20 3B 52 45 47 49 | LDA #$01 ;REGI| 00000570: 53 54 45 52 20 46 55 45 52 0D 20 20 20 20 20 20 |STER FUER. | 00000580: 20 20 20 20 20 53 54 41 20 24 44 30 31 39 20 3B | STA $D019 ;| 00000590: 45 49 4E 20 52 55 45 43 4B 4B 45 48 52 0D 20 20 |EIN RUECKKEHR. | 000005A0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 46 | LDA #$F| 000005B0: 31 20 20 3B 49 4E 20 44 45 4E 20 42 41 53 49 43 |1 ;IN DEN BASIC| 000005C0: 2D 0D 20 20 20 20 20 20 20 20 20 20 20 53 54 41 |-. STA| 000005D0: 20 24 44 30 31 41 20 3B 49 4E 54 45 52 50 52 45 | $D01A ;INTERPRE| 000005E0: 54 45 52 0D 20 20 20 20 20 20 20 20 20 20 20 20 |TER. | 000005F0: 20 20 20 20 20 20 20 20 20 3B 56 4F 52 42 45 52 | ;VORBER| 00000600: 45 49 54 45 4E 0D 0D 20 20 20 20 20 20 20 20 20 |EITEN.. | 00000610: 20 20 4A 4D 50 20 24 45 41 33 31 20 3B 5A 55 4D | JMP $EA31 ;ZUM| 00000620: 20 42 41 53 49 43 2D 49 4E 54 45 52 2E 0D 0D 3B | BASIC-INTER...;| 00000630: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000640: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000650: 2D 2D 2D 2D 2D 2D 2D 0D 3B 52 4F 55 54 49 4E 45 |-------.;ROUTINE| 00000660: 20 42 59 20 4D 41 44 52 4F 4D 2F 54 49 47 45 52 | BY MADROM/TIGER| 00000670: 2D 43 52 45 57 2F 43 52 45 41 4D 0D 0D |-CREW/CREAM.. |
.. *= 2100 ;STARTADR... ;
SPRITE(S) INIT.. ; ---------------..VI
C = 53248.. LDA #0.
STA $D021 ;SCREEN (SCHWARZ.
LDA #1. STA $D020 ;COLORS
WEISS).. LDX #63.
LDA #$FF ;SPRITE BESTEHT.SP1.
STA $2000,X;AUS DEM BYTES. D
EX. BPL SP1 ;$FF = RECHTECK
.. LDA #1. STA VIC+2
1 ;EIN SPRITE AN. LDA #128 ;
SPRITE MUSTER. STA 2040 ;AUS
DEM 128 BLOCK. ;=$
2000 (#8192).. LDX #100 ;SPR
. X-KOORD.. LDY #250 ;SPR. Y
-KOORD.. STX VIC ;X-K. SETZ
EN. STY VIC+1 ;Y-K. SETZEN..
LDA #1 ;SPRITE FARBE.
STA $D027 ;=1 (WEISS).. ; I R Q
. ; -----.. SEI. L
DA #<IRQ ;IRQ-VECTOR. LDX #>IR
Q ;AUF NEUE. STA $0314 ;ADRESS
E. STX $0315 ;SETZEN..
LDA #$00 ;I/O-REGISTER. ST
A $DC0E ;. LDA #$F1 ;FUER EIN
EN. STA $D01A ;. LDA
#$F8 ;RASTER-IRQ. STA $D012
;. LDA #$01 ;VORBEREITEN.
STA $D011. CLI.
RTS...IRQ LDX #$13 ;AB HIER W
IRD. STX $D011 ;DAS BORDER.
LDA $D012 ;GEOEFFNET.
BNE IRQ.. LDX #$1B ;Y-SCROLL-
REG.. STX $D011 ;AUF STANDART
WERT.. LDA #$01 ;REGISTER FUE
R. STA $D019 ;EIN RUECKKEHR.
LDA #$F1 ;IN DEN BASIC-.
STA $D01A ;INTERPRETER.
;VORBEREITEN.. JMP $E
A31 ;ZUM BASIC-INTER...;----------------
-----------------------.;ROUTINE BY MADR
OM/TIGER-CREW/CREAM..
> CLICK IMAGE PREVIEW FOR FULL MODAL