// license:BSD-3-Clause // copyright-holders:hap /* Sharp SM510 MCU core implementation */ #include "sm510.h" #include "debugger.h" // MCU types const device_type SM510 = &device_creator; // internal memory maps static ADDRESS_MAP_START(program_2_7k, AS_PROGRAM, 8, sm510_base_device) AM_RANGE(0x0000, 0x02bf) AM_ROM AM_RANGE(0x0400, 0x06bf) AM_ROM AM_RANGE(0x0800, 0x0abf) AM_ROM AM_RANGE(0x0c00, 0x0ebf) AM_ROM ADDRESS_MAP_END static ADDRESS_MAP_START(data_96_32x4, AS_DATA, 8, sm510_base_device) AM_RANGE(0x00, 0x5f) AM_RAM AM_RANGE(0x60, 0x6f) AM_RAM AM_SHARE("lcd_ram_a") AM_RANGE(0x70, 0x7f) AM_RAM AM_SHARE("lcd_ram_b") ADDRESS_MAP_END // device definitions sm510_device::sm510_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock) : sm510_base_device(mconfig, SM510, "SM510", tag, owner, clock, 2 /* stack levels */, 12 /* prg width */, ADDRESS_MAP_NAME(program_2_7k), 7 /* data width */, ADDRESS_MAP_NAME(data_96_32x4), "sm510", __FILE__) { } // disasm offs_t sm510_device::disasm_disassemble(char *buffer, offs_t pc, const UINT8 *oprom, const UINT8 *opram, UINT32 options) { extern CPU_DISASSEMBLE(sm510); return CPU_DISASSEMBLE_NAME(sm510)(this, buffer, pc, oprom, opram, options); } //------------------------------------------------- // execute //------------------------------------------------- void sm510_device::get_opcode_param() { // LBL, TL, TML opcodes are 2 bytes if (m_op == 0x5f || (m_op & 0xf0) == 0x70) { m_icount--; m_param = m_program->read_byte(m_pc); increment_pc(); } } void sm510_device::execute_one() { switch (m_op & 0xf0) { case 0x20: op_lax(); break; case 0x30: op_adx(); break; case 0x40: op_lb(); break; case 0x80: case 0x90: case 0xa0: case 0xb0: op_t(); break; case 0xc0: case 0xd0: case 0xe0: case 0xf0: op_tm(); break; default: switch (m_op & 0xfc) { case 0x04: op_rm(); break; case 0x0c: op_sm(); break; case 0x10: op_exc(); break; case 0x14: op_exci(); break; case 0x18: op_lda(); break; case 0x1c: op_excd(); break; case 0x54: op_tmi(); break; case 0x70: case 0x74: case 0x78: op_tl(); break; case 0x7c: op_tml(); break; default: switch (m_op) { case 0x00: op_skip(); break; case 0x01: op_atbp(); break; case 0x02: op_sbm(); break; case 0x03: op_atpl(); break; case 0x08: op_add(); break; case 0x09: op_add11(); break; case 0x0a: op_coma(); break; case 0x0b: op_exbla(); break; case 0x51: op_tb(); break; case 0x52: op_tc(); break; case 0x53: op_tam(); break; case 0x58: op_tis(); break; case 0x59: op_atl(); break; case 0x5a: op_ta0(); break; case 0x5b: op_tabl(); break; case 0x5d: op_cend(); break; case 0x5e: op_tal(); break; case 0x5f: op_lbl(); break; case 0x60: op_atfc(); break; case 0x61: op_atr(); break; case 0x62: op_wr(); break; case 0x63: op_ws(); break; case 0x64: op_incb(); break; case 0x65: op_idiv(); break; case 0x66: op_rc(); break; case 0x67: op_sc(); break; case 0x68: op_tf1(); break; case 0x69: op_tf4(); break; case 0x6a: op_kta(); break; case 0x6b: op_rot(); break; case 0x6c: op_decb(); break; case 0x6d: op_bdc(); break; case 0x6e: op_rtn0(); break; case 0x6f: op_rtn1(); break; default: op_illegal(); break; } break; // 0xff } break; // 0xfc } // big switch // BM high bit is only valid for 1 step m_sbm = (m_op == 0x02); }