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

  Name:     comon() - turn on handshaking signals DTR and RTS
  Usage:    comon([<port>])
  Params:   integer <port> - the port # to turn on, optional, if left
            off then port #1 is assumed
  Returns:  nothing

 ---------------------------------- Example ---------------------------------

                 * initialize modem
                 cominit(2400,"N",8,1)

                 * set DTR and RTS to on to receive data
                 comon()

                 * receive data
                 do while .T.
                      if (comcheck())
                           ?? comin()
                      endif
                 enddo