/* ---------------------------------------------------------------------
** Project:		Tetixx	(a Tetris clone)
** File:			tetixx.c
** StartDate:	05.02.1999
** EndDate:		15.07.1999
** Autor:		Robert Jurziga
*/

#include <libps.h>
#include "cntrl.h"

#include "tetixx.h"


// ---------------------------------------------------------------------
// P R O T O T Y P E S
// ---------------------------------------------------------------------
void InitView();
void RestoreView();
void InitBackgroundSprites();
void InitFont16();
void DecodeTextPages();
void InitSelectorSprite(char *tim, GsSPRITE *spr);
void InitSelectorSprites();
void InitHiscoreSprites();
void InitGameData();




// ---------------------------------------------------------------------
// V A R I A B L E S
// ---------------------------------------------------------------------
GsOT WorldOT[2];
GsOT_TAG OTab[2][1<<OT_LENGTH];
PACKET GPU_WorkArea[2][MAXOBJECTS*24];
GsSPRITE BGLeft,BGRight;
GsSPRITE TXLeft,TXRight;
GsSPRITE HLLeft,HLRight;
RECT clearrect;
long OldView;
signed short ScrXOff=DEF_SCREEN_XOFFSET;
signed short ScrYOff=DEF_SCREEN_YOFFSET;
volatile u_char *pport0, *pport1;
u_long PadBits;
int choise=0;
short credz_flag;
short hiscoreinit=0;
short hiscoremode=0;
HISCORE_ENTRY CurrentGameHS;


GsSPRITE Font16Chars[FONT16CHARS];	

int font16xsize[]={16,16,16,16,16,16,16,16,7,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,
				   16,10,16,16,16,16,16,16,16,16,
				   10,8,7,12,10,10,12,8,9,12,16,13,14,10,10,12};
char font16chartab[]="ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789!,.-()\":;=?*§'# ";
char txpage0[]="WELCOME TO *KAMIX*\xff\xfe";
char txpage1[]="SPECIAL\xff"\
				"THANKS GO TO ....\xff\xfe";
char txpage3[]="* GEORGE BAIN *\xff"\
				"FOR HIS TUTORIAL ON THE\xff"\
				"#NET YAROZE# SIDE, WHICH\xff"\
				"HELPED ME VERY MUCH\xff"\
				"TO GET STARTED.\xff\xfe";
char txpage4[]="#SCOTT EVANS#\xff"\
					"#SCOTT CARTIER#\xff"\
					"#MATT VERRAN#\xff"\
					"#CHRIS CHADWICK#\xff"\
					"FOR FEEDBACK.\xff\xfe";
char greets0[]="GREETINGS GO OUT TO ...\xff"\
					"ALL #NET YAROZE# MEMBERS\xff"\
					"ON EARTH AND IN SPACE.\xff\xfe";
char txcredz1[]="CREDITS:\xff"\
				"PROGRAMMING, GRAPHICS, \xff"\
				"SOUND AND DESIGN\xff"\
				"DONE BY: ROBERT JURZIGA\xff\xfe";
char txcredz2[]="MORAL SUPPORT,\xff"\
					"ALPHA AND BETA TESTING\xff"\
					"DONE BY MY BROTHER\xff"\
					"* ANDREAS *\xff\xfe";
char txpageend[]="\xfd";
char *textpages[]={txpage0, txcredz1, txcredz2, 
						txpage1,  txpage3, txpage4, greets0, 
				   	txpageend};

GsSPRITE SelOptionsSprite;
GsSPRITE SelExitSprite;
GsSPRITE SelStartGameSprite;
GsSPRITE SelHiscoreSprite;
GsSPRITE SelCtrlSprite;
GsSPRITE SelCtrlBackSprite;
GsSPRITE SelCtrlAdjustSprite;
GsSPRITE SelCtrlCardSprite;
GsSPRITE opt_LoadSprite;
GsSPRITE opt_SaveSprite;
GsSPRITE opt_AdjustScreenSprite;
GsSPRITE opt_Card1LoadSprite;
GsSPRITE opt_Card1SaveSprite;
GsSPRITE opt_Card1ErrorSprite;
GsSPRITE opt_Card2LoadSprite;
GsSPRITE opt_Card2SaveSprite;
GsSPRITE opt_Card2ErrorSprite;
GsSPRITE hs_ctrl0Sprite;
GsSPRITE hs_ctrl1Sprite;
GsSPRITE GameCtrlIngameSprite;

char ScoreFontCharTab[]="ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789:. ";
GsSPRITE ScoreFontCharSprites[39];
GsSPRITE PlayBackTextSprite;

GsSPRITE GameScoreMonitorSprite;
GsSPRITE GameLinesMonitorSprite;
GsSPRITE GameStonesMonitorSprite;
GsSPRITE GameTimeMonitorSprite;
GsSPRITE PreviewMonitorSprite;
GsSPRITE HiscoreMonitorSprite;
GsSPRITE PauseLogoSprite;
GsSPRITE GameOverLogoSprite;
GsSPRITE BonusLogoSprite;

YXM_MODDATA ScoreMod;
YXM_MODDATA ThemeMod;
YXM_MODDATA IngameMod;
unsigned short ThemeOldSongPos;
short ChooseSoundVabID;
short GameSfxVabID;




