// license:BSD-3-Clause // copyright-holders:Ernesto Corvi /*************************************************************************** Knuckle Joe - (c) 1985 Taito Corporation ***************************************************************************/ #include "emu.h" #include "includes/kncljoe.h" /*************************************************************************** Convert the color PROMs into a more useable format. ***************************************************************************/ PALETTE_INIT_MEMBER(kncljoe_state, kncljoe) { const uint8_t *color_prom = memregion("proms")->base(); int i; /* create a lookup table for the palette */ for (i = 0; i < 0x80; i++) { int r = pal4bit(color_prom[i + 0x000]); int g = pal4bit(color_prom[i + 0x100]); int b = pal4bit(color_prom[i + 0x200]); palette.set_indirect_color(i, rgb_t(r, g, b)); } for (i = 0x80; i < 0x90; i++) { int bit0, bit1, bit2; int r, g, b; /* red component */ bit0 = 0; bit1 = (color_prom[(i - 0x80) + 0x300] >> 6) & 0x01; bit2 = (color_prom[(i - 0x80) + 0x300] >> 7) & 0x01; r = 0x21 * bit0 + 0x47 * bit1 + 0x97 * bit2; /* green component */ bit0 = (color_prom[(i - 0x80) + 0x300] >> 3) & 0x01; bit1 = (color_prom[(i - 0x80) + 0x300] >> 4) & 0x01; bit2 = (color_prom[(i - 0x80) + 0x300] >> 5) & 0x01; g = 0x21 * bit0 + 0x47 * bit1 + 0x97 * bit2; /* blue component */ bit0 = (color_prom[(i - 0x80) + 0x300] >> 0) & 0x01; bit1 = (color_prom[(i - 0x80) + 0x300] >> 1) & 0x01; bit2 = (color_prom[(i - 0x80) + 0x300] >> 2) & 0x01; b = 0x21 * bit0 + 0x47 * bit1 + 0x97 * bit2; palette.set_indirect_color(i, rgb_t(r, g, b)); } /* color_prom now points to the beginning of the lookup table */ color_prom += 0x320; /* chars */ for (i = 0; i < 0x80; i++) palette.set_pen_indirect(i, i); /* sprite lookup table */ for (i = 0x80; i < 0x100; i++) { uint8_t ctabentry = (color_prom[i - 0x80] & 0x0f) | 0x80; palette.set_pen_indirect(i, ctabentry); } } /*************************************************************************** Callbacks for the TileMap code ***************************************************************************/ TILE_GET_INFO_MEMBER(kncljoe_state::get_bg_tile_info) { int attr = m_videoram[2 * tile_index + 1]; int code = m_videoram[2 * tile_index] + ((attr & 0xc0) << 2) + (m_tile_bank << 10); SET_TILE_INFO_MEMBER(0, code, attr & 0xf, TILE_FLIPXY((attr & 0x30) >> 4)); } /*************************************************************************** Start the video hardware emulation. ***************************************************************************/ void kncljoe_state::video_start() { m_bg_tilemap = &machine().tilemap().create(*m_gfxdecode, tilemap_get_info_delegate(FUNC(kncljoe_state::get_bg_tile_info),this), TILEMAP_SCAN_ROWS, 8, 8, 64, 32); m_bg_tilemap->set_scroll_rows(4); } /*************************************************************************** Memory handlers ***************************************************************************/ WRITE8_MEMBER(kncljoe_state::kncljoe_videoram_w) { m_videoram[offset] = data; m_bg_tilemap->mark_tile_dirty(offset / 2); } WRITE8_MEMBER(kncljoe_state::kncljoe_control_w) { int i; /* 0x01 screen flip 0x02 coin counter#1 0x04 sprite bank 0x10 character bank 0x20 coin counter#2 reset when IN0 - Coin 1 goes low (active) set after IN0 - Coin 1 goes high AND the credit has been added */ m_flipscreen = data & 0x01; machine().tilemap().set_flip_all(m_flipscreen ? TILEMAP_FLIPX : TILEMAP_FLIPY); machine().bookkeeping().coin_counter_w(0, data & 0x02); machine().bookkeeping().coin_counter_w(1, data & 0x20); i = (data & 0x10) >> 4; if (m_tile_bank != i) { m_tile_bank = i; m_bg_tilemap->mark_all_dirty(); } i = (data & 0x04) >> 2; if (m_sprite_bank != i) { m_sprite_bank = i; memset(memregion("maincpu")->base() + 0xf100, 0, 0x180); } } WRITE8_MEMBER(kncljoe_state::kncljoe_scroll_w) { int scrollx; m_scrollregs[offset] = data; scrollx = m_scrollregs[0] | m_scrollregs[1] << 8; m_bg_tilemap->set_scrollx(0, scrollx); m_bg_tilemap->set_scrollx(1, scrollx); m_bg_tilemap->set_scrollx(2, scrollx); m_bg_tilemap->set_scrollx(3, 0); } /*************************************************************************** Display refresh ***************************************************************************/ void kncljoe_state::draw_sprites( bitmap_ind16 &bitmap, const rectangle &cliprect ) { uint8_t *spriteram = m_spriteram; rectangle clip = cliprect; gfx_element *gfx = m_gfxdecode->gfx(1 + m_sprite_bank); int i, j; static const int pribase[4]={0x0180, 0x0080, 0x0100, 0x0000}; const rectangle &visarea = m_screen->visible_area(); /* score covers sprites */ if (m_flipscreen) { if (clip.max_y > visarea.max_y - 64) clip.max_y = visarea.max_y - 64; } else { if (clip.min_y < visarea.min_y + 64) clip.min_y = visarea.min_y + 64; } for (i = 0; i < 4; i++) for (j = 0x7c; j >= 0; j -= 4) { int offs = pribase[i] + j; int sy = spriteram[offs]; int sx = spriteram[offs + 3]; int code = spriteram[offs + 2]; int attr = spriteram[offs + 1]; int flipx = attr & 0x40; int flipy = !(attr & 0x80); int color = attr & 0x0f; if (attr & 0x10) code += 512; if (attr & 0x20) code += 256; if (m_flipscreen) { flipx = !flipx; flipy = !flipy; sx = 240 - sx; sy = 240 - sy; } if (sx >= 256-8) sx -= 256; gfx->transpen(bitmap,clip, code, color, flipx,flipy, sx,sy,0); } } uint32_t kncljoe_state::screen_update_kncljoe(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect) { m_bg_tilemap->draw(screen, bitmap, cliprect, 0, 0); draw_sprites(bitmap, cliprect); return 0; }