Edge Grinder для ZS GMX

[izzx]

Это все может улететь куда-нибудь в другую страницу, чтобы освободить целиком память с #4000 до #8000?

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

Кстати, почитал старые статьи Зонова про гомикс, там написано, что экраны подключаются взамен основных, с #4000. Нипанятна (с)

Видимо взамен тех, что были на #4000. Видео жёстко привязано к страницам 39, 3b,79,7b. Главное в них писать что надо. А в слоте они могут быть и не включены ни в каком.

[reddie]

Набросал примерный код вывода через стек. Задействованы абсолютно все регистры, зато максимальная скорость.
Выводим группами по 16 байт, 5 групп (последняя - 14 байт, т.к. ширина окна 78).
И выводим линию целиком, а не лево+право, т.к. вставка затычек в код при таком способе сожрет всю экономию.

_SPAD1		LD		SP,IY		;первый адрес в линии (откуда берем данные), IY задается перед выводом
		POP		AF,DE,HL,IX
		EXX,EXA
		POP		AF,BC,DE,HL
		LD		(_SPAD2+1),SP
		LD		SP,#C010	;все адреса назначения задаются в явном виде (при развертывании кода)
		PUSH	HL,DE,BC,AF
		EXX,EXA
		PUSH	IX,HL,DE,AF
_SPAD2		LD		SP,NN
		POP		AF,DE,HL,IX
		EXX,EXA
		POP		AF,BC,DE,HL
		LD		(_SPAD3+1),SP
		LD		SP,#C020		
		PUSH	HL,DE,BC,AF
		EXX,EXA
		PUSH	IX,HL,DE,AF
_SPAD3		LD		SP,NN
		POP		AF,DE,HL,IX
		EXX,EXA
		POP		AF,BC,DE,HL
		LD		(_SPAD4+1),SP
		LD		SP,#C030		
		PUSH	HL,DE,BC,AF
		EXX,EXA
		PUSH	IX,HL,DE,AF
_SPAD4		LD		SP,NN
		POP		AF,DE,HL,IX
		EXX,EXA
		POP		AF,BC,DE,HL
		LD		(_SPAD5+1),SP
		LD		SP,#C040		
		PUSH	HL,DE,BC,AF
		EXX,EXA
		PUSH	IX,HL,DE,AF
_SPAD5		LD		SP,NN
		POP		DE,HL,IX
		EXX
		POP		AF,BC,DE,HL
		LD		SP,#C04E		
		PUSH	HL,DE,BC,AF
		EXX
		PUSH	IX,HL,DE

		ADD		IY,BC	;перебросили линию, пересчитываем адрес данных карты

По времени: каждая группа, кроме последней, жрет 232Т, последняя + ADD IY,BC еще 196 (если без Wait).
Перемножаем: 4х232+196=1124/1164 (с Wait) на линию, 160 линий = 179840/186240 на экран.
Сравниваем с LDI (тоже переделанным): 16х80=1280,+перевод строки еще 22=1232, х160=197120.
Причем LDI команда четная, без Wait. В итоге выигрыш от стека на машине с Wait заметно хуже.
Если точнее (но все равно примерно): разница LDI/стек без Wait около 17 тыс, с Wait около 11 тыс.

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


upd: 1280+22=1302, а не 1232. Считал другой пример, вот и ошибся. Итого 1302х160=208320

[izzx]

16х80=1280,+перевод строки еще 22=1232, х160=197120.

Вот тут я насчитал 203200. И умножал на 78.

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

Жаль эмулятор что-то мудрит с подсчётом тактов. Попробую потестировать ещё.
Ну и что за новый формат карты интересно узнать.

[reddie]

Вот тут я насчитал 203200. И умножал на 78.

Перевод строки 22 такта это LD BC,NN:ADD HL,BC (т.к. копируем 80 байт - DE не трогаем, оно всегда правильное)
При таком варианте и получается указанное у меня число =) Проще копировать 80, чем 78.

Формат примерно тот же, но с нюансами. Сейчас у нас карта разложена экранами по страницам, от края до края экрана.
А можно сделать с перекрытием экранов. Что увеличит расход памяти, но избавит от вывода по половинкам.
То есть в первой странице лежит (пока пишу условно) карта с 1 по 200 столбик, а во второй не с 201, а со 122 (201-ширина)
Получается что: когда в 1-й странице доходим до столбика 121 - "упираемся" в край страницы.
Дальше вместо склеивания страниц просто переключаемся на следующую и выводим со 122 столбика.
Надеюсь, суть понятна: края экранов перекрывают друг друга в соседних страницах.
Проблема в том, что нужно "удлинять" экраны путем дробления их по горизонтали на 2 или даже 4 части.
Потому что при полной высоте экрана (160) получаем в странице 16384/160=102 столбца. А у нас ширина окна 80.
То бишь при таком хранении будет огромный расход памяти на перекрытие краев.
Можно разбить карту на горизонтальные куски, скажем, 4. Тогда в страницу влезет уже 16384/40=409 столбцов.
Соответственно, распухание карты составит примерно 1/5 от исходного размера (409/80 будет 5 если грубо).
Это уже вполне терпимо, и даже при удвоенном расходе памяти на "попиксельный" скролл ее хватит.
Надеюсь, суть понятна. Остается переписать генерацию карты под такой формат выкладки =)

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

