Ширится монификация околовекторовского пространства. Сделал 256-байтную версию работающую из бейсика ПК-6128Ц.
Загрузка
BLOAD"" и выбираем в диалоге MONA.CAS
Запуск
A=USR(&701F)
Когда нарисует можно вслепую набрать COLOR15 и пользоваться бейсиком дальше.
Чтобы не было сомнений в размере в архиве не только CAS, но и BIN, который можно загрузить через отладчик с адреса 701Fh и потом запустить как и CAS через A=USR(&701F)
С любовью к вам, Yandex.Direct
Размещение рекламы на форуме способствует его дальнейшему развитию
С бейсиком действительно получилось перевести векторовскую Мону в категорию <=256 байт. Два варианта: для классического 2.5 (256 байт) и для новодельного 2.62 (255 байт).Сообщение от ivagor
Загрузка и старт одинаковые:
BLOAD"" (если грузить bin в отладчик, то с адреса 7000h)
A=USR(&7084)
На картинках можно увидеть некоторые допущенные послабления.
В обоих версиях используются дефолтные цвета палитры, но на на мой взгляд это не стало проблемой даже в цвете (чем могут похвастаться далеко не все советские ретрокомпы), а уж в ч/б совсем хорошо. Дополнительно в версии для 2.5 пришлось пожертвовать кропом снизу.
Имея за спиной мощь бейсика оказалось не так уж сложно закрыть и другой гештальт - 64-байтный треугольник Серпинского для 06Ц.
Запуск и старт (и функциональность) версий для 2.5 и 2.62 одинаковые:
BLOAD"" (если грузить bin в отладчик, то с адреса 701Fh)
A=USR(&701F)
В отличие от Моны треугольник зацикленный, когда надоест на него смотреть для выхода в бейсик жмем БЛК+СБР (F12 в эмуляторах).
Improver(09.01.2023), metamorpho(10.01.2023), nzeemin(11.01.2023), svofski(09.01.2023)
Больше фракталов хороших и разных. Кривая дракона (дракон Хартера-Хейтуэя) на основе программы С.Телицына из ZX Review 5-6/1997. Переделал (полностью переписал) для 8080, оптимизировал по размеру - уложился в 126 байт с использованием бейсиков 2.5 и 2.62. Доработал: добавил рисование первого шага, добавил регулировку длины шага, увеличил разрядность счетчика вдвое (теперь максимальный порядок 16). На картинке 13й порядок, тут еще 8, 11 и 15.
Загрузка и запуск:
BLOAD""
A=USR(&7000)
После непродолжительного рисования выходит в бейсик.
Improver(11.01.2023), parallelno(12.01.2023), svofski(11.01.2023)
Ня.
Больше игр нет
Мона симпатичнее дракона, дракон симпатичнее треугольников, но и размеры распределились соответственно.
Все вместе было бы крутое мегадемо =)
Больше игр нет
Эклектичная мегадема на 512 байт. Можно и дракона сильнее раскрыть - нарисовать драконов разных порядков в разных плоскостях и переключать. На 6128 так можно даже короткую анимацию запилить. Возможностей много, все пути открыты.
Подскажите, а сколько цветов палитры реально поменять от строки к строке?
Один точно можно, вот пример (в части с летучей мышью). Вероятно можно и два, но это желательно протестировать на реале.
Это связано с низкой скоростью CPU? Или с тем, что палитру можно менять только в каких фиксированных положениях луча?
Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)
Ваши права
Ответить с цитированием
