bingoc: Convert terminal to a device, partially works now

This commit is contained in:
Dirk Best 2021-05-12 17:45:01 +02:00
parent b77e947a1c
commit 96b871cff8
5 changed files with 382 additions and 78 deletions

View File

@ -3676,6 +3676,8 @@ files {
MAME_DIR .. "src/mame/machine/315_5338a.h",
MAME_DIR .. "src/mame/machine/315_5649.cpp",
MAME_DIR .. "src/mame/machine/315_5649.h",
MAME_DIR .. "src/mame/machine/bingoct.cpp",
MAME_DIR .. "src/mame/machine/bingoct.h",
MAME_DIR .. "src/mame/machine/model1io.cpp",
MAME_DIR .. "src/mame/machine/model1io.h",
MAME_DIR .. "src/mame/machine/model1io2.cpp",

View File

@ -43,6 +43,7 @@ SOUND : 2 x ASSP 5C68A
#include "cpu/m68000/m68000.h"
#include "cpu/z80/z80.h"
#include "machine/315_5338a.h"
#include "machine/bingoct.h"
#include "machine/gen_latch.h"
#include "machine/i8251.h"
#include "sound/rf5c68.h"
@ -85,26 +86,6 @@ private:
void sound_map(address_map &map);
};
class bingoct_state : public driver_device
{
public:
bingoct_state(const machine_config &mconfig, device_type type, const char *tag)
: driver_device(mconfig, type, tag),
m_maincpu(*this, "maincpu"),
m_soundcpu(*this, "soundcpu") { }
void bingoct(machine_config &config);
private:
uint32_t screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect);
required_device<cpu_device> m_maincpu;
required_device<cpu_device> m_soundcpu;
void main_map(address_map &map);
void sound_map(address_map &map);
};
#define SOUND_TEST 0
void bingoc_state::video_start()
@ -116,11 +97,6 @@ uint32_t bingoc_state::screen_update(screen_device &screen, bitmap_ind16 &bitmap
return 0;
}
uint32_t bingoct_state::screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect)
{
return 0;
}
#if SOUND_TEST
/*dirty code to test z80 + bgm/sfx*/
/*
@ -173,6 +149,7 @@ void bingoc_state::main_map(address_map &map)
map(0x100028, 0x10002b).rw("uart6", FUNC(i8251_device::read), FUNC(i8251_device::write)).umask16(0x00ff);
map(0x100030, 0x100033).rw("uart7", FUNC(i8251_device::read), FUNC(i8251_device::write)).umask16(0x00ff);
map(0x100038, 0x10003b).rw("uart8", FUNC(i8251_device::read), FUNC(i8251_device::write)).umask16(0x00ff);
map(0x100070, 0x100071).noprw();
map(0x180000, 0x18001f).rw("io", FUNC(sega_315_5338a_device::read), FUNC(sega_315_5338a_device::write)).umask16(0x00ff); //lamps?
#if 0 // !SOUND_TEST
map(0x180010, 0x180011).w(FUNC(bingoc_state::main_sound_latch_w)); //WRONG there...
@ -199,13 +176,6 @@ void bingoc_state::sound_io(address_map &map)
#endif
}
void bingoct_state::main_map(address_map &map)
{
}
void bingoct_state::sound_map(address_map &map)
{
}
static INPUT_PORTS_START( bingoc )
INPUT_PORTS_END
@ -257,41 +227,20 @@ void bingoc_state::bingoc(machine_config &config)
UPD7759(config, m_upd7759);
m_upd7759->add_route(ALL_OUTPUTS, "lspeaker", 1.0);
m_upd7759->add_route(ALL_OUTPUTS, "rspeaker", 1.0);
// terminals
BINGOCT(config, "term1");
#if 0
BINGOCT(config, "term2");
BINGOCT(config, "term3");
BINGOCT(config, "term4");
BINGOCT(config, "term5");
BINGOCT(config, "term6");
BINGOCT(config, "term7");
BINGOCT(config, "term8");
#endif
}
void bingoct_state::bingoct(machine_config &config)
{
Z80(config, m_maincpu, 32000000 / 4); // divider unknown
m_maincpu->set_addrmap(AS_PROGRAM, &bingoct_state::main_map);
Z80(config, m_soundcpu, 32000000 / 4); // divider unknown
m_soundcpu->set_addrmap(AS_PROGRAM, &bingoct_state::sound_map);
// video hardware
screen_device &screen(SCREEN(config, "screen", SCREEN_TYPE_RASTER));
screen.set_refresh_hz(60);
screen.set_vblank_time(ATTOSECONDS_IN_USEC(0));
screen.set_size(512, 256);
screen.set_visarea_full();
screen.set_screen_update(FUNC(bingoct_state::screen_update));
screen.set_palette("palette");
PALETTE(config, "palette").set_entries(0x100);
SPEAKER(config, "lspeaker").front_left(); // might just be mono...
SPEAKER(config, "rspeaker").front_right();
GENERIC_LATCH_8(config, "soundlatch");
rf5c68_device &rf5c68_1(RF5C68(config, "5c68_1", 32000000 / 4));
rf5c68_1.add_route(ALL_OUTPUTS, "lspeaker", 1.0);
rf5c68_1.add_route(ALL_OUTPUTS, "rspeaker", 1.0);
rf5c68_device &rf5c68_2(RF5C68(config, "5c68_2", 32000000 / 4));
rf5c68_2.add_route(ALL_OUTPUTS, "lspeaker", 1.0);
rf5c68_2.add_route(ALL_OUTPUTS, "rspeaker", 1.0);
}
ROM_START( bingoc )
ROM_REGION( 0x40000, "maincpu", 0 )
@ -308,19 +257,7 @@ ROM_START( bingoc )
ROM_END
// PCB stickered 837-7151 - 2 x Z80 + 2 x ASSP (RF)5C68A for sound + NEC D71051 + NEC D71054 + various Sega customs (315-5246, 315-5330, 315-5333, ..)
// TODO: move to different file?
ROM_START( bingoct )
ROM_REGION( 0x40000, "maincpu", 0 )
ROM_LOAD( "epr-12646.ic20", 0x00000, 0x20000, CRC(c52e31a2) SHA1(901e84f3c9b65f207f7614d64e685e762b23987e) )
ROM_REGION( 0x40000, "soundcpu", 0 )
ROM_LOAD( "epr-12647.ic24", 0x00000, 0x20000, CRC(33198811) SHA1(6fb9db294a7f40303f22f68c3822e67cbd3560fa) )
ROM_LOAD( "epr-12648.ic25", 0x20000, 0x20000, CRC(a34737e5) SHA1(76feec0091afb92af8ced99af61495f28f981120) )
ROM_END
} // Anonymous namespace
GAME( 1989, bingoc, 0, bingoc, bingoc, bingoc_state, empty_init, ROT0, "Sega", "Bingo Circus (Rev. A 891001)", MACHINE_NOT_WORKING )
GAME( 1989, bingoct, 0, bingoct, bingoc, bingoct_state, empty_init, ROT0, "Sega", "Bingo Circus (terminal)", MACHINE_IS_SKELETON )

View File

@ -0,0 +1,305 @@
// license: BSD-3-Clause
// copyright-holders: Dirk Best
/***************************************************************************
Bingo Circus Terminal
© 1989 Sega
Hardware:
- 2x Z0840008PSC
- 32 MHz XTAL
- MB8464A-15LL-SK (next go EPR-12646)
- 2x ASSP 5C68A
- 4x HM65256BLSP (next to 5C68A)
- 315-5338
- D71051C
- D71054C
- MB8464A-15LL-SK (near 5C68A and 315-5330)
- 315-5330
- HM62256BLSP-10 (next to 315-5330)
- 315-5246
- 2x DIPSW8
PCB 837-7151
TODO:
- Serial connection to host system
- Artwork, lamps and LED digits
Notes:
- No schematics, everything is guessed
***************************************************************************/
#include "emu.h"
#include "bingoct.h"
#include "machine/315_5338a.h"
#include "machine/i8251.h"
#include "machine/nvram.h"
#include "machine/pit8253.h"
#include "sound/rf5c68.h"
#include "screen.h"
#include "speaker.h"
//**************************************************************************
// DEVICE DEFINITIONS
//**************************************************************************
DEFINE_DEVICE_TYPE(BINGOCT, bingoct_device, "bingoct", "Bingo Circus Terminal")
//-------------------------------------------------
// maincpu memory maps
//-------------------------------------------------
void bingoct_device::main_mem_map(address_map &map)
{
map(0x0000, 0x7fff).rom().region("maincpu", 0);
map(0x8000, 0xbfff).bankr("gfxbank");
map(0xe000, 0xffff).ram().share("nvram");
}
void bingoct_device::main_io_map(address_map &map)
{
map.global_mask(0xff);
map(0x00, 0x00).lw8(NAME([this] (uint8_t data) { m_gfxbank->set_entry(data & 0x07); }));
map(0x20, 0x23).rw("pit", FUNC(pit8254_device::read), FUNC(pit8254_device::write));
map(0x40, 0x43).rw("uart", FUNC(i8251_device::read), FUNC(i8251_device::write));
map(0x60, 0x6f).rw("io", FUNC(sega_315_5338a_device::read), FUNC(sega_315_5338a_device::write));
map(0x84, 0x84).rw(m_vdp, FUNC(sega315_5246_device::data_read), FUNC(sega315_5246_device::data_write));
map(0x85, 0x85).rw(m_vdp, FUNC(sega315_5246_device::control_read), FUNC(sega315_5246_device::control_write));
}
//-------------------------------------------------
// soundcpu memory maps
//-------------------------------------------------
void bingoct_device::sound_mem_map(address_map &map)
{
map(0x0000, 0x7fff).rom().region("soundcpu", 0);
map(0x8000, 0x9fff).bankr("soundbank");
map(0xa000, 0xa7ff).ram();
map(0xc000, 0xdfff).m("5c68_1", FUNC(rf5c68_device::map));
map(0xe000, 0xffff).m("5c68_2", FUNC(rf5c68_device::map));
}
void bingoct_device::sound_io_map(address_map &map)
{
map.global_mask(0xff);
map(0x00, 0x00).lw8(NAME([this] (uint8_t data) { m_soundbank->set_entry(data & 0x3f); }));
map(0x80, 0x80).rw("soundlatch", FUNC(generic_latch_8_device::read), FUNC(generic_latch_8_device::write));
}
void bingoct_device::pcm_map(address_map &map)
{
map(0x0000, 0xffff).ram();
}
//-------------------------------------------------
// rom_region - device-specific ROM region
//-------------------------------------------------
ROM_START( terminal )
ROM_REGION(0x20000, "maincpu", 0)
ROM_LOAD("epr-12646.ic20", 0x00000, 0x20000, CRC(c52e31a2) SHA1(901e84f3c9b65f207f7614d64e685e762b23987e))
ROM_REGION(0x80000, "soundcpu", 0)
ROM_LOAD("epr-12647.ic24", 0x00000, 0x20000, CRC(33198811) SHA1(6fb9db294a7f40303f22f68c3822e67cbd3560fa))
ROM_LOAD("epr-12648.ic25", 0x20000, 0x20000, CRC(a34737e5) SHA1(76feec0091afb92af8ced99af61495f28f981120))
// two empty sockets
ROM_END
const tiny_rom_entry *bingoct_device::device_rom_region() const
{
return ROM_NAME(terminal);
}
//-------------------------------------------------
// input_ports - device-specific input ports
//-------------------------------------------------
static INPUT_PORTS_START( terminal )
PORT_START("dipsw1")
PORT_DIPNAME(0x0f, 0x0f, "Coin Mode") PORT_DIPLOCATION("DIPSW1:1,2,3,4")
PORT_DIPSETTING(0x0f, "1 Credit")
PORT_DIPSETTING(0x0e, "2 Credits")
PORT_DIPSETTING(0x0d, "4 Credits")
PORT_DIPSETTING(0x0c, "5 Credits")
PORT_DIPSETTING(0x0b, "10 Credits")
PORT_DIPSETTING(0x0a, "20 Credits")
PORT_DIPSETTING(0x09, "25 Credits")
PORT_DIPSETTING(0x08, "50 Credits")
PORT_DIPSETTING(0x07, "100 Credits")
PORT_DIPSETTING(0x06, "200 Credits")
PORT_DIPSETTING(0x05, "250 Credits")
PORT_DIPSETTING(0x04, "1 Credit (Invalid)")
PORT_DIPSETTING(0x03, "1 Credit (Invalid)")
PORT_DIPSETTING(0x02, "1 Credit (Invalid)")
PORT_DIPSETTING(0x01, "1 Credit (Invalid)")
PORT_DIPSETTING(0x00, "1 Credit (Invalid)")
PORT_DIPNAME(0x70, 0x70, "Service Mode") PORT_DIPLOCATION("DIPSW1:5,6,7")
PORT_DIPSETTING(0x70, "1 Credit")
PORT_DIPSETTING(0x60, "2 Credits")
PORT_DIPSETTING(0x50, "5 Credits")
PORT_DIPSETTING(0x40, "10 Credits")
PORT_DIPSETTING(0x30, "20 Credits")
PORT_DIPSETTING(0x20, "25 Credits")
PORT_DIPSETTING(0x10, "50 Credits")
PORT_DIPSETTING(0x00, "100 Credits")
PORT_DIPUNUSED_DIPLOC(0x80, 0x80, "DIPSW1:8")
PORT_START("dipsw2")
PORT_DIPUNUSED_DIPLOC(0x01, 0x01, "DIPSW2:1")
PORT_DIPUNUSED_DIPLOC(0x02, 0x02, "DIPSW2:2")
PORT_DIPUNUSED_DIPLOC(0x04, 0x04, "DIPSW2:3")
PORT_DIPUNUSED_DIPLOC(0x08, 0x08, "DIPSW2:4")
PORT_DIPUNUSED_DIPLOC(0x10, 0x10, "DIPSW2:5")
PORT_DIPUNUSED_DIPLOC(0x20, 0x20, "DIPSW2:6")
PORT_DIPUNUSED_DIPLOC(0x40, 0x40, "DIPSW2:7")
PORT_DIPUNUSED_DIPLOC(0x80, 0x80, "DIPSW2:8")
PORT_START("in0")
PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_BUTTON1) PORT_CODE(KEYCODE_Z) PORT_NAME("Magic Screen A")
PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_BUTTON2) PORT_CODE(KEYCODE_X) PORT_NAME("Magic Screen B")
PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_BUTTON3) PORT_CODE(KEYCODE_C) PORT_NAME("Magic Screen C")
PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_BUTTON4) PORT_CODE(KEYCODE_V) PORT_NAME("Magic Screen D")
PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_BUTTON5) PORT_CODE(KEYCODE_B) PORT_NAME("10 Bet")
PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_BUTTON6) PORT_CODE(KEYCODE_N) PORT_NAME("1 Bet")
PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_GAMBLE_PAYOUT)
PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_SERVICE2) PORT_NAME("Credit")
PORT_START("in1")
PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_SERVICE) PORT_NAME("Test")
PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_GAMBLE_KEYOUT) PORT_NAME("Key")
PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_GAMBLE_SERVICE) PORT_NAME("Service")
PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_COIN1) PORT_NAME("Coin")
PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_UNUSED)
PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_CUSTOM) PORT_NAME("Hopper Pool Sensor")
PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_UNUSED)
PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_UNUSED)
INPUT_PORTS_END
ioport_constructor bingoct_device::device_input_ports() const
{
return INPUT_PORTS_NAME(terminal);
}
//-------------------------------------------------
// device_add_mconfig - add device configuration
//-------------------------------------------------
void bingoct_device::device_add_mconfig(machine_config &config)
{
Z80(config, m_maincpu, 32_MHz_XTAL / 4); // divider unknown
m_maincpu->set_addrmap(AS_PROGRAM, &bingoct_device::main_mem_map);
m_maincpu->set_addrmap(AS_IO, &bingoct_device::main_io_map);
Z80(config, m_soundcpu, 32_MHz_XTAL / 4); // divider unknown
m_soundcpu->set_addrmap(AS_PROGRAM, &bingoct_device::sound_mem_map);
m_soundcpu->set_addrmap(AS_IO, &bingoct_device::sound_io_map);
m_soundcpu->set_irq_acknowledge_callback(FUNC(bingoct_device::soundcpu_irq_ack));
NVRAM(config, "nvram");
GENERIC_LATCH_8(config, "soundlatch");
pit8254_device &pit(PIT8254(config, "pit", 32_MHz_XTAL / 4)); // unknown clock
pit.set_clk<0>(32_MHz_XTAL / 4); // unknown clock
pit.set_clk<1>(32_MHz_XTAL / 4); // unknown clock
pit.out_handler<0>().set("pit", FUNC(pit8254_device::write_clk2));
pit.out_handler<2>().set_inputline(m_soundcpu, INPUT_LINE_IRQ0, ASSERT_LINE);
I8251(config, "uart", 32_MHz_XTAL / 4); // unknown clock
sega_315_5338a_device &io(SEGA_315_5338A(config, "io", 32_MHz_XTAL));
io.in_pa_callback().set_ioport("dipsw1");
io.in_pb_callback().set_ioport("dipsw2");
io.in_pc_callback().set("soundlatch", FUNC(generic_latch_8_device::read));
io.out_pc_callback().set("soundlatch", FUNC(generic_latch_8_device::write));
io.in_pe_callback().set_ioport("in1");
io.read_callback().set_ioport("in0");
io.write_callback().set(FUNC(bingoct_device::output_w));
// video hardware
screen_device &screen(SCREEN(config, "screen", SCREEN_TYPE_RASTER));
screen.set_raw(XTAL(10'738'635)/2,
sega315_5124_device::WIDTH , sega315_5124_device::LBORDER_START + sega315_5124_device::LBORDER_WIDTH, sega315_5124_device::LBORDER_START + sega315_5124_device::LBORDER_WIDTH + 256,
sega315_5124_device::HEIGHT_NTSC, sega315_5124_device::TBORDER_START + sega315_5124_device::NTSC_192_TBORDER_HEIGHT, sega315_5124_device::TBORDER_START + sega315_5124_device::NTSC_192_TBORDER_HEIGHT + 192);
screen.set_screen_update("vdp", FUNC(sega315_5246_device::screen_update));
SEGA315_5246(config, m_vdp, XTAL(10'738'635));
m_vdp->set_screen("screen");
m_vdp->set_is_pal(false);
m_vdp->n_int().set_inputline(m_maincpu, INPUT_LINE_IRQ0);
m_vdp->n_nmi().set_inputline(m_maincpu, INPUT_LINE_NMI);
m_vdp->add_route(ALL_OUTPUTS, "mono", 1.00);
// sound hardware
SPEAKER(config, "mono").front_center();
rf5c68_device &rf5c68_1(RF5C68(config, "5c68_1", 32000000 / 4));
rf5c68_1.add_route(ALL_OUTPUTS, "mono", 1.0);
rf5c68_1.set_addrmap(0, &bingoct_device::pcm_map);
rf5c68_device &rf5c68_2(RF5C68(config, "5c68_2", 32000000 / 4));
rf5c68_2.add_route(ALL_OUTPUTS, "mono", 1.0);
rf5c68_1.set_addrmap(0, &bingoct_device::pcm_map);
}
//**************************************************************************
// LIVE DEVICE
//**************************************************************************
//-------------------------------------------------
// bingoct_device - constructor
//-------------------------------------------------
bingoct_device::bingoct_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock) :
device_t(mconfig, BINGOCT, tag, owner, clock),
m_maincpu(*this, "maincpu"),
m_soundcpu(*this, "soundcpu"),
m_vdp(*this, "vdp"),
m_gfxbank(*this, "gfxbank"),
m_soundbank(*this, "soundbank")
{
}
//-------------------------------------------------
// device_start - device-specific startup
//-------------------------------------------------
void bingoct_device::device_start()
{
m_gfxbank->configure_entries(0, 8, memregion("maincpu")->base(), 0x4000);
m_soundbank->configure_entries(0, 64, memregion("soundcpu")->base(), 0x2000);
}
//-------------------------------------------------
// device_reset - device-specific reset
//-------------------------------------------------
void bingoct_device::device_reset()
{
}
//-------------------------------------------------
// soundcpu_irq_ack - automatic irq ack
//-------------------------------------------------
IRQ_CALLBACK_MEMBER(bingoct_device::soundcpu_irq_ack)
{
m_soundcpu->set_input_line(INPUT_LINE_IRQ0, CLEAR_LINE);
return 0xff;
}
//-------------------------------------------------
// output_w - set lamps and led digits
//-------------------------------------------------
void bingoct_device::output_w(offs_t offset, uint8_t data)
{
// logerror("output_w: %04x = %02x\n", offset, data);
// offset 5 = led digits
}

