Diff for /xmil/io/crtc.c between versions 1.8 and 1.20

version 1.8, 2004/08/12 13:32:52 version 1.20, 2008/06/02 20:07:31
Line 1 Line 1
 #include        "compiler.h"  #include        "compiler.h"
 #include        "scrnmng.h"  #include        "z80core.h"
 #include        "pccore.h"  #include        "pccore.h"
 #include        "iocore.h"  #include        "iocore.h"
   #include        "nevent.h"
 #include        "vram.h"  #include        "vram.h"
 #include        "palettes.h"  #include        "palettes.h"
 #include        "makescrn.h"  #include        "makescrn.h"
   
   
   static const UINT8 defrgbp[4] = {0xaa, 0xcc, 0xf0, 0x00};
   static const UINT8 defreg[18] = {
                                   0x37, 0x28, 0x2d, 0x34,
                                   0x1f, 0x02, 0x19, 0x1c,
                                   0x00, 0x07, 0x00, 0x00,
                                   0x00, 0x00, 0x00, 0x00,
                                   0x00, 0x00};
   
   #if defined(SUPPORT_TURBOZ)
 static const UINT8 defpaltext[8] = {  static const UINT8 defpaltext[8] = {
                                 0x00, 0x03, 0x0c, 0x0f, 0x30, 0x33, 0x3c, 0x3f};                                  0x00, 0x03, 0x0c, 0x0f, 0x30, 0x33, 0x3c, 0x3f};
   
