mirror of
https://github.com/bsnes-emu/bsnes.git
synced 2025-02-24 07:02:27 +01:00
4e2eb23835
byuu says: Changelog: - added Cocoa target: higan can now be compiled for OS X Lion [Cydrak, byuu] - SNES/accuracy profile hires color blending improvements - fixes Marvelous text [AWJ] - fixed a slight bug in SNES/SA-1 VBR support caused by a typo - added support for multi-pass shaders that can load external textures (requires OpenGL 3.2+) - added game library path (used by ananke->Import Game) to Settings->Advanced - system profiles, shaders and cheats database can be stored in "all users" shared folders now (eg /usr/share on Linux) - all configuration files are in BML format now, instead of XML (much easier to read and edit this way) - main window supports drag-and-drop of game folders (but not game files / ZIP archives) - audio buffer clears when entering a modal loop on Windows (prevents audio repetition with DirectSound driver) - a substantial amount of code clean-up (probably the biggest refactoring to date) One highly desired target for this release was to default to the optimal drivers instead of the safest drivers, but because AMD drivers don't seem to like my OpenGL 3.2 driver, I've decided to postpone that. AMD has too big a market share. Hopefully with v093 officially released, we can get some public input on what AMD doesn't like.
242 lines
10 KiB
C++
242 lines
10 KiB
C++
#include <processor/processor.hpp>
|
|
#include "r6502.hpp"
|
|
|
|
namespace Processor {
|
|
|
|
#define I
|
|
#define L last_cycle();
|
|
#define call(op) (this->*op)()
|
|
|
|
#include "memory.cpp"
|
|
#include "instructions.cpp"
|
|
#include "disassembler.cpp"
|
|
#include "serialization.cpp"
|
|
|
|
uint8 R6502::mdr() const {
|
|
return regs.mdr;
|
|
}
|
|
|
|
void R6502::power() {
|
|
regs.a = 0x00;
|
|
regs.x = 0x00;
|
|
regs.y = 0x00;
|
|
regs.s = 0x00;
|
|
regs.p = 0x04;
|
|
}
|
|
|
|
void R6502::reset() {
|
|
regs.mdr = 0x00;
|
|
regs.s -= 3;
|
|
regs.p.i = 1;
|
|
}
|
|
|
|
void R6502::interrupt() {
|
|
op_readpc();
|
|
op_readpc();
|
|
op_writesp(regs.pc >> 8);
|
|
op_writesp(regs.pc >> 0);
|
|
op_writesp(regs.p | 0x20);
|
|
uint16 vector = 0xfffe; //IRQ
|
|
nmi(vector);
|
|
abs.l = op_read(vector++);
|
|
regs.p.i = 1;
|
|
regs.p.d = 0;
|
|
L abs.h = op_read(vector++);
|
|
regs.pc = abs.w;
|
|
}
|
|
|
|
void R6502::exec() {
|
|
uint8 opcode = op_readpci();
|
|
switch(opcode) {
|
|
case 0x00: return op_brk();
|
|
case 0x01: return opi_read_indirect_zero_page_x<&R6502::opf_ora>();
|
|
I case 0x04: return opill_nop_zero_page();
|
|
case 0x05: return opi_read_zero_page<&R6502::opf_ora>();
|
|
case 0x06: return opi_rmw_zero_page<&R6502::opf_asl>();
|
|
case 0x08: return op_php();
|
|
case 0x09: return opi_read_immediate<&R6502::opf_ora>();
|
|
case 0x0a: return opi_shift<&R6502::opf_sla>();
|
|
I case 0x0c: return opill_nop_absolute();
|
|
case 0x0d: return opi_read_absolute<&R6502::opf_ora>();
|
|
case 0x0e: return opi_rmw_absolute<&R6502::opf_asl>();
|
|
case 0x10: return opi_branch(regs.p.n == 0);
|
|
case 0x11: return opi_read_indirect_zero_page_y<&R6502::opf_ora>();
|
|
I case 0x14: return opill_nop_zero_page_x();
|
|
case 0x15: return opi_read_zero_page_x<&R6502::opf_ora>();
|
|
case 0x16: return opi_rmw_zero_page_x<&R6502::opf_asl>();
|
|
case 0x18: return opi_clear_flag(regs.p.c);
|
|
case 0x19: return opi_read_absolute_y<&R6502::opf_ora>();
|
|
I case 0x1a: return opill_nop_implied();
|
|
I case 0x1c: return opill_nop_absolute_x();
|
|
case 0x1d: return opi_read_absolute_x<&R6502::opf_ora>();
|
|
case 0x1e: return opi_rmw_absolute_x<&R6502::opf_asl>();
|
|
case 0x20: return op_jsr_absolute();
|
|
case 0x21: return opi_read_indirect_zero_page_x<&R6502::opf_and>();
|
|
case 0x24: return opi_read_zero_page<&R6502::opf_bit>();
|
|
case 0x25: return opi_read_zero_page<&R6502::opf_and>();
|
|
case 0x26: return opi_rmw_zero_page<&R6502::opf_rol>();
|
|
case 0x28: return op_plp();
|
|
case 0x29: return opi_read_immediate<&R6502::opf_and>();
|
|
case 0x2a: return opi_shift<&R6502::opf_rla>();
|
|
case 0x2c: return opi_read_absolute<&R6502::opf_bit>();
|
|
case 0x2d: return opi_read_absolute<&R6502::opf_and>();
|
|
case 0x2e: return opi_rmw_absolute<&R6502::opf_rol>();
|
|
case 0x30: return opi_branch(regs.p.n == 1);
|
|
case 0x31: return opi_read_indirect_zero_page_y<&R6502::opf_and>();
|
|
I case 0x34: return opill_nop_zero_page_x();
|
|
case 0x35: return opi_read_zero_page_x<&R6502::opf_and>();
|
|
case 0x36: return opi_rmw_zero_page_x<&R6502::opf_rol>();
|
|
case 0x38: return opi_set_flag(regs.p.c);
|
|
case 0x39: return opi_read_absolute_y<&R6502::opf_and>();
|
|
I case 0x3a: return opill_nop_implied();
|
|
I case 0x3c: return opill_nop_absolute_x();
|
|
case 0x3d: return opi_read_absolute_x<&R6502::opf_and>();
|
|
case 0x3e: return opi_rmw_absolute_x<&R6502::opf_rol>();
|
|
case 0x40: return op_rti();
|
|
case 0x41: return opi_read_indirect_zero_page_x<&R6502::opf_eor>();
|
|
I case 0x44: return opill_nop_zero_page();
|
|
case 0x45: return opi_read_zero_page<&R6502::opf_eor>();
|
|
case 0x46: return opi_rmw_zero_page<&R6502::opf_lsr>();
|
|
case 0x48: return opi_push(regs.a);
|
|
case 0x49: return opi_read_immediate<&R6502::opf_eor>();
|
|
case 0x4a: return opi_shift<&R6502::opf_sra>();
|
|
case 0x4c: return op_jmp_absolute();
|
|
case 0x4d: return opi_read_absolute<&R6502::opf_eor>();
|
|
case 0x4e: return opi_rmw_absolute<&R6502::opf_lsr>();
|
|
case 0x50: return opi_branch(regs.p.v == 0);
|
|
case 0x51: return opi_read_indirect_zero_page_y<&R6502::opf_eor>();
|
|
I case 0x54: return opill_nop_zero_page_x();
|
|
case 0x55: return opi_read_zero_page_x<&R6502::opf_eor>();
|
|
case 0x56: return opi_rmw_zero_page_x<&R6502::opf_lsr>();
|
|
case 0x58: return opi_clear_flag(regs.p.i);
|
|
case 0x59: return opi_read_absolute_y<&R6502::opf_eor>();
|
|
I case 0x5a: return opill_nop_implied();
|
|
I case 0x5c: return opill_nop_absolute_x();
|
|
case 0x5d: return opi_read_absolute_x<&R6502::opf_eor>();
|
|
case 0x5e: return opi_rmw_absolute_x<&R6502::opf_lsr>();
|
|
case 0x60: return op_rts();
|
|
case 0x61: return opi_read_indirect_zero_page_x<&R6502::opf_adc>();
|
|
I case 0x64: return opill_nop_zero_page();
|
|
case 0x65: return opi_read_zero_page<&R6502::opf_adc>();
|
|
case 0x66: return opi_rmw_zero_page<&R6502::opf_ror>();
|
|
case 0x68: return opi_pull(regs.a);
|
|
case 0x69: return opi_read_immediate<&R6502::opf_adc>();
|
|
case 0x6a: return opi_shift<&R6502::opf_rra>();
|
|
I case 0x6b: return opill_arr_immediate();
|
|
case 0x6c: return op_jmp_indirect_absolute();
|
|
case 0x6d: return opi_read_absolute<&R6502::opf_adc>();
|
|
case 0x6e: return opi_rmw_absolute<&R6502::opf_ror>();
|
|
case 0x70: return opi_branch(regs.p.v == 1);
|
|
I case 0x74: return opill_nop_zero_page_x();
|
|
case 0x71: return opi_read_indirect_zero_page_y<&R6502::opf_adc>();
|
|
case 0x75: return opi_read_zero_page_x<&R6502::opf_adc>();
|
|
case 0x76: return opi_rmw_zero_page_x<&R6502::opf_ror>();
|
|
case 0x78: return opi_set_flag(regs.p.i);
|
|
case 0x79: return opi_read_absolute_y<&R6502::opf_adc>();
|
|
I case 0x7a: return opill_nop_implied();
|
|
I case 0x7c: return opill_nop_absolute_x();
|
|
case 0x7d: return opi_read_absolute_x<&R6502::opf_adc>();
|
|
case 0x7e: return opi_rmw_absolute_x<&R6502::opf_ror>();
|
|
I case 0x80: return opill_nop_absolute();
|
|
case 0x81: return opi_store_indirect_zero_page_x(regs.a);
|
|
I case 0x82: return opill_nop_immediate();
|
|
case 0x84: return opi_store_zero_page(regs.y);
|
|
case 0x85: return opi_store_zero_page(regs.a);
|
|
case 0x86: return opi_store_zero_page(regs.x);
|
|
case 0x88: return opi_decrement(regs.y);
|
|
I case 0x89: return opill_nop_immediate();
|
|
case 0x8a: return opi_transfer(regs.x, regs.a, 1);
|
|
case 0x8c: return opi_store_absolute(regs.y);
|
|
case 0x8d: return opi_store_absolute(regs.a);
|
|
case 0x8e: return opi_store_absolute(regs.x);
|
|
case 0x90: return opi_branch(regs.p.c == 0);
|
|
case 0x91: return opi_store_indirect_zero_page_y(regs.a);
|
|
case 0x94: return opi_store_zero_page_x(regs.y);
|
|
case 0x95: return opi_store_zero_page_x(regs.a);
|
|
case 0x96: return opi_store_zero_page_y(regs.x);
|
|
case 0x98: return opi_transfer(regs.y, regs.a, 1);
|
|
case 0x99: return opi_store_absolute_y(regs.a);
|
|
case 0x9a: return opi_transfer(regs.x, regs.s, 0);
|
|
case 0x9d: return opi_store_absolute_x(regs.a);
|
|
case 0xa0: return opi_read_immediate<&R6502::opf_ldy>();
|
|
case 0xa1: return opi_read_indirect_zero_page_x<&R6502::opf_lda>();
|
|
case 0xa2: return opi_read_immediate<&R6502::opf_ldx>();
|
|
case 0xa4: return opi_read_zero_page<&R6502::opf_ldy>();
|
|
case 0xa5: return opi_read_zero_page<&R6502::opf_lda>();
|
|
case 0xa6: return opi_read_zero_page<&R6502::opf_ldx>();
|
|
case 0xa8: return opi_transfer(regs.a, regs.y, 1);
|
|
case 0xa9: return opi_read_immediate<&R6502::opf_lda>();
|
|
case 0xaa: return opi_transfer(regs.a, regs.x, 1);
|
|
case 0xac: return opi_read_absolute<&R6502::opf_ldy>();
|
|
case 0xad: return opi_read_absolute<&R6502::opf_lda>();
|
|
case 0xae: return opi_read_absolute<&R6502::opf_ldx>();
|
|
case 0xb0: return opi_branch(regs.p.c == 1);
|
|
case 0xb1: return opi_read_indirect_zero_page_y<&R6502::opf_lda>();
|
|
case 0xb4: return opi_read_zero_page_x<&R6502::opf_ldy>();
|
|
case 0xb5: return opi_read_zero_page_x<&R6502::opf_lda>();
|
|
case 0xb6: return opi_read_zero_page_y<&R6502::opf_ldx>();
|
|
case 0xb8: return opi_clear_flag(regs.p.v);
|
|
case 0xb9: return opi_read_absolute_y<&R6502::opf_lda>();
|
|
case 0xba: return opi_transfer(regs.s, regs.x, 1);
|
|
case 0xbc: return opi_read_absolute_x<&R6502::opf_ldy>();
|
|
case 0xbd: return opi_read_absolute_x<&R6502::opf_lda>();
|
|
case 0xbe: return opi_read_absolute_y<&R6502::opf_ldx>();
|
|
case 0xc0: return opi_read_immediate<&R6502::opf_cpy>();
|
|
case 0xc1: return opi_read_indirect_zero_page_x<&R6502::opf_cmp>();
|
|
I case 0xc2: return opill_nop_immediate();
|
|
case 0xc4: return opi_read_zero_page<&R6502::opf_cpy>();
|
|
case 0xc5: return opi_read_zero_page<&R6502::opf_cmp>();
|
|
case 0xc6: return opi_rmw_zero_page<&R6502::opf_dec>();
|
|
case 0xc8: return opi_increment(regs.y);
|
|
case 0xc9: return opi_read_immediate<&R6502::opf_cmp>();
|
|
case 0xca: return opi_decrement(regs.x);
|
|
case 0xcc: return opi_read_absolute<&R6502::opf_cpy>();
|
|
case 0xcd: return opi_read_absolute<&R6502::opf_cmp>();
|
|
case 0xce: return opi_rmw_absolute<&R6502::opf_dec>();
|
|
case 0xd0: return opi_branch(regs.p.z == 0);
|
|
case 0xd1: return opi_read_indirect_zero_page_y<&R6502::opf_cmp>();
|
|
I case 0xd4: return opill_nop_zero_page_x();
|
|
case 0xd5: return opi_read_zero_page_x<&R6502::opf_cmp>();
|
|
case 0xd6: return opi_rmw_zero_page_x<&R6502::opf_dec>();
|
|
case 0xd8: return opi_clear_flag(regs.p.d);
|
|
case 0xd9: return opi_read_absolute_y<&R6502::opf_cmp>();
|
|
I case 0xda: return opill_nop_implied();
|
|
I case 0xdc: return opill_nop_absolute_x();
|
|
case 0xdd: return opi_read_absolute_x<&R6502::opf_cmp>();
|
|
case 0xde: return opi_rmw_absolute_x<&R6502::opf_dec>();
|
|
case 0xe0: return opi_read_immediate<&R6502::opf_cpx>();
|
|
case 0xe1: return opi_read_indirect_zero_page_x<&R6502::opf_sbc>();
|
|
I case 0xe2: return opill_nop_immediate();
|
|
case 0xe4: return opi_read_zero_page<&R6502::opf_cpx>();
|
|
case 0xe5: return opi_read_zero_page<&R6502::opf_sbc>();
|
|
case 0xe6: return opi_rmw_zero_page<&R6502::opf_inc>();
|
|
case 0xe8: return opi_increment(regs.x);
|
|
case 0xe9: return opi_read_immediate<&R6502::opf_sbc>();
|
|
case 0xea: return op_nop();
|
|
I case 0xeb: return opi_read_immediate<&R6502::opf_sbc>();
|
|
case 0xec: return opi_read_absolute<&R6502::opf_cpx>();
|
|
case 0xed: return opi_read_absolute<&R6502::opf_sbc>();
|
|
case 0xee: return opi_rmw_absolute<&R6502::opf_inc>();
|
|
case 0xf0: return opi_branch(regs.p.z == 1);
|
|
case 0xf1: return opi_read_indirect_zero_page_y<&R6502::opf_sbc>();
|
|
I case 0xf4: return opill_nop_zero_page_x();
|
|
case 0xf5: return opi_read_zero_page_x<&R6502::opf_sbc>();
|
|
case 0xf6: return opi_rmw_zero_page_x<&R6502::opf_inc>();
|
|
case 0xf8: return opi_set_flag(regs.p.d);
|
|
case 0xf9: return opi_read_absolute_y<&R6502::opf_sbc>();
|
|
I case 0xfa: return opill_nop_implied();
|
|
I case 0xfc: return opill_nop_absolute_x();
|
|
case 0xfd: return opi_read_absolute_x<&R6502::opf_sbc>();
|
|
case 0xfe: return opi_rmw_absolute_x<&R6502::opf_inc>();
|
|
}
|
|
|
|
//unimplemented opcode
|
|
return op_nop();
|
|
}
|
|
|
|
#undef I
|
|
#undef L
|
|
#undef call
|
|
|
|
}
|