summaryrefslogtreecommitdiffstatshomepage
path: root/src/mame/video/gaelco.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/mame/video/gaelco.c')
-rw-r--r--src/mame/video/gaelco.c254
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;
+}