Direcionar a saída dos comandos de impressão para uma impressora.
SET PRINT on [SLAVE] | OFF
|
SLAVE |
determina que a saída será em impressora escrava do terminal. |
Para desviar a saída dos comandos ?, ?? e @ ...SAY" para um outro dispositivo que não o seu terminal, este dispositivo é determinado pelo comando SET PRINTER.
Para utilizar a opção SLAVE é preciso ter uma impressora escrava conectada ao terminal e as variáveis MC4 e MC5 do TERMINFO para seu terminal devem estar "setadas" com os valores corretos (veja manual do fabricante do seu terminal e manual do TERMINFO).
O exemplo a seguir mostra-nos como imprimir dez linhas na impressora padrão e no terminal.
PROG
SET PRINT ON
FOR I = 1 to 10
? "I e igual a IMPRESSORA ",i
NEXT
SET PRINT OFF
FOR I = 1 to 10
? "I e igual a TERMINAL ",i
NEXT
$NOSCREEN, ?, ??, @ ... SAY, SET DEVICE e SET PRINTER.