AxibugEmuOnline/References/VirtuaNESex_src_191105/NES/Cpu.cpp
2024-08-05 17:58:53 +08:00

2057 lines
44 KiB
C++
Raw Blame History

/*----------------------------------------------------------------------*/
/* */
/* 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"
/*--------------[ DEFINE ]-------------------------------*/
#define DPCM_SYNCCLOCK FALSE
/*--------------[ EXTERNAL PROGRAM ]-------------------------------*/
/*--------------[ EXTERNAL WORK ]-------------------------------*/
/*--------------[ WORK ]-------------------------------*/
/*--------------[ CONST ]-------------------------------*/
/*--------------[ PROTOTYPE ]-------------------------------*/
/*--------------[ PROGRAM ]-------------------------------*/
// オペコード
//#define OP6502(A) RD6502((A))
//#define OP6502W(A) RD6502W((A))
// ゼロページリード
#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); }
// サイクルカウンタ
#define ADD_CYCLE(V) { exec_cycles += (V); }
//#define ADD_CYCLE(V) {}
// EFFECTIVE ADDRESSページ境界超えチェック
#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() {}
// フラグ操作
// ゼロ/ネガティブフラグのチェックと設定
#define SET_ZN_FLAG(A) { R.P &= ~(Z_FLAG|N_FLAG); R.P |= ZN_Table[(BYTE)(A)]; }
// フラグセット
#define SET_FLAG(V) { R.P |= (V); }
// フラグクリア
#define CLR_FLAG(V) { R.P &= ~(V); }
// フラグテスト&セット/クリア
#define TST_FLAG(F,V) { R.P &= ~(V); if((F)) R.P |= (V); }
// フラグチェック
#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 + R.X; \
DT = RD6502( EA ); \
}
#define MR_AY() { \
ET = OP6502W( R.PC ); \
R.PC += 2; \
EA = ET + 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 + 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; \
}
// メモリライト
#define MW_ZP() ZPWR(EA,DT)
#define MW_EA() WR6502(EA,DT)
// STACK操作
#define PUSH(V) { STACK[(R.S--)&0xFF]=(V); }
#define POP() STACK[(++R.S)&0xFF]
// 算術演算系
/* 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); \
}
// 論理演算系
/* 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 ); \
}
// ロード/ストア系
/* 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; }
// 比較系
/* 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 ); \
}
// ジャンプ/リターン系
#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; \
}
// DEBUGOUT("_NMI-str!!!!!!!!!!\n");
// DEBUGOUT("_NMI-end!!!!!!!!!!\n");
#define _NMI() { \
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("_IRQ-str!!!!!!!!!!\n");
// DEBUGOUT("_IRQ-end!!!!!!!!!!\n");
#define _IRQ() { \
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("_BRK-str!!!!!!!!!!\n");
// DEBUGOUT("_BRK-end!!!!!!!!!!\n");
#define BRK() { \
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); \
}
#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(); }
// フラグ制御系
#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命令
#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; \
}
//
// コンストラクタ/デストラクタ
//
//CPU::CPU( NES* parent )
CPU::CPU( NES* parent ) : nes(parent)
{
// nes = parent;
m_bClockProcess = FALSE;
}
CPU::~CPU()
{
}
// メモリアクセス
//#define OP6502(A) (CPU_MEM_BANK[(A)>>13][(A)&0x1FFF])
//#define OP6502W(A) (*((WORD*)&CPU_MEM_BANK[(A)>>13][(A)&0x1FFF]))
Mapper* g_mapper=NULL;
//#if 0
#define OP6502(A) RD6502((A))
#define OP6502W(A) RD6502W((A))
//#else
//inline BYTE OP6502( WORD addr )
//{
//#ifdef EMU_DUMP
//return g_mapper->Read( addr );
//#else
//return CPU_MEM_BANK[addr>>13][addr&0x1FFF];
//#endif
//}
//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
//
// #ifdef EMU_DUMP
// WORD w1 = g_mapper->Read( addr );
// WORD w2 = g_mapper->Read( addr+1 );
// return w1|(w2<<8);
// #else
// return *((WORD*)&CPU_MEM_BANK[addr>>13][addr&0x1FFF]);
// #endif
//#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;
return mapper->Read( addr );
}
}
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;
}
//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
}
// メモリライト
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 );
}
}
//
// リセット
//
void CPU::Reset()
{
apu = nes->apu;
mapper = nes->mapper;
g_mapper = 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ペンディングサイクル設定
//
void CPU::DMA( INT cycles )
{
DMA_cycles += cycles;
}
static int nmicount;
//
// 割り込み
//
void CPU::NMI()
{
R.INT_pending |= NMI_FLAG;
nmicount = 0;
}
void CPU::SetIRQ( BYTE mask )
{
R.INT_pending |= mask;
}
void CPU::ClrIRQ( BYTE mask )
{
R.INT_pending &= ~mask;
}
enum ADDRMODE { IMP, ACC, IMM, ADR, ABS, IND, REL, ABX, ABY, ZPG, ZPX, ZPY, INX, INY, ERR, NUM_ADDR_MODES };
enum ADDRMODE TraceAddrMode[256] =
{
IMM, INX, ERR, INX, ZPG, ZPG, ZPG, ZPG, IMP, IMM, ACC, IMM, ABS, ABS, ABS, ABS, REL, INY, ERR, INY, ZPX, ZPX, ZPX, ZPX, IMP, ABY, IMP, ABY, ABX, ABX, ABX, ABX,
ADR, INX, ERR, INX, ZPG, ZPG, ZPG, ZPG, IMP, IMM, ACC, IMM, ABS, ABS, ABS, ABS, REL, INY, ERR, INY, ZPX, ZPX, ZPX, ZPX, IMP, ABY, IMP, ABY, ABX, ABX, ABX, ABX,
IMP, INX, ERR, INX, ZPG, ZPG, ZPG, ZPG, IMP, IMM, ACC, IMM, ADR, ABS, ABS, ABS, REL, INY, ERR, INY, ZPX, ZPX, ZPX, ZPX, IMP, ABY, IMP, ABY, ABX, ABX, ABX, ABX,
IMP, INX, ERR, INX, ZPG, ZPG, ZPG, ZPG, IMP, IMM, ACC, IMM, IND, ABS, ABS, ABS, REL, INY, ERR, INY, ZPX, ZPX, ZPX, ZPX, IMP, ABY, IMP, ABY, ABX, ABX, ABX, ABX,
IMM, INX, IMM, INX, ZPG, ZPG, ZPG, ZPG, IMP, IMM, IMP, IMM, ABS, ABS, ABS, ABS, REL, INY, ERR, INY, ZPX, ZPX, ZPY, ZPY, IMP, ABY, IMP, ABY, ABX, ABX, ABY, ABY,
IMM, INX, IMM, INX, ZPG, ZPG, ZPG, ZPG, IMP, IMM, IMP, IMM, ABS, ABS, ABS, ABS, REL, INY, ERR, INY, ZPX, ZPX, ZPY, ZPY, IMP, ABY, IMP, ABY, ABX, ABX, ABY, ABY,
IMM, INX, IMM, INX, ZPG, ZPG, ZPG, ZPG, IMP, IMM, IMP, IMM, ABS, ABS, ABS, ABS, REL, INY, ERR, INY, ZPX, ZPX, ZPX, ZPX, IMP, ABY, IMP, ABY, ABX, ABX, ABX, ABX,
IMM, INX, IMM, INX, ZPG, ZPG, ZPG, ZPG, IMP, IMM, IMP, IMM, ABS, ABS, ABS, ABS, REL, INY, ERR, INY, ZPX, ZPX, ZPX, ZPX, IMP, ABY, IMP, ABY, ABX, ABX, ABX, ABX
};
char TraceArr[256][5] =
{
" BRK", " ORA", "*HLT", "*SLO", "*NOP", " ORA", " ASL", "*SLO", " PHP", " ORA", " ASL", "*AAC", "*NOP", " ORA", " ASL", "*SLO",
" BPL", " ORA", "*HLT", "*SLO", "*NOP", " ORA", " ASL", "*SLO", " CLC", " ORA", "*NOP", "*SLO", "*NOP", " ORA", " ASL", "*SLO",
" JSR", " AND", "*HLT", "*RLA", " BIT", " AND", " ROL", "*RLA", " PLP", " AND", " ROL", "*AAC", " BIT", " AND", " ROL", "*RLA",
" BMI", " AND", "*HLT", "*RLA", "*NOP", " AND", " ROL", "*RLA", " SEC", " AND", "*NOP", "*RLA", "*NOP", " AND", " ROL", "*RLA",
" RTI", " EOR", "*HLT", "*SRE", "*NOP", " EOR", " LSR", "*SRE", " PHA", " EOR", " LSR", "*ASR", " JMP", " EOR", " LSR", "*SRE",
" BVC", " EOR", "*HLT", "*SRE", "*NOP", " EOR", " LSR", "*SRE", " CLI", " EOR", "*NOP", "*SRE", "*NOP", " EOR", " LSR", "*SRE",
" RTS", " ADC", "*HLT", "*RRA", "*NOP", " ADC", " ROR", "*RRA", " PLA", " ADC", " ROR", "*ARR", " JMP", " ADC", " ROR", "*RRA",
" BVS", " ADC", "*HLT", "*RRA", "*NOP", " ADC", " ROR", "*RRA", " SEI", " ADC", "*NOP", "*RRA", "*NOP", " ADC", " ROR", "*RRA",
"*NOP", " STA", "*NOP", "*SAX", " STY", " STA", " STX", "*SAX", " DEY", "*NOP", " TXA", " ???", " STY", " STA", " STX", "*SAX",
" BCC", " STA", "*HLT", " ???", " STY", " STA", " STX", "*SAX", " TYA", " STA", " TXS", " ???", " ???", " STA", " ???", " ???",
" LDY", " LDA", " LDX", "*LAX", " LDY", " LDA", " LDX", "*LAX", " TAY", " LDA", " TAX", "*ATX", " LDY", " LDA", " LDX", "*LAX",
" BCS", " LDA", "*HLT", "*LAX", " LDY", " LDA", " LDX", "*LAX", " CLV", " LDA", " TSX", " ???", " LDY", " LDA", " LDX", "*LAX",
" CPY", " CMP", "*NOP", "*DCP", " CPY", " CMP", " DEC", "*DCP", " INY", " CMP", " DEX", "*AXS", " CPY", " CMP", " DEC", "*DCP",
" BNE", " CMP", "*HLT", "*DCP", "*NOP", " CMP", " DEC", "*DCP", " CLD", " CMP", "*NOP", "*DCP", "*NOP", " CMP", " DEC", "*DCP",
" CPX", " SBC", "*NOP", "*ISB", " CPX", " SBC", " INC", "*ISB", " INX", " SBC", " NOP", "*SBC", " CPX", " SBC", " INC", "*ISB",
" BEQ", " SBC", "*HLT", "*ISB", "*NOP", " SBC", " INC", "*ISB", " SED", " SBC", "*NOP", "*ISB", "*NOP", " SBC", " INC", "*ISB"
};
unsigned char CPU::DebugMemCPU (unsigned short Addr)
{
return OP6502( Addr );
}
int CPU::DecodeInstruction (unsigned short Addr, char *str1)
{
unsigned char OpData[3] = {0, 0, 0};
unsigned short Operand = 0, MidAddr = 0;
int EffectiveAddr = -1;
//int EffectiveAddr = 0xffff;
int iInstructionLen = 1;
OpData[0] = DebugMemCPU(Addr);
switch (TraceAddrMode[OpData[0]])
{
case IND:
OpData[1] = DebugMemCPU(Addr+1);
OpData[2] = DebugMemCPU(Addr+2);
Operand = OpData[1] | (OpData[2] << 8);
EffectiveAddr = DebugMemCPU(Operand) | (DebugMemCPU(Operand+1) << 8);
iInstructionLen = 3;
break;
case ADR:
OpData[1] = DebugMemCPU(Addr+1);
OpData[2] = DebugMemCPU(Addr+2);Operand = OpData[1] | (OpData[2] << 8);
iInstructionLen = 3;
break;
case ABS:
OpData[1] = DebugMemCPU(Addr+1);
OpData[2] = DebugMemCPU(Addr+2);Operand = OpData[1] | (OpData[2] << 8);
iInstructionLen = 3;
EffectiveAddr = Operand;
break;
case ABX:
OpData[1] = DebugMemCPU(Addr+1);
OpData[2] = DebugMemCPU(Addr+2);Operand = OpData[1] | (OpData[2] << 8);
iInstructionLen = 3;
EffectiveAddr = Operand + R.X;
break;
case ABY:
OpData[1] = DebugMemCPU(Addr+1);
OpData[2] = DebugMemCPU(Addr+2);Operand = OpData[1] | (OpData[2] << 8);
iInstructionLen = 3;
EffectiveAddr = Operand + R.Y;
break;
case IMM:
OpData[1] = DebugMemCPU(Addr+1);
Operand = OpData[1];
iInstructionLen = 2;
break;
case ZPG:
OpData[1] = DebugMemCPU(Addr+1);
Operand = OpData[1];
EffectiveAddr = Operand;
iInstructionLen = 2;
break;
case ZPX:
OpData[1] = DebugMemCPU(Addr+1);
Operand = OpData[1];
EffectiveAddr = (Operand + R.X) & 0xFF;
iInstructionLen = 2;
break;
case ZPY:
OpData[1] = DebugMemCPU(Addr+1);
Operand = OpData[1];
EffectiveAddr = (Operand + R.Y) & 0xFF;
iInstructionLen = 2;
break;
case INX:
OpData[1] = DebugMemCPU(Addr+1);
Operand = OpData[1];
MidAddr = (Operand + R.X) & 0xFF;
EffectiveAddr = DebugMemCPU(MidAddr) | (DebugMemCPU((MidAddr+1) & 0xFF) << 8);
iInstructionLen = 2;
break;
case INY:
OpData[1] = DebugMemCPU(Addr+1);
Operand = OpData[1];
MidAddr = DebugMemCPU(Operand) | (DebugMemCPU((Operand+1) & 0xFF) << 8);
EffectiveAddr = MidAddr + R.Y;
iInstructionLen = 2;
break;
case IMP:
break;
case ACC:
break;
case ERR:
break;
case REL:
OpData[1] = DebugMemCPU(Addr+1);
Operand = Addr+2+(signed char)OpData[1];
iInstructionLen = 2;
break;
}
// Use this for outputting to debug logfile
if (str1)
{
switch (TraceAddrMode[DebugMemCPU(Addr)])
{
case IMP:
case ERR: sprintf(str1, "%04X %02X %s ", Addr, OpData[0], TraceArr[OpData[0]]); break;
case ACC: sprintf(str1, "%04X %02X %s A ", Addr, OpData[0], TraceArr[OpData[0]]); break;
case IMM: sprintf(str1, "%04X %02X %02X %s #$%02X ", Addr, OpData[0], OpData[1], TraceArr[OpData[0]], Operand); break;
case REL: sprintf(str1, "%04X %02X %02X %s $%04X ", Addr, OpData[0], OpData[1], TraceArr[OpData[0]], Operand); break;
case ZPG: sprintf(str1, "%04X %02X %02X %s $%02X = %02X ", Addr, OpData[0], OpData[1], TraceArr[OpData[0]], Operand, DebugMemCPU(Operand)); break;
case ZPX: sprintf(str1, "%04X %02X %02X %s $%02X,X @ %02X = %02X ", Addr, OpData[0], OpData[1], TraceArr[OpData[0]], Operand, EffectiveAddr, DebugMemCPU(EffectiveAddr)); break;
case ZPY: sprintf(str1, "%04X %02X %02X %s $%02X,Y @ %02X = %02X ", Addr, OpData[0], OpData[1], TraceArr[OpData[0]], Operand, EffectiveAddr, DebugMemCPU(EffectiveAddr)); break;
case INX: sprintf(str1, "%04X %02X %02X %s ($%02X,X) @ %02X = %04X = %02X", Addr, OpData[0], OpData[1], TraceArr[OpData[0]], Operand, MidAddr, EffectiveAddr, DebugMemCPU(EffectiveAddr)); break;
case INY: sprintf(str1, "%04X %02X %02X %s ($%02X),Y = %04X @ %04X = %02X", Addr, OpData[0], OpData[1], TraceArr[OpData[0]], Operand, MidAddr, EffectiveAddr, DebugMemCPU(EffectiveAddr)); break;
case ADR: sprintf(str1, "%04X %02X %02X %02X %s $%04X ", Addr, OpData[0], OpData[1], OpData[2], TraceArr[OpData[0]], Operand); break;
case ABS: sprintf(str1, "%04X %02X %02X %02X %s $%04X = %02X ", Addr, OpData[0], OpData[1], OpData[2], TraceArr[OpData[0]], Operand, DebugMemCPU(Operand)); break;
case IND: sprintf(str1, "%04X %02X %02X %02X %s ($%04X) = %04X ", Addr, OpData[0], OpData[1], OpData[2], TraceArr[OpData[0]], Operand, EffectiveAddr); break;
case ABX: sprintf(str1, "%04X %02X %02X %02X %s $%04X,X @ %04X = %02X ", Addr, OpData[0], OpData[1], OpData[2], TraceArr[OpData[0]], Operand, EffectiveAddr, DebugMemCPU(EffectiveAddr)); break;
case ABY: sprintf(str1, "%04X %02X %02X %02X %s $%04X,Y @ %04X = %02X ", Addr, OpData[0], OpData[1], OpData[2], TraceArr[OpData[0]], Operand, EffectiveAddr, DebugMemCPU(EffectiveAddr)); break;
default: strcpy(str1, " "); break;
}
}
return iInstructionLen;
}
//
// 命令実行
//
INT CPU::EXEC( INT request_cycles )
{
BYTE opcode; // オペコード
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;
while( request_cycles > 0 ) {
exec_cycles = 0;
if( DMA_cycles ) {
if( request_cycles <= DMA_cycles ) {
DMA_cycles -= request_cycles;
TOTAL_cycles += request_cycles;
// クロック同期処理
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;
}
}
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;
}
}
}
/*
//ヤ<>モヨクチ靍、イ篌<EFBDB2>ヤケヲトワ
//opcode
BYTE iInstructionLen =1;
switch (TraceAddrMode[opcode])
{
case IND:
case ADR:
case ABS:
case ABX:
case ABY:
iInstructionLen = 3;
break;
case IMM:
case ZPG:
case ZPX:
case ZPY:
case INX:
case INY:
iInstructionLen = 2;
break;
case IMP:case ACC:case ERR: break;
case REL:iInstructionLen = 2;break;
}
if( ((TraceArr[opcode][0]=='*') ||
(TraceArr[opcode][1]=='?'))&&
(!Config.emulator.bIllegalOp) )
{
//ユ簑<EFBE95>ノメヤモナサッハ莎<EFBE8A>ナマ「
#ifdef _DEBUG
char str[111];
DecodeInstruction (R.PC-1, str);
DEBUGOUT( "Bad Instruction:%s\n",str);
#endif
R.PC=(R.PC-1)+iInstructionLen;
ADD_CYCLE(iInstructionLen*2);
goto end_is;
}
//
*/
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;
// フラグ制御系
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;
// スタック系
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;
// その他
case 0x00: // BRK
BRK();
ADD_CYCLE(7);
break;
case 0xEA: // NOP
ADD_CYCLE(2);
break;
// 未公開命令群
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);
}
// end_is: __asm nop;
if( nmi_request ) {
_NMI();
} else
if( irq_request ) {
_IRQ();
}
request_cycles -= exec_cycles;
TOTAL_cycles += exec_cycles;
// クロック同期処理
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;
}