Подскажите хороший упаковщик графики

[Vitamin]

http://zxdocs.fatal.ru/formats/B/BIT.zip

Если надо, могу кинуть исходы плагина, там выводилка имеется

[Advertiser]

[TomCaT]

ага, вроде понятно все. Только байт разницы -- не меняется, пока маска не укажет? или кроме XOR для получения данных еще что-то надо?..

[Vitamin]

Нет не меняется. Вот исходник, может придется чтото подправить для оптимизации. Начальный байт данных и разница равны нулю, т.е. одним нулевым байтом кодируется пустое знакоместо. Может быть другое направление распаковки маски (придется заменить RR C на RL C).

;распаковка одного знакоместа
;HL- адрес в памяти
;DE- адрес первой строки знакоместа


DEPACKPLC ;HL->DE
LD C,(HL) ;взяли маску знакоместа
INC HL
EX AF,AF'
XOR A ;начальный байт
LD B,A ;начальная разница
MCO EX AF,AF'
RR C ;выделяем очередной бит
JR NC,OLBB
LD B,(HL) ;новая разница- обновляем
INC HL
OLBB ;выводим данные
XOR B
LD (DE),A
INC D
EX AF,AF'
LD A,D
AND 7
JR NZ,MCO
RET

[TomCaT]

брр...
запутался теперь что-то
это A, которое кладется в DE, нигде не сохраняется? получается, лучше всего пакуются байты 255-0-255-0, или 130-125-130-125, т.е. негатив-позитив-негатив? Разве такие последовательности часто встречаются? Странно как-то, если на код смотреть. Или я плохо врубился... А он работает?

[TomCaT]

Да, и входное значение A -- никак не влияет?

[Vitamin]

Обшибся слегка. Надо перед меткой MCO поставить EX AF,AF' (это я на лету писал). Ну еще можно развернуть цикл и вообще избавиться от этих обменов.

получается, лучше всего пакуются байты 255-0-255-0, или 130-125-130-125, т.е. негатив-позитив-негатив? Разве такие последовательности часто встречаются?

Если исходное изображение является конверсией по floyd-steinberg, то сжатие будет хреновым (равно как и любым другим пакером), а вот если оно по методу threshold или ordered то все замечательно. Плагин к bge (поставляется в комплекте к qhts или скачивается с сайта http://zxdocs.fatal.ru (раздел projects). В нем можно посмотреть сколько будет весить набор изображений в сжатом и расжатом виде. В среднем в 1.5-2 раза получается выигрыш. И это при достаточно высокой скорости распаковки. Ну и плюс итоговые данные хорошо пакуются хрустом.
ЗЫ. В videostudio также используется этот метод, он оттуда пришел%))

[TomCaT]

ну, раз работает, значит правильный алгоритм. Хотя я все равно не понимаю, почему просто XOR дает такой выигрыш... и да ладно. Буду пробовать завтра...

P.S. два EX AF подряд... нельзя ли как-то иначе? Ведь всего только под конец проверить, добрались ли донизу? Надо еще один восьмибитный рег., а в него единицу и RLC ее, тогда и конец определится, и экономия... Может, адрес один в SP положить?