AxibugEmuOnline/References/VirtuaNESex_src_191105/NES/Cpu_old.cpp

2019 lines
40 KiB
C++
Raw Normal View History

2024-08-05 17:58:53 +08:00
/*----------------------------------------------------------------------*/
/* */
/* 6502 CPU Core v0.00 */
/* Norix */
/* written 2000/12/23 */
/* last modify ----/--/-- */
/*----------------------------------------------------------------------*/
/*--------------[ INCLUDE ]-------------------------------*/
#define WIN32_LEAN_AND_MEAN
#include <windows.h>
#include "VirtuaNESres.h"
#include "typedef.h"
#include "macro.h"
#include "DebugOut.h"
#include "App.h"
#include "Config.h"
#include "nes.h"
#include "mmu.h"
#include "cpu.h"
#include "ppu.h"
#include "apu.h"
#include "rom.h"
#include "mapper.h"
WORD PC_N;
/*--------------[ DEFINE ]-------------------------------*/
#define DPCM_SYNCCLOCK FALSE
/*--------------[ EXTERNAL PROGRAM ]-------------------------------*/
/*--------------[ EXTERNAL WORK ]-------------------------------*/
/*--------------[ WORK ]-------------------------------*/
/*--------------[ CONST ]-------------------------------*/
/*--------------[ PROTOTYPE ]-------------------------------*/
/*--------------[ PROGRAM ]-------------------------------*/
// <20>I<EFBFBD>y<EFBFBD>R<EFBFBD>[<5B>h
//#define OP6502(A) RD6502((A))
//#define OP6502W(A) RD6502W((A))
// <20>[<5B><><EFBFBD>y<EFBFBD>[<5B>W<EFBFBD><57><EFBFBD>[<5B>h
#define ZPRD(A) (RAM[(BYTE)(A)])
//#define ZPRDW(A) (*((LPWORD)&RAM[(BYTE)(A)]))
#define ZPRDW(A) ((WORD)RAM[(BYTE)(A)]+((WORD)RAM[(BYTE)((A)+1)]<<8))
#define ZPWR(A,V) { RAM[(BYTE)(A)]=(V); }
#define ZPWRW(A,V) { *((LPWORD)&RAM[(BYTE)(A)])=(WORD)(V); }
// <20>T<EFBFBD>C<EFBFBD>N<EFBFBD><4E><EFBFBD>J<EFBFBD>E<EFBFBD><45><EFBFBD>^
#define ADD_CYCLE(V) { exec_cycles += (V); }
//#define ADD_CYCLE(V) {}
// EFFECTIVE ADDRESS<53>y<EFBFBD>[<5B>W<EFBFBD><57><EFBFBD>E<EFBFBD><45><EFBFBD><EFBFBD><EFBFBD>`<60>F<EFBFBD>b<EFBFBD>N
#define CHECK_EA() { if( (ET&0xFF00) != (EA&0xFF00) ) ADD_CYCLE(1); }
//#define CHECK_EA() { if( (R.PC&0xFF00) != (EA&0xFF00) ) ADD_CYCLE(1); }
//#define CHECK_EA() {}
// <20>t<EFBFBD><74><EFBFBD>O<EFBFBD><4F><EFBFBD><EFBFBD>
// <20>[<5B><><EFBFBD>^<5E>l<EFBFBD>K<EFBFBD>e<EFBFBD>B<EFBFBD>u<EFBFBD>t<EFBFBD><74><EFBFBD>O<EFBFBD>̃`<60>F<EFBFBD>b<EFBFBD>N<EFBFBD>Ɛݒ<C690>
#define SET_ZN_FLAG(A) { R.P &= ~(Z_FLAG|N_FLAG); R.P |= ZN_Table[(BYTE)(A)]; }
// <20>t<EFBFBD><74><EFBFBD>O<EFBFBD>Z<EFBFBD>b<EFBFBD>g
#define SET_FLAG(V) { R.P |= (V); }
// <20>t<EFBFBD><74><EFBFBD>O<EFBFBD>N<EFBFBD><4E><EFBFBD>A
#define CLR_FLAG(V) { R.P &= ~(V); }
// <20>t<EFBFBD><74><EFBFBD>O<EFBFBD>e<EFBFBD>X<EFBFBD>g<EFBFBD><67><EFBFBD>Z<EFBFBD>b<EFBFBD>g<EFBFBD>^<5E>N<EFBFBD><4E><EFBFBD>A
#define TST_FLAG(F,V) { R.P &= ~(V); if((F)) R.P |= (V); }
// <20>t<EFBFBD><74><EFBFBD>O<EFBFBD>`<60>F<EFBFBD>b<EFBFBD>N
#define CHK_FLAG(V) (R.P&(V))
// WT .... WORD TEMP
// EA .... EFFECTIVE ADDRESS
// ET .... EFFECTIVE ADDRESS TEMP
// DT .... DATA
#define MR_IM() { \
DT = OP6502( R.PC++ ); \
}
#define MR_ZP() { \
EA = OP6502( R.PC++ ); \
DT = ZPRD( EA ); \
}
#define MR_ZX() { \
DT = OP6502( R.PC++ ); \
EA = (BYTE)(DT + R.X); \
DT = ZPRD( EA ); \
}
#define MR_ZY() { \
DT = OP6502( R.PC++ ); \
EA = (BYTE)(DT + R.Y); \
DT = ZPRD( EA ); \
}
#define MR_AB() { \
EA = OP6502W( R.PC ); \
R.PC += 2; \
DT = RD6502( EA ); \
}
#define MR_AX() { \
ET = OP6502W( R.PC ); \
R.PC += 2; \
EA = ET + (WORD)R.X; \
DT = RD6502( EA ); \
}
#define MR_AY() { \
ET = OP6502W( R.PC ); \
R.PC += 2; \
EA = ET + (WORD)R.Y; \
DT = RD6502( EA ); \
}
#define MR_IX() { \
DT = OP6502( R.PC++ ); \
EA = ZPRDW( DT + R.X ); \
DT = RD6502( EA ); \
}
#define MR_IY() { \
DT = OP6502( R.PC++ ); \
ET = ZPRDW( DT ); \
EA = ET + (WORD)R.Y; \
DT = RD6502( EA ); \
}
// EFFECTIVE ADDRESS
#define EA_ZP() { \
EA = OP6502( R.PC++ ); \
}
#define EA_ZX() { \
DT = OP6502( R.PC++ ); \
EA = (BYTE)(DT + R.X); \
}
#define EA_ZY() { \
DT = OP6502( R.PC++ ); \
EA = (BYTE)(DT + R.Y); \
}
#define EA_AB() { \
EA = OP6502W( R.PC ); \
R.PC += 2; \
}
#define EA_AX() { \
ET = OP6502W( R.PC ); \
R.PC += 2; \
EA = ET + R.X; \
}
#define EA_AY() { \
ET = OP6502W( R.PC ); \
R.PC += 2; \
EA = ET + R.Y; \
}
#define EA_IX() { \
DT = OP6502( R.PC++ ); \
EA = ZPRDW( DT + R.X ); \
}
#define EA_IY() { \
DT = OP6502( R.PC++ ); \
ET = ZPRDW( DT ); \
EA = ET + (WORD)R.Y; \
}
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>C<EFBFBD>g
#define MW_ZP() ZPWR(EA,DT)
#define MW_EA() WR6502(EA,DT)
// STACK<43><4B><EFBFBD><EFBFBD>
#define PUSH(V) { STACK[(R.S--)&0xFF]=(V); }
#define POP() STACK[(++R.S)&0xFF]
// <20>Z<EFBFBD>p<EFBFBD><70><EFBFBD>Z<EFBFBD>n
/* ADC (NV----ZC) */
#define ADC() { \
WT = R.A+DT+(R.P&C_FLAG); \
TST_FLAG( WT > 0xFF, C_FLAG ); \
TST_FLAG( ((~(R.A^DT))&(R.A^WT)&0x80), V_FLAG ); \
R.A = (BYTE)WT; \
SET_ZN_FLAG(R.A); \
}
/* SBC (NV----ZC) */
#define SBC() { \
WT = R.A-DT-(~R.P&C_FLAG); \
TST_FLAG( ((R.A^DT) & (R.A^WT)&0x80), V_FLAG ); \
TST_FLAG( WT < 0x100, C_FLAG ); \
R.A = (BYTE)WT; \
SET_ZN_FLAG(R.A); \
}
/* INC (N-----Z-) */
#define INC() { \
DT++; \
SET_ZN_FLAG(DT); \
}
/* INX (N-----Z-) */
#define INX() { \
R.X++; \
SET_ZN_FLAG(R.X); \
}
/* INY (N-----Z-) */
#define INY() { \
R.Y++; \
SET_ZN_FLAG(R.Y); \
}
/* DEC (N-----Z-) */
#define DEC() { \
DT--; \
SET_ZN_FLAG(DT); \
}
/* DEX (N-----Z-) */
#define DEX() { \
R.X--; \
SET_ZN_FLAG(R.X); \
}
/* DEY (N-----Z-) */
#define DEY() { \
R.Y--; \
SET_ZN_FLAG(R.Y); \
}
// <20>_<EFBFBD><5F><EFBFBD><EFBFBD><EFBFBD>Z<EFBFBD>n
/* AND (N-----Z-) */
#define AND() { \
R.A &= DT; \
SET_ZN_FLAG(R.A); \
}
/* ORA (N-----Z-) */
#define ORA() { \
R.A |= DT; \
SET_ZN_FLAG(R.A); \
}
/* EOR (N-----Z-) */
#define EOR() { \
R.A ^= DT; \
SET_ZN_FLAG(R.A); \
}
/* ASL_A (N-----ZC) */
#define ASL_A() { \
TST_FLAG( R.A&0x80, C_FLAG ); \
R.A <<= 1; \
SET_ZN_FLAG(R.A); \
}
/* ASL (N-----ZC) */
#define ASL() { \
TST_FLAG( DT&0x80, C_FLAG ); \
DT <<= 1; \
SET_ZN_FLAG(DT); \
}
/* LSR_A (N-----ZC) */
#define LSR_A() { \
TST_FLAG( R.A&0x01, C_FLAG ); \
R.A >>= 1; \
SET_ZN_FLAG(R.A); \
}
/* LSR (N-----ZC) */
#define LSR() { \
TST_FLAG( DT&0x01, C_FLAG ); \
DT >>= 1; \
SET_ZN_FLAG(DT); \
}
/* ROL_A (N-----ZC) */
#define ROL_A() { \
if( R.P & C_FLAG ) { \
TST_FLAG(R.A&0x80,C_FLAG); \
R.A = (R.A<<1)|0x01; \
} else { \
TST_FLAG(R.A&0x80,C_FLAG); \
R.A <<= 1; \
} \
SET_ZN_FLAG(R.A); \
}
/* ROL (N-----ZC) */
#define ROL() { \
if( R.P & C_FLAG ) { \
TST_FLAG(DT&0x80,C_FLAG); \
DT = (DT<<1)|0x01; \
} else { \
TST_FLAG(DT&0x80,C_FLAG); \
DT <<= 1; \
} \
SET_ZN_FLAG(DT); \
}
/* ROR_A (N-----ZC) */
#define ROR_A() { \
if( R.P & C_FLAG ) { \
TST_FLAG(R.A&0x01,C_FLAG); \
R.A = (R.A>>1)|0x80; \
} else { \
TST_FLAG(R.A&0x01,C_FLAG); \
R.A >>= 1; \
} \
SET_ZN_FLAG(R.A); \
}
/* ROR (N-----ZC) */
#define ROR() { \
if( R.P & C_FLAG ) { \
TST_FLAG(DT&0x01,C_FLAG); \
DT = (DT>>1)|0x80; \
} else { \
TST_FLAG(DT&0x01,C_FLAG); \
DT >>= 1; \
} \
SET_ZN_FLAG(DT); \
}
/* BIT (NV----Z-) */
#define BIT() { \
TST_FLAG( (DT&R.A)==0, Z_FLAG ); \
TST_FLAG( DT&0x80, N_FLAG ); \
TST_FLAG( DT&0x40, V_FLAG ); \
}
// <20><><EFBFBD>[<5B>h<EFBFBD>^<5E>X<EFBFBD>g<EFBFBD>A<EFBFBD>n
/* LDA (N-----Z-) */
#define LDA() { R.A = DT; SET_ZN_FLAG(R.A); }
/* LDX (N-----Z-) */
#define LDX() { R.X = DT; SET_ZN_FLAG(R.X); }
/* LDY (N-----Z-) */
#define LDY() { R.Y = DT; SET_ZN_FLAG(R.Y); }
/* STA (--------) */
#define STA() { DT = R.A; }
/* STX (--------) */
#define STX() { DT = R.X; }
/* STY (--------) */
#define STY() { DT = R.Y; }
/* TAX (N-----Z-) */
#define TAX() { R.X = R.A; SET_ZN_FLAG(R.X); }
/* TXA (N-----Z-) */
#define TXA() { R.A = R.X; SET_ZN_FLAG(R.A); }
/* TAY (N-----Z-) */
#define TAY() { R.Y = R.A; SET_ZN_FLAG(R.Y); }
/* TYA (N-----Z-) */
#define TYA() { R.A = R.Y; SET_ZN_FLAG(R.A); }
/* TSX (N-----Z-) */
#define TSX() { R.X = R.S; SET_ZN_FLAG(R.X); }
/* TXS (--------) */
#define TXS() { R.S = R.X; }
// <20><><EFBFBD>r<EFBFBD>n
/* CMP (N-----ZC) */
#define CMP_() { \
WT = (WORD)R.A - (WORD)DT; \
TST_FLAG( (WT&0x8000)==0, C_FLAG ); \
SET_ZN_FLAG( (BYTE)WT ); \
}
/* CPX (N-----ZC) */
#define CPX() { \
WT = (WORD)R.X - (WORD)DT; \
TST_FLAG( (WT&0x8000)==0, C_FLAG ); \
SET_ZN_FLAG( (BYTE)WT ); \
}
/* CPY (N-----ZC) */
#define CPY() { \
WT = (WORD)R.Y - (WORD)DT; \
TST_FLAG( (WT&0x8000)==0, C_FLAG ); \
SET_ZN_FLAG( (BYTE)WT ); \
}
// <20>W<EFBFBD><57><EFBFBD><EFBFBD><EFBFBD>v<EFBFBD>^<5E><><EFBFBD>^<5E>[<5B><><EFBFBD>n
#if 1
#define JMP_ID() { \
WT = OP6502W(R.PC); \
EA = RD6502(WT); \
WT = (WT&0xFF00)|((WT+1)&0x00FF); \
R.PC = EA+RD6502(WT)*0x100; \
}
#else
#define JMP_ID() { \
ET = OP6502W(R.PC); \
EA = RD6502W(ET); \
R.PC = EA; \
}
#endif
#define JMP() { \
R.PC = OP6502W( R.PC ); \
}
#define JSR() { \
EA = OP6502W( R.PC ); \
R.PC++; \
PUSH( R.PC>>8 ); \
PUSH( R.PC&0xFF ); \
R.PC = EA; \
}
#define RTS() { \
R.PC = POP(); \
R.PC |= POP()*0x0100; \
R.PC++; \
}
#define RTI() { \
R.P = POP() | R_FLAG; \
R.PC = POP(); \
R.PC |= POP()*0x0100; \
}
#define _NMI() { \
DEBUGOUT("_NMI-str!!!!!!!!!!\n");\
PUSH( R.PC>>8 ); \
PUSH( R.PC&0xFF ); \
CLR_FLAG( B_FLAG ); \
PUSH( R.P ); \
SET_FLAG( I_FLAG ); \
R.PC = RD6502W(NMI_VECTOR); \
exec_cycles += 7; \
DEBUGOUT("_NMI-end!!!!!!!!!!\n");\
}
#define _IRQ() { \
DEBUGOUT("_IRQ-str!!!!!!!!!!\n");\
PUSH( R.PC>>8 ); \
PUSH( R.PC&0xFF ); \
CLR_FLAG( B_FLAG ); \
PUSH( R.P ); \
SET_FLAG( I_FLAG ); \
R.PC = RD6502W(IRQ_VECTOR); \
exec_cycles += 7; \
DEBUGOUT("_IRQ-end!!!!!!!!!!\n");\
}
#define BRK() { \
DEBUGOUT("_BRK-str!!!!!!!!!!\n");\
R.PC++; \
PUSH( R.PC>>8 ); \
PUSH( R.PC&0xFF ); \
SET_FLAG( B_FLAG ); \
PUSH( R.P ); \
SET_FLAG( I_FLAG ); \
R.PC = RD6502W(IRQ_VECTOR); \
DEBUGOUT("_BRK-end!!!!!!!!!!\n");\
}
#if 1
#define REL_JUMP() { \
ET = R.PC; \
EA = R.PC + (SBYTE)DT; \
R.PC = EA; \
ADD_CYCLE(1); \
CHECK_EA(); \
}
#else
#define REL_JUMP() { \
R.PC = R.PC + (SBYTE)DT; \
ADD_CYCLE(1); \
}
#endif
#define BCC() { if( !(R.P & C_FLAG) ) REL_JUMP(); }
#define BCS() { if( (R.P & C_FLAG) ) REL_JUMP(); }
#define BNE() { if( !(R.P & Z_FLAG) ) REL_JUMP(); }
#define BEQ() { if( (R.P & Z_FLAG) ) REL_JUMP(); }
#define BPL() { if( !(R.P & N_FLAG) ) REL_JUMP(); }
#define BMI() { if( (R.P & N_FLAG) ) REL_JUMP(); }
#define BVC() { if( !(R.P & V_FLAG) ) REL_JUMP(); }
#define BVS() { if( (R.P & V_FLAG) ) REL_JUMP(); }
// <20>t<EFBFBD><74><EFBFBD>O<EFBFBD><4F><EFBFBD><EFBFBD><EFBFBD>n
#define CLC() { R.P &= ~C_FLAG; }
#define CLD() { R.P &= ~D_FLAG; }
#define CLI() { R.P &= ~I_FLAG; }
#define CLV() { R.P &= ~V_FLAG; }
#define SEC() { R.P |= C_FLAG; }
#define SED() { R.P |= D_FLAG; }
#define SEI() { R.P |= I_FLAG; }
// Unofficial<61><6C><EFBFBD><EFBFBD>
#define ANC() { \
R.A &= DT; \
SET_ZN_FLAG( R.A ); \
TST_FLAG( R.P&N_FLAG, C_FLAG ); \
}
#define ANE() { \
R.A = (R.A|0xEE)&R.X&DT; \
SET_ZN_FLAG( R.A ); \
}
#define ARR() { \
DT &= R.A; \
R.A = (DT>>1)|((R.P&C_FLAG)<<7); \
SET_ZN_FLAG( R.A ); \
TST_FLAG( R.A&0x40, C_FLAG ); \
TST_FLAG( (R.A>>6)^(R.A>>5), V_FLAG ); \
}
#define ASR() { \
DT &= R.A; \
TST_FLAG( DT&0x01, C_FLAG ); \
R.A = DT>>1; \
SET_ZN_FLAG( R.A ); \
}
#define DCP() { \
DT--; \
CMP_(); \
}
#define DOP() { \
R.PC++; \
}
#define ISB() { \
DT++; \
SBC(); \
}
#define LAS() { \
R.A = R.X = R.S = (R.S & DT); \
SET_ZN_FLAG( R.A ); \
}
#define LAX() { \
R.A = DT; \
R.X = R.A; \
SET_ZN_FLAG( R.A ); \
}
#define LXA() { \
R.A = R.X = ((R.A|0xEE)&DT); \
SET_ZN_FLAG( R.A ); \
}
#define RLA() { \
if( R.P & C_FLAG ) { \
TST_FLAG( DT&0x80, C_FLAG ); \
DT = (DT<<1)|1; \
} else { \
TST_FLAG( DT&0x80, C_FLAG ); \
DT <<= 1; \
} \
R.A &= DT; \
SET_ZN_FLAG( R.A ); \
}
#define RRA() { \
if( R.P & C_FLAG ) { \
TST_FLAG( DT&0x01, C_FLAG ); \
DT = (DT>>1)|0x80; \
} else { \
TST_FLAG( DT&0x01, C_FLAG ); \
DT >>= 1; \
} \
ADC(); \
}
#define SAX() { \
DT = R.A & R.X; \
}
#define SBX() { \
WT = (R.A&R.X)-DT; \
TST_FLAG( WT < 0x100, C_FLAG ); \
R.X = WT&0xFF; \
SET_ZN_FLAG( R.X ); \
}
#define SHA() { \
DT = R.A & R.X & (BYTE)((EA>>8)+1); \
}
#define SHS() { \
R.S = R.A & R.X; \
DT = R.S & (BYTE)((EA>>8)+1); \
}
#define SHX() { \
DT = R.X & (BYTE)((EA>>8)+1); \
}
#define SHY() { \
DT = R.Y & (BYTE)((EA>>8)+1); \
}
#define SLO() { \
TST_FLAG( DT&0x80, C_FLAG ); \
DT <<= 1; \
R.A |= DT; \
SET_ZN_FLAG( R.A ); \
}
#define SRE() { \
TST_FLAG( DT&0x01, C_FLAG ); \
DT >>= 1; \
R.A ^= DT; \
SET_ZN_FLAG( R.A ); \
}
#define TOP() { \
R.PC += 2; \
}
//
// <20>R<EFBFBD><52><EFBFBD>X<EFBFBD>g<EFBFBD><67><EFBFBD>N<EFBFBD>^/<2F>f<EFBFBD>X<EFBFBD>g<EFBFBD><67><EFBFBD>N<EFBFBD>^
//
//CPU::CPU( NES* parent )
CPU::CPU( NES* parent ) : nes(parent)
{
// nes = parent;
m_bClockProcess = FALSE;
}
CPU::~CPU()
{
}
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD>N<EFBFBD>Z<EFBFBD>X
//#define OP6502(A) (CPU_MEM_BANK[(A)>>13][(A)&0x1FFF])
//#define OP6502W(A) (*((WORD*)&CPU_MEM_BANK[(A)>>13][(A)&0x1FFF]))
#if 0
#define OP6502(A) RD6502((A))
#define OP6502W(A) RD6502W((A))
#else
inline BYTE OP6502( WORD addr )
{
return CPU_MEM_BANK[addr>>13][addr&0x1FFF];
}
inline WORD OP6502W( WORD addr )
{
#if 0
WORD ret;
ret = (WORD)CPU_MEM_BANK[(addr+0)>>13][(addr+0)&0x1FFF];
ret |= (WORD)CPU_MEM_BANK[(addr+1)>>13][(addr+1)&0x1FFF]<<8;
return ret;
#else
return *((WORD*)&CPU_MEM_BANK[addr>>13][addr&0x1FFF]);
#endif
}
#endif
inline BYTE CPU::RD6502( WORD addr )
{
if( addr < 0x2000 ) {
// RAM (Mirror $0800, $1000, $1800)
return RAM[addr&0x07FF];
} else if( addr < 0x8000 ) {
// Others
return nes->Read( addr );
} else {
BYTE data;
if (mapper->ReadHigh(addr, &data))
return data;
// Dummy access
mapper->Read( addr, CPU_MEM_BANK[addr>>13][addr&0x1FFF] );
}
// Quick bank read
return CPU_MEM_BANK[addr>>13][addr&0x1FFF];
}
inline WORD CPU::RD6502W( WORD addr )
{
if( addr < 0x2000 ) {
// RAM (Mirror $0800, $1000, $1800)
return *((WORD*)&RAM[addr&0x07FF]);
} else if( addr < 0x8000 ) {
// Others
return (WORD)nes->Read(addr)+(WORD)nes->Read(addr+1)*0x100;
}
// Quick bank read
#if 0
WORD ret;
ret = (WORD)CPU_MEM_BANK[(addr+0)>>13][(addr+0)&0x1FFF];
ret |= (WORD)CPU_MEM_BANK[(addr+1)>>13][(addr+1)&0x1FFF]<<8;
return ret;
#else
return *((WORD*)&CPU_MEM_BANK[addr>>13][addr&0x1FFF]);
#endif
}
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>C<EFBFBD>g
inline void CPU::WR6502( WORD addr, BYTE data )
{
if( addr < 0x2000 ) {
// RAM (Mirror $0800, $1000, $1800)
RAM[addr&0x07FF] = data;
} else {
// Others
nes->Write( addr, data );
}
}
//
// <20><><EFBFBD>Z<EFBFBD>b<EFBFBD>g
//
void CPU::Reset()
{
apu = nes->apu;
mapper = nes->mapper;
R.A = 0x00;
R.X = 0x00;
R.Y = 0x00;
R.S = 0xFF;
R.P = Z_FLAG|R_FLAG;
R.PC = RD6502W(RES_VECTOR);
R.INT_pending = 0;
TOTAL_cycles = 0;
DMA_cycles = 0;
// STACK quick access
STACK = &RAM[0x0100];
// Zero/Negative FLAG
ZN_Table[0] = Z_FLAG;
for( INT i = 1; i < 256; i++ )
ZN_Table[i] = (i & 0x80)?N_FLAG:0;
}
INT CPU::GetDmaCycles()
{
return DMA_cycles;
}
void CPU::SetDmaCycles( INT cycles )
{
DMA_cycles = cycles;
}
INT CPU::GetTotalCycles()
{
return TOTAL_cycles;
}
void CPU::SetTotalCycles( INT cycles )
{
TOTAL_cycles = cycles;
}
//
// DMA<4D>y<EFBFBD><79><EFBFBD>f<EFBFBD>B<EFBFBD><42><EFBFBD>O<EFBFBD>T<EFBFBD>C<EFBFBD>N<EFBFBD><4E><EFBFBD>ݒ<EFBFBD>
//
void CPU::DMA( INT cycles )
{
DMA_cycles += cycles;
}
//
// <20><><EFBFBD><EFBFBD><E88D9E>
//
void CPU::NMI()
{
R.INT_pending |= NMI_FLAG;
}
void CPU::SetIRQ( BYTE mask )
{
R.INT_pending |= mask;
}
void CPU::ClrIRQ( BYTE mask )
{
R.INT_pending &= ~mask;
}
//dasm
int CPU::dasm6502(int *dasmpc, int *bcc_pc, char *obuf)
{
static char *opnmt[57] = {
"ADC","AND","ASL","BCC","BCS","BEQ","BIT","BMI","BNE","BPL","BRK","BVC","BVS","CLC","???",
"CLD","CLI","CLV","CMP","CPX","CPY","DEC","DEX","DEY","EOR","INC","INX","INY","JMP",
"JSR","LDA","LDX","LDY","LSR","NOP","ORA","PHA","PHP","PLA","PLP","ROL","ROR","RTI",
"RTS","SBC","SEC","SED","SEI","STA","STX","STY","TAX","TAY","TSX","TXA","TXS","TYA"
};
static int opct[256] = {
0x0a87,0x2366,0x0e82,0x0e82,0x0e82,0x2313,0x0215,0x0e82,0x2583,0x2302,0x02a2,0x0e82,0x0e82,0x2334,0x0236,0x0e82,
0x0992,0x237d,0x0e82,0x0e82,0x0e82,0x2324,0x0226,0x0e82,0x0d82,0x235c,0x0e82,0x0e82,0x0e82,0x234c,0x0247,0x0e82,
0x1d36,0x0166,0x0e82,0x0e82,0x0613,0x0113,0x2815,0x0e82,0x2784,0x0102,0x28a2,0x0e82,0x0634,0x0134,0x2836,0x0e82,
0x0792,0x017d,0x0e82,0x0e82,0x0e82,0x0124,0x2826,0x0e82,0x2d82,0x015c,0x0e82,0x0e82,0x0e82,0x014c,0x2847,0x0e82,
0x2a86,0x1866,0x0e82,0x0e82,0x0e82,0x1813,0x2115,0x0e82,0x2483,0x1802,0x21a2,0x0e82,0x1c33,0x1834,0x2136,0x0e82,
0x0b92,0x187d,0x0e82,0x0e82,0x0e82,0x1824,0x2126,0x0e82,0x1082,0x185c,0x0e82,0x0e82,0x0e82,0x184c,0x2147,0x0e82,
0x2b86,0x0066,0x0e82,0x0e82,0x0e82,0x0013,0x2915,0x0e82,0x2684,0x0002,0x29a2,0x0e82,0x1cb5,0x0034,0x2936,0x0e82,
0x0c92,0x007d,0x0e82,0x0e82,0x0e82,0x0024,0x2926,0x0e82,0x2f82,0x005c,0x0e82,0x0e82,0x0e82,0x004c,0x2947,0x0e82,
0x0e82,0x3066,0x0e82,0x0e82,0x3213,0x3013,0x3113,0x0e82,0x1782,0x0e82,0x3682,0x0e82,0x3234,0x3034,0x3134,0x0e82,
0x0392,0x307d,0x0e82,0x0e82,0x3224,0x3024,0x31c4,0x0e82,0x3882,0x305c,0x3782,0x0e82,0x0e82,0x304c,0x0e82,0x0e82,
0x2002,0x1e66,0x1f02,0x0e82,0x2013,0x1e13,0x1f13,0x0e82,0x3482,0x1e02,0x3382,0x0e82,0x2034,0x1e34,0x1f34,0x0e82,
0x0492,0x1e7d,0x0e82,0x0e82,0x2024,0x1e24,0x1fc4,0x0e82,0x1182,0x1e5c,0x3582,0x0e82,0x204c,0x1e4c,0x1f5c,0x0e82,
0x1402,0x1266,0x0e82,0x0e82,0x1413,0x1213,0x1515,0x0e82,0x1b82,0x1202,0x1682,0x0e82,0x1434,0x1234,0x1536,0x0e82,
0x0892,0x127d,0x0e82,0x0e82,0x0e82,0x1224,0x1526,0x0e82,0x0f82,0x125c,0x0e82,0x0e82,0x0e82,0x124c,0x1547,0x0e82,
0x1302,0x2c66,0x0e82,0x0e82,0x1313,0x2c13,0x1915,0x0e82,0x1a82,0x2c02,0x2282,0x0e82,0x1334,0x2c34,0x1936,0x0e82,
0x0592,0x2c7d,0x0e82,0x0e82,0x0e82,0x2c24,0x1926,0x0e82,0x2e82,0x2c5c,0x0e82,0x0e82,0x0e82,0x2c4c,0x1947,0x0e82
};
static int opsz[16]={2,2,2,3,3,3,2,2,0,2,0,3,2};
static char *oppre[16]={"#$","$","$","$","$","$","($","($","","$","A","($","$"};
static char *opsuf[16]={"","",",X","",",X",",Y",",X)","),Y","","","",")",",Y"};
unsigned int opcode,opdata,rpc;
unsigned int opname,opsize,opaddr;
int retv;
char *regbuf;
memset(obuf, 32, 40);
retv = 0;
regbuf = obuf+36;
sprintf(obuf,"%04X: ",(*dasmpc));
obuf+=6;
opcode=OP6502(*dasmpc);
(*dasmpc)++;
if(opcode == 0x4c || opcode == 0x40 || opcode == 0x6c){
retv = 1;
}
opname=opct[opcode];
opaddr=(opname>>4)&0x0f;
opsize=opsz[opaddr];
opname>>=8;
sprintf(obuf,"%02X ",opcode);
obuf+=3;
if(opsize==2){
opdata=OP6502(*dasmpc);
(*dasmpc)++;
sprintf(obuf,"%02X ",opdata);
obuf+=6;
}else if(opsize==3){
opdata=OP6502(*dasmpc);
(*dasmpc)++;
sprintf(obuf,"%02X ",opdata);
obuf+=3;
opdata<<=8;
opdata|=OP6502(*dasmpc);
(*dasmpc)++;
sprintf(obuf,"%02X ",opdata&0xff);
obuf+=3;
}else{
sprintf(obuf," ");
obuf+=6;
}
sprintf(obuf," %s ",opnmt[opname]);
obuf+=6;
sprintf(obuf,"%s",oppre[opaddr]);
obuf+=strlen(oppre[opaddr]);
if(opsize==2){
if(opaddr==9){
retv = 2;
if(opdata>=0x80)
rpc=(*dasmpc)+(opdata|~0xff);
else
rpc=(*dasmpc)+opdata;
sprintf(obuf,"%04X",rpc);
(*bcc_pc) = rpc;
obuf+=4;
}else{
sprintf(obuf,"%02X",opdata);
obuf+=2;
}
}else if(opsize==3){
sprintf(obuf,"%02X",opdata&0xff);
obuf+=2;
sprintf(obuf,"%02X",opdata>>8);
obuf+=2;
if(opcode == 0x4c)
(*bcc_pc) = ((opdata<<8)&0xff00) | ((opdata>>8)&0xff);
}
sprintf(obuf,"%s",opsuf[opaddr]);
obuf += strlen(opsuf[opaddr]);
*obuf = 32;
sprintf(regbuf, "A=%02X X=%02X Y=%02X SL=%02x", R.A, R.X, R.Y, nes->ppu->GetScanlineNo());
regbuf+=32;
/*
sprintf(regbuf, " [");
regbuf += 3;
rpc = R.S;
rpc++;
for(i=0; i<16; i++){
sprintf(regbuf, "%02x ", STACK[rpc+i]);
regbuf += 3;
}
sprintf(regbuf, "]");
*/
return retv;
}
FILE *dfp = NULL;
void MDEBUGOUT(char *str)
{
if(dfp==NULL){
dfp = fopen("log.txt", "w");
}
fprintf(dfp, "%s", str);
}
//
// <20><><EFBFBD>ߎ<EFBFBD><DF8E>s
//
INT CPU::EXEC( INT request_cycles )
{
BYTE opcode; // <20>I<EFBFBD>y<EFBFBD>R<EFBFBD>[<5B>h
INT OLD_cycles = TOTAL_cycles;
INT exec_cycles;
BYTE nmi_request, irq_request;
BOOL bClockProcess = m_bClockProcess;
// TEMP
register WORD EA;
register WORD ET;
register WORD WT;
register BYTE DT;
PC_N = R.PC;
if(nnn==8) DEBUGOUT( "PC_N = %04X\n", PC_N );
while( request_cycles > 0 ) {
exec_cycles = 0;
if( DMA_cycles ) {
if( request_cycles <= DMA_cycles ) {
DMA_cycles -= request_cycles;
TOTAL_cycles += request_cycles;
// <20>N<EFBFBD><4E><EFBFBD>b<EFBFBD>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
mapper->Clock( request_cycles );
#if DPCM_SYNCCLOCK
apu->SyncDPCM( request_cycles );
#endif
if( bClockProcess ) {
nes->Clock( request_cycles );
}
// nes->Clock( request_cycles );
goto _execute_exit;
} else {
exec_cycles += DMA_cycles;
request_cycles -= DMA_cycles;
DMA_cycles = 0;
}
}
#if 0
{
static int retv, dpc, bpc, jpc=0, skip=0;
char dbuf[512];
static int disasm = 0;
if( ::GetAsyncKeyState( VK_ESCAPE ) & 0x8000 ) {
disasm ^= 1;
}
if(disasm==1){
dpc = R.PC;
if(dpc>jpc || dpc<bpc){
skip = 0;
}
if(!skip){
retv = dasm6502(&dpc, &bpc, dbuf);
if(retv){
if(R.PC-bpc<32 && R.PC-bpc>0){
jpc = R.PC;
skip = 1;
MDEBUGOUT(" -- Maybe a loop? --\n");
}
}
MDEBUGOUT(dbuf);
MDEBUGOUT("\n");
}
}
}
#endif
nmi_request = irq_request = 0;
opcode = OP6502(R.PC);
if( R.INT_pending ) {
if( R.INT_pending & NMI_FLAG ) {
nmi_request = 0xFF;
R.INT_pending &= ~NMI_FLAG;
} else
if( R.INT_pending & IRQ_MASK ) {
R.INT_pending &= ~IRQ_TRIGGER2;
if( !(R.P & I_FLAG) && opcode != 0x40 ) {
irq_request = 0xFF;
R.INT_pending &= ~IRQ_TRIGGER;
}
}
}
if( irq_request ){
_IRQ();
}
opcode = OP6502( R.PC++ );
switch( opcode ) {
case 0x69: // ADC #$??
MR_IM(); ADC();
ADD_CYCLE(2);
break;
case 0x65: // ADC $??
MR_ZP(); ADC();
ADD_CYCLE(3);
break;
case 0x75: // ADC $??,X
MR_ZX(); ADC();
ADD_CYCLE(4);
break;
case 0x6D: // ADC $????
MR_AB(); ADC();
ADD_CYCLE(4);
break;
case 0x7D: // ADC $????,X
MR_AX(); ADC(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0x79: // ADC $????,Y
MR_AY(); ADC(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0x61: // ADC ($??,X)
MR_IX(); ADC();
ADD_CYCLE(6);
break;
case 0x71: // ADC ($??),Y
MR_IY(); ADC(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0xE9: // SBC #$??
MR_IM(); SBC();
ADD_CYCLE(2);
break;
case 0xE5: // SBC $??
MR_ZP(); SBC();
ADD_CYCLE(3);
break;
case 0xF5: // SBC $??,X
MR_ZX(); SBC();
ADD_CYCLE(4);
break;
case 0xED: // SBC $????
MR_AB(); SBC();
ADD_CYCLE(4);
break;
case 0xFD: // SBC $????,X
MR_AX(); SBC(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0xF9: // SBC $????,Y
MR_AY(); SBC(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0xE1: // SBC ($??,X)
MR_IX(); SBC();
ADD_CYCLE(6);
break;
case 0xF1: // SBC ($??),Y
MR_IY(); SBC(); CHECK_EA();
ADD_CYCLE(5);
break;
case 0xC6: // DEC $??
MR_ZP(); DEC(); MW_ZP();
ADD_CYCLE(5);
break;
case 0xD6: // DEC $??,X
MR_ZX(); DEC(); MW_ZP();
ADD_CYCLE(6);
break;
case 0xCE: // DEC $????
MR_AB(); DEC(); MW_EA();
ADD_CYCLE(6);
break;
case 0xDE: // DEC $????,X
MR_AX(); DEC(); MW_EA();
ADD_CYCLE(7);
break;
case 0xCA: // DEX
DEX();
ADD_CYCLE(2);
break;
case 0x88: // DEY
DEY();
ADD_CYCLE(2);
break;
case 0xE6: // INC $??
MR_ZP(); INC(); MW_ZP();
ADD_CYCLE(5);
break;
case 0xF6: // INC $??,X
MR_ZX(); INC(); MW_ZP();
ADD_CYCLE(6);
break;
case 0xEE: // INC $????
MR_AB(); INC(); MW_EA();
ADD_CYCLE(6);
break;
case 0xFE: // INC $????,X
MR_AX(); INC(); MW_EA();
ADD_CYCLE(7);
break;
case 0xE8: // INX
INX();
ADD_CYCLE(2);
break;
case 0xC8: // INY
INY();
ADD_CYCLE(2);
break;
case 0x29: // AND #$??
MR_IM(); AND();
ADD_CYCLE(2);
break;
case 0x25: // AND $??
MR_ZP(); AND();
ADD_CYCLE(3);
break;
case 0x35: // AND $??,X
MR_ZX(); AND();
ADD_CYCLE(4);
break;
case 0x2D: // AND $????
MR_AB(); AND();
ADD_CYCLE(4);
break;
case 0x3D: // AND $????,X
MR_AX(); AND(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0x39: // AND $????,Y
MR_AY(); AND(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0x21: // AND ($??,X)
MR_IX(); AND();
ADD_CYCLE(6);
break;
case 0x31: // AND ($??),Y
MR_IY(); AND(); CHECK_EA();
ADD_CYCLE(5);
break;
case 0x0A: // ASL A
ASL_A();
ADD_CYCLE(2);
break;
case 0x06: // ASL $??
MR_ZP(); ASL(); MW_ZP();
ADD_CYCLE(5);
break;
case 0x16: // ASL $??,X
MR_ZX(); ASL(); MW_ZP();
ADD_CYCLE(6);
break;
case 0x0E: // ASL $????
MR_AB(); ASL(); MW_EA();
ADD_CYCLE(6);
break;
case 0x1E: // ASL $????,X
MR_AX(); ASL(); MW_EA();
ADD_CYCLE(7);
break;
case 0x24: // BIT $??
MR_ZP(); BIT();
ADD_CYCLE(3);
break;
case 0x2C: // BIT $????
MR_AB(); BIT();
ADD_CYCLE(4);
break;
case 0x49: // EOR #$??
MR_IM(); EOR();
ADD_CYCLE(2);
break;
case 0x45: // EOR $??
MR_ZP(); EOR();
ADD_CYCLE(3);
break;
case 0x55: // EOR $??,X
MR_ZX(); EOR();
ADD_CYCLE(4);
break;
case 0x4D: // EOR $????
MR_AB(); EOR();
ADD_CYCLE(4);
break;
case 0x5D: // EOR $????,X
MR_AX(); EOR(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0x59: // EOR $????,Y
MR_AY(); EOR(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0x41: // EOR ($??,X)
MR_IX(); EOR();
ADD_CYCLE(6);
break;
case 0x51: // EOR ($??),Y
MR_IY(); EOR(); CHECK_EA();
ADD_CYCLE(5);
break;
case 0x4A: // LSR A
LSR_A();
ADD_CYCLE(2);
break;
case 0x46: // LSR $??
MR_ZP(); LSR(); MW_ZP();
ADD_CYCLE(5);
break;
case 0x56: // LSR $??,X
MR_ZX(); LSR(); MW_ZP();
ADD_CYCLE(6);
break;
case 0x4E: // LSR $????
MR_AB(); LSR(); MW_EA();
ADD_CYCLE(6);
break;
case 0x5E: // LSR $????,X
MR_AX(); LSR(); MW_EA();
ADD_CYCLE(7);
break;
case 0x09: // ORA #$??
MR_IM(); ORA();
ADD_CYCLE(2);
break;
case 0x05: // ORA $??
MR_ZP(); ORA();
ADD_CYCLE(3);
break;
case 0x15: // ORA $??,X
MR_ZX(); ORA();
ADD_CYCLE(4);
break;
case 0x0D: // ORA $????
MR_AB(); ORA();
ADD_CYCLE(4);
break;
case 0x1D: // ORA $????,X
MR_AX(); ORA(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0x19: // ORA $????,Y
MR_AY(); ORA(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0x01: // ORA ($??,X)
MR_IX(); ORA();
ADD_CYCLE(6);
break;
case 0x11: // ORA ($??),Y
MR_IY(); ORA(); CHECK_EA();
ADD_CYCLE(5);
break;
case 0x2A: // ROL A
ROL_A();
ADD_CYCLE(2);
break;
case 0x26: // ROL $??
MR_ZP(); ROL(); MW_ZP();
ADD_CYCLE(5);
break;
case 0x36: // ROL $??,X
MR_ZX(); ROL(); MW_ZP();
ADD_CYCLE(6);
break;
case 0x2E: // ROL $????
MR_AB(); ROL(); MW_EA();
ADD_CYCLE(6);
break;
case 0x3E: // ROL $????,X
MR_AX(); ROL(); MW_EA();
ADD_CYCLE(7);
break;
case 0x6A: // ROR A
ROR_A();
ADD_CYCLE(2);
break;
case 0x66: // ROR $??
MR_ZP(); ROR(); MW_ZP();
ADD_CYCLE(5);
break;
case 0x76: // ROR $??,X
MR_ZX(); ROR(); MW_ZP();
ADD_CYCLE(6);
break;
case 0x6E: // ROR $????
MR_AB(); ROR(); MW_EA();
ADD_CYCLE(6);
break;
case 0x7E: // ROR $????,X
MR_AX(); ROR(); MW_EA();
ADD_CYCLE(7);
break;
case 0xA9: // LDA #$??
MR_IM(); LDA();
ADD_CYCLE(2);
break;
case 0xA5: // LDA $??
MR_ZP(); LDA();
ADD_CYCLE(3);
break;
case 0xB5: // LDA $??,X
MR_ZX(); LDA();
ADD_CYCLE(4);
break;
case 0xAD: // LDA $????
MR_AB(); LDA();
ADD_CYCLE(4);
break;
case 0xBD: // LDA $????,X
MR_AX(); LDA(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0xB9: // LDA $????,Y
MR_AY(); LDA(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0xA1: // LDA ($??,X)
MR_IX(); LDA();
ADD_CYCLE(6);
break;
case 0xB1: // LDA ($??),Y
MR_IY(); LDA(); CHECK_EA();
ADD_CYCLE(5);
break;
case 0xA2: // LDX #$??
MR_IM(); LDX();
ADD_CYCLE(2);
break;
case 0xA6: // LDX $??
MR_ZP(); LDX();
ADD_CYCLE(3);
break;
case 0xB6: // LDX $??,Y
MR_ZY(); LDX();
ADD_CYCLE(4);
break;
case 0xAE: // LDX $????
MR_AB(); LDX();
ADD_CYCLE(4);
break;
case 0xBE: // LDX $????,Y
MR_AY(); LDX(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0xA0: // LDY #$??
MR_IM(); LDY();
ADD_CYCLE(2);
break;
case 0xA4: // LDY $??
MR_ZP(); LDY();
ADD_CYCLE(3);
break;
case 0xB4: // LDY $??,X
MR_ZX(); LDY();
ADD_CYCLE(4);
break;
case 0xAC: // LDY $????
MR_AB(); LDY();
ADD_CYCLE(4);
break;
case 0xBC: // LDY $????,X
MR_AX(); LDY(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0x85: // STA $??
EA_ZP(); STA(); MW_ZP();
ADD_CYCLE(3);
break;
case 0x95: // STA $??,X
EA_ZX(); STA(); MW_ZP();
ADD_CYCLE(4);
break;
case 0x8D: // STA $????
EA_AB(); STA(); MW_EA();
ADD_CYCLE(4);
break;
case 0x9D: // STA $????,X
EA_AX(); STA(); MW_EA();
ADD_CYCLE(5);
break;
case 0x99: // STA $????,Y
EA_AY(); STA(); MW_EA();
ADD_CYCLE(5);
break;
case 0x81: // STA ($??,X)
EA_IX(); STA(); MW_EA();
ADD_CYCLE(6);
break;
case 0x91: // STA ($??),Y
EA_IY(); STA(); MW_EA();
ADD_CYCLE(6);
break;
case 0x86: // STX $??
EA_ZP(); STX(); MW_ZP();
ADD_CYCLE(3);
break;
case 0x96: // STX $??,Y
EA_ZY(); STX(); MW_ZP();
ADD_CYCLE(4);
break;
case 0x8E: // STX $????
EA_AB(); STX(); MW_EA();
ADD_CYCLE(4);
break;
case 0x84: // STY $??
EA_ZP(); STY(); MW_ZP();
ADD_CYCLE(3);
break;
case 0x94: // STY $??,X
EA_ZX(); STY(); MW_ZP();
ADD_CYCLE(4);
break;
case 0x8C: // STY $????
EA_AB(); STY(); MW_EA();
ADD_CYCLE(4);
break;
case 0xAA: // TAX
TAX();
ADD_CYCLE(2);
break;
case 0x8A: // TXA
TXA();
ADD_CYCLE(2);
break;
case 0xA8: // TAY
TAY();
ADD_CYCLE(2);
break;
case 0x98: // TYA
TYA();
ADD_CYCLE(2);
break;
case 0xBA: // TSX
TSX();
ADD_CYCLE(2);
break;
case 0x9A: // TXS
TXS();
ADD_CYCLE(2);
break;
case 0xC9: // CMP #$??
MR_IM(); CMP_();
ADD_CYCLE(2);
break;
case 0xC5: // CMP $??
MR_ZP(); CMP_();
ADD_CYCLE(3);
break;
case 0xD5: // CMP $??,X
MR_ZX(); CMP_();
ADD_CYCLE(4);
break;
case 0xCD: // CMP $????
MR_AB(); CMP_();
ADD_CYCLE(4);
break;
case 0xDD: // CMP $????,X
MR_AX(); CMP_(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0xD9: // CMP $????,Y
MR_AY(); CMP_(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0xC1: // CMP ($??,X)
MR_IX(); CMP_();
ADD_CYCLE(6);
break;
case 0xD1: // CMP ($??),Y
MR_IY(); CMP_(); CHECK_EA();
ADD_CYCLE(5);
break;
case 0xE0: // CPX #$??
MR_IM(); CPX();
ADD_CYCLE(2);
break;
case 0xE4: // CPX $??
MR_ZP(); CPX();
ADD_CYCLE(3);
break;
case 0xEC: // CPX $????
MR_AB(); CPX();
ADD_CYCLE(4);
break;
case 0xC0: // CPY #$??
MR_IM(); CPY();
ADD_CYCLE(2);
break;
case 0xC4: // CPY $??
MR_ZP(); CPY();
ADD_CYCLE(3);
break;
case 0xCC: // CPY $????
MR_AB(); CPY();
ADD_CYCLE(4);
break;
case 0x90: // BCC
MR_IM(); BCC();
ADD_CYCLE(2);
break;
case 0xB0: // BCS
MR_IM(); BCS();
ADD_CYCLE(2);
break;
case 0xF0: // BEQ
MR_IM(); BEQ();
ADD_CYCLE(2);
break;
case 0x30: // BMI
MR_IM(); BMI();
ADD_CYCLE(2);
break;
case 0xD0: // BNE
MR_IM(); BNE();
ADD_CYCLE(2);
break;
case 0x10: // BPL
MR_IM(); BPL();
ADD_CYCLE(2);
break;
case 0x50: // BVC
MR_IM(); BVC();
ADD_CYCLE(2);
break;
case 0x70: // BVS
MR_IM(); BVS();
ADD_CYCLE(2);
break;
case 0x4C: // JMP $????
JMP();
ADD_CYCLE(3);
break;
case 0x6C: // JMP ($????)
JMP_ID();
ADD_CYCLE(5);
break;
case 0x20: // JSR
JSR();
ADD_CYCLE(6);
break;
case 0x40: // RTI
RTI();
ADD_CYCLE(6);
break;
case 0x60: // RTS
RTS();
ADD_CYCLE(6);
break;
// <20>t<EFBFBD><74><EFBFBD>O<EFBFBD><4F><EFBFBD><EFBFBD><EFBFBD>n
case 0x18: // CLC
CLC();
ADD_CYCLE(2);
break;
case 0xD8: // CLD
CLD();
ADD_CYCLE(2);
break;
case 0x58: // CLI
CLI();
ADD_CYCLE(2);
break;
case 0xB8: // CLV
CLV();
ADD_CYCLE(2);
break;
case 0x38: // SEC
SEC();
ADD_CYCLE(2);
break;
case 0xF8: // SED
SED();
ADD_CYCLE(2);
break;
case 0x78: // SEI
SEI();
ADD_CYCLE(2);
break;
// <20>X<EFBFBD>^<5E>b<EFBFBD>N<EFBFBD>n
case 0x48: // PHA
PUSH( R.A );
ADD_CYCLE(3);
break;
case 0x08: // PHP
PUSH( R.P | B_FLAG );
ADD_CYCLE(3);
break;
case 0x68: // PLA (N-----Z-)
R.A = POP();
SET_ZN_FLAG(R.A);
ADD_CYCLE(4);
break;
case 0x28: // PLP
R.P = POP() | R_FLAG;
ADD_CYCLE(4);
break;
// <20><><EFBFBD>̑<EFBFBD>
case 0x00: // BRK
BRK();
ADD_CYCLE(7);
break;
case 0xEA: // NOP
ADD_CYCLE(2);
break;
// <20><><EFBFBD><EFBFBD><EFBFBD>J<EFBFBD><4A><EFBFBD>ߌQ
case 0x0B: // ANC #$??
case 0x2B: // ANC #$??
MR_IM(); ANC();
ADD_CYCLE(2);
break;
case 0x8B: // ANE #$??
MR_IM(); ANE();
ADD_CYCLE(2);
break;
case 0x6B: // ARR #$??
MR_IM(); ARR();
ADD_CYCLE(2);
break;
case 0x4B: // ASR #$??
MR_IM(); ASR();
ADD_CYCLE(2);
break;
case 0xC7: // DCP $??
MR_ZP(); DCP(); MW_ZP();
ADD_CYCLE(5);
break;
case 0xD7: // DCP $??,X
MR_ZX(); DCP(); MW_ZP();
ADD_CYCLE(6);
break;
case 0xCF: // DCP $????
MR_AB(); DCP(); MW_EA();
ADD_CYCLE(6);
break;
case 0xDF: // DCP $????,X
MR_AX(); DCP(); MW_EA();
ADD_CYCLE(7);
break;
case 0xDB: // DCP $????,Y
MR_AY(); DCP(); MW_EA();
ADD_CYCLE(7);
break;
case 0xC3: // DCP ($??,X)
MR_IX(); DCP(); MW_EA();
ADD_CYCLE(8);
break;
case 0xD3: // DCP ($??),Y
MR_IY(); DCP(); MW_EA();
ADD_CYCLE(8);
break;
case 0xE7: // ISB $??
MR_ZP(); ISB(); MW_ZP();
ADD_CYCLE(5);
break;
case 0xF7: // ISB $??,X
MR_ZX(); ISB(); MW_ZP();
ADD_CYCLE(5);
break;
case 0xEF: // ISB $????
MR_AB(); ISB(); MW_EA();
ADD_CYCLE(5);
break;
case 0xFF: // ISB $????,X
MR_AX(); ISB(); MW_EA();
ADD_CYCLE(5);
break;
case 0xFB: // ISB $????,Y
MR_AY(); ISB(); MW_EA();
ADD_CYCLE(5);
break;
case 0xE3: // ISB ($??,X)
MR_IX(); ISB(); MW_EA();
ADD_CYCLE(5);
break;
case 0xF3: // ISB ($??),Y
MR_IY(); ISB(); MW_EA();
ADD_CYCLE(5);
break;
case 0xBB: // LAS $????,Y
MR_AY(); LAS(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0xA7: // LAX $??
MR_ZP(); LAX();
ADD_CYCLE(3);
break;
case 0xB7: // LAX $??,Y
MR_ZY(); LAX();
ADD_CYCLE(4);
break;
case 0xAF: // LAX $????
MR_AB(); LAX();
ADD_CYCLE(4);
break;
case 0xBF: // LAX $????,Y
MR_AY(); LAX(); CHECK_EA();
ADD_CYCLE(4);
break;
case 0xA3: // LAX ($??,X)
MR_IX(); LAX();
ADD_CYCLE(6);
break;
case 0xB3: // LAX ($??),Y
MR_IY(); LAX(); CHECK_EA();
ADD_CYCLE(5);
break;
case 0xAB: // LXA #$??
MR_IM(); LXA();
ADD_CYCLE(2);
break;
case 0x27: // RLA $??
MR_ZP(); RLA(); MW_ZP();
ADD_CYCLE(5);
break;
case 0x37: // RLA $??,X
MR_ZX(); RLA(); MW_ZP();
ADD_CYCLE(6);
break;
case 0x2F: // RLA $????
MR_AB(); RLA(); MW_EA();
ADD_CYCLE(6);
break;
case 0x3F: // RLA $????,X
MR_AX(); RLA(); MW_EA();
ADD_CYCLE(7);
break;
case 0x3B: // RLA $????,Y
MR_AY(); RLA(); MW_EA();
ADD_CYCLE(7);
break;
case 0x23: // RLA ($??,X)
MR_IX(); RLA(); MW_EA();
ADD_CYCLE(8);
break;
case 0x33: // RLA ($??),Y
MR_IY(); RLA(); MW_EA();
ADD_CYCLE(8);
break;
case 0x67: // RRA $??
MR_ZP(); RRA(); MW_ZP();
ADD_CYCLE(5);
break;
case 0x77: // RRA $??,X
MR_ZX(); RRA(); MW_ZP();
ADD_CYCLE(6);
break;
case 0x6F: // RRA $????
MR_AB(); RRA(); MW_EA();
ADD_CYCLE(6);
break;
case 0x7F: // RRA $????,X
MR_AX(); RRA(); MW_EA();
ADD_CYCLE(7);
break;
case 0x7B: // RRA $????,Y
MR_AY(); RRA(); MW_EA();
ADD_CYCLE(7);
break;
case 0x63: // RRA ($??,X)
MR_IX(); RRA(); MW_EA();
ADD_CYCLE(8);
break;
case 0x73: // RRA ($??),Y
MR_IY(); RRA(); MW_EA();
ADD_CYCLE(8);
break;
case 0x87: // SAX $??
MR_ZP(); SAX(); MW_ZP();
ADD_CYCLE(3);
break;
case 0x97: // SAX $??,Y
MR_ZY(); SAX(); MW_ZP();
ADD_CYCLE(4);
break;
case 0x8F: // SAX $????
MR_AB(); SAX(); MW_EA();
ADD_CYCLE(4);
break;
case 0x83: // SAX ($??,X)
MR_IX(); SAX(); MW_EA();
ADD_CYCLE(6);
break;
case 0xCB: // SBX #$??
MR_IM(); SBX();
ADD_CYCLE(2);
break;
case 0x9F: // SHA $????,Y
MR_AY(); SHA(); MW_EA();
ADD_CYCLE(5);
break;
case 0x93: // SHA ($??),Y
MR_IY(); SHA(); MW_EA();
ADD_CYCLE(6);
break;
case 0x9B: // SHS $????,Y
MR_AY(); SHS(); MW_EA();
ADD_CYCLE(5);
break;
case 0x9E: // SHX $????,Y
MR_AY(); SHX(); MW_EA();
ADD_CYCLE(5);
break;
case 0x9C: // SHY $????,X
MR_AX(); SHY(); MW_EA();
ADD_CYCLE(5);
break;
case 0x07: // SLO $??
MR_ZP(); SLO(); MW_ZP();
ADD_CYCLE(5);
break;
case 0x17: // SLO $??,X
MR_ZX(); SLO(); MW_ZP();
ADD_CYCLE(6);
break;
case 0x0F: // SLO $????
MR_AB(); SLO(); MW_EA();
ADD_CYCLE(6);
break;
case 0x1F: // SLO $????,X
MR_AX(); SLO(); MW_EA();
ADD_CYCLE(7);
break;
case 0x1B: // SLO $????,Y
MR_AY(); SLO(); MW_EA();
ADD_CYCLE(7);
break;
case 0x03: // SLO ($??,X)
MR_IX(); SLO(); MW_EA();
ADD_CYCLE(8);
break;
case 0x13: // SLO ($??),Y
MR_IY(); SLO(); MW_EA();
ADD_CYCLE(8);
break;
case 0x47: // SRE $??
MR_ZP(); SRE(); MW_ZP();
ADD_CYCLE(5);
break;
case 0x57: // SRE $??,X
MR_ZX(); SRE(); MW_ZP();
ADD_CYCLE(6);
break;
case 0x4F: // SRE $????
MR_AB(); SRE(); MW_EA();
ADD_CYCLE(6);
break;
case 0x5F: // SRE $????,X
MR_AX(); SRE(); MW_EA();
ADD_CYCLE(7);
break;
case 0x5B: // SRE $????,Y
MR_AY(); SRE(); MW_EA();
ADD_CYCLE(7);
break;
case 0x43: // SRE ($??,X)
MR_IX(); SRE(); MW_EA();
ADD_CYCLE(8);
break;
case 0x53: // SRE ($??),Y
MR_IY(); SRE(); MW_EA();
ADD_CYCLE(8);
break;
case 0xEB: // SBC #$?? (Unofficial)
MR_IM(); SBC();
ADD_CYCLE(2);
break;
case 0x1A: // NOP (Unofficial)
case 0x3A: // NOP (Unofficial)
case 0x5A: // NOP (Unofficial)
case 0x7A: // NOP (Unofficial)
case 0xDA: // NOP (Unofficial)
case 0xFA: // NOP (Unofficial)
ADD_CYCLE(2);
break;
case 0x80: // DOP (CYCLES 2)
case 0x82: // DOP (CYCLES 2)
case 0x89: // DOP (CYCLES 2)
case 0xC2: // DOP (CYCLES 2)
case 0xE2: // DOP (CYCLES 2)
R.PC++;
ADD_CYCLE(2);
break;
case 0x04: // DOP (CYCLES 3)
case 0x44: // DOP (CYCLES 3)
case 0x64: // DOP (CYCLES 3)
R.PC++;
ADD_CYCLE(3);
break;
case 0x14: // DOP (CYCLES 4)
case 0x34: // DOP (CYCLES 4)
case 0x54: // DOP (CYCLES 4)
case 0x74: // DOP (CYCLES 4)
case 0xD4: // DOP (CYCLES 4)
case 0xF4: // DOP (CYCLES 4)
R.PC++;
ADD_CYCLE(4);
break;
case 0x0C: // TOP
case 0x1C: // TOP
case 0x3C: // TOP
case 0x5C: // TOP
case 0x7C: // TOP
case 0xDC: // TOP
case 0xFC: // TOP
R.PC+=2;
ADD_CYCLE(4);
break;
case 0x02: /* JAM */
case 0x12: /* JAM */
case 0x22: /* JAM */
case 0x32: /* JAM */
case 0x42: /* JAM */
case 0x52: /* JAM */
case 0x62: /* JAM */
case 0x72: /* JAM */
case 0x92: /* JAM */
case 0xB2: /* JAM */
case 0xD2: /* JAM */
case 0xF2: /* JAM */
default:
if( !Config.emulator.bIllegalOp ) {
throw CApp::GetErrorString( IDS_ERROR_ILLEGALOPCODE );
goto _execute_exit;
} else {
R.PC--;
ADD_CYCLE(4);
}
break;
// default:
// __assume(0);
}
if( nmi_request ) {
_NMI();
}
request_cycles -= exec_cycles;
TOTAL_cycles += exec_cycles;
// <20>N<EFBFBD><4E><EFBFBD>b<EFBFBD>N<EFBFBD><4E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
mapper->Clock( exec_cycles );
#if DPCM_SYNCCLOCK
apu->SyncDPCM( exec_cycles );
#endif
if( bClockProcess ) {
nes->Clock( exec_cycles );
}
// nes->Clock( exec_cycles );
}
_execute_exit:
#if !DPCM_SYNCCLOCK
apu->SyncDPCM( TOTAL_cycles - OLD_cycles );
#endif
return TOTAL_cycles - OLD_cycles;
}