RACE/DrZ80_support.c
2020-10-04 11:46:35 +02:00

101 lines
2.7 KiB
C

/*---------------------------------------------------------------------------
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version. See also the license.txt file for
* additional informations.
*---------------------------------------------------------------------------
*/
/*
* Support functions for interfacing with DrZ80
*/
#include "types.h"
#include "main.h"
#include "race-memory.h"
#include "DrZ80_support.h"
#define INT_IRQ 0x01
#define NMI_IRQ 0x08
struct Z80_Regs Z80;
#define Z80_INT() Z80.regs.Z80_IRQ = INT_IRQ
#define Z80_NMI() Z80.regs.Z80IF |= NMI_IRQ
static unsigned int z80_rebaseSP(unsigned short address)
{
Z80.regs.Z80SP_BASE = (unsigned int)&mainram[0x3000];
Z80.regs.Z80SP = Z80.regs.Z80SP_BASE + address;
return Z80.regs.Z80SP_BASE + address;
}
static unsigned int z80_rebasePC(unsigned short address)
{
Z80.regs.Z80PC_BASE = (unsigned int)&mainram[0x3000];
Z80.regs.Z80PC = Z80.regs.Z80PC_BASE + address;
return Z80.regs.Z80PC_BASE + address;
}
static void z80_irq_callback(void)
{
Z80.regs.Z80_IRQ = 0x00;
}
/****************************************************************************
* Reset registers to their initial values
****************************************************************************/
void Z80_Reset(void)
{
memset (&Z80, 0, sizeof(struct Z80_Regs));
Z80.regs.z80_rebasePC=z80_rebasePC;
Z80.regs.z80_rebaseSP=z80_rebaseSP /* 0 */;
Z80.regs.z80_read8 =z80MemReadB; /* z80_read8 */
Z80.regs.z80_read16 =z80MemReadW;
Z80.regs.z80_write8 =DrZ80ngpMemWriteB;
Z80.regs.z80_write16 =DrZ80ngpMemWriteW;
Z80.regs.z80_in =DrZ80ngpPortReadB;
Z80.regs.z80_out =DrZ80ngpPortWriteB;
Z80.regs.z80_irq_callback=z80_irq_callback;
Z80.regs.Z80BC = 0013;
Z80.regs.Z80DE = 0x00D8;
Z80.regs.Z80HL = 0x014D;
Z80.regs.Z80PC=Z80.regs.z80_rebasePC(0);
Z80.regs.Z80SP=Z80.regs.z80_rebaseSP(0xFFFE);
Z80_Clear_Pending_Interrupts();
}
void Z80_Cause_Interrupt(int type)
{
if (type == Z80_NMI_INT)
{
Z80_NMI();
}
else if (type != Z80_IGNORE_INT)
{
Z80_INT();
}
}
void Z80_Clear_Pending_Interrupts(void)
{
Z80.regs.Z80_IRQ = 0x00;
}
/****************************************************************************
* Execute IPeriod T-states. Return number of T-states really executed
****************************************************************************/
int Z80_Execute(int cycles)
{
Z80.regs.cycles = cycles;
DrZ80Run(&Z80.regs, cycles);
return cycles; /* (cycles-Z80.regs.cycles); */
}