mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-08-12 12:29:04 +00:00
ds: add message before reading
This commit is contained in:
parent
a91dd48187
commit
94be8d95e8
@ -125,7 +125,11 @@ frame_decode_loop:
|
|||||||
; starbase scene
|
; starbase scene
|
||||||
;===========================
|
;===========================
|
||||||
|
|
||||||
jsr starbase
|
nop
|
||||||
|
nop
|
||||||
|
nop
|
||||||
|
|
||||||
|
; jsr starbase
|
||||||
|
|
||||||
;============================
|
;============================
|
||||||
; disable irq music
|
; disable irq music
|
||||||
@ -149,7 +153,7 @@ frame_decode_loop:
|
|||||||
nop
|
nop
|
||||||
nop
|
nop
|
||||||
nop
|
nop
|
||||||
; jsr end_book
|
jsr end_book
|
||||||
|
|
||||||
;===========================
|
;===========================
|
||||||
; credits
|
; credits
|
||||||
|
@ -18,12 +18,35 @@ end_book:
|
|||||||
|
|
||||||
lda #0
|
lda #0
|
||||||
sta DRAW_PAGE
|
sta DRAW_PAGE
|
||||||
|
lda #255
|
||||||
|
sta FRAMEL
|
||||||
|
|
||||||
;===================
|
;===================
|
||||||
; setup grahics
|
; setup grahics
|
||||||
|
|
||||||
jsr create_update_type1
|
jsr create_update_type1
|
||||||
|
|
||||||
|
|
||||||
|
;======================
|
||||||
|
; print message
|
||||||
|
|
||||||
|
lda #<read_book_text
|
||||||
|
sta OUTL
|
||||||
|
|
||||||
|
lda #>read_book_text
|
||||||
|
sta OUTH
|
||||||
|
|
||||||
|
jsr move_and_print
|
||||||
|
jsr move_and_print
|
||||||
|
|
||||||
|
lda #200
|
||||||
|
jsr long_wait
|
||||||
|
lda #200
|
||||||
|
jsr long_wait
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
;=============================
|
;=============================
|
||||||
; Load graphic page0
|
; Load graphic page0
|
||||||
|
|
||||||
@ -144,14 +167,19 @@ bloop2:
|
|||||||
dey ; 2
|
dey ; 2
|
||||||
bne bloop1 ; 2nt/3
|
bne bloop1 ; 2nt/3
|
||||||
|
|
||||||
|
dec FRAMEL ; 5
|
||||||
|
nop ; 2
|
||||||
|
bne book_loop ; 3
|
||||||
|
|
||||||
|
; lda TEMP ; 3
|
||||||
|
; lda KEYPRESS ; 4
|
||||||
|
; bpl book_loop ; 3
|
||||||
|
|
||||||
lda KEYPRESS ; 4
|
|
||||||
bpl book_no_keypress ; 3
|
|
||||||
rts ; 6
|
rts ; 6
|
||||||
book_no_keypress:
|
|
||||||
|
|
||||||
jmp book_loop ; 3
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
read_book_text:
|
||||||
|
.byte 2,11,"QUIET AT LAST",0
|
||||||
|
.byte 2,12,"FINALLY I CAN READ MY BOOK IN PEACE",0
|
||||||
|
Loading…
Reference in New Issue
Block a user