Habe die aktuelle MVCOM mit dem Loopbackstecker verbunden und mit folgenden Source aus der MVCOM (etwas geändert) folgendes gemacht.
Code: Alles auswählen
;Open COM1 at 1200 Bds, no parity, 8 data bits and 1 stop bit
;Handshake mode set to None with RTS On
Chaine.s = "Hallo hier Die Zahlen 0,1,2,3,4,5,6,7,8,9"
Car.s = " "
Port.s = "com1:1200,n,8,1"
Handshake.l = 1
Buffer.l = 1024
HCom.l = ComOpen(Port, Handshake,Buffer,Buffer)
If Hcom > 0 ; Communication port is open
If ComOutput(HCom,Chaine) ; Send data
Delay(1000) ; Or other action
While ComInputBufferCount(HCom) > 0
If ComInput(HCom,Car)
Ausgabe.s = Ausgabe + Car
EndIf
Wend
ComClose(HCom) ; Close the communication port
Debug Ausgabe
MessageRequester("TEST",Ausgabe)
EndIf
EndIf
Debugger hat geschrieben:Hallo hier Die Zahlen 0,1,2,3,4,5,6,7,8,9