Sprinter/mame
2
0
Fork 0
mirror of https://github.com/holub/mame synced 2025-06-06 21:03:47 +03:00
Code Issues Actions 4 Packages Projects Releases Wiki Activity

TLCS-90 CPU: Fixed TRUN bit masking (timers start/stop) [Rainer Keuchel]

Browse Source
This commit is contained in:
Luca Elia 2015-05-17 17:32:32 +02:00
parent 64987c86ec
commit 5529a60b6c
1 changed files with 16 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
src/emu/cpu/tlcs90/tlcs90.c
View File

@ -6,6 +6,10 @@
emulation by Luca Elia, based on the Z80 core by Juergen Buchmueller
ChangeLog:
20150517 Fixed TRUN bit masking (timers start/stop handling) [Rainer Keuchel]
*************************************************************************************************************/
#include "emu.h"
@ -2021,9 +2025,10 @@ void tlcs90_device::device_reset()
P0/D0-D7 P1/A0-A7 P2/A8-A15 P6 P7 = INPUT
P35/~RD P36/~WR CLK = 1 (ALWAYS OUTPUTS)
P4/A16-A19 P83 = 0
dedicated input ports and registers remain unchanged,
dedicated input ports and CPU registers remain unchanged,
but PC IFF BX BY = 0, A undefined
*/
memset(m_internal_registers, 0, sizeof(m_internal_registers));
}
void tlcs90_device::execute_burn(INT32 cycles)
@ -2414,7 +2419,8 @@ TIMER_CALLBACK_MEMBER( tlcs90_device::t90_timer_callback )
int mode, timer_fired;
int i = param;
if ( (m_internal_registers[ T90_TRUN - T90_IOBASE ] & (1 << i)) == 0 )
int mask = 0x20 | (1 << i);
if ( (m_internal_registers[ T90_TRUN - T90_IOBASE ] & mask) != mask )
return;
timer_fired = 0;
@ -2507,21 +2513,23 @@ WRITE8_MEMBER( tlcs90_device::t90_internal_registers_w )
case T90_TRUN:
{
int i;
UINT8 mask;
// Timers 0-3
for (i = 0; i < 4; i++)
{
if ( (old ^ data) & (0x20 | (1 << i)) ) // if timer bit or prescaler bit changed
mask = 0x20 | (1 << i);
if ( (old ^ data) & mask ) // if timer bit or prescaler bit changed
{
if ( (data & (1 << i)) && (data & 0x20) ) t90_start_timer(i);
if ( (data & mask) == mask ) t90_start_timer(i);
else t90_stop_timer(i);
}
}
// Timer 4
if ( (old ^ data) & (0x20 | 0x10) )
mask = 0x20 | 0x10;
if ( (old ^ data) & mask )
{
if ( data == (0x20 | 0x10) ) t90_start_timer4();
if ( (data & mask) == mask ) t90_start_timer4();
else t90_stop_timer4();
}
break;
@ -2726,11 +2734,6 @@ void tlcs90_device::device_start()
m_timer_period = attotime::from_hz(unscaled_clock()) * 8;
// Reset registers to their initial values
// IX = IY = 0xffff;
// F = ZF;
// Timers
for (i = 0; i < 4; i++)