/*===================================================================*/
/*                                                                   */
/*                     Mapper 119 : TQ-ROM                           */
/*                                                                   */
/*===================================================================*/

BYTE	Map119_Reg[8];
BYTE	Map119_Prg0, Map119_Prg1;
BYTE	Map119_Chr01, Map119_Chr23, Map119_Chr4, Map119_Chr5, Map119_Chr6, Map119_Chr7;
BYTE	Map119_WeSram;

BYTE	Map119_IRQ_Enable;
BYTE	Map119_IRQ_Counter;
BYTE	Map119_IRQ_Latch;

/*-------------------------------------------------------------------*/
/*  Initialize Mapper 119                                            */
/*-------------------------------------------------------------------*/
void Map119_Init()
{
  /* Initialize Mapper */
  MapperInit = Map119_Init;

  /* Write to Mapper */
  MapperWrite = Map119_Write;

  /* Write to SRAM */
  MapperSram = Map0_Sram;

  /* Write to APU */
  MapperApu = Map0_Apu;

  /* Read from APU */
  MapperReadApu = Map0_ReadApu;

  /* Callback at VSync */
  MapperVSync = Map0_VSync;

  /* Callback at HSync */
  MapperHSync = Map119_HSync;

  /* Callback at PPU */
  MapperPPU = Map0_PPU;

  /* Callback at Rendering Screen ( 1:BG, 0:Sprite ) */
  MapperRenderScreen = Map0_RenderScreen;

  /* Set SRAM Banks */
  SRAMBANK = SRAM;

  /* Set Registers */ 
  for( int i = 0; i < 8; i++ ) {
    Map119_Reg[i] = 0x00;
  }

  /* Set ROM Banks */
  Map119_Prg0 = 0;
  Map119_Prg1 = 1;
  Map119_Set_CPU_Banks();

  /* Set PPU Banks */
  Map119_Chr01 = 0;
  Map119_Chr23 = 2;
  Map119_Chr4  = 4;
  Map119_Chr5  = 5;
  Map119_Chr6  = 6;
  Map119_Chr7  = 7;
  Map119_Set_PPU_Banks();

  Map119_WeSram  = 0;		// Disable
  Map119_IRQ_Enable = 0;	// Disable
  Map119_IRQ_Counter = 0;
  Map119_IRQ_Latch = 0;

  /* Set up wiring of the interrupt pin */
  K6502_Set_Int_Wiring( 1, 1 ); 
}

/*-------------------------------------------------------------------*/
/*  Mapper 119 Write Function                                        */
/*-------------------------------------------------------------------*/
void Map119_Write( WORD wAddr, BYTE byData )
{
  switch( wAddr & 0xE001 ) {
  case	0x8000:
    Map119_Reg[0] = byData;
    Map119_Set_CPU_Banks();
    Map119_Set_PPU_Banks();
    break;
  case	0x8001:
    Map119_Reg[1] = byData;
    
    switch( Map119_Reg[0] & 0x07 ) {
    case	0x00:
      if( NesHeader.byVRomSize > 0 ) {
	Map119_Chr01 = byData & 0xFE;
	Map119_Set_PPU_Banks();
      }
      break;
    case	0x01:
      if( NesHeader.byVRomSize > 0 ) {
	Map119_Chr23 = byData & 0xFE;
	Map119_Set_PPU_Banks();
      }
      break;
    case	0x02:
      if( NesHeader.byVRomSize > 0 ) {
	Map119_Chr4 = byData;
	Map119_Set_PPU_Banks();
      }
      break;
    case	0x03:
      if( NesHeader.byVRomSize > 0 ) {
	Map119_Chr5 = byData;
	Map119_Set_PPU_Banks();
      }
      break;
    case	0x04:
      if( NesHeader.byVRomSize > 0 ) {
	Map119_Chr6 = byData;
	Map119_Set_PPU_Banks();
      }
      break;
    case	0x05:
      if( NesHeader.byVRomSize > 0 ) {
	Map119_Chr7 = byData;
	Map119_Set_PPU_Banks();
      }
      break;
    case	0x06:
      Map119_Prg0 = byData;
      Map119_Set_CPU_Banks();
      break;
    case	0x07:
      Map119_Prg1 = byData;
      Map119_Set_CPU_Banks();
      break;
    }
    break;
  case	0xA000:
    Map119_Reg[2] = byData;
    if( !ROM_FourScr ) {
      if( byData & 0x01 ) InfoNES_Mirroring( 0 );
      else		  InfoNES_Mirroring( 1 );
    }
    break;
  case	0xA001:
    Map119_Reg[3] = byData;
    break;
  case	0xC000:
    Map119_Reg[4] = byData;
    Map119_IRQ_Counter = byData;
    break;
  case	0xC001:
    Map119_Reg[5] = byData;
    Map119_IRQ_Latch = byData;
    break;
  case	0xE000:
    Map119_Reg[6] = byData;
    Map119_IRQ_Enable = 0;
    Map119_IRQ_Counter = Map119_IRQ_Latch;
    break;
  case	0xE001:
    Map119_Reg[7] = byData;
    Map119_IRQ_Enable = 1;
    break;
  }
}

