// license:BSD-3-Clause // copyright-holders:R. Belmont /*************************************************************************** Sigma Designs fixed-resolution monochrome video card 1664x1200 or 832x600 according to the ad, can't find the 1664 mode. VRAM at Fs000000, mirrored at Fs900000. Fs0BFFEC: write 0x04 to enable VBL, 0x01 to ack VBL ***************************************************************************/ #include "emu.h" #include "laserview.h" #include "screen.h" #include #define LASERVIEW_SCREEN_NAME "laserview_screen" #define LASERVIEW_ROM_REGION "laserview_rom" #define VRAM_SIZE (0x40000) ROM_START( laserview ) ROM_REGION(0x8000, LASERVIEW_ROM_REGION, 0) ROM_LOAD( "lva-m2-00020_v3.00.bin", 0x000000, 0x008000, CRC(569d1fb7) SHA1(fd505505226abb5fea7c10ed14e8841077ef1be6) ) ROM_END //************************************************************************** // GLOBAL VARIABLES //************************************************************************** DEFINE_DEVICE_TYPE(NUBUS_LASERVIEW, nubus_laserview_device, "nb_laserview", "Sigma Designs LaserView video card") //------------------------------------------------- // device_add_mconfig - add device configuration //------------------------------------------------- void nubus_laserview_device::device_add_mconfig(machine_config &config) { screen_device &screen(SCREEN(config, LASERVIEW_SCREEN_NAME, SCREEN_TYPE_RASTER)); screen.set_screen_update(FUNC(nubus_laserview_device::screen_update)); screen.set_size(832,600); screen.set_visarea(0, 832-1, 0, 600-1); screen.set_refresh_hz(70); } //------------------------------------------------- // rom_region - device-specific ROM region //------------------------------------------------- const tiny_rom_entry *nubus_laserview_device::device_rom_region() const { return ROM_NAME( laserview ); } //************************************************************************** // LIVE DEVICE //************************************************************************** //------------------------------------------------- // nubus_laserview_device - constructor //------------------------------------------------- nubus_laserview_device::nubus_laserview_device(const machine_config &mconfig, const char *tag, device_t *owner, const XTAL &clock) : nubus_laserview_device(mconfig, NUBUS_LASERVIEW, tag, owner, clock) { } nubus_laserview_device::nubus_laserview_device(const machine_config &mconfig, device_type type, const char *tag, device_t *owner, const XTAL &clock) : device_t(mconfig, type, tag, owner, clock), device_nubus_card_interface(mconfig, *this), m_vbl_disable(0) { } //------------------------------------------------- // device_start - device-specific startup //------------------------------------------------- void nubus_laserview_device::device_start() { uint32_t slotspace; install_declaration_rom(LASERVIEW_ROM_REGION, true); slotspace = get_slotspace(); // printf("[laserview %p] slotspace = %x\n", this, slotspace); m_vram.resize(VRAM_SIZE / sizeof(uint32_t)); install_bank(slotspace, slotspace+VRAM_SIZE-1, &m_vram[0]); install_bank(slotspace+0x900000, slotspace+0x900000+VRAM_SIZE-1, &m_vram[0]); nubus().install_device(slotspace+0xB0000, slotspace+0xBFFFF, read32s_delegate(*this, FUNC(nubus_laserview_device::regs_r)), write32s_delegate(*this, FUNC(nubus_laserview_device::regs_w))); } //------------------------------------------------- // device_reset - device-specific reset //------------------------------------------------- void nubus_laserview_device::device_reset() { m_vbl_disable = 1; m_prot_state = 0; m_toggle = 0; std::fill(m_vram.begin(), m_vram.end(), 0); m_palette[0] = rgb_t(255, 255, 255); m_palette[1] = rgb_t(0, 0, 0); } /*************************************************************************** Viking 1024x768 B&W card section ***************************************************************************/ uint32_t nubus_laserview_device::screen_update(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect) { if (!m_vbl_disable) { raise_slot_irq(); } auto const vram8 = util::big_endian_cast(&m_vram[0]); for (int y = 0; y < 600; y++) { uint32_t *scanline = &bitmap.pix(y); for (int x = 0; x < 832/8; x++) { uint8_t const pixels = vram8[(y * 104) + x + 0x20]; *scanline++ = m_palette[BIT(pixels, 7)]; *scanline++ = m_palette[BIT(pixels, 6)]; *scanline++ = m_palette[BIT(pixels, 5)]; *scanline++ = m_palette[BIT(pixels, 4)]; *scanline++ = m_palette[BIT(pixels, 3)]; *scanline++ = m_palette[BIT(pixels, 2)]; *scanline++ = m_palette[BIT(pixels, 1)]; *scanline++ = m_palette[BIT(pixels, 0)]; } } return 0; } void nubus_laserview_device::regs_w(offs_t offset, uint32_t data, uint32_t mem_mask) { // printf("%08x to regs @ %x mask %08x\n", data, offset, mem_mask); switch (offset) { case 0x3ffb: if ((data & 0xff) == 0x04) { m_vbl_disable = 0; } else if ((data & 0xff) == 01) { lower_slot_irq(); } else { m_vbl_disable = 1; lower_slot_irq(); } break; } } uint32_t nubus_laserview_device::regs_r(offs_t offset, uint32_t mem_mask) { //f (offset != 0x3fc1) printf("Read regs_r @ %x mask %08x\n", offset, mem_mask); switch (offset) { case 0x3fc1: m_toggle ^= 1; if (m_toggle) { return 0x01010101; } else { return 0; } machine().debug_break(); break; case 0x3fc2: if (m_prot_state == 0) { m_prot_state = 1; return 0; } return 0x02000000; case 0x3fff: m_prot_state = 0; return 0xfeffffff; } return 0xffffffff; }