// This is part of Pico Library\r
\r
// (c) Copyright 2004 Dave, All rights reserved.\r
-// (c) Copyright 2006 notaz, All rights reserved.\r
+// (c) Copyright 2006-2008 notaz, All rights reserved.\r
// Free for non-commercial use.\r
\r
// For commercial use, separate licencing terms must be obtained.\r
static int HighCacheB[41+1];\r
static int HighCacheS[80+1]; // and sprites\r
static int HighPreSpr[80*2+1]; // slightly preprocessed sprites\r
-char HighSprZ[320+8+8]; // Z-buffer for accurate sprites and shadow/hilight mode\r
- // (if bit 7 == 0, sh caused by tile; if bit 6 == 0 pixel must be shadowed, else hilighted, if bit5 == 1)\r
+\r
+static unsigned char HighSprZ[320+8+8]; // Z-buffer for accurate sprites\r
+\r
int rendstatus = 0;\r
int Scanline = 0; // Scanline\r
\r
{\r
unsigned int pack=0; unsigned int t=0;\r
unsigned char *pd = HighCol+sx;\r
- char *zb = HighSprZ+sx;\r
- int collision = 0, zb_s;\r
+ unsigned char *zb = HighSprZ+sx;\r
+ int collision = 0;\r
\r
pack=*(unsigned int *)(Pico.vram+addr); // Get 8 pixels\r
if (pack)\r
{\r
- t=pack&0x0000f000; if(t) { zb_s=zb[0]; if(zb_s) collision=1; if(zval>zb_s) { pd[0]=(unsigned char)(pal|(t>>12)); zb[0]=(char)zval; } }\r
- t=pack&0x00000f00; if(t) { zb_s=zb[1]; if(zb_s) collision=1; if(zval>zb_s) { pd[1]=(unsigned char)(pal|(t>> 8)); zb[1]=(char)zval; } }\r
- t=pack&0x000000f0; if(t) { zb_s=zb[2]; if(zb_s) collision=1; if(zval>zb_s) { pd[2]=(unsigned char)(pal|(t>> 4)); zb[2]=(char)zval; } }\r
- t=pack&0x0000000f; if(t) { zb_s=zb[3]; if(zb_s) collision=1; if(zval>zb_s) { pd[3]=(unsigned char)(pal|(t )); zb[3]=(char)zval; } }\r
- t=pack&0xf0000000; if(t) { zb_s=zb[4]; if(zb_s) collision=1; if(zval>zb_s) { pd[4]=(unsigned char)(pal|(t>>28)); zb[4]=(char)zval; } }\r
- t=pack&0x0f000000; if(t) { zb_s=zb[5]; if(zb_s) collision=1; if(zval>zb_s) { pd[5]=(unsigned char)(pal|(t>>24)); zb[5]=(char)zval; } }\r
- t=pack&0x00f00000; if(t) { zb_s=zb[6]; if(zb_s) collision=1; if(zval>zb_s) { pd[6]=(unsigned char)(pal|(t>>20)); zb[6]=(char)zval; } }\r
- t=pack&0x000f0000; if(t) { zb_s=zb[7]; if(zb_s) collision=1; if(zval>zb_s) { pd[7]=(unsigned char)(pal|(t>>16)); zb[7]=(char)zval; } }\r
- if(collision) Pico.video.status|=0x20;\r
+ t=pack&0x0000f000; if(t) { if(zb[0]) collision=1; if(zval>zb[0]) { pd[0]=(unsigned char)(pal|(t>>12)); zb[0]=(char)zval; } }\r
+ t=pack&0x00000f00; if(t) { if(zb[1]) collision=1; if(zval>zb[1]) { pd[1]=(unsigned char)(pal|(t>> 8)); zb[1]=(char)zval; } }\r
+ t=pack&0x000000f0; if(t) { if(zb[2]) collision=1; if(zval>zb[2]) { pd[2]=(unsigned char)(pal|(t>> 4)); zb[2]=(char)zval; } }\r
+ t=pack&0x0000000f; if(t) { if(zb[3]) collision=1; if(zval>zb[3]) { pd[3]=(unsigned char)(pal|(t )); zb[3]=(char)zval; } }\r
+ t=pack&0xf0000000; if(t) { if(zb[4]) collision=1; if(zval>zb[4]) { pd[4]=(unsigned char)(pal|(t>>28)); zb[4]=(char)zval; } }\r
+ t=pack&0x0f000000; if(t) { if(zb[5]) collision=1; if(zval>zb[5]) { pd[5]=(unsigned char)(pal|(t>>24)); zb[5]=(char)zval; } }\r
+ t=pack&0x00f00000; if(t) { if(zb[6]) collision=1; if(zval>zb[6]) { pd[6]=(unsigned char)(pal|(t>>20)); zb[6]=(char)zval; } }\r
+ t=pack&0x000f0000; if(t) { if(zb[7]) collision=1; if(zval>zb[7]) { pd[7]=(unsigned char)(pal|(t>>16)); zb[7]=(char)zval; } }\r
+ if (collision) Pico.video.status|=0x20;\r
return 0;\r
}\r
\r
return 1; // Tile blank\r
}\r
-\r
+ \r
static int TileFlipZ(int sx,int addr,int pal,int zval)\r
{\r
unsigned int pack=0; unsigned int t=0;\r
unsigned char *pd = HighCol+sx;\r
- char *zb = HighSprZ+sx;\r
- int collision = 0, zb_s;\r
+ unsigned char *zb = HighSprZ+sx;\r
+ int collision = 0;\r
\r
pack=*(unsigned int *)(Pico.vram+addr); // Get 8 pixels\r
if (pack)\r
{\r
- t=pack&0x000f0000; if(t) { zb_s=zb[0]&0x1f; if(zb_s) collision=1; if(zval>zb_s) { pd[0]=(unsigned char)(pal|(t>>16)); zb[0]=(char)zval; } }\r
- t=pack&0x00f00000; if(t) { zb_s=zb[1]&0x1f; if(zb_s) collision=1; if(zval>zb_s) { pd[1]=(unsigned char)(pal|(t>>20)); zb[1]=(char)zval; } }\r
- t=pack&0x0f000000; if(t) { zb_s=zb[2]&0x1f; if(zb_s) collision=1; if(zval>zb_s) { pd[2]=(unsigned char)(pal|(t>>24)); zb[2]=(char)zval; } }\r
- t=pack&0xf0000000; if(t) { zb_s=zb[3]&0x1f; if(zb_s) collision=1; if(zval>zb_s) { pd[3]=(unsigned char)(pal|(t>>28)); zb[3]=(char)zval; } }\r
- t=pack&0x0000000f; if(t) { zb_s=zb[4]&0x1f; if(zb_s) collision=1; if(zval>zb_s) { pd[4]=(unsigned char)(pal|(t )); zb[4]=(char)zval; } }\r
- t=pack&0x000000f0; if(t) { zb_s=zb[5]&0x1f; if(zb_s) collision=1; if(zval>zb_s) { pd[5]=(unsigned char)(pal|(t>> 4)); zb[5]=(char)zval; } }\r
- t=pack&0x00000f00; if(t) { zb_s=zb[6]&0x1f; if(zb_s) collision=1; if(zval>zb_s) { pd[6]=(unsigned char)(pal|(t>> 8)); zb[6]=(char)zval; } }\r
- t=pack&0x0000f000; if(t) { zb_s=zb[7]&0x1f; if(zb_s) collision=1; if(zval>zb_s) { pd[7]=(unsigned char)(pal|(t>>12)); zb[7]=(char)zval; } }\r
- if(collision) Pico.video.status|=0x20;\r
+ t=pack&0x000f0000; if(t) { if(zb[0]) collision=1; if(zval>zb[0]) { pd[0]=(unsigned char)(pal|(t>>16)); zb[0]=(char)zval; } }\r
+ t=pack&0x00f00000; if(t) { if(zb[1]) collision=1; if(zval>zb[1]) { pd[1]=(unsigned char)(pal|(t>>20)); zb[1]=(char)zval; } }\r
+ t=pack&0x0f000000; if(t) { if(zb[2]) collision=1; if(zval>zb[2]) { pd[2]=(unsigned char)(pal|(t>>24)); zb[2]=(char)zval; } }\r
+ t=pack&0xf0000000; if(t) { if(zb[3]) collision=1; if(zval>zb[3]) { pd[3]=(unsigned char)(pal|(t>>28)); zb[3]=(char)zval; } }\r
+ t=pack&0x0000000f; if(t) { if(zb[4]) collision=1; if(zval>zb[4]) { pd[4]=(unsigned char)(pal|(t )); zb[4]=(char)zval; } }\r
+ t=pack&0x000000f0; if(t) { if(zb[5]) collision=1; if(zval>zb[5]) { pd[5]=(unsigned char)(pal|(t>> 4)); zb[5]=(char)zval; } }\r
+ t=pack&0x00000f00; if(t) { if(zb[6]) collision=1; if(zval>zb[6]) { pd[6]=(unsigned char)(pal|(t>> 8)); zb[6]=(char)zval; } }\r
+ t=pack&0x0000f000; if(t) { if(zb[7]) collision=1; if(zval>zb[7]) { pd[7]=(unsigned char)(pal|(t>>12)); zb[7]=(char)zval; } }\r
+ if (collision) Pico.video.status|=0x20;\r
return 0;\r
}\r
return 1; // Tile blank\r
{\r
unsigned int pack=0; unsigned int t=0;\r
unsigned char *pd = HighCol+sx;\r
- char *zb = HighSprZ+sx;\r
+ unsigned char *zb = HighSprZ+sx;\r
int collision = 0;\r
\r
pack=*(unsigned int *)(Pico.vram+addr); // Get 8 pixels\r
{\r
unsigned int pack=0; unsigned int t=0;\r
unsigned char *pd = HighCol+sx;\r
- char *zb = HighSprZ+sx;\r
+ unsigned char *zb = HighSprZ+sx;\r
int collision = 0;\r
\r
pack=*(unsigned int *)(Pico.vram+addr); // Get 8 pixels\r
hv = (code>>24)&0xf;\r
height = (hv&3)+1;\r
\r
- if(sy > 240 || sy + (height<<3) <= 0) skip|=1<<22;\r
+ if (sy > 240 || sy + (height<<3) <= 0) skip|=1<<22; // sprite offscreen (completely, y)\r
\r
width = (hv>>2)+1;\r
code2 = sprite[1];\r
sx -= 0x78; // Get X coordinate + 8\r
sx_min = 8-(width<<3);\r
\r
- if((sx <= sx_min && sx >= -0x76) || sx >= 328) skip|=1<<23;\r
+ if ((sx <= sx_min && sx >= -0x76) || sx >= 328) skip|=1<<23; // offscreen x\r
else if (sx > sx_min && !skip) {\r
int sbl = (2<<height)-1;\r
int shi = sy>>3;\r
static void DrawAllSprites(int *hcache, int maxwidth, int prio, int sh)\r
{\r
int i,u,n;\r
- int sx1seen=0; // sprite with x coord 1 or 0 seen\r
+ int sx1seen = 0; // sprite with x coord 1 or 0 seen\r
int ntiles = 0; // tile counter for sprite limit emulation\r
int *sprites[40]; // Sprites to draw in fast mode\r
- int *ps, pack, rs = rendstatus, scan=Scanline;\r
+ int max_line_sprites = 20; // 20 sprites, 40 tiles\r
+ int *ps, pack, rs = rendstatus, scan = Scanline;\r
\r
if(rs&8) {\r
DrawAllSpritesInterlace(prio, maxwidth);\r
return;\r
}\r
\r
+ if (PicoOpt & POPT_DIS_SPRITE_LIM)\r
+ max_line_sprites = 80;\r
+\r
ps = HighPreSpr;\r
\r
// Index + 0 : hhhhvvvv ab--hhvv yyyyyyyy yyyyyyyy // a: offscreen h, b: offs. v, h: horiz. size\r
// Index + 4 : xxxxxxxx xxxxxxxx pccvhnnn nnnnnnnn // x: x coord + 8\r
\r
- for(i=u=n=0; (pack = *ps) && n < 20; ps+=2, u++)\r
+ for (i=u=n=0; (pack = *ps) && n < max_line_sprites; ps+=2, u++)\r
{\r
int sx, sy, row, pack2;\r
\r
- if(pack & 0x00400000) continue;\r
+ elprintf(EL_ANOMALY, "x: %i y: %i %ix%i", pack2>>16, (pack<<16)>>16, (pack>>28)<<3, (pack>>21)&0x38);\r
+\r
+ if (pack & 0x00400000) continue;\r
\r
// get sprite info\r
pack2 = *(ps+1);\r
sy = (pack <<16)>>16;\r
row = scan-sy;\r
\r
- //dprintf("x: %i y: %i %ix%i", sx, sy, (pack>>28)<<3, (pack>>21)&0x38);\r
-\r
- if(sx == -0x77) sx1seen|=1; // for masking mode 2\r
+ if (sx == -0x77) sx1seen|=1; // for masking mode 2\r
\r
// check if it is on this line\r
- if(row < 0 || row >= ((pack>>21)&0x38)) continue; // no\r
- n++; // number of sprites on this line (both visible and hidden, max is 20) [broken]\r
+ if (row < 0 || row >= ((pack>>21)&0x38)) continue; // no\r
+ n++; // number of sprites on this line (both visible and hidden, max is 20)\r
\r
// sprite limit\r
ntiles += pack>>28;\r
- if(!(PicoOpt&0x40000) && ntiles > 40) break;\r
+ if (ntiles > max_line_sprites*2) break;\r
\r
- if(pack & 0x00800000) continue;\r
+ if (pack & 0x00800000) continue;\r
\r
// masking sprite?\r
- if(sx == -0x78) {\r
+ if (sx == -0x78) {\r
if(!(sx1seen&1) || sx1seen==3) {\r
break; // this sprite is not drawn and remaining sprites are masked\r
}\r
if((sx1seen>>8) == 0) sx1seen=(i+1)<<8;\r
continue;\r
}\r
- else if(sx == -0x77) {\r
+ else if (sx == -0x77) {\r
// masking mode2 (Outrun, Galaxy Force II, Shadow of the beast)\r
if(sx1seen>>8) { i=(sx1seen>>8)-1; break; } // seen both 0 and 1\r
sx1seen |= 2;\r
if (rs & PDRAW_ACC_SPRITES) {\r
// might need to skip this sprite\r
if ((pack2&0x8000) ^ (prio<<15)) continue;\r
- DrawSpriteZ(pack,pack2,sh|(prio<<1),(char)(0x1f-n));\r
+ DrawSpriteZ(pack, pack2, sh|(prio<<1), n^0xff);\r
continue;\r
}\r
\r