bit $16
bmi +
bit $18
bpl done
+

lda #$3f
ldx $76
bne +
lda #$C1
+
sta $7b

done:
rtl

back to listings