Groundwork for new art pipeline
This commit is contained in:
blondie7575
parent
2bdaae8f30
commit
79972bbb52
|
Before Width: | Height: | Size: 76 B After Width: | Height: | Size: 76 B |
|
|
@ -0,0 +1,136 @@
|
|||
Spr_002:
|
||||
clc ; 16x16, 185 bytes, 439 cycles
|
||||
sei ; Disable Interrupts
|
||||
phd ; Backup Direct Page
|
||||
tsc ; Backup Stack
|
||||
sta StackAddress
|
||||
ldal $e1c068 ; Direct Page and Stack in Bank 01/
|
||||
ora #$0030
|
||||
stal $e1c068
|
||||
tya ; Y = Sprite Target Screen Address (upper left corner)
|
||||
tcs ; New Stack address
|
||||
ldx #$6666 ; Pattern #1 : 112
|
||||
*----------
|
||||
tsc
|
||||
adc #$0007
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 1
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 2
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 3
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 4
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 5
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 6
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 7
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 8
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 9
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 10
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 11
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 12
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 13
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 14
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 15
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
*----------
|
||||
ldal $e1C068 ; Direct Page and Stack in Bank 00/
|
||||
and #$ffcf
|
||||
stal $e1c068
|
||||
lda StackAddress ; Restore Stack
|
||||
tcs
|
||||
pld ; Restore Direct Page
|
||||
cli ; Enable Interrupts
|
||||
rtl
|
||||
|
||||
*----------
|
||||
|
Before Width: | Height: | Size: 68 B After Width: | Height: | Size: 68 B |
|
|
@ -0,0 +1,136 @@
|
|||
Spr_001:
|
||||
clc ; 16x16, 185 bytes, 439 cycles
|
||||
sei ; Disable Interrupts
|
||||
phd ; Backup Direct Page
|
||||
tsc ; Backup Stack
|
||||
sta StackAddress
|
||||
ldal $e1c068 ; Direct Page and Stack in Bank 01/
|
||||
ora #$0030
|
||||
stal $e1c068
|
||||
tya ; Y = Sprite Target Screen Address (upper left corner)
|
||||
tcs ; New Stack address
|
||||
ldx #$FFFF ; Pattern #1 : 112
|
||||
*----------
|
||||
tsc
|
||||
adc #$0007
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 1
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 2
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 3
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 4
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 5
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 6
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 7
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 8
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 9
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 10
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 11
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 12
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 13
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 14
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 15
|
||||
adc #$00A8
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
*----------
|
||||
ldal $e1C068 ; Direct Page and Stack in Bank 00/
|
||||
and #$ffcf
|
||||
stal $e1c068
|
||||
lda StackAddress ; Restore Stack
|
||||
tcs
|
||||
pld ; Restore Direct Page
|
||||
cli ; Enable Interrupts
|
||||
rtl
|
||||
|
||||
*----------
|
||||
|
Before Width: | Height: | Size: 189 B After Width: | Height: | Size: 189 B |
|
|
@ -1,141 +1,133 @@
|
|||
Spr_000:
|
||||
FASTGRAPHICS ; 16x16, 484 bytes, 710 cycles
|
||||
clc
|
||||
clc ; 16x16, 455 bytes, 716 cycles
|
||||
sei ; Disable Interrupts
|
||||
phd ; Backup Direct Page
|
||||
tsc ; Backup Stack
|
||||
sta StackAddress
|
||||
ldal $e1c068 ; Direct Page and Stack in Bank 01/
|
||||
ora #$0030
|
||||
stal $e1c068
|
||||
tya ; Y = Sprite Target Screen Address (upper left corner)
|
||||
tcs ; New Stack address
|
||||
ldx #$3333 ; Pattern #1 : 4
|
||||
ldy #$0333 ; Pattern #2 : 2
|
||||
lda #$3003 ; Pattern #3 : 2
|
||||
ldx #$4444 ; Pattern #1 : 4
|
||||
ldy #$0444 ; Pattern #2 : 2
|
||||
lda #$4004 ; Pattern #3 : 2
|
||||
tcd
|
||||
;--
|
||||
lda #$1522 ; Line 0
|
||||
*----------
|
||||
lda #$2633 ; Line 0
|
||||
sta $A5,S
|
||||
lda $A3,S
|
||||
and #$F000
|
||||
ora #$0115
|
||||
ora #$0226
|
||||
sta $A3,S
|
||||
sep #$20
|
||||
.a8
|
||||
sep #$20
|
||||
lda $03,S
|
||||
and #$F0
|
||||
ora #$02
|
||||
ora #$03
|
||||
sta $03,S
|
||||
lda $06,S
|
||||
and #$F0
|
||||
ora #$02
|
||||
ora #$03
|
||||
sta $06,S
|
||||
lda $A7,S
|
||||
and #$0F
|
||||
ora #$10
|
||||
ora #$20
|
||||
sta $A7,S
|
||||
rep #$30
|
||||
.a16
|
||||
rep #$30
|
||||
tsc ; Line 2
|
||||
adc #$0140
|
||||
tcs
|
||||
sep #$20
|
||||
.a8
|
||||
lda #$77
|
||||
sep #$20
|
||||
lda #$FF
|
||||
sta $00,S
|
||||
sta $A0,S
|
||||
lda $07,S
|
||||
and #$0F
|
||||
ora #$10
|
||||
ora #$20
|
||||
sta $07,S
|
||||
lda $A7,S
|
||||
and #$0F
|
||||
ora #$10
|
||||
ora #$20
|
||||
sta $A7,S
|
||||
rep #$30
|
||||
.a16
|
||||
rep #$30
|
||||
tsc
|
||||
adc #$0006
|
||||
tcs
|
||||
pea $2422
|
||||
pea $1314
|
||||
pea $3533
|
||||
pea $2425
|
||||
tsc ; Line 3
|
||||
adc #$00A4
|
||||
tcs
|
||||
sep #$20
|
||||
.a8
|
||||
lda #$12
|
||||
sep #$20
|
||||
lda #$23
|
||||
sta $9A,S
|
||||
lda $A1,S
|
||||
and #$0F
|
||||
ora #$20
|
||||
ora #$30
|
||||
sta $A1,S
|
||||
rep #$30
|
||||
.a16
|
||||
pea $2323
|
||||
pea $3312
|
||||
rep #$30
|
||||
pea $3434
|
||||
pea $4423
|
||||
tsc ; Line 4
|
||||
adc #$00A4
|
||||
tcs
|
||||
lda $9C,S
|
||||
and #$00F0
|
||||
ora #$1202
|
||||
ora #$2303
|
||||
sta $9C,S
|
||||
sep #$20
|
||||
.a8
|
||||
lda #$13
|
||||
sep #$20
|
||||
lda #$24
|
||||
sta $9A,S
|
||||
rep #$30
|
||||
.a16
|
||||
rep #$30
|
||||
phx
|
||||
pea $3323
|
||||
pea $4434
|
||||
tsc ; Line 5
|
||||
adc #$00A5
|
||||
tcs
|
||||
sep #$20
|
||||
.a8
|
||||
lda #$13
|
||||
sep #$20
|
||||
lda #$24
|
||||
sta $99,S
|
||||
lda $A0,S
|
||||
and #$0F
|
||||
ora #$20
|
||||
ora #$30
|
||||
sta $A0,S
|
||||
rep #$30
|
||||
.a16
|
||||
pea $1230
|
||||
rep #$30
|
||||
pea $2340
|
||||
phy
|
||||
tsc ; Line 6
|
||||
adc #$00A3
|
||||
tcs
|
||||
phd
|
||||
pea $3322
|
||||
pea $4433
|
||||
tsc ; Line 7
|
||||
adc #$00A5
|
||||
tcs
|
||||
sep #$20
|
||||
.a8
|
||||
sep #$20
|
||||
lda $99,S
|
||||
and #$F0
|
||||
ora #$02
|
||||
ora #$03
|
||||
sta $99,S
|
||||
rep #$30
|
||||
.a16
|
||||
pea $1257
|
||||
pea $7537
|
||||
pea $1122
|
||||
pea $2213
|
||||
rep #$30
|
||||
pea $236F
|
||||
pea $F64F
|
||||
pea $2233
|
||||
pea $3324
|
||||
tsc ; Line 8
|
||||
adc #$00A7
|
||||
tcs
|
||||
lda $9F,S
|
||||
and #$0F00
|
||||
ora #$2011
|
||||
ora #$3022
|
||||
sta $9F,S
|
||||
sep #$20
|
||||
.a8
|
||||
sep #$20
|
||||
lda $9A,S
|
||||
and #$F0
|
||||
ora #$02
|
||||
ora #$03
|
||||
sta $9A,S
|
||||
rep #$30
|
||||
.a16
|
||||
pea $7177
|
||||
pea $1222
|
||||
rep #$30
|
||||
pea $F2FF
|
||||
pea $2333
|
||||
pea $3444
|
||||
tsc ; Line 9
|
||||
adc #$00A4
|
||||
tcs
|
||||
|
|
@ -143,77 +135,81 @@ Spr_000:
|
|||
sta $9E,S
|
||||
lda $9C,S
|
||||
and #$00F0
|
||||
ora #$3302
|
||||
ora #$4403
|
||||
sta $9C,S
|
||||
lda $A0,S
|
||||
and #$0F00
|
||||
ora #$7027
|
||||
ora #$F03F
|
||||
sta $A0,S
|
||||
pea $7732
|
||||
pea $FF43
|
||||
phx
|
||||
tsc ; Line 11
|
||||
adc #$0140
|
||||
tcs
|
||||
lda #$3323
|
||||
lda #$4434
|
||||
sta $02,S
|
||||
lda #$1211
|
||||
lda #$2322
|
||||
sta $A2,S
|
||||
lda $00,S
|
||||
and #$00F0
|
||||
ora #$3302
|
||||
ora #$4403
|
||||
sta $00,S
|
||||
lda $04,S
|
||||
and #$0F00
|
||||
ora #$7032
|
||||
ora #$F043
|
||||
sta $04,S
|
||||
lda $A0,S
|
||||
and #$00F0
|
||||
ora #$3202
|
||||
ora #$4303
|
||||
sta $A0,S
|
||||
lda $A4,S
|
||||
and #$0F00
|
||||
ora #$2033
|
||||
ora #$3044
|
||||
sta $A4,S
|
||||
tsc ; Line 13
|
||||
adc #$0140
|
||||
tcs
|
||||
lda $00,S
|
||||
and #$00F0
|
||||
ora #$2103
|
||||
ora #$3204
|
||||
sta $00,S
|
||||
lda $03,S
|
||||
and #$00F0
|
||||
ora #$3102
|
||||
ora #$4203
|
||||
sta $03,S
|
||||
lda $A0,S
|
||||
and #$00F0
|
||||
ora #$2102
|
||||
ora #$3203
|
||||
sta $A0,S
|
||||
lda $A3,S
|
||||
and #$00F0
|
||||
ora #$2102
|
||||
ora #$3203
|
||||
sta $A3,S
|
||||
sep #$20
|
||||
.a8
|
||||
sep #$20
|
||||
lda $05,S
|
||||
and #$0F
|
||||
ora #$20
|
||||
ora #$30
|
||||
sta $05,S
|
||||
rep #$30
|
||||
.a16
|
||||
rep #$30
|
||||
tsc ; Line 15
|
||||
adc #$0140
|
||||
tcs
|
||||
lda $00,S
|
||||
and #$00F0
|
||||
ora #$7207
|
||||
ora #$F30F
|
||||
sta $00,S
|
||||
lda $03,S
|
||||
and #$00F0
|
||||
ora #$7207
|
||||
ora #$F30F
|
||||
sta $03,S
|
||||
;--
|
||||
SLOWGRAPHICS
|
||||
rts
|
||||
*----------
|
||||
ldal $e1C068 ; Direct Page and Stack in Bank 00/
|
||||
and #$ffcf
|
||||
stal $e1c068
|
||||
lda StackAddress ; Restore Stack
|
||||
tcs
|
||||
pld ; Restore Direct Page
|
||||
cli ; Enable Interrupts
|
||||
rtl
|
||||
|
||||
;------------------------------
|
||||
*----------
|
||||
Binary file not shown.
|
|
@ -0,0 +1,15 @@
|
|||
Drawspritebank ASL ; A=Sprite Number ($0000-$0002)
|
||||
TAX ; Y=Target Screen Address ($2000-$9D00)
|
||||
LDA spritebankNum,X ; Relative Sprite Number Table
|
||||
JMP (spritebankBank,X) ; Bank Number Table
|
||||
|
||||
spritebankNum HEX 0000,0200,0100
|
||||
|
||||
spritebankBank DA spritebankBank00,spritebankBank00,spritebankBank00
|
||||
|
||||
spritebankBank00 JSL $AA0000
|
||||
PHK
|
||||
PLB
|
||||
RTS
|
||||
|
||||
*----------
|
||||
|
|
@ -12,9 +12,6 @@
|
|||
700F21DF1F4A364600D7007D /* projectile.s */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.asm; path = projectile.s; sourceTree = "<group>"; };
|
||||
700F21E01F4A3A5500D7007D /* GenerateTrigTables.py */ = {isa = PBXFileReference; lastKnownFileType = text.script.python; path = GenerateTrigTables.py; sourceTree = "<group>"; };
|
||||
700FFAFB1F40F3BF00A442DE /* font.s */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.asm; path = font.s; sourceTree = "<group>"; };
|
||||
70218F1D1F8009B5005A32C6 /* cat.s */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.asm; path = cat.s; sourceTree = "<group>"; };
|
||||
70218F1E1F80127C005A32C6 /* block.s */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.asm; path = block.s; sourceTree = "<group>"; };
|
||||
70218F1F1F801BC4005A32C6 /* block1.s */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.asm; path = block1.s; sourceTree = "<group>"; };
|
||||
7059502B1F37A0BE00BBE90F /* GenerateVRAMTable.py */ = {isa = PBXFileReference; lastKnownFileType = text.script.python; path = GenerateVRAMTable.py; sourceTree = "<group>"; };
|
||||
706DF1641F2D39F700AA6680 /* loader.s */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.asm; path = loader.s; sourceTree = "<group>"; };
|
||||
706DF1651F2D4A8100AA6680 /* terrain.s */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.asm; path = terrain.s; sourceTree = "<group>"; };
|
||||
|
|
@ -25,6 +22,7 @@
|
|||
70A80FB01F43D7F200BD34C9 /* gamemanager.s */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.asm; path = gamemanager.s; sourceTree = "<group>"; };
|
||||
70C073091F5BAA3E009844A9 /* collision.s */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.asm; path = collision.s; sourceTree = "<group>"; };
|
||||
70E266E31F6F262D005AC7E4 /* circleTable.s */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.asm; path = circleTable.s; sourceTree = "<group>"; };
|
||||
70E554C41F807ADB00F3C871 /* spritebank.s */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.asm; path = spritebank.s; sourceTree = "<group>"; };
|
||||
70E9D85F1F2BD95400555C19 /* equates.s */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.asm; path = equates.s; sourceTree = "<group>"; };
|
||||
70E9D8601F2BD95400555C19 /* graphics.s */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.asm; path = graphics.s; sourceTree = "<group>"; };
|
||||
70E9D8611F2BD95400555C19 /* gscats.s */ = {isa = PBXFileReference; lastKnownFileType = sourcecode.asm; path = gscats.s; sourceTree = "<group>"; };
|
||||
|
|
@ -54,10 +52,8 @@
|
|||
700F21DF1F4A364600D7007D /* projectile.s */,
|
||||
70A80FB01F43D7F200BD34C9 /* gamemanager.s */,
|
||||
70E9D8611F2BD95400555C19 /* gscats.s */,
|
||||
70218F1D1F8009B5005A32C6 /* cat.s */,
|
||||
70218F1E1F80127C005A32C6 /* block.s */,
|
||||
70218F1F1F801BC4005A32C6 /* block1.s */,
|
||||
70E9D8631F2BD95400555C19 /* Makefile */,
|
||||
70E554C41F807ADB00F3C871 /* spritebank.s */,
|
||||
7088096D1F2ECE8D00D4C950 /* GenerateRenderSpans.py */,
|
||||
7059502B1F37A0BE00BBE90F /* GenerateVRAMTable.py */,
|
||||
7099E3851F4107B100182A82 /* GenerateVRAMYOffset.py */,
|
||||
|
|
|
|||
15
Makefile
15
Makefile
|
|
@ -24,7 +24,8 @@ $(PGM):
|
|||
@PATH=$(PATH):/usr/local/bin; $(CL65) -t apple2enh --cpu 65816 --start-addr $(ADDR) -l$(PGM).lst $(PGM).s
|
||||
java -jar $(AC) -d $(PGM).2mg $(PGM)
|
||||
java -jar $(AC) -p $(PGM).2mg $(PGM) BIN 0x$(ADDR) < $(PGM)
|
||||
cp $(PGM).2mg ~/Library/Application\ Support/Sweet16/Disk\ Images
|
||||
java -jar $(AC) -d $(PGM).2mg SPRITEBANK00
|
||||
java -jar $(AC) -p $(PGM).2mg SPRITEBANK00 BIN 0x0000 < Art/spritebank00.bin
|
||||
rm -f $(PGM)
|
||||
rm -f $(PGM).o
|
||||
osascript V2Make.scpt $(PROJECT_DIR) $(PGM)
|
||||
|
|
@ -34,7 +35,11 @@ clean:
|
|||
rm -f $(PGM).o
|
||||
rm ~/Library/Application\ Support/Sweet16/Disk\ Images/*
|
||||
|
||||
sprites:
|
||||
$(MRSPRITE) cat.gif $(PALETTE)
|
||||
$(MRSPRITE) block.gif $(PALETTE)
|
||||
$(MRSPRITE) block1.gif $(PALETTE)
|
||||
.PHONY: art
|
||||
art:
|
||||
$(MRSPRITE) "Art/*.gif" $(PALETTE)
|
||||
mv Art/*.s Sprites
|
||||
@PATH=$(PATH):/usr/local/bin; $(CL65) -t apple2enh --cpu 65816 --start-addr $(ADDR) -lspritebank.lst spritebank.s
|
||||
java -jar $(AC) -p $(PGM).2mg spritebank BIN 0x$(ADDR) < spritebank
|
||||
rm -f spritebank
|
||||
rm -f spritebank.o
|
||||
|
|
|
|||
|
|
@ -1,5 +1,5 @@
|
|||
Spr_002:
|
||||
FASTGRAPHICS ; 16x16, 214 bytes, 433 cycles
|
||||
FASTGRAPHICS ; 16x16, 175 bytes, 470 cycles
|
||||
clc
|
||||
tya ; Y = Sprite Target Screen Address (upper left corner)
|
||||
tcs ; New Stack address
|
||||
|
|
@ -1,5 +1,5 @@
|
|||
Spr_001:
|
||||
FASTGRAPHICS ; 16x16, 214 bytes, 433 cycles
|
||||
FASTGRAPHICS ; 16x16, 175 bytes, 470 cycles
|
||||
clc
|
||||
tya ; Y = Sprite Target Screen Address (upper left corner)
|
||||
tcs ; New Stack address
|
||||
|
|
@ -1,5 +1,5 @@
|
|||
Spr_000:
|
||||
FASTGRAPHICS ; 16x16, 484 bytes, 710 cycles
|
||||
FASTGRAPHICS ; 16x16, 445 bytes, 747 cycles
|
||||
clc
|
||||
tya ; Y = Sprite Target Screen Address (upper left corner)
|
||||
tcs ; New Stack address
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
lda
|
||||
.s
|
||||
|
||||
0
|
||||
0
|
||||
|
||||
0
|
||||
0
|
||||
;-----------
|
||||
rts
|
||||
1
|
||||
|
|
@ -23,3 +23,5 @@ SCRATCHL = $19 ; 16-bit version of scratch
|
|||
SCRATCHL2 = $67 ; Second 16-bit scratch
|
||||
PARAM24 = $67 ; 24-bit param (This is almost certainly messing up AppleSoft, but meh)
|
||||
STACKPTR = $70 ; Cache for stack pointer in fast graphics
|
||||
SHADOWREGISTER = $72 ; Cache for shadow register in fast graphics
|
||||
STACKREGISTER = $73 ; Cache for stack register in fast graphics
|
||||
|
|
|
|||
|
|
@ -376,7 +376,8 @@ renderGameobjectBackground:
|
|||
|
||||
; Draw sprite
|
||||
ply
|
||||
jsr compiledSprite
|
||||
lda #compiledSprite
|
||||
jsr drawSprite
|
||||
|
||||
renderGameobjectDone:
|
||||
RESTORE_AXY
|
||||
|
|
|
|||
233
graphics.s
233
graphics.s
|
|
@ -155,6 +155,16 @@ drawNumber:
|
|||
rts
|
||||
|
||||
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
; drawSprite
|
||||
;
|
||||
; A = Sprite to render
|
||||
; X = VRAM position to render at
|
||||
;
|
||||
;
|
||||
drawSprite:
|
||||
rts
|
||||
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
; Vertical blank checkers
|
||||
;
|
||||
|
|
@ -206,225 +216,4 @@ waitVBLToStart:
|
|||
BITS16
|
||||
rts
|
||||
|
||||
.if 0
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
; TEST OF MR. SPRITE
|
||||
;
|
||||
Spr_000:
|
||||
FASTGRAPHICS ; 16x16, 464 bytes, 722 cycles
|
||||
clc
|
||||
tya ; Y = Sprite Target Screen Address (upper left corner)
|
||||
tcs ; New Stack address
|
||||
ldx #$1111 ; Pattern #1 : 14
|
||||
ldy #$4444 ; Pattern #2 : 12
|
||||
lda #$3333 ; Pattern #3 : 6
|
||||
tcd
|
||||
;--
|
||||
sep #$20
|
||||
.a8
|
||||
lda $A0,S
|
||||
and #$0F
|
||||
ora #$10
|
||||
sta $A0,S
|
||||
lda $A7,S
|
||||
and #$F0
|
||||
ora #$01
|
||||
sta $A7,S
|
||||
rep #$30
|
||||
.a16
|
||||
tsc
|
||||
adc #$0007
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
tsc ; Line 2
|
||||
adc #$0141
|
||||
tcs
|
||||
lda $00,S
|
||||
and #$000F
|
||||
ora #$3310
|
||||
sta $00,S
|
||||
lda $06,S
|
||||
and #$F000
|
||||
ora #$0133
|
||||
sta $06,S
|
||||
lda $A0,S
|
||||
and #$0F0F
|
||||
ora #$3010
|
||||
sta $A0,S
|
||||
lda $A6,S
|
||||
and #$F0F0
|
||||
ora #$0103
|
||||
sta $A6,S
|
||||
tsc
|
||||
adc #$0005
|
||||
tcs
|
||||
phd
|
||||
phd
|
||||
tsc ; Line 4
|
||||
adc #$013F
|
||||
tcs
|
||||
lda $00,S
|
||||
and #$000F
|
||||
ora #$3410
|
||||
sta $00,S
|
||||
lda $06,S
|
||||
and #$F000
|
||||
ora #$0143
|
||||
sta $06,S
|
||||
lda $A0,S
|
||||
and #$000F
|
||||
ora #$3410
|
||||
sta $A0,S
|
||||
lda $A6,S
|
||||
and #$F000
|
||||
ora #$0143
|
||||
sta $A6,S
|
||||
tsc
|
||||
adc #$0005
|
||||
tcs
|
||||
phy
|
||||
phy
|
||||
tsc ; Line 5
|
||||
adc #$00A4
|
||||
tcs
|
||||
lda $9B,S
|
||||
and #$0F0F
|
||||
ora #$3010
|
||||
sta $9B,S
|
||||
lda $A1,S
|
||||
and #$F0F0
|
||||
ora #$0103
|
||||
sta $A1,S
|
||||
phy
|
||||
phy
|
||||
tsc ; Line 7
|
||||
adc #$013F
|
||||
tcs
|
||||
lda $00,S
|
||||
and #$000F
|
||||
ora #$3310
|
||||
sta $00,S
|
||||
lda $06,S
|
||||
and #$F000
|
||||
ora #$0133
|
||||
sta $06,S
|
||||
lda $A0,S
|
||||
and #$000F
|
||||
ora #$2210
|
||||
sta $A0,S
|
||||
lda $A6,S
|
||||
and #$F000
|
||||
ora #$0122
|
||||
sta $A6,S
|
||||
tsc
|
||||
adc #$0005
|
||||
tcs
|
||||
phd
|
||||
phd
|
||||
tsc ; Line 8
|
||||
adc #$00A4
|
||||
tcs
|
||||
lda $9B,S
|
||||
and #$0F0F
|
||||
ora #$2010
|
||||
sta $9B,S
|
||||
lda $A1,S
|
||||
and #$F0F0
|
||||
ora #$0102
|
||||
sta $A1,S
|
||||
pea $2222
|
||||
pea $2222
|
||||
tsc ; Line 10
|
||||
adc #$013F
|
||||
tcs
|
||||
lda $00,S
|
||||
and #$000F
|
||||
ora #$2410
|
||||
sta $00,S
|
||||
lda $06,S
|
||||
and #$F000
|
||||
ora #$0142
|
||||
sta $06,S
|
||||
lda $A0,S
|
||||
and #$000F
|
||||
ora #$2410
|
||||
sta $A0,S
|
||||
lda $A6,S
|
||||
and #$F000
|
||||
ora #$0142
|
||||
sta $A6,S
|
||||
tsc
|
||||
adc #$0005
|
||||
tcs
|
||||
phy
|
||||
phy
|
||||
tsc ; Line 11
|
||||
adc #$00A4
|
||||
tcs
|
||||
lda $9B,S
|
||||
and #$0F0F
|
||||
ora #$2010
|
||||
sta $9B,S
|
||||
lda $A1,S
|
||||
and #$F0F0
|
||||
ora #$0102
|
||||
sta $A1,S
|
||||
phy
|
||||
phy
|
||||
tsc ; Line 13
|
||||
adc #$013F
|
||||
tcs
|
||||
lda $00,S
|
||||
and #$000F
|
||||
ora #$2210
|
||||
sta $00,S
|
||||
lda $06,S
|
||||
and #$F000
|
||||
ora #$0122
|
||||
sta $06,S
|
||||
sep #$20
|
||||
.a8
|
||||
lda $A0,S
|
||||
and #$0F
|
||||
ora #$10
|
||||
sta $A0,S
|
||||
lda $A7,S
|
||||
and #$F0
|
||||
ora #$01
|
||||
sta $A7,S
|
||||
rep #$30
|
||||
.a16
|
||||
tsc
|
||||
adc #$0005
|
||||
tcs
|
||||
pea $2222
|
||||
pea $2222
|
||||
tsc ; Line 15
|
||||
adc #$0146
|
||||
tcs
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
phx
|
||||
;--
|
||||
SLOWGRAPHICS
|
||||
rts
|
||||
|
||||
;------------------------------
|
||||
.endif
|
||||
|
||||
|
||||
; caches
|
||||
shadowRegister:
|
||||
.byte 0
|
||||
stackRegister:
|
||||
.byte 0
|
||||
stackPtr:
|
||||
.word 0
|
||||
|
||||
.include "cat.s"
|
||||
.include "block.s"
|
||||
.include "block1.s"
|
||||
.include "spritebank.s"
|
||||
|
|
|
|||
BIN
gscats.2mg
BIN
gscats.2mg
Binary file not shown.
16
macros.s
16
macros.s
|
|
@ -69,42 +69,42 @@
|
|||
.endmacro
|
||||
|
||||
|
||||
.macro FASTGRAPHICS ;51 cycles, 12 bytes
|
||||
.macro FASTGRAPHICS ;50 cycles, 12 bytes
|
||||
sei ;2
|
||||
phd ;4
|
||||
sep #%00100000 ; 3 16-bit A only, to preserve X/Y
|
||||
.a8
|
||||
|
||||
lda SHADOW ;5
|
||||
sta shadowRegister ;4
|
||||
sta SHADOWREGISTER ;4
|
||||
lda #0 ;2
|
||||
sta SHADOW ;5
|
||||
|
||||
lda STACKCTL ;5
|
||||
sta stackRegister ;4
|
||||
sta STACKREGISTER ;4
|
||||
ora #$30 ;2
|
||||
sta STACKCTL ;5
|
||||
|
||||
rep #%00100000 ;3
|
||||
.a16
|
||||
tsc ;2
|
||||
sta stackPtr ;5
|
||||
sta STACKPTR ;4
|
||||
.endmacro
|
||||
|
||||
|
||||
.macro SLOWGRAPHICS ;38 cycles, 12 bytes
|
||||
.macro SLOWGRAPHICS ;37 cycles, 12 bytes
|
||||
sep #%00100000 ; 3 16-bit A only, to preserve X/Y
|
||||
.a8
|
||||
|
||||
lda shadowRegister ;4
|
||||
lda SHADOWREGISTER ;4
|
||||
sta SHADOW ;5
|
||||
|
||||
lda stackRegister ;4
|
||||
lda STACKREGISTER ;4
|
||||
sta STACKCTL ;5
|
||||
|
||||
rep #%00100000 ;3
|
||||
.a16
|
||||
lda stackPtr ;5
|
||||
lda STACKPTR ;4
|
||||
tcs ;2
|
||||
pld ;5
|
||||
cli ;2
|
||||
|
|
|
|||
4
player.s
4
player.s
|
|
@ -200,8 +200,8 @@ playerIntersectRect:
|
|||
;
|
||||
;
|
||||
renderPlayers:
|
||||
RENDER_GAMEOBJECT playerData,Spr_000
|
||||
RENDER_GAMEOBJECT playerData+PD_SIZE,Spr_000
|
||||
RENDER_GAMEOBJECT playerData,0
|
||||
RENDER_GAMEOBJECT playerData+PD_SIZE,0
|
||||
rts
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -326,7 +326,7 @@ renderProjectiles:
|
|||
jmp renderProjectilesDone
|
||||
|
||||
renderProjectilesDoIt:
|
||||
RENDER_GAMEOBJECT projectileData,Spr_001
|
||||
RENDER_GAMEOBJECT projectileData,1
|
||||
|
||||
renderProjectilesDone:
|
||||
pla
|
||||
|
|
|
|||
|
|
@ -0,0 +1,17 @@
|
|||
DrawSpriteBank:
|
||||
ASL ; A=Sprite Number ($0000-$0002)
|
||||
TAX ; Y=Target Screen Address ($2000-$9D00)
|
||||
LDA spritebankNum,X ; Relative Sprite Number Table
|
||||
JMP (spritebankBank,X) ; Bank Number Table
|
||||
|
||||
spritebankNum:
|
||||
.word $0000,$0200,$0100
|
||||
|
||||
spritebankBank:
|
||||
.addr spritebankBank00,spritebankBank00,spritebankBank00
|
||||
|
||||
spritebankBank00:
|
||||
JSL $AA0000
|
||||
PHK
|
||||
PLB
|
||||
RTS
|
||||
|
|
@ -0,0 +1,17 @@
|
|||
.include "macros.s"
|
||||
.include "equates.s"
|
||||
|
||||
.org $800
|
||||
|
||||
NATIVE
|
||||
|
||||
.include "Sprites/cat_000.s"
|
||||
|
||||
|
||||
; Suppress some linker warnings - Must be the last thing in the file
|
||||
; This is because Quinn doesn't really know how to use ca65 properly
|
||||
.SEGMENT "ZPSAVE"
|
||||
.SEGMENT "EXEHDR"
|
||||
.SEGMENT "STARTUP"
|
||||
.SEGMENT "INIT"
|
||||
.SEGMENT "LOWCODE"
|
||||
|
|
@ -0,0 +1,481 @@
|
|||
ca65 V2.13.3 - (C) Copyright 1998-2012 Ullrich von Bassewitz
|
||||
Main file : sprites.s
|
||||
Current file: sprites.s
|
||||
|
||||
000000r 1 .include "macros.s"
|
||||
000000r 2 .macro OP8
|
||||
000000r 2 .i8
|
||||
000000r 2 .a8
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro OP16
|
||||
000000r 2 .i16
|
||||
000000r 2 .a16
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro BITS8
|
||||
000000r 2 sep #%00110000
|
||||
000000r 2 OP8
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro BITS16
|
||||
000000r 2 rep #%00110000
|
||||
000000r 2 OP16
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro DBR bankNum
|
||||
000000r 2 BITS8
|
||||
000000r 2 lda bankNum
|
||||
000000r 2 pha
|
||||
000000r 2 plb
|
||||
000000r 2 BITS16
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro SYNCDBR
|
||||
000000r 2 phk
|
||||
000000r 2 plb
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro EMULATION
|
||||
000000r 2 sec ; Enable 8-bit mode
|
||||
000000r 2 xce
|
||||
000000r 2 OP8
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro NATIVE
|
||||
000000r 2 clc ; Enable 16-bit mode
|
||||
000000r 2 xce
|
||||
000000r 2 BITS16
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro SHRVIDEO
|
||||
000000r 2 BITS8
|
||||
000000r 2 lda NEWVIDEO
|
||||
000000r 2 ora #%11000001
|
||||
000000r 2 sta NEWVIDEO
|
||||
000000r 2 BITS16
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro CLASSICVIDEO
|
||||
000000r 2 BITS8
|
||||
000000r 2 lda NEWVIDEO
|
||||
000000r 2 and #%00111111
|
||||
000000r 2 sta NEWVIDEO
|
||||
000000r 2 BITS16
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro FASTGRAPHICS ;50 cycles, 12 bytes
|
||||
000000r 2 sei ;2
|
||||
000000r 2 phd ;4
|
||||
000000r 2 sep #%00100000 ; 3 16-bit A only, to preserve X/Y
|
||||
000000r 2 .a8
|
||||
000000r 2
|
||||
000000r 2 lda SHADOW ;5
|
||||
000000r 2 sta SHADOWREGISTER ;4
|
||||
000000r 2 lda #0 ;2
|
||||
000000r 2 sta SHADOW ;5
|
||||
000000r 2
|
||||
000000r 2 lda STACKCTL ;5
|
||||
000000r 2 sta STACKREGISTER ;4
|
||||
000000r 2 ora #$30 ;2
|
||||
000000r 2 sta STACKCTL ;5
|
||||
000000r 2
|
||||
000000r 2 rep #%00100000 ;3
|
||||
000000r 2 .a16
|
||||
000000r 2 tsc ;2
|
||||
000000r 2 sta STACKPTR ;4
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro SLOWGRAPHICS ;37 cycles, 12 bytes
|
||||
000000r 2 sep #%00100000 ; 3 16-bit A only, to preserve X/Y
|
||||
000000r 2 .a8
|
||||
000000r 2
|
||||
000000r 2 lda SHADOWREGISTER ;4
|
||||
000000r 2 sta SHADOW ;5
|
||||
000000r 2
|
||||
000000r 2 lda STACKREGISTER ;4
|
||||
000000r 2 sta STACKCTL ;5
|
||||
000000r 2
|
||||
000000r 2 rep #%00100000 ;3
|
||||
000000r 2 .a16
|
||||
000000r 2 lda STACKPTR ;4
|
||||
000000r 2 tcs ;2
|
||||
000000r 2 pld ;5
|
||||
000000r 2 cli ;2
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro LOADPARAM24 bankNumDoubled,addr16
|
||||
000000r 2 lda #bankNumDoubled
|
||||
000000r 2 sta PARAM24+1
|
||||
000000r 2 lda #addr16
|
||||
000000r 2 sta PARAM24
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro pstring Arg
|
||||
000000r 2 .byte .strlen(Arg), Arg
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro qbyte Arg
|
||||
000000r 2 .dbyt Arg>>16,Arg&$0000ffff
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2 .macro BREAK
|
||||
000000r 2 pha
|
||||
000000r 2 lda breakpoint
|
||||
000000r 2 beq nobrk
|
||||
000000r 2 lda #1
|
||||
000000r 2 sta $e1c029
|
||||
000000r 2 pla
|
||||
000000r 2 brk
|
||||
000000r 2 nobrk:
|
||||
000000r 2 pla
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2 ;;;;;;;;;;
|
||||
000000r 2 ; Stack Macros
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro SAVE_AXY ; Saves all registers
|
||||
000000r 2 pha
|
||||
000000r 2 phx
|
||||
000000r 2 phy
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro RESTORE_AXY ; Restores all registers
|
||||
000000r 2 ply
|
||||
000000r 2 plx
|
||||
000000r 2 pla
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro SAVE_AY ; Saves accumulator and Y index
|
||||
000000r 2 pha
|
||||
000000r 2 phy
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro RESTORE_AY ; Restores accumulator and Y index
|
||||
000000r 2 ply
|
||||
000000r 2 pla
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro SAVE_AX ; Saves accumulator and X index
|
||||
000000r 2 pha
|
||||
000000r 2 phx
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro RESTORE_AX ; Restores accumulator and X index
|
||||
000000r 2 plx
|
||||
000000r 2 pla
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro SAVE_XY ; Saves X and Y index
|
||||
000000r 2 phx
|
||||
000000r 2 phy
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro RESTORE_XY ; Restores X and Y index
|
||||
000000r 2 ply
|
||||
000000r 2 plx
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro SAVE_P0 ; Saves PARAML0
|
||||
000000r 2 lda PARAML0
|
||||
000000r 2 pha
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 2
|
||||
000000r 2 .macro RESTORE_P0 ; Restores PARAML0
|
||||
000000r 2 pla
|
||||
000000r 2 sta PARAML0
|
||||
000000r 2 .endmacro
|
||||
000000r 2
|
||||
000000r 1 .include "equates.s"
|
||||
000000r 2 TEXTCOLOR = $e0c022
|
||||
000000r 2 NEWVIDEO = $e0c029
|
||||
000000r 2 BORDERCOLOR = $e0c034
|
||||
000000r 2 CLOCKCTL = $e0c034
|
||||
000000r 2 SHADOW = $e0c035
|
||||
000000r 2 STACKCTL = $e0c068
|
||||
000000r 2 KBD = $e0c000
|
||||
000000r 2 KBDSTROBE = $e0c010
|
||||
000000r 2 COUT = $fded
|
||||
000000r 2 VRAM = $e12000
|
||||
000000r 2 VRAMBANK = $e10000
|
||||
000000r 2
|
||||
000000r 2 ; Zero page locations we use (unused by Monitor, Applesoft, or ProDOS)
|
||||
000000r 2 PARAM0 = $06
|
||||
000000r 2 PARAM1 = $07
|
||||
000000r 2 PARAM2 = $08
|
||||
000000r 2 PARAM3 = $09
|
||||
000000r 2 PARAML0 = $06 ; 16-bit versions of params
|
||||
000000r 2 PARAML1 = $08
|
||||
000000r 2 SCRATCH0 = $19
|
||||
000000r 2 SCRATCH1 = $1a
|
||||
000000r 2 SCRATCHL = $19 ; 16-bit version of scratch
|
||||
000000r 2 SCRATCHL2 = $67 ; Second 16-bit scratch
|
||||
000000r 2 PARAM24 = $67 ; 24-bit param (This is almost certainly messing up AppleSoft, but meh)
|
||||
000000r 2 STACKPTR = $70 ; Cache for stack pointer in fast graphics
|
||||
000000r 2 SHADOWREGISTER = $72 ; Cache for shadow register in fast graphics
|
||||
000000r 2 STACKREGISTER = $73 ; Cache for stack register in fast graphics
|
||||
000000r 2
|
||||
000000r 1
|
||||
000000r 1 .org $800
|
||||
000800 1
|
||||
000800 1 18 FB C2 30 NATIVE
|
||||
000804 1
|
||||
000804 1 .include "Sprites/cat_000.s"
|
||||
000804 2 Spr_000:
|
||||
000804 2 78 0B E2 20 FASTGRAPHICS ; 16x16, 445 bytes, 747 cycles
|
||||
000808 2 AF 35 C0 E0
|
||||
00080C 2 85 72 A9 00
|
||||
000825 2 18 clc
|
||||
000826 2 98 tya ; Y = Sprite Target Screen Address (upper left corner)
|
||||
000827 2 1B tcs ; New Stack address
|
||||
000828 2 A2 44 44 ldx #$4444 ; Pattern #1 : 4
|
||||
00082B 2 A0 44 04 ldy #$0444 ; Pattern #2 : 2
|
||||
00082E 2 A9 04 40 lda #$4004 ; Pattern #3 : 2
|
||||
000831 2 5B tcd
|
||||
000832 2 ;--
|
||||
000832 2 A9 33 26 lda #$2633 ; Line 0
|
||||
000835 2 83 A5 sta $A5,S
|
||||
000837 2 A3 A3 lda $A3,S
|
||||
000839 2 29 00 F0 and #$F000
|
||||
00083C 2 09 26 02 ora #$0226
|
||||
00083F 2 83 A3 sta $A3,S
|
||||
000841 2 E2 20 sep #$20
|
||||
000843 2 .a8
|
||||
000843 2 A3 03 lda $03,S
|
||||
000845 2 29 F0 and #$F0
|
||||
000847 2 09 03 ora #$03
|
||||
000849 2 83 03 sta $03,S
|
||||
00084B 2 A3 06 lda $06,S
|
||||
00084D 2 29 F0 and #$F0
|
||||
00084F 2 09 03 ora #$03
|
||||
000851 2 83 06 sta $06,S
|
||||
000853 2 A3 A7 lda $A7,S
|
||||
000855 2 29 0F and #$0F
|
||||
000857 2 09 20 ora #$20
|
||||
000859 2 83 A7 sta $A7,S
|
||||
00085B 2 C2 30 rep #$30
|
||||
00085D 2 .a16
|
||||
00085D 2 3B tsc ; Line 2
|
||||
00085E 2 69 40 01 adc #$0140
|
||||
000861 2 1B tcs
|
||||
000862 2 E2 20 sep #$20
|
||||
000864 2 .a8
|
||||
000864 2 A9 FF lda #$FF
|
||||
000866 2 83 00 sta $00,S
|
||||
000868 2 83 A0 sta $A0,S
|
||||
00086A 2 A3 07 lda $07,S
|
||||
00086C 2 29 0F and #$0F
|
||||
00086E 2 09 20 ora #$20
|
||||
000870 2 83 07 sta $07,S
|
||||
000872 2 A3 A7 lda $A7,S
|
||||
000874 2 29 0F and #$0F
|
||||
000876 2 09 20 ora #$20
|
||||
000878 2 83 A7 sta $A7,S
|
||||
00087A 2 C2 30 rep #$30
|
||||
00087C 2 .a16
|
||||
00087C 2 3B tsc
|
||||
00087D 2 69 06 00 adc #$0006
|
||||
000880 2 1B tcs
|
||||
000881 2 F4 33 35 pea $3533
|
||||
000884 2 F4 25 24 pea $2425
|
||||
000887 2 3B tsc ; Line 3
|
||||
000888 2 69 A4 00 adc #$00A4
|
||||
00088B 2 1B tcs
|
||||
00088C 2 E2 20 sep #$20
|
||||
00088E 2 .a8
|
||||
00088E 2 A9 23 lda #$23
|
||||
000890 2 83 9A sta $9A,S
|
||||
000892 2 A3 A1 lda $A1,S
|
||||
000894 2 29 0F and #$0F
|
||||
000896 2 09 30 ora #$30
|
||||
000898 2 83 A1 sta $A1,S
|
||||
00089A 2 C2 30 rep #$30
|
||||
00089C 2 .a16
|
||||
00089C 2 F4 34 34 pea $3434
|
||||
00089F 2 F4 23 44 pea $4423
|
||||
0008A2 2 3B tsc ; Line 4
|
||||
0008A3 2 69 A4 00 adc #$00A4
|
||||
0008A6 2 1B tcs
|
||||
0008A7 2 A3 9C lda $9C,S
|
||||
0008A9 2 29 F0 00 and #$00F0
|
||||
0008AC 2 09 03 23 ora #$2303
|
||||
0008AF 2 83 9C sta $9C,S
|
||||
0008B1 2 E2 20 sep #$20
|
||||
0008B3 2 .a8
|
||||
0008B3 2 A9 24 lda #$24
|
||||
0008B5 2 83 9A sta $9A,S
|
||||
0008B7 2 C2 30 rep #$30
|
||||
0008B9 2 .a16
|
||||
0008B9 2 DA phx
|
||||
0008BA 2 F4 34 44 pea $4434
|
||||
0008BD 2 3B tsc ; Line 5
|
||||
0008BE 2 69 A5 00 adc #$00A5
|
||||
0008C1 2 1B tcs
|
||||
0008C2 2 E2 20 sep #$20
|
||||
0008C4 2 .a8
|
||||
0008C4 2 A9 24 lda #$24
|
||||
0008C6 2 83 99 sta $99,S
|
||||
0008C8 2 A3 A0 lda $A0,S
|
||||
0008CA 2 29 0F and #$0F
|
||||
0008CC 2 09 30 ora #$30
|
||||
0008CE 2 83 A0 sta $A0,S
|
||||
0008D0 2 C2 30 rep #$30
|
||||
0008D2 2 .a16
|
||||
0008D2 2 F4 40 23 pea $2340
|
||||
0008D5 2 5A phy
|
||||
0008D6 2 3B tsc ; Line 6
|
||||
0008D7 2 69 A3 00 adc #$00A3
|
||||
0008DA 2 1B tcs
|
||||
0008DB 2 0B phd
|
||||
0008DC 2 F4 33 44 pea $4433
|
||||
0008DF 2 3B tsc ; Line 7
|
||||
0008E0 2 69 A5 00 adc #$00A5
|
||||
0008E3 2 1B tcs
|
||||
0008E4 2 E2 20 sep #$20
|
||||
0008E6 2 .a8
|
||||
0008E6 2 A3 99 lda $99,S
|
||||
0008E8 2 29 F0 and #$F0
|
||||
0008EA 2 09 03 ora #$03
|
||||
0008EC 2 83 99 sta $99,S
|
||||
0008EE 2 C2 30 rep #$30
|
||||
0008F0 2 .a16
|
||||
0008F0 2 F4 6F 23 pea $236F
|
||||
0008F3 2 F4 4F F6 pea $F64F
|
||||
0008F6 2 F4 33 22 pea $2233
|
||||
0008F9 2 F4 24 33 pea $3324
|
||||
0008FC 2 3B tsc ; Line 8
|
||||
0008FD 2 69 A7 00 adc #$00A7
|
||||
000900 2 1B tcs
|
||||
000901 2 A3 9F lda $9F,S
|
||||
000903 2 29 00 0F and #$0F00
|
||||
000906 2 09 22 30 ora #$3022
|
||||
000909 2 83 9F sta $9F,S
|
||||
00090B 2 E2 20 sep #$20
|
||||
00090D 2 .a8
|
||||
00090D 2 A3 9A lda $9A,S
|
||||
00090F 2 29 F0 and #$F0
|
||||
000911 2 09 03 ora #$03
|
||||
000913 2 83 9A sta $9A,S
|
||||
000915 2 C2 30 rep #$30
|
||||
000917 2 .a16
|
||||
000917 2 F4 FF F2 pea $F2FF
|
||||
00091A 2 F4 33 23 pea $2333
|
||||
00091D 2 F4 44 34 pea $3444
|
||||
000920 2 3B tsc ; Line 9
|
||||
000921 2 69 A4 00 adc #$00A4
|
||||
000924 2 1B tcs
|
||||
000925 2 8A txa
|
||||
000926 2 83 9E sta $9E,S
|
||||
000928 2 A3 9C lda $9C,S
|
||||
00092A 2 29 F0 00 and #$00F0
|
||||
00092D 2 09 03 44 ora #$4403
|
||||
000930 2 83 9C sta $9C,S
|
||||
000932 2 A3 A0 lda $A0,S
|
||||
000934 2 29 00 0F and #$0F00
|
||||
000937 2 09 3F F0 ora #$F03F
|
||||
00093A 2 83 A0 sta $A0,S
|
||||
00093C 2 F4 43 FF pea $FF43
|
||||
00093F 2 DA phx
|
||||
000940 2 3B tsc ; Line 11
|
||||
000941 2 69 40 01 adc #$0140
|
||||
000944 2 1B tcs
|
||||
000945 2 A9 34 44 lda #$4434
|
||||
000948 2 83 02 sta $02,S
|
||||
00094A 2 A9 22 23 lda #$2322
|
||||
00094D 2 83 A2 sta $A2,S
|
||||
00094F 2 A3 00 lda $00,S
|
||||
000951 2 29 F0 00 and #$00F0
|
||||
000954 2 09 03 44 ora #$4403
|
||||
000957 2 83 00 sta $00,S
|
||||
000959 2 A3 04 lda $04,S
|
||||
00095B 2 29 00 0F and #$0F00
|
||||
00095E 2 09 43 F0 ora #$F043
|
||||
000961 2 83 04 sta $04,S
|
||||
000963 2 A3 A0 lda $A0,S
|
||||
000965 2 29 F0 00 and #$00F0
|
||||
000968 2 09 03 43 ora #$4303
|
||||
00096B 2 83 A0 sta $A0,S
|
||||
00096D 2 A3 A4 lda $A4,S
|
||||
00096F 2 29 00 0F and #$0F00
|
||||
000972 2 09 44 30 ora #$3044
|
||||
000975 2 83 A4 sta $A4,S
|
||||
000977 2 3B tsc ; Line 13
|
||||
000978 2 69 40 01 adc #$0140
|
||||
00097B 2 1B tcs
|
||||
00097C 2 A3 00 lda $00,S
|
||||
00097E 2 29 F0 00 and #$00F0
|
||||
000981 2 09 04 32 ora #$3204
|
||||
000984 2 83 00 sta $00,S
|
||||
000986 2 A3 03 lda $03,S
|
||||
000988 2 29 F0 00 and #$00F0
|
||||
00098B 2 09 03 42 ora #$4203
|
||||
00098E 2 83 03 sta $03,S
|
||||
000990 2 A3 A0 lda $A0,S
|
||||
000992 2 29 F0 00 and #$00F0
|
||||
000995 2 09 03 32 ora #$3203
|
||||
000998 2 83 A0 sta $A0,S
|
||||
00099A 2 A3 A3 lda $A3,S
|
||||
00099C 2 29 F0 00 and #$00F0
|
||||
00099F 2 09 03 32 ora #$3203
|
||||
0009A2 2 83 A3 sta $A3,S
|
||||
0009A4 2 E2 20 sep #$20
|
||||
0009A6 2 .a8
|
||||
0009A6 2 A3 05 lda $05,S
|
||||
0009A8 2 29 0F and #$0F
|
||||
0009AA 2 09 30 ora #$30
|
||||
0009AC 2 83 05 sta $05,S
|
||||
0009AE 2 C2 30 rep #$30
|
||||
0009B0 2 .a16
|
||||
0009B0 2 3B tsc ; Line 15
|
||||
0009B1 2 69 40 01 adc #$0140
|
||||
0009B4 2 1B tcs
|
||||
0009B5 2 A3 00 lda $00,S
|
||||
0009B7 2 29 F0 00 and #$00F0
|
||||
0009BA 2 09 0F F3 ora #$F30F
|
||||
0009BD 2 83 00 sta $00,S
|
||||
0009BF 2 A3 03 lda $03,S
|
||||
0009C1 2 29 F0 00 and #$00F0
|
||||
0009C4 2 09 0F F3 ora #$F30F
|
||||
0009C7 2 83 03 sta $03,S
|
||||
0009C9 2 ;--
|
||||
0009C9 2 E2 20 A5 72 SLOWGRAPHICS
|
||||
0009CD 2 8F 35 C0 E0
|
||||
0009D1 2 A5 73 8F 68
|
||||
0009DE 2 60 rts
|
||||
0009DF 2
|
||||
0009DF 2 ;------------------------------
|
||||
0009DF 2
|
||||
0009DF 1
|
||||
0009DF 1
|
||||
0009DF 1 ; Suppress some linker warnings - Must be the last thing in the file
|
||||
0009DF 1 ; This is because Quinn doesn't really know how to use ca65 properly
|
||||
0009DF 1 .SEGMENT "ZPSAVE"
|
||||
0009DF 1 .SEGMENT "EXEHDR"
|
||||
0009DF 1 .SEGMENT "STARTUP"
|
||||
0009DF 1 .SEGMENT "INIT"
|
||||
0009DF 1 .SEGMENT "LOWCODE"
|
||||
0009DF 1
|
||||
Loading…
Reference in New Issue