diff options
Diffstat (limited to 'src/mame/drivers/jupace.c')
-rw-r--r-- | src/mame/drivers/jupace.c | 835 |
1 files changed, 835 insertions, 0 deletions
diff --git a/src/mame/drivers/jupace.c b/src/mame/drivers/jupace.c new file mode 100644 index 00000000000..9a3856bcc1c --- /dev/null +++ b/src/mame/drivers/jupace.c @@ -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" + + +#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 ) |