dos33fsprogs/still_alive/sa_ed.s

51 lines
675 B
ArmAsm
Raw Normal View History

2018-06-04 18:57:40 +00:00
; Electric Duet Code Path
2018-06-04 12:05:02 +00:00
2018-06-04 18:57:40 +00:00
still_alive_ed:
2018-06-04 12:05:02 +00:00
; init variables
2018-06-04 17:53:25 +00:00
lda #0
sta FRAME_COUNT
2018-06-04 12:05:02 +00:00
;============================
; Draw Lineart around edges
;============================
jsr setup_edges
jsr HOME
;==============================
; Setup lyrics
;==============================
; DANGER! 1 in 256 chance of missing a roll-over
; ED offsets are one after the MB offsets
inc LYRICSL
; lda #<(lyrics_ed)
; sta LYRICSL
; lda #>(lyrics_ed)
; sta LYRICSH
2018-06-04 12:05:02 +00:00
;==================
; load song
;==================
2018-06-04 16:24:03 +00:00
lda #<music_address
sta MADDRL
lda #>music_address
sta MADDRH
jsr play_ed
2018-06-04 12:05:02 +00:00
;==================
; loop forever
;==================
2018-06-04 19:26:03 +00:00
rts