Probier es mal so:
Code:
$regfile = "m32def.dat"
$crystal = 4000000
$baud = 19200
Dim I As String*10
Do
Input, I
Print I
Loop
End