1 // license:BSD-3-Clause
2 // copyright-holders:Tomasz Slanina
3 /***************************************************************************
4 
5   ladyfrog.cpp
6 
7   Functions to emulate the video hardware of the machine.
8 
9 ***************************************************************************/
10 #include "emu.h"
11 #include "includes/ladyfrog.h"
12 
13 
ladyfrog_spriteram_w(offs_t offset,uint8_t data)14 void ladyfrog_state::ladyfrog_spriteram_w(offs_t offset, uint8_t data)
15 {
16 	m_spriteram[offset] = data;
17 }
18 
ladyfrog_spriteram_r(offs_t offset)19 uint8_t ladyfrog_state::ladyfrog_spriteram_r(offs_t offset)
20 {
21 	return m_spriteram[offset];
22 }
23 
TILE_GET_INFO_MEMBER(ladyfrog_state::get_tile_info)24 TILE_GET_INFO_MEMBER(ladyfrog_state::get_tile_info)
25 {
26 	int pal = m_videoram[tile_index * 2 + 1] & 0x0f;
27 	int tile = m_videoram[tile_index * 2] + ((m_videoram[tile_index * 2 + 1] & 0xc0) << 2)+ ((m_videoram[tile_index * 2 + 1] & 0x30) << 6);
28 	tileinfo.set(0,
29 			tile + 0x1000 * m_tilebank,
30 			pal,TILE_FLIPY
31 			);
32 }
33 
ladyfrog_videoram_w(offs_t offset,uint8_t data)34 void ladyfrog_state::ladyfrog_videoram_w(offs_t offset, uint8_t data)
35 {
36 	m_videoram[offset] = data;
37 	m_bg_tilemap->mark_tile_dirty(offset >> 1);
38 }
39 
ladyfrog_videoram_r(offs_t offset)40 uint8_t ladyfrog_state::ladyfrog_videoram_r(offs_t offset)
41 {
42 	return m_videoram[offset];
43 }
44 
ladyfrog_palette_w(offs_t offset,uint8_t data)45 void ladyfrog_state::ladyfrog_palette_w(offs_t offset, uint8_t data)
46 {
47 	if (offset & 0x100)
48 		m_palette->write8_ext((offset & 0xff) + (m_palette_bank << 8), data);
49 	else
50 		m_palette->write8((offset & 0xff) + (m_palette_bank << 8), data);
51 }
52 
ladyfrog_palette_r(offs_t offset)53 uint8_t ladyfrog_state::ladyfrog_palette_r(offs_t offset)
54 {
55 	if (offset & 0x100)
56 		return m_paletteram_ext[(offset & 0xff) + (m_palette_bank << 8)];
57 	else
58 		return m_paletteram[(offset & 0xff) + (m_palette_bank << 8)];
59 }
60 
ladyfrog_gfxctrl_w(uint8_t data)61 void ladyfrog_state::ladyfrog_gfxctrl_w(uint8_t data)
62 {
63 	m_palette_bank = (data & 0x20) >> 5;
64 }
65 
ladyfrog_gfxctrl2_w(uint8_t data)66 void ladyfrog_state::ladyfrog_gfxctrl2_w(uint8_t data)
67 {
68 	m_tilebank = ((data & 0x18) >> 3) ^ 3;
69 	m_bg_tilemap->mark_all_dirty();
70 }
71 
72 
73 #ifdef UNUSED_FUNCTION
74 int gfxctrl;
75 
ladyfrog_gfxctrl_r()76 uint8_t ladyfrog_state::ladyfrog_gfxctrl_r()
77 {
78 	return gfxctrl;
79 }
80 #endif
81 
ladyfrog_scrlram_r(offs_t offset)82 uint8_t ladyfrog_state::ladyfrog_scrlram_r(offs_t offset)
83 {
84 	return m_scrlram[offset];
85 }
86 
ladyfrog_scrlram_w(offs_t offset,uint8_t data)87 void ladyfrog_state::ladyfrog_scrlram_w(offs_t offset, uint8_t data)
88 {
89 	m_scrlram[offset] = data;
90 	m_bg_tilemap->set_scrolly(offset, data);
91 }
92 
draw_sprites(bitmap_ind16 & bitmap,const rectangle & cliprect)93 void ladyfrog_state::draw_sprites( bitmap_ind16 &bitmap, const rectangle &cliprect )
94 {
95 	int i;
96 	for (i = 0; i < 0x20; i++)
97 	{
98 		int pr = m_spriteram[0x9f - i];
99 		int offs = (pr & 0x1f) * 4;
100 		{
101 			int code, sx, sy, flipx, flipy, pal;
102 			code = m_spriteram[offs + 2] + ((m_spriteram[offs + 1] & 0x10) << 4) + m_spritetilebase;
103 			pal = m_spriteram[offs + 1] & 0x0f;
104 			sx = m_spriteram[offs + 3];
105 			sy = 238 - m_spriteram[offs + 0];
106 			flipx = ((m_spriteram[offs + 1] & 0x40)>>6);
107 			flipy = ((m_spriteram[offs + 1] & 0x80)>>7);
108 			m_gfxdecode->gfx(1)->transpen(bitmap,cliprect,
109 					code,
110 					pal,
111 					flipx,flipy,
112 					sx,sy,15);
113 
114 			if (m_spriteram[offs + 3] > 240)
115 			{
116 				sx = (m_spriteram[offs + 3] - 256);
117 				m_gfxdecode->gfx(1)->transpen(bitmap,cliprect,
118 						code,
119 						pal,
120 						flipx,flipy,
121 							sx,sy,15);
122 			}
123 		}
124 	}
125 }
126 
VIDEO_START_MEMBER(ladyfrog_state,ladyfrog_common)127 VIDEO_START_MEMBER(ladyfrog_state,ladyfrog_common)
128 {
129 	m_spriteram = std::make_unique<uint8_t[]>(160);
130 	m_bg_tilemap = &machine().tilemap().create(*m_gfxdecode, tilemap_get_info_delegate(*this, FUNC(ladyfrog_state::get_tile_info)), TILEMAP_SCAN_ROWS, 8, 8, 32, 32);
131 
132 	m_paletteram.resize(0x200);
133 	m_paletteram_ext.resize(0x200);
134 	m_palette->basemem().set(m_paletteram, ENDIANNESS_LITTLE, 1);
135 	m_palette->extmem().set(m_paletteram_ext, ENDIANNESS_LITTLE, 1);
136 
137 	m_bg_tilemap->set_scroll_cols(32);
138 	m_bg_tilemap->set_scrolldy(15, 15);
139 
140 	save_pointer(NAME(m_spriteram), 160);
141 	save_item(NAME(m_paletteram));
142 	save_item(NAME(m_paletteram_ext));
143 }
144 
video_start()145 void ladyfrog_state::video_start()
146 {
147 	// weird, there are sprite tiles at 0x000 and 0x400, but they don't contain all the sprites!
148 	m_spritetilebase = 0x800;
149 	VIDEO_START_CALL_MEMBER(ladyfrog_common);
150 }
151 
VIDEO_START_MEMBER(ladyfrog_state,toucheme)152 VIDEO_START_MEMBER(ladyfrog_state,toucheme)
153 {
154 	m_spritetilebase = 0x000;
155 	VIDEO_START_CALL_MEMBER(ladyfrog_common);
156 }
157 
158 
screen_update_ladyfrog(screen_device & screen,bitmap_ind16 & bitmap,const rectangle & cliprect)159 uint32_t ladyfrog_state::screen_update_ladyfrog(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect)
160 {
161 	m_bg_tilemap->draw(screen, bitmap, cliprect, 0, 0);
162 	draw_sprites(bitmap, cliprect);
163 	return 0;
164 }
165