1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
|
// license:BSD-3-Clause
// copyright-holders:hap
/*
Rockwell A5000 MCU
*/
#include "emu.h"
#include "a5000.h"
#include "rw5000d.h"
DEFINE_DEVICE_TYPE(A5000, a5000_cpu_device, "a5000", "Rockwell A5000")
// constructor
a5000_cpu_device::a5000_cpu_device(const machine_config &mconfig, device_type type, const char *tag, device_t *owner, const XTAL &clock, int prgwidth, address_map_constructor program, int datawidth, address_map_constructor data) :
b5000_cpu_device(mconfig, type, tag, owner, clock, prgwidth, program, datawidth, data)
{ }
a5000_cpu_device::a5000_cpu_device(const machine_config &mconfig, const char *tag, device_t *owner, const XTAL &clock) :
a5000_cpu_device(mconfig, A5000, tag, owner, clock, 9, address_map_constructor(FUNC(a5000_cpu_device::program_448x8), this), 6, address_map_constructor(FUNC(a5000_cpu_device::data_45x4), this))
{ }
// disasm
std::unique_ptr<util::disasm_interface> a5000_cpu_device::create_disassembler()
{
return std::make_unique<a5000_disassembler>();
}
//-------------------------------------------------
// execute
//-------------------------------------------------
void a5000_cpu_device::execute_one()
{
switch (m_op)
{
case 0x02: op_illegal(); break;
case 0x03: op_tkb(); break;
case 0x76: m_mtd_step = 1; break;
case 0x77: op_atb(); break;
// rest is same as B5000
default: b5000_cpu_device::execute_one(); break;
}
}
//-------------------------------------------------
// changed opcodes (no need for separate file)
//-------------------------------------------------
void a5000_cpu_device::op_mtd_step()
{
assert(m_mtd_step > 0);
// MTD: load strobe + segments (multi step)
switch (m_mtd_step)
{
// step 1: disable strobe and segment drivers
case 1:
m_write_str(0);
op_kseg();
break;
// step 2: load strobe from Bl
case 2:
m_write_str(1 << m_prev_bl);
break;
// step 4: load segment drivers
case 4:
seg_w(m_seg | decode_digit(m_prev3_c << 4 | ram_r()));
m_mtd_step = 0;
return;
default:
break;
}
m_mtd_step++;
}
|