/*-------------------------------------------------------------------*/
/*  Mapper 119 H-Sync Function                                       */
/*-------------------------------------------------------------------*/
void Map119_HSync()
{
  if( ( /* PPU_Scanline >= 0 && */ PPU_Scanline <= 239) ) {
    if( PPU_R1 & R1_SHOW_SCR || PPU_R1 & R1_SHOW_SP ) {
      if( Map119_IRQ_Enable ) {
	if( !(Map119_IRQ_Counter--) ) {
	  Map119_IRQ_Counter = Map119_IRQ_Latch;
	  IRQ_REQ;
	}
      }
    }
  }
}

/*-------------------------------------------------------------------*/
/*  Mapper 119 Set CPU Banks Function                                */
/*-------------------------------------------------------------------*/
void Map119_Set_CPU_Banks()
{
  if( Map119_Reg[0] & 0x40 ) {
    ROMBANK0 = ROMLASTPAGE( 1 );
    ROMBANK1 = ROMPAGE( Map119_Prg1 % ( NesHeader.byRomSize << 1 ) );
    ROMBANK2 = ROMPAGE( Map119_Prg0 % ( NesHeader.byRomSize << 1 ) );
    ROMBANK3 = ROMLASTPAGE( 0 );
  } else {
    ROMBANK0 = ROMPAGE( Map119_Prg0 % ( NesHeader.byRomSize << 1 ) );
    ROMBANK1 = ROMPAGE( Map119_Prg1 % ( NesHeader.byRomSize << 1 ) );
    ROMBANK2 = ROMLASTPAGE( 1 );
    ROMBANK3 = ROMLASTPAGE( 0 );
  }
}

