ReC98/th01/hardware/grppsafx.c

81 lines
2.0 KiB
C

// Shared parts from all graph_putsa_fx() implementations
#define set_vram_ptr(vram, first_bit, left, top) \
vram = (planar8_t *)(MK_FP(GRAM_400, (top * ROW_SIZE) + (left / 8))); \
first_bit = left % 8; \
#define get_glyph(glyph, codepoint, fullwidth, str, left, line) \
if(_ismbblead(str[0])) { \
codepoint = _mbcjmstojis(((char)str[0] << 8) + str[1]); \
str += 2; \
} else if(_ismbbkana((char)str[0])) { \
codepoint = str[0] + 0x2980; \
str += 1; \
} else if(isgraph((char)str[0])) { \
codepoint = str[0] + 0x2900; \
str += 1; \
} else { \
codepoint = 0x2B21; \
str += 1; \
} \
\
OUTB(0xA1, codepoint & 0xFF); \
OUTB(0xA3, (codepoint >> 8) - 0x20); \
if(codepoint >= 0x2921 && codepoint <= 0x2B7E) { \
if(left <= (RES_X - GLYPH_HALF_W)) { \
for(line = 0; line < GLYPH_H; line++) { \
OUTB(0xA5, line | 0x20); \
glyph[line] = INPB(0xA9) << 8; \
} \
fullwidth = 0; \
} else { \
break; \
} \
} else if(left <= (RES_X - GLYPH_FULL_W)) { \
for(line = 0; line < GLYPH_H; line++) { \
OUTB(0xA5, line | 0x20); \
glyph[line] = INPB(0xA9) << 8; \
OUTB(0xA5, line); \
glyph[line] += INPB(0xA9); \
} \
fullwidth = 1; \
} else { \
break; \
}
#define glyph_double(row, tmp) \
tmp = row; \
row |= tmp << 1;
#define apply_weight(row_out, row_in, row_tmp, weight) \
row_out = row_in; \
switch(weight) { \
case 1: \
glyph_double(row_out, row_tmp); \
break; \
case 3: \
glyph_double(row_out, row_tmp); \
/* fallthrough */ \
case 2: \
glyph_double(row_out, row_tmp); \
row_tmp ^= row_out; \
row_out &= ~(row_tmp << 1); \
}
#define put_row_and_advance(vram, row, first_bit) \
if(first_bit) { \
vram[0] = glyph_row >> (first_bit + 8); \
vram[1] = glyph_row >> (first_bit + 0); \
vram[2] = glyph_row << (8 - first_bit); \
} else { \
vram[0] = glyph_row >> 8; \
vram[1] = glyph_row; \
} \
vram += ROW_SIZE;
#define advance_left(left, fullwidth, spacing) \
if(fullwidth) { \
left += 8; \
} \
left += spacing + 8;