XDEF _FilterToggle

    section CODE

_FilterToggle:
    bchg #1,$bfe001
    bne  exit
    bset #1,$bfe001
exit:
    rts

    END