Atmega8 + Atmega8515 Softuart

Hi

Ich versuche 2 AVR (Mega8515 & Mega8) per Softwareuart zu vernetzen.

PC -> Max232 -> Mega8 -> Mega8515

Bis zum Atmega8 funktioniert auch noch alles wunderbar; Bloß das 
weiterleiten über den Soft-UART geht nicht. :(

Prog Mega 8:

$regfile = "m8adef.dat"
$crystal = 1000000
$hwstack = 32
$swstack = 8
$framesize = 16

Open "comc.5:2400,8,n,1" For Output As #4
Open "comc.4:2400,8,n,1" For Input As #3

Config Portd.5 = Output
   Ledbusf Alias Portd.5

Dim Empfangen As String * 1

   Do
      Input , Empfangen
      If Empfangen = "1" Then
      Ledbusf = 1
       Print #4 , Empfangen
       End If
      If Empfangenn = "0" Then
      Ledbusf = 0
       Print #4 , Empfangen
       End If


   Loop


Prog Mega8515:







$regfile = "m8515.dat"
$crystal = 4000000
$hwstack = 32
$swstack = 8
$framesize = 16

$baud = 2400



Dim A As Integer
Dim B As Integer
Dim Strempfangen As String * 10

Config Porta.1 = Output
Config Porta.2 = Output
B = 1
A = 0
Strempfangen = ""
Do
         Input Strempfangen
         If Strempfangen = "1" Then
         Toggle Porta.1
         Waitms 500
         End If

Loop


Es werden nur 0en und 1en geschickt
die Pinbelegung hab ich zum zig-1000. mal durchgemessen und sie passt.


Hoffe von Euch kann mir jmd helfen!!!!


LG Daniel