/src/snes/gfx.cpp

/*

 * Snes9x - Portable Super Nintendo Entertainment System (TM) emulator.

 *

 * (c) Copyright 1996 - 2001 Gary Henderson (gary.henderson@ntlworld.com) and

 *                           Jerremy Koot (jkoot@snes9x.com)

 *

 * Super FX C emulator code 

 * (c) Copyright 1997 - 1999 Ivar (ivar@snes9x.com) and

 *                           Gary Henderson.

 * Super FX assembler emulator code (c) Copyright 1998 zsKnight and _Demo_.

 *

 * DSP1 emulator code (c) Copyright 1998 Ivar, _Demo_ and Gary Henderson.

 * C4 asm and some C emulation code (c) Copyright 2000 zsKnight and _Demo_.

 * C4 C code (c) Copyright 2001 Gary Henderson (gary.henderson@ntlworld.com).

 *

 * DOS port code contains the works of other authors. See headers in

 * individual files.

 *

 * Snes9x homepage: http://www.snes9x.com

 *

 * Permission to use, copy, modify and distribute Snes9x in both binary and

 * source form, for non-commercial purposes, is hereby granted without fee,

 * providing that this license information and copyright notice appear with

 * all copies and any derived work.

 *

 * This software is provided 'as-is', without any express or implied

 * warranty. In no event shall the authors be held liable for any damages

 * arising from the use of this software.

 *

 * Snes9x is freeware for PERSONAL USE only. Commercial users should

 * seek permission of the copyright holders first. Commercial use includes

 * charging money for Snes9x or software derived from Snes9x.

 *

 * The copyright holders request that bug fixes and improvements to the code

 * should be forwarded to them so everyone can benefit from the modifications

 * in future versions.

 *

 * Super NES and Super Nintendo Entertainment System are trademarks of

 * Nintendo Co., Limited and its subsidiary companies.

 */



//#define _TRANSP_SUPPORT_ 

//#include <e32cmn.h>    

#include "snes9x.h"



#include "mem.h"

#include "ppu.h"

#include "cpu.h"

#include "display.h"

#include "gfx.h"

#include "spu.h"

#include "cheats.h"

//#include "tile.h"

#include "port.h"

#include "snes.h"



typedef unsigned int u32_t;



#define M7 19

#define M8 19



void ComputeClipWindows ();



extern u8 BitShifts[8][4];

extern u8 TileShifts[8][4];

extern u8 PaletteShifts[8][4];

extern u8 PaletteMasks[8][4];

extern u8 Depths[8][4];

extern u8 BGSizes [2];



extern NormalTileRenderer DrawTilePtr;

extern ClippedTileRenderer DrawClippedTilePtr;

extern NormalTileRenderer DrawHiResTilePtr;

extern ClippedTileRenderer DrawHiResClippedTilePtr;

extern LargePixelRenderer DrawLargePixelPtr;

extern struct SBG BG;



extern struct SLineData LineData[240];

extern struct SLineMatrixData LineMatrixData [240];



extern u8  Mode7Depths [2];



#define ON_MAIN(N) \

(GFX.r212c & (1 << (N)) && \

 !(PPU.BG_Forced & (1 << (N))))



#define SUB_OR_ADD(N) \

(GFX.r2131 & (1 << (N)))



#define ON_SUB(N) \

((GFX.r2130 & 0x30) != 0x30 && \

 (GFX.r2130 & 2) && \

 (GFX.r212d & (1 << N)) && \

 !(PPU.BG_Forced & (1 << (N))))



#define ANYTHING_ON_SUB \

((GFX.r2130 & 0x30) != 0x30 && \

 (GFX.r2130 & 2) && \

 (GFX.r212d & 0x1f))



#define ADD_OR_SUB_ON_ANYTHING \

(GFX.r2131 & 0x3f)



#define BLACK BUILD_PIXEL(0,0,0)



void DrawTile (u32 Tile, u32 Offset, u32 StartLine,

	       u32 LineCount, struct SGFX * gfx);

void DrawClippedTile (u32 Tile, u32 Offset,

		      u32 StartPixel, u32 Width,

		      u32 StartLine, u32 LineCount, struct SGFX * gfx);

void DrawTilex2 (u32 Tile, u32 Offset, u32 StartLine,

		 u32 LineCount, struct SGFX * gfx);

void DrawClippedTilex2 (u32 Tile, u32 Offset,

			u32 StartPixel, u32 Width,

			u32 StartLine, u32 LineCount, struct SGFX * gfx);

void DrawTilex2x2 (u32 Tile, u32 Offset, u32 StartLine,

	       u32 LineCount, struct SGFX * gfx);

void DrawClippedTilex2x2 (u32 Tile, u32 Offset,

			  u32 StartPixel, u32 Width,

			  u32 StartLine, u32 LineCount, struct SGFX * gfx);

void DrawLargePixel (u32 Tile, u32 Offset,

		     u32 StartPixel, u32 Pixels,

		     u32 StartLine, u32 LineCount, struct SGFX * gfx);



void DrawTile16 (u32 Tile, u32 Offset, u32 StartLine,

	         u32 LineCount, struct SGFX * gfx);

void DrawClippedTile16 (u32 Tile, u32 Offset,

		        u32 StartPixel, u32 Width,

		        u32 StartLine, u32 LineCount, struct SGFX * gfx);

void DrawTile16x2 (u32 Tile, u32 Offset, u32 StartLine,

		   u32 LineCount, struct SGFX * gfx);

void DrawClippedTile16x2 (u32 Tile, u32 Offset,

			  u32 StartPixel, u32 Width,

			  u32 StartLine, u32 LineCount, struct SGFX * gfx);

void DrawTile16x2x2 (u32 Tile, u32 Offset, u32 StartLine,

		     u32 LineCount, struct SGFX * gfx);

void DrawClippedTile16x2x2 (u32 Tile, u32 Offset,

			    u32 StartPixel, u32 Width,

			    u32 StartLine, u32 LineCount, struct SGFX * gfx);

void DrawLargePixel16 (u32 Tile, u32 Offset,

		       u32 StartPixel, u32 Pixels,

		       u32 StartLine, u32 LineCount, struct SGFX * gfx);



void DrawTile16Add (u32 Tile, u32 Offset, u32 StartLine,

		    u32 LineCount, struct SGFX * gfx);



void DrawClippedTile16Add (u32 Tile, u32 Offset,

			   u32 StartPixel, u32 Width,

			   u32 StartLine, u32 LineCount, struct SGFX * gfx);



void DrawTile16Add1_2 (u32 Tile, u32 Offset, u32 StartLine,

		       u32 LineCount, struct SGFX * gfx);



void DrawClippedTile16Add1_2 (u32 Tile, u32 Offset,

			      u32 StartPixel, u32 Width,

			      u32 StartLine, u32 LineCount, struct SGFX * gfx);



void DrawTile16FixedAdd1_2 (u32 Tile, u32 Offset, u32 StartLine,

			    u32 LineCount, struct SGFX * gfx);



void DrawClippedTile16FixedAdd1_2 (u32 Tile, u32 Offset,

				   u32 StartPixel, u32 Width,

				   u32 StartLine, u32 LineCount, struct SGFX * gfx);



void DrawTile16Sub (u32 Tile, u32 Offset, u32 StartLine,

		    u32 LineCount, struct SGFX * gfx);



void DrawClippedTile16Sub (u32 Tile, u32 Offset,

			   u32 StartPixel, u32 Width,

			   u32 StartLine, u32 LineCount, struct SGFX * gfx);



void DrawTile16Sub1_2 (u32 Tile, u32 Offset, u32 StartLine,

		       u32 LineCount, struct SGFX * gfx);



void DrawClippedTile16Sub1_2 (u32 Tile, u32 Offset,

			      u32 StartPixel, u32 Width,

			      u32 StartLine, u32 LineCount, struct SGFX * gfx);



void DrawTile16FixedSub1_2 (u32 Tile, u32 Offset, u32 StartLine,

			    u32 LineCount, struct SGFX * gfx);



void DrawClippedTile16FixedSub1_2 (u32 Tile, u32 Offset,

				   u32 StartPixel, u32 Width,

				   u32 StartLine, u32 LineCount, struct SGFX * gfx);



void DrawLargePixel16Add (u32 Tile, u32 Offset,

			  u32 StartPixel, u32 Pixels,

			  u32 StartLine, u32 LineCount, struct SGFX * gfx);



void DrawLargePixel16Add1_2 (u32 Tile, u32 Offset,

			     u32 StartPixel, u32 Pixels,

			     u32 StartLine, u32 LineCount, struct SGFX * gfx);



void DrawLargePixel16Sub (u32 Tile, u32 Offset,

			  u32 StartPixel, u32 Pixels,

			  u32 StartLine, u32 LineCount, struct SGFX * gfx);



void DrawLargePixel16Sub1_2 (u32 Tile, u32 Offset,

			     u32 StartPixel, u32 Pixels,

			     u32 StartLine, u32 LineCount, struct SGFX * gfx);



void DrawHiResClippedTile16 (u32 Tile, u32 Offset,

			u32 StartPixel, u32 Width,

			u32 StartLine, u32 LineCount, struct SGFX * gfx);



void DrawHiResTile16 (u32 Tile, u32 Offset,

			u32 StartLine, u32 LineCount, struct SGFX * gfx);



bool8_32 S9xGraphicsInit ()

{

    register u32 PixelOdd = 1;

    register u32 PixelEven = 2;



#ifdef GFX_MULTI_FORMAT

    if (GFX.BuildPixel == NULL)

	S9xSetRenderPixelFormat (RGB565);

#endif



    for (u8 bitshift = 0; bitshift < 4; bitshift++)

    {

	for (register char i = 0; i < 16; i++)

	{

	    register u32 h = 0;

	    register u32 l = 0;



#if defined(LSB_FIRST)

	    if (i & 8)

		h |= PixelOdd;

	    if (i & 4)

		h |= PixelOdd << 8;

	    if (i & 2)

		h |= PixelOdd << 16;

	    if (i & 1)

		h |= PixelOdd << 24;

	    if (i & 8)

		l |= PixelOdd;

	    if (i & 4)

		l |= PixelOdd << 8;

	    if (i & 2)

		l |= PixelOdd << 16;

	    if (i & 1)

		l |= PixelOdd << 24;

#else

	    if (i & 8)

		h |= (PixelOdd << 24);

	    if (i & 4)

		h |= (PixelOdd << 16);

	    if (i & 2)

		h |= (PixelOdd << 8);

	    if (i & 1)

		h |= PixelOdd;

	    if (i & 8)

		l |= (PixelOdd << 24);

	    if (i & 4)

		l |= (PixelOdd << 16);

	    if (i & 2)

		l |= (PixelOdd << 8);

	    if (i & 1)

		l |= PixelOdd;

#endif



	    odd_high[bitshift][(u8)i] = h;

	    odd_low[bitshift][(u8)i] = l;

	    h = l = 0;



#if defined(LSB_FIRST)

	    if (i & 8)

		h |= PixelEven;

	    if (i & 4)

		h |= PixelEven << 8;

	    if (i & 2)

		h |= PixelEven << 16;

	    if (i & 1)

		h |= PixelEven << 24;

	    if (i & 8)

		l |= PixelEven;

	    if (i & 4)

		l |= PixelEven << 8;

	    if (i & 2)

		l |= PixelEven << 16;

	    if (i & 1)

		l |= PixelEven << 24;

#else

	    if (i & 8)

		h |= (PixelEven << 24);

	    if (i & 4)

		h |= (PixelEven << 16);

	    if (i & 2)

		h |= (PixelEven << 8);

	    if (i & 1)

		h |= PixelEven;

	    if (i & 8)

		l |= (PixelEven << 24);

	    if (i & 4)

		l |= (PixelEven << 16);

	    if (i & 2)

		l |= (PixelEven << 8);

	    if (i & 1)

		l |= PixelEven;

#endif



	    even_high[bitshift][(u8)i] = h;

	    even_low[bitshift][(u8)i] = l;

	}

	PixelEven <<= 2;

	PixelOdd <<= 2;

    }



    GFX.RealPitch = GFX.Pitch2 = GFX.Pitch;

    GFX.ZPitch = GFX.Pitch;

    if (Settings.SixteenBit)

	GFX.ZPitch >>= 1;

    GFX.Delta = (GFX.SubScreen - GFX.Screen) >> 1;

    GFX.DepthDelta = GFX.SubZBuffer - GFX.ZBuffer;



    PPU.BG_Forced = 0;

    IPPU.OBJChanged = TRUE;

    if (Settings.Transparency)

	Settings.SixteenBit = TRUE;



    IPPU.DirectColourMapsNeedRebuild = TRUE;

    GFX.PixSize = 1;

    if (Settings.SixteenBit)

    {

	DrawTilePtr = DrawTile16;

	DrawClippedTilePtr = DrawClippedTile16;

	DrawLargePixelPtr = DrawLargePixel16;

	DrawHiResTilePtr= DrawHiResTile16;

	DrawHiResClippedTilePtr = DrawHiResClippedTile16;

	GFX.PPL = GFX.Pitch >> 1;

	GFX.PPLx2 = GFX.Pitch;

    }

    else

    {

	DrawTilePtr = DrawTile;

	DrawClippedTilePtr = DrawClippedTile;

	DrawLargePixelPtr = DrawLargePixel;

	DrawHiResTilePtr = DrawTile;

	DrawHiResClippedTilePtr = DrawClippedTile;

	GFX.PPL = GFX.Pitch;

	GFX.PPLx2 = GFX.Pitch * 2;

    }

    S9xFixColourBrightness ();



    if (Settings.SixteenBit)

    {

	if (!(GFX.X2 = (u16 *) malloc (sizeof (u16) * 0x10000)))

	    return (FALSE);



	if (!(GFX.ZERO_OR_X2 = (u16 *) malloc (sizeof (u16) * 0x10000)) ||

	    !(GFX.ZERO = (u16 *) malloc (sizeof (u16) * 0x10000)))

	{

	    if (GFX.ZERO_OR_X2)

	    {

		free ((char *) GFX.ZERO_OR_X2);

		GFX.ZERO_OR_X2 = NULL;

	    }

	    if (GFX.X2)

	    {

		free ((char *) GFX.X2);

		GFX.X2 = NULL;

	    }

	    return (FALSE);

	}

	u32 r, g, b;



	// Build a lookup table that multiplies a packed RGB value by 2 with

	// saturation.

	for (r = 0; r <= MAX_RED; r++)

	{

	    u32 r2 = r << 1;

	    if (r2 > MAX_RED)

		r2 = MAX_RED;

	    for (g = 0; g <= MAX_GREEN; g++)

	    {

		u32 g2 = g << 1;

		if (g2 > MAX_GREEN)

		    g2 = MAX_GREEN;

		for (b = 0; b <= MAX_BLUE; b++)

		{

		    u32 b2 = b << 1;

		    if (b2 > MAX_BLUE)

			b2 = MAX_BLUE;

		    GFX.X2 [BUILD_PIXEL2 (r, g, b)] = BUILD_PIXEL2 (r2, g2, b2);

		    GFX.X2 [BUILD_PIXEL2 (r, g, b) & ~ALPHA_BITS_MASK] = BUILD_PIXEL2 (r2, g2, b2);

		}

	    }

	}

	ZeroMemory (GFX.ZERO, 0x10000 * sizeof (u16));

	ZeroMemory (GFX.ZERO_OR_X2, 0x10000 * sizeof (u16));

	// Build a lookup table that if the top bit of the color value is zero

	// then the value is zero, otherwise multiply the value by 2. Used by

	// the color subtraction code.



#if defined(OLD_COLOUR_BLENDING)

	for (r = 0; r <= MAX_RED; r++)

	{

	    u32 r2 = r;

	    if ((r2 & 0x10) == 0)

		r2 = 0;

	    else

		r2 = (r2 << 1) & MAX_RED;



	    for (g = 0; g <= MAX_GREEN; g++)

	    {

		u32 g2 = g;

		if ((g2 & GREEN_HI_BIT) == 0)

		    g2 = 0;

		else

		    g2 = (g2 << 1) & MAX_GREEN;



		for (b = 0; b <= MAX_BLUE; b++)

		{

		    u32 b2 = b;

		    if ((b2 & 0x10) == 0)

			b2 = 0;

		    else

			b2 = (b2 << 1) & MAX_BLUE;



		    GFX.ZERO_OR_X2 [BUILD_PIXEL2 (r, g, b)] = BUILD_PIXEL2 (r2, g2, b2);

		    GFX.ZERO_OR_X2 [BUILD_PIXEL2 (r, g, b) & ~ALPHA_BITS_MASK] = BUILD_PIXEL2 (r2, g2, b2);

		}

	    }

	}

#else

        for (r = 0; r <= MAX_RED; r++)

        {

            u32 r2 = r;

            if ((r2 & 0x10) == 0)

                r2 = 0;

            else

                r2 = (r2 << 1) & MAX_RED;



            if (r2 == 0)

                r2 = 1;

            for (g = 0; g <= MAX_GREEN; g++)

            {

                u32 g2 = g;

                if ((g2 & GREEN_HI_BIT) == 0)

                    g2 = 0;

                else

                    g2 = (g2 << 1) & MAX_GREEN;



                if (g2 == 0)

                    g2 = 1;

                for (b = 0; b <= MAX_BLUE; b++)

                {

                    u32 b2 = b;

                    if ((b2 & 0x10) == 0)

                        b2 = 0;

                    else

                        b2 = (b2 << 1) & MAX_BLUE;



                    if (b2 == 0)

                        b2 = 1;

                    GFX.ZERO_OR_X2 [BUILD_PIXEL2 (r, g, b)] = BUILD_PIXEL2 (r2, g2, b2);

                    GFX.ZERO_OR_X2 [BUILD_PIXEL2 (r, g, b) & ~ALPHA_BITS_MASK] = BUILD_PIXEL2 (r2, g2, b2);

                }

            }

        }

#endif



	// Build a lookup table that if the top bit of the color value is zero

	// then the value is zero, otherwise its just the value.

	for (r = 0; r <= MAX_RED; r++)

	{

	    u32 r2 = r;

	    if ((r2 & 0x10) == 0)

		r2 = 0;

	    else

		r2 &= ~0x10;



	    for (g = 0; g <= MAX_GREEN; g++)

	    {

		u32 g2 = g;

		if ((g2 & GREEN_HI_BIT) == 0)

		    g2 = 0;

		else

		    g2 &= ~GREEN_HI_BIT;

		for (b = 0; b <= MAX_BLUE; b++)

		{

		    u32 b2 = b;

		    if ((b2 & 0x10) == 0)

			b2 = 0;

		    else

			b2 &= ~0x10;



		    GFX.ZERO [BUILD_PIXEL2 (r, g, b)] = BUILD_PIXEL2 (r2, g2, b2);

		    GFX.ZERO [BUILD_PIXEL2 (r, g, b) & ~ALPHA_BITS_MASK] = BUILD_PIXEL2 (r2, g2, b2);

		}

	    }

	}    

    }

    else

    {

	GFX.X2 = NULL;

	GFX.ZERO_OR_X2 = NULL;

	GFX.ZERO = NULL;

    }



    return (TRUE);

}



