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

b_chklpt()


Syntax:     b_chklpt(<expN>)

Purpose:    Check printer status LPT1 - LPT4

Arguments:  <expN> is the printer port

Returns:    A logical value

Library:    MICROSYS.LIB

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

   lpt_port := 1

   if( !b_chklpt(lpt_port) )
      qout("LPT"+ltrim(str(lpt_port))+" off line..  Correct and try again..")
      return(.f.)
   endi