2019 lines
40 KiB
C++
2019 lines
40 KiB
C++
|
/*----------------------------------------------------------------------*/
|
|||
|
/* */
|
|||
|
/* 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;
|
|||
|
}
|
|||
|
|