runtime-demo Choplifter

This commit is contained in:
Peter Ferrie 2021-10-02 18:20:30 -07:00
parent 8f5aef20a9
commit cdb23a433c
4 changed files with 36 additions and 1 deletions

Binary file not shown.

Binary file not shown.

View File

@ -35,7 +35,6 @@ CL=Type(06),AuxType(0800),Access(C3)
CHAMP.LODERUN.1=Type(F1),AuxType(0000),Access(C3) CHAMP.LODERUN.1=Type(F1),AuxType(0000),Access(C3)
CHAMP.LODERUN.Z=Type(F1),AuxType(0000),Access(C3) CHAMP.LODERUN.Z=Type(F1),AuxType(0000),Access(C3)
CHOPLIFTER=Type(06),AuxType(0300),Access(C3) CHOPLIFTER=Type(06),AuxType(0300),Access(C3)
CHOPLIFTER.1=Type(F1),AuxType(0000),Access(C3)
AC=Type(06),AuxType(0300),Access(C3) AC=Type(06),AuxType(0300),Access(C3)
CIDER.SPIDER.0=Type(F1),AuxType(0000),Access(C3) CIDER.SPIDER.0=Type(F1),AuxType(0000),Access(C3)
CIDER.SPIDER.1=Type(F1),AuxType(0000),Access(C3) CIDER.SPIDER.1=Type(F1),AuxType(0000),Access(C3)

36
res/demosrc/choplifter.a Normal file
View File

@ -0,0 +1,36 @@
;license:MIT
;(c) 2021 by qkumba
!cpu 6502
!to "res/DEMO/CHOPLIFTER",plain
*=$300
!source "src/prelaunch/common.a"
+READ_RAM2_WRITE_RAM2
jsr EnableAccelerator
+LOAD_FILE_AT choplifter, $00
lda #$60
sta $403F
jsr $4000 ; decompress
lda #$4C
sta $0DAB
ldx #0
stx $0DAC
stx $08F0
inx
stx $0DAD
stx $08F1
lda #$18
sta $0DA9
jsr DisableAccelerator
+READ_ROM_NO_WRITE
jmp $400
choplifter
!byte 23
!text "X/CHOPLIFTER/CHOPLIFTER"
!if * > $3F0 {
!error "code is too large, ends at ", *
}