Click above to get retro games delivered to your door ever month!

   tp_striphi() - get or set high-bit-strip flag

   lOldFlag := tp_striphi(nPort, [lNewFlag])

   nPort       Serial port number.
   lNewFlag    New high-bit flag.

   Returns     Original high-bit flag.

   Gets or sets the high-bit-strip flag.  When this flag is set, the
   high-order bit of each character read from the port is cleared on
   input.  Output characters are not affected.  Initially, the flag is
   cleared.

   If lNewFlag is omitted, tp_striphi() just returns the current
   setting.  If lNewFlag is specified, it changes the setting and
   returns the original value.

   Example:

       tp_striphi(1, .T.)  // Strip high bits on port 1.