diff options
Diffstat (limited to 'src/mame/drivers/sk101bl.cpp')
-rw-r--r-- | src/mame/drivers/sk101bl.cpp | 186 |
1 files changed, 0 insertions, 186 deletions
diff --git a/src/mame/drivers/sk101bl.cpp b/src/mame/drivers/sk101bl.cpp deleted file mode 100644 index 0e60fa81c86..00000000000 --- a/src/mame/drivers/sk101bl.cpp +++ /dev/null @@ -1,186 +0,0 @@ -// license:BSD-3-Clause -// copyright-holders:AJR -/*********************************************************************************************************************************** - -Skeleton driver for Reuters Model SK 101 BL trading terminal. - -This terminal is a small portable-sized unit with a 115-key keyboard, which is driven largely through LSTTL shift registers. The -keyboard layout is similar to that depicted in patent EP0434224A2. - -Attached to the keyboard is a backlit LCD module displaying one row of 16 characters. - -The main board incorporates two DSWs and a "BLMHYB01" hybrid module containing unknown interface logic. - -TODO: figure out keycodes (are they translated externally?) - -***********************************************************************************************************************************/ - -#include "emu.h" -//#include "bus/rs232/rs232.h" -#include "cpu/mcs51/mcs51.h" -#include "sound/spkrdev.h" -#include "video/hd44780.h" -#include "emupal.h" -#include "screen.h" -#include "speaker.h" - -class sk101bl_state : public driver_device -{ -public: - sk101bl_state(const machine_config &mconfig, device_type type, const char *tag) - : driver_device(mconfig, type, tag) - , m_maincpu(*this, "maincpu") - , m_lcdc(*this, "lcdc") - , m_key_row(*this, "ROW%u", 0U) - { - } - - void sk101bl(machine_config &config); - -protected: - virtual void machine_start() override; - virtual void machine_reset() override; - -private: - HD44780_PIXEL_UPDATE(pixel_update); - - u8 p1_r(); - void p1_w(u8 data); - void scan_load_w(u8 data); - u8 scan_shift_r(); - void lcd_control_w(u8 data); - void serial_tx_w(u8 data) { logerror("Serial TX: %02X\n", data); } - - void prog_map(address_map &map); - void ext_map(address_map &map); - - required_device<i80c31_device> m_maincpu; - required_device<hd44780_device> m_lcdc; - optional_ioport_array<16> m_key_row; - - u8 m_p1_data; - u8 m_lcd_control; - u16 m_key_scan; - u16 m_shift_output; - u8 m_row_counter; -}; - -void sk101bl_state::machine_start() -{ - m_p1_data = 0xff; - m_shift_output = 0; - m_key_scan = 0xffff; - m_row_counter = 0; - - save_item(NAME(m_p1_data)); - save_item(NAME(m_lcd_control)); - save_item(NAME(m_key_scan)); - save_item(NAME(m_shift_output)); - save_item(NAME(m_row_counter)); -} - -void sk101bl_state::machine_reset() -{ - m_lcd_control = 0; -} - -HD44780_PIXEL_UPDATE(sk101bl_state::pixel_update) -{ - if (pos < 16 && line == 0) - bitmap.pix16(line * 10 + y, pos * 6 + x) = state; -} - -u8 sk101bl_state::p1_r() -{ - return m_lcdc->db_r(); -} - -void sk101bl_state::p1_w(u8 data) -{ - if (BIT(m_p1_data, 7) && BIT(m_p1_data, 6) && !BIT(data, 6) && !BIT(m_lcd_control, 2)) - m_row_counter = (m_row_counter - 1) & 0x0f; - - m_p1_data = data; - m_lcdc->db_w(data); -} - -void sk101bl_state::scan_load_w(u8 data) -{ - m_key_scan = m_key_row[m_row_counter & 0x0f].read_safe(0xffff); - m_maincpu->set_input_line(MCS51_INT0_LINE, BIT(m_key_scan, 15) ? CLEAR_LINE : ASSERT_LINE); -} - -u8 sk101bl_state::scan_shift_r() -{ - if (!machine().side_effects_disabled()) - { - m_key_scan = (m_key_scan << 1) | 1; - m_maincpu->set_input_line(MCS51_INT0_LINE, BIT(m_key_scan, 15) ? CLEAR_LINE : ASSERT_LINE); - } - return 0xff; -} - -void sk101bl_state::lcd_control_w(u8 data) -{ - if (BIT(data, 7) && !BIT(m_lcd_control, 7)) - m_shift_output = (m_shift_output << 1) | (BIT(m_p1_data, 7) ? 0 : 1); - - m_lcdc->rw_w(BIT(data, 3)); - m_lcdc->rs_w(BIT(data, 2)); - m_lcdc->e_w(BIT(data, 1)); - - if (BIT(data, 0)) - m_row_counter = 0; - - m_lcd_control = data; -} - -void sk101bl_state::prog_map(address_map &map) -{ - map(0x0000, 0x7fff).rom().region("program", 0); -} - -void sk101bl_state::ext_map(address_map &map) -{ - map(0x0000, 0x0000).mirror(0x1fff).r(FUNC(sk101bl_state::scan_shift_r)); - map(0x1000, 0x1000).mirror(0x0fff).w(FUNC(sk101bl_state::scan_load_w)); - map(0x2000, 0x7fff).rom().region("program", 0x2000); - map(0x4000, 0x4000).mirror(0x0fff).w(FUNC(sk101bl_state::lcd_control_w)); - map(0xe000, 0xffff).ram(); // TC5565APL-15L -} - -static INPUT_PORTS_START(sk101bl) -INPUT_PORTS_END - -void sk101bl_state::sk101bl(machine_config &config) -{ - I80C31(config, m_maincpu, 11.0592_MHz_XTAL); - m_maincpu->set_addrmap(AS_PROGRAM, &sk101bl_state::prog_map); - m_maincpu->set_addrmap(AS_IO, &sk101bl_state::ext_map); - m_maincpu->port_in_cb<1>().set(FUNC(sk101bl_state::p1_r)); - m_maincpu->port_out_cb<1>().set(FUNC(sk101bl_state::p1_w)); - m_maincpu->port_out_cb<3>().set("alarm", FUNC(speaker_sound_device::level_w)).bit(3); - m_maincpu->serial_tx_cb().set(FUNC(sk101bl_state::serial_tx_w)); - - screen_device &screen(SCREEN(config, "screen", SCREEN_TYPE_LCD)); - screen.set_refresh_hz(50); - screen.set_screen_update("lcdc", FUNC(hd44780_device::screen_update)); - screen.set_size(16*6, 10); - screen.set_visarea(0, 16*6-1, 0, 10-1); - screen.set_palette("palette"); - - HD44780(config, m_lcdc).set_lcd_size(1, 16); - m_lcdc->set_pixel_update_cb(FUNC(sk101bl_state::pixel_update)); - - PALETTE(config, "palette").set_entries(2); - - SPEAKER(config, "mono").front_center(); - SPEAKER_SOUND(config, "alarm").add_route(ALL_OUTPUTS, "mono", 1.00); -} - -ROM_START(sk101bl) - ROM_REGION(0x8000, "program", 0) - ROM_LOAD("sk_101_5.0_1ca2.ic7", 0x0000, 0x8000, CRC(f7903ca5) SHA1(66648cc1622c1241cdbd443af706750acbb93502)) // 27256-25 -ROM_END - -COMP(1988, sk101bl, 0, 0, sk101bl, sk101bl, sk101bl_state, empty_init, "Reuters", "Model SK 101 BL", MACHINE_NOT_WORKING) |