Das Billigste ist

DIM Varia as Byte

If Varia.0 = 1 then bit0-action .....
If Varia.1 = 1 then bit1-action .....