mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-06-26 00:29:29 +00:00
27 lines
323 B
ArmAsm
27 lines
323 B
ArmAsm
|
; Lake West
|
||
|
|
|
||
|
|
;************************
|
||
|
|
; Lake West
|
||
|
|
;************************
|
||
|
|
lake_west:
|
||
|
|
lda #<(lake_w_lzsa)
|
||
|
|
sta getsrc_smc+1
|
||
|
|
lda #>(lake_w_lzsa)
|
||
|
|
sta getsrc_smc+2
|
||
|
|
|
||
|
|
lda #$40
|
||
|
|
|
||
|
|
jsr decompress_lzsa2_fast
|
||
|
|
|
||
|
|
lda #<peasant_text
|
||
|
|
sta OUTL
|
||
|
|
lda #>peasant_text
|
||
|
|
sta OUTH
|
||
|
|
|
||
|
|
jsr hgr_put_string
|
||
|
|
|
||
|
|
|
||
|
|
jsr wait_until_keypress
|
||
|
|
|
||
|
|
rts
|