|
|
| version 1.18, 2004/08/09 02:47:01 | version 1.36, 2005/02/04 06:42:07 |
|---|---|
| Line 1 | Line 1 |
| // #define SINGLESTEPONLY | |
| // #define IPTRACE (1 << 14) | |
| // #define NEVENT_COUNTER | |
| // #define PCCOUNTER | |
| // #define IOCOUNTER | |
| // #define CTCCOUNTER | |
| #include "compiler.h" | #include "compiler.h" |
| #if defined(TRACE) && IPTRACE | |
| #include "dosio.h" | #include "dosio.h" |
| #endif | |
| #if defined(SUPPORT_TURBOZ) | |
| #include "scrnmng.h" | #include "scrnmng.h" |
| #endif | |
| #if !defined(DISABLE_SOUND) | |
| #include "soundmng.h" | #include "soundmng.h" |
| #endif | |
| #include "sysmng.h" | #include "sysmng.h" |
| #include "timemng.h" | #include "timemng.h" |
| #include "xmilver.h" | #include "xmilver.h" |
| #include "z80core.h" | #include "z80core.h" |
| #include "pccore.h" | #include "pccore.h" |
| #include "iocore.h" | #include "iocore.h" |
| #include "nevent.h" | |
| #include "ievent.h" | |
| #include "timing.h" | #include "timing.h" |
| #include "calendar.h" | #include "calendar.h" |
| #include "keystat.h" | #include "keystat.h" |
| Line 17 | Line 33 |
| #include "sndctrl.h" | #include "sndctrl.h" |
| #include "font.h" | #include "font.h" |
| #include "fddfile.h" | #include "fddfile.h" |
| #include "defrom.res" | |
| const OEMCHAR xmilversion[] = OEMTEXT(XMILVER_CORE); | const OEMCHAR xmilversion[] = OEMTEXT(XMILVER_CORE); |
| XMILCFG xmilcfg = { 2, 0, 1, | XMILCFG xmilcfg = { 2, 1, 0x03, |
| 1, 0, 0, 0, | 1, 0, 0, 0, |
| 22050, 500, 0, 0, 80, | #if !defined(DISABLE_SOUND) |
| 22050, 500, | |
| #if defined(SUPPORT_TURBOZ) || defined(SUPPORT_OPM) | |
| 0, 64, | |
| #endif | |
| 64, 0, 80, | |
| #endif | |
| 0, 0, 0, 0}; | 0, 0, 0, 0}; |
| PCCORE pccore = {250, 0, 1, 0}; | PCCORE pccore; |
| CORESTAT corestat; | CORESTAT corestat; |
| BYTE mMAIN[0x10000]; | |
| BYTE mBIOS[0x8000]; | |
| #if defined(SUPPORT_BANKMEM) | |
| UINT8 mBANK[16][0x8000]; | |
| #endif | |
| UINT v_cnt; | |
| UINT s_cnt; | |
| BYTE *RAM0r; | |
| BYTE *RAM0w; | |
| DWORD h_cntbase; | |
| // ---- | |
| void pccore_initialize(void) { | |
| /*********************************************************************** | Z80_INITIALIZE(); |
| IPL-ROM LOAD | fddfile_initialize(); |
| ***********************************************************************/ | sndctrl_initialize(); |
| makescrn_initialize(); | |
| static void ipl_load(void) { | (void)font_load(NULL, TRUE); |
| FILEH hdl; | crtc_initialize(); |
| pcg_initialize(); | |
| ppi_initialize(); | |
| } | |
| ZeroMemory(mBIOS, sizeof(mBIOS)); | void pccore_deinitialize(void) { |
| CopyMemory(mBIOS, DEFROM, sizeof(DEFROM)); | |
| if (pccore.ROM_TYPE >= 2) { | sndctrl_deinitialize(); |
| if ((hdl = file_open_c(OEMTEXT("IPLROM.X1T"))) != FILEH_INVALID) { | |
| file_read(hdl, mBIOS, 0x8000); | fddfile_eject(0); |
| file_close(hdl); | fddfile_eject(1); |
| } | fddfile_eject(2); |
| } | fddfile_eject(3); |
| else if (pccore.ROM_TYPE == 1) { | |
| if ((hdl = file_open_c(OEMTEXT("IPLROM.X1"))) != FILEH_INVALID) { | |
| file_read(hdl, mBIOS, 0x8000); | |
| file_close(hdl); | |
| } | |
| } | |
| } | } |
| #if 0 | |
| void neitem_dummy(UINT id) { | |
| /*********************************************************************** | nevent_repeat(id); |
| 初期化 | } |
| ***********************************************************************/ | #endif |
| static BRESULT reset_x1(BYTE ROM_TYPE, BYTE SOUND_SW, BYTE DIP_SW) { | void pccore_reset(void) { |
| pccore.HSYNC_CLK = 250; | #if !defined(DISABLE_SOUND) |
| pccore.ROM_TYPE = ROM_TYPE; | soundmng_stop(); |
| pccore.SOUND_SW = SOUND_SW; | if (corestat.soundrenewal) { |
| pccore.DIP_SW = DIP_SW; | corestat.soundrenewal = 0; |
| sndctrl_deinitialize(); | |
| sndctrl_initialize(); | |
| } | |
| #endif | |
| #if !defined(FIX_Z80A) | |
| pccore.baseclock = 2000000; | |
| pccore.multiple = 2; | |
| pccore.realclock = pccore.baseclock * pccore.multiple; | |
| #endif | |
| pccore.ROM_TYPE = xmilcfg.ROM_TYPE; | |
| #if defined(SUPPORT_TURBOZ) || defined(SUPPORT_OPM) | |
| if (xmilcfg.ROM_TYPE >= 3) { | |
| pccore.SOUND_SW = 1; // 無条件で搭載 | |
| } | |
| else { | |
| pccore.SOUND_SW = xmilcfg.SOUND_SW; | |
| } | |
| #endif | |
| pccore.DIP_SW = xmilcfg.DIP_SW; | |
| // スクリーンモードの変更... | // スクリーンモードの変更... |
| #if defined(SUPPORT_TURBOZ) | |
| if (pccore.ROM_TYPE >= 3) { | if (pccore.ROM_TYPE >= 3) { |
| if (scrnmng_setcolormode(TRUE) != SUCCESS) { | if (scrnmng_setcolormode(TRUE) != SUCCESS) { |
| pccore.ROM_TYPE = 2; | pccore.ROM_TYPE = 2; |
| Line 89 static BRESULT reset_x1(BYTE ROM_TYPE, B | Line 123 static BRESULT reset_x1(BYTE ROM_TYPE, B |
| else { | else { |
| scrnmng_setcolormode(FALSE); | scrnmng_setcolormode(FALSE); |
| } | } |
| #endif | |
| ipl_load(); | |
| Z80_RESET(); | |
| iocore_reset(); | |
| RAM0r = mBIOS; | |
| RAM0w = mMAIN; | |
| h_cntbase = 0; | |
| sysmng_cpureset(); | sysmng_cpureset(); |
| calendar_initialize(); | sound_changeclock(); |
| sound_reset(); | |
| cgrom_reset(); | Z80_RESET(); |
| cmt_reset(); | nevent_allreset(); |
| crtc_reset(); | ievent_reset(); |
| ctc_reset(); | calendar_reset(); |
| dmac_reset(); | iocore_reset(); |
| fdc_reset(); | // nevent_set(15, 4000000 / (60 * 50), neitem_dummy, NEVENT_RELATIVE); |
| memio_reset(); | |
| pcg_reset(); | |
| ppi_reset(); | |
| sio_reset(); | |
| sndboard_reset(); | |
| subcpu_reset(); | |
| vramio_reset(); | |
| pal_reset(); | pal_reset(); |
| makescrn_reset(); | makescrn_reset(); |
| timing_reset(); | timing_reset(); |
| return(SUCCESS); | |
| } | |
| #if !defined(DISABLE_SOUND) | |
| /*********************************************************************** | |
| 実行/終了 | |
| ***********************************************************************/ | |
| static BYTE keyintcnt = 0; | |
| void pccore_initialize(void) { | |
| sndctrl_initialize(); | |
| makescrn_initialize(); | |
| font_load(NULL, TRUE); | |
| crtc_initialize(); | |
| pcg_initialize(); | |
| ppi_initialize(); | |
| } | |
| void pccore_reset(void) { | |
| soundmng_stop(); | |
| if (corestat.soundrenewal) { | |
| corestat.soundrenewal = 0; | |
| sndctrl_deinitialize(); | |
| sndctrl_initialize(); | |
| } | |
| sound_reset(); | |
| reset_x1(xmilcfg.ROM_TYPE, xmilcfg.SOUND_SW, xmilcfg.DIP_SW); | |
| soundmng_play(); | soundmng_play(); |
| } | #endif |
| void pccore_deinitialize(void) { | |
| sndctrl_deinitialize(); | |
| // keyboard_term(); | |
| fdd_eject(0); | |
| fdd_eject(1); | |
| fdd_eject(2); | |
| fdd_eject(3); | |
| } | } |
| // ---- | // ---- |
| // #define IPTRACE (1 << 14) | |
| #if defined(TRACE) && IPTRACE | #if defined(TRACE) && IPTRACE |
| static UINT trpos = 0; | static UINT trpos = 0; |
| static UINT16 treip[IPTRACE]; | static UINT16 treip[IPTRACE]; |
| Line 202 void iptrace_out(void) { | Line 178 void iptrace_out(void) { |
| } | } |
| #endif | #endif |
| #if !defined(MAINFRAMES_OLD) | |
| void neitem_mainframes(UINT id) { | |
| SINT32 clock; | |
| REG8 ppib; | |
| SINT32 next; | |
| clock = CPU_CLOCKCOUNT - iocore.e.framestartclock; | |
| ppib = iocore.s.ppib & (~0x84); | |
| do { | |
| next = iocore.e.dispclock; | |
| if (clock < next) { | |
| ppib |= 0x80; | |
| break; | |
| } | |
| next = iocore.e.dispclock; | |
| if (clock < next) { | |
| if (xmilcfg.DISPSYNC & 1) { | |
| scrnupdate(); | |
| } | |
| break; | |
| } | |
| next = iocore.e.vsyncend; | |
| if (clock < next) { | |
| ppib |= 0x04; | |
| break; | |
| } | |
| next = corestat.framebaseclock; | |
| if (clock >= next) { | |
| corestat.vsync = 2; | |
| return; | |
| } | |
| } while(0); | |
| iocore.s.ppib = ppib; | |
| nevent_set(NEVENT_FRAMES, | |
| next - clock, neitem_mainframes, NEVENT_ABSOLUTE); | |
| } | |
| #else | |
| void neitem_disp(UINT id) { | |
| corestat.vsync = 1; | |
| if (xmilcfg.DISPSYNC & 1) { | |
| scrnupdate(); | |
| } | |
| nevent_set(id, corestat.syncclock, neitem_vsync, NEVENT_RELATIVE); | |
| } | |
| void neitem_vsync(UINT id) { | |
| corestat.vsync = 2; | |
| (void)id; | |
| } | |
| #endif | |
| // ---- | |
| #if defined(TRACE) && defined(IOCOUNTER) | |
| static UINT iocounter = 0; | |
| UINT icounter[0x2008]; | |
| UINT ocounter[0x2008]; | |
| #endif | |
| #if defined(TRACE) && defined(CTCCOUNTER) | |
| UINT ctccnt; | |
| #endif | |
| #if defined(TRACE) && defined(PCCOUNTER) | |
| UINT pccnt; | |
| UINT pccnt2; | |
| UINT pccnt3; | |
| UINT lastpc; | |
| #endif | |
| void pccore_exec(BRESULT draw) { | void pccore_exec(BRESULT draw) { |
| REG8 inttiming; | SINT32 frameclock; |
| #if defined(MAINFRAMES_OLD) | |
| SINT32 dispclock; | |
| #endif | |
| #if defined(TRACE) && defined(NEVENT_COUNTER) | |
| UINT ncounter = 0; | |
| #endif | |
| corestat.drawframe = draw; | corestat.drawframe = draw; |
| pal_eventclear(); | |
| #if !defined(DISABLE_SOUND) | |
| soundmng_sync(); | soundmng_sync(); |
| #endif | |
| frameclock = crtc.e.frameclock; | |
| if (corestat.framebaseclock != frameclock) { | |
| corestat.framebaseclock = frameclock; | |
| timing_setrate(frameclock); | |
| } | |
| corestat.vsync = 0; | |
| v_cnt = 0; | iocore.e.framestartclock = CPU_CLOCKCOUNT; |
| s_cnt = 0; | |
| inttiming = xmilcfg.CPU8MHz & 1; | |
| while(s_cnt < 266) { | #if !defined(MAINFRAMES_OLD) |
| while(h_cnt < pccore.HSYNC_CLK) { | neitem_mainframes(NEVENT_FRAMES); |
| #else | |
| #if !defined(FIX_Z80A) | |
| frameclock = frameclock * pccore.multiple / 2; | |
| #endif | |
| dispclock = min(frameclock, iocore.e.dispclock); | |
| // corestat.dispclock = dispclock; | |
| corestat.syncclock = frameclock - dispclock; | |
| nevent_set(NEVENT_FRAMES, dispclock, neitem_disp, NEVENT_RELATIVE); | |
| #endif | |
| do { | |
| #if defined(TRACE) && defined(NEVENT_COUNTER) | |
| ncounter++; | |
| #endif | |
| #if !defined(SINGLESTEPONLY) | |
| if (CPU_REMCLOCK > 0) { | |
| Z80_EXECUTE(); | |
| } | |
| #else | |
| while(CPU_REMCLOCK > 0) { | |
| // TRACEOUT(("%.4x", Z80_PC)); | |
| #if defined(TRACE) && IPTRACE | #if defined(TRACE) && IPTRACE |
| treip[trpos & (IPTRACE - 1)] = Z80_PC; | treip[trpos & (IPTRACE - 1)] = Z80_PC; |
| trpos++; | trpos++; |
| #endif | #endif |
| Z80_EXECUTE(); | Z80_STEP(); |
| z80dmap(); | |
| } | } |
| h_cnt -= pccore.HSYNC_CLK; | #endif |
| h_cntbase += pccore.HSYNC_CLK; | nevent_progress(); |
| inttiming ^= 2; | ievent_progress(); |
| if (inttiming != 3) { | } while(corestat.vsync < 2); |
| sound_makesample(pcmbufsize[s_cnt]); | |
| // if (xmilcfg.SOUNDPLY) { | scrnupdate(); |
| // juliet2_exec(); | sound_sync(); |
| // } | fdc_callback(); |
| s_cnt++; | |
| x1_ctc_int(); | #if defined(TRACE) && defined(NEVENT_COUNTER) |
| if (!((++keyintcnt) & 15)) { | TRACEOUT(("loop = %d", ncounter)); |
| x1_sub_int(); | #endif |
| if (xmilcfg.MOUSE_SW) { | #if defined(TRACE) && defined(CTCCOUNTER) |
| sio_int(); | TRACEOUT(("ctc = %d", ctccnt)); |
| ctccnt = 0; | |
| #endif | |
| #if defined(TRACE) && defined(PCCOUNTER) | |
| TRACEOUT(("pccnt = %d %d %d", pccnt, pccnt2, pccnt3)); | |
| pccnt = 0; | |
| pccnt2 = 0; | |
| pccnt3 = 0; | |
| #endif | |
| #if defined(TRACE) && defined(IOCOUNTER) | |
| iocounter++; | |
| if (iocounter >= 60) { | |
| UINT i, j, cnt, pos; | |
| iocounter = 0; | |
| for (i=0; i<10; i++) { | |
| cnt = 0; | |
| pos = 0; | |
| for (j=0; j<0x2004; j++) { | |
| if (cnt < ocounter[j]) { | |
| cnt = ocounter[j]; | |
| pos = j; | |
| } | } |
| } | } |
| ocounter[pos] = 0; | |
| TRACEOUT(("o%2d - %.4x %8dtimes", i, pos, cnt)); | |
| } | } |
| v_cnt++; | for (i=0; i<10; i++) { |
| if (crtc.s.CRT_YL == v_cnt) { | cnt = 0; |
| pcg.r.vsync = 1; | pos = 0; |
| if (xmilcfg.DISPSYNC & 1) { | for (j=0; j<0x2004; j++) { |
| scrnupdate(); | if (cnt < icounter[j]) { |
| cnt = icounter[j]; | |
| pos = j; | |
| } | |
| } | } |
| icounter[pos] = 0; | |
| TRACEOUT(("i%2d - %.4x %8dtimes", i, pos, cnt)); | |
| } | } |
| } | } |
| scrnupdate(); | #endif |
| calendar_inc(); | |
| sound_sync(); | |
| } | } |