View File

@ -0,0 +1,61 @@
// license: BSD-3-Clause
// copyright-holders: Dirk Best
/***************************************************************************
Bingo Circus Terminal
© 1989 Sega
***************************************************************************/
#ifndef MAME_MACHINE_BINGOCT_H
#define MAME_MACHINE_BINGOCT_H
#pragma once
#include "cpu/z80/z80.h"
#include "machine/gen_latch.h"
#include "video/315_5124.h"
//**************************************************************************
// TYPE DEFINITIONS
//**************************************************************************
// ======================> bingoct_device
class bingoct_device : public device_t
{
public:
// construction/destruction
bingoct_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock = 0);
protected:
// device-level overrides
virtual const tiny_rom_entry *device_rom_region() const override;
virtual ioport_constructor device_input_ports() const override;
virtual void device_add_mconfig(machine_config &config) override;
virtual void device_start() override;
virtual void device_reset() override;
private:
required_device<z80_device> m_maincpu;
required_device<z80_device> m_soundcpu;
required_device<sega315_5246_device> m_vdp;
required_memory_bank m_gfxbank;
required_memory_bank m_soundbank;
void main_mem_map(address_map &map);
void main_io_map(address_map &map);
void sound_mem_map(address_map &map);
void sound_io_map(address_map &map);
void pcm_map(address_map &map);
IRQ_CALLBACK_MEMBER(soundcpu_irq_ack);
void output_w(offs_t offset, uint8_t data);
};
// device type definition
DECLARE_DEVICE_TYPE(BINGOCT, bingoct_device)
#endif // MAME_MACHINE_BINGOCT_H

View File

@ -9267,7 +9267,6 @@ tripjok //
@source:bingoc.cpp
bingoc // (c) 1989 Sega
bingoct // (c) 1989 Sega
@source:bingoman.cpp
bingoman //