summaryrefslogblamecommitdiffstatshomepage
path: root/src/mame/video/lastduel.c
blob: 75a90cad9a7aff8ababfc5beaf2d6397e1d56e1d (plain) (tree)
1
2
3
4
5
6
7
8
9







                                                                            
                
                              









                                                                            
                                                                      

                                                             







                                                          
                                                                      

                                                             









                                                          
                                                                      

                                                          








                                                          
                                                                      

                                                          









                                                          
                                                                      
                                             
















                                                                            
                                                                      


                                                                                                              
 


                                                                      
 


                                          



                      
                                                                      


                                                                                                      
 



                                                                      
 

                                          











                                                                            
                               
         
                                                               
 



                                                                  




                                    
                                                                               
 
                                                      

                       




                                                                                 


                                                                                 




                                     
                                                                               
 

                                                                 



                                     
                                                                               
 

                                                                 



                                  
                                                                               
 

                                                             



                                    
                                                                               
 

                                                                     



                                    
                                                                               
 

                                                                     

 

                                          
                                                                               
 
                                     
                                                          
 
                                                            
                                      
 


                                                             
 
                                                                                 
 






                                                                            
                                                                                                          
 
                                                                      
 
                                                                              

                 
                                      
                             
                                                                           
 
                                                    
         
                                                            
 
                                                      
                                                                                     
                 
                                                                          
                                         
                                                                           
                                         


                                                  

                                                            



                                    
                                                                                                         

                                    
                                             






                                       
                                                 
                                               


                                            
                                          


         
                         
 
                                                                                
 

                                                                                    
                                                             
                                                                                    
                                                             
                                                                  


                 
                        
 
                                                                                
 
                                      
         
                                                                                                                  
                                                                     

                                                                                            
                                                                     


            

                                                                                            
                                                                     
                                                                                            
                                                                     
         
                                                                  

                 
 
                      
 
                                                                                     
 


                                                                                 
                                                  
 
/***************************************************************************

  video.c

  Functions to emulate the video hardware of the machine.

***************************************************************************/

#include "emu.h"
#include "includes/lastduel.h"


/***************************************************************************

  Callbacks for the TileMap code

***************************************************************************/

static TILE_GET_INFO( ld_get_bg_tile_info )
{
	lastduel_state *state = machine.driver_data<lastduel_state>();
	int tile = state->m_scroll2[2 * tile_index] & 0x1fff;
	int color = state->m_scroll2[2 * tile_index + 1];
	SET_TILE_INFO(
			2,
			tile,color & 0xf,
			TILE_FLIPYX((color & 0x60) >> 5));
}

static TILE_GET_INFO( ld_get_fg_tile_info )
{
	lastduel_state *state = machine.driver_data<lastduel_state>();
	int tile = state->m_scroll1[2 * tile_index] & 0x1fff;
	int color = state->m_scroll1[2 * tile_index + 1];
	SET_TILE_INFO(
			3,
			tile,
			color & 0xf,
			TILE_FLIPYX((color & 0x60) >> 5));
	tileinfo->group = (color & 0x80) >> 7;
}

static TILE_GET_INFO( get_bg_tile_info )
{
	lastduel_state *state = machine.driver_data<lastduel_state>();
	int tile = state->m_scroll2[tile_index] & 0x1fff;
	int color = state->m_scroll2[tile_index + 0x0800];
	SET_TILE_INFO(
			2,
			tile,
			color & 0xf,
			TILE_FLIPYX((color & 0x60) >> 5));
}

static TILE_GET_INFO( get_fg_tile_info )
{
	lastduel_state *state = machine.driver_data<lastduel_state>();
	int tile = state->m_scroll1[tile_index] & 0x1fff;
	int color = state->m_scroll1[tile_index + 0x0800];
	SET_TILE_INFO(
			3,
			tile,
			color & 0xf,
			TILE_FLIPYX((color & 0x60) >> 5));
	tileinfo->group = (color & 0x10) >> 4;
}

static TILE_GET_INFO( get_fix_info )
{
	lastduel_state *state = machine.driver_data<lastduel_state>();
	int tile = state->m_vram[tile_index];
	SET_TILE_INFO(
			1,
			tile & 0x7ff,
			tile>>12,
			(tile & 0x800) ? TILE_FLIPY : 0);
}



/***************************************************************************

  Start the video hardware emulation.

***************************************************************************/

