summaryrefslogtreecommitdiffstatshomepage
path: root/src/mame/video/flstory.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/mame/video/flstory.c')
-rw-r--r--src/mame/video/flstory.c252
1 files changed, 252 insertions, 0 deletions
diff --git a/src/mame/video/flstory.c b/src/mame/video/flstory.c
new file mode 100644
index 00000000000..71323c2bad5
--- /dev/null
+++ b/src/mame/video/flstory.c
@@ -0,0 +1,252 @@
+/***************************************************************************
+
+ video.c
+
+ Functions to emulate the video hardware of the machine.
+
+***************************************************************************/
+#include "driver.h"
+
+
+static tilemap *bg_tilemap;
+static int char_bank,palette_bank,flipscreen,gfxctrl;
+
+UINT8 *flstory_scrlram;
+
+
+static TILE_GET_INFO( get_tile_info )
+{
+ int code = videoram[tile_index*2];
+ int attr = videoram[tile_index*2+1];
+ int tile_number = code + ((attr & 0xc0) << 2) + 0x400 + 0x800 * char_bank;
+ int flags = TILE_FLIPYX((attr & 0x18) >> 3);
+ tileinfo->category = (attr & 0x20) >> 5;
+ tileinfo->group = (attr & 0x20) >> 5;
+ SET_TILE_INFO(
+ 0,
+ tile_number,
+ attr & 0x0f,
+ flags);
+}
+
+static TILE_GET_INFO( victnine_get_tile_info )
+{
+ int code = videoram[tile_index*2];
+ int attr = videoram[tile_index*2+1];
+ int tile_number = tile_number = ((attr & 0x38) << 5) + code;
+ int flags = ((attr & 0x40) ? TILE_FLIPX : 0) | ((attr & 0x80) ? TILE_FLIPY : 0);
+
+ SET_TILE_INFO(
+ 0,
+ tile_number,
+ attr & 0x07,
+ flags);
+}
+
+
+VIDEO_START( flstory )
+{
+ bg_tilemap = tilemap_create( get_tile_info,tilemap_scan_rows,TILEMAP_TYPE_PEN,8,8,32,32 );
+// tilemap_set_transparent_pen( bg_tilemap,15 );
+ tilemap_set_transmask(bg_tilemap,0,0x3fff,0xc000); /* split type 0 has pens 0-13 transparent in front half */
+ tilemap_set_transmask(bg_tilemap,1,0x8000,0x7fff); /* split type 1 has pen 15 transparent in front half */
+ tilemap_set_scroll_cols(bg_tilemap,32);
+
+ paletteram = auto_malloc(0x200);
+ paletteram_2 = auto_malloc(0x200);
+ video_start_generic(machine);
+}
+
+VIDEO_START( victnine )
+{
+ bg_tilemap = tilemap_create( victnine_get_tile_info,tilemap_scan_rows,TILEMAP_TYPE_PEN,8,8,32,32 );
+ tilemap_set_scroll_cols(bg_tilemap,32);
+
+ paletteram = auto_malloc(0x200);
+ paletteram_2 = auto_malloc(0x200);
+ video_start_generic(machine);
+}
+
+WRITE8_HANDLER( flstory_videoram_w )
+{
+ videoram[offset] = data;
+ tilemap_mark_tile_dirty(bg_tilemap,offset/2);
+}
+
+WRITE8_HANDLER( flstory_palette_w )
+{
+ if (offset & 0x100)
+ paletteram_xxxxBBBBGGGGRRRR_split2_w((offset & 0xff) + (palette_bank << 8),data);
+ else
+ paletteram_xxxxBBBBGGGGRRRR_split1_w((offset & 0xff) + (palette_bank << 8),data);
+}
+
+READ8_HANDLER( flstory_palette_r )
+{
+ if (offset & 0x100)
+ return paletteram_2[ (offset & 0xff) + (palette_bank << 8) ];
+ else
+ return paletteram [ (offset & 0xff) + (palette_bank << 8) ];
+}
+
+WRITE8_HANDLER( flstory_gfxctrl_w )
+{
+ if (gfxctrl == data)
+ return;
+ gfxctrl = data;
+
+ flipscreen = (~data & 0x01);
+ if (char_bank != ((data & 0x10) >> 4))
+ {
+ char_bank = (data & 0x10) >> 4;
+ tilemap_mark_all_tiles_dirty(bg_tilemap);
+ }
+ palette_bank = (data & 0x20) >> 5;
+
+ flip_screen_set(flipscreen);
+
+//popmessage("%04x: gfxctrl = %02x\n",activecpu_get_pc(),data);
+
+}
+
+WRITE8_HANDLER( victnine_gfxctrl_w )
+{
+ if (gfxctrl == data)
+ return;
+ gfxctrl = data;
+
+ palette_bank = (data & 0x20) >> 5;
+
+ if (data & 0x04)
+ {
+ flipscreen = (data & 0x01);
+ flip_screen_set(flipscreen);
+ }
+
+//popmessage("%04x: gfxctrl = %02x\n",activecpu_get_pc(),data);
+
+}
+
+#ifdef UNUSED_FUNCTION
+READ8_HANDLER( flstory_scrlram_r )
+{
+ return flstory_scrlram[offset];
+}
+#endif
+
+WRITE8_HANDLER( flstory_scrlram_w )
+{
+ flstory_scrlram[offset] = data;
+ tilemap_set_scrolly(bg_tilemap, offset, data );
+}
+
+
+static void flstory_draw_sprites(running_machine *machine, mame_bitmap *bitmap, const rectangle *cliprect, int pri)
+{
+ int i;
+
+ for (i = 0; i < 0x20; i++)
+ {
+ int pr = spriteram[spriteram_size-1 -i];
+ int offs = (pr & 0x1f) * 4;
+
+ if ((pr & 0x80) == pri)
+ {
+ int code,sx,sy,flipx,flipy;
+
+ code = spriteram[offs+2] + ((spriteram[offs+1] & 0x30) << 4);
+ sx = spriteram[offs+3];
+ sy = spriteram[offs+0];
+
+ if (flipscreen)
+ {
+ sx = (240 - sx) & 0xff ;
+ sy = sy - 1 ;
+ }
+ else
+ sy = 240 - sy - 1 ;
+
+ flipx = ((spriteram[offs+1]&0x40)>>6)^flipscreen;
+ flipy = ((spriteram[offs+1]&0x80)>>7)^flipscreen;
+
+ drawgfx(bitmap,machine->gfx[1],
+ code,
+ spriteram[offs+1] & 0x0f,
+ flipx,flipy,
+ sx,sy,
+ cliprect,TRANSPARENCY_PEN,15);
+ /* wrap around */
+ if (sx > 240)
+ drawgfx(bitmap,machine->gfx[1],
+ code,
+ spriteram[offs+1] & 0x0f,
+ flipx,flipy,
+ sx-256,sy,
+ cliprect,TRANSPARENCY_PEN,15);
+ }
+ }
+}
+
+VIDEO_UPDATE( flstory )
+{
+ tilemap_draw(bitmap,cliprect,bg_tilemap,0|TILEMAP_DRAW_LAYER1,0);
+ tilemap_draw(bitmap,cliprect,bg_tilemap,1|TILEMAP_DRAW_LAYER1,0);
+ flstory_draw_sprites(machine,bitmap,cliprect,0x00);
+ tilemap_draw(bitmap,cliprect,bg_tilemap,0|TILEMAP_DRAW_LAYER0,0);
+ flstory_draw_sprites(machine,bitmap,cliprect,0x80);
+ tilemap_draw(bitmap,cliprect,bg_tilemap,1|TILEMAP_DRAW_LAYER0,0);
+ return 0;
+}
+
+static void victnine_draw_sprites(running_machine *machine, mame_bitmap *bitmap, const rectangle *cliprect)
+{
+ int i;
+
+ for (i = 0; i < 0x20; i++)
+ {
+ int pr = spriteram[spriteram_size-1 -i];
+ int offs = (pr & 0x1f) * 4;
+
+ //if ((pr & 0x80) == pri)
+ {
+ int code,sx,sy,flipx,flipy;
+
+ code = spriteram[offs+2] + ((spriteram[offs+1] & 0x20) << 3);
+ sx = spriteram[offs+3];
+ sy = spriteram[offs+0];
+
+ if (flipscreen)
+ {
+ sx = (240 - sx + 1) & 0xff ;
+ sy = sy + 1 ;
+ }
+ else
+ sy = 240 - sy + 1 ;
+
+ flipx = ((spriteram[offs+1]&0x40)>>6)^flipscreen;
+ flipy = ((spriteram[offs+1]&0x80)>>7)^flipscreen;
+
+ drawgfx(bitmap,machine->gfx[1],
+ code,
+ spriteram[offs+1] & 0x0f,
+ flipx,flipy,
+ sx,sy,
+ cliprect,TRANSPARENCY_PEN,15);
+ /* wrap around */
+ if (sx > 240)
+ drawgfx(bitmap,machine->gfx[1],
+ code,
+ spriteram[offs+1] & 0x0f,
+ flipx,flipy,
+ sx-256,sy,
+ cliprect,TRANSPARENCY_PEN,15);
+ }
+ }
+}
+
+VIDEO_UPDATE( victnine )
+{
+ tilemap_draw(bitmap,cliprect,bg_tilemap,0,0);
+ victnine_draw_sprites(machine,bitmap,cliprect);
+ return 0;
+}