lowercasing filenames, part3
[picodrive.git] / pico / draw2.c
diff --git a/pico/draw2.c b/pico/draw2.c
new file mode 100644 (file)
index 0000000..b2e6a71
--- /dev/null
@@ -0,0 +1,623 @@
+// This is part of Pico Library\r
+\r
+// (c) Copyright 2007, Grazvydas "notaz" Ignotas\r
+// Free for non-commercial use.\r
+\r
+// For commercial use, separate licencing terms must be obtained.\r
+\r
+\r
+// this is a frame-based renderer, alternative to Dave's line based which is in Draw.c\r
+\r
+\r
+#include "pico_int.h"\r
+\r
+// port_config.h include must define these 2 defines:\r
+// #define START_ROW  1 // which row of tiles to start rendering at?\r
+// #define END_ROW   27 // ..end\r
+// one row means 8 pixels. If above example was used, (27-1)*8=208 lines would be rendered.\r
+\r
+#define TILE_ROWS END_ROW-START_ROW\r
+\r
+#define USE_CACHE\r
+\r
+// note: this is not implemented in ARM asm\r
+#if defined(DRAW2_OVERRIDE_LINE_WIDTH)\r
+#define LINE_WIDTH DRAW2_OVERRIDE_LINE_WIDTH\r
+#else\r
+#define LINE_WIDTH 328\r
+#endif\r
+\r
+static int HighCache2A[41*(TILE_ROWS+1)+1+1]; // caches for high layers\r
+static int HighCache2B[41*(TILE_ROWS+1)+1+1];\r
+\r
+unsigned short *PicoCramHigh=Pico.cram; // pointer to CRAM buff (0x40 shorts), converted to native device color (works only with 16bit for now)\r
+void (*PicoPrepareCram)()=0;            // prepares PicoCramHigh for renderer to use\r
+\r
+\r
+// stuff available in asm:\r
+#ifdef _ASM_DRAW_C\r
+void BackFillFull(int reg7);\r
+void DrawLayerFull(int plane, int *hcache, int planestart, int planeend);\r
+void DrawTilesFromCacheF(int *hc);\r
+void DrawWindowFull(int start, int end, int prio);\r
+void DrawSpriteFull(unsigned int *sprite);\r
+#else\r
+\r
+\r
+static int TileXnormYnorm(unsigned char *pd,int addr,unsigned char pal)\r
+{\r
+       unsigned int pack=0; unsigned int t=0, blank = 1;\r
+       int i;\r
+\r
+       for(i=8; i; i--, addr+=2, pd += LINE_WIDTH) {\r
+               pack=*(unsigned int *)(Pico.vram+addr); // Get 8 pixels\r
+               if(!pack) continue;\r
+\r
+               t=pack&0x0000f000; if (t) pd[0]=(unsigned char)((t>>12)|pal);\r
+               t=pack&0x00000f00; if (t) pd[1]=(unsigned char)((t>> 8)|pal);\r
+               t=pack&0x000000f0; if (t) pd[2]=(unsigned char)((t>> 4)|pal);\r
+               t=pack&0x0000000f; if (t) pd[3]=(unsigned char)((t    )|pal);\r
+               t=pack&0xf0000000; if (t) pd[4]=(unsigned char)((t>>28)|pal);\r
+               t=pack&0x0f000000; if (t) pd[5]=(unsigned char)((t>>24)|pal);\r
+               t=pack&0x00f00000; if (t) pd[6]=(unsigned char)((t>>20)|pal);\r
+               t=pack&0x000f0000; if (t) pd[7]=(unsigned char)((t>>16)|pal);\r
+               blank = 0;\r
+       }\r
+\r
+       return blank; // Tile blank?\r
+}\r
+\r
+static int TileXflipYnorm(unsigned char *pd,int addr,unsigned char pal)\r
+{\r
+       unsigned int pack=0; unsigned int t=0, blank = 1;\r
+       int i;\r
+\r
+       for(i=8; i; i--, addr+=2, pd += LINE_WIDTH) {\r
+               pack=*(unsigned int *)(Pico.vram+addr); // Get 8 pixels\r
+               if(!pack) continue;\r
+\r
+               t=pack&0x000f0000; if (t) pd[0]=(unsigned char)((t>>16)|pal);\r
+               t=pack&0x00f00000; if (t) pd[1]=(unsigned char)((t>>20)|pal);\r
+               t=pack&0x0f000000; if (t) pd[2]=(unsigned char)((t>>24)|pal);\r
+               t=pack&0xf0000000; if (t) pd[3]=(unsigned char)((t>>28)|pal);\r
+               t=pack&0x0000000f; if (t) pd[4]=(unsigned char)((t    )|pal);\r
+               t=pack&0x000000f0; if (t) pd[5]=(unsigned char)((t>> 4)|pal);\r
+               t=pack&0x00000f00; if (t) pd[6]=(unsigned char)((t>> 8)|pal);\r
+               t=pack&0x0000f000; if (t) pd[7]=(unsigned char)((t>>12)|pal);\r
+               blank = 0;\r
+       }\r
+       return blank; // Tile blank?\r
+}\r
+\r
+static int TileXnormYflip(unsigned char *pd,int addr,unsigned char pal)\r
+{\r
+       unsigned int pack=0; unsigned int t=0, blank = 1;\r
+       int i;\r
+\r
+       addr+=14;\r
+       for(i=8; i; i--, addr-=2, pd += LINE_WIDTH) {\r
+               pack=*(unsigned int *)(Pico.vram+addr); // Get 8 pixels\r
+               if(!pack) continue;\r
+\r
+               t=pack&0x0000f000; if (t) pd[0]=(unsigned char)((t>>12)|pal);\r
+               t=pack&0x00000f00; if (t) pd[1]=(unsigned char)((t>> 8)|pal);\r
+               t=pack&0x000000f0; if (t) pd[2]=(unsigned char)((t>> 4)|pal);\r
+               t=pack&0x0000000f; if (t) pd[3]=(unsigned char)((t    )|pal);\r
+               t=pack&0xf0000000; if (t) pd[4]=(unsigned char)((t>>28)|pal);\r
+               t=pack&0x0f000000; if (t) pd[5]=(unsigned char)((t>>24)|pal);\r
+               t=pack&0x00f00000; if (t) pd[6]=(unsigned char)((t>>20)|pal);\r
+               t=pack&0x000f0000; if (t) pd[7]=(unsigned char)((t>>16)|pal);\r
+               blank = 0;\r
+       }\r
+\r
+       return blank; // Tile blank?\r
+}\r
+\r
+static int TileXflipYflip(unsigned char *pd,int addr,unsigned char pal)\r
+{\r
+       unsigned int pack=0; unsigned int t=0, blank = 1;\r
+       int i;\r
+\r
+       addr+=14;\r
+       for(i=8; i; i--, addr-=2, pd += LINE_WIDTH) {\r
+               pack=*(unsigned int *)(Pico.vram+addr); // Get 8 pixels\r
+               if(!pack) continue;\r
+\r
+               t=pack&0x000f0000; if (t) pd[0]=(unsigned char)((t>>16)|pal);\r
+               t=pack&0x00f00000; if (t) pd[1]=(unsigned char)((t>>20)|pal);\r
+               t=pack&0x0f000000; if (t) pd[2]=(unsigned char)((t>>24)|pal);\r
+               t=pack&0xf0000000; if (t) pd[3]=(unsigned char)((t>>28)|pal);\r
+               t=pack&0x0000000f; if (t) pd[4]=(unsigned char)((t    )|pal);\r
+               t=pack&0x000000f0; if (t) pd[5]=(unsigned char)((t>> 4)|pal);\r
+               t=pack&0x00000f00; if (t) pd[6]=(unsigned char)((t>> 8)|pal);\r
+               t=pack&0x0000f000; if (t) pd[7]=(unsigned char)((t>>12)|pal);\r
+               blank = 0;\r
+       }\r
+       return blank; // Tile blank?\r
+}\r
+\r
+\r
+// start: (tile_start<<16)|row_start, end: [same]\r
+static void DrawWindowFull(int start, int end, int prio)\r
+{\r
+       struct PicoVideo *pvid=&Pico.video;\r
+       int nametab, nametab_step, trow, tilex, blank=-1, code;\r
+       unsigned char *scrpos = PicoDraw2FB;\r
+       int tile_start, tile_end; // in cells\r
+\r
+       // parse ranges\r
+       tile_start = start>>16;\r
+       tile_end = end>>16;\r
+       start = start<<16>>16;\r
+       end = end<<16>>16;\r
+\r
+       // Find name table line:\r
+       if (pvid->reg[12]&1)\r
+       {\r
+               nametab=(pvid->reg[3]&0x3c)<<9; // 40-cell mode\r
+               nametab_step = 1<<6;\r
+       }\r
+       else\r
+       {\r
+               nametab=(pvid->reg[3]&0x3e)<<9; // 32-cell mode\r
+               nametab_step = 1<<5;\r
+       }\r
+       nametab += nametab_step*start;\r
+\r
+       // check priority\r
+       code=Pico.vram[nametab+tile_start];\r
+       if ((code>>15) != prio) return; // hack: just assume that whole window uses same priority\r
+\r
+       scrpos+=8*LINE_WIDTH+8;\r
+       scrpos+=8*LINE_WIDTH*(start-START_ROW);\r
+\r
+       // do a window until we reach planestart row\r
+       for(trow = start; trow < end; trow++, nametab+=nametab_step) { // current tile row\r
+               for (tilex=tile_start; tilex<tile_end; tilex++)\r
+               {\r
+                       int code,addr,zero=0;\r
+//                     unsigned short *pal=NULL;\r
+                       unsigned char pal;\r
+\r
+                       code=Pico.vram[nametab+tilex];\r
+                       if (code==blank) continue;\r
+\r
+                       // Get tile address/2:\r
+                       addr=(code&0x7ff)<<4;\r
+\r
+//                     pal=PicoCramHigh+((code>>9)&0x30);\r
+                       pal=(unsigned char)((code>>9)&0x30);\r
+\r
+                       switch((code>>11)&3) {\r
+                               case 0: zero=TileXnormYnorm(scrpos+(tilex<<3),addr,pal); break;\r
+                               case 1: zero=TileXflipYnorm(scrpos+(tilex<<3),addr,pal); break;\r
+                               case 2: zero=TileXnormYflip(scrpos+(tilex<<3),addr,pal); break;\r
+                               case 3: zero=TileXflipYflip(scrpos+(tilex<<3),addr,pal); break;\r
+                       }\r
+                       if(zero) blank=code; // We know this tile is blank now\r
+               }\r
+\r
+               scrpos += LINE_WIDTH*8;\r
+       }\r
+}\r
+\r
+\r
+static void DrawLayerFull(int plane, int *hcache, int planestart, int planeend)\r
+{\r
+       struct PicoVideo *pvid=&Pico.video;\r
+       static char shift[4]={5,6,6,7}; // 32,64 or 128 sized tilemaps\r
+       int width, height, ymask, htab;\r
+       int nametab, hscroll=0, vscroll, cells;\r
+       unsigned char *scrpos;\r
+       int blank=-1, xmask, nametab_row, trow;\r
+\r
+       // parse ranges\r
+       cells = (planeend>>16)-(planestart>>16);\r
+       planestart = planestart<<16>>16;\r
+       planeend = planeend<<16>>16;\r
+\r
+       // Work out the Tiles to draw\r
+\r
+       htab=pvid->reg[13]<<9; // Horizontal scroll table address\r
+//     if ( pvid->reg[11]&2)     htab+=Scanline<<1; // Offset by line\r
+//     if ((pvid->reg[11]&1)==0) htab&=~0xf; // Offset by tile\r
+       htab+=plane; // A or B\r
+\r
+       if(!(pvid->reg[11]&3)) { // full screen scroll\r
+               // Get horizontal scroll value\r
+               hscroll=Pico.vram[htab&0x7fff];\r
+               htab = 0; // this marks that we don't have to update scroll value\r
+       }\r
+\r
+       // Work out the name table size: 32 64 or 128 tiles (0-3)\r
+       width=pvid->reg[16];\r
+       height=(width>>4)&3; width&=3;\r
+\r
+       xmask=(1<<shift[width ])-1; // X Mask in tiles\r
+       ymask=(height<<5)|0x1f;     // Y Mask in tiles\r
+       if(width == 1)   ymask&=0x3f;\r
+       else if(width>1) ymask =0x1f;\r
+\r
+       // Find name table:\r
+       if (plane==0) nametab=(pvid->reg[2]&0x38)<< 9; // A\r
+       else          nametab=(pvid->reg[4]&0x07)<<12; // B\r
+\r
+       scrpos = PicoDraw2FB;\r
+       scrpos+=8*LINE_WIDTH*(planestart-START_ROW);\r
+\r
+       // Get vertical scroll value:\r
+       vscroll=Pico.vsram[plane]&0x1ff;\r
+       scrpos+=(8-(vscroll&7))*LINE_WIDTH;\r
+       if(vscroll&7) planeend++; // we have vertically clipped tiles due to vscroll, so we need 1 more row\r
+\r
+       *hcache++ = 8-(vscroll&7); // push y-offset to tilecache\r
+\r
+\r
+       for(trow = planestart; trow < planeend; trow++) { // current tile row\r
+               int cellc=cells,tilex,dx;\r
+\r
+               // Find the tile row in the name table\r
+               //ts.line=(vscroll+Scanline)&ymask;\r
+               //ts.nametab+=(ts.line>>3)<<shift[width];\r
+               nametab_row = nametab + (((trow+(vscroll>>3))&ymask)<<shift[width]); // pointer to nametable entries for this row\r
+\r
+               // update hscroll if needed\r
+               if(htab) {\r
+                       int htaddr=htab+(trow<<4);\r
+                       if(trow) htaddr-=(vscroll&7)<<1;\r
+                       hscroll=Pico.vram[htaddr&0x7fff];\r
+               }\r
+\r
+               // Draw tiles across screen:\r
+               tilex=(-hscroll)>>3;\r
+               dx=((hscroll-1)&7)+1;\r
+               if(dx != 8) cellc++; // have hscroll, do more cells\r
+\r
+               for (; cellc; dx+=8,tilex++,cellc--)\r
+               {\r
+                       int code=0,addr=0,zero=0;\r
+//                     unsigned short *pal=NULL;\r
+                       unsigned char pal;\r
+\r
+                       code=Pico.vram[nametab_row+(tilex&xmask)];\r
+                       if (code==blank) continue;\r
+\r
+                       if (code>>15) { // high priority tile\r
+                               *hcache++ = code|(dx<<16)|(trow<<27); // cache it\r
+                               continue;\r
+                       }\r
+\r
+                       // Get tile address/2:\r
+                       addr=(code&0x7ff)<<4;\r
+\r
+//                     pal=PicoCramHigh+((code>>9)&0x30);\r
+                       pal=(unsigned char)((code>>9)&0x30);\r
+\r
+                       switch((code>>11)&3) {\r
+                               case 0: zero=TileXnormYnorm(scrpos+dx,addr,pal); break;\r
+                               case 1: zero=TileXflipYnorm(scrpos+dx,addr,pal); break;\r
+                               case 2: zero=TileXnormYflip(scrpos+dx,addr,pal); break;\r
+                               case 3: zero=TileXflipYflip(scrpos+dx,addr,pal); break;\r
+                       }\r
+                       if(zero) blank=code; // We know this tile is blank now\r
+               }\r
+\r
+               scrpos += LINE_WIDTH*8;\r
+       }\r
+\r
+       *hcache = 0; // terminate cache\r
+}\r
+\r
+\r
+static void DrawTilesFromCacheF(int *hc)\r
+{\r
+       int code, addr, zero = 0;\r
+       unsigned int prevy=0xFFFFFFFF;\r
+//     unsigned short *pal;\r
+       unsigned char pal;\r
+       short blank=-1; // The tile we know is blank\r
+       unsigned char *scrpos = PicoDraw2FB, *pd = 0;\r
+\r
+       // *hcache++ = code|(dx<<16)|(trow<<27); // cache it\r
+       scrpos+=(*hc++)*LINE_WIDTH - START_ROW*LINE_WIDTH*8;\r
+\r
+       while((code=*hc++)) {\r
+               if((short)code == blank) continue;\r
+\r
+               // y pos\r
+               if(((unsigned)code>>27) != prevy) {\r
+                       prevy = (unsigned)code>>27;\r
+                       pd = scrpos + prevy*LINE_WIDTH*8;\r
+               }\r
+\r
+               // Get tile address/2:\r
+               addr=(code&0x7ff)<<4;\r
+//             pal=PicoCramHigh+((code>>9)&0x30);\r
+               pal=(unsigned char)((code>>9)&0x30);\r
+\r
+               switch((code>>11)&3) {\r
+                       case 0: zero=TileXnormYnorm(pd+((code>>16)&0x1ff),addr,pal); break;\r
+                       case 1: zero=TileXflipYnorm(pd+((code>>16)&0x1ff),addr,pal); break;\r
+                       case 2: zero=TileXnormYflip(pd+((code>>16)&0x1ff),addr,pal); break;\r
+                       case 3: zero=TileXflipYflip(pd+((code>>16)&0x1ff),addr,pal); break;\r
+               }\r
+\r
+               if(zero) blank=(short)code;\r
+       }\r
+}\r
+\r
+\r
+// sx and sy are coords of virtual screen with 8pix borders on top and on left\r
+static void DrawSpriteFull(unsigned int *sprite)\r
+{\r
+       int width=0,height=0;\r
+//     unsigned short *pal=NULL;\r
+       unsigned char pal;\r
+       int tile,code,tdeltax,tdeltay;\r
+       unsigned char *scrpos;\r
+       int sx, sy;\r
+\r
+       sy=sprite[0];\r
+       height=sy>>24;\r
+       sy=(sy&0x1ff)-0x78; // Y\r
+       width=(height>>2)&3; height&=3;\r
+       width++; height++; // Width and height in tiles\r
+\r
+       code=sprite[1];\r
+       sx=((code>>16)&0x1ff)-0x78; // X\r
+\r
+       tile=code&0x7ff; // Tile number\r
+       tdeltax=height; // Delta to increase tile by going right\r
+       tdeltay=1;      // Delta to increase tile by going down\r
+       if (code&0x0800) { tdeltax=-tdeltax; tile+=height*(width-1); } // Flip X\r
+       if (code&0x1000) { tdeltay=-tdeltay; tile+=height-1; } // Flip Y\r
+\r
+       //delta<<=4; // Delta of address\r
+//     pal=PicoCramHigh+((code>>9)&0x30); // Get palette pointer\r
+       pal=(unsigned char)((code>>9)&0x30);\r
+\r
+       // goto first vertically visible tile\r
+       while(sy <= START_ROW*8) { sy+=8; tile+=tdeltay; height--; }\r
+\r
+       scrpos = PicoDraw2FB;\r
+       scrpos+=(sy-START_ROW*8)*LINE_WIDTH;\r
+\r
+       for (; height > 0; height--, sy+=8, tile+=tdeltay)\r
+       {\r
+               int w = width, x=sx, t=tile;\r
+\r
+               if(sy >= END_ROW*8+8) return; // offscreen\r
+\r
+               for (; w; w--,x+=8,t+=tdeltax)\r
+               {\r
+                       if(x<=0)   continue;\r
+                       if(x>=328) break; // Offscreen\r
+\r
+                       t&=0x7fff; // Clip tile address\r
+                       switch((code>>11)&3) {\r
+                               case 0: TileXnormYnorm(scrpos+x,t<<4,pal); break;\r
+                               case 1: TileXflipYnorm(scrpos+x,t<<4,pal); break;\r
+                               case 2: TileXnormYflip(scrpos+x,t<<4,pal); break;\r
+                               case 3: TileXflipYflip(scrpos+x,t<<4,pal); break;\r
+                       }\r
+               }\r
+\r
+               scrpos+=8*LINE_WIDTH;\r
+       }\r
+}\r
+#endif\r
+\r
+\r
+static void DrawAllSpritesFull(int prio, int maxwidth)\r
+{\r
+       struct PicoVideo *pvid=&Pico.video;\r
+       int table=0,maskrange=0;\r
+       int i,u,link=0;\r
+       unsigned int *sprites[80]; // Sprites\r
+       int y_min=START_ROW*8, y_max=END_ROW*8; // for a simple sprite masking\r
+\r
+       table=pvid->reg[5]&0x7f;\r
+       if (pvid->reg[12]&1) table&=0x7e; // Lowest bit 0 in 40-cell mode\r
+       table<<=8; // Get sprite table address/2\r
+\r
+       for (i=u=0; u < 80; u++)\r
+       {\r
+               unsigned int *sprite=NULL;\r
+               int code, code2, sx, sy, height;\r
+\r
+               sprite=(unsigned int *)(Pico.vram+((table+(link<<2))&0x7ffc)); // Find sprite\r
+\r
+               // get sprite info\r
+               code = sprite[0];\r
+\r
+               // check if it is not hidden vertically\r
+               sy = (code&0x1ff)-0x80;\r
+               height = (((code>>24)&3)+1)<<3;\r
+               if(sy+height <= y_min || sy > y_max) goto nextsprite;\r
+\r
+               // masking sprite?\r
+               code2=sprite[1];\r
+               sx = (code2>>16)&0x1ff;\r
+               if(!sx) {\r
+                       int to = sy+height; // sy ~ from\r
+                       if(maskrange) {\r
+                               // try to merge with previous range\r
+                               if((maskrange>>16)+1 >= sy && (maskrange>>16) <= to && (maskrange&0xffff) < sy) sy = (maskrange&0xffff);\r
+                               else if((maskrange&0xffff)-1 <= to && (maskrange&0xffff) >= sy && (maskrange>>16) > to) to = (maskrange>>16);\r
+                       }\r
+                       // support only very simple masking (top and bottom of screen)\r
+                       if(sy <= y_min && to+1 > y_min) y_min = to+1;\r
+                       else if(to >= y_max && sy-1 < y_max) y_max = sy-1;\r
+                       else maskrange=sy|(to<<16);\r
+\r
+                       goto nextsprite;\r
+               }\r
+\r
+               // priority\r
+               if(((code2>>15)&1) != prio) goto nextsprite; // wrong priority\r
+\r
+               // check if sprite is not hidden horizontally\r
+               sx -= 0x78; // Get X coordinate + 8\r
+               if(sx <= -8*3 || sx >= maxwidth) goto nextsprite;\r
+\r
+               // sprite is good, save it's index\r
+               sprites[i++]=sprite;\r
+\r
+               nextsprite:\r
+               // Find next sprite\r
+               link=(code>>16)&0x7f;\r
+               if(!link) break; // End of sprites\r
+       }\r
+\r
+       // Go through sprites backwards:\r
+       for (i-- ;i>=0; i--)\r
+       {\r
+               DrawSpriteFull(sprites[i]);\r
+       }\r
+}\r
+\r
+#ifndef _ASM_DRAW_C\r
+static void BackFillFull(int reg7)\r
+{\r
+       unsigned int back;\r
+\r
+       // Start with a background color:\r
+//     back=PicoCramHigh[reg7&0x3f];\r
+       back=reg7&0x3f;\r
+       back|=back<<8;\r
+       back|=back<<16;\r
+\r
+       memset32((int *)PicoDraw2FB, back, LINE_WIDTH*(8+(END_ROW-START_ROW)*8)/4);\r
+}\r
+#endif\r
+\r
+static void DrawDisplayFull(void)\r
+{\r
+       struct PicoVideo *pvid=&Pico.video;\r
+       int win, edge=0, hvwin=0; // LSb->MSb: hwin&plane, vwin&plane, full\r
+       int planestart=START_ROW, planeend=END_ROW; // plane A start/end when window shares display with plane A (in tile rows or columns)\r
+       int winstart=START_ROW, winend=END_ROW;     // same for window\r
+       int maxw, maxcolc; // max width and col cells\r
+\r
+       if(pvid->reg[12]&1) {\r
+               maxw = 328; maxcolc = 40;\r
+       } else {\r
+               maxw = 264; maxcolc = 32;\r
+       }\r
+\r
+       // horizontal window?\r
+       if ((win=pvid->reg[0x12]))\r
+       {\r
+               hvwin=1; // hwindow shares display with plane A\r
+               edge=win&0x1f;\r
+               if(win == 0x80) {\r
+                       // fullscreen window\r
+                       hvwin=4;\r
+               } else if(win < 0x80) {\r
+                       // window on the top\r
+                            if(edge <= START_ROW) hvwin=0; // window not visible in our drawing region\r
+                       else if(edge >= END_ROW)   hvwin=4;\r
+                       else planestart = winend = edge;\r
+               } else if(win > 0x80) {\r
+                       // window at the bottom\r
+                       if(edge >= END_ROW) hvwin=0;\r
+                       else planeend = winstart = edge;\r
+               }\r
+       }\r
+\r
+       // check for vertical window, but only if win is not fullscreen\r
+       if (hvwin != 4)\r
+       {\r
+               win=pvid->reg[0x11];\r
+               edge=win&0x1f;\r
+               if (win&0x80) {\r
+                       if(!edge) hvwin=4;\r
+                       else if(edge < (maxcolc>>1)) {\r
+                               // window is on the right\r
+                               hvwin|=2;\r
+                               planeend|=edge<<17;\r
+                               winstart|=edge<<17;\r
+                               winend|=maxcolc<<16;\r
+                       }\r
+               } else {\r
+                       if(edge >= (maxcolc>>1)) hvwin=4;\r
+                       else if(edge) {\r
+                               // window is on the left\r
+                               hvwin|=2;\r
+                               winend|=edge<<17;\r
+                               planestart|=edge<<17;\r
+                               planeend|=maxcolc<<16;\r
+                       }\r
+               }\r
+       }\r
+\r
+       if (hvwin==1) { winend|=maxcolc<<16; planeend|=maxcolc<<16; }\r
+\r
+       HighCache2A[1] = HighCache2B[1] = 0;\r
+       if (PicoDrawMask & PDRAW_LAYERB_ON)\r
+               DrawLayerFull(1, HighCache2B, START_ROW, (maxcolc<<16)|END_ROW);\r
+       if (PicoDrawMask & PDRAW_LAYERA_ON) switch (hvwin)\r
+       {\r
+               case 4:\r
+               // fullscreen window\r
+               DrawWindowFull(START_ROW, (maxcolc<<16)|END_ROW, 0);\r
+               break;\r
+\r
+               case 3:\r
+               // we have plane A and both v and h windows\r
+               DrawLayerFull(0, HighCache2A, planestart, planeend);\r
+               DrawWindowFull( winstart&~0xff0000, (winend&~0xff0000)|(maxcolc<<16), 0); // h\r
+               DrawWindowFull((winstart&~0xff)|START_ROW, (winend&~0xff)|END_ROW, 0);    // v\r
+               break;\r
+\r
+               case 2:\r
+               case 1:\r
+               // both window and plane A visible, window is vertical XOR horizontal\r
+               DrawLayerFull(0, HighCache2A, planestart, planeend);\r
+               DrawWindowFull(winstart, winend, 0);\r
+               break;\r
+\r
+               default:\r
+               // fullscreen plane A\r
+               DrawLayerFull(0, HighCache2A, START_ROW, (maxcolc<<16)|END_ROW);\r
+               break;\r
+       }\r
+       if (PicoDrawMask & PDRAW_SPRITES_LOW_ON)\r
+               DrawAllSpritesFull(0, maxw);\r
+\r
+       if (HighCache2B[1]) DrawTilesFromCacheF(HighCache2B);\r
+       if (HighCache2A[1]) DrawTilesFromCacheF(HighCache2A);\r
+       if (PicoDrawMask & PDRAW_LAYERA_ON) switch (hvwin)\r
+       {\r
+               case 4:\r
+               // fullscreen window\r
+               DrawWindowFull(START_ROW, (maxcolc<<16)|END_ROW, 1);\r
+               break;\r
+\r
+               case 3:\r
+               // we have plane A and both v and h windows\r
+               DrawWindowFull( winstart&~0xff0000, (winend&~0xff0000)|(maxcolc<<16), 1); // h\r
+               DrawWindowFull((winstart&~0xff)|START_ROW, (winend&~0xff)|END_ROW, 1);    // v\r
+               break;\r
+\r
+               case 2:\r
+               case 1:\r
+               // both window and plane A visible, window is vertical XOR horizontal\r
+               DrawWindowFull(winstart, winend, 1);\r
+               break;\r
+       }\r
+       if (PicoDrawMask & PDRAW_SPRITES_HI_ON)\r
+               DrawAllSpritesFull(1, maxw);\r
+}\r
+\r
+\r
+PICO_INTERNAL void PicoFrameFull()\r
+{\r
+       // prepare cram?\r
+       if (PicoPrepareCram) PicoPrepareCram();\r
+\r
+       // Draw screen:\r
+       BackFillFull(Pico.video.reg[7]);\r
+       if (Pico.video.reg[1]&0x40) DrawDisplayFull();\r
+}\r
+\r