Return to makescrn.c CVS log

Up to [RetroPC.NET] / xmil / vram

fix TEXT attribute dirty flags (T.Yui)

#include	"compiler.h"
#include	"scrnmng.h"
#include	"sysmng.h"
#include	"pccore.h"
#include	"iocore.h"
#include	"vram.h"
#include	"scrndraw.h"
#include	"palettes.h"
#include	"makescrn.h"
#include	"makesub.h"


	MAKESCRN	makescrn;
	UINT		drawtime = 0;


static void fillupdatetmp(void) {

	UINT	i;

	for (i=0; i<0x800; i++) {
		TRAMUPDATE(i) |= UPDATE_TVRAM;
	}
}

static void flashupdatetmp(void) {

	UINT	posl;
	UINT	y;
	UINT	x;
	UINT	r;
	UINT	posr;
	BRESULT	y2;
	REG16	atr;
	REG16	udtbase;
	REG16	udt;

	if (!makescrn.vramsize) {
		return;
	}
	posl = crtc.e.pos;
	y = crtc.e.yl;
	do {
		for (x=0; x<crtc.s.reg[CRTCREG_HDISP]; x++) {
			if (!(TRAM_ATR(LOW11(posl + x)) & TRAMATR_Yx2)) {
				break;
			}
		}
		y2 = (x < crtc.s.reg[CRTCREG_HDISP])?FALSE:TRUE;
		udtbase = (x < crtc.s.reg[CRTCREG_HDISP])?0x0000:0x0404;
		r = (crtc.s.reg[CRTCREG_HDISP] + 1) >> 1;
		do {
			posr = LOW11(posl + 1);
			atr = (TRAM_ATR(posl) << 8) | TRAM_ATR(posr);
			udt = udtbase;
			if (!y2) {
				if (atr & (TRAMATR_Yx2 << 8)) {
					udt |= (UPDATE_TRAM | 1) << 8;		// 左潰れ縦倍角
				}
				else {
					y2 = TRUE;
				}
			}
			if (!y2) {
				if (atr & (TRAMATR_Yx2 << 0)) {
					udt |= (UPDATE_TRAM | 1) << 0;		// 右潰れ縦倍角
				}
				else {
					y2 = TRUE;
				}
			}
			if (atr & (TRAMATR_Xx2 << 8)) {				// 左側倍角?
				udt |= 0x0812;
			}
			if (atr & (TRAMATR_Xx2 << 0)) {				// 右側倍角?
				udt |= 0x0008;
			}
			if ((TRAMUPDATE(posl) ^ (udt >> 8)) & 0x1f) {
				TRAMUPDATE(posl) = (UINT8)((udt >> 8) | UPDATE_TVRAM);
			}
			if ((TRAMUPDATE(posr) ^ (udt >> 0)) & 0x1f) {
				TRAMUPDATE(posr) = (UINT8)((udt >> 0) | UPDATE_TVRAM);
			}
			posl = LOW11(posl + 2);
		} while(--r);
		if (crtc.s.reg[CRTCREG_HDISP] & 1) {
			posl = LOW11(posl - 1);
		}
	} while(--y);
}

static BRESULT updateblink(void) {

	UINT	pos;
	REG8	update;
	UINT	r;

	pos = makescrn.vramtop;
	makescrn.blinktest ^= 0x10;
	update = 0;
	r = makescrn.vramsize;
	while(r) {
		r--;
		if (TRAM_ATR(pos) & 0x10) {
			TRAMUPDATE(pos) |= UPDATE_TRAM;
			update = UPDATE_TRAM;
		}
		pos = LOW11(pos + 1);
	}
	if (update) {
		return(TRUE);
	}
	else {
		return(FALSE);
	}
}


// ----

typedef void (*MAKEFN)(void);

static void width_dummy(void) { }

