diff options
Diffstat (limited to 'src/mame/drivers/pv1000.cpp')
-rw-r--r-- | src/mame/drivers/pv1000.cpp | 479 |
1 files changed, 0 insertions, 479 deletions
diff --git a/src/mame/drivers/pv1000.cpp b/src/mame/drivers/pv1000.cpp deleted file mode 100644 index 1ca3c7fa860..00000000000 --- a/src/mame/drivers/pv1000.cpp +++ /dev/null @@ -1,479 +0,0 @@ -// license:BSD-3-Clause -// copyright-holders:Wilbert Pol -/*************************************************************************** - - Driver for Casio PV-1000 - -***************************************************************************/ - -#include "emu.h" -#include "cpu/z80/z80.h" -#include "bus/generic/slot.h" -#include "bus/generic/carts.h" -#include "emupal.h" -#include "screen.h" -#include "softlist.h" -#include "speaker.h" - - -// PV-1000 Sound device - -class pv1000_sound_device : public device_t, - public device_sound_interface -{ -public: - pv1000_sound_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock); - - DECLARE_WRITE8_MEMBER(voice_w); - -protected: - // device-level overrides - virtual void device_start() override; - - // sound stream update overrides - virtual void sound_stream_update(sound_stream &stream, stream_sample_t **inputs, stream_sample_t **outputs, int samples) override; - -private: - - // internal state - struct - { - uint32_t count; - uint16_t period; - uint8_t val; - } m_voice[4]; - - sound_stream *m_sh_channel; -}; - -DEFINE_DEVICE_TYPE(PV1000, pv1000_sound_device, "pv1000_sound", "NEC D65010G031") - -pv1000_sound_device::pv1000_sound_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock) - : device_t(mconfig, PV1000, tag, owner, clock) - , device_sound_interface(mconfig, *this) -{ -} - -//------------------------------------------------- -// device_start - device-specific startup -//------------------------------------------------- - -void pv1000_sound_device::device_start() -{ - m_sh_channel = machine().sound().stream_alloc(*this, 0, 1, clock() / 1024); - - save_item(NAME(m_voice[0].count)); - save_item(NAME(m_voice[0].period)); - save_item(NAME(m_voice[0].val)); - save_item(NAME(m_voice[1].count)); - save_item(NAME(m_voice[1].period)); - save_item(NAME(m_voice[1].val)); - save_item(NAME(m_voice[2].count)); - save_item(NAME(m_voice[2].period)); - save_item(NAME(m_voice[2].val)); - // are these ever used? - save_item(NAME(m_voice[3].count)); - save_item(NAME(m_voice[3].period)); - save_item(NAME(m_voice[3].val)); -} - -WRITE8_MEMBER(pv1000_sound_device::voice_w) -{ - offset &= 0x03; - m_voice[offset].period = data; -} - -//------------------------------------------------- -// sound_stream_update - handle a stream update -//------------------------------------------------- - - -/* - plgDavid's audio implementation/analysis notes: - - Sound appears to be 3 50/50 pulse voices made by cutting the main clock by 1024, - then by the value of the 6bit period registers. - This creates a surprisingly accurate pitch range. - - Note: the register periods are inverted. - */ - -void pv1000_sound_device::sound_stream_update(sound_stream &stream, stream_sample_t **inputs, stream_sample_t **outputs, int samples) -{ - stream_sample_t *buffer = outputs[0]; - - while (samples > 0) - { - *buffer=0; - - for (int i = 0; i < 3; i++) - { - uint32_t per = (0x3f - (m_voice[i].period & 0x3f)); - - if (per != 0) //OFF! - *buffer += m_voice[i].val * 8192; - - m_voice[i].count++; - - if (m_voice[i].count >= per) - { - m_voice[i].count = 0; - m_voice[i].val = !m_voice[i].val; - } - } - - buffer++; - samples--; - } -} - - -// PV-1000 System - - -class pv1000_state : public driver_device -{ -public: - pv1000_state(const machine_config &mconfig, device_type type, const char *tag) : - driver_device(mconfig, type, tag), - m_maincpu(*this, "maincpu"), - m_sound(*this, "pv1000_sound"), - m_cart(*this, "cartslot"), - m_p_videoram(*this, "videoram"), - m_gfxdecode(*this, "gfxdecode"), - m_screen(*this, "screen"), - m_palette(*this, "palette") - { } - - void pv1000(machine_config &config); - -private: - DECLARE_WRITE8_MEMBER(io_w); - DECLARE_READ8_MEMBER(io_r); - DECLARE_WRITE8_MEMBER(gfxram_w); - uint8_t m_io_regs[8]; - uint8_t m_fd_data; - - emu_timer *m_irq_on_timer; - emu_timer *m_irq_off_timer; - uint8_t m_pcg_bank; - uint8_t m_force_pattern; - uint8_t m_fd_buffer_flag; - uint8_t m_border_col; - - uint8_t * m_gfxram; - void pv1000_postload(); - - required_device<cpu_device> m_maincpu; - required_device<pv1000_sound_device> m_sound; - required_device<generic_slot_device> m_cart; - required_shared_ptr<uint8_t> m_p_videoram; - virtual void machine_start() override; - virtual void machine_reset() override; - uint32_t screen_update_pv1000(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect); - TIMER_CALLBACK_MEMBER(d65010_irq_on_cb); - TIMER_CALLBACK_MEMBER(d65010_irq_off_cb); - DECLARE_DEVICE_IMAGE_LOAD_MEMBER( cart_load ); - required_device<gfxdecode_device> m_gfxdecode; - required_device<screen_device> m_screen; - required_device<palette_device> m_palette; - void pv1000_mem(address_map &map); - void pv1000_io(address_map &map); -}; - - -void pv1000_state::pv1000_mem(address_map &map) -{ - //map(0x0000, 0x7fff) // mapped by the cartslot - map(0xb800, 0xbbff).ram().share("videoram"); - map(0xbc00, 0xbfff).ram().w(FUNC(pv1000_state::gfxram_w)).region("gfxram", 0); -} - - -void pv1000_state::pv1000_io(address_map &map) -{ - map.global_mask(0xff); - map(0xf8, 0xff).rw(FUNC(pv1000_state::io_r), FUNC(pv1000_state::io_w)); -} - - -WRITE8_MEMBER( pv1000_state::gfxram_w ) -{ - uint8_t *gfxram = memregion( "gfxram" )->base(); - - gfxram[ offset ] = data; - m_gfxdecode->gfx(1)->mark_dirty(offset/32); -} - - -WRITE8_MEMBER( pv1000_state::io_w ) -{ - switch (offset) - { - case 0x00: - case 0x01: - case 0x02: - //logerror("io_w offset=%02x, data=%02x (%03d)\n", offset, data , data); - m_sound->voice_w(space, offset, data); - break; - - case 0x03: - //currently unknown use - break; - - case 0x05: - m_fd_data = 0xf; - break; -// case 0x06 VRAM + PCG location, always fixed at 0xb8xx - case 0x07: - /* ---- -xxx unknown, border color? */ - m_pcg_bank = (data & 0x20) >> 5; - m_force_pattern = ((data & 0x10) >> 4); /* Dig Dug relies on this */ - m_border_col = data & 7; - break; - } - - m_io_regs[offset] = data; -} - - -READ8_MEMBER( pv1000_state::io_r ) -{ - uint8_t data = m_io_regs[offset]; - -// logerror("io_r offset=%02x\n", offset ); - - switch ( offset ) - { - case 0x04: - /* Bit 1 = 1 => Data is available in port FD */ - /* Bit 0 = 1 => Buffer at port FD is empty */ - data = 0; - data = m_fd_buffer_flag & 1; - data |= m_fd_data ? 2 : 0; - m_fd_buffer_flag &= ~1; - break; - case 0x05: - static const char *const joynames[] = { "IN0", "IN1", "IN2", "IN3" }; - - data = 0; - - for (int i = 0; i < 4; i++) - { - if (m_io_regs[5] & 1 << i) - { - data |= ioport(joynames[i])->read(); - m_fd_data &= ~(1 << i); - } - } - - //m_fd_data = 0; - break; - } - - return data; -} - - -static INPUT_PORTS_START( pv1000 ) - PORT_START( "IN0" ) - PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_SELECT ) PORT_PLAYER(1) - PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_START ) PORT_PLAYER(1) - PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_SELECT ) PORT_PLAYER(2) - PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_START ) PORT_PLAYER(2) - - PORT_START( "IN1" ) - PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_JOYSTICK_DOWN ) PORT_PLAYER(1) PORT_8WAY - PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_JOYSTICK_RIGHT ) PORT_PLAYER(1) PORT_8WAY - PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_JOYSTICK_DOWN ) PORT_PLAYER(2) PORT_8WAY - PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_JOYSTICK_RIGHT ) PORT_PLAYER(2) PORT_8WAY - - PORT_START( "IN2" ) - PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_JOYSTICK_LEFT ) PORT_PLAYER(1) PORT_8WAY - PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_JOYSTICK_UP ) PORT_PLAYER(1) PORT_8WAY - PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_JOYSTICK_LEFT ) PORT_PLAYER(2) PORT_8WAY - PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_JOYSTICK_UP ) PORT_PLAYER(2) PORT_8WAY - - PORT_START( "IN3" ) - PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_BUTTON1 ) PORT_PLAYER(1) - PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_BUTTON2 ) PORT_PLAYER(1) - PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_BUTTON1 ) PORT_PLAYER(2) - PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_BUTTON2 ) PORT_PLAYER(2) -INPUT_PORTS_END - - -DEVICE_IMAGE_LOAD_MEMBER( pv1000_state::cart_load ) -{ - uint32_t size = m_cart->common_get_size("rom"); - - if (size != 0x2000 && size != 0x4000) - { - image.seterror(IMAGE_ERROR_UNSPECIFIED, "Unsupported cartridge size"); - return image_init_result::FAIL; - } - - m_cart->rom_alloc(size, GENERIC_ROM8_WIDTH, ENDIANNESS_LITTLE); - m_cart->common_load_rom(m_cart->get_rom_base(), size, "rom"); - - return image_init_result::PASS; -} - - -uint32_t pv1000_state::screen_update_pv1000(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect) -{ - int x, y; - - bitmap.fill(m_border_col); // TODO: might be either black or colored by this register - - for ( y = 0; y < 24; y++ ) - { - for ( x = 2; x < 30; x++ ) // left-right most columns are definitely masked by the border color - { - uint16_t tile = m_p_videoram[ y * 32 + x ]; - - if ( tile < 0xe0 || m_force_pattern ) - { - tile += ( m_pcg_bank << 8); - m_gfxdecode->gfx(0)->opaque(bitmap,cliprect, tile, 0, 0, 0, x*8, y*8 ); - } - else - { - tile -= 0xe0; - m_gfxdecode->gfx(1)->opaque(bitmap,cliprect, tile, 0, 0, 0, x*8, y*8 ); - } - } - } - - return 0; -} - - - -/* Interrupt is triggering 16 times during vblank. */ -/* we have chosen to trigger on scanlines 195, 199, 203, 207, 211, 215, 219, 223, 227, 231, 235, 239, 243, 247, 251, 255 */ -TIMER_CALLBACK_MEMBER(pv1000_state::d65010_irq_on_cb) -{ - int vpos = m_screen->vpos(); - int next_vpos = vpos + 4; - - if(vpos == 195) - m_fd_buffer_flag |= 1; /* TODO: exact timing of this */ - - /* Set IRQ line and schedule release of IRQ line */ - m_maincpu->set_input_line(0, ASSERT_LINE ); - m_irq_off_timer->adjust( m_screen->time_until_pos(vpos, 380/2 ) ); - - /* Schedule next IRQ trigger */ - if ( vpos >= 255 ) - { - next_vpos = 195; - } - m_irq_on_timer->adjust( m_screen->time_until_pos(next_vpos, 0 ) ); -} - - -TIMER_CALLBACK_MEMBER(pv1000_state::d65010_irq_off_cb) -{ - m_maincpu->set_input_line(0, CLEAR_LINE ); -} - - -void pv1000_state::pv1000_postload() -{ - // restore GFX ram - for (int i = 0; i < 0x400; i++) - gfxram_w(m_maincpu->space(AS_PROGRAM), i, m_gfxram[i]); -} - -void pv1000_state::machine_start() -{ - m_irq_on_timer = machine().scheduler().timer_alloc(timer_expired_delegate(FUNC(pv1000_state::d65010_irq_on_cb),this)); - m_irq_off_timer = machine().scheduler().timer_alloc(timer_expired_delegate(FUNC(pv1000_state::d65010_irq_off_cb),this)); - - m_gfxram = memregion("gfxram")->base(); - save_pointer(NAME(m_gfxram), 0x400); - - if (m_cart->exists()) - { - m_maincpu->space(AS_PROGRAM).install_read_handler(0x0000, 0x7fff, read8sm_delegate(*m_cart, FUNC(generic_slot_device::read_rom))); - - // FIXME: this is needed for gfx decoding, but there is probably a cleaner solution! - std::string region_tag; - memcpy(memregion("gfxrom")->base(), memregion(region_tag.assign(m_cart->tag()).append(GENERIC_ROM_REGION_TAG).c_str())->base(), m_cart->get_rom_size()); - } - - save_item(NAME(m_io_regs)); - save_item(NAME(m_fd_data)); - save_item(NAME(m_pcg_bank)); - save_item(NAME(m_force_pattern)); - save_item(NAME(m_fd_buffer_flag)); - save_item(NAME(m_border_col)); - - machine().save().register_postload(save_prepost_delegate(FUNC(pv1000_state::pv1000_postload), this)); -} - - -void pv1000_state::machine_reset() -{ - m_io_regs[5] = 0; - m_fd_data = 0; - m_irq_on_timer->adjust(m_screen->time_until_pos(195, 0)); - m_irq_off_timer->adjust(attotime::never); -} - - -static const gfx_layout pv1000_3bpp_gfx = -{ - 8, 8, /* 8x8 characters */ - RGN_FRAC(1,1), - 3, - { 0, 8*8, 16*8 }, - { 0, 1, 2, 3, 4, 5, 6, 7 }, - { 0*8, 1*8, 2*8, 3*8, 4*8, 5*8, 6*8, 7*8 }, - 8*8*4 -}; - - -static GFXDECODE_START( gfx_pv1000 ) - GFXDECODE_ENTRY( "gfxrom", 8, pv1000_3bpp_gfx, 0, 8 ) - GFXDECODE_ENTRY( "gfxram", 8, pv1000_3bpp_gfx, 0, 8 ) -GFXDECODE_END - - -void pv1000_state::pv1000(machine_config &config) -{ - Z80(config, m_maincpu, 17897725/5); - m_maincpu->set_addrmap(AS_PROGRAM, &pv1000_state::pv1000_mem); - m_maincpu->set_addrmap(AS_IO, &pv1000_state::pv1000_io); - - /* D65010G031 - Video & sound chip */ - SCREEN(config, m_screen, SCREEN_TYPE_RASTER); - m_screen->set_raw(17897725/3, 380, 0, 256, 262, 0, 192); - m_screen->set_screen_update(FUNC(pv1000_state::screen_update_pv1000)); - m_screen->set_palette(m_palette); - - PALETTE(config, m_palette, palette_device::BGR_3BIT); - - GFXDECODE(config, m_gfxdecode, m_palette, gfx_pv1000); - - SPEAKER(config, "mono").front_center(); - PV1000(config, m_sound, 17897725).add_route(ALL_OUTPUTS, "mono", 1.00); - - /* Cartridge slot */ - generic_cartslot_device &cartslot(GENERIC_CARTSLOT(config, "cartslot", generic_linear_slot, "pv1000_cart")); - cartslot.set_must_be_loaded(true); - cartslot.set_device_load(FUNC(pv1000_state::cart_load)); - - /* Software lists */ - SOFTWARE_LIST(config, "cart_list").set_original("pv1000"); -} - - -ROM_START( pv1000 ) - ROM_REGION( 0x4000, "gfxrom", ROMREGION_ERASE00 ) - ROM_REGION( 0x400, "gfxram", ROMREGION_ERASE00 ) -ROM_END - - -/* YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS */ -CONS( 1983, pv1000, 0, 0, pv1000, pv1000, pv1000_state, empty_init, "Casio", "PV-1000", MACHINE_SUPPORTS_SAVE ) |