Atmega8515 & Atmega8 UART

Hey

Ich habe ein Problem
Ich bekomme vom Mega8515 keinen String zum Mega8 gesendet. Anders herum 
(Mega8 -> Mega8515) jedoch schon.

Meine Uart beschaltung (ohne Brücken etc.)
Mega8         Mega8515

C.5      ->   D.0
C.4      <-   D.1


Prog Mega8:

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

Open "comc.5:2400,8,n,1,inverted" For Output As #1          'I N V E R T 
E D !!!!!!
Open "comc.4:2400,8,n,1,inverted" For Input As #2           'I N V E R T 
E D !!!!!!

Dim Strempfangen As String * 42
Dim Strempfachs As String * 4

Do
   Input Strempfangen
   Print #1 , Strempfangen

   Input #2 Strempfachs
   Print Strempfachs
Loop


Prog Mega8515:

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

Open "comd.0:2400,8,n,1,inverted" For Input As #1           'Hardware 
UART     I N V E R T E D !!!!!!!
Open "comd.1:2400,8,n,1,inverted" For Output As #2          'Hardware 
UART     I N V E R T E D !!!!!!!

Dim Strempfangen As String * 38
Dim A As Integer
A = 0

Do
   Print #2 , A
   A = A + 1
   Waitms 250
Loop



Bitte kann mir jmd helfen?!


LG Christoph