dos33fsprogs/still_alive/sa_ed.s

; Electric Duet Code Path

still_alive_ed:

	; init variables

	lda	#0
	sta	FRAME_COUNT


	;============================
	; Draw Lineart around edges
	;============================

	jsr	setup_edges

	jsr	HOME

	;==============================
	; Setup lyrics
	;==============================

	lda	#<(lyrics_ed)
	sta	LYRICSL
	lda	#>(lyrics_ed)
	sta	LYRICSH


	;==================
	; load song
	;==================
	lda	#<music_address
	sta	MADDRL
	lda	#>music_address
	sta	MADDRH

	jsr	play_ed

	;==================
	; loop forever
	;==================

	rts
sa: merge MB and ED versions 2018-06-04 18:57:40 +00:00			`; Electric Duet Code Path`
sa: add duet version 2018-06-04 12:05:02 +00:00
sa: merge MB and ED versions 2018-06-04 18:57:40 +00:00			`still_alive_ed:`
sa: add duet version 2018-06-04 12:05:02 +00:00
			`; init variables`

sa_ed: getting close 2018-06-04 17:53:25 +00:00			`lda #0`
			`sta FRAME_COUNT`

sa: add duet version 2018-06-04 12:05:02 +00:00
			`;============================`
			`; Draw Lineart around edges`
			`;============================`

			`jsr setup_edges`

			`jsr HOME`

			`;==============================`
			`; Setup lyrics`
			`;==============================`

sa: merge the versions 2018-06-04 19:26:03 +00:00			`lda #<(lyrics_ed)`
sa_ed: getting close 2018-06-04 17:53:25 +00:00			`sta LYRICSL`
sa: merge the versions 2018-06-04 19:26:03 +00:00			`lda #>(lyrics_ed)`
sa_ed: getting close 2018-06-04 17:53:25 +00:00			`sta LYRICSH`
sa: add duet version 2018-06-04 12:05:02 +00:00

			`;==================`
			`; load song`
			`;==================`
sa: ed now plays the music at least 2018-06-04 16:24:03 +00:00			`lda #<music_address`
			`sta MADDRL`
			`lda #>music_address`
			`sta MADDRH`

			`jsr play_ed`
sa: add duet version 2018-06-04 12:05:02 +00:00
			`;==================`
			`; loop forever`
			`;==================`

sa: merge the versions 2018-06-04 19:26:03 +00:00			`rts`