Blog de Berto

Bueno, como prometí hace unos meses, aquí dejo también la segunda práctica de EDI del año pasado en Junio. Consistía básicamente en hacer un probrama que comprimiera unas imágenes en un formato un tanto especial.

Las imágenes eran ficheros de texto, que tenían la siguiente estructura:

4
1110
0011
0101
0011

El primer número era la dimensión de la imagen, si es un 4, el fichero era 4×4, si es un 8, pues 8×8, así sucesivamente, y tenían que ser números potencias de 2 (2,4,8,16,32,64…..).Los unos representan píxeles negros y los ceros píxeles blancos.Una imagen así te ocupaba digamos que siera de 1024 x 1024 , te ocupaba efectivamente 1 MByte, pues al pasarla por el compresor, creaba un fichero .dat bastante más reducido, si la imagen tenía un ratio de compresión muy grande ( esto viene explicado en la especificación ), podía hasta ocupar 3 bytes.

Después de este breve resumen, aquí os dejo la especificación y el código en Free Pascal.

Especificación – Código.