diff options
Diffstat (limited to 'src/mame/drivers/smc777.c')
-rw-r--r-- | src/mame/drivers/smc777.c | 1027 |
1 files changed, 1027 insertions, 0 deletions
diff --git a/src/mame/drivers/smc777.c b/src/mame/drivers/smc777.c new file mode 100644 index 00000000000..db6e3ec6f14 --- /dev/null +++ b/src/mame/drivers/smc777.c @@ -0,0 +1,1027 @@ +// license:LGPL-2.1+ +// copyright-holders:Angelo Salese +/************************************************************************************* + + SMC-777 (c) 1983 Sony + + driver by Angelo Salese + + TODO: + - no real documentation, the entire driver is just a bunch of educated + guesses ... + - ROM/RAM bankswitch, it apparently happens after one instruction prefetching. + We currently use an hackish implementation until the MAME/MESS framework can + support that ... + - keyboard input is very sluggish; + - cursor stuck in Bird Crash; + - add mc6845 features; + - many other missing features; + +**************************************************************************************/ + +#include "emu.h" +#include "cpu/z80/z80.h" +#include "sound/sn76496.h" +#include "sound/beep.h" +#include "video/mc6845.h" +#include "machine/wd_fdc.h" +#include "imagedev/flopdrv.h" + +#define MASTER_CLOCK XTAL_4_028MHz + +#define mc6845_h_char_total (m_crtc_vreg[0]+1) +#define mc6845_h_display (m_crtc_vreg[1]) +#define mc6845_h_sync_pos (m_crtc_vreg[2]) +#define mc6845_sync_width (m_crtc_vreg[3]) +#define mc6845_v_char_total (m_crtc_vreg[4]+1) +#define mc6845_v_total_adj (m_crtc_vreg[5]) +#define mc6845_v_display (m_crtc_vreg[6]) +#define mc6845_v_sync_pos (m_crtc_vreg[7]) +#define mc6845_mode_ctrl (m_crtc_vreg[8]) +#define mc6845_tile_height (m_crtc_vreg[9]+1) +#define mc6845_cursor_y_start (m_crtc_vreg[0x0a]) +#define mc6845_cursor_y_end (m_crtc_vreg[0x0b]) +#define mc6845_start_addr (((m_crtc_vreg[0x0c]<<8) & 0x3f00) | (m_crtc_vreg[0x0d] & 0xff)) +#define mc6845_cursor_addr (((m_crtc_vreg[0x0e]<<8) & 0x3f00) | (m_crtc_vreg[0x0f] & 0xff)) +#define mc6845_light_pen_addr (((m_crtc_vreg[0x10]<<8) & 0x3f00) | (m_crtc_vreg[0x11] & 0xff)) +#define mc6845_update_addr (((m_crtc_vreg[0x12]<<8) & 0x3f00) | (m_crtc_vreg[0x13] & 0xff)) + +class smc777_state : public driver_device +{ +public: + smc777_state(const machine_config &mconfig, device_type type, const char *tag) + : driver_device(mconfig, type, tag), + m_maincpu(*this, "maincpu"), + m_crtc(*this, "crtc"), + m_fdc(*this, "fdc"), + m_floppy0(*this, "fdc:0"), + m_floppy1(*this, "fdc:1"), + m_beeper(*this, "beeper"), + m_gfxdecode(*this, "gfxdecode"), + m_palette(*this, "palette") + { } + + DECLARE_WRITE8_MEMBER(mc6845_w); + DECLARE_READ8_MEMBER(vram_r); + DECLARE_READ8_MEMBER(attr_r); + DECLARE_READ8_MEMBER(pcg_r); + DECLARE_WRITE8_MEMBER(vram_w); + DECLARE_WRITE8_MEMBER(attr_w); + DECLARE_WRITE8_MEMBER(pcg_w); + DECLARE_READ8_MEMBER(fbuf_r); + DECLARE_WRITE8_MEMBER(fbuf_w); + DECLARE_READ8_MEMBER(key_r); + DECLARE_WRITE8_MEMBER(key_w); + DECLARE_WRITE8_MEMBER(border_col_w); + DECLARE_READ8_MEMBER(system_input_r); + DECLARE_WRITE8_MEMBER(system_output_w); + DECLARE_WRITE8_MEMBER(color_mode_w); + DECLARE_WRITE8_MEMBER(ramdac_w); + DECLARE_READ8_MEMBER(display_reg_r); + DECLARE_WRITE8_MEMBER(display_reg_w); + DECLARE_READ8_MEMBER(smc777_mem_r); + DECLARE_WRITE8_MEMBER(smc777_mem_w); + DECLARE_READ8_MEMBER(irq_mask_r); + DECLARE_WRITE8_MEMBER(irq_mask_w); + DECLARE_PALETTE_INIT(smc777); + UINT32 screen_update_smc777(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect); + INTERRUPT_GEN_MEMBER(vblank_irq); + TIMER_DEVICE_CALLBACK_MEMBER(keyboard_callback); + + DECLARE_READ8_MEMBER(fdc_r); + DECLARE_WRITE8_MEMBER(fdc_w); + DECLARE_READ8_MEMBER(fdc_request_r); + DECLARE_WRITE8_MEMBER(floppy_select_w); + DECLARE_WRITE_LINE_MEMBER(fdc_intrq_w); + DECLARE_WRITE_LINE_MEMBER(fdc_drq_w); + +protected: + virtual void machine_start(); + virtual void machine_reset(); + virtual void video_start(); + +private: + required_device<cpu_device> m_maincpu; + required_device<mc6845_device> m_crtc; + required_device<mb8876_t> m_fdc; + required_device<floppy_connector> m_floppy0; + required_device<floppy_connector> m_floppy1; + required_device<beep_device> m_beeper; + required_device<gfxdecode_device> m_gfxdecode; + required_device<palette_device> m_palette; + + UINT8 *m_ipl_rom; + UINT8 *m_work_ram; + UINT8 *m_vram; + UINT8 *m_attr; + UINT8 *m_gvram; + UINT8 *m_pcg; + + UINT8 m_keyb_press; + UINT8 m_keyb_press_flag; + UINT8 m_shift_press_flag; + UINT8 m_backdrop_pen; + UINT8 m_display_reg; + UINT8 m_fdc_irq_flag; + UINT8 m_fdc_drq_flag; + UINT8 m_system_data; + struct { UINT8 r,g,b; } m_pal; + UINT8 m_raminh,m_raminh_pending_change; //bankswitch + UINT8 m_raminh_prefetch; + UINT8 m_irq_mask; + UINT8 m_pal_mode; + UINT8 m_keyb_cmd; + UINT8 m_crtc_vreg[0x20]; + UINT8 m_crtc_addr; +}; + + +/* TODO: correct calculation thru mc6845 regs */ +#define CRTC_MIN_X 24*8 +#define CRTC_MIN_Y 4*8 + +void smc777_state::video_start() +{ +} + +UINT32 smc777_state::screen_update_smc777(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect) +{ + int x,y,yi; + UINT16 count; + int x_width; + +// popmessage("%d %d %d %d",mc6845_v_char_total,mc6845_v_total_adj,mc6845_v_display,mc6845_v_sync_pos); + + bitmap.fill(m_palette->pen(m_backdrop_pen), cliprect); + + x_width = ((m_display_reg & 0x80) >> 7); + + count = 0x0000; + + for(yi=0;yi<8;yi++) + { + for(y=0;y<200;y+=8) + { + for(x=0;x<160;x++) + { + UINT16 color; + + color = (m_gvram[count] & 0xf0) >> 4; + /* todo: clean this up! */ + //if(x_width) + { + bitmap.pix16(y+yi+CRTC_MIN_Y, x*4+0+CRTC_MIN_X) = m_palette->pen(color); + bitmap.pix16(y+yi+CRTC_MIN_Y, x*4+1+CRTC_MIN_X) = m_palette->pen(color); + } + //else + //{ + // bitmap.pix16(y+yi+CRTC_MIN_Y, x*2+0+CRTC_MIN_X) = m_palette->pen(color); + //} + + color = (m_gvram[count] & 0x0f) >> 0; + //if(x_width) + { + bitmap.pix16(y+yi+CRTC_MIN_Y, x*4+2+CRTC_MIN_X) = m_palette->pen(color); + bitmap.pix16(y+yi+CRTC_MIN_Y, x*4+3+CRTC_MIN_X) = m_palette->pen(color); + } + //else + //{ + // bitmap.pix16(y+yi+CRTC_MIN_Y, x*2+1+CRTC_MIN_X) = m_palette->pen(color); + //} + + count++; + + } + } + count+= 0x60; + } + + count = 0x0000; + + for(y=0;y<25;y++) + { + for(x=0;x<80/(x_width+1);x++) + { + /* + -x-- ---- blink + --xx x--- bg color (00 transparent, 01 white, 10 black, 11 complementary to fg color + ---- -xxx fg color + */ + int tile = m_vram[count]; + int color = m_attr[count] & 7; + int bk_color = (m_attr[count] & 0x18) >> 3; + int blink = m_attr[count] & 0x40; + int xi; + int bk_pen; + //int bk_struct[4] = { -1, 0x10, 0x11, (color & 7) ^ 8 }; + + bk_pen = -1; + switch(bk_color & 3) + { + case 0: bk_pen = -1; break; //transparent + case 1: bk_pen = 0x17; break; //white + case 2: bk_pen = 0x10; break; //black + case 3: bk_pen = (color ^ 0xf); break; //complementary + } + + if(blink && machine().first_screen()->frame_number() & 0x10) //blinking, used by Dragon's Alphabet + color = bk_pen; + + for(yi=0;yi<8;yi++) + { + for(xi=0;xi<8;xi++) + { + int pen; + + pen = ((m_pcg[tile*8+yi]>>(7-xi)) & 1) ? (color+m_pal_mode) : bk_pen; + + if (pen != -1) + { + if(x_width) + { + bitmap.pix16(y*8+CRTC_MIN_Y+yi, (x*8+xi)*2+0+CRTC_MIN_X) = m_palette->pen(pen); + bitmap.pix16(y*8+CRTC_MIN_Y+yi, (x*8+xi)*2+1+CRTC_MIN_X) = m_palette->pen(pen); + } + else + bitmap.pix16(y*8+CRTC_MIN_Y+yi, x*8+CRTC_MIN_X+xi) = m_palette->pen(pen); + } + } + } + + // draw cursor + if(mc6845_cursor_addr == count) + { + int xc,yc,cursor_on; + + cursor_on = 0; + switch(mc6845_cursor_y_start & 0x60) + { + case 0x00: cursor_on = 1; break; //always on + case 0x20: cursor_on = 0; break; //always off + case 0x40: if(machine().first_screen()->frame_number() & 0x10) { cursor_on = 1; } break; //fast blink + case 0x60: if(machine().first_screen()->frame_number() & 0x20) { cursor_on = 1; } break; //slow blink + } + + if(cursor_on) + { + for(yc=0;yc<(8-(mc6845_cursor_y_start & 7));yc++) + { + for(xc=0;xc<8;xc++) + { + if(x_width) + { + bitmap.pix16(y*8+CRTC_MIN_Y-yc+7, (x*8+xc)*2+0+CRTC_MIN_X) = m_palette->pen(0x7); + bitmap.pix16(y*8+CRTC_MIN_Y-yc+7, (x*8+xc)*2+1+CRTC_MIN_X) = m_palette->pen(0x7); + } + else + bitmap.pix16(y*8+CRTC_MIN_Y-yc+7, x*8+CRTC_MIN_X+xc) = m_palette->pen(0x7); + } + } + } + } + + (m_display_reg & 0x80) ? count+=2 : count++; + } + } + + return 0; +} + +WRITE8_MEMBER(smc777_state::mc6845_w) +{ + if(offset == 0) + { + m_crtc_addr = data; + m_crtc->address_w(space, 0,data); + } + else + { + m_crtc_vreg[m_crtc_addr] = data; + m_crtc->register_w(space, 0,data); + } +} + +READ8_MEMBER(smc777_state::vram_r) +{ + UINT16 vram_index; + + vram_index = ((offset & 0x0007) << 8); + vram_index |= ((offset & 0xff00) >> 8); + + return m_vram[vram_index]; +} + +READ8_MEMBER(smc777_state::attr_r) +{ + UINT16 vram_index; + + vram_index = ((offset & 0x0007) << 8); + vram_index |= ((offset & 0xff00) >> 8); + + return m_attr[vram_index]; +} + +READ8_MEMBER(smc777_state::pcg_r) +{ + UINT16 vram_index; + + vram_index = ((offset & 0x0007) << 8); + vram_index |= ((offset & 0xff00) >> 8); + + return m_pcg[vram_index]; +} + +WRITE8_MEMBER(smc777_state::vram_w) +{ + UINT16 vram_index; + + vram_index = ((offset & 0x0007) << 8); + vram_index |= ((offset & 0xff00) >> 8); + + m_vram[vram_index] = data; +} + +WRITE8_MEMBER(smc777_state::attr_w) +{ + UINT16 vram_index; + + vram_index = ((offset & 0x0007) << 8); + vram_index |= ((offset & 0xff00) >> 8); + + m_attr[vram_index] = data; +} + +WRITE8_MEMBER(smc777_state::pcg_w) +{ + UINT16 vram_index; + + vram_index = ((offset & 0x0007) << 8); + vram_index |= ((offset & 0xff00) >> 8); + + m_pcg[vram_index] = data; + + m_gfxdecode->gfx(0)->mark_dirty(vram_index >> 3); +} + +READ8_MEMBER(smc777_state::fbuf_r) +{ + UINT16 vram_index; + + vram_index = ((offset & 0x007f) << 8); + vram_index |= ((offset & 0xff00) >> 8); + + return m_gvram[vram_index]; +} + +WRITE8_MEMBER(smc777_state::fbuf_w) +{ + UINT16 vram_index; + + vram_index = ((offset & 0x00ff) << 8); + vram_index |= ((offset & 0xff00) >> 8); + + m_gvram[vram_index] = data; +} + +READ8_MEMBER( smc777_state::fdc_r ) +{ + return m_fdc->read(space, offset) ^ 0xff; +} + +WRITE8_MEMBER( smc777_state::fdc_w ) +{ + m_fdc->write(space, offset, data ^ 0xff); +} + +READ8_MEMBER( smc777_state::fdc_request_r ) +{ + UINT8 data = 0; + + data |= !m_fdc_drq_flag << 6; + data |= m_fdc_irq_flag << 7; + + return data; +} + +WRITE8_MEMBER( smc777_state::floppy_select_w ) +{ + floppy_image_device *floppy = NULL; + + // ---- xxxx select floppy drive (yes, 15 of them, A to P) + switch (data & 0x01) + { + case 0: floppy = m_floppy0->get_device(); break; + case 1: floppy = m_floppy1->get_device(); break; + } + + m_fdc->set_floppy(floppy); + + // no idea where the motor on signal is + if (floppy) + floppy->mon_w(0); + + if(data & 0xf0) + printf("floppy access %02x\n", data); +} + +WRITE_LINE_MEMBER( smc777_state::fdc_intrq_w ) +{ + m_fdc_irq_flag = state; +} + +WRITE_LINE_MEMBER( smc777_state::fdc_drq_w ) +{ + m_fdc_drq_flag = state; +} + +READ8_MEMBER(smc777_state::key_r) +{ + /* + -x-- ---- shift key + ---- -x-- MCU data ready + ---- ---x handshake bit? + */ + + switch(m_keyb_cmd) + { + case 0x00: //poll keyboard input + { + if(offset == 0) + m_keyb_press_flag = 0; + + return (offset == 0) ? m_keyb_press : ((m_shift_press_flag << 6) | (m_keyb_press_flag << 2) | (m_keyb_press_flag)); + } + default: + { + //if(offset == 1) + // printf("Unknown keyboard command %02x read-back\n",m_keyb_cmd); + + return (offset == 0) ? 0x00 : (machine().rand() & 0x5); + } + } + + // never executed + //return 0x00; +} + +/* TODO: the packet commands strikes me as something I've already seen before, don't remember where however ... */ +WRITE8_MEMBER(smc777_state::key_w) +{ + if(offset == 1) //keyboard command + m_keyb_cmd = data; + else + { + // keyboard command param + } +} + +WRITE8_MEMBER(smc777_state::border_col_w) +{ + if(data & 0xf0) + printf("Special border color enabled %02x\n",data); + + m_backdrop_pen = data & 0xf; +} + + +READ8_MEMBER(smc777_state::system_input_r) +{ + printf("System FF R %02x\n",m_system_data & 0x0f); + + switch(m_system_data & 0x0f) + { + case 0x00: + return ((m_raminh & 1) << 4); //unknown bit, Dragon's Alphabet and Bird Crush relies on this for correct colors + } + + return m_system_data; +} + + + +WRITE8_MEMBER(smc777_state::system_output_w) +{ + /* + ---x 0000 ram inibit signal + ---x 1001 beep + all the rest is unknown at current time + */ + m_system_data = data; + switch(m_system_data & 0x0f) + { + case 0x00: + m_raminh_pending_change = ((data & 0x10) >> 4) ^ 1; + m_raminh_prefetch = (UINT8)(space.device().state().state_int(Z80_R)) & 0x7f; + break; + case 0x02: printf("Interlace %s\n",data & 0x10 ? "on" : "off"); break; + case 0x05: m_beeper->set_state(data & 0x10); break; + default: printf("System FF W %02x\n",data); break; + } +} + +WRITE8_MEMBER(smc777_state::color_mode_w) +{ + switch(data & 0x0f) + { + case 0x06: m_pal_mode = (data & 0x10) ^ 0x10; break; + default: printf("Color FF %02x\n",data); break; + } +} + +WRITE8_MEMBER(smc777_state::ramdac_w) +{ + UINT8 pal_index; + pal_index = (offset & 0xf00) >> 8; + + if(data & 0x0f) + printf("RAMdac used with data bits 0-3 set (%02x)\n",data); + + switch((offset & 0x3000) >> 12) + { + case 0: m_pal.r = (data & 0xf0) >> 4; m_palette->set_pen_color(pal_index, pal4bit(m_pal.r), pal4bit(m_pal.g), pal4bit(m_pal.b)); break; + case 1: m_pal.g = (data & 0xf0) >> 4; m_palette->set_pen_color(pal_index, pal4bit(m_pal.r), pal4bit(m_pal.g), pal4bit(m_pal.b)); break; + case 2: m_pal.b = (data & 0xf0) >> 4; m_palette->set_pen_color(pal_index, pal4bit(m_pal.r), pal4bit(m_pal.g), pal4bit(m_pal.b)); break; + case 3: printf("RAMdac used with gradient index = 3! pal_index = %02x data = %02x\n",pal_index,data); break; + } +} + +READ8_MEMBER(smc777_state::display_reg_r) +{ + return m_display_reg; +} + +/* x */ +WRITE8_MEMBER(smc777_state::display_reg_w) +{ + /* + x--- ---- width 80 / 40 switch (0 = 640 x 200 1 = 320 x 200) + ---- -x-- mode select? + */ + + m_display_reg = data; +} + +READ8_MEMBER(smc777_state::smc777_mem_r) +{ + UINT8 z80_r; + + if(m_raminh_prefetch != 0xff) //do the bankswitch AFTER that the prefetch instruction is executed (FIXME: this is an hackish implementation) + { + z80_r = (UINT8)space.device().state().state_int(Z80_R); + + if(z80_r == ((m_raminh_prefetch+2) & 0x7f)) + { + m_raminh = m_raminh_pending_change; + m_raminh_prefetch = 0xff; + } + } + + if(m_raminh == 1 && ((offset & 0xc000) == 0)) + return m_ipl_rom[offset]; + + return m_work_ram[offset]; +} + +WRITE8_MEMBER(smc777_state::smc777_mem_w) +{ + m_work_ram[offset] = data; +} + +READ8_MEMBER(smc777_state::irq_mask_r) +{ + return m_irq_mask; +} + +WRITE8_MEMBER(smc777_state::irq_mask_w) +{ + if(data & 0xfe) + printf("Irq mask = %02x\n",data & 0xfe); + + m_irq_mask = data & 1; +} + +static ADDRESS_MAP_START( smc777_mem, AS_PROGRAM, 8, smc777_state ) + ADDRESS_MAP_UNMAP_HIGH + AM_RANGE(0x0000, 0xffff) AM_READWRITE(smc777_mem_r, smc777_mem_w) +ADDRESS_MAP_END + +static ADDRESS_MAP_START( smc777_io, AS_IO, 8, smc777_state ) + ADDRESS_MAP_UNMAP_HIGH + AM_RANGE(0x00, 0x07) AM_MIRROR(0xff00) AM_MASK(0xffff) AM_READWRITE(vram_r, vram_w) + AM_RANGE(0x08, 0x0f) AM_MIRROR(0xff00) AM_MASK(0xffff) AM_READWRITE(attr_r, attr_w) + AM_RANGE(0x10, 0x17) AM_MIRROR(0xff00) AM_MASK(0xffff) AM_READWRITE(pcg_r, pcg_w) + AM_RANGE(0x18, 0x19) AM_MIRROR(0xff00) AM_WRITE(mc6845_w) + AM_RANGE(0x1a, 0x1b) AM_MIRROR(0xff00) AM_READWRITE(key_r, key_w) + AM_RANGE(0x1c, 0x1c) AM_MIRROR(0xff00) AM_READWRITE(system_input_r, system_output_w) +// AM_RANGE(0x1d, 0x1d) system and control read, printer strobe write +// AM_RANGE(0x1e, 0x1f) rs232 irq control + AM_RANGE(0x20, 0x20) AM_MIRROR(0xff00) AM_READWRITE(display_reg_r, display_reg_w) + AM_RANGE(0x21, 0x21) AM_MIRROR(0xff00) AM_READWRITE(irq_mask_r, irq_mask_w) +// AM_RANGE(0x22, 0x22) printer output data + AM_RANGE(0x23, 0x23) AM_MIRROR(0xff00) AM_WRITE(border_col_w) +// AM_RANGE(0x24, 0x24) rtc write address +// AM_RANGE(0x25, 0x25) rtc read +// AM_RANGE(0x26, 0x26) rs232 #1 +// AM_RANGE(0x28, 0x2c) fdc #2 +// AM_RANGE(0x2d, 0x2f) rs232 #2 + AM_RANGE(0x30, 0x33) AM_MIRROR(0xff00) AM_READWRITE(fdc_r, fdc_w) + AM_RANGE(0x34, 0x34) AM_MIRROR(0xff00) AM_READWRITE(fdc_request_r, floppy_select_w) +// AM_RANGE(0x35, 0x37) rs232 #3 +// AM_RANGE(0x38, 0x3b) cache disk unit +// AM_RANGE(0x3c, 0x3d) rgb superimposer +// AM_RANGE(0x40, 0x47) ieee-488 +// AM_RANGE(0x48, 0x4f) hdd (winchester) + AM_RANGE(0x51, 0x51) AM_MIRROR(0xff00) AM_READ_PORT("JOY_1P") AM_WRITE(color_mode_w) + AM_RANGE(0x52, 0x52) AM_MIRROR(0xff00) AM_MASK(0xffff) AM_WRITE(ramdac_w) + AM_RANGE(0x53, 0x53) AM_MIRROR(0xff00) AM_DEVWRITE("sn1", sn76489a_device, write) +// AM_RANGE(0x54, 0x59) vrt controller +// AM_RANGE(0x5a, 0x5b) ram banking +// AM_RANGE(0x70, 0x70) auto-start rom +// AM_RANGE(0x74, 0x74) ieee-488 rom +// AM_RANGE(0x75, 0x75) vrt controller rom +// AM_RANGE(0x7e, 0x7f) kanji rom + AM_RANGE(0x80, 0xff) AM_MIRROR(0xff00) AM_MASK(0xffff) AM_READWRITE(fbuf_r, fbuf_w) +ADDRESS_MAP_END + +/* Input ports */ +static INPUT_PORTS_START( smc777 ) + PORT_START("key0") //0x00-0x07 + PORT_BIT (0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_0_PAD) PORT_CHAR(UCHAR_MAMEKEY(0_PAD)) + PORT_BIT (0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_1_PAD) PORT_CHAR(UCHAR_MAMEKEY(1_PAD)) + PORT_BIT (0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_2_PAD) PORT_CHAR(UCHAR_MAMEKEY(2_PAD)) + PORT_BIT (0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_3_PAD) PORT_CHAR(UCHAR_MAMEKEY(3_PAD)) + PORT_BIT (0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_4_PAD) PORT_CHAR(UCHAR_MAMEKEY(4_PAD)) + PORT_BIT (0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_5_PAD) PORT_CHAR(UCHAR_MAMEKEY(5_PAD)) + PORT_BIT (0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_6_PAD) PORT_CHAR(UCHAR_MAMEKEY(6_PAD)) + PORT_BIT (0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_7_PAD) PORT_CHAR(UCHAR_MAMEKEY(7_PAD)) + + PORT_START("key1") //0x08-0x0f + PORT_BIT (0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_8_PAD) PORT_CHAR(UCHAR_MAMEKEY(8_PAD)) + PORT_BIT (0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_9_PAD) PORT_CHAR(UCHAR_MAMEKEY(9_PAD)) + PORT_BIT (0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("/ PAD") PORT_CODE(KEYCODE_SLASH_PAD) + PORT_BIT (0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("* PAD") PORT_CODE(KEYCODE_ASTERISK) + PORT_BIT (0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("- PAD") PORT_CODE(KEYCODE_MINUS_PAD) + PORT_BIT (0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("+ PAD") PORT_CODE(KEYCODE_PLUS_PAD) + PORT_BIT (0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("ENTER PAD") PORT_CODE(KEYCODE_ENTER_PAD) PORT_CHAR(13) + PORT_BIT (0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME(". PAD") PORT_CODE(KEYCODE_DEL_PAD) + + PORT_START("key2") //0x10-0x17 + PORT_BIT (0x01, IP_ACTIVE_HIGH,IPT_UNUSED) // PORT_NAME("@") PORT_CODE(KEYCODE_OPENBRACE) 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("key3") //0x18-0x1f + 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("key4") //0x20-0x27 + 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("key5") //0x28-0x2f + 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("0-1") /* TODO: labels */ + PORT_BIT(0x10,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("0-2") + PORT_BIT(0x20,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("1-1") + PORT_BIT(0x40,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("1-2") + + PORT_START("key6") //0x30-0x37 + 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("key7") //0x38-0x3f + 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("2-1") /* TODO: labels */ + PORT_BIT(0x08,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("2-3") + PORT_BIT(0x10,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("3-1") + PORT_BIT(0x20,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("3-2") + PORT_BIT(0x40,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("3-3") + + PORT_START("key8") //0x40-0x47 + PORT_BIT(0x01,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("RETURN") PORT_CODE(KEYCODE_ENTER) PORT_CHAR(27) + PORT_BIT(0x02,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("SPACE") PORT_CODE(KEYCODE_SPACE) PORT_CHAR(' ') + PORT_BIT(0x04,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("BACKSPACE") PORT_CODE(KEYCODE_BACKSPACE) PORT_CHAR(8) + PORT_BIT(0x08,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("TAB") PORT_CODE(KEYCODE_TAB) PORT_CHAR(9) + PORT_BIT(0x10,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("ESC") PORT_CHAR(27) + PORT_BIT(0x20, IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("INS") PORT_CODE(KEYCODE_INSERT) + PORT_BIT(0x40, IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("DEL") PORT_CODE(KEYCODE_DEL) + /* TODO: control inputs */ + + PORT_START("key9") //0x40-0x47 + /* TODO: cursor inputs */ + PORT_BIT(0x01, IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("CURSOR UP") PORT_CODE(KEYCODE_UP) + PORT_BIT(0x02, IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("CURSOR DOWN") PORT_CODE(KEYCODE_DOWN) + PORT_BIT(0x04, IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("CURSOR LEFT") PORT_CODE(KEYCODE_LEFT) + PORT_BIT(0x08, IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("CURSOR RIGHT") PORT_CODE(KEYCODE_RIGHT) + PORT_BIT(0x10, IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("HOME") PORT_CODE(KEYCODE_HOME) + PORT_BIT(0x20, IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("END") PORT_CODE(KEYCODE_END) + PORT_BIT(0x40, IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("PGUP") PORT_CODE(KEYCODE_PGUP) + PORT_BIT(0x80, IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("PGDOWN") PORT_CODE(KEYCODE_PGDN) + + PORT_START("keya") //0x48-0x4f + PORT_BIT(0x01,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("F1") PORT_CODE(KEYCODE_F1) + PORT_BIT(0x02,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("F2") PORT_CODE(KEYCODE_F2) + PORT_BIT(0x04,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("F3") PORT_CODE(KEYCODE_F3) + PORT_BIT(0x08,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("F4") PORT_CODE(KEYCODE_F4) + PORT_BIT(0x10,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("F5") PORT_CODE(KEYCODE_F5) + + PORT_START("key_mod") + PORT_BIT (0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_LSHIFT) PORT_CODE(KEYCODE_RSHIFT) PORT_CHAR(UCHAR_SHIFT_1) + PORT_BIT (0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("KANA SHIFT") PORT_CODE(KEYCODE_LALT) + + + #if 0 + PORT_BIT(0x00002000,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("-") PORT_CODE(KEYCODE_MINUS) PORT_CHAR('-') + + PORT_BIT(0x04000000,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME(":") PORT_CODE(KEYCODE_QUOTE) PORT_CHAR(':') + PORT_BIT(0x08000000,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME(";") PORT_CODE(KEYCODE_COLON) PORT_CHAR(';') + PORT_BIT(0x08000000,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("[") PORT_CODE(KEYCODE_CLOSEBRACE) PORT_CHAR('[') + PORT_BIT(0x20000000,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("]") PORT_CODE(KEYCODE_BACKSLASH) PORT_CHAR(']') + PORT_BIT(0x40000000,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("^") PORT_CODE(KEYCODE_EQUALS) PORT_CHAR('^') + PORT_BIT(0x80000000,IP_ACTIVE_HIGH,IPT_KEYBOARD) PORT_NAME("_") + #endif + + PORT_START("JOY_1P") + PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_8WAY PORT_PLAYER(1) + PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_8WAY PORT_PLAYER(1) + PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_8WAY PORT_PLAYER(1) + PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_8WAY PORT_PLAYER(1) + PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(1) + PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_UNUSED ) + PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNUSED ) + PORT_BIT( 0x80, IP_ACTIVE_HIGH,IPT_UNKNOWN ) //status? +INPUT_PORTS_END + +/* + Keyboard data: + kana lock |= 0x80 + numpad 0 to 9 = 0x30 - 0x39 + / pad = 0x2f + * pad = 0x2a + - pad = 0x2d + + pad = 0x2b + ENTER pad = 0x0d + . pad = 0x2e + enter = 0x0d + space = 0x20 + backspace = 0x08 + CTRL (TAB?) = 0x09 + cursor up = 0x17 + cursor down = 0x1c + cursor left = 0x16 + cursor right = 0x19 + 0 to 9 -> 0x30 to 0x39 + S + 0 = 0x29 + S + 1 = 0x21 + S + 2 = 0x40 + S + 3 = 0x23 + S + 4 = 0x24 + S + 5 = 0x25 + S + 6 = 0x5e + S + 7 = 0x26 + S + 8 = 0x2a + S + 9 = 0x28 + F1 = 0x01 / 0x15 + F2 = 0x02 / 0x18 + F3 = 0x04 / 0x12 + F4 = 0x06 / 0x05 + F5 = 0x0b / 0x03 + ESC = 0x1b + INS = 0x0f + DEL = 0x11 + PG UP = 0x12 + PG DOWN = 0x03 + HOME = 0x14 + END = 0x0e + ' = 0x2d / 0x5f + "P" row 1 ] = 0x5d / 0x7d + "P" row 2 ' / ~ = 0x60 / 0x7e + "L" row 1 ; / : = 0x3b / 0x3a + "L" row 2 = (unused) + "L" row 3 Yen / | = 0x5c / 0x7c + "M" row 1 , / < = 0x2c / 0x3c + "M" row 2 . / > = 0x2e / 0x3e + "M" row 3 / / ? = 0x2f / 0x3f +*/ + +static const UINT8 smc777_keytable[2][0xa0] = +{ + /* normal*/ + { + 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, /* numpad */ + 0x38, 0x39, 0x2f, 0x2a, 0x2d, 0x2b, 0x0d, 0x2e, + 0xff, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67, /* A - G */ + 0x68, 0x69, 0x6a, 0x6b, 0x6c, 0x6d, 0x6e, 0x6f, /* H - O */ + 0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77, /* P - W */ + 0x78, 0x79, 0x7a, 0x2d, 0x5d, 0x60, 0xff, 0xff, /* X - Z */ + 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, /* 0 - 7*/ + 0x38, 0x39, 0x3b, 0x5c, 0x2c, 0x2e, 0x2f, 0xff, /* 8 - 9 */ + 0x0d, 0x20, 0x08, 0x09, 0x1b, 0x0f, 0x11, 0xff, + 0x17, 0x1c, 0x16, 0x19, 0x14, 0x0e, 0x12, 0x03, + 0x01, 0x02, 0x04, 0x06, 0x0b, 0xff, 0xff, 0xff, + + }, + /* shift */ + { + 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, /* numpad */ + 0x38, 0x39, 0x2f, 0x2a, 0x2d, 0x2b, 0x0d, 0x2e, + 0xff, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, + 0x48, 0x49, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f, /* H - O */ + 0x50, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57, /* P - W */ + 0x58, 0x59, 0x5a, 0x5f, 0x7d, 0x7e, 0xff, 0xff, /* X - Z */ + 0x29, 0x21, 0x40, 0x23, 0x24, 0x25, 0x5e, 0x26, + 0x2a, 0x28, 0x3a, 0x7c, 0x3c, 0x3e, 0x3f, 0xff, + 0x0d, 0x20, 0x08, 0x09, 0x1b, 0x0f, 0x11, 0xff, + 0x17, 0x1c, 0x16, 0x19, 0x14, 0x0e, 0x12, 0x03, + 0x15, 0x18, 0x12, 0x05, 0x03, 0xff, 0xff, 0xff, /* F1 - F5 */ + } +}; + +TIMER_DEVICE_CALLBACK_MEMBER(smc777_state::keyboard_callback) +{ + static const char *const portnames[11] = { "key0","key1","key2","key3","key4","key5","key6","key7", "key8", "key9", "keya" }; + int i,port_i,scancode; + UINT8 shift_mod = ioport("key_mod")->read() & 1; + UINT8 kana_mod = ioport("key_mod")->read() & 0x10; + scancode = 0; + + for(port_i=0;port_i<11;port_i++) + { + for(i=0;i<8;i++) + { + if((ioport(portnames[port_i])->read()>>i) & 1) + { + m_keyb_press = smc777_keytable[shift_mod & 1][scancode]; + if(kana_mod) { m_keyb_press|=0x80; } + m_keyb_press_flag = 1; + m_shift_press_flag = shift_mod & 1; + return; + } + scancode++; + } + } +} + +static const gfx_layout smc777_charlayout = +{ + 8, 8, + 0x800 / 8, + 1, + { 0 }, + { 0, 1, 2, 3, 4, 5, 6, 7 }, + { 0*8, 1*8, 2*8, 3*8, 4*8, 5*8, 6*8, 7*8 }, + 8*8 +}; + +void smc777_state::machine_start() +{ + m_ipl_rom = memregion("ipl")->base(); + m_work_ram = auto_alloc_array_clear(machine(), UINT8, 0x10000); + m_vram = auto_alloc_array_clear(machine(), UINT8, 0x800); + m_attr = auto_alloc_array_clear(machine(), UINT8, 0x800); + m_gvram = auto_alloc_array_clear(machine(), UINT8, 0x8000); + m_pcg = auto_alloc_array_clear(machine(), UINT8, 0x800); + + save_pointer(NAME(m_work_ram), 0x10000); + save_pointer(NAME(m_vram), 0x800); + save_pointer(NAME(m_attr), 0x800); + save_pointer(NAME(m_gvram), 0x8000); + save_pointer(NAME(m_pcg), 0x800); + + m_gfxdecode->set_gfx(0, global_alloc(gfx_element(m_palette, smc777_charlayout, (UINT8 *)m_pcg, 0, 8, 0))); +} + +void smc777_state::machine_reset() +{ + m_raminh = 1; + m_raminh_pending_change = 1; + m_raminh_prefetch = 0xff; + m_pal_mode = 0x10; + + m_beeper->set_frequency(300); //TODO: correct frequency + m_beeper->set_state(0); +} + + +/* set-up SMC-70 mode colors */ +PALETTE_INIT_MEMBER(smc777_state, smc777) +{ + int i; + + for(i=0x10;i<0x18;i++) + { + UINT8 r,g,b; + + r = (i & 4) >> 2; + g = (i & 2) >> 1; + b = (i & 1) >> 0; + + palette.set_pen_color(i, pal1bit(r),pal1bit(g),pal1bit(b)); + palette.set_pen_color(i+8, pal1bit(0),pal1bit(0),pal1bit(0)); + } +} + + +INTERRUPT_GEN_MEMBER(smc777_state::vblank_irq) +{ + if(m_irq_mask) + device.execute().set_input_line(0,HOLD_LINE); +} + + +static SLOT_INTERFACE_START( smc777_floppies ) + SLOT_INTERFACE("ssdd", FLOPPY_35_SSDD) +SLOT_INTERFACE_END + + +static MACHINE_CONFIG_START( smc777, smc777_state ) + /* basic machine hardware */ + MCFG_CPU_ADD("maincpu",Z80, MASTER_CLOCK) + MCFG_CPU_PROGRAM_MAP(smc777_mem) + MCFG_CPU_IO_MAP(smc777_io) + MCFG_CPU_VBLANK_INT_DRIVER("screen", smc777_state, vblank_irq) + + /* video hardware */ + MCFG_SCREEN_ADD("screen", RASTER) + MCFG_SCREEN_REFRESH_RATE(60) + MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500)) /* not accurate */ + MCFG_SCREEN_SIZE(0x400, 400) + MCFG_SCREEN_VISIBLE_AREA(0, 660-1, 0, 220-1) //normal 640 x 200 + 20 pixels for border color + MCFG_SCREEN_UPDATE_DRIVER(smc777_state, screen_update_smc777) + MCFG_SCREEN_PALETTE("palette") + + MCFG_PALETTE_ADD("palette", 0x20) // 16 + 8 colors (SMC-777 + SMC-70) + 8 empty entries (SMC-70) + MCFG_PALETTE_INIT_OWNER(smc777_state, smc777) + + MCFG_GFXDECODE_ADD("gfxdecode", "palette", empty) + + MCFG_MC6845_ADD("crtc", H46505, "screen", MASTER_CLOCK/2) /* unknown clock, hand tuned to get ~60 fps */ + MCFG_MC6845_SHOW_BORDER_AREA(true) + MCFG_MC6845_CHAR_WIDTH(8) + + // floppy controller + MCFG_MB8876_ADD("fdc", XTAL_1MHz) + MCFG_WD_FDC_INTRQ_CALLBACK(WRITELINE(smc777_state, fdc_intrq_w)) + MCFG_WD_FDC_DRQ_CALLBACK(WRITELINE(smc777_state, fdc_drq_w)) + + // does it really support 16 of them? + MCFG_FLOPPY_DRIVE_ADD("fdc:0", smc777_floppies, "ssdd", floppy_image_device::default_floppy_formats) + MCFG_FLOPPY_DRIVE_ADD("fdc:1", smc777_floppies, "ssdd", floppy_image_device::default_floppy_formats) + + MCFG_SOFTWARE_LIST_ADD("flop_list", "smc777") + + /* sound hardware */ + MCFG_SPEAKER_STANDARD_MONO("mono") + + MCFG_SOUND_ADD("sn1", SN76489A, MASTER_CLOCK) // unknown clock / divider + MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.50) + + MCFG_SOUND_ADD("beeper", BEEP, 0) + MCFG_SOUND_ROUTE(ALL_OUTPUTS,"mono",0.50) + + MCFG_TIMER_DRIVER_ADD_PERIODIC("keyboard_timer", smc777_state, keyboard_callback, attotime::from_hz(240/32)) +MACHINE_CONFIG_END + +/* ROM definition */ +ROM_START( smc777 ) + /* shadow ROM */ + ROM_REGION( 0x10000, "ipl", ROMREGION_ERASEFF ) + ROM_SYSTEM_BIOS(0, "1st", "1st rev.") + ROMX_LOAD( "smcrom.dat", 0x0000, 0x4000, CRC(b2520d31) SHA1(3c24b742c38bbaac85c0409652ba36e20f4687a1), ROM_BIOS(1)) + ROM_SYSTEM_BIOS(1, "2nd", "2nd rev.") + ROMX_LOAD( "smcrom.v2", 0x0000, 0x4000, CRC(c1494b8f) SHA1(a7396f5c292f11639ffbf0b909e8473c5aa63518), ROM_BIOS(2)) + + ROM_REGION( 0x800, "mcu", ROMREGION_ERASEFF ) + ROM_LOAD( "i80xx", 0x000, 0x800, NO_DUMP ) // keyboard mcu, needs decapping +ROM_END + +/* Driver */ + +/* YEAR NAME PARENT COMPAT MACHINE INPUT INIT COMPANY FULLNAME FLAGS */ +COMP( 1983, smc777, 0, 0, smc777, smc777, driver_device, 0, "Sony", "SMC-777", MACHINE_NOT_WORKING | MACHINE_IMPERFECT_GRAPHICS | MACHINE_IMPERFECT_SOUND) |