Error when inputting ASCII text from COM port

[mdijkens]

I think you want to keep receiving bytes until an enter is received.
So probably something like

Code: (Select All)

Do

  If Loc(1) <> 0 Then Get #1, , byte

  If byte > Chr$(13) Then

    KILLFILE$ = KILLFILE$ + byte

  Else

    Exit Do

  End If

Loop

Furthermore, try changing the open statement to something like:

Code: (Select All)

Open "COM5:9600,E,8,1,BIN,CS0,DS0,RB8192" For Random As #1

QB64 is quite picky on serial