// ---------------------------------------------------------------------
// M A I N
// ---------------------------------------------------------------------
main()
{

	clearrect.x = clearrect.y = 0;
	clearrect.w = clearrect.h = 512;
	ClearImage(&clearrect, 0x0, 0x0, 0x0);
	DrawSync(0);
		
//	ViewTitle();
	
	StartRCnt(1);
   ResetRCnt(1);   

	InitView();
	InitYXM((unsigned char *)ScoreVH, (unsigned char *)ScoreVB, (unsigned char *)ScoreYXM, &ScoreMod);
	InitYXM((unsigned char *)ThemeVH, (unsigned char *)ThemeVB, (unsigned char *)ThemeYXM, &ThemeMod);
	InitYXM((unsigned char *)IngameVH, (unsigned char *)IngameVB, (unsigned char *)IngameYXM, &IngameMod);
	ChooseSoundVabID = SsVabTransfer((unsigned char *)ChooseVH, (unsigned char *)ChooseVB,-1,1);
	GameSfxVabID = SsVabTransfer((unsigned char *)GameSFXVH, (unsigned char *)GameSFXVB,-1,1);
	
	ViewIntro();

	DecodeTextPages();	
	InitBackgroundSprites();
	InitHiscoreSprites();
	InitFont16();
	InitSelectorSprites();
	InitGameData();
	
	GetPadBuf(&pport0, &pport1);
	credz_flag=0;
	TetixxScreen();
	credz_flag = 1;
	
	while (choise != 3)
		{
		Selector();	
		switch (choise)
			{
			case 0:
				{
				GoTetixxLogo();
				StopYXM(&ThemeMod);
				TheGame();
				ResetYXM(&ThemeMod, 0);
				ComeTetixxLogo();
				break;
				}
			case 1:
				{
				GoTetixxLogo();
				ThemeOldSongPos = StopYXM(&ThemeMod);
				DoHiscore(0);
				ResetYXM(&ThemeMod, ThemeOldSongPos);
				ComeTetixxLogo();
				break;
				}
			case 2:
				{
				DoOptions();
				break;
				}
			case 3:
				{
				FadeToExit();
				break;
				}
			case 4:
				{
				TetixxScreen();
				choise = 0;
				break;
				}
			}
		}
		
	SsVabClose(GameSfxVabID);
	SsVabClose(ChooseSoundVabID);
	RemoveYXM(&IngameMod);
	RemoveYXM(&ThemeMod);
	RemoveYXM(&ScoreMod);
	RestoreView();
	return(0);
}





/* ---------------------------------------------------------------------
// Function:	InitSelectorSprites
// Description:	Many calls to setup sprite structures.
*/

void InitSelectorSprites()
{
	InitSelectorSprite((char *)SelStartGame, &SelStartGameSprite);
	InitSelectorSprite((char *)SelHiscore, &SelHiscoreSprite);
	InitSelectorSprite((char *)SelOptions, &SelOptionsSprite);
	InitSelectorSprite((char *)SelExit, &SelExitSprite);
	InitSelectorSprite((char *)SelCtrl,&SelCtrlSprite);
	InitSelectorSprite((char *)SelCtrlBack,&SelCtrlBackSprite);
	InitSelectorSprite((char *)SelCtrlAdjust,&SelCtrlAdjustSprite);
	InitSelectorSprite((char *)SelCtrlCard,&SelCtrlCardSprite);
	InitSelectorSprite((char *)opt_Load,&opt_LoadSprite);
	InitSelectorSprite((char *)opt_Save,&opt_SaveSprite);
	InitSelectorSprite((char *)opt_AdjustScreen,&opt_AdjustScreenSprite);
	InitSelectorSprite((char *)Card1Load,&opt_Card1LoadSprite);
	InitSelectorSprite((char *)Card1Save,&opt_Card1SaveSprite);
	InitSelectorSprite((char *)Card1Error,&opt_Card1ErrorSprite);
	InitSelectorSprite((char *)Card2Load,&opt_Card2LoadSprite);
	InitSelectorSprite((char *)Card2Save,&opt_Card2SaveSprite);
	InitSelectorSprite((char *)Card2Error,&opt_Card2ErrorSprite);
	InitSelectorSprite((char *)HS_CTRL0,&hs_ctrl0Sprite);
	InitSelectorSprite((char *)HS_CTRL1,&hs_ctrl1Sprite);
	InitSelectorSprite((char *)BonusLogo, &BonusLogoSprite);
	InitSelectorSprite((char *)GameCtrlIngame, &GameCtrlIngameSprite);
}




		


/* ---------------------------------------------------------------------
// Function:	InitSelectorSprite
// Description:	Load the selector gfx data into VRAM then allocate them
//				as sprites.
*/

void InitSelectorSprite(char *tim, GsSPRITE *spr)
{
	GsIMAGE timimg;
	RECT	rect;
	GsSPRITE *tempspr;
	u_long *temptim;
	
	tempspr=spr;
	temptim=(u_long *)tim;
	temptim++;

	GsGetTimInfo(temptim, &timimg);
	rect.x = timimg.px;  rect.y = timimg.py;
	rect.w = timimg.pw;  rect.h = timimg.ph;
	LoadImage(&rect, timimg.pixel);
	DrawSync(0);
	
	rect.x = timimg.cx;  rect.y = timimg.cy;
	rect.w = timimg.cw;  rect.h = timimg.ch;
	LoadImage(&rect, timimg.clut);
	DrawSync(0);

	tempspr->attribute = 0;
	tempspr->x = (512-256)>>1;
	tempspr->y = 0;
	tempspr->w = (timimg.pw)<<2;
	tempspr->h = timimg.ph;
	tempspr->tpage = GetTPage(0, 0, timimg.px, timimg.py);
	tempspr->u = (timimg.px % 64) << 2;
	tempspr->v = timimg.py;
	tempspr->cx = timimg.cx;
	tempspr->cy = timimg.cy;
	tempspr->r = tempspr->g = tempspr->b = 128;
	tempspr->mx = tempspr->my = 0;
	tempspr->scalex = tempspr->scaley = ONE;
	tempspr->rotate = 0;
}







