// 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 "imagedev/cassette.h" #include "imagedev/snapquik.h" #include "bus/centronics/ctronics.h" #include "machine/i8255.h" #include "machine/ram.h" #include "machine/timer.h" #include "machine/z80pio.h" #include "sound/ay8910.h" #include "sound/sp0256.h" #include "sound/spkrdev.h" #include "sound/wave.h" #include "emupal.h" #include "screen.h" #include "softlist.h" #include "speaker.h" #include "formats/ace_tap.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") { } void ace(machine_config &config); private: virtual void machine_start() override; uint32_t 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 ); 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 ); void ace_io(address_map &map); void ace_mem(address_map &map); required_device m_maincpu; required_device m_ppi; required_device m_z80pio; required_device m_speaker; required_device m_cassette; required_device m_centronics; required_device m_ram; required_device m_sp0256; required_shared_ptr m_video_ram; required_shared_ptr 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 : repeat count times : */ /****************************************************************************** Snapshot Handling ******************************************************************************/ SNAPSHOT_LOAD_MEMBER( ace_state, ace ) { cpu_device *cpu = m_maincpu; uint8_t *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_result::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_result::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_result::PASS; } //************************************************************************** // READ/WRITE HANDLERS //************************************************************************** //------------------------------------------------- // io_r - //------------------------------------------------- READ8_MEMBER( ace_state::io_r ) { uint8_t 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(0); } READ8_MEMBER( ace_state::ppi_pb_r ) { return m_ppi->read(1); } READ8_MEMBER( ace_state::ppi_pc_r ) { return m_ppi->read(2); } READ8_MEMBER( ace_state::ppi_control_r ) { return m_ppi->read(3); } //------------------------------------------------- // ppi_w - //------------------------------------------------- WRITE8_MEMBER( ace_state::ppi_pa_w ) { m_ppi->write(0, data); } WRITE8_MEMBER( ace_state::ppi_pb_w ) { m_ppi->write(1, data); } WRITE8_MEMBER( ace_state::ppi_pc_w ) { m_ppi->write(2, data); } WRITE8_MEMBER( ace_state::ppi_control_w ) { m_ppi->write(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 ) //------------------------------------------------- void ace_state::ace_mem(address_map &map) { map(0x0000, 0x1fff).rom(); map(0x2000, 0x23ff).mirror(0x0400).ram().share("video_ram"); map(0x2800, 0x2bff).mirror(0x0400).ram().share("char_ram").region(Z80_TAG, 0xfc00); map(0x3000, 0x33ff).mirror(0x0c00).ram(); map(0x4000, 0xffff).ram(); } //------------------------------------------------- // ADDRESS_MAP( ace_io ) //------------------------------------------------- void ace_state::ace_io(address_map &map) { map(0x00, 0x00).mirror(0x00fe).select(0xff00).rw(FUNC(ace_state::io_r), FUNC(ace_state::io_w)); map(0x01, 0x01).mirror(0xff00).portr("JOY"); map(0x41, 0x41).mirror(0xff80).rw(FUNC(ace_state::ppi_pa_r), FUNC(ace_state::ppi_pa_w)); map(0x43, 0x43).mirror(0xff80).rw(FUNC(ace_state::ppi_pb_r), FUNC(ace_state::ppi_pb_w)); map(0x45, 0x45).mirror(0xff80).rw(FUNC(ace_state::ppi_pc_r), FUNC(ace_state::ppi_pc_w)); map(0x47, 0x47).mirror(0xff80).rw(FUNC(ace_state::ppi_control_r), FUNC(ace_state::ppi_control_w)); map(0x81, 0x81).mirror(0xff38).rw(FUNC(ace_state::pio_ad_r), FUNC(ace_state::pio_ad_w)); map(0x83, 0x83).mirror(0xff38).rw(FUNC(ace_state::pio_bd_r), FUNC(ace_state::pio_bd_w)); map(0x85, 0x85).mirror(0xff38).rw(FUNC(ace_state::pio_ac_r), FUNC(ace_state::pio_ac_w)); map(0x87, 0x87).mirror(0xff38).rw(FUNC(ace_state::pio_bc_r), FUNC(ace_state::pio_bc_w)); map(0xfd, 0xfd).mirror(0xff00).w(AY8910_TAG, FUNC(ay8910_device::address_w)); map(0xff, 0xff).mirror(0xff00).rw(AY8910_TAG, FUNC(ay8910_device::data_r), FUNC(ay8910_device::data_w)); } //************************************************************************** // 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(0xA3) 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( gfx_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_t ace_state::screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect) { uint8_t y,ra,chr,gfx; uint16_t sy=56,ma=0,x; for (y = 0; y < 24; y++) { for (ra = 0; ra < 8; ra++) { uint16_t *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(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 ) //------------------------------------------------- MACHINE_CONFIG_START(ace_state::ace) // basic machine hardware MCFG_DEVICE_ADD(Z80_TAG, Z80, XTAL(6'500'000)/2) MCFG_DEVICE_PROGRAM_MAP(ace_mem) MCFG_DEVICE_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'500'000), 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_MONOCHROME("palette") MCFG_DEVICE_ADD("gfxdecode", GFXDECODE, "palette", gfx_ace) // sound hardware SPEAKER(config, "mono").front_center(); WAVE(config, "wave", "cassette").add_route(ALL_OUTPUTS, "mono", 0.25); SPEAKER_SOUND(config, "speaker").add_route(ALL_OUTPUTS, "mono", 1.00); AY8910(config, AY8910_TAG, XTAL(6'500'000) / 2).add_route(ALL_OUTPUTS, "mono", 0.25); SP0256(config, m_sp0256, XTAL(3'000'000)); m_sp0256->add_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) I8255A(config, m_ppi); m_ppi->in_pb_callback().set(FUNC(ace_state::sby_r)); m_ppi->out_pb_callback().set(FUNC(ace_state::ald_w)); Z80PIO(config, m_z80pio, XTAL(6'500'000)/2); m_z80pio->out_int_callback().set_inputline(m_maincpu, INPUT_LINE_IRQ0); m_z80pio->in_pa_callback().set(FUNC(ace_state::pio_pa_r)); m_z80pio->out_pa_callback().set(FUNC(ace_state::pio_pa_w)); m_z80pio->out_pb_callback().set("cent_data_out", FUNC(output_latch_device::bus_w)); MCFG_DEVICE_ADD(m_centronics, CENTRONICS, centronics_devices, "printer") MCFG_CENTRONICS_OUTPUT_LATCH_ADD("cent_data_out", CENTRONICS_TAG) // internal ram RAM(config, RAM_TAG).set_default_size("1K").set_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 CLASS INIT COMPANY FULLNAME FLAGS COMP( 1981, jupace, 0, 0, ace, ace, ace_state, empty_init, "Jupiter Cantab", "Jupiter Ace", 0 )