Das ist der Cod.
Bei mir geht der...

Code:
' Beispielprogramm RN-Funk
$regfile = "m32def.dat"

$crystal = 16000000                                         'Quarzfrequenz
$baud = 19200


                                              'Interrupt Empfange String von RXD
Enable Urxc                                                 'Einschalten
Enable Interrupts                                           'Zulassen
Dim Name As String * 15


 Print "Hallo hier ist das RN-Controll 1.4!"
Waitms 1000
Print "Das ist ein Test"
Waitms 1000
Print "123456789101112131415161718192021222324252627282930"
Waitms 500
Print "Input Test..."
Waitms 1000
Input "Geben sie eine belibige Zahl ein!" , Name
Print "Sie haben die Zahl " ; Name ; "Ausgesucht"
Waitms 1000
Print "Input Test ist abgeschlossen!"
Waitms 1000
Print "Test Abgeschlossen! Easy-Radio ist einsatzbereit!"

End