/* ---------------------------------------------------------------------
// Function:	DecodeTextPages
// Description:	Convert each character of the TextPages text into
//				the index number deliverd by the font16chartable
//				loopup table.
*/

void DecodeTextPages()
{
	short i,_done,_done2;
	char *tempptr;
	char letter;
	char k;
	_done=i=0;
	
	while (!_done)
		{
	 	tempptr=textpages[i];
	 	_done2=0;
	 	
		while (!_done2)
			{
			letter = *tempptr;
			switch (letter)
				{
				case '\xff':			// signalize line skip
					{
					tempptr++;
					break;
					}
				case '\xfe':			// singalize end of page
					{
					_done2=1;
					break;
					}
				case '\xfd':			// singalize end of pages
					{
					_done2=1;
					_done=1;
					break;
					}
				default:
					{
					for (k=0; k<FONT16CHARS; k++)
	 					if (font16chartab[k]==letter) {*tempptr=k; goto _nxchr;}
	 				*tempptr=(FONT16CHARS-1);
_nxchr:				tempptr++;
	 				break;
					}
				} // end switch
	 
	 		}// End WHILE
		
		 i++;		// next text page
	 
	 } // End WHILE

} // End Decode Text Pages








/* ---------------------------------------------------------------------
// Function:	InitFont16
// Description:	Init font which is 16x16 pixel.
//				This font is used for for front messages.
*/

void InitFont16()
{
	static GsIMAGE tim;
	static RECT rect;
	u_long *ptr;
	short i,j;
	
	GsSPRITE *tempspr;
	int tex_u=0;
	int tex_v=108;
	int tex_px;
	int tex_py;	
				
// transfer the pixels and clut into frame buffer
	ptr = (u_long *)font16;
	ptr++;
	GsGetTimInfo(ptr, &tim);
	rect.x = tex_px = tim.px;
	rect.y = tex_py = tim.py;
	rect.w = tim.pw;
	rect.h = tim.ph;
	LoadImage(&rect, tim.pixel);
	DrawSync(0);
	
	rect.x = tim.cx;
	rect.y = tim.cy;
	rect.w = tim.cw;
	rect.h = tim.ch;
	LoadImage(&rect, tim.clut);
	DrawSync(0);


// each font char will be single 16x16 4bit sprite
// there are 52 chars grouped into 3*16 chars and 4 chars
// in the 4th row, so there is an extra for loop for the 4 chars
	
	tempspr=Font16Chars;

	for (j=0; j < 3; j++)
		{
		
		for (i=0; i < 16; i++)
			{
			tempspr->attribute = 0;
			tempspr->x = 0;
			tempspr->y = 0;
			tempspr->w = 16;
			tempspr->h = 16;
			tempspr->tpage = GetTPage(0, 0, tex_px, tex_py);
			tempspr->u = tex_u;
			tempspr->v = tex_v;
			tempspr->cx = tim.cx;
			tempspr->cy = tim.cy;
			tempspr->r = 128;
			tempspr->g = 128;
			tempspr->b = 128;
			tempspr->mx = 0;
			tempspr->my = 0;
			tempspr->scalex = ONE;
			tempspr->scaley = ONE;
			tempspr->rotate = 0;
			tempspr++;
			tex_u+=16;
			}
		tex_v+=16;
		tex_u=0;
		tex_py+=16;
		}
		
	for (j=0; j < 4; j++)
		{
		tempspr->attribute = 0;
		tempspr->x = 0;
		tempspr->y = 0;
		tempspr->w = 16;
		tempspr->h = 16;
		tempspr->tpage = GetTPage(0, 0, tex_px, tex_py);
		tempspr->u = tex_u;
		tempspr->v = tex_v;
		tempspr->cx = tim.cx;
		tempspr->cy = tim.cy;
		tempspr->r = 128;
		tempspr->g = 128;
		tempspr->b = 128;
		tempspr->mx = 0;
		tempspr->my = 0;
		tempspr->scalex = ONE;
		tempspr->scaley = ONE;
		tempspr->rotate = 0;
		tempspr++;
		tex_u+=16;
		}
		
}







