Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-12-25 20:30:31 +00:00
Code Issues Projects Releases Wiki Activity

sa: merge sa and ed lyrics files

Browse Source 
saved 2k or so

probably not worth the effort
This commit is contained in:
Vince Weaver 2018-06-04 16:46:32 -04:00
parent d1c221da7a
commit 08c92e78dd
7 changed files with 474 additions and 447 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
still_alive/README.still_alive
View File

@ -37,6 +37,7 @@ intial 80 col support: 20191
strip out some unneeded text printing: 19962 strip out some unneeded text printing: 19962
merge ED and MB code 24993 merge ED and MB code 24993
properly select between versions: 25001 properly select between versions: 25001
merge the ED and MB lyrics: 22828
Memory Map Memory Map

16
still_alive/display_lyrics.s
View File

@ -75,8 +75,13 @@ lc_sb_ed:
inc LYRICSH inc LYRICSH
lc_sb_ed2: lc_sb_ed2:
; skip MB offset
; adjust pointer 16-bit
inc LYRICSL
bne lc_sb_ed8
inc LYRICSH
lc_sb_ed8:
; beq all_done_lyrics_ed ; if 0, done lyric
all_done_lyrics_ed: all_done_lyrics_ed:
@ -87,7 +92,7 @@ all_done_lyrics_ed:
;======================================================== ;========================================================
; display lyrics ; display lyrics mockingboard
;======================================================== ;========================================================
display_lyrics: display_lyrics:
@ -115,6 +120,13 @@ display_lyrics:
inc LYRICSH inc LYRICSH
lc_sb2: lc_sb2:
; skip ED data
; adjust pointer 16-bit
inc LYRICSL
bne lc_sb5
inc LYRICSH
lc_sb5:
;================================== ;==================================
; Lyric active, print current char ; Lyric active, print current char
;================================== ;==================================

866
still_alive/lyrics.inc
View File

File diff suppressed because it is too large Load Diff

15
still_alive/sa_ed.s
View File

@ -20,10 +20,17 @@ still_alive_ed:
; Setup lyrics ; Setup lyrics
;============================== ;==============================
lda #<(lyrics_ed) ; DANGER! 1 in 256 chance of missing a roll-over
sta LYRICSL
lda #>(lyrics_ed)
sta LYRICSH ; ED offsets are one after the MB offsets
inc LYRICSL
; lda #<(lyrics_ed)
; sta LYRICSL
; lda #>(lyrics_ed)
; sta LYRICSH
;================== ;==================

8
still_alive/sa_mb.s
View File

@ -111,10 +111,10 @@ only_forty:
; Setup lyrics ; Setup lyrics
;============================== ;==============================
lda #<(lyrics) ; lda #<(lyrics)
sta LYRICSL ; sta LYRICSL
lda #>(lyrics) ; lda #>(lyrics)
sta LYRICSH ; sta LYRICSH
;================== ;==================

BIN
still_alive/still_alive.dsk
View File

Binary file not shown.

13
still_alive/still_alive.s
View File

@ -10,6 +10,15 @@ still_alive:
jsr HOME jsr HOME
jsr TEXT jsr TEXT
;=============================
; setup Lyrics
;=============================
lda #<(lyrics)
sta LYRICSL
lda #>(lyrics)
sta LYRICSH
; See if Mockingboard or Electric Duet ; See if Mockingboard or Electric Duet
lda USEMB lda USEMB
@ -55,9 +64,7 @@ reset:
lyrics: lyrics:
.include "lyrics.inc" .include "lyrics.inc"
lyrics_ed: art:
.include "sa.edlyrics"
.include "ascii_art.inc" .include "ascii_art.inc"
LZ4_BUFFER: LZ4_BUFFER: