mal wieder ein kleiner Erfolg, ich hab den Turm zum drehen gebracht. Allerdings muss ich mir noch was einfallen lassen, wie ich dem Turm sage, dass er jetzt am Anschlag ist. Denn leider lässt er sich nur um 320° drehen...

Aber leider funktioniert mein Softwareuart immer noch nicht... Bild  

Code:
$regfile = "m8def.dat"
$crystal = 1000000
$baud = 2400

Do
Dim Text As String * 16


Config Portb.0 = Output
Portb.0 = 1

Input , Text

Portb.0 = 0


Print "M8 sagt " ; Text

Loop

End
Code:
$regfile = "m32def.dat"
$crystal = 16000000
$baud = 2400

Print "funktioniert rs232"
waitms 1000

Config Portc.0 = Output
Portc.0 = 0

Open "Comd.6:2400,8,n,1" For Output As #1
Open "Comd.3:2400,8,n,1" For Input As #2
Dim Text As String * 16
Dim Textneu As String * 16

Input "Zeichen eingeben " , Text
Print "RN sagt " ; Text
Print #1 , "RN sagt " ; Text
Input #2 , Textneu
Print "RN sagt " ; Textneu


End
Terminalmitschnitt:

funktioniert RS232 (Rn Control)
Zeichen eingeben jau (Input, jau ist meine Antwort)
RN sagt jau ( Direktantwort)
RN sagt M8 sagt RN sagt ( Anscheinend kommt schon etwas beim m8 an, aber nix richtiges.)