Sprinter/mame
2
0
Fork 0
mirror of https://github.com/holub/mame synced 2025-05-02 04:31:01 +03:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

photon.cpp: minor cosmetical cleanup, initial preparation for save state support (nw)

Browse Source 
pk8000.cpp: ioport_array, minor cosmetical cleanup, initial preparation for save state support (nw)
This commit is contained in:
Ivan Vangelista 2016-12-02 19:54:57 +01:00
parent f417697f4a
commit 865b76da9d
4 changed files with 174 additions and 154 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

82
src/mame/drivers/photon.cpp
View File

@ -31,20 +31,24 @@ public:
: pk8000_base_state(mconfig, type, tag), : pk8000_base_state(mconfig, type, tag),
m_speaker(*this, "speaker") { } m_speaker(*this, "speaker") { }
DECLARE_WRITE8_MEMBER(pk8000_80_porta_w); DECLARE_WRITE8_MEMBER(_80_porta_w);
DECLARE_READ8_MEMBER(pk8000_80_portb_r); DECLARE_READ8_MEMBER(_80_portb_r);
DECLARE_WRITE8_MEMBER(pk8000_80_portc_w); DECLARE_WRITE8_MEMBER(_80_portc_w);
virtual void machine_reset() override; virtual void machine_reset() override;
virtual void video_start() override; virtual void video_start() override;
uint32_t screen_update_photon(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect);
INTERRUPT_GEN_MEMBER(pk8000_interrupt); uint32_t screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect);
IRQ_CALLBACK_MEMBER(pk8000_irq_callback);
void pk8000_set_bank(uint8_t data); INTERRUPT_GEN_MEMBER(interrupt);
IRQ_CALLBACK_MEMBER(irq_callback);
void set_bank(uint8_t data);
required_device<speaker_sound_device> m_speaker; required_device<speaker_sound_device> m_speaker;
}; };
void photon_state::pk8000_set_bank(uint8_t data) void photon_state::set_bank(uint8_t data)
{ {
uint8_t *rom = memregion("maincpu")->base(); uint8_t *rom = memregion("maincpu")->base();
uint8_t *ram = memregion("maincpu")->base(); uint8_t *ram = memregion("maincpu")->base();
@ -103,17 +107,17 @@ void photon_state::pk8000_set_bank(uint8_t data)
break; break;
} }
} }
WRITE8_MEMBER(photon_state::pk8000_80_porta_w) WRITE8_MEMBER(photon_state::_80_porta_w)
{ {
pk8000_set_bank(data); set_bank(data);
} }
READ8_MEMBER(photon_state::pk8000_80_portb_r) READ8_MEMBER(photon_state::_80_portb_r)
{ {
return 0xff; return 0xff;
} }
WRITE8_MEMBER(photon_state::pk8000_80_portc_w) WRITE8_MEMBER(photon_state::_80_portc_w)
{ {
m_speaker->level_w(BIT(data,7)); m_speaker->level_w(BIT(data,7));
} }
@ -130,14 +134,14 @@ static ADDRESS_MAP_START( pk8000_io , AS_IO, 8, photon_state )
ADDRESS_MAP_UNMAP_HIGH ADDRESS_MAP_UNMAP_HIGH
AM_RANGE(0x80, 0x83) AM_DEVREADWRITE("ppi8255_1", i8255_device, read, write) AM_RANGE(0x80, 0x83) AM_DEVREADWRITE("ppi8255_1", i8255_device, read, write)
AM_RANGE(0x84, 0x87) AM_DEVREADWRITE("ppi8255_2", i8255_device, read, write) AM_RANGE(0x84, 0x87) AM_DEVREADWRITE("ppi8255_2", i8255_device, read, write)
AM_RANGE(0x88, 0x88) AM_READWRITE(pk8000_video_color_r,pk8000_video_color_w) AM_RANGE(0x88, 0x88) AM_READWRITE(video_color_r, video_color_w)
AM_RANGE(0x8c, 0x8c) AM_READ_PORT("JOY1") AM_RANGE(0x8c, 0x8c) AM_READ_PORT("JOY1")
AM_RANGE(0x8d, 0x8d) AM_READ_PORT("JOY2") AM_RANGE(0x8d, 0x8d) AM_READ_PORT("JOY2")
AM_RANGE(0x90, 0x90) AM_READWRITE(pk8000_text_start_r,pk8000_text_start_w) AM_RANGE(0x90, 0x90) AM_READWRITE(text_start_r, text_start_w)
AM_RANGE(0x91, 0x91) AM_READWRITE(pk8000_chargen_start_r,pk8000_chargen_start_w) AM_RANGE(0x91, 0x91) AM_READWRITE(chargen_start_r, chargen_start_w)
AM_RANGE(0x92, 0x92) AM_READWRITE(pk8000_video_start_r,pk8000_video_start_w) AM_RANGE(0x92, 0x92) AM_READWRITE(video_start_r, video_start_w)
AM_RANGE(0x93, 0x93) AM_READWRITE(pk8000_color_start_r,pk8000_color_start_w) AM_RANGE(0x93, 0x93) AM_READWRITE(color_start_r, color_start_w)
AM_RANGE(0xa0, 0xbf) AM_READWRITE(pk8000_color_r,pk8000_color_w) AM_RANGE(0xa0, 0xbf) AM_READWRITE(color_r, color_w)
ADDRESS_MAP_END ADDRESS_MAP_END
static INPUT_PORTS_START( photon ) static INPUT_PORTS_START( photon )
@ -155,12 +159,12 @@ static INPUT_PORTS_START( photon )
PORT_BIT(0xff, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0xff, IP_ACTIVE_HIGH, IPT_UNUSED)
INPUT_PORTS_END INPUT_PORTS_END
INTERRUPT_GEN_MEMBER(photon_state::pk8000_interrupt) INTERRUPT_GEN_MEMBER(photon_state::interrupt)
{ {
device.execute().set_input_line(0, HOLD_LINE); device.execute().set_input_line(0, HOLD_LINE);
} }
IRQ_CALLBACK_MEMBER(photon_state::pk8000_irq_callback) IRQ_CALLBACK_MEMBER(photon_state::irq_callback)
{ {
return 0xff; return 0xff;
} }
@ -168,16 +172,24 @@ IRQ_CALLBACK_MEMBER(photon_state::pk8000_irq_callback)
void photon_state::machine_reset() void photon_state::machine_reset()
{ {
pk8000_set_bank(0); set_bank(0);
} }
void photon_state::video_start() void photon_state::video_start()
{ {
save_item(NAME(m_text_start));
save_item(NAME(m_chargen_start));
save_item(NAME(m_video_start));
save_item(NAME(m_color_start));
save_item(NAME(m_video_mode));
save_item(NAME(m_video_color));
save_item(NAME(m_color));
save_item(NAME(m_video_enable));
} }
uint32_t photon_state::screen_update_photon(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect) uint32_t photon_state::screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect)
{ {
return pk8000_video_update(screen, bitmap, cliprect, memregion("maincpu")->base()); return video_update(screen, bitmap, cliprect, memregion("maincpu")->base());
} }
static MACHINE_CONFIG_START( photon, photon_state ) static MACHINE_CONFIG_START( photon, photon_state )
@ -186,8 +198,8 @@ static MACHINE_CONFIG_START( photon, photon_state )
MCFG_CPU_ADD("maincpu",I8080, 1780000) MCFG_CPU_ADD("maincpu",I8080, 1780000)
MCFG_CPU_PROGRAM_MAP(pk8000_mem) MCFG_CPU_PROGRAM_MAP(pk8000_mem)
MCFG_CPU_IO_MAP(pk8000_io) MCFG_CPU_IO_MAP(pk8000_io)
MCFG_CPU_VBLANK_INT_DRIVER("screen", photon_state, pk8000_interrupt) MCFG_CPU_VBLANK_INT_DRIVER("screen", photon_state, interrupt)
MCFG_CPU_IRQ_ACKNOWLEDGE_DRIVER(photon_state,pk8000_irq_callback) MCFG_CPU_IRQ_ACKNOWLEDGE_DRIVER(photon_state, irq_callback)
/* video hardware */ /* video hardware */
MCFG_SCREEN_ADD("screen", RASTER) MCFG_SCREEN_ADD("screen", RASTER)
@ -195,21 +207,21 @@ static MACHINE_CONFIG_START( photon, photon_state )
MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500)) /* not accurate */ MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500)) /* not accurate */
MCFG_SCREEN_SIZE(256+32, 192+32) MCFG_SCREEN_SIZE(256+32, 192+32)
MCFG_SCREEN_VISIBLE_AREA(0, 256+32-1, 0, 192+32-1) MCFG_SCREEN_VISIBLE_AREA(0, 256+32-1, 0, 192+32-1)
MCFG_SCREEN_UPDATE_DRIVER(photon_state, screen_update_photon) MCFG_SCREEN_UPDATE_DRIVER(photon_state, screen_update)
MCFG_SCREEN_PALETTE("palette") MCFG_SCREEN_PALETTE("palette")
MCFG_PALETTE_ADD("palette", 16) MCFG_PALETTE_ADD("palette", 16)
MCFG_PALETTE_INIT_OWNER(pk8000_base_state, pk8000) MCFG_PALETTE_INIT_OWNER(pk8000_base_state, pk8000)
MCFG_DEVICE_ADD("ppi8255_1", I8255, 0) MCFG_DEVICE_ADD("ppi8255_1", I8255, 0)
MCFG_I8255_OUT_PORTA_CB(WRITE8(photon_state, pk8000_80_porta_w)) MCFG_I8255_OUT_PORTA_CB(WRITE8(photon_state, _80_porta_w))
MCFG_I8255_IN_PORTB_CB(READ8(photon_state, pk8000_80_portb_r)) MCFG_I8255_IN_PORTB_CB(READ8(photon_state, _80_portb_r))
MCFG_I8255_OUT_PORTC_CB(WRITE8(photon_state, pk8000_80_portc_w)) MCFG_I8255_OUT_PORTC_CB(WRITE8(photon_state, _80_portc_w))
MCFG_DEVICE_ADD("ppi8255_2", I8255, 0) MCFG_DEVICE_ADD("ppi8255_2", I8255, 0)
MCFG_I8255_IN_PORTA_CB(READ8(pk8000_base_state, pk8000_84_porta_r)) MCFG_I8255_IN_PORTA_CB(READ8(pk8000_base_state, _84_porta_r))
MCFG_I8255_OUT_PORTA_CB(WRITE8(pk8000_base_state, pk8000_84_porta_w)) MCFG_I8255_OUT_PORTA_CB(WRITE8(pk8000_base_state, _84_porta_w))
MCFG_I8255_OUT_PORTC_CB(WRITE8(pk8000_base_state, pk8000_84_portc_w)) MCFG_I8255_OUT_PORTC_CB(WRITE8(pk8000_base_state, _84_portc_w))
/* audio hardware */ /* audio hardware */
MCFG_SPEAKER_STANDARD_MONO("mono") MCFG_SPEAKER_STANDARD_MONO("mono")
@ -256,6 +268,6 @@ ROM_START( phklad )
ROM_LOAD( "klad.bin", 0x10000, 0x4000, BAD_DUMP CRC(49cc7d65) SHA1(d966cfc1d973a533df8044a71fad37f7177da554) ) ROM_LOAD( "klad.bin", 0x10000, 0x4000, BAD_DUMP CRC(49cc7d65) SHA1(d966cfc1d973a533df8044a71fad37f7177da554) )
ROM_END ROM_END
GAME( 19??, phtetris, 0, photon, photon, driver_device, 0, ROT0, "<unknown>", "Tetris (Photon System)", 0 ) GAME( 19??, phtetris, 0, photon, photon, driver_device, 0, ROT0, "<unknown>", "Tetris (Photon System)", MACHINE_SUPPORTS_SAVE )
GAME( 1989?, phpython, 0, photon, photon, driver_device, 0, ROT0, "<unknown>", "Python (Photon System)", 0 ) GAME( 1989?, phpython, 0, photon, photon, driver_device, 0, ROT0, "<unknown>", "Python (Photon System)", MACHINE_SUPPORTS_SAVE )
GAME( 19??, phklad, 0, photon, photon, driver_device, 0, ROT0, "<unknown>", "Klad / Labyrinth (Photon System)", 0 ) GAME( 19??, phklad, 0, photon, photon, driver_device, 0, ROT0, "<unknown>", "Klad / Labyrinth (Photon System)", MACHINE_SUPPORTS_SAVE )

