snark13
72ce66275e
Спрайтовая графика поверх accel block-copy (docs/sprite-api-design.md): - Ядро блиттинга: leaf'ы _bgi_blit_rows_raw (dst фикс, только src-страйд) / _bgi_copy_rows_raw (getimage) / _bgi_heal_rows_raw (src==dst). DI один на спрайт (санкция: малый спрайт под одним DI аудио не рвёт); src[0]-фикс снят (точная MAME подавляет CPU-байт триггера записи — на железе перепроверить; для heal был избыточен и снят безусловно). - Общие bracket-free ядра _gfx_blit_full/_gfx_heal_full (полная ширина: клип по экрану + split >256 для putimage) + лин _gfx_blit_sprite/ _gfx_heal_sprite (кадр ≤64, без split, 8-бит w/h) + noclip-варианты (клип-кода нет → полный codegen-win). Имя *_full (не *_clip) — «clip» двусмысленно (sprite-ядра тоже клипуют; различитель — ширина/split). - Движок retained-модели <sprite.h>: sprite_init/update/flip + inline move/frame/show/hide/touch; drawn[2] per-page внутри структуры; кадр — двухпроходно heal ВСЕ -> блит ВСЕ под одной W3-скобкой/банком на проход. - Флаг gfx_sprite_clip(on/off): приложение, само следящее за границами, отключает клип (~+19% на анимации; диспетч пока через if — funcptr далее). - putsprite/movesprite/gfx_blit/putimage(COPY)/getimage переведены на ядро. Тесты: examples/balls (движок, дабл-буфер, boundary-тест клипа), tests/sprites (RAM PASS, клип 4 края, атлас), tests/blitw (trig-leak), tests/spriteclip (hardware-probe: железо НЕ режет за краем -> клип нужен), tests/blitperf, tests/gfxbanks. size-baseline обновлён (53 программы). Co-Authored-By: Claude Opus 4.8 <noreply@anthropic.com>
91 lines
4.7 KiB
C
91 lines
4.7 KiB
C
/*
|
||
* _bgi_blit_rows_raw — специализация accel block-copy для БЛИТА
|
||
* (буфер → экран): dst ФИКСИРОВАН (адрес экрана base+x; строку выбирает
|
||
* Port_Y, dstride == 0 по определению), src двигается на sstride (ширину
|
||
* картинки) на строку. Выделен из _bgi_copy_rows_raw (2026-07-12,
|
||
* профиль examples/balls): у блита dst-цепочка (ld a,e; add; ld e,a;
|
||
* ld a,d; adc; ld d,a ≈ 24Т/строку) — мёртвый груз, т.к. dst не меняется;
|
||
* здесь её нет вообще. src-страйд SMC-патчится в 8-битную adc-цепочку
|
||
* (константа на вызов). Универсальный _bgi_copy_rows_raw остаётся для
|
||
* getimage (grab: dst двигается, src фикс — другая специализация).
|
||
*
|
||
* ВХОД (__sdcccall(1)): src→HL, dst→DE (фикс); стек: w 4(ix), h 5(ix),
|
||
* sstride 6/7(ix), y0 8(ix). w — байт/строку за burst (1..256, 0=256);
|
||
* h — строк (1..256, 0=256); sstride — шаг адреса src между строками;
|
||
* y0 — стартовый Port_Y. Callee-pop 5 байт.
|
||
*
|
||
* Raw: клиппинга НЕТ (вызывающий), W3 замаплен (_bgi_begin/_bgi_end
|
||
* снаружи), банк выставлен вызывающим (0x5C прозрачный / 0x50 обычный).
|
||
* Буфер src обязан быть ВНЕ W3 (< 0xC000). Полосы > 256 режет вызывающий.
|
||
*
|
||
* ОДИН DI на весь блит (arm + все строки): убирает per-row EI-окно, где
|
||
* CBL-ISR мог пере-армировать акселератор своим размером блока, и тесней
|
||
* loop (санкция пользователя 2026-07-12: малый спрайт под одним DI аудио
|
||
* не рвёт). ВНИМАНИЕ: h ограничен малыми спрайтами — большие блиты
|
||
* (putimage 256 строк) вызывающий обязан резать на чанки ≤16 строк.
|
||
*
|
||
* Квирк CPU-байта write-триггера (см. _bgi_copy_rows_raw): src[0]
|
||
* предчитывается и подставляется в A через EX AF,AF' — CPU-цикл
|
||
* LD (DE),A кладёт корректный src[0] при любом банке.
|
||
*
|
||
* Клоббер: AF/AF'/BC/DE/HL; IX сохраняется.
|
||
*/
|
||
|
||
#include "../_bgi.h"
|
||
|
||
void _bgi_blit_rows_raw(const uint8_t *src, uint8_t *dst,
|
||
uint8_t w, uint8_t h,
|
||
int sstride, uint8_t y0) __naked
|
||
{
|
||
(void)src; (void)dst; (void)w; (void)h; (void)sstride; (void)y0;
|
||
__asm
|
||
push ix
|
||
ld ix, #0
|
||
add ix, sp
|
||
;; SMC: размер блока <- w (immediate у ld a,#n — требование FSM)
|
||
ld a, 4 (ix)
|
||
ld (br_len_imm), a
|
||
;; SMC: src-страйд — константа на вызов (8-битная adc-цепочка)
|
||
ld a, 6 (ix)
|
||
ld (br_slo_imm), a
|
||
ld a, 7 (ix)
|
||
ld (br_shi_imm), a
|
||
ld b, 5 (ix) ; B = счётчик строк (0 => 256: djnz)
|
||
ld c, 8 (ix) ; C = y
|
||
di ; один DI на весь блит
|
||
ld d, d ; 0x52 — режим размера блока
|
||
ld a, #0
|
||
br_len_imm = . - 1
|
||
ld b, b ; 0x40 — стоп (B=счётчик не тронут)
|
||
br_row:
|
||
ld a, c
|
||
out (#0x89), a ; Port_Y = y
|
||
inc c
|
||
;; ld a, (hl) ; A = src[0] (accel выключен)
|
||
;; ex af, af' ; спрятать src[0]
|
||
ld l, l ; 0x6D — армировать копию строки
|
||
ld a, (hl) ; burst: src -> память акселератора
|
||
;; ex af, af' ; A = src[0] — CPU-байт триггера записи
|
||
ld (de), a ; burst: память акселератора -> dst (фикс)
|
||
ld b, b ; 0x40 — стоп
|
||
;; src += sstride (dst НЕ двигается — dstride 0)
|
||
ld a, l
|
||
add a, #0
|
||
br_slo_imm = . - 1
|
||
ld l, a
|
||
ld a, h
|
||
adc a, #0
|
||
br_shi_imm = . - 1
|
||
ld h, a
|
||
djnz br_row
|
||
ei ; закрыть DI-окно блита
|
||
pop ix
|
||
;; callee-pop 5 байт (w,h,sstride:2,y0)
|
||
pop hl ; ret-адрес
|
||
pop af
|
||
pop af
|
||
inc sp
|
||
jp (hl)
|
||
__endasm;
|
||
}
|