static const UINT8 screendraw[] = {
				MAKESCRN_320x200S,	MAKESCRN_320x400,
				MAKESCRN_320x200S,	MAKESCRN_320x400,
				MAKESCRN_320x200S,	MAKESCRN_320x400,
				MAKESCRN_320x200S,	MAKESCRN_320x200H,

				MAKESCRN_320x200S,	MAKESCRN_320x400,
				MAKESCRN_320x200S,	MAKESCRN_320x400,
				MAKESCRN_320x200S,	MAKESCRN_320x200H,
				MAKESCRN_320x200S,	MAKESCRN_320x200H,

#if defined(SUPPORT_TURBOZ)
				MAKESCRN_320x200H,	MAKESCRN_320x200H,
				MAKESCRN_320x200H,	MAKESCRN_320x200H,
				MAKESCRN_320x200H,	MAKESCRN_320x200H,
				MAKESCRN_320x200H,	MAKESCRN_320x200H,

				MAKESCRN_320x200H,	MAKESCRN_320x200H,
				MAKESCRN_320x200H,	MAKESCRN_320x200H,
				MAKESCRN_320x200H,	MAKESCRN_320x200H,
				MAKESCRN_320x200H,	MAKESCRN_320x200H,
#endif
};

static const MAKEFN screenmake[] = {
				width80x25_200l,	width80x25_400h,
				width80x25_200l,	width80x25_200h,
				width80x12_200l,	width80x12_400h,
				width80x12_200l,	width80x12_200h,

				width80x20l,		width80x20h,
				width80x20l,		width80x20h,
				width80x10l,		width80x10h,
				width80x10l,		width80x10h,

#if defined(SUPPORT_TURBOZ)
				width_dummy,		width_dummy,
				width_dummy,		width_dummy,
				width_dummy,		width_dummy,
				width_dummy,		width_dummy,

				width_dummy,		width_dummy,
				width_dummy,		width_dummy,
				width_dummy,		width_dummy,
				width_dummy,		width_dummy,
#endif
};


static void changemodes(void) {

	REG8	dispmode;

	dispmode = crtc.e.dispmode;
	makescrn.dispmode = dispmode;
	makescrn.drawmode = screendraw[dispmode & DISPMODE_MASKMODE];
	if (dispmode & DISPMODE_WIDTH80) {
		makescrn.drawmode |= 1;
	}
	sysmng_scrnwidth((REG8)((dispmode & DISPMODE_WIDTH80) == 0));

	if (!(dispmode & DISPMODE_BANK1)) {
		makescrn.disp1 = gram + GRAM_BANK0;
		makescrn.disp2 = gram + GRAM_BANK1;
		makescrn.dispflag = UPDATE_TRAM + UPDATE_VRAM0;
	}
	else {
		makescrn.disp1 = gram + GRAM_BANK1;
		makescrn.disp2 = gram + GRAM_BANK0;
		makescrn.dispflag = UPDATE_TRAM + UPDATE_VRAM1;
	}
}

static void changecrtc(void) {

	UINT	scrnxmax;
	UINT	scrnymax;
	UINT	textxl;
	UINT	surfcx;
	UINT	fontcy;
	UINT	underlines;
	REG8	y2;
	UINT	charcy;
	UINT	surfcy;
	UINT	surfsy;
	UINT	x;
	UINT	y;
	UINT8	*p;

	makescrn.vramtop = crtc.e.pos;

	scrnxmax = (makescrn.dispmode & DISPMODE_WIDTH80)?80:40;
	scrnymax = 200;

	textxl = crtc.s.reg[CRTCREG_HDISP];
	surfcx = min(scrnxmax, textxl);

	fontcy = crtc.e.fonty;
	underlines = (makescrn.dispmode & DISPMODE_UNDERLINE)?2:0;
	if (fontcy > underlines) {
		fontcy -= underlines;
	}
	else {
		fontcy = 0;
	}
	y2 = (makescrn.dispmode & DISPMODE_TEXTYx2)?1:0;
	fontcy >>= y2;
#if 0
	if (((dispmode & SCRN64_MASK) != SCRN64_INVALID) && (fontcy > 8)) {
		fontcy = 8;
	}
#endif
	if (!fontcy) {
		fontcy = 1;
	}
	if (fontcy > 8) {
		fontcy = 8;
	}
	charcy = fontcy + underlines;
	makescrn.fontcy = fontcy;
	makescrn.charcy = charcy;
	charcy <<= y2;
	surfcy = scrnymax / charcy;
	if (surfcy > crtc.e.yl) {
		surfcy = crtc.e.yl;
	}

	surfsy = charcy * surfcy * 2;
	// ハイドライド３で画面が消えないのでロジックを修正すべし
	x = min(scrnxmax, makescrn.surfcx);
	if (surfcx < x) {								// 小さくなった
		x = (x - surfcx) * 8;
		p = screenmap + (surfcx * 8);
		y = surfsy;
		while(y) {
			y--;
			ZeroMemory(p, x);
			p += SURFACE_WIDTH;
		}
	}
	if (surfsy < makescrn.surfsy) {
		ZeroMemory(screenmap + (SURFACE_WIDTH * surfsy),
								SURFACE_WIDTH * (makescrn.surfsy - surfsy));
	}
	makescrn.surfcx = surfcx;
	makescrn.surfrx = textxl - surfcx;
	makescrn.surfcy = surfcy;
	makescrn.surfsy = surfsy;
	makescrn.surfstep = (SURFACE_WIDTH * charcy * 2) - (surfcx * 8);
	makescrn.vramsize = min(0x800, surfcy * textxl);
//	scrnmng_setheight(0, charcy * surfcy * 2);
}

