| version 1.1, 2004/08/04 17:09:25 | version 1.12, 2004/08/13 02:16:33 | 
| 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" | 
 | #include        "draw.h" |  | 
 | #include        "palettes.h" | #include        "palettes.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 23  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 UINT8 defrgbp[4] = {0xaa, 0xcc, 0xf0, 0x00}; | 
 |  | static const UINT8 defreg[18] = { | 
 |  | 55, 40, 45, 0x36, | 
 |  | 31, 10, 25, 28, | 
 |  | 7, 7, 0, 0, | 
 |  | 0, 0, 0, 0, 0, 0}; | 
 |  |  | 
 | static const CRTCSTAT crtcdefault = { |  | 
 | 0xaa,                                           // PAL_B; |  | 
 | 0xcc,                                           // PAL_R; |  | 
 | 0xf0,                                           // PAL_G; |  | 
 | 0x00,                                           // PLY |  | 
 | {0, 1, 2, 3, 4, 5, 6, 7},       // TEXT_PAL[8] |  | 
 | 0,                                                      // SCRN_BITS |  | 
 | 0,                                                      // CRTC_NUM |  | 
 |  |  | 
 | 0,                                                      // DISP_PAGE |  | 
 | 8,                                                      // FNT_XL |  | 
 | 8,                                                      // FNT_YL |  | 
 | 40,                                                     // TXT_XL |  | 
 | 25,                                                     // TXT_YL |  | 
 | 28,                                                     // TXT_YS |  | 
 | 320,                                            // GRP_XL |  | 
 | 200,                                            // GRP_YL |  | 
 | 0,                                                      // CPU_BANK |  | 
 | 0,                                                      // CRT_BANK |  | 
 |  |  | 
 | 200,                                            // CRT_YL |  | 
 | 232,                                            // CRT_VS |  | 
 | 266,                                            // CRT_VL |  | 
 |  |  | 
 | 31,                                                     // TXT_VL |  | 
 | 10,                                                     // TXT_VLA |  | 
 |  |  | 
 | 0,                                                      // TXT_TOP |  | 
 | 8,                                                      // fnty |  | 
 |  |  | 
 | 0,                                                      // lastpal |  | 
 |  |  | 
 | 0,                                                      // BLACKPAL |  | 
 | 0,                                                      // EXTPALMODE |  | 
 | 0,                                                      // EXTGRPHPAL |  | 
 | 0,                                                      // ZPRY |  | 
 | }; |  | 
 |  |  | 
 | BYTE    dispmode = SCRN64_INVALID; |  | 
 | BYTE    pal_bank = PAL_NORMAL; |  | 
 | BYTE    pal_disp = PAL_NORMAL; |  | 
 |  |  | 
| void vrambank_patch(void) { | void crtc_bankupdate(void) { | 
 |  |  | 
 | UINT    updatemask; | UINT    updatemask; | 
 |  | UINT8   dispmode; | 
 |  | UINT8   pal_bank; | 
 |  | UINT8   pal_disp; | 
 |  |  | 
 | 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; | dispmode = (crtc.s.SCRN_BITS & SCRN_DISPVRAM)?SCRN_BANK1:SCRN_BANK0; | 
| Line 83  void vrambank_patch(void) { | Line 49  void vrambank_patch(void) { | 
 |  |  | 
 | 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.reg[CRTCREG_HDISP] == 80)) { | 
 | pal_bank = pal_disp = PAL_HIGHRESO; | pal_bank = pal_disp = PAL_HIGHRESO; | 
 | } | } | 
 | if (crtc.s.SCRN_BITS & SCRN_TEXTYx2) { | if (crtc.s.SCRN_BITS & SCRN_TEXTYx2) { | 
| Line 94  void vrambank_patch(void) { | Line 61  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.reg[CRTCREG_HDISP] == 40) { | 
 | 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 75  void vrambank_patch(void) { | 
 | } | } | 
 | } | } | 
 | else { | else { | 
| if (crtc.s.TXT_XL == 40) {                                      // width 40,25,0,1 | if (crtc.s.reg[CRTCREG_HDISP] == 40) {          // 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 106  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.reg[CRTCREG_HDISP] == 40) { | 
 | 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 119  void vrambank_patch(void) { | 
 | } | } | 
 | } | } | 
 | else { | else { | 
| if (crtc.s.TXT_XL == 40) {                                      // width 40,12,0,1 | if (crtc.s.reg[CRTCREG_HDISP] == 40) {          // 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 149  void vrambank_patch(void) { | 
 | } | } | 
 | } | } | 
 | crtc.e.updatemask = updatemask; | crtc.e.updatemask = updatemask; | 
 |  | crtc.e.dispmode = dispmode; | 
 |  | crtc.e.pal_bank = pal_bank; | 
 |  | crtc.e.pal_disp = pal_disp; | 
 | } | } | 
 |  |  | 
