diff options
Diffstat (limited to 'src/mame/video/gaelco.c')
-rw-r--r-- | src/mame/video/gaelco.c | 254 |
1 files changed, 254 insertions, 0 deletions
diff --git a/src/mame/video/gaelco.c b/src/mame/video/gaelco.c new file mode 100644 index 00000000000..34802995472 --- /dev/null +++ b/src/mame/video/gaelco.c @@ -0,0 +1,254 @@ +/*************************************************************************** + + Gaelco Type 1 Video Hardware + + Functions to emulate the video hardware of the machine + +***************************************************************************/ + +#include "driver.h" + +UINT16 *gaelco_vregs; +UINT16 *gaelco_videoram; +UINT16 *gaelco_spriteram; + +tilemap *gaelco_tilemap[2]; +#define pant gaelco_tilemap + + +/*************************************************************************** + + Callbacks for the TileMap code + +***************************************************************************/ + +/* + Tile format + ----------- + + Screen 0 & 1: (32*32, 16x16 tiles) + + Word | Bit(s) | Description + -----+-FEDCBA98-76543210-+-------------------------- + 0 | -------- -------x | flip x + 0 | -------- ------x- | flip y + 0 | xxxxxxxx xxxxxx-- | code + 1 | -------- --xxxxxx | color + 1 | -------- xx------ | priority + 1 | xxxxxxxx -------- | not used +*/ + +static TILE_GET_INFO( get_tile_info_gaelco_screen0 ) +{ + int data = gaelco_videoram[tile_index << 1]; + int data2 = gaelco_videoram[(tile_index << 1) + 1]; + int code = ((data & 0xfffc) >> 2); + + tileinfo->category = (data2 >> 6) & 0x03; + + SET_TILE_INFO(1, 0x4000 + code, data2 & 0x3f, TILE_FLIPYX(data & 0x03)); +} + + +static TILE_GET_INFO( get_tile_info_gaelco_screen1 ) +{ + int data = gaelco_videoram[(0x1000/2) + (tile_index << 1)]; + int data2 = gaelco_videoram[(0x1000/2) + (tile_index << 1) + 1]; + int code = ((data & 0xfffc) >> 2); + + tileinfo->category = (data2 >> 6) & 0x03; + + SET_TILE_INFO(1, 0x4000 + code, data2 & 0x3f, TILE_FLIPYX(data & 0x03)); +} + +/*************************************************************************** + + Memory Handlers + +***************************************************************************/ + +WRITE16_HANDLER( gaelco_vram_w ) +{ + COMBINE_DATA(&gaelco_videoram[offset]); + tilemap_mark_tile_dirty(pant[offset >> 11],((offset << 1) & 0x0fff) >> 2); +} + +/*************************************************************************** + + Start/Stop the video hardware emulation. + +***************************************************************************/ + +VIDEO_START( bigkarnk ) +{ + pant[0] = tilemap_create(get_tile_info_gaelco_screen0,tilemap_scan_rows,TILEMAP_TYPE_PEN,16,16,32,32); + pant[1] = tilemap_create(get_tile_info_gaelco_screen1,tilemap_scan_rows,TILEMAP_TYPE_PEN,16,16,32,32); + + tilemap_set_transmask(pant[0],0,0xff01,0x00ff); /* pens 1-7 opaque, pens 0, 8-15 transparent */ + tilemap_set_transmask(pant[1],0,0xff01,0x00ff); /* pens 1-7 opaque, pens 0, 8-15 transparent */ +} + +VIDEO_START( maniacsq ) +{ + pant[0] = tilemap_create(get_tile_info_gaelco_screen0,tilemap_scan_rows,TILEMAP_TYPE_PEN,16,16,32,32); + pant[1] = tilemap_create(get_tile_info_gaelco_screen1,tilemap_scan_rows,TILEMAP_TYPE_PEN,16,16,32,32); + + tilemap_set_transparent_pen(pant[0],0); + tilemap_set_transparent_pen(pant[1],0); +} + + +/*************************************************************************** + + Sprites + +***************************************************************************/ + +/* + Sprite Format + ------------- + + Word | Bit(s) | Description + -----+-FEDCBA98-76543210-+-------------------------- + 0 | -------- xxxxxxxx | y position + 0 | -----xxx -------- | not used + 0 | ----x--- -------- | sprite size + 0 | --xx---- -------- | sprite priority + 0 | -x------ -------- | flipx + 0 | x------- -------- | flipy + 1 | xxxxxxxx xxxxxxxx | not used + 2 | -------x xxxxxxxx | x position + 2 | -xxxxxx- -------- | sprite color + 3 | -------- ------xx | sprite code (8x8 cuadrant) + 3 | xxxxxxxx xxxxxx-- | sprite code +*/ + +static void draw_sprites(running_machine *machine, mame_bitmap *bitmap, const rectangle *cliprect) +{ + int i, x, y, ex, ey; + const gfx_element *gfx = machine->gfx[0]; + + static int x_offset[2] = {0x0,0x2}; + static int y_offset[2] = {0x0,0x1}; + + for (i = 0x800 - 4 - 1; i >= 3; i -= 4){ + int sx = gaelco_spriteram[i+2] & 0x01ff; + int sy = (240 - (gaelco_spriteram[i] & 0x00ff)) & 0x00ff; + int number = gaelco_spriteram[i+3]; + int color = (gaelco_spriteram[i+2] & 0x7e00) >> 9; + int attr = (gaelco_spriteram[i] & 0xfe00) >> 9; + int priority = (gaelco_spriteram[i] & 0x3000) >> 12; + + int xflip = attr & 0x20; + int yflip = attr & 0x40; + int spr_size, pri_mask; + + /* palettes 0x38-0x3f are used for high priority sprites in Big Karnak */ + if (color >= 0x38){ + priority = 4; + } + + switch( priority ) + { + case 0: pri_mask = 0xff00; break; + case 1: pri_mask = 0xff00|0xf0f0; break; + case 2: pri_mask = 0xff00|0xf0f0|0xcccc; break; + case 3: pri_mask = 0xff00|0xf0f0|0xcccc|0xaaaa; break; + default: + case 4: pri_mask = 0; break; + } + + if (attr & 0x04){ + spr_size = 1; + } + else{ + spr_size = 2; + number &= (~3); + } + + for (y = 0; y < spr_size; y++){ + for (x = 0; x < spr_size; x++){ + + ex = xflip ? (spr_size-1-x) : x; + ey = yflip ? (spr_size-1-y) : y; + + pdrawgfx(bitmap,gfx,number + x_offset[ex] + y_offset[ey], + color,xflip,yflip, + sx-0x0f+x*8,sy+y*8, + cliprect,TRANSPARENCY_PEN,0,pri_mask); + } + } + } +} + +/*************************************************************************** + + Display Refresh + +***************************************************************************/ + +VIDEO_UPDATE( maniacsq ) +{ + /* set scroll registers */ + tilemap_set_scrolly(pant[0], 0, gaelco_vregs[0]); + tilemap_set_scrollx(pant[0], 0, gaelco_vregs[1]+4); + tilemap_set_scrolly(pant[1], 0, gaelco_vregs[2]); + tilemap_set_scrollx(pant[1], 0, gaelco_vregs[3]); + + fillbitmap(priority_bitmap,0,cliprect); + fillbitmap( bitmap, machine->pens[0], cliprect ); + + tilemap_draw(bitmap,cliprect,pant[1],3,0); + tilemap_draw(bitmap,cliprect,pant[0],3,0); + + tilemap_draw(bitmap,cliprect,pant[1],2,1); + tilemap_draw(bitmap,cliprect,pant[0],2,1); + + tilemap_draw(bitmap,cliprect,pant[1],1,2); + tilemap_draw(bitmap,cliprect,pant[0],1,2); + + tilemap_draw(bitmap,cliprect,pant[1],0,4); + tilemap_draw(bitmap,cliprect,pant[0],0,4); + + draw_sprites(machine,bitmap,cliprect); + return 0; +} + +VIDEO_UPDATE( bigkarnk ) +{ + /* set scroll registers */ + tilemap_set_scrolly(pant[0], 0, gaelco_vregs[0]); + tilemap_set_scrollx(pant[0], 0, gaelco_vregs[1]+4); + tilemap_set_scrolly(pant[1], 0, gaelco_vregs[2]); + tilemap_set_scrollx(pant[1], 0, gaelco_vregs[3]); + + fillbitmap(priority_bitmap,0,cliprect); + fillbitmap( bitmap, machine->pens[0], cliprect ); + + tilemap_draw(bitmap,cliprect,pant[1],TILEMAP_DRAW_LAYER1 | 3,0); + tilemap_draw(bitmap,cliprect,pant[0],TILEMAP_DRAW_LAYER1 | 3,0); + + tilemap_draw(bitmap,cliprect,pant[1],TILEMAP_DRAW_LAYER0 | 3,1); + tilemap_draw(bitmap,cliprect,pant[0],TILEMAP_DRAW_LAYER0 | 3,1); + + tilemap_draw(bitmap,cliprect,pant[1],TILEMAP_DRAW_LAYER1 | 2,1); + tilemap_draw(bitmap,cliprect,pant[0],TILEMAP_DRAW_LAYER1 | 2,1); + + tilemap_draw(bitmap,cliprect,pant[1],TILEMAP_DRAW_LAYER0 | 2,2); + tilemap_draw(bitmap,cliprect,pant[0],TILEMAP_DRAW_LAYER0 | 2,2); + + tilemap_draw(bitmap,cliprect,pant[1],TILEMAP_DRAW_LAYER1 | 1,2); + tilemap_draw(bitmap,cliprect,pant[0],TILEMAP_DRAW_LAYER1 | 1,2); + + tilemap_draw(bitmap,cliprect,pant[1],TILEMAP_DRAW_LAYER0 | 1,4); + tilemap_draw(bitmap,cliprect,pant[0],TILEMAP_DRAW_LAYER0 | 1,4); + + tilemap_draw(bitmap,cliprect,pant[1],TILEMAP_DRAW_LAYER1 | 0,4); + tilemap_draw(bitmap,cliprect,pant[0],TILEMAP_DRAW_LAYER1 | 0,4); + + tilemap_draw(bitmap,cliprect,pant[1],TILEMAP_DRAW_LAYER0 | 0,8); + tilemap_draw(bitmap,cliprect,pant[0],TILEMAP_DRAW_LAYER0 | 0,8); + + draw_sprites(machine,bitmap,cliprect); + return 0; +} |