Biblioteca paminfo (imagens ppm, pgm e pbm)

[adalberto]

Biblioteca básica para extrair informações de imagens ppm, pgm e pbm.

Em anexo a biblioteca paminfo.pris e imagens.zip (imagens de exemplo);

Exemplo:

Código Selecionar Expandir

local pam = inclua'paminfo'
local info, err = pam.info('teste.ppm');
se nao info entao imprima(err); sis.saia(1); fim
para i,v em pares(info) inicio
  imprima(i,':',v);
fim

Saída:
larg   :   100
id   :   P6
bpc   :   8
cs   :   DeviceRGB
f   :   ASCIIHexDecode
alt   :   100
maxcor   :   255
pos   :   57
tam   :   30056

Formatos aceitos:

nome do formato           texto          binário       ext                comprimento da cor
Portable BitMap[1]           P1               P4         .pbm              0–1 (preto=0 e branco=1)
Portable GrayMap[2]          P2               P5         .pgm              0–255 (escala cinza)
Portable PixMap[3]             P3               P6         .pam              0–255 (RGB)