summaryrefslogtreecommitdiffstatshomepage
path: root/src/mess/drivers/fk1.c
diff options
context:
space:
mode:
author Miodrag Milanovic <mmicko@gmail.com>2012-08-21 10:41:19 +0000
committer Miodrag Milanovic <mmicko@gmail.com>2012-08-21 10:41:19 +0000
commit7285b359d259b2ae0fdf85096571c386ec8c991a (patch)
treea027aff57f1a255f9ec6cfd3b68cabe4b6683998 /src/mess/drivers/fk1.c
parent67c425e90757876a6716b7867df30c0149912e74 (diff)
Merge of MESS sources (no whatsnew)
Diffstat (limited to 'src/mess/drivers/fk1.c')
-rw-r--r--src/mess/drivers/fk1.c504
1 files changed, 504 insertions, 0 deletions
diff --git a/src/mess/drivers/fk1.c b/src/mess/drivers/fk1.c
new file mode 100644
index 00000000000..383efcb2cc7
--- /dev/null
+++ b/src/mess/drivers/fk1.c
@@ -0,0 +1,504 @@
+/***************************************************************************
+
+ FK-1
+
+ 12/05/2009 Skeleton driver.
+
+****************************************************************************/
+
+#include "emu.h"
+#include "cpu/z80/z80.h"
+#include "machine/i8255.h"
+#include "machine/pit8253.h"
+#include "machine/i8251.h"
+#include "machine/ram.h"
+
+#define MACHINE_RESET_MEMBER(name) void name::machine_reset()
+#define SCREEN_UPDATE16_MEMBER(name) UINT32 name::screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect)
+
+class fk1_state : public driver_device
+{
+public:
+ fk1_state(const machine_config &mconfig, device_type type, const char *tag)
+ : driver_device(mconfig, type, tag),
+ m_maincpu(*this, "maincpu")
+ { }
+
+ required_device<cpu_device> m_maincpu;
+ DECLARE_WRITE8_MEMBER(fk1_ppi_1_a_w);
+ DECLARE_WRITE8_MEMBER(fk1_ppi_1_b_w);
+ DECLARE_WRITE8_MEMBER(fk1_ppi_1_c_w);
+ DECLARE_READ8_MEMBER(fk1_ppi_1_a_r);
+ DECLARE_READ8_MEMBER(fk1_ppi_1_b_r);
+ DECLARE_READ8_MEMBER(fk1_ppi_1_c_r);
+ DECLARE_WRITE8_MEMBER(fk1_ppi_2_a_w);
+ DECLARE_WRITE8_MEMBER(fk1_ppi_2_c_w);
+ DECLARE_READ8_MEMBER(fk1_ppi_2_b_r);
+ DECLARE_READ8_MEMBER(fk1_ppi_2_c_r);
+ DECLARE_WRITE8_MEMBER(fk1_ppi_3_a_w);
+ DECLARE_WRITE8_MEMBER(fk1_ppi_3_b_w);
+ DECLARE_WRITE8_MEMBER(fk1_ppi_3_c_w);
+ DECLARE_READ8_MEMBER(fk1_ppi_3_a_r);
+ DECLARE_READ8_MEMBER(fk1_ppi_3_b_r);
+ DECLARE_READ8_MEMBER(fk1_ppi_3_c_r);
+ DECLARE_WRITE_LINE_MEMBER(fk1_pit_out0);
+ DECLARE_WRITE_LINE_MEMBER(fk1_pit_out1);
+ DECLARE_WRITE_LINE_MEMBER(fk1_pit_out2);
+ DECLARE_WRITE8_MEMBER(fk1_intr_w);
+ DECLARE_READ8_MEMBER(fk1_bank_ram_r);
+ DECLARE_READ8_MEMBER(fk1_bank_rom_r);
+ DECLARE_WRITE8_MEMBER(fk1_disk_w);
+ DECLARE_READ8_MEMBER(fk1_mouse_r);
+ DECLARE_WRITE8_MEMBER(fk1_reset_int_w);
+ UINT8 m_video_rol;
+ UINT8 m_int_vector;
+ virtual void machine_reset();
+ UINT32 screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect);
+};
+
+
+/*
+Port A:
+ Printer
+Port B:
+ Keyboard
+Port C:
+ READING :
+ 7 - / OBF(buffer overflow for the printer)
+ 6 - INTE printer
+ 5 - ERROR printer
+ 4 - /PEND, lack of paper
+ 3 - INTR printer
+ 2 - INTE keyboard
+ 1 - IBF (data from the keyboard)
+ 0 - INTR keyboard
+ WRITING :
+ 6 - INTE printer
+ 2 - INTE keyboard
+ */
+
+WRITE8_MEMBER( fk1_state::fk1_ppi_1_a_w )
+{
+// logerror("fk1_ppi_1_a_w %02x\n",data);
+}
+
+WRITE8_MEMBER( fk1_state::fk1_ppi_1_b_w )
+{
+// logerror("fk1_ppi_1_b_w %02x\n",data);
+}
+
+WRITE8_MEMBER( fk1_state::fk1_ppi_1_c_w )
+{
+ //logerror("fk1_ppi_1_c_w %02x\n",data);
+}
+
+READ8_MEMBER( fk1_state::fk1_ppi_1_a_r )
+{
+ //logerror("fk1_ppi_1_a_r\n");
+ return 0xff;
+}
+
+READ8_MEMBER( fk1_state::fk1_ppi_1_b_r )
+{
+// logerror("fk1_ppi_1_b_r\n");
+ return 0;
+}
+
+READ8_MEMBER( fk1_state::fk1_ppi_1_c_r )
+{
+// logerror("fk1_ppi_1_c_r\n");
+ return 0;
+}
+
+static I8255_INTERFACE( fk1_ppi8255_interface_1 )
+{
+ DEVCB_DRIVER_MEMBER(fk1_state, fk1_ppi_1_a_r),
+ DEVCB_DRIVER_MEMBER(fk1_state, fk1_ppi_1_a_w),
+ DEVCB_DRIVER_MEMBER(fk1_state, fk1_ppi_1_b_r),
+ DEVCB_DRIVER_MEMBER(fk1_state, fk1_ppi_1_b_w),
+ DEVCB_DRIVER_MEMBER(fk1_state, fk1_ppi_1_c_r),
+ DEVCB_DRIVER_MEMBER(fk1_state, fk1_ppi_1_c_w)
+};
+
+/*
+Port A:
+ Writing data to disk
+Port B:
+ Reading data from disk
+Port C:
+ READING:
+ 7 - / OF A data write to disk,
+ 6 - INTE A,
+ 5 - Select the drive A, B,
+ 4 - Not connected
+ 3 - INTR A
+ 2 - INTE B read data,
+ 1 - IBF B read data,
+ 0 - INTR B
+
+ WRITING:
+ 6 - INTE A - reading data
+ 2 - INTE B - writing data
+*/
+
+WRITE8_MEMBER( fk1_state::fk1_ppi_2_a_w )
+{
+// logerror("write to disk %02x\n",data);
+}
+
+WRITE8_MEMBER( fk1_state::fk1_ppi_2_c_w )
+{
+// logerror("fk1_ppi_2_c_w %02x\n",data);
+}
+
+READ8_MEMBER( fk1_state::fk1_ppi_2_b_r )
+{
+// logerror("read from disk\n");
+ return 0;
+}
+
+READ8_MEMBER( fk1_state::fk1_ppi_2_c_r )
+{
+// logerror("fk1_ppi_2_c_r\n");
+ return 0;
+}
+
+static I8255_INTERFACE( fk1_ppi8255_interface_2 )
+{
+ DEVCB_NULL,
+ DEVCB_DRIVER_MEMBER(fk1_state, fk1_ppi_2_a_w),
+ DEVCB_DRIVER_MEMBER(fk1_state, fk1_ppi_2_b_r),
+ DEVCB_NULL,
+ DEVCB_DRIVER_MEMBER(fk1_state, fk1_ppi_2_c_r),
+ DEVCB_DRIVER_MEMBER(fk1_state, fk1_ppi_2_c_w)
+};
+
+
+/*
+
+Port A:
+ 6 - / disk, authorization disk operations,
+ 3 - INTE MOUSE, permit suspension from mouse,
+ 2 - INTE RTC from the system clock of 50 Hz,
+ 1 and 0 - to set the type for hours write to the disk (01 index, 11 address mark, mark the date, 00 other).
+
+Port B:
+ Video ROL register
+Port C
+
+ READING:
+ 7 - INDEX ( index mark on the disk)
+ 6 - I do not know,
+ 5 - WRITE_PROTECT the protected disk,
+ 4 - TRAC_00 as a sign of trace
+
+ WRITING:
+ 3 - HEAD LOAD
+ 2 - TRACK_43
+ 1 - DIRC - direction to set the direction of stepping disk
+ 0 - STEP, move disk (0 1 .. 0.).
+
+*/
+WRITE8_MEMBER( fk1_state::fk1_ppi_3_a_w )
+{
+// logerror("fk1_ppi_3_a_w %02x\n",data);
+}
+
+WRITE8_MEMBER( fk1_state::fk1_ppi_3_b_w )
+{
+ m_video_rol = data;
+}
+
+WRITE8_MEMBER( fk1_state::fk1_ppi_3_c_w )
+{
+// logerror("fk1_ppi_3_c_w %02x\n",data);
+}
+
+READ8_MEMBER( fk1_state::fk1_ppi_3_a_r )
+{
+// logerror("fk1_ppi_3_a_r\n");
+ return 0;
+}
+
+READ8_MEMBER( fk1_state::fk1_ppi_3_b_r )
+{
+ return m_video_rol;
+}
+
+READ8_MEMBER( fk1_state::fk1_ppi_3_c_r )
+{
+// logerror("fk1_ppi_3_c_r\n");
+ return 0;
+}
+
+static I8255_INTERFACE( fk1_ppi8255_interface_3 )
+{
+ DEVCB_DRIVER_MEMBER(fk1_state, fk1_ppi_3_a_r),
+ DEVCB_DRIVER_MEMBER(fk1_state, fk1_ppi_3_a_w),
+ DEVCB_DRIVER_MEMBER(fk1_state, fk1_ppi_3_b_r),
+ DEVCB_DRIVER_MEMBER(fk1_state, fk1_ppi_3_b_w),
+ DEVCB_DRIVER_MEMBER(fk1_state, fk1_ppi_3_c_r),
+ DEVCB_DRIVER_MEMBER(fk1_state, fk1_ppi_3_c_w)
+};
+
+WRITE_LINE_MEMBER( fk1_state::fk1_pit_out0 )
+{
+ // System time
+ logerror("WRITE_LINE_MEMBER(fk1_pit_out0)\n");
+}
+
+WRITE_LINE_MEMBER( fk1_state::fk1_pit_out1 )
+{
+ // Timeout for disk operation
+ logerror("WRITE_LINE_MEMBER(fk1_pit_out1)\n");
+}
+
+WRITE_LINE_MEMBER( fk1_state::fk1_pit_out2 )
+{
+ // Overflow for disk operations
+ logerror("WRITE_LINE_MEMBER(fk1_pit_out2)\n");
+}
+
+
+static const struct pit8253_config fk1_pit8253_intf =
+{
+ {
+ {
+ 50,
+ DEVCB_NULL,
+ DEVCB_DRIVER_LINE_MEMBER(fk1_state, fk1_pit_out0)
+ },
+ {
+ 1000000,
+ DEVCB_NULL,
+ DEVCB_DRIVER_LINE_MEMBER(fk1_state, fk1_pit_out1)
+ },
+ {
+ 0,
+ DEVCB_NULL,
+ DEVCB_DRIVER_LINE_MEMBER(fk1_state, fk1_pit_out2)
+ }
+ }
+};
+
+/*
+ 0 no interrupt allowed,
+ 1 allowed INTR-7,
+ 2 allowed INTR-7 and INTR-6,
+ 8 any interruption allowed.
+*/
+
+WRITE8_MEMBER( fk1_state::fk1_intr_w )
+{
+ logerror("fk1_intr_w %02x\n",data);
+}
+
+READ8_MEMBER( fk1_state::fk1_bank_ram_r )
+{
+ address_space *space_mem = m_maincpu->memory().space(AS_PROGRAM);
+ UINT8 *ram = machine().device<ram_device>(RAM_TAG)->pointer();
+
+ space_mem->install_write_bank(0x0000, 0x3fff, "bank1");
+ membank("bank1")->set_base(ram);
+ membank("bank2")->set_base(ram + 0x4000);
+ return 0;
+}
+
+READ8_MEMBER( fk1_state::fk1_bank_rom_r )
+{
+ address_space *space_mem = m_maincpu->memory().space(AS_PROGRAM);
+ space_mem->unmap_write(0x0000, 0x3fff);
+ membank("bank1")->set_base(machine().root_device().memregion("maincpu")->base());
+ membank("bank2")->set_base(machine().device<ram_device>(RAM_TAG)->pointer() + 0x10000);
+ return 0;
+}
+
+/*
+ 4 - FORMAT authorization
+ 3 - READ_ADDRESS_MARK
+ 2 - READ_DATA_MARK
+ 1 - WRITE
+ 0 - READ
+ Functions are allowed in one.
+*/
+
+WRITE8_MEMBER( fk1_state::fk1_disk_w )
+{
+// logerror("fk1_disk_w %02x\n",data);
+}
+
+/*
+7 and 6 - 1 to connected mouse and 0 if not connected,
+5 - / T2, right-click
+4 - / T1, left-click
+3 - / BY, Y-axis
+2 - / AY, Y-axis
+1 - / BX, X-axis
+0 - / AX, X-axis
+*/
+
+READ8_MEMBER( fk1_state::fk1_mouse_r )
+{
+// logerror("fk1_mouse_r\n");
+ return 0;
+}
+
+/*Write to port 70 resets the interrupt from the system clock of 50 Hz. */
+
+WRITE8_MEMBER( fk1_state::fk1_reset_int_w )
+{
+ logerror("fk1_reset_int_w\n");
+}
+
+static ADDRESS_MAP_START(fk1_mem, AS_PROGRAM, 8, fk1_state)
+ AM_RANGE(0x0000, 0x3fff) AM_RAMBANK("bank1")
+ AM_RANGE(0x4000, 0x7fff) AM_RAMBANK("bank2")
+ AM_RANGE(0x8000, 0xbfff) AM_RAMBANK("bank3")
+ AM_RANGE(0xc000, 0xffff) AM_RAMBANK("bank4")
+ADDRESS_MAP_END
+
+static ADDRESS_MAP_START(fk1_io, AS_IO, 8, fk1_state)
+ ADDRESS_MAP_GLOBAL_MASK(0xff)
+ ADDRESS_MAP_UNMAP_HIGH
+ AM_RANGE( 0x00, 0x03 ) AM_DEVREADWRITE("ppi8255_1", i8255_device, read, write)
+ AM_RANGE( 0x10, 0x13 ) AM_DEVREADWRITE_LEGACY("pit8253", pit8253_r,pit8253_w)
+ AM_RANGE( 0x20, 0x23 ) AM_DEVREADWRITE("ppi8255_2", i8255_device, read, write)
+ AM_RANGE( 0x30, 0x30 ) AM_READWRITE(fk1_bank_ram_r,fk1_intr_w)
+ AM_RANGE( 0x40, 0x40 ) AM_DEVREADWRITE("uart", i8251_device, data_r, data_w)
+ AM_RANGE( 0x41, 0x41 ) AM_DEVREADWRITE("uart", i8251_device, status_r, control_w)
+ AM_RANGE( 0x50, 0x50 ) AM_READWRITE(fk1_bank_rom_r,fk1_disk_w)
+ AM_RANGE( 0x60, 0x63 ) AM_DEVREADWRITE("ppi8255_3", i8255_device, read, write)
+ AM_RANGE( 0x70, 0x70 ) AM_READWRITE(fk1_mouse_r,fk1_reset_int_w)
+ADDRESS_MAP_END
+
+/* Input ports */
+static INPUT_PORTS_START( fk1 )
+ PORT_START("LINE0")
+ PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_0) PORT_CHAR('0')
+ PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_1) PORT_CHAR('1') PORT_CHAR('!')
+ PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_2) PORT_CHAR('2') PORT_CHAR('\"')
+ PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_3) PORT_CHAR('3') PORT_CHAR('#')
+ PORT_BIT(0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_4) PORT_CHAR('4') PORT_CHAR('\xA4')
+ PORT_BIT(0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_5) PORT_CHAR('5') PORT_CHAR('%')
+ PORT_BIT(0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_6) PORT_CHAR('6') PORT_CHAR('&')
+ PORT_BIT(0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_7) PORT_CHAR('7') PORT_CHAR('\'')
+INPUT_PORTS_END
+
+static TIMER_DEVICE_CALLBACK(keyboard_callback)
+{
+ fk1_state *state = timer.machine().driver_data<fk1_state>();
+
+ if (timer.machine().root_device().ioport("LINE0")->read())
+ {
+ state->m_int_vector = 6;
+ cputag_set_input_line(timer.machine(), "maincpu", 0, HOLD_LINE);
+ }
+}
+
+/*
+7 ? DATA_READY
+6 ? TIMEOUT
+5 ? OVERFLOW
+4 ? RTC_50HZ
+3 ? MOUSE
+2 ? SIO
+1 ? KEYBOARD
+0 ? PRINTER
+*/
+
+static IRQ_CALLBACK (fk1_irq_callback)
+{
+ fk1_state *state = device->machine().driver_data<fk1_state>();
+
+ logerror("IRQ %02x\n", state->m_int_vector*2);
+ return state->m_int_vector * 2;
+}
+
+static TIMER_DEVICE_CALLBACK( vsync_callback )
+{
+ fk1_state *state = timer.machine().driver_data<fk1_state>();
+
+ state->m_int_vector = 3;
+ cputag_set_input_line(timer.machine(), "maincpu", 0, HOLD_LINE);
+}
+
+
+MACHINE_RESET_MEMBER( fk1_state )
+{
+ address_space *space = m_maincpu->memory().space(AS_PROGRAM);
+ UINT8 *ram = machine().device<ram_device>(RAM_TAG)->pointer();
+
+ space->unmap_write(0x0000, 0x3fff);
+ membank("bank1")->set_base(machine().root_device().memregion("maincpu")->base()); // ROM
+ membank("bank2")->set_base(ram + 0x10000); // VRAM
+ membank("bank3")->set_base(ram + 0x8000);
+ membank("bank4")->set_base(ram + 0xc000);
+
+ device_set_irq_callback(machine().device("maincpu"), fk1_irq_callback);
+}
+
+SCREEN_UPDATE16_MEMBER( fk1_state )
+{
+ UINT8 code;
+ int y, x, b;
+ UINT8 *ram = machine().device<ram_device>(RAM_TAG)->pointer();
+
+ for (x = 0; x < 64; x++)
+ {
+ for (y = 0; y < 256; y++)
+ {
+ code = ram[x * 0x100 + ((y + m_video_rol) & 0xff) + 0x10000];
+ for (b = 0; b < 8; b++)
+ {
+ bitmap.pix16(y, x*8+b) = ((code << b) & 0x80) ? 1 : 0;
+ }
+ }
+ }
+ return 0;
+}
+
+static MACHINE_CONFIG_START( fk1, fk1_state )
+ /* basic machine hardware */
+ MCFG_CPU_ADD("maincpu",Z80, XTAL_8MHz / 2)
+ MCFG_CPU_PROGRAM_MAP(fk1_mem)
+ MCFG_CPU_IO_MAP(fk1_io)
+
+ /* video hardware */
+ MCFG_SCREEN_ADD("screen", RASTER)
+ MCFG_SCREEN_REFRESH_RATE(50)
+ MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500)) /* not accurate */
+ MCFG_SCREEN_UPDATE_DRIVER(fk1_state, screen_update)
+ MCFG_SCREEN_SIZE(512, 256)
+ MCFG_SCREEN_VISIBLE_AREA(0, 512-1, 0, 256-1)
+ MCFG_PALETTE_LENGTH(2)
+ MCFG_PALETTE_INIT(monochrome_green)
+
+ MCFG_PIT8253_ADD( "pit8253", fk1_pit8253_intf )
+ MCFG_I8255_ADD( "ppi8255_1", fk1_ppi8255_interface_1 )
+ MCFG_I8255_ADD( "ppi8255_2", fk1_ppi8255_interface_2 )
+ MCFG_I8255_ADD( "ppi8255_3", fk1_ppi8255_interface_3 )
+ /* uart */
+ MCFG_I8251_ADD("uart", default_i8251_interface)
+
+ /* internal ram */
+ MCFG_RAM_ADD(RAM_TAG)
+ MCFG_RAM_DEFAULT_SIZE("80K") // 64 + 16
+
+ MCFG_TIMER_ADD_PERIODIC("keyboard_timer", keyboard_callback, attotime::from_hz(24000))
+ MCFG_TIMER_ADD_PERIODIC("vsync_timer", vsync_callback, attotime::from_hz(50))
+MACHINE_CONFIG_END
+
+/* ROM definition */
+ROM_START( fk1 )
+ ROM_REGION( 0x10000, "maincpu", ROMREGION_ERASEFF )
+ ROM_SYSTEM_BIOS( 0, "orig", "Original BIOS" )
+ ROMX_LOAD( "fk1.u65", 0x0000, 0x0800, CRC(145561f8) SHA1(a4eb17d773e51b34620c508b6cebcb4531ae99c2), ROM_BIOS(1))
+ ROM_SYSTEM_BIOS( 1, "diag", "Diag BIOS" )
+ ROMX_LOAD( "fk1-diag.u65", 0x0000, 0x0800, CRC(e0660ae1) SHA1(6ad609049b28f27126af0a8a6224362351073dee), ROM_BIOS(2))
+ROM_END
+
+/* Driver */
+
+/* YEAR NAME PARENT COMPAT MACHINE INPUT INIT COMPANY FULLNAME FLAGS */
+COMP( 1989, fk1, 0, 0, fk1, fk1, driver_device, 0, "Statni statek Klicany", "FK-1", GAME_NOT_WORKING | GAME_NO_SOUND)
+