void S9xGraphicsDeinit (void)

{

    // Free any memory allocated in S9xGraphicsInit

    if (GFX.X2)

    {

	free ((char *) GFX.X2);

	GFX.X2 = NULL;

    }

    if (GFX.ZERO_OR_X2)

    {

	free ((char *) GFX.ZERO_OR_X2);

	GFX.ZERO_OR_X2 = NULL;

    }

    if (GFX.ZERO)

    {

	free ((char *) GFX.ZERO);

	GFX.ZERO = NULL;

    }

}





void S9xBuildDirectColourMaps ()

{

    for (u32 p = 0; p < 8; p++)

    {

		for (u32 c = 0; c < 256; c++)

		{

			// XXX: Brightness

			DirectColourMaps [p][c] = BUILD_PIXEL (((c & 7) << 2) | ((p & 1) << 1),

							   ((c & 0x38) >> 1) | (p & 2),

							   ((c & 0xc0) >> 3) | (p & 4));

		}

    }

    IPPU.DirectColourMapsNeedRebuild = FALSE;

}



void S9xStartScreenRefresh ()

{

    if (GFX.InfoStringTimeout > 0 && --GFX.InfoStringTimeout == 0)

	GFX.InfoString = NULL;



    if (IPPU.RenderThisFrame)

    {

	IPPU.RenderedFramesCount++;

	IPPU.PreviousLine = IPPU.CurrentLine = 0;

	IPPU.MaxBrightness = PPU.Brightness;

	IPPU.LatchedBlanking = PPU.ForcedBlanking;

	IPPU.LatchedInterlace = (Memory.FillRAM[0x2133] & 1);

	IPPU.RenderedScreenWidth = 256;

	IPPU.RenderedScreenHeight = PPU.ScreenHeight;

	IPPU.DoubleWidthPixels = FALSE;

	GFX.Pitch2 = GFX.Pitch = GFX.RealPitch;

	GFX.PPL = GFX.PPLx2 >> 1;

	GFX.ZPitch = GFX.RealPitch;

	if (Settings.SixteenBit)

		    GFX.ZPitch >>= 1;

	PPU.RecomputeClipWindows = TRUE;

	GFX.DepthDelta = GFX.SubZBuffer - GFX.ZBuffer;

	GFX.Delta = (GFX.SubScreen - GFX.Screen) >> 1;

    }

    if (++IPPU.FrameCount % Memory.ROMFramesPerSecond == 0)

    {

		IPPU.DisplayedRenderedFrameCount = IPPU.RenderedFramesCount;

		IPPU.RenderedFramesCount = 0;

		IPPU.FrameCount = 0;

    }

}



void RenderLine (u8 C)

{

    if (IPPU.RenderThisFrame)

    {

		LineData[C].BG[0].VOffset = PPU.BG[0].VOffset + 1;

		LineData[C].BG[0].HOffset = PPU.BG[0].HOffset;

		LineData[C].BG[1].VOffset = PPU.BG[1].VOffset + 1;

		LineData[C].BG[1].HOffset = PPU.BG[1].HOffset;



		if (PPU.BGMode == 7)

		{

			struct SLineMatrixData *p = &LineMatrixData [C];

			p->MatrixA = PPU.MatrixA;

			p->MatrixB = PPU.MatrixB;

			p->MatrixC = PPU.MatrixC;

			p->MatrixD = PPU.MatrixD;

			p->CentreX = PPU.CentreX;

			p->CentreY = PPU.CentreY;

		}

		else

		{

			if (Settings.StarfoxHack && PPU.BG[2].VOffset == 0 &&

			PPU.BG[2].HOffset == 0xe000)

			{

				LineData[C].BG[2].VOffset = 0xe1;

				LineData[C].BG[2].HOffset = 0;

			}

			else

			{

				LineData[C].BG[2].VOffset = PPU.BG[2].VOffset + 1;

				LineData[C].BG[2].HOffset = PPU.BG[2].HOffset;

				LineData[C].BG[3].VOffset = PPU.BG[3].VOffset + 1;

				LineData[C].BG[3].HOffset = PPU.BG[3].HOffset;

			}

		}

		IPPU.CurrentLine = C + 1;

    }

}



void S9xEndScreenRefresh ()

{

    IPPU.HDMAStarted = FALSE;



	if (IPPU.RenderThisFrame)

    {

		FLUSH_REDRAW ();

		if (IPPU.ColorsChanged)

		{

			u32 saved = PPU.CGDATA[0];

			if (!Settings.SixteenBit)

			{

				// Hack for Super Mario World - to get its sky blue

				// (It uses Fixed colour addition on the backdrop colour)

				if (!(Memory.FillRAM [0x2131] & 0x80) &&

					(Memory.FillRAM[0x2131] & 0x20) &&

					(PPU.FixedColourRed || PPU.FixedColourGreen ||

					 PPU.FixedColourBlue))

				{

					PPU.CGDATA[0] = PPU.FixedColourRed |

							(PPU.FixedColourGreen << 5) |

							(PPU.FixedColourBlue << 10);

				}

			}

			IPPU.ColorsChanged = FALSE;

//			S9xSetPalette ();

			PPU.CGDATA[0] = saved;

	}

            GFX.Pitch = GFX.Pitch2 = GFX.RealPitch;

            GFX.PPL = GFX.PPLx2 >> 1;

	}

	snesEmu.sync(IPPU.RenderedScreenWidth, IPPU.RenderedScreenHeight);

#ifndef RC_OPTIMIZED

    S9xApplyCheats ();

#endif



#ifdef DEBUGGER

    if (CPU.Flags & FRAME_ADVANCE_FLAG)

    {

	if (ICPU.FrameAdvanceCount)

	{

	    ICPU.FrameAdvanceCount--;

		IPPU.RenderThisFrame = TRUE;

	}

	else

	{

	    CPU.Flags &= ~FRAME_ADVANCE_FLAG;

	    CPU.Flags |= DEBUG_MODE_FLAG;

	}

    }

#endif

}



void S9xSetInfoString (const char *string)

{

    GFX.InfoString = string;

    GFX.InfoStringTimeout = 120;

}



INLINE void SelectTileRenderer (bool8_32 normal)

{

    if (normal)

    {

	DrawTilePtr = DrawTile16;

	DrawClippedTilePtr = DrawClippedTile16;

	DrawLargePixelPtr = DrawLargePixel16;

    }

    else

    {

	if (GFX.r2131 & 0x80)

	{

	    if (GFX.r2131 & 0x40)

	    {

		if (GFX.r2130 & 2)

		{

		    DrawTilePtr = DrawTile16Sub1_2;

		    DrawClippedTilePtr = DrawClippedTile16Sub1_2;

		}

		else

		{

		    // Fixed colour substraction

		    DrawTilePtr = DrawTile16FixedSub1_2;

		    DrawClippedTilePtr = DrawClippedTile16FixedSub1_2;

		}

		DrawLargePixelPtr = DrawLargePixel16Sub1_2;

	    }

	    else

	    {

		DrawTilePtr = DrawTile16Sub;

		DrawClippedTilePtr = DrawClippedTile16Sub;

		DrawLargePixelPtr = DrawLargePixel16Sub;

	    }

	}

	else

	{

	    if (GFX.r2131 & 0x40)

	    {

		if (GFX.r2130 & 2)

		{

		    DrawTilePtr = DrawTile16Add1_2;

		    DrawClippedTilePtr = DrawClippedTile16Add1_2;

		}

		else

		{

		    // Fixed colour addition

		    DrawTilePtr = DrawTile16FixedAdd1_2;

		    DrawClippedTilePtr = DrawClippedTile16FixedAdd1_2;

		}

		DrawLargePixelPtr = DrawLargePixel16Add1_2;

	    }

	    else

	    {

		DrawTilePtr = DrawTile16Add;

		DrawClippedTilePtr = DrawClippedTile16Add;

		DrawLargePixelPtr = DrawLargePixel16Add;

	    }

	}

    }

}



void S9xSetupOBJ ()

{

    int SmallSize;

    int LargeSize;



    switch (PPU.OBJSizeSelect)

    {

    case 0:

	SmallSize = 8;

	LargeSize = 16;

	break;

    case 1:

	SmallSize = 8;

	LargeSize = 32;

	break;

    case 2:

	SmallSize = 8;

	LargeSize = 64;

	break;

    case 3:

	SmallSize = 16;

	LargeSize = 32;

	break;

    case 4:

	SmallSize = 16;

	LargeSize = 64;

	break;

    case 5:

    default:

	SmallSize = 32;

	LargeSize = 64;

	break;

    }



    int C = 0;

    

    int FirstSprite = PPU.FirstSprite & 0x7f;

    int S = FirstSprite;

    do

    {

		int Size;

		if (PPU.OBJ [S].Size)

			Size = LargeSize;

		else

			Size = SmallSize;



		long VPos = PPU.OBJ [S].VPos;



		if (VPos >= PPU.ScreenHeight)

			VPos -= 256;

		if (PPU.OBJ [S].HPos < 256 && PPU.OBJ [S].HPos > -Size &&

			VPos < PPU.ScreenHeight && VPos > -Size)

		{

			GFX.OBJList [C++] = S;

			GFX.Sizes[S] = Size;

			GFX.VPositions[S] = VPos;

		}

		S = (S + 1) & 0x7f;

    } while (S != FirstSprite);



    // Terminate the list

    GFX.OBJList [C] = -1;

    IPPU.OBJChanged = FALSE;

}



void DrawOBJS (bool8_32 OnMain = FALSE, u8 D = 0)

{

	u32 O;

    u32 BaseTile, Tile;



    CHECK_SOUND();



    BG.BitShift = 4;

    BG.TileShift = 5;

    BG.TileAddress = PPU.OBJNameBase;

    BG.StartPalette = 128;

    BG.PaletteShift = 4;

    BG.PaletteMask = 7;

    BG.Buffer = IPPU.TileCache [TILE_4BIT];

	BG.Buffered = IPPU.TileCached [TILE_4BIT];

	BG.NameSelect = PPU.OBJNameSelect;

    BG.DirectColourMode = FALSE;



    GFX.PixSize = 1;



    GFX.Z1 = D + 2;



    int I = 0;

    for (int S = GFX.OBJList [I++]; S >= 0; S = GFX.OBJList [I++])

    {

	int VPos = GFX.VPositions [S];

	int Size = GFX.Sizes[S];

	int TileInc = 1;

	int Offset;



	if (VPos + Size <= (int) GFX.StartY || VPos > (int) GFX.EndY)

	    continue;



	if (OnMain && SUB_OR_ADD(4))

	{

	    SelectTileRenderer (!GFX.Pseudo && PPU.OBJ [S].Palette < 4);

	}



		BaseTile = PPU.OBJ[S].Name | (PPU.OBJ[S].Palette << 10);



		if (PPU.OBJ[S].HFlip)

		{

	    	BaseTile += ((Size >> 3) - 1) | H_FLIP;

		    TileInc = -1;

		}

		if (PPU.OBJ[S].VFlip)

		    BaseTile |= V_FLIP;



		int clipcount = GFX.pCurrentClip->Count [4];

		if (!clipcount)

		    clipcount = 1;

	

	GFX.Z2 = (PPU.OBJ[S].Priority + 1) * 4 + D;



	for (int clip = 0; clip < clipcount; clip++)

		{

		    int Left; 

		    int Right;

		    if (!GFX.pCurrentClip->Count [4])

		    {

				Left = 0;

				Right = 256;

		    }

		    else

	    	{

				Left = GFX.pCurrentClip->Left [clip][4];

				Right = GFX.pCurrentClip->Right [clip][4];

	    	}



	    if (Right <= Left || PPU.OBJ[S].HPos + Size <= Left ||

		PPU.OBJ[S].HPos >= Right)

		continue;



		    for (int Y = 0; Y < Size; Y += 8)

		    {

				if (VPos + Y + 7 >= (int) GFX.StartY && VPos + Y <= (int) GFX.EndY)

				{

				    int StartLine;

				    int TileLine;

				    int LineCount;

				    int Last;

			    			    

				    if ((StartLine = VPos + Y) < (int) GFX.StartY)

				    {

						StartLine = GFX.StartY - StartLine;

						LineCount = 8 - StartLine;

				    }

				    else

				    {

						StartLine = 0;

						LineCount = 8;

				    }

				    if ((Last = VPos + Y + 7 - GFX.EndY) > 0)

					if ((LineCount -= Last) <= 0)

					    break;



		    TileLine = StartLine << 3;

		    O = (VPos + Y + StartLine) * GFX.PPL;

		    if (!PPU.OBJ[S].VFlip)

			Tile = BaseTile + (Y << 1);

		    else

			Tile = BaseTile + ((Size - Y - 8) << 1);



		    int Middle = Size >> 3;

		    if (PPU.OBJ[S].HPos < Left)

		    {

			Tile += ((Left - PPU.OBJ[S].HPos) >> 3) * TileInc;

			Middle -= (Left - PPU.OBJ[S].HPos) >> 3;

			O += Left * GFX.PixSize;

			if ((Offset = (Left - PPU.OBJ[S].HPos) & 7))

			{

			    O -= Offset * GFX.PixSize;

			    int W = 8 - Offset;

			    int Width = Right - Left;

			    if (W > Width)

				W = Width;

			    (*DrawClippedTilePtr) (Tile, O, Offset, W,

						   TileLine, LineCount, &GFX);

			    

			    if (W >= Width)

				continue;

			    Tile += TileInc;

			    Middle--;

			    O += 8 * GFX.PixSize;

			}

		    }

		    else

			O += PPU.OBJ[S].HPos * GFX.PixSize;



		    if (PPU.OBJ[S].HPos + Size >= Right)

		    {

			Middle -= ((PPU.OBJ[S].HPos + Size + 7) -

				   Right) >> 3;

			Offset = (Right - (PPU.OBJ[S].HPos + Size)) & 7;

		    }

		    else

			Offset = 0;



		    for (int X = 0; X < Middle; X++, O += 8 * GFX.PixSize,

			 Tile += TileInc)

		    {

			(*DrawTilePtr) (Tile, O, TileLine, LineCount, &GFX);

		    }

		    if (Offset)

		    {

			(*DrawClippedTilePtr) (Tile, O, 0, Offset,

					       TileLine, LineCount, &GFX);

		    }

		}

	    }

	}

    }

}



void DrawBackgroundMosaic (u32 BGMode, u32 bg, u8 Z1, u8 Z2)

