Adresse_auslesen:
mov a,#55h
mov R7,#08h
adresse_2:
rlc a
mov sda,c
lcall zeit_6us
setb scl
lcall zeit_6us
clr scl
djnz R7,adresse_2
ret