mirror of
https://github.com/holub/mame
synced 2025-04-22 16:31:49 +03:00
* Improved Lock-On by a fair bit and added an alternate set.
* Added POLL input handling to the NEC V20/V30 core.
This commit is contained in:
Phil Bennett
parent
2466ba64fe
commit
6696fe197c
2
.gitattributes
vendored
2
.gitattributes
vendored
@ -2203,6 +2203,7 @@ src/mame/includes/leland.h svneol=native#text/plain
|
||||
src/mame/includes/lemmings.h svneol=native#text/plain
|
||||
src/mame/includes/lethalj.h svneol=native#text/plain
|
||||
src/mame/includes/liberatr.h svneol=native#text/plain
|
||||
src/mame/includes/lockon.h svneol=native#text/plain
|
||||
src/mame/includes/lwings.h svneol=native#text/plain
|
||||
src/mame/includes/m107.h svneol=native#text/plain
|
||||
src/mame/includes/m52.h svneol=native#text/plain
|
||||
@ -2874,6 +2875,7 @@ src/mame/video/lethalj.c svneol=native#text/plain
|
||||
src/mame/video/liberate.c svneol=native#text/plain
|
||||
src/mame/video/liberatr.c svneol=native#text/plain
|
||||
src/mame/video/lkage.c svneol=native#text/plain
|
||||
src/mame/video/lockon.c svneol=native#text/plain
|
||||
src/mame/video/lordgun.c svneol=native#text/plain
|
||||
src/mame/video/lsasquad.c svneol=native#text/plain
|
||||
src/mame/video/lvcards.c svneol=native#text/plain
|
||||
|
||||
@ -152,6 +152,7 @@ typedef struct
|
||||
UINT32 pending_irq;
|
||||
UINT32 nmi_state;
|
||||
UINT32 irq_state;
|
||||
UINT32 poll_state;
|
||||
UINT8 no_interrupt;
|
||||
|
||||
int (*irq_callback)(int irqline);
|
||||
@ -224,6 +225,8 @@ static void nec_reset (void)
|
||||
Mod_RM.RM.w[i] = (WREGS)( i & 7 );
|
||||
Mod_RM.RM.b[i] = (BREGS)reg_name[i & 7];
|
||||
}
|
||||
|
||||
I.poll_state = 1;
|
||||
}
|
||||
|
||||
static void nec_exit (void)
|
||||
@ -637,7 +640,7 @@ OP( 0x97, i_xchg_axdi ) { XchgAWReg(IY); CLK(3); }
|
||||
OP( 0x98, i_cbw ) { I.regs.b[AH] = (I.regs.b[AL] & 0x80) ? 0xff : 0; CLK(2); }
|
||||
OP( 0x99, i_cwd ) { I.regs.w[DW] = (I.regs.b[AH] & 0x80) ? 0xffff : 0; CLK(4); }
|
||||
OP( 0x9a, i_call_far ) { UINT32 tmp, tmp2; FETCHWORD(tmp); FETCHWORD(tmp2); PUSH(I.sregs[PS]); PUSH(I.ip); I.ip = (WORD)tmp; I.sregs[PS] = (WORD)tmp2; CHANGE_PC; CLKW(29,29,13,29,21,9,I.regs.w[SP]); }
|
||||
OP( 0x9b, i_wait ) { logerror("%06x: Hardware POLL\n",activecpu_get_pc()); }
|
||||
OP( 0x9b, i_wait ) { if (!I.poll_state) I.ip--; CLK(5); }
|
||||
OP( 0x9c, i_pushf ) { UINT16 tmp = CompressFlags(); PUSH( tmp ); CLKS(12,8,3); }
|
||||
OP( 0x9d, i_popf ) { UINT32 tmp; POP(tmp); ExpandFlags(tmp); CLKS(12,8,5); if (I.TF) nec_trap(); }
|
||||
OP( 0x9e, i_sahf ) { UINT32 tmp = (CompressFlags() & 0xff00) | (I.regs.b[AH] & 0xd5); ExpandFlags(tmp); CLKS(3,3,2); }
|
||||
@ -998,6 +1001,11 @@ static void set_irq_line(int irqline, int state)
|
||||
}
|
||||
}
|
||||
|
||||
static void set_poll_line(int state)
|
||||
{
|
||||
I.poll_state = state;
|
||||
}
|
||||
|
||||
#ifdef MAME_DEBUG
|
||||
static offs_t nec_dasm(char *buffer, offs_t pc, const UINT8 *oprom, const UINT8 *opram)
|
||||
{
|
||||
@ -1022,6 +1030,7 @@ static void nec_init(int index, int clock, const void *config, int (*irqcallback
|
||||
state_save_register_item(names[type], index, I.pending_irq);
|
||||
state_save_register_item(names[type], index, I.nmi_state);
|
||||
state_save_register_item(names[type], index, I.irq_state);
|
||||
state_save_register_item(names[type], index, I.poll_state);
|
||||
state_save_register_item(names[type], index, I.AuxVal);
|
||||
state_save_register_item(names[type], index, I.OverVal);
|
||||
state_save_register_item(names[type], index, I.ZeroVal);
|
||||
@ -1252,8 +1261,9 @@ static void nec_set_info(UINT32 state, cpuinfo *info)
|
||||
switch (state)
|
||||
{
|
||||
/* --- the following bits of info are set as 64-bit signed integers --- */
|
||||
case CPUINFO_INT_INPUT_STATE + 0: set_irq_line(0, info->i); break;
|
||||
case CPUINFO_INT_INPUT_STATE + INPUT_LINE_NMI: set_irq_line(INPUT_LINE_NMI, info->i); break;
|
||||
case CPUINFO_INT_INPUT_STATE + 0: set_irq_line(0, info->i); break;
|
||||
case CPUINFO_INT_INPUT_STATE + INPUT_LINE_NMI: set_irq_line(INPUT_LINE_NMI, info->i); break;
|
||||
case CPUINFO_INT_INPUT_STATE + NEC_INPUT_LINE_POLL: set_poll_line(info->i); break;
|
||||
|
||||
case CPUINFO_INT_PC:
|
||||
case CPUINFO_INT_REGISTER + NEC_PC:
|
||||
@ -1330,8 +1340,9 @@ static void nec_get_info(UINT32 state, cpuinfo *info)
|
||||
case CPUINFO_INT_ADDRBUS_WIDTH + ADDRESS_SPACE_IO: info->i = 16; break;
|
||||
case CPUINFO_INT_ADDRBUS_SHIFT + ADDRESS_SPACE_IO: info->i = 0; break;
|
||||
|
||||
case CPUINFO_INT_INPUT_STATE + 0: info->i = (I.pending_irq & INT_IRQ) ? ASSERT_LINE : CLEAR_LINE; break;
|
||||
case CPUINFO_INT_INPUT_STATE + INPUT_LINE_NMI: info->i = I.nmi_state; break;
|
||||
case CPUINFO_INT_INPUT_STATE + 0: info->i = (I.pending_irq & INT_IRQ) ? ASSERT_LINE : CLEAR_LINE; break;
|
||||
case CPUINFO_INT_INPUT_STATE + INPUT_LINE_NMI: info->i = I.nmi_state; break;
|
||||
case CPUINFO_INT_INPUT_STATE + NEC_INPUT_LINE_POLL: info->i = I.poll_state; break;
|
||||
|
||||
case CPUINFO_INT_PREVIOUSPC: /* not supported */ break;
|
||||
|
||||
|
||||
@ -3,7 +3,8 @@
|
||||
typedef enum { DS1, PS, SS, DS0 } SREGS;
|
||||
typedef enum { AW, CW, DW, BW, SP, BP, IX, IY } WREGS;
|
||||
|
||||
#define NEC_NMI_INT_VECTOR 2
|
||||
#define NEC_NMI_INT_VECTOR 2
|
||||
#define NEC_INPUT_LINE_POLL 20
|
||||
|
||||
/* Cpu types, steps of 8 to help the cycle count calculation */
|
||||
#define V33 0
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
55
src/mame/includes/lockon.h
Normal file
55
src/mame/includes/lockon.h
Normal file
@ -0,0 +1,55 @@
|
||||
/*************************************************************************
|
||||
|
||||
Lock-On hardware
|
||||
|
||||
*************************************************************************/
|
||||
|
||||
/* Calculated from CRT controller writes */
|
||||
#define PIXEL_CLOCK (XTAL_21MHz / 3)
|
||||
#define FRAMEBUFFER_CLOCK XTAL_10MHz
|
||||
#define HBSTART 320
|
||||
#define HBEND 0
|
||||
#define HTOTAL 448
|
||||
#define VBSTART 240
|
||||
#define VBEND 0
|
||||
#define VTOTAL 280
|
||||
|
||||
enum
|
||||
{
|
||||
MAIN_CPU = 0,
|
||||
GROUND_CPU,
|
||||
OBJECT_CPU,
|
||||
SOUND_CPU
|
||||
};
|
||||
|
||||
/*----------- defined in drivers/lockon.c -----------*/
|
||||
extern UINT8 lockon_ctrl_reg;
|
||||
extern UINT32 lockon_main_inten;
|
||||
|
||||
/*----------- defined in video/lockon.c -----------*/
|
||||
PALETTE_INIT( lockon );
|
||||
VIDEO_START( lockon );
|
||||
VIDEO_UPDATE( lockon );
|
||||
VIDEO_EOF( lockon );
|
||||
READ16_HANDLER( lockon_crtc_r );
|
||||
WRITE16_HANDLER( lockon_crtc_w );
|
||||
WRITE16_HANDLER( lockon_rotate_w );
|
||||
WRITE16_HANDLER( lockon_fb_clut_w );
|
||||
WRITE16_HANDLER( lockon_scene_h_scr_w );
|
||||
WRITE16_HANDLER( lockon_scene_v_scr_w );
|
||||
WRITE16_HANDLER( lockon_ground_ctrl_w );
|
||||
WRITE16_HANDLER( lockon_char_w );
|
||||
|
||||
WRITE16_HANDLER( lockon_tza112_w );
|
||||
READ16_HANDLER( lockon_obj_4000_r );
|
||||
WRITE16_HANDLER( lockon_obj_4000_w );
|
||||
|
||||
extern UINT16 *lockon_char_ram;
|
||||
extern UINT16 *lockon_scene_ram;
|
||||
extern UINT16 *lockon_object_ram;
|
||||
extern UINT16 *lockon_hud_ram;
|
||||
extern UINT16 *lockon_ground_ram;
|
||||
|
||||
extern size_t lockon_hudram_size;
|
||||
extern size_t lockon_objectram_size;
|
||||
extern size_t lockon_groundram_size;
|
||||
@ -1357,9 +1357,9 @@ $(MAMEOBJ)/taito.a: \
|
||||
$(VIDEO)/taitoic.o \
|
||||
|
||||
$(MAMEOBJ)/tatsumi.a: \
|
||||
$(DRIVERS)/lockon.o \
|
||||
$(DRIVERS)/tatsumi.o $(MACHINE)/tatsumi.o $(VIDEO)/tatsumi.o \
|
||||
$(DRIVERS)/tx1.o $(MACHINE)/tx1.o $(AUDIO)/tx1.o $(VIDEO)/tx1.o \
|
||||
$(DRIVERS)/lockon.o $(VIDEO)/lockon.o \
|
||||
$(DRIVERS)/tatsumi.o $(MACHINE)/tatsumi.o $(VIDEO)/tatsumi.o \
|
||||
|
||||
$(MAMEOBJ)/tch.a: \
|
||||
$(DRIVERS)/kickgoal.o $(VIDEO)/kickgoal.o \
|
||||
@ -1519,6 +1519,7 @@ $(MAMEOBJ)/misc.a: \
|
||||
$(DRIVERS)/coolpool.o \
|
||||
$(DRIVERS)/cowrace.o \
|
||||
$(DRIVERS)/crystal.o $(VIDEO)/vrender0.o \
|
||||
$(DRIVERS)/cubeqst.o \
|
||||
$(DRIVERS)/cybertnk.o \
|
||||
$(DRIVERS)/dcheese.o $(VIDEO)/dcheese.o \
|
||||
$(DRIVERS)/dgpix.o \
|
||||
|
||||
@ -7332,9 +7332,11 @@ Other Sun games
|
||||
/* Tatsumi Games */
|
||||
DRIVER( tx1 ) /* (c) 1983 Tatsumi */
|
||||
DRIVER( tx1a ) /* (c) 1983 Tatsumi */
|
||||
/* TX-1 V8 */ /* (c) 1984 Tatsumi */
|
||||
DRIVER( buggyboy ) /* (c) 1985 Tatsumi */
|
||||
DRIVER( buggybjr ) /* (c) 1986 Tatsumi */
|
||||
DRIVER( lockon ) /* (c) 1986 Tatsumi */
|
||||
DRIVER( lockone ) /* (c) 1986 Tatsumi */
|
||||
/* Gray Out */ /* (c) 1987 Tatsumi */
|
||||
DRIVER( apache3 ) /* (c) 1988 Tatsumi */
|
||||
DRIVER( roundup5 ) /* (c) 1989 Tatsumi */
|
||||
|
||||
989
src/mame/video/lockon.c
Normal file
989
src/mame/video/lockon.c
Normal file
@ -0,0 +1,989 @@
|
||||
/***************************************************************************
|
||||
|
||||
Lock-On video hardware
|
||||
|
||||
***************************************************************************/
|
||||
|
||||
#include "driver.h"
|
||||
#include "deprecat.h"
|
||||
#include "lockon.h"
|
||||
#include "video/resnet.h"
|
||||
#include "cpu/nec/nec.h"
|
||||
|
||||
#define CURSOR_XPOS 168
|
||||
#define CURSOR_YPOS 239
|
||||
#define FRAMEBUFFER_MAX_X 431
|
||||
#define FRAMEBUFFER_MAX_Y (UINT32)((FRAMEBUFFER_CLOCK / (float)(FRAMEBUFFER_MAX_X-1)) / ((float)PIXEL_CLOCK/(HTOTAL*VTOTAL)))
|
||||
|
||||
|
||||
/*************************************
|
||||
*
|
||||
* Globals
|
||||
*
|
||||
*************************************/
|
||||
|
||||
UINT16 *lockon_char_ram;
|
||||
UINT16 *lockon_hud_ram;
|
||||
UINT16 *lockon_scene_ram;
|
||||
UINT16 *lockon_ground_ram;
|
||||
UINT16 *lockon_object_ram;
|
||||
|
||||
size_t lockon_hudram_size;
|
||||
size_t lockon_objectram_size;
|
||||
size_t lockon_groundram_size;
|
||||
|
||||
UINT8 *obj_pal_ram;
|
||||
|
||||
/*************************************
|
||||
*
|
||||
* Statics
|
||||
*
|
||||
*************************************/
|
||||
|
||||
static tilemap *lockon_tilemap;
|
||||
static UINT8 ground_ctrl;
|
||||
static UINT16 scroll_h;
|
||||
static UINT16 scroll_v;
|
||||
|
||||
static mame_bitmap *front_buffer;
|
||||
static mame_bitmap *back_buffer;
|
||||
static emu_timer *bufend_timer;
|
||||
static emu_timer *cursor_timer;
|
||||
|
||||
/* Rotation Control */
|
||||
static UINT16 xsal;
|
||||
static UINT16 x0ll;
|
||||
static UINT16 dx0ll;
|
||||
static UINT16 dxll;
|
||||
static UINT16 ysal;
|
||||
static UINT16 y0ll;
|
||||
static UINT16 dy0ll;
|
||||
static UINT16 dyll;
|
||||
|
||||
/* Object palette RAM control */
|
||||
static UINT32 iden;
|
||||
static UINT32 obj_pal_latch;
|
||||
static UINT32 obj_pal_addr;
|
||||
|
||||
|
||||
/*************************************
|
||||
*
|
||||
* HD46505S-2 CRT Controller
|
||||
*
|
||||
*************************************/
|
||||
|
||||
READ16_HANDLER( lockon_crtc_r )
|
||||
{
|
||||
return 0xffff;
|
||||
}
|
||||
|
||||
WRITE16_HANDLER( lockon_crtc_w )
|
||||
{
|
||||
#if 0
|
||||
data &= 0xff;
|
||||
|
||||
if (offset == 0)
|
||||
{
|
||||
switch (data)
|
||||
{
|
||||
case 0x00: mame_printf_debug("Horizontal Total "); break;
|
||||
case 0x01: mame_printf_debug("Horizontal displayed "); break;
|
||||
case 0x02: mame_printf_debug("Horizontal sync position "); break;
|
||||
case 0x03: mame_printf_debug("Horizontal sync width "); break;
|
||||
case 0x04: mame_printf_debug("Vertical total "); break;
|
||||
case 0x05: mame_printf_debug("Vertical total adjust "); break;
|
||||
case 0x06: mame_printf_debug("Vertical displayed "); break;
|
||||
case 0x07: mame_printf_debug("Vertical sync position "); break;
|
||||
case 0x08: mame_printf_debug("Interlace mode "); break;
|
||||
case 0x09: mame_printf_debug("Max. scan line address "); break;
|
||||
case 0x0a: mame_printf_debug("Cursror start "); break;
|
||||
case 0x0b: mame_printf_debug("Cursor end "); break;
|
||||
case 0x0c: mame_printf_debug("Start address (h) "); break;
|
||||
case 0x0d: mame_printf_debug("Start address (l) "); break;
|
||||
case 0x0e: mame_printf_debug("Cursor (h) "); break;
|
||||
case 0x0f: mame_printf_debug("Cursor (l) "); break;
|
||||
case 0x10: mame_printf_debug("Light pen (h)) "); break;
|
||||
case 0x11: mame_printf_debug("Light pen (l) "); break;
|
||||
}
|
||||
}
|
||||
else if (offset == 1)
|
||||
{
|
||||
mame_printf_debug("0x%.2x, (%d)\n",data, data);
|
||||
}
|
||||
#endif
|
||||
}
|
||||
|
||||
static TIMER_CALLBACK( cursor_callback )
|
||||
{
|
||||
if (lockon_main_inten)
|
||||
cpunum_set_input_line_and_vector(machine, MAIN_CPU, 0, HOLD_LINE, 0xff);
|
||||
|
||||
timer_adjust(cursor_timer, video_screen_get_time_until_pos(0, CURSOR_YPOS, CURSOR_XPOS), 0, attotime_zero);
|
||||
}
|
||||
|
||||
/*************************************
|
||||
*
|
||||
* Palette decoding
|
||||
*
|
||||
*************************************/
|
||||
|
||||
static const res_net_info lockon_net_info =
|
||||
{
|
||||
RES_NET_VCC_5V | RES_NET_VBIAS_5V | RES_NET_VIN_TTL_OUT,
|
||||
{
|
||||
{RES_NET_AMP_NONE, 560, 0, 5, {4700, 2200, 1000, 470, 220}},
|
||||
{RES_NET_AMP_NONE, 560, 0, 5, {4700, 2200, 1000, 470, 220}},
|
||||
{RES_NET_AMP_NONE, 560, 0, 5, {4700, 2200, 1000, 470, 220}}
|
||||
}
|
||||
};
|
||||
|
||||
static const res_net_info lockon_pd_net_info =
|
||||
{
|
||||
RES_NET_VCC_5V | RES_NET_VBIAS_5V | RES_NET_VIN_TTL_OUT,
|
||||
{
|
||||
{RES_NET_AMP_NONE, 560, 580, 5, {4700, 2200, 1000, 470, 220}},
|
||||
{RES_NET_AMP_NONE, 560, 580, 5, {4700, 2200, 1000, 470, 220}},
|
||||
{RES_NET_AMP_NONE, 560, 580, 5, {4700, 2200, 1000, 470, 220}}
|
||||
}
|
||||
};
|
||||
|
||||
PALETTE_INIT( lockon )
|
||||
{
|
||||
int i;
|
||||
|
||||
for (i = 0; i < 1024; ++i)
|
||||
{
|
||||
UINT8 r, g, b;
|
||||
UINT8 p1 = color_prom[i];
|
||||
UINT8 p2 = color_prom[i + 0x400];
|
||||
|
||||
if (p2 & 0x80)
|
||||
{
|
||||
r = compute_res_net( (p2 >> 2) & 0x1f, 0, &lockon_net_info );
|
||||
g = compute_res_net( ((p1 >> 5) & 0x7) | (p2 & 3) << 3, 1, &lockon_net_info );
|
||||
b = compute_res_net( (p1 & 0x1f), 2, &lockon_net_info );
|
||||
}
|
||||
else
|
||||
{
|
||||
r = compute_res_net( (p2 >> 2) & 0x1f, 0, &lockon_pd_net_info );
|
||||
g = compute_res_net( ((p1 >> 5) & 0x7) | (p2 & 3) << 3, 1, &lockon_pd_net_info );
|
||||
b = compute_res_net( (p1 & 0x1f), 2, &lockon_pd_net_info );
|
||||
}
|
||||
|
||||
palette_set_color(Machine, i, MAKE_RGB(r, g, b));
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/*************************************
|
||||
*
|
||||
* Character tilemap handling
|
||||
*
|
||||
*************************************/
|
||||
|
||||
WRITE16_HANDLER( lockon_char_w )
|
||||
{
|
||||
lockon_char_ram[offset] = data;
|
||||
tilemap_mark_tile_dirty(lockon_tilemap, offset);
|
||||
}
|
||||
|
||||
static TILE_GET_INFO( get_lockon_tile_info )
|
||||
{
|
||||
UINT32 tileno = lockon_char_ram[tile_index] & 0x03ff;
|
||||
UINT32 col = (lockon_char_ram[tile_index] >> 10) & 0x3f;
|
||||
|
||||
col = (col & 0x1f) + (col & 0x20 ? 64 : 0);
|
||||
SET_TILE_INFO(0, tileno, col, 0);
|
||||
}
|
||||
|
||||
|
||||
/*******************************************************************************************
|
||||
|
||||
Scene tilemap hardware
|
||||
|
||||
*******************************************************************************************/
|
||||
|
||||
WRITE16_HANDLER( lockon_scene_h_scr_w )
|
||||
{
|
||||
scroll_h = data & 0x1ff;
|
||||
}
|
||||
|
||||
WRITE16_HANDLER( lockon_scene_v_scr_w )
|
||||
{
|
||||
scroll_v = data & 0x81ff;
|
||||
}
|
||||
|
||||
static void scene_draw(void)
|
||||
{
|
||||
UINT32 y;
|
||||
|
||||
/* 3bpp characters */
|
||||
const UINT8 *const gfx1 = memory_region(REGION_GFX2);
|
||||
const UINT8 *const gfx2 = gfx1 + 0x10000;
|
||||
const UINT8 *const gfx3 = gfx1 + 0x20000;
|
||||
const UINT8 *const clut = gfx1 + 0x30000;
|
||||
|
||||
for (y = 0; y < FRAMEBUFFER_MAX_Y; ++y)
|
||||
{
|
||||
UINT32 x;
|
||||
UINT32 d0 = 0, d1 = 0, d2 = 0;
|
||||
UINT32 colour = 0;
|
||||
UINT32 y_offs;
|
||||
UINT32 x_offs;
|
||||
UINT32 y_gran;
|
||||
UINT16 *bmpaddr;
|
||||
UINT32 ram_mask = 0x7ff;
|
||||
|
||||
y_offs = (y + scroll_v) & 0x1ff;
|
||||
|
||||
/* Clamp - stops tilemap wrapping when screen is rotated */
|
||||
if (BIT(scroll_v, 15) && y_offs & 0x100)
|
||||
ram_mask = 0x7;
|
||||
|
||||
x_offs = (scroll_h - 8) & 0x1ff;
|
||||
y_gran = y_offs & 7;
|
||||
|
||||
if (x_offs & 7)
|
||||
{
|
||||
UINT32 tileidx;
|
||||
UINT16 addr = ((y_offs & ~7) << 3) + ((x_offs >> 3) & 0x3f);
|
||||
UINT16 ram_val = lockon_scene_ram[addr & ram_mask];
|
||||
|
||||
colour = (clut[ram_val & 0x7fff] & 0x3f) << 3;
|
||||
tileidx = ((ram_val & 0x0fff) << 3) + y_gran;
|
||||
|
||||
d0 = *(gfx1 + tileidx);
|
||||
d1 = *(gfx2 + tileidx);
|
||||
d2 = *(gfx3 + tileidx);
|
||||
}
|
||||
|
||||
bmpaddr = BITMAP_ADDR16(back_buffer, y, 0);
|
||||
|
||||
for (x = 0; x < FRAMEBUFFER_MAX_X; ++x)
|
||||
{
|
||||
UINT32 x_gran = (x_offs & 7) ^ 7;
|
||||
UINT32 col;
|
||||
|
||||
if (!(x_offs & 7))
|
||||
{
|
||||
UINT32 tileidx;
|
||||
UINT16 addr = ((y_offs & ~7) << 3) + ((x_offs >> 3) & 0x3f);
|
||||
UINT16 ram_val = lockon_scene_ram[addr & ram_mask];
|
||||
|
||||
colour = (clut[ram_val & 0x7fff] & 0x3f) << 3;
|
||||
tileidx = ((ram_val & 0x0fff) << 3) + y_gran;
|
||||
|
||||
d0 = *(gfx1 + tileidx);
|
||||
d1 = *(gfx2 + tileidx);
|
||||
d2 = *(gfx3 + tileidx);
|
||||
}
|
||||
|
||||
col = colour
|
||||
| (((d2 >> x_gran) & 1) << 2)
|
||||
| (((d1 >> x_gran) & 1) << 1)
|
||||
| ( (d0 >> x_gran) & 1);
|
||||
|
||||
*bmpaddr++ = Machine->pens[0xa00 + col];
|
||||
|
||||
x_offs = (x_offs + 1) & 0x1ff;
|
||||
}
|
||||
|
||||
}
|
||||
}
|
||||
|
||||
/*******************************************************************************************
|
||||
|
||||
Ground Hardware
|
||||
|
||||
Each framebuffer line corresponds to a three word entry in ground RAM,
|
||||
starting from offset 3:
|
||||
|
||||
FEDCBA9876543210
|
||||
0 |.............xxx| Tile line (A0-A2 GFX ROMs)
|
||||
|...........xx...| Tile index (A6-A5 GFX ROMs)
|
||||
|........xxx.....| ROM lut address (A6-A4)
|
||||
|.xxxxxxx........| ROM lut address (A13-A7)
|
||||
|x...............| /Line enable
|
||||
|
||||
1 |........xxxxxxxx| TZ2213 value
|
||||
|xxxxxxxx........| X offset
|
||||
|
||||
2 |........xxxxxxxx| TZ2213 DX
|
||||
|.......x........| Carry
|
||||
|x...............| End of list marker
|
||||
|
||||
An 8-bit ground control register controls the following:
|
||||
|
||||
76543210
|
||||
|......xx| LUT ROM A15-A14
|
||||
|....xx..| LUT ROM select
|
||||
|..xx....| CLUT ROM A13-A12
|
||||
|.x......| GFX ROM A15, CLUT ROM A14
|
||||
|x.......| GFX ROM bank select (always 0 - only 1 bank is present)
|
||||
|
||||
*******************************************************************************************/
|
||||
|
||||
WRITE16_HANDLER( lockon_ground_ctrl_w )
|
||||
{
|
||||
ground_ctrl = data & 0xff;
|
||||
}
|
||||
|
||||
static TIMER_CALLBACK( bufend_callback )
|
||||
{
|
||||
cpunum_set_input_line_and_vector(Machine, GROUND_CPU, 0, HOLD_LINE, 0xff);
|
||||
cpunum_set_input_line(Machine, OBJECT_CPU, NEC_INPUT_LINE_POLL, ASSERT_LINE);
|
||||
}
|
||||
|
||||
/* Get data for a each 8x8x3 ground tile */
|
||||
#define GET_GROUND_DATA() \
|
||||
{ \
|
||||
UINT32 gfx_a4_3 = (ls163 & 0xc) << 1; \
|
||||
UINT32 lut_addr = lut_address + ((ls163 >> 4) & 0xf); \
|
||||
UINT32 gfx_a14_7 = lut_rom[lut_addr] << 7; \
|
||||
clut_addr = (lut_rom[lut_addr] << 4) | clut_a14_12 | clut_a4_3 | (ls163 & 0xc) >> 2; \
|
||||
gfx_addr = gfx_a15 | gfx_a14_7 | gfx_a6_5 | gfx_a4_3 | gfx_a2_0; \
|
||||
pal = (clut_rom[clut_addr] << 3); \
|
||||
rom_data1 = gfx_rom[gfx_addr]; \
|
||||
rom_data2 = gfx_rom[gfx_addr + 0x10000]; \
|
||||
rom_data3 = gfx_rom[gfx_addr + 0x20000]; \
|
||||
}
|
||||
|
||||
static void ground_draw(void)
|
||||
{
|
||||
/* ROM pointers */
|
||||
const UINT8 *const gfx_rom = memory_region(REGION_GFX4);
|
||||
const UINT8 *const lut_rom = gfx_rom + 0x30000 + ((ground_ctrl >> 2) & 0x3 ? 0x10000 : 0);
|
||||
const UINT8 *const clut_rom = gfx_rom + 0x50000;
|
||||
|
||||
UINT32 lut_a15_14 = (ground_ctrl & 0x3) << 14;
|
||||
UINT32 clut_a14_12 = (ground_ctrl & 0x70) << 8;
|
||||
UINT32 gfx_a15 = (ground_ctrl & 0x40) << 9;
|
||||
UINT32 offs = 3;
|
||||
UINT32 y;
|
||||
|
||||
/* TODO: Clean up and emulate CS of GFX ROMs? */
|
||||
for (y = 0; y < FRAMEBUFFER_MAX_Y; ++y)
|
||||
{
|
||||
UINT16 *bmpaddr = BITMAP_ADDR16(back_buffer, y, 0);
|
||||
UINT8 ls163;
|
||||
UINT32 clut_addr;
|
||||
UINT32 gfx_addr;
|
||||
UINT8 rom_data1 = 0;
|
||||
UINT8 rom_data2 = 0;
|
||||
UINT8 rom_data3 = 0;
|
||||
UINT32 pal = 0;
|
||||
UINT32 x;
|
||||
|
||||
/* Draw this line? */
|
||||
if (!(lockon_ground_ram[offs] & 0x8000))
|
||||
{
|
||||
UINT32 gfx_a2_0 = lockon_ground_ram[offs] & 0x0007;
|
||||
UINT32 gfx_a6_5 = (lockon_ground_ram[offs] & 0x0018) << 2;
|
||||
UINT32 clut_a4_3 = (lockon_ground_ram[offs] & 0x0018) >> 1;
|
||||
UINT8 tz2213_x = lockon_ground_ram[offs + 1] & 0xff;
|
||||
UINT8 tz2213_dx = lockon_ground_ram[offs + 2] & 0xff;
|
||||
|
||||
UINT32 lut_address = lut_a15_14 + ((lockon_ground_ram[offs] & 0x7fe0) >> 1);
|
||||
UINT32 cy = lockon_ground_ram[offs + 2] & 0x0100;
|
||||
UINT32 color;
|
||||
UINT32 gpbal2_0_prev;
|
||||
|
||||
ls163 = lockon_ground_ram[offs + 1] >> 8;
|
||||
|
||||
gpbal2_0_prev = ((ls163 & 3) << 1) | BIT(tz2213_x, 7);
|
||||
|
||||
if (gpbal2_0_prev)
|
||||
GET_GROUND_DATA();
|
||||
|
||||
for (x = 0; x < FRAMEBUFFER_MAX_X; x++)
|
||||
{
|
||||
UINT32 tz2213_cy;
|
||||
UINT32 gpbal2_0 = ((ls163 & 3) << 1) | BIT(tz2213_x, 7);
|
||||
|
||||
/* Stepped into a new tile? */
|
||||
if (gpbal2_0 < gpbal2_0_prev)
|
||||
GET_GROUND_DATA();
|
||||
|
||||
gpbal2_0_prev = gpbal2_0;
|
||||
|
||||
color = pal;
|
||||
color += (rom_data1 >> gpbal2_0) & 0x1;
|
||||
color += ((rom_data2 >> gpbal2_0) & 0x1) << 1;
|
||||
color += ((rom_data3 >> gpbal2_0) & 0x1) << 2;
|
||||
|
||||
*bmpaddr++ = Machine->pens[0x800 + color];
|
||||
|
||||
/* Update the counters */
|
||||
tz2213_cy = (UINT8)tz2213_dx > (UINT8)~(tz2213_x);
|
||||
tz2213_x = (tz2213_x + tz2213_dx);
|
||||
|
||||
/* Carry? */
|
||||
if (tz2213_cy || cy)
|
||||
++ls163;
|
||||
}
|
||||
}
|
||||
|
||||
offs += 3;
|
||||
|
||||
/* End of list marker */
|
||||
if (lockon_ground_ram[offs + 2] & 0x8000)
|
||||
{
|
||||
timer_adjust(bufend_timer, attotime_mul(ATTOTIME_IN_HZ(FRAMEBUFFER_CLOCK), FRAMEBUFFER_MAX_X * y), 0, attotime_zero);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/*******************************************************************************************
|
||||
|
||||
Object hardware
|
||||
|
||||
Customs (4 each, 1 per bitplane)
|
||||
TZA118 - Scaling
|
||||
TZ4203 - Objects with integrated line buffer.
|
||||
|
||||
FEDCBA9876543210
|
||||
0 |......xxxxxxxxxx| Y position
|
||||
|....xx..........| Object Y size
|
||||
|..xx............| Object X size
|
||||
|.x..............| Y flip
|
||||
|x...............| X flip
|
||||
1 |........xxxxxxxx| X/Y scale
|
||||
|.xxxxxxx........| Colour
|
||||
|x...............| End of list marker
|
||||
2 |xxxxxxxxxxxxxxxx| Chunk ROM address
|
||||
3 |.....xxxxxxxxxxx| X position
|
||||
|
||||
*******************************************************************************************/
|
||||
|
||||
/*
|
||||
There's logic to prevent shadow pixels from being drawn against the scene tilemap,
|
||||
so that shadows don't appear against the sky.
|
||||
*/
|
||||
#define DRAW_OBJ_PIXEL(COLOR) \
|
||||
do { \
|
||||
if (px < FRAMEBUFFER_MAX_X) \
|
||||
if (COLOR != 0xf) \
|
||||
{ \
|
||||
UINT8 clr = obj_pal_ram[(pal << 4) + COLOR]; \
|
||||
UINT16 *pix = (line + px); \
|
||||
if (!(clr == 0xff && ((*pix & 0xe00) == 0xa00))) \
|
||||
*pix = Machine->pens[0x400 + clr]; \
|
||||
} \
|
||||
px = (px + 1) & 0x7ff; \
|
||||
} while(0)
|
||||
|
||||
static void objects_draw(void)
|
||||
{
|
||||
UINT32 offs;
|
||||
|
||||
const UINT8 *const romlut = memory_region(REGION_USER1);
|
||||
const UINT16 *const chklut = (UINT16*)memory_region(REGION_USER2);
|
||||
const UINT8 *const gfxrom = memory_region(REGION_GFX5);
|
||||
const UINT8 *const sproms = memory_region(REGION_PROMS) + 0x800;
|
||||
|
||||
for (offs = 0; offs < lockon_objectram_size; offs += 4)
|
||||
{
|
||||
UINT32 y;
|
||||
UINT32 xpos;
|
||||
UINT32 ypos;
|
||||
UINT32 xsize;
|
||||
UINT32 ysize;
|
||||
UINT32 xflip;
|
||||
UINT32 yflip;
|
||||
UINT32 scale;
|
||||
UINT32 pal;
|
||||
UINT32 lines;
|
||||
UINT32 opsta;
|
||||
UINT32 opsta15_8;
|
||||
|
||||
/* Retrieve the object attributes */
|
||||
ypos = lockon_object_ram[offs] & 0x03ff;
|
||||
xpos = lockon_object_ram[offs + 3] & 0x07ff;
|
||||
ysize = (lockon_object_ram[offs] >> 10) & 0x3;
|
||||
xsize = (lockon_object_ram[offs] >> 12) & 0x3;
|
||||
yflip = BIT(lockon_object_ram[offs], 14);
|
||||
xflip = BIT(lockon_object_ram[offs], 15);
|
||||
scale = lockon_object_ram[offs + 1] & 0xff;
|
||||
pal = (lockon_object_ram[offs + 1] >> 8) & 0x7f;
|
||||
opsta = lockon_object_ram[offs + 2];
|
||||
|
||||
if (iden)
|
||||
{
|
||||
obj_pal_ram[(pal << 4) + obj_pal_addr] = obj_pal_latch;
|
||||
break;
|
||||
}
|
||||
|
||||
/* How many lines will this sprite occupy? The PAL @ IC154 knows... */
|
||||
lines = scale >> (3 - ysize);
|
||||
|
||||
opsta15_8 = opsta & 0xff00;
|
||||
|
||||
/* Account for line buffering */
|
||||
ypos -=1;
|
||||
|
||||
for (y = 0; y < FRAMEBUFFER_MAX_Y; y++)
|
||||
{
|
||||
UINT32 cy = (y + ypos) & 0x3ff;
|
||||
UINT32 optab;
|
||||
UINT32 lutaddr;
|
||||
UINT32 tile;
|
||||
UINT8 cnt;
|
||||
UINT32 yidx;
|
||||
UINT16 *line = BITMAP_ADDR16(back_buffer, y, 0);
|
||||
UINT32 px = xpos;
|
||||
|
||||
/* Outside the limits? */
|
||||
if (cy & 0x300)
|
||||
continue;
|
||||
|
||||
if ((cy & 0xff) >= lines)
|
||||
break;
|
||||
|
||||
lutaddr = (scale & 0x80 ? 0x8000 : 0) | ((scale & 0x7f) << 8) | (cy & 0xff);
|
||||
optab = romlut[lutaddr] & 0x7f;
|
||||
|
||||
if (yflip)
|
||||
optab ^= 7;
|
||||
|
||||
yidx = (optab & 7);
|
||||
|
||||
/* Now calculate the lower 7-bits of the LUT ROM address. PAL @ IC157 does this */
|
||||
cnt = (optab >> 3) * (1 << xsize);
|
||||
|
||||
if (xflip)
|
||||
cnt ^= 7 >> (3 - xsize);
|
||||
if (yflip)
|
||||
cnt ^= (0xf >> (3 - ysize)) * (1 << xsize);
|
||||
|
||||
cnt = (cnt + (opsta & 0xff));
|
||||
|
||||
/* Draw! */
|
||||
for (tile = 0; tile < (1 << xsize); ++tile)
|
||||
{
|
||||
UINT16 sc;
|
||||
UINT16 scl;
|
||||
UINT32 x;
|
||||
UINT32 tileaddr;
|
||||
UINT16 td0, td1, td2, td3;
|
||||
UINT32 j;
|
||||
UINT32 bank;
|
||||
|
||||
scl = scale & 0x7f;
|
||||
tileaddr = (chklut[opsta15_8 + cnt] & 0x7fff);
|
||||
bank = ((tileaddr >> 12) & 3) * 0x40000;
|
||||
tileaddr = bank + ((tileaddr & ~0xf000) << 3);
|
||||
|
||||
if (xflip)
|
||||
--cnt;
|
||||
else
|
||||
++cnt;
|
||||
|
||||
/* Draw two 8x8 tiles */
|
||||
for (j = 0; j < 2; ++j)
|
||||
{
|
||||
/* Get tile data */
|
||||
UINT32 tileadd = tileaddr + (0x20000 * (j ^ xflip));
|
||||
|
||||
/* Retrieve scale values from PROMs */
|
||||
sc = sproms[(scl << 4) + (tile * 2) + j];
|
||||
|
||||
/* Data from ROMs is inverted */
|
||||
td3 = gfxrom[tileadd + yidx] ^ 0xff;
|
||||
td2 = gfxrom[tileadd + 0x8000 + yidx] ^ 0xff;
|
||||
td1 = gfxrom[tileadd + 0x10000 + yidx] ^ 0xff;
|
||||
td0 = gfxrom[tileadd + 0x18000 + yidx] ^ 0xff;
|
||||
|
||||
if (scale & 0x80)
|
||||
{
|
||||
for (x = 0; x < 8; ++x)
|
||||
{
|
||||
UINT8 col;
|
||||
UINT8 pix = x;
|
||||
|
||||
if (!xflip)
|
||||
pix ^= 0x7;
|
||||
|
||||
col = BIT(td0, pix)
|
||||
| (BIT(td1, pix) << 1)
|
||||
| (BIT(td2, pix) << 2)
|
||||
| (BIT(td3, pix) << 3);
|
||||
|
||||
DRAW_OBJ_PIXEL(col);
|
||||
|
||||
if ( BIT(sc, x) )
|
||||
DRAW_OBJ_PIXEL(col);
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
for (x = 0; x < 8; ++x)
|
||||
{
|
||||
UINT8 col;
|
||||
UINT8 pix = x;
|
||||
|
||||
if ( BIT(sc, x) )
|
||||
{
|
||||
if (!xflip)
|
||||
pix ^= 0x7;
|
||||
|
||||
col = BIT(td0, pix)
|
||||
| (BIT(td1, pix) << 1)
|
||||
| (BIT(td2, pix) << 2)
|
||||
| (BIT(td3, pix) << 3);
|
||||
|
||||
DRAW_OBJ_PIXEL(col);
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
/* Check for the end of list marker */
|
||||
if (lockon_object_ram[offs + 1] & 0x8000)
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
/* The mechanism used by the object CPU to update the object ASICs palette RAM */
|
||||
WRITE16_HANDLER( lockon_tza112_w )
|
||||
{
|
||||
if (iden)
|
||||
{
|
||||
obj_pal_latch = data & 0xff;
|
||||
obj_pal_addr = offset & 0xf;
|
||||
objects_draw();
|
||||
}
|
||||
}
|
||||
|
||||
READ16_HANDLER( lockon_obj_4000_r )
|
||||
{
|
||||
cpunum_set_input_line(Machine, OBJECT_CPU, NEC_INPUT_LINE_POLL, CLEAR_LINE);
|
||||
return 0xffff;
|
||||
}
|
||||
|
||||
WRITE16_HANDLER( lockon_obj_4000_w )
|
||||
{
|
||||
iden = data & 1;
|
||||
}
|
||||
|
||||
|
||||
/*******************************************************************************************
|
||||
|
||||
Frame buffer rotation hardware
|
||||
|
||||
FEDCBA9876543210
|
||||
0 |........xxxxxxxx| X start address
|
||||
|.......x........| Direction
|
||||
1 |........xxxxxxxx| TZ2213 IC65 value
|
||||
|.......x........| TZ2213 IC65 /enable
|
||||
2 |........xxxxxxxx| TZ2213 IC65 delta
|
||||
3 |........xxxxxxxx| TZ2213 IC106 delta
|
||||
|.......x........| TZ2213 IC106 enable
|
||||
4 |.......xxxxxxxxx| Y start address
|
||||
5 |........xxxxxxxx| TZ2213 IC66 value
|
||||
6 |........xxxxxxxx| TZ2213 IC66 delta
|
||||
|.......x........| TZ2213 IC65 /enable
|
||||
7 |........xxxxxxxx| TZ2213 IC107 delta
|
||||
|.......x........| TZ2213 /enable
|
||||
|......x.........| Direction
|
||||
|
||||
*******************************************************************************************/
|
||||
|
||||
WRITE16_HANDLER( lockon_fb_clut_w )
|
||||
{
|
||||
rgb_t color;
|
||||
|
||||
color = palette_get_color(Machine, 0x300 + (data & 0xff));
|
||||
palette_set_color(Machine, 0x400 + offset, color);
|
||||
}
|
||||
|
||||
/* Rotation control register */
|
||||
WRITE16_HANDLER( lockon_rotate_w )
|
||||
{
|
||||
switch (offset & 7)
|
||||
{
|
||||
case 0: xsal = data & 0x1ff; break;
|
||||
case 1: x0ll = data & 0xff; break;
|
||||
case 2: dx0ll = data & 0x1ff; break;
|
||||
case 3: dxll = data & 0x1ff; break;
|
||||
|
||||
case 4: ysal = data & 0x1ff; break;
|
||||
case 5: y0ll = data & 0xff; break;
|
||||
case 6: dy0ll = data & 0x1ff; break;
|
||||
case 7: dyll = data & 0x3ff; break;
|
||||
}
|
||||
}
|
||||
|
||||
#define INCREMENT(ACC, CNT) \
|
||||
do { \
|
||||
carry = (UINT8)d##ACC > (UINT8)~ACC; \
|
||||
ACC += d##ACC; \
|
||||
if (carry) ++CNT; \
|
||||
} while(0)
|
||||
|
||||
#define DECREMENT(ACC, CNT) \
|
||||
do { \
|
||||
carry = (UINT8)d##ACC > (UINT8)ACC; \
|
||||
ACC -= d##ACC; \
|
||||
if (carry) --CNT; \
|
||||
} while(0)
|
||||
|
||||
static void rotate_draw(mame_bitmap *bitmap, const rectangle *cliprect)
|
||||
{
|
||||
UINT32 y;
|
||||
|
||||
/* Counters */
|
||||
UINT32 cxy = xsal & 0xff;
|
||||
UINT32 cyy = ysal & 0x1ff;
|
||||
|
||||
/* Accumulator values and deltas */
|
||||
UINT8 axy = x0ll & 0xff;
|
||||
UINT8 daxy = dx0ll & 0xff;
|
||||
UINT8 ayy = y0ll & 0xff;
|
||||
UINT8 dayy = dy0ll & 0xff;
|
||||
UINT8 dayx = dyll & 0xff;
|
||||
UINT8 daxx = dxll & 0xff;
|
||||
|
||||
UINT32 xy_up = BIT(xsal, 8);
|
||||
UINT32 yx_up = BIT(dyll, 9);
|
||||
UINT32 axx_en = !BIT(dxll, 8);
|
||||
UINT32 ayx_en = !BIT(dyll, 8);
|
||||
UINT32 axy_en = !BIT(dx0ll, 8);
|
||||
UINT32 ayy_en = !BIT(dy0ll, 8);
|
||||
|
||||
for (y = 0; y <= cliprect->max_y; ++y)
|
||||
{
|
||||
UINT32 carry;
|
||||
UINT16 *dst = BITMAP_ADDR16(bitmap, y, 0);
|
||||
UINT32 x;
|
||||
|
||||
UINT32 cx = cxy;
|
||||
UINT32 cy = cyy;
|
||||
|
||||
UINT8 axx = axy;
|
||||
UINT8 ayx = ayy;
|
||||
|
||||
for (x = 0; x <= cliprect->max_x; ++x)
|
||||
{
|
||||
cx &= 0x1ff;
|
||||
cy &= 0x1ff;
|
||||
|
||||
*dst++ = *BITMAP_ADDR16(front_buffer, cy, cx);
|
||||
|
||||
if (axx_en)
|
||||
INCREMENT(axx, cx);
|
||||
else
|
||||
++cx;
|
||||
|
||||
if (ayx_en)
|
||||
{
|
||||
if (yx_up)
|
||||
INCREMENT(ayx, cy);
|
||||
else
|
||||
DECREMENT(ayx, cy);
|
||||
}
|
||||
else
|
||||
{
|
||||
if (yx_up)
|
||||
++cy;
|
||||
else
|
||||
--cy;
|
||||
}
|
||||
}
|
||||
|
||||
if (axy_en)
|
||||
{
|
||||
if (xy_up)
|
||||
INCREMENT(axy, cxy);
|
||||
else
|
||||
DECREMENT(axy, cxy);
|
||||
}
|
||||
else
|
||||
{
|
||||
if (xy_up)
|
||||
++cxy;
|
||||
else
|
||||
--cxy;
|
||||
}
|
||||
|
||||
if (ayy_en)
|
||||
INCREMENT(ayy, cyy);
|
||||
else
|
||||
++cyy;
|
||||
|
||||
cxy &= 0xff;
|
||||
cyy &= 0x1ff;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/*******************************************************************************************
|
||||
|
||||
HUD Drawing Hardware
|
||||
|
||||
A sprite layer that uses 8x8x1bpp tiles to form bigger sprites
|
||||
|
||||
0 |.......xxxxxxxxx| Y Position
|
||||
|xxxxxxx.........| Code
|
||||
1 |.......xxxxxxxxx| X Position
|
||||
|....xxx.........| Colour
|
||||
|.xxx............| Sprite width (0=8, 1=16, 2=24, 3=32 pixels, etc.)
|
||||
|x...............| End of list marker
|
||||
|
||||
*******************************************************************************************/
|
||||
|
||||
static void hud_draw(mame_bitmap *bitmap, const rectangle *cliprect)
|
||||
{
|
||||
UINT8 *tile_rom = memory_region(REGION_GFX3);
|
||||
UINT32 offs;
|
||||
|
||||
for (offs = 0x0; offs <= lockon_hudram_size; offs += 2)
|
||||
{
|
||||
UINT32 y;
|
||||
UINT32 y_pos;
|
||||
UINT32 x_pos;
|
||||
UINT32 y_size;
|
||||
UINT32 x_size;
|
||||
UINT32 layout;
|
||||
UINT16 colour;
|
||||
UINT32 code;
|
||||
UINT32 rom_a12_7;
|
||||
|
||||
/* End of sprite list marker */
|
||||
if (lockon_hud_ram[offs + 1] & 0x8000)
|
||||
break;
|
||||
|
||||
y_pos = lockon_hud_ram[offs] & 0x1ff;
|
||||
x_pos = lockon_hud_ram[offs + 1] & 0x1ff;
|
||||
x_size = (lockon_hud_ram[offs + 1] >> 12) & 7;
|
||||
code = (lockon_hud_ram[offs] >> 9) & 0x7f;
|
||||
colour = Machine->pens[0x200 + ((lockon_hud_ram[offs + 1] >> 9) & 7)];
|
||||
layout = (code >> 5) & 3;
|
||||
|
||||
rom_a12_7 = (code & 0xfe) << 6;
|
||||
|
||||
/* Account for line buffering */
|
||||
y_pos -= 1;
|
||||
|
||||
if (layout == 3)
|
||||
y_size = 32;
|
||||
else if (layout == 2)
|
||||
y_size = 16;
|
||||
else
|
||||
y_size = 8;
|
||||
|
||||
for (y = cliprect->min_y; y <= cliprect->max_y; ++y)
|
||||
{
|
||||
UINT32 xt;
|
||||
UINT32 cy;
|
||||
|
||||
cy = y_pos + y;
|
||||
|
||||
if (cy < 0x200)
|
||||
continue;
|
||||
|
||||
if ((cy & 0xff) == y_size)
|
||||
break;
|
||||
|
||||
for (xt = 0; xt <= x_size; ++xt)
|
||||
{
|
||||
UINT32 rom_a6_3;
|
||||
UINT32 px;
|
||||
UINT8 gfx_strip;
|
||||
|
||||
if (layout == 3)
|
||||
rom_a6_3 = (BIT(cy, 4) << 3) | (BIT(cy, 3) << 2) | (BIT(xt, 1) << 1) | BIT(xt, 0);
|
||||
else if (layout == 2)
|
||||
rom_a6_3 = ((BIT(code, 0) << 3) | (BIT(xt, 1) << 2) | (BIT(cy, 3) << 1) | (BIT(xt, 0)));
|
||||
else
|
||||
rom_a6_3 = (BIT(code, 0) << 3) | (xt & 7);
|
||||
|
||||
rom_a6_3 <<= 3;
|
||||
|
||||
/* Get tile data */
|
||||
gfx_strip = tile_rom[rom_a12_7 | rom_a6_3 | (cy & 7)];
|
||||
|
||||
if (gfx_strip == 0)
|
||||
continue;
|
||||
|
||||
/* Draw */
|
||||
for (px = 0; px < 8; ++px)
|
||||
{
|
||||
UINT32 x = x_pos + (xt << 3) + px;
|
||||
|
||||
if (x <= cliprect->max_x)
|
||||
{
|
||||
UINT16 *dst = BITMAP_ADDR16(bitmap, y, x);
|
||||
|
||||
if (BIT(gfx_strip, px ^ 7) && *dst > 255)
|
||||
*dst = colour;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/*************************************
|
||||
*
|
||||
* Driver video handlers
|
||||
*
|
||||
*************************************/
|
||||
|
||||
VIDEO_START( lockon )
|
||||
{
|
||||
lockon_tilemap = tilemap_create(get_lockon_tile_info, tilemap_scan_rows,TILEMAP_TYPE_PEN, 8, 8, 64, 32);
|
||||
tilemap_set_transparent_pen(lockon_tilemap, 0);
|
||||
|
||||
/* Allocate the two frame buffers for rotation */
|
||||
back_buffer = auto_bitmap_alloc(512, 512, BITMAP_FORMAT_INDEXED16);
|
||||
front_buffer = auto_bitmap_alloc(512, 512, BITMAP_FORMAT_INDEXED16);
|
||||
|
||||
/* 2kB of object ASIC palette RAM */
|
||||
obj_pal_ram = auto_malloc(2048);
|
||||
|
||||
/* Timer for ground display list callback */
|
||||
bufend_timer = timer_alloc(bufend_callback, NULL);
|
||||
|
||||
/* Timer for the CRTC cursor pulse */
|
||||
cursor_timer = timer_alloc(cursor_callback, NULL);
|
||||
timer_adjust(cursor_timer, video_screen_get_time_until_pos(0, CURSOR_YPOS, CURSOR_XPOS), 0, attotime_zero);
|
||||
}
|
||||
|
||||
VIDEO_UPDATE( lockon )
|
||||
{
|
||||
/* If screen output is disabled, fill with black */
|
||||
if ( !BIT(lockon_ctrl_reg, 7) )
|
||||
{
|
||||
fillbitmap(bitmap, get_black_pen(machine), cliprect);
|
||||
return 0;
|
||||
}
|
||||
|
||||
/* Scan out the frame buffer in rotated order */
|
||||
rotate_draw(bitmap, cliprect);
|
||||
|
||||
/* Draw the character tilemap */
|
||||
tilemap_draw(bitmap, cliprect, lockon_tilemap, 0, 0);
|
||||
|
||||
/* Draw the HUD */
|
||||
hud_draw(bitmap, cliprect);
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
VIDEO_EOF( lockon )
|
||||
{
|
||||
/* Swap the frame buffers */
|
||||
mame_bitmap *tmp = front_buffer;
|
||||
front_buffer = back_buffer;
|
||||
back_buffer = tmp;
|
||||
|
||||
/* Draw the frame buffer layers */
|
||||
scene_draw();
|
||||
ground_draw();
|
||||
objects_draw();
|
||||
|
||||
}
|
||||
Loading…
Reference in New Issue
Block a user