mirror of
https://github.com/holub/mame
synced 2025-06-06 21:03:47 +03:00
(MESS) spc1000 : cassette motor cleanup & small fix (nw)
This commit is contained in:
parent
c25f6d922d
commit
707c351fe9
@ -172,7 +172,7 @@ private:
|
|||||||
UINT8 m_GMODE;
|
UINT8 m_GMODE;
|
||||||
UINT16 m_page;
|
UINT16 m_page;
|
||||||
UINT8 *m_work_ram;
|
UINT8 *m_work_ram;
|
||||||
UINT8 m_motor;
|
bool m_motor;
|
||||||
virtual void machine_start();
|
virtual void machine_start();
|
||||||
virtual void machine_reset();
|
virtual void machine_reset();
|
||||||
required_device<z80_device> m_maincpu;
|
required_device<z80_device> m_maincpu;
|
||||||
@ -208,11 +208,11 @@ READ8_MEMBER(spc1000_state::iplk_r)
|
|||||||
|
|
||||||
WRITE8_MEMBER( spc1000_state::cass_w )
|
WRITE8_MEMBER( spc1000_state::cass_w )
|
||||||
{
|
{
|
||||||
char m = BIT(data, 1);
|
bool m = BIT(data, 1);
|
||||||
m_cass->output(BIT(data, 0) ? -1.0 : 1.0);
|
m_cass->output(BIT(data, 0) ? -1.0 : 1.0);
|
||||||
if (m != m_motor && m == 1)
|
if (m != m_motor && m == 1)
|
||||||
m_cass->change_state(m_cass->get_state() & CASSETTE_MASK_MOTOR ? CASSETTE_MOTOR_ENABLED : CASSETTE_MOTOR_DISABLED, CASSETTE_MASK_MOTOR);
|
m_cass->change_state(m_cass->get_state() & CASSETTE_MASK_MOTOR ? CASSETTE_MOTOR_ENABLED : CASSETTE_MOTOR_DISABLED, CASSETTE_MASK_MOTOR);
|
||||||
m_motor = m;
|
m_motor = m;
|
||||||
}
|
}
|
||||||
|
|
||||||
WRITE8_MEMBER(spc1000_state::gmode_w)
|
WRITE8_MEMBER(spc1000_state::gmode_w)
|
||||||
@ -471,7 +471,7 @@ static MACHINE_CONFIG_START( spc1000, spc1000_state )
|
|||||||
|
|
||||||
MCFG_CASSETTE_ADD("cassette")
|
MCFG_CASSETTE_ADD("cassette")
|
||||||
MCFG_CASSETTE_FORMATS(spc1000_cassette_formats)
|
MCFG_CASSETTE_FORMATS(spc1000_cassette_formats)
|
||||||
MCFG_CASSETTE_DEFAULT_STATE(CASSETTE_STOPPED | CASSETTE_SPEAKER_ENABLED | CASSETTE_MOTOR_ENABLED)
|
MCFG_CASSETTE_DEFAULT_STATE(CASSETTE_PLAY | CASSETTE_SPEAKER_ENABLED | CASSETTE_MOTOR_DISABLED)
|
||||||
|
|
||||||
MCFG_SOFTWARE_LIST_ADD("cass_list", "spc1000_cass")
|
MCFG_SOFTWARE_LIST_ADD("cass_list", "spc1000_cass")
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user