hallo,
ich versuche gerade zwei m16 über sw UART zu verbinden.
dazu habe ich den rx auf den tx des anderen gelegt. zusätzlich habe ich die 2mc noch über einen I/O miteinander verbunden. so soll es möglich sein, das der eine über ein high auf der I/O leitung den anderen auffordert etwas zu senden.
soweit so gut.
aber, wenn der eine sendet, kommt bei dem anderen leider nichts an. gesendet wird aber, dass hab ich mit einem max232 schon überprüft.
wiesst ihr was ich da falsch gemacht hab?
MC1 (Empfänger)
MC2 (sender)Code:Config Portd.7 = Output Portd.7 = 0 'empfangspaket von mc1 Dim Paketmc1(7) As Byte Config Serialin = Buffered , Size = 7 'RS232 Buffer Open "COMc.2:300,8,N,1,inverted" For Input As #1 Do Portd.7 = 1 Inputbin #1 Paketmc1(1) ; 7 Close #1 printbin packete(1);7 'hw UART ausgabe Portd.7 = 0 Loop End
vielleicht findet ihr was.Code:Packete(1) = 1 Packete(2) = 2 'Aufforderung von mc2 Packete(3) = 3 'Aufforderung von mc2 Packete(4) = 4 'Aufforderung von mc2 Packete(5) = 5 'Aufforderung von mc2 Packete(6) = 6 Packete(7) = 7 'Aufforderung von mc2 Open "COMB.7:300,8,N,1,inverted" For Output As #1 Do If Pinb.6 = 1 Then Printbin #1 , Packete(1) ; 7 Close #1 End If loop
mfg
xeus







Zitieren

Lesezeichen