Благодарю, надо мне свои тетрадные зарисовки достать, лежит тетрадочка))) Я её достаю иногда, полистаю и обратно уберу. И вроде в детстве опять побывал ))
Как то было дело у одноклаcсницы выклянчил HP-65, инструкция на немецком, я учил английский и уже хорошо умел программировать на МК-61. Не сумел освоить HP-65, не протиснулся через немецкий язык :) Но карточку эту магнитную помню — сколько не пробовал писать читать программу — нифига не работало. Наверное нужно было с ней какие то дополнительные процедур проделывать, а может убили покрытие магнитное. Так и остался с МК-61 и нереализованной мыслью как бы ему с задающего устройства кнопки зацепить и с ленты программу писать/читать :) Все равно все закончилось Радио-86РК :)
Изначально пробовал конвертить картинки ню тематики на zx spectrum, получалось прикольно. На демопати такие картинки принимать было нельзя. Куда же отправить такие работы, думал я. Мне нравятся пиксельная эротика, если поискать у художников в архивах — есть просто офигенные картинки. Однажды moroz1999 проводил виртуальный тематический конкурс ZXA'13. Я тогда в нём участвовал и сам формат мне понравился. И как-то само по себе всё сложилось в моей голове. И решил провести Out Of Compo один раз, а потом вроде зашло, и пошло-поехало… как-то так ))
кошкин ёж, не тот код запостил во втором варианте, там должно быть
ld de,$XX20☺
add hl,de
ld e,h
ld a,(de)
ld h,a
Хотя уже неважно, ведь оказалось, можно еще быстрее. Я как-то проглядел, что там же в аккумуляторе хранится исходный младший байт адреса! В связи с этим можно переписать:
...
ld a,l
jp _loop3
_xrow1 ld b,8
_xrow2 add 32
ld l,h
ld h,$XX
ld h,(hl)
jp nc,_loop2
ld h,l
_loop1 inc h
_loop2 ld l,a
_loop3 DUP...EDUP
djnz _loop1
dec c
jp p,_xrow1
ld l,a
exa
ld b,a
ld a,l
jr nz,_xrow2
ld sp,0
ret
«чистый» код down_hl (с _xrow2 по _loop1 включительно) на всю высоту экрана сожрёт 1493 такта
если жаба не задушит продублировать кусок _loop2...djnz — можно сократить заменой jp на jr до 1398
это с маленькой таблицей, а без таблиц у меня теперь получилось 1556 «чистых» тактов:
...
_xrow2 add 32
jr c,_loop1
ld l,a
ld a,h
sub b
ld h,a
ld a,l
_loop1 inc h
...
За прошедший год я немного улучшил оба декомпрессора. Компактный распаковщик удалось сократить до 88 байт (если у кого-то будут мысли, как его можно ещё сократить — буду очень благодарен, так как
у меня там уже начались реально неприятные оптимизации). Быстрый распаковщик тоже удалось ускорить на несколько процентов, ещё и сократив его до 229 байт, в т.ч. благодаря идеям uniabis.
Последний компактный распаковщик (88 байт): unmegalz_small.asm
Последний быстрый распаковщик (229 байт): unmegalz_fast.asm
Внимание, я немного поменял систему нумерования версий, теперь версия указана внутри файла. Поэтому по этим ссылкам всегда можно будет взять самые последние версии распаковщиков.
2020 Crazy Siberian Party photos.app.goo.gl/jeyzbhpAVubGh8RY8
Творческих успехов!
Хотя уже неважно, ведь оказалось, можно еще быстрее. Я как-то проглядел, что там же в аккумуляторе хранится исходный младший байт адреса! В связи с этим можно переписать:
«чистый» код down_hl (с _xrow2 по _loop1 включительно) на всю высоту экрана сожрёт 1493 такта
если жаба не задушит продублировать кусок _loop2...djnz — можно сократить заменой jp на jr до 1398
это с маленькой таблицей, а без таблиц у меня теперь получилось 1556 «чистых» тактов:
1. void. Камбэк OMEGA на платформу
2. Dark Transit. Такого забористого бипера я давно не слышал, аж пробрало.
3. Возвращение tayle в графике.
А за обзор спасибо огромное.
у меня там уже начались реально неприятные оптимизации). Быстрый распаковщик тоже удалось ускорить на несколько процентов, ещё и сократив его до 229 байт, в т.ч. благодаря идеям uniabis.
Последний компактный распаковщик (88 байт): unmegalz_small.asm
Последний быстрый распаковщик (229 байт): unmegalz_fast.asm
Внимание, я немного поменял систему нумерования версий, теперь версия указана внутри файла. Поэтому по этим ссылкам всегда можно будет взять самые последние версии распаковщиков.