/* ---------------------------------------------------------------------
// Function:	InitHiscoreSprites
// Description:	The hiscore sprite is like the Tetixx Logo sprite.
//				It is 448 pixel wide and has to be devied into two
//				spriets
*/
void InitHiscoreSprites()
{
	GsIMAGE tim;
	RECT rect,imgrect;
	u_long *ptr;
	GsSPRITE *spr;
	short i,j;
	int v_loc,u_loc;		
		
// Load big HISCORE sprite into VRAM
	ptr=(u_long *)HiscoreLogo;
	ptr++;
	GsGetTimInfo(ptr, &tim);
	rect.x = tim.px; rect.y = tim.py;
	rect.w = tim.pw; rect.h = tim.ph;
	LoadImage(&rect, tim.pixel);
	DrawSync(0);
	
	rect.x = tim.cx; rect.y = tim.cy;
	rect.w = tim.cw; rect.h = tim.ch;
	LoadImage(&rect, tim.clut);
	DrawSync(0);

	HLLeft.attribute=(1<<24);
	HLLeft.x=(512 - 448) >> 1;
	HLLeft.y=0;
	HLLeft.w=256;
	HLLeft.h=78;
	HLLeft.tpage= GetTPage(1, 0, tim.px, tim.py);
	HLLeft.u = HLLeft.v=0;
	HLLeft.cx=tim.cx;
	HLLeft.cy=tim.cy;
	HLLeft.r = HLLeft.g = HLLeft.b = 128;
	HLLeft.mx = HLLeft.my = 0;
	HLLeft.scalex=HLLeft.scaley=ONE;
	HLLeft.rotate=0;
	
	HLRight.attribute=(1<<24);
	HLRight.x=((512 - 448) >> 1) + 256;
	HLRight.y=0;
	HLRight.w=448-256;
	HLRight.h=78;
	HLRight.tpage= GetTPage(1, 0, tim.px+(256>>1), tim.py);
	HLRight.u = HLRight.v=0;
	HLRight.cx=tim.cx;
	HLRight.cy=tim.cy;
	HLRight.r = HLRight.g = HLRight.b = 128;
	HLRight.mx = HLRight.my = 0;
	HLRight.scalex=HLRight.scaley=ONE;
	HLRight.rotate=0;



// load the HiscoreFont into VRAM
	ptr=(u_long *)ScoreFont;
	ptr++;
	GsGetTimInfo(ptr, &tim);
	imgrect.x = tim.px; imgrect.y = tim.py;
	imgrect.w = tim.pw; imgrect.h = tim.ph;
	LoadImage(&imgrect, tim.pixel);
	DrawSync(0);
	
	rect.x = tim.cx; rect.y = tim.cy;
	rect.w = tim.cw; rect.h = tim.ch;
	LoadImage(&rect, tim.clut);
	DrawSync(0);	

	spr=&ScoreFontCharSprites[0];
	v_loc = tim.py;
	u_loc = 0;
	
	for(j=0; j<2; j++)
		{
		for(i=0, u_loc=0; i<16; i++, spr++, u_loc+=16)		 // init the first line (25 chars) (a-y)
			{
			spr->attribute = 0;
			spr->w = 16;
			spr->h =  17;
			spr->tpage = GetTPage(0, 0, tim.px, tim.py);
			spr->u = u_loc;
			spr->v = v_loc;
			spr->cx = tim.cx;
			spr->cy = tim.cy;
			spr->r = spr->g = spr->b = 128;
			spr->mx = spr->my = 0;
			spr->scalex = spr->scaley = ONE;
			spr->rotate = 0;	
			}
		v_loc+=17;
		}
	for(i=0, u_loc =0; i<7; i++, spr++, u_loc+=16)		// init the 2nd line (z : . 0-9)
		{
		spr->attribute = 0;
		spr->w = 16;
		spr->h = 17;
		spr->tpage = GetTPage(0, 0, tim.px, tim.py);
		spr->u = u_loc;
		spr->v = v_loc;
		spr->cx = tim.cx;
		spr->cy = tim.cy;
		spr->r = spr->g = spr->b = 128;
		spr->mx = spr->my = 0;
		spr->scalex = spr->scaley = ONE;
		spr->rotate = 0;
		}
}







/* ---------------------------------------------------------------------
// Function:	InitGameData
// Description:	Set all data neccessery to create the game
// the sprites which are used in the game.
*/

