Hallo ist es möglich mit Bascom einen mausklavier der 3 schalter hat 5 programme auszuführen?

mein beispiel:
Code:
Do
If Dip1 = 0 Then Gosub Prog_1       'Lauflicht1
If Dip2 = 0 Then Gosub Prog_2       'Lauflicht2
If Dip3 = 0 Then Gosub Prog_3       'Lauflicht3
Dip1 = 1 : Dip2 = 1 : Dip3 = 1 Then Gosub Testlauf    'Ausgang TEST
Loop
Würde mich sehr freuen Vielen dank schonmal
Mit Freundtlichen Grüßen
Thorsten Sch.