summaryrefslogtreecommitdiffstatshomepage
path: root/src/mame/drivers/jupace.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/mame/drivers/jupace.cpp')
-rw-r--r--src/mame/drivers/jupace.cpp835
1 files changed, 835 insertions, 0 deletions
diff --git a/src/mame/drivers/jupace.cpp b/src/mame/drivers/jupace.cpp
new file mode 100644
index 00000000000..d950b78d124
--- /dev/null
+++ b/src/mame/drivers/jupace.cpp
@@ -0,0 +1,835 @@
+// license:BSD-3-Clause
+// copyright-holders:Curt Coder, Robbbert
+/***************************************************************************
+Jupiter Ace memory map
+
+ CPU: Z80
+ 0000-1fff ROM
+ 2000-23ff Mirror of 2400-27FF
+ 2400-27ff RAM (1K RAM used for screen and edit/cassette buffer)
+ 2800-2bff Mirror of 2C00-2FFF
+ 2c00-2fff RAM (1K RAM for char set, write only)
+ 3000-3bff Mirror of 3C00-3FFF
+ 3c00-3fff RAM (1K RAM standard)
+ 4000-7fff RAM (16K Expansion)
+ 8000-ffff RAM (48K Expansion)
+
+Interrupts:
+
+ IRQ:
+ 50Hz vertical sync
+
+Ports:
+
+ Out 0xfe:
+ Tape and buzzer
+
+ In 0xfe:
+ Keyboard input, tape, and buzzer
+
+ http://www.jupiter-ace.co.uk/
+
+***************************************************************************/
+
+/*
+
+ TODO:
+
+ - Ace Colour Board
+ - 96K ram expansion
+ - Deep Thought disc interface (6850, 6821)
+
+*/
+
+
+#include "emu.h"
+#include "cpu/z80/z80.h"
+#include "formats/ace_tap.h"
+#include "imagedev/cassette.h"
+#include "imagedev/snapquik.h"
+#include "bus/centronics/ctronics.h"
+#include "machine/i8255.h"
+#include "machine/ram.h"
+#include "machine/z80pio.h"
+#include "sound/ay8910.h"
+#include "sound/sp0256.h"
+#include "sound/speaker.h"
+#include "sound/wave.h"
+#include "softlist.h"
+
+#define Z80_TAG "z0"
+#define AY8910_TAG "ay8910"
+#define I8255_TAG "i8255"
+#define SP0256AL2_TAG "ic1"
+#define Z80PIO_TAG "z80pio"
+#define CENTRONICS_TAG "centronics"
+#define SCREEN_TAG "screen"
+
+class ace_state : public driver_device
+{
+public:
+ ace_state(const machine_config &mconfig, device_type type, const char *tag)
+ : driver_device(mconfig, type, tag),
+ m_maincpu(*this, Z80_TAG),
+ m_ppi(*this, I8255_TAG),
+ m_z80pio(*this, Z80PIO_TAG),
+ m_speaker(*this, "speaker"),
+ m_cassette(*this, "cassette"),
+ m_centronics(*this, CENTRONICS_TAG),
+ m_ram(*this, RAM_TAG),
+ m_sp0256(*this, SP0256AL2_TAG),
+ m_video_ram(*this, "video_ram"),
+ m_char_ram(*this, "char_ram"),
+ m_a8(*this, "A8"),
+ m_a9(*this, "A9"),
+ m_a10(*this, "A10"),
+ m_a11(*this, "A11"),
+ m_a12(*this, "A12"),
+ m_a13(*this, "A13"),
+ m_a14(*this, "A14"),
+ m_a15(*this, "A15"),
+ m_joy(*this, "JOY")
+ { }
+
+ virtual void machine_start();
+
+ UINT32 screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect);
+
+ DECLARE_READ8_MEMBER( io_r );
+ DECLARE_WRITE8_MEMBER( io_w );
+ DECLARE_READ8_MEMBER( ppi_pa_r );
+ DECLARE_WRITE8_MEMBER( ppi_pa_w );
+ DECLARE_READ8_MEMBER( ppi_pb_r );
+ DECLARE_WRITE8_MEMBER( ppi_pb_w );
+ DECLARE_READ8_MEMBER( ppi_pc_r );
+ DECLARE_WRITE8_MEMBER( ppi_pc_w );
+ DECLARE_READ8_MEMBER( ppi_control_r );
+ DECLARE_WRITE8_MEMBER( ppi_control_w );
+ DECLARE_READ8_MEMBER( pio_pa_r );
+ DECLARE_WRITE8_MEMBER( pio_pa_w );
+
+ UINT32 screen_update_ace(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect);
+ TIMER_DEVICE_CALLBACK_MEMBER(set_irq);
+ TIMER_DEVICE_CALLBACK_MEMBER(clear_irq);
+ DECLARE_READ8_MEMBER(pio_ad_r);
+ DECLARE_READ8_MEMBER(pio_bd_r);
+ DECLARE_READ8_MEMBER(pio_ac_r);
+ DECLARE_READ8_MEMBER(pio_bc_r);
+ DECLARE_WRITE8_MEMBER(pio_ad_w);
+ DECLARE_WRITE8_MEMBER(pio_bd_w);
+ DECLARE_WRITE8_MEMBER(pio_ac_w);
+ DECLARE_WRITE8_MEMBER(pio_bc_w);
+ DECLARE_READ8_MEMBER(sby_r);
+ DECLARE_WRITE8_MEMBER(ald_w);
+ DECLARE_SNAPSHOT_LOAD_MEMBER( ace );
+
+private:
+ required_device<cpu_device> m_maincpu;
+ required_device<i8255_device> m_ppi;
+ required_device<z80pio_device> m_z80pio;
+ required_device<speaker_sound_device> m_speaker;
+ required_device<cassette_image_device> m_cassette;
+ required_device<centronics_device> m_centronics;
+ required_device<ram_device> m_ram;
+ required_device<sp0256_device> m_sp0256;
+ required_shared_ptr<UINT8> m_video_ram;
+ required_shared_ptr<UINT8> m_char_ram;
+ required_ioport m_a8;
+ required_ioport m_a9;
+ required_ioport m_a10;
+ required_ioport m_a11;
+ required_ioport m_a12;
+ required_ioport m_a13;
+ required_ioport m_a14;
+ required_ioport m_a15;
+ required_ioport m_joy;
+};
+
+
+/* Load in .ace files. These are memory images of 0x2000 to 0x7fff
+ and compressed as follows:
+
+ ED 00 : End marker
+ ED <cnt> <byt> : repeat <byt> count <cnt:1-240> times
+ <byt> : <byt>
+*/
+
+/******************************************************************************
+ Snapshot Handling
+******************************************************************************/
+
+SNAPSHOT_LOAD_MEMBER( ace_state, ace )
+{
+ cpu_device *cpu = m_maincpu;
+ UINT8 *RAM = memregion(cpu->tag())->base();
+ address_space &space = cpu->space(AS_PROGRAM);
+ unsigned char ace_repeat, ace_byte, loop;
+ int done=0, ace_index=0x2000;
+
+ if (m_ram->size() < 16*1024)
+ {
+ image.seterror(IMAGE_ERROR_INVALIDIMAGE, "At least 16KB RAM expansion required");
+ image.message("At least 16KB RAM expansion required");
+ return IMAGE_INIT_FAIL;
+ }
+
+ logerror("Loading file %s.\r\n", image.filename());
+ while (!done && (ace_index < 0x8001))
+ {
+ image.fread( &ace_byte, 1);
+ if (ace_byte == 0xed)
+ {
+ image.fread(&ace_byte, 1);
+ switch (ace_byte)
+ {
+ case 0x00:
+ logerror("File loaded!\r\n");
+ done = 1;
+ break;
+ case 0x01:
+ image.fread(&ace_byte, 1);
+ RAM[ace_index++] = ace_byte;
+ break;
+ default:
+ image.fread(&ace_repeat, 1);
+ for (loop = 0; loop < ace_byte; loop++)
+ RAM[ace_index++] = ace_repeat;
+ break;
+ }
+ }
+ else
+ RAM[ace_index++] = ace_byte;
+ }
+
+ logerror("Decoded %X bytes.\r\n", ace_index-0x2000);
+
+ if (!done)
+ {
+ image.seterror(IMAGE_ERROR_INVALIDIMAGE, "EOF marker not found");
+ image.message("EOF marker not found");
+ return IMAGE_INIT_FAIL;
+ }
+
+ // patch CPU registers
+ // Some games do not follow the standard, and have rubbish in the CPU area. So,
+ // we check that some other bytes are correct.
+ // 2080 = memory size of original machine, should be 0000 or 8000 or C000.
+ // 2118 = new stack pointer, do not use if between 8000 and FF00.
+
+ ace_index = RAM[0x2080] | (RAM[0x2081] << 8);
+
+ if ((ace_index & 0x3FFF)==0)
+ {
+ cpu->set_state_int(Z80_AF, RAM[0x2100] | (RAM[0x2101] << 8));
+ cpu->set_state_int(Z80_BC, RAM[0x2104] | (RAM[0x2105] << 8));
+ cpu->set_state_int(Z80_DE, RAM[0x2108] | (RAM[0x2109] << 8));
+ cpu->set_state_int(Z80_HL, RAM[0x210c] | (RAM[0x210d] << 8));
+ cpu->set_state_int(Z80_IX, RAM[0x2110] | (RAM[0x2111] << 8));
+ cpu->set_state_int(Z80_IY, RAM[0x2114] | (RAM[0x2115] << 8));
+ cpu->set_pc(RAM[0x211c] | (RAM[0x211d] << 8));
+ cpu->set_state_int(Z80_AF2, RAM[0x2120] | (RAM[0x2121] << 8));
+ cpu->set_state_int(Z80_BC2, RAM[0x2124] | (RAM[0x2125] << 8));
+ cpu->set_state_int(Z80_DE2, RAM[0x2128] | (RAM[0x2129] << 8));
+ cpu->set_state_int(Z80_HL2, RAM[0x212c] | (RAM[0x212d] << 8));
+ cpu->set_state_int(Z80_IM, RAM[0x2130]);
+ cpu->set_state_int(Z80_IFF1, RAM[0x2134]);
+ cpu->set_state_int(Z80_IFF2, RAM[0x2138]);
+ cpu->set_state_int(Z80_I, RAM[0x213c]);
+ cpu->set_state_int(Z80_R, RAM[0x2140]);
+
+ if ((RAM[0x2119] < 0x80) || !ace_index)
+ cpu->set_state_int(STATE_GENSP, RAM[0x2118] | (RAM[0x2119] << 8));
+ }
+
+ /* Copy data to the address space */
+ for (ace_index = 0x2000; ace_index < 0x8000; ace_index++)
+ space.write_byte(ace_index, RAM[ace_index]);
+
+ return IMAGE_INIT_PASS;
+}
+
+//**************************************************************************
+// READ/WRITE HANDLERS
+//**************************************************************************
+
+//-------------------------------------------------
+// io_r -
+//-------------------------------------------------
+
+READ8_MEMBER( ace_state::io_r )
+{
+ UINT8 data = 0xff;
+
+ if (!BIT(offset, 8)) data &= m_a8->read();
+ if (!BIT(offset, 9)) data &= m_a9->read();
+ if (!BIT(offset, 10)) data &= m_a10->read();
+ if (!BIT(offset, 11)) data &= m_a11->read();
+ if (!BIT(offset, 12)) data &= m_a12->read();
+ if (!BIT(offset, 13)) data &= m_a13->read();
+ if (!BIT(offset, 14)) data &= m_a14->read();
+
+ if (!BIT(offset, 15))
+ {
+ data &= m_a15->read();
+
+ m_cassette->output(-1);
+ m_speaker->level_w(0);
+ }
+
+ if (m_cassette->input() > 0)
+ {
+ data &= ~0x20;
+ }
+
+ return data;
+}
+
+
+//-------------------------------------------------
+// io_w -
+//-------------------------------------------------
+
+WRITE8_MEMBER( ace_state::io_w )
+{
+ m_cassette->output(1);
+ m_speaker->level_w(1);
+}
+
+
+//-------------------------------------------------
+// ppi_r -
+//-------------------------------------------------
+
+READ8_MEMBER( ace_state::ppi_pa_r )
+{
+ return m_ppi->read(space, 0);
+}
+
+READ8_MEMBER( ace_state::ppi_pb_r )
+{
+ return m_ppi->read(space, 1);
+}
+
+READ8_MEMBER( ace_state::ppi_pc_r )
+{
+ return m_ppi->read(space, 2);
+}
+
+READ8_MEMBER( ace_state::ppi_control_r )
+{
+ return m_ppi->read(space, 3);
+}
+
+
+//-------------------------------------------------
+// ppi_w -
+//-------------------------------------------------
+
+WRITE8_MEMBER( ace_state::ppi_pa_w )
+{
+ m_ppi->write(space, 0, data);
+}
+
+WRITE8_MEMBER( ace_state::ppi_pb_w )
+{
+ m_ppi->write(space, 1, data);
+}
+
+WRITE8_MEMBER( ace_state::ppi_pc_w )
+{
+ m_ppi->write(space, 2, data);
+}
+
+WRITE8_MEMBER( ace_state::ppi_control_w )
+{
+ m_ppi->write(space, 3, data);
+}
+
+
+//-------------------------------------------------
+// pio_r -
+//-------------------------------------------------
+
+READ8_MEMBER(ace_state::pio_ad_r)
+{
+ return m_z80pio->data_read(0);
+}
+
+READ8_MEMBER(ace_state::pio_bd_r)
+{
+ return m_z80pio->data_read(1);
+}
+
+READ8_MEMBER(ace_state::pio_ac_r)
+{
+ return m_z80pio->control_read();
+}
+
+READ8_MEMBER(ace_state::pio_bc_r)
+{
+ return m_z80pio->control_read();
+}
+
+
+//-------------------------------------------------
+// pio_w -
+//-------------------------------------------------
+
+WRITE8_MEMBER(ace_state::pio_ad_w)
+{
+ m_z80pio->data_write(0, data);
+}
+
+WRITE8_MEMBER(ace_state::pio_bd_w)
+{
+ m_z80pio->data_write(1, data);
+}
+
+WRITE8_MEMBER(ace_state::pio_ac_w)
+{
+ m_z80pio->control_write(0, data);
+}
+
+WRITE8_MEMBER(ace_state::pio_bc_w)
+{
+ m_z80pio->control_write(1, data);
+}
+
+
+
+//**************************************************************************
+// ADDRESS MAPS
+//**************************************************************************
+
+//-------------------------------------------------
+// ADDRESS_MAP( ace_mem )
+//-------------------------------------------------
+
+static ADDRESS_MAP_START( ace_mem, AS_PROGRAM, 8, ace_state )
+ AM_RANGE(0x0000, 0x1fff) AM_ROM
+ AM_RANGE(0x2000, 0x23ff) AM_MIRROR(0x0400) AM_RAM AM_SHARE("video_ram")
+ AM_RANGE(0x2800, 0x2bff) AM_MIRROR(0x0400) AM_RAM AM_SHARE("char_ram") AM_REGION(Z80_TAG, 0xfc00)
+ AM_RANGE(0x3000, 0x33ff) AM_MIRROR(0x0c00) AM_RAM
+ AM_RANGE(0x4000, 0xffff) AM_RAM
+ADDRESS_MAP_END
+
+
+//-------------------------------------------------
+// ADDRESS_MAP( ace_io )
+//-------------------------------------------------
+
+static ADDRESS_MAP_START( ace_io, AS_IO, 8, ace_state )
+ AM_RANGE(0x00, 0x00) AM_MIRROR(0xfffe) AM_MASK(0xff00) AM_READWRITE(io_r, io_w)
+ AM_RANGE(0x01, 0x01) AM_MIRROR(0xff00) AM_READ_PORT("JOY")
+ AM_RANGE(0x41, 0x41) AM_MIRROR(0xff80) AM_READWRITE(ppi_pa_r, ppi_pa_w)
+ AM_RANGE(0x43, 0x43) AM_MIRROR(0xff80) AM_READWRITE(ppi_pb_r, ppi_pb_w)
+ AM_RANGE(0x45, 0x45) AM_MIRROR(0xff80) AM_READWRITE(ppi_pc_r, ppi_pc_w)
+ AM_RANGE(0x47, 0x47) AM_MIRROR(0xff80) AM_READWRITE(ppi_control_r, ppi_control_w)
+ AM_RANGE(0x81, 0x81) AM_MIRROR(0xff38) AM_READWRITE(pio_ad_r, pio_ad_w)
+ AM_RANGE(0x83, 0x83) AM_MIRROR(0xff38) AM_READWRITE(pio_bd_r, pio_bd_w)
+ AM_RANGE(0x85, 0x85) AM_MIRROR(0xff38) AM_READWRITE(pio_ac_r, pio_ac_w)
+ AM_RANGE(0x87, 0x87) AM_MIRROR(0xff38) AM_READWRITE(pio_bc_r, pio_bc_w)
+ AM_RANGE(0xfd, 0xfd) AM_MIRROR(0xff00) AM_DEVWRITE(AY8910_TAG, ay8910_device, address_w)
+ AM_RANGE(0xff, 0xff) AM_MIRROR(0xff00) AM_DEVREADWRITE(AY8910_TAG, ay8910_device, data_r, data_w)
+ADDRESS_MAP_END
+
+
+
+//**************************************************************************
+// INPUT PORTS
+//**************************************************************************
+
+//-------------------------------------------------
+// INPUT_PORTS( ace )
+//-------------------------------------------------
+
+static INPUT_PORTS_START( ace )
+ PORT_START("A8")
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_RSHIFT) PORT_CHAR(UCHAR_SHIFT_1)
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("Symbol Shift") PORT_CODE(KEYCODE_LSHIFT) PORT_CHAR(UCHAR_SHIFT_2)
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Z) PORT_CHAR('z') PORT_CHAR('Z') PORT_CHAR(':')
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_X) PORT_CHAR('x') PORT_CHAR('X') PORT_CHAR('\xA3')
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_C) PORT_CHAR('c') PORT_CHAR('C') PORT_CHAR('?')
+ PORT_BIT( 0xe0, IP_ACTIVE_LOW, IPT_UNUSED )
+
+ PORT_START("A9")
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_A) PORT_CHAR('a') PORT_CHAR('A') PORT_CHAR('~')
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_S) PORT_CHAR('s') PORT_CHAR('S') PORT_CHAR('|')
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_D) PORT_CHAR('d') PORT_CHAR('D') PORT_CHAR('\\')
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_F) PORT_CHAR('f') PORT_CHAR('F') PORT_CHAR('{')
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_G) PORT_CHAR('g') PORT_CHAR('G') PORT_CHAR('}')
+ PORT_BIT( 0xe0, IP_ACTIVE_LOW, IPT_UNUSED )
+
+ PORT_START("A10")
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Q) PORT_CHAR('q') PORT_CHAR('Q')
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_W) PORT_CHAR('w') PORT_CHAR('W')
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_E) PORT_CHAR('e') PORT_CHAR('E')
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_R) PORT_CHAR('r') PORT_CHAR('R') PORT_CHAR('<')
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_T) PORT_CHAR('t') PORT_CHAR('T') PORT_CHAR('>')
+ PORT_BIT( 0xe0, IP_ACTIVE_LOW, IPT_UNUSED )
+
+ PORT_START("A11")
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_1) PORT_CHAR('1') PORT_CHAR('!')
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_2) PORT_CHAR('2') PORT_CHAR('@')
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_3) PORT_CHAR('3') PORT_CHAR('#')
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_4) PORT_CHAR('4') PORT_CHAR('$')
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_5) PORT_CODE(KEYCODE_LEFT) PORT_CHAR('5') PORT_CHAR('%')
+ PORT_BIT( 0xe0, IP_ACTIVE_LOW, IPT_UNUSED )
+
+ PORT_START("A12")
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_0) PORT_CHAR('0') PORT_CHAR('_')
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_9) PORT_CHAR('9') PORT_CHAR(')')
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_8) PORT_CODE(KEYCODE_RIGHT) PORT_CHAR('8') PORT_CHAR('(')
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_7) PORT_CODE(KEYCODE_DOWN) PORT_CHAR('7') PORT_CHAR('\'')
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_6) PORT_CODE(KEYCODE_UP) PORT_CHAR('6') PORT_CHAR('&')
+ PORT_BIT( 0xe0, IP_ACTIVE_LOW, IPT_UNUSED )
+
+ PORT_START("A13")
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_P) PORT_CHAR('p') PORT_CHAR('P') PORT_CHAR('"')
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_O) PORT_CHAR('o') PORT_CHAR('O') PORT_CHAR(';')
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_I) PORT_CHAR('i') PORT_CHAR('I') PORT_CHAR(0x00A9)
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_U) PORT_CHAR('u') PORT_CHAR('U') PORT_CHAR(']')
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Y) PORT_CHAR('y') PORT_CHAR('Y') PORT_CHAR('[')
+ PORT_BIT( 0xe0, IP_ACTIVE_LOW, IPT_UNUSED )
+
+ PORT_START("A14")
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_ENTER) PORT_CHAR(13)
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_L) PORT_CHAR('l') PORT_CHAR('L') PORT_CHAR('=')
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_K) PORT_CHAR('k') PORT_CHAR('K') PORT_CHAR('+')
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_J) PORT_CHAR('j') PORT_CHAR('J') PORT_CHAR('-')
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("h H \xE2\x86\x91") PORT_CODE(KEYCODE_H) PORT_CHAR('h') PORT_CHAR('H')
+ PORT_BIT( 0xe0, IP_ACTIVE_LOW, IPT_UNUSED )
+
+ PORT_START("A15")
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_SPACE) PORT_CHAR(' ')
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_M) PORT_CHAR('m') PORT_CHAR('M') PORT_CHAR('.')
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_N) PORT_CHAR('n') PORT_CHAR('N') PORT_CHAR(',')
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_B) PORT_CHAR('b') PORT_CHAR('B') PORT_CHAR('*')
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_V) PORT_CHAR('v') PORT_CHAR('V') PORT_CHAR('/')
+ PORT_BIT( 0xe0, IP_ACTIVE_LOW, IPT_UNUSED )
+
+ PORT_START("JOY")
+ PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_JOYSTICK_UP )
+ PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_JOYSTICK_DOWN )
+ PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_JOYSTICK_RIGHT )
+ PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_JOYSTICK_LEFT )
+ PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_UNUSED )
+ PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_BUTTON1 )
+ PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_UNUSED )
+ PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_UNUSED )
+INPUT_PORTS_END
+
+
+
+//**************************************************************************
+// VIDEO
+//**************************************************************************
+
+//-------------------------------------------------
+// gfx_layout ace_charlayout
+//-------------------------------------------------
+
+static const gfx_layout ace_charlayout =
+{
+ 8,8,
+ 128,
+ 1,
+ { RGN_FRAC(0,1) },
+ { STEP8(0,1) },
+ { STEP8(0,8) },
+ 8*8
+};
+
+
+//-------------------------------------------------
+// GFXDECODE( ace )
+//-------------------------------------------------
+
+static GFXDECODE_START( ace )
+ GFXDECODE_ENTRY( Z80_TAG, 0xfc00, ace_charlayout, 0, 1 )
+GFXDECODE_END
+
+
+//-------------------------------------------------
+// TIMER_DEVICE_CALLBACK_MEMBER( set_irq )
+//-------------------------------------------------
+
+TIMER_DEVICE_CALLBACK_MEMBER(ace_state::set_irq)
+{
+ m_maincpu->set_input_line(INPUT_LINE_IRQ0, ASSERT_LINE);
+}
+
+
+//-------------------------------------------------
+// TIMER_DEVICE_CALLBACK_MEMBER( clear_irq )
+//-------------------------------------------------
+
+TIMER_DEVICE_CALLBACK_MEMBER(ace_state::clear_irq)
+{
+ m_maincpu->set_input_line(INPUT_LINE_IRQ0, CLEAR_LINE);
+}
+
+
+UINT32 ace_state::screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect)
+{
+ UINT8 y,ra,chr,gfx;
+ UINT16 sy=56,ma=0,x;
+
+ for (y = 0; y < 24; y++)
+ {
+ for (ra = 0; ra < 8; ra++)
+ {
+ UINT16 *p = &bitmap.pix16(sy++, 40);
+
+ for (x = ma; x < ma+32; x++)
+ {
+ chr = m_video_ram[x];
+
+ /* get pattern of pixels for that character scanline */
+ gfx = m_char_ram[((chr&0x7f)<<3) | ra] ^ (BIT(chr, 7) ? 0xff : 0);
+
+ /* Display a scanline of a character (8 pixels) */
+ *p++ = BIT(gfx, 7);
+ *p++ = BIT(gfx, 6);
+ *p++ = BIT(gfx, 5);
+ *p++ = BIT(gfx, 4);
+ *p++ = BIT(gfx, 3);
+ *p++ = BIT(gfx, 2);
+ *p++ = BIT(gfx, 1);
+ *p++ = BIT(gfx, 0);
+ }
+ }
+ ma+=32;
+ }
+ return 0;
+}
+
+
+
+//**************************************************************************
+// DEVICE CONFIGURATION
+//**************************************************************************
+
+//-------------------------------------------------
+// I8255A interface
+//-------------------------------------------------
+
+READ8_MEMBER(ace_state::sby_r)
+{
+ /*
+
+ bit description
+
+ PC0 SP0256 SBY
+ PC1
+ PC2
+ PC3
+ PC4
+ PC5
+ PC6
+ PC7
+
+ */
+
+ return m_sp0256->sby_r();
+}
+
+WRITE8_MEMBER(ace_state::ald_w)
+{
+ /*
+
+ bit description
+
+ PA0 SP0256 A1
+ PA1 SP0256 A2
+ PA2 SP0256 A3
+ PA3 SP0256 A4
+ PA4 SP0256 A5
+ PA5 SP0256 A6
+ PA6 SP0256 _ALD
+ PA7
+
+ */
+
+ if (!BIT(data, 6))
+ {
+ m_sp0256->ald_w(space, 0, data & 0x3f);
+ }
+}
+
+//-------------------------------------------------
+// Z80PIO
+//-------------------------------------------------
+
+READ8_MEMBER( ace_state::pio_pa_r )
+{
+ /*
+
+ bit description
+
+ PA0
+ PA1 RxD
+ PA2
+ PA3
+ PA4
+ PA5
+ PA6
+ PA7
+
+ */
+
+ return 0;
+}
+
+WRITE8_MEMBER( ace_state::pio_pa_w )
+{
+ /*
+
+ bit description
+
+ PA0 RTS
+ PA1
+ PA2 CTS
+ PA3 TxD
+ PA4
+ PA5
+ PA6 STB
+ PA7
+
+ */
+
+ // centronics strobe
+ m_centronics->write_strobe(!BIT(data, 6));
+}
+
+//**************************************************************************
+// MACHINE INITIALIZATION
+//**************************************************************************
+
+//-------------------------------------------------
+// MACHINE_START( ace )
+//-------------------------------------------------
+
+void ace_state::machine_start()
+{
+ address_space &program = m_maincpu->space(AS_PROGRAM);
+
+ /* configure RAM */
+ switch (m_ram->size())
+ {
+ case 1*1024:
+ program.unmap_readwrite(0x4000, 0xffff);
+ break;
+
+ case 16*1024:
+ program.unmap_readwrite(0x8000, 0xffff);
+ break;
+
+ case 32*1024:
+ program.unmap_readwrite(0xc000, 0xffff);
+ break;
+ }
+}
+
+
+
+//**************************************************************************
+// MACHINE CONFIGURATION
+//**************************************************************************
+
+//-------------------------------------------------
+// MACHINE_CONFIG( ace )
+//-------------------------------------------------
+
+static MACHINE_CONFIG_START( ace, ace_state )
+ // basic machine hardware
+ MCFG_CPU_ADD(Z80_TAG, Z80, XTAL_6_5MHz/2)
+ MCFG_CPU_PROGRAM_MAP(ace_mem)
+ MCFG_CPU_IO_MAP(ace_io)
+ MCFG_QUANTUM_TIME(attotime::from_hz(60))
+
+ // video hardware
+ MCFG_SCREEN_ADD(SCREEN_TAG, RASTER)
+ MCFG_SCREEN_UPDATE_DRIVER(ace_state, screen_update)
+ MCFG_SCREEN_RAW_PARAMS(XTAL_6_5MHz, 416, 0, 336, 312, 0, 304)
+ MCFG_SCREEN_PALETTE("palette")
+
+ MCFG_TIMER_DRIVER_ADD_SCANLINE("set_irq", ace_state, set_irq, SCREEN_TAG, 31*8, 264)
+ MCFG_TIMER_DRIVER_ADD_SCANLINE("clear_irq", ace_state, clear_irq, SCREEN_TAG, 32*8, 264)
+
+ MCFG_PALETTE_ADD_BLACK_AND_WHITE("palette")
+
+ MCFG_GFXDECODE_ADD("gfxdecode", "palette", ace)
+
+ // sound hardware
+ MCFG_SPEAKER_STANDARD_MONO("mono")
+ MCFG_SOUND_WAVE_ADD(WAVE_TAG, "cassette")
+ MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.25)
+ MCFG_SOUND_ADD("speaker", SPEAKER_SOUND, 0)
+ MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 1.00)
+
+ MCFG_SOUND_ADD(AY8910_TAG, AY8910, XTAL_6_5MHz/2)
+ MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.25)
+
+ MCFG_SOUND_ADD(SP0256AL2_TAG, SP0256, XTAL_3MHz)
+ MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.25)
+
+ // devices
+ MCFG_CASSETTE_ADD("cassette")
+ MCFG_CASSETTE_FORMATS(ace_cassette_formats)
+ MCFG_CASSETTE_DEFAULT_STATE(CASSETTE_STOPPED)
+ MCFG_CASSETTE_INTERFACE("jupace_cass")
+
+ MCFG_SNAPSHOT_ADD("snapshot", ace_state, ace, "ace", 1)
+
+ MCFG_DEVICE_ADD(I8255_TAG, I8255A, 0)
+ MCFG_I8255_IN_PORTB_CB(READ8(ace_state, sby_r))
+ MCFG_I8255_OUT_PORTB_CB(WRITE8(ace_state, ald_w))
+
+ MCFG_DEVICE_ADD(Z80PIO_TAG, Z80PIO, XTAL_6_5MHz/2)
+ MCFG_Z80PIO_OUT_INT_CB(INPUTLINE(Z80_TAG, INPUT_LINE_IRQ0))
+ MCFG_Z80PIO_IN_PA_CB(READ8(ace_state, pio_pa_r))
+ MCFG_Z80PIO_OUT_PA_CB(WRITE8(ace_state, pio_pa_w))
+ MCFG_Z80PIO_OUT_PB_CB(DEVWRITE8("cent_data_out", output_latch_device, write))
+
+ MCFG_CENTRONICS_ADD(CENTRONICS_TAG, centronics_devices, "printer")
+ MCFG_CENTRONICS_OUTPUT_LATCH_ADD("cent_data_out", CENTRONICS_TAG)
+
+ // internal ram
+ MCFG_RAM_ADD(RAM_TAG)
+ MCFG_RAM_DEFAULT_SIZE("1K")
+ MCFG_RAM_EXTRA_OPTIONS("16K,32K,48K")
+
+ MCFG_SOFTWARE_LIST_ADD("cass_list", "jupace_cass")
+MACHINE_CONFIG_END
+
+
+
+//**************************************************************************
+// ROMS
+//**************************************************************************
+
+//-------------------------------------------------
+// ROM( ace )
+//-------------------------------------------------
+
+ROM_START( jupace )
+ ROM_REGION( 0x10000, Z80_TAG, 0 )
+ ROM_LOAD( "rom-a.z1", 0x0000, 0x1000, CRC(dc8438a5) SHA1(8fa97eb71e5dd17c7d190c6587ee3840f839347c) )
+ ROM_LOAD( "rom-b.z2", 0x1000, 0x1000, CRC(4009f636) SHA1(98c5d4bcd74bcf014268cf4c00b2007ea5cc21f3) )
+
+ ROM_REGION( 0x1000, "fdc", 0 ) // Deep Thought disc interface
+ ROM_LOAD( "dos 4.bin", 0x0000, 0x1000, CRC(04c70448) SHA1(53ddcced6ae2feafd687a3b55864726656b71412) )
+
+ ROM_REGION( 0x10000, SP0256AL2_TAG, 0 )
+ ROM_LOAD( "sp0256-al2.ic1", 0x000, 0x800, CRC(b504ac15) SHA1(e60fcb5fa16ff3f3b69d36c7a6e955744d3feafc) )
+ROM_END
+
+
+
+//**************************************************************************
+// SYSTEM DRIVERS
+//**************************************************************************
+
+// YEAR NAME PARENT COMPAT MACHINE INPUT INIT COMPANY FULLNAME FLAGS
+COMP( 1981, jupace, 0, 0, ace, ace, driver_device, 0, "Jupiter Cantab", "Jupiter Ace" , 0 )