--- xmil/vram/makescrn.c	2004/08/07 07:19:56	1.1
+++ xmil/vram/makescrn.c	2004/08/14 12:16:18	1.12
@@ -10,185 +10,168 @@
 
 
 		MAKESCRN	makescrn;
-		BYTE		updatetmp[0x800+0x101];
 
-		BYTE	scrnallflash;
-		BYTE	blinktest = 0;
+		UINT8	scrnallflash;
+static	UINT8	lastdisp = 0;
+static	UINT8	blinktime = 1;
+		UINT	drawtime = 0;
 
-extern	BYTE	dispmode;
 
-static	BYTE	lastdisp = 0;
-		BYTE	dispflg = UPDATE_VRAM0;
-		BYTE	*dispp = &GRP_RAM[GRAM_BANK0];
-		BYTE	*dispp2 = &GRP_RAM[GRAM_BANK1];
-static	BYTE	blinktime = 1;
+static void fillupdatetmp(void) {
 
-		DWORD	drawtime = 0;
+	UINT32	*p;
+	UINT	i;
 
-
-void init_draw(void) {
-
-	makesub_initialize();
-	reflesh_palette();
-	lastdisp = 0;
-	dispflg = UPDATE_VRAM0;
-	dispp = &GRP_RAM[GRAM_BANK0];
+	p = (UINT32 *)updatetmp;
+	for (i=0; i<0x200; i++) {
+		p[i] |= (UPDATE_TVRAM << 24) | (UPDATE_TVRAM << 16) |
+										(UPDATE_TVRAM << 8) | UPDATE_TVRAM;
+	}
 }
 
+static void flashupdatetmp(void) {
 
-void fillupdatetmp(void) {
+	UINT	posl;
+	UINT	y;
+	UINT	x;
+	UINT	r;
+	UINT	posr;
+	BRESULT	y2;
+	REG16	atr;
+	REG16	udtbase;
+	REG16	udt;
 
-		__asm {
-				mov		ebx, offset updatetmp
-				mov		ecx, 0x200
-filludt_lp:		or		dword ptr [ebx], (UPDATE_TVRAM * 01010101h)
-				add		ebx, 4
-				loop	filludt_lp
+	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[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[TRAM_ATR + posl] << 8) | tram[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 ((updatetmp[posl] ^ (udt >> 8)) & 0x1f) {
+				updatetmp[posl] = (UINT8)((udt >> 8) | UPDATE_TVRAM);
+			}
+			if ((updatetmp[posr] ^ (udt >> 0)) & 0x1f) {
+				updatetmp[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 LABEL void flashupdatetmp(void) {
+static BRESULT updateblink(void) {
 
-		__asm {
-				push	ebx
-				push	esi
-				push	edi
-
-				movzx	esi, crtc.s.TXT_TOP
-				xor		dl, dl
-										// まず行すべてが縦倍角か調べる
-check_tateflag:	mov		edi, esi
-				movzx	ecx, crtc.s.TXT_XL
-tateflaglp_s:	and		edi, (TRAM_MAX - 1)
-				test	tram[TRAM_ATR + edi], X1ATR_Yx2
-				je		tatex1
-				inc		edi
-				loop	tateflaglp_s
-										// すべて縦倍角 だったら
-
-				movzx	ecx, crtc.s.TXT_XL
-				shr		cl, 1
-
-tatex2loop_s:	and		esi, (TRAM_MAX - 1)
-				mov		ax, (UPDATE_TVRAM or 04h) * 0101h		// 縦倍角
-				mov		bx, word ptr (tram[TRAM_ATR + esi])
-
-				test	bl, X1ATR_Xx2
-				je		tatex2_norleft
-												// 倍角フラグが立ってる
-				or		ax, 08h + 12h * 256		// 左４倍角 + 右縦倍角は確定
-				test	bh, X1ATR_Xx2
-				je		tatex2_pcg
-				or		ah, 8					// 右側も倍角ビットが立ってた
-				jmp		tatex2_pcg
-
-tatex2_norleft:	test	bh, X1ATR_Xx2			// ４倍角でない場合
-				je		tatex2_pcg
-				or		ah, 8					// 右側のみ倍角だった
-tatex2_pcg:		mov		bx, word ptr (updatetmp[esi])
-				and		bx, UPDATE_TVRAM * 0101h
-				or		ax, bx					// UPDATEフラグを加える
-				cmp		word ptr (updatetmp[esi]), ax
-				je		tatex2noupdate
-				or		ax, UPDATE_TVRAM * 0101h
-				mov		word ptr (updatetmp[esi]), ax
-tatex2noupdate:	add		esi, 2
-				loop	tatex2loop_s
-				jmp		nextlinecheck
-
-tatex1:			movzx	ecx, crtc.s.TXT_XL
-				shr		cl, 1
-				xor		dh, dh
-tatex1loop_s:	and		esi, (TRAM_MAX - 1)
-				xor		ax, ax
-				mov		bx, word ptr (tram[TRAM_ATR + esi])
-				or		dh, dh					// 縦ノーマルは既にあったか？
-				jne		tatex1_tate_e
-				test	bl, X1ATR_Yx2
-				je		tatex1_tate0
-				mov		al, UPDATE_TVRAM or 1	// 左潰れ縦倍角
-				test	bh, X1ATR_Yx2
-				je		tatex1_tate0
-				mov		ah, UPDATE_TVRAM or 1	// 右潰れ縦倍角
-				jmp		tatex1_tate_e
-tatex1_tate0:	inc		dh						// 縦ノーマルの出現
-tatex1_tate_e:
-				test	bl, X1ATR_Xx2
-				je		tatex1_norleft
-												// 倍角フラグが立ってる
-				or		ax, 08h + (12h * 256)	// 左横倍角 は確定
-				test	bh, X1ATR_Xx2
-				je		tatex1_pcg
-				or		ah, 8					// 右側も倍角ビットが立ってた
-				jmp		tatex1_pcg
-
-tatex1_norleft:	test	bh, X1ATR_Xx2			// 倍角でない場合
-				je		tatex1_pcg
-				or		ah, 8					// 右側のみ倍角だった
-tatex1_pcg:		mov		bx, word ptr (updatetmp[esi])
-				and		bx, UPDATE_TVRAM * 0101h
-				or		ax, bx
-				cmp		word ptr (updatetmp[esi]), ax
-				je		tatex1noupdate
-				or		ax, UPDATE_TVRAM * 0101h
-				mov		word ptr (updatetmp[esi]), ax
-tatex1noupdate:	add		esi, 2
-				loop	tatex1loop_s
-
-nextlinecheck:	inc		dl
-				cmp		dl, crtc.s.TXT_YL
-				jb		check_tateflag
-
-				pop		edi
-				pop		esi
-				pop		ebx
-				ret
+	UINT	pos;
+	REG8	update;
+	UINT	r;
+
+	if (blinktime) {
+		blinktime--;
+		return(FALSE);
+	}
+	else {
+		blinktime = 30 - 1;
+		pos = makescrn.vramtop;
+		makescrn.blinktest ^= 0x10;
+		update = 0;
+		r = makescrn.vramsize;
+		while(r) {
+			r--;
+			if (tram[TRAM_ATR + pos] & 0x10) {
+				updatetmp[pos] |= UPDATE_TRAM;
+				update = UPDATE_TRAM;
+			}
+			pos = LOW11(pos + 1);
+		}
+		if (update) {
+			makescrn.existblink = 1;
+			return(TRUE);
+		}
+		else {
+			return(FALSE);
+		}
 	}
 }
 
-void updateblink(void) {
 
-		__asm {
-				dec		blinktime
-				jns		blinkupflg_ed
-				mov		blinktime, 30-1
-				push	edi
-				movzx	edi, crtc.s.TXT_TOP
-				mov		ax, 010h
-				xor		blinktest, al
-				mov		cx, word ptr (makescrn.vramsize)
-				or		cx, cx
-				je		blinkupflg
-
-blinkup_lp:		test	tram[TRAM_ATR + edi], al
-				je		short blinknup_ed
-				mov		ah, UPDATE_TVRAM
-				or		updatetmp[edi], ah
-blinknup_ed:	inc		edi
-				dec		cx
-				jne		blinkup_lp
-				or		makescrn.scrnflash, ah
-				shr		ah, 5
-blinkupflg:		pop		edi
-				mov		makescrn.existblink, ah
-blinkupflg_ed:
-		}
-}
+// ----
 
+static void changemodes(void) {
 
-// ---------------------------------------------------------------------------
+	lastdisp = crtc.e.dispmode;
+	if (!(lastdisp & SCRN_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;
+	}
+	scrnallflash = 1;
+	makescrn.palandply = 1;
+}
 
-static void x1vram_adjust(void) {
+static void changecrtc(void) {
 
+	UINT	scrnxmax;
+	UINT	scrnymax;
+	UINT	textxl;
+	UINT	surfcx;
 	REG8	widthmode;
 	UINT	fontcy;
 	UINT	underlines;
 	REG8	y2;
 	UINT	charcy;
 	UINT	surfcy;
-
-	if (crtc.s.TXT_XL <= 40) {
-		if (dispmode & SCRN_DRAW4096) {
+	UINT	surfsy;
+	UINT	x;
+	UINT	y;
+	UINT8	*p;
+
+	makescrn.vramtop = crtc.e.pos;
+
+	scrnxmax = (crtc.s.width40)?40:80;
+	scrnymax = 200;
+	if (crtc.s.width40) {
+		if (lastdisp & SCRN_DRAW4096) {
 			widthmode = SCRNWIDTHMODE_4096;
 		}
 		else {
@@ -200,13 +183,10 @@ static void x1vram_adjust(void) {
 	}
 	scrndraw_changewidth(widthmode);
 
-	makescrn.surfcx = min(80, crtc.s.TXT_XL);
-	makescrn.surfrx = crtc.s.TXT_XL - makescrn.surfcx;
+	textxl = crtc.s.reg[CRTCREG_HDISP];
+	surfcx = min(scrnxmax, textxl);
 
-	fontcy = crtc.s.FNT_YL;
-	if (crtc.s.SCRN_BITS & SCRN_24KHZ) {
-		fontcy >>= 1;
-	}
+	fontcy = crtc.e.fonty;
 	underlines = (crtc.s.SCRN_BITS & SCRN_UNDERLINE)?2:0;
 	if (fontcy > underlines) {
 		fontcy -= underlines;
@@ -230,16 +210,35 @@ static void x1vram_adjust(void) {
 	charcy = fontcy + underlines;
 	makescrn.fontcy = fontcy;
 	makescrn.charcy = charcy;
-
 	charcy <<= y2;
-	surfcy = 200 / charcy;
-	if (surfcy > crtc.s.TXT_YL) {
-		surfcy = crtc.s.TXT_YL;
+	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.surfstep = (SURFACE_WIDTH * charcy * 2) - (makescrn.surfcx * 8);
-	makescrn.vramsize = min(0x800, charcy * crtc.s.TXT_XL);
-	scrnmng_setheight(0, charcy * surfcy * 2);
+	makescrn.surfsy = surfsy;
+	makescrn.surfstep = (SURFACE_WIDTH * charcy * 2) - (surfcx * 8);
+	makescrn.vramsize = min(0x800, surfcy * textxl);
+//	scrnmng_setheight(0, charcy * surfcy * 2);
 }
 
 
@@ -263,6 +262,7 @@ static const DRAWFN screendraw2[8] = {
 void scrnupdate(void) {
 
 	BRESULT	ddrawflash;
+	BRESULT	allflash;
 
 	if (!corestat.drawframe) {
 		return;
@@ -270,25 +270,16 @@ void scrnupdate(void) {
 	corestat.drawframe = 0;
 
 	ddrawflash = FALSE;
-	if (lastdisp != dispmode) {
-		lastdisp = dispmode;
-		scrnallflash = 1;
-		makescrn.palandply = 1;
-		if (!(dispmode & SCRN_BANK1)) {
-			dispp = GRP_RAM + GRAM_BANK0;
-			dispp2 = GRP_RAM + GRAM_BANK1;
-			dispflg = UPDATE_VRAM0;
-		}
-		else {
-			dispp = GRP_RAM + GRAM_BANK1;
-			dispp2 = GRP_RAM + GRAM_BANK0;
-			dispflg = UPDATE_VRAM1;
-		}
+	allflash = FALSE;
+	if (lastdisp != crtc.e.dispmode) {
+		changemodes();
 	}
 	if (scrnallflash) {
 		scrnallflash = 0;
 		fillupdatetmp();
-		x1vram_adjust();
+		changecrtc();
+		ddrawflash = TRUE;
+		allflash = TRUE;
 		makescrn.scrnflash = 1;
 	}
 	if (makescrn.remakeattr) {
@@ -297,74 +288,89 @@ void scrnupdate(void) {
 	}
 	if (makescrn.palandply) {
 		makescrn.palandply = 0;
-		palettes();
-		ddrawflash = 1;
+		pal_update();
+		ddrawflash = TRUE;
 	}
 	if (makescrn.existblink) {
-		updateblink();
+		makescrn.scrnflash |= updateblink();
 	}
 
 	if (makescrn.scrnflash) {
 		makescrn.scrnflash = 0;
-		makescrn.fontycnt = 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)) {
-					screendraw[crtc.s.SCRN_BITS & 7]();
-				}
-				else {
-					screendraw2[crtc.s.SCRN_BITS & 7]();
-				}
-				break;
+		if (makescrn.vramsize) {
+			makescrn.fontycnt = 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)) {
+						screendraw[crtc.s.SCRN_BITS & 7]();
+					}
+					else {
+						screendraw2[crtc.s.SCRN_BITS & 7]();
+					}
+					break;
+			}
+			ddrawflash = 1;
 		}
-		ddrawflash = 1;
 	}
 
 	if (ddrawflash) {
 		ddrawflash = 0;
-		scrndraw_draw(FALSE);
+		scrndraw_draw(allflash);
 		drawtime++;
 	}
 }
 
+
+void makescrn_initialize(void) {
+
+	makesub_initialize();
+}
+
+void makescrn_reset(void) {
+
+	changemodes();
+	changecrtc();
+	flashupdatetmp();
+}
+