105
src/mame/drivers/pk8000.cpp
View File

@ -40,21 +40,25 @@ public:
, m_bank8(*this, "bank8") , m_bank8(*this, "bank8")
, m_io_joy1(*this, "JOY1") , m_io_joy1(*this, "JOY1")
, m_io_joy2(*this, "JOY2") , m_io_joy2(*this, "JOY2")
, m_keyboard(*this, "LINE%u", 0)
{ } { }
uint8_t m_keyboard_line; uint8_t m_keyboard_line;
DECLARE_READ8_MEMBER(pk8000_joy_1_r);
DECLARE_READ8_MEMBER(pk8000_joy_2_r); DECLARE_READ8_MEMBER(joy_1_r);
DECLARE_READ8_MEMBER(joy_2_r);
DECLARE_WRITE8_MEMBER(_80_porta_w);
DECLARE_READ8_MEMBER(_80_portb_r);
DECLARE_WRITE8_MEMBER(_80_portc_w);
virtual void machine_start() override; virtual void machine_start() override;
virtual void machine_reset() override; virtual void machine_reset() override;
virtual void video_start() override; virtual void video_start() override;
uint32_t screen_update_pk8000(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect);
INTERRUPT_GEN_MEMBER(pk8000_interrupt);
DECLARE_WRITE8_MEMBER(pk8000_80_porta_w);
DECLARE_READ8_MEMBER(pk8000_80_portb_r);
DECLARE_WRITE8_MEMBER(pk8000_80_portc_w);
IRQ_CALLBACK_MEMBER(pk8000_irq_callback); uint32_t screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect);
INTERRUPT_GEN_MEMBER(interrupt);
IRQ_CALLBACK_MEMBER(irq_callback);
protected: protected:
required_device<cpu_device> m_maincpu; required_device<cpu_device> m_maincpu;
@ -72,14 +76,14 @@ protected:
required_memory_bank m_bank8; required_memory_bank m_bank8;
required_ioport m_io_joy1; required_ioport m_io_joy1;
required_ioport m_io_joy2; required_ioport m_io_joy2;
ioport_port *m_io_port[10]; required_ioport_array<10> m_keyboard;
void pk8000_set_bank(uint8_t data); void set_bank(uint8_t data);
}; };
void pk8000_state::pk8000_set_bank(uint8_t data) void pk8000_state::set_bank(uint8_t data)
{ {
uint8_t *rom = m_region_maincpu->base(); uint8_t *rom = m_region_maincpu->base();
uint8_t *ram = m_ram->pointer(); uint8_t *ram = m_ram->pointer();
@ -138,20 +142,20 @@ void pk8000_state::pk8000_set_bank(uint8_t data)
break; break;
} }
} }
WRITE8_MEMBER(pk8000_state::pk8000_80_porta_w) WRITE8_MEMBER(pk8000_state::_80_porta_w)
{ {
pk8000_set_bank(data); set_bank(data);
} }
READ8_MEMBER(pk8000_state::pk8000_80_portb_r) READ8_MEMBER(pk8000_state::_80_portb_r)
{ {
if(m_keyboard_line>9) { if(m_keyboard_line>9) {
return 0xff; return 0xff;
} }
return m_io_port[m_keyboard_line]->read(); return m_keyboard[m_keyboard_line]->read();
} }
WRITE8_MEMBER(pk8000_state::pk8000_80_portc_w) WRITE8_MEMBER(pk8000_state::_80_portc_w)
{ {
m_keyboard_line = data & 0x0f; m_keyboard_line = data & 0x0f;
@ -161,13 +165,13 @@ WRITE8_MEMBER(pk8000_state::pk8000_80_portc_w)
m_cassette->output((BIT(data, 6)) ? +1.0 : 0.0); m_cassette->output((BIT(data, 6)) ? +1.0 : 0.0);
} }
READ8_MEMBER(pk8000_state::pk8000_joy_1_r) READ8_MEMBER(pk8000_state::joy_1_r)
{ {
uint8_t retVal = (m_cassette->input() > 0.0038 ? 0x80 : 0); uint8_t retVal = (m_cassette->input() > 0.0038 ? 0x80 : 0);
retVal |= m_io_joy1->read() & 0x7f; retVal |= m_io_joy1->read() & 0x7f;
return retVal; return retVal;
} }
READ8_MEMBER(pk8000_state::pk8000_joy_2_r) READ8_MEMBER(pk8000_state::joy_2_r)
{ {
uint8_t retVal = (m_cassette->input() > 0.0038 ? 0x80 : 0); uint8_t retVal = (m_cassette->input() > 0.0038 ? 0x80 : 0);
retVal |= m_io_joy2->read() & 0x7f; retVal |= m_io_joy2->read() & 0x7f;
@ -186,14 +190,14 @@ static ADDRESS_MAP_START( pk8000_io , AS_IO, 8, pk8000_state )
ADDRESS_MAP_UNMAP_HIGH ADDRESS_MAP_UNMAP_HIGH
AM_RANGE(0x80, 0x83) AM_DEVREADWRITE("ppi8255_1", i8255_device, read, write) AM_RANGE(0x80, 0x83) AM_DEVREADWRITE("ppi8255_1", i8255_device, read, write)
AM_RANGE(0x84, 0x87) AM_DEVREADWRITE("ppi8255_2", i8255_device, read, write) AM_RANGE(0x84, 0x87) AM_DEVREADWRITE("ppi8255_2", i8255_device, read, write)
AM_RANGE(0x88, 0x88) AM_READWRITE(pk8000_video_color_r,pk8000_video_color_w) AM_RANGE(0x88, 0x88) AM_READWRITE(video_color_r, video_color_w)
AM_RANGE(0x8c, 0x8c) AM_READ(pk8000_joy_1_r) AM_RANGE(0x8c, 0x8c) AM_READ(joy_1_r)
AM_RANGE(0x8d, 0x8d) AM_READ(pk8000_joy_2_r) AM_RANGE(0x8d, 0x8d) AM_READ(joy_2_r)
AM_RANGE(0x90, 0x90) AM_READWRITE(pk8000_text_start_r,pk8000_text_start_w) AM_RANGE(0x90, 0x90) AM_READWRITE(text_start_r, text_start_w)
AM_RANGE(0x91, 0x91) AM_READWRITE(pk8000_chargen_start_r,pk8000_chargen_start_w) AM_RANGE(0x91, 0x91) AM_READWRITE(chargen_start_r, chargen_start_w)
AM_RANGE(0x92, 0x92) AM_READWRITE(pk8000_video_start_r,pk8000_video_start_w) AM_RANGE(0x92, 0x92) AM_READWRITE(video_start_r, video_start_w)
AM_RANGE(0x93, 0x93) AM_READWRITE(pk8000_color_start_r,pk8000_color_start_w) AM_RANGE(0x93, 0x93) AM_READWRITE(color_start_r, color_start_w)
AM_RANGE(0xa0, 0xbf) AM_READWRITE(pk8000_color_r,pk8000_color_w) AM_RANGE(0xa0, 0xbf) AM_READWRITE(color_r, color_w)
ADDRESS_MAP_END ADDRESS_MAP_END
/* Input ports */ /* Input ports */
@ -308,12 +312,12 @@ static INPUT_PORTS_START( pk8000 )
PORT_BIT(0x80, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x80, IP_ACTIVE_HIGH, IPT_UNUSED)
INPUT_PORTS_END INPUT_PORTS_END
INTERRUPT_GEN_MEMBER(pk8000_state::pk8000_interrupt) INTERRUPT_GEN_MEMBER(pk8000_state::interrupt)
{ {
device.execute().set_input_line(0, HOLD_LINE); device.execute().set_input_line(0, HOLD_LINE);
} }
IRQ_CALLBACK_MEMBER(pk8000_state::pk8000_irq_callback) IRQ_CALLBACK_MEMBER(pk8000_state::irq_callback)
{ {
return 0xff; return 0xff;
} }
@ -321,26 +325,29 @@ IRQ_CALLBACK_MEMBER(pk8000_state::pk8000_irq_callback)
void pk8000_state::machine_start() void pk8000_state::machine_start()
{ {
static const char *const keynames[] = { "LINE0", "LINE1", "LINE2", "LINE3", "LINE4", "LINE5", "LINE6", "LINE7", "LINE8", "LINE9" }; save_item(NAME(m_keyboard_line));
for ( int i = 0; i < 10; i++ )
{
m_io_port[i] = ioport(keynames[i]);
}
} }
void pk8000_state::machine_reset() void pk8000_state::machine_reset()
{ {
pk8000_set_bank(0); set_bank(0);
} }
void pk8000_state::video_start() void pk8000_state::video_start()
{ {
save_item(NAME(m_text_start));
save_item(NAME(m_chargen_start));
save_item(NAME(m_video_start));
save_item(NAME(m_color_start));
save_item(NAME(m_video_mode));
save_item(NAME(m_video_color));
save_item(NAME(m_color));
save_item(NAME(m_video_enable));
} }
uint32_t pk8000_state::screen_update_pk8000(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect) uint32_t pk8000_state::screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect)
{ {
return pk8000_video_update(screen, bitmap, cliprect, m_ram->pointer()); return video_update(screen, bitmap, cliprect, m_ram->pointer());
} }
static MACHINE_CONFIG_START( pk8000, pk8000_state ) static MACHINE_CONFIG_START( pk8000, pk8000_state )
@ -348,8 +355,8 @@ static MACHINE_CONFIG_START( pk8000, pk8000_state )
MCFG_CPU_ADD("maincpu",I8080, 1780000) MCFG_CPU_ADD("maincpu",I8080, 1780000)
MCFG_CPU_PROGRAM_MAP(pk8000_mem) MCFG_CPU_PROGRAM_MAP(pk8000_mem)
MCFG_CPU_IO_MAP(pk8000_io) MCFG_CPU_IO_MAP(pk8000_io)
MCFG_CPU_VBLANK_INT_DRIVER("screen", pk8000_state, pk8000_interrupt) MCFG_CPU_VBLANK_INT_DRIVER("screen", pk8000_state, interrupt)
MCFG_CPU_IRQ_ACKNOWLEDGE_DRIVER(pk8000_state,pk8000_irq_callback) MCFG_CPU_IRQ_ACKNOWLEDGE_DRIVER(pk8000_state, irq_callback)
/* video hardware */ /* video hardware */
MCFG_SCREEN_ADD("screen", RASTER) MCFG_SCREEN_ADD("screen", RASTER)
@ -357,21 +364,21 @@ static MACHINE_CONFIG_START( pk8000, pk8000_state )
MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500)) /* not accurate */ MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500)) /* not accurate */
MCFG_SCREEN_SIZE(256+32, 192+32) MCFG_SCREEN_SIZE(256+32, 192+32)
MCFG_SCREEN_VISIBLE_AREA(0, 256+32-1, 0, 192+32-1) MCFG_SCREEN_VISIBLE_AREA(0, 256+32-1, 0, 192+32-1)
MCFG_SCREEN_UPDATE_DRIVER(pk8000_state, screen_update_pk8000) MCFG_SCREEN_UPDATE_DRIVER(pk8000_state, screen_update)
MCFG_SCREEN_PALETTE("palette") MCFG_SCREEN_PALETTE("palette")
MCFG_PALETTE_ADD("palette", 16) MCFG_PALETTE_ADD("palette", 16)
MCFG_PALETTE_INIT_OWNER(pk8000_base_state, pk8000) MCFG_PALETTE_INIT_OWNER(pk8000_base_state, pk8000)
MCFG_DEVICE_ADD("ppi8255_1", I8255, 0) MCFG_DEVICE_ADD("ppi8255_1", I8255, 0)
MCFG_I8255_OUT_PORTA_CB(WRITE8(pk8000_state, pk8000_80_porta_w)) MCFG_I8255_OUT_PORTA_CB(WRITE8(pk8000_state, _80_porta_w))
MCFG_I8255_IN_PORTB_CB(READ8(pk8000_state, pk8000_80_portb_r)) MCFG_I8255_IN_PORTB_CB(READ8(pk8000_state, _80_portb_r))
MCFG_I8255_OUT_PORTC_CB(WRITE8(pk8000_state, pk8000_80_portc_w)) MCFG_I8255_OUT_PORTC_CB(WRITE8(pk8000_state, _80_portc_w))
MCFG_DEVICE_ADD("ppi8255_2", I8255, 0) MCFG_DEVICE_ADD("ppi8255_2", I8255, 0)
MCFG_I8255_IN_PORTA_CB(READ8(pk8000_base_state, pk8000_84_porta_r)) MCFG_I8255_IN_PORTA_CB(READ8(pk8000_base_state, _84_porta_r))
MCFG_I8255_OUT_PORTA_CB(WRITE8(pk8000_base_state, pk8000_84_porta_w)) MCFG_I8255_OUT_PORTA_CB(WRITE8(pk8000_base_state, _84_porta_w))
MCFG_I8255_OUT_PORTC_CB(WRITE8(pk8000_base_state,pk8000_84_portc_w)) MCFG_I8255_OUT_PORTC_CB(WRITE8(pk8000_base_state, _84_portc_w))
/* audio hardware */ /* audio hardware */
MCFG_SPEAKER_STANDARD_MONO("mono") MCFG_SPEAKER_STANDARD_MONO("mono")
@ -408,6 +415,6 @@ ROM_END
/* Driver */ /* Driver */
/* YEAR NAME PARENT COMPAT MACHINE INPUT INIT COMPANY FULLNAME FLAGS */ /* YEAR NAME PARENT COMPAT MACHINE INPUT INIT COMPANY FULLNAME FLAGS */
COMP( 1987, vesta, 0, 0, pk8000, pk8000, driver_device, 0, "BP EVM", "PK8000 Vesta", 0) COMP( 1987, vesta, 0, 0, pk8000, pk8000, driver_device, 0, "BP EVM", "PK8000 Vesta", MACHINE_SUPPORTS_SAVE)
COMP( 1987, hobby, vesta, 0, pk8000, pk8000, driver_device, 0, "BP EVM", "PK8000 Sura/Hobby", 0) COMP( 1987, hobby, vesta, 0, pk8000, pk8000, driver_device, 0, "BP EVM", "PK8000 Sura/Hobby", MACHINE_SUPPORTS_SAVE)
COMP( 1987, pk8002, vesta, 0, pk8000, pk8000, driver_device, 0, "<unknown>", "PK8002 Elf", MACHINE_NOT_WORKING) COMP( 1987, pk8002, vesta, 0, pk8000, pk8000, driver_device, 0, "<unknown>", "PK8002 Elf", MACHINE_NOT_WORKING | MACHINE_SUPPORTS_SAVE)

