// license:BSD-3-Clause // copyright-holders:Barry Rodewald /* * attache.c * * Created on: 17/05/2013 * * Driver by Barry Rodewald * * * Otrona Attache * * CPU: Zilog Z80-A, 4MHz * RAM: 64kB * DMA: AMD 9517A (or compatible) * RTC: Oki MSM5832, Z80-PIO * Sound: GI AY-3-8912 * FDC: NEC D765A, 5.25" floppies * Video: CRT5027, 320x240 * Serial: Z80-SIO, two RS-232C or RS-422/423 ports * * Note: * In terminal mode (when disk booting fails or no disk is inserted), press Ctrl+Linefeed (ctrl+pgdn by default) * to enter monitor mode. From here you can run a bunch of diagnostic tests. * * G - Display Test Pattern * H - Display RAM Test * nnI - Input Test (nn = port number) * J - Jump * K - Keyboard Test * L - Loop Tests * M - Map Test * nnmmO - Output Test (nn = port number, mm = data to send) * P - Format Diskette (P to format disk in Drive A, 1P for Drive B) * Q - CMOS RAM Test * nR - Main RAM Test (n = 16kB bank to test [0-3]) * bbpcS - Select Output Ports (first b = printer baud rate, second b = comm baud rate, p = printer port, c = comm port) * T - Real Time Clock Test * U - United Tests * cchsV - Read a sector from disk (cc = cylinder, h = head [bit 0=drive, bit 2=side], s = sector) * cchsW - Write a sector from disk * nnnnmmmmX - I/O port transmit (nnnn = number of bytes to transmit, mmmm = start of data to transmit) * nnnnY - I/O port receive (nnnn = address of data loaded) * Z - Auto Disk Test (1Z for drive B) * * For the 8086 board (will display an 'x' if the 8086 board is not installed): * [ - 8086 RAM Test * ] - SCC Test * ( - GPIB Listener/Talker Test * ) - GPIB Controller Test * * The Attache 8:16 is an upgraded Attache adding an 8086 (+ optional 8087) board with its own 256kB of RAM, * and optionally a GPIB controller (TMS9914A) and serial synchronous port (Z8530 SCC). It also has modifications * to the main Z80 board, specifically the display circuitry, adding a high-resolution display, and replacing * the character ROM with a larger ROM containing an IBM character set. * It effectively allows the Attache to run MS-DOS and use a 10MB hard disk. * * TODO: * - Keyboard repeat * - Get at least some of the system tests to pass * - and probably lots more I've forgotten, too. * - improve Z80-8086 comms on the 8:16, saving a file to the RAM disk under CP/M often ends in deadlock. * - add Z8530 SCC and TMS9914A GPIB to the 8:16. These are optional devices, so aren't strictly required at this stage. * - connect dma and sio (channel 3) */ #include "emu.h" #include "cpu/z80/z80.h" #include "machine/z80daisy.h" #include "bus/rs232/rs232.h" #include "imagedev/floppy.h" #include "machine/am9517a.h" #include "machine/msm5832.h" #include "machine/nvram.h" #include "machine/ram.h" #include "machine/upd765.h" #include "machine/z80ctc.h" #include "machine/z80sio.h" #include "machine/z80pio.h" #include "machine/i8255.h" #include "cpu/i86/i86.h" #include "sound/ay8910.h" #include "video/tms9927.h" #include "emupal.h" #include "screen.h" #include "softlist.h" #include "speaker.h" class attache_state : public driver_device { public: attache_state(const machine_config &mconfig, device_type type, const char *tag) : driver_device(mconfig, type, tag) , m_maincpu(*this, "maincpu") , m_rom(*this, "boot") , m_ram(*this, RAM_TAG) , m_char_rom(*this, "video") , m_rtc(*this, "rtc") , m_psg(*this, "psg") , m_fdc(*this, "fdc") , m_sio(*this, "sio") , m_pio(*this, "pio") , m_ctc(*this, "ctc") , m_crtc(*this, "crtc") , m_dma(*this, "dma") , m_palette(*this, "palette") , m_floppy0(*this, "fdc:0:525dd") , m_floppy1(*this, "fdc:1:525dd") , m_kb_rows(*this, "row%u", 0U) , m_kb_mod(*this, "modifiers") , m_membank1(*this, "bank1") , m_membank2(*this, "bank2") , m_membank3(*this, "bank3") , m_membank4(*this, "bank4") , m_membank5(*this, "bank5") , m_membank6(*this, "bank6") , m_membank7(*this, "bank7") , m_membank8(*this, "bank8") , m_nvram(*this, "nvram") , m_rom_active(true) , m_gfx_enabled(false) , m_kb_clock(true) , m_kb_empty(true) { } void attache(machine_config &config); uint32_t screen_update(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect); DECLARE_READ8_MEMBER(pio_portA_r); DECLARE_READ8_MEMBER(pio_portB_r); DECLARE_WRITE8_MEMBER(pio_portA_w); DECLARE_WRITE8_MEMBER(pio_portB_w); DECLARE_READ8_MEMBER(dma_mem_r); DECLARE_WRITE8_MEMBER(dma_mem_w); DECLARE_READ8_MEMBER(fdc_dma_r); DECLARE_WRITE8_MEMBER(fdc_dma_w); DECLARE_WRITE_LINE_MEMBER(hreq_w); DECLARE_WRITE_LINE_MEMBER(eop_w); DECLARE_WRITE_LINE_MEMBER(fdc_dack_w); protected: // PIO port B operation select enum { PIO_SEL_8910_ADDR = 0, PIO_SEL_8910_DATA, PIO_SEL_5832_READ, PIO_SEL_5832_WRITE, PIO_SEL_5101_WRITE, PIO_SEL_5101_READ, PIO_SEL_LATCH, PIO_SEL_NOP }; // Display controller operation select enum { DISP_GFX_0 = 0, DISP_GFX_1, DISP_GFX_2, DISP_GFX_3, DISP_GFX_4, DISP_CRTC, DISP_ATTR, DISP_CHAR }; // overrides virtual void driver_start() override; virtual void machine_start() override; virtual void machine_reset() override; DECLARE_READ8_MEMBER(rom_r); DECLARE_WRITE8_MEMBER(rom_w); DECLARE_WRITE8_MEMBER(display_command_w); DECLARE_READ8_MEMBER(display_data_r); DECLARE_WRITE8_MEMBER(display_data_w); DECLARE_READ8_MEMBER(dma_mask_r); DECLARE_WRITE8_MEMBER(dma_mask_w); DECLARE_READ8_MEMBER(memmap_r); DECLARE_WRITE8_MEMBER(memmap_w); void operation_strobe(address_space& space,uint8_t data); void keyboard_clock_w(bool state); uint8_t keyboard_data_r(); uint16_t get_key(); void attache_io(address_map &map); void attache_map(address_map &map); required_device m_maincpu; required_memory_region m_rom; required_device m_ram; required_memory_region m_char_rom; required_device m_rtc; required_device m_psg; required_device m_fdc; required_device m_sio; required_device m_pio; required_device m_ctc; required_device m_crtc; required_device m_dma; required_device m_palette; required_device m_floppy0; required_device m_floppy1; required_ioport_array<8> m_kb_rows; required_ioport m_kb_mod; required_memory_bank m_membank1; required_memory_bank m_membank2; required_memory_bank m_membank3; required_memory_bank m_membank4; required_memory_bank m_membank5; required_memory_bank m_membank6; required_memory_bank m_membank7; required_memory_bank m_membank8; required_device m_nvram; bool m_rom_active; bool m_gfx_enabled; uint8_t m_pio_porta; uint8_t m_pio_portb; uint8_t m_pio_select; uint8_t m_pio_latch; uint8_t m_crtc_reg_select; uint8_t m_current_cmd; uint8_t m_char_ram[128*32]; uint8_t m_attr_ram[128*32]; uint8_t m_gfx_ram[128*32*5]; uint8_t m_char_line; uint8_t m_attr_line; uint8_t m_gfx_line; uint8_t m_cmos_ram[64]; uint8_t m_cmos_select; uint16_t m_kb_current_key; bool m_kb_clock; bool m_kb_empty; uint8_t m_kb_bitpos; uint8_t m_memmap; }; class attache816_state : public attache_state { public: attache816_state(const machine_config &mconfig, device_type type, const char *tag) : attache_state(mconfig, type, tag) , m_extcpu(*this,"extcpu") , m_ppi(*this,"ppi") , m_comms_val(0) , m_x86_irq_enable(0) , m_z80_rx_ready(false) , m_z80_tx_ready(false) { } void attache816(machine_config &config); private: DECLARE_WRITE8_MEMBER(x86_comms_w); DECLARE_READ8_MEMBER(x86_comms_r); DECLARE_WRITE8_MEMBER(x86_irq_enable); DECLARE_WRITE8_MEMBER(x86_iobf_enable_w); DECLARE_READ8_MEMBER(z80_comms_r); DECLARE_WRITE8_MEMBER(z80_comms_w); DECLARE_READ8_MEMBER(z80_comms_status_r); DECLARE_WRITE8_MEMBER(z80_comms_ctrl_w); DECLARE_WRITE_LINE_MEMBER(ppi_irq); DECLARE_WRITE_LINE_MEMBER(x86_dsr); virtual void machine_reset() override; void attache816_io(address_map &map); void attache_x86_io(address_map &map); void attache_x86_map(address_map &map); required_device m_extcpu; required_device m_ppi; uint8_t m_comms_val; uint8_t m_x86_irq_enable; bool m_z80_rx_ready; bool m_z80_tx_ready; }; // Attributes (based on schematics): // bit 0 = ALT // bit 1 = RW // bit 2 = BKG (reverse?) // bit 3 = brightness // bit 4 = double-size (width) // bit 5 = underline // bit 6 = superscript // bit 7 = subscript (superscript and subscript combined produces strikethrough) uint32_t attache_state::screen_update(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect) { uint8_t x,y,vy,start,bit,scan,data; uint8_t dbl_mode = 0; // detemines which half of character to display when using double size attribute, // as it can start on either odd or even character cells. // Graphics output (if enabled) if(m_gfx_enabled) { const pen_t *pen = m_palette->pens(); for(y=0;y<(bitmap.height()-1)/10;y++) { for(x=0;x<(bitmap.width()-1)/8;x++) { // graphics pixels use half the clock of text, so 4 graphics pixels per character for(scan=0;scan<10;scan+=2) { data = m_gfx_ram[(128*32*(scan/2))+(y*128+x)]; bitmap.pix32(y*10+scan,x*8) = pen[BIT(data,7)]; bitmap.pix32(y*10+scan,x*8+1) = pen[BIT(data,7)]; bitmap.pix32(y*10+scan,x*8+2) = pen[BIT(data,6)]; bitmap.pix32(y*10+scan,x*8+3) = pen[BIT(data,6)]; bitmap.pix32(y*10+scan,x*8+4) = pen[BIT(data,5)]; bitmap.pix32(y*10+scan,x*8+5) = pen[BIT(data,5)]; bitmap.pix32(y*10+scan,x*8+6) = pen[BIT(data,4)]; bitmap.pix32(y*10+scan,x*8+7) = pen[BIT(data,4)]; bitmap.pix32(y*10+scan+1,x*8) = pen[BIT(data,3)]; bitmap.pix32(y*10+scan+1,x*8+1) = pen[BIT(data,3)]; bitmap.pix32(y*10+scan+1,x*8+2) = pen[BIT(data,2)]; bitmap.pix32(y*10+scan+1,x*8+3) = pen[BIT(data,2)]; bitmap.pix32(y*10+scan+1,x*8+4) = pen[BIT(data,1)]; bitmap.pix32(y*10+scan+1,x*8+5) = pen[BIT(data,1)]; bitmap.pix32(y*10+scan+1,x*8+6) = pen[BIT(data,0)]; bitmap.pix32(y*10+scan+1,x*8+7) = pen[BIT(data,0)]; } } } } else bitmap.fill(0); // Text output for(y=0;y<(bitmap.height()-1)/10;y++) // lines { start = m_crtc->upscroll_offset(); vy = (start + y) % 24; for(x=0;x<(bitmap.width()-1)/8;x++) // columns { assert(((y*128)+x) >= 0 && ((y*128)+x) < ARRAY_LENGTH(m_char_ram)); assert(((vy*128)+x) >= 0 && ((vy*128)+x) < ARRAY_LENGTH(m_char_ram)); uint8_t ch = m_char_ram[(vy*128)+x]; pen_t fg = m_palette->pen(m_attr_ram[(vy*128)+x] & 0x08 ? 2 : 1); // brightness if(m_attr_ram[(vy*128)+x] & 0x10) // double-size dbl_mode++; else dbl_mode = 0; for(scan=0;scan<10;scan++) // 10 scanlines per line { data = m_char_rom->base()[(ch*16+scan)]; if((m_attr_ram[(vy*128)+x] & 0xc0) != 0xc0) // if not strikethrough { if(m_attr_ram[(vy*128)+x] & 0x40) // superscript { if(scan >= 5) data = 0; else data = m_char_rom->base()[ch*16+(scan*2)+1]; } if(m_attr_ram[(vy*128)+x] & 0x80) // subscript { if(scan < 5) data = 0; else data = m_char_rom->base()[ch*16+((scan-5)*2)+1]; } } if((m_attr_ram[(vy*128)+x] & 0x20) && scan == 9) // underline data = 0xff; if((m_attr_ram[(vy*128)+x] & 0xc0) == 0xc0 && scan == 3) // strikethrough data = 0xff; if(m_attr_ram[(vy*128)+x] & 0x04) // reverse data = ~data; if(m_attr_ram[(vy*128)+x] & 0x10) // double-size { uint8_t newdata = 0; if(dbl_mode & 1) { newdata = (data & 0x80) | ((data & 0x80) >> 1) | ((data & 0x40) >> 1) | ((data & 0x40) >> 2) | ((data & 0x20) >> 2) | ((data & 0x20) >> 3) | ((data & 0x10) >> 3) | ((data & 0x10) >> 4); } else { newdata = ((data & 0x08) << 4) | ((data & 0x08) << 3) | ((data & 0x04) << 3) | ((data & 0x04) << 2) | ((data & 0x02) << 2) | ((data & 0x02) << 1) | ((data & 0x01) << 1) | (data & 0x01); } data = newdata; } for(bit=0;bit<8;bit++) // 8 pixels per character { uint16_t xpos = x*8+bit; uint16_t ypos = y*10+scan; if(BIT(data,7-bit)) bitmap.pix32(ypos,xpos) = fg; } } } } return 0; } READ8_MEMBER(attache_state::rom_r) { if(m_rom_active) return m_rom->base()[offset]; else return m_ram->pointer()[m_membank1->entry()*0x2000 + offset]; } WRITE8_MEMBER(attache_state::rom_w) { m_ram->pointer()[m_membank1->entry()*0x2000 + offset] = data; } uint16_t attache_state::get_key() { uint8_t row,bits,data; uint8_t res = 0; // scan input ports for(row=0;row<8;row++) { data = m_kb_rows[row]->read(); for(bits=0;bits<8;bits++) { if(BIT(data,bits)) { res = bits & 0x07; res |= ((row & 0x07) << 3); m_kb_empty = false; data = m_kb_mod->read(); if(~data & 0x01) res |= 0x80; // shift if(data & 0x02) res |= 0x40; // ctrl //logerror("KB: hit row %i, bit %i\n",row,bits); return res; } } } // no key pressed m_kb_empty = true; return res; } uint8_t attache_state::keyboard_data_r() { uint16_t key; if(m_kb_bitpos == 1) // start bit, if data is available { key = get_key(); if(m_kb_current_key != key) m_kb_current_key = key; else return 0x00; //logerror("KB: bit position %i, key %02x, empty %i\n",m_kb_bitpos,m_kb_current_key,m_kb_empty); if(m_kb_empty) return 0x00; else return 0x40; } else { //logerror("KB: bit position %i, key %02x, empty %i\n",m_kb_bitpos,m_kb_current_key,m_kb_empty); if(m_kb_current_key & (1<<(m_kb_bitpos-2))) return 0x00; else return 0x40; } } void attache_state::keyboard_clock_w(bool state) { if(!state && m_kb_clock) // high to low transition - advance bit position { m_kb_bitpos++; if(m_kb_bitpos > 9) m_kb_bitpos = 1; } m_kb_clock = state; } // TODO: Figure out exactly how the HLD, RD, WR and CS lines on the RTC are hooked up READ8_MEMBER(attache_state::pio_portA_r) { uint8_t ret = 0xff; uint8_t porta = m_pio_porta; switch(m_pio_select) { case PIO_SEL_8910_DATA: ret = m_psg->data_r(); logerror("PSG: data read %02x\n",ret); break; case PIO_SEL_5832_WRITE: m_rtc->cs_w(1); m_rtc->write_w(0); m_rtc->read_w(1); m_rtc->address_w((porta & 0xf0) >> 4); ret = m_rtc->data_r(); logerror("RTC: read %02x from %02x (write)\n",ret,(porta & 0xf0) >> 4); break; case PIO_SEL_5832_READ: m_rtc->cs_w(1); m_rtc->write_w(0); m_rtc->read_w(1); m_rtc->address_w((porta & 0xf0) >> 4); ret = m_rtc->data_r(); logerror("RTC: read %02x from %02x\n",ret,(porta & 0xf0) >> 4); break; case PIO_SEL_5101_WRITE: m_cmos_select = (m_cmos_select & 0xf0) | ((porta & 0xf0) >> 4); ret = m_cmos_ram[m_cmos_select] & 0x0f; logerror("CMOS: read %02x from byte %02x (write)\n",ret, m_cmos_select); break; case PIO_SEL_5101_READ: m_cmos_select = (m_cmos_select & 0xf0) | ((porta & 0xf0) >> 4); ret = m_cmos_ram[m_cmos_select] & 0x0f; logerror("CMOS: read %02x from byte %02x\n",ret, m_cmos_select); break; case PIO_SEL_LATCH: ret = 0x00; // Write-only? break; case PIO_SEL_NOP: logerror("PIO: NOP read\n"); break; } //logerror("PIO: Port A read operation %i returning %02x\n",m_pio_select,ret); return ret; } READ8_MEMBER(attache_state::pio_portB_r) { uint8_t ret = m_pio_portb & 0xbf; ret |= keyboard_data_r(); return ret; } void attache_state::operation_strobe(address_space& space, uint8_t data) { //logerror("PIO: Port A write operation %i, data %02x\n",m_pio_select,data); switch(m_pio_select) { case PIO_SEL_8910_ADDR: m_psg->address_w(data); break; case PIO_SEL_8910_DATA: m_psg->data_w(data); break; case PIO_SEL_5832_WRITE: m_rtc->cs_w(1); m_rtc->read_w(0); m_rtc->address_w((data & 0xf0) >> 4); m_rtc->data_w(data & 0x0f); m_rtc->write_w(1); logerror("RTC: write %01x to %01x\n",data & 0x0f,(data & 0xf0) >> 4); break; case PIO_SEL_5832_READ: m_rtc->cs_w(1); m_rtc->write_w(0); m_rtc->read_w(0); m_rtc->address_w((data & 0xf0) >> 4); logerror("RTC: write %01x to %01x (read)\n",data & 0x0f,(data & 0xf0) >> 4); break; case PIO_SEL_5101_WRITE: m_cmos_select = (m_cmos_select & 0xf0) | ((data & 0xf0) >> 4); m_cmos_ram[m_cmos_select] = data & 0x0f; logerror("CMOS: write %01x to byte %02x\n",data & 0x0f, m_cmos_select); break; case PIO_SEL_5101_READ: m_cmos_select = (m_cmos_select & 0xf0) | ((data & 0xf0) >> 4); logerror("CMOS: write %01x to byte %02x (read)\n",data & 0x0f, m_cmos_select); break; case PIO_SEL_LATCH: m_pio_latch = data; m_rom_active = ~data & 0x04; m_floppy0->mon_w((data & 0x01) ? 0 : 1); m_floppy1->mon_w((data & 0x01) ? 0 : 1); m_gfx_enabled = data & 0x02; // TODO: display brightness break; case PIO_SEL_NOP: logerror("PIO: NOP write\n"); break; default: logerror("PIO: Invalid write operation %i, data %02x\n",m_pio_select,data); } } WRITE8_MEMBER(attache_state::pio_portA_w) { // AO-7 = LATCH DATA OUT: // LO = MOTOR ON // L1 = GRAPHICS ENABLE // L2 = /EPROM ENABLE // L3-7 = DISPLAY BRIGHTNESS // AO-7 = 8910 DATA I/O: // AO-3 = 5832 DO-3 I/O // A4-7 = 5832 AO-3 OUT // AO-3 = 5101 DO-3 I/O // A4-7 = 5101 AO-3 OUT m_pio_porta = data; } WRITE8_MEMBER(attache_state::pio_portB_w) { // BO-1 = 5101 A4-5 // B2-4 = OPERATION SELECT // 0 = 8910 ADDR LOAD // 1 = 8910 DATA LOAD // 2 = 5832 WRITE -- the CP/M BIOS dumped from an actual disc seems to switch the RTC operations around // 3 = 5832 READ this differs from the BIOS source listings available for both CP/M 2.2.3 and 2.2.5 // 4 = 5101 WRITE // 5 = 5101 READ // 6 = LATCH LOAD // 7 = NO-OP //B5 = /'138 OPERATION STROBE //B6 = /KEYBOARD DATA IN //B7 = /KEYBOARD CLOCK OUT m_cmos_select = ((data & 0x03) << 4) | (m_cmos_select & 0x0f); if(!(data & 0x20) && (m_pio_portb & 0x20)) { m_pio_select = (data & 0x1c) >> 2; operation_strobe(space,m_pio_porta); } m_pio_portb = data; keyboard_clock_w(data & 0x80); } // Display uses A8-A15 placed on the bus by the OUT instruction as an extra parameter READ8_MEMBER(attache_state::display_data_r) { uint8_t ret = 0xff; uint8_t param = (offset & 0xff00) >> 8; switch(m_current_cmd) { case DISP_GFX_0: ret = m_gfx_ram[(m_gfx_line*128)+(param & 0x7f)]; break; case DISP_GFX_1: ret = m_gfx_ram[(m_gfx_line*128)+(param & 0x7f)+(128*32)]; break; case DISP_GFX_2: ret = m_gfx_ram[(m_gfx_line*128)+(param & 0x7f)+(128*32*2)]; break; case DISP_GFX_3: ret = m_gfx_ram[(m_gfx_line*128)+(param & 0x7f)+(128*32*3)]; break; case DISP_GFX_4: ret = m_gfx_ram[(m_gfx_line*128)+(param & 0x7f)+(128*32*4)]; break; case DISP_CRTC: ret = m_crtc->read(m_crtc_reg_select); break; case DISP_ATTR: ret = m_attr_ram[(m_attr_line*128)+(param & 0x7f)]; break; case DISP_CHAR: ret = m_char_ram[(m_char_line*128)+(param & 0x7f)]; break; default: logerror("Unimplemented display operation %02x\n",m_current_cmd); } return ret; } WRITE8_MEMBER(attache_state::display_data_w) { uint8_t param = (offset & 0xff00) >> 8; switch(m_current_cmd) { case DISP_GFX_0: m_gfx_ram[(m_gfx_line*128)+(param & 0x7f)] = data; break; case DISP_GFX_1: m_gfx_ram[(m_gfx_line*128)+(param & 0x7f)+(128*32)] = data; break; case DISP_GFX_2: m_gfx_ram[(m_gfx_line*128)+(param & 0x7f)+(128*32*2)] = data; break; case DISP_GFX_3: m_gfx_ram[(m_gfx_line*128)+(param & 0x7f)+(128*32*3)] = data; break; case DISP_GFX_4: m_gfx_ram[(m_gfx_line*128)+(param & 0x7f)+(128*32*4)] = data; break; case DISP_CRTC: m_crtc->write(m_crtc_reg_select, data); //logerror("CRTC: write reg %02x, data %02x\n",m_crtc_reg_select,data); break; case DISP_ATTR: m_attr_ram[(m_attr_line*128)+(param & 0x7f)] = data; break; case DISP_CHAR: m_char_ram[(m_char_line*128)+(param & 0x7f)] = data; break; // default: // logerror("Unimplemented display operation %02x data %02x param %02x\n",m_current_cmd,data,param); } } WRITE8_MEMBER(attache_state::display_command_w) { uint8_t cmd = (data & 0xe0) >> 5; m_current_cmd = cmd; switch(cmd) { case DISP_GFX_0: case DISP_GFX_1: case DISP_GFX_2: case DISP_GFX_3: case DISP_GFX_4: m_gfx_line = data & 0x1f; break; case DISP_CRTC: // CRT5027/TMS9927 registers m_crtc_reg_select = data & 0x0f; break; case DISP_ATTR: // Attribute RAM m_attr_line = data & 0x1f; break; case DISP_CHAR: // Character RAM m_char_line = data & 0x1f; break; } } READ8_MEMBER(attache_state::memmap_r) { return m_memmap; } WRITE8_MEMBER(attache_state::memmap_w) { // TODO: figure this out properly // Tech manual says that RAM is split into 8kB chunks. // Would seem that bit 4 is always 0 and bit 3 is always 1? uint8_t bank = (data & 0xe0) >> 5; uint8_t loc = data & 0x07; memory_bank* banknum[8] = { m_membank1, m_membank2, m_membank3, m_membank4, m_membank5, m_membank6, m_membank7, m_membank8 }; m_memmap = data; banknum[bank]->set_entry(loc); logerror("MEM: write %02x - bank %i, location %i\n",data, bank, loc); } READ8_MEMBER(attache_state::dma_mask_r) { return m_dma->read(0x0f); } WRITE8_MEMBER(attache_state::dma_mask_w) { m_dma->write(0x0f,data); } READ8_MEMBER(attache_state::fdc_dma_r) { uint8_t ret = m_fdc->dma_r(); return ret; } WRITE8_MEMBER(attache_state::fdc_dma_w) { m_fdc->dma_w(data); } READ8_MEMBER(attache_state::dma_mem_r) { return m_maincpu->space(AS_PROGRAM).read_byte(offset); } WRITE8_MEMBER(attache_state::dma_mem_w) { m_maincpu->space(AS_PROGRAM).write_byte(offset,data); } WRITE_LINE_MEMBER( attache_state::hreq_w ) { m_maincpu->set_input_line(INPUT_LINE_HALT, state ? ASSERT_LINE : CLEAR_LINE); m_dma->hack_w(state); } WRITE_LINE_MEMBER(attache_state::eop_w) { m_fdc->tc_w(state); } WRITE_LINE_MEMBER( attache_state::fdc_dack_w ) { } /* * Z80 <-> 8086 communication */ WRITE8_MEMBER(attache816_state::x86_comms_w) { m_comms_val = data; m_ppi->pc6_w(1); m_z80_rx_ready = false; } READ8_MEMBER(attache816_state::x86_comms_r) { m_z80_tx_ready = false; m_ppi->pc4_w(1); return m_comms_val; } // PPI Port B - IRQ enable // bit 0: i8255A PPI // bit 1: TMS9914A GPIB // bit 2: Z8530 SCC // bit 3: 8087 FPU // bit 4: enable WAIT logic // bit 5: enable high-resolution graphics WRITE8_MEMBER(attache816_state::x86_irq_enable) { m_x86_irq_enable = data; } WRITE8_MEMBER(attache816_state::x86_iobf_enable_w) { switch(offset) { case 0x00: m_ppi->pc6_w(0); break; case 0x01: m_ppi->pc6_w(1); break; case 0x04: m_ppi->pc4_w(0); break; case 0x05: m_ppi->pc4_w(1); break; default: logerror("Invalid x86 IRQ enable write offset %02x data %02x\n",offset,data); } } READ8_MEMBER(attache816_state::z80_comms_r) { m_z80_rx_ready = true; m_ppi->pc6_w(0); return m_comms_val; } WRITE8_MEMBER(attache816_state::z80_comms_w) { m_comms_val = data; m_z80_tx_ready = true; m_ppi->pc4_w(0); } // Z80 comms status // bit 0: set if no data is ready // bit 1: set if ready to accept data READ8_MEMBER(attache816_state::z80_comms_status_r) { uint8_t ret = 0xf0; // low nibble always high? if(m_z80_rx_ready) ret |= 0x01; if(m_z80_tx_ready) ret |= 0x02; return ret; } // Z80 comms controller // bit 0: Reset 8086 WRITE8_MEMBER(attache816_state::z80_comms_ctrl_w) { m_extcpu->set_input_line(INPUT_LINE_RESET,(data & 0x01) ? ASSERT_LINE : CLEAR_LINE); } WRITE_LINE_MEMBER(attache816_state::ppi_irq) { if(m_x86_irq_enable & 0x01) m_extcpu->set_input_line_and_vector(0,state,0x03); // I8086 } WRITE_LINE_MEMBER(attache816_state::x86_dsr) { // TODO: /DSR to Z8530 SCC } void attache_state::attache_map(address_map &map) { map(0x0000, 0x1fff).bankrw("bank1"); map(0x2000, 0x3fff).bankrw("bank2"); map(0x4000, 0x5fff).bankrw("bank3"); map(0x6000, 0x7fff).bankrw("bank4"); map(0x8000, 0x9fff).bankrw("bank5"); map(0xa000, 0xbfff).bankrw("bank6"); map(0xc000, 0xdfff).bankrw("bank7"); map(0xe000, 0xffff).bankrw("bank8"); } void attache_state::attache_io(address_map &map) { map(0xe0, 0xed).rw(m_dma, FUNC(am9517a_device::read), FUNC(am9517a_device::write)).mirror(0xff00); map(0xee, 0xee).w(FUNC(attache_state::display_command_w)).mirror(0xff00); map(0xef, 0xef).rw(FUNC(attache_state::dma_mask_r), FUNC(attache_state::dma_mask_w)).mirror(0xff00); map(0xf0, 0xf1).rw(m_sio, FUNC(z80sio_device::ba_cd_r), FUNC(z80sio_device::ba_cd_w)).mirror(0xff00); map(0xf4, 0xf7).rw(m_ctc, FUNC(z80ctc_device::read), FUNC(z80ctc_device::write)).mirror(0xff00); map(0xf8, 0xfb).rw(m_pio, FUNC(z80pio_device::read_alt), FUNC(z80pio_device::write_alt)).mirror(0xff00); map(0xfc, 0xfd).m(m_fdc, FUNC(upd765a_device::map)).mirror(0xff00); map(0xfe, 0xfe).rw(FUNC(attache_state::display_data_r), FUNC(attache_state::display_data_w)).select(0xff00); map(0xff, 0xff).rw(FUNC(attache_state::memmap_r), FUNC(attache_state::memmap_w)).mirror(0xff00); } void attache816_state::attache816_io(address_map &map) { map(0xb8, 0xb8).rw(FUNC(attache816_state::z80_comms_status_r), FUNC(attache816_state::z80_comms_ctrl_w)).mirror(0xff00); map(0xb9, 0xb9).rw(FUNC(attache816_state::z80_comms_r), FUNC(attache816_state::z80_comms_w)).mirror(0xff00); map(0xe0, 0xed).rw(m_dma, FUNC(am9517a_device::read), FUNC(am9517a_device::write)).mirror(0xff00); map(0xee, 0xee).w(FUNC(attache816_state::display_command_w)).mirror(0xff00); map(0xef, 0xef).rw(FUNC(attache816_state::dma_mask_r), FUNC(attache816_state::dma_mask_w)).mirror(0xff00); map(0xf0, 0xf1).rw(m_sio, FUNC(z80sio_device::ba_cd_r), FUNC(z80sio_device::ba_cd_w)).mirror(0xff00); map(0xf4, 0xf7).rw(m_ctc, FUNC(z80ctc_device::read), FUNC(z80ctc_device::write)).mirror(0xff00); map(0xf8, 0xfb).rw(m_pio, FUNC(z80pio_device::read_alt), FUNC(z80pio_device::write_alt)).mirror(0xff00); map(0xfc, 0xfd).m(m_fdc, FUNC(upd765a_device::map)).mirror(0xff00); map(0xfe, 0xfe).rw(FUNC(attache816_state::display_data_r), FUNC(attache816_state::display_data_w)).select(0xff00); map(0xff, 0xff).rw(FUNC(attache816_state::memmap_r), FUNC(attache816_state::memmap_w)).mirror(0xff00); } void attache816_state::attache_x86_map(address_map &map) { map(0x00000, 0x3ffff).ram(); map(0xb0000, 0xbffff).noprw(); // triggers IRQ? map(0xfe000, 0xfffff).rom().region("x86bios", 0x0000); } void attache816_state::attache_x86_io(address_map &map) { map(0x100, 0x107).rw(m_ppi, FUNC(i8255_device::read), FUNC(i8255_device::write)).umask16(0x00ff); map(0x108, 0x10d).w(FUNC(attache816_state::x86_iobf_enable_w)); // 0x140/2/4/6 - Z8530 SCC serial // 0x180/2/4/6/8/a/c/e - GPIB (TMS9914A) } static INPUT_PORTS_START(attache) PORT_START("row0") PORT_BIT(0x01,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("BS") PORT_CODE(KEYCODE_BACKSPACE) PORT_CHAR(8) PORT_BIT(0x02,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("TAB") PORT_CODE(KEYCODE_TAB) PORT_CHAR(9) PORT_BIT(0x04,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("LF") PORT_CODE(KEYCODE_PGDN) PORT_BIT(0x18,IP_ACTIVE_HIGH,IPT_UNUSED) PORT_BIT(0x20,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("Return") PORT_CODE(KEYCODE_ENTER) PORT_CHAR(27) PORT_BIT(0x40,IP_ACTIVE_HIGH,IPT_UNUSED) PORT_BIT(0x80,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("LOCK") PORT_CODE(KEYCODE_PGUP) PORT_START("row1") PORT_BIT(0x01,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("Space") PORT_CODE(KEYCODE_SPACE) PORT_CHAR(' ') PORT_BIT(0x06,IP_ACTIVE_HIGH,IPT_UNUSED) PORT_BIT(0x08,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("ESC") PORT_CODE(KEYCODE_ESC) PORT_CHAR(27) PORT_BIT(0x10,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("Left") PORT_CODE(KEYCODE_LEFT) PORT_BIT(0x20,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("Right") PORT_CODE(KEYCODE_RIGHT) PORT_BIT(0x40,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("Up") PORT_CODE(KEYCODE_UP) PORT_BIT(0x80,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("Down") PORT_CODE(KEYCODE_DOWN) PORT_START("row2") PORT_BIT(0x01,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("0 ^") PORT_CODE(KEYCODE_0) PORT_CHAR('0') PORT_BIT(0x02,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("1 !") PORT_CODE(KEYCODE_1) PORT_CHAR('1') PORT_BIT(0x04,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("2 @") PORT_CODE(KEYCODE_2) PORT_CHAR('2') PORT_BIT(0x08,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("3 #") PORT_CODE(KEYCODE_3) PORT_CHAR('3') PORT_BIT(0x10,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("4 $") PORT_CODE(KEYCODE_4) PORT_CHAR('4') PORT_BIT(0x20,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("5 %") PORT_CODE(KEYCODE_5) PORT_CHAR('5') PORT_BIT(0x40,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("6 &") PORT_CODE(KEYCODE_6) PORT_CHAR('6') PORT_BIT(0x80,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("7 *") PORT_CODE(KEYCODE_7) PORT_CHAR('7') PORT_START("row3") PORT_BIT(0x01,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("8 (") PORT_CODE(KEYCODE_8) PORT_CHAR('8') PORT_BIT(0x02,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("9 )") PORT_CODE(KEYCODE_9) PORT_CHAR('9') PORT_BIT(0x04,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("' \"") PORT_CODE(KEYCODE_QUOTE) PORT_CHAR('\'') PORT_BIT(0x08,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("; :") PORT_CODE(KEYCODE_COLON) PORT_CHAR(';') PORT_BIT(0x10,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME(", <") PORT_CODE(KEYCODE_COMMA) PORT_CHAR(',') PORT_BIT(0x20,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("= +") PORT_CODE(KEYCODE_EQUALS) PORT_CHAR('=') PORT_BIT(0x40,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME(". >") PORT_CODE(KEYCODE_STOP) PORT_CHAR('.') PORT_BIT(0x80,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("/ ?") PORT_CODE(KEYCODE_SLASH) PORT_CHAR('/') PORT_START("row4") PORT_BIT(0x01,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("` ~") PORT_CODE(KEYCODE_TILDE) PORT_CHAR('`') PORT_BIT(0x02,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("A") PORT_CODE(KEYCODE_A) PORT_CHAR('A') PORT_BIT(0x04,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("B") PORT_CODE(KEYCODE_B) PORT_CHAR('B') PORT_BIT(0x08,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("C") PORT_CODE(KEYCODE_C) PORT_CHAR('C') PORT_BIT(0x10,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("D") PORT_CODE(KEYCODE_D) PORT_CHAR('D') PORT_BIT(0x20,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("E") PORT_CODE(KEYCODE_E) PORT_CHAR('E') PORT_BIT(0x40,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("F") PORT_CODE(KEYCODE_F) PORT_CHAR('F') PORT_BIT(0x80,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("G") PORT_CODE(KEYCODE_G) PORT_CHAR('G') PORT_START("row5") PORT_BIT(0x01,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("H") PORT_CODE(KEYCODE_H) PORT_CHAR('H') PORT_BIT(0x02,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("I") PORT_CODE(KEYCODE_I) PORT_CHAR('I') PORT_BIT(0x04,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("J") PORT_CODE(KEYCODE_J) PORT_CHAR('J') PORT_BIT(0x08,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("K") PORT_CODE(KEYCODE_K) PORT_CHAR('K') PORT_BIT(0x10,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("L") PORT_CODE(KEYCODE_L) PORT_CHAR('L') PORT_BIT(0x20,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("M") PORT_CODE(KEYCODE_M) PORT_CHAR('M') PORT_BIT(0x40,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("N") PORT_CODE(KEYCODE_N) PORT_CHAR('N') PORT_BIT(0x80,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("O") PORT_CODE(KEYCODE_O) PORT_CHAR('O') PORT_START("row6") PORT_BIT(0x01,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("P") PORT_CODE(KEYCODE_P) PORT_CHAR('P') PORT_BIT(0x02,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("Q") PORT_CODE(KEYCODE_Q) PORT_CHAR('Q') PORT_BIT(0x04,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("R") PORT_CODE(KEYCODE_R) PORT_CHAR('R') PORT_BIT(0x08,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("S") PORT_CODE(KEYCODE_S) PORT_CHAR('S') PORT_BIT(0x10,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("T") PORT_CODE(KEYCODE_T) PORT_CHAR('T') PORT_BIT(0x20,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("U") PORT_CODE(KEYCODE_U) PORT_CHAR('U') PORT_BIT(0x40,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("V") PORT_CODE(KEYCODE_V) PORT_CHAR('V') PORT_BIT(0x80,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("W") PORT_CODE(KEYCODE_W) PORT_CHAR('W') PORT_START("row7") PORT_BIT(0x01,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("X") PORT_CODE(KEYCODE_X) PORT_CHAR('X') PORT_BIT(0x02,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("Y") PORT_CODE(KEYCODE_Y) PORT_CHAR('Y') PORT_BIT(0x04,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("Z") PORT_CODE(KEYCODE_Z) PORT_CHAR('Z') PORT_BIT(0x08,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("[ {") PORT_CODE(KEYCODE_OPENBRACE) PORT_CHAR('[') PORT_BIT(0x10,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("\\ |") PORT_CODE(KEYCODE_BACKSLASH) PORT_CHAR('\\') PORT_BIT(0x20,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("] }") PORT_CODE(KEYCODE_CLOSEBRACE) PORT_CHAR(']') PORT_BIT(0x40,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("- _") PORT_CODE(KEYCODE_MINUS) PORT_CHAR('-') PORT_BIT(0x80,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("DEL") PORT_CODE(KEYCODE_DEL) PORT_START("modifiers") PORT_BIT(0x01,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("Shift") PORT_CODE(KEYCODE_LSHIFT) PORT_BIT(0x02,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("Ctrl") PORT_CODE(KEYCODE_LCONTROL) INPUT_PORTS_END // IRQ daisy chain = CTC -> SIO -> Expansion static const z80_daisy_config attache_daisy_chain[] = { { "ctc" }, { "sio" }, // expansion { nullptr } }; static void attache_floppies(device_slot_interface &device) { device.option_add("525dd", FLOPPY_525_DD); } void attache_state::driver_start() { uint8_t *RAM = m_ram->pointer(); m_membank1->configure_entries(0, 8, &RAM[0x0000], 0x2000); m_membank2->configure_entries(0, 8, &RAM[0x0000], 0x2000); m_membank3->configure_entries(0, 8, &RAM[0x0000], 0x2000); m_membank4->configure_entries(0, 8, &RAM[0x0000], 0x2000); m_membank5->configure_entries(0, 8, &RAM[0x0000], 0x2000); m_membank6->configure_entries(0, 8, &RAM[0x0000], 0x2000); m_membank7->configure_entries(0, 8, &RAM[0x0000], 0x2000); m_membank8->configure_entries(0, 8, &RAM[0x0000], 0x2000); m_membank1->set_entry(0); m_membank2->set_entry(1); m_membank3->set_entry(2); m_membank4->set_entry(3); m_membank5->set_entry(4); m_membank6->set_entry(5); m_membank7->set_entry(6); m_membank8->set_entry(7); memset(RAM,0,65536); m_nvram->set_base(m_cmos_ram,64); m_maincpu->space(AS_PROGRAM).install_readwrite_handler(0x0000,0x0fff, read8_delegate(*this, FUNC(attache_state::rom_r)), write8_delegate(*this, FUNC(attache_state::rom_w))); save_pointer(m_char_ram,"Character RAM",128*32); save_pointer(m_attr_ram,"Attribute RAM",128*32); save_pointer(m_gfx_ram,"Graphics RAM",128*32*5); save_pointer(m_cmos_ram,"CMOS RAM",64); } void attache_state::machine_start() { // initialise RAM memset(m_cmos_ram,0,64); memset(m_attr_ram,0,128*32); memset(m_char_ram,0,128*32); memset(m_gfx_ram,0,128*32*5); } void attache_state::machine_reset() { m_kb_bitpos = 0; } void attache816_state::machine_reset() { attache_state::machine_reset(); } void attache_state::attache(machine_config &config) { Z80(config, m_maincpu, 8_MHz_XTAL / 2); m_maincpu->set_addrmap(AS_PROGRAM, &attache_state::attache_map); m_maincpu->set_addrmap(AS_IO, &attache_state::attache_io); m_maincpu->set_daisy_config(attache_daisy_chain); config.set_maximum_quantum(attotime::from_hz(60)); screen_device &screen(SCREEN(config, "screen", SCREEN_TYPE_RASTER, rgb_t::green())); screen.set_raw(12.324_MHz_XTAL, 784, 0, 640, 262, 0, 240); screen.set_screen_update(FUNC(attache_state::screen_update)); PALETTE(config, m_palette, palette_device::MONOCHROME_HIGHLIGHT); SPEAKER(config, "mono").front_center(); AY8912(config, m_psg, 8_MHz_XTAL / 4); m_psg->add_route(ALL_OUTPUTS, "mono", 0.25); MSM5832(config, m_rtc, 32.768_kHz_XTAL); Z80PIO(config, m_pio, 8_MHz_XTAL / 2); m_pio->in_pa_callback().set(FUNC(attache_state::pio_portA_r)); m_pio->out_pa_callback().set(FUNC(attache_state::pio_portA_w)); m_pio->in_pb_callback().set(FUNC(attache_state::pio_portB_r)); m_pio->out_pb_callback().set(FUNC(attache_state::pio_portB_w)); Z80SIO(config, m_sio, 8_MHz_XTAL / 2); m_sio->out_txda_callback().set("rs232a", FUNC(rs232_port_device::write_txd)); m_sio->out_rtsa_callback().set("rs232a", FUNC(rs232_port_device::write_rts)); m_sio->out_txdb_callback().set("rs232b", FUNC(rs232_port_device::write_txd)); m_sio->out_rtsb_callback().set("rs232b", FUNC(rs232_port_device::write_rts)); m_sio->out_int_callback().set_inputline(m_maincpu, INPUT_LINE_IRQ0); rs232_port_device &rs232a(RS232_PORT(config, "rs232a", default_rs232_devices, nullptr)); rs232a.rxd_handler().set(m_sio, FUNC(z80sio_device::rxa_w)); rs232a.cts_handler().set(m_sio, FUNC(z80sio_device::ctsa_w)); rs232_port_device &rs232b(RS232_PORT(config, "rs232b", default_rs232_devices, nullptr)); rs232b.rxd_handler().set(m_sio, FUNC(z80sio_device::rxb_w)); rs232b.cts_handler().set(m_sio, FUNC(z80sio_device::ctsb_w)); Z80CTC(config, m_ctc, 8_MHz_XTAL / 2); m_ctc->set_clk<0>(8_MHz_XTAL / 26); // 307.692 KHz m_ctc->set_clk<1>(8_MHz_XTAL / 26); // 307.692 KHz m_ctc->zc_callback<0>().set(m_sio, FUNC(z80sio_device::rxca_w)); m_ctc->zc_callback<0>().append(m_sio, FUNC(z80sio_device::txca_w)); m_ctc->zc_callback<1>().set(m_sio, FUNC(z80sio_device::rxtxcb_w)); m_ctc->intr_callback().set_inputline(m_maincpu, INPUT_LINE_IRQ0); AM9517A(config, m_dma, 8_MHz_XTAL / 4); m_dma->out_hreq_callback().set(FUNC(attache_state::hreq_w)); m_dma->out_eop_callback().set(FUNC(attache_state::eop_w)); m_dma->in_memr_callback().set(FUNC(attache_state::dma_mem_r)); m_dma->out_memw_callback().set(FUNC(attache_state::dma_mem_w)); m_dma->in_ior_callback<0>().set(FUNC(attache_state::fdc_dma_r)); m_dma->out_iow_callback<0>().set(FUNC(attache_state::fdc_dma_w)); // m_dma->out_dack_callback<0>().set(FUNC(attache_state::fdc_dack_w)); UPD765A(config, m_fdc, 8_MHz_XTAL, true, true); m_fdc->intrq_wr_callback().set(m_ctc, FUNC(z80ctc_device::trg3)); m_fdc->drq_wr_callback().set(m_dma, FUNC(am9517a_device::dreq0_w)).invert(); FLOPPY_CONNECTOR(config, "fdc:0", attache_floppies, "525dd", floppy_image_device::default_floppy_formats); FLOPPY_CONNECTOR(config, "fdc:1", attache_floppies, "525dd", floppy_image_device::default_floppy_formats); TMS9927(config, m_crtc, 12.324_MHz_XTAL / 8); m_crtc->set_char_width(8); m_crtc->vsyn_callback().set(m_ctc, FUNC(z80ctc_device::trg2)); m_crtc->set_screen("screen"); NVRAM(config, "nvram", nvram_device::DEFAULT_ALL_0); RAM(config, RAM_TAG).set_default_size("64K"); SOFTWARE_LIST(config, "disk_list").set_original("attache"); } void attache816_state::attache816(machine_config &config) { Z80(config, m_maincpu, 8_MHz_XTAL / 2); m_maincpu->set_addrmap(AS_PROGRAM, &attache816_state::attache_map); m_maincpu->set_addrmap(AS_IO, &attache816_state::attache_io); m_maincpu->set_daisy_config(attache_daisy_chain); config.set_maximum_quantum(attotime::from_hz(60)); I8086(config, m_extcpu, 24_MHz_XTAL / 3); m_extcpu->set_addrmap(AS_PROGRAM, &attache816_state::attache_x86_map); m_extcpu->set_addrmap(AS_IO, &attache816_state::attache_x86_io); config.set_perfect_quantum(m_extcpu); screen_device &screen(SCREEN(config, "screen", SCREEN_TYPE_RASTER, rgb_t::green())); screen.set_raw(12.324_MHz_XTAL, 784, 0, 640, 262, 0, 240); screen.set_screen_update(FUNC(attache_state::screen_update)); PALETTE(config, m_palette, palette_device::MONOCHROME_HIGHLIGHT); SPEAKER(config, "mono").front_center(); AY8912(config, m_psg, 8_MHz_XTAL / 4); m_psg->add_route(ALL_OUTPUTS, "mono", 0.25); MSM5832(config, m_rtc, 32.768_kHz_XTAL); Z80PIO(config, m_pio, 8_MHz_XTAL / 2); m_pio->in_pa_callback().set(FUNC(attache_state::pio_portA_r)); m_pio->out_pa_callback().set(FUNC(attache_state::pio_portA_w)); m_pio->in_pb_callback().set(FUNC(attache_state::pio_portB_r)); m_pio->out_pb_callback().set(FUNC(attache_state::pio_portB_w)); Z80SIO(config, m_sio, 8_MHz_XTAL / 2); m_sio->out_txda_callback().set("rs232a", FUNC(rs232_port_device::write_txd)); m_sio->out_rtsa_callback().set("rs232a", FUNC(rs232_port_device::write_rts)); m_sio->out_txdb_callback().set("rs232b", FUNC(rs232_port_device::write_txd)); m_sio->out_rtsb_callback().set("rs232b", FUNC(rs232_port_device::write_rts)); m_sio->out_int_callback().set_inputline(m_maincpu, INPUT_LINE_IRQ0); rs232_port_device &rs232a(RS232_PORT(config, "rs232a", default_rs232_devices, nullptr)); rs232a.rxd_handler().set(m_sio, FUNC(z80sio_device::rxa_w)); rs232a.cts_handler().set(m_sio, FUNC(z80sio_device::ctsa_w)); rs232_port_device &rs232b(RS232_PORT(config, "rs232b", default_rs232_devices, nullptr)); rs232b.rxd_handler().set(m_sio, FUNC(z80sio_device::rxb_w)); rs232b.cts_handler().set(m_sio, FUNC(z80sio_device::ctsb_w)); Z80CTC(config, m_ctc, 8_MHz_XTAL / 2); m_ctc->set_clk<0>(8_MHz_XTAL / 26); // 307.692 KHz m_ctc->set_clk<1>(8_MHz_XTAL / 26); // 307.692 KHz m_ctc->zc_callback<0>().set(m_sio, FUNC(z80sio_device::rxca_w)); m_ctc->zc_callback<0>().append(m_sio, FUNC(z80sio_device::txca_w)); m_ctc->zc_callback<1>().set(m_sio, FUNC(z80sio_device::rxtxcb_w)); m_ctc->intr_callback().set_inputline(m_maincpu, INPUT_LINE_IRQ0); I8255A(config, m_ppi, 0); m_ppi->out_pa_callback().set(FUNC(attache816_state::x86_comms_w)); m_ppi->in_pa_callback().set(FUNC(attache816_state::x86_comms_r)); m_ppi->out_pb_callback().set(FUNC(attache816_state::x86_irq_enable)); m_ppi->out_pc_callback().set(FUNC(attache816_state::x86_dsr)).bit(0); m_ppi->out_pc_callback().append(FUNC(attache816_state::ppi_irq)).bit(7).invert(); AM9517A(config, m_dma, 8_MHz_XTAL / 4); m_dma->out_hreq_callback().set(FUNC(attache_state::hreq_w)); m_dma->out_eop_callback().set(FUNC(attache_state::eop_w)); m_dma->in_memr_callback().set(FUNC(attache_state::dma_mem_r)); m_dma->out_memw_callback().set(FUNC(attache_state::dma_mem_w)); m_dma->in_ior_callback<0>().set(FUNC(attache_state::fdc_dma_r)); m_dma->out_iow_callback<0>().set(FUNC(attache_state::fdc_dma_w)); // m_dma->out_dack_callback<0>().set(FUNC(attache_state::fdc_dack_w)); UPD765A(config, m_fdc, 8_MHz_XTAL, true, true); m_fdc->intrq_wr_callback().set(m_ctc, FUNC(z80ctc_device::trg3)); m_fdc->drq_wr_callback().set(m_dma, FUNC(am9517a_device::dreq0_w)).invert(); FLOPPY_CONNECTOR(config, "fdc:0", attache_floppies, "525dd", floppy_image_device::default_floppy_formats); FLOPPY_CONNECTOR(config, "fdc:1", attache_floppies, "525dd", floppy_image_device::default_floppy_formats); TMS9927(config, m_crtc, 12.324_MHz_XTAL / 8); m_crtc->set_char_width(8); m_crtc->vsyn_callback().set(m_ctc, FUNC(z80ctc_device::trg2)); m_crtc->set_screen("screen"); NVRAM(config, "nvram", nvram_device::DEFAULT_ALL_0); RAM(config, RAM_TAG).set_default_size("64K"); SOFTWARE_LIST(config, "disk_list").set_original("attache"); } ROM_START( attache ) ROM_REGION(0x10000, "maincpu", 0) ROM_FILL(0x0000,0x10000,0x00) ROM_REGION(0x1000, "boot", 0) ROM_SYSTEM_BIOS(0, "u252revh", "Boot Rev.H") ROMX_LOAD("u252revh.bin", 0x0000, 0x1000, CRC(a06f0bdf) SHA1(d526cf23bfe0f8f9bcde812cd864a2a4cbc8b673), ROM_BIOS(0)) ROM_SYSTEM_BIOS(1, "u252revg", "Boot Rev.G") ROMX_LOAD("u252revg.bin", 0x0000, 0x1000, CRC(113136b7) SHA1(845afd9ed2fd2b28c39921d8f2ba99e5295e0330), ROM_BIOS(1)) ROM_SYSTEM_BIOS(2, "u252revf", "Boot Rev.F") ROMX_LOAD("u252revf.bin", 0x0000, 0x1000, CRC(b49eb3b2) SHA1(5b1b348301b2f76b1f250ba68bb8733fc15d18c2), ROM_BIOS(2)) ROM_REGION(0x1000, "video", 0) ROM_LOAD("u416vid.bin", 0x0000, 0x1000, CRC(e376ec59) SHA1(7b9e9db575e77ce2f479eb9ae913528e4f0d125d) ) ROM_REGION(0x100, "attr", 0) ROM_LOAD("u413.bin", 0x0000, 0x0100, CRC(5b60e622) SHA1(43450c747db1394466eabe5c26a61bf75a4f3b52) ) ROM_REGION(0x200, "iosel", 0) ROM_LOAD("u110.bin", 0x0000, 0x0200, CRC(70dd255a) SHA1(36dcce07a2c14eefc069433459c422341bd47efb) ) ROM_REGION(0x100, "floppy", 0) ROM_LOAD("u630.bin", 0x0000, 0x0100, CRC(f7a5c821) SHA1(fea07d9ac7e4e5f4f72aa7b2159deaedbd662ead) ) ROM_END ROM_START( attache816 ) ROM_REGION(0x10000, "maincpu", 0) ROM_FILL(0x0000,0x10000,0x00) ROM_REGION(0x1000, "boot", 0) ROM_SYSTEM_BIOS(0, "u252revh", "Boot Rev.H") ROMX_LOAD("u252revh.bin", 0x0000, 0x1000, CRC(a06f0bdf) SHA1(d526cf23bfe0f8f9bcde812cd864a2a4cbc8b673), ROM_BIOS(0)) ROM_SYSTEM_BIOS(1, "u252revg", "Boot Rev.G") ROMX_LOAD("u252revg.bin", 0x0000, 0x1000, CRC(113136b7) SHA1(845afd9ed2fd2b28c39921d8f2ba99e5295e0330), ROM_BIOS(1)) ROM_SYSTEM_BIOS(2, "u252revf", "Boot Rev.F") ROMX_LOAD("u252revf.bin", 0x0000, 0x1000, CRC(b49eb3b2) SHA1(5b1b348301b2f76b1f250ba68bb8733fc15d18c2), ROM_BIOS(2)) ROM_REGION(0x2000, "video", 0) ROM_LOAD("u416vid2.bin", 0x0000, 0x2000, CRC(0bdaed8d) SHA1(eee1e8505906e7c3587ecdf9dd9227a2a3b3cdd4) ) ROM_REGION(0x100, "attr", 0) ROM_LOAD("u413.bin", 0x0000, 0x0100, CRC(5b60e622) SHA1(43450c747db1394466eabe5c26a61bf75a4f3b52) ) ROM_REGION(0x200, "iosel", 0) ROM_LOAD("u110.bin", 0x0000, 0x0200, CRC(70dd255a) SHA1(36dcce07a2c14eefc069433459c422341bd47efb) ) ROM_REGION(0x100, "floppy", 0) ROM_LOAD("u630.bin", 0x0000, 0x0100, CRC(f7a5c821) SHA1(fea07d9ac7e4e5f4f72aa7b2159deaedbd662ead) ) // chip locations based on schematics ROM_REGION16_LE(0x2000, "x86bios", 0) ROM_LOAD16_BYTE("u4.bin", 0x0000, 0x1000, CRC(658c8f93) SHA1(ce4b388af5b73884194f548afa706964305462f7) ) ROM_LOAD16_BYTE("u9.bin", 0x0001, 0x1000, CRC(cc4cd938) SHA1(6a1d316628641f9b4de5c8c46f9430ef5bd6120f) ) ROM_END // YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS COMP( 1982, attache, 0, 0, attache, attache, attache_state, empty_init, "Otrona", "Attach\xC3\xA9", MACHINE_IMPERFECT_GRAPHICS ) COMP( 1983, attache816, attache, 0, attache816, attache, attache816_state, empty_init, "Otrona", "Attach\xC3\xA9 8:16", MACHINE_IMPERFECT_GRAPHICS )