// license:BSD-3-Clause // copyright-holders:R. Belmont, Wilbert Pol /*************************************************************************** Acorn Communicator Driver-in-progress by R. Belmont Electron ULA emulation by Wilbert Pol Main CPU: 65C816 Other chips: 6850 UART, 6522 VIA, SAA5240(video?), AM7910 modem, PCF0335(?), PCF8573P ****************************************************************************/ #include "emu.h" #include "cpu/g65816/g65816.h" #include "machine/6522via.h" #include "machine/6850acia.h" #include "machine/clock.h" #include "machine/mc6854.h" #include "machine/ram.h" #include "machine/nvram.h" #include "machine/bankdev.h" #include "sound/beep.h" #include "bus/econet/econet.h" #include "bus/centronics/ctronics.h" #include "bus/rs232/rs232.h" #include "emupal.h" #include "screen.h" #include "speaker.h" #include "accomm.lh" /* Interrupts */ #define INT_HIGH_TONE 0x40 #define INT_TRANSMIT_EMPTY 0x20 #define INT_RECEIVE_FULL 0x10 #define INT_RTC 0x08 #define INT_DISPLAY_END 0x04 #define INT_SET 0x100 #define INT_CLEAR 0x200 class accomm_state : public driver_device { public: accomm_state(const machine_config &mconfig, device_type type, const char *tag) : driver_device(mconfig, type, tag), m_maincpu(*this, "maincpu"), m_beeper(*this, "beeper"), m_ram(*this, RAM_TAG), m_via(*this, "via6522"), m_acia(*this, "acia"), m_acia_clock(*this, "acia_clock"), m_adlc(*this, "mc6854"), m_vram(*this, "vram"), m_keybd1(*this, "LINE1.%u", 0), m_keybd2(*this, "LINE2.%u", 0), m_ch00rom_enabled(true) { } void accomm(machine_config &config); private: uint32_t screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect); DECLARE_WRITE8_MEMBER(ch00switch_w); DECLARE_READ8_MEMBER(read_keyboard1); DECLARE_READ8_MEMBER(read_keyboard2); DECLARE_READ8_MEMBER(ram_r); DECLARE_WRITE8_MEMBER(ram_w); DECLARE_READ8_MEMBER(sheila_r); DECLARE_WRITE8_MEMBER(sheila_w); void accomm_palette(palette_device &palette) const; INTERRUPT_GEN_MEMBER(vbl_int); virtual void machine_reset() override; virtual void machine_start() override; void main_map(address_map &map); // devices required_device m_maincpu; required_device m_beeper; required_device m_ram; required_device m_via; required_device m_acia; required_device m_acia_clock; required_device m_adlc; required_shared_ptr m_vram; required_ioport_array<14> m_keybd1, m_keybd2; // driver_device overrides virtual void video_start() override; void interrupt_handler(int mode, int interrupt); inline uint8_t read_vram( uint16_t addr ); inline void plot_pixel(bitmap_ind16 &bitmap, int x, int y, uint32_t color); bool m_ch00rom_enabled; /* ULA context */ struct ULA { uint8_t interrupt_status; uint8_t interrupt_control; uint8_t rompage; uint16_t screen_start; uint16_t screen_base; int screen_size; uint16_t screen_addr; uint8_t *vram; int current_pal[16]; int communication_mode; int screen_mode; int shiftlock_mode; int capslock_mode; // int scanline; /* tape reading related */ uint32_t tape_value; int tape_steps; int bit_count; int high_tone_set; int start_bit; int stop_bit; int tape_running; uint8_t tape_byte; }; ULA m_ula; int m_map4[256]; int m_map16[256]; }; static const rgb_t electron_palette[8]= { rgb_t(0x0ff,0x0ff,0x0ff), rgb_t(0x000,0x0ff,0x0ff), rgb_t(0x0ff,0x000,0x0ff), rgb_t(0x000,0x000,0x0ff), rgb_t(0x0ff,0x0ff,0x000), rgb_t(0x000,0x0ff,0x000), rgb_t(0x0ff,0x000,0x000), rgb_t(0x000,0x000,0x000) }; void accomm_state::accomm_palette(palette_device &palette) const { palette.set_pen_colors(0, electron_palette); } READ8_MEMBER(accomm_state::read_keyboard1) { uint8_t data = 0; for (int i = 0; i < 14; i++) { if (!(offset & 1)) data |= m_keybd1[i]->read() & 0x0f; offset = offset >> 1; } return data; } READ8_MEMBER(accomm_state::read_keyboard2) { uint8_t data = 0; for (int i = 0; i < 14; i++) { if (!(offset & 1)) data |= m_keybd2[i]->read() & 0x0f; offset = offset >> 1; } return data; } INTERRUPT_GEN_MEMBER(accomm_state::vbl_int) { interrupt_handler( INT_SET, INT_DISPLAY_END ); } void accomm_state::machine_reset() { m_ula.communication_mode = 0x04; m_ula.screen_mode = 0; m_ula.shiftlock_mode = 0; m_ula.capslock_mode = 0; m_ula.screen_start = 0x3000; m_ula.screen_base = 0x3000; m_ula.screen_size = 0x8000 - 0x3000; m_ula.screen_addr = 0; m_ula.tape_running = 0; m_ula.interrupt_status = 0x82; m_ula.interrupt_control = 0; m_ula.vram = (uint8_t *)m_vram.target() + m_ula.screen_base; m_ch00rom_enabled = true; } void accomm_state::machine_start() { m_ula.interrupt_status = 0x82; m_ula.interrupt_control = 0x00; } void accomm_state::video_start() { int i; for( i = 0; i < 256; i++ ) { m_map4[i] = ( ( i & 0x10 ) >> 3 ) | ( i & 0x01 ); m_map16[i] = ( ( i & 0x40 ) >> 3 ) | ( ( i & 0x10 ) >> 2 ) | ( ( i & 0x04 ) >> 1 ) | ( i & 0x01 ); } } WRITE8_MEMBER(accomm_state::ch00switch_w) { logerror("ch00switch_w: offset %04x, data %02x\n", offset, data); if (!machine().side_effects_disabled()) m_ch00rom_enabled = false; } inline uint8_t accomm_state::read_vram(uint16_t addr) { return m_ula.vram[ addr % m_ula.screen_size ]; } inline void accomm_state::plot_pixel(bitmap_ind16 &bitmap, int x, int y, uint32_t color) { bitmap.pix16(y, x) = (uint16_t)color; } uint32_t accomm_state::screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect) { int i; int x = 0; int scanline = screen.vpos(); rectangle r = cliprect; r.sety(scanline, scanline); if (scanline == 0) m_ula.screen_addr = m_ula.screen_start - m_ula.screen_base; /* set up palette */ int pal[16]; switch( m_ula.screen_mode ) { case 0: case 3: case 4: case 6: case 7: /* 2 colour mode */ pal[0] = m_ula.current_pal[0]; pal[1] = m_ula.current_pal[8]; break; case 1: case 5: /* 4 colour mode */ pal[0] = m_ula.current_pal[0]; pal[1] = m_ula.current_pal[2]; pal[2] = m_ula.current_pal[8]; pal[3] = m_ula.current_pal[10]; break; case 2: /* 16 colour mode */ for( i = 0; i < 16; i++ ) pal[i] = m_ula.current_pal[i]; } /* draw line */ switch( m_ula.screen_mode ) { case 0: for( i = 0; i < 80; i++ ) { uint8_t pattern = read_vram( m_ula.screen_addr + (i << 3) ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>7)& 1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>6)& 1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>5)& 1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>4)& 1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>3)& 1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>2)& 1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>1)& 1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>0)& 1] ); } m_ula.screen_addr++; if ( ( scanline & 0x07 ) == 7 ) m_ula.screen_addr += 0x278; break; case 1: for( i = 0; i < 80; i++ ) { uint8_t pattern = read_vram( m_ula.screen_addr + i * 8 ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>3]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>3]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>2]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>2]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>1]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>1]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>0]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>0]] ); } m_ula.screen_addr++; if ( ( scanline & 0x07 ) == 7 ) m_ula.screen_addr += 0x278; break; case 2: for( i = 0; i < 80; i++ ) { uint8_t pattern = read_vram( m_ula.screen_addr + i * 8 ); plot_pixel( bitmap, x++, scanline, pal[m_map16[pattern>>1]] ); plot_pixel( bitmap, x++, scanline, pal[m_map16[pattern>>1]] ); plot_pixel( bitmap, x++, scanline, pal[m_map16[pattern>>1]] ); plot_pixel( bitmap, x++, scanline, pal[m_map16[pattern>>1]] ); plot_pixel( bitmap, x++, scanline, pal[m_map16[pattern>>0]] ); plot_pixel( bitmap, x++, scanline, pal[m_map16[pattern>>0]] ); plot_pixel( bitmap, x++, scanline, pal[m_map16[pattern>>0]] ); plot_pixel( bitmap, x++, scanline, pal[m_map16[pattern>>0]] ); } m_ula.screen_addr++; if ( ( scanline & 0x07 ) == 7 ) m_ula.screen_addr += 0x278; break; case 3: if ( ( scanline > 249 ) || ( scanline % 10 >= 8 ) ) bitmap.fill(7, r ); else { for( i = 0; i < 80; i++ ) { uint8_t pattern = read_vram( m_ula.screen_addr + i * 8 ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>7)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>6)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>5)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>4)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>3)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>2)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>1)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>0)&1] ); } m_ula.screen_addr++; } if ( scanline % 10 == 9 ) m_ula.screen_addr += 0x278; break; case 4: case 7: for( i = 0; i < 40; i++ ) { uint8_t pattern = read_vram( m_ula.screen_addr + i * 8 ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>7)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>7)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>6)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>6)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>5)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>5)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>4)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>4)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>3)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>3)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>2)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>2)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>1)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>1)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>0)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>0)&1] ); } m_ula.screen_addr++; if ( ( scanline & 0x07 ) == 7 ) m_ula.screen_addr += 0x138; break; case 5: for( i = 0; i < 40; i++ ) { uint8_t pattern = read_vram( m_ula.screen_addr + i * 8 ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>3]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>3]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>3]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>3]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>2]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>2]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>2]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>2]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>1]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>1]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>1]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>1]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>0]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>0]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>0]] ); plot_pixel( bitmap, x++, scanline, pal[m_map4[pattern>>0]] ); } m_ula.screen_addr++; if ( ( scanline & 0x07 ) == 7 ) m_ula.screen_addr += 0x138; break; case 6: if ( ( scanline > 249 ) || ( scanline % 10 >= 8 ) ) bitmap.fill(7, r ); else { for( i = 0; i < 40; i++ ) { uint8_t pattern = read_vram( m_ula.screen_addr + i * 8 ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>7)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>7)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>6)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>6)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>5)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>5)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>4)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>4)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>3)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>3)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>2)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>2)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>1)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>1)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>0)&1] ); plot_pixel( bitmap, x++, scanline, pal[(pattern>>0)&1] ); } m_ula.screen_addr++; if ( ( scanline % 10 ) == 7 ) m_ula.screen_addr += 0x138; } break; } return 0; } READ8_MEMBER(accomm_state::ram_r) { uint8_t data = 0xff; if (m_ch00rom_enabled && (offset < 0x10000)) { data = memregion("maincpu")->base()[offset]; } else { switch (m_ram->size()) { case 512 * 1024: data = m_ram->pointer()[offset & 0x7ffff]; break; case 1024 * 1024: data = m_ram->pointer()[offset & 0xfffff]; break; } } return data; } WRITE8_MEMBER(accomm_state::ram_w) { switch (m_ram->size()) { case 512 * 1024: m_ram->pointer()[offset & 0x7ffff] = data; break; case 1024 * 1024: m_ram->pointer()[offset & 0xfffff] = data; break; } } READ8_MEMBER(accomm_state::sheila_r) { uint8_t data = 0; switch ( offset & 0x0f ) { case 0x00: /* Interrupt status */ data = m_ula.interrupt_status; m_ula.interrupt_status &= ~0x02; break; case 0x01: /* Unknown */ break; case 0x04: /* Cassette data shift register */ interrupt_handler(INT_CLEAR, INT_RECEIVE_FULL ); data = m_ula.tape_byte; break; } logerror( "ULA: read offset %02x: %02x\n", offset, data ); return data; } static const int palette_offset[4] = { 0, 4, 5, 1 }; static const uint16_t screen_base[8] = { 0x3000, 0x3000, 0x3000, 0x4000, 0x5800, 0x5800, 0x6000, 0x5800 }; WRITE8_MEMBER(accomm_state::sheila_w) { int i = palette_offset[(( offset >> 1 ) & 0x03)]; logerror( "ULA: write offset %02x <- %02x\n", offset & 0x0f, data ); switch( offset & 0x0f ) { case 0x00: /* Interrupt control */ m_ula.interrupt_control = data; break; case 0x01: /* Unknown */ break; case 0x02: /* Screen start address #1 */ m_ula.screen_start = ( m_ula.screen_start & 0x7e00 ) | ( ( data & 0xe0 ) << 1 ); logerror( "screen_start changed to %04x\n", m_ula.screen_start ); break; case 0x03: /* Screen start address #2 */ m_ula.screen_start = ( m_ula.screen_start & 0x1c0 ) | ( ( data & 0x3f ) << 9 ); logerror( "screen_start changed to %04x\n", m_ula.screen_start ); break; case 0x04: /* Cassette data shift register */ break; case 0x05: /* Interrupt clear and paging */ /* rom page requests are honoured when currently bank 0-7 or 12-15 is switched in, * or when 8-11 is currently switched in only switching to bank 8-15 is allowed. * * Rompages 10 and 11 both select the Basic ROM. * Rompages 8 and 9 both select the keyboard. */ if ( ( ( m_ula.rompage & 0x0C ) != 0x08 ) || ( data & 0x08 ) ) { m_ula.rompage = data & 0x0f; } if ( data & 0x10 ) { interrupt_handler( INT_CLEAR, INT_DISPLAY_END ); } if ( data & 0x20 ) { interrupt_handler( INT_CLEAR, INT_RTC ); } if ( data & 0x40 ) { interrupt_handler( INT_CLEAR, INT_HIGH_TONE ); } if ( data & 0x80 ) { } break; case 0x06: /* Counter divider */ if ( m_ula.communication_mode == 0x01) { /* GUESS * the Electron Advanced Users manual says this is the correct algorithm * but the divider is wrong(?), says 16 but results in high pitch, * 32 is more close */ m_beeper->set_clock( 1000000 / ( 32 * ( data + 1 ) ) ); } break; case 0x07: /* Misc. */ m_ula.communication_mode = ( data >> 1 ) & 0x03; switch( m_ula.communication_mode ) { case 0x00: /* cassette input */ m_beeper->set_state( 0 ); break; case 0x01: /* sound generation */ m_beeper->set_state( 1 ); break; case 0x02: /* cassette output */ m_beeper->set_state( 0 ); break; case 0x03: /* not used */ m_beeper->set_state( 0 ); break; } m_ula.screen_mode = ( data >> 3 ) & 0x07; m_ula.screen_base = screen_base[ m_ula.screen_mode ]; m_ula.screen_size = 0x8000 - m_ula.screen_base; m_ula.vram = (uint8_t *)m_vram.target() + m_ula.screen_base; logerror( "ULA: screen mode set to %d\n", m_ula.screen_mode ); m_ula.shiftlock_mode = !BIT(data, 6); output().set_value("shiftlock_led", m_ula.shiftlock_mode); m_ula.capslock_mode = BIT(data, 7); output().set_value("capslock_led", m_ula.capslock_mode); break; case 0x08: case 0x0A: case 0x0C: case 0x0E: // video_update m_ula.current_pal[i+10] = (m_ula.current_pal[i+10] & 0x01) | (((data & 0x80) >> 5) | ((data & 0x08) >> 1)); m_ula.current_pal[i+8] = (m_ula.current_pal[i+8] & 0x01) | (((data & 0x40) >> 4) | ((data & 0x04) >> 1)); m_ula.current_pal[i+2] = (m_ula.current_pal[i+2] & 0x03) | ((data & 0x20) >> 3); m_ula.current_pal[i] = (m_ula.current_pal[ i] & 0x03) | ((data & 0x10) >> 2); break; case 0x09: case 0x0B: case 0x0D: case 0x0F: // video_update m_ula.current_pal[i+10] = (m_ula.current_pal[i+10] & 0x06) | ((data & 0x08) >> 3); m_ula.current_pal[i+8] = (m_ula.current_pal[i+8] & 0x06) | ((data & 0x04) >> 2); m_ula.current_pal[i+2] = (m_ula.current_pal[i+2] & 0x04) | (((data & 0x20) >> 4) | ((data & 0x02) >> 1)); m_ula.current_pal[i] = (m_ula.current_pal[i] & 0x04) | (((data & 0x10) >> 3) | ((data & 0x01))); break; } } void accomm_state::interrupt_handler(int mode, int interrupt) { if ( mode == INT_SET ) { m_ula.interrupt_status |= interrupt; } else { m_ula.interrupt_status &= ~interrupt; } if ( m_ula.interrupt_status & m_ula.interrupt_control & ~0x83 ) { m_ula.interrupt_status |= 0x01; m_maincpu->set_input_line(0, ASSERT_LINE ); } else { m_ula.interrupt_status &= ~0x01; m_maincpu->set_input_line(0, CLEAR_LINE ); } } void accomm_state::main_map(address_map &map) { map(0x000000, 0x1fffff).rw(FUNC(accomm_state::ram_r), FUNC(accomm_state::ram_w)); /* System RAM */ map(0x200000, 0x3fffff).noprw(); /* External expansion RAM */ map(0x400000, 0x400000).noprw(); /* MODEM */ map(0x410000, 0x410000).ram(); /* Econet ID */ map(0x420000, 0x42000f).m(m_via, FUNC(via6522_device::map)); /* 6522 VIA (printer etc) */ map(0x430000, 0x430001).rw(m_acia, FUNC(acia6850_device::read), FUNC(acia6850_device::write)); /* 2641 ACIA (RS423) */ map(0x440000, 0x44ffff).w(FUNC(accomm_state::ch00switch_w)); /* CH00SWITCH */ map(0x450000, 0x457fff).ram().share("vram"); /* Video RAM */ map(0x458000, 0x459fff).r(FUNC(accomm_state::read_keyboard1)); /* Video ULA */ map(0x45a000, 0x45bfff).r(FUNC(accomm_state::read_keyboard2)); /* Video ULA */ map(0x45fe00, 0x45feff).rw(FUNC(accomm_state::sheila_r), FUNC(accomm_state::sheila_w)); /* Video ULA */ map(0x460000, 0x467fff).ram().share("nvram"); /* CMOS RAM */ map(0x470000, 0x47001f).rw(m_adlc, FUNC(mc6854_device::read), FUNC(mc6854_device::write)); /* 68B54 (Econet) */ map(0x480000, 0x7fffff).noprw(); /* Reserved */ map(0x800000, 0xbfffff).noprw(); /* External expansion IO */ map(0xc00000, 0xf7ffff).rom().region("ext", 0); /* External expansion ROM */ map(0xf80000, 0xf9ffff).rom().region("maincpu", 0x060000); /* Empty (ROM Slot 3) */ map(0xfa0000, 0xfbffff).rom().region("maincpu", 0x040000); /* ROM bank 4 (ROM Slot 2) */ map(0xfc0000, 0xfcffff).rom().region("maincpu", 0x030000); /* ROM bank 3 (ROM Slot 1) */ map(0xfd0000, 0xfdffff).rom().region("maincpu", 0x020000); /* ROM bank 2 (ROM Slot 1) */ map(0xfe0000, 0xfeffff).rom().region("maincpu", 0x000000); /* ROM bank 0 (ROM Slot 0) */ map(0xff0000, 0xffffff).rom().region("maincpu", 0x010000); /* ROM bank 1 (ROM Slot 0) */ } static INPUT_PORTS_START( accomm ) PORT_START("LINE1.0") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_SLASH) PORT_CHAR('/') PORT_CHAR('?') PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_P) PORT_CHAR('p') PORT_CHAR('P') PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_BACKSLASH) PORT_CHAR('_') PORT_CHAR('@') PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_MINUS) PORT_CHAR('-') PORT_CHAR('=') PORT_START("LINE1.1") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_COMMA) PORT_CHAR(',') PORT_CHAR('<') PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_I) PORT_CHAR('i') PORT_CHAR('I') PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_STOP) PORT_CHAR('.') PORT_CHAR('>') PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_9) PORT_CHAR('9') PORT_CHAR(')') PORT_START("LINE1.2") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_V) PORT_CHAR('v') PORT_CHAR('V') PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_R) PORT_CHAR('r') PORT_CHAR('R') PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_B) PORT_CHAR('b') PORT_CHAR('B') PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_5) PORT_CHAR('5') PORT_CHAR('%') PORT_START("LINE1.3") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_TILDE) PORT_CHAR(UCHAR_MAMEKEY(TILDE)) PORT_NAME("Function") PORT_START("LINE1.4") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_LSHIFT) PORT_CHAR(UCHAR_SHIFT_1) PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_RSHIFT) PORT_CHAR(UCHAR_SHIFT_1) PORT_START("LINE1.5") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_X) PORT_CHAR('x') PORT_CHAR('X') PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_W) PORT_CHAR('w') PORT_CHAR('W') PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_C) PORT_CHAR('c') PORT_CHAR('C') PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_3) PORT_CHAR('3') PORT_CHAR('#') PORT_START("LINE1.6") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_LALT) PORT_CHAR(UCHAR_MAMEKEY(LALT)) PORT_NAME("Shift Lock") PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_TAB) PORT_CHAR(9) PORT_NAME("Tab") PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_Z) PORT_CHAR('z') PORT_CHAR('Z') PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_1) PORT_CHAR('1') PORT_CHAR('!') PORT_START("LINE1.7") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_N) PORT_CHAR('n') PORT_CHAR('N') PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_Y) PORT_CHAR('y') PORT_CHAR('Y') PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_M) PORT_CHAR('m') PORT_CHAR('M') PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_7) PORT_CHAR('7') PORT_CHAR('\'') PORT_START("LINE1.8") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_9_PAD) PORT_CHAR(UCHAR_MAMEKEY(9_PAD)) PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_6_PAD) PORT_CHAR(UCHAR_MAMEKEY(6_PAD)) PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_ENTER_PAD) PORT_CHAR(UCHAR_MAMEKEY(EQUALS_PAD)) PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_3_PAD) PORT_CHAR(UCHAR_MAMEKEY(3_PAD)) PORT_START("LINE1.9") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_DEL) PORT_CHAR(UCHAR_MAMEKEY(BACKSPACE)) PORT_NAME("Del CE") PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_END) PORT_CHAR(UCHAR_MAMEKEY(END)) PORT_NAME("Copy EE") PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_DOWN) PORT_CHAR(10) PORT_NAME(UTF8_DOWN" +") PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_HOME) PORT_CHAR(UCHAR_MAMEKEY(HOME)) PORT_NAME("Home %") PORT_START("LINE1.10") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_DEL_PAD) PORT_CHAR(UCHAR_MAMEKEY(DEL_PAD)) PORT_NAME("Keypad .") PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_4_PAD) PORT_CHAR(UCHAR_MAMEKEY(4_PAD)) PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_0_PAD) PORT_CHAR(UCHAR_MAMEKEY(0_PAD)) PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_1_PAD) PORT_CHAR(UCHAR_MAMEKEY(1_PAD)) PORT_START("LINE1.11") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_BACKSLASH2) PORT_CHAR('\\') PORT_CHAR('|') PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_CLOSEBRACE) PORT_CHAR(']') PORT_CHAR('}') PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_F10) PORT_CHAR(UCHAR_MAMEKEY(F10)) PORT_NAME("Phone") PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_BACKSPACE) PORT_CHAR(UCHAR_MAMEKEY(ESC)) PORT_NAME("Escape") PORT_START("LINE1.12") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_F4) PORT_CHAR(UCHAR_MAMEKEY(F4)) PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_F2) PORT_CHAR(UCHAR_MAMEKEY(F2)) PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_F5) PORT_CHAR(UCHAR_MAMEKEY(F5)) PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_F1) PORT_CHAR(UCHAR_MAMEKEY(F1)) PORT_START("LINE1.13") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_START("LINE2.0") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_QUOTE) PORT_CHAR(':') PORT_CHAR('*') PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_EQUALS) PORT_CHAR('^') PORT_CHAR('~') PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_OPENBRACE) PORT_CHAR('[') PORT_CHAR('{') PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_COLON) PORT_CHAR(';') PORT_CHAR('+') PORT_START("LINE2.1") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_L) PORT_CHAR('l') PORT_CHAR('L') PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_0) PORT_CHAR('0') PORT_CHAR(0xa3) // £ PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_O) PORT_CHAR('o') PORT_CHAR('O') PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_K) PORT_CHAR('k') PORT_CHAR('K') PORT_START("LINE2.2") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_G) PORT_CHAR('g') PORT_CHAR('G') PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_6) PORT_CHAR('6') PORT_CHAR('&') PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_T) PORT_CHAR('t') PORT_CHAR('T') PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_F) PORT_CHAR('f') PORT_CHAR('F') PORT_START("LINE2.3") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_ESC) PORT_NAME("Help") PORT_START("LINE2.4") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_LCONTROL) PORT_CHAR(UCHAR_MAMEKEY(LCONTROL)) PORT_NAME("Ctrl") PORT_START("LINE2.5") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_D) PORT_CHAR('d') PORT_CHAR('D') PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_4) PORT_CHAR('4') PORT_CHAR('$') PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_E) PORT_CHAR('e') PORT_CHAR('E') PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_S) PORT_CHAR('s') PORT_CHAR('S') PORT_START("LINE2.6") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_A) PORT_CHAR('a') PORT_CHAR('A') PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_2) PORT_CHAR('2') PORT_CHAR('"') PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_Q) PORT_CHAR('q') PORT_CHAR('Q') PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_CAPSLOCK) PORT_CHAR(UCHAR_MAMEKEY(CAPSLOCK)) PORT_START("LINE2.7") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_J) PORT_CHAR('j') PORT_CHAR('J') PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_8) PORT_CHAR('8') PORT_CHAR('(') PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_U) PORT_CHAR('u') PORT_CHAR('U') PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_H) PORT_CHAR('h') PORT_CHAR('H') PORT_START("LINE2.8") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_START("LINE2.9") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_RIGHT) PORT_CHAR(UCHAR_MAMEKEY(RIGHT)) PORT_NAME(UTF8_RIGHT" -") PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_INSERT) PORT_CHAR(UCHAR_MAMEKEY(INSERT)) PORT_NAME("Insert " UTF8_DIVIDE) PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_UP) PORT_CHAR(UCHAR_MAMEKEY(UP)) PORT_NAME(UTF8_UP" " UTF8_MULTIPLY) PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_LEFT) PORT_CHAR(UCHAR_MAMEKEY(LEFT)) PORT_NAME(UTF8_LEFT" AC") PORT_START("LINE2.10") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_8_PAD) PORT_CHAR(UCHAR_MAMEKEY(8_PAD)) PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_2_PAD) PORT_CHAR(UCHAR_MAMEKEY(2_PAD)) PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_5_PAD) PORT_CHAR(UCHAR_MAMEKEY(5_PAD)) PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_7_PAD) PORT_CHAR(UCHAR_MAMEKEY(7_PAD)) PORT_START("LINE2.11") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_F9) PORT_CHAR(UCHAR_MAMEKEY(F9)) PORT_NAME("Stop") PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_SPACE) PORT_CHAR(' ') PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_F12) PORT_CHAR(UCHAR_MAMEKEY(F12)) PORT_NAME("Calc") PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_ENTER) PORT_CHAR(13) PORT_START("LINE2.12") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_F6) PORT_CHAR(UCHAR_MAMEKEY(F6)) PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_F8) PORT_CHAR(UCHAR_MAMEKEY(F8)) PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_F7) PORT_CHAR(UCHAR_MAMEKEY(F7)) PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_F3) PORT_CHAR(UCHAR_MAMEKEY(F3)) PORT_START("LINE2.13") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_UNUSED) PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_UNUSED) INPUT_PORTS_END void accomm_state::accomm(machine_config &config) { G65816(config, m_maincpu, 16_MHz_XTAL / 8); m_maincpu->set_addrmap(AS_PROGRAM, &accomm_state::main_map); m_maincpu->set_vblank_int("screen", FUNC(accomm_state::vbl_int)); screen_device &screen(SCREEN(config, "screen", SCREEN_TYPE_RASTER)); screen.set_refresh_hz(50.08); screen.set_size(640, 312); screen.set_visarea(0, 640 - 1, 0, 256 - 1); screen.set_screen_update(FUNC(accomm_state::screen_update)); screen.set_video_attributes(VIDEO_UPDATE_SCANLINE); screen.set_palette("palette"); PALETTE(config, "palette", FUNC(accomm_state::accomm_palette), 16); config.set_default_layout(layout_accomm); /* internal ram */ RAM(config, RAM_TAG).set_default_size("512K").set_extra_options("1M"); NVRAM(config, "nvram", nvram_device::DEFAULT_ALL_0); /* sound */ SPEAKER(config, "mono").front_center(); BEEP(config, m_beeper, 300).add_route(ALL_OUTPUTS, "mono", 1.00); /* rtc pcf8573 */ /* via */ VIA6522(config, m_via, 16_MHz_XTAL / 16); m_via->writepa_handler().set("cent_data_out", FUNC(output_latch_device::bus_w)); m_via->ca2_handler().set("centronics", FUNC(centronics_device::write_strobe)); /* acia */ ACIA6850(config, m_acia, 0); m_acia->txd_handler().set("serial", FUNC(rs232_port_device::write_txd)); m_acia->rts_handler().set("serial", FUNC(rs232_port_device::write_rts)); m_acia->irq_handler().set_inputline("maincpu", G65816_LINE_IRQ); rs232_port_device &serial(RS232_PORT(config, "serial", default_rs232_devices, nullptr)); serial.rxd_handler().set(m_acia, FUNC(acia6850_device::write_rxd)); serial.dcd_handler().set(m_acia, FUNC(acia6850_device::write_dcd)); serial.cts_handler().set(m_acia, FUNC(acia6850_device::write_cts)); CLOCK(config, m_acia_clock, 16_MHz_XTAL / 13); m_acia_clock->signal_handler().set(m_acia, FUNC(acia6850_device::write_txc)); m_acia_clock->signal_handler().append(m_acia, FUNC(acia6850_device::write_rxc)); /* econet */ MC6854(config, m_adlc); m_adlc->out_txd_cb().set("econet", FUNC(econet_device::host_data_w)); m_adlc->out_irq_cb().set_inputline(m_maincpu, G65816_LINE_NMI); econet_device &econet(ECONET(config, "econet", 0)); econet.clk_wr_callback().set(m_adlc, FUNC(mc6854_device::txc_w)); econet.clk_wr_callback().append(m_adlc, FUNC(mc6854_device::rxc_w)); econet.data_wr_callback().set(m_adlc, FUNC(mc6854_device::set_rx)); ECONET_SLOT(config, "econet254", "econet", econet_devices).set_slot(254); /* printer */ centronics_device ¢ronics(CENTRONICS(config, "centronics", centronics_devices, "printer")); centronics.ack_handler().set(m_via, FUNC(via6522_device::write_ca1)); output_latch_device ¢_data_out(OUTPUT_LATCH(config, "cent_data_out")); centronics.set_output_latch(cent_data_out); } ROM_START(accomm) ROM_REGION(0x80000, "maincpu", 0) ROM_DEFAULT_BIOS("100") ROM_SYSTEM_BIOS(0, "100", "MOS v1.00 13/Nov/86") /* MOS: Version 1.00 13/Nov/86 (C)1986 */ ROMX_LOAD("romv100-0.rom", 0x000000, 0x010000, CRC(6d22950d) SHA1(d4cbdccf8d2bc836fb81182b2ed344d7134fe5c9), ROM_BIOS(0)) ROM_RELOAD( 0x010000, 0x010000) ROMX_LOAD("romv100-1.rom", 0x020000, 0x010000, CRC(adc6a073) SHA1(3e87f21fafc1d69f33c5b541a20a98e82aacbfab), ROM_BIOS(0)) ROM_RELOAD( 0x030000, 0x010000) ROMX_LOAD("romv100-2.rom", 0x040000, 0x010000, CRC(3438adee) SHA1(cd9d5522d9430cb2e1936210b77d2edd280f9419), ROM_BIOS(0)) ROM_RELOAD( 0x050000, 0x010000) ROMX_LOAD("romv100-3.rom", 0x060000, 0x010000, CRC(bd87a157) SHA1(b9b9ed1aab9ffef2de988b2cfeac293afa11448a), ROM_BIOS(0)) ROM_RELOAD( 0x070000, 0x010000) ROM_REGION(0x380000, "ext", ROMREGION_ERASEFF) ROM_END ROM_START(accommp) ROM_REGION(0x80000, "maincpu", 0) /* ROM labels on both evaluation prototypes were hand written A, B, C, D */ ROM_DEFAULT_BIOS("011-1985") /* Serial B01-PPC01-0000004 (owned by Acorn co-founder Chris Curry) */ ROM_SYSTEM_BIOS(0, "011-1985", "CMOS v0.11 1985") /* CMOS version 0.11 October (C)1985 */ ROMX_LOAD("004-a.rom", 0x000000, 0x008000, CRC(d0d4d5e3) SHA1(67710e349235ed5c71380b5a7d4b570ce355b10e), ROM_BIOS(0)) ROM_RELOAD( 0x008000, 0x008000) ROM_RELOAD( 0x010000, 0x008000) ROM_RELOAD( 0x018000, 0x008000) ROMX_LOAD("004-b.rom", 0x020000, 0x010000, CRC(e2fcef94) SHA1(fd065bcdb6c48bee39db9f71b8d193ee228557f7), ROM_BIOS(0)) ROM_RELOAD( 0x030000, 0x010000) ROMX_LOAD("004-c.rom", 0x040000, 0x008000, CRC(348c0018) SHA1(9681b6b9eefa9ba294fac6a41dec12ba203e5142), ROM_BIOS(0)) ROM_RELOAD( 0x048000, 0x008000) ROM_RELOAD( 0x050000, 0x008000) ROM_RELOAD( 0x058000, 0x008000) ROMX_LOAD("004-d.rom", 0x060000, 0x010000, CRC(1379eb9f) SHA1(8d57bc7e279c5f17c6f0e4d1d5fa7f784aadd549), ROM_BIOS(0)) ROM_RELOAD( 0x070000, 0x010000) /* Serial ending 094 */ ROM_SYSTEM_BIOS(1, "011-1986", "CMOS v0.11 1986") /* CMOS version 0.11 October (C)1985 */ ROMX_LOAD("094-a.rom", 0x008000, 0x008000, CRC(d0d4d5e3) SHA1(67710e349235ed5c71380b5a7d4b570ce355b10e), ROM_BIOS(1)) ROM_RELOAD( 0x008000, 0x008000) ROM_RELOAD( 0x010000, 0x008000) ROM_RELOAD( 0x018000, 0x008000) ROMX_LOAD("094-b.rom", 0x020000, 0x008000, CRC(8d793909) SHA1(392028386f831dfae3353e0b7b51a608798e89c6), ROM_BIOS(1)) ROM_RELOAD( 0x028000, 0x008000) ROM_RELOAD( 0x030000, 0x008000) ROM_RELOAD( 0x038000, 0x008000) ROMX_LOAD("094-c.rom", 0x040000, 0x008000, CRC(e544e849) SHA1(31cd2dcd2a50880a97b12d61ef144f7d7f112345), ROM_BIOS(1)) ROM_RELOAD( 0x048000, 0x008000) ROM_RELOAD( 0x050000, 0x008000) ROM_RELOAD( 0x058000, 0x008000) ROMX_LOAD("094-d-view+castoff.rom", 0x060000, 0x010000, CRC(8027df77) SHA1(51751bfdcf68683c092b6442fb22f11cb565898c), ROM_BIOS(1)) ROM_RELOAD( 0x070000, 0x010000) ROM_REGION(0x380000, "ext", ROMREGION_ERASEFF) ROM_END ROM_START(accommb) ROM_REGION(0x80000, "maincpu", 0) ROM_DEFAULT_BIOS("170") ROM_SYSTEM_BIOS(0, "170", "MOS v1.70 04/Jun/87") /* MOS: Version 1.70 04/Jun/87 (C)1987 */ ROMX_LOAD("0252.200-1-rom0-v1.00.rom", 0x000000, 0x010000, CRC(6d22950d) SHA1(d4cbdccf8d2bc836fb81182b2ed344d7134fe5c9), ROM_BIOS(0)) ROM_RELOAD( 0x010000, 0x010000) ROMX_LOAD("0252.201-1-rom1-v1.00.rom", 0x020000, 0x010000, CRC(adc6a073) SHA1(3e87f21fafc1d69f33c5b541a20a98e82aacbfab), ROM_BIOS(0)) ROM_RELOAD( 0x030000, 0x010000) ROMX_LOAD("0252.202-1-rom2-v1.00.rom", 0x040000, 0x010000, CRC(3438adee) SHA1(cd9d5522d9430cb2e1936210b77d2edd280f9419), ROM_BIOS(0)) ROM_RELOAD( 0x050000, 0x010000) ROMX_LOAD("0252.203-1-rom3-v1.00.rom", 0x060000, 0x010000, CRC(bd87a157) SHA1(b9b9ed1aab9ffef2de988b2cfeac293afa11448a), ROM_BIOS(0)) ROM_RELOAD( 0x070000, 0x010000) /* Expansion board: Acorn Computer 0167,000 Issue 1 Spectar II */ /* Contains 8 slots for ASTRON Data Cards */ ROM_REGION(0x380000, "ext", ROMREGION_ERASEFF) ROM_LOAD("spectar-v1.0-0267-200-03.ic1", 0x000000, 0x010000, CRC(71ad0491) SHA1(c3ace8cdd2383e97eb58d64d011444da678d537c)) ROM_END ROM_START(accommi) ROM_REGION(0x80000, "maincpu", 0) ROM_DEFAULT_BIOS("300") ROM_SYSTEM_BIOS(0, "300", "MOS v3.00 13/gen/88") /* MOS: Versione 3.00 13/gen/88 (C)1988 */ ROMX_LOAD("rom0.rom", 0x000000, 0x020000, CRC(841bd984) SHA1(2c3bc77178e5bf0342e0410f6c398bb3ac40d0c4), ROM_BIOS(0)) ROMX_LOAD("252216-iss1.rom", 0x020000, 0x020000, CRC(40767d31) SHA1(258f4ed92d74523aaaa4aa250db5a99428aaf960), ROM_BIOS(0)) ROMX_LOAD("rom2.rom", 0x040000, 0x010000, CRC(e3511af8) SHA1(88a5654a5e84a31078a0a64139fe84db08196c2a), ROM_BIOS(0)) ROM_RELOAD( 0x050000, 0x010000) ROM_REGION(0x380000, "ext", ROMREGION_ERASEFF) ROM_END COMP( 1986, accomm, 0, 0, accomm, accomm, accomm_state, empty_init, "Acorn", "Acorn Communicator", MACHINE_NOT_WORKING ) COMP( 1985, accommp, accomm, 0, accomm, accomm, accomm_state, empty_init, "Acorn", "Acorn Communicator (prototype)", MACHINE_NOT_WORKING ) COMP( 1987, accommb, accomm, 0, accomm, accomm, accomm_state, empty_init, "Acorn", "Acorn Briefcase Communicator", MACHINE_NOT_WORKING ) COMP( 1988, accommi, accomm, 0, accomm, accomm, accomm_state, empty_init, "Acorn", "Acorn Communicator (Italian)", MACHINE_NOT_WORKING )