01 Serial port

\ February 10th, 1997 by Tom Zimmer

\       Updated with a couple of additional changes from Skip Inskeep.

\ A Win32Forth example program that illustrates how to open COM1 for

\ bi-directional communications and then allows a simple terminal

\ program to communicate with whatever is connected at 9600 baud.

\ define the object for the Device Control Block structure

fload Object/DCB.f

fload Object/COMSTAT.f

fload ComX/COM.f

fload  ComX/COM_4.f

defer ComTalk

' Com4talk is ComTalk