{

    CHECK_SOUND();



    u32 Tile;

    u16 *SC0;

    u16 *SC1;

    u16 *SC2;

    u16 *SC3;

    u8 depths [2] = {Z1, Z2};

    

    if (BGMode == 0)

	BG.StartPalette = bg << 5;

    else

	BG.StartPalette = 0;



    SC0 = (u16 *) &Memory.VRAM[PPU.BG[bg].SCBase << 1];



    if (PPU.BG[bg].SCSize & 1)

	SC1 = SC0 + 1024;

    else

	SC1 = SC0;



    if (PPU.BG[bg].SCSize & 2)

	SC2 = SC1 + 1024;

    else

	SC2 = SC0;



    if (PPU.BG[bg].SCSize & 1)

	SC3 = SC2 + 1024;

    else

	SC3 = SC2;



    u32 Lines;

    u32 OffsetMask;

    u32 OffsetShift;



    if (BG.TileSize == 16)

    {

	OffsetMask = 0x3ff;

	OffsetShift = 4;

    }

    else

    {

	OffsetMask = 0x1ff;

	OffsetShift = 3;

    }



    for (u32 Y = GFX.StartY; Y <= GFX.EndY; Y += Lines)

    {

	u32 VOffset = LineData [Y].BG[bg].VOffset;

	u32 HOffset = LineData [Y].BG[bg].HOffset;

	u32 MosaicOffset = Y % PPU.Mosaic;



	for (Lines = 1; Lines < PPU.Mosaic - MosaicOffset; Lines++)

	    if ((VOffset != LineData [Y + Lines].BG[bg].VOffset) ||

		(HOffset != LineData [Y + Lines].BG[bg].HOffset))

		break;

	

	u32 MosaicLine = VOffset + Y - MosaicOffset;



	if (Y + Lines > GFX.EndY)

	    Lines = GFX.EndY + 1 - Y;

	u32 VirtAlign = (MosaicLine & 7) << 3;

	

	u16 *b1;

	u16 *b2;



	u32 ScreenLine = MosaicLine >> OffsetShift;

	u32 Rem16 = MosaicLine & 15;



	if (ScreenLine & 0x20)

	    b1 = SC2, b2 = SC3;

	else

	    b1 = SC0, b2 = SC1;



	b1 += (ScreenLine & 0x1f) << 5;

	b2 += (ScreenLine & 0x1f) << 5;

	u16 *t;

	u32 Left = 0;

	u32 Right = 256;



	u32 ClipCount = GFX.pCurrentClip->Count [bg];

	u32 HPos = HOffset;

	u32 PixWidth = PPU.Mosaic;



	if (!ClipCount)

	    ClipCount = 1;



	for (u32 clip = 0; clip < ClipCount; clip++)

	{

	    if (GFX.pCurrentClip->Count [bg])

	    {

		Left = GFX.pCurrentClip->Left [clip][bg];

		Right = GFX.pCurrentClip->Right [clip][bg];

		u32 r = Left % PPU.Mosaic;

		HPos = HOffset + Left;

		PixWidth = PPU.Mosaic - r;

	    }

	    u32 s = Y * GFX.PPL + Left * GFX.PixSize;

	    for (u32 x = Left; x < Right; x += PixWidth, 

		 s += PixWidth * GFX.PixSize,

		 HPos += PixWidth, PixWidth = PPU.Mosaic)

	    {

		u32 Quot = (HPos & OffsetMask) >> 3;



		if (x + PixWidth >= Right)

		    PixWidth = Right - x;



		if (BG.TileSize == 8)

		{

		    if (Quot > 31)

			t = b2 + (Quot & 0x1f);

		    else

			t = b1 + Quot;

		}

		else

		{

		    if (Quot > 63)

			t = b2 + ((Quot >> 1) & 0x1f);

		    else

			t = b1 + (Quot >> 1);

		}



		Tile = READ_2BYTES (t);

		GFX.Z1 = GFX.Z2 = depths [(Tile & 0x2000) >> 13];



		// Draw tile...

		if (BG.TileSize != 8)

		{

		    if (Tile & H_FLIP)

		    {

			// Horizontal flip, but what about vertical flip ?

			if (Tile & V_FLIP)

			{

			    // Both horzontal & vertical flip

			    if (Rem16 < 8)

			    {

				(*DrawLargePixelPtr) (Tile + 17 - (Quot & 1), s,

						      HPos & 7, PixWidth,

						      VirtAlign, Lines, &GFX);

			    }

			    else

			    {

				(*DrawLargePixelPtr) (Tile + 1 - (Quot & 1), s,

						      HPos & 7, PixWidth,

						      VirtAlign, Lines, &GFX);

			    }

			}

			else

			{

			    // Horizontal flip only

			    if (Rem16 > 7)

			    {

				(*DrawLargePixelPtr) (Tile + 17 - (Quot & 1), s,

						      HPos & 7, PixWidth,

						      VirtAlign, Lines, &GFX);

			    }

			    else

			    {

				(*DrawLargePixelPtr) (Tile + 1 - (Quot & 1), s,

						      HPos & 7, PixWidth,

						      VirtAlign, Lines, &GFX);

			    }

			}

		    }

		    else

		    {

			// No horizontal flip, but is there a vertical flip ?

			if (Tile & V_FLIP)

			{

			    // Vertical flip only

			    if (Rem16 < 8)

			    {

				(*DrawLargePixelPtr) (Tile + 16 + (Quot & 1), s,

						      HPos & 7, PixWidth,

						      VirtAlign, Lines, &GFX);

			    }

			    else

			    {

				(*DrawLargePixelPtr) (Tile + (Quot & 1), s,

						      HPos & 7, PixWidth,

						      VirtAlign, Lines, &GFX);

			    }

			}

			else

			{

			    // Normal unflipped

			    if (Rem16 > 7)

			    {

				(*DrawLargePixelPtr) (Tile + 16 + (Quot & 1), s,

						      HPos & 7, PixWidth,

						      VirtAlign, Lines, &GFX);

			    }

			    else

			    {

				(*DrawLargePixelPtr) (Tile + (Quot & 1), s,

						      HPos & 7, PixWidth,

						      VirtAlign, Lines, &GFX);

			    }

			}

		    }

		}

		else

		    (*DrawLargePixelPtr) (Tile, s, HPos & 7, PixWidth,

					  VirtAlign, Lines, &GFX);

	    }

	}

    }

}



void DrawBackgroundOffset (u32 BGMode, u32 bg, u8 Z1, u8 Z2)

{

    CHECK_SOUND();



    u32 Tile;

    u16 *SC0;

    u16 *SC1;

    u16 *SC2;

    u16 *SC3;

    u16 *BPS0;

    u16 *BPS1;

    u16 *BPS2;

    u16 *BPS3;

    u32 Width;

    int VOffsetOffset = BGMode == 4 ? 0 : 32;

    u8 depths [2] = {Z1, Z2};

    

    BG.StartPalette = 0;



    BPS0 = (u16 *) &Memory.VRAM[PPU.BG[2].SCBase << 1];



    if (PPU.BG[2].SCSize & 1)

	BPS1 = BPS0 + 1024;

    else

	BPS1 = BPS0;



    if (PPU.BG[2].SCSize & 2)

	BPS2 = BPS1 + 1024;

    else

	BPS2 = BPS0;



    if (PPU.BG[2].SCSize & 1)

	BPS3 = BPS2 + 1024;

    else

	BPS3 = BPS2;

    

    SC0 = (u16 *) &Memory.VRAM[PPU.BG[bg].SCBase << 1];



    if (PPU.BG[bg].SCSize & 1)

	SC1 = SC0 + 1024;

    else

	SC1 = SC0;



    if (PPU.BG[bg].SCSize & 2)

	SC2 = SC1 + 1024;

    else

	SC2 = SC0;

    if (PPU.BG[bg].SCSize & 1)

	SC3 = SC2 + 1024;

    else

	SC3 = SC2;



    static const int Lines = 1;

    int OffsetMask;

    int OffsetShift;

    int OffsetEnableMask = 1 << (bg + 13);



    if (BG.TileSize == 16)

    {

		OffsetMask = 0x3ff;

		OffsetShift = 4;

    }

    else

    {

		OffsetMask = 0x1ff;

		OffsetShift = 3;

    }



    for (u32 Y = GFX.StartY; Y <= GFX.EndY; Y++)

    {

	u32 VOff = LineData [Y].BG[2].VOffset;

	u32 HOff = LineData [Y].BG[2].HOffset;

	int VirtAlign;

	int ScreenLine = VOff >> 3;

	int t1;

	int t2;

	u16 *s0;

	u16 *s1;

	u16 *s2;



	if (ScreenLine & 0x20)

	    s1 = BPS2, s2 = BPS3;

	else

	    s1 = BPS0, s2 = BPS1;



	s1 += (ScreenLine & 0x1f) << 5;

	s2 += (ScreenLine & 0x1f) << 5;



	int clipcount = GFX.pCurrentClip->Count [bg];

	if (!clipcount)

	    clipcount = 1;



	for (int clip = 0; clip < clipcount; clip++)

	{

	    u32 Left;

	    u32 Right;



	    if (!GFX.pCurrentClip->Count [bg])

	    {

		Left = 0;

		Right = 256;

	    }

	    else

	    {

		Left = GFX.pCurrentClip->Left [clip][bg];

		Right = GFX.pCurrentClip->Right [clip][bg];



		if (Right <= Left)

		    continue;

	    }



	    u32 VOffset;

	    u32 HOffset;

			u32 LineHOffset=LineData [Y].BG[bg].HOffset;

	    u32 Offset;

	    u32 HPos;

	    u32 Quot;

	    u32 Count;

	    u16 *t;

	    u32 Quot2;

	    u32 VCellOffset;

	    u32 HCellOffset;

	    u16 *b1;

	    u16 *b2;

	    u32 TotalCount = 0;

	    u32 MaxCount = 8;



	    u32 s = Left * GFX.PixSize + Y * GFX.PPL;

	    bool8_32 left_hand_edge = (Left == 0);

	    Width = Right - Left;



	    if (Left & 7)

		MaxCount = 8 - (Left & 7);



	    while (Left < Right) 

	    {

		if (left_hand_edge)

		{

		    // The SNES offset-per-tile background mode has a

		    // hardware limitation that the offsets cannot be set

		    // for the tile at the left-hand edge of the screen.

		    VOffset = LineData [Y].BG[bg].VOffset;

					HOffset = LineHOffset;

		    left_hand_edge = FALSE;

		}

		else

		{

		    // All subsequent offset tile data is shifted left by one,

		    // hence the - 1 below.

		    Quot2 = ((HOff + Left - 1) & OffsetMask) >> 3;



		    if (Quot2 > 31)

			s0 = s2 + (Quot2 & 0x1f);

		    else

			s0 = s1 + Quot2;



		    HCellOffset = READ_2BYTES (s0);



		    if (BGMode == 4)

		    {

			VOffset = LineData [Y].BG[bg].VOffset;

						HOffset=LineHOffset;

			if ((HCellOffset & OffsetEnableMask))

			{

			    if (HCellOffset & 0x8000)

				VOffset = HCellOffset + 1;

			    else

				HOffset = HCellOffset;

			}

		    }

		    else

		    {

			VCellOffset = READ_2BYTES (s0 + VOffsetOffset);

			if ((VCellOffset & OffsetEnableMask))

			    VOffset = VCellOffset + 1;

			else

			    VOffset = LineData [Y].BG[bg].VOffset;



			if ((HCellOffset & OffsetEnableMask))

							HOffset = (HCellOffset & ~7)|(LineHOffset&7);

			else

							HOffset=LineHOffset;

		    }

		}

		VirtAlign = ((Y + VOffset) & 7) << 3;

		ScreenLine = (VOffset + Y) >> OffsetShift;



		if (((VOffset + Y) & 15) > 7)

		{

		    t1 = 16;

		    t2 = 0;

		}

		else

		{

		    t1 = 0;

		    t2 = 16;

		}



		if (ScreenLine & 0x20)

		    b1 = SC2, b2 = SC3;

		else

		    b1 = SC0, b2 = SC1;



		b1 += (ScreenLine & 0x1f) << 5;

		b2 += (ScreenLine & 0x1f) << 5;



		HPos = (HOffset + Left) & OffsetMask;



		Quot = HPos >> 3;



		if (BG.TileSize == 8)

		{

		    if (Quot > 31)

			t = b2 + (Quot & 0x1f);

		    else

			t = b1 + Quot;

		}

		else

		{

		    if (Quot > 63)

			t = b2 + ((Quot >> 1) & 0x1f);

		    else

			t = b1 + (Quot >> 1);

		}



		if (MaxCount + TotalCount > Width)

		    MaxCount = Width - TotalCount;



		Offset = HPos & 7;



		Count = 8 - Offset;

		if (Count > MaxCount)

		    Count = MaxCount;



		s -= Offset * GFX.PixSize;

		Tile = READ_2BYTES(t);

		GFX.Z1 = GFX.Z2 = depths [(Tile & 0x2000) >> 13];



		if (BG.TileSize == 8)

		    (*DrawClippedTilePtr) (Tile, s, Offset, Count, VirtAlign, Lines, &GFX);

		else

		{

		    if (!(Tile & (V_FLIP | H_FLIP)))

		    {

			// Normal, unflipped

			(*DrawClippedTilePtr) (Tile + t1 + (Quot & 1),

					       s, Offset, Count, VirtAlign, Lines, &GFX);

		    }

		    else

		    if (Tile & H_FLIP)

		    {

			if (Tile & V_FLIP)

					{

			    // H & V flip

			    (*DrawClippedTilePtr) (Tile + t2 + 1 - (Quot & 1),

						   s, Offset, Count, VirtAlign, Lines, &GFX);

			}

			else

			{

			    // H flip only

			    (*DrawClippedTilePtr) (Tile + t1 + 1 - (Quot & 1),

						   s, Offset, Count, VirtAlign, Lines, &GFX);

			}

		    }

		    else

		    {

			// V flip only

			(*DrawClippedTilePtr) (Tile + t2 + (Quot & 1),

					       s, Offset, Count, VirtAlign, Lines, &GFX);

		    }

		}



		Left += Count;

		TotalCount += Count;

		s += (Offset + Count) * GFX.PixSize;

		MaxCount = 8;

	    }

	}

    }

}



void DrawBackgroundMode5 (u32 /* BGMODE */, u32 bg, u8 Z1, u8 Z2)

