Hallo StevieL
Vielen Danke für dein Antwort (an so einem Tag)
An sowas hatte ich auch schon mal gedacht aber mit disem Code bekomme ich gar keinen Empang:
Code Anfang:
Code ende'Code:$sim $regfile = "m32def.dat" $crystal = 8000000 $baud = 9600 $framesize = 32 ' die Größe des Frames $swstack = 32 ' die Größe des Software-stacks $hwstack = 32 ' die Größe des Hardware-Stacks 'Dies ist ein Code von der Rowald Seite Dim S As String * 14 At &H60 Dim B(15) As Byte At &H60 Overlay Dim n As Byte On URXC OnRxD Enable URXC Enable Interrupts Main: If n > 13 Then Print s n = 0 End If Goto Main OnRxD: Incr n b(n) = UDR Return
Seltsam ist das ich nur duch den Befehl "Inputbin S" einen String Empfange und dann auch Speichern kann.
Code Anfang:
Code ende'Code:$sim $regfile = "m32def.dat" $crystal = 8000000 $baud = 9600 $framesize = 32 ' die Größe des Frames $swstack = 32 ' die Größe des Software-stacks $hwstack = 32 ' die Größe des Hardware-Stacks Dim S As String * 14 At &H60 do Inputbin S Printbin S Loop
Ich komme da irgenwie überhaupt nicht weiter. Ich habe versucht den String als einzelne Byte' s zu Empfangen aber auch da klappte das nur mit dem ersten Byte und dannach war alles nur im Speicher FF FF FF FF
Ich bin der Meinung da liegt mein Hund begraben oder ??
Gruß Gerd







Zitieren

Lesezeichen