da wäre doch diese Zeile oder?

Twdr = Slave And &HFE ' slave adresse + Write