psp readme, some adjustments
[picodrive.git] / Pico / Draw.c
index ff2a48c..989d9bd 100644 (file)
@@ -66,6 +66,10 @@ void blockcpy_or(void *dst, void *src, size_t n, int pat)
 #endif\r
 \r
 \r
+#ifdef _ASM_DRAW_C_AMIPS\r
+int TileNorm(int sx,int addr,int pal);\r
+int TileFlip(int sx,int addr,int pal);\r
+#else\r
 static int TileNorm(int sx,int addr,int pal)\r
 {\r
   unsigned char *pd = HighCol+sx;\r
@@ -108,7 +112,7 @@ static int TileFlip(int sx,int addr,int pal)
   }\r
   return 1; // Tile blank\r
 }\r
-\r
+#endif\r
 \r
 // tile renderers for hacky operator sprite support\r
 #define sh_pix(x) \\r
@@ -531,22 +535,49 @@ static void DrawWindow(int tstart, int tend, int prio, int sh) // int *hcache
   }\r
 \r
   // Draw tiles across screen:\r
-  for (; tilex < tend; tilex++)\r
+  if (!sh)\r
   {\r
-    int addr=0,zero=0;\r
-    int pal;\r
+    for (; tilex < tend; tilex++)\r
+    {\r
+      int addr=0,zero=0;\r
+      int pal;\r
+\r
+      code=Pico.vram[nametab+tilex];\r
+      if(code==blank) continue;\r
+      if((code>>15) != prio) {\r
+        rendstatus|=2;\r
+        continue;\r
+      }\r
 \r
-    code=Pico.vram[nametab+tilex];\r
-    if(code==blank) continue;\r
-    if((code>>15) != prio) {\r
-      rendstatus|=2;\r
-      continue;\r
+      pal=((code>>9)&0x30);\r
+\r
+      // Get tile address/2:\r
+      addr=(code&0x7ff)<<4;\r
+      if (code&0x1000) addr+=14-ty; else addr+=ty; // Y-flip\r
+\r
+      if (code&0x0800) zero=TileFlip(8+(tilex<<3),addr,pal);\r
+      else             zero=TileNorm(8+(tilex<<3),addr,pal);\r
+\r
+      if (zero) blank=code; // We know this tile is blank now\r
     }\r
+  }\r
+  else\r
+  {\r
+    for (; tilex < tend; tilex++)\r
+    {\r
+      int addr=0,zero=0;\r
+      int pal, tmp, *zb;\r
+\r
+      code=Pico.vram[nametab+tilex];\r
+      if(code==blank) continue;\r
+      if((code>>15) != prio) {\r
+        rendstatus|=2;\r
+        continue;\r
+      }\r
 \r
-    pal=((code>>9)&0x30);\r
+      pal=((code>>9)&0x30);\r
 \r
-    if(sh) {\r
-      int tmp, *zb = (int *)(HighCol+8+(tilex<<3));\r
+      zb = (int *)(HighCol+8+(tilex<<3));\r
       if(prio) {\r
         tmp = *zb;\r
         if(!(tmp&0x00000080)) tmp&=~0x000000c0; if(!(tmp&0x00008000)) tmp&=~0x0000c000;\r
@@ -558,24 +589,43 @@ static void DrawWindow(int tstart, int tend, int prio, int sh) // int *hcache
       } else {\r
         pal |= 0x40;\r
       }\r
-    }\r
 \r
-    // Get tile address/2:\r
-    addr=(code&0x7ff)<<4;\r
-    if (code&0x1000) addr+=14-ty; else addr+=ty; // Y-flip\r
+      // Get tile address/2:\r
+      addr=(code&0x7ff)<<4;\r
+      if (code&0x1000) addr+=14-ty; else addr+=ty; // Y-flip\r
 \r
-    if (code&0x0800) zero=TileFlip(8+(tilex<<3),addr,pal);\r
-    else             zero=TileNorm(8+(tilex<<3),addr,pal);\r
+      if (code&0x0800) zero=TileFlip(8+(tilex<<3),addr,pal);\r
+      else             zero=TileNorm(8+(tilex<<3),addr,pal);\r
 \r
-    if (zero) blank=code; // We know this tile is blank now\r
+      if (zero) blank=code; // We know this tile is blank now\r
+    }\r
   }\r
-\r
-  // terminate the cache list\r
-  //*hcache = 0;\r
 }\r
 \r
 // --------------------------------------------\r
 \r
