Ich hab mal den Code zusammengestrichen, der effektiv tatsächlich ausgeführt wird. Wenn ich dich richtig verstanden habe überträgst duCode:$regfile = "m8def.dat" $crystal = 7372800 $baud = 4800 'Initialisierung LCD Display Config Lcd = 20 * 4 'LCD-Display mit 20 Zeichen in 4 Zeilen verwendet Config Lcdbus = 4 '4 bit mode Config Lcdmode = Port Config Lcdpin = Pin , Db4 = Portc.1 , Db5 = Portc.2 , Db6 = Portc.3 , Db7 = Portc.4 , E = Portc.5 , Rs = Portd.6 'war Portc.6 Dim S As String * 7 Dim A As String * 4 On Urxc Onrxd Enable Urxc Enable Interrupts Cls Lcd "RS485 Test" do Thirdline Wait 1 Lcd A loop ' **** RS485 Aktivieren und Bus prüfen Onrxd: S = S + Chr(udr) If Len(s) > 3 Then A = S S = "" Else A = "" End If Return '***********
in 8n2-Format die Daten. Die UART des Mega8 ist aber auf 8n1 konfiguriert.
Könnte aber trotzdem gehen. stimmt die Baudrate von 4800 ? Das ist nicht gerade schnell. Die Fuses sollten stimmen, externer Quarz. Stimmt auch der Quarz? Welches Terminal verwendest Du?
Lesezeichen