Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-06-26 00:29:29 +00:00
Code Issues Projects Releases Wiki Activity

fish: add flashing text for spacebar message

Browse Source
This commit is contained in:
Vince Weaver 2024-06-11 12:56:11 -04:00
parent 9e251acaa4
commit cc0a348394
2 changed files with 24 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
games/sb/fish/fish.s
View File

@ -18,9 +18,11 @@
; NOTES
; page1= $2000-$5fff
; code = $6000-$bfff
; hgr page1= $2000-$3fff
; hgr page2= $4000-$5fff
; code = $4000-$bfff
; note we have to be done with the code in page2 before
; we over-write it by playing the game
div7_table = $400
mod7_table = $500
@ -130,12 +132,15 @@ wait_at_tile:
jsr set_normal ; normal text
ldx #9
ldx #7
print_help:
jsr move_and_print
dex
bne print_help
jsr set_flash ; have the "press spacebar" flash
jsr move_and_print
wait_at_directions:
lda KEYPRESS
bpl wait_at_directions

19
games/sb/fish/text_print.s
View File

@ -60,25 +60,36 @@ done_print_string:
rts
; set normal text
; set normal text ($80-$ff)
set_normal:
lda #$80
sta ps_smc1+1
lda #09 ; ora
lda #$09 ; ora
sta ps_smc1
rts
; restore inverse text
; restore inverse text ($00-$3f)
set_inverse:
lda #$29
lda #$29 ; and
sta ps_smc1
lda #$3f
sta ps_smc1+1
rts
; set flashing text ($40-$7f)
set_flash:
lda #$40
sta ps_smc1+1
lda #$09 ; ora
sta ps_smc1
rts
;================================
; move and print a list of lines