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

  Name:     prnstatus() - get printer status, out of paper, etc.
  Usage:    <integer> = prnstatus([<port>])
  Params:   optional integer <port>, the lpt port to check in the range
            1 - 3. If left off then lpt port #1 is assumed.
  Returns:  an integer equal to the current printer status attached to the
            specified port. The following table defines the return values:

                 Return Value   - Meaning
                 0              - not busy and on line (ready)
                 1              - off line but turned on
                 2              - hooked up but turned off
                 3              - no paper
                 4              - not connected
                 -1             - no idea

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

                 if (prnstatus(1) == 1)
                      ? "Please put the printer on line"
                 endif

                 if (! isprinter(1))
                      ? "Printer error #:"+str(prnstatus(1))
                 endif