void scrnupdate(void) {

	REG8	flag;
	REG8	existblink;

	if (!corestat.drawframe) {
		return;
	}
	corestat.drawframe = 0;

	flag = makescrn.nextdraw;
	if (crtc.e.scrnflash) {
		crtc.e.scrnflash = 0;
		flag |= SCRNUPD_FLASH;
	}
	if (crtc.e.scrnallflash) {
		crtc.e.scrnallflash = 0;
		flag |= SCRNUPD_ALLFLASH;
	}
	if (crtc.e.palandply) {
		crtc.e.palandply = 0;
		flag |= SCRNUPD_PALANDPLY;
	}

	if (makescrn.dispmode != crtc.e.dispmode) {
		TRACEOUT(("change mode!"));
		changemodes();
		flag |= SCRNUPD_ALLFLASH | SCRNUPD_PALANDPLY;
	}
	if (flag & SCRNUPD_ALLFLASH) {
		changecrtc();
		TRACEOUT(("flash! %dx%d", makescrn.surfcx, makescrn.surfcy));
		fillupdatetmp();
		flag |= SCRNUPD_FLASH;
	}
	if (crtc.e.remakeattr) {
		crtc.e.remakeattr = 0;
		flashupdatetmp();
	}
	if (flag & SCRNUPD_PALANDPLY) {
		pal_update();
	}

	if (crtc.e.blinktime) {
		crtc.e.blinktime--;
	}
	else {
		crtc.e.blinktime = 30 - 1;
		if (crtc.e.existblink) {
			existblink = updateblink();
			crtc.e.existblink = existblink;
			flag |= existblink;
		}
	}

	if (flag & SCRNUPD_FLASH) {
		if (makescrn.vramsize) {
			makescrn.fontycnt = 0;
			screenmake[makescrn.dispmode & DISPMODE_MASKMODE]();
#if 0
			switch(lastdisp & SCRN64_MASK) {
				case SCRN64_320x200:
//					width40x25_64s();
					break;

				case SCRN64_L320x200x2:
//					width40x25_64x2();
					break;

				case SCRN64_L640x200:
//					width80x25_64s();
					break;

				case SCRN64_H320x400:
//					width40x25_64h();
					break;

				case SCRN64_320x200x4096:
//					width40x25_4096();
					break;

				case SCRN64_320x100:
//					width40x12_64l();
					break;

				case SCRN64_320x100x2:
//					width40x12_64x2();
					break;

				case SCRN64_L640x100:
//					width80x12_64s();
					break;

				case SCRN64_H320x200:
//					width40x12_64h();
					break;

				case SCRN64_320x100x4096:
//					width40x12_4096();
					break;

//				case SCRN64_INVALID:
				default:
					if (!(crtc.s.SCRN_BITS & SCRN_UNDERLINE)) {
						screenmake[(crtc.s.SCRN_BITS & 7) + 0]();
					}
					else {
						screenmake[(crtc.s.SCRN_BITS & 7) + 8]();
					}
					break;
			}
#endif
		}
	}

	if (flag) {
		makescrn.nextdraw = scrndraw_draw((REG8)(flag & SCRNUPD_ALLFLASH));
		drawtime++;
	}
}


void makescrn_initialize(void) {

	makesub_initialize();
}

void makescrn_reset(void) {

	changemodes();
	changecrtc();
	flashupdatetmp();
}