{

    CHECK_SOUND();



    GFX.Pitch = GFX.RealPitch;

    GFX.PPL = GFX.PPLx2 >> 1;

    GFX.PixSize = 1;

    u8 depths [2] = {Z1, Z2};



    u32 Tile;

    u16 *SC0;

    u16 *SC1;

    u16 *SC2;

    u16 *SC3;

    u32 Width;

    

    BG.StartPalette = 0;



    SC0 = (u16 *) &Memory.VRAM[PPU.BG[bg].SCBase << 1];



    if ((PPU.BG[bg].SCSize & 1))

	SC1 = SC0 + 1024;

    else

	SC1 = SC0;



    if ((PPU.BG[bg].SCSize & 2))

	SC2 = SC1 + 1024;

    else

	SC2 = SC0;



    if ((PPU.BG[bg].SCSize & 1))

	SC3 = SC2 + 1024;

    else

	SC3 = SC2;

    

    int Lines;

    int VOffsetMask;

    int VOffsetShift;



    if (BG.TileSize == 16)

    {

	VOffsetMask = 0x3ff;

	VOffsetShift = 4;

    }

    else

    {

	VOffsetMask = 0x1ff;

	VOffsetShift = 3;

    }

//    int endy = IPPU.LatchedInterlace ? GFX.EndY << 1 : GFX.EndY;

    int endy = GFX.EndY;



//    for (int Y = IPPU.LatchedInterlace ? GFX.StartY << 1 : GFX.StartY; Y <= endy; Y += Lines)

    for (int Y = GFX.StartY; Y <= endy; Y += Lines)

    {

//	int y = IPPU.LatchedInterlace ? (Y >> 1) : Y;

	int y = Y;

	u32 VOffset = LineData [y].BG[bg].VOffset;

	u32 HOffset = LineData [y].BG[bg].HOffset;

	int VirtAlign = (Y + VOffset) & 7;

	

	for (Lines = 1; Lines < 8 - VirtAlign; Lines++)

	    if ((VOffset != LineData [y + Lines].BG[bg].VOffset) ||

		(HOffset != LineData [y + Lines].BG[bg].HOffset))

		break;



	HOffset <<= 1;

	if (Y + Lines > endy)

	    Lines = endy + 1 - Y;

//	VirtAlign <<= 3;

	

	int ScreenLine = (VOffset + Y) >> VOffsetShift;

	int t1;

	int t2;

	if (((VOffset + Y) & 15) > 7)

	{

	    t1 = 16;

	    t2 = 0;

	}

	else

	{

	    t1 = 0;

	    t2 = 16;

	}

	u16 *b1;

	u16 *b2;



	if (ScreenLine & 0x20)

	    b1 = SC2, b2 = SC3;

	else

	    b1 = SC0, b2 = SC1;



	b1 += (ScreenLine & 0x1f) << 5;

	b2 += (ScreenLine & 0x1f) << 5;



	int clipcount = GFX.pCurrentClip->Count [bg];

	if (!clipcount)

	    clipcount = 1;

	for (int clip = 0; clip < clipcount; clip++)

	{

	    int Left;

	    int Right;



	    if (!GFX.pCurrentClip->Count [bg])

	    {

			Left = 0;

			Right = 512;

	    }

	    else

	    {

			Left = GFX.pCurrentClip->Left [clip][bg] * 2;

			Right = GFX.pCurrentClip->Right [clip][bg] * 2;



			if (Right <= Left)

			    continue;

	    }



	    u32 s = (Left>>1) * GFX.PixSize + Y * GFX.PPL;

	    u32 HPos = (HOffset + Left * GFX.PixSize) & 0x3ff;



	    u32 Quot = HPos >> 3;

	    u32 Count = 0;

	    

	    u16 *t;

	    if (Quot > 63)

		t = b2 + ((Quot >> 1) & 0x1f);

	    else

		t = b1 + (Quot >> 1);



	    Width = Right - Left;

	    // Left hand edge clipped tile

	    if (HPos & 7)

	    {

			int Offset = (HPos & 7);

		Count = 8 - Offset;

		if (Count > Width)

		    Count = Width;

		s -= (Offset>>1);

		Tile = READ_2BYTES (t);

		GFX.Z1 = GFX.Z2 = depths [(Tile & 0x2000) >> 13];



		if (BG.TileSize == 8)

		{

		    if (!(Tile & H_FLIP))

		    {

			// Normal, unflipped

			(*DrawHiResClippedTilePtr) (Tile + (Quot & 1),

						    s, Offset, Count, VirtAlign, Lines, &GFX);

		    }

		    else

		    {

			// H flip

			(*DrawHiResClippedTilePtr) (Tile + 1 - (Quot & 1),

						    s, Offset, Count, VirtAlign, Lines, &GFX);

		    }

		}

		else

				{

				    if (!(Tile & (V_FLIP | H_FLIP)))

		    {

			// Normal, unflipped

			(*DrawHiResClippedTilePtr) (Tile + t1 + (Quot & 1),

						    s, Offset, Count, VirtAlign, Lines, &GFX);

		    }

		    else

		    if (Tile & H_FLIP)

		    {

			if (Tile & V_FLIP)

			{

			    // H & V flip

			    (*DrawHiResClippedTilePtr) (Tile + t2 + 1 - (Quot & 1),

							s, Offset, Count, VirtAlign, Lines, &GFX);

			}

			else

			{

			    // H flip only

			    (*DrawHiResClippedTilePtr) (Tile + t1 + 1 - (Quot & 1),

							s, Offset, Count, VirtAlign, Lines, &GFX);

			}

		    }

		    else

		    {

			// V flip only

			(*DrawHiResClippedTilePtr) (Tile + t2 + (Quot & 1),

						    s, Offset, Count, VirtAlign, Lines, &GFX);

		    }

		}



		t += Quot & 1;

		if (Quot == 63)

			    t = b2;

		else if (Quot == 127)

		    t = b1;

		Quot++;

		s += 4;

	    }



	    // Middle, unclipped tiles

	    Count = Width - Count;

	    int Middle = Count >> 3;

	    Count &= 7;

	    for (int C = Middle; C > 0; s += 4, Quot++, C--)

	    {

		Tile = READ_2BYTES(t);

		GFX.Z1 = GFX.Z2 = depths [(Tile & 0x2000) >> 13];

		if (BG.TileSize == 8)

		{

		    if (!(Tile & H_FLIP))

		    {

			// Normal, unflipped

			(*DrawHiResTilePtr) (Tile + (Quot & 1),

					     s, VirtAlign, Lines, &GFX);

		    }

		    else

		    {

			// H flip

			(*DrawHiResTilePtr) (Tile + 1 - (Quot & 1),

					    s, VirtAlign, Lines, &GFX);

		    }

		}

		else

		{

		    if (!(Tile & (V_FLIP | H_FLIP)))

		    {

			// Normal, unflipped

			(*DrawHiResTilePtr) (Tile + t1 + (Quot & 1),

					     s, VirtAlign, Lines, &GFX);

		    }

		    else

		    if (Tile & H_FLIP)

		    {

			if (Tile & V_FLIP)

			{

			    // H & V flip

			    (*DrawHiResTilePtr) (Tile + t2 + 1 - (Quot & 1),

						 s, VirtAlign, Lines, &GFX);

			}

			else

			{

			    // H flip only

			    (*DrawHiResTilePtr) (Tile + t1 + 1 - (Quot & 1),

						 s, VirtAlign, Lines, &GFX);

			}

		    }

		    else

		    {

			// V flip only

			(*DrawHiResTilePtr) (Tile + t2 + (Quot & 1),

					     s, VirtAlign, Lines, &GFX);

		    }

		}



		t += Quot & 1;

			if (Quot == 63)

			    t = b2;

			else

			if (Quot == 127)

			    t = b1;

	    }



	    // Right-hand edge clipped tiles

	    if (Count)

	    {

		Tile = READ_2BYTES(t);

		GFX.Z1 = GFX.Z2 = depths [(Tile & 0x2000) >> 13];

		if (BG.TileSize == 8)

		{

		    if (!(Tile & H_FLIP))

		    {

			// Normal, unflipped

			(*DrawHiResClippedTilePtr) (Tile + (Quot & 1),

						    s, 0, Count, VirtAlign, Lines, &GFX);

		    }

		    else

		    {

			// H flip

			(*DrawHiResClippedTilePtr) (Tile + 1 - (Quot & 1),

						    s, 0, Count, VirtAlign, Lines, &GFX);

		    }

		}

		else

		{

		    if (!(Tile & (V_FLIP | H_FLIP)))

		    {

			// Normal, unflipped

			(*DrawHiResClippedTilePtr) (Tile + t1 + (Quot & 1),

						    s, 0, Count, VirtAlign, Lines, &GFX);

		    }

		    else

		    if (Tile & H_FLIP)

		    {

			if (Tile & V_FLIP)

			{

			    // H & V flip

			    (*DrawHiResClippedTilePtr) (Tile + t2 + 1 - (Quot & 1),

							s, 0, Count, VirtAlign, Lines, &GFX);

			}

			else

			{

			    // H flip only

			    (*DrawHiResClippedTilePtr) (Tile + t1 + 1 - (Quot & 1),

							s, 0, Count, VirtAlign, Lines, &GFX);

			}

		    }

		    else

		    {

			// V flip only

			(*DrawHiResClippedTilePtr) (Tile + t2 + (Quot & 1),

						    s, 0, Count, VirtAlign, Lines, &GFX);

		    }

		}

	    }

	}

    }

}



void DrawBackground (u32 BGMode, u32 bg, u8 Z1, u8 Z2)

{

    GFX.PixSize = 1;



    BG.TileSize = BGSizes [PPU.BG[bg].BGSize];

    BG.BitShift = BitShifts[BGMode][bg];

    BG.TileShift = TileShifts[BGMode][bg];

    BG.TileAddress = PPU.BG[bg].NameBase << 1;

    BG.NameSelect = 0;

    BG.Buffer = IPPU.TileCache [Depths [BGMode][bg]];

    BG.Buffered = IPPU.TileCached [Depths [BGMode][bg]];

    BG.PaletteShift = PaletteShifts[BGMode][bg];

    BG.PaletteMask = PaletteMasks[BGMode][bg];

    BG.DirectColourMode = (BGMode == 3 || BGMode == 4) && bg == 0 &&

		          (GFX.r2130 & 1);



    if (PPU.BGMosaic [bg] && PPU.Mosaic > 1)

    {

	DrawBackgroundMosaic (BGMode, bg, Z1, Z2);

	return;



    }

    switch (BGMode)

    {

    case 2:

	if (Settings.WrestlemaniaArcade)

	    break;

    case 4: // Used by Puzzle Bobble

        DrawBackgroundOffset (BGMode, bg, Z1, Z2);

	return;

	    case 5:

    case 6: // XXX: is also offset per tile.

	    DrawBackgroundMode5 (BGMode, bg, Z1, Z2);

	    return;

	}



    CHECK_SOUND();



    u32 Tile;

    u16 *SC0;

    u16 *SC1;

    u16 *SC2;

    u16 *SC3;

    u32 Width;

    u8 depths [2] = {Z1, Z2};

    

    if (BGMode == 0)

	BG.StartPalette = bg << 5;

    else

	BG.StartPalette = 0;



    SC0 = (u16 *) &Memory.VRAM[PPU.BG[bg].SCBase << 1];



    if (PPU.BG[bg].SCSize & 1)

	SC1 = SC0 + 1024;

    else

	SC1 = SC0;



    if (PPU.BG[bg].SCSize & 2)

	SC2 = SC1 + 1024;

    else

	SC2 = SC0;



    if (PPU.BG[bg].SCSize & 1)

	SC3 = SC2 + 1024;

    else

	SC3 = SC2;

    

    int Lines;

    int OffsetMask;

    int OffsetShift;



    if (BG.TileSize == 16)

    {

	OffsetMask = 0x3ff;

	OffsetShift = 4;

    }

    else

    {

	OffsetMask = 0x1ff;

	OffsetShift = 3;

    }



	// outermost loop

    for (u32 Y = GFX.StartY; Y <= GFX.EndY; Y += Lines)

    {

	u32 VOffset = LineData [Y].BG[bg].VOffset;

	u32 HOffset = LineData [Y].BG[bg].HOffset;

	int VirtAlign = (Y + VOffset) & 7;

	

	for (Lines = 1; Lines < 8 - VirtAlign; Lines++)

	    if ((VOffset != LineData [Y + Lines].BG[bg].VOffset) ||

		(HOffset != LineData [Y + Lines].BG[bg].HOffset))

		break;



	if (Y + Lines > GFX.EndY)

	    Lines = GFX.EndY + 1 - Y;



		VirtAlign <<= 3;

		

		u32 ScreenLine = (VOffset + Y) >> OffsetShift;

	u32 t1;

	u32 t2;

	if (((VOffset + Y) & 15) > 7)

	{

	    t1 = 16;

	    t2 = 0;

	}

	else

	{

	    t1 = 0;

	    t2 = 16;

	}

	u16 *b1;

	u16 *b2;



	if (ScreenLine & 0x20)

	    b1 = SC2, b2 = SC3;

	else

	    b1 = SC0, b2 = SC1;



	b1 += (ScreenLine & 0x1f) << 5;

	b2 += (ScreenLine & 0x1f) << 5;



	int clipcount = GFX.pCurrentClip->Count [bg];

	if (!clipcount)

	    clipcount = 1;

	for (int clip = 0; clip < clipcount; clip++)

	{

	    u32 Left;

	    u32 Right;



	    if (!GFX.pCurrentClip->Count [bg])

	    {

		Left = 0;

		Right = 256;

	    }

	    else

	    {

		Left = GFX.pCurrentClip->Left [clip][bg];

		Right = GFX.pCurrentClip->Right [clip][bg];



		if (Right <= Left)

		    continue;

		    }



		    u32 s = Left * GFX.PixSize + Y * GFX.PPL;

	    u32 HPos = (HOffset + Left) & OffsetMask;



	    u32 Quot = HPos >> 3;

	    u32 Count = 0;

	    

	    u16 *t;

	    if (BG.TileSize == 8)

	    {

		if (Quot > 31)

		    t = b2 + (Quot & 0x1f);

		else

		    t = b1 + Quot;

	    }

	    else

	    {

		if (Quot > 63)

		    t = b2 + ((Quot >> 1) & 0x1f);

		else

		    t = b1 + (Quot >> 1);

	    }



	    Width = Right - Left;

	    // Left hand edge clipped tile

	    if (HPos & 7)

	    {

			u32 Offset = (HPos & 7);

			Count = 8 - Offset;

			if (Count > Width)

				Count = Width;

			s -= Offset * GFX.PixSize;

			Tile = READ_2BYTES(t);

			GFX.Z1 = GFX.Z2 = depths [(Tile & 0x2000) >> 13];



			if (BG.TileSize == 8)

			{

			    (*DrawClippedTilePtr) (Tile, s, Offset, Count, VirtAlign,

						   Lines, &GFX);

			}

			else

				{		

				   if (!(Tile & (V_FLIP | H_FLIP)))

			    {

					// Normal, unflipped

					(*DrawClippedTilePtr) (Tile + t1 + (Quot & 1),

						       s, Offset, Count, VirtAlign, Lines, &GFX);

			    }

			    else

			    if (Tile & H_FLIP)

					{

						if (Tile & V_FLIP)

				{

				    // H & V flip

				    (*DrawClippedTilePtr) (Tile + t2 + 1 - (Quot & 1),

							   s, Offset, Count, VirtAlign, Lines, &GFX);

				}

						else

				{

				    // H flip only

				    (*DrawClippedTilePtr) (Tile + t1 + 1 - (Quot & 1),

							   s, Offset, Count, VirtAlign, Lines, &GFX);

				}

					}

					else

					{

				// V flip only

				(*DrawClippedTilePtr) (Tile + t2 + (Quot & 1), s, 

						       Offset, Count, VirtAlign, Lines, &GFX);

					}

				}



			if (BG.TileSize == 8)

			{

			    t++;

			    if (Quot == 31)

				t = b2;

			    else if (Quot == 63)

				t = b1;

			}

			else

			{

			    t += Quot & 1;

			    if (Quot == 63)

				t = b2;

			    else if (Quot == 127)

				t = b1;

			}

			Quot++;

			s += 8 * GFX.PixSize;

		    }



		    // Middle, unclipped tiles

		    Count = Width - Count;

		    int Middle = Count >> 3;

		    Count &= 7;

		    for (int C = Middle; C > 0; s += 8 * GFX.PixSize, Quot++, C--)

		    {

			Tile = READ_2BYTES(t);

			GFX.Z1 = GFX.Z2 = depths [(Tile & 0x2000) >> 13];



			if (BG.TileSize != 8)

			{

			    if (Tile & H_FLIP)

			    {

				// Horizontal flip, but what about vertical flip ?

				if (Tile & V_FLIP)

				{

				    // Both horzontal & vertical flip

				    (*DrawTilePtr) (Tile + t2 + 1 - (Quot & 1), s, 

						    VirtAlign, Lines, &GFX);

				}

				else

				{

				    // Horizontal flip only

				    (*DrawTilePtr) (Tile + t1 + 1 - (Quot & 1), s, 

						    VirtAlign, Lines, &GFX);

				}

			    }

			    else

			    {

				// No horizontal flip, but is there a vertical flip ?

				if (Tile & V_FLIP)

				{

				    // Vertical flip only

				    (*DrawTilePtr) (Tile + t2 + (Quot & 1), s,

						    VirtAlign, Lines, &GFX);

				}

				else

				{

				    // Normal unflipped

				    (*DrawTilePtr) (Tile + t1 + (Quot & 1), s,

						    VirtAlign, Lines, &GFX);

				}

			    }

			}

			else

			{

			    (*DrawTilePtr) (Tile, s, VirtAlign, Lines, &GFX);

			}



			if (BG.TileSize == 8)

			{

			    t++;

			    if (Quot == 31)

				t = b2;

			    else

			    if (Quot == 63)

				t = b1;

			}

			else

			{

			    t += Quot & 1;

			    if (Quot == 63)

				t = b2;

			    else

			    if (Quot == 127)

				t = b1;

			}

		    }

		    // Right-hand edge clipped tiles

		    if (Count)

		    {

			Tile = READ_2BYTES(t);

			GFX.Z1 = GFX.Z2 = depths [(Tile & 0x2000) >> 13];



			if (BG.TileSize == 8)

			    (*DrawClippedTilePtr) (Tile, s, 0, Count, VirtAlign, 

						   Lines, &GFX);

			else

			{

			    if (!(Tile & (V_FLIP | H_FLIP)))

			    {

				// Normal, unflipped

				(*DrawClippedTilePtr) (Tile + t1 + (Quot & 1), s, 0, 

						       Count, VirtAlign, Lines, &GFX);

			    }

			    else

			    if (Tile & H_FLIP)

			    {

				if (Tile & V_FLIP)

				{

				    // H & V flip

				    (*DrawClippedTilePtr) (Tile + t2 + 1 - (Quot & 1),

							   s, 0, Count, VirtAlign, 

							   Lines, &GFX);

				}

				else

				{

				    // H flip only

				    (*DrawClippedTilePtr) (Tile + t1 + 1 - (Quot & 1),

							   s, 0, Count, VirtAlign,

							   Lines, &GFX);

				}

			    }

			    else

			    {

				// V flip only

				(*DrawClippedTilePtr) (Tile + t2 + (Quot & 1),

						       s, 0, Count, VirtAlign, 

						       Lines, &GFX);

			    }

			}

		    }

		}

    }

}



#define RENDER_BACKGROUND_MODE7(TYPE,FUNC) \

    CHECK_SOUND(); \

\

    u8 *VRAM1 = Memory.VRAM + 1; \

    if (GFX.r2130 & 1) \

    { \

		if (IPPU.DirectColourMapsNeedRebuild) \

			S9xBuildDirectColourMaps (); \

		GFX.ScreenColors = DirectColourMaps [0]; \

    } \

    else \

		GFX.ScreenColors = IPPU.ScreenColors; \

\

    int aa, cc; \

    int dir; \

    int startx, endx; \

    u32 Left = 0; \

    u32 Right = 256; \

    u32 ClipCount = GFX.pCurrentClip->Count [bg]; \

\

    if (!ClipCount) \

	ClipCount = 1; \

\

    Screen += GFX.StartY * GFX.Pitch; \

    u8 *Depth = GFX.DB + GFX.StartY * GFX.PPL; \

    struct SLineMatrixData *l = &LineMatrixData [GFX.StartY]; \

