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

  Name:     comoff() - turn off DTR signal to stop receiving data
  Usage:    comoff([<port>])
  Params:   integer <port> - the port # to turn off, 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())
                           mvar =  comin()
                           if mvar = "Y"
                                exit
                           endif
                      endif
                 enddo

                 * tell the other end to stop sending characters
                 comoff()

                 if (mvar = "Y")
                      do LOOKUP
                 endif