Line 19  static const UINT16 defpalgrph[64] = { Line 29  static const UINT16 defpalgrph[64] = {
                                 0x505, 0x50f, 0x5a5, 0x5af, 0xf05, 0xf0f, 0xfa5, 0xfaf,                                  0x505, 0x50f, 0x5a5, 0x5af, 0xf05, 0xf0f, 0xfa5, 0xfaf,
                                 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};
   #endif
   
 static const CRTCSTAT crtcdefault = {  
                                 {0xaa, 0xcc, 0xf0, 0x00},       // rgbp  
                                 0,                                                      // SCRN_BITS  
                                 0,                                                      // CRTC_NUM  
   
                                 7,                                                      // _FNT_YL  
                                 40,                                                     // TXT_XL  
                                 25,                                                     // TXT_YL  
                                 28,                                                     // TXT_YS  
   
 //                              200,                                            // CRT_YL  
 //                              232,                                            // CRT_VS  
 //                              266,                                            // CRT_VL  
   
                                 31,                                                     // TXT_VL  
                                 10,                                                     // TXT_VLA  
   
                                 0,                                                      // TXT_TOP  typedef struct {
 //                              8,                                                      // fnty          UINT32  clock;
           UINT    minx;
           UINT    maxx;
           UINT    miny;
           UINT    maxy;
   } GDCCLK;
   
                                 0,                                                      // lastpal  static const GDCCLK gdcclk[] = {
                           {14318180 / 8, 112 - 8, 112 + 8, 200, 300},
                           {21052600 / 8, 108 - 6, 108 + 6, 400, 575}};
   
                                 0,                                                      // BLACKPAL  
                                 0,                                                      // EXTPALMODE  
                                 0,                                                      // EXTGRPHPAL  
                                 0,                                                      // ZPRY  
         };  
   
   static void crtc_bankupdate(void) {
   
 void vrambank_patch(void) {          if (!(crtc.s.SCRN_BITS & SCRN_ACCESSVRAM)) {
                   crtc.e.gramacc = gram + GRAM_BANK0;
         UINT    updatemask;                  crtc.e.updatebit = UPDATE_VRAM0;
         UINT8   dispmode;  
         UINT8   pal_bank;  
         UINT8   pal_disp;  
   
         if (crtc.s.SCRN_BITS & 0x10) {  
                 crtc.e.gram = gram + GRAM_BANK1;  
                 crtc.e.updatebit = UPDATE_VRAM1;  
         }          }
         else {          else {
                 crtc.e.gram = gram + GRAM_BANK0;                  crtc.e.gramacc = gram + GRAM_BANK1;
                 crtc.e.updatebit = UPDATE_VRAM0;                  crtc.e.updatebit = UPDATE_VRAM1;
         }          }
         dispmode = (crtc.s.SCRN_BITS & SCRN_DISPVRAM)?SCRN_BANK1:SCRN_BANK0;  }
         pal_bank = pal_disp = PAL_NORMAL;  
   static void crtc_dispupdate(void) {
   
           REG8    scrnpage;
           REG8    dispmode;
   #if defined(SUPPORT_TURBOZ)
           UINT    updatemask;
           REG8    pal_bank;
           REG8    pal_disp;
   #endif
   
           scrnpage = (crtc.s.SCRN_BITS & SCRN_DISPVRAM)?SCRN_BANK1:SCRN_BANK0;
           if (!crtc.s.width40) {
                   scrnpage += SCRN_WIDTH80;
           }
           dispmode = scrnpage;
           dispmode += (crtc.s.SCRN_BITS & SCRN_UNDERLINE) >> 4;
           dispmode += (crtc.s.SCRN_BITS & 7);
   
   #if !defined(SUPPORT_TURBOZ)
           crtc.e.updatemask = (crtc.s.SCRN_BITS & SCRN_TEXTYx2)?0x3ff:0x7ff;
           crtc.e.dispmode = dispmode;
   #else
           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;
                 }                  }
         }          }
         else {                                                                                                  // Analog mode          else {                                                                                          /* Analog mode */
                 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) {
                                                 dispmode |= SCRN64_320x200;                                                                                                                  /* width 40,25,0,2 */
                                                   dispmode = scrnpage + SCRN64_320x200;
                                         }                                          }
                                         else {                                                                  // width 40,25,1,2                                          else {                                                          /* width 40,25,1,2 */
                                                 dispmode = SCRN64_H320x400;                                                  dispmode = SCRN64_H320x400;
                                         }                                          }
                                 }                                  }
                                 else {                                                                          // width 80,25,?,2                                  else {                                                                  /* width 80,25,?,2 */
                                         updatemask = 0x7ff;                                          updatemask = 0x7ff;
                                         pal_bank = pal_disp = PAL_HIGHRESO;                                          pal_bank = PAL_HIGHRESO;
                                           pal_disp = PAL_HIGHRESO;
                                 }                                  }
                         }                          }
                         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 +
                                                                 ((crtc.s.ZPRY & 8) ? SCRN_BANK1 : SCRN_BANK0);                                                                          ((crtc.s.ZPRY & 8)?SCRN_BANK1:SCRN_BANK0);
                                                         pal_disp = PAL_4096 | PAL_64x2 |                                                          pal_disp = PAL_4096 + PAL_64x2 +
                                                                 ((crtc.s.ZPRY & 8) ? PAL_4096L : PAL_4096H);                                                                          ((crtc.s.ZPRY & 8)?PAL_4096L:PAL_4096H);
                                                 }                                                  }
                                                 else {                                                  else {
                                                         dispmode |= SCRN64_320x200;                                                          dispmode = scrnpage + SCRN64_320x200;
                                                         pal_disp = PAL_4096 |                                                          pal_disp = PAL_4096 +
                                                                         ((crtc.s.SCRN_BITS & SCRN_DISPVRAM)                                                                                  ((crtc.s.SCRN_BITS & SCRN_DISPVRAM)
                                                                                                         ? PAL_4096L : PAL_4096H);                                                                                                                  ?PAL_4096L:PAL_4096H);
                                                 }                                                  }
                                                 pal_bank = PAL_4096 |                                                  pal_bank = PAL_4096 +
                                                                         ((crtc.s.SCRN_BITS & SCRN_ACCESSVRAM)                                                                                  ((crtc.s.SCRN_BITS & SCRN_ACCESSVRAM)
                                                                                                         ? PAL_4096L : PAL_4096H);                                                                                                                  ?PAL_4096L:PAL_4096H);
                                         }                                          }
                                         else {                                          else {
                                                 dispmode = SCRN64_320x200x4096 | SCRN_DRAW4096;                                                  dispmode = SCRN_DRAW4096 + SCRN64_320x200x4096;
                                                 pal_bank = pal_disp = PAL_4096 | PAL_4096FULL;                                                  pal_bank = PAL_4096 + PAL_4096FULL;
                                                   pal_disp = PAL_4096 + PAL_4096FULL;
                                         }                                          }
                                 }                                  }
                                 else {                                                                          // width 80,25,0,1                                  else {                                                                  /* width 80,25,0,1 */
                                         updatemask = 0x7ff;                                          updatemask = 0x7ff;
                                         dispmode = SCRN64_L640x200;                                          dispmode = SCRN_WIDTH80 + SCRN64_L640x200;
                                 }                                  }
                         }                          }
                 }                  }
                 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) {
                                                 dispmode |= SCRN64_320x100;                                                                                                                  /* width 40,12,0,2 */
                                                   dispmode = scrnpage + SCRN64_320x100;
                                         }                                          }
                                         else {                                                                  // width 40,12,1,2                                          else {                                                          /* width 40,12,1,2 */
                                                 dispmode = SCRN64_H320x200;                                                  dispmode = SCRN64_H320x200;
                                         }                                          }
                                 }                                  }
                                 else {                                                                          // width 80,12,?,2                                  else {                                                                  /* width 80,12,?,2 */
                                         pal_bank = pal_disp = PAL_HIGHRESO;                                          pal_bank = PAL_HIGHRESO;
                                           pal_disp = PAL_HIGHRESO;
                                 }                                  }
                         }                          }
                         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 +
                                                                 ((crtc.s.ZPRY & 8) ? SCRN_BANK1 : SCRN_BANK0);                                                                          ((crtc.s.ZPRY & 8)?SCRN_BANK1:SCRN_BANK0);
                                                         pal_disp = PAL_4096 | PAL_64x2 |                                                          pal_disp = PAL_4096 + PAL_64x2 +
                                                                 ((crtc.s.ZPRY & 8) ? PAL_4096L : PAL_4096H);                                                                          ((crtc.s.ZPRY & 8)?PAL_4096L:PAL_4096H);
                                                 }                                                  }
                                                 else {                                                  else {
                                                         dispmode |= SCRN64_320x100;                                                          dispmode = scrnpage + SCRN64_320x100;
                                                         pal_disp = PAL_4096 |                                                          pal_disp = PAL_4096 +
                                                                         ((crtc.s.SCRN_BITS & SCRN_DISPVRAM)                                                                                  ((crtc.s.SCRN_BITS & SCRN_DISPVRAM)
                                                                                                         ? PAL_4096L : PAL_4096H);                                                                                                                  ?PAL_4096L:PAL_4096H);
                                                 }                                                  }
                                                 pal_bank = PAL_4096 |                                                  pal_bank = PAL_4096 +
                                                                         ((crtc.s.SCRN_BITS & SCRN_ACCESSVRAM)                                                                                  ((crtc.s.SCRN_BITS & SCRN_ACCESSVRAM)
                                                                                                         ? PAL_4096L : PAL_4096H);                                                                                                                  ?PAL_4096L:PAL_4096H);
                                         }                                          }
                                         else {                                          else {
                                                 dispmode = SCRN64_320x100x4096 | SCRN_DRAW4096;                                                  dispmode = SCRN_DRAW4096 + SCRN64_320x100x4096;
                                                 pal_bank = pal_disp = PAL_4096 | PAL_4096FULL;                                                  pal_bank = PAL_4096 + PAL_4096FULL;
                                                   pal_disp = PAL_4096 + PAL_4096FULL;
                                         }                                          }
                                 }                                  }
                                 else {                                                                          // width 80,12,0,1                                  else {                                                                  /* width 80,12,0,1 */
                                         dispmode = SCRN64_L640x100;                                          dispmode = SCRN_WIDTH80 + SCRN64_L640x100;
                                 }                                  }
                         }                          }
                 }                  }
