//-----------------------------------------------------------------------------------
// File: main.c					*** GEMS ***
// Description: The 2nd Game Programmed using the NET YAROZE whilst learning C  
//
// Version: 1.1
//
// Date: 22nd AUGUST 1999
//
// Time Spent so far: 2 Weeks (about 30 Hours)
//
// Notes: I've just learned how to spread source code over several seperate
//		  files so this program should be easier to follow than my other's.
//        I've also been learning about "for loops", "switch statements" and
//        "structs" so these are used quite a lot in this program, even though
//        some may be pointless. I'm getting the hang of this C stuff at last!
//        				( If I could only the PSX was as easy! )
//
// Thanks: Herbert Schildt (again): For his excellent Programming books
//		   Santos Rouge:            For his RougePad.h file (I'll write my own soon)
//		   SCEE:                    What an ace Machine! (roll on NGPS)
//		   EDGE MAGAZINE:			For it's excellent supplement on Getting into the
//								    Games Industry.
//
//		   Net Yaroze Site Members: How I would have managed without all the
//									free source code and help I'll never know.
// 
// Comments: This game is a Tetris style game which currently requires you to clear
//           the screen of all it's gems. Later versions will include a "Magic Gem"
//		     which you have to dig out, a 2 Player mode and other options. I'll
//			 also be including title screens, an options screen, and sound.
//           
//           The CheckForLine() routines need re-writing.
//		     Lots of comments required in source files
//
//-----------------------------------------------------------------------------------



//-------------------------
// Includes
//-------------------------

#include <__rts_info_t__.h>		//
#include <libps.h>				// Standard PSX Libs


#include "red_control.h"
#include "yellow_control.h"
#include "blue_control.h"
#include "green_control.h"
#include "grid_control.h"
#include "RougePad.h"

//---------------------
// General Defines
//---------------------

// Total Sprites Defines

#define		SPRITE_CNT	(256)

// Screen Defines

#define		SCREEN_WIDTH	320
#define		SCREEN_HEIGHT	240

// Game Control Defines

#define		GEM_DROPPING		1
#define		GEM_NOT_DROPPING	0

#define		RUN_GAME			0
#define		STOP_GAME			1

// Game Control Variables

int GemDropState = GEM_NOT_DROPPING; 
int GameState    = RUN_GAME;
int DropGemPosition;

// Ordering Table Length Defines

#define OT_LENGTH	(4)

// -----------------------------------------------
// Initialise Structures
// -----------------------------------------------

// Ordering table 1 variables
GsOT			WorldOT[2];
GsOT_TAG		OTTags[2][1<<OT_LENGTH];
int				activeBuff;

// Primitive related vaiables
PACKET			GpuPacketArea[2][SPRITE_CNT*sizeof(GsSPRITE)];

//-----------------
// External
//-----------------

extern short int Pad1;	// Used in RougePad.h


//---------------------------
// Function Prototypes
//---------------------------

void SomePad1();	// Executes commands acording to Pad1 input

//--------------------------------------------------------------------------
// Function: void main(void)
// Description: Default Function
// Parameters: none
// Returns: none
// Notes: N/A
//--------------------------------------------------------------------------

void main(void)
{
int i;

// Initalize the joypads
PadInit();

// Set PAL mode
SetVideoMode (MODE_PAL);    

// Initialise the drawing system
	GsInitGraph(SCREEN_WIDTH,SCREEN_HEIGHT,4,0,0);  // Set screen values
	GsDefDispBuff(0,0,0,SCREEN_HEIGHT);
	ResetGraph(0);
	
// Initialise the 1st ordering table
for (i=0;i<2;i++)
	{
	WorldOT[i].length = OT_LENGTH;
	WorldOT[i].org = OTTags[i];
	}


// Initalize Sprites 
InitRedGemSprite();		// Initalize Red Gem
InitYellowGemSprite();	// Initalize Yellow Gem
InitBlueGemSprite();	// Blah, blah, blah.....
InitGreenGemSprite();

// Initalize Grid
InitGrid();			// This blanks the Board

RandomizeGrid(12);	// Create a Board on which to play (1 Rows High) 

// Game Loop
while(GameState != STOP_GAME)
	{
	
	// Find out which buffer is being used
	activeBuff = GsGetActiveBuff();
	// Packet area
	GsSetWorkBase((PACKET *)GpuPacketArea[activeBuff]);
	// Clear the ordering table
	GsClearOt(0,0,&WorldOT[activeBuff]);
	
//---------------------------
// Drawing Commands go here !
//---------------------------
	
	
	
	if(GemDropState == GEM_NOT_DROPPING)	// If no Gem is dropping
		{
		CheckAllGrid();			// Update entire Board
		CheckForClearGrid();	// Check to see if board has been cleared
		CreateRandomGem();		// If not, create a Random Gem
		}
	
	if(GemDropState == GEM_DROPPING)	// If a Gem is dropping
		{
		DropRandomGem();		// Drop the Current Gem
		DrawGrid();				// Draw Board
		}
	
	
		
//---------------------------------
// Check For Pad Readings go here !
//---------------------------------

	Pad1 = PadRead(1);		// Read in input data from Pad 1 
	if (Pad1 != 0)          // if a key on pad 1 has been pressed...
		{
			SomePad1();  	// Find out which and act accordingly
		}
		

	// Wait for all drawing to finish
	DrawSync(0);
	// Wait for vertical blank interrupt
	VSync(0);
	// Switch display buffer & offscreen buffer
	GsSwapDispBuff();
	// Sort the ordering table
	GsSortClear(0,0,0,&WorldOT[activeBuff]);
	// Draw the objects registered in the Ordering table
	GsDrawOt(&WorldOT[activeBuff]);	
	
	} 
		

}// main()

//--------------------------------------------------------------------------
// Function: void SomePad1(void)
// Description: Executes commands acording to Pad1 input
// Parameters: none
// Returns: none
// Notes: N/A
//--------------------------------------------------------------------------

void SomePad1(void)
	{
	if(Pad1 & PADRIGHT)
		{
		MoveGemRight();		// Move the Gem which is dropping RIGHT
		}
		
	if(Pad1 & PADLEFT)
		{
		MoveGemLeft();		// Move the Gem which is dropping LEFT
		}
		
	if(Pad1 & PADDOWN)
		{
		
		}
	
	if(Pad1 & PADSTART && Pad1 & PADSELECT)
		{
		GameState = STOP_GAME;		// End Game
		}
	if(Pad1 & PADX)
		{
		
		}
	if(Pad1 & PADSQUARE)
		{
		
		}
	if(Pad1 & PADTRIANGLE)
		{
		InitGrid();			// Clears all board ( Remove this in Final Version )
		}
	if(Pad1 & PADCIRCLE)
		{
	
		}
	
}// SomePad1