mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-12-28 09:30:41 +00:00
80 lines
966 B
ArmAsm
80 lines
966 B
ArmAsm
; Riven fake out
|
|
|
|
NIBCOUNT = $09
|
|
|
|
KEYPRESS = $C000
|
|
KEYRESET = $C010
|
|
PAGE0 = $C054
|
|
LORES = $C056
|
|
|
|
HGR2 = $F3D8
|
|
|
|
|
|
hgr_display:
|
|
jsr HGR2 ; Hi-res graphics, no text at bottom
|
|
; Y=0, A=0 after this called
|
|
|
|
bit PAGE0
|
|
|
|
lda #<(riven_title_lzsa)
|
|
sta getsrc_smc+1
|
|
lda #>(riven_title_lzsa)
|
|
sta getsrc_smc+2
|
|
|
|
lda #$20
|
|
|
|
jsr decompress_lzsa2_fast
|
|
|
|
|
|
jsr wait_until_keypress
|
|
|
|
;===========================
|
|
|
|
bit LORES
|
|
|
|
lda #<(riven1_lzsa)
|
|
sta getsrc_smc+1
|
|
lda #>(riven1_lzsa)
|
|
sta getsrc_smc+2
|
|
|
|
lda #$04
|
|
|
|
jsr decompress_lzsa2_fast
|
|
|
|
jsr wait_until_keypress
|
|
|
|
;===========================
|
|
|
|
bit LORES
|
|
|
|
lda #<(riven3_lzsa)
|
|
sta getsrc_smc+1
|
|
lda #>(riven3_lzsa)
|
|
sta getsrc_smc+2
|
|
|
|
lda #$04
|
|
|
|
jsr decompress_lzsa2_fast
|
|
|
|
jsr wait_until_keypress
|
|
|
|
|
|
|
|
forever:
|
|
jmp forever
|
|
|
|
|
|
|
|
|
|
.include "wait_keypress.s"
|
|
.include "decompress_fast_v2.s"
|
|
|
|
riven_title_lzsa:
|
|
.incbin "riven_title.lzsa"
|
|
|
|
riven1_lzsa:
|
|
.incbin "riven1.lzsa"
|
|
|
|
riven3_lzsa:
|
|
.incbin "riven3.lzsa"
|