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
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
|
// license:BSD-3-Clause
// copyright-holders:hap
/*
Rockwell MM77LA/MM78LA MCU
*/
#include "emu.h"
#include "mm78la.h"
DEFINE_DEVICE_TYPE(MM78LA, mm78la_device, "mm78la", "Rockwell MM78LA B9000") // MM78L + output PLA and tone generator, no serial i/o
DEFINE_DEVICE_TYPE(MM77LA, mm77la_device, "mm77la", "Rockwell MM77LA B8000") // MM77L + "
// constructor
mm78la_device::mm78la_device(const machine_config &mconfig, const char *tag, device_t *owner, const XTAL &clock) :
mm78la_device(mconfig, MM78LA, tag, owner, clock, 11, address_map_constructor(FUNC(mm78la_device::program_2k), this), 7, address_map_constructor(FUNC(mm78la_device::data_128x4), this))
{ }
mm78la_device::mm78la_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) :
mm78_device(mconfig, type, tag, owner, clock, prgwidth, program, datawidth, data)
{ }
mm77la_device::mm77la_device(const machine_config &mconfig, const char *tag, device_t *owner, const XTAL &clock) :
mm78la_device(mconfig, MM77LA, tag, owner, clock, 11, address_map_constructor(FUNC(mm77la_device::program_1_5k), this), 7, address_map_constructor(FUNC(mm77la_device::data_96x4), this))
{ }
// machine config
void mm78la_device::device_add_mconfig(machine_config &config)
{
PLA(config, "opla", 4, 2*14, 16).set_format(pla_device::FMT::BERKELEY);
}
void mm77la_device::device_add_mconfig(machine_config &config)
{
PLA(config, "opla", 4, 10, 16).set_format(pla_device::FMT::BERKELEY);
}
// initialize
void mm78la_device::device_start()
{
mm78_device::device_start();
set_d_pins(12);
set_r_pins(14);
// zerofill
m_tone_on = 0;
m_tone_freq = 0;
m_tone_count = 1;
m_spk_output = 2;
m_ios_state = 0;
// register for savestates
save_item(NAME(m_tone_on));
save_item(NAME(m_tone_freq));
save_item(NAME(m_tone_count));
save_item(NAME(m_spk_output));
save_item(NAME(m_ios_state));
}
void mm78la_device::device_reset()
{
m_r_mask = 0;
mm78_device::device_reset();
// reset speaker
m_ios_state = 0;
m_tone_on = false;
m_write_spk(m_spk_output);
}
void mm77la_device::device_start()
{
mm78la_device::device_start();
set_r_pins(10);
}
void mm77la_device::device_reset()
{
mm78la_device::device_reset();
}
// speaker
void mm78la_device::cycle()
{
mm78_device::cycle();
m_tone_count++;
// toggle when counter matches
if (m_tone_on && m_tone_count == m_tone_freq)
{
toggle_speaker();
reset_tone_count();
}
}
void mm78la_device::reset_tone_count()
{
m_tone_count = 1;
}
void mm78la_device::toggle_speaker()
{
m_spk_output ^= 3;
m_write_spk(m_spk_output);
}
|