!sound = #$13

LDA $0100
EOR #$14
BNE Return

LDA $16
AND #$80	
BEQ Other

LDA #$8C
STA $7D

LDA !sound
STA $1DFC

Other:
LDA $16
AND #$80	
BEQ Return

LDA !sound
STA $1DFC

LDA #$8C
STA $7D

Return:

RTL

back to listings