X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fblitter2.cpp;fp=src%2Fblitter2.cpp;h=fa60c22799b129bd0d2c5569c7c46e651d0f6c01;hb=fa566a2c8ec532eb5325b4d5a663fb2a7d72adc6;hp=0000000000000000000000000000000000000000;hpb=1d5f61c81bd6a213debf733970575154da696f23;p=virtualjaguar

diff --git a/src/blitter2.cpp b/src/blitter2.cpp
new file mode 100644
index 0000000..fa60c22
--- /dev/null
+++ b/src/blitter2.cpp
@@ -0,0 +1,696 @@
+//#include "stdafx.h"
+#include "jaguar.h"
+#include "blitter.h"
+//#include "mem.h"
+//#include "regs.h"
+
+//extern BYTE* MEM;
+
+// Stuff from the header file...
+
+typedef struct {
+	int srcen;
+	int srcenz;
+	int srcenx;
+	int dsten;
+	int dstenz;
+	int dstwrz;
+	int clip_a1;
+	int upda1f;
+	int upda1;
+	int upda2;
+	int dsta2;
+	int gourd;
+	int zbuff;
+	int topben;
+	int topnen;
+	int patdsel;
+	int adddsel;
+	int zmode;
+	int logic;
+	int cmpdst;
+	int bcompen;
+	int dcompen;
+	int bkgwren;
+	int srcshade;
+} BLITCMD;
+
+typedef struct {
+	DWORD base;
+	DWORD pitch;
+	DWORD width;
+	DWORD depth;
+	DWORD z_offset;
+	signed int xadd;
+	signed int yadd;
+	WORD clip_x;
+	WORD clip_y;
+	unsigned int pixel_x;
+	unsigned int pixel_y;
+	signed int step_x;
+	signed int step_y;
+	unsigned int fstep_x;
+	unsigned int fstep_y;
+	signed int inc_x;
+	signed int inc_y;
+	DWORD pixelmode;
+	DWORD xsign;
+	DWORD ysign;
+} BLIT_A1;
+
+typedef struct {
+	DWORD base;
+	DWORD pitch;
+	DWORD width;
+	DWORD depth;
+	DWORD z_offset;
+	DWORD mask_enable;
+	signed int xadd;
+	signed int yadd;
+	DWORD mask;
+	unsigned int pixel_x;
+	unsigned int pixel_y;
+	signed int step_x;
+	signed int step_y;
+	DWORD pixelmode;
+	DWORD xsign;
+	DWORD ysign;
+} BLIT_A2;
+
+const DWORD bitdepth[8] = { 1,2,4,8,16,32,0,0 };
+const DWORD bitsize[8] = { 1,1,1,1,2,4,0,0 };
+const DWORD pitch[4] = { 8, 16, 32, 24 };
+const DWORD pixels_phrase[8] = {64,32,16,8,4,2,1,0};
+
+const DWORD width_table[64] = {   1,   1,   1,   1,   2,   2,   3,   3,
+                                  4,   4,   6,   6,   8,  10,  12,  14,
+							     16,  20,  24,  28,  32,  40,  48,  56,
+								 64,  80,  96, 112, 128, 160, 192, 224,
+							    256, 320, 384, 448, 512, 640, 768, 896,
+							   1024,1280,1536,1792,2048,2560,3072,3584,
+							   4096,5120,6144,7168,8192,10240,12288,14336,
+							   16384,20480,24576,28672,32768,40960,49152,57344 };
+
+//
+
+// More stuff from REG.H
+
+// Blitter Registers
+
+#define A1_BASE			jaguar_long_read(0xF02200)
+#define A1_FLAGS		jaguar_long_read(0xF02204)
+#define A1_CLIP			jaguar_long_read(0xF02208)
+#define A1_CLIP_X		jaguar_word_read(0xF0220A)
+#define A1_CLIP_Y		jaguar_word_read(0xF02208)
+#define A1_PIXEL		jaguar_long_read(0xF0220C)
+#define A1_PIXEL_Y		jaguar_word_read(0xF0220C)
+#define A1_PIXEL_X		jaguar_word_read(0xF0220E)
+#define A1_STEP			jaguar_long_read(0xF02210)
+#define A1_STEP_Y		jaguar_word_read(0xF02210)
+#define A1_STEP_X		jaguar_word_read(0xF02212)
+#define A1_FSTEP		jaguar_long_read(0xF02214)
+#define A1_FSTEP_Y		jaguar_word_read(0xF02214)
+#define A1_FSTEP_X		jaguar_word_read(0xF02216)
+#define A1_FPIXEL		jaguar_long_read(0xF02218)
+#define A1_FPIXEL_Y		jaguar_word_read(0xF02218)
+#define A1_FPIXEL_X		jaguar_word_read(0xF0221A)
+#define A1_INC			jaguar_long_read(0xF0221C)
+#define A1_INC_Y		jaguar_word_read(0xF0221C)
+#define A1_INC_X		jaguar_word_read(0xF0221E)
+#define A1_FINC			jaguar_long_read(0xF02220)
+#define A1_FINC_Y		jaguar_word_read(0xF02220)
+#define A1_FINC_X		jaguar_word_read(0xF02222)
+#define A2_BASE			jaguar_long_read(0xF02224)
+#define A2_FLAGS		jaguar_long_read(0xF02228)
+#define A2_MASK			jaguar_long_read(0xF0222C)
+#define A2_MASK_Y		jaguar_word_read(0xF0222C)
+#define A2_MASK_X		jaguar_word_read(0xF0222E)
+#define A2_PIXEL		jaguar_long_read(0xF02230)
+#define A2_PIXEL_Y		jaguar_word_read(0xF02230)
+#define A2_PIXEL_X		jaguar_word_read(0xF02232)
+#define A2_STEP			jaguar_long_read(0xF02234)
+#define A2_STEP_Y		jaguar_word_read(0xF02234)
+#define A2_STEP_X		jaguar_word_read(0xF02236)
+#define B_CMD			jaguar_long_read(0xF02238)
+#define B_COUNT			jaguar_long_read(0xF0223C)
+#define B_COUNT_OUT		jaguar_word_read(0xF0223C)
+#define B_COUNT_IN		jaguar_word_read(0xF0223E)
+#define B_SRCD			*(LONGLONG*)(MEM+0xF02240)
+#define B_SRCD0			jaguar_long_read(0xF02240)
+#define B_SRCD1			jaguar_long_read(0xF02244)
+#define B_DSTD			*(LONGLONG*)(MEM+0xF02248)
+#define B_DSTD0			jaguar_long_read(0xF02248)
+#define B_DSTD1			jaguar_long_read(0xF0224C)
+#define B_DSTZ			*(LONGLONG*)(MEM+0xF02250)
+#define B_DSTZ0			jaguar_long_read(0xF02250)
+#define B_DSTZ1			jaguar_long_read(0xF02254)
+#define B_SRCZ			*(LONGLONG*)(MEM+0xF02258)   // Source Z Integer
+#define B_SRCZ0			jaguar_long_read(0xF02258)
+#define B_SRCZ1			jaguar_long_read(0xF0225C)
+#define B_SRCZF			*(LONGLONG*)(MEM+0xF02260)   // Source Z Fraction
+#define B_SRCZF0		jaguar_long_read(0xF02260)
+#define B_SRCZF1		jaguar_long_read(0xF02264)
+#define B_PATD			*(LONGLONG*)(MEM+0xF02268)
+#define B_PATD0			jaguar_long_read(0xF02268)
+#define B_PATD1			jaguar_long_read(0xF0226C)
+#define B_IINC			jaguar_long_read(0xF02270)
+#define B_IINC_I		jaguar_word_read(0xF02270)
+#define B_IINC_F		jaguar_word_read(0xF02272)
+#define B_ZINC			jaguar_long_read(0xF02274)
+#define B_ZINC_I		jaguar_word_read(0xF02274)
+#define B_ZINC_F		jaguar_word_read(0xF02276)
+#define B_STOP			jaguar_long_read(0xF02278)
+#define B_I3			jaguar_long_read(0xF0227C)
+#define B_I3_I			jaguar_word_read(0xF0227C)
+#define B_I3_F			jaguar_word_read(0xF0227E)
+#define B_I2			jaguar_long_read(0xF02280)
+#define B_I2_I			jaguar_word_read(0xF02280)
+#define B_I2_F			jaguar_word_read(0xF02282)
+#define B_I1			jaguar_long_read(0xF02284)
+#define B_I1_I			jaguar_word_read(0xF02284)
+#define B_I1_F			jaguar_word_read(0xF02286)
+#define B_I0			jaguar_long_read(0xF02288)
+#define B_I0_I			jaguar_word_read(0xF02288)
+#define B_I0_F			jaguar_word_read(0xF0228A)
+#define B_Z3			jaguar_long_read(0xF0228C)
+#define B_Z3_I			jaguar_word_read(0xF0228C)
+#define B_Z3_F			jaguar_word_read(0xF0228E)
+#define B_Z2			jaguar_long_read(0xF02290)
+#define B_Z2_I			jaguar_word_read(0xF02290)
+#define B_Z2_F			jaguar_word_read(0xF02292)
+#define B_Z1			jaguar_long_read(0xF02294)
+#define B_Z1_I			jaguar_word_read(0xF02294)
+#define B_Z1_F			jaguar_word_read(0xF02296)
+#define B_Z0			jaguar_long_read(0xF02298)
+#define B_Z0_I			jaguar_word_read(0xF02298)
+#define B_Z0_F			jaguar_word_read(0xF0229A)
+
+//#define DWORDBIG(x) ((x>>16)&0xFFFF)|(x<<16)
+#define DWORDBIG(x)		x
+
+//
+
+//const pixels_per_phrase[8] = { 64, 32, 16, 8, 4, 2, 1, 0 };
+
+void blitter2_exec(DWORD cmd)
+{
+	DWORD* src,* dst,* read;
+	DWORD a1_address, a2_address;
+	DWORD a1_bm,a2_bm;
+	DWORD* src_bm,* dst_bm;
+	BLITCMD bcmd;
+	BLIT_A1 a1;
+	BLIT_A2 a2;
+	memset(&a1,0,sizeof(BLIT_A1));
+	memset(&a2,0,sizeof(BLIT_A2));
+	memset(&bcmd,0,sizeof(BLITCMD));
+	DWORD srcd = 0xF02240;
+	DWORD dstd = 0xF02248;
+	DWORD patd = 0xF02268;
+
+	bcmd.srcen = (cmd & 0x1) ? 1 : 0;
+	bcmd.srcenz = (cmd & 0x2) ? 1 : 0;
+	bcmd.srcenx = (cmd & 0x4) ? 1 : 0;
+	bcmd.dsten = (cmd & 0x8) ? 1 : 0;
+	bcmd.dstenz = (cmd & 0x10) ? 1 : 0;
+	bcmd.dstwrz = (cmd & 0x20) ? 1 : 0;
+	bcmd.clip_a1 = (cmd & 0x40) ? 1 : 0;
+	bcmd.upda1f = (cmd & 0x100) ? 1 : 0;
+	bcmd.upda1 = (cmd & 0x200) ? 1 : 0;
+	bcmd.upda2 = (cmd & 0x400) ? 1 : 0;
+	bcmd.dsta2 = (cmd & 0x800) ? 1 : 0;
+	bcmd.gourd = (cmd & 0x1000) ? 1 : 0;
+	bcmd.patdsel = (cmd & 0x10000) ? 1 : 0;
+	bcmd.cmpdst = (cmd & 0x2000000) ? 1 : 0;
+	bcmd.bcompen = (cmd & 0x4000000) ? 1 : 0;
+	bcmd.dcompen = (cmd & 0x8000000) ? 1 : 0;
+	bcmd.bkgwren = (cmd & 0x10000000) ? 1 : 0;
+	bcmd.srcshade = (cmd & 0x40000000) ? 1 : 0;
+	bcmd.logic = (cmd >> 21) & 0xF;
+	bcmd.zmode = (cmd >> 18) & 0x7;
+
+	DWORD outer_loop = B_COUNT_OUT;
+	DWORD inner_loop = B_COUNT_IN;
+
+	a1.base = DWORDBIG(A1_BASE);
+	DWORD flags = DWORDBIG(A1_FLAGS);
+	a1.pitch = flags & 0x3;
+	a1.depth = (flags >> 3) & 0x7;
+	a1.z_offset = ((flags >> 6) & 0x7)*8;
+	a1.xadd = (short)((flags >> 16) & 0x3);
+	a1.pixel_x = A1_PIXEL_X << 16 | A1_FPIXEL_X;
+	a1.pixel_y = A1_PIXEL_Y << 16 | A1_FPIXEL_Y;
+	a1.step_x = (signed short)A1_STEP_X << 16;
+	a1.step_y = (signed short)A1_STEP_Y << 16;
+	a1.fstep_x = A1_FSTEP_X;
+	a1.fstep_y = A1_FSTEP_Y;
+	a1.inc_x = A1_INC_X << 16 | A1_FINC_X;
+	a1.inc_y = A1_INC_Y << 16 | A1_FINC_Y;
+	a1.clip_x = A1_CLIP_X & 0x7FFF;
+	a1.clip_y = A1_CLIP_Y & 0x7FFF;
+	a1.width = width_table[(flags >> 9) & 0x3F];
+
+	a1.yadd = (short)((flags >> 18) & 0x1);
+	a1.xsign = (flags >> 19) & 0x1;
+	a1.ysign = (flags >> 20) & 0x1;
+	if(a1.ysign)
+		a1.yadd = -a1.yadd;
+	a1.pixelmode = (flags >> 16) & 0x3;
+
+	a2.base = DWORDBIG(A2_BASE);
+	flags = DWORDBIG(A2_FLAGS);
+	a2.pitch = flags & 0x3;
+	a2.z_offset = ((flags >> 6) & 0x7)*8;
+	a2.pixel_x = A2_PIXEL_X;
+	a2.pixel_y = A2_PIXEL_Y;
+	a2.step_x = (signed short)A2_STEP_X;
+	a2.step_y = (signed short)A2_STEP_Y;
+	a2.mask = DWORDBIG(A2_MASK);
+	a2.width = width_table[(flags >> 9) & 0x3F];
+//	a2.yadd = (flags >> 18) & 0x1;
+	a2.yadd = a1.yadd; // Buggy blitter !!? YES! It is!!!
+	a2.pixelmode = (flags >> 16) & 0x3;
+	a2.xsign = (flags >> 19) & 0x1;
+	a2.ysign = (flags >> 20) & 0x1;
+	if(a2.ysign)
+		a2.yadd = -a2.yadd;
+
+	if(bcmd.dsta2 == 0) {
+		dst = &a1_address;
+		src = &a2_address;
+		read = &a1_address;
+		dst_bm = &a1_bm;
+		src_bm = &a2_bm;
+	} else {
+		src = &a1_address;
+		dst = &a2_address;
+		read = &a2_address;
+		dst_bm = &a2_bm;
+		src_bm = &a1_bm;
+	}
+	if(!bcmd.srcen) {
+		src = &srcd;
+	}
+	if(bcmd.patdsel) {
+		src = &patd;
+	}
+	if(!bcmd.dsten) {
+		read = &dstd;
+	}
+
+	int src_zoffset,dst_zoffset;
+	if(bcmd.dsta2) {
+		src_zoffset = a1.z_offset;
+		dst_zoffset = a2.z_offset;
+	} else {
+		src_zoffset = a2.z_offset;
+		dst_zoffset = a1.z_offset;
+	}
+
+	unsigned int a1_x = a1.pixel_x;
+	unsigned int a1_y = a1.pixel_y;
+	unsigned int a2_x = a2.pixel_x;
+	unsigned int a2_y = a2.pixel_y;
+	int a1_size = pitch[a1.pitch];
+	int a2_size = pitch[a2.pitch];
+	//inner_loop = (inner_loop * bitdepth[a1.depth]) / 8;
+
+	int a1_inc_x,a1_inc_y;
+	short a2_inc_x;
+	switch(a1.pixelmode) {
+		case 0:a1_inc_x = 1<<16; a1_inc_y = a1.yadd<<16; break;
+		case 1:a1_inc_x = 1<<16; a1_inc_y = a1.yadd<<16; break;
+		case 2:a1_inc_x = 0; a1_inc_y = a1.yadd<<16; break;
+		case 3:a1_inc_x = a1.inc_x; a1_inc_y = a1.inc_y; break;
+	}
+	if(a1.xsign)
+		a1_inc_x = -a1_inc_x;
+	switch(a2.pixelmode) {
+		case 0:a2_inc_x = 1;break;
+		case 1:a2_inc_x = 1;break;
+		case 2:a2_inc_x = 0;break;
+		case 3:a2_inc_x = 1;break;
+	}
+	if(a2.xsign)
+		a2_inc_x = -a2_inc_x;
+
+	int gd_i[4];
+	int gd_c[4];
+	int gd_ia,gd_ca;
+	DWORD gouraud_add,gouraud_data;
+	WORD gint[4],gfrac[4];
+	BYTE gcolour[4];
+	gouraud_add = jaguar_long_read(0xF02270);
+	gcolour[3] = jaguar_byte_read(0xF02268);
+	gcolour[2] = jaguar_byte_read(0xF0226A);
+	gcolour[1] = jaguar_byte_read(0xF0226C);
+	gcolour[0] = jaguar_byte_read(0xF0226E);
+	gint[3] = jaguar_word_read(0xF0227C);
+	gint[2] = jaguar_word_read(0xF02280);
+	gint[1] = jaguar_word_read(0xF02284);
+	gint[0] = jaguar_word_read(0xF02288);
+	gfrac[3] = jaguar_word_read(0xF0227E);
+	gfrac[2] = jaguar_word_read(0xF02282);
+	gfrac[1] = jaguar_word_read(0xF02286);
+	gfrac[0] = jaguar_word_read(0xF0228A);
+	gd_ia = gouraud_add & 0xFFFFFF;
+	if(gd_ia & 0x800000)
+		gd_ia = 0xFF000000 | gd_ia;
+	gd_ca = (gouraud_add>>24) & 0xFF;
+	if(gd_ca & 0x80)
+		gd_ca = 0xFFFFFF00 | gd_ca;
+	for(int v=0;v<4;v++) {
+		gd_i[v] = gint[v] & 0xFF;
+		//if(gd_i[v] & 0x80)
+		//	gd_i[v] = 0xFF00 | gd_i[v];
+		gd_i[v] = (gd_i[v] << 16) | gfrac[v];
+		gd_c[v] = gcolour[v]<<4;
+	}
+	int colour_index = 0;
+	int pi=0;
+	switch(a1.depth) {
+		case 0:case 1:case 2:case 3:
+			for(DWORD j=0; j<outer_loop; j++) {
+				int old_a1x = a1_x;
+				int old_a2x = a2_x;
+				for(DWORD i=0; i<(inner_loop*bitdepth[a1.depth]); i+=bitdepth[a1.depth]) {
+					BYTE src1,src2=0;
+					BYTE dst1,dst2;
+					BYTE dst_old;
+					a1_address = a1.base + ((((a1_y>>16) * a1.width + (a1_x>>16))*bitdepth[a1.depth])/8);
+					a2_address = a2.base + (((a2_y * a2.width + a2_x)*bitdepth[a1.depth])/8);
+					src1 = jaguar_byte_read(*src);
+					dst1 = jaguar_byte_read(*dst);
+					dst_old = dst1;
+					//jaguar_long_read(*src+4,&src2);
+					if(!bcmd.patdsel) {
+						//jaguar_long_read(*dst+4,&dst2);
+						switch(bcmd.logic)
+						{
+						case 0:dst1 = 0;dst2 = 0;break;				
+						case 1:dst1 = !src1 & !dst1; dst2 = !src2 & !dst2;break;
+						case 2:dst1 = !src1 &  dst1; dst2 = !src2 & dst2;break;				
+						case 3:dst1 = !src1; dst2 = !src2;break;
+						case 4:dst1 = src1 & !dst1; dst2 = src2 & !dst2;break;
+						case 5:dst1 = !dst1; dst2 = !dst2;break;
+						case 6:dst1 = !(src1 ^ dst1); dst2 = !(src2 ^ dst2);break;
+						case 7:dst1 = !src1 | !dst1; dst2 = !src2 | !dst2;break;
+						case 8:dst1 = src1 & dst1; dst2 = src2 & dst2;break;
+						case 9:dst1 = src1 ^ dst1; dst2 = src2 ^ dst2;break;
+						case 10:dst1 = dst1; dst2 = dst2;break;
+						case 11:dst1 = !src1 | dst1; dst2 = !src2 | dst2;break;
+						case 12:dst1 = src1; dst2 = src2;break;
+						case 13:dst1 = src1 | !dst1; dst2 = src2 | !dst2;break;
+						case 14:dst1 = src1 | dst1; dst2 = src2 | dst2;break;
+						case 15:dst1 = 0xFF; dst2 = 0xFF;break;
+						}
+					} else {
+						dst1 = src1;
+						//dst2 = src2;
+					}
+					if(bcmd.dcompen) {
+						BYTE pattern;
+						pattern = jaguar_byte_read(0xF02268);
+						if(!bcmd.cmpdst) {
+							if(src1 == !dst_old)
+							dst1 = dst_old;
+						} else {					
+							if(dst1 == !dst_old)
+							dst1 = dst_old;
+						}
+					}
+					if(bcmd.clip_a1) {
+						if((a1_x>>16) < a1.clip_x && (a1_x>>16) >= 0 && (a1_y>>16) < a1.clip_y && (a1_y>>16) >= 0) {
+							jaguar_byte_write(*dst,dst1);
+							//jaguar_long_write(*dst+4,dst2);
+						}
+					} else {
+						jaguar_byte_write(*dst,dst1);
+						//jaguar_long_write(*dst+4,dst2);
+					}
+					a1_x += a1_inc_x;
+					a2_x += a2_inc_x;
+					a1_y += a1_inc_y;
+					a2_y += a2.yadd;
+					for(int v=0;v<4;v++) {
+						gd_i[v] += gd_ia;
+						gd_c[v] += gd_ca;
+					}
+				}
+				if(bcmd.upda1) {
+					a1_x += a1.step_x;
+					a1_y += a1.step_y;
+				}
+				if(bcmd.upda1f) {
+					a1_x += a1.fstep_x;
+					a1_y += a1.fstep_y;
+				}
+				if(bcmd.upda2) {
+					a2_x += a2.step_x;
+					a2_y += a2.step_y;
+				}
+				//a1_x = old_a1x;
+				//a2_x = old_a2x;
+			}
+			break;
+		case 4:
+			{
+			int zinc = jaguar_long_read(0xF02274);
+			INT32 compz[4];
+			compz[0] = jaguar_long_read(0xF0228C);
+			compz[1] = jaguar_long_read(0xF02290);
+			compz[2] = jaguar_long_read(0xF02294);
+			compz[3] = jaguar_long_read(0xF02298);
+			for(DWORD j=0; j<outer_loop; j++) {
+				for(DWORD i=0; i<inner_loop*2; i+=2) {
+					WORD src1,src2;
+					WORD dst1,dst2;
+					WORD dst_old;
+					WORD srcz,dstz;
+					a1_address = a1.base + (((a1_y>>16) * a1.width + ((a1_x>>16)&0xFFFFFFFC))*2*(a1_size/8)) + (((a1_x>>16)&0x3)*2);
+					a2_address = a2.base + ((a2_y * a2.width + (a2_x&0xFFFFFFFC))*2*(a2_size/8)) + ((a2_x&0x3)*2);
+					src1 = jaguar_word_read(*src);
+					dst1 = jaguar_word_read(*dst);
+					dst_old = dst1;
+					if(bcmd.srcenz)
+						srcz = jaguar_word_read(*src+src_zoffset);
+					else
+						srcz = compz[pi & 0x3] >> 16;
+					if(bcmd.dstenz)
+						dstz = jaguar_word_read(*dst+dst_zoffset);
+
+					//jaguar_long_read(*src+4,&src2);
+					if(bcmd.patdsel) {
+//						dst1 = *(WORD*)(&MEM[0xF02268]);
+						dst1 = jaguar_word_read(0xF02268);
+					} else {
+						//jaguar_long_read(*dst+4,&dst2);
+						switch(bcmd.logic)
+						{
+						case 0:dst1 = 0;dst2 = 0;break;				
+						case 1:dst1 = !src1 & !dst1; dst2 = !src2 & !dst2;break;
+						case 2:dst1 = !src1 &  dst1; dst2 = !src2 & dst2;break;				
+						case 3:dst1 = !src1; dst2 = !src2;break;
+						case 4:dst1 = src1 & !dst1; dst2 = src2 & !dst2;break;
+						case 5:dst1 = !dst1; dst2 = !dst2;break;
+						case 6:dst1 = (src1 ^ dst1); dst2 = !(src2 ^ dst2);break;
+						case 7:dst1 = !src1 | !dst1; dst2 = !src2 | !dst2;break;
+						case 8:dst1 = src1 & dst1; dst2 = src2 & dst2;break;
+						case 9:dst1 = src1 ^ dst1; dst2 = src2 ^ dst2;break;
+						case 10:dst1 = dst1; dst2 = dst2;break;
+						case 11:dst1 = !src1 | dst1; dst2 = !src2 | dst2;break;
+						case 12:dst1 = src1; dst2 = src2;break;
+						case 13:dst1 = src1 | !dst1; dst2 = src2 | !dst2;break;
+						case 14:dst1 = src1 | dst1; dst2 = src2 | dst2;break;
+						case 15:dst1 = 0xFFFFFFFF; dst2 = 0xFFFFFFFF;break;
+						}
+					} 
+					if(bcmd.gourd) {
+						DWORD gdt = (gd_i[pi & 0x3] & 0xFFFFFF) | ((gd_c[pi & 0x3]>>4) << 24);
+						dst1 = gdt >> 16;
+					}
+					if(bcmd.srcshade) {
+						int intensity = src1 & 0xFF;
+						int ia = gd_ia >> 16;
+						if(ia & 0x80)
+							ia = 0xFFFFFF00 | ia;
+						intensity += ia;
+						if(intensity < 0)
+							intensity = 0;
+						if(intensity > 0xFF)
+							intensity = 0xFF;
+						dst1 = (src1 & 0xFF00) | intensity;
+					}
+					if(bcmd.dcompen) {
+						WORD pattern;
+						pattern = jaguar_word_read(0xF02268);
+						if(!bcmd.cmpdst) {
+							if(src1 == pattern)//dst_old)
+								dst1 = dst_old;
+						} else {
+							if(dst1 == pattern)
+								dst1 = dst_old;
+						}
+					}
+					if(bcmd.zmode > 0) {
+						bool zc = false;
+						switch(bcmd.zmode) {
+							case 1: zc = (srcz < dstz);break;
+							case 2: zc = (srcz == dstz);break;
+							case 3: zc = (srcz <= dstz);break;
+							case 4: zc = (srcz > dstz);break;
+							case 5: zc = (srcz != dstz);break;
+							case 6: zc = (srcz >= dstz);break;
+						}
+						if(zc == false) {
+							if(bcmd.clip_a1) {
+								if((a1_x>>16) < a1.clip_x && (a1_x>>16) >= 0 && (a1_y>>16) < a1.clip_y && (a1_y>>16) >= 0) {
+									jaguar_word_write(*dst,dst1);
+									//jaguar_long_write(*dst+4,dst2);
+								}
+							} else {
+								jaguar_word_write(*dst,dst1);
+								//jaguar_long_write(*dst+4,dst2);
+							}
+						} else {
+							srcz = dstz;
+						}
+					} else {
+						if(bcmd.clip_a1) {
+							if((a1_x>>16) < a1.clip_x && (a1_x>>16) >= 0 && (a1_y>>16) < a1.clip_y && (a1_y>>16) >= 0) {
+								jaguar_word_write(*dst,dst1);
+								//jaguar_long_write(*dst+4,dst2);
+							}
+						} else {
+							jaguar_word_write(*dst,dst1);
+							//jaguar_long_write(*dst+4,dst2);
+						}
+					}
+					if(bcmd.dstwrz) {
+						jaguar_word_write(*dst+dst_zoffset,srcz & 0xFFFF);
+					}
+					a1_x += a1_inc_x;
+					a2_x += a2_inc_x;
+					a1_y += a1_inc_y;
+					a2_y += a2.yadd;
+					gd_i[pi & 0x3] += gd_ia;
+					gd_c[pi & 0x3] += gd_ca;
+					if(gd_i[pi & 0x3] > 0xFFFFFF)
+						gd_i[pi & 0x3] = 0xFFFFFF;
+					if(gd_i[pi & 0x3] < 0)
+						gd_i[pi & 0x3] = 0;
+					compz[pi & 0x3] += zinc;
+					if(compz[pi & 0x3] > 0xFFFFFFFF)
+						compz[pi & 0x3] = 0xFFFFFFFF;
+					if(compz[pi & 0x3] < 0)
+						compz[pi & 0x3] = 0;
+					if(a1.pixelmode == 0) {
+						pi++;
+					}
+				}
+				if(bcmd.upda1) {
+					a1_x += a1.step_x;
+					a1_y += a1.step_y;
+				}
+				if(bcmd.upda1f) {
+					a1_x += a1.fstep_x;
+					a1_y += a1.fstep_y;
+				}
+				if(bcmd.upda2) {
+					a2_x += a2.step_x;
+					a2_y += a2.step_y;
+				}
+			}
+			break;
+			}
+		case 5:
+			for(DWORD j=0; j<outer_loop; j++) {
+				for(DWORD i=0; i<(inner_loop*bitdepth[a1.depth])/8; i+=bitsize[a1.depth]) {
+					DWORD src1,src2=0;
+					DWORD dst1,dst2;
+					a1_address = a1.base + ((((a1_y>>16) * a1.width + (a1_x>>16))*bitdepth[a1.depth])/8);
+					a2_address = a2.base + (((a2_y * a2.width + a2_x)*bitdepth[a1.depth])/8);
+					src1 = jaguar_long_read(*src);
+					//jaguar_long_read(*src+4,&src2);
+					if(!bcmd.patdsel) {
+						dst1 = jaguar_long_read(*read);
+						//jaguar_long_read(*dst+4,&dst2);
+						switch(bcmd.logic)
+						{
+						case 0:dst1 = 0;dst2 = 0;break;				
+						case 1:dst1 = !src1 & !dst1; dst2 = !src2 & !dst2;break;
+						case 2:dst1 = !src1 &  dst1; dst2 = !src2 & dst2;break;				
+						case 3:dst1 = !src1; dst2 = !src2;break;
+						case 4:dst1 = src1 & !dst1; dst2 = src2 & !dst2;break;
+						case 5:dst1 = !dst1; dst2 = !dst2;break;
+						case 6:dst1 = !(src1 ^ dst1); dst2 = !(src2 ^ dst2);break;
+						case 7:dst1 = !src1 | !dst1; dst2 = !src2 | !dst2;break;
+						case 8:dst1 = src1 & dst1; dst2 = src2 & dst2;break;
+						case 9:dst1 = src1 ^ dst1; dst2 = src2 ^ dst2;break;
+						case 10:dst1 = dst1; dst2 = dst2;break;
+						case 11:dst1 = !src1 | dst1; dst2 = !src2 | dst2;break;
+						case 12:dst1 = src1; dst2 = src2;break;
+						case 13:dst1 = src1 | !dst1; dst2 = src2 | !dst2;break;
+						case 14:dst1 = src1 | dst1; dst2 = src2 | dst2;break;
+						case 15:dst1 = 0xFFFFFFFF; dst2 = 0xFFFFFFFF;break;
+						}
+					} else {
+						dst1 = src1;
+						dst2 = src2;
+					}
+					if(bcmd.clip_a1) {
+						if((a1_x>>16) < a1.clip_x && (a1_x>>16) >= 0 && (a1_y>>16) < a1.clip_y && (a1_y>>16) >= 0) {
+							jaguar_long_write(*dst,dst1);
+							//jaguar_long_write(*dst+4,dst2);
+						}
+					} else {
+						jaguar_long_write(*dst,dst1);
+						//jaguar_long_write(*dst+4,dst2);
+					}
+					a1_x += a1_inc_x;
+					a2_x += a2_inc_x;
+					a1_y += a1_inc_y;
+					a2_y += a2.yadd;
+					for(int v=0;v<4;v++) {
+						gd_i[v] += gd_ia;
+						gd_c[v] += gd_ca;
+					}
+				}
+				if(bcmd.upda1) {
+					a1_x += a1.step_x;
+					a1_y += a1.step_y;
+				}
+				if(bcmd.upda1f) {
+					a1_x += a1.fstep_x;
+					a1_y += a1.fstep_y;
+				}
+				if(bcmd.upda2) {
+					a2_x += a2.step_x;
+					a2_y += a2.step_y;
+				}
+			}
+			break;
+		default:
+			break;
+	}
+/*	A1_PIXEL_X = a1_x >> 16;
+	A1_PIXEL_Y = a1_y >> 16;
+	A1_FPIXEL_X = a1_x & 0xFFFF;
+	A1_FPIXEL_Y = a1_y & 0xFFFF;
+	A2_PIXEL_X = a2_x;
+	A2_PIXEL_Y = a2_y;*/
+	jaguar_word_write(0xF0220E, a1_x >> 16);	// A1_PIXEL_X = 
+	jaguar_word_write(0xF0220C, a1_y >> 16);	// A1_PIXEL_Y = 
+	jaguar_word_write(0xF0221A, a1_x & 0xFFFF);	// A1_FPIXEL_X = 
+	jaguar_word_write(0xF02218, a1_y & 0xFFFF);	// A1_FPIXEL_Y = 
+	jaguar_word_write(0xF02232, a2_x);			// A2_PIXEL_X = 
+	jaguar_word_write(0xF02230, a2_y);			// A2_PIXEL_Y = 
+}
+/*
+#define A1_PIXEL_Y		jaguar_word_read(0xF0220C)
+#define A1_PIXEL_X		jaguar_word_read(0xF0220E)
+#define A1_FPIXEL_Y		jaguar_word_read(0xF02218)
+#define A1_FPIXEL_X		jaguar_word_read(0xF0221A)
+#define A2_PIXEL_Y		jaguar_word_read(0xF02230)
+#define A2_PIXEL_X		jaguar_word_read(0xF02232)
+*/