'0011.BAS: Optimierter String-Empfang $regfile = "8515def.dat" $crystal = 8000000 $Baud = 9600 Config Portb = Output Dim S As String * 8 At &H60 Dim B(9) As Byte At &H60 Overlay Dim n As Byte On URXC OnRxD Enable URXC Enable Interrupts Main: If N > 7 Then Portb = s N = 0 End If Goto Main OnRxD: Incr n B(n) = Udr Return Wenn ich jetzt eine folge "10101111" an den µC schicke will ich das auch diese LED's leuchten. Aber dass passiert nicht weil s ein string ist und ich kann keinen sting in eine binärzahl wandeln oder? Wie macht man das so, das ich ein telegram schikce und dieser bit für bit ausgewertet werden kann? bye holger
:
Gesperrt durch Moderator
Beitrag #6141166 wurde von einem Moderator gelöscht.
Beitrag #6141180 wurde von einem Moderator gelöscht.
Beitrag #6141182 wurde von einem Moderator gelöscht.
Dieser Beitrag ist gesperrt und kann nicht beantwortet werden.