--- np2/bios/bios18.c	2004/02/09 20:39:39	1.13
+++ np2/bios/bios18.c	2004/02/20 15:20:29	1.21
@@ -52,7 +52,7 @@ static const CSRFORM csrform[4] = {
 						{0x07, 0x3b}, {0x09, 0x4b},
 						{0x0f, 0x7b}, {0x13, 0x9b}};
 
-static const UINT8 sync200l[8] = {0x02,0x26,0x03,0x11,0x86,0x0f,0xc8,0x84};
+static const UINT8 sync200l[8] = {0x02,0x26,0x03,0x11,0x86,0x0f,0xc8,0x94};
 static const UINT8 sync200m[8] = {0x02,0x26,0x03,0x11,0x83,0x07,0x90,0x65};
 static const UINT8 sync400m[8] = {0x02,0x4e,0x07,0x25,0x87,0x07,0x90,0x65};
 
@@ -93,7 +93,95 @@ static void bios0x18_10(REG8 curdel) {
 	gdcs.textdisp |= GDCSCRN_ALLDRAW2 | GDCSCRN_EXT;
 }
 
-void bios0x18_16(BYTE chr, BYTE atr) {
+void bios0x18_0a(REG8 mode) {
+
+const CRTDATA	*crt;
+
+	// GDCバッファを空に
+	if (gdc.m.cnt) {
+		gdc_work(GDCWORK_MASTER);
+	}
+	gdc_forceready(&gdc.m);
+
+	gdc.mode1 &= ~(0x2d);
+	mem[MEMB_CRT_STS_FLAG] = mode;
+	crt = crtdata;
+	if (!(np2cfg.dipsw[0] & 1)) {
+		mem[MEMB_CRT_STS_FLAG] |= 0x80;
+		gdc.mode1 |= 0x08;
+		crt += 2;
+	}
+	if (mode & 0x01) {
+		crt += 1;					// 20行
+	}
+	if (mode & 0x02) {
+		gdc.mode1 |= 0x04;				// 40桁
+	}
+	if (mode & 0x04) {
+		gdc.mode1 |= 0x01;				// アトリビュート
+	}
+	if (mode & 0x08) {
+		gdc.mode1 |= 0x20;				// コードアクセス
+	}
+	mem[MEMB_CRT_RASTER] = crt->raster;
+	crtc.reg.pl = crt->pl;
+	crtc.reg.bl = crt->bl;
+	crtc.reg.cl = crt->cl;
+	crtc.reg.ssl = 0;
+	gdc_restorekacmode();
+	bios0x18_10(0);
+}
+
+REG16 bios0x18_14(REG16 seg, REG16 off, REG16 code) {
+
+	UINT16	size;
+const char	*p;
+	BYTE	buf[32];
+	UINT	i;
+
+	switch(code >> 8) {
+		case 0x00:			// 8x8
+			size = 0x0101;
+			i286_memword_write(seg, off, 0x0101);
+			p = fontrom + 0x82000 + ((code & 0xff) << 4);
+			i286_memstr_write(seg, off + 2, p, 8);
+			break;
+
+		case 0x28:			// 8x16 KANJI
+		case 0x29:
+		case 0x2a:
+		case 0x2b:
+			size = 0x0102;
+			i286_memword_write(seg, off, 0x0102);
+			p = fontrom;
+			p += (code & 0x7f) << 12;
+			p += (((code >> 8) - 0x20) & 0x7f) << 4;
+			i286_memstr_write(seg, off + 2, p, 16);
+			break;
+
+		case 0x80:			// 8x16 ANK
+			size = 0x0102;
+			p = fontrom + 0x80000 + ((code & 0xff) << 4);
+			i286_memstr_write(seg, off + 2, p, 16);
+			break;
+
+		default:
+			size = 0x0202;
+			p = fontrom;
+			p += (code & 0x7f) << 12;
+			p += (((code >> 8) - 0x20) & 0x7f) << 4;
+			for (i=0; i<16; i++, p++) {
+				buf[i*2+0] = *p;
+				buf[i*2+1] = *(p+0x800);
+			}
+			i286_memstr_write(seg, off + 2, buf, 32);
+			break;
+	}
+	i286_memword_write(seg, off, size);
+	return(size);
+}
+
+void bios0x18_16(REG8 chr, REG8 atr) {
 
 	UINT32	i;
 
@@ -109,19 +197,23 @@ void bios0x18_16(BYTE chr, BYTE atr) {
 
 #define	SWAPU16(a, b) { UINT16 tmp; tmp = (a); (a) = (b); (b) = tmp; }
 
-static REG8 swapbit(REG8 bit) {
 
-	REG8	ret;
+static void setbiosgdc(UINT32 csrw, const GDCVECT *vect, UINT8 ope) {
 
-	ret = 0;
-	while(bit) {
-		ret = (ret << 1) + (bit & 1);
-		bit >>= 1;
-	}
-	return(ret);
+	gdc.s.para[GDC_CSRW + 0] = (BYTE)csrw;
+	gdc.s.para[GDC_CSRW + 1] = (BYTE)(csrw >> 8);
+	gdc.s.para[GDC_CSRW + 2] = (BYTE)(csrw >> 16);
+
+	gdc.s.para[GDC_VECTW] = vect->ope;
+	gdc_vectreset(&gdc.s);
+
+	gdc.s.para[GDC_WRITE] = ope;
+	mem[MEMB_PRXDUPD] &= ~3;
+	mem[MEMB_PRXDUPD] |= ope;
 }
 
-static void bios18_47(void) {
+
+static void bios0x18_47(void) {
 
 	UCWTBL		ucw;
 	GDCVECT		vect;
@@ -132,8 +224,11 @@ static void bios18_47(void) {
 	GDCSUBFN	func;
 	UINT32		csrw;
 	UINT16		data;
+	UINT16		data2;
 	UINT16		GBMDOTI;
 	UINT8		ope;
+	SINT16		dx;
+	SINT16		dy;
 
 	// GDCバッファを空に
 	if (gdc.s.cnt) {
@@ -148,9 +243,10 @@ static void bios18_47(void) {
 	GBSX2 = LOADINTELWORD(ucw.GBSX2);
 	GBSY2 = LOADINTELWORD(ucw.GBSY2);
 	ZeroMemory(&vect, sizeof(vect));
+	data = 0;
+	data2 = 0;
 	if (ucw.GBDTYP == 0x01) {
-		short dx, dy;
-		func = gdcsub_line;
+		func = gdcsub_vectl;
 		if ((GBSX1 > GBSX2) ||
 			((GBSX1 == GBSX2) && (GBSY1 > GBSY2))) {
 			SWAPU16(GBSX1, GBSX2);
@@ -177,6 +273,7 @@ static void bios18_47(void) {
 				SWAPU16(dx, dy);
 			}
 		}
+		vect.ope += 0x08;
 		STOREINTELWORD(vect.DC, dx);
 		data = dy * 2;
 		STOREINTELWORD(vect.D1, data);
@@ -185,31 +282,70 @@ static void bios18_47(void) {
 		data -= dx;
 		STOREINTELWORD(vect.D2, data);
 	}
-	else if (ucw.GBDTYP == 0x02) {
-		func = gdcsub_box;
-		if (GBSX1 > GBSX2) {
-			SWAPU16(GBSX1, GBSX2);
+	else if (ucw.GBDTYP <= 0x02) {
+		func = gdcsub_vectr;
+		vect.ope = 0x40 + (ucw.GBDSP & 7);
+		dx = GBSX2 - GBSX1;
+		if (dx < 0) {
+			dx = 0 - dx;
 		}
-		if (GBSY1 > GBSY2) {
-			SWAPU16(GBSY1, GBSY2);
+		dy = GBSY2 - GBSY1;
+		if (dy < 0) {
+			dy = 0 - dy;
+		}
+		switch(ucw.GBDSP & 3) {
+			case 0:
+				data = dy;
+				data2 = dx;
+				break;
+
+			case 1:
+				data2 = (UINT16)dx + (UINT16)dy;
+				data2 >>= 1;
+				data = (UINT16)dx - (UINT16)dy;
+				data = (data >> 1) & 0x3fff;
+				break;
+
+			case 2:
+				data = dx;
+				data2 = dy;
+				break;
+
+			case 3:
+				data2 = (UINT16)dx + (UINT16)dy;
+				data2 >>= 1;
+				data = (UINT16)dy - (UINT16)dx;
+				data = (data >> 1) & 0x3fff;
+				break;
 		}
 		STOREINTELWORD(vect.DC, 3);
+		STOREINTELWORD(vect.D, data);
+		STOREINTELWORD(vect.D2, data2);
 		STOREINTELWORD(vect.D1, 0xffff);
-		data = GBSX2 - GBSX1;
 		STOREINTELWORD(vect.DM, data);
-		STOREINTELWORD(vect.D2, data);
-		data = GBSY2 - GBSY1;
-		STOREINTELWORD(vect.D, data);
 	}
 	else {
-		func = gdcsub_null;
+		func = gdcsub_vectc;
+		vect.ope = 0x20 + (ucw.GBDSP & 7);
+		vect.DC[0] = ucw.GBLNG1[0];
+		vect.DC[1] = ucw.GBLNG1[1];
+		data = LOADINTELWORD(ucw.GBLNG2) - 1;
+		STOREINTELWORD(vect.D, data);
+		data >>= 1;
+		STOREINTELWORD(vect.D2, data);
+		STOREINTELWORD(vect.D1, 0x3fff);
+		if (ucw.GBDTYP == 0x04) {
+			vect.DM[0] = ucw.GBMDOT[0];
+			vect.DM[1] = ucw.GBMDOT[1];
+		}
 	}
 	if ((CPU_CH & 0xc0) == 0x40) {
 		GBSY1 += 200;
 	}
 	csrw = (GBSY1 * 40) + (GBSX1 >> 4);
 	csrw += (GBSX1 & 0xf) << 20;
-	GBMDOTI = (swapbit(ucw.GBMDOTI[0]) << 8) + swapbit(ucw.GBMDOTI[1]);
+	GBMDOTI = (GDCPATREVERSE(ucw.GBMDOTI[0]) << 8) +
+											GDCPATREVERSE(ucw.GBMDOTI[1]);
 	if ((CPU_CH & 0x30) == 0x30) {
 		ope = (ucw.GBON_PTN & 1)?GDCOPE_SET:GDCOPE_CLEAR;
 		func(csrw + 0x4000, &vect, GBMDOTI, ope);
@@ -228,13 +364,10 @@ static void bios18_47(void) {
 	// 最後に使った奴を記憶
 	*(UINT16 *)(mem + MEMW_PRXGLS) = *(UINT16 *)(ucw.GBMDOTI);
 	*(UINT16 *)(gdc.s.para + GDC_TEXTW) = *(UINT16 *)(ucw.GBMDOTI);
-
-	gdc.s.para[GDC_WRITE] = ope;
-	mem[MEMB_PRXDUPD] &= ~3;
-	mem[MEMB_PRXDUPD] |= ope;
+	setbiosgdc(csrw, &vect, ope);
 }
 
-static void bios18_49(void) {
+static void bios0x18_49(void) {
 
 	UCWTBL		ucw;
 	UINT		i;
@@ -255,7 +388,7 @@ static void bios18_49(void) {
 	i286_memstr_read(CPU_DS, CPU_BX, &ucw, sizeof(ucw));
 	for (i=0; i<8; i++) {
 		mem[MEMW_PRXGLS + i] = ucw.GBMDOTI[i];
-		pat[i] = swapbit(ucw.GBMDOTI[i]);
+		pat[i] = GDCPATREVERSE(ucw.GBMDOTI[i]);
 		gdc.s.para[GDC_TEXTW + i] = pat[i];
 	}
 	vect.ope = 0x10 + (ucw.GBDSP & 7);
@@ -267,8 +400,7 @@ static void bios18_49(void) {
 	}
 	else {
 		STOREINTELWORD(vect.DC, 7);
-		vect.D[0] = gdc.s.para[GDC_VECTW + 3];
-		vect.D[1] = gdc.s.para[GDC_VECTW + 4];
+		STOREINTELWORD(vect.D, 7);
 	}
 
 	GBSX1 = LOADINTELWORD(ucw.GBSX1);
@@ -294,9 +426,7 @@ static void bios18_49(void) {
 	}
 
 	// 最後に使った奴を記憶
-	gdc.s.para[GDC_WRITE] = ope;
-	mem[MEMB_PRXDUPD] &= ~3;
-	mem[MEMB_PRXDUPD] |= ope;
+	setbiosgdc(csrw, &vect, ope);
 }
 
 
@@ -308,7 +438,6 @@ void bios0x18(void) {
 		BOOL	b;
 		UINT16	w;
 		UINT32	d;
-const CRTDATA	*crt;
 	}		tmp;
 
 	UINT	pos;
@@ -379,39 +508,7 @@ const CRTDATA	*crt;
  			break;
 
    		case 0x0a:						// CRTモードの設定
-			// GDCバッファを空に
-			if (gdc.m.cnt) {
-				gdc_work(GDCWORK_MASTER);
-			}
-			gdc_forceready(&gdc.m);
-
-			gdc.mode1 &= ~(0x2d);
-			mem[MEMB_CRT_STS_FLAG] = CPU_AL;
-			tmp.crt = crtdata;
-			if (!(np2cfg.dipsw[0] & 1)) {
-				mem[MEMB_CRT_STS_FLAG] |= 0x80;
-				gdc.mode1 |= 0x08;
-				tmp.crt += 2;
-			}
-			if (CPU_AL & 0x01) {
-				tmp.crt += 1;					// 20行
-			}
-			if (CPU_AL & 0x02) {
-				gdc.mode1 |= 0x04;				// 40桁
-			}
-			if (CPU_AL & 0x04) {
-				gdc.mode1 |= 0x01;				// アトリビュート
-			}
-			if (CPU_AL & 0x08) {
-				gdc.mode1 |= 0x20;				// コードアクセス
-			}
-			mem[MEMB_CRT_RASTER] = tmp.crt->raster;
-			crtc.reg.pl = tmp.crt->pl;
-			crtc.reg.bl = tmp.crt->bl;
-			crtc.reg.cl = tmp.crt->cl;
-			crtc.reg.ssl = 0;
-			gdc_restorekacmode();
-			bios0x18_10(0);
+			bios0x18_0a(CPU_AL);
 			break;
 
    		case 0x0b:						// CRTモードのセンス
@@ -454,6 +551,12 @@ const CRTDATA	*crt;
  			break;
 
 		case 0x0f:						// 複数の表示領域の設定
+			// GDCバッファを空に
+			if (gdc.m.cnt) {
+				gdc_work(GDCWORK_MASTER);
+			}
+			gdc_forceready(&gdc.m);
+
 			SETBIOSMEM16(0x0053e, CPU_CX);
 			SETBIOSMEM16(0x00540, CPU_BX);
 			mem[0x00547] = CPU_DH;
@@ -492,6 +595,7 @@ const CRTDATA	*crt;
 				gdc_work(GDCWORK_MASTER);
 			}
 			gdc_forceready(&gdc.m);
+
 			bios0x18_10((REG8)(CPU_AL & 1));
  			break;
 
@@ -501,7 +605,7 @@ const CRTDATA	*crt;
 				gdc_work(GDCWORK_MASTER);
 			}
 			gdc_forceready(&gdc.m);
-													// 00/08/02
+
 			if (gdc.m.para[GDC_CSRFORM] != (mem[MEMB_CRT_RASTER] | 0x80)) {
 				gdc.m.para[GDC_CSRFORM] = mem[MEMB_CRT_RASTER] | 0x80;
 			}
@@ -514,7 +618,7 @@ const CRTDATA	*crt;
 				gdc_work(GDCWORK_MASTER);
 			}
 			gdc_forceready(&gdc.m);
-													// 00/08/02
+
 			if (gdc.m.para[GDC_CSRFORM] != mem[MEMB_CRT_RASTER]) {
 				gdc.m.para[GDC_CSRFORM] = mem[MEMB_CRT_RASTER];
 				gdcs.textdisp |= GDCSCRN_ALLDRAW | GDCSCRN_EXT;
@@ -536,41 +640,7 @@ const CRTDATA	*crt;
  			break;
 
    		case 0x14:						// フォントパターンの読み出し
-			switch(CPU_DH) {
-				case 0x00:			// 8x8
-					i286_memword_write(CPU_BX, CPU_CX, 0x0101);
-					i286_memstr_write(CPU_BX, CPU_CX + 2,
-								fontrom + 0x82000 + (CPU_DL << 4), 8);
-					break;
-
-				case 0x28:			// 8x16 KANJI
-				case 0x29:
-				case 0x2a:
-				case 0x2b:
-					i286_memword_write(CPU_BX, CPU_CX, 0x0102);
-					i286_memstr_write(CPU_BX, CPU_CX + 2,
-								fontrom + ((CPU_DL & 0x7f) << 12)
-										+ ((CPU_DH - 0x20) << 4), 16);
-					break;
-
-				case 0x80:			// 8x16 ANK
-					i286_memword_write(CPU_BX, CPU_CX, 0x0102);
-					i286_memstr_write(CPU_BX, CPU_CX + 2,
-								fontrom + 0x80000 + (CPU_DL << 4), 16);
-					break;
-
-				default:
-					buf[0] = 0x02;
-					buf[1] = 0x02;
-					p = fontrom + ((CPU_DL & 0x7f) << 12)
-								+ (((CPU_DH - 0x20) & 0x7f) << 4);
-					for (i=1; i<17; i++, p++) {
-						buf[i*2+0] = *p;
-						buf[i*2+1] = *(p+0x800);
-					}
-					i286_memstr_write(CPU_BX, CPU_CX, buf, 34);
-					break;
-			}
+			bios0x18_14(CPU_BX, CPU_CX, CPU_DX);
  			break;
 
  		case 0x15:						// ライトペン位置読みだし
@@ -703,22 +773,27 @@ const CRTDATA	*crt;
 			}
 			break;
 
-		case 0x44:						// ボーダカラー
+		case 0x44:						// ボーダカラーの設定
 //			if (!(mem[MEMB_PRXCRT] & 0x40)) {
 //				color = i286_membyte_read(CPU_DS, CPU_BX + 1);
 //			}
 			break;
 
+		case 0x45:
+		case 0x46:
+			TRACEOUT(("unsupport bios 18-%.2x", CPU_AH));
+			break;
+
 		case 0x47:						// 直線、矩形の描画
-		case 0x48:
-			bios18_47();
+		case 0x48:						// 円の描画
+			bios0x18_47();
 			break;
 
-		case 0x49:						// 
-			bios18_49();
+		case 0x49:						// グラフィック文字の描画
+			bios0x18_49();
 			break;
 
-		case 0x4a:						// 
+		case 0x4a:						// 描画モードの設定
 			if (!(mem[MEMB_PRXCRT] & 0x01)) {
 				gdc.s.para[GDC_SYNC] = CPU_CH;
 				gdcs.grphdisp |= GDCSCRN_EXT;
@@ -730,7 +805,6 @@ const CRTDATA	*crt;
 				}
 			}
 			break;
-
 	}
 }