diff options
Diffstat (limited to 'src/mess/video/nubus_m2hires.c')
-rw-r--r-- | src/mess/video/nubus_m2hires.c | 320 |
1 files changed, 320 insertions, 0 deletions
diff --git a/src/mess/video/nubus_m2hires.c b/src/mess/video/nubus_m2hires.c new file mode 100644 index 00000000000..09c2a3d3282 --- /dev/null +++ b/src/mess/video/nubus_m2hires.c @@ -0,0 +1,320 @@ +/*************************************************************************** + + Apple Hi-Resolution Video Card emulation + + RAMDAC: control at Fs0940e0, data at Fs0940e4 + Fs090010 bit 16 is vbl status, bit 17 must be "1" for proper operation + Fs08000x are the control registers + +***************************************************************************/ + +#include "emu.h" +#include "video/nubus_m2hires.h" + +#define M2HIRES_SCREEN_NAME "m2hires_screen" +#define M2HIRES_ROM_REGION "m2hires_rom" + +#define VRAM_SIZE (0x80000) // 512k max + +static SCREEN_UPDATE_RGB32( m2hires ); + +MACHINE_CONFIG_FRAGMENT( m2hires ) + MCFG_SCREEN_ADD( M2HIRES_SCREEN_NAME, RASTER) + MCFG_SCREEN_UPDATE_STATIC(m2hires) + MCFG_SCREEN_RAW_PARAMS(25175000, 800, 0, 640, 525, 0, 480) + MCFG_SCREEN_SIZE(1024,768) + MCFG_SCREEN_VISIBLE_AREA(0, 640-1, 0, 480-1) +MACHINE_CONFIG_END + +ROM_START( m2hires ) + ROM_REGION(0x2000, M2HIRES_ROM_REGION, 0) + ROM_LOAD( "341-0660.bin", 0x0000, 0x2000, CRC(ea6f7913) SHA1(37c59f38ae34021d0cb86c2e76a598b7e6077c0d) ) +ROM_END + +//************************************************************************** +// GLOBAL VARIABLES +//************************************************************************** + +const device_type NUBUS_M2HIRES = &device_creator<nubus_m2hires_device>; + + +//------------------------------------------------- +// machine_config_additions - device-specific +// machine configurations +//------------------------------------------------- + +machine_config_constructor nubus_m2hires_device::device_mconfig_additions() const +{ + return MACHINE_CONFIG_NAME( m2hires ); +} + +//------------------------------------------------- +// rom_region - device-specific ROM region +//------------------------------------------------- + +const rom_entry *nubus_m2hires_device::device_rom_region() const +{ + return ROM_NAME( m2hires ); +} + +//************************************************************************** +// LIVE DEVICE +//************************************************************************** + +//------------------------------------------------- +// nubus_m2hires_device - constructor +//------------------------------------------------- + +nubus_m2hires_device::nubus_m2hires_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock) : + device_t(mconfig, NUBUS_M2HIRES, "Macintosh II Hi-Resolution video card", tag, owner, clock), + device_nubus_card_interface(mconfig, *this) +{ + m_shortname = "nb_m2hr"; +} + +nubus_m2hires_device::nubus_m2hires_device(const machine_config &mconfig, device_type type, const char *name, const char *tag, device_t *owner, UINT32 clock) : + device_t(mconfig, type, name, tag, owner, clock), + device_nubus_card_interface(mconfig, *this) +{ + m_shortname = "nb_m2hr"; +} + +//------------------------------------------------- +// device_start - device-specific startup +//------------------------------------------------- + +void nubus_m2hires_device::device_start() +{ + UINT32 slotspace; + + // set_nubus_device makes m_slot valid + set_nubus_device(); + install_declaration_rom(this, M2HIRES_ROM_REGION, true); + + slotspace = get_slotspace(); + +// printf("[m2hires %p] slotspace = %x\n", this, slotspace); + + m_vram = auto_alloc_array(machine(), UINT8, VRAM_SIZE); + m_vram32 = (UINT32 *)m_vram; + + m_nubus->install_device(slotspace, slotspace+VRAM_SIZE-1, read32_delegate(FUNC(nubus_m2hires_device::vram_r), this), write32_delegate(FUNC(nubus_m2hires_device::vram_w), this)); + m_nubus->install_device(slotspace+0x900000, slotspace+VRAM_SIZE-1+0x900000, read32_delegate(FUNC(nubus_m2hires_device::vram_r), this), write32_delegate(FUNC(nubus_m2hires_device::vram_w), this)); + m_nubus->install_device(slotspace+0x80000, slotspace+0xeffff, read32_delegate(FUNC(nubus_m2hires_device::m2hires_r), this), write32_delegate(FUNC(nubus_m2hires_device::m2hires_w), this)); + + m_timer = timer_alloc(0, NULL); + m_screen = NULL; // can we look this up now? +} + +//------------------------------------------------- +// device_reset - device-specific reset +//------------------------------------------------- + +void nubus_m2hires_device::device_reset() +{ + m_count = 0; + m_clutoffs = 0; + m_vbl_disable = 1; + m_mode = 0; + memset(m_vram, 0, VRAM_SIZE); + memset(m_palette, 0, sizeof(m_palette)); + + m_palette[0] = MAKE_RGB(255, 255, 255); + m_palette[0x80] = MAKE_RGB(0, 0, 0); +} + + +void nubus_m2hires_device::device_timer(emu_timer &timer, device_timer_id tid, int param, void *ptr) +{ + if (!m_vbl_disable) + { + raise_slot_irq(); + } + + m_timer->adjust(m_screen->time_until_pos(479, 0), 0); +} + +/*************************************************************************** + + Spectrum 24 PDQ section + +***************************************************************************/ + +static SCREEN_UPDATE_RGB32( m2hires ) +{ + UINT32 *scanline; + int x, y; + nubus_m2hires_device *card = downcast<nubus_m2hires_device *>(screen.owner()); + UINT8 pixels, *vram; + + // first time? kick off the VBL timer + if (!card->m_screen) + { + card->m_screen = &screen; + card->m_timer->adjust(card->m_screen->time_until_pos(479, 0), 0); + } + + vram = card->m_vram + 0x20; + + switch (card->m_mode) + { + case 0: // 1 bpp? + for (y = 0; y < 480; y++) + { + scanline = &bitmap.pix32(y); + for (x = 0; x < 640/8; x++) + { + pixels = vram[(y * 128) + (BYTE4_XOR_BE(x))]; + + *scanline++ = card->m_palette[((pixels>>7)&0x1)]; + *scanline++ = card->m_palette[((pixels>>6)&0x1)]; + *scanline++ = card->m_palette[((pixels>>5)&0x1)]; + *scanline++ = card->m_palette[((pixels>>4)&0x1)]; + *scanline++ = card->m_palette[((pixels>>3)&0x1)]; + *scanline++ = card->m_palette[((pixels>>2)&0x1)]; + *scanline++ = card->m_palette[((pixels>>1)&0x1)]; + *scanline++ = card->m_palette[(pixels&1)]; + } + } + break; + + case 1: // 2 bpp + for (y = 0; y < 480; y++) + { + scanline = &bitmap.pix32(y); + for (x = 0; x < 640/4; x++) + { + pixels = vram[(y * 256) + (BYTE4_XOR_BE(x))]; + + *scanline++ = card->m_palette[((pixels>>6)&3)]; + *scanline++ = card->m_palette[((pixels>>4)&3)]; + *scanline++ = card->m_palette[((pixels>>2)&3)]; + *scanline++ = card->m_palette[(pixels&3)]; + } + } + break; + + case 2: // 4 bpp + for (y = 0; y < 480; y++) + { + scanline = &bitmap.pix32(y); + + for (x = 0; x < 640/2; x++) + { + pixels = vram[(y * 512) + (BYTE4_XOR_BE(x))]; + + *scanline++ = card->m_palette[((pixels&0xf0)>>4)]; + *scanline++ = card->m_palette[(pixels&0xf)]; + } + } + break; + + case 3: // 8 bpp + for (y = 0; y < 480; y++) + { + scanline = &bitmap.pix32(y); + + for (x = 0; x < 640; x++) + { + pixels = vram[(y * 1024) + (BYTE4_XOR_BE(x))]; + *scanline++ = card->m_palette[pixels]; + } + } + break; + + default: + fatalerror("m2hires: unknown video mode %d", card->m_mode); + break; + + } + return 0; +} + +WRITE32_MEMBER( nubus_m2hires_device::m2hires_w ) +{ + data ^= 0xffffffff; + + switch (offset) + { + case 1: // mode + switch (data) + { + case 0x20000000: + m_mode = 0; + break; + + case 0x40000000: + m_mode = 1; + break; + + case 0x80000000: + m_mode = 2; + break; + + case 0x00010000: + m_mode = 3; + break; + } + break; + + case 0x5038: // DAC control +// printf("%08x to DAC control (PC=%x)\n", data, cpu_get_pc(&space.device())); + m_clutoffs = (data>>24)&0xff; + break; + + case 0x5039: // DAC data + m_colors[m_count++] = (data>>24) & 0xff; + + if (m_count == 3) + { +// printf("RAMDAC: color %d = %02x %02x %02x (PC=%x)\n", m_clutoffs, m_colors[0], m_colors[1], m_colors[2], cpu_get_pc(&space.device()) ); + m_palette[m_clutoffs] = MAKE_RGB(m_colors[0], m_colors[1], m_colors[2]); + m_clutoffs++; + if (m_clutoffs > 255) + { + m_clutoffs = 0; + } + m_count = 0; + } + break; + + case 0x8000: // enable and ack VBL + m_vbl_disable = 0; + lower_slot_irq(); + break; + + case 0x8001: // disable VBL + m_vbl_disable = 1; + break; + + default: +// printf("m2hires_w: %08x @ %x, mask %08x (PC=%x)\n", data, offset, mem_mask, cpu_get_pc(&space.device())); + break; + } +} + +READ32_MEMBER( nubus_m2hires_device::m2hires_r ) +{ + if (offset == 0x10010/4) + { + m_toggle ^= (1<<16); + return m_toggle | (1<<17); // bit 17 indicates a 4/8bpp capable ASIC apparently; the firmware won't enter those modes otherwise (although they show in the list) + } +/* else + { + printf("m2hires_r: @ %x, mask %08x (PC=%x)\n", offset, mem_mask, cpu_get_pc(&space.device())); + }*/ + + return 0; +} + +WRITE32_MEMBER( nubus_m2hires_device::vram_w ) +{ + data ^= 0xffffffff; + COMBINE_DATA(&m_vram32[offset]); +} + +READ32_MEMBER( nubus_m2hires_device::vram_r ) +{ + return m_vram32[offset] ^ 0xffffffff; +} |