void InitGameData()
{
GsIMAGE tim;
RECT rect;
u_long *ptr;
GsSPRITE *spr;
short i,j;
unsigned long *clutptr;
unsigned short xoff,yoff;
unsigned char *uv;

// load the playback sprite
	ptr=(u_long *)PlayBackText;
	ptr++;
	GsGetTimInfo(ptr, &tim);
	rect.x = tim.px; rect.y = tim.py;
	rect.w = tim.pw; rect.h = tim.ph;
	LoadImage(&rect, tim.pixel);
	DrawSync(0);
	
	rect.x = tim.cx; rect.y = tim.cy;
	rect.w = tim.cw; rect.h = tim.ch;
	LoadImage(&rect, tim.clut);
	DrawSync(0);

	spr = &PlayBackTextSprite;
	
	spr->attribute=1<<24;
	spr->x=spr->y = 0;
	spr->w=234;
	spr->h=232;
	spr->tpage= GetTPage(1, 0, tim.px, tim.py);
	spr->u = 0;
	spr->v=12;
	spr->cx=tim.cx;
	spr->cy=tim.cy;
	spr->r = spr->g = spr->b = 128;
	spr->mx = spr->my = 0;
	spr->scalex=spr->scaley=ONE;
	spr->rotate=0;
	


// load the Game Score Monitor Sprite
	ptr = (u_long *)GameScoreMonitor;
	ptr++;
	GsGetTimInfo(ptr, &tim);
	rect.x = tim.px; rect.y = tim.py;
	rect.w = tim.pw; rect.h = tim.ph;
	LoadImage(&rect, tim.pixel);
	DrawSync(0);
	
	rect.x = tim.cx; rect.y = tim.cy;
	rect.w = tim.cw; rect.h = tim.ch;
	LoadImage(&rect, tim.clut);
	DrawSync(0);

	spr = &GameScoreMonitorSprite;
	
	spr->attribute=0;
	spr->x=spr->y = 0;
	spr->w=100;
	spr->h=42;
	spr->tpage= GetTPage(0, 0, tim.px, tim.py);
	spr->u = 0;
	spr->v=78;
	spr->cx=tim.cx;
	spr->cy=tim.cy;
	spr->r = spr->g = spr->b = 128;
	spr->mx = spr->my = 0;
	spr->scalex=spr->scaley=ONE;
	spr->rotate=0;	


	
// load the Game Lines Monitor Sprite
	ptr = (u_long *)GameLinesMonitor;
	ptr++;
	GsGetTimInfo(ptr, &tim);
	rect.x = tim.px; rect.y = tim.py;
	rect.w = tim.pw; rect.h = tim.ph;
	LoadImage(&rect, tim.pixel);
	DrawSync(0);
	
	rect.x = tim.cx; rect.y = tim.cy;
	rect.w = tim.cw; rect.h = tim.ch;
	LoadImage(&rect, tim.clut);
	DrawSync(0);

	spr = &GameLinesMonitorSprite;
	
	spr->attribute=0;
	spr->x=spr->y = 0;
	spr->w=100;
	spr->h=42;
	spr->tpage= GetTPage(0, 0, tim.px, tim.py);
	spr->u = 104;
	spr->v= 78;
	spr->cx=tim.cx;
	spr->cy=tim.cy;
	spr->r = spr->g = spr->b = 128;
	spr->mx = spr->my = 0;
	spr->scalex=spr->scaley=ONE;
	spr->rotate=0;	



// load the Game Stones Monitor Sprite
	ptr = (u_long *)GameStonesMonitor;
	ptr++;
	GsGetTimInfo(ptr, &tim);
	rect.x = tim.px; rect.y = tim.py;
	rect.w = tim.pw; rect.h = tim.ph;
	LoadImage(&rect, tim.pixel);
	DrawSync(0);
	
	rect.x = tim.cx; rect.y = tim.cy;
	rect.w = tim.cw; rect.h = tim.ch;
	LoadImage(&rect, tim.clut);
	DrawSync(0);

	spr = &GameStonesMonitorSprite;
	
	spr->attribute=0;
	spr->x=spr->y = 0;
	spr->w=100;
	spr->h=42;
	spr->tpage= GetTPage(0, 0, tim.px, tim.py);
	spr->u = 0;
	spr->v= 78+42;
	spr->cx=tim.cx;
	spr->cy=tim.cy;
	spr->r = spr->g = spr->b = 128;
	spr->mx = spr->my = 0;
	spr->scalex=spr->scaley=ONE;
	spr->rotate=0;	



// load the Game Time Monitor Sprite
	ptr = (u_long *)GameTimeMonitor;
	ptr++;
	GsGetTimInfo(ptr, &tim);
	rect.x = tim.px; rect.y = tim.py;
	rect.w = tim.pw; rect.h = tim.ph;
	LoadImage(&rect, tim.pixel);
	DrawSync(0);
	
	rect.x = tim.cx; rect.y = tim.cy;
	rect.w = tim.cw; rect.h = tim.ch;
	LoadImage(&rect, tim.clut);
	DrawSync(0);

	spr = &GameTimeMonitorSprite;
	
	spr->attribute=0;
	spr->x=spr->y = 0;
	spr->w=100;
	spr->h=42;
	spr->tpage= GetTPage(0, 0, tim.px, tim.py);
	spr->u = 104;
	spr->v= 78+42;
	spr->cx=tim.cx;
	spr->cy=tim.cy;
	spr->r = spr->g = spr->b = 128;
	spr->mx = spr->my = 0;
	spr->scalex=spr->scaley=ONE;
	spr->rotate=0;	


// load the Preview Monitor Sprite
	ptr = (u_long *)PreviewMonitor;
	ptr++;
	GsGetTimInfo(ptr, &tim);
	rect.x = tim.px; rect.y = tim.py;
	rect.w = tim.pw; rect.h = tim.ph;
	LoadImage(&rect, tim.pixel);
	DrawSync(0);
	
	rect.x = tim.cx; rect.y = tim.cy;
	rect.w = tim.cw; rect.h = tim.ch;
	LoadImage(&rect, tim.clut);
	DrawSync(0);

	spr = &PreviewMonitorSprite;
	
	spr->attribute=0;
	spr->x=spr->y = 0;
	spr->w=96;
	spr->h=75;
	spr->tpage= GetTPage(0, 0, tim.px, tim.py);
	spr->u = 0;
	spr->v= 78+42+42;
	spr->cx=tim.cx;
	spr->cy=tim.cy;
	spr->r = spr->g = spr->b = 128;
	spr->mx = spr->my = 0;
	spr->scalex=spr->scaley=ONE;
	spr->rotate=0;		



// load the Hiscore Monitor Sprite
	ptr = (u_long *)HiscoreMonitor;
	ptr++;
	GsGetTimInfo(ptr, &tim);
	rect.x = tim.px; rect.y = tim.py;
	rect.w = tim.pw; rect.h = tim.ph;
	LoadImage(&rect, tim.pixel);
	DrawSync(0);
	
	rect.x = tim.cx; rect.y = tim.cy;
	rect.w = tim.cw; rect.h = tim.ch;
	LoadImage(&rect, tim.clut);
	DrawSync(0);

	spr = &HiscoreMonitorSprite;
	
	spr->attribute=0;
	spr->x=spr->y = 0;
	spr->w=100;
	spr->h=42;
	spr->tpage= GetTPage(0, 0, tim.px, tim.py);
	spr->u = 104;
	spr->v= 78+42+42;
	spr->cx=tim.cx;
	spr->cy=tim.cy;
	spr->r = spr->g = spr->b = 128;
	spr->mx = spr->my = 0;
	spr->scalex=spr->scaley=ONE;
	spr->rotate=0;		



// load the Pause Logo Sprite
	ptr = (u_long *)PauseLogo;
	ptr++;
	GsGetTimInfo(ptr, &tim);
	rect.x = tim.px; rect.y = tim.py;
	rect.w = tim.pw; rect.h = tim.ph;
	LoadImage(&rect, tim.pixel);
	DrawSync(0);
	
	rect.x = tim.cx; rect.y = tim.cy;
	rect.w = tim.cw; rect.h = tim.ch;
	LoadImage(&rect, tim.clut);
	DrawSync(0);

	spr = &PauseLogoSprite;
	
	spr->attribute=0;
	spr->x=spr->y = 0;
	spr->w=136;
	spr->h=24;
	spr->tpage= GetTPage(0, 0, tim.px, tim.py);
	spr->u = 104;
	spr->v= 78+42+42+42;
	spr->cx=tim.cx;
	spr->cy=tim.cy;
	spr->r = spr->g = spr->b = 128;
	spr->mx = spr->my = 0;
	spr->scalex=spr->scaley=ONE;
	spr->rotate=0;		


// load the Game Over Sprite
	ptr = (u_long *)GameOverLogo;
	ptr++;
	GsGetTimInfo(ptr, &tim);
	rect.x = tim.px; rect.y = tim.py;
	rect.w = tim.pw; rect.h = tim.ph;
	LoadImage(&rect, tim.pixel);
	DrawSync(0);
	
	rect.x = tim.cx; rect.y = tim.cy;
	rect.w = tim.cw; rect.h = tim.ch;
	LoadImage(&rect, tim.clut);
	DrawSync(0);

	spr = &GameOverLogoSprite;
	
	spr->attribute=0;
	spr->x=spr->y = 0;
	spr->w=156;
	spr->h=22;
	spr->tpage= GetTPage(0, 0, tim.px, tim.py);
	spr->u = 0;
	spr->v= 438-256;
	spr->cx=tim.cx;
	spr->cy=tim.cy;
	spr->r = spr->g = spr->b = 128;
	spr->mx = spr->my = 0;
	spr->scalex=spr->scaley=ONE;
	spr->rotate=0;		


// load the InsertStandardController Sprite
	ptr = (u_long *)ISCntrlLogo;
	ptr++;
	GsGetTimInfo(ptr, &tim);
	rect.x = tim.px; rect.y = tim.py;
	rect.w = tim.pw; rect.h = tim.ph;
	LoadImage(&rect, tim.pixel);
	DrawSync(0);
	
	rect.x = tim.cx; rect.y = tim.cy;
	rect.w = tim.cw; rect.h = tim.ch;
	LoadImage(&rect, tim.clut);
	DrawSync(0);

	spr = &ISCntrlSprite;
	
	spr->attribute=0;
	spr->x=spr->y = 0;
	spr->w=248;
	spr->h=40;
	spr->tpage= GetTPage(0, 0, tim.px, tim.py);
	spr->u = 0;
	spr->v= 460-256;
	spr->cx=tim.cx;
	spr->cy=tim.cy;
	spr->r = spr->g = spr->b = 128;
	spr->mx = spr->my = 0;
	spr->scalex=spr->scaley=ONE;
	spr->rotate=0;		


// load 19 stone-color palettes
	clutptr = &StoneCluts[0];
	
	for (i=0; i<STONE_CLUT_NUMBER; i++)
		{
		rect.x = (unsigned short)*clutptr++;
		rect.y = (unsigned short)*clutptr++;
		rect.w = (unsigned short)*clutptr++;
		rect.h = (unsigned short)*clutptr++;
		LoadImage(&rect, (unsigned long *)clutptr);
		clutptr+=8;
		}
		

// load the stone texture
	ptr=(u_long *)Stone;
	ptr++;
	GsGetTimInfo(ptr, &tim);
	rect.x = tim.px; rect.y = tim.py;
	rect.w = tim.pw; rect.h = tim.ph;
	LoadImage(&rect, tim.pixel);
	DrawSync(0);


// setup preview stone with Stone VRAM location
	spr = &PreviewStoneSprites[0];
	
	for(i=0; i<16; i++, spr++) {
		spr->attribute=0;
		spr->w=20;
		spr->h=12;
		spr->tpage= GetTPage(0, 0, tim.px, tim.py);
		spr->u = 0;
		spr->v= STONE_V;
		spr->r = spr->g = spr->b = 128;
		spr->mx = spr->my = 0;
		spr->scalex=spr->scaley=ONE;
		spr->rotate=0;	
		}

// setup Game (Current) stone with Stone VRAM location	
	spr = &CurrStoneSprites[0];
	
	for(i=0; i<16; i++, spr++) {
		spr->attribute=0;
		spr->w=20;
		spr->h=12;
		spr->tpage= GetTPage(0, 0, tim.px, tim.py);
		spr->u = 0;
		spr->v= STONE_V;
		spr->r = spr->g = spr->b = 128;
		spr->mx = spr->my = 0;
		spr->scalex=spr->scaley=ONE;
		spr->rotate=0;	
		}


// setup the tetixx field with Stone VRAM location
	spr=&TetixxFieldSprites[0];
	yoff = TETIXX_FIELD_YOFF;
		
	for(j=0; j<STONES_IN_ROW; j++) {
		xoff = TETIXX_FIELD_XOFF;
		for(i=0; i<STONES_ROWS; i++) {
			spr->attribute=0x88000000;					// NoDisplay/No RotScale
			spr->x=xoff;
			spr->y=yoff;
			spr->w=20;
			spr->h=12;
			spr->tpage = GetTPage(0, 0, tim.px, tim.py);
			spr->u = 0;
			spr->v = STONE_V;
			spr->r = spr->g = spr->b = 128;
			spr->mx = spr->my = 0;
			spr->scalex = spr->scaley = ONE;
			spr->rotate=0;
			spr++;
			xoff+=STONE_WIDTH;
			}
		yoff+=STONE_HEIGHT;
		}
		
		
// Set Up Score Sprites
	ptr=(u_long *)ScoreFont;
	ptr++;
	GsGetTimInfo(ptr, &tim);
	
	spr = &GameScoreSprites[0];
	xoff = SCORE_MONITOR_LEFT;
	yoff = SCORE_MONITOR_TOP;
	xoff+= 80;									// 9 sprite are displayed (100 000 000)
		
	for (i=0; i<9; i++ ,spr++) {
		spr->attribute = 0x88000000;
		spr->x = xoff;
		spr->y = yoff;
		spr->w = 16;
		spr->h = 17;
		spr->tpage = GetTPage(0, 0, tim.px, tim.py);
		spr->cx = HS_SCORE_COLSX;
		spr->cy = HS_SCORE_COLSY;
		spr->r = spr->g = spr->b = 128;
		spr->mx = spr->my = 0;
		spr->scalex = spr->scaley = ONE;
		spr->rotate=0;
		xoff-=10;
		}
	

// Setup Hiscore Sprites
	spr = &GameHiScoreSprites[0];
	xoff = HISCORE_MONITOR_LEFT;
	yoff = HISCORE_MONITOR_TOP;
	xoff+= 80;									// 9 sprite are displayed (100 000 000)
		
	for (i=0; i<9; i++ ,spr++) {
		spr->attribute = 0x88000000;
		spr->x = xoff;
		spr->y = yoff;
		spr->w = 16;
		spr->h = 17;
		spr->tpage = GetTPage(0, 0, tim.px, tim.py);
		spr->cx = HS_SCORE_COLSX;
		spr->cy = HS_SCORE_COLSY;
		spr->r = spr->g = spr->b = 196;
		spr->mx = spr->my = 0;
		spr->scalex = spr->scaley = ONE;
		spr->rotate=0;
		xoff-=10;
		}
	
	
// Setup Lines Sprites
	spr = &GameLinesSprites[0];
	xoff = LINES_MONITOR_LEFT;
	yoff = LINES_MONITOR_TOP;
	xoff+= 80;									// 9 sprite are displayed (100 000 000)
		
	for (i=0; i<9; i++ ,spr++) {
		spr->attribute = 0x88000000;
		spr->x = xoff;
		spr->y = yoff;
		spr->w = 16;
		spr->h = 17;
		spr->tpage = GetTPage(0, 0, tim.px, tim.py);
		spr->cx = HS_LINES_COLSX;
		spr->cy = HS_LINES_COLSY;
		spr->r = spr->g = spr->b = 128;
		spr->mx = spr->my = 0;
		spr->scalex = spr->scaley = ONE;
		spr->rotate=0;
		xoff-=10;
		}

// Setup Stones Sprites
	spr = &GameStonesSprites[0];
	xoff = STONES_MONITOR_LEFT;
	yoff = STONES_MONITOR_TOP;
	xoff+= 80;									// 9 sprite are displayed (100 000 000)
		
	for (i=0; i<9; i++ ,spr++) {
		spr->attribute = 0x88000000;
		spr->x = xoff;
		spr->y = yoff;
		spr->w = 16;
		spr->h = 17;
		spr->tpage = GetTPage(0, 0, tim.px, tim.py);
		spr->cx = HS_STONES_COLSX;
		spr->cy = HS_STONES_COLSY;
		spr->r = spr->g = spr->b = 128;
		spr->mx = spr->my = 0;
		spr->scalex = spr->scaley = ONE;
		spr->rotate=0;
		xoff-=10;
		}

// Setup Time Sprites
	spr = &GameTimeSprites[0];
	xoff = TIME_MONITOR_LEFT;
	yoff = TIME_MONITOR_TOP;
											// 8 sprite are displayed (00:00:00)
		
	for (i=0; i<8; i++ ,spr++) {
		spr->attribute = 0x88000000;
		spr->x = xoff;
		spr->y = yoff;
		spr->w = 16;
		spr->h = 17;
		spr->tpage = GetTPage(0, 0, tim.px, tim.py);
		spr->cx = HS_TIME_COLSX;
		spr->cy = HS_TIME_COLSY;
		spr->r = spr->g = spr->b = 128;
		spr->mx = spr->my = 0;
		spr->scalex = spr->scaley = ONE;
		spr->rotate=0;
		xoff+=10;
		}


// Initalize the VU for the Number Sprites
	uv = &NumbersVRAM_UV[0];
	spr = &ScoreFontCharSprites[26];			// point at 0
	
	for (i=0; i<11; i++, spr++) {				// 0-9 and :
		*uv = (unsigned char)spr->u;
		*(uv+1) = (unsigned char)spr->v;
		uv+=2;
	}
	
		
// Load CLUTS for coloured hiscores
	rect.x = HS_RANK_COLSX;
	rect.y = HS_RANK_COLSY;
	rect.w = 16;
	rect.h = 1;
	LoadImage(&rect, &ScoreCols_RANK[0]);
	DrawSync(0);
	
	rect.x = HS_NAME_COLSX;
	rect.y = HS_NAME_COLSY;
	LoadImage(&rect, &ScoreCols_NAME[0]);
	DrawSync(0);
			
	rect.x = HS_SCORE_COLSX;
	rect.y = HS_SCORE_COLSY;
	LoadImage(&rect, &ScoreCols_SCORE[0]);
	DrawSync(0);
	
	rect.x = HS_LINES_COLSX;
	rect.y = HS_LINES_COLSY;
	LoadImage(&rect, &ScoreCols_LINES[0]);
	DrawSync(0);
	
	rect.x = HS_STONES_COLSX;
	rect.y = HS_STONES_COLSY;
	LoadImage(&rect, &ScoreCols_STONES[0]);
	DrawSync(0);
	
	rect.x = HS_TIME_COLSX;
	rect.y = HS_TIME_COLSY;
	LoadImage(&rect, &ScoreCols_TIME[0]);
	DrawSync(0);

}






