static void draw_sprites(running_machine* machine, mame_bitmap *bitmap, const rectangle *cliprect )
{
UINT16 *source = diverboy_spriteram;
UINT16 *finish = source + (diverboy_spriteram_size/2);
while (source < finish)
{
INT16 xpos,ypos,number,colr,bank,flash;
ypos = source[4];
xpos = source[0];
colr = (source[1]& 0x00f0) >> 4;
number = source[3];
flash = source[1] & 0x1000;
colr |= ((source[1] & 0x000c) << 2);
ypos = 0x100 - ypos;
bank = (source[1]&0x0002) >> 1;
if (!flash || (cpu_getcurrentframe() & 1))
{
drawgfx(bitmap,machine->gfx[bank],
number,
colr,
0,0,
xpos,ypos,
cliprect,(source[1] & 0x0008) ? TRANSPARENCY_NONE : TRANSPARENCY_PEN,0);
}
source+=8;
}
}
static void diverboy_drawsprites( struct mame_bitmap *bitmap, const struct rectangle *cliprect )
{
data16_t *source = diverboy_spriteram;
data16_t *finish = source + diverboy_spriteram_size/2;
while (source < finish)
{
int xpos,ypos,number,colr,bank,flash;
ypos = source[4];
xpos = source[0];
colr = (source[1]& 0x00f0) >> 4;
number = source[3];
flash = source[1] & 0x1000;
colr |= ((source[1] & 0x000c) << 2);
ypos = 0x100 - ypos;
bank = (source[1]&0x0002) >> 1;
if (!flash || (cpu_getcurrentframe() & 1))
{
drawgfx(bitmap,Machine->gfx[bank],
number,
colr,
0,0,
xpos,ypos,
cliprect,(source[1] & 0x0008) ? TRANSPARENCY_NONE : TRANSPARENCY_PEN,0);
}
source+=8;
}
}
void update_autoframeskip(void)
{
// don't adjust frameskip if we're paused or if the debugger was
// visible this cycle or if we haven't run yet
if (!game_was_paused && !debugger_was_visible && cpu_getcurrentframe() > 2 * FRAMESKIP_LEVELS)
{
const struct performance_info *performance = mame_get_performance_info();
// if we're too fast, attempt to increase the frameskip
if (performance->game_speed_percent >= 99.5)
{
frameskipadjust++;
// but only after 3 consecutive frames where we are too fast
if (frameskipadjust >= 3)
{
frameskipadjust = 0;
if (frameskip > 0) frameskip--;
}
}
// if we're too slow, attempt to increase the frameskip
else
{
// if below 80% speed, be more aggressive
if (performance->game_speed_percent < 80)
frameskipadjust -= (int)((90. - performance->game_speed_percent) / 5.);
// if we're close, only force it up to frameskip 8
else if (frameskip < 8)
frameskipadjust--;
// perform the adjustment
while (frameskipadjust <= -2)
{
frameskipadjust += 2;
if (frameskip < FRAMESKIP_LEVELS - 1)
frameskip++;
}
}
}
// clear the other states
game_was_paused = game_is_paused;
debugger_was_visible = 0;
}
static void update_autoframeskip(void)
{
// skip if paused
if (mame_is_paused(Machine))
return;
// don't adjust frameskip if we're paused or if the debugger was
// visible this cycle or if we haven't run yet
if (cpu_getcurrentframe() > 2 * FRAMESKIP_LEVELS)
{
const performance_info *performance = mame_get_performance_info();
// if we're too fast, attempt to increase the frameskip
if (performance->game_speed_percent >= 99.5)
{
frameskipadjust++;
// but only after 3 consecutive frames where we are too fast
if (frameskipadjust >= 3)
{
frameskipadjust = 0;
if (video_config.frameskip > 0) video_config.frameskip--;
}
}
// if we're too slow, attempt to increase the frameskip
else
{
// if below 80% speed, be more aggressive
if (performance->game_speed_percent < 80)
frameskipadjust -= (90 - performance->game_speed_percent) / 5;
// if we're close, only force it up to frameskip 8
else if (video_config.frameskip < 8)
frameskipadjust--;
// perform the adjustment
while (frameskipadjust <= -2)
{
frameskipadjust += 2;
if (video_config.frameskip < FRAMESKIP_LEVELS - 1)
video_config.frameskip++;
}
}
}
}
void starcas_sound_w(UINT8 sound_val, UINT8 bits_changed)
{
UINT32 target_pitch;
UINT8 shift_diff;
cinemat_shift (sound_val, bits_changed, 0x80, 0x10);
// Now see if it's time to act upon the shifted data
if ((bits_changed & 0x01) && (0 == (sound_val & 0x01)))
{
// Yep. Falling edge! Find out what has changed.
shift_diff = current_shift ^ last_shift;
if ((shift_diff & 1) && (0 == (current_shift & 1)))
sample_start(2, 2, 0); // Castle fire
if ((shift_diff & 2) && (0 == (current_shift & 2)))
sample_start(5, 5, 0); // Shield hit
if (shift_diff & 0x04)
{
if (current_shift & 0x04)
sample_start(6, 6, 1); // Star sound
else
sample_stop(6); // Stop it!
}
if (shift_diff & 0x08)
{
if (current_shift & 0x08)
sample_stop(7); // Stop it!
else
sample_start(7, 7, 1); // Thrust sound
}
if (shift_diff & 0x10)
{
if (current_shift & 0x10)
sample_stop(4);
else
sample_start(4, 4, 1); // Drone
}
// Latch the drone pitch
target_pitch = (current_shift & 0x60) >> 3;
target_pitch |= ((current_shift & 0x40) >> 5);
target_pitch |= ((current_shift & 0x80) >> 7);
// target_pitch = (current_shift & 0x60) >> 3;
// is the the target drone pitch to rise and stop at.
target_pitch = 0x10000 + (target_pitch << 12);
// 0x10000 is lowest value the pitch will drop to
// Star Castle drone sound
if (cpu_getcurrentframe() > last_frame)
{
if (current_pitch > target_pitch)
current_pitch -= 300;
if (current_pitch < target_pitch)
current_pitch += 200;
sample_set_freq(4, current_pitch);
last_frame = cpu_getcurrentframe();
}
last_shift = current_shift;
}
UINT8 namcoio_51XX_read(int chip)
{
#if VERBOSE
logerror("%04x: custom 51XX read\n",activecpu_get_pc());
#endif
if (io[chip].mode == 0) /* switch mode */
{
switch ((io[chip].in_count++) % 3)
{
default:
case 0: return READ_PORT(0) | (READ_PORT(1) << 4);
case 1: return READ_PORT(2) | (READ_PORT(3) << 4);
case 2: return 0; // nothing?
}
}
else /* credits mode */
{
switch ((io[chip].in_count++) % 3)
{
default:
case 0: // number of credits in BCD format
{
int in,toggle;
in = ~(READ_PORT(0) | (READ_PORT(1) << 4));
toggle = in ^ io[chip].lastcoins;
io[chip].lastcoins = in;
if (io[chip].coins_per_cred[0] > 0)
{
if (io[chip].credits >= 99)
{
WRITE_PORT(1,1); // coin lockout
}
else
{
WRITE_PORT(1,0); // coin lockout
/* check if the user inserted a coin */
if (toggle & in & 0x10)
{
io[chip].coins[0]++;
WRITE_PORT(0,0x04); // coin counter
WRITE_PORT(0,0x0c);
if (io[chip].coins[0] >= io[chip].coins_per_cred[0])
{
io[chip].credits += io[chip].creds_per_coin[0];
io[chip].coins[0] -= io[chip].coins_per_cred[0];
}
}
if (toggle & in & 0x20)
{
io[chip].coins[1]++;
WRITE_PORT(0,0x08); // coin counter
WRITE_PORT(0,0x0c);
if (io[chip].coins[1] >= io[chip].coins_per_cred[1])
{
io[chip].credits += io[chip].creds_per_coin[1];
io[chip].coins[1] -= io[chip].coins_per_cred[1];
}
}
if (toggle & in & 0x40)
{
io[chip].credits++;
}
}
}
else io[chip].credits = 100; // free play
if (io[chip].mode == 1)
{
int on = (cpu_getcurrentframe() & 0x10) >> 4;
if (io[chip].credits >= 2)
WRITE_PORT(0,0x0c | 3*on); // lamps
else if (io[chip].credits >= 1)
WRITE_PORT(0,0x0c | 2*on); // lamps
else
WRITE_PORT(0,0x0c); // lamps off
/* check for 1 player start button */
if (toggle & in & 0x04)
{
if (io[chip].credits >= 1)
{
io[chip].credits--;
io[chip].mode = 2;
WRITE_PORT(0,0x0c); // lamps off
}
}
/* check for 2 players start button */
else if (toggle & in & 0x08)
{
if (io[chip].credits >= 2)
{
io[chip].credits -= 2;
io[chip].mode = 2;
WRITE_PORT(0,0x0c); // lamps off
}
}
}
}
if (~readinputport(0) & 0x80) /* check test mode switch */
return 0xbb;
return (io[chip].credits / 10) * 16 + io[chip].credits % 10;
case 1:
{
int joy = READ_PORT(2) & 0x0f;
int in,toggle;
in = ~READ_PORT(0);
toggle = in ^ io[chip].lastbuttons;
io[chip].lastbuttons = (io[chip].lastbuttons & 2) | (in & 1);
/* remap joystick */
if (io[chip].remap_joy) joy = joy_map[joy];
/* fire */
joy |= ((toggle & in & 0x01)^1) << 4;
joy |= ((in & 0x01)^1) << 5;
return joy;
}
case 2:
{
int joy = READ_PORT(3) & 0x0f;
int in,toggle;
in = ~READ_PORT(0);
toggle = in ^ io[chip].lastbuttons;
io[chip].lastbuttons = (io[chip].lastbuttons & 1) | (in & 2);
/* remap joystick */
if (io[chip].remap_joy) joy = joy_map[joy];
/* fire */
joy |= ((toggle & in & 0x02)^2) << 3;
joy |= ((in & 0x02)^2) << 4;
return joy;
}
}
}