VIDEO_START( lastduel )
{
	lastduel_state *state = machine.driver_data<lastduel_state>();
	state->m_bg_tilemap = tilemap_create(machine, ld_get_bg_tile_info, tilemap_scan_rows, 16, 16, 64, 64);
	state->m_fg_tilemap = tilemap_create(machine, ld_get_fg_tile_info, tilemap_scan_rows, 16, 16, 64, 64);
	state->m_tx_tilemap = tilemap_create(machine, get_fix_info, tilemap_scan_rows, 8, 8, 64, 32);

	tilemap_set_transmask(state->m_fg_tilemap, 0, 0xffff, 0x0001);
	tilemap_set_transmask(state->m_fg_tilemap, 1, 0xf07f, 0x0f81);
	tilemap_set_transparent_pen(state->m_tx_tilemap, 3);

	state->m_sprite_flipy_mask = 0x40;
	state->m_sprite_pri_mask = 0x00;
	state->m_tilemap_priority = 0;
}

VIDEO_START( madgear )
{
	lastduel_state *state = machine.driver_data<lastduel_state>();
	state->m_bg_tilemap = tilemap_create(machine, get_bg_tile_info,tilemap_scan_cols,16,16,64,32);
	state->m_fg_tilemap = tilemap_create(machine, get_fg_tile_info,tilemap_scan_cols,16,16,64,32);
	state->m_tx_tilemap = tilemap_create(machine, get_fix_info,tilemap_scan_rows,8,8,64,32);

	tilemap_set_transmask(state->m_fg_tilemap, 0, 0xffff, 0x8000);
	tilemap_set_transmask(state->m_fg_tilemap, 1, 0x80ff, 0xff00);
	tilemap_set_transparent_pen(state->m_tx_tilemap, 3);
	tilemap_set_transparent_pen(state->m_bg_tilemap, 15);

	state->m_sprite_flipy_mask = 0x80;
	state->m_sprite_pri_mask = 0x10;
}



/***************************************************************************

  Memory handlers

***************************************************************************/

WRITE16_HANDLER( lastduel_flip_w )
{
	if (ACCESSING_BITS_0_7)
	{
		flip_screen_set(space->machine(), data & 0x01);

		coin_lockout_w(space->machine(), 0, ~data & 0x10);
		coin_lockout_w(space->machine(), 1, ~data & 0x20);
		coin_counter_w(space->machine(), 0, data & 0x40);
		coin_counter_w(space->machine(), 1, data & 0x80);
	}
}

WRITE16_HANDLER( lastduel_scroll_w )
{
	lastduel_state *state = space->machine().driver_data<lastduel_state>();

	data = COMBINE_DATA(&state->m_scroll[offset]);
	switch (offset)
	{
		case 0: tilemap_set_scrolly(state->m_fg_tilemap, 0, data); break;
		case 1: tilemap_set_scrollx(state->m_fg_tilemap, 0, data); break;
		case 2: tilemap_set_scrolly(state->m_bg_tilemap, 0, data); break;
		case 3: tilemap_set_scrollx(state->m_bg_tilemap, 0, data); break;
		case 7: state->m_tilemap_priority = data; break;
		default:
			logerror("Unmapped video write %d %04x\n", offset, data);
			break;
	}
}

WRITE16_HANDLER( lastduel_scroll1_w )
{
	lastduel_state *state = space->machine().driver_data<lastduel_state>();

	COMBINE_DATA(&state->m_scroll1[offset]);
	tilemap_mark_tile_dirty(state->m_fg_tilemap, offset / 2);
}

WRITE16_HANDLER( lastduel_scroll2_w )
{
	lastduel_state *state = space->machine().driver_data<lastduel_state>();

	COMBINE_DATA(&state->m_scroll2[offset]);
	tilemap_mark_tile_dirty(state->m_bg_tilemap, offset / 2);
}

WRITE16_HANDLER( lastduel_vram_w )
{
	lastduel_state *state = space->machine().driver_data<lastduel_state>();

	COMBINE_DATA(&state->m_vram[offset]);
	tilemap_mark_tile_dirty(state->m_tx_tilemap, offset);
}

WRITE16_HANDLER( madgear_scroll1_w )
{
	lastduel_state *state = space->machine().driver_data<lastduel_state>();

	COMBINE_DATA(&state->m_scroll1[offset]);
	tilemap_mark_tile_dirty(state->m_fg_tilemap, offset & 0x7ff);
}

WRITE16_HANDLER( madgear_scroll2_w )
{
	lastduel_state *state = space->machine().driver_data<lastduel_state>();

	COMBINE_DATA(&state->m_scroll2[offset]);
	tilemap_mark_tile_dirty(state->m_bg_tilemap, offset & 0x7ff);
}

