Re: Serial Comm: Xon Control

Thanks Mike and Leon, I extended SERIAL-PORT to initialize the DCB settings.
In Commextend.f, following SERIAL-PORT REOPEN, was added:

   : DCB-FLAGS ( n--)
      GET-COMMSTATE COMMSTATE DCBflags ! SET-COMMSTATE ;
   : @DCBflags ( port -- n) COMMSTATE DCBflags @ ;

SERIAL-PORT BUILDS PORT1 \ shown here for reference

----
: +PORT1 ( -- )
    Z" COM1" PORT1 OPEN   THROW PORT1 ACTIVATE
    1 PORT1 DCB-FLAGS
    9600 PORT1 BAUD   0 PORT1 PARITY
    8 PORT1 BYTE-SIZE  1 PORT1 STOP-BITS
;
1 PORT1 DCB-FLAGS  added to set the DCBflags to a determined setting. If you
are using HyperTerm with Xon/Xoff, your SF App will inherit those settings
in the DCBflags.
Virgil Stamps
----------------------------------------------------------------------
sftalk_at_forth.com      The SwiftForth programming discussion email list
To unsubscribe, send subject "unsubscribe" to sftalk-request_at_forth.com
For list command help, send subject "help" to sftalk-request_at_forth.com
Message archives are located at http://www.forth.com/archive/sftalk
----------------------------------------------------------------------
This list is a forum for SwiftForth users.  For product support and bug
reports, please send email to support_at_forth.com
----------------------------------------------------------------------