mirror of
https://github.com/holub/mame
synced 2025-04-23 08:49:55 +03:00
moved alnchase.c, edracula.c, tmtennis.c to hh_ucom4.c (remove epoch.a and tomy.a to recompile)
This commit is contained in:
hap
parent
8d8f96f991
commit
e79c94c029
@ -1,241 +0,0 @@
|
||||
// license:BSD-3-Clause
|
||||
// copyright-holders:hap
|
||||
/***************************************************************************
|
||||
|
||||
Tomy Alien Chase (manufactured in Japan)
|
||||
* boards are labeled TN-16
|
||||
* NEC uCOM-43 MCU, labeled D553C 258
|
||||
* red/green VFD display with color overlay, 2-sided*
|
||||
|
||||
*Player one views the VFD from the front (grid+filament side) while the
|
||||
opposite player views it from the back side (through the conductive traces),
|
||||
basically a mirror-image.
|
||||
|
||||
This is a space-themed tabletop VFD electronic game. To start, simply
|
||||
press [UP]. Hold a joystick direction to move around.
|
||||
|
||||
NOTE!: MESS external artwork is required to be able to play
|
||||
|
||||
|
||||
TODO:
|
||||
- display should go off when sound is played, needs decay simulation?
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
#include "emu.h"
|
||||
#include "cpu/ucom4/ucom4.h"
|
||||
#include "sound/speaker.h"
|
||||
|
||||
#include "alnchase.lh" // this is a test layout, external artwork is necessary
|
||||
|
||||
|
||||
class alnchase_state : public driver_device
|
||||
{
|
||||
public:
|
||||
alnchase_state(const machine_config &mconfig, device_type type, const char *tag)
|
||||
: driver_device(mconfig, type, tag),
|
||||
m_maincpu(*this, "maincpu"),
|
||||
m_button_matrix(*this, "IN"),
|
||||
m_speaker(*this, "speaker")
|
||||
{ }
|
||||
|
||||
required_device<cpu_device> m_maincpu;
|
||||
required_ioport_array<2> m_button_matrix;
|
||||
required_device<speaker_sound_device> m_speaker;
|
||||
|
||||
UINT8 m_input_mux;
|
||||
UINT32 m_plate;
|
||||
UINT16 m_grid;
|
||||
|
||||
DECLARE_READ8_MEMBER(input_r);
|
||||
DECLARE_WRITE8_MEMBER(display_w);
|
||||
DECLARE_WRITE8_MEMBER(port_e_w);
|
||||
|
||||
UINT32 m_vfd_state[0x10];
|
||||
void update_vfd();
|
||||
|
||||
virtual void machine_start();
|
||||
};
|
||||
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
Display
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
void alnchase_state::update_vfd()
|
||||
{
|
||||
for (int i = 0; i < 9; i++)
|
||||
if (m_grid & (1 << i) && m_vfd_state[i] != m_plate)
|
||||
{
|
||||
// on difference, send to output
|
||||
for (int j = 0; j < 17; j++)
|
||||
output_set_lamp_value(i*100 + j, m_plate >> j & 1);
|
||||
|
||||
m_vfd_state[i] = m_plate;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
I/O
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
READ8_MEMBER(alnchase_state::input_r)
|
||||
{
|
||||
UINT8 inp = 0;
|
||||
|
||||
// read selected button rows
|
||||
for (int i = 0; i < 2; i++)
|
||||
if (m_input_mux >> i & 1)
|
||||
inp |= m_button_matrix[i]->read();
|
||||
|
||||
return inp;
|
||||
}
|
||||
|
||||
WRITE8_MEMBER(alnchase_state::display_w)
|
||||
{
|
||||
int shift;
|
||||
|
||||
if (offset <= NEC_UCOM4_PORTE)
|
||||
{
|
||||
// C/D/E0: vfd matrix grid
|
||||
shift = (offset - NEC_UCOM4_PORTC) * 4;
|
||||
m_grid = (m_grid & ~(0xf << shift)) | (data << shift);
|
||||
|
||||
// C0(grid 0): input enable PL1
|
||||
// D0(grid 4): input enable PL2
|
||||
m_input_mux = (m_grid & 1) | (m_grid >> 3 & 2);
|
||||
}
|
||||
|
||||
if (offset >= NEC_UCOM4_PORTE)
|
||||
{
|
||||
// E23/F/G/H/I: vfd matrix plate
|
||||
shift = (offset - NEC_UCOM4_PORTE) * 4;
|
||||
m_plate = ((m_plate << 2 & ~(0xf << shift)) | (data << shift)) >> 2;
|
||||
}
|
||||
|
||||
update_vfd();
|
||||
}
|
||||
|
||||
WRITE8_MEMBER(alnchase_state::port_e_w)
|
||||
{
|
||||
display_w(space, offset, data);
|
||||
|
||||
// E1: speaker out
|
||||
m_speaker->level_w(data >> 1 & 1);
|
||||
}
|
||||
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
Inputs
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
/* physical button layout and labels is like this:
|
||||
|
||||
POWER SOUND LEVEL PLAYER
|
||||
ON ON PRO TWO START
|
||||
o o | |
|
||||
| | | | [joystick]
|
||||
| | o o
|
||||
OFF OFF AMA ONE GAME 0,1,2,3
|
||||
|
||||
1 PLAYER SIDE
|
||||
|
||||
other player side only has a joystick
|
||||
*/
|
||||
|
||||
static INPUT_PORTS_START( alnchase )
|
||||
PORT_START("IN.0") // C0 port A
|
||||
PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_JOYSTICK_LEFT )
|
||||
PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_JOYSTICK_RIGHT )
|
||||
PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_JOYSTICK_DOWN )
|
||||
PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_JOYSTICK_UP )
|
||||
|
||||
PORT_START("IN.1") // D0 port A
|
||||
PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_JOYSTICK_RIGHT ) PORT_PLAYER(2) // on non-mirrored view, swap P2 left/right
|
||||
PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_JOYSTICK_LEFT ) PORT_PLAYER(2) // "
|
||||
PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_JOYSTICK_DOWN ) PORT_PLAYER(2)
|
||||
PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_JOYSTICK_UP ) PORT_PLAYER(2)
|
||||
|
||||
PORT_START("SW") // port B
|
||||
PORT_CONFNAME( 0x01, 0x01, "Players" )
|
||||
PORT_CONFSETTING( 0x01, "1" )
|
||||
PORT_CONFSETTING( 0x00, "2" )
|
||||
PORT_CONFNAME( 0x02, 0x00, DEF_STR( Difficulty ) )
|
||||
PORT_CONFSETTING( 0x00, "Amateur" )
|
||||
PORT_CONFSETTING( 0x02, "Professional" )
|
||||
PORT_BIT( 0x0c, IP_ACTIVE_HIGH, IPT_UNUSED )
|
||||
INPUT_PORTS_END
|
||||
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
Machine Config
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
void alnchase_state::machine_start()
|
||||
{
|
||||
// zerofill
|
||||
memset(m_vfd_state, 0, sizeof(m_vfd_state));
|
||||
m_input_mux = 0;
|
||||
m_plate = 0;
|
||||
m_grid = 0;
|
||||
|
||||
// register for savestates
|
||||
save_item(NAME(m_vfd_state));
|
||||
save_item(NAME(m_input_mux));
|
||||
save_item(NAME(m_plate));
|
||||
save_item(NAME(m_grid));
|
||||
}
|
||||
|
||||
|
||||
static MACHINE_CONFIG_START( alnchase, alnchase_state )
|
||||
|
||||
/* basic machine hardware */
|
||||
MCFG_CPU_ADD("maincpu", NEC_D553, XTAL_400kHz)
|
||||
MCFG_UCOM4_READ_A_CB(READ8(alnchase_state, input_r))
|
||||
MCFG_UCOM4_READ_B_CB(IOPORT("SW"))
|
||||
MCFG_UCOM4_WRITE_C_CB(WRITE8(alnchase_state, display_w))
|
||||
MCFG_UCOM4_WRITE_D_CB(WRITE8(alnchase_state, display_w))
|
||||
MCFG_UCOM4_WRITE_E_CB(WRITE8(alnchase_state, port_e_w))
|
||||
MCFG_UCOM4_WRITE_F_CB(WRITE8(alnchase_state, display_w))
|
||||
MCFG_UCOM4_WRITE_G_CB(WRITE8(alnchase_state, display_w))
|
||||
MCFG_UCOM4_WRITE_H_CB(WRITE8(alnchase_state, display_w))
|
||||
MCFG_UCOM4_WRITE_I_CB(WRITE8(alnchase_state, display_w))
|
||||
|
||||
MCFG_DEFAULT_LAYOUT(layout_alnchase)
|
||||
|
||||
/* no video! */
|
||||
|
||||
/* sound hardware */
|
||||
MCFG_SPEAKER_STANDARD_MONO("mono")
|
||||
MCFG_SOUND_ADD("speaker", SPEAKER_SOUND, 0)
|
||||
MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.25)
|
||||
MACHINE_CONFIG_END
|
||||
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
Game driver(s)
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
ROM_START( alnchase )
|
||||
ROM_REGION( 0x0800, "maincpu", 0 )
|
||||
ROM_LOAD( "d553c-258", 0x0000, 0x0800, CRC(c5284ff5) SHA1(6a20aaacc9748f0e0335958f3cea482e36153704) )
|
||||
ROM_END
|
||||
|
||||
|
||||
CONS( 1984, alnchase, 0, 0, alnchase, alnchase, driver_device, 0, "Tomy", "Alien Chase", GAME_SUPPORTS_SAVE | GAME_REQUIRES_ARTWORK )
|
||||
@ -1,191 +0,0 @@
|
||||
// license:BSD-3-Clause
|
||||
// copyright-holders:hap
|
||||
/***************************************************************************
|
||||
|
||||
Epoch Dracula (manufactured in Japan)
|
||||
* NEC uCOM-43 MCU, labeled D553C 206
|
||||
* cyan/red/green VFD display NEC FIP8BM20T
|
||||
|
||||
known releases:
|
||||
- Japan: Dracula House, yellow case
|
||||
- USA: Dracula, red case
|
||||
- Other: Dracula, yellow case, published by Hales
|
||||
|
||||
NOTE!: MESS external artwork is required to be able to play
|
||||
|
||||
|
||||
TODO:
|
||||
- display should go off when sound is played, needs decay simulation?
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
#include "emu.h"
|
||||
#include "cpu/ucom4/ucom4.h"
|
||||
#include "sound/speaker.h"
|
||||
|
||||
#include "edracula.lh" // this is a test layout, external artwork is necessary
|
||||
|
||||
|
||||
class edracula_state : public driver_device
|
||||
{
|
||||
public:
|
||||
edracula_state(const machine_config &mconfig, device_type type, const char *tag)
|
||||
: driver_device(mconfig, type, tag),
|
||||
m_maincpu(*this, "maincpu"),
|
||||
m_speaker(*this, "speaker")
|
||||
{ }
|
||||
|
||||
required_device<cpu_device> m_maincpu;
|
||||
required_device<speaker_sound_device> m_speaker;
|
||||
|
||||
UINT32 m_plate;
|
||||
UINT16 m_grid;
|
||||
|
||||
DECLARE_WRITE8_MEMBER(grid_w);
|
||||
DECLARE_WRITE8_MEMBER(plate_w);
|
||||
DECLARE_WRITE8_MEMBER(port_i_w);
|
||||
|
||||
UINT32 m_vfd_state[0x10];
|
||||
void update_vfd();
|
||||
|
||||
virtual void machine_start();
|
||||
};
|
||||
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
Display
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
void edracula_state::update_vfd()
|
||||
{
|
||||
for (int i = 0; i < 8; i++)
|
||||
if (m_grid & (1 << i) && m_vfd_state[i] != m_plate)
|
||||
{
|
||||
// on difference, send to output
|
||||
for (int j = 0; j < 18; j++)
|
||||
output_set_lamp_value(i*100 + j, m_plate >> j & 1);
|
||||
|
||||
m_vfd_state[i] = m_plate;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
I/O
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
WRITE8_MEMBER(edracula_state::grid_w)
|
||||
{
|
||||
// port C/D: vfd matrix grid
|
||||
int shift = (offset - NEC_UCOM4_PORTC) * 4;
|
||||
m_grid = (m_grid & ~(0xf << shift)) | (data << shift);
|
||||
|
||||
update_vfd();
|
||||
}
|
||||
|
||||
WRITE8_MEMBER(edracula_state::plate_w)
|
||||
{
|
||||
// port E/F/G/H/I01: vfd matrix plate
|
||||
int shift = (offset - NEC_UCOM4_PORTE) * 4;
|
||||
m_plate = (m_plate & ~(0xf << shift)) | (data << shift);
|
||||
|
||||
update_vfd();
|
||||
}
|
||||
|
||||
WRITE8_MEMBER(edracula_state::port_i_w)
|
||||
{
|
||||
plate_w(space, offset, data & 3);
|
||||
|
||||
// I2: speaker out
|
||||
m_speaker->level_w(data >> 2 & 1);
|
||||
}
|
||||
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
Inputs
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
static INPUT_PORTS_START( edracula )
|
||||
PORT_START("IN0")
|
||||
PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_SELECT )
|
||||
PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_START )
|
||||
PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_BUTTON1 )
|
||||
PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_UNUSED )
|
||||
|
||||
PORT_START("IN1")
|
||||
PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_JOYSTICK_UP )
|
||||
PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_JOYSTICK_DOWN )
|
||||
PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_JOYSTICK_LEFT )
|
||||
PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_JOYSTICK_RIGHT )
|
||||
INPUT_PORTS_END
|
||||
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
Machine Config
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
void edracula_state::machine_start()
|
||||
{
|
||||
// zerofill
|
||||
memset(m_vfd_state, 0, sizeof(m_vfd_state));
|
||||
m_plate = 0;
|
||||
m_grid = 0;
|
||||
|
||||
// register for savestates
|
||||
save_item(NAME(m_vfd_state));
|
||||
save_item(NAME(m_plate));
|
||||
save_item(NAME(m_grid));
|
||||
}
|
||||
|
||||
|
||||
static MACHINE_CONFIG_START( edracula, edracula_state )
|
||||
|
||||
/* basic machine hardware */
|
||||
MCFG_CPU_ADD("maincpu", NEC_D553, XTAL_400kHz)
|
||||
MCFG_UCOM4_READ_A_CB(IOPORT("IN0"))
|
||||
MCFG_UCOM4_READ_B_CB(IOPORT("IN1"))
|
||||
MCFG_UCOM4_WRITE_C_CB(WRITE8(edracula_state, grid_w))
|
||||
MCFG_UCOM4_WRITE_D_CB(WRITE8(edracula_state, grid_w))
|
||||
MCFG_UCOM4_WRITE_E_CB(WRITE8(edracula_state, plate_w))
|
||||
MCFG_UCOM4_WRITE_F_CB(WRITE8(edracula_state, plate_w))
|
||||
MCFG_UCOM4_WRITE_G_CB(WRITE8(edracula_state, plate_w))
|
||||
MCFG_UCOM4_WRITE_H_CB(WRITE8(edracula_state, plate_w))
|
||||
MCFG_UCOM4_WRITE_I_CB(WRITE8(edracula_state, port_i_w))
|
||||
|
||||
MCFG_DEFAULT_LAYOUT(layout_edracula)
|
||||
|
||||
/* no video! */
|
||||
|
||||
/* sound hardware */
|
||||
MCFG_SPEAKER_STANDARD_MONO("mono")
|
||||
MCFG_SOUND_ADD("speaker", SPEAKER_SOUND, 0)
|
||||
MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.25)
|
||||
MACHINE_CONFIG_END
|
||||
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
Game driver(s)
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
ROM_START( edracula )
|
||||
ROM_REGION( 0x0800, "maincpu", 0 )
|
||||
ROM_LOAD( "d553c-206", 0x0000, 0x0800, CRC(b524857b) SHA1(c1c89ed5dd4bb1e6e98462dc8fa5af2aa48d8ede) )
|
||||
ROM_END
|
||||
|
||||
|
||||
CONS( 1982, edracula, 0, 0, edracula, edracula, driver_device, 0, "Epoch", "Dracula (Epoch)", GAME_SUPPORTS_SAVE | GAME_REQUIRES_ARTWORK )
|
||||
@ -4,6 +4,21 @@
|
||||
|
||||
NEC uCOM4 MCU handhelds
|
||||
|
||||
NOTE!: MESS external artwork is required for most of the games
|
||||
|
||||
|
||||
serial device etc
|
||||
------------------------------------------
|
||||
@048 uPD552 1980, Tomy Tennis
|
||||
*085 uPD650 1980, Roland TR-808
|
||||
102 uPD553 1981, Bandai Block Out
|
||||
*128 uPD650 1982, Roland TR-606
|
||||
133 uPD650 1982, Roland TB-303
|
||||
@160 uPD553 1982, Tomy Pac Man
|
||||
@206 uPD553 1982, Epoch Dracula
|
||||
@258 uPD553 1984, Tomy Alien Chase
|
||||
|
||||
(* denotes not yet emulated by MESS, @ denotes it's in this driver)
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
@ -11,7 +26,11 @@
|
||||
#include "cpu/ucom4/ucom4.h"
|
||||
#include "sound/speaker.h"
|
||||
|
||||
// test-layouts for vfd games
|
||||
#include "alnchase.lh"
|
||||
#include "edracula.lh"
|
||||
#include "tmpacman.lh"
|
||||
#include "tmtennis.lh"
|
||||
|
||||
|
||||
class hh_ucom4_state : public driver_device
|
||||
@ -35,6 +54,8 @@ public:
|
||||
// misc common
|
||||
UINT16 m_inp_mux;
|
||||
|
||||
UINT8 read_inputs(int columns);
|
||||
|
||||
virtual void machine_start();
|
||||
virtual void machine_reset();
|
||||
|
||||
@ -53,9 +74,24 @@ public:
|
||||
|
||||
TIMER_DEVICE_CALLBACK_MEMBER(display_decay_tick);
|
||||
void display_update();
|
||||
void display_matrix(int maxx, int maxy, UINT32 setx, UINT32 sety);
|
||||
|
||||
// game-specific handlers
|
||||
DECLARE_WRITE8_MEMBER(edracula_grid_w);
|
||||
DECLARE_WRITE8_MEMBER(edracula_plate_w);
|
||||
DECLARE_WRITE8_MEMBER(edracula_port_i_w);
|
||||
|
||||
DECLARE_READ8_MEMBER(tmtennis_input_r);
|
||||
DECLARE_WRITE8_MEMBER(tmtennis_grid_w);
|
||||
DECLARE_WRITE8_MEMBER(tmtennis_plate_w);
|
||||
DECLARE_WRITE8_MEMBER(tmtennis_port_e_w);
|
||||
void tmtennis_set_clock();
|
||||
DECLARE_INPUT_CHANGED_MEMBER(tmtennis_difficulty_switch);
|
||||
DECLARE_MACHINE_RESET(tmtennis);
|
||||
|
||||
DECLARE_READ8_MEMBER(alnchase_input_r);
|
||||
DECLARE_WRITE8_MEMBER(alnchase_display_w);
|
||||
DECLARE_WRITE8_MEMBER(alnchase_port_e_w);
|
||||
};
|
||||
|
||||
|
||||
@ -162,6 +198,30 @@ TIMER_DEVICE_CALLBACK_MEMBER(hh_ucom4_state::display_decay_tick)
|
||||
display_update();
|
||||
}
|
||||
|
||||
void hh_ucom4_state::display_matrix(int maxx, int maxy, UINT32 setx, UINT32 sety)
|
||||
{
|
||||
m_display_maxx = maxx;
|
||||
m_display_maxy = maxy;
|
||||
|
||||
// update current state
|
||||
for (int y = 0; y < maxy; y++)
|
||||
m_display_state[y] = (sety >> y & 1) ? setx : 0;
|
||||
|
||||
display_update();
|
||||
}
|
||||
|
||||
|
||||
UINT8 hh_ucom4_state::read_inputs(int columns)
|
||||
{
|
||||
UINT8 ret = 0;
|
||||
|
||||
// read selected input rows
|
||||
for (int i = 0; i < columns; i++)
|
||||
if (m_inp_mux >> i & 1)
|
||||
ret |= m_inp_matrix[i]->read();
|
||||
|
||||
return ret;
|
||||
}
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
@ -172,7 +232,229 @@ TIMER_DEVICE_CALLBACK_MEMBER(hh_ucom4_state::display_decay_tick)
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
Tomytronic Pac-Man (manufactured in Japan)
|
||||
Epoch Dracula (manufactured in Japan)
|
||||
* PCB label 96121
|
||||
* NEC uCOM-43 MCU, labeled D553C 206
|
||||
* cyan/red/green VFD display NEC FIP8BM20T (FIP=fluorescent indicator panel)
|
||||
|
||||
known releases:
|
||||
- Japan: Dracula House, yellow case
|
||||
- USA: Dracula, red case
|
||||
- Other: Dracula, yellow case, published by Hales
|
||||
|
||||
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
WRITE8_MEMBER(hh_ucom4_state::edracula_grid_w)
|
||||
{
|
||||
// port C/D: vfd matrix grid
|
||||
int shift = (offset - NEC_UCOM4_PORTC) * 4;
|
||||
m_grid = (m_grid & ~(0xf << shift)) | (data << shift);
|
||||
|
||||
display_matrix(18, 8, m_plate, m_grid);
|
||||
}
|
||||
|
||||
WRITE8_MEMBER(hh_ucom4_state::edracula_plate_w)
|
||||
{
|
||||
// port E/F/G/H/I01: vfd matrix plate
|
||||
int shift = (offset - NEC_UCOM4_PORTE) * 4;
|
||||
m_plate = (m_plate & ~(0xf << shift)) | (data << shift);
|
||||
|
||||
display_matrix(18, 8, m_plate, m_grid);
|
||||
}
|
||||
|
||||
WRITE8_MEMBER(hh_ucom4_state::edracula_port_i_w)
|
||||
{
|
||||
edracula_plate_w(space, offset, data & 3);
|
||||
|
||||
// I2: speaker out
|
||||
m_speaker->level_w(data >> 2 & 1);
|
||||
}
|
||||
|
||||
|
||||
static INPUT_PORTS_START( edracula )
|
||||
PORT_START("IN.0")
|
||||
PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_SELECT )
|
||||
PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_START )
|
||||
PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_BUTTON1 )
|
||||
PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_UNUSED )
|
||||
|
||||
PORT_START("IN.1")
|
||||
PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_JOYSTICK_UP )
|
||||
PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_JOYSTICK_DOWN )
|
||||
PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_JOYSTICK_LEFT )
|
||||
PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_JOYSTICK_RIGHT )
|
||||
INPUT_PORTS_END
|
||||
|
||||
|
||||
static MACHINE_CONFIG_START( edracula, hh_ucom4_state )
|
||||
|
||||
/* basic machine hardware */
|
||||
MCFG_CPU_ADD("maincpu", NEC_D553, XTAL_400kHz)
|
||||
MCFG_UCOM4_READ_A_CB(IOPORT("IN.0"))
|
||||
MCFG_UCOM4_READ_B_CB(IOPORT("IN.1"))
|
||||
MCFG_UCOM4_WRITE_C_CB(WRITE8(hh_ucom4_state, edracula_grid_w))
|
||||
MCFG_UCOM4_WRITE_D_CB(WRITE8(hh_ucom4_state, edracula_grid_w))
|
||||
MCFG_UCOM4_WRITE_E_CB(WRITE8(hh_ucom4_state, edracula_plate_w))
|
||||
MCFG_UCOM4_WRITE_F_CB(WRITE8(hh_ucom4_state, edracula_plate_w))
|
||||
MCFG_UCOM4_WRITE_G_CB(WRITE8(hh_ucom4_state, edracula_plate_w))
|
||||
MCFG_UCOM4_WRITE_H_CB(WRITE8(hh_ucom4_state, edracula_plate_w))
|
||||
MCFG_UCOM4_WRITE_I_CB(WRITE8(hh_ucom4_state, edracula_port_i_w))
|
||||
|
||||
MCFG_TIMER_DRIVER_ADD_PERIODIC("display_decay", hh_ucom4_state, display_decay_tick, attotime::from_msec(1))
|
||||
MCFG_DEFAULT_LAYOUT(layout_edracula)
|
||||
|
||||
/* no video! */
|
||||
|
||||
/* sound hardware */
|
||||
MCFG_SPEAKER_STANDARD_MONO("mono")
|
||||
MCFG_SOUND_ADD("speaker", SPEAKER_SOUND, 0)
|
||||
MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.25)
|
||||
MACHINE_CONFIG_END
|
||||
|
||||
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
Tomy(tronic) Tennis (manufactured in Japan)
|
||||
* board labeled TOMY TN-04 TENNIS
|
||||
* NEC uCOM-44 MCU, labeled D552C 048
|
||||
* VFD display NEC FIP11AM15T
|
||||
|
||||
The initial release of this game was in 1979, known as Pro-Tennis,
|
||||
it has a D553 instead of D552, with just a little over 50% ROM used.
|
||||
|
||||
This is an early VFD simple electronic tennis game. Player 1 is on the right
|
||||
side, player 2 or CPU on the left. Each player has six possible positions
|
||||
where to hit the ball. A backdrop behind the VFD shows a tennis court.
|
||||
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
|
||||
READ8_MEMBER(hh_ucom4_state::tmtennis_input_r)
|
||||
{
|
||||
// port A/B: buttons
|
||||
return ~read_inputs(2) >> (offset*4);
|
||||
}
|
||||
|
||||
WRITE8_MEMBER(hh_ucom4_state::tmtennis_port_e_w)
|
||||
{
|
||||
// E0/E1: input mux
|
||||
// E2: speaker out
|
||||
// E3: N/C
|
||||
m_inp_mux = data & 3;
|
||||
m_speaker->level_w(data >> 2 & 1);
|
||||
}
|
||||
|
||||
WRITE8_MEMBER(hh_ucom4_state::tmtennis_plate_w)
|
||||
{
|
||||
// port C/D/F: vfd matrix plate
|
||||
if (offset == NEC_UCOM4_PORTF) offset--;
|
||||
int shift = (offset - NEC_UCOM4_PORTC) * 4;
|
||||
m_plate = (m_plate & ~(0xf << shift)) | (data << shift);
|
||||
|
||||
display_matrix(12, 12, m_plate, m_grid);
|
||||
}
|
||||
|
||||
WRITE8_MEMBER(hh_ucom4_state::tmtennis_grid_w)
|
||||
{
|
||||
// port G/H/I: vfd matrix grid
|
||||
int shift = (offset - NEC_UCOM4_PORTG) * 4;
|
||||
m_grid = (m_grid & ~(0xf << shift)) | (data << shift);
|
||||
|
||||
display_matrix(12, 12, m_plate, m_grid);
|
||||
}
|
||||
|
||||
|
||||
|
||||
/* Pro-Tennis physical button layout and labels is like this:
|
||||
|
||||
[SERVE] [1] [2] [3] [3] [2] [1] [SERVE]
|
||||
[4] [5] [6] [6] [5] [4]
|
||||
|
||||
PRACTICE<--PRO1-->PRO2 1PLAYER<--OFF-->2PLAYER
|
||||
*/
|
||||
|
||||
static INPUT_PORTS_START( tmtennis )
|
||||
PORT_START("IN.0") // E0 port A/B
|
||||
PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_START1 ) PORT_NAME("P1 Serve")
|
||||
PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_START2 ) PORT_NAME("P2 Serve")
|
||||
PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_BUTTON1 )
|
||||
PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_BUTTON4 )
|
||||
PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_BUTTON2 )
|
||||
PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_BUTTON5 )
|
||||
PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_BUTTON3 )
|
||||
PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_BUTTON6 )
|
||||
|
||||
PORT_START("IN.1") // E1 port A/B
|
||||
PORT_CONFNAME( 0x101, 0x100, DEF_STR( Difficulty ) ) PORT_CHANGED_MEMBER(DEVICE_SELF, hh_ucom4_state, tmtennis_difficulty_switch, NULL)
|
||||
PORT_CONFSETTING( 0x001, "Practice" )
|
||||
PORT_CONFSETTING( 0x100, "Pro 1" ) // -> tmtennis_difficulty_switch
|
||||
PORT_CONFSETTING( 0x000, "Pro 2" )
|
||||
PORT_CONFNAME( 0x02, 0x00, "Players" )
|
||||
PORT_CONFSETTING( 0x00, "1" )
|
||||
PORT_CONFSETTING( 0x02, "2" )
|
||||
PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_BUTTON1 ) PORT_PLAYER(2)
|
||||
PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_BUTTON4 ) PORT_PLAYER(2)
|
||||
PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_BUTTON2 ) PORT_PLAYER(2)
|
||||
PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_BUTTON5 ) PORT_PLAYER(2)
|
||||
PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_BUTTON3 ) PORT_PLAYER(2)
|
||||
PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_BUTTON6 ) PORT_PLAYER(2)
|
||||
INPUT_PORTS_END
|
||||
|
||||
void hh_ucom4_state::tmtennis_set_clock()
|
||||
{
|
||||
// MCU clock is from an LC circuit oscillating by default at ~360kHz,
|
||||
// but on PRO1, the difficulty switch puts a capacitor across the LC circuit
|
||||
// to slow it down to ~260kHz.
|
||||
m_maincpu->set_unscaled_clock(m_inp_matrix[1]->read() & 0x100 ? 260000 : 360000);
|
||||
}
|
||||
|
||||
INPUT_CHANGED_MEMBER(hh_ucom4_state::tmtennis_difficulty_switch)
|
||||
{
|
||||
tmtennis_set_clock();
|
||||
}
|
||||
|
||||
MACHINE_RESET_MEMBER(hh_ucom4_state, tmtennis)
|
||||
{
|
||||
machine_reset(); // common
|
||||
tmtennis_set_clock();
|
||||
}
|
||||
|
||||
|
||||
static MACHINE_CONFIG_START( tmtennis, hh_ucom4_state )
|
||||
|
||||
/* basic machine hardware */
|
||||
MCFG_CPU_ADD("maincpu", NEC_D552, 360000) // see tmtennis_set_clock
|
||||
MCFG_UCOM4_READ_A_CB(READ8(hh_ucom4_state, tmtennis_input_r))
|
||||
MCFG_UCOM4_READ_B_CB(READ8(hh_ucom4_state, tmtennis_input_r))
|
||||
MCFG_UCOM4_WRITE_C_CB(WRITE8(hh_ucom4_state, tmtennis_plate_w))
|
||||
MCFG_UCOM4_WRITE_D_CB(WRITE8(hh_ucom4_state, tmtennis_plate_w))
|
||||
MCFG_UCOM4_WRITE_E_CB(WRITE8(hh_ucom4_state, tmtennis_port_e_w))
|
||||
MCFG_UCOM4_WRITE_F_CB(WRITE8(hh_ucom4_state, tmtennis_plate_w))
|
||||
MCFG_UCOM4_WRITE_G_CB(WRITE8(hh_ucom4_state, tmtennis_grid_w))
|
||||
MCFG_UCOM4_WRITE_H_CB(WRITE8(hh_ucom4_state, tmtennis_grid_w))
|
||||
MCFG_UCOM4_WRITE_I_CB(WRITE8(hh_ucom4_state, tmtennis_grid_w))
|
||||
|
||||
MCFG_TIMER_DRIVER_ADD_PERIODIC("display_decay", hh_ucom4_state, display_decay_tick, attotime::from_msec(1))
|
||||
MCFG_DEFAULT_LAYOUT(layout_tmtennis)
|
||||
|
||||
MCFG_MACHINE_RESET_OVERRIDE(hh_ucom4_state, tmtennis)
|
||||
|
||||
/* no video! */
|
||||
|
||||
/* sound hardware */
|
||||
MCFG_SPEAKER_STANDARD_MONO("mono")
|
||||
MCFG_SOUND_ADD("speaker", SPEAKER_SOUND, 0)
|
||||
MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.25)
|
||||
MACHINE_CONFIG_END
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
Tomy(tronic) Pac-Man (manufactured in Japan)
|
||||
* boards are labeled TN-08 2E108E01
|
||||
* NEC uCOM-43 MCU, labeled D553C 160
|
||||
* cyan/red/green VFD display NEC FIP8AM18T
|
||||
@ -207,6 +489,123 @@ MACHINE_CONFIG_END
|
||||
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
Tomy Alien Chase (manufactured in Japan)
|
||||
* boards are labeled TN-16 2E121B01
|
||||
* NEC uCOM-43 MCU, labeled D553C 258
|
||||
* red/green VFD display NEC FIP9AM24T with color overlay, 2-sided*
|
||||
|
||||
*Player one views the VFD from the front (grid+filament side) while the
|
||||
opposite player views it from the back side (through the conductive traces),
|
||||
basically a mirror-image.
|
||||
|
||||
This is a space-themed tabletop VFD electronic game. To start, simply
|
||||
press [UP]. Hold a joystick direction to move around.
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
|
||||
|
||||
READ8_MEMBER(hh_ucom4_state::alnchase_input_r)
|
||||
{
|
||||
// port A: buttons
|
||||
return read_inputs(2);
|
||||
}
|
||||
|
||||
WRITE8_MEMBER(hh_ucom4_state::alnchase_display_w)
|
||||
{
|
||||
if (offset <= NEC_UCOM4_PORTE)
|
||||
{
|
||||
// C/D/E0: vfd matrix grid
|
||||
int shift = (offset - NEC_UCOM4_PORTC) * 4;
|
||||
m_grid = (m_grid & ~(0xf << shift)) | (data << shift);
|
||||
|
||||
// C0(grid 0): input enable PL1
|
||||
// D0(grid 4): input enable PL2
|
||||
m_inp_mux = (m_grid & 1) | (m_grid >> 3 & 2);
|
||||
}
|
||||
|
||||
if (offset >= NEC_UCOM4_PORTE)
|
||||
{
|
||||
// E23/F/G/H/I: vfd matrix plate
|
||||
int shift = (offset - NEC_UCOM4_PORTE) * 4;
|
||||
m_plate = ((m_plate << 2 & ~(0xf << shift)) | (data << shift)) >> 2;
|
||||
}
|
||||
|
||||
display_matrix(17, 9, m_plate, m_grid);
|
||||
}
|
||||
|
||||
WRITE8_MEMBER(hh_ucom4_state::alnchase_port_e_w)
|
||||
{
|
||||
alnchase_display_w(space, offset, data);
|
||||
|
||||
// E1: speaker out
|
||||
m_speaker->level_w(data >> 1 & 1);
|
||||
}
|
||||
|
||||
/* physical button layout and labels is like this:
|
||||
|
||||
POWER SOUND LEVEL PLAYER
|
||||
ON ON PRO TWO START
|
||||
o o | |
|
||||
| | | | [joystick]
|
||||
| | o o
|
||||
OFF OFF AMA ONE GAME 0,1,2,3
|
||||
|
||||
1 PLAYER SIDE
|
||||
|
||||
other player side only has a joystick
|
||||
*/
|
||||
|
||||
static INPUT_PORTS_START( alnchase )
|
||||
PORT_START("IN.0") // C0 port A
|
||||
PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_JOYSTICK_LEFT )
|
||||
PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_JOYSTICK_RIGHT )
|
||||
PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_JOYSTICK_DOWN )
|
||||
PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_JOYSTICK_UP )
|
||||
|
||||
PORT_START("IN.1") // D0 port A
|
||||
PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_JOYSTICK_RIGHT ) PORT_PLAYER(2) // on non-mirrored view, swap P2 left/right
|
||||
PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_JOYSTICK_LEFT ) PORT_PLAYER(2) // "
|
||||
PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_JOYSTICK_DOWN ) PORT_PLAYER(2)
|
||||
PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_JOYSTICK_UP ) PORT_PLAYER(2)
|
||||
|
||||
PORT_START("IN.2") // port B
|
||||
PORT_CONFNAME( 0x01, 0x01, "Players" )
|
||||
PORT_CONFSETTING( 0x01, "1" )
|
||||
PORT_CONFSETTING( 0x00, "2" )
|
||||
PORT_CONFNAME( 0x02, 0x00, DEF_STR( Difficulty ) )
|
||||
PORT_CONFSETTING( 0x00, "Amateur" )
|
||||
PORT_CONFSETTING( 0x02, "Professional" )
|
||||
PORT_BIT( 0x0c, IP_ACTIVE_HIGH, IPT_UNUSED )
|
||||
INPUT_PORTS_END
|
||||
|
||||
static MACHINE_CONFIG_START( alnchase, hh_ucom4_state )
|
||||
|
||||
/* basic machine hardware */
|
||||
MCFG_CPU_ADD("maincpu", NEC_D553, XTAL_400kHz)
|
||||
MCFG_UCOM4_READ_A_CB(READ8(hh_ucom4_state, alnchase_input_r))
|
||||
MCFG_UCOM4_READ_B_CB(IOPORT("IN.2"))
|
||||
MCFG_UCOM4_WRITE_C_CB(WRITE8(hh_ucom4_state, alnchase_display_w))
|
||||
MCFG_UCOM4_WRITE_D_CB(WRITE8(hh_ucom4_state, alnchase_display_w))
|
||||
MCFG_UCOM4_WRITE_E_CB(WRITE8(hh_ucom4_state, alnchase_port_e_w))
|
||||
MCFG_UCOM4_WRITE_F_CB(WRITE8(hh_ucom4_state, alnchase_display_w))
|
||||
MCFG_UCOM4_WRITE_G_CB(WRITE8(hh_ucom4_state, alnchase_display_w))
|
||||
MCFG_UCOM4_WRITE_H_CB(WRITE8(hh_ucom4_state, alnchase_display_w))
|
||||
MCFG_UCOM4_WRITE_I_CB(WRITE8(hh_ucom4_state, alnchase_display_w))
|
||||
|
||||
MCFG_TIMER_DRIVER_ADD_PERIODIC("display_decay", hh_ucom4_state, display_decay_tick, attotime::from_msec(1))
|
||||
MCFG_DEFAULT_LAYOUT(layout_alnchase)
|
||||
|
||||
/* no video! */
|
||||
|
||||
/* sound hardware */
|
||||
MCFG_SPEAKER_STANDARD_MONO("mono")
|
||||
MCFG_SOUND_ADD("speaker", SPEAKER_SOUND, 0)
|
||||
MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.25)
|
||||
MACHINE_CONFIG_END
|
||||
|
||||
|
||||
|
||||
|
||||
@ -217,10 +616,34 @@ MACHINE_CONFIG_END
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
ROM_START( edracula )
|
||||
ROM_REGION( 0x0800, "maincpu", 0 )
|
||||
ROM_LOAD( "d553c-206", 0x0000, 0x0800, CRC(b524857b) SHA1(c1c89ed5dd4bb1e6e98462dc8fa5af2aa48d8ede) )
|
||||
ROM_END
|
||||
|
||||
|
||||
ROM_START( tmtennis )
|
||||
ROM_REGION( 0x0400, "maincpu", 0 )
|
||||
ROM_LOAD( "d552c-048", 0x0000, 0x0400, CRC(78702003) SHA1(4d427d4dbeed901770c682338867f58c7b54eee3) )
|
||||
ROM_END
|
||||
|
||||
|
||||
|
||||
ROM_START( tmpacman )
|
||||
ROM_REGION( 0x0800, "maincpu", 0 )
|
||||
ROM_LOAD( "d553c-160", 0x0000, 0x0800, CRC(b21a8af7) SHA1(e3122be1873ce76a4067386bf250802776f0c2f9) )
|
||||
ROM_END
|
||||
|
||||
|
||||
CONS( 1981, tmpacman, 0, 0, tmpacman, tmpacman, driver_device, 0, "Tomy", "Pac Man (Tomy)", GAME_SUPPORTS_SAVE | GAME_REQUIRES_ARTWORK | GAME_NOT_WORKING )
|
||||
ROM_START( alnchase )
|
||||
ROM_REGION( 0x0800, "maincpu", 0 )
|
||||
ROM_LOAD( "d553c-258", 0x0000, 0x0800, CRC(c5284ff5) SHA1(6a20aaacc9748f0e0335958f3cea482e36153704) )
|
||||
ROM_END
|
||||
|
||||
|
||||
|
||||
CONS( 1982, edracula, 0, 0, edracula, edracula, driver_device, 0, "Epoch", "Dracula (Epoch)", GAME_SUPPORTS_SAVE | GAME_REQUIRES_ARTWORK )
|
||||
|
||||
CONS( 1980, tmtennis, 0, 0, tmtennis, tmtennis, driver_device, 0, "Tomy", "Tennis (Tomy)", GAME_SUPPORTS_SAVE | GAME_REQUIRES_ARTWORK )
|
||||
CONS( 1982, tmpacman, 0, 0, tmpacman, tmpacman, driver_device, 0, "Tomy", "Pac Man (Tomy)", GAME_SUPPORTS_SAVE | GAME_REQUIRES_ARTWORK | GAME_NOT_WORKING )
|
||||
CONS( 1984, alnchase, 0, 0, alnchase, alnchase, driver_device, 0, "Tomy", "Alien Chase", GAME_SUPPORTS_SAVE | GAME_REQUIRES_ARTWORK )
|
||||
|
||||
@ -1,260 +0,0 @@
|
||||
// license:BSD-3-Clause
|
||||
// copyright-holders:hap
|
||||
/***************************************************************************
|
||||
|
||||
Tomy Tennis (manufactured in Japan)
|
||||
* board labeled TOMY TN-04 TENNIS
|
||||
* NEC uCOM-44 MCU, labeled D552C 048
|
||||
* VFD display NEC FIP11AM15T (FIP=fluorescent indicator panel)
|
||||
|
||||
The initial release of this game was in 1979, known as Pro-Tennis,
|
||||
it is unknown if the hardware and/or ROM contents differ.
|
||||
|
||||
This is an early VFD simple electronic tennis game. Player 1 is on the right
|
||||
side, player 2 or CPU on the left. Each player has six possible positions
|
||||
where to hit the ball. A backdrop behind the VFD shows a tennis court.
|
||||
|
||||
NOTE!: MESS external artwork is required to be able to play
|
||||
|
||||
|
||||
TODO:
|
||||
- display should go off when sound is played, needs decay simulation?
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
#include "emu.h"
|
||||
#include "cpu/ucom4/ucom4.h"
|
||||
#include "sound/speaker.h"
|
||||
|
||||
#include "tmtennis.lh" // this is a test layout, external artwork is necessary
|
||||
|
||||
|
||||
class tmtennis_state : public driver_device
|
||||
{
|
||||
public:
|
||||
tmtennis_state(const machine_config &mconfig, device_type type, const char *tag)
|
||||
: driver_device(mconfig, type, tag),
|
||||
m_maincpu(*this, "maincpu"),
|
||||
m_button_matrix(*this, "IN"),
|
||||
m_speaker(*this, "speaker")
|
||||
{ }
|
||||
|
||||
required_device<cpu_device> m_maincpu;
|
||||
required_ioport_array<2> m_button_matrix;
|
||||
required_device<speaker_sound_device> m_speaker;
|
||||
|
||||
UINT8 m_input_mux;
|
||||
UINT16 m_plate;
|
||||
UINT16 m_grid;
|
||||
|
||||
DECLARE_READ8_MEMBER(input_r);
|
||||
DECLARE_WRITE8_MEMBER(port_e_w);
|
||||
DECLARE_WRITE8_MEMBER(plate_w);
|
||||
DECLARE_WRITE8_MEMBER(grid_w);
|
||||
|
||||
DECLARE_INPUT_CHANGED_MEMBER(difficulty_switch);
|
||||
void update_clock();
|
||||
|
||||
UINT16 m_vfd_state[0x10];
|
||||
void update_vfd();
|
||||
|
||||
virtual void machine_reset();
|
||||
virtual void machine_start();
|
||||
};
|
||||
|
||||
// master clock is from an LC circuit oscillating by default at 360kHz, but...
|
||||
#define MASTER_CLOCK (360000)
|
||||
|
||||
void tmtennis_state::update_clock()
|
||||
{
|
||||
// ...on PRO1, the difficulty switch puts a capacitor across the LC circuit
|
||||
// to slow it down to approx. 260kHz (28%)
|
||||
m_maincpu->set_clock_scale(m_button_matrix[1]->read() & 0x100 ? 0.72 : 1);
|
||||
}
|
||||
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
Display
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
void tmtennis_state::update_vfd()
|
||||
{
|
||||
for (int i = 0; i < 12; i++)
|
||||
if (m_grid & (1 << i) && m_vfd_state[i] != m_plate)
|
||||
{
|
||||
// on difference, send to output
|
||||
for (int j = 0; j < 12; j++)
|
||||
output_set_lamp_value(i*100 + j, m_plate >> j & 1);
|
||||
|
||||
m_vfd_state[i] = m_plate;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
I/O
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
READ8_MEMBER(tmtennis_state::input_r)
|
||||
{
|
||||
// port A/B: buttons
|
||||
UINT8 inp = 0xff;
|
||||
|
||||
// read selected button rows
|
||||
for (int i = 0; i < 2; i++)
|
||||
if (m_input_mux >> i & 1)
|
||||
inp &= m_button_matrix[i]->read();
|
||||
|
||||
return inp >> (offset*4);
|
||||
}
|
||||
|
||||
WRITE8_MEMBER(tmtennis_state::port_e_w)
|
||||
{
|
||||
// E0/E1: input mux
|
||||
// E2: speaker out
|
||||
// E3: N/C
|
||||
m_input_mux = data & 3;
|
||||
m_speaker->level_w(data >> 2 & 1);
|
||||
}
|
||||
|
||||
WRITE8_MEMBER(tmtennis_state::plate_w)
|
||||
{
|
||||
// port C/D/F: vfd matrix plate
|
||||
if (offset == NEC_UCOM4_PORTF) offset--;
|
||||
int shift = (offset - NEC_UCOM4_PORTC) * 4;
|
||||
m_plate = (m_plate & ~(0xf << shift)) | (data << shift);
|
||||
|
||||
update_vfd();
|
||||
}
|
||||
|
||||
WRITE8_MEMBER(tmtennis_state::grid_w)
|
||||
{
|
||||
// port G/H/I: vfd matrix grid
|
||||
int shift = (offset - NEC_UCOM4_PORTG) * 4;
|
||||
m_grid = (m_grid & ~(0xf << shift)) | (data << shift);
|
||||
|
||||
update_vfd();
|
||||
}
|
||||
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
Inputs
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
INPUT_CHANGED_MEMBER(tmtennis_state::difficulty_switch)
|
||||
{
|
||||
update_clock();
|
||||
}
|
||||
|
||||
/* Pro-Tennis physical button layout and labels is like this:
|
||||
|
||||
[SERVE] [1] [2] [3] [3] [2] [1] [SERVE]
|
||||
[4] [5] [6] [6] [5] [4]
|
||||
|
||||
PRACTICE<--PRO1-->PRO2 1PLAYER<--OFF-->2PLAYER
|
||||
*/
|
||||
|
||||
static INPUT_PORTS_START( tmtennis )
|
||||
PORT_START("IN.0") // E0 port A/B
|
||||
PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_START1 ) PORT_NAME("P1 Serve")
|
||||
PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_START2 ) PORT_NAME("P2 Serve")
|
||||
PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_BUTTON1 )
|
||||
PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_BUTTON4 )
|
||||
PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_BUTTON2 )
|
||||
PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_BUTTON5 )
|
||||
PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_BUTTON3 )
|
||||
PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_BUTTON6 )
|
||||
|
||||
PORT_START("IN.1") // E1 port A/B
|
||||
PORT_CONFNAME( 0x101, 0x101, DEF_STR( Difficulty ) ) PORT_CHANGED_MEMBER(DEVICE_SELF, tmtennis_state, difficulty_switch, NULL)
|
||||
PORT_CONFSETTING( 0x000, "Practice" )
|
||||
PORT_CONFSETTING( 0x101, "Pro 1" ) // -> difficulty_switch
|
||||
PORT_CONFSETTING( 0x001, "Pro 2" )
|
||||
PORT_CONFNAME( 0x02, 0x02, "Players" )
|
||||
PORT_CONFSETTING( 0x02, "1" )
|
||||
PORT_CONFSETTING( 0x00, "2" )
|
||||
PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(2)
|
||||
PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_BUTTON4 ) PORT_PLAYER(2)
|
||||
PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_PLAYER(2)
|
||||
PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_BUTTON5 ) PORT_PLAYER(2)
|
||||
PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_BUTTON3 ) PORT_PLAYER(2)
|
||||
PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_BUTTON6 ) PORT_PLAYER(2)
|
||||
INPUT_PORTS_END
|
||||
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
Machine Config
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
void tmtennis_state::machine_reset()
|
||||
{
|
||||
update_clock();
|
||||
}
|
||||
|
||||
void tmtennis_state::machine_start()
|
||||
{
|
||||
// zerofill
|
||||
memset(m_vfd_state, 0, sizeof(m_vfd_state));
|
||||
m_input_mux = 0;
|
||||
m_plate = 0;
|
||||
m_grid = 0;
|
||||
|
||||
// register for savestates
|
||||
save_item(NAME(m_vfd_state));
|
||||
save_item(NAME(m_input_mux));
|
||||
save_item(NAME(m_plate));
|
||||
save_item(NAME(m_grid));
|
||||
}
|
||||
|
||||
|
||||
static MACHINE_CONFIG_START( tmtennis, tmtennis_state )
|
||||
|
||||
/* basic machine hardware */
|
||||
MCFG_CPU_ADD("maincpu", NEC_D552, MASTER_CLOCK)
|
||||
MCFG_UCOM4_READ_A_CB(READ8(tmtennis_state, input_r))
|
||||
MCFG_UCOM4_READ_B_CB(READ8(tmtennis_state, input_r))
|
||||
MCFG_UCOM4_WRITE_C_CB(WRITE8(tmtennis_state, plate_w))
|
||||
MCFG_UCOM4_WRITE_D_CB(WRITE8(tmtennis_state, plate_w))
|
||||
MCFG_UCOM4_WRITE_E_CB(WRITE8(tmtennis_state, port_e_w))
|
||||
MCFG_UCOM4_WRITE_F_CB(WRITE8(tmtennis_state, plate_w))
|
||||
MCFG_UCOM4_WRITE_G_CB(WRITE8(tmtennis_state, grid_w))
|
||||
MCFG_UCOM4_WRITE_H_CB(WRITE8(tmtennis_state, grid_w))
|
||||
MCFG_UCOM4_WRITE_I_CB(WRITE8(tmtennis_state, grid_w))
|
||||
|
||||
MCFG_DEFAULT_LAYOUT(layout_tmtennis)
|
||||
|
||||
/* no video! */
|
||||
|
||||
/* sound hardware */
|
||||
MCFG_SPEAKER_STANDARD_MONO("mono")
|
||||
MCFG_SOUND_ADD("speaker", SPEAKER_SOUND, 0)
|
||||
MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.25)
|
||||
MACHINE_CONFIG_END
|
||||
|
||||
|
||||
|
||||
/***************************************************************************
|
||||
|
||||
Game driver(s)
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
ROM_START( tmtennis )
|
||||
ROM_REGION( 0x0400, "maincpu", 0 )
|
||||
ROM_LOAD( "d552c-048", 0x0000, 0x0400, CRC(78702003) SHA1(4d427d4dbeed901770c682338867f58c7b54eee3) )
|
||||
ROM_END
|
||||
|
||||
|
||||
CONS( 1980, tmtennis, 0, 0, tmtennis, tmtennis, driver_device, 0, "Tomy", "Tennis (Tomy)", GAME_SUPPORTS_SAVE | GAME_REQUIRES_ARTWORK )
|
||||
@ -1226,7 +1226,6 @@ $(MESSOBJ)/entex.a: \
|
||||
$(MESS_DRIVERS)/advision.o $(MESS_MACHINE)/advision.o $(MESS_VIDEO)/advision.o \
|
||||
|
||||
$(MESSOBJ)/epoch.a: \
|
||||
$(MESS_DRIVERS)/edracula.o \
|
||||
$(MESS_DRIVERS)/gamepock.o $(MESS_MACHINE)/gamepock.o \
|
||||
$(MESS_DRIVERS)/scv.o $(MESS_AUDIO)/upd1771.o \
|
||||
|
||||
@ -1778,8 +1777,6 @@ $(MESSOBJ)/tiki.a: \
|
||||
$(MESS_DRIVERS)/tiki100.o \
|
||||
|
||||
$(MESSOBJ)/tomy.a: \
|
||||
$(MESS_DRIVERS)/alnchase.o \
|
||||
$(MESS_DRIVERS)/tmtennis.o \
|
||||
$(MESS_DRIVERS)/tutor.o \
|
||||
|
||||
$(MESSOBJ)/toshiba.a: \
|
||||
@ -2084,8 +2081,6 @@ $(MESS_DRIVERS)/acrnsys1.o: $(MESS_LAYOUT)/acrnsys1.lh
|
||||
$(MESS_DRIVERS)/aim65.o: $(MESS_LAYOUT)/aim65.lh
|
||||
$(MESS_DRIVERS)/aim65_40.o: $(MESS_LAYOUT)/aim65_40.lh
|
||||
$(MESS_DRIVERS)/alesis.o: $(MESS_LAYOUT)/sr16.lh
|
||||
$(MESS_DRIVERS)/alnchase.o: $(MESS_LAYOUT)/alnchase.lh
|
||||
$(MESS_DRIVERS)/amaztron.o: $(MESS_LAYOUT)/amaztron.lh
|
||||
$(MESS_DRIVERS)/amico2k.o: $(MESS_LAYOUT)/amico2k.lh
|
||||
$(MESS_DRIVERS)/amiga.o: $(MESS_LAYOUT)/amiga.lh
|
||||
$(MESS_VIDEO)/apollo.o: $(MESS_LAYOUT)/apollo.lh \
|
||||
@ -2103,7 +2098,6 @@ $(MAME_DRIVERS)/cdi.o: $(MAME_LAYOUT)/cdi.lh
|
||||
$(MESS_DRIVERS)/chessmst.o: $(MESS_LAYOUT)/chessmst.lh
|
||||
$(MESS_DRIVERS)/chesstrv.o: $(MESS_LAYOUT)/chesstrv.lh \
|
||||
$(MESS_LAYOUT)/borisdpl.lh
|
||||
$(MESS_DRIVERS)/comp4.o: $(MESS_LAYOUT)/comp4.lh
|
||||
$(MESS_DRIVERS)/cp1.o: $(MESS_LAYOUT)/cp1.lh
|
||||
$(MESS_DRIVERS)/cvicny.o: $(MESS_LAYOUT)/cvicny.lh
|
||||
$(MESS_DRIVERS)/coco3.o: $(MESS_LAYOUT)/coco3.lh
|
||||
@ -2113,7 +2107,6 @@ $(MESS_DRIVERS)/digel804.o: $(MESS_LAYOUT)/digel804.lh
|
||||
$(MESS_DRIVERS)/dmv.o: $(MESS_LAYOUT)/dmv.lh
|
||||
$(MESS_DRIVERS)/dolphunk.o: $(MESS_LAYOUT)/dolphunk.lh
|
||||
$(MESS_DRIVERS)/eacc.o: $(MESS_LAYOUT)/eacc.lh
|
||||
$(MESS_DRIVERS)/edracula.o: $(MESS_LAYOUT)/edracula.lh
|
||||
$(MESS_DRIVERS)/elekscmp.o: $(MESS_LAYOUT)/elekscmp.lh
|
||||
$(MESS_DRIVERS)/elf.o: $(MESS_LAYOUT)/elf2.lh
|
||||
$(MESS_MACHINE)/esqvfd.o: $(MESS_LAYOUT)/esq2by40.lh \
|
||||
@ -2140,7 +2133,10 @@ $(MESS_DRIVERS)/hh_tms1k.o: $(MESS_LAYOUT)/amaztron.lh \
|
||||
$(MESS_LAYOUT)/stopthie.lh \
|
||||
$(MESS_LAYOUT)/tandy12.lh \
|
||||
$(MESS_LAYOUT)/tc4.lh
|
||||
$(MESS_DRIVERS)/hh_ucom4.o: $(MESS_LAYOUT)/tmpacman.lh
|
||||
$(MESS_DRIVERS)/hh_ucom4.o: $(MESS_LAYOUT)/alnchase.lh \
|
||||
$(MESS_LAYOUT)/edracula.lh \
|
||||
$(MESS_LAYOUT)/tmpacman.lh \
|
||||
$(MESS_LAYOUT)/tmtennis.lh
|
||||
$(MESS_DRIVERS)/ie15.o: $(MESS_LAYOUT)/ie15.lh
|
||||
$(MESS_DRIVERS)/instruct.o: $(MESS_LAYOUT)/instruct.lh
|
||||
$(MESS_DRIVERS)/k1003.o: $(MESS_LAYOUT)/k1003.lh
|
||||
@ -2184,7 +2180,6 @@ $(MESS_DRIVERS)/sc2.o: $(MESS_LAYOUT)/sc2.lh
|
||||
$(MESS_DRIVERS)/sdk85.o: $(MESS_LAYOUT)/sdk85.lh
|
||||
$(MESS_DRIVERS)/sdk86.o: $(MESS_LAYOUT)/sdk86.lh
|
||||
$(MESS_DRIVERS)/selz80.o: $(MESS_LAYOUT)/selz80.lh
|
||||
$(MESS_DRIVERS)/simon.o: $(MESS_LAYOUT)/simon.lh
|
||||
$(MESS_DRIVERS)/sitcom.o: $(MESS_LAYOUT)/sitcom.lh
|
||||
$(MESS_DRIVERS)/slc1.o: $(MESS_LAYOUT)/slc1.lh
|
||||
$(MESS_DRIVERS)/sms.o: $(MESS_LAYOUT)/sms1.lh
|
||||
@ -2209,7 +2204,6 @@ $(MESS_DRIVERS)/tispeak.o: $(MESS_LAYOUT)/lantutor.lh \
|
||||
$(MESS_DRIVERS)/tk80.o: $(MESS_LAYOUT)/tk80.lh
|
||||
$(MESS_DRIVERS)/tm990189.o: $(MESS_LAYOUT)/tm990189.lh \
|
||||
$(MESS_LAYOUT)/tm990189v.lh
|
||||
$(MESS_DRIVERS)/tmtennis.o: $(MESS_LAYOUT)/tmtennis.lh
|
||||
$(MESS_DRIVERS)/unixpc.o: $(MESS_LAYOUT)/unixpc.lh
|
||||
$(MESS_DRIVERS)/ut88.o: $(MESS_LAYOUT)/ut88mini.lh
|
||||
$(MESS_DRIVERS)/vboy.o: $(MESS_LAYOUT)/vboy.lh
|
||||
|
||||
Loading…
Reference in New Issue
Block a user