diff options
Diffstat (limited to 'src/mame/video/tp84.c')
-rw-r--r-- | src/mame/video/tp84.c | 289 |
1 files changed, 289 insertions, 0 deletions
diff --git a/src/mame/video/tp84.c b/src/mame/video/tp84.c new file mode 100644 index 00000000000..5e543c96634 --- /dev/null +++ b/src/mame/video/tp84.c @@ -0,0 +1,289 @@ +/*************************************************************************** + + video.c + + Functions to emulate the video hardware of the machine. + +***************************************************************************/ + +#include "driver.h" + +UINT8 *tp84_videoram2, *tp84_colorram2; + +static int col0; + +/* +sprites are multiplexed, so we have to buffer the spriteram +scanline by scanline. +*/ +static UINT8 *sprite_mux_buffer; +static int scanline; + +static tilemap *bg_tilemap, *fg_tilemap; + +/* +-The colortable is divided in 2 part: + -The characters colors + -The sprites colors + +-The characters colors are indexed like this: + -2 bits from the characters + -4 bits from the attribute in colorram + -2 bits from col0 (d3-d4) + -3 bits from col0 (d0-d1-d2) +-So, there is 2048 bytes for the characters + +-The sprites colors are indexed like this: + -4 bits from the sprites (16 colors) + -4 bits from the attribute of the sprites + -3 bits from col0 (d0-d1-d2) +-So, there is 2048 bytes for the sprites + +*/ +/* + The RGB signals are generated by 3 proms 256X4 (prom 2C, 2D and 1E) + The resistors values are: + 1K ohm + 470 ohm + 220 ohm + 100 ohm +*/ +PALETTE_INIT( tp84 ) +{ + int 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]) + + + for (i = 0;i < machine->drv->total_colors;i++) + { + int bit0,bit1,bit2,bit3,r,g,b; + + /* red component */ + bit0 = (color_prom[0] >> 0) & 0x01; + bit1 = (color_prom[0] >> 1) & 0x01; + bit2 = (color_prom[0] >> 2) & 0x01; + bit3 = (color_prom[0] >> 3) & 0x01; + r = 0x0e * bit0 + 0x1f * bit1 + 0x42 * bit2 + 0x90 * bit3; + /* green component */ + bit0 = (color_prom[machine->drv->total_colors] >> 0) & 0x01; + bit1 = (color_prom[machine->drv->total_colors] >> 1) & 0x01; + bit2 = (color_prom[machine->drv->total_colors] >> 2) & 0x01; + bit3 = (color_prom[machine->drv->total_colors] >> 3) & 0x01; + g = 0x0e * bit0 + 0x1f * bit1 + 0x42 * bit2 + 0x90 * bit3; + /* blue component */ + bit0 = (color_prom[2*machine->drv->total_colors] >> 0) & 0x01; + bit1 = (color_prom[2*machine->drv->total_colors] >> 1) & 0x01; + bit2 = (color_prom[2*machine->drv->total_colors] >> 2) & 0x01; + bit3 = (color_prom[2*machine->drv->total_colors] >> 3) & 0x01; + b = 0x0e * bit0 + 0x1f * bit1 + 0x42 * bit2 + 0x90 * bit3; + + palette_set_color(machine,i,MAKE_RGB(r,g,b)); + + color_prom++; + } + + color_prom += 2*machine->drv->total_colors; + /* color_prom now points to the beginning of the lookup table */ + + + /* characters use colors 128-255 */ + for (i = 0;i < TOTAL_COLORS(0)/8;i++) + { + int j; + + + for (j = 0;j < 8;j++) + COLOR(0,i+256*j) = *color_prom + 128 + 16*j; + + color_prom++; + } + + /* sprites use colors 0-127 */ + for (i = 0;i < TOTAL_COLORS(1)/8;i++) + { + int j; + + + for (j = 0;j < 8;j++) + { + if (*color_prom) COLOR(1,i+256*j) = *color_prom + 16*j; + else COLOR(1,i+256*j) = 0; /* preserve transparency */ + } + + color_prom++; + } +} + + +WRITE8_HANDLER( tp84_videoram_w ) +{ + videoram[offset] = data; + tilemap_mark_tile_dirty(bg_tilemap, offset); +} + +WRITE8_HANDLER( tp84_colorram_w ) +{ + colorram[offset] = data; + tilemap_mark_tile_dirty(bg_tilemap, offset); +} + +WRITE8_HANDLER( tp84_videoram2_w ) +{ + tp84_videoram2[offset] = data; + tilemap_mark_tile_dirty(fg_tilemap, offset); +} + +WRITE8_HANDLER( tp84_colorram2_w ) +{ + tp84_colorram2[offset] = data; + tilemap_mark_tile_dirty(fg_tilemap, offset); +} + +WRITE8_HANDLER( tp84_scroll_x_w ) +{ + tilemap_set_scrollx(bg_tilemap, 0, data); +} + +WRITE8_HANDLER( tp84_scroll_y_w ) +{ + tilemap_set_scrolly(bg_tilemap, 0, data); +} + +WRITE8_HANDLER( tp84_flipscreen_x_w ) +{ + flip_screen_x_set(data & 0x01); +} + +WRITE8_HANDLER( tp84_flipscreen_y_w ) +{ + flip_screen_y_set(data & 0x01); +} + +/***** + col0 is a register to index the color Proms +*****/ +WRITE8_HANDLER( tp84_col0_w ) +{ + if (col0 != data) + { + col0 = data; + tilemap_mark_all_tiles_dirty(ALL_TILEMAPS); + } +} + +/* Return the current video scan line */ +READ8_HANDLER( tp84_scanline_r ) +{ + return scanline; +} + +static TILE_GET_INFO( get_bg_tile_info ) +{ + int coloffs = ((col0 & 0x18) << 1) + ((col0 & 0x07) << 6); + int attr = colorram[tile_index]; + int code = videoram[tile_index] + ((attr & 0x30) << 4); + int color = (attr & 0x0f) + coloffs; + int flags = ((attr & 0x40) ? TILE_FLIPX : 0) | ((attr & 0x80) ? TILE_FLIPY : 0); + + SET_TILE_INFO(0, code, color, flags); +} + +static TILE_GET_INFO( get_fg_tile_info ) +{ + int coloffs = ((col0 & 0x18) << 1) + ((col0 & 0x07) << 6); + int attr = tp84_colorram2[tile_index]; + int code = tp84_videoram2[tile_index]+ ((attr & 0x30) << 4); + int color = (attr & 0x0f) + coloffs; + int flags = ((attr & 0x40) ? TILE_FLIPX : 0) | ((attr & 0x80) ? TILE_FLIPY : 0) | TILE_FORCE_LAYER0; + + SET_TILE_INFO(0, code, color, flags); +} + +VIDEO_START( tp84 ) +{ + bg_tilemap = tilemap_create(get_bg_tile_info, tilemap_scan_rows, + TILEMAP_TYPE_PEN, 8, 8, 32, 32); + + fg_tilemap = tilemap_create(get_fg_tile_info, tilemap_scan_rows, + TILEMAP_TYPE_PEN, 8, 8, 32, 32); + + tilemap_set_transparent_pen(fg_tilemap, 0); + + sprite_mux_buffer = auto_malloc(256 * spriteram_size); +} + +static void draw_sprites(running_machine *machine, mame_bitmap *bitmap, const rectangle *cliprect) +{ + const gfx_element *gfx = machine->gfx[1]; + int offs; + int line; + int coloffset = ((col0&0x07) << 4); + + for (line = cliprect->min_y; line <= cliprect->max_y; line++) + { + UINT8 *sr; + rectangle clip = *cliprect; + + sr = sprite_mux_buffer + line * spriteram_size; + clip.min_y = clip.max_y = line; + + for (offs = spriteram_size - 4;offs >= 0;offs -= 4) + { + int code,color,sx,sy,flipx,flipy; + + sx = sr[offs]; + sy = 240 - sr[offs + 3]; + + if (sy > line-16 && sy <= line) + { + code = sr[offs + 1]; + color = (sr[offs + 2] & 0x0f) + coloffset; + flipx = ~sr[offs + 2] & 0x40; + flipy = sr[offs + 2] & 0x80; + + drawgfx(bitmap,gfx, + code, + color, + flipx,flipy, + sx,sy, + &clip,TRANSPARENCY_COLOR,0); + } + } + } +} + +VIDEO_UPDATE( tp84 ) +{ + rectangle clip; + + tilemap_draw(bitmap, cliprect, bg_tilemap, 0, 0); + draw_sprites(machine, bitmap, cliprect); + + /* draw top fg_tilemap status layer part */ + clip.min_x = machine->screen[0].visarea.min_x; + clip.max_x = machine->screen[0].visarea.min_x+15; + clip.min_y = machine->screen[0].visarea.min_y; + clip.max_y = machine->screen[0].visarea.max_y; + tilemap_draw(bitmap, &clip, fg_tilemap, 0, 0); + + /* the middle part of fg_tilemap seems to be used as normal ram and is skipped */ + + /* draw bottom fg_tilemap status layer part */ + clip.min_x = machine->screen[0].visarea.max_x-15; + clip.max_x = machine->screen[0].visarea.max_x; + clip.min_y = machine->screen[0].visarea.min_y; + clip.max_y = machine->screen[0].visarea.max_y; + tilemap_draw(bitmap, &clip, fg_tilemap, 0, 0); + return 0; +} + +INTERRUPT_GEN( tp84_6809_interrupt ) +{ + scanline = 255 - cpu_getiloops(); + + memcpy(sprite_mux_buffer + scanline * spriteram_size,spriteram,spriteram_size); + + if (scanline == 255) + irq0_line_hold(); +} |