51
src/mame/includes/pk8000.h
View File

@ -7,34 +7,35 @@ public:
: driver_device(mconfig, type, tag) , : driver_device(mconfig, type, tag) ,
m_maincpu(*this, "maincpu") { } m_maincpu(*this, "maincpu") { }
DECLARE_READ8_MEMBER(pk8000_video_color_r); DECLARE_READ8_MEMBER(video_color_r);
DECLARE_WRITE8_MEMBER(pk8000_video_color_w); DECLARE_WRITE8_MEMBER(video_color_w);
DECLARE_READ8_MEMBER(pk8000_text_start_r); DECLARE_READ8_MEMBER(text_start_r);
DECLARE_WRITE8_MEMBER(pk8000_text_start_w); DECLARE_WRITE8_MEMBER(text_start_w);
DECLARE_READ8_MEMBER(pk8000_chargen_start_r); DECLARE_READ8_MEMBER(chargen_start_r);
DECLARE_WRITE8_MEMBER(pk8000_chargen_start_w); DECLARE_WRITE8_MEMBER(chargen_start_w);
DECLARE_READ8_MEMBER(pk8000_video_start_r); DECLARE_READ8_MEMBER(video_start_r);
DECLARE_WRITE8_MEMBER(pk8000_video_start_w); DECLARE_WRITE8_MEMBER(video_start_w);
DECLARE_READ8_MEMBER(pk8000_color_start_r); DECLARE_READ8_MEMBER(color_start_r);
DECLARE_WRITE8_MEMBER(pk8000_color_start_w); DECLARE_WRITE8_MEMBER(color_start_w);
DECLARE_READ8_MEMBER(pk8000_color_r); DECLARE_READ8_MEMBER(color_r);
DECLARE_WRITE8_MEMBER(pk8000_color_w); DECLARE_WRITE8_MEMBER(color_w);
DECLARE_READ8_MEMBER(pk8000_84_porta_r); DECLARE_READ8_MEMBER(_84_porta_r);
DECLARE_WRITE8_MEMBER(pk8000_84_porta_w); DECLARE_WRITE8_MEMBER(_84_porta_w);
DECLARE_WRITE8_MEMBER(pk8000_84_portc_w); DECLARE_WRITE8_MEMBER(_84_portc_w);
DECLARE_PALETTE_INIT(pk8000); DECLARE_PALETTE_INIT(pk8000);
uint32_t pk8000_video_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect, uint8_t *videomem); uint32_t video_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect, uint8_t *videomem);
protected:
uint8_t m_pk8000_text_start;
uint8_t m_pk8000_chargen_start;
uint8_t m_pk8000_video_start;
uint8_t m_pk8000_color_start;
uint8_t m_pk8000_video_mode; protected:
uint8_t m_pk8000_video_color; uint8_t m_text_start;
uint8_t m_pk8000_color[32]; uint8_t m_chargen_start;
uint8_t m_pk8000_video_enable; uint8_t m_video_start;
uint8_t m_color_start;
uint8_t m_video_mode;
uint8_t m_video_color;
uint8_t m_color[32];
uint8_t m_video_enable;
required_device<cpu_device> m_maincpu; required_device<cpu_device> m_maincpu;
}; };

