libbgi: выделить графику BGI в отдельную библиотеку + тест спрайтов
Графика вынесена из libc/ в новую библиотеку libbgi/:
- common/ — mode-agnostic математика и состояние (один исходник,
.rel попадает в оба driver-архива);
- bgi256/ + bgi16/ — mode-specific leaf'ы (raw-плот/чтение/спаны);
- include/ — graphics.h + gfx.h; _bgi.h — внутренний заголовок.
Собираются lib/bgi256.lib (и bgi16.lib в Фазе 2); выбор режима
линковкой через sprinter-cc --gfx 256|16. libc/ теперь без графики.
tests/bgi_img — тест спрайтов getimage/putimage/imagesize (5 операций
COPY/XOR/OR/AND/NOT + XOR-round-trip + self-check imagesize).
Проверен автотестом в MAME.
Примечание: make size-check пока красный (gfx_dbuf/gfx_demo выросли
после реорга) — закрыть по завершении миграции libbgi.
Co-Authored-By: Claude Opus 4.8 <noreply@anthropic.com>
This commit is contained in:
@@ -0,0 +1,21 @@
|
||||
/*
|
||||
* _bgi_clear_raw — залить всё поле 320×256 цветом color, mode 0x81.
|
||||
* Построчный hfill: 256 строк × 2 burst'а (256 + 64 байта) = 512.
|
||||
* W3-naive: вызывающий обрамляет begin/end.
|
||||
*/
|
||||
|
||||
#include "../_bgi.h"
|
||||
|
||||
void _bgi_clear_raw(uint8_t color)
|
||||
{
|
||||
_gfx_acc_color = color;
|
||||
for (int y = 0; y < GFX_HEIGHT; y++) {
|
||||
_gfx_acc_y = (uint8_t)y;
|
||||
_gfx_acc_addr = _gfx_addr_base; /* burst 256 байт */
|
||||
_gfx_acc_len = 0;
|
||||
_gfx_hfill256_chunk();
|
||||
_gfx_acc_addr = (uint16_t)(_gfx_addr_base + 256); /* burst 64 байта */
|
||||
_gfx_acc_len = 64;
|
||||
_gfx_hfill256_chunk();
|
||||
}
|
||||
}
|
||||
@@ -0,0 +1,28 @@
|
||||
/*
|
||||
* _bgi_hspan_raw — горизонтальная линия len пикселей от (x,y),
|
||||
* mode 0x81, через Fill-burst'ы акселератора (до 256 байт за выстрел).
|
||||
* W3-naive: вызывающий обрамляет begin/end.
|
||||
*/
|
||||
|
||||
#include "../_bgi.h"
|
||||
|
||||
void _bgi_hspan_raw(int x, int y, int len, uint8_t color)
|
||||
{
|
||||
if ((unsigned)y >= GFX_HEIGHT) return;
|
||||
if (x < 0) { len += x; x = 0; }
|
||||
if (x >= GFX_WIDTH) return;
|
||||
if (x + len > GFX_WIDTH) len = GFX_WIDTH - x;
|
||||
if (len <= 0) return;
|
||||
|
||||
_gfx_acc_color = color;
|
||||
_gfx_acc_y = (uint8_t)y;
|
||||
_gfx_acc_addr = (uint16_t)(_gfx_addr_base + (unsigned)x);
|
||||
|
||||
while (len > 0) {
|
||||
int chunk = len > 256 ? 256 : len;
|
||||
_gfx_acc_len = (chunk == 256) ? 0 : (uint8_t)chunk;
|
||||
_gfx_hfill256_chunk();
|
||||
len -= chunk;
|
||||
_gfx_acc_addr += chunk;
|
||||
}
|
||||
}
|
||||
@@ -0,0 +1,44 @@
|
||||
/*
|
||||
* _bgi_mode_set (drv256) — вход в графический режим 320×256×256.
|
||||
*
|
||||
* Загружает EGA-совместимые цвета 0..15 в палитру 0, чтобы setcolor(RED)
|
||||
* и прочие BGI-константы давали ожидаемый цвет. Заполняет границы
|
||||
* экрана в состоянии BGI. Возвращает предыдущий видеорежим.
|
||||
*/
|
||||
|
||||
#include "../_bgi.h"
|
||||
#include <gfx.h>
|
||||
|
||||
/* 16 EGA-цветов, формат записи палитры (B, G, R, pad). */
|
||||
static const uint8_t _bgi_ega_pal[16 * 4] = {
|
||||
0, 0, 0, 0, /* 0 BLACK */
|
||||
168, 0, 0, 0, /* 1 BLUE */
|
||||
0, 168, 0, 0, /* 2 GREEN */
|
||||
168, 168, 0, 0, /* 3 CYAN */
|
||||
0, 0, 168, 0, /* 4 RED */
|
||||
168, 0, 168, 0, /* 5 MAGENTA */
|
||||
0, 84, 168, 0, /* 6 BROWN */
|
||||
168, 168, 168, 0, /* 7 LIGHTGRAY */
|
||||
84, 84, 84, 0, /* 8 DARKGRAY */
|
||||
255, 84, 84, 0, /* 9 LIGHTBLUE */
|
||||
84, 255, 84, 0, /* 10 LIGHTGREEN */
|
||||
255, 255, 84, 0, /* 11 LIGHTCYAN */
|
||||
84, 84, 255, 0, /* 12 LIGHTRED */
|
||||
255, 84, 255, 0, /* 13 LIGHTMAGENTA */
|
||||
84, 255, 255, 0, /* 14 YELLOW */
|
||||
255, 255, 255, 0, /* 15 WHITE */
|
||||
};
|
||||
|
||||
uint8_t _bgi_mode_set(void)
|
||||
{
|
||||
uint8_t prev = _videomode_raw_get();
|
||||
_videomode_raw_set(GFX_MODE_320x256x256);
|
||||
_gfx_bank = 0x50;
|
||||
gfx_set_visible_page(0);
|
||||
gfx_set_draw_page(0);
|
||||
gfx_pal_load(0, 0, 16, _bgi_ega_pal);
|
||||
_bgi_maxx = GFX_WIDTH - 1;
|
||||
_bgi_maxy = GFX_HEIGHT - 1;
|
||||
_bgi_maxcolor = 255;
|
||||
return prev;
|
||||
}
|
||||
@@ -0,0 +1,30 @@
|
||||
/*
|
||||
* _bgi_plot_raw — пиксель (x,y) цветом color, mode 0x81.
|
||||
*
|
||||
* "Raw" = W3-naive: вызывающий уже сделал _gfx_w3_video_begin (W3 на
|
||||
* видеобанке, DI). Адресация: CPU _gfx_addr_base + x, Port_Y (0x89) = y.
|
||||
*
|
||||
* Скретч отдельный от _gfx_acc_* — чтобы putpixel внутри цикла
|
||||
* Брезенхэма не топтал внешнее состояние акселератора.
|
||||
*/
|
||||
|
||||
#include "../_bgi.h"
|
||||
|
||||
static uint8_t _gfx_pp_y;
|
||||
static uint16_t _gfx_pp_addr;
|
||||
static uint8_t _gfx_pp_color;
|
||||
|
||||
void _bgi_plot_raw(int x, int y, uint8_t color)
|
||||
{
|
||||
if ((unsigned)x >= GFX_WIDTH || (unsigned)y >= GFX_HEIGHT) return;
|
||||
_gfx_pp_y = (uint8_t)y;
|
||||
_gfx_pp_addr = (uint16_t)(_gfx_addr_base + (unsigned)x);
|
||||
_gfx_pp_color = color;
|
||||
__asm
|
||||
ld a, (__gfx_pp_y)
|
||||
out (#0x89), a
|
||||
ld hl, (__gfx_pp_addr)
|
||||
ld a, (__gfx_pp_color)
|
||||
ld (hl), a
|
||||
__endasm;
|
||||
}
|
||||
@@ -0,0 +1,27 @@
|
||||
/*
|
||||
* _bgi_read_raw — прочитать пиксель (x,y) БЕЗ своей W3-скобки
|
||||
* (вызывающий уже сделал _gfx_w3_video_begin). Для блиттинга image:
|
||||
* getimage/putimage читают тысячи пикселей в одной скобке.
|
||||
* За пределами экрана возвращает 0.
|
||||
*/
|
||||
|
||||
#include "../_bgi.h"
|
||||
|
||||
static uint8_t _gfx_gpr_y;
|
||||
static uint16_t _gfx_gpr_addr;
|
||||
static uint8_t _gfx_gpr_color;
|
||||
|
||||
uint8_t _bgi_read_raw(int x, int y)
|
||||
{
|
||||
if ((unsigned)x >= GFX_WIDTH || (unsigned)y >= GFX_HEIGHT) return 0;
|
||||
_gfx_gpr_y = (uint8_t)y;
|
||||
_gfx_gpr_addr = (uint16_t)(_gfx_addr_base + (unsigned)x);
|
||||
__asm
|
||||
ld a, (__gfx_gpr_y)
|
||||
out (#0x89), a
|
||||
ld hl, (__gfx_gpr_addr)
|
||||
ld a, (hl)
|
||||
ld (__gfx_gpr_color), a
|
||||
__endasm;
|
||||
return _gfx_gpr_color;
|
||||
}
|
||||
@@ -0,0 +1,50 @@
|
||||
/*
|
||||
* _bgi_vspan_raw — вертикальная линия len пикселей от (x,y),
|
||||
* mode 0x81. Вертикальный Fill акселератора сам инкрементирует Port_Y,
|
||||
* так что вся колонка (высота 256) — один burst. W3-naive.
|
||||
*/
|
||||
|
||||
#include "../_bgi.h"
|
||||
|
||||
/* Вертикальный Fill: _gfx_acc_len пикселей в колонке _gfx_acc_addr,
|
||||
* верхняя строка _gfx_acc_y. Про SMC и правила FSM акселератора —
|
||||
* см. _gfx_hfill256.c. */
|
||||
static void vfill_chunk(void) __naked
|
||||
{
|
||||
__asm
|
||||
ld a, (__gfx_acc_len)
|
||||
ld (_vfill256_len_imm), a
|
||||
|
||||
ld a, (__gfx_acc_y)
|
||||
out (#0x89), a ; стартовый Y
|
||||
|
||||
ld a, (__gfx_acc_color)
|
||||
ld c, a
|
||||
ld hl, (__gfx_acc_addr)
|
||||
|
||||
ld d, d ; 0x52 — режим размера блока
|
||||
ld a, #0 ; immediate-длина (патчится)
|
||||
_vfill256_len_imm = . - 1
|
||||
ld e, e ; 0x5B — вертикальный Fill
|
||||
ld a, c ; A = цвет
|
||||
ld (hl), a ; выстрел
|
||||
ld b, b ; 0x40 — выключить
|
||||
ret
|
||||
__endasm;
|
||||
}
|
||||
|
||||
void _bgi_vspan_raw(int x, int y, int len, uint8_t color)
|
||||
{
|
||||
if ((unsigned)x >= GFX_WIDTH) return;
|
||||
if (y < 0) { len += y; y = 0; }
|
||||
if (y >= GFX_HEIGHT) return;
|
||||
if (y + len > GFX_HEIGHT) len = GFX_HEIGHT - y;
|
||||
if (len <= 0) return;
|
||||
|
||||
/* GFX_HEIGHT = 256, полная колонка — один accel-burst. */
|
||||
_gfx_acc_color = color;
|
||||
_gfx_acc_y = (uint8_t)y;
|
||||
_gfx_acc_addr = (uint16_t)(_gfx_addr_base + (unsigned)x);
|
||||
_gfx_acc_len = (len == 256) ? 0 : (uint8_t)len;
|
||||
vfill_chunk();
|
||||
}
|
||||
@@ -0,0 +1,12 @@
|
||||
/*
|
||||
* _gfx_acc256 — скретч акселератора для 256-цветных raw-примитивов
|
||||
* (модуль только с данными). Общий для hline/vline/clear; однопоточно —
|
||||
* GFX работает с выключенными прерываниями между W3-begin/end.
|
||||
*/
|
||||
|
||||
#include "../_bgi.h"
|
||||
|
||||
uint8_t _gfx_acc_color;
|
||||
uint8_t _gfx_acc_y;
|
||||
uint8_t _gfx_acc_len; /* 0 = 256 — конвенция акселератора */
|
||||
uint16_t _gfx_acc_addr;
|
||||
@@ -0,0 +1,45 @@
|
||||
/*
|
||||
* _gfx_hfill256_chunk — горизонтальный Fill-burst акселератора:
|
||||
* _gfx_acc_len байт цвета _gfx_acc_color с адреса _gfx_acc_addr на
|
||||
* строке _gfx_acc_y. Pre: W3 замаплен на видеобанк, DI активен.
|
||||
*
|
||||
* Опкоды акселератора (docs/converted/accel_r.txt):
|
||||
* LD D,D (0x52) режим «задать размер блока»; СЛЕДУЮЩИЙ байт — длина,
|
||||
* ОБЯЗАН быть immediate-операндом LD A,n (0x3E)
|
||||
* LD C,C (0x49) горизонтальный Fill (LD (HL),A заливает n байт)
|
||||
* LD B,B (0x40) выключить акселератор
|
||||
*
|
||||
* Байт длины патчится SMC — HOME после загрузки DSS это RAM, патчить
|
||||
* собственный .EXE безопасно. Вставлять другой `ld a,#n` между LD C,C
|
||||
* и стреляющим LD (HL),A нельзя — FSM акселератора перечитает immediate
|
||||
* как новый размер блока.
|
||||
*/
|
||||
|
||||
#include "../_bgi.h"
|
||||
|
||||
void _gfx_hfill256_chunk(void) __naked
|
||||
{
|
||||
__asm
|
||||
;; Пропатчить immediate LD A,#n байтом длины.
|
||||
ld a, (__gfx_acc_len)
|
||||
ld (_hfill256_len_imm), a
|
||||
|
||||
ld a, (__gfx_acc_y)
|
||||
out (#0x89), a ; Port_Y = y
|
||||
|
||||
;; Цвет в C и адрес в HL готовим ДО взведения акселератора.
|
||||
ld a, (__gfx_acc_color)
|
||||
ld c, a
|
||||
ld hl, (__gfx_acc_addr)
|
||||
|
||||
;; --- ПОСЛЕДОВАТЕЛЬНОСТЬ АКСЕЛЕРАТОРА ---
|
||||
ld d, d ; 0x52 — режим размера блока
|
||||
ld a, #0 ; 0x3E nn — размер (nn патчится выше)
|
||||
_hfill256_len_imm = . - 1
|
||||
ld c, c ; 0x49 — горизонтальный Fill
|
||||
ld a, c ; 0x79 — A = цвет (НЕ ещё один ld a,#n)
|
||||
ld (hl), a ; выстрел; заливает _gfx_acc_len байт
|
||||
ld b, b ; 0x40 — выключить
|
||||
ret
|
||||
__endasm;
|
||||
}
|
||||
@@ -0,0 +1,33 @@
|
||||
/*
|
||||
* getpixel (bgi256) — цвет пикселя (x,y), mode 0x81. Полностью inline
|
||||
* (bounds + W3-скобка + чтение пикселя), без вызовов _bgi_read/raw.
|
||||
* Возвращает 0 вне экрана.
|
||||
*/
|
||||
#include "../_bgi.h"
|
||||
|
||||
static uint8_t _gp_y;
|
||||
static uint16_t _gp_addr;
|
||||
static uint8_t _gp_color;
|
||||
|
||||
unsigned getpixel(int x, int y)
|
||||
{
|
||||
if ((unsigned)x >= GFX_WIDTH || (unsigned)y >= GFX_HEIGHT) return 0;
|
||||
_gp_y = (uint8_t)y;
|
||||
_gp_addr = (uint16_t)(_gfx_addr_base + (unsigned)x);
|
||||
__asm
|
||||
di
|
||||
in a, (#0xE2)
|
||||
ld (__gfx_saved_w3), a
|
||||
ld a, (__gfx_bank)
|
||||
out (#0xE2), a
|
||||
ld a, (_gp_y)
|
||||
out (#0x89), a
|
||||
ld hl, (_gp_addr)
|
||||
ld a, (hl)
|
||||
ld (_gp_color), a
|
||||
ld a, (__gfx_saved_w3)
|
||||
out (#0xE2), a
|
||||
ei
|
||||
__endasm;
|
||||
return _gp_color;
|
||||
}
|
||||
@@ -0,0 +1,39 @@
|
||||
/*
|
||||
* putpixel (bgi256) — точка (x,y) цветом color, mode 0x81.
|
||||
* ПОЛНОСТЬЬЮ inline: bounds + W3-скобка + запись пикселя в теле, БЕЗ
|
||||
* вызовов _bgi_plot / gfx_putpixel256 / _bgi_plot_raw (устранены
|
||||
* прокладки старой цепочки putpixel→_bgi_plot→gfx_putpixel256→raw).
|
||||
* Адресация: CPU _gfx_addr_base + x, Port_Y (0x89) = y; W3 мапится на
|
||||
* _gfx_bank, сейв восстанавливается. Bounds — compile-time GFX_WIDTH/
|
||||
* HEIGHT (меньше/быстрее, ≡ runtime _bgi_maxx/_bgi_maxy).
|
||||
*/
|
||||
#include "../_bgi.h"
|
||||
|
||||
/* File-static скретч (как в _bgi_plot_raw, но свой — putpixel не должен
|
||||
* топтать скретч акселератора/plot_raw, если звать вперемешку). */
|
||||
static uint8_t _pp_y;
|
||||
static uint16_t _pp_addr;
|
||||
static uint8_t _pp_color;
|
||||
|
||||
void putpixel(int x, int y, int color)
|
||||
{
|
||||
if ((unsigned)x >= GFX_WIDTH || (unsigned)y >= GFX_HEIGHT) return;
|
||||
_pp_y = (uint8_t)y;
|
||||
_pp_addr = (uint16_t)(_gfx_addr_base + (unsigned)x);
|
||||
_pp_color = (uint8_t)color;
|
||||
__asm
|
||||
di
|
||||
in a, (#0xE2)
|
||||
ld (__gfx_saved_w3), a
|
||||
ld a, (__gfx_bank)
|
||||
out (#0xE2), a
|
||||
ld a, (_pp_y)
|
||||
out (#0x89), a
|
||||
ld hl, (_pp_addr)
|
||||
ld a, (_pp_color)
|
||||
ld (hl), a
|
||||
ld a, (__gfx_saved_w3)
|
||||
out (#0xE2), a
|
||||
ei
|
||||
__endasm;
|
||||
}
|
||||
Reference in New Issue
Block a user