moved tecmosys video related stuff from drivers folder to video folder

This commit is contained in:
Michaël Banaan Ananas 2011-08-15 20:39:09 +00:00
parent 22473f07f6
commit 10d02ae673
5 changed files with 416 additions and 424 deletions

1
.gitattributes vendored
View File

@ -4665,6 +4665,7 @@ src/mame/video/tbowl.c svneol=native#text/plain
src/mame/video/tceptor.c svneol=native#text/plain src/mame/video/tceptor.c svneol=native#text/plain
src/mame/video/tecmo.c svneol=native#text/plain src/mame/video/tecmo.c svneol=native#text/plain
src/mame/video/tecmo16.c svneol=native#text/plain src/mame/video/tecmo16.c svneol=native#text/plain
src/mame/video/tecmosys.c svneol=native#text/plain
src/mame/video/tehkanwc.c svneol=native#text/plain src/mame/video/tehkanwc.c svneol=native#text/plain
src/mame/video/terracre.c svneol=native#text/plain src/mame/video/terracre.c svneol=native#text/plain
src/mame/video/tetrisp2.c svneol=native#text/plain src/mame/video/tetrisp2.c svneol=native#text/plain

View File

@ -191,79 +191,6 @@ ae500w07.ad1 - M6295 Samples (23c4001)
#include "sound/ymz280b.h" #include "sound/ymz280b.h"
static TILE_GET_INFO( get_bg0tile_info )
{
tecmosys_state *state = machine.driver_data<tecmosys_state>();
SET_TILE_INFO(
1,
state->m_bg0tilemap_ram[2*tile_index+1],
(state->m_bg0tilemap_ram[2*tile_index]&0x3f),
TILE_FLIPYX((state->m_bg0tilemap_ram[2*tile_index]&0xc0)>>6));
}
static WRITE16_HANDLER( bg0_tilemap_w )
{
tecmosys_state *state = space->machine().driver_data<tecmosys_state>();
COMBINE_DATA(&state->m_bg0tilemap_ram[offset]);
tilemap_mark_tile_dirty(state->m_bg0tilemap,offset/2);
}
static TILE_GET_INFO( get_bg1tile_info )
{
tecmosys_state *state = machine.driver_data<tecmosys_state>();
SET_TILE_INFO(
2,
state->m_bg1tilemap_ram[2*tile_index+1],
(state->m_bg1tilemap_ram[2*tile_index]&0x3f),
TILE_FLIPYX((state->m_bg1tilemap_ram[2*tile_index]&0xc0)>>6));
}
static WRITE16_HANDLER( bg1_tilemap_w )
{
tecmosys_state *state = space->machine().driver_data<tecmosys_state>();
COMBINE_DATA(&state->m_bg1tilemap_ram[offset]);
tilemap_mark_tile_dirty(state->m_bg1tilemap,offset/2);
}
static TILE_GET_INFO( get_bg2tile_info )
{
tecmosys_state *state = machine.driver_data<tecmosys_state>();
SET_TILE_INFO(
3,
state->m_bg2tilemap_ram[2*tile_index+1],
(state->m_bg2tilemap_ram[2*tile_index]&0x3f),
TILE_FLIPYX((state->m_bg2tilemap_ram[2*tile_index]&0xc0)>>6));
}
static WRITE16_HANDLER( bg2_tilemap_w )
{
tecmosys_state *state = space->machine().driver_data<tecmosys_state>();
COMBINE_DATA(&state->m_bg2tilemap_ram[offset]);
tilemap_mark_tile_dirty(state->m_bg2tilemap,offset/2);
}
static TILE_GET_INFO( get_tile_info )
{
tecmosys_state *state = machine.driver_data<tecmosys_state>();
SET_TILE_INFO(
0,
state->m_fgtilemap_ram[2*tile_index+1],
(state->m_fgtilemap_ram[2*tile_index]&0x3f),
TILE_FLIPYX((state->m_fgtilemap_ram[2*tile_index]&0xc0)>>6));
}
static WRITE16_HANDLER( fg_tilemap_w )
{
tecmosys_state *state = space->machine().driver_data<tecmosys_state>();
COMBINE_DATA(&state->m_fgtilemap_ram[offset]);
tilemap_mark_tile_dirty(state->m_txt_tilemap,offset/2);
}
// It looks like this needs a synch between z80 and 68k ??? See z80:006A-0091 // It looks like this needs a synch between z80 and 68k ??? See z80:006A-0091
static READ16_HANDLER( sound_r ) static READ16_HANDLER( sound_r )
{ {
@ -293,7 +220,6 @@ static WRITE16_HANDLER( sound_w )
- 880000 & 03, crash - 880000 & 03, crash
*/ */
static WRITE16_HANDLER( unk880000_w ) static WRITE16_HANDLER( unk880000_w )
{ {
tecmosys_state *state = space->machine().driver_data<tecmosys_state>(); tecmosys_state *state = space->machine().driver_data<tecmosys_state>();
@ -342,14 +268,12 @@ static READ16_HANDLER( unk880000_r )
} }
} }
static READ16_DEVICE_HANDLER( eeprom_r ) static READ16_DEVICE_HANDLER( eeprom_r )
{ {
eeprom_device *eeprom = downcast<eeprom_device *>(device); eeprom_device *eeprom = downcast<eeprom_device *>(device);
return ((eeprom->read_bit() & 0x01) << 11); return ((eeprom->read_bit() & 0x01) << 11);
} }
static WRITE16_DEVICE_HANDLER( eeprom_w ) static WRITE16_DEVICE_HANDLER( eeprom_w )
{ {
if ( ACCESSING_BITS_8_15 ) if ( ACCESSING_BITS_8_15 )
@ -361,42 +285,6 @@ static WRITE16_DEVICE_HANDLER( eeprom_w )
} }
} }
INLINE void set_color_555(running_machine &machine, pen_t color, int rshift, int gshift, int bshift, UINT16 data)
{
palette_set_color_rgb(machine, color, pal5bit(data >> rshift), pal5bit(data >> gshift), pal5bit(data >> bshift));
}
static WRITE16_HANDLER( tilemap_paletteram16_xGGGGGRRRRRBBBBB_word_w )
{
tecmosys_state *state = space->machine().driver_data<tecmosys_state>();
COMBINE_DATA(&state->m_tilemap_paletteram16[offset]);
set_color_555(space->machine(), offset+0x4000, 5, 10, 0, state->m_tilemap_paletteram16[offset]);
}
static WRITE16_HANDLER( bg0_tilemap_lineram_w )
{
tecmosys_state *state = space->machine().driver_data<tecmosys_state>();
COMBINE_DATA(&state->m_bg0tilemap_lineram[offset]);
if (data!=0x0000) popmessage("non 0 write to bg0 lineram %04x %04x",offset,data);
}
static WRITE16_HANDLER( bg1_tilemap_lineram_w )
{
tecmosys_state *state = space->machine().driver_data<tecmosys_state>();
COMBINE_DATA(&state->m_bg1tilemap_lineram[offset]);
if (data!=0x0000) popmessage("non 0 write to bg1 lineram %04x %04x",offset,data);
}
static WRITE16_HANDLER( bg2_tilemap_lineram_w )
{
tecmosys_state *state = space->machine().driver_data<tecmosys_state>();
COMBINE_DATA(&state->m_bg2tilemap_lineram[offset]);
if (data!=0x0000) popmessage("non 0 write to bg2 lineram %04x %04x",offset,data);
}
static ADDRESS_MAP_START( main_map, AS_PROGRAM, 16 ) static ADDRESS_MAP_START( main_map, AS_PROGRAM, 16 )
AM_RANGE(0x000000, 0x0fffff) AM_ROM AM_RANGE(0x000000, 0x0fffff) AM_ROM
AM_RANGE(0x200000, 0x20ffff) AM_RAM // work ram AM_RANGE(0x200000, 0x20ffff) AM_RAM // work ram
@ -437,6 +325,40 @@ static ADDRESS_MAP_START( main_map, AS_PROGRAM, 16 )
ADDRESS_MAP_END ADDRESS_MAP_END
static WRITE8_HANDLER( tecmosys_bankswitch_w )
{
memory_set_bank(space->machine(), "bank1", data);
}
static WRITE8_HANDLER( tecmosys_oki_bank_w )
{
UINT8 upperbank = (data & 0x30) >> 4;
UINT8 lowerbank = (data & 0x03) >> 0;
UINT8* region = space->machine().region("oki")->base();
memcpy( region+0x00000, region+0x80000 + lowerbank * 0x20000, 0x20000 );
memcpy( region+0x20000, region+0x80000 + upperbank * 0x20000, 0x20000 );
}
static ADDRESS_MAP_START( sound_map, AS_PROGRAM, 8 )
AM_RANGE(0x0000, 0x7fff) AM_ROM
AM_RANGE(0x8000, 0xbfff) AM_ROMBANK("bank1")
AM_RANGE(0xe000, 0xf7ff) AM_RAM
ADDRESS_MAP_END
static ADDRESS_MAP_START( io_map, AS_IO, 8 )
ADDRESS_MAP_GLOBAL_MASK(0xff)
AM_RANGE(0x00, 0x03) AM_DEVREADWRITE("ymf", ymf262_r, ymf262_w)
AM_RANGE(0x10, 0x10) AM_DEVWRITE_MODERN("oki", okim6295_device, write)
AM_RANGE(0x20, 0x20) AM_WRITE(tecmosys_oki_bank_w)
AM_RANGE(0x30, 0x30) AM_WRITE(tecmosys_bankswitch_w)
AM_RANGE(0x40, 0x40) AM_READ(soundlatch_r)
AM_RANGE(0x50, 0x50) AM_WRITE(soundlatch2_w)
AM_RANGE(0x60, 0x61) AM_DEVREADWRITE("ymz", ymz280b_r, ymz280b_w)
ADDRESS_MAP_END
static INPUT_PORTS_START( deroon ) static INPUT_PORTS_START( deroon )
PORT_START("P1") PORT_START("P1")
PORT_BIT( 0x0001, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_8WAY PORT_PLAYER(1) PORT_BIT( 0x0001, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_8WAY PORT_PLAYER(1)
@ -477,6 +399,8 @@ static INPUT_PORTS_START( deroon )
PORT_BIT( 0x8000, IP_ACTIVE_LOW, IPT_UNUSED ) PORT_BIT( 0x8000, IP_ACTIVE_LOW, IPT_UNUSED )
INPUT_PORTS_END INPUT_PORTS_END
static const gfx_layout gfxlayout = static const gfx_layout gfxlayout =
{ {
8,8, 8,8,
@ -501,9 +425,6 @@ static const gfx_layout gfxlayout2 =
128*8 128*8
}; };
static GFXDECODE_START( tecmosys ) static GFXDECODE_START( tecmosys )
GFXDECODE_ENTRY( "gfx2", 0, gfxlayout, 0x4400, 0x40 ) GFXDECODE_ENTRY( "gfx2", 0, gfxlayout, 0x4400, 0x40 )
GFXDECODE_ENTRY( "gfx3", 0, gfxlayout2, 0x4000, 0x40 ) GFXDECODE_ENTRY( "gfx3", 0, gfxlayout2, 0x4000, 0x40 )
@ -512,314 +433,6 @@ static GFXDECODE_START( tecmosys )
GFXDECODE_END GFXDECODE_END
static WRITE8_HANDLER( tecmosys_bankswitch_w )
{
memory_set_bank(space->machine(), "bank1", data);
}
static WRITE8_HANDLER( tecmosys_oki_bank_w )
{
UINT8 upperbank = (data & 0x30) >> 4;
UINT8 lowerbank = (data & 0x03) >> 0;
UINT8* region = space->machine().region("oki")->base();
memcpy( region+0x00000, region+0x80000 + lowerbank * 0x20000, 0x20000 );
memcpy( region+0x20000, region+0x80000 + upperbank * 0x20000, 0x20000 );
}
static ADDRESS_MAP_START( sound_map, AS_PROGRAM, 8 )
AM_RANGE(0x0000, 0x7fff) AM_ROM
AM_RANGE(0x8000, 0xbfff) AM_ROMBANK("bank1")
AM_RANGE(0xe000, 0xf7ff) AM_RAM
ADDRESS_MAP_END
static ADDRESS_MAP_START( io_map, AS_IO, 8 )
ADDRESS_MAP_GLOBAL_MASK(0xff)
AM_RANGE(0x00, 0x03) AM_DEVREADWRITE("ymf", ymf262_r, ymf262_w)
AM_RANGE(0x10, 0x10) AM_DEVWRITE_MODERN("oki", okim6295_device, write)
AM_RANGE(0x20, 0x20) AM_WRITE(tecmosys_oki_bank_w)
AM_RANGE(0x30, 0x30) AM_WRITE(tecmosys_bankswitch_w)
AM_RANGE(0x40, 0x40) AM_READ(soundlatch_r)
AM_RANGE(0x50, 0x50) AM_WRITE(soundlatch2_w)
AM_RANGE(0x60, 0x61) AM_DEVREADWRITE("ymz", ymz280b_r, ymz280b_w)
ADDRESS_MAP_END
static VIDEO_START(tecmosys)
{
tecmosys_state *state = machine.driver_data<tecmosys_state>();
state->m_sprite_bitmap = auto_bitmap_alloc(machine,320,240,BITMAP_FORMAT_INDEXED16);
bitmap_fill(state->m_sprite_bitmap, NULL, 0x4000);
state->m_tmp_tilemap_composebitmap = auto_bitmap_alloc(machine,320,240,BITMAP_FORMAT_INDEXED16);
state->m_tmp_tilemap_renderbitmap = auto_bitmap_alloc(machine,320,240,BITMAP_FORMAT_INDEXED16);
bitmap_fill(state->m_tmp_tilemap_composebitmap, NULL, 0x0000);
bitmap_fill(state->m_tmp_tilemap_renderbitmap, NULL, 0x0000);
state->m_txt_tilemap = tilemap_create(machine, get_tile_info,tilemap_scan_rows,8,8,32*2,32*2);
tilemap_set_transparent_pen(state->m_txt_tilemap,0);
state->m_bg0tilemap = tilemap_create(machine, get_bg0tile_info,tilemap_scan_rows,16,16,32,32);
tilemap_set_transparent_pen(state->m_bg0tilemap,0);
state->m_bg1tilemap = tilemap_create(machine, get_bg1tile_info,tilemap_scan_rows,16,16,32,32);
tilemap_set_transparent_pen(state->m_bg1tilemap,0);
state->m_bg2tilemap = tilemap_create(machine, get_bg2tile_info,tilemap_scan_rows,16,16,32,32);
tilemap_set_transparent_pen(state->m_bg2tilemap,0);
}
static void tecmosys_render_sprites_to_bitmap(running_machine &machine, bitmap_t *bitmap, UINT16 extrax, UINT16 extray )
{
tecmosys_state *state = machine.driver_data<tecmosys_state>();
UINT8 *gfxsrc = machine.region ( "gfx1" )->base();
int i;
/* render sprites (with priority information) to temp bitmap */
bitmap_fill(state->m_sprite_bitmap, NULL, 0x0000);
/* there are multiple spritelists in here, to allow for buffering */
for (i=(state->m_spritelist*0x4000)/2;i<((state->m_spritelist+1)*0x4000)/2;i+=8)
{
int xcnt,ycnt;
int drawx, drawy;
UINT16* dstptr;
int x, y;
int address;
int xsize = 16;
int ysize = 16;
int colour;
int flipx, flipy;
int priority;
int zoomx, zoomy;
x = state->m_spriteram[i+0]+386;
y = (state->m_spriteram[i+1]+1);
x-= extrax;
y-= extray;
y&=0x1ff;
x&=0x3ff;
if (x&0x200) x-=0x400;
if (y&0x100) y-=0x200;
address = state->m_spriteram[i+5]| ((state->m_spriteram[i+4]&0x000f)<<16);
address<<=8;
flipx = (state->m_spriteram[i+4]&0x0040)>>6;
flipy = (state->m_spriteram[i+4]&0x0080)>>7; // used by some move effects in tkdensho
zoomx = (state->m_spriteram[i+2] & 0x0fff)>>0; // zoom?
zoomy = (state->m_spriteram[i+3] & 0x0fff)>>0; // zoom?
if ((!zoomx) || (!zoomy)) continue;
ysize = ((state->m_spriteram[i+6] & 0x00ff))*16;
xsize = (((state->m_spriteram[i+6] & 0xff00)>>8))*16;
colour = ((state->m_spriteram[i+4] & 0x3f00))>>8;
priority = ((state->m_spriteram[i+4] & 0x0030))>>4;
if (state->m_spriteram[i+4] & 0x8000) continue;
for (ycnt = 0; ycnt < ysize; ycnt++)
{
int actualycnt = (ycnt * zoomy) >> 8;
int actualysize = (ysize * zoomy) >> 8;
if (flipy) drawy = y + (actualysize-1) - actualycnt;
else drawy = y + actualycnt;
for (xcnt = 0; xcnt < xsize; xcnt++)
{
int actualxcnt = (xcnt * zoomx) >> 8;
int actualxsize = (xsize *zoomx) >> 8;
if (flipx) drawx = x + (actualxsize-1) - actualxcnt;
else drawx = x + actualxcnt;
if ((drawx>=0 && drawx<320) && (drawy>=0 && drawy<240))
{
UINT8 data;
dstptr = BITMAP_ADDR16(state->m_sprite_bitmap, drawy, drawx);
data = (gfxsrc[address]);
if(data) dstptr[0] = (data + (colour*0x100)) | (priority << 14);
}
address++;
}
}
}
}
static void tecmosys_tilemap_copy_to_compose(tecmosys_state *state, UINT16 pri)
{
int y,x;
UINT16 *srcptr;
UINT16 *dstptr;
for (y=0;y<240;y++)
{
srcptr = BITMAP_ADDR16(state->m_tmp_tilemap_renderbitmap, y, 0);
dstptr = BITMAP_ADDR16(state->m_tmp_tilemap_composebitmap, y, 0);
for (x=0;x<320;x++)
{
if ((srcptr[x]&0xf)!=0x0)
dstptr[x] = (srcptr[x]&0x7ff) | pri;
}
}
}
static void tecmosys_do_final_mix(running_machine &machine, bitmap_t* bitmap)
{
tecmosys_state *state = machine.driver_data<tecmosys_state>();
const pen_t *paldata = machine.pens;
int y,x;
UINT16 *srcptr;
UINT16 *srcptr2;
UINT32 *dstptr;
for (y=0;y<240;y++)
{
srcptr = BITMAP_ADDR16(state->m_tmp_tilemap_composebitmap, y, 0);
srcptr2 = BITMAP_ADDR16(state->m_sprite_bitmap, y, 0);
dstptr = BITMAP_ADDR32(bitmap, y, 0);
for (x=0;x<320;x++)
{
UINT16 pri, pri2;
UINT16 penvalue;
UINT16 penvalue2;
UINT32 colour;
UINT32 colour2;
pri = srcptr[x] & 0xc000;
pri2 = srcptr2[x] & 0xc000;
penvalue = state->m_tilemap_paletteram16[srcptr[x]&0x7ff];
colour = paldata[(srcptr[x]&0x7ff) | 0x4000];
if (srcptr2[x]&0x3fff)
{
penvalue2 = machine.generic.paletteram.u16[srcptr2[x]&0x3fff];
colour2 = paldata[srcptr2[x]&0x3fff];
}
else
{
penvalue2 = state->m_tilemap_paletteram16[srcptr[x]&0x7ff];
colour2 = paldata[(srcptr[x]&0x7ff) | 0x4000];
}
if ((penvalue & 0x8000) && (penvalue2 & 0x8000)) // blend
{
int r,g,b;
int r2,g2,b2;
b = (colour & 0x000000ff) >> 0;
g = (colour & 0x0000ff00) >> 8;
r = (colour & 0x00ff0000) >> 16;
b2 = (colour2 & 0x000000ff) >> 0;
g2 = (colour2 & 0x0000ff00) >> 8;
r2 = (colour2 & 0x00ff0000) >> 16;
r = (r + r2) >> 1;
g = (g + g2) >> 1;
b = (b + b2) >> 1;
dstptr[x] = b | (g<<8) | (r<<16);
}
else if (pri2 >= pri)
{
dstptr[x] = colour2;
}
else
{
dstptr[x] = colour;
}
}
}
}
static SCREEN_UPDATE(tecmosys)
{
tecmosys_state *state = screen->machine().driver_data<tecmosys_state>();
bitmap_fill(bitmap,cliprect,screen->machine().pens[0x4000]);
tilemap_set_scrolly( state->m_bg0tilemap, 0, state->m_c80000regs[1]+16);
tilemap_set_scrollx( state->m_bg0tilemap, 0, state->m_c80000regs[0]+104);
tilemap_set_scrolly( state->m_bg1tilemap, 0, state->m_a80000regs[1]+17);
tilemap_set_scrollx( state->m_bg1tilemap, 0, state->m_a80000regs[0]+106);
tilemap_set_scrolly( state->m_bg2tilemap, 0, state->m_b00000regs[1]+17);
tilemap_set_scrollx( state->m_bg2tilemap, 0, state->m_b00000regs[0]+106);
bitmap_fill(state->m_tmp_tilemap_composebitmap,cliprect,0);
bitmap_fill(state->m_tmp_tilemap_renderbitmap,cliprect,0);
tilemap_draw(state->m_tmp_tilemap_renderbitmap,cliprect,state->m_bg0tilemap,0,0);
tecmosys_tilemap_copy_to_compose(state, 0x0000);
bitmap_fill(state->m_tmp_tilemap_renderbitmap,cliprect,0);
tilemap_draw(state->m_tmp_tilemap_renderbitmap,cliprect,state->m_bg1tilemap,0,0);
tecmosys_tilemap_copy_to_compose(state, 0x4000);
bitmap_fill(state->m_tmp_tilemap_renderbitmap,cliprect,0);
tilemap_draw(state->m_tmp_tilemap_renderbitmap,cliprect,state->m_bg2tilemap,0,0);
tecmosys_tilemap_copy_to_compose(state, 0x8000);
bitmap_fill(state->m_tmp_tilemap_renderbitmap,cliprect,0);
tilemap_draw(state->m_tmp_tilemap_renderbitmap,cliprect,state->m_txt_tilemap,0,0);
tecmosys_tilemap_copy_to_compose(state, 0xc000);
tecmosys_do_final_mix(screen->machine(), bitmap);
/*
popmessage("%04x %04x %04x %04x | %04x %04x %04x %04x | %04x %04x %04x %04x | %04x %04x %04x %04x | %04x %04x %04x %04x | %04x %04x %04x %04x",
state->m_880000regs[0x0], state->m_880000regs[0x1], state->m_880000regs[0x2], state->m_880000regs[0x3],
state->m_880000regs[0x4], state->m_880000regs[0x5], state->m_880000regs[0x6], state->m_880000regs[0x7],
state->m_880000regs[0x8], state->m_880000regs[0x9], state->m_880000regs[0xa], state->m_880000regs[0xb],
state->m_880000regs[0xc], state->m_880000regs[0xd], state->m_880000regs[0xe], state->m_880000regs[0xf],
state->m_880000regs[0x10], state->m_880000regs[0x11], state->m_880000regs[0x12], state->m_880000regs[0x13],
state->m_880000regs[0x14], state->m_880000regs[0x15], state->m_880000regs[0x16], state->m_880000regs[0x17]);
*/
// popmessage("%04x %04x %04x | %04x %04x %04x",
// state->m_c00000regs[0], state->m_c00000regs[1], state->m_c00000regs[2],
// state->m_c80000regs[0], state->m_c80000regs[1], state->m_c80000regs[2]);
// popmessage("%04x %04x %04x | %04x %04x %04x",
// state->m_b00000regs[0], state->m_b00000regs[1], state->m_b00000regs[2],
// state->m_a80000regs[0], state->m_a80000regs[1], state->m_a80000regs[2]);
// prepare sprites for NEXT frame - causes 1 frame palette errors, but prevents sprite lag in tkdensho, which is correct?
tecmosys_render_sprites_to_bitmap(screen->machine(), bitmap, state->m_880000regs[0x0], state->m_880000regs[0x1]);
return 0;
}
static void sound_irq(device_t *device, int irq) static void sound_irq(device_t *device, int irq)

View File

@ -49,5 +49,16 @@ READ16_HANDLER(tecmosys_prot_data_r);
WRITE16_HANDLER(tecmosys_prot_data_w); WRITE16_HANDLER(tecmosys_prot_data_w);
/*----------- defined in video/tecmosys.c -----------*/
WRITE16_HANDLER( bg0_tilemap_w );
WRITE16_HANDLER( bg1_tilemap_w );
WRITE16_HANDLER( bg2_tilemap_w );
WRITE16_HANDLER( fg_tilemap_w );
WRITE16_HANDLER( tilemap_paletteram16_xGGGGGRRRRRBBBBB_word_w );
WRITE16_HANDLER( bg0_tilemap_lineram_w );
WRITE16_HANDLER( bg1_tilemap_lineram_w );
WRITE16_HANDLER( bg2_tilemap_lineram_w );
SCREEN_UPDATE(tecmosys);
VIDEO_START(tecmosys);

View File

@ -1469,7 +1469,7 @@ $(MAMEOBJ)/tehkan.a: \
$(DRIVERS)/tbowl.o $(VIDEO)/tbowl.o \ $(DRIVERS)/tbowl.o $(VIDEO)/tbowl.o \
$(DRIVERS)/tecmo.o $(VIDEO)/tecmo.o \ $(DRIVERS)/tecmo.o $(VIDEO)/tecmo.o \
$(DRIVERS)/tecmo16.o $(VIDEO)/tecmo16.o \ $(DRIVERS)/tecmo16.o $(VIDEO)/tecmo16.o \
$(DRIVERS)/tecmosys.o $(MACHINE)/tecmosys.o \ $(DRIVERS)/tecmosys.o $(MACHINE)/tecmosys.o $(VIDEO)/tecmosys.o \
$(DRIVERS)/tehkanwc.o $(VIDEO)/tehkanwc.o \ $(DRIVERS)/tehkanwc.o $(VIDEO)/tehkanwc.o \
$(DRIVERS)/wc90.o $(VIDEO)/wc90.o \ $(DRIVERS)/wc90.o $(VIDEO)/wc90.o \
$(DRIVERS)/wc90b.o $(VIDEO)/wc90b.o \ $(DRIVERS)/wc90b.o $(VIDEO)/wc90b.o \

367
src/mame/video/tecmosys.c Normal file
View File

@ -0,0 +1,367 @@
/***************************************************************************
tecmosys video driver
***************************************************************************/
#include "emu.h"
#include "includes/tecmosys.h"
static TILE_GET_INFO( get_bg0tile_info )
{
tecmosys_state *state = machine.driver_data<tecmosys_state>();
SET_TILE_INFO(
1,
state->m_bg0tilemap_ram[2*tile_index+1],
(state->m_bg0tilemap_ram[2*tile_index]&0x3f),
TILE_FLIPYX((state->m_bg0tilemap_ram[2*tile_index]&0xc0)>>6));
}
static TILE_GET_INFO( get_bg1tile_info )
{
tecmosys_state *state = machine.driver_data<tecmosys_state>();
SET_TILE_INFO(
2,
state->m_bg1tilemap_ram[2*tile_index+1],
(state->m_bg1tilemap_ram[2*tile_index]&0x3f),
TILE_FLIPYX((state->m_bg1tilemap_ram[2*tile_index]&0xc0)>>6));
}
static TILE_GET_INFO( get_bg2tile_info )
{
tecmosys_state *state = machine.driver_data<tecmosys_state>();
SET_TILE_INFO(
3,
state->m_bg2tilemap_ram[2*tile_index+1],
(state->m_bg2tilemap_ram[2*tile_index]&0x3f),
TILE_FLIPYX((state->m_bg2tilemap_ram[2*tile_index]&0xc0)>>6));
}
static TILE_GET_INFO( get_fg_tile_info )
{
tecmosys_state *state = machine.driver_data<tecmosys_state>();
SET_TILE_INFO(
0,
state->m_fgtilemap_ram[2*tile_index+1],
(state->m_fgtilemap_ram[2*tile_index]&0x3f),
TILE_FLIPYX((state->m_fgtilemap_ram[2*tile_index]&0xc0)>>6));
}
WRITE16_HANDLER( bg0_tilemap_w )
{
tecmosys_state *state = space->machine().driver_data<tecmosys_state>();
COMBINE_DATA(&state->m_bg0tilemap_ram[offset]);
tilemap_mark_tile_dirty(state->m_bg0tilemap,offset/2);
}
WRITE16_HANDLER( bg1_tilemap_w )
{
tecmosys_state *state = space->machine().driver_data<tecmosys_state>();
COMBINE_DATA(&state->m_bg1tilemap_ram[offset]);
tilemap_mark_tile_dirty(state->m_bg1tilemap,offset/2);
}
WRITE16_HANDLER( bg2_tilemap_w )
{
tecmosys_state *state = space->machine().driver_data<tecmosys_state>();
COMBINE_DATA(&state->m_bg2tilemap_ram[offset]);
tilemap_mark_tile_dirty(state->m_bg2tilemap,offset/2);
}
WRITE16_HANDLER( fg_tilemap_w )
{
tecmosys_state *state = space->machine().driver_data<tecmosys_state>();
COMBINE_DATA(&state->m_fgtilemap_ram[offset]);
tilemap_mark_tile_dirty(state->m_txt_tilemap,offset/2);
}
INLINE void set_color_555(running_machine &machine, pen_t color, int rshift, int gshift, int bshift, UINT16 data)
{
palette_set_color_rgb(machine, color, pal5bit(data >> rshift), pal5bit(data >> gshift), pal5bit(data >> bshift));
}
WRITE16_HANDLER( tilemap_paletteram16_xGGGGGRRRRRBBBBB_word_w )
{
tecmosys_state *state = space->machine().driver_data<tecmosys_state>();
COMBINE_DATA(&state->m_tilemap_paletteram16[offset]);
set_color_555(space->machine(), offset+0x4000, 5, 10, 0, state->m_tilemap_paletteram16[offset]);
}
WRITE16_HANDLER( bg0_tilemap_lineram_w )
{
tecmosys_state *state = space->machine().driver_data<tecmosys_state>();
COMBINE_DATA(&state->m_bg0tilemap_lineram[offset]);
if (data!=0x0000) popmessage("non 0 write to bg0 lineram %04x %04x",offset,data);
}
WRITE16_HANDLER( bg1_tilemap_lineram_w )
{
tecmosys_state *state = space->machine().driver_data<tecmosys_state>();
COMBINE_DATA(&state->m_bg1tilemap_lineram[offset]);
if (data!=0x0000) popmessage("non 0 write to bg1 lineram %04x %04x",offset,data);
}
WRITE16_HANDLER( bg2_tilemap_lineram_w )
{
tecmosys_state *state = space->machine().driver_data<tecmosys_state>();
COMBINE_DATA(&state->m_bg2tilemap_lineram[offset]);
if (data!=0x0000) popmessage("non 0 write to bg2 lineram %04x %04x",offset,data);
}
static void tecmosys_render_sprites_to_bitmap(running_machine &machine, bitmap_t *bitmap, UINT16 extrax, UINT16 extray )
{
tecmosys_state *state = machine.driver_data<tecmosys_state>();
UINT8 *gfxsrc = machine.region ( "gfx1" )->base();
int i;
/* render sprites (with priority information) to temp bitmap */
bitmap_fill(state->m_sprite_bitmap, NULL, 0x0000);
/* there are multiple spritelists in here, to allow for buffering */
for (i=(state->m_spritelist*0x4000)/2;i<((state->m_spritelist+1)*0x4000)/2;i+=8)
{
int xcnt,ycnt;
int drawx, drawy;
UINT16* dstptr;
int x, y;
int address;
int xsize = 16;
int ysize = 16;
int colour;
int flipx, flipy;
int priority;
int zoomx, zoomy;
x = state->m_spriteram[i+0]+386;
y = (state->m_spriteram[i+1]+1);
x-= extrax;
y-= extray;
y&=0x1ff;
x&=0x3ff;
if (x&0x200) x-=0x400;
if (y&0x100) y-=0x200;
address = state->m_spriteram[i+5]| ((state->m_spriteram[i+4]&0x000f)<<16);
address<<=8;
flipx = (state->m_spriteram[i+4]&0x0040)>>6;
flipy = (state->m_spriteram[i+4]&0x0080)>>7; // used by some move effects in tkdensho
zoomx = (state->m_spriteram[i+2] & 0x0fff)>>0; // zoom?
zoomy = (state->m_spriteram[i+3] & 0x0fff)>>0; // zoom?
if ((!zoomx) || (!zoomy)) continue;
ysize = ((state->m_spriteram[i+6] & 0x00ff))*16;
xsize = (((state->m_spriteram[i+6] & 0xff00)>>8))*16;
colour = ((state->m_spriteram[i+4] & 0x3f00))>>8;
priority = ((state->m_spriteram[i+4] & 0x0030))>>4;
if (state->m_spriteram[i+4] & 0x8000) continue;
for (ycnt = 0; ycnt < ysize; ycnt++)
{
int actualycnt = (ycnt * zoomy) >> 8;
int actualysize = (ysize * zoomy) >> 8;
if (flipy) drawy = y + (actualysize-1) - actualycnt;
else drawy = y + actualycnt;
for (xcnt = 0; xcnt < xsize; xcnt++)
{
int actualxcnt = (xcnt * zoomx) >> 8;
int actualxsize = (xsize *zoomx) >> 8;
if (flipx) drawx = x + (actualxsize-1) - actualxcnt;
else drawx = x + actualxcnt;
if ((drawx>=0 && drawx<320) && (drawy>=0 && drawy<240))
{
UINT8 data;
dstptr = BITMAP_ADDR16(state->m_sprite_bitmap, drawy, drawx);
data = (gfxsrc[address]);
if(data) dstptr[0] = (data + (colour*0x100)) | (priority << 14);
}
address++;
}
}
}
}
static void tecmosys_tilemap_copy_to_compose(tecmosys_state *state, UINT16 pri)
{
int y,x;
UINT16 *srcptr;
UINT16 *dstptr;
for (y=0;y<240;y++)
{
srcptr = BITMAP_ADDR16(state->m_tmp_tilemap_renderbitmap, y, 0);
dstptr = BITMAP_ADDR16(state->m_tmp_tilemap_composebitmap, y, 0);
for (x=0;x<320;x++)
{
if ((srcptr[x]&0xf)!=0x0)
dstptr[x] = (srcptr[x]&0x7ff) | pri;
}
}
}
static void tecmosys_do_final_mix(running_machine &machine, bitmap_t* bitmap)
{
tecmosys_state *state = machine.driver_data<tecmosys_state>();
const pen_t *paldata = machine.pens;
int y,x;
UINT16 *srcptr;
UINT16 *srcptr2;
UINT32 *dstptr;
for (y=0;y<240;y++)
{
srcptr = BITMAP_ADDR16(state->m_tmp_tilemap_composebitmap, y, 0);
srcptr2 = BITMAP_ADDR16(state->m_sprite_bitmap, y, 0);
dstptr = BITMAP_ADDR32(bitmap, y, 0);
for (x=0;x<320;x++)
{
UINT16 pri, pri2;
UINT16 penvalue;
UINT16 penvalue2;
UINT32 colour;
UINT32 colour2;
pri = srcptr[x] & 0xc000;
pri2 = srcptr2[x] & 0xc000;
penvalue = state->m_tilemap_paletteram16[srcptr[x]&0x7ff];
colour = paldata[(srcptr[x]&0x7ff) | 0x4000];
if (srcptr2[x]&0x3fff)
{
penvalue2 = machine.generic.paletteram.u16[srcptr2[x]&0x3fff];
colour2 = paldata[srcptr2[x]&0x3fff];
}
else
{
penvalue2 = state->m_tilemap_paletteram16[srcptr[x]&0x7ff];
colour2 = paldata[(srcptr[x]&0x7ff) | 0x4000];
}
if ((penvalue & 0x8000) && (penvalue2 & 0x8000)) // blend
{
int r,g,b;
int r2,g2,b2;
b = (colour & 0x000000ff) >> 0;
g = (colour & 0x0000ff00) >> 8;
r = (colour & 0x00ff0000) >> 16;
b2 = (colour2 & 0x000000ff) >> 0;
g2 = (colour2 & 0x0000ff00) >> 8;
r2 = (colour2 & 0x00ff0000) >> 16;
r = (r + r2) >> 1;
g = (g + g2) >> 1;
b = (b + b2) >> 1;
dstptr[x] = b | (g<<8) | (r<<16);
}
else if (pri2 >= pri)
{
dstptr[x] = colour2;
}
else
{
dstptr[x] = colour;
}
}
}
}
SCREEN_UPDATE(tecmosys)
{
tecmosys_state *state = screen->machine().driver_data<tecmosys_state>();
bitmap_fill(bitmap,cliprect,screen->machine().pens[0x4000]);
tilemap_set_scrolly( state->m_bg0tilemap, 0, state->m_c80000regs[1]+16);
tilemap_set_scrollx( state->m_bg0tilemap, 0, state->m_c80000regs[0]+104);
tilemap_set_scrolly( state->m_bg1tilemap, 0, state->m_a80000regs[1]+17);
tilemap_set_scrollx( state->m_bg1tilemap, 0, state->m_a80000regs[0]+106);
tilemap_set_scrolly( state->m_bg2tilemap, 0, state->m_b00000regs[1]+17);
tilemap_set_scrollx( state->m_bg2tilemap, 0, state->m_b00000regs[0]+106);
bitmap_fill(state->m_tmp_tilemap_composebitmap,cliprect,0);
bitmap_fill(state->m_tmp_tilemap_renderbitmap,cliprect,0);
tilemap_draw(state->m_tmp_tilemap_renderbitmap,cliprect,state->m_bg0tilemap,0,0);
tecmosys_tilemap_copy_to_compose(state, 0x0000);
bitmap_fill(state->m_tmp_tilemap_renderbitmap,cliprect,0);
tilemap_draw(state->m_tmp_tilemap_renderbitmap,cliprect,state->m_bg1tilemap,0,0);
tecmosys_tilemap_copy_to_compose(state, 0x4000);
bitmap_fill(state->m_tmp_tilemap_renderbitmap,cliprect,0);
tilemap_draw(state->m_tmp_tilemap_renderbitmap,cliprect,state->m_bg2tilemap,0,0);
tecmosys_tilemap_copy_to_compose(state, 0x8000);
bitmap_fill(state->m_tmp_tilemap_renderbitmap,cliprect,0);
tilemap_draw(state->m_tmp_tilemap_renderbitmap,cliprect,state->m_txt_tilemap,0,0);
tecmosys_tilemap_copy_to_compose(state, 0xc000);
tecmosys_do_final_mix(screen->machine(), bitmap);
// prepare sprites for NEXT frame - causes 1 frame palette errors, but prevents sprite lag in tkdensho, which is correct?
tecmosys_render_sprites_to_bitmap(screen->machine(), bitmap, state->m_880000regs[0x0], state->m_880000regs[0x1]);
return 0;
}
VIDEO_START(tecmosys)
{
tecmosys_state *state = machine.driver_data<tecmosys_state>();
state->m_sprite_bitmap = auto_bitmap_alloc(machine,320,240,BITMAP_FORMAT_INDEXED16);
bitmap_fill(state->m_sprite_bitmap, NULL, 0x4000);
state->m_tmp_tilemap_composebitmap = auto_bitmap_alloc(machine,320,240,BITMAP_FORMAT_INDEXED16);
state->m_tmp_tilemap_renderbitmap = auto_bitmap_alloc(machine,320,240,BITMAP_FORMAT_INDEXED16);
bitmap_fill(state->m_tmp_tilemap_composebitmap, NULL, 0x0000);
bitmap_fill(state->m_tmp_tilemap_renderbitmap, NULL, 0x0000);
state->m_txt_tilemap = tilemap_create(machine, get_fg_tile_info,tilemap_scan_rows,8,8,32*2,32*2);
tilemap_set_transparent_pen(state->m_txt_tilemap,0);
state->m_bg0tilemap = tilemap_create(machine, get_bg0tile_info,tilemap_scan_rows,16,16,32,32);
tilemap_set_transparent_pen(state->m_bg0tilemap,0);
state->m_bg1tilemap = tilemap_create(machine, get_bg1tile_info,tilemap_scan_rows,16,16,32,32);
tilemap_set_transparent_pen(state->m_bg1tilemap,0);
state->m_bg2tilemap = tilemap_create(machine, get_bg2tile_info,tilemap_scan_rows,16,16,32,32);
tilemap_set_transparent_pen(state->m_bg2tilemap,0);
}