(MESS) gl4000: fixed screen size. (nw)

This commit is contained in:
Sandro Ronco 2014-02-08 15:59:56 +00:00
parent 5d8cd9329e
commit 65c1aaef63

View File

@ -574,6 +574,33 @@ static MACHINE_CONFIG_DERIVED( gl2000, pc2000 )
MCFG_SOFTWARE_LIST_COMPATIBLE_ADD("cart_list", "misterx")
MACHINE_CONFIG_END
static HD44780_PIXEL_UPDATE(gl4000_pixel_update)
{
if (pos < 40)
{
static const UINT8 gl4000_display_layout[] =
{
0x00, 0x01, 0x02, 0x03, 0x28, 0x29, 0x2a, 0x2b, 0x04, 0x05, 0x06, 0x07, 0x08, 0x09, 0x0a, 0x0b, 0x2c, 0x2d, 0x2e, 0x2f,
0x30, 0x31, 0x32, 0x33, 0x0c, 0x0d, 0x0e, 0x0f, 0x10, 0x11, 0x12, 0x13, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x3a, 0x3b,
0x14, 0x15, 0x16, 0x17, 0x3c, 0x3d, 0x3e, 0x3f, 0x18, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f, 0x40, 0x41, 0x42, 0x43,
0x44, 0x45, 0x46, 0x47, 0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27, 0x48, 0x49, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f
};
UINT8 char_pos = gl4000_display_layout[line*40 + pos];
bitmap.pix16((char_pos / 20) * 9 + y, (char_pos % 20) * 6 + x) = state;
}
}
static MACHINE_CONFIG_DERIVED( gl4000, pc2000 )
MCFG_SCREEN_MODIFY("screen")
MCFG_SCREEN_SIZE(120, 36) // 4x20 chars
MCFG_SCREEN_VISIBLE_AREA(0, 120-1, 0, 36-1)
MCFG_DEVICE_MODIFY("hd44780")
MCFG_HD44780_LCD_SIZE(4, 20)
MCFG_HD44780_PIXEL_UPDATE_CB(gl4000_pixel_update)
MACHINE_CONFIG_END
static MACHINE_CONFIG_DERIVED_CLASS( misterx, pc2000, pc1000_state )
/* basic machine hardware */
MCFG_CPU_MODIFY("maincpu")
@ -703,8 +730,8 @@ COMP( 1993, pc2000, 0, 0, pc2000, pc2000, driver_device, 0, "V
COMP( 1993, gl2000, 0, 0, gl2000, pc2000, driver_device, 0, "Video Technology", "Genius Leader 2000", GAME_NOT_WORKING)
COMP( 1995, gl2000p, gl2000, 0, gl2000, pc2000, driver_device, 0, "Video Technology", "Genius Leader 2000 Plus", GAME_NOT_WORKING)
COMP( 1996, gl3000s, 0, 0, pc2000, pc2000, driver_device, 0, "Video Technology", "Genius Leader 3000S (Germany)", GAME_IS_SKELETON)
COMP( 1994, gl4000, 0, 0, pc2000, pc2000, driver_device, 0, "Video Technology", "Genius Leader 4000 Quadro (Germany)", GAME_IS_SKELETON)
COMP( 1996, gl4004, 0, 0, pc2000, pc2000, driver_device, 0, "Video Technology", "Genius Leader 4004 Quadro L (Germany)", GAME_IS_SKELETON)
COMP( 1994, gl4000, 0, 0, gl4000, pc2000, driver_device, 0, "Video Technology", "Genius Leader 4000 Quadro (Germany)", GAME_NOT_WORKING)
COMP( 1996, gl4004, 0, 0, gl4000, pc2000, driver_device, 0, "Video Technology", "Genius Leader 4004 Quadro L (Germany)", GAME_NOT_WORKING)
COMP( 1997, gl5000, 0, 0, pc2000, pc2000, driver_device, 0, "Video Technology", "Genius Leader 5000 (Germany)", GAME_IS_SKELETON)
COMP( 1997, gl5005x, 0, 0, pc2000, pc2000, driver_device, 0, "Video Technology", "Genius Leader 5005X (Germany)", GAME_IS_SKELETON)
COMP( 1997, gl6000sl, 0, 0, pc2000, pc2000, driver_device, 0, "Video Technology", "Genius Leader 6000SL (Germany)", GAME_IS_SKELETON)