/** VGB: portable GameBoy emulator ***************************/ /** **/ /** Common.h **/ /** **/ /** This file contains parts of the drivers which are **/ /** common for both Unix/X and MSDOS. **/ /** **/ /** Copyright (C) Marat Fayzullin 1995,1996 **/ /** John Stiles 1996 **/ /** Marcel de Kogel 1996 **/ /** You are not allowed to distribute this software **/ /** commercially. Please, notify me, if you make any **/ /** changes to this file. **/ /*************************************************************/ /** USE_XPAL *************************************************/ /** When defined, it makes Common.h drivers use XPal[] to **/ /** obtain color numbers (when there is no 1:1 **/ /** correspondence, for example in X11). **/ /*************************************************************/ /* #define USE_XPAL */ #ifdef USE_XPAL #define XPAL(N) XPal[N] #else #define XPAL(N) N #endif /****************************************************************/ /*** Refresh a line. ***/ /****************************************************************/ void RefreshLine(byte Y) { register byte Offset,*P,*T,*R,*Z,Z0,D0,X1,X2,Shift; unsigned int D1; #ifdef USE_XPAL #define PAL(N) Pal[N] #define WPAL(N) WPal[N] byte Pal[4],WPal[4]; Pal[0]=XPal[BPal[0]];Pal[1]=XPal[BPal[1]]; Pal[2]=XPal[BPal[2]];Pal[3]=XPal[BPal[3]]; WPal[0]=(XPal+8)[BPal[0]];WPal[1]=(XPal+8)[BPal[1]]; WPal[2]=(XPal+8)[BPal[2]];WPal[3]=(XPal+8)[BPal[3]]; #else #define PAL(N) BPal[N] #define WPAL(N) BPal[N]+8 #endif D1=WIDTH*Y+(WIDTH-160)/2; R=XBuf+D1;Z=ZBuf+(D1>>3); if((LCDCONT&0x81)!=0x81) { /* Clearing screen buffer */ memset(R,XPAL(0),160); /* Clearing Z-buffer */ memset(Z,0x00,160/8); memset(Z+WIDTH*HEIGHT/8,0x00,160/8); } else { Offset=Y+SCROLLY; T=BgdTab+((int)(Offset&0xF8)<<2); Offset=(Offset&0x07)<<1; Shift=SCROLLX&0x07; R-=Shift;Z--; X1=SCROLLX>>3; /* Determine how much background is shown */ X2=(WNDPOSX>7)? WNDPOSX-7:0; if((~LCDCONT&0x20)||(WNDPOSY>Y)||(X2>159)) X2=160; X2=X1+((X2+7)>>3); Z[0]=0x00; for(;X1<=X2;X1++) { D0=*(T+(X1&0x1F)); if(~LCDCONT&0x10) D0+=0x80; P=ChrGen+(D0<<4)+Offset; D0=*P; /* Modifying Z-buffer */ D1=(int)(D0|*(P+1))<>8; Z[1]=D1&0xFF; Z[WIDTH*HEIGHT/8]=0x00; /* Modifying screen buffer */ D1=(int)*(P+1)<<1; D1=(D1&0xAAA)|((D1&0x555)<<7)|(D0&0x55)|((int)(D0&0xAA)<<7); R[0]=PAL((D1&0xC000)>>14); R[1]=PAL((D1&0x00C0)>>6 ); R[2]=PAL((D1&0x3000)>>12); R[3]=PAL((D1&0x0030)>>4 ); R[4]=PAL((D1&0x0C00)>>10); R[5]=PAL((D1&0x000C)>>2 ); R[6]=PAL((D1&0x0300)>>8 ); R[7]=PAL( D1&0x003 ); /* Moving pointers */ R+=8;Z++; } } X1=(WNDPOSX>7)? WNDPOSX-7:0; if(((LCDCONT&0xA0)==0xA0)&&(WNDPOSY<=Y)&&(X1<160)) { D1=WIDTH*Y+(WIDTH-160)/2+X1; R=XBuf+D1;Z=ZBuf+(D1>>3); Offset=Y-WNDPOSY; T=WndTab+((int)(Offset&0xF8)<<2); Offset=(Offset&0x07)<<1; D0=0xFF>>(X1&0x07); if(LCDCONT&0x02) Z[WIDTH*HEIGHT/8]=Z0=0x00; else { Z[WIDTH*HEIGHT/8]=D0;Z0=0xFF; } Z[0]|=D0;Z++; for(X1>>=3;X1<(160>>3);X1++) { D0=*(T++)+0x80; P=RAM+0x8800+((int)D0<<4)+Offset; /* Modifying Z-buffer */ Z[WIDTH*HEIGHT/8]=Z0;Z[0]|=0xFF; /* Modifying screen buffer */ D0=*P;D1=(int)*(P+1)<<1; D1=(D1&0xAAA)|((D1&0x555)<<7)|(D0&0x55)|((int)(D0&0xAA)<<7); R[0]=WPAL((D1&0xC000)>>14); R[1]=WPAL((D1&0x00C0)>>6 ); R[2]=WPAL((D1&0x3000)>>12); R[3]=WPAL((D1&0x0030)>>4 ); R[4]=WPAL((D1&0x0C00)>>10); R[5]=WPAL((D1&0x000C)>>2 ); R[6]=WPAL((D1&0x0300)>>8 ); R[7]=WPAL( D1&0x0003 ); /* Moving pointers */ R+=8;Z++; } } } /****************************************************************/ /*** Refresh sprites. ***/ /****************************************************************/ void RefreshSprites(void) { /* Conversion matrix where result has bits */ /* flipped over and inverted. */ static byte Conv[256] = { 0xFF,0x7F,0xBF,0x3F,0xDF,0x5F,0x9F,0x1F,0xEF,0x6F,0xAF,0x2F, 0xCF,0x4F,0x8F,0x0F,0xF7,0x77,0xB7,0x37,0xD7,0x57,0x97,0x17, 0xE7,0x67,0xA7,0x27,0xC7,0x47,0x87,0x07,0xFB,0x7B,0xBB,0x3B, 0xDB,0x5B,0x9B,0x1B,0xEB,0x6B,0xAB,0x2B,0xCB,0x4B,0x8B,0x0B, 0xF3,0x73,0xB3,0x33,0xD3,0x53,0x93,0x13,0xE3,0x63,0xA3,0x23, 0xC3,0x43,0x83,0x03,0xFD,0x7D,0xBD,0x3D,0xDD,0x5D,0x9D,0x1D, 0xED,0x6D,0xAD,0x2D,0xCD,0x4D,0x8D,0x0D,0xF5,0x75,0xB5,0x35, 0xD5,0x55,0x95,0x15,0xE5,0x65,0xA5,0x25,0xC5,0x45,0x85,0x05, 0xF9,0x79,0xB9,0x39,0xD9,0x59,0x99,0x19,0xE9,0x69,0xA9,0x29, 0xC9,0x49,0x89,0x09,0xF1,0x71,0xB1,0x31,0xD1,0x51,0x91,0x11, 0xE1,0x61,0xA1,0x21,0xC1,0x41,0x81,0x01,0xFE,0x7E,0xBE,0x3E, 0xDE,0x5E,0x9E,0x1E,0xEE,0x6E,0xAE,0x2E,0xCE,0x4E,0x8E,0x0E, 0xF6,0x76,0xB6,0x36,0xD6,0x56,0x96,0x16,0xE6,0x66,0xA6,0x26, 0xC6,0x46,0x86,0x06,0xFA,0x7A,0xBA,0x3A,0xDA,0x5A,0x9A,0x1A, 0xEA,0x6A,0xAA,0x2A,0xCA,0x4A,0x8A,0x0A,0xF2,0x72,0xB2,0x32, 0xD2,0x52,0x92,0x12,0xE2,0x62,0xA2,0x22,0xC2,0x42,0x82,0x02, 0xFC,0x7C,0xBC,0x3C,0xDC,0x5C,0x9C,0x1C,0xEC,0x6C,0xAC,0x2C, 0xCC,0x4C,0x8C,0x0C,0xF4,0x74,0xB4,0x34,0xD4,0x54,0x94,0x14, 0xE4,0x64,0xA4,0x24,0xC4,0x44,0x84,0x04,0xF8,0x78,0xB8,0x38, 0xD8,0x58,0x98,0x18,0xE8,0x68,0xA8,0x28,0xC8,0x48,0x88,0x08, 0xF0,0x70,0xB0,0x30,0xD0,0x50,0x90,0x10,0xE0,0x60,0xA0,0x20, 0xC0,0x40,0x80,0x00 }; byte *P,*T,*S,*R,*Z,I,J,K,N,D0; unsigned int D1; int Shift,DY; #undef PAL #ifdef USE_XPAL #define PAL(N) Pal[N] byte Pal[4]; #else #define PAL(N) R[N]+4 #endif N=LCDCONT&0x04? 16:8; for(S=RAM+0xFE9C,J=40;J;S-=4,J--) if(S[0]&&(S[0]<160)&&S[1]&&(S[1]<168)) { if(S[0]<16) { D0=0;K=16-S[0];I=(K>3); Shift&=0x07; DY=2; if(S[3]&0x40) { DY=-DY;K=N-K-1; } R=S[3]&0x10? SPal1:SPal0; #ifdef USE_XPAL Pal[0]=(XPal+4)[R[0]];Pal[1]=(XPal+4)[R[1]]; Pal[2]=(XPal+4)[R[2]];Pal[3]=(XPal+4)[R[3]]; #endif T=RAM+0x8000+((long)((N>8)? S[2]&0xFE:S[2])<<4)+(K<<1); /* If on top of background, clip only against the window */ if(~S[3]&0x80) Z+=WIDTH*HEIGHT/8; if(S[3]&0x20) { Shift=7-Shift; for(;I;I--,P+=WIDTH,Z+=WIDTH/8,T+=DY) { D0=*T;D1=*(T+1); K=(((int)Z[-1]<<8)|Z[0])>>Shift; K=(D0|D1)&Conv[K]; if(K) { D1<<=1; D1=(D1&0xAAA)|((D1&0x555)<<7)|(D0&0x55)|((int)(D0&0xAA)<<7); if(K&0x80) P[0]=PAL((D1&0xC000)>>14); if(K&0x40) P[-1]=PAL((D1&0x00C0)>>6 ); if(K&0x20) P[-2]=PAL((D1&0x3000)>>12); if(K&0x10) P[-3]=PAL((D1&0x0030)>>4 ); if(K&0x08) P[-4]=PAL((D1&0x0C00)>>10); if(K&0x04) P[-5]=PAL((D1&0x000C)>>2 ); if(K&0x02) P[-6]=PAL((D1&0x0300)>>8 ); if(K&0x01) P[-7]=PAL( D1&0x0003 ); } } } else { Shift=8-Shift; for(;I;I--,P+=WIDTH,Z+=WIDTH/8,T+=DY) { D0=*T;D1=*(T+1); K=(((int)Z[0]<<8)|Z[1])>>Shift; K=(D0|D1)&~K; if(K) { D1<<=1; D1=(D1&0xAAA)|((D1&0x555)<<7)|(D0&0x55)|((int)(D0&0xAA)<<7); if(K&0x80) P[0]=PAL((D1&0xC000)>>14); if(K&0x40) P[1]=PAL((D1&0x00C0)>>6 ); if(K&0x20) P[2]=PAL((D1&0x3000)>>12); if(K&0x10) P[3]=PAL((D1&0x0030)>>4 ); if(K&0x08) P[4]=PAL((D1&0x0C00)>>10); if(K&0x04) P[5]=PAL((D1&0x000C)>>2 ); if(K&0x02) P[6]=PAL((D1&0x0300)>>8 ); if(K&0x01) P[7]=PAL( D1&0x0003 ); } } } } } /****************************************************************/ /*** Display the screen buffer. ***/ /****************************************************************/ void RefreshScreen() { PutImage(); }