summaryrefslogtreecommitdiffstatshomepage
path: root/src/emu/cpu/amis2000/amis2000.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/emu/cpu/amis2000/amis2000.c')
-rw-r--r--src/emu/cpu/amis2000/amis2000.c106
1 files changed, 87 insertions, 19 deletions
diff --git a/src/emu/cpu/amis2000/amis2000.c b/src/emu/cpu/amis2000/amis2000.c
index 0e8dae3b8b9..1d0f923a59e 100644
--- a/src/emu/cpu/amis2000/amis2000.c
+++ b/src/emu/cpu/amis2000/amis2000.c
@@ -16,7 +16,7 @@
// S2000 is the most basic one, 64 nibbles internal RAM and 1KB internal ROM
// S2150 increased RAM to 80 nibbles and ROM to 1.5KB
-// high-voltage output versions of these chips (S2000C and S2150C) are identical overall
+// high-voltage output versions of these chips (S2000A and S2150A) are identical overall
const device_type AMI_S2000 = &device_creator<amis2000_device>;
const device_type AMI_S2150 = &device_creator<amis2150_device>;
@@ -48,7 +48,8 @@ amis2000_device::amis2000_device(const machine_config &mconfig, const char *tag,
m_program_config("program", ENDIANNESS_BIG, 8, 13, 0, ADDRESS_MAP_NAME(program_1k)),
m_data_config("data", ENDIANNESS_BIG, 8, 6, 0, ADDRESS_MAP_NAME(data_64x4)),
m_bu_bits(2),
- m_stack_bits(10),
+ m_callstack_bits(10),
+ m_callstack_depth(3),
m_read_k(*this),
m_read_i(*this),
m_read_d(*this),
@@ -57,12 +58,13 @@ amis2000_device::amis2000_device(const machine_config &mconfig, const char *tag,
{
}
-amis2000_device::amis2000_device(const machine_config &mconfig, device_type type, const char *name, const char *tag, device_t *owner, UINT32 clock, UINT8 bu_bits, UINT8 stack_bits, int prgwidth, address_map_constructor program, int datawidth, address_map_constructor data, const char *shortname, const char *source)
+amis2000_device::amis2000_device(const machine_config &mconfig, device_type type, const char *name, const char *tag, device_t *owner, UINT32 clock, UINT8 bu_bits, UINT8 callstack_bits, UINT8 callstack_depth, int prgwidth, address_map_constructor program, int datawidth, address_map_constructor data, const char *shortname, const char *source)
: cpu_device(mconfig, type, name, tag, owner, clock, shortname, source),
m_program_config("program", ENDIANNESS_BIG, 8, prgwidth, 0, program),
m_data_config("data", ENDIANNESS_BIG, 8, datawidth, 0, data),
m_bu_bits(bu_bits),
- m_stack_bits(stack_bits),
+ m_callstack_bits(callstack_bits),
+ m_callstack_depth(callstack_depth),
m_read_k(*this),
m_read_i(*this),
m_read_d(*this),
@@ -72,7 +74,7 @@ amis2000_device::amis2000_device(const machine_config &mconfig, device_type type
}
amis2150_device::amis2150_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock)
- : amis2000_device(mconfig, AMI_S2150, "AMI S2150", tag, owner, clock, 3, 11, 13, ADDRESS_MAP_NAME(program_1_5k), 7, ADDRESS_MAP_NAME(data_80x4), "amis2150", __FILE__)
+ : amis2000_device(mconfig, AMI_S2150, "AMI S2150", tag, owner, clock, 3, 11, 3, 13, ADDRESS_MAP_NAME(program_1_5k), 7, ADDRESS_MAP_NAME(data_80x4), "amis2150", __FILE__)
{
}
@@ -112,7 +114,7 @@ offs_t amis2000_device::disasm_disassemble(char *buffer, offs_t pc, const UINT8
enum
{
S2000_PC=1, S2000_BL, S2000_BU,
- S2000_A, S2000_E
+ S2000_ACC, S2000_E
};
void amis2000_device::device_start()
@@ -127,34 +129,34 @@ void amis2000_device::device_start()
m_write_a.resolve_safe();
m_bu_mask = (1 << m_bu_bits) - 1;
- m_stack_mask = (1 << m_stack_bits) - 1;
+ m_callstack_mask = (1 << m_callstack_bits) - 1;
// zerofill
- m_stack[0] = m_stack[1] = m_stack[2] = 0;
+ memset(m_callstack, 0, sizeof(m_callstack));
m_pc = 0;
m_op = 0;
m_f = 0;
m_bl = 0;
m_bu = 0;
- m_a = 0;
+ m_acc = 0;
m_e = 0;
// register for savestates
- save_item(NAME(m_stack));
+ save_item(NAME(m_callstack));
save_item(NAME(m_pc));
save_item(NAME(m_op));
save_item(NAME(m_f));
save_item(NAME(m_bl));
save_item(NAME(m_bu));
- save_item(NAME(m_a));
+ save_item(NAME(m_acc));
save_item(NAME(m_e));
// register state for debugger
state_add(S2000_PC, "PC", m_pc ).formatstr("%04X");
state_add(S2000_BL, "BL", m_bl ).formatstr("%01X");
state_add(S2000_BU, "BU", m_bu ).formatstr("%01X");
- state_add(S2000_A, "A", m_a ).formatstr("%01X");
- state_add(S2000_E, "E", m_a ).formatstr("%01X");
+ state_add(S2000_ACC, "ACC", m_acc ).formatstr("%01X");
+ state_add(S2000_E, "E", m_e ).formatstr("%01X");
state_add(STATE_GENPC, "curpc", m_pc).formatstr("%04X").noshow();
state_add(STATE_GENFLAGS, "GENFLAGS", m_f).formatstr("%6s").noshow();
@@ -183,7 +185,7 @@ void amis2000_device::device_reset()
void amis2000_device::execute_run()
{
- do
+ while (m_icount > 0)
{
m_icount--;
@@ -191,10 +193,76 @@ void amis2000_device::execute_run()
m_op = m_program->read_byte(m_pc);
m_pc = (m_pc + 1) & 0x1fff;
- switch (m_op)
+ switch (m_op & 0xf0)
{
- default: break;
- }
-
- } while (m_icount > 0);
+ 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_illegal(); break; // reserved for devkit-use
+ 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;
+
+ }
+ break;
+ } // big switch
+ }
}