\

    for (u32 Line = GFX.StartY; Line <= GFX.EndY; Line++, Screen += GFX.Pitch, Depth += GFX.PPL, l++) \

    { \

	int yy; \

\

	s32 HOffset = ((s32) LineData [Line].BG[0].HOffset << M7) >> M7; \

	s32 VOffset = ((s32) LineData [Line].BG[0].VOffset << M7) >> M7; \

\

	s32 CentreX = ((s32) l->CentreX << M7) >> M7; \

	s32 CentreY = ((s32) l->CentreY << M7) >> M7; \

\

	if (PPU.Mode7VFlip) \

	    yy = 261 - (int) Line; \

	else \

	    yy = Line; \

\

	if (PPU.Mode7Repeat == 0) \

	    yy += (VOffset - CentreY) % 1023; \

	else \

	    yy += VOffset - CentreY; \

	int BB = l->MatrixB * yy + (CentreX << 8); \

	int DD = l->MatrixD * yy + (CentreY << 8); \

\

	for (u32 clip = 0; clip < ClipCount; clip++) \

	{ \

	    if (GFX.pCurrentClip->Count [bg]) \

	    { \

		Left = GFX.pCurrentClip->Left [clip][bg]; \

		Right = GFX.pCurrentClip->Right [clip][bg]; \

		if (Right <= Left) \

		    continue; \

	    } \

	    TYPE *p = (TYPE *) Screen + Left; \

	    u8 *d = Depth + Left; \

\

	    if (PPU.Mode7HFlip) \

	    { \

		startx = Right - 1; \

		endx = Left - 1; \

		dir = -1; \

		aa = -l->MatrixA; \

		cc = -l->MatrixC; \

	    } \

	    else \

	    { \

		startx = Left; \

		endx = Right; \

		dir = 1; \

		aa = l->MatrixA; \

		cc = l->MatrixC; \

	    } \

	    int xx; \

	    if (PPU.Mode7Repeat == 0) \

		xx = startx + (HOffset - CentreX) % 1023; \

	    else \

		xx = startx + HOffset - CentreX; \

	    int AA = l->MatrixA * xx; \

	    int CC = l->MatrixC * xx; \

\

	    if (!PPU.Mode7Repeat) \

	    { \

		for (int x = startx; x != endx; x += dir, AA += aa, CC += cc, p++, d++) \

		{ \

		    int X = ((AA + BB) >> 8) & 0x3ff; \

		    int Y = ((CC + DD) >> 8) & 0x3ff; \

		    u8 *TileData = VRAM1 + (Memory.VRAM[((Y & ~7) << 5) + ((X >> 2) & ~1)] << 7); \

		    u32 b = *(TileData + ((Y & 7) << 4) + ((X & 7) << 1)); \

		    GFX.Z1 = Mode7Depths [(b & GFX.Mode7PriorityMask) >> 7]; \

		    if (GFX.Z1 > *d && b) \

		    { \

				*p = (FUNC); \

				*d = GFX.Z1; \

		    } \

		} \

	    } \

	    else \

	    { \

		for (int x = startx; x != endx; x += dir, AA += aa, CC += cc, p++, d++) \

		{ \

		    int X = ((AA + BB) >> 8); \

		    int Y = ((CC + DD) >> 8); \

\

		    if (Settings.Dezaemon && PPU.Mode7Repeat == 2) \

		    { \

				X &= 0x7ff; \

				Y &= 0x7ff; \

		    } \

\

		    if (((X | Y) & ~0x3ff) == 0) \

		    { \

				u8 *TileData = VRAM1 + (Memory.VRAM[((Y & ~7) << 5) + ((X >> 2) & ~1)] << 7); \

				u32 b = *(TileData + ((Y & 7) << 4) + ((X & 7) << 1)); \

				GFX.Z1 = Mode7Depths [(b & GFX.Mode7PriorityMask) >> 7]; \

				if (GFX.Z1 > *d && b) \

				{ \

					*p = (FUNC); \

					*d = GFX.Z1; \

				} \

		    } \

		    else \

		    { \

			if (PPU.Mode7Repeat == 3) \

			{ \

					X = (x + HOffset) & 7; \

					Y = (yy + CentreY) & 7; \

					u32 b = *(VRAM1 + ((Y & 7) << 4) + ((X & 7) << 1)); \

					GFX.Z1 = Mode7Depths [(b & GFX.Mode7PriorityMask) >> 7]; \

					if (GFX.Z1 > *d && b) \

					{ \

						*p = (FUNC); \

						*d = GFX.Z1; \

					} \

				} \

		    } \

		} \

	    } \

	} \

    }



void DrawBGMode7Background (u8 *Screen, int bg)

{

    RENDER_BACKGROUND_MODE7 (u8, (u8) (b & GFX.Mode7Mask))

}



void DrawBGMode7Background16 (u8 *Screen, int bg)

{

    RENDER_BACKGROUND_MODE7 (u16, GFX.ScreenColors [b & GFX.Mode7Mask]);

}



void DrawBGMode7Background16Add (u8 *Screen, int bg)

{

    RENDER_BACKGROUND_MODE7 (u16, *(d + GFX.DepthDelta) ?

					(*(d + GFX.DepthDelta) != 1 ?

					    COLOR_ADD (GFX.ScreenColors [b & GFX.Mode7Mask],

						       p [GFX.Delta]) :

					    COLOR_ADD (GFX.ScreenColors [b & GFX.Mode7Mask],

						       GFX.FixedColour)) :

					 GFX.ScreenColors [b & GFX.Mode7Mask]);

}



void DrawBGMode7Background16Add1_2 (u8 *Screen, int bg)

{

    RENDER_BACKGROUND_MODE7(u16, *(d + GFX.DepthDelta) ?

					(*(d + GFX.DepthDelta) != 1 ?

					    COLOR_ADD1_2 (GFX.ScreenColors [b & GFX.Mode7Mask],

						       p [GFX.Delta]) :

					    COLOR_ADD (GFX.ScreenColors [b & GFX.Mode7Mask],

						       GFX.FixedColour)) :

					 GFX.ScreenColors [b & GFX.Mode7Mask]);

}



void DrawBGMode7Background16Sub (u8 *Screen, int bg)

{

    RENDER_BACKGROUND_MODE7 (u16, *(d + GFX.DepthDelta) ?

					(*(d + GFX.DepthDelta) != 1 ?

					    COLOR_SUB (GFX.ScreenColors [b & GFX.Mode7Mask],

						       p [GFX.Delta]) :

					    COLOR_SUB (GFX.ScreenColors [b & GFX.Mode7Mask],

						       GFX.FixedColour)) :

					 GFX.ScreenColors [b & GFX.Mode7Mask]);

}



void DrawBGMode7Background16Sub1_2 (u8 *Screen, int bg)

{

    RENDER_BACKGROUND_MODE7 (u16, *(d + GFX.DepthDelta) ?

					(*(d + GFX.DepthDelta) != 1 ?

					    COLOR_SUB1_2 (GFX.ScreenColors [b & GFX.Mode7Mask],

						       p [GFX.Delta]) :

					    COLOR_SUB (GFX.ScreenColors [b & GFX.Mode7Mask],

						       GFX.FixedColour)) :

					 GFX.ScreenColors [b & GFX.Mode7Mask]);

}



#define RENDER_BACKGROUND_MODE7_i(TYPE,FUNC,COLORFUNC) \

    CHECK_SOUND(); \

\

    u8 *VRAM1 = Memory.VRAM + 1; \

    if (GFX.r2130 & 1) \

    { \

	if (IPPU.DirectColourMapsNeedRebuild) \

	    S9xBuildDirectColourMaps (); \

	GFX.ScreenColors = DirectColourMaps [0]; \

    } \

    else \

	GFX.ScreenColors = IPPU.ScreenColors; \

\

    int aa, cc; \

    int dir; \

    int startx, endx; \

    u32 Left = 0; \

    u32 Right = 256; \

    u32 ClipCount = GFX.pCurrentClip->Count [bg]; \

    \

    if (!ClipCount) \

        ClipCount = 1; \

    \

    Screen += GFX.StartY * GFX.Pitch; \

    u8 *Depth = GFX.DB + GFX.StartY * GFX.PPL; \

    struct SLineMatrixData *l = &LineMatrixData [GFX.StartY]; \

    bool8_32 allowSimpleCase = FALSE; \

    if (!l->MatrixB && !l->MatrixC && (l->MatrixA == 0x0100) && (l->MatrixD == 0x0100) \

        && !LineMatrixData[GFX.EndY].MatrixB && !LineMatrixData[GFX.EndY].MatrixC \

        && (LineMatrixData[GFX.EndY].MatrixA == 0x0100) && (LineMatrixData[GFX.EndY].MatrixD == 0x0100) \

        ) \

        allowSimpleCase = TRUE;  \

    \

    for (u32 Line = GFX.StartY; Line <= GFX.EndY; Line++, Screen += GFX.Pitch, Depth += GFX.PPL, l++) \

    { \

        int yy; \

        \

        int HOffset = ((int) LineData [Line].BG[0].HOffset << M7) >> M7; \

        int VOffset = ((int) LineData [Line].BG[0].VOffset << M7) >> M7; \

        \

        int CentreX = ((int) l->CentreX << M7) >> M7; \

        int CentreY = ((int) l->CentreY << M7) >> M7; \

        \

        if (PPU.Mode7VFlip) \

            yy = 261 - (int) Line; \

        else \

            yy = Line; \

        \

	if (PPU.Mode7Repeat == 0) \

	    yy += (VOffset - CentreY) % 1023; \

	else \

	    yy += VOffset - CentreY; \

        bool8_32 simpleCase = FALSE; \

        int BB; \

        int DD; \

        /* Make a special case for the identity matrix, since it's a common case and */ \

        /* can be done much more quickly without special effects */ \

        if (allowSimpleCase && !l->MatrixB && !l->MatrixC && (l->MatrixA == 0x0100) && (l->MatrixD == 0x0100)) \

        { \

            BB = CentreX << 8; \

            DD = (yy + CentreY) << 8; \

            simpleCase = TRUE; \

        } \

        else \

        { \

            BB = l->MatrixB * yy + (CentreX << 8); \

            DD = l->MatrixD * yy + (CentreY << 8); \

        } \

        \

        for (u32 clip = 0; clip < ClipCount; clip++) \

        { \

            if (GFX.pCurrentClip->Count [bg]) \

            { \

                Left = GFX.pCurrentClip->Left [clip][bg]; \

                Right = GFX.pCurrentClip->Right [clip][bg]; \

                if (Right <= Left) \

                    continue; \

            } \

            TYPE *p = (TYPE *) Screen + Left; \

            u8 *d = Depth + Left; \

            \

            if (PPU.Mode7HFlip) \

            { \

                startx = Right - 1; \

		endx = Left - 1; \

		dir = -1; \

		aa = -l->MatrixA; \

		cc = -l->MatrixC; \

	    } \

	    else \

	    { \

		startx = Left; \

		endx = Right; \

		dir = 1; \

		aa = l->MatrixA; \

		cc = l->MatrixC; \

	    } \

	    int xx; \

	    if (PPU.Mode7Repeat == 0) \

		xx = startx + (HOffset - CentreX) % 1023; \

	    else \

		xx = startx + HOffset - CentreX; \

            int AA, CC = 0; \

            if (simpleCase) \

            { \

                AA = xx << 8; \

            } \

            else \

            { \

                AA = l->MatrixA * xx; \

                CC = l->MatrixC * xx; \

            } \

            if (simpleCase) \

            { \

                if (!PPU.Mode7Repeat) \

                { \

                    int x = startx; \

                    do \

                    { \

                        int X = ((AA + BB) >> 8) & 0x3ff; \

                        int Y = (DD >> 8) & 0x3ff; \

                        u8 *TileData = VRAM1 + (Memory.VRAM[((Y & ~7) << 5) + ((X >> 2) & ~1)] << 7); \

                        u32 b = *(TileData + ((Y & 7) << 4) + ((X & 7) << 1)); \

			GFX.Z1 = Mode7Depths [(b & GFX.Mode7PriorityMask) >> 7]; \

                        if (GFX.Z1 > *d && b) \

                        { \

                            TYPE theColor = COLORFUNC; \

                            *p = (FUNC) | ALPHA_BITS_MASK; \

                            *d = GFX.Z1; \

                        } \

                        AA += aa, p++, d++; \

			x += dir; \

                    } while (x != endx); \

                } \

                else \

                { \

                    int x = startx; \

                    do { \

                        int X = (AA + BB) >> 8; \

                        int Y = DD >> 8; \

\

			if(Settings.Dezaemon && PPU.Mode7Repeat == 2) \

			{ \

			    X &= 0x7ff; \

			    Y &= 0x7ff; \

		    } \

\

                        if (((X | Y) & ~0x3ff) == 0) \

                        { \

                            u8 *TileData = VRAM1 + (Memory.VRAM[((Y & ~7) << 5) + ((X >> 2) & ~1)] << 7); \

			    u32 b = *(TileData + ((Y & 7) << 4) + ((X & 7) << 1)); \

			    GFX.Z1 = Mode7Depths [(b & GFX.Mode7PriorityMask) >> 7]; \

                            if (GFX.Z1 > *d && b) \

                            { \

                                TYPE theColor = COLORFUNC; \

                                *p = (FUNC) | ALPHA_BITS_MASK; \

                                *d = GFX.Z1; \

                            } \

                        } \

                        else if (PPU.Mode7Repeat == 3) \

                        { \

                            X = (x + HOffset) & 7; \

                            Y = (yy + CentreY) & 7; \

			    u8 *TileData = VRAM1 + (Memory.VRAM[((Y & ~7) << 5) + ((X >> 2) & ~1)] << 7); \

			    u32 b = *(TileData + ((Y & 7) << 4) + ((X & 7) << 1)); \

			    GFX.Z1 = Mode7Depths [(b & GFX.Mode7PriorityMask) >> 7]; \

                            if (GFX.Z1 > *d && b) \

                            { \

                                TYPE theColor = COLORFUNC; \

                                *p = (FUNC) | ALPHA_BITS_MASK; \

                                *d = GFX.Z1; \

                            } \

                        } \

                        AA += aa; p++; d++; \

			x += dir; \

                    } while (x != endx); \

                } \

            } \

            else if (!PPU.Mode7Repeat) \

            { \

                /* The bilinear interpolator: get the colors at the four points surrounding */ \

                /* the location of one point in the _sampled_ image, and weight them according */ \

                /* to their (city block) distance.  It's very smooth, but blurry with "close up" */ \

                /* points. */ \

                \

                /* 460 (slightly less than 2 source pixels per displayed pixel) is an educated */ \

                /* guess for where bilinear filtering will become a poor method for averaging. */ \

                /* (When reducing the image, the weighting used by a bilinear filter becomes */ \

                /* arbitrary, and a simple mean is a better way to represent the source image.) */ \

                /* You can think of this as a kind of mipmapping. */ \

                if ((aa < 460 && aa > -460) && (cc < 460 && cc > -460)) \

                {\

                    for (int x = startx; x != endx; x += dir, AA += aa, CC += cc, p++, d++) \

                    { \

                        u32 xPos = AA + BB; \

                        u32 xPix = xPos >> 8; \

                        u32 yPos = CC + DD; \

                        u32 yPix = yPos >> 8; \

                        u32 X = xPix & 0x3ff; \

                        u32 Y = yPix & 0x3ff; \

                        u8 *TileData = VRAM1 + (Memory.VRAM[((Y & ~7) << 5) + ((X >> 2) & ~1)] << 7); \

			u32 b = *(TileData + ((Y & 7) << 4) + ((X & 7) << 1)); \

			GFX.Z1 = Mode7Depths [(b & GFX.Mode7PriorityMask) >> 7]; \

                        if (GFX.Z1 > *d && b) \

                        { \

                            /* X10 and Y01 are the X and Y coordinates of the next source point over. */ \

                            u32 X10 = (xPix + dir) & 0x3ff; \

                            u32 Y01 = (yPix + dir) & 0x3ff; \

                            u8 *TileData10 = VRAM1 + (Memory.VRAM[((Y & ~7) << 5) + ((X10 >> 2) & ~1)] << 7); \

                            u8 *TileData11 = VRAM1 + (Memory.VRAM[((Y01 & ~7) << 5) + ((X10 >> 2) & ~1)] << 7); \

                            u8 *TileData01 = VRAM1 + (Memory.VRAM[((Y01 & ~7) << 5) + ((X >> 2) & ~1)] << 7); \

                            u32 p1 = COLORFUNC; \

                            p1 = (p1 & FIRST_THIRD_COLOR_MASK) | ((p1 & SECOND_COLOR_MASK) << 16); \

                            b = *(TileData10 + ((Y & 7) << 4) + ((X10 & 7) << 1)); \

                            u32 p2 = COLORFUNC; \

                            p2 = (p2 & FIRST_THIRD_COLOR_MASK) | ((p2 & SECOND_COLOR_MASK) << 16); \

                            b = *(TileData11 + ((Y01 & 7) << 4) + ((X10 & 7) << 1)); \

                            u32 p4 = COLORFUNC; \

                            p4 = (p4 & FIRST_THIRD_COLOR_MASK) | ((p4 & SECOND_COLOR_MASK) << 16); \

                            b = *(TileData01 + ((Y01 & 7) << 4) + ((X & 7) << 1)); \

                            u32 p3 = COLORFUNC; \

                            p3 = (p3 & FIRST_THIRD_COLOR_MASK) | ((p3 & SECOND_COLOR_MASK) << 16); \

                            /* Xdel, Ydel: position (in 1/32nds) between the points */ \

                            u32 Xdel = (xPos >> 3) & 0x1F; \

                            u32 Ydel = (yPos >> 3) & 0x1F; \

                            u32 XY = (Xdel*Ydel) >> 5; \

                            u32 area1 = 0x20 + XY - Xdel - Ydel; \

                            u32 area2 = Xdel - XY; \

                            u32 area3 = Ydel - XY; \

                            u32 area4 = XY; \

                            u32 tempColor = ((area1 * p1) + \

                                                (area2 * p2) + \

                                                (area3 * p3) + \

                                                (area4 * p4)) >> 5; \

                            TYPE theColor = (tempColor & FIRST_THIRD_COLOR_MASK) | ((tempColor >> 16) & SECOND_COLOR_MASK); \

							*p = (FUNC) | ALPHA_BITS_MASK; \

                            *d = GFX.Z1; \

                        } \

                    } \

                } \

                else \

                    /* The oversampling method: get the colors at four corners of a square */ \

                    /* in the _displayed_ image, and average them.  It's sharp and clean, but */ \

                    /* gives the usual huge pixels when the source image gets "close." */ \

                { \

                    /* Find the dimensions of the square in the source image whose corners will be examined. */ \

                    u32 aaDelX = aa >> 1; \

                    u32 ccDelX = cc >> 1; \

                    u32 bbDelY = l->MatrixB >> 1; \

                    u32 ddDelY = l->MatrixD >> 1; \

                    /* Offset the location within the source image so that the four sampled points */ \

                    /* center around where the single point would otherwise have been drawn. */ \

                    BB -= (bbDelY >> 1); \

                    DD -= (ddDelY >> 1); \

                    AA -= (aaDelX >> 1); \

                    CC -= (ccDelX >> 1); \

                    u32 BB10 = BB + aaDelX; \

                    u32 BB01 = BB + bbDelY; \

                    u32 BB11 = BB + aaDelX + bbDelY; \

                    u32 DD10 = DD + ccDelX; \

                    u32 DD01 = DD + ddDelY; \

                    u32 DD11 = DD + ccDelX + ddDelY; \

                    for (int x = startx; x != endx; x += dir, AA += aa, CC += cc, p++, d++) \

                    { \

                        u32 X = ((AA + BB) >> 8) & 0x3ff; \

                        u32 Y = ((CC + DD) >> 8) & 0x3ff; \

                        u8 *TileData = VRAM1 + (Memory.VRAM[((Y & ~7) << 5) + ((X >> 2) & ~1)] << 7); \

			u32 b = *(TileData + ((Y & 7) << 4) + ((X & 7) << 1)); \

			GFX.Z1 = Mode7Depths [(b & GFX.Mode7PriorityMask) >> 7]; \

                        if (GFX.Z1 > *d && b) \

                        { \

                            /* X, Y, X10, Y10, etc. are the coordinates of the four pixels within the */ \

                            /* source image that we're going to examine. */ \

                            u32 X10 = ((AA + BB10) >> 8) & 0x3ff; \

                            u32 Y10 = ((CC + DD10) >> 8) & 0x3ff; \

                            u32 X01 = ((AA + BB01) >> 8) & 0x3ff; \

                            u32 Y01 = ((CC + DD01) >> 8) & 0x3ff; \

                            u32 X11 = ((AA + BB11) >> 8) & 0x3ff; \

                            u32 Y11 = ((CC + DD11) >> 8) & 0x3ff; \

                            u8 *TileData10 = VRAM1 + (Memory.VRAM[((Y10 & ~7) << 5) + ((X10 >> 2) & ~1)] << 7); \

                            u8 *TileData01 = VRAM1 + (Memory.VRAM[((Y01 & ~7) << 5) + ((X01 >> 2) & ~1)] << 7); \

                            u8 *TileData11 = VRAM1 + (Memory.VRAM[((Y11 & ~7) << 5) + ((X11 >> 2) & ~1)] << 7); \

                            TYPE p1 = COLORFUNC; \

                            b = *(TileData10 + ((Y10 & 7) << 4) + ((X10 & 7) << 1)); \

                            TYPE p2 = COLORFUNC; \

                            b = *(TileData01 + ((Y01 & 7) << 4) + ((X01 & 7) << 1)); \

                            TYPE p3 = COLORFUNC; \

                            b = *(TileData11 + ((Y11 & 7) << 4) + ((X11 & 7) << 1)); \

                            TYPE p4 = COLORFUNC; \

                            TYPE theColor = Q_INTERPOLATE(p1, p2, p3, p4); \

                            *p = (FUNC) | ALPHA_BITS_MASK; \

                            *d = GFX.Z1; \

                        } \

                    } \

                } \

            } \

            else \

            { \

                for (int x = startx; x != endx; x += dir, AA += aa, CC += cc, p++, d++) \

                { \

                    u32 xPos = AA + BB; \

                    u32 xPix = xPos >> 8; \

                    u32 yPos = CC + DD; \

                    u32 yPix = yPos >> 8; \

                    u32 X = xPix; \

                    u32 Y = yPix; \

                    \

\

		    if(Settings.Dezaemon && PPU.Mode7Repeat == 2) \

		    { \

			X &= 0x7ff; \

			Y &= 0x7ff; \

		    } \

\

                    if (((X | Y) & ~0x3ff) == 0) \

                    { \

                        u8 *TileData = VRAM1 + (Memory.VRAM[((Y & ~7) << 5) + ((X >> 2) & ~1)] << 7); \

			u32 b = *(TileData + ((Y & 7) << 4) + ((X & 7) << 1)); \

			GFX.Z1 = Mode7Depths [(b & GFX.Mode7PriorityMask) >> 7]; \

                        if (GFX.Z1 > *d && b) \

                        { \

                            /* X10 and Y01 are the X and Y coordinates of the next source point over. */ \

                            u32 X10 = (xPix + dir) & 0x3ff; \

                            u32 Y01 = (yPix + dir) & 0x3ff; \

                            u8 *TileData10 = VRAM1 + (Memory.VRAM[((Y & ~7) << 5) + ((X10 >> 2) & ~1)] << 7); \

                            u8 *TileData11 = VRAM1 + (Memory.VRAM[((Y01 & ~7) << 5) + ((X10 >> 2) & ~1)] << 7); \

                            u8 *TileData01 = VRAM1 + (Memory.VRAM[((Y01 & ~7) << 5) + ((X >> 2) & ~1)] << 7); \

                            u32 p1 = COLORFUNC; \

                            p1 = (p1 & FIRST_THIRD_COLOR_MASK) | ((p1 & SECOND_COLOR_MASK) << 16); \

                            b = *(TileData10 + ((Y & 7) << 4) + ((X10 & 7) << 1)); \

                            u32 p2 = COLORFUNC; \

                            p2 = (p2 & FIRST_THIRD_COLOR_MASK) | ((p2 & SECOND_COLOR_MASK) << 16); \

                            b = *(TileData11 + ((Y01 & 7) << 4) + ((X10 & 7) << 1)); \

                            u32 p4 = COLORFUNC; \

                            p4 = (p4 & FIRST_THIRD_COLOR_MASK) | ((p4 & SECOND_COLOR_MASK) << 16); \

                            b = *(TileData01 + ((Y01 & 7) << 4) + ((X & 7) << 1)); \

                            u32 p3 = COLORFUNC; \

                            p3 = (p3 & FIRST_THIRD_COLOR_MASK) | ((p3 & SECOND_COLOR_MASK) << 16); \

                            /* Xdel, Ydel: position (in 1/32nds) between the points */ \

                            u32 Xdel = (xPos >> 3) & 0x1F; \

                            u32 Ydel = (yPos >> 3) & 0x1F; \

                            u32 XY = (Xdel*Ydel) >> 5; \

                            u32 area1 = 0x20 + XY - Xdel - Ydel; \

                            u32 area2 = Xdel - XY; \

                            u32 area3 = Ydel - XY; \

                            u32 area4 = XY; \

                            u32 tempColor = ((area1 * p1) + \

                                                (area2 * p2) + \

                                                (area3 * p3) + \

                                                (area4 * p4)) >> 5; \

                            TYPE theColor = (tempColor & FIRST_THIRD_COLOR_MASK) | ((tempColor >> 16) & SECOND_COLOR_MASK); \

                            *p = (FUNC) | ALPHA_BITS_MASK; \

                            *d = GFX.Z1; \

                        } \

                    } \

                    else \

                    { \

                        if (PPU.Mode7Repeat == 3) \

                        { \

                            X = (x + HOffset) & 7; \

                            Y = (yy + CentreY) & 7; \

			    u32 b = *(VRAM1 + ((Y & 7) << 4) + ((X & 7) << 1)); \

			    GFX.Z1 = Mode7Depths [(b & GFX.Mode7PriorityMask) >> 7]; \

                            if (GFX.Z1 > *d && b) \

                            { \

                                TYPE theColor = COLORFUNC; \

                                *p = (FUNC) | ALPHA_BITS_MASK; \

                                *d = GFX.Z1; \

                            } \

                        } \

                    } \

                } \

            } \

        } \

    }



