/* FCE Ultra - NES/Famicom Emulator * * Copyright notice for this file: * Copyright (C) 2002 Ben Parnell * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ case 0x00: /* BRK */ _PC++; PUSH(_PC>>8); PUSH(_PC); _P|=B_FLAG; PUSH(_P|U_FLAG); _P|=I_FLAG; _PC=RdMem(0xFFFE); _PC|=RdMem(0xFFFF)<<8; break; case 0x40: /* RTI */ _P=POP(); _PI=_P; _PC=POP(); _PC|=POP()<<8; break; case 0x60: /* RTS */ _PC=POP(); _PC|=POP()<<8; _PC++; break; case 0x48: /* PHA */ PUSH(_A); break; case 0x08: /* PHP */ PUSH(_P|U_FLAG|B_FLAG); break; case 0x68: /* PLA */ _A=POP(); X_ZN(_A); break; case 0x28: /* PLP */ _P=POP(); break; case 0x4C: { unsigned int npc; /* uint16 ptmp=_PC; npc=RdMem(ptmp); ptmp++; npc|=RdMem(ptmp)<<8; */ npc=RdMem(_PC++); npc|=RdMem(_PC++)<<8; _PC=npc; } break; /* JMP ABSOLUTE */ case 0x6C: { uint32 tmp; GetAB(tmp); _PC=RdMem(tmp); _PC|=RdMem( ((tmp+1)&0x00FF) | (tmp&0xFF00))<<8; } break; case 0x20: /* JSR */ { uint32 npc; npc=RdMem(_PC++); PUSH(_PC>>8); PUSH(_PC); npc|=RdMem(_PC++)<<8; _PC=npc; } break; case 0xAA: /* TAX */ _X=_A; X_ZN(_A); break; case 0x8A: /* TXA */ _A=_X; X_ZN(_A); break; case 0xA8: /* TAY */ _Y=_A; X_ZN(_A); break; case 0x98: /* TYA */ _A=_Y; X_ZN(_A); break; case 0xBA: /* TSX */ _X=_S; X_ZN(_X); break; case 0x9A: /* TXS */ _S=_X; break; case 0xCA: /* DEX */ _X--; X_ZN(_X); break; case 0x88: /* DEY */ _Y--; X_ZN(_Y); break; case 0xE8: /* INX */ _X++; X_ZN(_X); break; case 0xC8: /* INY */ _Y++; X_ZN(_Y); break; case 0x18: /* CLC */ _P&=~C_FLAG; break; case 0xD8: /* CLD */ _P&=~D_FLAG; break; case 0x58: /* CLI */ _P&=~I_FLAG; break; case 0xB8: /* CLV */ _P&=~V_FLAG; break; case 0x38: /* SEC */ _P|=C_FLAG; break; case 0xF8: /* SED */ _P|=D_FLAG; break; case 0x78: /* SEI */ _P|=I_FLAG; break; case 0xEA: /* NOP */ break; case 0x0A: RMW_A(ASL); case 0x06: RMW_ZP(ASL); case 0x16: RMW_ZPX(ASL); case 0x0E: RMW_AB(ASL); case 0x1E: RMW_ABX(ASL); case 0xC6: RMW_ZP(DEC); case 0xD6: RMW_ZPX(DEC); case 0xCE: RMW_AB(DEC); case 0xDE: RMW_ABX(DEC); case 0xE6: RMW_ZP(INC); case 0xF6: RMW_ZPX(INC); case 0xEE: RMW_AB(INC); case 0xFE: RMW_ABX(INC); case 0x4A: RMW_A(LSR); case 0x46: RMW_ZP(LSR); case 0x56: RMW_ZPX(LSR); case 0x4E: RMW_AB(LSR); case 0x5E: RMW_ABX(LSR); case 0x2A: RMW_A(ROL); case 0x26: RMW_ZP(ROL); case 0x36: RMW_ZPX(ROL); case 0x2E: RMW_AB(ROL); case 0x3E: RMW_ABX(ROL); case 0x6A: RMW_A(ROR); case 0x66: RMW_ZP(ROR); case 0x76: RMW_ZPX(ROR); case 0x6E: RMW_AB(ROR); case 0x7E: RMW_ABX(ROR); case 0x69: LD_IM(ADC); case 0x65: LD_ZP(ADC); case 0x75: LD_ZPX(ADC); case 0x6D: LD_AB(ADC); case 0x7D: LD_ABX(ADC); case 0x79: LD_ABY(ADC); case 0x61: LD_IX(ADC); case 0x71: LD_IY(ADC); case 0x29: LD_IM(AND); case 0x25: LD_ZP(AND); case 0x35: LD_ZPX(AND); case 0x2D: LD_AB(AND); case 0x3D: LD_ABX(AND); case 0x39: LD_ABY(AND); case 0x21: LD_IX(AND); case 0x31: LD_IY(AND); case 0x24: LD_ZP(BIT); case 0x2C: LD_AB(BIT); case 0xC9: LD_IM(CMP); case 0xC5: LD_ZP(CMP); case 0xD5: LD_ZPX(CMP); case 0xCD: LD_AB(CMP); case 0xDD: LD_ABX(CMP); case 0xD9: LD_ABY(CMP); case 0xC1: LD_IX(CMP); case 0xD1: LD_IY(CMP); case 0xE0: LD_IM(CPX); case 0xE4: LD_ZP(CPX); case 0xEC: LD_AB(CPX); case 0xC0: LD_IM(CPY); case 0xC4: LD_ZP(CPY); case 0xCC: LD_AB(CPY); case 0x49: LD_IM(EOR); case 0x45: LD_ZP(EOR); case 0x55: LD_ZPX(EOR); case 0x4D: LD_AB(EOR); case 0x5D: LD_ABX(EOR); case 0x59: LD_ABY(EOR); case 0x41: LD_IX(EOR); case 0x51: LD_IY(EOR); case 0xA9: LD_IM(LDA); case 0xA5: LD_ZP(LDA); case 0xB5: LD_ZPX(LDA); case 0xAD: LD_AB(LDA); case 0xBD: LD_ABX(LDA); case 0xB9: LD_ABY(LDA); case 0xA1: LD_IX(LDA); case 0xB1: LD_IY(LDA); case 0xA2: LD_IM(LDX); case 0xA6: LD_ZP(LDX); case 0xB6: LD_ZPY(LDX); case 0xAE: LD_AB(LDX); case 0xBE: LD_ABY(LDX); case 0xA0: LD_IM(LDY); case 0xA4: LD_ZP(LDY); case 0xB4: LD_ZPX(LDY); case 0xAC: LD_AB(LDY); case 0xBC: LD_ABX(LDY); case 0x09: LD_IM(ORA); case 0x05: LD_ZP(ORA); case 0x15: LD_ZPX(ORA); case 0x0D: LD_AB(ORA); case 0x1D: LD_ABX(ORA); case 0x19: LD_ABY(ORA); case 0x01: LD_IX(ORA); case 0x11: LD_IY(ORA); case 0xEB: /* (undocumented) */ case 0xE9: LD_IM(SBC); case 0xE5: LD_ZP(SBC); case 0xF5: LD_ZPX(SBC); case 0xED: LD_AB(SBC); case 0xFD: LD_ABX(SBC); case 0xF9: LD_ABY(SBC); case 0xE1: LD_IX(SBC); case 0xF1: LD_IY(SBC); case 0x85: ST_ZP(_A); case 0x95: ST_ZPX(_A); case 0x8D: ST_AB(_A); case 0x9D: ST_ABX(_A); case 0x99: ST_ABY(_A); case 0x81: ST_IX(_A); case 0x91: ST_IY(_A); case 0x86: ST_ZP(_X); case 0x96: ST_ZPY(_X); case 0x8E: ST_AB(_X); case 0x84: ST_ZP(_Y); case 0x94: ST_ZPX(_Y); case 0x8C: ST_AB(_Y); /* BCC */ case 0x90: if(_P&C_FLAG) _PC++; else {JR();} break; /* BCS */ case 0xB0: if(_P&C_FLAG) {JR();} else _PC++; break; /* BEQ */ case 0xF0: if(_P&Z_FLAG) {JR();} else _PC++; break; /* BNE */ case 0xD0: if(_P&Z_FLAG) _PC++; else {JR();} break; /* BMI */ case 0x30: if(_P&N_FLAG) {JR();} else _PC++; break; /* BPL */ case 0x10: if(_P&N_FLAG) _PC++; else {JR();} break; /* BVC */ case 0x50: if(_P&V_FLAG) _PC++; else {JR();} break; /* BVS */ case 0x70: if(_P&V_FLAG) {JR();} else _PC++; break; /* Here comes the undocumented instructions. Note that this implementation may be "wrong". If so, please tell me. */ /* AAC */ case 0x2B: case 0x0B: LD_IM(AND;_P&=~C_FLAG;_P|=_A>>7); /* AAX */ case 0x87: ST_ZP(_A&_X); case 0x97: ST_ZPY(_A&_X); case 0x8F: ST_AB(_A&_X); case 0x83: ST_IX(_A&_X); /* ARR - ARGH, MATEY! */ case 0x6B: { uint8 arrtmp; LD_IM(AND;_P&=~V_FLAG;_P|=(_A^(_A>>1))&0x40;arrtmp=_A>>7;_A>>=1;_A|=(_P&C_FLAG)<<7;_P&=~C_FLAG;_P|=arrtmp;X_ZN(_A)); } /* ASR */ case 0x4B: LD_IM(AND;LSRA); /* ATX(OAL) Is this(OR with $EE) correct? */ case 0xAB: LD_IM(_A|=0xEE;AND;_X=_A); /* AXS */ case 0xCB: LD_IM(AXS); /* DCP */ case 0xC7: RMW_ZP(DEC;CMP); case 0xD7: RMW_ZPX(DEC;CMP); case 0xCF: RMW_AB(DEC;CMP); case 0xDF: RMW_ABX(DEC;CMP); case 0xDB: RMW_ABY(DEC;CMP); case 0xC3: RMW_IX(DEC;CMP); case 0xD3: RMW_IY(DEC;CMP); /* ISC */ case 0xE7: RMW_ZP(INC;SBC); case 0xF7: RMW_ZPX(INC;SBC); case 0xEF: RMW_AB(INC;SBC); case 0xFF: RMW_ABX(INC;SBC); case 0xFB: RMW_ABY(INC;SBC); case 0xE3: RMW_IX(INC;SBC); case 0xF3: RMW_IY(INC;SBC); /* DOP */ case 0x04: _PC++;break; case 0x14: _PC++;break; case 0x34: _PC++;break; case 0x44: _PC++;break; case 0x54: _PC++;break; case 0x64: _PC++;break; case 0x74: _PC++;break; case 0x80: _PC++;break; case 0x82: _PC++;break; case 0x89: _PC++;break; case 0xC2: _PC++;break; case 0xD4: _PC++;break; case 0xE2: _PC++;break; case 0xF4: _PC++;break; /* KIL */ case 0x02: case 0x12: case 0x22: case 0x32: case 0x42: case 0x52: case 0x62: case 0x72: case 0x92: case 0xB2: case 0xD2: case 0xF2:ADDCYC(0xFF); _jammed=1; _PC--; break; /* LAR */ case 0xBB: RMW_ABY(_S&=x;_A=_X=_S;X_ZN(_X)); /* LAX */ case 0xA7: LD_ZP(LDA;LDX); case 0xB7: LD_ZPY(LDA;LDX); case 0xAF: LD_AB(LDA;LDX); case 0xBF: LD_ABY(LDA;LDX); case 0xA3: LD_IX(LDA;LDX); case 0xB3: LD_IY(LDA;LDX); /* NOP */ case 0x1A: case 0x3A: case 0x5A: case 0x7A: case 0xDA: case 0xFA: break; /* RLA */ case 0x27: RMW_ZP(ROL;AND); case 0x37: RMW_ZPX(ROL;AND); case 0x2F: RMW_AB(ROL;AND); case 0x3F: RMW_ABX(ROL;AND); case 0x3B: RMW_ABY(ROL;AND); case 0x23: RMW_IX(ROL;AND); case 0x33: RMW_IY(ROL;AND); /* RRA */ case 0x67: RMW_ZP(ROR;ADC); case 0x77: RMW_ZPX(ROR;ADC); case 0x6F: RMW_AB(ROR;ADC); case 0x7F: RMW_ABX(ROR;ADC); case 0x7B: RMW_ABY(ROR;ADC); case 0x63: RMW_IX(ROR;ADC); case 0x73: RMW_IY(ROR;ADC); /* SLO */ case 0x07: RMW_ZP(ASL;ORA); case 0x17: RMW_ZPX(ASL;ORA); case 0x0F: RMW_AB(ASL;ORA); case 0x1F: RMW_ABX(ASL;ORA); case 0x1B: RMW_ABY(ASL;ORA); case 0x03: RMW_IX(ASL;ORA); case 0x13: RMW_IY(ASL;ORA); /* SRE */ case 0x47: RMW_ZP(LSR;EOR); case 0x57: RMW_ZPX(LSR;EOR); case 0x4F: RMW_AB(LSR;EOR); case 0x5F: RMW_ABX(LSR;EOR); case 0x5B: RMW_ABY(LSR;EOR); case 0x43: RMW_IX(LSR;EOR); case 0x53: RMW_IY(LSR;EOR); /* AXA - SHA */ case 0x93: ST_IY(_A&_X&(((A-_Y)>>8)+1)); case 0x9F: ST_ABY(_A&_X&(((A-_Y)>>8)+1)); /* SYA */ case 0x9C: ST_ABX(_Y&(((A-_X)>>8)+1)); /* SXA */ case 0x9E: ST_ABY(_X&(((A-_Y)>>8)+1)); /* XAS */ case 0x9B: _S=_A&_X;ST_ABY(_S& (((A-_Y)>>8)+1) ); /* TOP */ case 0x0C: LD_AB(;); case 0x1C: case 0x3C: case 0x5C: case 0x7C: case 0xDC: case 0xFC: LD_ABX(;); /* XAA - BIG QUESTION MARK HERE */ case 0x8B: _A|=0xEE; _A&=_X; LD_IM(AND);