unit lisVars;

interface

const
    versao = '1.0';

var
    arqSai : text;
    arqentra  :  file;
    nomeentra, nomesai: string;
    ncopias: integer;
    titulando: boolean;

    linhaFisica, primLinha, primCol, ultLinha, ultCol: integer;
    pagInicial, pagFinal, numInicial: integer;
    titulo: string;
    espacejamento: integer;
    forcaSalto: boolean;

    linhaAmb: integer;
    copiaAtual: integer;

    prtOk: boolean;

    numPag, nlinPag: integer;
    acabouArq: boolean;

implementation
end.
