Ретро-ЯП Millfork для Atari, Apple II, ZX Spectrum, MSX, CP/M, NES, Game Boy и MS-DOS

[breeze]

Пока вы тут спорите об эмуляторах, я потиху начал разбираться с графикой, и как это всё прикрутить к Millfork.
Прошерстив кучу текстов и поковыряв исходники ASM, что генерит Graph2Font, получил такую картину:



Для начала определяем режим работы Antic, для примера обычный текстовый режим 2.
Создадим anticMap (DisplayList) в виде array(byte), в котором опишем режим отображения блока из 8 линий.

Там же зададим карту с тайлами array(byte) charMap, где какой символ будет расположен (0x00 - пустое место).

И останется лишь задать адрес расположения в памяти $D402, $D403

Надо отдать должное MillFork без проблем даёт работать с «указателями» на расположение массива в памяти и даже больше
внутри самого массива можно указать на расположение в памяти (вот такая рекурсия).

Для чего это нужно я не совсем пока понял, но примерах, что мне встречались, DisplayList для Antic заканчивается JPM на начало самого себя.

Так не менее интересный момент. Когда я захотел использовать свой шрифт, то выяснился нюанс. Поскольку память ATARI устроена таким образом,
что адрес расположения шрифта задаётся только страшим байтом адреса в $D409, то это внесло некоторые ограничения и шрифт должен располагаться кратно 0x0400.

Встала дилемма, у нас-то не ассемблер и ALIGN не сделать. Однако, как выяснилось Millfork писали умные люди и уже обо всём позаботились. Достаточно при
создании массива указать выравнивание и проблема решена

array(byte) font align(0x0400) = [

Ну и поигравшись с разными значениями ANTIC можно получить не менее умилительные шрифты



p.s. с прерываниями я пока не заморачивался, хотел разобраться для начала с базовой частью.

[andrews]

Здесь "выхлоп" не на "умильные шрифты" может быть направлен, а не на английские шрифты и всякие научные знаки типа производной, интеграла и прочего, имхо.

[Shiny]

align(0x0400)

Не многовато? для шрифтов хватит выравнивание по 256 байт.

- - - Добавлено - - -

Здесь "выхлоп" не на "умильные шрифты" может быть направлен, а не на английские шрифты и всякие научные знаки типа производной, интеграла и прочего, имхо.

и лучше на уникодные эмодзи и всякую требуху.

[breeze]

align(0x0400)

Не многовато? для шрифтов хватит выравнивание по 256 байт.

Да вот видимо многовато Вообще брал из исходников graph2font:

	.ALIGN $0400
fnt	ins "logo2.fnt"

У них там вообще какой-то дико навороченный код с туевой хучей IFDEF.

К слову вопрос, что-то у меня не получается вектор прерываний указать. В дебаге не попадаю в эту область ни при каком раскладе.

Если я правильно понял, нужно сделать следующие шаги:

1) Запрещаем обработчик:

    LDA #0
    STA $D40E

2) Устанавливаем вектор на адрес с обработчиком:

    LDA #lo(handler1)
    STA $FFFA
    LDA #hi(handler1)
    STA $FFFB

3) Разрешаем обработчик:

    LDA #$C0
    STA $D40E
    RTS

И нифига по адресу handler1 мы так и не попадаем ни разу. Причём в том же куске из graph2font это работает на ура. Может тут тоже какое «выравнивание по памяти необходимо» ?

Причём интересно, что в примерах из книжек они вектор выставляют по адресу $0200, $0201 кому верить?

- - - Добавлено - - -

Забавно, нашел в чём дело, сбил с толку комментарий:

    ;switch off ROM to get 16k more ram
    lda    #$fe
    sta    $D301

Это не просто отключает 16к, без этого вообще NMI не фунциклирен.

p.s. К слову выравнивание по $0400 в graph2font обусловлено тем, что они на лету шрифты чанки переключают для следующей области экрана

[Shiny]

Просто .xex без извращений:

*=$2000
fnt .file "font.fnt"
start: 
 lda #font/256
 sta 756
 rts
*=$2E0
.word start

Что касается прерывания, то непонятно, что ты хочешь. Можно включить VBlank Interrupt(см. в моих исходниках 16К вызов jsr SETVBV). Если ты берешься за адреса $200-$201, то это Display List Interrupt. В этом случае нужно установить бит 7 для одной из строк - впиши вместо 2 $82 и на этой линии экрана произойдет прерывание. Но если ты поменяешь какие-то параметры экрана - шрифт и цвет, то параметры применятся ко всему экрану. Сам увидишь.

[andrews]

Просто .xex без извращений:

в смысле? это ж исходник с ассемблером, да? Как из него .xex получить?

[Shiny]

тот же xasm https://github.com/pfusik/xasm

[andrews]

xasm ругается на это

fnt .file "font.fnt"

ERROR: Illegal instruction

[Shiny]

тогда так

	ORG $2000
fnt ins "HOHL.FNT"
start
	lda #fnt/256
	sta 756
	ldy #0
setc	tya
	sta (88),y
	iny
	bne setc
	jmp *
	run start

[andrews]

Так работает. Русский шрифт есть? И как что-то выводить по-русски?