STATIC u32 Q_INTERPOLATE(u32 A, u32 B, u32 C, u32 D)

{

    register u32 x = ((A >> 2) & HIGH_BITS_SHIFTED_TWO_MASK) +

                            ((B >> 2) & HIGH_BITS_SHIFTED_TWO_MASK) +

                            ((C >> 2) & HIGH_BITS_SHIFTED_TWO_MASK) +

                            ((D >> 2) & HIGH_BITS_SHIFTED_TWO_MASK);

    register u32 y = (A & TWO_LOW_BITS_MASK) +

                            (B & TWO_LOW_BITS_MASK) +

                            (C & TWO_LOW_BITS_MASK) +

                            (D & TWO_LOW_BITS_MASK);

    y = (y>>2) & TWO_LOW_BITS_MASK;

    return x+y;

}



void DrawBGMode7Background16_i (u8 *Screen, int bg)

{

    RENDER_BACKGROUND_MODE7_i (u16, theColor, (GFX.ScreenColors[b & GFX.Mode7Mask]));

}



void DrawBGMode7Background16Add_i (u8 *Screen, int bg)

{

    RENDER_BACKGROUND_MODE7_i (u16, *(d + GFX.DepthDelta) ?

					(*(d + GFX.DepthDelta) != 1 ?

					    (COLOR_ADD (theColor,

						       p [GFX.Delta])) :

					    (COLOR_ADD (theColor,

						       GFX.FixedColour))) :

					 theColor, (GFX.ScreenColors[b & GFX.Mode7Mask]));

}



void DrawBGMode7Background16Add1_2_i (u8 *Screen, int bg)

{

    RENDER_BACKGROUND_MODE7_i (u16, *(d + GFX.DepthDelta) ?

					(*(d + GFX.DepthDelta) != 1 ?

					    COLOR_ADD1_2 (theColor,

						          p [GFX.Delta]) :

					    COLOR_ADD (theColor,

						       GFX.FixedColour)) :

					 theColor, (GFX.ScreenColors[b & GFX.Mode7Mask]));

}



void DrawBGMode7Background16Sub_i (u8 *Screen, int bg)

{

    RENDER_BACKGROUND_MODE7_i (u16, *(d + GFX.DepthDelta) ?

					(*(d + GFX.DepthDelta) != 1 ?

					    COLOR_SUB (theColor,

						       p [GFX.Delta]) :

					    COLOR_SUB (theColor,

						       GFX.FixedColour)) :

					 theColor, (GFX.ScreenColors[b & GFX.Mode7Mask]));

}



void DrawBGMode7Background16Sub1_2_i (u8 *Screen, int bg)

{

    RENDER_BACKGROUND_MODE7_i (u16, *(d + GFX.DepthDelta) ?

					(*(d + GFX.DepthDelta) != 1 ?

					    COLOR_SUB1_2 (theColor,

						       p [GFX.Delta]) :

					    COLOR_SUB (theColor,

						       GFX.FixedColour)) :

					 theColor, (GFX.ScreenColors[b & GFX.Mode7Mask]));

}



#define _BUILD_SETUP(F) \

GFX.BuildPixel = BuildPixel##F; \

GFX.BuildPixel2 = BuildPixel2##F; \

GFX.DecomposePixel = DecomposePixel##F; \

RED_LOW_BIT_MASK = RED_LOW_BIT_MASK_##F; \

GREEN_LOW_BIT_MASK = GREEN_LOW_BIT_MASK_##F; \

BLUE_LOW_BIT_MASK = BLUE_LOW_BIT_MASK_##F; \

RED_HI_BIT_MASK = RED_HI_BIT_MASK_##F; \

GREEN_HI_BIT_MASK = GREEN_HI_BIT_MASK_##F; \

BLUE_HI_BIT_MASK = BLUE_HI_BIT_MASK_##F; \

MAX_RED = MAX_RED_##F; \

MAX_GREEN = MAX_GREEN_##F; \

MAX_BLUE = MAX_BLUE_##F; \

