diff --git a/res/DEMO/CHAMP.LODERUN.1 b/res/DEMO/CHAMP.LODERUN.1 deleted file mode 100755 index 9c79bd158..000000000 Binary files a/res/DEMO/CHAMP.LODERUN.1 and /dev/null differ diff --git a/res/DEMO/CHAMP.LODERUN.Z b/res/DEMO/CHAMP.LODERUN.Z deleted file mode 100755 index 465a037db..000000000 Binary files a/res/DEMO/CHAMP.LODERUN.Z and /dev/null differ diff --git a/res/DEMO/CL b/res/DEMO/CL index a7eb5069f..9136ee2e6 100755 Binary files a/res/DEMO/CL and b/res/DEMO/CL differ diff --git a/res/DEMO/_FileInformation.txt b/res/DEMO/_FileInformation.txt index f6a51c9d4..6bf890420 100644 --- a/res/DEMO/_FileInformation.txt +++ b/res/DEMO/_FileInformation.txt @@ -20,9 +20,7 @@ BUZZARD.BAIT=Type(06),AuxType(0300),Access(C3) CB=Type(06),AuxType(0210),Access(C3) CEILING.ZERO=Type(06),AuxType(0300),Access(C3) CEILING.ZERO.1=Type(F1),AuxType(0000),Access(C3) -CL=Type(06),AuxType(0800),Access(C3) -CHAMP.LODERUN.1=Type(F1),AuxType(0000),Access(C3) -CHAMP.LODERUN.Z=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) diff --git a/src/demo/championship.lode.runner.a b/src/demo/championship.lode.runner.a new file mode 100644 index 000000000..4a2c0c5ca --- /dev/null +++ b/src/demo/championship.lode.runner.a @@ -0,0 +1,65 @@ +;license:MIT +;(c) 2021 by Frank M. + +!cpu 6502 +!to "res/DEMO/CL",plain +*=$200 + + !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 $1F74 + jsr $1F00 ; decompress + + lda #$10 + sta $8AD3 + lda #$08 + sta $8AD3+1 + lda #$4C + sta $8AD3+2 + sta $7524 + sta $61FF + sta $626D + lda #0 + sta $8AD3+3 + sta $7524+1 + sta $61FF+1 + sta $626D+1 + lda #1 + sta $8AD3+4 + sta $7524+2 + sta $61FF+2 + sta $626D+2 ; set exits + + +DISABLE_ACCEL + + jmp $6000 + +newpath + !byte 4 + !text "X/CL" + +title !byte x_e-x_b +x_b !text "X/CL/CL" +x_e + +!if * > $300 { + !error "code is too large, ends at ", * +}