mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-07-05 00:28:59 +00:00
32 lines
383 B
ArmAsm
32 lines
383 B
ArmAsm
|
; THATCHED ROOF COTTAGES
|
||
|
|
|
||
|
|
cottage:
|
||
|
|
|
||
|
|
;************************
|
||
|
|
; Cottage
|
||
|
|
;************************
|
||
|
|
|
||
|
|
lda #<(cottage_lzsa)
|
||
|
|
sta getsrc_smc+1
|
||
|
|
lda #>(cottage_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
|
||
|
|
|
||
|
|
peasant_text:
|
||
|
|
.byte 25,2,"Peasant's Quest",0
|