#include <libps.h>
#include "pad.h"
#include "box.h"


#define PACKETMAX	(10000)
#define PACKETMAX2	(PACKETMAX*24)
#define OT_LENGTH	(14)	  

GsOT		WorldOT[2];
GsOT_TAG	WorldOT_TAG[2][1<<OT_LENGTH];   
PACKET		GpuOutputPacket[2][PACKETMAX2];
int		ActiveBuff;


GsRVIEW2	view;
int		projection_distance;
GsF_LIGHT	lights[3];


void		InitialiseView( void );
void		InitialiseLights( void );


void
main( void )
{
	u_long		pad_data = 0;
	RECT		rect;

	SetVideoMode( MODE_NTSC );
	GsInitGraph( 320, 240, GsOFSGPU|GsNONINTER, 1, 0 );
	GsDefDispBuff( 0, 0, 0, 240 );

	/* Clear the entire frame buffer to black */
	rect.x = 0;
	rect.y = 0;
	rect.w = 1024;
	rect.h = 512;
	ClearImage( &rect, 0, 0, 0 );
	DrawSync( 0 );

	PadInit();

	WorldOT[0].length = OT_LENGTH;
	WorldOT[1].length = OT_LENGTH;
	WorldOT[0].org = WorldOT_TAG[0];
	WorldOT[1].org = WorldOT_TAG[1];

	FntLoad( 320, 0 );
	FntOpen( -160+16, -120+16, 320-32, 240-32, 0, 512);

	GsInit3D();

	InitialiseView();
	InitialiseLights();

	box_init();

	do {
		ActiveBuff = GsGetActiveBuff();
		GsSetWorkBase( (PACKET*)GpuOutputPacket[ActiveBuff] );
		GsClearOt( 0, 0, &WorldOT[ActiveBuff] );

		box_execute( pad_data );

		GsSetRefView2( &view );

		box_draw();

		DrawSync( 0 );
		VSync( 0 );
		pad_data = PadRead();

		GsSwapDispBuff();
		GsSortClear( 55, 0, 0, &WorldOT[ActiveBuff] );
		GsDrawOt( &WorldOT[ActiveBuff] );

		FntPrint( "\n\n              3D Demo\n" );
		FntPrint( "         By: Ed Federmeyer\n" );

		FntFlush( -1 );

	} while ( !(pad_data & PADselect) );

	ResetGraph(3);
}




void
InitialiseView( void )
{
	projection_distance = 192;
	GsSetProjection( projection_distance);  

	view.vrx = 0; 
	view.vry = 0; 
	view.vrz = 0; 
	view.vpx = 0; 
	view.vpy = 0; 
	view.vpz = -500;
	view.rz = 0;
	view.super = WORLD;
	GsSetRefView2( &view );
}

void
InitialiseLights( void )
{
	lights[0].vx = ONE; lights[0].vy = 0; lights[0].vz = 0;
	lights[0].r = 128; lights[0].g = 128; lights[0].b = 128;
	GsSetFlatLight(0, &lights[0]);

	lights[1].vx = 0; lights[1].vy = ONE; lights[1].vz = 0;
	lights[1].r = 128; lights[1].g = 128; lights[1].b = 128;
	GsSetFlatLight(1, &lights[1]);

	lights[2].vx = 0; lights[2].vy = 0; lights[2].vz = ONE;
	lights[2].r = 128; lights[2].g = 128; lights[2].b = 128;
	GsSetFlatLight(2, &lights[2]);
 		
	GsSetAmbient(ONE/4, ONE/4, ONE/4);		// ambient lighting
}