Oh, noch was:
Das
Command = Command And &B10111111
sollte doch zum Togglebit löschen so sein
"Command = Command And &B01111111"
zumindest der Bascom Hilfe nach.

Gruß
Searcher