Sammy Lightfoot demo launcher (#424)

* Add files via upload

* Delete SAMMY.5

* Delete SAMMY.4

* Delete SAMMY.3

* Delete SAMMY.2

* Delete SAMMY.1

* Delete SAMMY.Z

* Add files via upload
This commit is contained in:
frankmilliron 2021-11-05 12:05:40 -07:00 committed by GitHub
parent 7eae249529
commit a889bf72cd
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
9 changed files with 87 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.

View File

@ -94,13 +94,7 @@ POOYAN=Type(06),AuxType(0300),Access(C3)
REPTON=Type(06),AuxType(0300),Access(C3)
REPTON.1=Type(F1),AuxType(0000),Access(C3)
ROBOTRON.2084=Type(06),AuxType(BF70),Access(C3)
SAMMY.LIGHTFOOT=Type(06),AuxType(0300),Access(C3)
SAMMY.1=Type(F1),AuxType(0000),Access(C3)
SAMMY.2=Type(F1),AuxType(0000),Access(C3)
SAMMY.3=Type(F1),AuxType(0000),Access(C3)
SAMMY.4=Type(F1),AuxType(0000),Access(C3)
SAMMY.5=Type(F1),AuxType(0000),Access(C3)
SAMMY.Z=Type(F1),AuxType(0000),Access(C3)
SAMMY.LIGHTFOOT=Type(06),AuxType(BA00),Access(C3)
SERPENTINE=Type(06),AuxType(0300),Access(C3)
SERPENTINE.1=Type(F1),AuxType(0000),Access(C3)
SHORT.CIRCUIT=Type(06),AuxType(0210),Access(C3)

View File

@ -0,0 +1,86 @@
;license:MIT
;(c) 2021 by Frank M.
!cpu 6502
!to "res/DEMO/SAMMY.LIGHTFOOT",plain
*=$BA00
!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 #18-1 ; we also need to copy the length byte
- lda newpath,x
sta $BFD0,x
dex
bpl -
lda #$60
sta $4094
lda #$FF
sta $4206
jsr $4000 ; decompress 1
jsr $B7B5 ; decompress 2
lda #$A9
sta $022B
lda #$01
sta $022B+1
lda #$EA
sta $022B+2 ; disable initial key detection
lda #$10
sta $68C5 ; clear keyboard strobe
lda #$04
sta $4FBE ; reduce number of sparkles
lda #$4C
sta $B050
sta $7DB9
sta $B15A
sta $5035
sta $5184 ; (moved to $7864)
lda #0
sta $B050+1
sta $7DB9+1
sta $B15A+1
sta $5035+1
sta $5184+1
lda #1
sta $B050+2
sta $7DB9+2
sta $B15A+2
sta $5035+2
sta $5184+2 ; set exits
lda #$D0
sta $6EE9 ; disable sound
lda #$AD
sta $209
sta $211
sta $21C
+DISABLE_ACCEL
jmp $B7A1
newpath
!byte 17
!text "X/SAMMY.LIGHTFOOT"
title !byte x_e-x_b
x_b !text "X/SAMMY.LIGHTFOOT/SAMMY.LIGHTFOOT"
x_e
!if * > $BB00 {
!error "code is too large, ends at ", *
}