diff options
Diffstat (limited to 'src/mame/video/fastfred.c')
-rw-r--r-- | src/mame/video/fastfred.c | 407 |
1 files changed, 407 insertions, 0 deletions
diff --git a/src/mame/video/fastfred.c b/src/mame/video/fastfred.c new file mode 100644 index 00000000000..d08251cccfb --- /dev/null +++ b/src/mame/video/fastfred.c @@ -0,0 +1,407 @@ +/*************************************************************************** + + video.c + + Functions to emulate the video hardware of the machine. + +***************************************************************************/ + +#include "driver.h" +#include "fastfred.h" + +extern UINT8 galaxian_stars_on; +void galaxian_init_stars(running_machine *machine, int colors_offset); +void galaxian_draw_stars(running_machine *machine, mame_bitmap *bitmap); + +UINT8 *fastfred_videoram; +UINT8 *fastfred_spriteram; +size_t fastfred_spriteram_size; +UINT8 *fastfred_attributesram; +UINT8 *imago_fg_videoram; + + +static rectangle spritevisiblearea = +{ + 2*8, 32*8-1, + 2*8, 30*8-1 +}; + +static rectangle spritevisibleareaflipx = +{ + 0*8, 30*8-1, + 2*8, 30*8-1 +}; + +static UINT16 charbank; +static UINT8 colorbank; +int fastfred_hardware_type; +static const UINT8 *fastfred_color_prom; +static tilemap *bg_tilemap, *fg_tilemap, *web_tilemap; + +/*************************************************************************** + + Convert the color PROMs into a more useable format. + + bit 0 -- 1 kohm resistor -- RED/GREEN/BLUE + -- 470 ohm resistor -- RED/GREEN/BLUE + -- 220 ohm resistor -- RED/GREEN/BLUE + bit 3 -- 100 ohm resistor -- RED/GREEN/BLUE + +***************************************************************************/ + +static void set_color(pen_t pen, int i) +{ + UINT8 r,g,b; + int bit0, bit1, bit2, bit3; + + bit0 = (fastfred_color_prom[i] >> 0) & 0x01; + bit1 = (fastfred_color_prom[i] >> 1) & 0x01; + bit2 = (fastfred_color_prom[i] >> 2) & 0x01; + bit3 = (fastfred_color_prom[i] >> 3) & 0x01; + r = 0x0e * bit0 + 0x1f * bit1 + 0x43 * bit2 + 0x8f * bit3; + bit0 = (fastfred_color_prom[i + 0x100] >> 0) & 0x01; + bit1 = (fastfred_color_prom[i + 0x100] >> 1) & 0x01; + bit2 = (fastfred_color_prom[i + 0x100] >> 2) & 0x01; + bit3 = (fastfred_color_prom[i + 0x100] >> 3) & 0x01; + g = 0x0e * bit0 + 0x1f * bit1 + 0x43 * bit2 + 0x8f * bit3; + bit0 = (fastfred_color_prom[i + 0x200] >> 0) & 0x01; + bit1 = (fastfred_color_prom[i + 0x200] >> 1) & 0x01; + bit2 = (fastfred_color_prom[i + 0x200] >> 2) & 0x01; + bit3 = (fastfred_color_prom[i + 0x200] >> 3) & 0x01; + b = 0x0e * bit0 + 0x1f * bit1 + 0x43 * bit2 + 0x8f * bit3; + + palette_set_color_rgb(Machine,pen,r,g,b); +} + +PALETTE_INIT( fastfred ) +{ + pen_t i; + #define TOTAL_COLORS(gfxn) (machine->gfx[gfxn]->total_colors * machine->gfx[gfxn]->color_granularity) + #define COLOR(gfxn,offs) (colortable[machine->drv->gfxdecodeinfo[gfxn].color_codes_start + offs]) + + + fastfred_color_prom = color_prom; /* we'll need this later */ + + for (i = 0;i < 256;i++) + { + set_color(i, i); + } + + + /* characters and sprites use the same palette */ + for (i = 0; i < TOTAL_COLORS(0); i++) + { + pen_t color; + + if ((i & 0x07) == 0) + color = 0; + else + color = i; + + COLOR(0,i) = COLOR(1,i) = color; + } +} + +/*************************************************************************** + + Callbacks for the TileMap code + +***************************************************************************/ + +static TILE_GET_INFO( get_tile_info ) +{ + UINT8 x = tile_index & 0x1f; + + UINT16 code = charbank | fastfred_videoram[tile_index]; + UINT8 color = colorbank | (fastfred_attributesram[2 * x + 1] & 0x07); + + SET_TILE_INFO(0, code, color, 0); +} + + + +/************************************* + * + * Video system start + * + *************************************/ + +VIDEO_START( fastfred ) +{ + bg_tilemap = tilemap_create(get_tile_info,tilemap_scan_rows,TILEMAP_TYPE_PEN,8,8,32,32); + + tilemap_set_scroll_cols(bg_tilemap, 32); +} + + +/************************************* + * + * Memory handlers + * + *************************************/ + +WRITE8_HANDLER( fastfred_videoram_w ) +{ + fastfred_videoram[offset] = data; + tilemap_mark_tile_dirty(bg_tilemap, offset); +} + + +WRITE8_HANDLER( fastfred_attributes_w ) +{ + if (fastfred_attributesram[offset] != data) + { + if (offset & 0x01) + { + /* color change */ + int i; + + for (i = offset / 2; i < 0x0400; i += 32) + tilemap_mark_tile_dirty(bg_tilemap, i); + } + else + { + /* coloumn scroll */ + tilemap_set_scrolly(bg_tilemap, offset / 2, data); + } + + fastfred_attributesram[offset] = data; + } +} + + +WRITE8_HANDLER( fastfred_charbank1_w ) +{ + UINT16 new_data = (charbank & 0x0200) | ((data & 0x01) << 8); + + if (new_data != charbank) + { + tilemap_mark_all_tiles_dirty(bg_tilemap); + + charbank = new_data; + } +} + +WRITE8_HANDLER( fastfred_charbank2_w ) +{ + UINT16 new_data = (charbank & 0x0100) | ((data & 0x01) << 9); + + if (new_data != charbank) + { + tilemap_mark_all_tiles_dirty(bg_tilemap); + + charbank = new_data; + } +} + + +WRITE8_HANDLER( fastfred_colorbank1_w ) +{ + UINT8 new_data = (colorbank & 0x10) | ((data & 0x01) << 3); + + if (new_data != colorbank) + { + tilemap_mark_all_tiles_dirty(bg_tilemap); + + colorbank = new_data; + } +} + +WRITE8_HANDLER( fastfred_colorbank2_w ) +{ + UINT8 new_data = (colorbank & 0x08) | ((data & 0x01) << 4); + + if (new_data != colorbank) + { + tilemap_mark_all_tiles_dirty(bg_tilemap); + + colorbank = new_data; + } +} + + +WRITE8_HANDLER( fastfred_background_color_w ) +{ + set_color(0, data); +} + + +WRITE8_HANDLER( fastfred_flip_screen_x_w ) +{ + if (flip_screen_x != (data & 0x01)) + { + flip_screen_x = data & 0x01; + + tilemap_set_flip(bg_tilemap, (flip_screen_x ? TILEMAP_FLIPX : 0) | (flip_screen_y ? TILEMAP_FLIPY : 0)); + } +} + +WRITE8_HANDLER( fastfred_flip_screen_y_w ) +{ + if (flip_screen_y != (data & 0x01)) + { + flip_screen_y = data & 0x01; + + tilemap_set_flip(bg_tilemap, (flip_screen_x ? TILEMAP_FLIPX : 0) | (flip_screen_y ? TILEMAP_FLIPY : 0)); + } +} + + + +/************************************* + * + * Video update + * + *************************************/ + +static void draw_sprites(running_machine *machine, mame_bitmap *bitmap, const rectangle *cliprect) +{ + int offs; + + for (offs = fastfred_spriteram_size - 4; offs >= 0; offs -= 4) + { + UINT8 code,sx,sy; + int flipx,flipy; + + sx = fastfred_spriteram[offs + 3]; + sy = 240 - fastfred_spriteram[offs]; + + if (fastfred_hardware_type == 3) + { + // Imago + + //fastfred_spriteram[offs + 2] & 0xf8 get only set at startup + //the code is greater than 0x3f only at startup + + /* TODO: find correct sprites banking */ + + code = (fastfred_spriteram[offs + 1]) & 0x1f; + + code |= fastfred_spriteram[offs + 2]<<5; + + if(fastfred_spriteram[offs + 1] & 0x20) + code ^= 0xff; + + flipx = 0; + flipy = 0; + } + else if (fastfred_hardware_type == 2) + { + // Boggy 84 + code = fastfred_spriteram[offs + 1] & 0x7f; + flipx = 0; + flipy = fastfred_spriteram[offs + 1] & 0x80; + } + else if (fastfred_hardware_type == 1) + { + // Fly-Boy/Fast Freddie/Red Robin + code = fastfred_spriteram[offs + 1] & 0x7f; + flipx = 0; + flipy = ~fastfred_spriteram[offs + 1] & 0x80; + } + else + { + // Jump Coaster + code = (fastfred_spriteram[offs + 1] & 0x3f) | 0x40; + flipx = ~fastfred_spriteram[offs + 1] & 0x40; + flipy = fastfred_spriteram[offs + 1] & 0x80; + } + + + if (flip_screen_x) + { + sx = 240 - sx; + flipx = !flipx; + } + if (flip_screen_y) + { + sy = 240 - sy; + flipy = !flipy; + } + + drawgfx(bitmap,machine->gfx[1], + code, + colorbank | (fastfred_spriteram[offs + 2] & 0x07), + flipx,flipy, + sx,sy, + flip_screen_x ? &spritevisibleareaflipx : &spritevisiblearea,TRANSPARENCY_PEN,0); + } +} + + +VIDEO_UPDATE( fastfred ) +{ + tilemap_draw(bitmap,cliprect,bg_tilemap,0,0); + + draw_sprites(machine, bitmap, cliprect); + return 0; +} + + +static TILE_GET_INFO( imago_get_tile_info_bg ) +{ + UINT8 x = tile_index & 0x1f; + + UINT16 code = charbank * 0x100 + fastfred_videoram[tile_index]; + UINT8 color = colorbank | (fastfred_attributesram[2 * x + 1] & 0x07); + + SET_TILE_INFO(0, code, color, 0); +} + +static TILE_GET_INFO( imago_get_tile_info_fg ) +{ + int code = imago_fg_videoram[tile_index]; + SET_TILE_INFO(2, code, 2, 0); +} + +static TILE_GET_INFO( imago_get_tile_info_web ) +{ + SET_TILE_INFO(3, tile_index & 0x1ff, 0, 0); +} + +WRITE8_HANDLER( imago_fg_videoram_w ) +{ + imago_fg_videoram[offset] = data; + tilemap_mark_tile_dirty(fg_tilemap, offset); +} + +WRITE8_HANDLER( imago_charbank_w ) +{ + if( charbank != data ) + { + charbank = data; + tilemap_mark_all_tiles_dirty(bg_tilemap); + } +} + +VIDEO_START( imago ) +{ + web_tilemap = tilemap_create(imago_get_tile_info_web,tilemap_scan_rows,TILEMAP_TYPE_PEN, 8,8,32,32); + bg_tilemap = tilemap_create(imago_get_tile_info_bg, tilemap_scan_rows,TILEMAP_TYPE_PEN,8,8,32,32); + fg_tilemap = tilemap_create(imago_get_tile_info_fg, tilemap_scan_rows,TILEMAP_TYPE_PEN,8,8,32,32); + + tilemap_set_transparent_pen(bg_tilemap, 0); + tilemap_set_transparent_pen(fg_tilemap, 0); + + /* the game has a galaxian starfield */ + galaxian_init_stars(machine, 256); + galaxian_stars_on = 1; + + /* web colors */ + palette_set_color(machine,256+64+0,MAKE_RGB(0x50,0x00,0x00)); + palette_set_color(machine,256+64+1,MAKE_RGB(0x00,0x00,0x00)); +} + +VIDEO_UPDATE( imago ) +{ + tilemap_draw(bitmap,cliprect,web_tilemap,0,0); + + galaxian_draw_stars(machine, bitmap); + + tilemap_draw(bitmap,cliprect,bg_tilemap,0,0); + + draw_sprites(machine, bitmap, cliprect); + + tilemap_draw(bitmap,cliprect,fg_tilemap,0,0); + return 0; +} |