mirror of
https://github.com/a2-4am/4cade.git
synced 2024-09-28 18:55:36 +00:00
convert Stellar 7 demo, save 21kb
This commit is contained in:
parent
d8bb95389f
commit
1aaa18d2af
Binary file not shown.
Binary file not shown.
@ -88,8 +88,7 @@ SPY.HUNTER=Type(06),AuxType(0200),Access(C3)
|
|||||||
SD=Type(06),AuxType(3FF1),Access(C3)
|
SD=Type(06),AuxType(3FF1),Access(C3)
|
||||||
STAR.BLAZER=Type(06),AuxType(0300),Access(C3)
|
STAR.BLAZER=Type(06),AuxType(0300),Access(C3)
|
||||||
STARGATE=Type(06),AuxType(0200),Access(C3)
|
STARGATE=Type(06),AuxType(0200),Access(C3)
|
||||||
STELLAR.7=Type(06),AuxType(0300),Access(C3)
|
STELLAR.7=Type(06),AuxType(0200),Access(C3)
|
||||||
STELLAR.7.1=Type(F1),AuxType(0000),Access(C3)
|
|
||||||
THUNDER.BOMBS=Type(06),AuxType(B000),Access(C3)
|
THUNDER.BOMBS=Type(06),AuxType(B000),Access(C3)
|
||||||
TB=Type(06),AuxType(0300),Access(C3)
|
TB=Type(06),AuxType(0300),Access(C3)
|
||||||
TUNNEL.TERROR=Type(06),AuxType(BD00),Access(C3)
|
TUNNEL.TERROR=Type(06),AuxType(BD00),Access(C3)
|
||||||
|
71
src/demo/stellar.7.a
Normal file
71
src/demo/stellar.7.a
Normal file
@ -0,0 +1,71 @@
|
|||||||
|
;license:MIT
|
||||||
|
;(c) 2022 by qkumba
|
||||||
|
|
||||||
|
!cpu 6502
|
||||||
|
!to "res/DEMO/STELLAR.7",plain
|
||||||
|
*=$200
|
||||||
|
|
||||||
|
!source "src/constants.a" ; no code in these
|
||||||
|
!source "src/macros.a"
|
||||||
|
|
||||||
|
+USES_TEXT_PAGE_2
|
||||||
|
+READ_RAM2_WRITE_RAM2
|
||||||
|
jsr EnableAccelerator
|
||||||
|
+LOAD_FILE_KEEP_DIR stellar_7, stellar_7_dir_e-stellar_7_dir_b
|
||||||
|
|
||||||
|
lda #$60
|
||||||
|
sta $863
|
||||||
|
jsr $800 ; unpack
|
||||||
|
|
||||||
|
lda #0
|
||||||
|
sta $AE2A
|
||||||
|
lda #1
|
||||||
|
sta $AE2C
|
||||||
|
lda #$A4
|
||||||
|
sta $AE28 ; reset vector patch
|
||||||
|
|
||||||
|
lda #<callback1
|
||||||
|
sta $AE71
|
||||||
|
lda #>callback1
|
||||||
|
sta $AE72
|
||||||
|
|
||||||
|
+DISABLE_ACCEL
|
||||||
|
jmp $AE27
|
||||||
|
|
||||||
|
callback1
|
||||||
|
jsr $AF60
|
||||||
|
lda #<callback2
|
||||||
|
sta $A572
|
||||||
|
lda #>callback2
|
||||||
|
sta $A573
|
||||||
|
lda #$4C
|
||||||
|
sta $A484
|
||||||
|
ldx #0
|
||||||
|
stx $A485
|
||||||
|
inx
|
||||||
|
stx $A486
|
||||||
|
rts
|
||||||
|
|
||||||
|
callback2
|
||||||
|
lda #7
|
||||||
|
sta $8539
|
||||||
|
lda #$4C
|
||||||
|
sta $8541
|
||||||
|
sta $84C3
|
||||||
|
ldx #0
|
||||||
|
stx $8542
|
||||||
|
stx $84C4
|
||||||
|
inx
|
||||||
|
stx $8543
|
||||||
|
stx $84C5
|
||||||
|
jmp $8400
|
||||||
|
|
||||||
|
stellar_7
|
||||||
|
!byte stellar_7_e-stellar_7_b
|
||||||
|
stellar_7_b
|
||||||
|
stellar_7_dir_b
|
||||||
|
!text "X/STELLAR.7"
|
||||||
|
stellar_7_dir_e
|
||||||
|
!text "/"
|
||||||
|
!text "STELLAR.7"
|
||||||
|
stellar_7_e
|
Loading…
Reference in New Issue
Block a user