1
0
mirror of https://github.com/a2-4am/4cade.git synced 2025-04-30 14:37:52 +00:00

Apple Cider Spider demo launcher ()

* 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:
frankmilliron 2021-11-11 07:47:48 -08:00 committed by GitHub
parent 08124340a7
commit 3330c7fed2
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
9 changed files with 61 additions and 7 deletions

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
AC=Type(06),AuxType(9B00),Access(C3)
AGENT.U.S.A=Type(06),AuxType(0300),Access(C3)
ALIEN.AMBUSH=Type(06),AuxType(4000),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)
CL=Type(06),AuxType(0200),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.1=Type(F1),AuxType(0000),Access(C3)
CRIME.WAVE=Type(06),AuxType(BE00),Access(C3)

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 ", *
}