-//#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)
-*/