GREEN_HI_BIT = ((MAX_GREEN_##F + 1) >> 1); \

SPARE_RGB_BIT_MASK = SPARE_RGB_BIT_MASK_##F; \

RGB_LOW_BITS_MASK = (RED_LOW_BIT_MASK_##F | \

 		     GREEN_LOW_BIT_MASK_##F | \

		     BLUE_LOW_BIT_MASK_##F); \

RGB_HI_BITS_MASK = (RED_HI_BIT_MASK_##F | \

		    GREEN_HI_BIT_MASK_##F | \

		    BLUE_HI_BIT_MASK_##F); \

RGB_HI_BITS_MASKx2 = ((RED_HI_BIT_MASK_##F | \

		       GREEN_HI_BIT_MASK_##F | \

		       BLUE_HI_BIT_MASK_##F) << 1); \

RGB_REMOVE_LOW_BITS_MASK = ~RGB_LOW_BITS_MASK; \

FIRST_COLOR_MASK = FIRST_COLOR_MASK_##F; \

SECOND_COLOR_MASK = SECOND_COLOR_MASK_##F; \

THIRD_COLOR_MASK = THIRD_COLOR_MASK_##F; \

ALPHA_BITS_MASK = ALPHA_BITS_MASK_##F; \

FIRST_THIRD_COLOR_MASK = FIRST_COLOR_MASK | THIRD_COLOR_MASK; \

TWO_LOW_BITS_MASK = RGB_LOW_BITS_MASK | (RGB_LOW_BITS_MASK << 1); \

HIGH_BITS_SHIFTED_TWO_MASK = (( (FIRST_COLOR_MASK | SECOND_COLOR_MASK | THIRD_COLOR_MASK) & \

                                ~TWO_LOW_BITS_MASK ) >> 2);



void RenderScreen (u8 *Screen, bool8_32 sub, bool8_32 force_no_add, u8 D)

{

    bool8_32 BG0;

    bool8_32 BG1;

    bool8_32 BG2;

    bool8_32 BG3;

    bool8_32 OB;



    GFX.S = Screen;



    if (!sub)

    {

	GFX.pCurrentClip = &IPPU.Clip [0];

	BG0 = ON_MAIN (0) && !(Settings.os9x_hack & GFX_IGNORE_BG0);

	BG1 = ON_MAIN (1) && !(Settings.os9x_hack & GFX_IGNORE_BG1);

	BG2 = ON_MAIN (2) && !(Settings.os9x_hack & GFX_IGNORE_BG2);

	BG3 = ON_MAIN (3) && !(Settings.os9x_hack & GFX_IGNORE_BG3);

	OB  = ON_MAIN (4) && !(Settings.os9x_hack & GFX_IGNORE_OBJ);

    }

    else

    {

	GFX.pCurrentClip = &IPPU.Clip [1];

	BG0 = ON_SUB (0) && !(Settings.os9x_hack & GFX_IGNORE_BG0);

	BG1 = ON_SUB (1) && !(Settings.os9x_hack & GFX_IGNORE_BG1);

	BG2 = ON_SUB (2) && !(Settings.os9x_hack & GFX_IGNORE_BG2);

	BG3 = ON_SUB (3) && !(Settings.os9x_hack & GFX_IGNORE_BG3);

	OB  = ON_SUB (4) && !(Settings.os9x_hack & GFX_IGNORE_OBJ);

    }



    sub |= force_no_add;



    if (PPU.BGMode <= 1)

    {

	if (OB)

	{

	    SelectTileRenderer (sub || !SUB_OR_ADD(4));

	    DrawOBJS (!sub, D);

	}

	if (BG0)

	{

	    SelectTileRenderer (sub || !SUB_OR_ADD(0));

	    DrawBackground (PPU.BGMode, 0, D + 10, D + 14);

	}

	if (BG1)

	{

	    SelectTileRenderer (sub || !SUB_OR_ADD(1));

	    DrawBackground (PPU.BGMode, 1, D + 9, D + 13);

	}

	if (BG2)

	{

	    SelectTileRenderer (sub || !SUB_OR_ADD(2));

	    DrawBackground (PPU.BGMode, 2, D + 3, 

			    (Memory.FillRAM [0x2105] & 8) == 0 ? D + 6 : D + 17);

	}

	if (BG3 && PPU.BGMode == 0)

	{

	    SelectTileRenderer (sub || !SUB_OR_ADD(3));

	    DrawBackground (PPU.BGMode, 3, D + 2, D + 5);

	}

    }

    else if (PPU.BGMode != 7)

    {

	if (OB)

	{

	    SelectTileRenderer (sub || !SUB_OR_ADD(4));

	    DrawOBJS (!sub, D);

	}

	if (BG0)

	{

	    SelectTileRenderer (sub || !SUB_OR_ADD(0));

	    DrawBackground (PPU.BGMode, 0, D + 5, D + 13);

	}

	if (PPU.BGMode != 6 && BG1)

	{

	    SelectTileRenderer (sub || !SUB_OR_ADD(1));

	    DrawBackground (PPU.BGMode, 1, D + 2, D + 9);

	}

    }

    else

    {

	if (OB)

	{

	    SelectTileRenderer (sub || !SUB_OR_ADD(4));

	    DrawOBJS (!sub, D);

	}

	if (BG0 || ((Memory.FillRAM [0x2133] & 0x40) && BG1))

	{

	    int bg;



	    if (Memory.FillRAM [0x2133] & 0x40)

	    {

		GFX.Mode7Mask = 0x7f;

		GFX.Mode7PriorityMask = 0x80;

		Mode7Depths [0] = 5 + D;

		Mode7Depths [1] = 9 + D;

		bg = 1;

	    }

	    else

	    {

		GFX.Mode7Mask = 0xff;

		GFX.Mode7PriorityMask = 0;

		Mode7Depths [0] = 5 + D;

		Mode7Depths [1] = 5 + D;

		bg = 0;

	    }

	    if (sub || !SUB_OR_ADD(0))

	    {

		if (!Settings.Mode7Interpolate)

		    DrawBGMode7Background16 (Screen, bg);

		else

		    DrawBGMode7Background16_i (Screen, bg);

	    }

	    else

	    {

		if (GFX.r2131 & 0x80)

		{

		    if (GFX.r2131 & 0x40)

		    {

			if (!Settings.Mode7Interpolate)

			    DrawBGMode7Background16Sub1_2 (Screen, bg);

			else

			    DrawBGMode7Background16Sub1_2_i (Screen, bg);

		    }

		    else

		    {

			if (!Settings.Mode7Interpolate)

			    DrawBGMode7Background16Sub (Screen, bg);

			else

			    DrawBGMode7Background16Sub_i (Screen, bg);

		    }

		}

		else

		{

		    if (GFX.r2131 & 0x40)

		    {

			if (!Settings.Mode7Interpolate)

			    DrawBGMode7Background16Add1_2 (Screen, bg);

			else

			    DrawBGMode7Background16Add1_2_i (Screen, bg);

		    }

		    else

		    {

			if (!Settings.Mode7Interpolate)

			    DrawBGMode7Background16Add (Screen, bg);

			else

			    DrawBGMode7Background16Add_i (Screen, bg);

		    }

		}

	    }

	}

    }

}



void S9xUpdateScreen ()

{

    s32 x2 = 1;

    GFX.S = GFX.Screen;

	unsigned char *memoryfillram = Memory.FillRAM;



	// get local copies of vid registers to be used later

    GFX.r2131 = memoryfillram [0x2131]; // ADDITION/SUBTRACTION & SUBTRACTION DESIGNATION FOR EACH SCREEN 

    GFX.r212c = memoryfillram [0x212c]; // MAIN SCREEN, DESIGNATION - used to enable BGS

    GFX.r212d = memoryfillram [0x212d]; // SUB SCREEN DESIGNATION - used to enable sub BGS

    GFX.r2130 = memoryfillram [0x2130]; // INITIAL SETTINGS FOR FIXED COLOR ADDITION OR SCREEN ADDITION

	

	GFX.Pseudo = (memoryfillram [0x2133] & 8) != 0 && // Use EXTERNAL SYNCHRONIZATION?

		 (GFX.r212c & 15) != (GFX.r212d & 15) && // Are the main screens different from the sub screens?

		 (GFX.r2131 & 0x3f) == 0; // Is colour data addition/subtraction disabled on all BGS?



	// refresh the sprites.

    if (IPPU.OBJChanged)

	{	

		S9xSetupOBJ ();

	}



    if (PPU.RecomputeClipWindows)

    {

		ComputeClipWindows ();

		PPU.RecomputeClipWindows = FALSE;

    }



    GFX.StartY = IPPU.PreviousLine;

    if ((GFX.EndY = IPPU.CurrentLine - 1) >= PPU.ScreenHeight)

		GFX.EndY = PPU.ScreenHeight - 1;



    u32 starty = GFX.StartY;

    u32 endy = GFX.EndY;



#ifndef RC_OPTIMIZED

    if (Settings.SupportHiRes &&

	(PPU.BGMode == 5 || PPU.BGMode == 6 || IPPU.LatchedInterlace))

    {

		if (PPU.BGMode == 5 || PPU.BGMode == 6)

		{

		    IPPU.RenderedScreenWidth = 512;

		    x2 = 2;

		}

		if (IPPU.LatchedInterlace)

		{

		    starty = GFX.StartY * 2;

		    endy = GFX.EndY * 2 + 1;

		}

		if (!IPPU.DoubleWidthPixels)

		{

		    // The game has switched from lo-res to hi-res mode part way down

		    // the screen. Scale any existing lo-res pixels on screen

#ifndef _SNESPPC

			if (Settings.SixteenBit)

#endif

		    {

#if defined (USE_GLIDE) || defined (USE_OPENGL)

	            if (

#ifdef USE_GLIDE

	                (Settings.GlideEnable && GFX.Pitch == 512) ||

#endif

#ifdef USE_OPENGL

	                (Settings.OpenGLEnable && GFX.Pitch == 512) ||

#endif

	                    0)

				{

				    // Have to back out of the speed up hack where the low res.

				    // SNES image was rendered into a 256x239 sized buffer,

				    // ignoring the true, larger size of the buffer.

				    

				    for (register s32 y = (s32) GFX.StartY - 1; y >= 0; y--)

				    {

						register u16 *p = (u16 *) (GFX.Screen + y * GFX.Pitch) + 255;

						register u16 *q = (u16 *) (GFX.Screen + y * GFX.RealPitch) + 510;

						for (register int x = 255; x >= 0; x--, p--, q -= 2)

							*q = *(q + 1) = *p;

				    }

				    GFX.Pitch = GFX.Pitch2 = GFX.RealPitch;

		                    GFX.PPL = GFX.Pitch >> 1;

		                    GFX.PPLx2 = GFX.Pitch;

		                    GFX.ZPitch = GFX.PPL;

				}

				else

#endif

					for (register u32 y = 0; y < GFX.StartY; y++)

					{

					    register u16 *p = (u16 *) (GFX.Screen + y * GFX.Pitch) + 255;

					    register u16 *q = (u16 *) (GFX.Screen + y * GFX.Pitch) + 510;

					    for (register int x = 255; x >= 0; x--, p--, q -= 2)

						*q = *(q + 1) = *p;

					}

		    }

#ifndef _SNESPPC

		    else

		    {

				for (register u32 y = 0; y < GFX.StartY; y++)

				{

					register u8 *p = GFX.Screen + y * GFX.Pitch + 255;

					register u8 *q = GFX.Screen + y * GFX.Pitch + 510;

					for (register int x = 255; x >= 0; x--, p--, q -= 2)

					*q = *(q + 1) = *p;

				}

		    }

#endif

		    IPPU.DoubleWidthPixels = TRUE;

		}

    }

#endif //RC_OPTIMIZED (DONT DO ABOVE)



    u32 black = BLACK | (BLACK << 16);



	// Are we worrying about transparencies?

    if (Settings.Transparency && Settings.SixteenBit)

    {

		if (GFX.Pseudo)

		{

			GFX.r2131 = 0x5f;  //0101 1111 - enable addition/subtraction on all BGS and sprites and "1/2 OF COLOR DATA" DESIGNATION

			GFX.r212d = (Memory.FillRAM [0x212c] ^ // any BGS which are set as main and as sub then switch off the sub

				 Memory.FillRAM [0x212d]) & 15;

			GFX.r212c &= ~GFX.r212d;  // make sure the main BG reg is the reverse of the sub BG reg

			GFX.r2130 |= 2; // enable ADDITION/SUBTRACTION FOR SUB SCREEN

		}



		// Check to see if any transparency effects are currently in use

		if (!PPU.ForcedBlanking && ADD_OR_SUB_ON_ANYTHING &&

			(GFX.r2130 & 0x30) != 0x30 &&

			!((GFX.r2130 & 0x30) == 0x10 && IPPU.Clip[1].Count[5] == 0))

		{

			// transparency effects in use, so lets get busy!

			struct ClipData *pClip;

			u32 fixedColour;

			GFX.FixedColour = BUILD_PIXEL (IPPU.XB [PPU.FixedColourRed],

						   IPPU.XB [PPU.FixedColourGreen],

						   IPPU.XB [PPU.FixedColourBlue]);

			fixedColour = (GFX.FixedColour<<16|GFX.FixedColour);

			// Clear the z-buffer, marking areas 'covered' by the fixed

			// colour as depth 1.

			pClip = &IPPU.Clip [1];



			// Clear the z-buffer

			

		    if (pClip->Count [5])

		    {



				// Colour window enabled.



#ifdef RC_OPTIMIZED

				for (u32 y = starty; y <= endy; y++)

				{



	                ZeroMemory (GFX.SubZBuffer + y * GFX.ZPitch,

						IPPU.RenderedScreenWidth);

					ZeroMemory (GFX.ZBuffer + y * GFX.ZPitch,

						IPPU.RenderedScreenWidth);



	                if (IPPU.Clip [0].Count [5])

					{

						memset ((GFX.SubScreen + y * GFX.Pitch2), black, IPPU.RenderedScreenWidth);

					}

					for (u32 c = 0; c < pClip->Count [5]; c++)

					{

						if (pClip->Right [c][5] > pClip->Left [c][5])

						{

							memset (GFX.SubZBuffer + y * GFX.ZPitch + pClip->Left [c][5] * x2,

								1, (pClip->Right [c][5] - pClip->Left [c][5]) * x2);

							if (IPPU.Clip [0].Count [5])

							{

							// Blast, have to clear the sub-screen to the fixed-colour

							// because there is a colour window in effect clipping

							// the main screen that will allow the sub-screen

							// 'underneath' to show through.

							memset ((GFX.SubScreen + y * GFX.Pitch2) + pClip->Left [c][5] * x2,

									 GFX.FixedColour,

									 pClip->Right[c][5]*x2 - pClip->Left [c][5] * x2);

							}

						}

					}

				}



#else // NOT RC_OPTIMIZED

				// loop around all of the lines being updated

				for (u32 y = starty; y <= endy; y++)

				{

					// Clear the subZbuffer

					memset32 ((u32_t*)(GFX.SubZBuffer + y * GFX.ZPitch),0,

						IPPU.RenderedScreenWidth>>2);

					// Clear the Zbuffer

					memset32 ((u32_t*)(GFX.ZBuffer + y * GFX.ZPitch),0,

						IPPU.RenderedScreenWidth>>2);



					// if there is clipping then clear subscreen to a black color

					if (IPPU.Clip [0].Count [5])

					{

						memset32 ((u32_t*)(GFX.SubScreen + y * GFX.Pitch2), black, IPPU.RenderedScreenWidth>>1);

					}



					// loop through all window clippings

					for (u32 c = 0; c < pClip->Count [5]; c++)

					{

						if (pClip->Right [c][5] > pClip->Left [c][5])

						{

							memset (GFX.SubZBuffer + y * GFX.ZPitch + pClip->Left [c][5] * x2,

								1, (pClip->Right [c][5] - pClip->Left [c][5]) * x2);

							if (IPPU.Clip [0].Count [5])

							{

							// Blast, have to clear the sub-screen to the fixed-colour

							// because there is a colour window in effect clipping

							// the main screen that will allow the sub-screen

							// 'underneath' to show through.



							register u16 *p = (u16 *) (GFX.SubScreen + y * GFX.Pitch2);

							register u16 *q = p + pClip->Right [c][5] * x2;

							p += pClip->Left [c][5] * x2;



							while (p < q)

								*p++ = (u16) GFX.FixedColour;

							}

						}

					}

				}

#endif

//#undef RC_OPTIMIZED



		    }

		    else

		    {

				// No windows are clipping the main screen

				// this simplifies the screen clearing process

#ifdef RC_OPTIMIZED



			if (GFX.ZPitch == (u32)IPPU.RenderedScreenWidth)

			{



				memset (GFX.ZBuffer + starty * GFX.ZPitch, 0, GFX.ZPitch * (endy - starty - 1));

				memset (GFX.SubZBuffer + starty * GFX.ZPitch, 1, GFX.ZPitch * (endy - starty - 1));

			}

			else

			{

				for (u32 y = starty; y <= endy; y++)

				{

					ZeroMemory (GFX.ZBuffer + y * GFX.ZPitch,

						IPPU.RenderedScreenWidth);

					memset (GFX.SubZBuffer + y * GFX.ZPitch, 1,

						IPPU.RenderedScreenWidth);

				}

			}

			

		    if (IPPU.Clip [0].Count [5])

		    {

				// Blast, have to clear the sub-screen to the fixed-colour

				// because there is a colour window in effect clipping

				// the main screen that will allow the sub-screen

				// 'underneath' to show through.

				if (GFX.Pitch2 == (u32)IPPU.RenderedScreenWidth)

				{

					memset ((GFX.SubScreen + starty * GFX.Pitch2), 

							GFX.FixedColour | (GFX.FixedColour << 16),

							GFX.Pitch2 * (endy - starty - 1));

				}

				else

				{

					for (u32 y = starty; y <= endy; y++)

					{

						memset ((GFX.SubScreen + y * GFX.Pitch2), 

								GFX.FixedColour | (GFX.FixedColour << 16),

								IPPU.RenderedScreenWidth);

					}

				}

			}



#else // NOT RC_OPTIMIZED

			// loop through all of the lines to be updated

			for (u32 y = starty; y <= endy; y++)

			{

				// Clear the Zbuffer

				memset32 ((u32_t*)(GFX.ZBuffer + y * GFX.ZPitch),0,

					IPPU.RenderedScreenWidth>>2);

			    // clear the sub Zbuffer to 1

				memset32 ((u32_t*)(GFX.SubZBuffer + y * GFX.ZPitch), 0x01010101,

				    IPPU.RenderedScreenWidth>>2);

			    if (IPPU.Clip [0].Count [5])

			    {

				// Blast, have to clear the sub-screen to the fixed-colour

				// because there is a colour window in effect clipping

				// the main screen that will allow the sub-screen

				// 'underneath' to show through.





				memset32 ((u32_t*)(GFX.SubScreen + y * GFX.Pitch2), fixedColour,

				    IPPU.RenderedScreenWidth>>1);

			    }

			}

#endif



			}



		    if (ANYTHING_ON_SUB)

		    {

				GFX.DB = GFX.SubZBuffer;

				RenderScreen (GFX.SubScreen, TRUE, TRUE, SUB_SCREEN_DEPTH);

		    }



		    if (IPPU.Clip [0].Count [5])

		    {

					for (u32 y = starty; y <= endy; y++)

			{

					register u16 *p = (u16 *) (GFX.Screen + y * GFX.Pitch2);

					register u8 *d = GFX.SubZBuffer + y * GFX.ZPitch ;

					register u8 *e = d + SNES_WIDTH;



					while (d < e)

				{

						if (*d > 1)

							*p = *(p + GFX.Delta);

				else

							*p = BLACK;

						d++;

						p++;

	                    }

			}

		    }



		    GFX.DB = GFX.ZBuffer;

		    RenderScreen (GFX.Screen, FALSE, FALSE, MAIN_SCREEN_DEPTH);

		    if (SUB_OR_ADD(5))

		    {

			u32 back = IPPU.ScreenColors [0];

			u32 Left = 0;

			u32 Right = 256;

			u32 Count;



			pClip = &IPPU.Clip [0];



			for (u32 y = starty; y <= endy; y++)

			{

			    if (!(Count = pClip->Count [5]))

			    {

				Left = 0;

				Right = 256 * x2;

				Count = 1;

			    }



			    for (u32 b = 0; b < Count; b++)

			    {

				if (pClip->Count [5])

				{

				    Left = pClip->Left [b][5] * x2;

				    Right = pClip->Right [b][5] * x2;

				    if (Right <= Left)

					continue;

				}



				if (GFX.r2131 & 0x80)

				{

				    if (GFX.r2131 & 0x40)

				    {

					// Subtract, halving the result.

					register u16 *p = (u16 *) (GFX.Screen + y * GFX.Pitch2) + Left;

					register u8 *d = GFX.ZBuffer + y * GFX.ZPitch;

					register u8 *s = GFX.SubZBuffer + y * GFX.ZPitch + Left;

					register u8 *e = d + Right;

					u16 back_fixed = COLOR_SUB (back, GFX.FixedColour);



					d += Left;

					while (d < e)

					{

					    if (*d == 0)

					    {

						if (*s)

						{

						    if (*s != 1)

							*p = COLOR_SUB1_2 (back, *(p + GFX.Delta));

						    else

							*p = back_fixed;

						}

						else

						    *p = (u16) back;

					    }

					    d++;

					    p++;

					    s++;

					}

				    }

				    else

				    {

					// Subtract

					register u16 *p = (u16 *) (GFX.Screen + y * GFX.Pitch2) + Left;

					register u8 *s = GFX.SubZBuffer + y * GFX.ZPitch + Left;

					register u8 *d = GFX.ZBuffer + y * GFX.ZPitch;

					register u8 *e = d + Right;

					u16 back_fixed = COLOR_SUB (back, GFX.FixedColour);



					d += Left;

					while (d < e)

					{

					    if (*d == 0)

					    {

						if (*s)

						{

						    if (*s != 1)

							*p = COLOR_SUB (back, *(p + GFX.Delta));

						    else

							*p = back_fixed;

						}

						else

						    *p = (u16) back;

					    }

					    d++;

					    p++;

					    s++;

					}

				    }

				}

				else

				if (GFX.r2131 & 0x40)

				{

				    register u16 *p = (u16 *) (GFX.Screen + y * GFX.Pitch2) + Left;

				    register u8 *d = GFX.ZBuffer + y * GFX.ZPitch;

				    register u8 *s = GFX.SubZBuffer + y * GFX.ZPitch + Left;

				    register u8 *e = d + Right;

				    u16 back_fixed = COLOR_ADD (back, GFX.FixedColour);

				    d += Left;

				    while (d < e)

				    {

					if (*d == 0)

					{

					    if (*s)

					    {

						if (*s != 1)

						    *p = COLOR_ADD1_2 (back, *(p + GFX.Delta));

						else

						    *p = back_fixed;

					    }

					    else

						*p = (u16) back;

					}

					d++;

					p++;

					s++;

				    }

				}

				else

				if (back != 0)

				{

				    register u16 *p = (u16 *) (GFX.Screen + y * GFX.Pitch2) + Left;

				    register u8 *d = GFX.ZBuffer + y * GFX.ZPitch;

				    register u8 *s = GFX.SubZBuffer + y * GFX.ZPitch + Left;

				    register u8 *e = d + Right;

				    u16 back_fixed = COLOR_ADD (back, GFX.FixedColour);

				    d += Left;

				    while (d < e)

				    {

					if (*d == 0)

					{

					    if (*s)

					    {

						if (*s != 1)

						    *p = COLOR_ADD (back, *(p + GFX.Delta));

						else	

						    *p = back_fixed;

					    }

					    else

						*p = (u16) back;

					}

					d++;

					p++;

					s++;

				    }

				}

				else

				{

				    if (!pClip->Count [5])

				    {

					// The backdrop has not been cleared yet - so

					// copy the sub-screen to the main screen

					// or fill it with the back-drop colour if the

					// sub-screen is clear.

					register u16 *p = (u16 *) (GFX.Screen + y * GFX.Pitch2) + Left;

					register u8 *d = GFX.ZBuffer + y * GFX.ZPitch;

					register u8 *s = GFX.SubZBuffer + y * GFX.ZPitch + Left;

					register u8 *e = d + Right;

					d += Left;

					while (d < e)

					{

					    if (*d == 0)

					    {

							if (*s)

							{

								if (*s != 1)

									*p = *(p + GFX.Delta);

								else	

									*p = GFX.FixedColour;

							}

							else

								*p = (u16) back;

					    }

					    d++;

					    p++;

					    s++;

					}

				   }

				}

			    }

			}



		    }

		    else

		    {

				// Subscreen not being added to back

				u32 back = IPPU.ScreenColors [0] | (IPPU.ScreenColors [0] << 16);

				pClip = &IPPU.Clip [0];



				if (pClip->Count [5])

				{

					for (u32 y = starty; y <= endy; y++)

					{

						for (u32 b = 0; b < pClip->Count [5]; b++)

						{

							u32 Left = pClip->Left [b][5] * x2;

							u32 Right = pClip->Right [b][5] * x2;

							register u16 *p = (u16 *) (GFX.Screen + y * GFX.Pitch2) + Left;

							register u8 *d = GFX.ZBuffer + y * GFX.ZPitch;

							register u8 *e = d + Right;

							d += Left;



							while (d < e)

							{

								if (*d++ == 0)

									*p = (s16) back;

								p++;

							}

						}

					}

				}

				else

				{

					for (u32 y = starty; y <= endy; y++)

					{

						register u16 *p = (u16 *) (GFX.Screen + y * GFX.Pitch2);

						register u8 *d = GFX.ZBuffer + y * GFX.ZPitch;

						register u8 *e = d + 256 * x2;



						while (d < e)

						{

							if (*d == 0)

#ifdef RC_OPTIMIZED

								*p++ = back;

							d++;

#else

							*p = (s16) back;

							d++;

							p++;

#endif

						}

					}

				}

		    }

		}	

		else

		{

		    // 16bit and transparency but currently no transparency effects in

		    // operation.



		    // get the back colour of the current screen

			u32 back = IPPU.ScreenColors [0] | 

				 (IPPU.ScreenColors [0] << 16);



		    // if forceblanking in use then use black instead of the back color

			if (PPU.ForcedBlanking)

				back = black;

			

			// not sure what Clip is used for yet

			// could be a check to see if there is any clipping present?

		    if (IPPU.Clip [0].Count[5])

		    {



#ifdef RC_OPTIMIZED

				if (GFX.Pitch2 == (u32)IPPU.RenderedScreenWidth)

				{

					memset (GFX.Screen + starty * GFX.Pitch2, black,

							GFX.Pitch2 * (endy - starty - 1));

				}

				else

				{

					for (u32 y = starty; y <= endy; y++)

					{

						memset (GFX.Screen + y * GFX.Pitch2, black,

								GFX.Pitch2);

					}

				}

				for (u32 y = starty; y <= endy; y++)

				{

					for (u32 c = 0; c < IPPU.Clip [0].Count [5]; c++)

					{

						if (IPPU.Clip [0].Right [c][5] > IPPU.Clip [0].Left [c][5])

						{



							memset ((GFX.Screen + y * GFX.Pitch2) + IPPU.Clip [0].Left [c][5] * x2,

									back,

									IPPU.Clip [0].Right [c][5] * x2 - IPPU.Clip [0].Left [c][5] * x2);

						}

					}

				}

#else

				// loop through all of the lines that are going to be updated as part of this screen update

				for (u32 y = starty; y <= endy; y++)

				{

					memset32 ((u32_t*)(GFX.Screen + y * GFX.Pitch2), black,

						IPPU.RenderedScreenWidth>>1);



					if (black!=back)

					{

					for (u32 c = 0; c < IPPU.Clip [0].Count [5]; c++)

					{

						if (IPPU.Clip [0].Right [c][5] > IPPU.Clip [0].Left [c][5])

						{

							register u16 *p = (u16 *) (GFX.Screen + y * GFX.Pitch2); // get pointer to current line in screen buffer

							register u16 *q = p + IPPU.Clip [0].Right [c][5] * x2; // get pointer to end of line

							p += IPPU.Clip [0].Left [c][5] * x2;



							while (p < q)

							*p++ = (u16) back; // fill all pixels in clipped section with the back colour

						}

					}

				}

				}

#endif

		    }

		    else

		    {

#ifdef RC_OPTIMIZED

				if (GFX.Pitch2 == (u32)IPPU.RenderedScreenWidth)

				{

					memset (GFX.Screen + starty * GFX.Pitch2, back,

							GFX.Pitch2 * (endy - starty - 1));

				}

				else

				{

					for (u32 y = starty; y <= endy; y++)

					{

						memset (GFX.Screen + y * GFX.Pitch2, back,

								GFX.Pitch2);

					}

				}

#else

				// there is no clipping to worry about so just fill with the back colour

				for (u32 y = starty; y <= endy; y++)

				{

					memset32 ((u32_t*)(GFX.Screen + y * GFX.Pitch2), back,

						IPPU.RenderedScreenWidth>>1);

				}

#endif

		    }

			

			// If Forced blanking is not in effect

		    if (!PPU.ForcedBlanking)

		    {

#ifdef RC_OPTIMIZED

				if (GFX.ZPitch == (u32)IPPU.RenderedScreenWidth)

				{

					memset (GFX.ZBuffer + starty * GFX.ZPitch, 0,

							GFX.ZPitch * (endy - starty - 1));

				}

				else

				{

					for (u32 y = starty; y <= endy; y++)

					{

						memset (GFX.ZBuffer + y * GFX.ZPitch, 0,

								GFX.ZPitch);

					}

				}

#else

				// Clear the Zbuffer for each of the lines which are going to be updated

				for (u32 y = starty; y <= endy; y++)

				{

					memset32 ((u32_t*)(GFX.ZBuffer + y * GFX.ZPitch), 0,

						GFX.ZPitch>>2);

				}

#endif

				GFX.DB = GFX.ZBuffer;  // save pointer to Zbuffer in GFX object

				RenderScreen (GFX.Screen, FALSE, TRUE, SUB_SCREEN_DEPTH);

		    }

		}

    }

    else // Transparencys are disabled, ahh lovely ... nice and easy.

	{

#ifndef _SNESPPC

		if (Settings.SixteenBit)

#endif

		{

		    // get back colour to be used in clearing the screen

			register u32 back;

			if (!(Memory.FillRAM [0x2131] & 0x80) &&(Memory.FillRAM[0x2131] & 0x20) &&

					(PPU.FixedColourRed || PPU.FixedColourGreen || PPU.FixedColourBlue))

			{

				back = (IPPU.XB[PPU.FixedColourRed]<<11) |

					   (IPPU.XB[PPU.FixedColourGreen] << 6) | 

					   (IPPU.XB[PPU.FixedColourBlue] << 1) | 1;

				back = (back << 16) | back;

			}

			else

			{

				back = IPPU.ScreenColors [0] | (IPPU.ScreenColors [0] << 16);

			}

    

		    // if Forcedblanking in use then back colour becomes black

			if (PPU.ForcedBlanking)

				back = black;

		    else

			{

				SelectTileRenderer (TRUE);  //selects the tile renderers to be used

											// TRUE means to use the default

											// FALSE means use best renderer based on current

											// graphics register settings

			}

		    

			// now clear all graphics lines which are being updated using the back colour

			for (register u32 y = starty; y <= endy; y++)

		    {

				memset32 ((u32_t*)(GFX.Screen + y * GFX.Pitch2), back,

					IPPU.RenderedScreenWidth>>1);

		    }

		}

#ifndef _SNESPPC

		else // Settings.SixteenBit == false

		{

		    // because we are in 8 bit we can just use 0 to clear the screen

			// this means we can use the Zero Memory function

			

			// Loop through all lines being updated and clear the pixels to 0

			for (u32 y = starty; y <= endy; y++)

		    {

			ZeroMemory (GFX.Screen + y * GFX.Pitch2,

				    IPPU.RenderedScreenWidth);

		    }

		}

#endif

		if (!PPU.ForcedBlanking)

		{

			// Loop through all lines being updated and clear the

			// zbuffer for each of the lines

			for (u32 y = starty; y <= endy; y++)

		    {

				memset32 ((u32_t*)(GFX.ZBuffer + y * GFX.ZPitch), 0,

					IPPU.RenderedScreenWidth>>2);

		    }

		    GFX.DB = GFX.ZBuffer; // save pointer to Zbuffer in GFX object

		    GFX.pCurrentClip = &IPPU.Clip [0];



// Define an inline function to handle clipping

#define FIXCLIP(n) \

if (GFX.r212c & (1 << (n))) \

	GFX.pCurrentClip = &IPPU.Clip [0]; \

else \

	GFX.pCurrentClip = &IPPU.Clip [1]



// Define an inline function to handle which BGs are being displayed

#define DISPLAY(n) \

((!(PPU.BG_Forced & n) && \

(GFX.r212c & n)) || \

((GFX.r212d & n) && subadd))



		    u8 subadd = GFX.r2131 & 0x3f;



			// go through all BGS are check if they need to be displayed

		    bool8_32 BG0 = DISPLAY(1) && !(Settings.os9x_hack & GFX_IGNORE_BG0);

		    bool8_32 BG1 = DISPLAY(2) && !(Settings.os9x_hack & GFX_IGNORE_BG1);

		    bool8_32 BG2 = DISPLAY(4) && !(Settings.os9x_hack & GFX_IGNORE_BG2);

		    bool8_32 BG3 = DISPLAY(8) && !(Settings.os9x_hack & GFX_IGNORE_BG3);

		    bool8_32 OB  = DISPLAY(16) && !(Settings.os9x_hack & GFX_IGNORE_OBJ);



		    if (PPU.BGMode <= 1)

		    {

				// screen modes 0 and 1

				if (OB)

				{

				    FIXCLIP(4);

				    DrawOBJS ();

				}

				if (BG0)

				{

				    FIXCLIP(0);

				    DrawBackground (PPU.BGMode, 0, 10, 14);

				}

				if (BG1)

				{

				    FIXCLIP(1);

				    DrawBackground (PPU.BGMode, 1, 9, 13);

				}

				if (BG2)

				{

				    FIXCLIP(2);

				    DrawBackground (PPU.BGMode, 2, 3,

						    (Memory.FillRAM [0x2105] & 8) == 0 ? 6 : 17);

				}

				if (BG3 && PPU.BGMode == 0)

				{

				    FIXCLIP(3);

				    DrawBackground (PPU.BGMode, 3, 2, 5);

				}

		    }

		    else if (PPU.BGMode != 7)

		    {

				// screen modes 2 and up but not mode 7

				if (OB)

				{

				    FIXCLIP(4);

				    DrawOBJS ();

				}

				if (BG0)

				{

				    FIXCLIP(0);

				    DrawBackground (PPU.BGMode, 0, 5, 13);

				}

				if (BG1 && PPU.BGMode != 6)

				{

				    FIXCLIP(1);

				    DrawBackground (PPU.BGMode, 1, 2, 9);

				}

		    }

		    else 

		    {

				// screen mode 7

				if (OB)

				{

				    FIXCLIP(4);

				    DrawOBJS ();

				}

				if (BG0 || ((Memory.FillRAM [0x2133] & 0x40) && BG1))

				{

				    int bg;

				    FIXCLIP(0);

				    if (Memory.FillRAM [0x2133] & 0x40)

				    {

					GFX.Mode7Mask = 0x7f;

					GFX.Mode7PriorityMask = 0x80;

					Mode7Depths [0] = 5;

					Mode7Depths [1] = 9;

					bg = 1;

				    }

				    else

				    {

					GFX.Mode7Mask = 0xff;

					GFX.Mode7PriorityMask = 0;

					Mode7Depths [0] = 5;

					Mode7Depths [1] = 5;

					bg = 0;

				    }



#ifndef _SNESPPC

				    if (!Settings.SixteenBit)

					DrawBGMode7Background (GFX.Screen, bg);

				    else

#endif

				    {

					if (!Settings.Mode7Interpolate)

					{	

					    DrawBGMode7Background16 (GFX.Screen, bg);

					}

					else

					{	

					    DrawBGMode7Background16_i (GFX.Screen, bg);

					}

				  }

				}

		    }

		}

	}

#ifndef RC_OPTIMIZE // no hi res

    if (Settings.SupportHiRes && PPU.BGMode != 5 && PPU.BGMode != 6)

    {

	if (IPPU.DoubleWidthPixels)

	{

	    // Mixure of background modes used on screen - scale width

	    // of all non-mode 5 and 6 pixels.

#ifndef _SNESPPC

		if (Settings.SixteenBit)

#endif

	    {

		for (register u32 y = GFX.StartY; y <= GFX.EndY; y++)

		{

		    register u16 *p = (u16 *) (GFX.Screen + y * GFX.Pitch) + 255;

		    register u16 *q = (u16 *) (GFX.Screen + y * GFX.Pitch) + 510;

		    for (register int x = 255; x >= 0; x--, p--, q -= 2)

			*q = *(q + 1) = *p;

		}

	    }

#ifndef _SNESPPC

	    else

	    {

		for (register u32 y = GFX.StartY; y <= GFX.EndY; y++)

		{

		    register u8 *p = GFX.Screen + y * GFX.Pitch + 255;

		    register u8 *q = GFX.Screen + y * GFX.Pitch + 510;

		    for (register int x = 255; x >= 0; x--, p--, q -= 2)

			*q = *(q + 1) = *p;

		}

	    }

#endif

	}



	if (IPPU.LatchedInterlace)

	{

	    // Interlace is enabled - double the height of all non-mode 5 and 6

	    // pixels.

	    for (u32 y = GFX.StartY; y <= GFX.EndY; y++)

	    {

		memcpy32 ((u32_t*)(GFX.Screen + (y * 2 + 1) * GFX.Pitch2),

			 (u32_t*)(GFX.Screen + y * 2 * GFX.Pitch2),

			 GFX.Pitch2>>2);

	    }

	}

    }

#endif

    IPPU.PreviousLine = IPPU.CurrentLine;

}



#ifdef GFX_MULTI_FORMAT



#define _BUILD_PIXEL(F) \

u32 BuildPixel##F(u32 R, u32 G, u32 B) \

{ \

    return (BUILD_PIXEL_##F(R,G,B)); \

}\

u32 BuildPixel2##F(u32 R, u32 G, u32 B) \

{ \

    return (BUILD_PIXEL2_##F(R,G,B)); \

} \

void DecomposePixel##F(u32 pixel, u32 &R, u32 &G, u32 &B) \

{ \

    DECOMPOSE_PIXEL_##F(pixel,R,G,B); \

}



_BUILD_PIXEL(RGB565)

_BUILD_PIXEL(RGB555)

_BUILD_PIXEL(BGR565)

_BUILD_PIXEL(BGR555)

_BUILD_PIXEL(GBR565)

_BUILD_PIXEL(GBR555)

_BUILD_PIXEL(RGB5551)



bool8_32 S9xSetRenderPixelFormat (int format)

{

    extern u32 current_graphic_format;



    current_graphic_format = format;



    switch (format)

    {

    case RGB565:

	_BUILD_SETUP(RGB565)

	return (TRUE);

    case RGB555:

	_BUILD_SETUP(RGB555)

	return (TRUE);

    case BGR565:

	_BUILD_SETUP(BGR565)

	return (TRUE);

    case BGR555:

	_BUILD_SETUP(BGR555)

	return (TRUE);

    case GBR565:

	_BUILD_SETUP(GBR565)

	return (TRUE);

    case GBR555:

	_BUILD_SETUP(GBR555)

	return (TRUE);

    case RGB5551:

        _BUILD_SETUP(RGB5551)

        return (TRUE);

    default:

	break;

    }

    return (FALSE);

}

#endif