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

#ifndef MAX_OBJECTS
	#define MAX_OBJECTS 512
#endif

#ifndef TRUE
	#define TRUE 1
	#define FALSE 0
#endif

#define OT_LENGTH	1		/*  Ordering table number*/
#define PACKETMAX	2048		/* Max GPU packets */
#define PACKETMAX2	(PACKETMAX*24)
#define DUCK_ADDRESS 0x80090000 


//  Ordering table related variables
GsIMAGE screenTextureInfo;
GsOT		WorldOT[2];
GsOT_TAG	OTTags[2][1<<OT_LENGTH];
static PACKET packetArea[2][PACKETMAX2]; /* GPU PACKETS AREA */	


static u_long PadRead(void);

volatile u_char *bb0, *bb1;

void main(void) {
	int	i;
	int	activeBuff;
	u_long pad;
	GsSPRITE screen;
	RECT rect;
	u_long mainmem[320*128];

	SetVideoMode(MODE_PAL);
	GsInitGraph(320, 256, 4, 0, 0);
	GsDefDispBuff(0,0,0, 256);
	GsDISPENV.screen.h=256;
	
	printf("Press Select to quit\n");
	GetPadBuf(&bb0, &bb1);		// Get controller reception buffer

	// Ordering table information setting
	for (i = 0; i < 2; i++) {
		WorldOT[i].length = OT_LENGTH;
		WorldOT[i].org = OTTags[i];
	}
	GsClearOt(0,0,&WorldOT[0]);
	GsClearOt(0,0,&WorldOT[1]);

	rect.x = 0;
	rect.y = 0;
	rect.w = 320;
	rect.h = 256;
	LoadImage(&rect, (u_long *)(DUCK_ADDRESS+4));
	DrawSync(0);
	rect.y = 256;
	LoadImage(&rect, (u_long *)(DUCK_ADDRESS+4));
	DrawSync(0);
	
	screen.attribute = (1<<25)+(1<<30);
	screen.h = 256;
	screen.u = 0;
	screen.v = 0;
	screen.y = 128;
	screen.my = 128;
	screen.r = 128;
	screen.g = 127;
	screen.b = 127;
	screen.scalex = ONE;
	screen.scaley = ONE;
	screen.rotate = 0;

	GsSetOrign(0,0);
	
// Uncomment the following lines to copy frame buffers and
// eliminate flicker if using this routine in a game
//	rect.x = 0;
//	rect.y = (1-activeBuff)*256;
//	rect.w = 320;
//	rect.h = 256;
//	MoveImage(&rect, 0, activeBuff*256);
	
	do {
		pad = PadRead();
		
		activeBuff = GsGetActiveBuff();
		GsSetWorkBase((PACKET *)packetArea[activeBuff]);
		GsClearOt(0, 0, &WorldOT[activeBuff]);
	
		screen.scalex += 8;
		screen.scaley += 8;
		screen.rotate += 256;

		rect.x = 0;
		rect.y = activeBuff*256;
		rect.w = 320;
		rect.h = 256;
		StoreImage(&rect, mainmem);
		
		for (i=0; i<320*128; i++)
			mainmem[i] |= (1<<15) + (1<<31);
		
		rect.x = 640;
		rect.y = 0;
		rect.w = 320;
		rect.h = 256;
		LoadImage(&rect, mainmem);
		DrawSync(0);
		
		screen.x = 160;
		screen.w = 256;
		screen.mx = 160;
		screen.tpage = GetTPage(2,0,640,0);
		GsSortSprite(&screen, &WorldOT[activeBuff], 0);
	
		screen.x = 160;
		screen.w = 64;
		screen.mx = -96;
		screen.tpage = GetTPage(2,0,640+256,0);
		GsSortSprite(&screen, &WorldOT[activeBuff], 0);
		
   		DrawSync(0);
		VSync(0);
		GsSwapDispBuff();
		GsDrawOt(&WorldOT[activeBuff]);
		
	} while ((pad & PADLselect)==0);
}


u_long PadRead(void)
{
	return(~(*(bb0+3) | *(bb0+2) << 8 | *(bb1+3) << 16 | *(bb1+2) << 24));
}