pc2000.cpp: Move 'pc2000s' to use a SED1278-0B instead of an HD44780 (nw)

This commit is contained in:
ClawGrip 2020-05-15 22:01:38 +02:00 committed by GitHub
parent 2b085c4380
commit 8a085158a1
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -59,6 +59,7 @@ public:
{ }
void pc2000(machine_config &config);
void pc2000eur(machine_config &config);
void gl2000(machine_config &config);
protected:
@ -87,6 +88,8 @@ protected:
required_memory_bank m_bank1;
optional_memory_bank m_bank2;
void pc2000gen(machine_config &config);
private:
optional_ioport_array<8> m_rows[2];
@ -890,7 +893,7 @@ DEVICE_IMAGE_LOAD_MEMBER( pc2000_state::cart_load )
return image_init_result::PASS;
}
void pc2000_state::pc2000(machine_config &config)
void pc2000_state::pc2000gen(machine_config &config)
{
/* basic machine hardware */
Z80(config, m_maincpu, XTAL(4'000'000)); /* probably not accurate */
@ -910,9 +913,6 @@ void pc2000_state::pc2000(machine_config &config)
PALETTE(config, "palette", FUNC(pc2000_state::pc2000_palette), 2);
GFXDECODE(config, "gfxdecode", "palette", gfx_pc2000);
HD44780(config, m_lcdc, 0);
m_lcdc->set_lcd_size(2, 20);
/* sound hardware */
SPEAKER(config, "mono").front_center();
BEEP(config, m_beep, 3250).add_route(ALL_OUTPUTS, "mono", 1.00);
@ -922,6 +922,20 @@ void pc2000_state::pc2000(machine_config &config)
SOFTWARE_LIST(config, "pc1000_cart").set_compatible("pc1000");
}
void pc2000_state::pc2000(machine_config &config)
{
pc2000gen(config);
HD44780(config, m_lcdc, 0);
m_lcdc->set_lcd_size(2, 20);
}
void pc2000_state::pc2000eur(machine_config &config)
{
pc2000gen(config);
SED1278_0B(config, m_lcdc, 0);
m_lcdc->set_lcd_size(2, 20);
}
void pc2000_state::gl2000(machine_config &config)
{
pc2000(config);
@ -1101,21 +1115,21 @@ ROM_END
/* Driver */
// YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS
COMP( 1988, pc1000, 0, 0, pc1000, pc1000, pc1000_state, empty_init, "Video Technology", "PreComputer 1000", MACHINE_NOT_WORKING )
COMP( 1988, misterx, 0, 0, misterx, pc1000, pc1000_state, empty_init, "Video Technology / Yeno", "MisterX", MACHINE_NOT_WORKING )
COMP( 1988, ordisava, 0, 0, pc1000, pc1000, pc1000_state, empty_init, "Video Technology", "Ordisavant (France)", MACHINE_NOT_WORKING )
COMP( 1993, pc2000, 0, 0, pc2000, pc2000, pc2000_state, empty_init, "Video Technology", "PreComputer 2000", MACHINE_NOT_WORKING )
COMP( 1993, pc2000s, pc2000, 0, pc2000, pc2000, pc2000_state, empty_init, "Video Technology", "PreComputer 2000 (Spain)", MACHINE_NOT_WORKING )
COMP( 1993, gl2000, 0, 0, gl2000, pc2000, pc2000_state, empty_init, "Video Technology", "Genius Leader 2000", MACHINE_NOT_WORKING )
COMP( 1994, gl2000c, gl2000, 0, gl2000, pc2000, pc2000_state, empty_init, "Video Technology", "Genius Leader 2000 Compact", MACHINE_NOT_WORKING )
COMP( 1995, gl2000p, gl2000, 0, gl2000, pc2000, pc2000_state, empty_init, "Video Technology", "Genius Leader 2000 Plus", MACHINE_NOT_WORKING )
COMP( 1996, gl3000s, 0, 0, gl3000s, gl3000s, gl3000s_state,empty_init, "Video Technology", "Genius Leader 3000S (Germany)", MACHINE_NOT_WORKING )
COMP( 1994, gl4000, 0, 0, gl4000, pc2000, gl4004_state, empty_init, "Video Technology", "Genius Leader 4000 Quadro (Germany)", MACHINE_NOT_WORKING )
COMP( 1996, gl4004, 0, 0, gl4000, pc2000, gl4004_state, empty_init, "Video Technology", "Genius Leader 4004 Quadro L (Germany)", MACHINE_NOT_WORKING )
COMP( 1997, gl5000, 0, 0, pc2000, pc2000, pc2000_state, empty_init, "Video Technology", "Genius Leader 5000 (Germany)", MACHINE_IS_SKELETON )
COMP( 1997, gl5005x, 0, 0, pc2000, pc2000, pc2000_state, empty_init, "Video Technology", "Genius Leader 5005X (Germany)", MACHINE_IS_SKELETON )
COMP( 1997, glpn, 0, 0, gl4000, pc2000, gl4004_state, empty_init, "Video Technology", "Genius Leader Power Notebook (Germany)", MACHINE_IS_SKELETON )
COMP( 1998, gmtt , 0, 0, gl4000, pc2000, gl4004_state, empty_init, "Video Technology", "Genius Master Table Top (Germany)", MACHINE_IS_SKELETON )
COMP( 2001, gbs5505x, 0, 0, pc2000, pc2000, pc2000_state, empty_init, "Video Technology", "Genius BrainStation 5505X (Germany)", MACHINE_IS_SKELETON )
COMP( 1999, lexipcm, 0, 0, pc2000, pc2000, pc2000_state, empty_init, "Lexibook", "LexiPC Mega 2000 (Germany)", MACHINE_IS_SKELETON )
// YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS
COMP( 1988, pc1000, 0, 0, pc1000, pc1000, pc1000_state, empty_init, "Video Technology", "PreComputer 1000", MACHINE_NOT_WORKING )
COMP( 1988, misterx, 0, 0, misterx, pc1000, pc1000_state, empty_init, "Video Technology / Yeno", "MisterX", MACHINE_NOT_WORKING )
COMP( 1988, ordisava, 0, 0, pc1000, pc1000, pc1000_state, empty_init, "Video Technology", "Ordisavant (France)", MACHINE_NOT_WORKING )
COMP( 1993, pc2000, 0, 0, pc2000, pc2000, pc2000_state, empty_init, "Video Technology", "PreComputer 2000", MACHINE_NOT_WORKING )
COMP( 1993, pc2000s, pc2000, 0, pc2000eur, pc2000, pc2000_state, empty_init, "Video Technology", "PreComputer 2000 (Spain)", MACHINE_NOT_WORKING )
COMP( 1993, gl2000, 0, 0, gl2000, pc2000, pc2000_state, empty_init, "Video Technology", "Genius Leader 2000", MACHINE_NOT_WORKING )
COMP( 1994, gl2000c, gl2000, 0, gl2000, pc2000, pc2000_state, empty_init, "Video Technology", "Genius Leader 2000 Compact", MACHINE_NOT_WORKING )
COMP( 1995, gl2000p, gl2000, 0, gl2000, pc2000, pc2000_state, empty_init, "Video Technology", "Genius Leader 2000 Plus", MACHINE_NOT_WORKING )
COMP( 1996, gl3000s, 0, 0, gl3000s, gl3000s, gl3000s_state,empty_init, "Video Technology", "Genius Leader 3000S (Germany)", MACHINE_NOT_WORKING )
COMP( 1994, gl4000, 0, 0, gl4000, pc2000, gl4004_state, empty_init, "Video Technology", "Genius Leader 4000 Quadro (Germany)", MACHINE_NOT_WORKING )
COMP( 1996, gl4004, 0, 0, gl4000, pc2000, gl4004_state, empty_init, "Video Technology", "Genius Leader 4004 Quadro L (Germany)", MACHINE_NOT_WORKING )
COMP( 1997, gl5000, 0, 0, pc2000, pc2000, pc2000_state, empty_init, "Video Technology", "Genius Leader 5000 (Germany)", MACHINE_IS_SKELETON )
COMP( 1997, gl5005x, 0, 0, pc2000, pc2000, pc2000_state, empty_init, "Video Technology", "Genius Leader 5005X (Germany)", MACHINE_IS_SKELETON )
COMP( 1997, glpn, 0, 0, gl4000, pc2000, gl4004_state, empty_init, "Video Technology", "Genius Leader Power Notebook (Germany)", MACHINE_IS_SKELETON )
COMP( 1998, gmtt , 0, 0, gl4000, pc2000, gl4004_state, empty_init, "Video Technology", "Genius Master Table Top (Germany)", MACHINE_IS_SKELETON )
COMP( 2001, gbs5505x, 0, 0, pc2000, pc2000, pc2000_state, empty_init, "Video Technology", "Genius BrainStation 5505X (Germany)", MACHINE_IS_SKELETON )
COMP( 1999, lexipcm, 0, 0, pc2000, pc2000, pc2000_state, empty_init, "Lexibook", "LexiPC Mega 2000 (Germany)", MACHINE_IS_SKELETON )