[BACK]Return to crtc.c CVS log [TXT] [DIR] Up to [RetroPC.NET] / xmil / io

Diff for /xmil/io/crtc.c between versions 1.3 and 1.16

version 1.3, 2004/08/07 07:19:56 version 1.16, 2004/08/17 12:30:41
Line 1 Line 1
 #include        "compiler.h"  #include        "compiler.h"
 #include        "scrnmng.h"  #include        "scrnmng.h"
   #include        "z80core.h"
 #include        "pccore.h"  #include        "pccore.h"
 #include        "iocore.h"  #include        "iocore.h"
 #include        "vram.h"  #include        "vram.h"
Line 7 Line 8
 #include        "makescrn.h"  #include        "makescrn.h"
   
   
                 BYTE    crtc_TEXTPAL[8];  static const UINT8 defpaltext[8] = {
                 WORD    crtc_GRPHPAL[2][64];  
                 WORD    crtc_PAL4096[4096];  
   
 static const UINT8 def_TEXTPAL[8] = {  
                                 0x00, 0x03, 0x0c, 0x0f, 0x30, 0x33, 0x3c, 0x3f};                                  0x00, 0x03, 0x0c, 0x0f, 0x30, 0x33, 0x3c, 0x3f};
   
 static const UINT16 def_GRPHPAL[64] = {  static const UINT16 defpalgrph[64] = {
                                 0x000, 0x00a, 0x0a0, 0x0aa, 0xa00, 0xa0a, 0xaa0, 0xaaa,                                  0x000, 0x00a, 0x0a0, 0x0aa, 0xa00, 0xa0a, 0xaa0, 0xaaa,
                                 0x005, 0x00f, 0x0a5, 0x0af, 0xa05, 0xa0f, 0xaa5, 0xaaf,                                  0x005, 0x00f, 0x0a5, 0x0af, 0xa05, 0xa0f, 0xaa5, 0xaaf,
                                 0x050, 0x05a, 0x0f0, 0x0fa, 0xa50, 0xa5a, 0xaf0, 0xafa,                                  0x050, 0x05a, 0x0f0, 0x0fa, 0xa50, 0xa5a, 0xaf0, 0xafa,
Line 24  static const UINT16 def_GRPHPAL[64] = { Line 21  static const UINT16 def_GRPHPAL[64] = {
                                 0x550, 0x55a, 0x5f0, 0x5fa, 0xf50, 0xf5a, 0xff0, 0xffa,                                  0x550, 0x55a, 0x5f0, 0x5fa, 0xf50, 0xf5a, 0xff0, 0xffa,
                                 0x555, 0x55f, 0x5f5, 0x5ff, 0xf55, 0xf5f, 0xff5, 0xfff};                                  0x555, 0x55f, 0x5f5, 0x5ff, 0xf55, 0xf5f, 0xff5, 0xfff};
   
 static const CRTCSTAT crtcdefault = {  static const UINT8 defrgbp[4] = {0xaa, 0xcc, 0xf0, 0x00};
                                 0xaa,                                           // PAL_B;  static const UINT8 defreg[18] = {
                                 0xcc,                                           // PAL_R;                                  0x37, 0x28, 0x2d, 0x34,
                                 0xf0,                                           // PAL_G;                                  0x1f, 0x02, 0x19, 0x1c,
                                 0x00,                                           // PLY                                  0x00, 0x07, 0x00, 0x00,
                                 {0, 1, 2, 3, 4, 5, 6, 7},       // TEXT_PAL[8]                                  0x00, 0x00, 0x00, 0x00,
                                 0,                                                      // SCRN_BITS                                  0x00, 0x00};
                                 0,                                                      // CRTC_NUM  
   typedef struct {
                                 0,                                                      // DISP_PAGE          UINT32  clock;
                                 8,                                                      // FNT_XL          UINT    minx;
                                 8,                                                      // FNT_YL          UINT    maxx;
                                 40,                                                     // TXT_XL          UINT    miny;
                                 25,                                                     // TXT_YL          UINT    maxy;
                                 28,                                                     // TXT_YS  } GDCCLK;
                                 320,                                            // GRP_XL  
                                 200,                                            // GRP_YL  static const GDCCLK gdcclk[] = {
                                 0,                                                      // CPU_BANK                          {14318180 / 8, 112 - 8, 112 + 8, 200, 300},
                                 0,                                                      // CRT_BANK                          {21052600 / 8, 108 - 6, 108 + 6, 400, 575}};
   
                                 200,                                            // CRT_YL  enum {
                                 232,                                            // CRT_VS          CRTCUPD_CLOCK           = 0x01,
                                 266,                                            // CRT_VL          CRTCUPD_TIMING          = 0x02,
           CRTCUPD_POS                     = 0x04
                                 31,                                                     // TXT_VL  };
                                 10,                                                     // TXT_VLA  
   
                                 0,                                                      // TXT_TOP  static void crtc_clkupdate(void) {
                                 8,                                                      // fnty  
           UINT            clksync;
                                 0,                                                      // lastpal  const GDCCLK    *clk;
           UINT            h;
                                 0,                                                      // BLACKPAL          UINT            fonty;
                                 0,                                                      // EXTPALMODE          UINT            v;
                                 0,                                                      // EXTGRPHPAL  
                                 0,                                                      // ZPRY          clksync = (crtc.s.SCRN_BITS & SCRN_24KHZ);
         };          clk = gdcclk + clksync;
           h = crtc.s.reg[CRTCREG_HSIZE] + 1;
         BYTE    dispmode = SCRN64_INVALID;          if (crtc.s.width40) {
         BYTE    pal_bank = PAL_NORMAL;                  h = h * 2;
         BYTE    pal_disp = PAL_NORMAL;          }
           if (h < clk->minx) {
                   h = clk->minx;
           }
           else if (h > clk->maxx) {
                   h = clk->maxx;
           }
           crtc.e.rasterclock8 = (4000000 * h) / (clk->clock >> 8);
   
           fonty = crtc.s.reg[CRTCREG_CHRCY] & 0x1f;
           fonty >>= clksync;
           fonty += 1;
           crtc.e.fonty = fonty;
   
           v = (crtc.s.reg[CRTCREG_CHRCY] & 0x1f) + 1;
           v = v * ((crtc.s.reg[CRTCREG_VSIZE] & 0x7f) + 1);
           v = v + (crtc.s.reg[CRTCREG_VSIZEA] & 0x1f);
           if (v < clk->miny) {
                   v = clk->miny;
           }
           else if (v > clk->maxy) {
                   v = clk->maxy;
           }
           crtc.e.frameclock = ((4000000 * h) / clk->clock) * v;
   }
   
   static void crtc_timingupdate(void) {
   
           UINT32  fontclock;
           UINT    yl;
   
           // とりあえず…ね
           crtc.e.rasterdisp8 = (crtc.e.rasterclock8 * 40) / 56;
   
           fontclock = (crtc.s.reg[CRTCREG_CHRCY] & 0x1f) + 1;
           fontclock = (fontclock * crtc.e.rasterclock8) >> 8;
   
           // YsIIIが yl==0で disp信号見る…なんで？
           yl = (crtc.s.reg[CRTCREG_VDISP] & 0x7f);
           crtc.e.yl = yl;
           crtc.e.dispclock = fontclock * max(yl, 1);
           crtc.e.vsyncstart = fontclock * ((crtc.s.reg[CRTCREG_VSYNC] & 0x7f) + 1);
           crtc.e.vpulseclock = ((crtc.s.reg[CRTCREG_PULSE] >> 4)
                                                                                                   * crtc.e.rasterclock8) >> 8;
   
 void vrambank_patch(void) {          crtc.e.pos = crtc.s.reg[CRTCREG_POSL]
                                                                           + ((crtc.s.reg[CRTCREG_POSH] & 7) << 8);
   }
   
   static void crtc_bankupdate(void) {
   
   #if defined(SUPPORT_TURBOZ)
         UINT    updatemask;          UINT    updatemask;
           UINT8   dispmode;
           UINT8   pal_bank;
           UINT8   pal_disp;
   #endif
   
         if (crtc.s.SCRN_BITS & 0x10) {          if (crtc.s.SCRN_BITS & 0x10) {
                 crtc.e.gram = GRP_RAM + GRAM_BANK1;                  crtc.e.gram = gram + GRAM_BANK1;
                 crtc.e.updatebit = UPDATE_VRAM1;                  crtc.e.updatebit = UPDATE_VRAM1;
         }          }
         else {          else {
                 crtc.e.gram = GRP_RAM + GRAM_BANK0;                  crtc.e.gram = gram + GRAM_BANK0;
                 crtc.e.updatebit = UPDATE_VRAM0;                  crtc.e.updatebit = UPDATE_VRAM0;
         }          }
         dispmode = (crtc.s.SCRN_BITS & SCRN_DISPVRAM)?SCRN_BANK1:SCRN_BANK0;  
         pal_bank = pal_disp = PAL_NORMAL;  
   
   #if !defined(SUPPORT_TURBOZ)
           crtc.e.updatemask = (crtc.s.SCRN_BITS & SCRN_TEXTYx2)?0x3ff:0x7ff;
           crtc.e.dispmode =
                                           (crtc.s.SCRN_BITS & SCRN_DISPVRAM)?SCRN_BANK1:SCRN_BANK0;
   #else
           dispmode = (crtc.s.SCRN_BITS & SCRN_DISPVRAM)?SCRN_BANK1:SCRN_BANK0;
           pal_bank = PAL_NORMAL;
           pal_disp = PAL_NORMAL;
         if ((!(crtc.s.EXTPALMODE & 0x80)) || (crtc.s.SCRN_BITS & SCRN_UNDERLINE)) {          if ((!(crtc.s.EXTPALMODE & 0x80)) || (crtc.s.SCRN_BITS & SCRN_UNDERLINE)) {
                 updatemask = 0x7ff;                  updatemask = 0x7ff;
                 if ((crtc.s.SCRN_BITS & SCRN_24KHZ) && (crtc.s.TXT_XL == 80)) {                  if ((crtc.s.SCRN_BITS & SCRN_24KHZ) && (!crtc.s.width40)) {
                         pal_bank = pal_disp = PAL_HIGHRESO;                          pal_bank = PAL_HIGHRESO;
                           pal_disp = PAL_HIGHRESO;
                 }                  }
                 if (crtc.s.SCRN_BITS & SCRN_TEXTYx2) {                  if (crtc.s.SCRN_BITS & SCRN_TEXTYx2) {
                         updatemask = 0x3ff;                          updatemask = 0x3ff;
Line 94  void vrambank_patch(void) { Line 150  void vrambank_patch(void) {
                 updatemask = 0x3ff;                  updatemask = 0x3ff;
                 if (!(crtc.s.SCRN_BITS & SCRN_TEXTYx2)) {                  if (!(crtc.s.SCRN_BITS & SCRN_TEXTYx2)) {
                         if (crtc.s.SCRN_BITS & SCRN_24KHZ) {                          if (crtc.s.SCRN_BITS & SCRN_24KHZ) {
                                 if (crtc.s.TXT_XL == 40) {                                  if (crtc.s.width40) {
                                         if (crtc.s.SCRN_BITS & SCRN_200LINE) {  // width 40,25,0,2                                          if (crtc.s.SCRN_BITS & SCRN_200LINE) {  // width 40,25,0,2
                                                 dispmode |= SCRN64_320x200;                                                  dispmode |= SCRN64_320x200;
                                         }                                          }
Line 108  void vrambank_patch(void) { Line 164  void vrambank_patch(void) {
                                 }                                  }
                         }                          }
                         else {                          else {
                                 if (crtc.s.TXT_XL == 40) {                                      // width 40,25,0,1                                  if (crtc.s.width40) {                                           // width 40,25,0,1
                                         if (crtc.s.EXTPALMODE & 0x10) {                                          if (crtc.s.EXTPALMODE & 0x10) {
                                                 if (crtc.s.ZPRY & 0x10) {                                                  if (crtc.s.ZPRY & 0x10) {
                                                         dispmode = SCRN64_L320x200x2 |                                                          dispmode = SCRN64_L320x200x2 |
Line 139  void vrambank_patch(void) { Line 195  void vrambank_patch(void) {
                 }                  }
                 else {                  else {
                         if (crtc.s.SCRN_BITS & SCRN_24KHZ) {                          if (crtc.s.SCRN_BITS & SCRN_24KHZ) {
                                 if (crtc.s.TXT_XL == 40) {                                  if (crtc.s.width40) {
                                         if (crtc.s.SCRN_BITS & SCRN_200LINE) {  // width 40,12,0,2                                          if (crtc.s.SCRN_BITS & SCRN_200LINE) {  // width 40,12,0,2
                                                 dispmode |= SCRN64_320x100;                                                  dispmode |= SCRN64_320x100;
                                         }                                          }
Line 152  void vrambank_patch(void) { Line 208  void vrambank_patch(void) {
                                 }                                  }
                         }                          }
                         else {                          else {
                                 if (crtc.s.TXT_XL == 40) {                                      // width 40,12,0,1                                  if (crtc.s.width40) {                                           // width 40,12,0,1
                                         if (crtc.s.EXTPALMODE & 0x10) {                                          if (crtc.s.EXTPALMODE & 0x10) {
                                                 if (crtc.s.ZPRY & 0x10) {                                                  if (crtc.s.ZPRY & 0x10) {
                                                         dispmode = SCRN64_320x100x2 |                                                          dispmode = SCRN64_320x100x2 |
Line 182  void vrambank_patch(void) { Line 238  void vrambank_patch(void) {
                 }                  }
         }          }
         crtc.e.updatemask = updatemask;          crtc.e.updatemask = updatemask;
 }          crtc.e.dispmode = dispmode;
           crtc.e.pal_bank = pal_bank;
 void crtc_updt(void) {          crtc.e.pal_disp = pal_disp;
   #endif
         if (crtc.s.SCRN_BITS & SCRN_24KHZ) {  
                 crtc.s.fnty = (crtc.s.FNT_YL >> 1) & 0xfffe;  
         }  
         else {  
                 crtc.s.fnty = crtc.s.FNT_YL & 0xfffe;  
         }  
         if (crtc.s.TXT_YL) {  
                 crtc.s.CRT_YL = crtc.s.fnty * crtc.s.TXT_YL;  
         }  
         else {  
                 crtc.s.CRT_YL = crtc.s.fnty * 1;  
         }  
         crtc.s.CRT_VS = crtc.s.fnty * (crtc.s.TXT_YS + 1);  
         crtc.s.CRT_VL = (crtc.s.TXT_VL + 1) * crtc.s.fnty + crtc.s.TXT_VLA;  
 //      TRACEOUT(("set> %d / %d / %d", crtc.s.CRT_YL, crtc.s.CRT_VS, crtc.s.CRT_VL));  
 }  }
   
   
Line 208  void crtc_updt(void) { Line 249  void crtc_updt(void) {
   
 void IOOUTCALL crtc_o(UINT port, REG8 value) {  void IOOUTCALL crtc_o(UINT port, REG8 value) {
   
         if (port == 0x1800) {          port &= 0xff;
                 crtc.s.CRTC_NUM = value;          if (port == 0) {
         }                  crtc.s.regnum = value;
         else if (port == 0x1801) {          }
                 switch(crtc.s.CRTC_NUM) {          else if (port == 1) {
                         case 0x01:                  if (crtc.s.regnum < CRTCREG_MAX) {
                                 if (value <= 40) {                          if (crtc.s.reg[crtc.s.regnum] != value) {
                                         crtc.s.TXT_XL = 40;                                  crtc.s.reg[crtc.s.regnum] = value;
                                 }                                  crtc_clkupdate();
                                 else {                                  crtc_timingupdate();
                                         crtc.s.TXT_XL = 80;                                  crtc_bankupdate();
                                 }  
                                 vrambank_patch();  
                                 break;  
   
                         case 0x04:  
                                 crtc.s.TXT_VL = value;  
                                 break;  
   
                         case 0x05:  
                                 crtc.s.TXT_VLA = value;  
                                 break;  
   
                         case 0x06:  
                                 crtc.s.TXT_YL = value;  
                                 break;  
   
                         case 0x07:  
                                 crtc.s.TXT_YS = value;  
                                 break;  
   
                         case 0x09:  
                                 crtc.s.FNT_YL = (WORD)value+1;  
                                 break;  
   
                         case 0x0c:  
                                 crtc.s.TXT_TOP &= 0xff;  
                                 crtc.s.TXT_TOP |= (value & 7) << 8;  
                                 makescrn.remakeattr = 1;                                  makescrn.remakeattr = 1;
                                 break;                                  scrnallflash = 1;
                           }
                         case 0x0d:  
                                 crtc.s.TXT_TOP &= 0x7ff;  
                                 crtc.s.TXT_TOP |= value;  
                                 makescrn.remakeattr = 1;  
                                 break;  
   
                         default:  
                                 return;  
                 }                  }
                 crtc.s.GRP_XL = crtc.s.TXT_XL << 3;  
                 crtc.s.GRP_YL = 200;  
                 crtc_updt();  
                 scrnallflash = 1;                                                               /* 990220 puni */  
         }          }
 }  }
   
Line 275  void IOOUTCALL scrn_o(UINT port, REG8 va Line 277  void IOOUTCALL scrn_o(UINT port, REG8 va
         modify = crtc.s.SCRN_BITS ^ value;          modify = crtc.s.SCRN_BITS ^ value;
         crtc.s.SCRN_BITS = value;          crtc.s.SCRN_BITS = value;
         if (modify & SCRN_DISPCHANGE) {          if (modify & SCRN_DISPCHANGE) {
                 reflesh_palette();  //              pal_reset();                                    // なんで？
                 scrnallflash = 1;                  scrnallflash = 1;
                 makescrn.palandply = 1;                  makescrn.palandply = 1;
                 crtc_updt();                  crtc_clkupdate();
                   crtc_timingupdate();
         }          }
         vrambank_patch();          crtc_bankupdate();
         crtc.s.CPU_BANK = (BYTE)((crtc.s.SCRN_BITS & SCRN_ACCESSVRAM)?1:0);  
         crtc.s.CRT_BANK = (BYTE)((crtc.s.SCRN_BITS & SCRN_DISPVRAM)?1:0);  
         (void)port;          (void)port;
 }  }
   
Line 297  REG8 IOINPCALL scrn_i(UINT port) { Line 298  REG8 IOINPCALL scrn_i(UINT port) {
   
 void IOOUTCALL ply_o(UINT port, REG8 value) {  void IOOUTCALL ply_o(UINT port, REG8 value) {
   
         if (crtc.s.PLY != value) {          if (crtc.s.rgbp[CRTC_PLY] != value) {
                 crtc.s.PLY = value;                  crtc.s.rgbp[CRTC_PLY] = value;
                 makescrn.palandply = 1;                  makescrn.palandply = 1;
         }          }
         (void)port;          (void)port;
 }  }
   
 REG8 IOINPCALL ply_i(UINT port) {  
   
         (void)port;  
         return(crtc.s.PLY);  
 }  
   
   
 // ---- パレット  // ---- パレット
   
 void IOOUTCALL palette_o(UINT port, REG8 value) {  void IOOUTCALL palette_o(UINT port, REG8 value) {
   
           UINT    num;
   #if defined(SUPPORT_TURBOZ)
           REG8    sft;
         UINT    pal;          UINT    pal;
         BYTE    c;  #endif
   
   #if defined(SUPPORT_TURBOZ)
         crtc.s.lastpal = (value & 0xf0);          crtc.s.lastpal = (value & 0xf0);
         if (crtc.s.EXTPALMODE & 0x80) {          if (!(crtc.s.EXTPALMODE & 0x80)) {
   #endif
                   num = (port >> 8) & 3;
                   if (crtc.s.rgbp[num] != value) {
                           crtc.s.rgbp[num] = value;
                           makescrn.palandply = 1;
                   }
   #if defined(SUPPORT_TURBOZ)
           }
           else {
                 if ((crtc.s.EXTGRPHPAL & 0x88) != 0x80) {                  if ((crtc.s.EXTGRPHPAL & 0x88) != 0x80) {
                         return;                          return;
                 }                  }
                 if (pal_bank & PAL_4096) {                                      // use 4096palettes                  sft = (port >> (8 - 2)) & (3 << 2);
                         switch(pal_bank & (PAL_4096FULL | PAL_4096BANK)) {                  if (crtc.e.pal_bank & PAL_4096) {                               // use 4096palettes
                                 case 0:                          num = ((port & 0xff) << 4) + (crtc.s.lastpal >> 4);
                                         pal = ((port & 0xcc) << 4) + ((value & 0xc0) >> 4);                          if (!(crtc.e.pal_bank & PAL_4096FULL)) {
                                         break;                                  num &= 0xccc;
                                   if (crtc.e.pal_bank & PAL_4096BANK) {
                                 case 1:                                          num >>= 2;
                                         pal = ((port & 0xcc) << 2) + ((value & 0xc0) >> 6);                                  }
                                         break;  
   
                                 default:  
                                         pal = ((port & 0xff) << 4) + (crtc.s.lastpal >> 4);  
                                         break;  
                         }  
                         value &= 0xf;  
                         switch(port & 0xff00) {  
                                 case 0x1000:  
                                         crtc_PAL4096[pal] &= 0xff0;  
                                         crtc_PAL4096[pal] |= value;  
                                         break;  
   
                                 case 0x1100:  
                                         crtc_PAL4096[pal] &= 0xf0f;  
                                         crtc_PAL4096[pal] |= (value << 4);  
                                         break;  
   
                                 case 0x1200:  
                                         crtc_PAL4096[pal] &= 0x0ff;  
                                         crtc_PAL4096[pal] |= ((WORD)value << 8);  
                                         break;  
                         }                          }
                         pal_setgrph4096(pal);                          pal = crtc.p.grph4096[num];
                           pal &= ~((0x0f) << sft);
                           pal |= (value & 0x0f) << sft;
                           crtc.p.grph4096[num] = pal;
                           pal_setgrph4096(num);
                 }                  }
                 else {                  else {
                         c = ((port & 0x80) >> 5) | ((port & 0x08) >> 2) |                          num = ((port & 0x80) >> 5) | ((port & 0x08) >> 2) |
                                                                                                 ((value & 0x80) >> 7);                                                                                                  ((value & 0x80) >> 7);
                         if ((dispmode & SCRN64_MASK) == SCRN64_INVALID) {                          if ((crtc.e.dispmode & SCRN64_MASK) == SCRN64_INVALID) {
                                 c |= (c << 3);                                  num |= (num << 3);
                         }                          }
                         else {                          else {
                                 c += ((port & 0x40) >> 1) | ((port & 0x04) << 2) |                                  num += ((port & 0x40) >> 1) | ((port & 0x04) << 2) |
                                                                                                         ((value & 0x40) >> 3);                                                                                                          ((value & 0x40) >> 3);
                         }                          }
                         value &= 0xf;                          pal = crtc.p.grph[crtc.e.pal_bank][num];
                         switch(port & 0xff00) {                          pal &= ~((0x0f) << sft);
                                 case 0x1000:                          pal |= (value & 0x0f) << sft;
                                         crtc_GRPHPAL[pal_bank][c] &= 0xff0;                          crtc.p.grph[crtc.e.pal_bank][num] = pal;
                                         crtc_GRPHPAL[pal_bank][c] |= value;                          pal_setgrph(crtc.e.pal_bank, (REG8)num);
                                         break;  
   
                                 case 0x1100:  
                                         crtc_GRPHPAL[pal_bank][c] &= 0xf0f;  
                                         crtc_GRPHPAL[pal_bank][c] |= (value << 4);  
                                         break;  
   
                                 case 0x1200:  
                                         crtc_GRPHPAL[pal_bank][c] &= 0x0ff;  
                                         crtc_GRPHPAL[pal_bank][c] |= ((WORD)value << 8);  
                                         break;  
                         }  
                         pal_setgrph(pal_bank, c);  
                 }                  }
         }          }
         else {  #endif
                 switch(port & 0xff00) {  }
                         case 0x1000:  
                                 if (crtc.s.PAL_B != value) {  
                                         crtc.s.PAL_B = value;  
                                         makescrn.palandply = 1;  
                                 }  
                                 break;  
   
                         case 0x1100:  void IOOUTCALL blackctrl_o(UINT port, REG8 value) {
                                 if (crtc.s.PAL_R != value) {  
                                         crtc.s.PAL_R = value;  
                                         makescrn.palandply = 1;  
                                 }  
                                 break;  
   
                         case 0x1200:          crtc.s.BLACKPAL = value;
                                 if (crtc.s.PAL_G != value) {          makescrn.palandply = 1;
                                         crtc.s.PAL_G = value;          (void)port;
                                         makescrn.palandply = 1;  
                                 }  
                                 break;  
                 }  
         }  
 }  }
   
 REG8 IOINPCALL palette_i(UINT port) {  REG8 IOINPCALL blackctrl_i(UINT port) {
   
         UINT    c;          (void)port;
           return(crtc.s.BLACKPAL);
   }
   
         if ((crtc.s.EXTPALMODE & 0x80) && ((crtc.s.EXTGRPHPAL & 0x88) == 0x88)) {  
                 if (pal_bank & PAL_4096) {                                      // use 4096palettes  
                         switch(pal_bank & (PAL_4096FULL | PAL_4096BANK)) {  
                                 case 0:  
                                         c = ((port & 0xcc) << 4) | ((crtc.s.lastpal & 0xc0) >> 4);  
                                         break;  
   
                                 case 1:  
                                         c = ((port & 0xcc) << 2) | ((crtc.s.lastpal & 0xc0) >> 6);  
                                         break;  
   
                                 default:  
                                         c = ((port & 0xff) << 4) | (crtc.s.lastpal >> 4);  
                                         break;  
                         }  
                         switch(port & 0xff00) {  
                                 case 0x1000:  
                                         return(crtc.s.lastpal | (crtc_PAL4096[c] & 0xf));  
   
                                 case 0x1100:  // ---- turboZ
                                         return(crtc.s.lastpal | ((crtc_PAL4096[c] & 0xf0) >> 4));  
   #if defined(SUPPORT_TURBOZ)
   
                                 case 0x1200:  REG8 IOINPCALL ply_i(UINT port) {
                                         return(crtc.s.lastpal | ((crtc_PAL4096[c] & 0xf00) >> 8));  
           (void)port;
           return(crtc.s.rgbp[CRTC_PLY]);
   }
   
   REG8 IOINPCALL palette_i(UINT port) {
   
           UINT    num;
           UINT    pal;
           REG8    sft;
   
           if ((crtc.s.EXTPALMODE & 0x80) && ((crtc.s.EXTGRPHPAL & 0x88) == 0x88)) {
                   if (crtc.e.pal_bank & PAL_4096) {                               // use 4096palettes
                           num = ((port & 0xff) << 4) + (crtc.s.lastpal >> 4);
                           if (!(crtc.e.pal_bank & PAL_4096FULL)) {
                                   num &= 0xccc;
                                   if (crtc.e.pal_bank & PAL_4096BANK) {
                                           num >>= 2;
                                   }
                         }                          }
                           pal = crtc.p.grph4096[num];
                 }                  }
                 else {                  else {
                         c = ((port & 0x80) >> 5) | ((port & 0x08) >> 2) |                          num = ((port & 0x80) >> 5) | ((port & 0x08) >> 2) |
                                                                                         ((crtc.s.lastpal & 0x80) >> 7);                                                                                          ((crtc.s.lastpal & 0x80) >> 7);
                         if ((dispmode & SCRN64_MASK) == SCRN64_INVALID) {                          if ((crtc.e.dispmode & SCRN64_MASK) == SCRN64_INVALID) {
                                 c |= (c << 3);                                  num |= (num << 3);
                         }                          }
                         else {                          else {
                                 c += ((port & 0x40) >> 1) | ((port & 0x04) << 2) |                                  num += ((port & 0x40) >> 1) | ((port & 0x04) << 2) |
                                                                                         ((crtc.s.lastpal & 0x40) >> 3);                                                                                          ((crtc.s.lastpal & 0x40) >> 3);
                         }                          }
                         switch(port & 0xff00) {                          pal = crtc.p.grph[crtc.e.pal_bank][num];
                                 case 0x1000:  
                                         return(crtc.s.lastpal |  
                                                                 (crtc_GRPHPAL[pal_bank][c] & 0xf));  
                                 case 0x1100:  
                                         return(crtc.s.lastpal |  
                                                                 ((crtc_GRPHPAL[pal_bank][c] & 0xf0) >> 4));  
                                 case 0x1200:  
                                         return(crtc.s.lastpal |  
                                                                 ((crtc_GRPHPAL[pal_bank][c] & 0xf00) >> 8));  
                         }  
                 }                  }
                   sft = (port >> (8 - 2)) & (3 << 2);
                   return((REG8)(crtc.s.lastpal + ((pal >> sft) & 0xf)));
           }
           else {
                   return(0xff);
         }          }
         return(0xff);  
 }  }
   
   
 // ---- turboZ  
   
 void IOOUTCALL extpal_o(UINT port, REG8 value) {  void IOOUTCALL extpal_o(UINT port, REG8 value) {
   
         crtc.s.EXTPALMODE = value;          crtc.s.EXTPALMODE = value;
         vrambank_patch();          crtc_bankupdate();
           (void)port;
 }  }
   
 REG8 IOINPCALL extpal_i(UINT port) {  REG8 IOINPCALL extpal_i(UINT port) {
   
           (void)port;
         return(crtc.s.EXTPALMODE);          return(crtc.s.EXTPALMODE);
 }  }
   
Line 487  void IOOUTCALL extgrphpal_o(UINT port, R Line 446  void IOOUTCALL extgrphpal_o(UINT port, R
         if (crtc.s.EXTPALMODE & 0x80) {          if (crtc.s.EXTPALMODE & 0x80) {
                 crtc.s.EXTGRPHPAL = value;                  crtc.s.EXTGRPHPAL = value;
         }          }
           (void)port;
 }  }
   
 REG8 IOINPCALL extgrphpal_i(UINT port) {  REG8 IOINPCALL extgrphpal_i(UINT port) {
Line 494  REG8 IOINPCALL extgrphpal_i(UINT port) { Line 454  REG8 IOINPCALL extgrphpal_i(UINT port) {
         if (crtc.s.EXTPALMODE & 0x80) {          if (crtc.s.EXTPALMODE & 0x80) {
                 return(crtc.s.EXTGRPHPAL);                  return(crtc.s.EXTGRPHPAL);
         }          }
           (void)port;
         return(0xff);          return(0xff);
 }  }
   
 void IOOUTCALL exttextpal_o(UINT port, REG8 value) {  void IOOUTCALL exttextpal_o(UINT port, REG8 value) {
   
         if (crtc.s.EXTPALMODE & 0x80) {          if (crtc.s.EXTPALMODE & 0x80) {
                 crtc_TEXTPAL[port & 7] = value;                  crtc.p.text[port & 7] = value;
                 pal_settext((REG8)(port & 7));                  pal_settext((REG8)(port & 7));
         }          }
 }  }
Line 508  void IOOUTCALL exttextpal_o(UINT port, R Line 469  void IOOUTCALL exttextpal_o(UINT port, R
 REG8 IOINPCALL exttextpal_i(UINT port) {  REG8 IOINPCALL exttextpal_i(UINT port) {
   
         if (crtc.s.EXTPALMODE & 0x80) {          if (crtc.s.EXTPALMODE & 0x80) {
                 return(crtc_TEXTPAL[port & 7]);                  return(crtc.p.text[port & 7]);
         }          }
         return(0xff);          return(0xff);
 }  }
Line 516  REG8 IOINPCALL exttextpal_i(UINT port) { Line 477  REG8 IOINPCALL exttextpal_i(UINT port) {
 void IOOUTCALL exttextdisp_o(UINT port, REG8 value) {  void IOOUTCALL exttextdisp_o(UINT port, REG8 value) {
   
         crtc.s.ZPRY = value;          crtc.s.ZPRY = value;
         vrambank_patch();          crtc_bankupdate();
           (void)port;
 }  }
   
 REG8 IOINPCALL exttextdisp_i(UINT port) {  REG8 IOINPCALL exttextdisp_i(UINT port) {
Line 524  REG8 IOINPCALL exttextdisp_i(UINT port)  Line 486  REG8 IOINPCALL exttextdisp_i(UINT port) 
         if (crtc.s.EXTPALMODE & 0x80) {          if (crtc.s.EXTPALMODE & 0x80) {
                 return(crtc.s.ZPRY);                  return(crtc.s.ZPRY);
         }          }
           (void)port;
         return(0xff);          return(0xff);
 }  }
   #endif
   
 void IOOUTCALL blackctrl_o(UINT port, REG8 value) {  
   
         crtc.s.BLACKPAL = value;  // ----
   
   void crtc_update(void) {
   
           crtc_clkupdate();
           crtc_timingupdate();
           crtc_bankupdate();
         makescrn.palandply = 1;          makescrn.palandply = 1;
           scrnallflash = 1;
 }  }
   
 REG8 IOINPCALL blackctrl_i(UINT port) {  void crtc_setwidth(REG8 width40) {
   
         return(crtc.s.BLACKPAL);          crtc.s.width40 = width40;
           crtc_update();
 }  }
   
   
 // ----  // ----
   
   #if defined(SUPPORT_TURBOZ)
 static void resetpal(void) {  static void resetpal(void) {
   
         CopyMemory(crtc_TEXTPAL, def_TEXTPAL, 8);          CopyMemory(crtc.p.text, defpaltext, sizeof(defpaltext));
         CopyMemory(crtc_GRPHPAL[0], def_GRPHPAL, 64*2);          CopyMemory(crtc.p.grph[0], defpalgrph, sizeof(defpalgrph));
         CopyMemory(crtc_GRPHPAL[1], def_GRPHPAL, 64*2);          CopyMemory(crtc.p.grph[1], defpalgrph, sizeof(defpalgrph));
 }  }
   #endif
   
   #if defined(SUPPORT_TURBOZ)
 void crtc_initialize(void) {  void crtc_initialize(void) {
   
         UINT    p;          UINT    p;
   
         resetpal();          resetpal();
         for (p=0; p<4096; p++) {          for (p=0; p<4096; p++) {
                 crtc_PAL4096[p] = p;                  crtc.p.grph4096[p] = p;
         }          }
 }  }
   #endif
   
 void crtc_reset(void) {  void crtc_reset(void) {
   
         crtc.s = crtcdefault;          ZeroMemory(&crtc, sizeof(crtc));
           CopyMemory(crtc.s.rgbp, defrgbp, 4);
         dispmode = SCRN64_INVALID;          CopyMemory(crtc.s.reg, defreg, 18);
         pal_bank = pal_disp = PAL_NORMAL;          crtc.s.width40 = 1;
   #if defined(SUPPORT_TURBOZ)
         if (pccore.ROM_TYPE < 3) {          if (pccore.ROM_TYPE < 3) {
                 resetpal();                  resetpal();
         }          }
         if ((pccore.ROM_TYPE >= 2) && (!(pccore.DIP_SW & 1))) {  #endif
                 crtc.s.SCRN_BITS = SCRN_200LINE;  //      IPLが勝手に切り替える筈である
                 crtc.s.FNT_YL = 16;  //      if ((pccore.ROM_TYPE >= 2) && (!(pccore.DIP_SW & 1))) {
         }  //              crtc.s.SCRN_BITS = SCRN_200LINE;
   //              crtc.s.reg[CRTCREG_CHRCY] = 15;
         reflesh_palette();  //      }
         crtc_updt();  
   
         vrambank_patch();          pal_reset();
         makescrn.palandply = 1;          makescrn.palandply = 1;
           crtc_update();
   }
   
   void crtc_forcesetwidth(REG8 width) {
   
           crtc.s.reg[CRTCREG_HDISP] = (UINT8)width;
           crtc_bankupdate();
         scrnallflash = 1;          scrnallflash = 1;
 }  }
   
Removed from v.1.3  
changed lines
  Added in v.1.16

RetroPC.NET-CVS <cvs@retropc.net>