WRITE16_HANDLER( lastduel_palette_word_w )
{
	lastduel_state *state = space->machine().driver_data<lastduel_state>();

	int red, green, blue, bright;
	data = COMBINE_DATA(&state->m_paletteram[offset]);

	// Brightness parameter interpreted same way as CPS1
	bright = 0x10 + (data & 0x0f);

	red   = ((data >> 12) & 0x0f) * bright * 0x11 / 0x1f;
	green = ((data >> 8)  & 0x0f) * bright * 0x11 / 0x1f;
	blue  = ((data >> 4)  & 0x0f) * bright * 0x11 / 0x1f;

	palette_set_color (space->machine(), offset, MAKE_RGB(red, green, blue));
}

/***************************************************************************

  Display refresh

***************************************************************************/

static void draw_sprites( running_machine &machine, bitmap_t *bitmap, const rectangle *cliprect, int pri )
{
	lastduel_state *state = machine.driver_data<lastduel_state>();

	UINT16 *buffered_spriteram16 = machine.generic.buffered_spriteram.u16;
	int offs;

	if (!state->m_sprite_pri_mask)
		if (pri == 1)
			return;	/* only low priority sprites in lastduel */

	for (offs = 0x400 - 4; offs >= 0; offs -= 4)
	{
		int attr, sy, sx, flipx, flipy, code, color;

		attr = buffered_spriteram16[offs + 1];
		if (state->m_sprite_pri_mask)	/* only madgear seems to have this */
		{
			if (pri == 1 && (attr & state->m_sprite_pri_mask))
				continue;
			if (pri == 0 && !(attr & state->m_sprite_pri_mask))
				continue;
		}

		code = buffered_spriteram16[offs];
		sx = buffered_spriteram16[offs + 3] & 0x1ff;
		sy = buffered_spriteram16[offs + 2] & 0x1ff;
		if (sy > 0x100)
			sy -= 0x200;

		flipx = attr & 0x20;
		flipy = attr & state->m_sprite_flipy_mask;	/* 0x40 for lastduel, 0x80 for madgear */
		color = attr & 0x0f;

		if (flip_screen_get(machine))
		{
			sx = 496 - sx;
			sy = 240 - sy;
			flipx = !flipx;
			flipy = !flipy;
		}

		drawgfx_transpen(bitmap,cliprect,
				machine.gfx[0],
				code,
				color,
				flipx,flipy,
				sx,sy,15);
	}
}

SCREEN_UPDATE( lastduel )
{
	lastduel_state *state = screen->machine().driver_data<lastduel_state>();

	tilemap_draw(bitmap, cliprect, state->m_bg_tilemap, 0, 0);
	tilemap_draw(bitmap, cliprect, state->m_fg_tilemap, TILEMAP_DRAW_LAYER1, 0);
	draw_sprites(screen->machine(), bitmap, cliprect, 0);
	tilemap_draw(bitmap, cliprect, state->m_fg_tilemap, TILEMAP_DRAW_LAYER0, 0);
	draw_sprites(screen->machine(), bitmap, cliprect, 1);
	tilemap_draw(bitmap, cliprect, state->m_tx_tilemap, 0, 0);
	return 0;
}

SCREEN_UPDATE( madgear )
{
	lastduel_state *state = screen->machine().driver_data<lastduel_state>();

	if (state->m_tilemap_priority)
	{
		tilemap_draw(bitmap, cliprect, state->m_fg_tilemap, TILEMAP_DRAW_LAYER1 | TILEMAP_DRAW_OPAQUE, 0);
		draw_sprites(screen->machine(), bitmap, cliprect, 0);
		tilemap_draw(bitmap, cliprect, state->m_fg_tilemap, TILEMAP_DRAW_LAYER0, 0);
		tilemap_draw(bitmap, cliprect, state->m_bg_tilemap, 0, 0);
		draw_sprites(screen->machine(), bitmap, cliprect, 1);
	}
	else
	{
		tilemap_draw(bitmap, cliprect, state->m_bg_tilemap, TILEMAP_DRAW_OPAQUE, 0);
		tilemap_draw(bitmap, cliprect, state->m_fg_tilemap, TILEMAP_DRAW_LAYER1, 0);
		draw_sprites(screen->machine(), bitmap, cliprect, 0);
		tilemap_draw(bitmap, cliprect, state->m_fg_tilemap, TILEMAP_DRAW_LAYER0, 0);
		draw_sprites(screen->machine(), bitmap, cliprect, 1);
	}
	tilemap_draw(bitmap, cliprect, state->m_tx_tilemap, 0, 0);
	return 0;
}

SCREEN_EOF( lastduel )
{
	address_space *space = machine.device("maincpu")->memory().space(AS_PROGRAM);

	/* Spriteram is always 1 frame ahead, suggesting buffering.  I can't find
        a register to control this so I assume it happens automatically
        every frame at the end of vblank */
	buffer_spriteram16_w(space, 0, 0, 0xffff);
}