| version 1.5, 2003/11/12 20:02:54 | version 1.13, 2003/12/26 03:41:05 | 
| Line 3 | Line 3 | 
 | // | // | 
 |  |  | 
 | #include        "compiler.h" | #include        "compiler.h" | 
| #include        "i286.h" | #include        "cpucore.h" | 
 | #include        "pccore.h" | #include        "pccore.h" | 
 | #include        "iocore.h" | #include        "iocore.h" | 
 | #include        "sound.h" | #include        "sound.h" | 
 | #include        "beep.h" | #include        "beep.h" | 
 |  |  | 
 |  |  | 
| // #define      uPD71054                                                                // NP2はuPD8253Cベース | // #define      uPD71054                                        // NP2はuPD8253Cベース | 
|  | #define BEEPCOUNTEREX                                   // BEEPアイドル時のカウンタをα倍に | 
 |  |  | 
 |  |  | 
 | // --- Interval timer | // --- Interval timer | 
| Line 45  static void setsystimerevent(BOOL absolu | Line 46  static void setsystimerevent(BOOL absolu | 
 | void systimer(NEVENTITEM item) { | void systimer(NEVENTITEM item) { | 
 |  |  | 
 | if (item->flag & NEVENT_SETEVENT) { | if (item->flag & NEVENT_SETEVENT) { | 
 |  | if (pit.intr[0]) { | 
 |  | pit.intr[0] = 0; | 
 |  | pic_setirq(0); | 
 |  | } | 
 | if ((pit.mode[0] & 0x0c) == 0x04) { | if ((pit.mode[0] & 0x0c) == 0x04) { | 
 | // レートジェネレータ | // レートジェネレータ | 
 |  | pit.intr[0] = 1; | 
 | setsystimerevent(NEVENT_RELATIVE); | setsystimerevent(NEVENT_RELATIVE); | 
 | } | } | 
 | else { | else { | 
| setsystimerevent_noint(NEVENT_RELATIVE); | nevent_set(NEVENT_ITIMER, pc.multiple << 16, | 
|  | systimer, NEVENT_RELATIVE); | 
 | } | } | 
 | } | } | 
 | pic_setirq(0); |  | 
 | } | } | 
 |  |  | 
 |  |  | 
 | // --- Beep | // --- Beep | 
 |  |  | 
 |  | #if defined(BEEPCOUNTEREX) | 
 |  | static void setbeepeventex(BOOL absolute) { | 
 |  |  | 
 |  | UINT32  cnt; | 
 |  |  | 
 |  | cnt = pit.value[1]; | 
 |  | if (cnt > 2) { | 
 |  | cnt *= pc.multiple; | 
 |  | } | 
 |  | else { | 
 |  | cnt = pc.multiple << 16; | 
 |  | } | 
 |  | while(cnt < 0x100000) { | 
 |  | cnt <<= 1; | 
 |  | } | 
 |  | nevent_set(NEVENT_BEEP, (SINT32)cnt, beeponeshot, absolute); | 
 |  | } | 
 |  | #endif | 
 |  |  | 
 | static void setbeepevent(BOOL absolute) { | static void setbeepevent(BOOL absolute) { | 
 |  |  | 
 | SINT32  cnt; | SINT32  cnt; | 
| Line 79  void beeponeshot(NEVENTITEM item) { | Line 104  void beeponeshot(NEVENTITEM item) { | 
 | if (!(pit.mode[1] & 0x0c)) {                                                            // ver0.30 | if (!(pit.mode[1] & 0x0c)) {                                                            // ver0.30 | 
 | beep_lheventset(0); | beep_lheventset(0); | 
 | } | } | 
| #ifdef uPD71054 | #if defined(uPD71054) | 
 | if ((pit.mode[1] & 0x06) == 0x02) | if ((pit.mode[1] & 0x06) == 0x02) | 
 | #else | #else | 
 | if (pit.mode[1] & 0x02) | if (pit.mode[1] & 0x02) | 
 | #endif | #endif | 
 | { | { | 
 |  | #if defined(BEEPCOUNTEREX) | 
 |  | setbeepeventex(NEVENT_RELATIVE); | 
 |  | #else | 
 | setbeepevent(NEVENT_RELATIVE); | setbeepevent(NEVENT_RELATIVE); | 
 |  | #endif | 
 | } | } | 
 | } | } | 
 | } | } | 
| Line 117  void rs232ctimer(NEVENTITEM item) { | Line 146  void rs232ctimer(NEVENTITEM item) { | 
 | rs232c_callback(); | rs232c_callback(); | 
 | } | } | 
 |  |  | 
 |  |  | 
 | // --------------------------------------------------------------------------- | // --------------------------------------------------------------------------- | 
 |  |  | 
| static UINT16 itimer_latch(int ch) { | static UINT pit_latch(int ch) { | 
 |  |  | 
 | SINT32  clock; | SINT32  clock; | 
 |  |  | 
 | if (ch == 1) { | if (ch == 1) { | 
 | switch(pit.mode[1] & 0x06) { | switch(pit.mode[1] & 0x06) { | 
 |  | #ifdef uPD71054                         // ? | 
 | case 0x00: | case 0x00: | 
 |  | #endif | 
 | case 0x04: | case 0x04: | 
 | return(pit.value[1]); | return(pit.value[1]); | 
 | #ifdef uPD71054 | #ifdef uPD71054 | 
 | case 0x06: | case 0x06: | 
| return(pit.value[1] & 0xfffe); | return(pit.value[1] & (~1)); | 
 | #endif | #endif | 
 | } | } | 
 |  | #if defined(BEEPCOUNTEREX) | 
 |  | clock = nevent_getremain(NEVENT_ITIMER + ch); | 
 |  | if (clock < 0) { | 
 |  | return(0); | 
 |  | } | 
 |  | clock /= pc.multiple; | 
 |  | if (pit.value[1] > 2) { | 
 |  | clock %= pit.value[1]; | 
 |  | } | 
 |  | else { | 
 |  | clock = LOW16(clock); | 
 |  | } | 
 |  | return(clock); | 
 |  | #endif | 
 | } | } | 
 | clock = nevent_getremain(NEVENT_ITIMER + ch); | clock = nevent_getremain(NEVENT_ITIMER + ch); | 
 | if (clock >= 0) { | if (clock >= 0) { | 
| return((UINT16)(clock / pc.multiple)); | return(clock / pc.multiple); | 
 | } | } | 
 | return(0); | return(0); | 
 | } | } | 
 |  |  | 
|  | void pit_setflag(int ch, REG8 value) { | 
| void itimer_setflag(int ch, BYTE value) { |  | 
 |  |  | 
 | pit.flag[ch] = 0; | pit.flag[ch] = 0; | 
 | if (value & 0x30) { | if (value & 0x30) { | 
| pit.mode[ch] = value; | pit.mode[ch] = (UINT8)value; | 
 | } | } | 
 | else {                                                                                                          // latch | else {                                                                                                          // latch | 
 | pit.mode[ch] &= ~0x30; | pit.mode[ch] &= ~0x30; | 
| pit.latch[ch] = itimer_latch(ch); | pit.latch[ch] = (UINT16)pit_latch(ch); | 
 | } | } | 
 | } | } | 
 |  |  | 
