FoxPro/Visual FoxPro - Como puedo detectar la impresora

Se que con SYS(13) y con PRINTSTATUS() se puede detectar la impresora, pero alguien digame que puede hacer para detectar que la impresora esta en linea, ya que si esta apagada me regresa READY
o .T. cualquiera de los dos comandos.
Como le puedo hacer para que un programa detecte que realmente la impresora esta en linea?

Es sencillo, solo utiliza printStatus()
ej:

do while !printstatus()
clear
deac wind all
defi wind p from 8,2 to 16,78 panel
acti wind p
@0,10say "USTED ESTA A PUNTO DE REALIZAR UNA IMPRESION"
@1,10 SAY "Y LA IMPRESORA NO ESTA ACTIVA, PRESIONE EL"
@2,10 SAY "BOTON < ON LINE >"
Wait " Presione una tecla"
enddo
deact wind p