1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
|
/* video/namcofl.c */
#include "emu.h"
#include "includes/namcoic.h"
#include "includes/namcos2.h"
#include "includes/namcofl.h"
/* nth_word32 is a general-purpose utility function, which allows us to
* read from 32-bit aligned memory as if it were an array of 16 bit words.
*/
#ifdef UNUSED_FUNCTION
INLINE UINT16
nth_word32( const UINT32 *source, int which )
{
source += which/2;
which ^= 1; /* i960 is little-endian */
if( which&1 )
{
return (*source)&0xffff;
}
else
{
return (*source)>>16;
}
}
#endif
/* nth_byte32 is a general-purpose utility function, which allows us to
* read from 32-bit aligned memory as if it were an array of bytes.
*/
#ifdef UNUSED_FUNCTION
INLINE UINT8
nth_byte32( const UINT32 *pSource, int which )
{
UINT32 data = pSource[which/4];
which ^= 3; /* i960 is little-endian */
switch( which&3 )
{
case 0: return data>>24;
case 1: return (data>>16)&0xff;
case 2: return (data>>8)&0xff;
default: return data&0xff;
}
} /* nth_byte32 */
#endif
static void namcofl_install_palette(running_machine &machine)
{
int pen, page, dword_offset, byte_offset;
UINT32 r,g,b;
UINT32 *pSource;
/* this is unnecessarily expensive. Better would be to mark palette entries dirty as
* they are modified, and only process those that have changed.
*/
pen = 0;
for( page=0; page<4; page++ )
{
pSource = &machine.generic.paletteram.u32[page*0x2000/4];
for( dword_offset=0; dword_offset<0x800/4; dword_offset++ )
{
r = pSource[dword_offset+0x0000/4];
g = pSource[dword_offset+0x0800/4];
b = pSource[dword_offset+0x1000/4];
for( byte_offset=0; byte_offset<4; byte_offset++ )
{
palette_set_color_rgb( machine, pen++, r&0xff, g&0xff, b&0xff);
r>>=8; g>>=8; b>>=8;
}
}
}
}
static void TilemapCB(running_machine &machine, UINT16 code, int *tile, int *mask )
{
*tile = code;
*mask = code;
}
SCREEN_UPDATE( namcofl )
{
int pri;
namcofl_install_palette(screen->machine());
bitmap_fill( bitmap, cliprect , get_black_pen(screen->machine()));
for( pri=0; pri<16; pri++ )
{
namco_roz_draw( bitmap,cliprect,pri );
if((pri&1)==0)
namco_tilemap_draw( bitmap, cliprect, pri>>1 );
namco_obj_draw(screen->machine(), bitmap, cliprect, pri );
}
return 0;
}
// NOTE : The two low bits toggle banks (code + 0x4000) for two
// groups of sprites. I am unsure how to differentiate those groups
// at this time however.
WRITE32_HANDLER(namcofl_spritebank_w)
{
namcofl_state *state = space->machine().driver_data<namcofl_state>();
COMBINE_DATA(&state->m_sprbank);
}
static int FLobjcode2tile( running_machine &machine, int code )
{
namcofl_state *state = machine.driver_data<namcofl_state>();
if ((code & 0x2000) && (state->m_sprbank & 2)) { code += 0x4000; }
return code;
}
VIDEO_START( namcofl )
{
namco_tilemap_init( machine, NAMCOFL_TILEGFX, machine.region(NAMCOFL_TILEMASKREGION)->base(), TilemapCB );
namco_obj_init(machine,NAMCOFL_SPRITEGFX,0x0,FLobjcode2tile);
namco_roz_init(machine,NAMCOFL_ROTGFX,NAMCOFL_ROTMASKREGION);
}
|