Да, там при подсчете с LDIR обсчитался по запаре, получается больше моих 197 тысяч. Бывает...

[izzx]

Можно разбить карту на горизонтальные куски, скажем, 4.

Это хорошо. Вывести сначала 3 куска, а потом ждать прерывания. Иначе же оно попортит часть карты.
Выводящий код достаточно хранить для одного куска, как я понимаю. Иначе код не влезет в одну страницу.

[reddie]

Вывести сначала 3 куска, а потом ждать прерывания. Иначе же оно попортит часть карты

Да, про этот нюанс и хотел сказать. Что при выводе через стек придется мудрить с прерываниями.

достаточно хранить для одного куска, как я понимаю. Иначе код не влезет в одну страницу

Нет, если адреса задаются в явном виде - разворачивается код целиком для всего экрана (окна вывода).
Вроде должен влазить в 16к, если через push-pop, там же на 2 байта данных 2 байта (push+pop) и немного обвязки.

[izzx]

Нет, если адреса задаются в явном виде - разворачивается код целиком для всего экрана (окна вывода).

Да, точно.

Вроде должен влазить в 16к, если через push-pop, там же на 2 байта данных 2 байта (push+pop) и немного обвязки.

Да. Там же и не весь экран надо выводить. Должно влезть.

upd. Эмуль у меня такты делит на два ). Может я опять что-то не донастроил. Но про команду ldi говорит 8 тактов. И все какие посмотрел делит на 2. Получается вывод фона сейчас 115*2=230к тактов. Можно попытаться выиграть заветные 20. Но если всего 123*2=246к тактов, то надо сильно постараться. У меня пока вся игра укладывалась в эмуляторные 286 тактов, так что на самом деле надо выжать 40к...

[reddie]

Получается вывод фона сейчас 115*2=230к тактов

Ну это и так вполне было понятно =) умножаем 78х160х16 получаем уже 200 тысяч, плюс обвязка двух циклов.
Вывод по стеку, кстати, никак не влазит в 16Кб, хоть push-pop, хоть pop-ld (nn). У первого много обвязки, у второго размер данных х2.
Окно вывода 78х160=12480х2 = почти 25 тысяч через второй способ. Через первый мм чуть поменьше.
Можно сделать оба адреса пересчитываемыми в коде (откуда + куда), но жрать станет больше по времени, по сути, сравняется с LDI.
Остается хардкорный вариант раскидать музу и весь остальной код по страницам, оставив в нулевой лишь блок управления =)

[izzx]

Остается хардкорный вариант раскидать музу и весь остальной код по страницам, оставив в нулевой лишь блок управления =)

Музыку не просто перенести. Она скомпилирована с кучей абсолютных адресов. Хотя тут есть спецы по музыке с амстрад, они наверно что хошь перенесут. Можно пока что музыку тоже выключить. Посмотреть что получится. Я прикинул что надо делить на 5 частей, потому что фон состоит из пяти тайлов. Легче будет растянуть в полоски. И 3/5 вывода должно почти ровно в прерывание влезать.

[reddie]

Музыку не просто перенести. Она скомпилирована с кучей абсолютных адресов

Там даже не в амстраде суть, а в перелопачивании всех адресов вручную, на крайняк.
Если в коде нет вычисляемых выражениями адресов - это муторно, но вполне осуществимо.

3/5 вывода должно почти ровно в прерывание влезать

Ну, если смириться с двухкратным размером кода переброса экрана, можно и с прерываниями выводить.
Конструкциями вида POP HL:LD (NN),HL - так и код проще развернуть будет, и стек обработать.
Процедура обработки прерывания сверяет адрес стека (или кода), если идет переброс -
достаточно восстановить всего 2 байта под стеком, причем мы знаем, каких - это HL.
Примерно так оно будет выглядеть:

INTERR	LD	(CURRSP+1),SP
	LD	SP,INTBUF+100
	PUSH	AF,BC,DE,HL...	;сохраняем все изменяемые регистры
	BLABLA			;процедуры на прерываниях
	......
	POP	...HL,DE,BC	;восстанавливаем, кроме AF
	LD	A,(CURRSP+2)	;старший байт стека
	RLA			;если SP>=#8000 - идет переброс
	JR	C,CURRSP-1
	POP	AF		;иначе нормальный выход
	LD	SP,(CURRSP+1)
	EI
	RET

	POP	AF
CURRSP	LD	SP,0
	POP	HL		;адрес возврата в процедуру вывода
	LD	(RET_JP+1),HL
	LD	HL,(INTBUF+92)	;адрес хранения пары HL
	PUSH	HL		;востанавливаем затертых 2 байта
	POP	HL
	EI
RET_JP	JP	0

INTBUF	DEFS	100		;буфер с запасом под временный стек

Буфер должен быть именно с запасом, т.к. музыка, переключение страниц и прочее.