summaryrefslogtreecommitdiffstatshomepage
diff options
context:
space:
mode:
-rw-r--r--src/mess/drivers/binbug.c130
-rw-r--r--src/mess/mess.lst2
2 files changed, 104 insertions, 28 deletions
diff --git a/src/mess/drivers/binbug.c b/src/mess/drivers/binbug.c
index 6889c51571b..8ecbb0ed348 100644
--- a/src/mess/drivers/binbug.c
+++ b/src/mess/drivers/binbug.c
@@ -74,7 +74,7 @@ public:
virtual void video_start();
UINT32 screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect);
optional_device<serial_keyboard_device> m_keyboard;
- optional_device<cassette_image_device> m_cass;
+ required_device<cassette_image_device> m_cass;
required_shared_ptr<const UINT8> m_p_videoram;
required_shared_ptr<const UINT8> m_p_attribram;
};
@@ -337,18 +337,58 @@ COMP( 1980, binbug, pipbug, 0, binbug, binbug, driver_device, 0, "Micr
/*
-DGOS-Z80 (ETI-680)
+DG680 (ETI-680), using the DGOS-Z80 operating system.
This is a S100 card.
-ROM is a bad dump, scanned from a pdf. It is being worked on.
+In some ways, this system is the ancestor of the original Microbee.
+
+ROM is typed in from a PDF, therefore marked a bad dump.
No schematic available, most of this is guesswork.
+Port 0 is the input from an ascii keyboard.
+
+Port 2 is the cassette interface.
+
+Port 8 controls some kind of memory protection scheme.
+The code indicates that B is the page to protect, and
+A is the code (0x08 = inhibit; 0x0B = unprotect;
+0x0C = enable; 0x0E = protect). There are 256 pages so
+each page is 256 bytes.
+
+To turn the clock on (if it was working), put a non-zero
+into D80D.
+
+Monitor Commands:
+C (compare)*
+E (edit)*
+F (fill)*
+G - Go to address
+I - Inhibit CTC
+M (move)*
+P (clear screen)*
+R (read tape)*
+S (search)*
+T hhmm [ss] - Set the time
+W (write tape)*
+X - protection status
+XC - clear ram
+XD - same as X
+XE - enable facilities
+XF - disable facilities
+XP - protect block
+XU - unprotect block
+Z - go to 0000.
+
+* These commands are identical to the Microbee ones.
+
ToDo:
- dips
- leds
- need schematic to find out what else is missing
+- cassette
+- ctc / clock
*/
@@ -359,10 +399,10 @@ ToDo:
#include "cpu/z80/z80daisy.h"
-class dgosz80_state : public binbug_state
+class dg680_state : public binbug_state
{
public:
- dgosz80_state(const machine_config &mconfig, device_type type, const char *tag)
+ dg680_state(const machine_config &mconfig, device_type type, const char *tag)
: binbug_state(mconfig, type, tag),
m_maincpu(*this, "maincpu"),
m_ctc(*this, "z80ctc"),
@@ -370,15 +410,21 @@ public:
{ }
DECLARE_READ8_MEMBER(porta_r);
+ DECLARE_READ8_MEMBER(portb_r);
+ DECLARE_WRITE8_MEMBER(portb_w);
+ DECLARE_READ8_MEMBER(port08_r);
+ DECLARE_WRITE8_MEMBER(port08_w);
DECLARE_WRITE8_MEMBER(kbd_put);
+ UINT8 m_pio_b;
UINT8 m_term_data;
+ UINT8 m_protection[0x100];
virtual void machine_reset();
required_device<cpu_device> m_maincpu;
required_device<z80ctc_device> m_ctc;
required_device<z80pio_device> m_pio;
};
-static ADDRESS_MAP_START(dgosz80_mem, AS_PROGRAM, 8, dgosz80_state)
+static ADDRESS_MAP_START(dg680_mem, AS_PROGRAM, 8, dg680_state)
ADDRESS_MAP_UNMAP_HIGH
AM_RANGE( 0x0000, 0xcfff) AM_RAM
AM_RANGE( 0xd000, 0xd7ff) AM_ROM
@@ -387,24 +433,24 @@ static ADDRESS_MAP_START(dgosz80_mem, AS_PROGRAM, 8, dgosz80_state)
AM_RANGE( 0xf400, 0xf7ff) AM_RAM AM_SHARE("attribram")
ADDRESS_MAP_END
-static ADDRESS_MAP_START(dgosz80_io, AS_IO, 8, dgosz80_state)
+static ADDRESS_MAP_START(dg680_io, AS_IO, 8, dg680_state)
ADDRESS_MAP_UNMAP_HIGH
ADDRESS_MAP_GLOBAL_MASK(0xff)
AM_RANGE(0x00,0x03) AM_DEVREADWRITE("z80pio", z80pio_device, read_alt, write_alt)
AM_RANGE(0x04,0x07) AM_DEVREADWRITE("z80ctc", z80ctc_device, read, write)
- //AM_RANGE(0x08,0x08) SWP Control and Status
+ AM_RANGE(0x08,0x08) AM_READWRITE(port08_r,port08_w) //SWP Control and Status
//AM_RANGE(0x09,0x09) parallel input port
// Optional AM9519 Programmable Interrupt Controller (port c = data, port d = control)
//AM_RANGE(0x0c,0x0d) AM_DEVREADWRITE("am9519", am9519_device, read, write)
ADDRESS_MAP_END
-void dgosz80_state::machine_reset()
+void dg680_state::machine_reset()
{
m_maincpu->set_pc(0xd000);
}
// this is a guess there is no information available
-static const z80_daisy_config dgosz80_daisy_chain[] =
+static const z80_daisy_config dg680_daisy_chain[] =
{
{ "z80ctc" },
{ "z80pio" },
@@ -413,10 +459,10 @@ static const z80_daisy_config dgosz80_daisy_chain[] =
/* Input ports */
-static INPUT_PORTS_START( dgosz80 )
+static INPUT_PORTS_START( dg680 )
INPUT_PORTS_END
-WRITE8_MEMBER( dgosz80_state::kbd_put )
+WRITE8_MEMBER( dg680_state::kbd_put )
{
m_term_data = data;
/* strobe in keyboard data */
@@ -424,26 +470,50 @@ WRITE8_MEMBER( dgosz80_state::kbd_put )
m_pio->strobe_a(1);
}
-static ASCII_KEYBOARD_INTERFACE( dgosz80_keyboard_intf )
+static ASCII_KEYBOARD_INTERFACE( dg680_keyboard_intf )
{
- DEVCB_DRIVER_MEMBER(dgosz80_state, kbd_put)
+ DEVCB_DRIVER_MEMBER(dg680_state, kbd_put)
};
-READ8_MEMBER( dgosz80_state::porta_r )
+READ8_MEMBER( dg680_state::porta_r )
{
UINT8 data = m_term_data;
m_term_data = 0;
return data;
}
+READ8_MEMBER( dg680_state::portb_r )
+{
+ return m_pio_b | (m_cass->input() > 0.03);
+}
+
+// bit 1 = cassout; bit 2 = motor on
+WRITE8_MEMBER( dg680_state::portb_w )
+{
+ m_pio_b = data & 0xfe;
+ m_cass->output(BIT(data, 1) ? -1.0 : +1.0);
+}
+
+READ8_MEMBER( dg680_state::port08_r )
+{
+ UINT8 breg = m_maincpu->state_int(Z80_B);
+ return m_protection[breg];
+}
+
+WRITE8_MEMBER( dg680_state::port08_w )
+{
+ UINT8 breg = m_maincpu->state_int(Z80_B);
+ m_protection[breg] = data;
+}
+
static Z80PIO_INTERFACE( z80pio_intf )
{
DEVCB_CPU_INPUT_LINE("maincpu", INPUT_LINE_IRQ0), //IRQ
- DEVCB_DRIVER_MEMBER(dgosz80_state, porta_r), // in port A
+ DEVCB_DRIVER_MEMBER(dg680_state, porta_r), // in port A
DEVCB_NULL, // out port A
DEVCB_NULL, // ready line port A - this activates to ask for kbd data but not known if actually used
- DEVCB_NULL, // in port B
- DEVCB_NULL, // out port B
+ DEVCB_DRIVER_MEMBER(dg680_state, portb_r), // in port B
+ DEVCB_DRIVER_MEMBER(dg680_state, portb_w), // out port B
DEVCB_NULL
};
@@ -455,12 +525,12 @@ static Z80CTC_INTERFACE( z80ctc_intf )
DEVCB_DEVICE_LINE_MEMBER("z80ctc", z80ctc_device, trg3) // ZC/TO2 callback
};
-static MACHINE_CONFIG_START( dgosz80, dgosz80_state )
+static MACHINE_CONFIG_START( dg680, dg680_state )
/* basic machine hardware */
MCFG_CPU_ADD("maincpu",Z80, XTAL_8MHz / 4)
- MCFG_CPU_PROGRAM_MAP(dgosz80_mem)
- MCFG_CPU_IO_MAP(dgosz80_io)
- MCFG_CPU_CONFIG(dgosz80_daisy_chain)
+ MCFG_CPU_PROGRAM_MAP(dg680_mem)
+ MCFG_CPU_IO_MAP(dg680_io)
+ MCFG_CPU_CONFIG(dg680_daisy_chain)
/* video hardware */
MCFG_SCREEN_ADD("screen", RASTER)
@@ -474,7 +544,13 @@ static MACHINE_CONFIG_START( dgosz80, dgosz80_state )
MCFG_PALETTE_INIT(monochrome_amber)
/* Keyboard */
- MCFG_ASCII_KEYBOARD_ADD("keyb", dgosz80_keyboard_intf)
+ MCFG_ASCII_KEYBOARD_ADD("keyb", dg680_keyboard_intf)
+
+ /* Cassette */
+ MCFG_CASSETTE_ADD( CASSETTE_TAG, default_cassette_interface )
+ MCFG_SPEAKER_STANDARD_MONO("mono")
+ MCFG_SOUND_WAVE_ADD(WAVE_TAG, CASSETTE_TAG)
+ MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.25)
/* Devices */
MCFG_Z80CTC_ADD( "z80ctc", XTAL_8MHz / 4, z80ctc_intf )
@@ -483,9 +559,9 @@ MACHINE_CONFIG_END
/* ROM definition */
-ROM_START( dgosz80 )
+ROM_START( dg680 )
ROM_REGION( 0x10000, "maincpu", 0 )
- ROM_LOAD( "dgosz80.rom", 0xd000, 0x0800, NO_DUMP)
+ ROM_LOAD( "dg680.rom", 0xd000, 0x0800, CRC(c1aaef6a) SHA1(1508ca8315452edfb984718e795ccbe79a0c0b58) )
ROM_REGION( 0x0800, "chargen", 0 )
ROM_LOAD( "6574.bin", 0x0000, 0x0800, CRC(fd75df4f) SHA1(4d09aae2f933478532b7d3d1a2dee7123d9828ca) )
@@ -496,5 +572,5 @@ ROM_END
/* Driver */
-/* YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS */
-COMP( 1980, dgosz80, 0, 0, dgosz80, dgosz80, driver_device, 0, "David Griffiths", "DGOS-Z80 1.4", GAME_NOT_WORKING | GAME_NO_SOUND_HW )
+/* YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS */
+COMP( 1980, dg680, 0, 0, dg680, dg680, driver_device, 0, "David Griffiths", "DGOS-Z80 1.4", GAME_NOT_WORKING | GAME_NO_SOUND_HW )
diff --git a/src/mess/mess.lst b/src/mess/mess.lst
index ff844a074e7..d484511ec1c 100644
--- a/src/mess/mess.lst
+++ b/src/mess/mess.lst
@@ -2196,4 +2196,4 @@ br8641
nectk85
nd80z
binbug
-dgosz80
+dg680