/*************************************************************************** Ninja Gaiden / Tecmo Knights Video Hardware ***************************************************************************/ #include "driver.h" UINT16 *gaiden_videoram,*gaiden_videoram2,*gaiden_videoram3; int gaiden_sprite_sizey; //int raiga_alpha; static tilemap *text_layer,*foreground,*background; static mame_bitmap *sprite_bitmap, *tile_bitmap_bg, *tile_bitmap_fg; /*************************************************************************** Callbacks for the TileMap code ***************************************************************************/ static TILE_GET_INFO( get_bg_tile_info ) { UINT16 *videoram1 = &gaiden_videoram3[0x0800]; UINT16 *videoram2 = gaiden_videoram3; SET_TILE_INFO( 1, videoram1[tile_index] & 0x0fff, (videoram2[tile_index] & 0xf0) >> 4, 0); } static TILE_GET_INFO( get_fg_tile_info ) { UINT16 *videoram1 = &gaiden_videoram2[0x0800]; UINT16 *videoram2 = gaiden_videoram2; SET_TILE_INFO( 2, videoram1[tile_index] & 0x0fff, (videoram2[tile_index] & 0xf0) >> 4, 0); } static TILE_GET_INFO( get_fg_tile_info_raiga ) { UINT16 *videoram1 = &gaiden_videoram2[0x0800]; UINT16 *videoram2 = gaiden_videoram2; /* bit 3 controls blending */ tileinfo->category = (videoram2[tile_index] & 0x08) >> 3; SET_TILE_INFO( 2, videoram1[tile_index] & 0x0fff, ((videoram2[tile_index] & 0xf0) >> 4) | (tileinfo->category ? 0x80 : 0x00), 0); } static TILE_GET_INFO( get_tx_tile_info ) { UINT16 *videoram1 = &gaiden_videoram[0x0400]; UINT16 *videoram2 = gaiden_videoram; SET_TILE_INFO( 0, videoram1[tile_index] & 0x07ff, (videoram2[tile_index] & 0xf0) >> 4, 0); } /*************************************************************************** Start the video hardware emulation. ***************************************************************************/ VIDEO_START( gaiden ) { /* set up tile layers */ background = tilemap_create(get_bg_tile_info, tilemap_scan_rows, TILEMAP_TYPE_PEN, 16, 16, 64, 32); foreground = tilemap_create(get_fg_tile_info, tilemap_scan_rows, TILEMAP_TYPE_PEN, 16, 16, 64, 32); text_layer = tilemap_create(get_tx_tile_info, tilemap_scan_rows, TILEMAP_TYPE_PEN, 8, 8, 32, 32); tilemap_set_transparent_pen(background, 0); tilemap_set_transparent_pen(foreground, 0); tilemap_set_transparent_pen(text_layer, 0); } VIDEO_START( raiga ) { /* set up tile layers */ tile_bitmap_bg = auto_bitmap_alloc(machine->screen[0].width, machine->screen[0].height, BITMAP_FORMAT_INDEXED16); tile_bitmap_fg = auto_bitmap_alloc(machine->screen[0].width, machine->screen[0].height, BITMAP_FORMAT_INDEXED16); background = tilemap_create(get_bg_tile_info, tilemap_scan_rows,TILEMAP_TYPE_PEN,16,16,64,32); foreground = tilemap_create(get_fg_tile_info_raiga,tilemap_scan_rows,TILEMAP_TYPE_PEN,16,16,64,32); text_layer = tilemap_create(get_tx_tile_info, tilemap_scan_rows,TILEMAP_TYPE_PEN, 8, 8,32,32); tilemap_set_transparent_pen(background,0); tilemap_set_transparent_pen(foreground,0); tilemap_set_transparent_pen(text_layer,0); /* set up sprites */ sprite_bitmap = auto_bitmap_alloc(machine->screen[0].width, machine->screen[0].height, BITMAP_FORMAT_INDEXED16); } VIDEO_START( drgnbowl ) { /* set up tile layers */ background = tilemap_create(get_bg_tile_info, tilemap_scan_rows, TILEMAP_TYPE_PEN, 16, 16, 64, 32); foreground = tilemap_create(get_fg_tile_info, tilemap_scan_rows, TILEMAP_TYPE_PEN, 16, 16, 64, 32); text_layer = tilemap_create(get_tx_tile_info, tilemap_scan_rows, TILEMAP_TYPE_PEN, 8, 8, 32, 32); tilemap_set_transparent_pen(foreground, 15); tilemap_set_transparent_pen(text_layer, 15); tilemap_set_scrolldx(background, -248, 248); tilemap_set_scrolldx(foreground, -252, 252); } /*************************************************************************** Memory handlers ***************************************************************************/ WRITE16_HANDLER( gaiden_txscrollx_w ) { static UINT16 scroll; COMBINE_DATA(&scroll); tilemap_set_scrollx(text_layer, 0, scroll); } WRITE16_HANDLER( gaiden_txscrolly_w ) { static UINT16 scroll; COMBINE_DATA(&scroll); tilemap_set_scrolly(text_layer, 0, scroll); } WRITE16_HANDLER( gaiden_fgscrollx_w ) { static UINT16 scroll; COMBINE_DATA(&scroll); tilemap_set_scrollx(foreground, 0, scroll); } WRITE16_HANDLER( gaiden_fgscrolly_w ) { static UINT16 scroll; COMBINE_DATA(&scroll); tilemap_set_scrolly(foreground, 0, scroll); } WRITE16_HANDLER( gaiden_bgscrollx_w ) { static UINT16 scroll; COMBINE_DATA(&scroll); tilemap_set_scrollx(background, 0, scroll); } WRITE16_HANDLER( gaiden_bgscrolly_w ) { static UINT16 scroll; COMBINE_DATA(&scroll); tilemap_set_scrolly(background, 0, scroll); } WRITE16_HANDLER( gaiden_videoram3_w ) { COMBINE_DATA(&gaiden_videoram3[offset]); tilemap_mark_tile_dirty(background,offset & 0x07ff); } WRITE16_HANDLER( gaiden_flip_w ) { if (ACCESSING_LSB) flip_screen_set(data & 1); } READ16_HANDLER( gaiden_videoram3_r ) { return gaiden_videoram3[offset]; } WRITE16_HANDLER( gaiden_videoram2_w ) { COMBINE_DATA(&gaiden_videoram2[offset]); tilemap_mark_tile_dirty(foreground,offset & 0x07ff); } READ16_HANDLER( gaiden_videoram2_r ) { return gaiden_videoram2[offset]; } WRITE16_HANDLER( gaiden_videoram_w ) { COMBINE_DATA(&gaiden_videoram[offset]); tilemap_mark_tile_dirty(text_layer,offset & 0x03ff); } /*************************************************************************** Display refresh ***************************************************************************/ /* mix & blend the paletted 16-bit tile and sprite bitmaps into an RGB 32-bit bitmap */ static void blendbitmaps(running_machine *machine, mame_bitmap *dest,mame_bitmap *src1,mame_bitmap *src2,mame_bitmap *src3, int sx,int sy,const rectangle *clip) { int ox; int oy; int ex; int ey; /* check bounds */ ox = sx; oy = sy; ex = sx + src1->width - 1; if (sx < 0) sx = 0; if (sx < clip->min_x) sx = clip->min_x; if (ex >= dest->width) ex = dest->width - 1; if (ex > clip->max_x) ex = clip->max_x; if (sx > ex) return; ey = sy + src1->height - 1; if (sy < 0) sy = 0; if (sy < clip->min_y) sy = clip->min_y; if (ey >= dest->height) ey = dest->height - 1; if (ey > clip->max_y) ey = clip->max_y; if (sy > ey) return; { const pen_t *paldata = machine->pens; UINT32 *end; UINT16 *sd1 = src1->base; /* source data */ UINT16 *sd2 = src2->base; UINT16 *sd3 = src3->base; int sw = ex-sx+1; /* source width */ int sh = ey-sy+1; /* source height */ int sm = src1->rowpixels; /* source modulo */ UINT32 *dd = BITMAP_ADDR32(dest, sy, sx); /* dest data */ int dm = dest->rowpixels; /* dest modulo */ sd1 += (sx-ox); sd1 += sm * (sy-oy); sd2 += (sx-ox); sd2 += sm * (sy-oy); sd3 += (sx-ox); sd3 += sm * (sy-oy); sm -= sw; dm -= sw; while (sh) { #define BLENDPIXEL(x) if (sd3[x]) { \ if (sd2[x]) { \ dd[x] = paldata[sd2[x] | 0x0400] + paldata[sd3[x]]; \ } else { \ dd[x] = paldata[sd1[x] | 0x0400] + paldata[sd3[x]]; \ } \ } else { \ if (sd2[x]) { \ if (sd2[x] & 0x0800) { \ dd[x] = paldata[sd1[x] | 0x0400] + paldata[sd2[x]]; \ } else { \ dd[x] = paldata[sd2[x]]; \ } \ } else { \ dd[x] = paldata[sd1[x]]; \ } \ } end = dd + sw; while (dd <= end - 8) { BLENDPIXEL(0); BLENDPIXEL(1); BLENDPIXEL(2); BLENDPIXEL(3); BLENDPIXEL(4); BLENDPIXEL(5); BLENDPIXEL(6); BLENDPIXEL(7); dd += 8; sd1 += 8; sd2 += 8; sd3 += 8; } while (dd < end) { BLENDPIXEL(0); dd++; sd1++; sd2++; sd3++; } dd += dm; sd1 += sm; sd2 += sm; sd3 += sm; sh--; #undef BLENDPIXEL } } } /* sprite format: * * word bit usage * --------+-fedcba9876543210-+---------------- * 0 | ---------------x | flip x * | --------------x- | flip y * | -------------x-- | enable * | ----------x----- | blend * | --------xx------ | sprite-tile priority * 1 | xxxxxxxxxxxxxxxx | number * 2 | --------xxxx---- | palette * | --------------xx | size: 8x8, 16x16, 32x32, 64x64 * 3 | xxxxxxxxxxxxxxxx | y position * 4 | xxxxxxxxxxxxxxxx | x position * 5,6,7| | unused */ #define NUM_SPRITES 256 static void gaiden_draw_sprites(running_machine *machine, mame_bitmap *bitmap_bg, mame_bitmap *bitmap_fg, mame_bitmap *bitmap_sp, const rectangle *cliprect) { static const UINT8 layout[8][8] = { { 0, 1, 4, 5,16,17,20,21}, { 2, 3, 6, 7,18,19,22,23}, { 8, 9,12,13,24,25,28,29}, {10,11,14,15,26,27,30,31}, {32,33,36,37,48,49,52,53}, {34,35,38,39,50,51,54,55}, {40,41,44,45,56,57,60,61}, {42,43,46,47,58,59,62,63} }; const gfx_element *gfx = machine->gfx[3]; mame_bitmap *bitmap = bitmap_bg; const UINT16 *source = (NUM_SPRITES - 1) * 8 + spriteram16; const UINT8 blend_support = (bitmap_fg && bitmap_sp); int count = NUM_SPRITES; /* draw all sprites from front to back */ while (count--) { UINT32 attributes = source[0]; UINT32 priority_mask; int col,row; if (attributes & 0x04) { UINT32 priority = (attributes >> 6) & 3; UINT32 flipx = (attributes & 1); UINT32 flipy = (attributes & 2); UINT32 color = source[2]; UINT32 sizex = 1 << ((color >> 0) & 3); /* 1,2,4,8 */ UINT32 sizey = 1 << ((color >> gaiden_sprite_sizey) & 3); /* 1,2,4,8 */ /* raiga needs something like this */ UINT32 number = (source[1] & (sizex > 2 ? 0x7ff8 : 0x7ffc)); int ypos = source[3] & 0x01ff; int xpos = source[4] & 0x01ff; if (!blend_support && (attributes & 0x20) && (cpu_getcurrentframe() & 1)) goto skip_sprite; color = (color >> 4) & 0x0f; /* wraparound */ if (xpos >= 256) xpos -= 512; if (ypos >= 256) ypos -= 512; if (flip_screen) { flipx = !flipx; flipy = !flipy; xpos = 256 - (8 * sizex) - xpos; ypos = 256 - (8 * sizey) - ypos; if (xpos <= -256) xpos += 512; if (ypos <= -256) ypos += 512; } /* bg: 1; fg:2; text: 4 */ switch( priority ) { default: case 0x0: priority_mask = 0; break; case 0x1: priority_mask = 0xf0; break; /* obscured by text layer */ case 0x2: priority_mask = 0xf0 | 0xcc; break; /* obscured by foreground */ case 0x3: priority_mask = 0xf0 | 0xcc | 0xaa; break; /* obscured by bg and fg */ } /* blending */ if (blend_support && (attributes & 0x20)) { color |= 0x80; for (row = 0; row < sizey; row++) { for (col = 0; col < sizex; col++) { int sx = xpos + 8 * (flipx ? (sizex - 1 - col) : col); int sy = ypos + 8 * (flipy ? (sizey - 1 - row) : row); pdrawgfx(bitmap_sp, gfx, number + layout[row][col], color, flipx, flipy, sx, sy, cliprect, TRANSPARENCY_PEN, 0, priority_mask); } } } else { if (blend_support) bitmap = (priority >= 2) ? bitmap_bg : bitmap_fg; for (row = 0; row < sizey; row++) { for (col = 0; col < sizex; col++) { int sx = xpos + 8 * (flipx ? (sizex - 1 - col) : col); int sy = ypos + 8 * (flipy ? (sizey - 1 - row) : row); pdrawgfx(bitmap, gfx, number + layout[row][col], color, flipx, flipy, sx, sy, cliprect, TRANSPARENCY_PEN, 0, priority_mask); } } } } skip_sprite: source -= 8; } } /* sprite format: * * word bit usage * --------+-fedcba9876543210-+---------------- * 0 | --------xxxxxxxx | sprite code (lower bits) * | ---xxxxx-------- | unused ? * 1 | --------xxxxxxxx | y position * | ------x--------- | unused ? * 2 | --------xxxxxxxx | x position * | -------x-------- | unused ? * 3 | -----------xxxxx | sprite code (upper bits) * | ----------x----- | sprite-tile priority * | ---------x------ | flip x * | --------x------- | flip y * 0x400 |-------------xxxx | color * |---------x------- | x position (high bit) */ static void drgnbowl_draw_sprites(running_machine *machine, mame_bitmap *bitmap, const rectangle *cliprect) { int i, code, color, x, y, flipx, flipy, priority_mask; for( i = 0; i < 0x800/2; i += 4 ) { code = (spriteram16[i + 0] & 0xff) | ((spriteram16[i + 3] & 0x1f) << 8); y = 256 - (spriteram16[i + 1] & 0xff) - 12; x = spriteram16[i + 2] & 0xff; color = (spriteram16[(0x800/2) + i] & 0x0f); flipx = spriteram16[i + 3] & 0x40; flipy = spriteram16[i + 3] & 0x80; if(spriteram16[(0x800/2) + i] & 0x80) x -= 256; x += 256; if(spriteram16[i + 3] & 0x20) priority_mask = 0xf0 | 0xcc; /* obscured by foreground */ else priority_mask = 0; pdrawgfx(bitmap,machine->gfx[3], code, color,flipx,flipy,x,y, cliprect, TRANSPARENCY_PEN,15, priority_mask); /* wrap x*/ pdrawgfx(bitmap,machine->gfx[3], code, color,flipx,flipy,x-512,y, cliprect, TRANSPARENCY_PEN,15, priority_mask); } } VIDEO_UPDATE( gaiden ) { fillbitmap(priority_bitmap, 0, cliprect); fillbitmap(bitmap, machine->pens[0x200], cliprect); tilemap_draw(bitmap, cliprect, background, 0, 1); tilemap_draw(bitmap, cliprect, foreground, 0, 2); tilemap_draw(bitmap, cliprect, text_layer, 0, 4); gaiden_draw_sprites(machine, bitmap, NULL, NULL, cliprect); return 0; } VIDEO_UPDATE( raiga ) { fillbitmap(priority_bitmap, 0, cliprect); fillbitmap(tile_bitmap_bg, 0x200, cliprect); fillbitmap(tile_bitmap_fg, 0, cliprect); fillbitmap(sprite_bitmap, 0, cliprect); /* draw tilemaps into a 16-bit bitmap */ tilemap_draw(tile_bitmap_bg, cliprect,background, 0, 1); tilemap_draw(tile_bitmap_fg, cliprect,foreground, 0, 2); /* draw the blended tiles at a lower priority so sprites covered by them will still be drawn */ tilemap_draw(tile_bitmap_fg, cliprect,foreground, 1, 0); tilemap_draw(tile_bitmap_fg, cliprect,text_layer, 0, 4); /* draw sprites into a 16-bit bitmap */ gaiden_draw_sprites(machine, tile_bitmap_bg, tile_bitmap_fg, sprite_bitmap, cliprect); /* mix & blend the tilemaps and sprites into a 32-bit bitmap */ blendbitmaps(machine, bitmap, tile_bitmap_bg, tile_bitmap_fg, sprite_bitmap, 0, 0, cliprect); return 0; } VIDEO_UPDATE( drgnbowl ) { fillbitmap(priority_bitmap, 0, cliprect); tilemap_draw(bitmap, cliprect, background, 0, 1); tilemap_draw(bitmap, cliprect, foreground, 0, 2); tilemap_draw(bitmap, cliprect, text_layer, 0, 4); drgnbowl_draw_sprites(machine, bitmap, cliprect); return 0; }