90
src/mame/video/pk8000.cpp
View File

@ -3,64 +3,64 @@
#include "emu.h" #include "emu.h"
#include "includes/pk8000.h" #include "includes/pk8000.h"
READ8_MEMBER(pk8000_base_state::pk8000_video_color_r) READ8_MEMBER(pk8000_base_state::video_color_r)
{ {
return m_pk8000_video_color; return m_video_color;
} }
WRITE8_MEMBER(pk8000_base_state::pk8000_video_color_w) WRITE8_MEMBER(pk8000_base_state::video_color_w)
{ {
m_pk8000_video_color = data; m_video_color = data;
} }
READ8_MEMBER(pk8000_base_state::pk8000_text_start_r) READ8_MEMBER(pk8000_base_state::text_start_r)
{ {
return m_pk8000_text_start; return m_text_start;
} }
WRITE8_MEMBER(pk8000_base_state::pk8000_text_start_w) WRITE8_MEMBER(pk8000_base_state::text_start_w)
{ {
m_pk8000_text_start = data; m_text_start = data;
} }
READ8_MEMBER(pk8000_base_state::pk8000_chargen_start_r) READ8_MEMBER(pk8000_base_state::chargen_start_r)
{ {
return m_pk8000_chargen_start; return m_chargen_start;
} }
WRITE8_MEMBER(pk8000_base_state::pk8000_chargen_start_w) WRITE8_MEMBER(pk8000_base_state::chargen_start_w)
{ {
m_pk8000_chargen_start = data; m_chargen_start = data;
} }
READ8_MEMBER(pk8000_base_state::pk8000_video_start_r) READ8_MEMBER(pk8000_base_state::video_start_r)
{ {
return m_pk8000_video_start; return m_video_start;
} }
WRITE8_MEMBER(pk8000_base_state::pk8000_video_start_w) WRITE8_MEMBER(pk8000_base_state::video_start_w)
{ {
m_pk8000_video_start = data; m_video_start = data;
} }
READ8_MEMBER(pk8000_base_state::pk8000_color_start_r) READ8_MEMBER(pk8000_base_state::color_start_r)
{ {
return m_pk8000_color_start; return m_color_start;
} }
WRITE8_MEMBER(pk8000_base_state::pk8000_color_start_w) WRITE8_MEMBER(pk8000_base_state::color_start_w)
{ {
m_pk8000_color_start = data; m_color_start = data;
} }
READ8_MEMBER(pk8000_base_state::pk8000_color_r) READ8_MEMBER(pk8000_base_state::color_r)
{ {
return m_pk8000_color[offset]; return m_color[offset];
} }
WRITE8_MEMBER(pk8000_base_state::pk8000_color_w) WRITE8_MEMBER(pk8000_base_state::color_w)
{ {
m_pk8000_color[offset] = data; m_color[offset] = data;
} }
static const rgb_t pk8000_palette[16] = { static const rgb_t pk8000_palette[16] = {
@ -87,43 +87,43 @@ PALETTE_INIT_MEMBER(pk8000_base_state, pk8000)
palette.set_pen_colors(0, pk8000_palette, ARRAY_LENGTH(pk8000_palette)); palette.set_pen_colors(0, pk8000_palette, ARRAY_LENGTH(pk8000_palette));
} }
READ8_MEMBER(pk8000_base_state::pk8000_84_porta_r) READ8_MEMBER(pk8000_base_state::_84_porta_r)
{ {
return m_pk8000_video_mode; return m_video_mode;
} }
WRITE8_MEMBER(pk8000_base_state::pk8000_84_porta_w) WRITE8_MEMBER(pk8000_base_state::_84_porta_w)
{ {
m_pk8000_video_mode = data; m_video_mode = data;
} }
WRITE8_MEMBER(pk8000_base_state::pk8000_84_portc_w) WRITE8_MEMBER(pk8000_base_state::_84_portc_w)
{ {
m_pk8000_video_enable = BIT(data,4); m_video_enable = BIT(data,4);
} }
uint32_t pk8000_base_state::pk8000_video_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect, uint8_t *videomem) uint32_t pk8000_base_state::video_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect, uint8_t *videomem)
{ {
int x,y,j,b; int x,y,j,b;
uint16_t offset = (m_pk8000_video_mode & 0xc0) << 8; uint16_t offset = (m_video_mode & 0xc0) << 8;
rectangle my_rect; rectangle my_rect;
my_rect.set(0, 256+32-1, 0, 192+32-1); my_rect.set(0, 256+32-1, 0, 192+32-1);
if (m_pk8000_video_enable) { if (m_video_enable) {
bitmap.fill((m_pk8000_video_color >> 4) & 0x0f, my_rect); bitmap.fill((m_video_color >> 4) & 0x0f, my_rect);
if (BIT(m_pk8000_video_mode,4)==0){ if (BIT(m_video_mode,4)==0){
// Text mode // Text mode
if (BIT(m_pk8000_video_mode,5)==0){ if (BIT(m_video_mode,5)==0){
// 32 columns // 32 columns
for (y = 0; y < 24; y++) for (y = 0; y < 24; y++)
{ {
for (x = 0; x < 32; x++) for (x = 0; x < 32; x++)
{ {
uint8_t chr = videomem[x +(y*32) + ((m_pk8000_text_start & 0x0f) << 10)+offset] ; uint8_t chr = videomem[x +(y*32) + ((m_text_start & 0x0f) << 10)+offset] ;
uint8_t color= m_pk8000_color[chr>>3]; uint8_t color= m_color[chr>>3];
for (j = 0; j < 8; j++) { for (j = 0; j < 8; j++) {
uint8_t code = videomem[((chr<<3) + j) + ((m_pk8000_chargen_start & 0x0e) << 10)+offset]; uint8_t code = videomem[((chr<<3) + j) + ((m_chargen_start & 0x0e) << 10)+offset];
for (b = 0; b < 8; b++) for (b = 0; b < 8; b++)
{ {
@ -139,12 +139,12 @@ uint32_t pk8000_base_state::pk8000_video_update(screen_device &screen, bitmap_in
{ {
for (x = 0; x < 42; x++) for (x = 0; x < 42; x++)
{ {
uint8_t chr = videomem[x +(y*64) + ((m_pk8000_text_start & 0x0e) << 10)+offset] ; uint8_t chr = videomem[x +(y*64) + ((m_text_start & 0x0e) << 10)+offset] ;
for (j = 0; j < 8; j++) { for (j = 0; j < 8; j++) {
uint8_t code = videomem[((chr<<3) + j) + ((m_pk8000_chargen_start & 0x0e) << 10)+offset]; uint8_t code = videomem[((chr<<3) + j) + ((m_chargen_start & 0x0e) << 10)+offset];
for (b = 2; b < 8; b++) for (b = 2; b < 8; b++)
{ {
uint8_t col = ((code >> b) & 0x01) ? (m_pk8000_video_color) & 0x0f : (m_pk8000_video_color>>4) & 0x0f; uint8_t col = ((code >> b) & 0x01) ? (m_video_color) & 0x0f : (m_video_color>>4) & 0x0f;
bitmap.pix16((y*8)+j+16, x*6+(7-b)+16+8) = col; bitmap.pix16((y*8)+j+16, x*6+(7-b)+16+8) = col;
} }
} }
@ -155,11 +155,11 @@ uint32_t pk8000_base_state::pk8000_video_update(screen_device &screen, bitmap_in
//Graphics //Graphics
for (y = 0; y < 24; y++) for (y = 0; y < 24; y++)
{ {
uint16_t off_color = (((~m_pk8000_color_start) & 0x08) << 10)+offset + ((y>>3)<<11); uint16_t off_color = (((~m_color_start) & 0x08) << 10)+offset + ((y>>3)<<11);
uint16_t off_code = (((~m_pk8000_video_start) & 0x08) << 10)+offset + ((y>>3)<<11); uint16_t off_code = (((~m_video_start) & 0x08) << 10)+offset + ((y>>3)<<11);
for (x = 0; x < 32; x++) for (x = 0; x < 32; x++)
{ {
uint8_t chr = videomem[x +(y*32) + ((m_pk8000_chargen_start & 0x0e) << 10)+offset] ; uint8_t chr = videomem[x +(y*32) + ((m_chargen_start & 0x0e) << 10)+offset] ;
for (j = 0; j < 8; j++) { for (j = 0; j < 8; j++) {
uint8_t color= videomem[((chr<<3) + j)+off_color]; uint8_t color= videomem[((chr<<3) + j)+off_color];
uint8_t code = videomem[((chr<<3) + j)+off_code]; uint8_t code = videomem[((chr<<3) + j)+off_code];