/* ---------------------------------------------------------------------
// Function:	InitBackgroundSprites
// Description:	Init the game background sprites.
//				Background consists of 2 256x256 textures, which makes
//				512x256 background. The sprites are located during the
//				game at the same place within the frame-buffer
//				Left Sprite:x,y/clut:x,y :512,0 / 768,0
//				Right Sprite:x,y/clut:x,y :640,0 / 768,1
*/

void InitBackgroundSprites()
{
	static GsIMAGE tim;
	static RECT rect;
	static u_long *ptr;
	static u_short tpage;
	
// Setup left background sprite
	ptr=(u_long *)bg_left;
	ptr++;
	GsGetTimInfo(ptr, &tim);
	rect.x = tim.px;
	rect.y = tim.py;
	rect.w = tim.pw;
	rect.h = tim.ph;
	LoadImage(&rect, tim.pixel);
	DrawSync(0);
	
	rect.x = tim.cx;
	rect.y = tim.cy;
	rect.w = tim.cw;
	rect.h = tim.ch;
	LoadImage(&rect, tim.clut);
	DrawSync(0);
	
	tpage = GetTPage(1, 0, tim.px, tim.py);
	
	BGLeft.attribute=(1<<24);
	
	BGLeft.x=0;
	BGLeft.y=0;
	BGLeft.w=256;
	BGLeft.h=256;
	
	BGLeft.tpage=tpage;
	
	BGLeft.u=0;
	BGLeft.v=0;
	
	BGLeft.cx=tim.cx;
	BGLeft.cy=tim.cy;
	
	BGLeft.r = 0;
	BGLeft.g = 0;
	BGLeft.b = 0;
	
	BGLeft.mx = 0;
	BGLeft.my = 0;
	
	BGLeft.scalex=ONE;
	BGLeft.scaley=ONE;
	BGLeft.rotate=0;



// Setup right background sprite
	ptr=(u_long *)bg_right;
	ptr++;
	GsGetTimInfo(ptr, &tim);
	rect.x = tim.px;
	rect.y = tim.py;
	rect.w = tim.pw;
	rect.h = tim.ph;
	LoadImage(&rect, tim.pixel);
	DrawSync(0);
	
	rect.x = tim.cx;
	rect.y = tim.cy;
	rect.w = tim.cw;
	rect.h = tim.ch;
	LoadImage(&rect, tim.clut);
	DrawSync(0);
	
	tpage = GetTPage(1, 0, tim.px, tim.py);
	
	BGRight.attribute=1<<24;
	
	BGRight.x=256;
	BGRight.y=0;
	BGRight.w=256;
	BGRight.h=256;
	
	BGRight.tpage=tpage;
	
	BGRight.u=0;
	BGRight.v=0;
	
	BGRight.cx=tim.cx;
	BGRight.cy=tim.cy;
	
	BGRight.r = 0;
	BGRight.g = 0;
	BGRight.b = 0;
	
	BGRight.mx = 0;
	BGRight.my = 0;
	
	BGRight.scalex=ONE;
	BGRight.scaley=ONE;
	BGRight.rotate=0;

}









