!song = $7f9d0d


lda !carl_initialized
beq init

lda $7e0100
cmp #$13
bne end

lda !song
sta $1dfb

rtl

init:
lda #$01
sta !song

lda #$01
sta !carl_initialized

end:
rtl

back to listings