Алгоритм. 
Кодирование изображения бинарными деревьями

Для реализации объектно-ориентированной методологии программирования, необходимо выделить объекты, совокупность которых будет представлять программу. При анализе задания были выделены объекты, отражающие наиболее рациональное решение: исходное изображение, две матрицы для хранения исходного и закодированного изображения, процесс кодирования и декодирования изображения. После обособления объектов следует обозначить их поля, т. е. данные:

• · Исходное изображение: вводит на экран исходное изображение.
• · Матрицы: хранят данные о разрешении изображения, количестве выделенной для них памяти и о количестве бит на цвет. И процедуры вычисления количества необходимой памяти и ее выделения и освобождения.
• · Процесс кодирования и декодирования изображения: содержит процедуры для кодирования изображения по вертикали и горизонтали и соответствующие им процедуры декодирования.

В дополнение к перечисленным объектам в программе должна быть реализована процедура выделения необходимых битов из потока байт. Она обособленна от остальных процедур и может быть вызвана в любой из них. Максимальное количество бит, которое может быть выделено из потока равно 16. Эта процедура необходима, так как количество бит для задания цвета одного пикселя не всегда степень двойки.

В программе реализован вариант, когда количество бит для задания цвета одного пикселя равно 4. Это связанно с тем, что графические режимы, устанавливаемые в Turbo Pascal`e поддерживают режимы с индексированными цветами и не поддерживают других (стандартными методами).

Описание процедур:

DrawSourceImage (x, y: word) — рисует изображение на экране в зависимости от выбранного пользователем разрешения.

Далее происходит выделение памяти для хранения и обработки изображения (procedure MemAllocIMG). Затем изображение с экрана копируется в массив для хранения исходного изображения. Начинается процесс кодирования:

В процедуре BuildMipMapIMG происходит последовательное кодирование изображения по горизонтали (BuildMipMapIMG_hor) и по вертикали (BuildMipMapIMG_ver). Перед каждым блоком коэффициентов сжатия ставится специальный бит-флаг, который обозначает как прошло кодирование (горизонтально, вертикально). Таким образом кодирование происходит поочередно (горизонтально, вертикально), если возможно. Если по какой либо оси сжать больше нельзя, а по другой оси можно то сжатие происходит только для одной оси. Такой подход дает возможность для кодирования не только квадратных изображений, но и изображений прямоугольной формы. Хотя затрачиваются дополнительные биты для хранения ориентации восстанавливаемого прямоугольника.

Восстановление осуществляется процедурой DecodeMipMapIMG, где последовательно в зависимости от бита-флага восстанавливается исходное изображение по горизонтали или вертикали. При этом каждый восстановленный уровень подвергается масштабированию (RescaleImage) до размеров исходного изображения, и выводится на экран (OutImage). При этом пользователь может определить, что примерно изображено на картинке, не вдаваясь в детали, и если его интересует данное изображение, то он может дождаться полного его восстановления.

Перед завершением программы происходит очистка выделенной памяти (MemFreeIMG), и программа прекращает работу.