// license:BSD-3-Clause // copyright-holders:Wilbert Pol #include "emu.h" #include "includes/gamepock.h" #include "cpu/upd7810/upd7810.h" void gamepock_state::hd44102ch_w( int which, int c_d, uint8_t data ) { if ( c_d ) { uint8_t y; /* Data */ m_hd44102ch[which].ram[ m_hd44102ch[which].address ] = data; /* Increment/decrement Y counter */ y = ( m_hd44102ch[which].address & 0x3F ) + m_hd44102ch[which].y_inc; if ( y == 0xFF ) { y = 49; } if ( y == 50 ) { y = 0; } m_hd44102ch[which].address = ( m_hd44102ch[which].address & 0xC0 ) | y; } else { /* Command */ switch ( data ) { case 0x38: /* Display off */ m_hd44102ch[which].enabled = 0; break; case 0x39: /* Display on */ m_hd44102ch[which].enabled = 1; break; case 0x3A: /* Y decrement mode */ m_hd44102ch[which].y_inc = 0xFF; break; case 0x3B: /* Y increment mode */ m_hd44102ch[which].y_inc = 0x01; break; case 0x3E: /* Display start page #0 */ case 0x7E: /* Display start page #1 */ case 0xBE: /* Display start page #2 */ case 0xFE: /* Display start page #3 */ m_hd44102ch[which].start_page = data & 0xC0; break; default: if ( ( data & 0x3F ) < 50 ) { m_hd44102ch[which].address = data; } break; } } } void gamepock_state::hd44102ch_init( int which ) { memset( &m_hd44102ch[which], 0, sizeof( HD44102CH ) ); m_hd44102ch[which].y_inc = 0x01; } void gamepock_state::lcd_update() { /* Check whether HD44102CH #1 is enabled */ if ( m_port_a & 0x08 ) { hd44102ch_w( 0, m_port_a & 0x04, m_port_b ); } /* Check whether HD44102CH #2 is enabled */ if ( m_port_a & 0x10 ) { hd44102ch_w( 1, m_port_a & 0x04, m_port_b ); } /* Check whether HD44102CH #3 is enabled */ if ( m_port_a & 0x20 ) { hd44102ch_w( 2, m_port_a & 0x04, m_port_b ); } } WRITE8_MEMBER( gamepock_state::port_a_w ) { uint8_t old_port_a = m_port_a; m_port_a = data; if ( ! ( old_port_a & 0x02 ) && ( m_port_a & 0x02 ) ) { lcd_update(); } } WRITE8_MEMBER( gamepock_state::port_b_w ) { m_port_b = data; } READ8_MEMBER( gamepock_state::port_b_r ) { logerror("gamepock_port_b_r: not implemented\n"); return 0xFF; } READ8_MEMBER( gamepock_state::port_c_r ) { uint8_t data = 0xFF; if ( m_port_a & 0x80 ) { data &= ioport("IN0")->read(); } if ( m_port_a & 0x40 ) { data &= ioport("IN1")->read(); } return data; } void gamepock_state::machine_reset() { hd44102ch_init( 0 ); hd44102ch_init( 1 ); hd44102ch_init( 2 ); if (m_cart->exists()) m_maincpu->space(AS_PROGRAM).install_read_handler(0x4000,0xbfff, read8sm_delegate(*m_cart, FUNC(generic_slot_device::read_rom))); } uint32_t gamepock_state::screen_update_gamepock(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect) { uint8_t ad; /* Handle HD44102CH #0 */ ad = m_hd44102ch[0].start_page; for ( int i = 0; i < 4; i++ ) { for ( int j = 0; j < 50; j++ ) { bitmap.pix16(i * 8 + 0, 49 - j ) = ( m_hd44102ch[0].ram[ad+j] & 0x01 ) ? 0 : 1; bitmap.pix16(i * 8 + 1, 49 - j ) = ( m_hd44102ch[0].ram[ad+j] & 0x02 ) ? 0 : 1; bitmap.pix16(i * 8 + 2, 49 - j ) = ( m_hd44102ch[0].ram[ad+j] & 0x04 ) ? 0 : 1; bitmap.pix16(i * 8 + 3, 49 - j ) = ( m_hd44102ch[0].ram[ad+j] & 0x08 ) ? 0 : 1; bitmap.pix16(i * 8 + 4, 49 - j ) = ( m_hd44102ch[0].ram[ad+j] & 0x10 ) ? 0 : 1; bitmap.pix16(i * 8 + 5, 49 - j ) = ( m_hd44102ch[0].ram[ad+j] & 0x20 ) ? 0 : 1; bitmap.pix16(i * 8 + 6, 49 - j ) = ( m_hd44102ch[0].ram[ad+j] & 0x40 ) ? 0 : 1; bitmap.pix16(i * 8 + 7, 49 - j ) = ( m_hd44102ch[0].ram[ad+j] & 0x80 ) ? 0 : 1; } ad += 0x40; } /* Handle HD44102CH #1 */ ad = m_hd44102ch[1].start_page; for ( int i = 4; i < 8; i++ ) { for ( int j = 0; j < 50; j++ ) { bitmap.pix16(i * 8 + 0, j ) = ( m_hd44102ch[1].ram[ad+j] & 0x01 ) ? 0 : 1; bitmap.pix16(i * 8 + 1, j ) = ( m_hd44102ch[1].ram[ad+j] & 0x02 ) ? 0 : 1; bitmap.pix16(i * 8 + 2, j ) = ( m_hd44102ch[1].ram[ad+j] & 0x04 ) ? 0 : 1; bitmap.pix16(i * 8 + 3, j ) = ( m_hd44102ch[1].ram[ad+j] & 0x08 ) ? 0 : 1; bitmap.pix16(i * 8 + 4, j ) = ( m_hd44102ch[1].ram[ad+j] & 0x10 ) ? 0 : 1; bitmap.pix16(i * 8 + 5, j ) = ( m_hd44102ch[1].ram[ad+j] & 0x20 ) ? 0 : 1; bitmap.pix16(i * 8 + 6, j ) = ( m_hd44102ch[1].ram[ad+j] & 0x40 ) ? 0 : 1; bitmap.pix16(i * 8 + 7, j ) = ( m_hd44102ch[1].ram[ad+j] & 0x80 ) ? 0 : 1; } ad += 0x40; } /* Handle HD44102CH #2 */ ad = m_hd44102ch[2].start_page; for ( int i = 0; i < 4; i++ ) { for ( int j = 0; j < 25; j++ ) { bitmap.pix16(i * 8 + 0, 50 + j ) = ( m_hd44102ch[2].ram[ad+j] & 0x01 ) ? 0 : 1; bitmap.pix16(i * 8 + 1, 50 + j ) = ( m_hd44102ch[2].ram[ad+j] & 0x02 ) ? 0 : 1; bitmap.pix16(i * 8 + 2, 50 + j ) = ( m_hd44102ch[2].ram[ad+j] & 0x04 ) ? 0 : 1; bitmap.pix16(i * 8 + 3, 50 + j ) = ( m_hd44102ch[2].ram[ad+j] & 0x08 ) ? 0 : 1; bitmap.pix16(i * 8 + 4, 50 + j ) = ( m_hd44102ch[2].ram[ad+j] & 0x10 ) ? 0 : 1; bitmap.pix16(i * 8 + 5, 50 + j ) = ( m_hd44102ch[2].ram[ad+j] & 0x20 ) ? 0 : 1; bitmap.pix16(i * 8 + 6, 50 + j ) = ( m_hd44102ch[2].ram[ad+j] & 0x40 ) ? 0 : 1; bitmap.pix16(i * 8 + 7, 50 + j ) = ( m_hd44102ch[2].ram[ad+j] & 0x80 ) ? 0 : 1; } for ( int j = 25; j < 50; j++ ) { bitmap.pix16(32 + i * 8 + 0, 25 + j ) = ( m_hd44102ch[2].ram[ad+j] & 0x01 ) ? 0 : 1; bitmap.pix16(32 + i * 8 + 1, 25 + j ) = ( m_hd44102ch[2].ram[ad+j] & 0x02 ) ? 0 : 1; bitmap.pix16(32 + i * 8 + 2, 25 + j ) = ( m_hd44102ch[2].ram[ad+j] & 0x04 ) ? 0 : 1; bitmap.pix16(32 + i * 8 + 3, 25 + j ) = ( m_hd44102ch[2].ram[ad+j] & 0x08 ) ? 0 : 1; bitmap.pix16(32 + i * 8 + 4, 25 + j ) = ( m_hd44102ch[2].ram[ad+j] & 0x10 ) ? 0 : 1; bitmap.pix16(32 + i * 8 + 5, 25 + j ) = ( m_hd44102ch[2].ram[ad+j] & 0x20 ) ? 0 : 1; bitmap.pix16(32 + i * 8 + 6, 25 + j ) = ( m_hd44102ch[2].ram[ad+j] & 0x40 ) ? 0 : 1; bitmap.pix16(32 + i * 8 + 7, 25 + j ) = ( m_hd44102ch[2].ram[ad+j] & 0x80 ) ? 0 : 1; } ad += 0x40; } return 0; } /* This is called whenever the T0 pin switches state */ WRITE_LINE_MEMBER(gamepock_state::gamepock_to_w) { m_speaker->level_w(state & 1); }