void amis2000_base_device::execute_run()
{
while (m_icount > 0)
{
m_icount--;
// remember previous opcode
m_prev_op = m_op;
debugger_instruction_hook(this, m_pc);
m_op = m_program->read_byte(m_pc);
m_pc = (m_pc + 1) & 0x1fff;
if (m_skip)
{
// always skip over PP prefix
m_skip = ((m_op & 0xf0) == 0x60);
m_op = 0; // nop
}
switch (m_op & 0xf0)
{
case 0x50: op_adis(); break;
case 0x60: op_pp(); break;
case 0x70: op_lai(); break;
case 0x80: case 0x90: case 0xa0: case 0xb0: op_jms(); break;
case 0xc0: case 0xd0: case 0xe0: case 0xf0: op_jmp(); break;
default:
switch (m_op)
{
case 0x00: op_nop(); break;
case 0x01: op_halt(); break;
case 0x02: op_rt(); break;
case 0x03: op_rts(); break;
case 0x04: op_psh(); break;
case 0x05: op_psl(); break;
case 0x06: op_and(); break;
case 0x07: op_sos(); break;
case 0x08: op_sbe(); break;
case 0x09: op_szc(); break;
case 0x0a: op_stc(); break;
case 0x0b: op_rsc(); break;
case 0x0c: op_lae(); break;
case 0x0d: op_xae(); break;
case 0x0e: op_inp(); break;
case 0x0f: op_eur(); break;
case 0x10: op_cma(); break;
case 0x11: op_xabu(); break;
case 0x12: op_lab(); break;
case 0x13: op_xab(); break;
case 0x14: op_adcs(); break;
case 0x15: op_xor(); break;
case 0x16: op_add(); break;
case 0x17: op_sam(); break;
case 0x18: op_disb(); break;
case 0x19: op_mvs(); break;
case 0x1a: op_out(); break;
case 0x1b: op_disn(); break;
case 0x28: op_szk(); break;
case 0x29: op_szi(); break;
case 0x2a: op_rf1(); break;
case 0x2b: op_sf1(); break;
case 0x2c: op_rf2(); break;
case 0x2d: op_sf2(); break;
case 0x2e: op_tf1(); break;
case 0x2f: op_tf2(); break;
default:
switch (m_op & 0xfc)
{
case 0x1c: op_szm(); break;
case 0x20: op_stm(); break;
case 0x24: op_rsm(); break;
case 0x30: op_xci(); break;
case 0x34: op_xcd(); break;
case 0x38: op_xc(); break;
case 0x3c: op_lam(); break;
case 0x40: op_lbz(); break;
case 0x44: op_lbf(); break;
case 0x48: op_lbe(); break;
case 0x4c: op_lbep(); break;
}
break; // 0xfc
}
break; // 0xff
} // big switch
}
}
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);
}
