mirror of
https://github.com/a2-4am/4cade.git
synced 2025-02-17 07:31:19 +00:00
Apple Cider Spider demo launcher (#432)
* Add files via upload * Delete CIDER.SPIDER.Z * Delete CIDER.SPIDER.0 * Delete CIDER.SPIDER.1 * Delete CIDER.SPIDER.5 * Delete CIDER.SPIDER.7 * Delete CIDER.SPIDER.9 * Add files via upload
This commit is contained in:
parent
08124340a7
commit
3330c7fed2
BIN
res/DEMO/AC
BIN
res/DEMO/AC
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
@ -1,5 +1,6 @@
|
|||||||
# This file is maintained by hand
|
# This file is maintained by hand
|
||||||
|
|
||||||
|
AC=Type(06),AuxType(9B00),Access(C3)
|
||||||
AGENT.U.S.A=Type(06),AuxType(0300),Access(C3)
|
AGENT.U.S.A=Type(06),AuxType(0300),Access(C3)
|
||||||
ALIEN.AMBUSH=Type(06),AuxType(4000),Access(C3)
|
ALIEN.AMBUSH=Type(06),AuxType(4000),Access(C3)
|
||||||
ALIEN.DOWNPOUR=Type(06),AuxType(0300),Access(C3)
|
ALIEN.DOWNPOUR=Type(06),AuxType(0300),Access(C3)
|
||||||
@ -22,13 +23,6 @@ CEILING.ZERO=Type(06),AuxType(0300),Access(C3)
|
|||||||
CEILING.ZERO.1=Type(F1),AuxType(0000),Access(C3)
|
CEILING.ZERO.1=Type(F1),AuxType(0000),Access(C3)
|
||||||
CL=Type(06),AuxType(0200),Access(C3)
|
CL=Type(06),AuxType(0200),Access(C3)
|
||||||
CHOPLIFTER=Type(06),AuxType(0300),Access(C3)
|
CHOPLIFTER=Type(06),AuxType(0300),Access(C3)
|
||||||
AC=Type(06),AuxType(0300),Access(C3)
|
|
||||||
CIDER.SPIDER.0=Type(F1),AuxType(0000),Access(C3)
|
|
||||||
CIDER.SPIDER.1=Type(F1),AuxType(0000),Access(C3)
|
|
||||||
CIDER.SPIDER.5=Type(F1),AuxType(0000),Access(C3)
|
|
||||||
CIDER.SPIDER.7=Type(F1),AuxType(0000),Access(C3)
|
|
||||||
CIDER.SPIDER.9=Type(F1),AuxType(0000),Access(C3)
|
|
||||||
CIDER.SPIDER.Z=Type(F1),AuxType(0000),Access(C3)
|
|
||||||
CONAN=Type(06),AuxType(0300),Access(C3)
|
CONAN=Type(06),AuxType(0300),Access(C3)
|
||||||
CONAN.1=Type(F1),AuxType(0000),Access(C3)
|
CONAN.1=Type(F1),AuxType(0000),Access(C3)
|
||||||
CRIME.WAVE=Type(06),AuxType(BE00),Access(C3)
|
CRIME.WAVE=Type(06),AuxType(BE00),Access(C3)
|
||||||
|
60
src/demo/cider.spider.a
Normal file
60
src/demo/cider.spider.a
Normal file
@ -0,0 +1,60 @@
|
|||||||
|
;license:MIT
|
||||||
|
;(c) 2021 by Frank M.
|
||||||
|
|
||||||
|
!cpu 6502
|
||||||
|
!to "res/DEMO/AC",plain
|
||||||
|
*=$9B00
|
||||||
|
|
||||||
|
!source "src/constants.a" ; no code in these
|
||||||
|
!source "src/macros.a"
|
||||||
|
|
||||||
|
+READ_RAM2_WRITE_RAM2
|
||||||
|
jsr EnableAccelerator
|
||||||
|
|
||||||
|
;+LOAD_FILE_KEEP_DIR
|
||||||
|
ldx #0 ; read to main memory
|
||||||
|
stx ldrhi
|
||||||
|
stx ldrlo
|
||||||
|
+LDADDR title
|
||||||
|
jsr iLoadFileDirect
|
||||||
|
|
||||||
|
ldx #5-1 ; we also need to copy the length byte
|
||||||
|
- lda newpath,x
|
||||||
|
sta $BFD0,x
|
||||||
|
dex
|
||||||
|
bpl -
|
||||||
|
|
||||||
|
lda #$60
|
||||||
|
sta $2076
|
||||||
|
jsr $1FFD ; decompress
|
||||||
|
|
||||||
|
lda #0
|
||||||
|
sta $10AC
|
||||||
|
lda #1
|
||||||
|
sta $10B1 ; reset vector patch
|
||||||
|
|
||||||
|
lda #$4C
|
||||||
|
sta $0C00
|
||||||
|
sta $1D27
|
||||||
|
lda #0
|
||||||
|
sta $0C00+1
|
||||||
|
sta $1D27+1
|
||||||
|
lda #1
|
||||||
|
sta $0C00+2
|
||||||
|
sta $1D27+2 ; set exits
|
||||||
|
|
||||||
|
+DISABLE_ACCEL
|
||||||
|
|
||||||
|
jmp $1000
|
||||||
|
|
||||||
|
newpath
|
||||||
|
!byte 4
|
||||||
|
!text "X/AC"
|
||||||
|
|
||||||
|
title !byte x_e-x_b
|
||||||
|
x_b !text "X/AC/AC"
|
||||||
|
x_e
|
||||||
|
|
||||||
|
!if * > $9BA0 {
|
||||||
|
!error "code is too large, ends at ", *
|
||||||
|
}
|
Loading…
x
Reference in New Issue
Block a user