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
|
/***********************************************
+-------------------------------------+
| |
| CAL OMEGA - SYSTEMS 903/904/905/906 |
| |
| Driver by Roberto Fresca. |
| |
+-------------------------------------+
* Video Hardware *
************************************************/
#include "emu.h"
#include "includes/calomega.h"
WRITE8_MEMBER(calomega_state::calomega_videoram_w)
{
m_videoram[offset] = data;
m_bg_tilemap->mark_tile_dirty(offset);
}
WRITE8_MEMBER(calomega_state::calomega_colorram_w)
{
m_colorram[offset] = data;
m_bg_tilemap->mark_tile_dirty(offset);
}
TILE_GET_INFO_MEMBER(calomega_state::get_bg_tile_info)
{
/* - bits -
7654 3210
--xx xx-- tiles color.
---- --x- tiles bank.
xx-- ---x seems unused. */
int attr = m_colorram[tile_index];
int code = m_videoram[tile_index];
int bank = (attr & 0x02) >> 1; /* bit 1 switch the gfx banks */
int color = (attr & 0x3c); /* bits 2-3-4-5 for color */
if (attr == 0x3a) /* Is the palette wrong? */
color = 0x3b; /* 0x3b is the best match */
if (attr == 0x36) /* Is the palette wrong? */
color = 0x3a; /* 0x3a is the best match */
if (attr == 0x32) /* Is the palette wrong? */
color = 0x39; /* 0x39 is the best match */
SET_TILE_INFO_MEMBER(m_gfxdecode, bank, code, color, 0);
}
void calomega_state::video_start()
{
m_bg_tilemap = &machine().tilemap().create(tilemap_get_info_delegate(FUNC(calomega_state::get_bg_tile_info),this), TILEMAP_SCAN_ROWS, 8, 8, 32, 31);
}
UINT32 calomega_state::screen_update_calomega(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect)
{
m_bg_tilemap->draw(screen, bitmap, cliprect, 0, 0);
return 0;
}
void calomega_state::palette_init()
{
const UINT8 *color_prom = memregion("proms")->base();
/* prom bits
7654 3210
---- ---x red component.
---- --x- green component.
---- -x-- blue component.
xxxx x--- unused.
*/
int i;
/* 00000BGR */
if (color_prom == 0) return;
for (i = 0;i < machine().total_colors();i++)
{
int bit0, bit1, bit2, r, g, b;
/* red component */
bit0 = (color_prom[i] >> 0) & 0x01;
r = bit0 * 0xff;
/* green component */
bit1 = (color_prom[i] >> 1) & 0x01;
g = bit1 * 0xff;
/* blue component */
bit2 = (color_prom[i] >> 2) & 0x01;
b = bit2 * 0xff;
palette_set_color(machine(), i, MAKE_RGB(r, g, b));
}
}
|