| void crtc_updt(void) { | void crtc_regupdate(void) { | 
|  |  | 
|  | UINT    fonty; | 
|  | SINT32  fontyclock; | 
|  |  | 
|  | crtc.e.pos = crtc.s.reg[CRTCREG_POSL] | 
|  | + ((crtc.s.reg[CRTCREG_POSH] & 7) << 8); | 
 |  |  | 
 |  | fonty = crtc.s.reg[CRTCREG_CHRCY] & 0x1f; | 
 | if (crtc.s.SCRN_BITS & SCRN_24KHZ) { | if (crtc.s.SCRN_BITS & SCRN_24KHZ) { | 
| crtc.s.fnty = (crtc.s.FNT_YL >> 1) & 0xfffe; | fonty >>= 1; | 
| } |  | 
| 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 { | fonty += 1; | 
| crtc.s.CRT_YL = crtc.s.fnty * 1; | crtc.e.fonty = fonty; | 
| } | crtc.e.yl = (crtc.s.reg[CRTCREG_VDISP] & 0x7f); | 
| 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; | fontyclock = fonty * RASTER_CLOCK; | 
| //      TRACEOUT(("set> %d / %d / %d", crtc.s.CRT_YL, crtc.s.CRT_VS, crtc.s.CRT_VL)); | crtc.e.dispclock = fontyclock * crtc.e.yl; | 
|  | // YsIIIが yl==0で disp信号見る…なんで? | 
|  | if (!crtc.e.dispclock) { | 
|  | crtc.e.dispclock = fontyclock; | 
|  | } | 
|  | crtc.e.vsyncstart = fontyclock * ((crtc.s.reg[CRTCREG_VSYNC] & 0x7f) + 1); | 
|  | crtc.e.vpulseclock = (crtc.s.reg[CRTCREG_PULSE] >> 4) * RASTER_CLOCK; | 
|  | crtc.e.vl = fonty * ((crtc.s.reg[CRTCREG_VSIZE] & 0x7f) + 1) | 
|  | + (crtc.s.reg[CRTCREG_VSIZEA] & 0x1f); | 
 | } | } | 
 |  |  | 
 |  |  | 
| Line 208  void crtc_updt(void) { | Line 187  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_bankupdate(); | 
| else { | makescrn.remakeattr = 1; | 
| crtc.s.TXT_XL = 80; | crtc_regupdate(); | 
| } | scrnallflash = 1; | 
| 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; |  | 
| doubleatrchange = 1; |  | 
| break; |  | 
|  |  | 
| case 0x0d: |  | 
| crtc.s.TXT_TOP &= 0x7ff; |  | 
| crtc.s.TXT_TOP |= value; |  | 
| doubleatrchange = 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 214  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) { | 
| textdrawproc_renewal(); | //              pal_reset();                                    // なんで? | 
| reflesh_palette(); |  | 
 | scrnallflash = 1; | scrnallflash = 1; | 
| palandply = 1; | makescrn.palandply = 1; | 
| crtc_updt(); | crtc_regupdate(); | 
 | } | } | 
| 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 298  REG8 IOINPCALL scrn_i(UINT port) { | Line 234  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; | 
| palandply = 1; | makescrn.palandply = 1; | 
 | } | } | 
 | (void)port; | (void)port; | 
 | } | } | 
