/*
WORKING WITH SPRITES   PROGRAM TO DISPLAY SPRITE ON rainbow BACKGROUND
PETER BLACK 
13 OCT 1997
WRITTEN ON COEDWARRIOR 2
*/

#include <libps.h>
#include <__rts_info_t__.h>
#include "my_maths.h"
#include "padread.h"
#define OT_LENGTH  1
///////////////////////////////////
// EXTERNAL  VARIABLES
///////////////////////////////////

// OT VARIABLES	

GsOT WorldOT[2];
GsOT_TAG  OTTags[2][1<<OT_LENGTH];

// PRIMITIVE RELATED VARIABLES

PACKET GpuPacketArea[2][320*24];
int ActiveBuff;
// READ PadBuffs
volatile u_char *bb0,*bb1;
int screen_width;
int screen_height;
//////////////////////////////////
// function templates
//
void Pal();
void Ntsc();
void ClearOT();
void DrawOT();
///////////////////////////////////
//MAIN 
///////////////////////////////////
main()
	{
	GsLINE line;
	int a=0;
	int  r=255,g=255,b=255;
	int x=0,y=0;
    // heap starts after the main program on a 16-byte boundary
	unsigned long	lclHeapStart=(_end & 0xFFFFFFF0L)+0x10;

	// heap extends to the bottom of the stack.
	unsigned long lclHeapSize=((_stack_addr-(_stack_size<<10)) &
0xFFFFFFF0L)-lclHeapStart;

	InitHeap((unsigned long *)lclHeapStart, lclHeapSize);
	
	// SET DISPLAY SYSTEM
	Ntsc();
	GetPadBuf(&bb0,&bb1);  
	//OT SET UP
	WorldOT[0].length=OT_LENGTH;
	WorldOT[0].org   =OTTags[0];
	WorldOT[1].length=OT_LENGTH;
	WorldOT[1].org   =OTTags[1];
	/////////////////////   SET UP GsLINE
		line.attribute=0;
		
		
			// MAIN LOOP
	while (1)
		{
		
		////////// program
		ClearOT();
		/////////////#
		for(x=0,a=0;x<160;x++,a+=90)
			{
			line.x0=x;
			line.y0=0;
			line.x1=x;
			line.y1=screen_height;
			line.r=((CosFunc(a/160))*r)/1000;
			line.g=((SinFunc(a/160))*g)/1000;
			line.b=0;
			GsSortLine(&line,&WorldOT[ActiveBuff],0);
			}
		for(x=160,a=(90*160);x<320;x++,a-=90)
			{
			line.x0=x;
			line.y0=0;
			line.x1=x;
			line.y1=screen_height;
			line.r=0;
			line.g=((SinFunc(a/160))*g)/1000;
			line.b=((CosFunc(a/160))*b)/1000;
			GsSortLine(&line,&WorldOT[ActiveBuff],0);
			}
	
		DrawOT();
		
		}
	}
/////////////////////////////////////////////////////////////////////
// ClearOT()
void ClearOT()
	{
	ActiveBuff=GsGetActiveBuff();
	GsSetWorkBase((PACKET *)GpuPacketArea[ActiveBuff]);
	GsClearOt(0,0,&WorldOT[ActiveBuff]);
	}
////////////////////////////////////////////////////////////////////
// DrawOT()
void DrawOT()
	{
	DrawSync(0);
	VSync(0);
	GsSwapDispBuff();
	GsSortClear(0,0,0,&WorldOT[ActiveBuff]);		
	GsDrawOt(&WorldOT[ActiveBuff]);
	}
//////////////////////////////////////////////////////////////////
// Pal?? NTSC ??
//
void Ntsc()
	{
	SetVideoMode(MODE_NTSC);
	screen_width=320;
	screen_height=240;
	GsInitGraph(screen_width,screen_height,4,0,0);
	GsDefDispBuff(0,0,0,screen_height);
	}
void Pal()
	{
	SetVideoMode(MODE_PAL);
	screen_width=320;
	screen_height=256;
	GsInitGraph(screen_width,screen_height,4,0,0);
	GsDefDispBuff(0,0,0,screen_height);
	}