summaryrefslogtreecommitdiffstatshomepage
path: root/src/mame/video/drmicro.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/mame/video/drmicro.c')
-rw-r--r--src/mame/video/drmicro.c166
1 files changed, 166 insertions, 0 deletions
diff --git a/src/mame/video/drmicro.c b/src/mame/video/drmicro.c
new file mode 100644
index 00000000000..fddcc3c5ab3
--- /dev/null
+++ b/src/mame/video/drmicro.c
@@ -0,0 +1,166 @@
+/*******************************************************************************
+
+Dr. Micro (c) 1983 Sanritsu
+
+Video hardware
+ driver by Uki
+
+*******************************************************************************/
+
+#include "driver.h"
+
+static int flipscreen;
+
+static UINT8 *drmicro_videoram;
+static tilemap *drmicro_bg1;
+static tilemap *drmicro_bg2;
+
+/****************************************************************************/
+
+void drmicro_flip_w( int flip )
+{
+ flipscreen = flip ? 1 : 0;
+ flip_screen_set(flip);
+}
+
+WRITE8_HANDLER( drmicro_videoram_w )
+{
+ drmicro_videoram[offset] = data;
+
+ if (offset<0x800)
+ tilemap_mark_tile_dirty(drmicro_bg2,(offset & 0x3ff));
+ else
+ tilemap_mark_tile_dirty(drmicro_bg1,(offset & 0x3ff));
+}
+
+READ8_HANDLER( drmicro_videoram_r )
+{
+ return drmicro_videoram[offset];
+}
+
+/****************************************************************************/
+
+static TILE_GET_INFO( get_bg1_tile_info )
+{
+ int code,col,flags;
+
+ code = drmicro_videoram[tile_index + 0x0800];
+ col = drmicro_videoram[tile_index + 0x0c00];
+
+ code += (col & 0xc0) << 2;
+ flags = ((col & 0x20) ? TILEMAP_FLIPY : 0) | ((col & 0x10) ? TILEMAP_FLIPX : 0);
+ col &= 0x0f;
+
+ SET_TILE_INFO( 0, code, col, flags);
+}
+
+static TILE_GET_INFO( get_bg2_tile_info )
+{
+ int code,col,flags;
+
+ code = drmicro_videoram[tile_index + 0x0000];
+ col = drmicro_videoram[tile_index + 0x0400];
+
+ code += (col & 0xc0) << 2;
+ flags = ((col & 0x20) ? TILEMAP_FLIPY : 0) | ((col & 0x10) ? TILEMAP_FLIPX : 0);
+ col &= 0x0f;
+
+ SET_TILE_INFO( 1, code, col, flags);
+}
+
+/****************************************************************************/
+
+PALETTE_INIT( drmicro )
+{
+ int i;
+
+ for (i = 0;i < machine->drv->total_colors;i++)
+ {
+ int bit0,bit1,bit2,r,g,b;
+
+ bit0 = (*color_prom >> 0) & 0x01;
+ bit1 = (*color_prom >> 1) & 0x01;
+ bit2 = (*color_prom >> 2) & 0x01;
+ r = 0x21 * bit0 + 0x47 * bit1 + 0x97 * bit2;
+ bit0 = (*color_prom >> 3) & 0x01;
+ bit1 = (*color_prom >> 4) & 0x01;
+ bit2 = (*color_prom >> 5) & 0x01;
+ g = 0x21 * bit0 + 0x47 * bit1 + 0x97 * bit2;
+ bit0 = 0;
+ bit1 = (*color_prom >> 6) & 0x01;
+ bit2 = (*color_prom >> 7) & 0x01;
+ b = 0x21 * bit0 + 0x47 * bit1 + 0x97 * bit2;
+
+ palette_set_color(machine,i,MAKE_RGB(r,g,b));
+ color_prom++;
+ }
+
+ for (i=0; i<machine->drv->color_table_len; i++)
+ colortable[i] = color_prom[i] & 0x0f;
+}
+
+VIDEO_START( drmicro)
+{
+ drmicro_videoram = auto_malloc(0x1000);
+
+ drmicro_bg1 = tilemap_create(get_bg1_tile_info, tilemap_scan_rows,TILEMAP_TYPE_PEN, 8,8,32,32);
+ drmicro_bg2 = tilemap_create(get_bg2_tile_info, tilemap_scan_rows,TILEMAP_TYPE_PEN, 8,8,32,32);
+
+ tilemap_set_transparent_pen(drmicro_bg2,0);
+}
+
+VIDEO_UPDATE( drmicro )
+{
+ int offs,adr,g;
+ int chr,col,attr;
+ int x,y,fx,fy;
+
+ tilemap_draw(bitmap, cliprect, drmicro_bg1, 0, 0);
+ tilemap_draw(bitmap, cliprect, drmicro_bg2, 0, 0);
+
+ /* draw sprites */
+
+ for (g=0;g<2;g++)
+ {
+ adr = 0x800*g;
+
+ for (offs=0x00; offs<0x20; offs +=4)
+ {
+ x = drmicro_videoram[offs + adr + 3];
+ y = drmicro_videoram[offs + adr + 0];
+ attr = drmicro_videoram[offs + adr + 2];
+ chr = drmicro_videoram[offs + adr + 1];
+
+ fx = (chr & 0x01) ^ flipscreen;
+ fy = ((chr & 0x02) >> 1) ^ flipscreen;
+
+ chr = (chr >> 2) | (attr & 0xc0);
+
+ col = (attr & 0x0f) + 0x00;
+
+ if (!flipscreen)
+ y = (240-y) & 0xff;
+ else
+ x = (240-x) & 0xff;
+
+ drawgfx(bitmap,machine->gfx[3-g],
+ chr,
+ col,
+ fx,fy,
+ x,y,
+ cliprect,TRANSPARENCY_PEN,0);
+
+ if (x>240)
+ {
+ drawgfx(bitmap,machine->gfx[3-g],
+ chr,
+ col,
+ fx,fy,
+ x-256,y,
+ cliprect,TRANSPARENCY_PEN,0);
+ }
+ }
+ }
+ return 0;
+}
+