| Line 308  void IOOUTCALL ply_o(UINT port, REG8 val | Line 244  void IOOUTCALL ply_o(UINT port, REG8 val | 
 | REG8 IOINPCALL ply_i(UINT port) { | REG8 IOINPCALL ply_i(UINT port) { | 
 |  |  | 
 | (void)port; | (void)port; | 
| return(crtc.s.PLY); | return(crtc.s.rgbp[CRTC_PLY]); | 
 | } | } | 
 |  |  | 
 |  |  | 
| Line 316  REG8 IOINPCALL ply_i(UINT port) { | Line 252  REG8 IOINPCALL ply_i(UINT port) { | 
 |  |  | 
 | void IOOUTCALL palette_o(UINT port, REG8 value) { | void IOOUTCALL palette_o(UINT port, REG8 value) { | 
 |  |  | 
 |  | REG8    sft; | 
 |  | UINT    num; | 
 | UINT    pal; | UINT    pal; | 
 | BYTE    c; |  | 
 |  |  | 
 | crtc.s.lastpal = (value & 0xf0); | crtc.s.lastpal = (value & 0xf0); | 
 | if (crtc.s.EXTPALMODE & 0x80) { | if (crtc.s.EXTPALMODE & 0x80) { | 
 | 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 { | else { | 
| switch(port & 0xff00) { | num = (port >> 8) & 3; | 
| case 0x1000: | if (crtc.s.rgbp[num] != value) { | 
| if (crtc.s.PAL_B != value) { | crtc.s.rgbp[num] = value; | 
| crtc.s.PAL_B = value; | makescrn.palandply = 1; | 
| palandply = 1; |  | 
| } |  | 
| break; |  | 
|  |  | 
| case 0x1100: |  | 
| if (crtc.s.PAL_R != value) { |  | 
| crtc.s.PAL_R = value; |  | 
| palandply = 1; |  | 
| } |  | 
| break; |  | 
|  |  | 
| case 0x1200: |  | 
| if (crtc.s.PAL_G != value) { |  | 
| crtc.s.PAL_G = value; |  | 
| palandply = 1; |  | 
| } |  | 
| break; |  | 
 | } | } | 
 | } | } | 
 | } | } | 
 |  |  | 
 | REG8 IOINPCALL palette_i(UINT port) { | REG8 IOINPCALL palette_i(UINT port) { | 
 |  |  | 
| UINT    c; | UINT    num; | 
|  | UINT    pal; | 
|  | REG8    sft; | 
 |  |  | 
 | if ((crtc.s.EXTPALMODE & 0x80) && ((crtc.s.EXTGRPHPAL & 0x88) == 0x88)) { | if ((crtc.s.EXTPALMODE & 0x80) && ((crtc.s.EXTGRPHPAL & 0x88) == 0x88)) { | 
| if (pal_bank & PAL_4096) {                                      // use 4096palettes | if (crtc.e.pal_bank & PAL_4096) {                               // use 4096palettes | 
| switch(pal_bank & (PAL_4096FULL | PAL_4096BANK)) { | num = ((port & 0xff) << 4) + (crtc.s.lastpal >> 4); | 
| case 0: | if (!(crtc.e.pal_bank & PAL_4096FULL)) { | 
| c = ((port & 0xcc) << 4) | ((crtc.s.lastpal & 0xc0) >> 4); | num &= 0xccc; | 
| break; | if (crtc.e.pal_bank & PAL_4096BANK) { | 
|  | num >>= 2; | 
| 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: |  | 
| return(crtc.s.lastpal | ((crtc_PAL4096[c] & 0xf0) >> 4)); |  | 
|  |  | 
| case 0x1200: |  | 
| return(crtc.s.lastpal | ((crtc_PAL4096[c] & 0xf00) >> 8)); |  | 
 | } | } | 
 |  | 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); |  | 
 | } | } | 
 |  |  | 
 |  |  | 
| Line 475  REG8 IOINPCALL palette_i(UINT port) { | Line 345  REG8 IOINPCALL palette_i(UINT port) { | 
 | 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 488  void IOOUTCALL extgrphpal_o(UINT port, R | Line 360  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 495  REG8 IOINPCALL extgrphpal_i(UINT port) { | Line 368  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 509  void IOOUTCALL exttextpal_o(UINT port, R | Line 383  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 517  REG8 IOINPCALL exttextpal_i(UINT port) { | Line 391  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 525  REG8 IOINPCALL exttextdisp_i(UINT port) | Line 400  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); | 
 | } | } | 
 |  |  | 
 | void IOOUTCALL blackctrl_o(UINT port, REG8 value) { | void IOOUTCALL blackctrl_o(UINT port, REG8 value) { | 
 |  |  | 
 | crtc.s.BLACKPAL = value; | crtc.s.BLACKPAL = value; | 
| palandply = 1; | makescrn.palandply = 1; | 
|  | (void)port; | 
 | } | } | 
 |  |  | 
 | REG8 IOINPCALL blackctrl_i(UINT port) { | REG8 IOINPCALL blackctrl_i(UINT port) { | 
 |  |  | 
 |  | (void)port; | 
 | return(crtc.s.BLACKPAL); | return(crtc.s.BLACKPAL); | 
 | } | } | 
 |  |  | 
 |  |  | 
 | // ---- | // ---- | 
 |  |  | 
| void crtc_initialize(void) { | static void resetpal(void) { | 
|  |  | 
 |  |  | 
 |  | CopyMemory(crtc.p.text, defpaltext, sizeof(defpaltext)); | 
 |  | CopyMemory(crtc.p.grph[0], defpalgrph, sizeof(defpalgrph)); | 
 |  | CopyMemory(crtc.p.grph[1], defpalgrph, sizeof(defpalgrph)); | 
 | } | } | 
 |  |  | 
| void crtc_reset(void) { | void crtc_initialize(void) { | 
 |  |  | 
 | static  BYTE    initcrtc = 0; |  | 
 | UINT    p; | UINT    p; | 
 |  |  | 
| crtc.s = crtcdefault; | resetpal(); | 
|  | for (p=0; p<4096; p++) { | 
| palandply = 1; | crtc.p.grph4096[p] = p; | 
| dispmode = SCRN64_INVALID; |  | 
| pal_bank = pal_disp = PAL_NORMAL; |  | 
| if (!initcrtc) { |  | 
| initcrtc++; |  | 
| memcpy(crtc_TEXTPAL, def_TEXTPAL, 8); |  | 
| memcpy(crtc_GRPHPAL[0], def_GRPHPAL, 64*2); |  | 
| memcpy(crtc_GRPHPAL[1], def_GRPHPAL, 64*2); |  | 
| for (p=0; p<4096; p++) { |  | 
| crtc_PAL4096[p] = p; |  | 
| } |  | 
 | } | } | 
| else if (pccore.ROM_TYPE < 3) { | } | 
| memcpy(crtc_TEXTPAL, def_TEXTPAL, 8); |  | 
| memcpy(crtc_GRPHPAL[0], def_GRPHPAL, 64*2); | void crtc_reset(void) { | 
| memcpy(crtc_GRPHPAL[1], def_GRPHPAL, 64*2); |  | 
|  | ZeroMemory(&crtc, sizeof(crtc)); | 
|  | CopyMemory(crtc.s.rgbp, defrgbp, 4); | 
|  | CopyMemory(crtc.s.reg, defreg, 18); | 
|  | if (pccore.ROM_TYPE < 3) { | 
|  | resetpal(); | 
 | } | } | 
 | 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 = 16; | crtc.s.reg[CRTCREG_CHRCY] = 15; | 
 | } | } | 
 |  |  | 
| textdrawproc_renewal(); | pal_reset(); | 
| reflesh_palette(); | crtc_bankupdate(); | 
| crtc_updt(); | crtc_regupdate(); | 
|  | makescrn.palandply = 1; | 
|  | scrnallflash = 1; | 
|  | } | 
|  |  | 
|  | void crtc_forcesetwidth(REG8 width) { | 
 |  |  | 
| vrambank_patch(); | crtc.s.reg[CRTCREG_HDISP] = (UINT8)width; | 
| palandply = 1; | crtc_bankupdate(); | 
 | scrnallflash = 1; | scrnallflash = 1; | 
 | } | } | 
 |  |  |