| BOOL itimer_setcount(int ch, BYTE value) { | BOOL pit_setcount(int ch, REG8 value) { | 
 |  |  | 
 | switch(pit.mode[ch] & 0x30) { | switch(pit.mode[ch] & 0x30) { | 
 | case 0x10:              // access low | case 0x10:              // access low | 
| Line 180  BOOL itimer_setcount(int ch, BYTE value) | Line 225  BOOL itimer_setcount(int ch, BYTE value) | 
 | return(FALSE); | return(FALSE); | 
 | } | } | 
 |  |  | 
| BYTE itimer_getcount(int ch) { | REG8 pit_getcount(int ch) { | 
 |  |  | 
| BYTE    ret; | REG8    ret; | 
| UINT16  w; | REG16   w; | 
 |  |  | 
 | if (!(pit.mode[ch] & 0x30)) { | if (!(pit.mode[ch] & 0x30)) { | 
 | w = pit.latch[ch]; | w = pit.latch[ch]; | 
 | } | } | 
 | else { | else { | 
| w = itimer_latch(ch); | w = pit_latch(ch); | 
 | } | } | 
 | switch(pit.mode[ch] & 0x30) { | switch(pit.mode[ch] & 0x30) { | 
 | case 0x10:                                              // access low | case 0x10:                                              // access low | 
| return((BYTE)w); | return((UINT8)w); | 
 |  |  | 
 | case 0x20:                                              // access high | case 0x20:                                              // access high | 
| return((BYTE)(w >> 8)); | return((UINT8)(w >> 8)); | 
 | } | } | 
| // access word | if (!(pit.flag[ch] & 1)) {                      // access word | 
| if (!(pit.flag[ch] & 1)) { | ret = (UINT8)w; | 
| ret = (BYTE)w; |  | 
 | } | } | 
 | else { | else { | 
| ret = (BYTE)(w >> 8); | ret = (UINT8)(w >> 8); | 
 | } | } | 
 | pit.flag[ch] ^= 1; | pit.flag[ch] ^= 1; | 
 | return(ret); | return(ret); | 
| Line 213  BYTE itimer_getcount(int ch) { | Line 257  BYTE itimer_getcount(int ch) { | 
 | // ---- I/O | // ---- I/O | 
 |  |  | 
 | // system timer | // system timer | 
| static void IOOUTCALL pit_o71(UINT port, BYTE dat) { | static void IOOUTCALL pit_o71(UINT port, REG8 dat) { | 
 |  |  | 
| //      TRACEOUT(("pic71: %d", dat)); | //      TRACEOUT(("pic o71: %x", dat)); | 
| if (itimer_setcount(0, dat)) { | if (pit_setcount(0, dat)) { | 
 | return; | return; | 
 | } | } | 
 | pic.pi[0].irr &= (~1); | pic.pi[0].irr &= (~1); | 
 |  | pit.intr[0] = 1; | 
 | setsystimerevent(NEVENT_ABSOLUTE); | setsystimerevent(NEVENT_ABSOLUTE); | 
 | (void)port; | (void)port; | 
 | } | } | 
 |  |  | 
 | // beep | // beep | 
| static void IOOUTCALL pit_o73(UINT port, BYTE dat) { | static void IOOUTCALL pit_o73(UINT port, REG8 dat) { | 
 |  |  | 
| if (itimer_setcount(1, dat)) { | if (pit_setcount(1, dat)) { | 
 | return; | return; | 
 | } | } | 
 | setbeepevent(NEVENT_ABSOLUTE); | setbeepevent(NEVENT_ABSOLUTE); | 
| Line 241  static void IOOUTCALL pit_o73(UINT port, | Line 286  static void IOOUTCALL pit_o73(UINT port, | 
 | } | } | 
 |  |  | 
 | // rs-232c | // rs-232c | 
| static void IOOUTCALL pit_o75(UINT port, BYTE dat) { | static void IOOUTCALL pit_o75(UINT port, REG8 dat) { | 
 |  |  | 
| if (itimer_setcount(2, dat)) { | if (pit_setcount(2, dat)) { | 
 | return; | return; | 
 | } | } | 
 | rs232c_open(); | rs232c_open(); | 
| Line 252  static void IOOUTCALL pit_o75(UINT port, | Line 297  static void IOOUTCALL pit_o75(UINT port, | 
 | } | } | 
 |  |  | 
 | // ctrl | // ctrl | 
| static void IOOUTCALL pit_o77(UINT port, BYTE dat) { | static void IOOUTCALL pit_o77(UINT port, REG8 dat) { | 
 |  |  | 
 | int             ch; | int             ch; | 
 |  |  | 
| //      TRACEOUT(("pic77: %x", dat)); | //      TRACEOUT(("pic o77: %x", dat)); | 
 | ch = (dat >> 6) & 3; | ch = (dat >> 6) & 3; | 
 | if (ch != 3) { | if (ch != 3) { | 
| itimer_setflag(ch, dat); | pit_setflag(ch, dat); | 
 | if (ch == 0) {                  // 書込みで itimerのirrがリセットされる… | if (ch == 0) {                  // 書込みで itimerのirrがリセットされる… | 
 | pic.pi[0].irr &= (~1); | pic.pi[0].irr &= (~1); | 
 | if (dat & 0x30) {       // 一応ラッチ時は割り込みをセットしない | if (dat & 0x30) {       // 一応ラッチ時は割り込みをセットしない | 
| setsystimerevent(NEVENT_ABSOLUTE); | pit.intr[0] = 1; | 
|  | //                              setsystimerevent(NEVENT_ABSOLUTE); | 
 | } | } | 
 | } | } | 
 | if (ch == 1) { | if (ch == 1) { | 
| Line 273  static void IOOUTCALL pit_o77(UINT port, | Line 319  static void IOOUTCALL pit_o77(UINT port, | 
 | (void)port; | (void)port; | 
 | } | } | 
 |  |  | 
| static BYTE IOINPCALL pit_i71(UINT port) { | static REG8 IOINPCALL pit_i71(UINT port) { | 
 |  |  | 
| return(itimer_getcount((port >> 1) & 3)); | return(pit_getcount((port >> 1) & 3)); | 
 | } | } | 
 |  |  | 
 |  |  | 
| Line 296  void itimer_reset(void) { | Line 342  void itimer_reset(void) { | 
 | else { | else { | 
 | pit.value[1] = 1229;                    // 5MHz | pit.value[1] = 1229;                    // 5MHz | 
 | } | } | 
 |  | pit.intr[0] = 1; | 
 | pit.mode[0] = 0x30; | pit.mode[0] = 0x30; | 
 | pit.mode[1] = 0x56; | pit.mode[1] = 0x56; | 
 | pit.mode[2] = 0xb6; | pit.mode[2] = 0xb6; |