| version 1.4, 2004/08/07 12:10:27 | version 1.6, 2004/08/08 15:14:08 | 
| Line 7 | Line 7 | 
 | #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 29  static const CRTCSTAT crtcdefault = { | Line 25  static const CRTCSTAT crtcdefault = { | 
 | 0xcc,                                           // PAL_R; | 0xcc,                                           // PAL_R; | 
 | 0xf0,                                           // PAL_G; | 0xf0,                                           // PAL_G; | 
 | 0x00,                                           // PLY | 0x00,                                           // PLY | 
| {0, 1, 2, 3, 4, 5, 6, 7},       // TEXT_PAL[8] | //                              {0, 1, 2, 3, 4, 5, 6, 7},       // TEXT_PAL[8] | 
 | 0,                                                      // SCRN_BITS | 0,                                                      // SCRN_BITS | 
 | 0,                                                      // CRTC_NUM | 0,                                                      // CRTC_NUM | 
 |  |  | 
| Line 41  static const CRTCSTAT crtcdefault = { | Line 37  static const CRTCSTAT crtcdefault = { | 
 | 28,                                                     // TXT_YS | 28,                                                     // TXT_YS | 
 | 320,                                            // GRP_XL | 320,                                            // GRP_XL | 
 | 200,                                            // GRP_YL | 200,                                            // GRP_YL | 
| 0,                                                      // CPU_BANK | //                              0,                                                      // CPU_BANK | 
| 0,                                                      // CRT_BANK | //                              0,                                                      // CRT_BANK | 
 |  |  | 
 | 200,                                            // CRT_YL | 200,                                            // CRT_YL | 
 | 232,                                            // CRT_VS | 232,                                            // CRT_VS | 
| Line 184  void vrambank_patch(void) { | Line 180  void vrambank_patch(void) { | 
 | crtc.e.updatemask = updatemask; | crtc.e.updatemask = updatemask; | 
 | } | } | 
 |  |  | 
| void crtc_updt(void) { | static void crtc_updt(void) { | 
 |  |  | 
 | if (crtc.s.SCRN_BITS & SCRN_24KHZ) { | if (crtc.s.SCRN_BITS & SCRN_24KHZ) { | 
 | crtc.s.fnty = (crtc.s.FNT_YL >> 1) & 0xfffe; | crtc.s.fnty = (crtc.s.FNT_YL >> 1) & 0xfffe; | 
| Line 281  void IOOUTCALL scrn_o(UINT port, REG8 va | Line 277  void IOOUTCALL scrn_o(UINT port, REG8 va | 
 | crtc_updt(); | crtc_updt(); | 
 | } | } | 
 | vrambank_patch(); | vrambank_patch(); | 
| crtc.s.CPU_BANK = (BYTE)((crtc.s.SCRN_BITS & SCRN_ACCESSVRAM)?1:0); | //      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); | //      crtc.s.CRT_BANK = (BYTE)((crtc.s.SCRN_BITS & SCRN_DISPVRAM)?1:0); | 
 | (void)port; | (void)port; | 
 | } | } | 
 |  |  | 
| Line 315  REG8 IOINPCALL ply_i(UINT port) { | Line 311  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; | 
 | } | } | 
 |  | sft = (port >> (8 - 2)) & (3 << 2); | 
 | if (pal_bank & PAL_4096) {                                      // use 4096palettes | if (pal_bank & PAL_4096) {                                      // use 4096palettes | 
 | switch(pal_bank & (PAL_4096FULL | PAL_4096BANK)) { | switch(pal_bank & (PAL_4096FULL | PAL_4096BANK)) { | 
 | case 0: | case 0: | 
| pal = ((port & 0xcc) << 4) + ((value & 0xc0) >> 4); | num = ((port & 0xcc) << 4) + ((value & 0xc0) >> 4); | 
 | break; | break; | 
 |  |  | 
 | case 1: | case 1: | 
| pal = ((port & 0xcc) << 2) + ((value & 0xc0) >> 6); | num = ((port & 0xcc) << 2) + ((value & 0xc0) >> 6); | 
 | break; | break; | 
 |  |  | 
 | default: | default: | 
| pal = ((port & 0xff) << 4) + (crtc.s.lastpal >> 4); | num = ((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; | 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 ((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[pal_bank][num]; | 
| switch(port & 0xff00) { | pal &= ~((0x0f) << sft); | 
| case 0x1000: | pal |= (value & 0x0f) << sft; | 
| crtc_GRPHPAL[pal_bank][c] &= 0xff0; | crtc.p.grph[pal_bank][num] = pal; | 
| crtc_GRPHPAL[pal_bank][c] |= value; | pal_setgrph(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 { | 
| Line 414  void IOOUTCALL palette_o(UINT port, REG8 | Line 386  void IOOUTCALL palette_o(UINT port, REG8 | 
 |  |  | 
 | 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 (pal_bank & PAL_4096) {                                      // use 4096palettes | 
 | switch(pal_bank & (PAL_4096FULL | PAL_4096BANK)) { | switch(pal_bank & (PAL_4096FULL | PAL_4096BANK)) { | 
 | case 0: | case 0: | 
| c = ((port & 0xcc) << 4) | ((crtc.s.lastpal & 0xc0) >> 4); | num = ((port & 0xcc) << 4) | | 
|  | ((crtc.s.lastpal & 0xc0) >> 4); | 
 | break; | break; | 
 |  |  | 
 | case 1: | case 1: | 
| c = ((port & 0xcc) << 2) | ((crtc.s.lastpal & 0xc0) >> 6); | num = ((port & 0xcc) << 2) | | 
|  | ((crtc.s.lastpal & 0xc0) >> 6); | 
 | break; | break; | 
 |  |  | 
 | default: | default: | 
| c = ((port & 0xff) << 4) | (crtc.s.lastpal >> 4); | num = ((port & 0xff) << 4) | (crtc.s.lastpal >> 4); | 
 | break; | break; | 
 | } | } | 
| switch(port & 0xff00) { | pal = crtc.p.grph4096[num]; | 
| 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)); |  | 
| } |  | 
 | } | } | 
 | 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 ((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[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  void IOOUTCALL extpal_o(UINT port, REG8 | Line 436  void IOOUTCALL extpal_o(UINT port, REG8 | 
 |  |  | 
 | crtc.s.EXTPALMODE = value; | crtc.s.EXTPALMODE = value; | 
 | vrambank_patch(); | vrambank_patch(); | 
 |  | (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 450  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 458  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 473  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  void IOOUTCALL exttextdisp_o(UINT port, | Line 482  void IOOUTCALL exttextdisp_o(UINT port, | 
 |  |  | 
 | crtc.s.ZPRY = value; | crtc.s.ZPRY = value; | 
 | vrambank_patch(); | vrambank_patch(); | 
 |  | (void)port; | 
 | } | } | 
 |  |  | 
 | REG8 IOINPCALL exttextdisp_i(UINT port) { | REG8 IOINPCALL exttextdisp_i(UINT port) { | 
| Line 524  REG8 IOINPCALL exttextdisp_i(UINT port) | Line 490  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); | 
 | } | } | 
 |  |  | 
| Line 531  void IOOUTCALL blackctrl_o(UINT port, RE | Line 498  void IOOUTCALL blackctrl_o(UINT port, RE | 
 |  |  | 
 | crtc.s.BLACKPAL = value; | crtc.s.BLACKPAL = value; | 
 | makescrn.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); | 
 | } | } | 
 |  |  | 
| Line 543  REG8 IOINPCALL blackctrl_i(UINT port) { | Line 512  REG8 IOINPCALL blackctrl_i(UINT port) { | 
 |  |  | 
 | 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)); | 
 | } | } | 
 |  |  | 
 | void crtc_initialize(void) { | void crtc_initialize(void) { | 
| Line 554  void crtc_initialize(void) { | Line 523  void crtc_initialize(void) { | 
 |  |  | 
 | resetpal(); | resetpal(); | 
 | for (p=0; p<4096; p++) { | for (p=0; p<4096; p++) { | 
| crtc_PAL4096[p] = p; | crtc.p.grph4096[p] = p; | 
 | } | } | 
 | } | } | 
 |  |  |