/* ---------------------------------------------------------------------
// Function:	InitView
// Description:	Init the basic View Parameters
//
*/

void InitView()
{


// Set up graphics
	OldView = SetVideoMode(MODE_PAL);
	ResetGraph(0);
	GsInitGraph(SCREEN_WIDTH, SCREEN_HEIGHT, GsOFSGPU, 0, 0);
	GsDefDispBuff(0, 0, 0, SCREEN_HEIGHT);

// Set display output position on screen
	GsDISPENV.screen.x=ScrXOff;
	GsDISPENV.screen.y=ScrYOff;
	GsDISPENV.screen.w=255;
	GsDISPENV.screen.h=255;


// Set draw environment
	GsDRAWENV.r0=0x00;
	GsDRAWENV.g0=0x00;
	GsDRAWENV.b0=0x00;
	GsDRAWENV.isbg=0x00;
	
	
// Set up and init ordering table
	WorldOT[0].length=OT_LENGTH;
	WorldOT[0].org = OTab[0];
	GsClearOt(0, 0, &WorldOT[0]);
	
	WorldOT[1].length=OT_LENGTH;
	WorldOT[1].org = OTab[1];
	GsClearOt(0, 0, &WorldOT[1]);

}








/* ---------------------------------------------------------------------
// Function:	RestoreView
// Description:	Init the previous VideoMode.
//
*/

void RestoreView()
{
	SetVideoMode(OldView);
	ResetGraph(0);
}