/*-------------------------------------------------------------------*/
/*  Mapper 119 Set PPU Banks Function                                */
/*-------------------------------------------------------------------*/
void Map119_Set_PPU_Banks()
{
  if( Map119_Reg[0]&0x80 ) {
    if(Map119_Chr4&0x40)	PPUBANK[ 0 ] = CRAMPAGE(Map119_Chr4&0x07);
    else			PPUBANK[ 0 ] = VROMPAGE(Map119_Chr4 % (NesHeader.byRomSize<<1));
    if(Map119_Chr5&0x40)	PPUBANK[ 1 ] = CRAMPAGE(Map119_Chr5&0x07);
    else			PPUBANK[ 1 ] = VROMPAGE(Map119_Chr5 % (NesHeader.byRomSize<<1));
    if(Map119_Chr6&0x40)	PPUBANK[ 2 ] = CRAMPAGE(Map119_Chr6&0x07);
    else			PPUBANK[ 2 ] = VROMPAGE(Map119_Chr6 % (NesHeader.byRomSize<<1));
    if(Map119_Chr7&0x40)	PPUBANK[ 3 ] = CRAMPAGE(Map119_Chr7&0x07);
    else			PPUBANK[ 3 ] = VROMPAGE(Map119_Chr7 % (NesHeader.byRomSize<<1));
    
    if((Map119_Chr01+0)&0x40)   PPUBANK[ 4 ] = CRAMPAGE((Map119_Chr01+0)&0x07);
    else		        PPUBANK[ 4 ] = VROMPAGE((Map119_Chr01+0) % (NesHeader.byVRomSize<<3));
    if((Map119_Chr01+1)&0x40)   PPUBANK[ 5 ] = CRAMPAGE((Map119_Chr01+1)&0x07);
    else		     	PPUBANK[ 5 ] = VROMPAGE((Map119_Chr01+1) % (NesHeader.byVRomSize<<3));
    if((Map119_Chr23+0)&0x40)   PPUBANK[ 6 ] = CRAMPAGE((Map119_Chr23+0)&0x07);
    else			PPUBANK[ 6 ] = VROMPAGE((Map119_Chr23+0) % (NesHeader.byVRomSize<<3));
    if((Map119_Chr23+1)&0x40)   PPUBANK[ 7 ] = CRAMPAGE((Map119_Chr23+1)&0x07);
    else			PPUBANK[ 7 ] = VROMPAGE((Map119_Chr23+1) % (NesHeader.byVRomSize<<3));
  } else {
    if((Map119_Chr01+0)&0x40)   PPUBANK[ 0 ] = CRAMPAGE((Map119_Chr01+0)&0x07);
    else			PPUBANK[ 0 ] = VROMPAGE((Map119_Chr01+0) % (NesHeader.byVRomSize<<3));
    if((Map119_Chr01+1)&0x40)   PPUBANK[ 1 ] = CRAMPAGE((Map119_Chr01+1)&0x07);
    else			PPUBANK[ 1 ] = VROMPAGE((Map119_Chr01+1) % (NesHeader.byVRomSize<<3));
    if((Map119_Chr23+0)&0x40)   PPUBANK[ 2 ] = CRAMPAGE((Map119_Chr23+0)&0x07);
    else		     	PPUBANK[ 2 ] = VROMPAGE((Map119_Chr23+0) % (NesHeader.byVRomSize<<3));
    if((Map119_Chr23+1)&0x40)   PPUBANK[ 3 ] = CRAMPAGE((Map119_Chr23+1)&0x07);
    else		     	PPUBANK[ 3 ] = VROMPAGE((Map119_Chr23+1) % (NesHeader.byVRomSize<<3));
    
    if(Map119_Chr4&0x40)	PPUBANK[ 4 ] = CRAMPAGE(Map119_Chr4&0x07);
    else			PPUBANK[ 4 ] = VROMPAGE(Map119_Chr4 % (NesHeader.byVRomSize<<3));
    if(Map119_Chr5&0x40)	PPUBANK[ 5 ] = CRAMPAGE(Map119_Chr5&0x07);
    else			PPUBANK[ 5 ] = VROMPAGE(Map119_Chr5 % (NesHeader.byVRomSize<<3));
    if(Map119_Chr6&0x40)	PPUBANK[ 6 ] = CRAMPAGE(Map119_Chr6&0x07);
    else			PPUBANK[ 6 ] = VROMPAGE(Map119_Chr6 % (NesHeader.byVRomSize<<3));
    if(Map119_Chr7&0x40)	PPUBANK[ 7 ] = CRAMPAGE(Map119_Chr7&0x07);
    else			PPUBANK[ 7 ] = VROMPAGE(Map119_Chr7 % (NesHeader.byVRomSize<<3));
  }
  InfoNES_SetupChr();
}