+static void DrawTilesFromCacheShPrep(void)\r
+{\r
+  if (!(rendstatus&0x80))\r
+  {\r
+    // as some layer has covered whole line with hi priority tiles,\r
+    // we can process whole line and then act as if sh/hi mode was off.\r
+    rendstatus|=0x80;\r
+    int c = 320/4, *zb = (int *)(HighCol+8);\r
+    while (c--)\r
+    {\r
+      int tmp = *zb;\r
+      if (!(tmp & 0x80808080)) *zb=tmp&0x3f3f3f3f;\r
+      else {\r
+        if(!(tmp&0x00000080)) tmp&=~0x000000c0; if(!(tmp&0x00008000)) tmp&=~0x0000c000;\r
+        if(!(tmp&0x00800000)) tmp&=~0x00c00000; if(!(tmp&0x80000000)) tmp&=~0xc0000000;\r
+        *zb=tmp;\r
+      }\r
+      zb++;\r
+    }\r
+  }\r
+}\r
+\r
 static void DrawTilesFromCache(int *hc, int sh, int rlim)\r
 {\r
   int code, addr, dx;\r
@@ -585,66 +635,49 @@ static void DrawTilesFromCache(int *hc, int sh, int rlim)
 \r
   if (sh && (rendstatus&0xc0))\r
   {\r
-    if (!(rendstatus&0x80))\r
-    {\r
-      // as some layer has covered whole line with hi priority tiles,\r
-      // we can process whole line and then act as if sh/hi mode was off.\r
-      rendstatus|=0x80;\r
-      int c = 320/4, *zb = (int *)(HighCol+8);\r
-      while (c--)\r
-      {\r
-        int tmp = *zb;\r
-        if (!(tmp & 0x80808080)) *zb=tmp&0x3f3f3f3f;\r
-        else {\r
-          if(!(tmp&0x00000080)) tmp&=~0x000000c0; if(!(tmp&0x00008000)) tmp&=~0x0000c000;\r
-          if(!(tmp&0x00800000)) tmp&=~0x00c00000; if(!(tmp&0x80000000)) tmp&=~0xc0000000;\r
-          *zb=tmp;\r
-        }\r
-        zb++;\r
-      }\r
-    }\r
+    DrawTilesFromCacheShPrep();\r
     sh = 0;\r
   }\r
 \r
-  if (sh)\r
+  if (!sh)\r
   {\r
+    short blank=-1; // The tile we know is blank\r
     while ((code=*hc++)) {\r
-      unsigned char *zb;\r
+      int zero;\r
+      if((short)code == blank) continue;\r
       // Get tile address/2:\r
       addr=(code&0x7ff)<<4;\r
       addr+=(unsigned int)code>>25; // y offset into tile\r
       dx=(code>>16)&0x1ff;\r
-      zb = HighCol+dx;\r
-      if(!(*zb&0x80)) *zb&=0x3f; zb++; if(!(*zb&0x80)) *zb&=0x3f; zb++;\r
-      if(!(*zb&0x80)) *zb&=0x3f; zb++; if(!(*zb&0x80)) *zb&=0x3f; zb++;\r
-      if(!(*zb&0x80)) *zb&=0x3f; zb++; if(!(*zb&0x80)) *zb&=0x3f; zb++;\r
-      if(!(*zb&0x80)) *zb&=0x3f; zb++; if(!(*zb&0x80)) *zb&=0x3f; zb++;\r
 \r
       pal=((code>>9)&0x30);\r
       if (rlim-dx < 0) goto last_cut_tile;\r
 \r
-      if (code&0x0800) TileFlip(dx,addr,pal);\r
-      else             TileNorm(dx,addr,pal);\r
+      if (code&0x0800) zero=TileFlip(dx,addr,pal);\r
+      else             zero=TileNorm(dx,addr,pal);\r
+\r
+      if (zero) blank=(short)code;\r
     }\r
   }\r
   else\r
   {\r
-    short blank=-1; // The tile we know is blank\r
     while ((code=*hc++)) {\r
-      int zero;\r
-      if((short)code == blank) continue;\r
+      unsigned char *zb;\r
       // Get tile address/2:\r
       addr=(code&0x7ff)<<4;\r
       addr+=(unsigned int)code>>25; // y offset into tile\r
       dx=(code>>16)&0x1ff;\r
+      zb = HighCol+dx;\r
+      if(!(*zb&0x80)) *zb&=0x3f; zb++; if(!(*zb&0x80)) *zb&=0x3f; zb++;\r
+      if(!(*zb&0x80)) *zb&=0x3f; zb++; if(!(*zb&0x80)) *zb&=0x3f; zb++;\r
+      if(!(*zb&0x80)) *zb&=0x3f; zb++; if(!(*zb&0x80)) *zb&=0x3f; zb++;\r
+      if(!(*zb&0x80)) *zb&=0x3f; zb++; if(!(*zb&0x80)) *zb&=0x3f; zb++;\r
 \r
       pal=((code>>9)&0x30);\r
       if (rlim-dx < 0) goto last_cut_tile;\r
 \r
-      if (code&0x0800) zero=TileFlip(dx,addr,pal);\r
-      else             zero=TileNorm(dx,addr,pal);\r
-\r
-      if (zero) blank=(short)code;\r
+      if (code&0x0800) TileFlip(dx,addr,pal);\r
+      else             TileNorm(dx,addr,pal);\r
     }\r
   }\r
   return;\r
@@ -1123,8 +1156,7 @@ static void DrawAllSprites(int *hcache, int maxwidth, int prio, int sh)
 #ifndef _ASM_DRAW_C\r
 static void BackFill(int reg7, int sh)\r
 {\r
-  unsigned int back=0;\r
-  unsigned int *pd=NULL,*end=NULL;\r
+  unsigned int back;\r
 \r
   // Start with a blank scanline (background colour):\r
   back=reg7&0x3f;\r
@@ -1132,10 +1164,7 @@ static void BackFill(int reg7, int sh)
   back|=back<<8;\r
   back|=back<<16;\r
 \r
-  pd= (unsigned int *)(HighCol+8);\r
-  end=(unsigned int *)(HighCol+8+320);\r
-\r
-  do { pd[0]=pd[1]=pd[2]=pd[3]=back; pd+=4; } while (pd<end);\r
+  memset32((int *)(HighCol+8), back, 320/4);\r
 }\r
 #endif\r
 \r
@@ -1186,35 +1215,49 @@ static void FinalizeLineRGB555(int sh)
   unsigned short *pal=HighPal;\r
   int len, i, t, dirtyPal = Pico.m.dirtyPal;\r
 \r
-  if(dirtyPal) {\r
-    unsigned short *ppal=Pico.cram;\r
-    for(i = 0x3f; i >= 0; i--)\r
-      pal[i] = (unsigned short) (((ppal[i]&0x00f)<<12)|((ppal[i]&0x0f0)<<3)|((ppal[i]&0xf00)>>7));\r
+  if (dirtyPal)\r
+  {\r
+    unsigned int *spal=(void *)Pico.cram;\r
+    unsigned int *dpal=(void *)HighPal;\r
+    for (i = 0x3f/2; i >= 0; i--)\r
+#ifdef USE_BGR555\r
+      dpal[i] = ((spal[i]&0x000f000f)<< 1)|((spal[i]&0x00f000f0)<<3)|((spal[i]&0x0f000f00)<<4);\r
+#else\r
+      dpal[i] = ((spal[i]&0x000f000f)<<12)|((spal[i]&0x00f000f0)<<3)|((spal[i]&0x0f000f00)>>7);\r
+#endif\r
     Pico.m.dirtyPal = 0;\r
   }\r
 \r
-  if (Pico.video.reg[12]&1) {\r
-    len = 320;\r
-  } else {\r
-    if(!(PicoOpt&0x100)) pd+=32;\r
-    len = 256;\r
-  }\r
-\r
-  if(sh) {\r
-    if(dirtyPal) {\r
+  if (sh)\r
+  {\r
+    if (dirtyPal) {\r
       // shadowed pixels\r
-      for(i = 0x3f; i >= 0; i--)\r
+      for (i = 0x3f; i >= 0; i--)\r
         pal[0x40|i] = pal[0xc0|i] = (unsigned short)((pal[i]>>1)&0x738e);\r
       // hilighted pixels\r
-      for(i = 0x3f; i >= 0; i--) {\r
+      for (i = 0x3f; i >= 0; i--) {\r
         t=pal[i]&0xe71c;t+=0x4208;if(t&0x20)t|=0x1c;if(t&0x800)t|=0x700;if(t&0x10000)t|=0xe000;t&=0xe71c;\r
         pal[0x80|i]=(unsigned short)t;\r
       }\r
     }\r
   }\r
 \r
-  for(i = 0; i < len; i++)\r
+  if (Pico.video.reg[12]&1) {\r
+    len = 320;\r
+  } else {\r
+    if (!(PicoOpt&0x100)) pd+=32;\r
+    len = 256;\r
+  }\r
+\r
+#ifndef PSP\r
+  for (i = 0; i < len; i++)\r
     pd[i] = pal[ps[i]];\r
+#else\r
+  {\r
+    extern void amips_clut(unsigned short *dst, unsigned char *src, unsigned short *pal, int count);\r
+    amips_clut(pd, ps, pal, len);\r
+  }\r
+#endif\r
 }\r
 #endif\r
 \r
@@ -1375,5 +1418,8 @@ void PicoDrawSetColorFormat(int which)
     case 0: FinalizeLine = FinalizeLineBGR444; break;\r
     default:FinalizeLine = NULL; break;\r
   }\r
+#if OVERRIDE_HIGHCOL\r
+  if (which) HighCol=DefHighCol;\r
+#endif\r
 }\r
 \r