summaryrefslogtreecommitdiffstatshomepage
path: root/src/mame/drivers/attache.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/mame/drivers/attache.cpp')
-rw-r--r--src/mame/drivers/attache.cpp1349
1 files changed, 0 insertions, 1349 deletions
diff --git a/src/mame/drivers/attache.cpp b/src/mame/drivers/attache.cpp
deleted file mode 100644
index c14aa80a668..00000000000
--- a/src/mame/drivers/attache.cpp
+++ /dev/null
@@ -1,1349 +0,0 @@
-// 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<z80_device> m_maincpu;
- required_memory_region m_rom;
- required_device<ram_device> m_ram;
- required_memory_region m_char_rom;
- required_device<msm5832_device> m_rtc;
- required_device<ay8912_device> m_psg;
- required_device<upd765a_device> m_fdc;
- required_device<z80sio_device> m_sio;
- required_device<z80pio_device> m_pio;
- required_device<z80ctc_device> m_ctc;
- required_device<tms9927_device> m_crtc;
- required_device<am9517a_device> m_dma;
- required_device<palette_device> m_palette;
- required_device<floppy_image_device> m_floppy0;
- required_device<floppy_image_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<nvram_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<cpu_device> m_extcpu;
- required_device<i8255_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(space, 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(space, 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 )