Line 171  void vrambank_patch(void) { Line 192  void vrambank_patch(void) {
         crtc.e.dispmode = dispmode;          crtc.e.dispmode = dispmode;
         crtc.e.pal_bank = pal_bank;          crtc.e.pal_bank = pal_bank;
         crtc.e.pal_disp = pal_disp;          crtc.e.pal_disp = pal_disp;
   #endif
 }  }
   
 static void crtc_updt(void) {  static void crtc_clkupdate(void) {
   
         UINT    fonty;          UINT            clksync;
   const GDCCLK    *clk;
           UINT            h;
           UINT            fonty;
           UINT            v;
   
         fonty = crtc.s._FNT_YL;          clksync = (crtc.s.SCRN_BITS & SCRN_24KHZ);
         if (crtc.s.SCRN_BITS & SCRN_24KHZ) {          clk = gdcclk + clksync;
                 fonty >>= 1;          h = crtc.s.reg[CRTCREG_HSIZE] + 1;
           if (crtc.s.width40) {
                   h = h * 2;
         }          }
           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;          fonty += 1;
         crtc.e.fonty = fonty;          crtc.e.fonty = fonty;
         crtc.e.yl = (crtc.s.TXT_YL & 0x7f);  
   
         crtc.e.dl = fonty * crtc.e.yl;          v = (crtc.s.reg[CRTCREG_CHRCY] & 0x1f) + 1;
         crtc.e.vs = fonty * ((crtc.s.TXT_YS & 0x7f) + 1);          v = v * ((crtc.s.reg[CRTCREG_VSIZE] & 0x7f) + 1);
         crtc.e.vl = fonty * ((crtc.s.TXT_VL & 0x7f) + 1) + (crtc.s.TXT_VLA & 0x1f);          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) {
   
 // ---- CRTC          UINT32  fontclock;
           UINT    yl;
           SINT32  vsyncstart;
   
 void IOOUTCALL crtc_o(UINT port, REG8 value) {          /* とりあえず…ね */
           crtc.e.pos = crtc.s.reg[CRTCREG_POSL]
                                                                           + ((crtc.s.reg[CRTCREG_POSH] & 7) << 8);
   
         port &= 0xff;          crtc.e.rasterdisp8 = (crtc.e.rasterclock8 * 40) / 56;
         if (port == 0) {  
                 crtc.s.CRTC_NUM = value;  
         }  
         else if (port == 1) {  
                 switch(crtc.s.CRTC_NUM) {  
                         case 0x01:  
                                 if (value <= 40) {  
                                         crtc.s.TXT_XL = 40;  
                                 }  
                                 else {  
                                         crtc.s.TXT_XL = 80;  
                                 }  
                                 vrambank_patch();  
                                 break;  
   
                         case 0x04:          fontclock = (crtc.s.reg[CRTCREG_CHRCY] & 0x1f) + 1;
                                 crtc.s.TXT_VL = value;          fontclock = (fontclock * crtc.e.rasterclock8) >> 8;
                                 break;  
   
                         case 0x05:          /* YsIIIが yl==0で disp信号見る…なんで? */
                                 crtc.s.TXT_VLA = value;          yl = (crtc.s.reg[CRTCREG_VDISP] & 0x7f);
                                 break;          crtc.e.yl = yl;
           iocore.e.dispclock = fontclock * max(yl, 1);
                         case 0x06:          vsyncstart = fontclock * ((crtc.s.reg[CRTCREG_VSYNC] & 0x7f) + 1);
                                 crtc.s.TXT_YL = value;          iocore.e.vsyncstart = vsyncstart;
                                 break;  #if !defined(MAINFRAMES_OLD)
           iocore.e.vsyncend = vsyncstart + (((crtc.s.reg[CRTCREG_PULSE] >> 4)
                         case 0x07:                                                                                                  * crtc.e.rasterclock8) >> 8);
                                 crtc.s.TXT_YS = value;          neitem_mainframes(NEVENT_FRAMES);
                                 break;  #else
           iocore.e.vpulseclock = ((crtc.s.reg[CRTCREG_PULSE] >> 4)
                                                                                                   * crtc.e.rasterclock8) >> 8;
   #endif
   }
   
                         case 0x09:  
                                 crtc.s._FNT_YL = value;  
                                 break;  
   
                         case 0x0c:  /* CRTC */
                                 crtc.s.TXT_TOP &= 0xff;  
                                 crtc.s.TXT_TOP |= (value & 7) << 8;  
                                 makescrn.remakeattr = 1;  
                                 break;  
   
                         case 0x0d:  void IOOUTCALL crtc_o(UINT port, REG8 value) {
                                 crtc.s.TXT_TOP &= 0x700;  
                                 crtc.s.TXT_TOP |= value;  
                                 makescrn.remakeattr = 1;  
                                 break;  
   
                         default:          port &= 0xff;
                                 return;          if (port == 0) {
                   crtc.s.regnum = value;
           }
           else if (port == 1) {
                   if (crtc.s.regnum < CRTCREG_MAX) {
                           if (crtc.s.reg[crtc.s.regnum] != value) {
                                   crtc.s.reg[crtc.s.regnum] = value;
                                   crtc_clkupdate();
                                   crtc_timingupdate();
                                   crtc.e.remakeattr = 1;
                                   crtc.e.scrnallflash = 1;
                           }
                 }                  }
 //              crtc.s.GRP_XL = crtc.s.TXT_XL << 3;  
 //              crtc.s.GRP_YL = 200;  
                 crtc_updt();  
                 scrnallflash = 1;                                                               /* 990220 puni */  
         }          }
 }  }
   
   
 // ---- スクリーンモード  /* スクリーンモード */
   
 void IOOUTCALL scrn_o(UINT port, REG8 value) {  void IOOUTCALL scrn_o(UINT port, REG8 value) {
   
Line 262  void IOOUTCALL scrn_o(UINT port, REG8 va Line 296  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_ACCESSVRAM) {
                   crtc_bankupdate();
           }
         if (modify & SCRN_DISPCHANGE) {          if (modify & SCRN_DISPCHANGE) {
 //              pal_reset();                                    // なんで?                  crtc.e.scrnallflash = 1;
                 scrnallflash = 1;                  crtc_dispupdate();
                 makescrn.palandply = 1;                  crtc_clkupdate();
                 crtc_updt();                  crtc_timingupdate();
                   crtc.e.palandply = 1;
         }          }
         vrambank_patch();  
         (void)port;          (void)port;
 }  }
   
Line 279  REG8 IOINPCALL scrn_i(UINT port) { Line 316  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.rgbp[CRTC_PLY] != value) {          if (crtc.s.rgbp[CRTC_PLY] != value) {
                 crtc.s.rgbp[CRTC_PLY] = value;                  crtc.s.rgbp[CRTC_PLY] = value;
                 makescrn.palandply = 1;                  crtc.e.palandply = 1;
   #if defined(SUPPORT_PALEVENT)
                   if ((!corestat.vsync) && (palevent.events < SUPPORT_PALEVENT)) {
                           PAL1EVENT *e = palevent.event + palevent.events;
                           palevent.events++;
                           e->rgbp = CRTC_PLY;
                           e->value = value;
                           e->clock = nevent_getwork(NEVENT_FRAMES);
                   }
   #endif
         }          }
         (void)port;          (void)port;
 }  }
   
 REG8 IOINPCALL ply_i(UINT port) {  
   
         (void)port;  
         return(crtc.s.rgbp[CRTC_PLY]);  
 }  
   
   
 // ---- パレット  /* パレット */
   
 void IOOUTCALL palette_o(UINT port, REG8 value) {  void IOOUTCALL palette_o(UINT port, REG8 value) {
   
         REG8    sft;  
         UINT    num;          UINT    num;
   #if defined(SUPPORT_TURBOZ)
           REG8    sft;
         UINT    pal;          UINT    pal;
   #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;
                           crtc.e.palandply = 1;
   #if defined(SUPPORT_PALEVENT)
                           if ((!corestat.vsync) && (palevent.events < SUPPORT_PALEVENT)) {
                                   PAL1EVENT *e = palevent.event + palevent.events;
                                   palevent.events++;
                                   e->rgbp = (UINT8)num;
                                   e->value = value;
                                   e->clock = nevent_getwork(NEVENT_FRAMES);
                           }
   #endif
                   }
   #if defined(SUPPORT_TURBOZ)
           }
           else {
                 if ((crtc.s.EXTGRPHPAL & 0x88) != 0x80) {                  if ((crtc.s.EXTGRPHPAL & 0x88) != 0x80) {
                         return;                          return;
                 }                  }
                 sft = (port >> (8 - 2)) & (3 << 2);                  sft = (port >> (8 - 2)) & (3 << 2);
                 if (crtc.e.pal_bank & PAL_4096) {                               // use 4096palettes                  if (crtc.e.pal_bank & PAL_4096) {                               /* use 4096palettes */
                         num = ((port & 0xff) << 4) + (crtc.s.lastpal >> 4);                          num = ((port & 0xff) << 4) + (crtc.s.lastpal >> 4);
                         if (!(crtc.e.pal_bank & PAL_4096FULL)) {                          if (!(crtc.e.pal_bank & PAL_4096FULL)) {
                                 num &= 0xccc;                                  num &= 0xccc;
Line 328  void IOOUTCALL palette_o(UINT port, REG8 Line 389  void IOOUTCALL palette_o(UINT port, REG8
                 else {                  else {
                         num = ((port & 0x80) >> 5) | ((port & 0x08) >> 2) |                          num = ((port & 0x80) >> 5) | ((port & 0x08) >> 2) |
                                                                                                 ((value & 0x80) >> 7);                                                                                                  ((value & 0x80) >> 7);
                         if ((crtc.e.dispmode & SCRN64_MASK) == SCRN64_INVALID) {                          if (crtc.e.dispmode & SCRN64_ENABLE) {
                                 num |= (num << 3);  
                         }  
                         else {  
                                 num += ((port & 0x40) >> 1) | ((port & 0x04) << 2) |                                  num += ((port & 0x40) >> 1) | ((port & 0x04) << 2) |
                                                                                                         ((value & 0x40) >> 3);                                                                                                          ((value & 0x40) >> 3);
                         }                          }
                           else {
                                   num |= (num << 3);
                           }
                         pal = crtc.p.grph[crtc.e.pal_bank][num];                          pal = crtc.p.grph[crtc.e.pal_bank][num];
                         pal &= ~((0x0f) << sft);                          pal &= ~((0x0f) << sft);
                         pal |= (value & 0x0f) << sft;                          pal |= (value & 0x0f) << sft;
Line 342  void IOOUTCALL palette_o(UINT port, REG8 Line 403  void IOOUTCALL palette_o(UINT port, REG8
                         pal_setgrph(crtc.e.pal_bank, (REG8)num);                          pal_setgrph(crtc.e.pal_bank, (REG8)num);
                 }                  }
         }          }
         else {  #endif
                 num = (port >> 8) & 3;  }
                 if (crtc.s.rgbp[num] != value) {  
                         crtc.s.rgbp[num] = value;  void IOOUTCALL blackctrl_o(UINT port, REG8 value) {
                         makescrn.palandply = 1;  
           if (crtc.s.rgbp[CRTC_BLACK] != value) {
                   crtc.s.rgbp[CRTC_BLACK] = value;
                   crtc.e.palandply = 1;
   #if defined(SUPPORT_PALEVENT)
                   if ((!corestat.vsync) && (palevent.events < SUPPORT_PALEVENT)) {
                           PAL1EVENT *e = palevent.event + palevent.events;
                           palevent.events++;
                           e->rgbp = CRTC_BLACK;
                           e->value = value;
                           e->clock = nevent_getwork(NEVENT_FRAMES);
                 }                  }
   #endif
         }          }
           (void)port;
   }
   
   REG8 IOINPCALL blackctrl_i(UINT port) {
   
           (void)port;
           return(crtc.s.rgbp[CRTC_BLACK]);
   }
   
   
   /* turboZ */
   
   #if defined(SUPPORT_TURBOZ)
   REG8 IOINPCALL ply_i(UINT port) {
   
           (void)port;
           return(crtc.s.rgbp[CRTC_PLY]);
 }  }
   
 REG8 IOINPCALL palette_i(UINT port) {  REG8 IOINPCALL palette_i(UINT port) {
Line 358  REG8 IOINPCALL palette_i(UINT port) { Line 447  REG8 IOINPCALL palette_i(UINT port) {
         REG8    sft;          REG8    sft;
   
         if ((crtc.s.EXTPALMODE & 0x80) && ((crtc.s.EXTGRPHPAL & 0x88) == 0x88)) {          if ((crtc.s.EXTPALMODE & 0x80) && ((crtc.s.EXTGRPHPAL & 0x88) == 0x88)) {
                 if (crtc.e.pal_bank & PAL_4096) {                               // use 4096palettes                  if (crtc.e.pal_bank & PAL_4096) {                               /* use 4096palettes */
                         num = ((port & 0xff) << 4) + (crtc.s.lastpal >> 4);                          num = ((port & 0xff) << 4) + (crtc.s.lastpal >> 4);
                         if (!(crtc.e.pal_bank & PAL_4096FULL)) {                          if (!(crtc.e.pal_bank & PAL_4096FULL)) {
                                 num &= 0xccc;                                  num &= 0xccc;
Line 371  REG8 IOINPCALL palette_i(UINT port) { Line 460  REG8 IOINPCALL palette_i(UINT port) {
                 else {                  else {
                         num = ((port & 0x80) >> 5) | ((port & 0x08) >> 2) |                          num = ((port & 0x80) >> 5) | ((port & 0x08) >> 2) |
                                                                                         ((crtc.s.lastpal & 0x80) >> 7);                                                                                          ((crtc.s.lastpal & 0x80) >> 7);
                         if ((crtc.e.dispmode & SCRN64_MASK) == SCRN64_INVALID) {                          if (crtc.e.dispmode & SCRN64_ENABLE) {
                                 num |= (num << 3);  
                         }  
                         else {  
                                 num += ((port & 0x40) >> 1) | ((port & 0x04) << 2) |                                  num += ((port & 0x40) >> 1) | ((port & 0x04) << 2) |
                                                                                         ((crtc.s.lastpal & 0x40) >> 3);                                                                                          ((crtc.s.lastpal & 0x40) >> 3);
                         }                          }
                           else {
                                   num |= (num << 3);
                           }
                         pal = crtc.p.grph[crtc.e.pal_bank][num];                          pal = crtc.p.grph[crtc.e.pal_bank][num];
                 }                  }
                 sft = (port >> (8 - 2)) & (3 << 2);                  sft = (port >> (8 - 2)) & (3 << 2);
Line 389  REG8 IOINPCALL palette_i(UINT port) { Line 478  REG8 IOINPCALL palette_i(UINT port) {
 }  }
   
   
 // ---- 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_dispupdate();
         (void)port;          (void)port;
 }  }
   
Line 440  REG8 IOINPCALL exttextpal_i(UINT port) { Line 527  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_dispupdate();
         (void)port;          (void)port;
 }  }
   
Line 452  REG8 IOINPCALL exttextdisp_i(UINT port)  Line 539  REG8 IOINPCALL exttextdisp_i(UINT port) 
         (void)port;          (void)port;
         return(0xff);          return(0xff);
 }  }
   #endif
   
 void IOOUTCALL blackctrl_o(UINT port, REG8 value) {  
   
         crtc.s.BLACKPAL = value;  /* extension */
         makescrn.palandply = 1;  
         (void)port;  void crtc_update(void) {
   
           crtc_bankupdate();
           crtc_dispupdate();
           crtc_clkupdate();
           crtc_timingupdate();
           crtc.e.palandply = 1;
           crtc.e.scrnallflash = 1;
 }  }
   
 REG8 IOINPCALL blackctrl_i(UINT port) {  void crtc_setwidth(REG8 width40) {
   
         (void)port;          crtc.s.width40 = width40;
         return(crtc.s.BLACKPAL);          crtc_update();
 }  }
   
   
 // ----  /* init/reset */
   
   #if defined(SUPPORT_TURBOZ)
 static void resetpal(void) {  static void resetpal(void) {
   
         CopyMemory(crtc.p.text, defpaltext, sizeof(defpaltext));          CopyMemory(crtc.p.text, defpaltext, sizeof(defpaltext));
         CopyMemory(crtc.p.grph[0], defpalgrph, sizeof(defpalgrph));          CopyMemory(crtc.p.grph[0], defpalgrph, sizeof(defpalgrph));
         CopyMemory(crtc.p.grph[1], defpalgrph, sizeof(defpalgrph));          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;
Line 485  void crtc_initialize(void) { Line 582  void crtc_initialize(void) {
                 crtc.p.grph4096[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);
           CopyMemory(crtc.s.reg, defreg, 18);
           crtc.s.width40 = 1;
   #if defined(SUPPORT_TURBOZ)
         if (pccore.ROM_TYPE < 3) {          if (pccore.ROM_TYPE < 3) {
                 resetpal();                  resetpal();
         }          }
   #endif
   #if 0
           /* IPLが勝手に切り替える筈である */
         if ((pccore.ROM_TYPE >= 2) && (!(pccore.DIP_SW & 1))) {          if ((pccore.ROM_TYPE >= 2) && (!(pccore.DIP_SW & 1))) {
                 crtc.s.SCRN_BITS = SCRN_200LINE;                  crtc.s.SCRN_BITS = SCRN_200LINE;
                 crtc.s._FNT_YL = 15;                  crtc.s.reg[CRTCREG_CHRCY] = 15;
         }          }
   #endif  /* 0 */
   
         pal_reset();          pal_reset();
         crtc_updt();          crtc.e.palandply = 1;
           crtc_update();
   }
   
   void crtc_forcesetwidth(REG8 width) {
   
         vrambank_patch();          crtc.s.reg[CRTCREG_HDISP] = (UINT8)width;
         makescrn.palandply = 1;          crtc_dispupdate();
         scrnallflash = 1;          crtc.e.scrnallflash = 1;
 }  }
   

Removed from v.1.8  
changed lines
  Added in v.1.20


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