summaryrefslogblamecommitdiffstatshomepage
path: root/src/mame/video/ladyfrog.c
blob: ffa0d7390ef49f3340542b552c81fbdc95e68f5a (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/ladyfrog.h"


WRITE8_HANDLER(ladyfrog_spriteram_w)
{
	ladyfrog_state *state = space->machine().driver_data<ladyfrog_state>();
	state->m_spriteram[offset] = data;
}

READ8_HANDLER(ladyfrog_spriteram_r)
{
	ladyfrog_state *state = space->machine().driver_data<ladyfrog_state>();
	return state->m_spriteram[offset];
}

static TILE_GET_INFO( get_tile_info )
{
	ladyfrog_state *state = machine.driver_data<ladyfrog_state>();
	int pal = state->m_videoram[tile_index * 2 + 1] & 0x0f;
	int tile = state->m_videoram[tile_index * 2] + ((state->m_videoram[tile_index * 2 + 1] & 0xc0) << 2)+ ((state->m_videoram[tile_index * 2 + 1] & 0x30) << 6);
	SET_TILE_INFO(
			0,
			tile + 0x1000 * state->m_tilebank,
			pal,TILE_FLIPY
			);
}

WRITE8_HANDLER( ladyfrog_videoram_w )
{
	ladyfrog_state *state = space->machine().driver_data<ladyfrog_state>();
	state->m_videoram[offset] = data;
	tilemap_mark_tile_dirty(state->m_bg_tilemap, offset >> 1);
}

READ8_HANDLER( ladyfrog_videoram_r )
{
	ladyfrog_state *state = space->machine().driver_data<ladyfrog_state>();
	return state->m_videoram[offset];
}

WRITE8_HANDLER( ladyfrog_palette_w )
{
	ladyfrog_state *state = space->machine().driver_data<ladyfrog_state>();

	if (offset & 0x100)
		paletteram_xxxxBBBBGGGGRRRR_split2_w(space, (offset & 0xff) + (state->m_palette_bank << 8), data);
	else
		paletteram_xxxxBBBBGGGGRRRR_split1_w(space, (offset & 0xff) + (state->m_palette_bank << 8), data);
}

READ8_HANDLER( ladyfrog_palette_r )
{
	ladyfrog_state *state = space->machine().driver_data<ladyfrog_state>();

	if (offset & 0x100)
		return space->machine().generic.paletteram2.u8[(offset & 0xff) + (state->m_palette_bank << 8)];
	else
		return space->machine().generic.paletteram.u8[(offset & 0xff) + (state->m_palette_bank << 8)];
}

WRITE8_HANDLER( ladyfrog_gfxctrl_w )
{
	ladyfrog_state *state = space->machine().driver_data<ladyfrog_state>();
	state->m_palette_bank = (data & 0x20) >> 5;
}

WRITE8_HANDLER( ladyfrog_gfxctrl2_w )
{
	ladyfrog_state *state = space->machine().driver_data<ladyfrog_state>();
	state->m_tilebank = ((data & 0x18) >> 3) ^ 3;
	tilemap_mark_all_tiles_dirty(state->m_bg_tilemap);
}


#ifdef UNUSED_FUNCTION
int gfxctrl;

READ8_HANDLER( ladyfrog_gfxctrl_r )
{
	return gfxctrl;
}
#endif

READ8_HANDLER( ladyfrog_scrlram_r )
{
	ladyfrog_state *state = space->machine().driver_data<ladyfrog_state>();
	return state->m_scrlram[offset];
}

WRITE8_HANDLER( ladyfrog_scrlram_w )
{
	ladyfrog_state *state = space->machine().driver_data<ladyfrog_state>();

	state->m_scrlram[offset] = data;
	tilemap_set_scrolly(state->m_bg_tilemap, offset, data);
}

static void draw_sprites( running_machine &machine, bitmap_t *bitmap, const rectangle *cliprect )
{
	ladyfrog_state *state = machine.driver_data<ladyfrog_state>();
	int i;
	for (i = 0; i < 0x20; i++)
	{
		int pr = state->m_spriteram[0x9f - i];
		int offs = (pr & 0x1f) * 4;
		{
			int code, sx, sy, flipx, flipy, pal;
			code = state->m_spriteram[offs + 2] + ((state->m_spriteram[offs + 1] & 0x10) << 4) + state->m_spritetilebase;
			pal = state->m_spriteram[offs + 1] & 0x0f;
			sx = state->m_spriteram[offs + 3];
			sy = 238 - state->m_spriteram[offs + 0];
			flipx = ((state->m_spriteram[offs + 1] & 0x40)>>6);
			flipy = ((state->m_spriteram[offs + 1] & 0x80)>>7);
			drawgfx_transpen(bitmap,cliprect,machine.gfx[1],
					code,
					pal,
					flipx,flipy,
					sx,sy,15);

			if (state->m_spriteram[offs + 3] > 240)
			{
				sx = (state->m_spriteram[offs + 3] - 256);
				drawgfx_transpen(bitmap,cliprect,machine.gfx[1],
        				code,
				        pal,
				        flipx,flipy,
					      sx,sy,15);
			}
		}
	}
}

static VIDEO_START( ladyfrog_common )
{
	ladyfrog_state *state = machine.driver_data<ladyfrog_state>();

	state->m_spriteram = auto_alloc_array(machine, UINT8, 160);
	state->m_bg_tilemap = tilemap_create(machine, get_tile_info, tilemap_scan_rows, 8, 8, 32, 32);

	machine.generic.paletteram.u8 = auto_alloc_array(machine, UINT8, 0x200);
	machine.generic.paletteram2.u8 = auto_alloc_array(machine, UINT8, 0x200);
	tilemap_set_scroll_cols(state->m_bg_tilemap, 32);
	tilemap_set_scrolldy(state->m_bg_tilemap, 15, 15);

	state_save_register_global_pointer(machine, machine.generic.paletteram.u8, 0x200);
	state_save_register_global_pointer(machine, machine.generic.paletteram2.u8, 0x200);
	state->save_pointer(NAME(state->m_spriteram), 160);
}

VIDEO_START( ladyfrog )
{
	ladyfrog_state *state = machine.driver_data<ladyfrog_state>();

	// weird, there are sprite tiles at 0x000 and 0x400, but they don't contain all the sprites!
	state->m_spritetilebase = 0x800;
	VIDEO_START_CALL(ladyfrog_common);
}

VIDEO_START( toucheme )
{
	ladyfrog_state *state = machine.driver_data<ladyfrog_state>();

	state->m_spritetilebase = 0x000;
	VIDEO_START_CALL(ladyfrog_common);
}


SCREEN_UPDATE( ladyfrog )
{
	ladyfrog_state *state = screen->machine().driver_data<ladyfrog_state>();

	tilemap_draw(bitmap, cliprect, state->m_bg_tilemap, 0, 0);
	draw_sprites(screen->machine(), bitmap, cliprect);
	return 0;
}