1 files changed, 856 insertions, 0 deletions

diff --git a/main.cpp b/main.cpp
new file mode 100644
index 0000000..c33ed08
--- /dev/null
+++ b/main.cpp
@@ -0,0 +1,856 @@
+//Chrisoft Bullet Lab Remix HGE
+//Main Code
+//"Copyleft" Chrisoft 2013
+//#define Debug
+#include <hge.h>
+#include <hgefont.h>
+#include <hgegui.h>
+#include <hgedistort.h>
+#include <hgerect.h>
+#include <cmath>
+#include <ctime>
+#include <cstdlib>
+#include <cstdio>
+#ifdef WIN32
+#include <io.h>
+#include <direct.h>
+#include <Shlwapi.h>
+#include <Shellapi.h>
+#include <windows.h>
+#include <mmsystem.h>
+#endif
+#include "libcgh.h"
+#include "menuitem.h"
+#include "global.h"
+#include "music.h"
+#include "scoresystem.h"
+#include "towernbullet.h"
+#include "background.h"
+#include "levels.h"
+#include "scorec.h"
+#include "menus.h"
+static const char* MAIN_SRC_FN="main.cpp";
+#ifdef WIN32
+void Expand(char source[],char dist[])
+{
+	char cmd[255];
+	sprintf(cmd,"%s -F:* %s",source,dist);
+	int res=(int)ShellExecuteA(NULL,"open","expand.exe",cmd,NULL,SW_HIDE);
+	if (res<32) Error("Error while decompressing resources!\nCheck if expand.exe works correctly.");
+}
+void firststartup()
+{
+	if (MessageBoxA(NULL,"It seems that you are running BLR for the First time!\nLet's do some \
+basic settings first!\n\nEnable Low FPS Mode?","First Start Up",0x00000024)==6)
+		fpslvl=1;
+	else
+		fpslvl=0;
+	if (MessageBoxA(NULL,"Enable Fullscreen?","First Start Up",0x00000024)==6)
+		tfs=1;
+	else
+		tfs=0;
+	diffkey=false;
+	plrspd=3;plrslospd=3;clrbns=clrmode=0;
+	hge->System_Log("%s: Finishing first start up configuraion...",MAIN_SRC_FN);
+	Options_Writeback();
+	Score_Initailize();
+}
+#endif
+#ifndef WIN32
+void firststartup()
+{
+	fpslvl=0;
+	tfs=0;
+	diffkey=false;
+	plrspd=3;plrslospd=3;clrbns=clrmode=0;
+	hge->System_Log("%s: Finishing first start up configuraion...",MAIN_SRC_FN);
+	Options_Writeback();
+	Score_Initailize();
+}
+#endif
+void Player_Clear_Expand()
+{
+	if (LOWFPS)
+		clrrange+=13.6;
+	else
+		clrrange+=0.8;
+	for (int i=1;i<=bulcnt;++i)
+	{
+		double dis=GetDist(bullet[i].bulletpos,playerpos);
+		if (dis<=clrrange&&bullet[i].exist)
+		{
+			CreateBullet255(bullet[i].bulletpos.x,bullet[i].bulletpos.y,10);
+			bullet[i].exist=false;
+			bullet[i].bulletpos.x=bullet[i].bulletpos.y=0;
+			bullet[i].bulletdir.x=bullet[i].bulletdir.y=0;
+			bullet[i].dist=0;
+			bullet[i].bullettype=0;
+		}
+	}
+}
+void Player_Clear_Rotate()
+{
+	if (LOWFPS)
+		clrrad+=pi/450*17;
+	else
+		clrrad+=pi/450;
+	for (int i=1;i<=bulcnt;++i)
+	{
+		double dis=GetDist(bullet[i].bulletpos,playerpos);
+		double rad=atan2l(bullet[i].bulletpos.y-playerpos.y,bullet[i].bulletpos.x-playerpos.x);
+		hge->Gfx_RenderLine(playerpos.x+8,playerpos.y+8,playerpos.x+cos(clrrad)*clrmaxrange,playerpos.y+sin(clrrad)*clrmaxrange);
+		while (rad<0)rad+=2*pi;
+		if (dis<=clrmaxrange&&bullet[i].exist&&rad>normalizerad(clrrad)-pi/12&&rad<normalizerad(clrrad)+pi/12)
+		{
+			CreateBullet255(bullet[i].bulletpos.x,bullet[i].bulletpos.y,10);
+			bullet[i].exist=false;
+			bullet[i].bulletpos.x=bullet[i].bulletpos.y=0;
+			bullet[i].bulletdir.x=bullet[i].bulletdir.y=0;
+			bullet[i].dist=0;
+			bullet[i].bullettype=0;
+		}
+	}
+}
+void ProcessPlayer()
+{
+	if (!clrcircle)
+	{
+		clrcircle=new hgeSprite(SprSheet,63,71,193,193);
+		clrcircle->SetColor(0x30800000);
+		clrcircle->SetHotSpot(96.5f,96.5f);
+		clrcircle->SetBlendMode(BLEND_ALPHAADD);
+	}
+	if (playerLockX)
+	{
+		Lock.Setdata(0,vector2d(playerpos.x-1,0),vector2d(playerpos.x-1,600),0xC0FFFFFF);
+		for (int i=1;i<80;++i)
+		Lock.Setdata(i,vector2d(playerpos.x+1,0),vector2d(playerpos.x+1,600),0xC0FFFFFF);
+		Lock.Render();
+	}
+	if (playerLockY)
+	{
+		Lock.Setdata(0,vector2d(0,playerpos.y+5),vector2d(800,playerpos.y+5),0xC0FFFFFF);
+		for (int i=1;i<80;++i)
+		Lock.Setdata(i,vector2d(0,playerpos.y+7),vector2d(800,playerpos.y+7),0xC0FFFFFF);
+		Lock.Render();
+	}
+	playerspr->RenderEx(playerpos.x+8.4,playerpos.y+8.4,playerrot,0.7,0);
+	if (DisablePlayer)return;
+	if (!LOWFPS)
+		playerrot+=0.00174533;
+	else
+		playerrot+=0.00174533*17;
+	double realspd;
+	if (hge->Input_GetKeyState(HGEK_SHIFT))
+		if (LOWFPS)
+			realspd=playerslospeed*17;
+		else
+			realspd=playerslospeed;
+	else
+		if (LOWFPS)
+			realspd=playerspeed*17;
+		else
+			realspd=playerspeed;
+	if (hge->Input_GetKeyState(HGEK_LEFT)&&!playerLockX)
+	{
+		if (playerpos.x>10)
+			playerpos.x-=realspd;
+	}
+	if (hge->Input_GetKeyState(HGEK_RIGHT)&&!playerLockX)
+	{
+		if (playerpos.x<770)
+			playerpos.x+=realspd;
+	}
+	if (hge->Input_GetKeyState(HGEK_UP)&&!playerLockY)
+	{
+		if (playerpos.y>10)
+			playerpos.y-=realspd;
+	}
+	if (hge->Input_GetKeyState(HGEK_DOWN)&&!playerLockY)
+	{
+		if (playerpos.y<570)
+			playerpos.y+=realspd;
+	}
+	if (!clrmode)
+	{
+		if (hge->Input_GetKeyStateEx(HGEK_Z)==HGEKST_HIT&&clrrange==0/*&&clrtime+clrbns*/&&!diffkey)
+		{
+			//Player_Clear_Expand();--clrtime;++clrusg;
+			clrmaxrange=0;clrind=0;
+		}
+		if (hge->Input_GetKeyStateEx(HGEK_X)==HGEKST_HIT&&clrrange==0/*&&clrtime+clrbns*/&&diffkey)
+		{
+			//Player_Clear_Expand();--clrtime;++clrusg;
+			clrmaxrange=0;clrind=0;
+		}
+		if (hge->Input_GetKeyStateEx(HGEK_Z)==HGEKST_KEEP&&clrrange==0/*&&clrtime+clrbns*/&&!diffkey)
+		{
+			//Player_Clear_Expand();--clrtime;++clrusg;
+			if (clrmaxrange<=400)
+			{
+				if (LOWFPS)clrmaxrange+=1.6;else clrmaxrange+=0.1;
+			}
+			if (!LOWFPS)clrind+=0.001*pi;else clrind+=0.016*pi;
+			clrcircle->RenderEx(playerpos.x+7.2,playerpos.y+7.2,clrind,2*clrmaxrange/193.0f);
+		}
+		if (hge->Input_GetKeyStateEx(HGEK_X)==HGEKST_KEEP&&clrrange==0/*&&clrtime+clrbns*/&&diffkey)
+		{
+			//Player_Clear_Expand();--clrtime;++clrusg;
+			if (clrmaxrange<=400)
+			{
+				if (LOWFPS)clrmaxrange+=1.6;else clrmaxrange+=0.1;
+			}
+			if (!LOWFPS)clrind+=0.001*pi;else clrind+=0.016*pi;
+			clrcircle->RenderEx(playerpos.x+7.2,playerpos.y+7.2,clrind,2*clrmaxrange/193.0f);
+		}
+		if (hge->Input_GetKeyStateEx(HGEK_Z)==HGEKST_RELEASE&&clrrange==0/*&&clrtime+clrbns*/&&!diffkey/*&&clrmaxrange>50*/)
+		{
+			if (clrmaxrange<=50)
+			{
+				if (clrtime+clrbns){--clrtime;clrmaxrange=350;Player_Clear_Expand();++clrusg;}
+			}
+			else
+			{
+				Player_Clear_Expand();++clrusg;
+			}
+		}
+		if (hge->Input_GetKeyStateEx(HGEK_X)==HGEKST_RELEASE&&clrrange==0/*&&clrtime+clrbns*/&&diffkey/*&&clrmaxrange>50*/)
+		{
+			if (clrmaxrange<=50)
+			{
+				if (clrtime+clrbns){--clrtime;clrmaxrange=350;Player_Clear_Expand();++clrusg;}
+			}
+			else
+			{
+				Player_Clear_Expand();++clrusg;
+			}
+		}
+		if (clrrange!=0)Player_Clear_Expand(),
+			clrcircle->RenderEx(playerpos.x+7.2,playerpos.y+7.2,clrind,2*(clrmaxrange-clrrange)/193.0f),
+			clrind+=(LOWFPS?0.016*pi:0.001*pi);
+		if (clrrange>=clrmaxrange)clrrange=0;
+	}
+	else
+	{
+		if (hge->Input_GetKeyStateEx(HGEK_Z)==HGEKST_HIT&&clrrad-pi/2<1e-7&&clrtime+clrbns&&!diffkey)
+		{
+			//Player_Clear_Rotate();--clrtime;++clrusg;
+			clrmaxrange=0;clrind=0;
+		}
+		if (hge->Input_GetKeyStateEx(HGEK_X)==HGEKST_HIT&&clrrad-pi/2<1e-7&&clrtime+clrbns&&diffkey)
+		{
+			//Player_Clear_Rotate();--clrtime;++clrusg;
+			clrmaxrange=0;clrind=0;
+		}
+		if (hge->Input_GetKeyStateEx(HGEK_Z)==HGEKST_KEEP&&clrrange==0&&clrtime+clrbns&&!diffkey)
+		{
+			//Player_Clear_Expand();--clrtime;++clrusg;
+			if (clrmaxrange<=400)
+			{
+				if (LOWFPS)clrmaxrange+=1.6;else clrmaxrange+=0.1;
+			}
+			if (!LOWFPS)clrind+=0.001*pi;else clrind+=0.016*pi;
+			clrcircle->RenderEx(playerpos.x+7.2,playerpos.y+7.2,clrind,2*clrmaxrange/193.0f);
+		}
+		if (hge->Input_GetKeyStateEx(HGEK_X)==HGEKST_KEEP&&clrrange==0&&clrtime+clrbns&&diffkey)
+		{
+			//Player_Clear_Expand();--clrtime;++clrusg;
+			if (clrmaxrange<=400)
+			{
+				if (LOWFPS)clrmaxrange+=1.6;else clrmaxrange+=0.1;
+			}
+			if (!LOWFPS)clrind+=0.001*pi;else clrind+=0.016*pi;
+			clrcircle->RenderEx(playerpos.x+7.2,playerpos.y+7.2,clrind,2*clrmaxrange/193.0f);
+		}
+		if (hge->Input_GetKeyStateEx(HGEK_Z)==HGEKST_RELEASE&&clrrad-pi/2<1e-7&&clrtime+clrbns&&!diffkey&&clrmaxrange>50)
+		{
+			Player_Clear_Rotate();--clrtime;++clrusg;
+		}
+		if (hge->Input_GetKeyStateEx(HGEK_X)==HGEKST_RELEASE&&clrrad-pi/2<1e-7&&clrtime+clrbns&&diffkey&&clrmaxrange>50)
+		{
+			Player_Clear_Rotate();--clrtime;++clrusg;
+		}
+		if (clrrad-pi/2>1e-7)Player_Clear_Rotate(),
+			clrcircle->RenderEx(playerpos.x+7.2,playerpos.y+7.2,clrind,(5*pi/2.0f-clrrad)/(2*pi)),
+			clrind+=(LOWFPS?0.016*pi:0.001*pi);
+		if (5*pi/2-clrrad<1e-7)clrrad=pi/2;
+	}
+}
+void RefreshScore()
+{
+	if (DisablePlayer)return;
+	int multp=1;
+	if (mode==2)multp=5;
+	if (LOWFPS)
+		score+=multp*16;
+	else
+		score+=multp;
+	score+=100*shots;
+	score-=scminus;
+	score+=2000*dsmc;
+	++frms;
+	averfps=(averfps*(frms-1)+hge->Timer_GetFPS())/(double)frms;
+}
+void CallLevels()
+{
+	//Use this to call level procedures.
+	//Don't use this to call the first level!
+	//if (level<6)clrtime=0;
+	if ((mode==4||mode<=2)&&coll!=0){DeathGUI_Init();return;}
+	if (!IfCallLevel) return;
+	//Check Complete
+	if (level==1&&part==1)Level1Part1();
+	if (level==1&&part==2)Level1Part2();
+	if (level==1&&part==3)Level1Part3();
+	if (level==1&&part==4)Level1Part4();
+	if (level==2&&part==0)Level2Part0();
+	if (level==2&&part==1)Level2Part1();
+	if (level==2&&part==2)Level2Part2();
+	if (level==2&&part==3)Level2Part3();
+	if (level==2&&part==4)Level2Part4();
+	if (level==2&&part==5)Level2Part5();
+	if (level==2&&part==6)Level2Part6();
+	if (level==2&&part==7)Level2Part7();
+	if (level==2&&part==8)Level2Part8();
+	if (level==2&&part==9)Level2Part9();
+	if (level==3&&part==0)Level3Part0();
+	if (level==3&&part==1)Level3Part1();
+	if (level==3&&part==2)Level3Part2();
+	if (level==3&&part==3)Level3Part3();
+	if (level==3&&part==4)Level3Part4();
+	if (level==3&&part==5)Level3Part5();
+	if (level==3&&part==6)Level3Part6();
+	if (level==4&&part==0)Level4Part0();
+	if (level==4&&part==1)Level4Part1();
+	if (level==4&&part==2)Level4Part2();
+	if (level==4&&part==3)Level4Part3();
+	if (level==4&&part==4)Level4Part4();
+	if (level==4&&part==5)Level4Part5();
+	if (level==4&&part==6)Level4Part6();
+	if (level==4&&part==7)Level4Part7();
+	if (level==4&&part==8)Level4Part8();
+	if (level==4&&part==9)Level4Part9();
+	if (level==4&&part==10)Level4Part10();
+	if (level==4&&part==11)Level4Part11();
+	if (level==4&&part==12)Level4Part12();
+	if (level==4&&part==13)Level4Part13();
+	if (level==4&&part==14)Level4Part14();
+	if (level==4&&part==15)Level4Part15();
+	if (level==4&&part==16)Level4Part16();
+	if (level==4&&part==17)Level4Part17();
+	if (level==4&&part==18)Level4Part18();
+	if (level==4&&part==19)Level4Part19();
+	if (level==4&&part==20)Level4Part20();
+	if (level==4&&part==21)Level4Part21();
+	if (level==4&&part==22)Level4Part22();
+	if (level==4&&part==23)Level4Part23();
+	if (level==4&&part==24)Level4Part24();
+	if (level==4&&part==25)Level4Part25();
+	if (level==5&&part==0)Level5Part0();
+	if (level==5&&part==1)Level5Part1();
+	if (level==5&&part==2)Level5Part2();
+	if (level==5&&part==3)Level5Part3();
+	if (level==5&&part==4)Level5Part4();
+	if (level==5&&part==5)Level5Part5();
+	if (level==5&&part==6)Level5Part6();
+	if (level==5&&part==7)Level5Part7();
+	if (level==5&&part==8)Level5Part8();
+	if (level==5&&part==9)Level5Part9();
+	if (level==5&&part==10)Level5Part10();
+	if (level==5&&part==11)Level5Part11();
+	if (level==5&&part==12)Level5Part12();
+	if (level==5&&part==13)Level5Part13();
+	if (level==5&&part==14)Level5Part14();
+	if (level==5&&part==15)Level5Part15();
+	if (level==5&&part==16)Level5Part16();
+	if (level==5&&part==17)Level5Part17();
+	if (level==5&&part==18)Level5Part18();
+	if (level==5&&part==19)Level5Part19();
+	if (level==5&&part==20)Level5Part20();
+	if (level==5&&part==21)Level5Part21();
+	if (level==5&&part==22)Level5Part22();
+	if (level==6&&part==0)Level6Part0();
+	if (level==6&&part==1)Level6Part1();
+	if (level==6&&part==2)Level6Part2();
+	if (level==6&&part==3)Level6Part3();
+	if (level==6&&part==4)Level6Part4();
+	if (level==6&&part==5)Level6Part5();
+	if (level==6&&part==6)Level6Part6();
+	if (level==6&&part==7)Level6Part7();
+	if (level==6&&part==8)Level6Part8();
+	if (level==6&&part==9)Level6Part9();
+	if (level==6&&part==10)Level6Part10();
+	if (level==6&&part==11)Level6Part11();
+	if (level==6&&part==12)Level6Part12();
+	if (level==6&&part==13)Level6Part13();
+	if (level==6&&part==14)Level6Part14();
+	if (level==6&&part==15)Level6Part15();
+	if (level==6&&part==16)Level6Part16();
+	if (level==6&&part==17)Level6Part17();
+	if (level==6&&part==18)Level6Part18();
+	if (level==6&&part==19)Level6Part19();
+	if (level==6&&part==20)Level6Part20();
+	if (level==6&&part==21)Level6Part21();
+	if (level==6&&part==22)Level6Part22();
+	if (level==6&&part==23)Level6Part23();
+	if (level==6&&part==24)Level6Part24();
+	if (level==6&&part==25)Level6Part25();
+	if (level==6&&part==26)Level6Part26();
+	if (level==6&&part==27)Level6Part27();
+	if (level==6&&part==28)Level6Part28();
+	if (level==6&&part==29)Level6Part29();
+	if (level==6&&part==30)Level6Part30();
+	if (level==6&&part==31)Level6Part999999999();
+	if (level==7&&part==0)Level7Part0();
+	if (level==7&&part==1)Level7Part1();
+	if (level==7&&part==2)Level7Part2();
+	if (level==7&&part==3)Level7Part3();
+	if (level==7&&part==4)Level7Part4();
+	if (level==7&&part==5)Level7Part5();
+	if (level==7&&part==6)Level7Part6();
+	/*if (level==1&&part==3)Level1Part3();
+	if (level==1&&part==4)Level1Part4();
+	if (level==1&&part==5)Level1Part5();
+	if (level==1&&part==6)Level1Part6();
+	if (level==1&&part==7)Level1Part7();
+	if (level==1&&part==8)Level1Part8();
+	if (level==1&&part==9)Level1Part9();
+	if (level==1&&part==10)Level1Part10();
+	if (level==1&&part==11)Level1Part11();
+	if (level==1&&part==12)Level1Part12();
+	if (level==1&&part==13)Level1Part13();
+	if (level==1&&part==14)Level1Part14();
+	if (level==1&&part==15)Level1Part15();
+	if (level==1&&part==16)Level1Part16();
+	if (level==1&&part==17)Level1Part17();
+	if (level==1&&part==18)Level1Part18();
+	if (level==1&&part==19)Level1Part19();
+	if (level==1&&part==20)Level1Part20();
+	if (level==1&&part==21)Level1Part21();
+	if (level==1&&part==22)Level1Part22();
+	if (level==1&&part==23)Level1Part23();
+	if (level==1&&part==24)Level1Part24();
+	if (level==1&&part==25)Level1Part25();
+	if (level==1&&part==26)Level1Part26();
+	if (level==1&&part==27)Level1Part27();
+	if (level==1&&part==28)Level1Part28();*/
+	if (level==1&&part==5)level=2,part=0;
+	if (level==2&&part==10)level=3,part=0;
+	if (level==3&&part==7)level=4,part=0;
+	if (level==4&&part==26)level=5,part=0;
+	if (level==5&&part==23)level=6,part=0;
+}
+bool ProcessCurCred()
+{
+	CreditsRail->RenderEx(400,300,0,4,1);
+	Credits->Render(creditfly,300);
+	int times=1;if (LOWFPS)times=17;
+	if (credstop)credbrk+=hge->Timer_GetDelta();
+	if (credbrk>=4.5&&!creddone)creddone=true,credstop=false,creditacc=0,credbrk=0;
+	if (!credstop)for (int i=1;i<=times;++i)creditfly-=creditacc;
+	if (creditfly<-300)return true;
+	for (int i=1;i<=times;++i)if (creditacc<2)creditacc+=0.015;
+	if (abs(creditfly-400)<5&&!creddone&&!credstop)credstop=true;
+	return false;
+}
+void AboutScene()
+{
+	if (ProcessCurCred())
+		creditfly=1200,creditacc=0,credstop=creddone=false,++creditsp,
+		Credits=new hgeSprite(TexCredits,0,creditsp*200,600,200),
+		Credits->SetHotSpot(300,100);
+	if(hge->Input_GetKeyState(HGEK_Z)||creditsp>11)
+	{
+		Current_Position=0;
+		gui->SetFocus(1);
+		Music_Stop();
+		gui->Enter();
+	}
+}
+bool Foclost()
+{
+	if (Current_Position==1)PauseGUI_Init();
+	return false;
+}
+bool FrameFunc()
+{
+	float dt=hge->Timer_GetDelta();
+	static float t=0.0f;
+	float tx,ty;
+	int id;
+	static int lastid=0;
+	if (hge->Input_GetKeyState(HGEK_ESCAPE)&&Current_Position==0) { lastid=5; gui->Leave(); }
+	if (Current_Position==1&&hge->Input_GetKeyState(HGEK_ESCAPE))PauseGUI_Init();
+	if (Current_Position==0)
+	{
+		id=gui->Update(dt);
+		if(id == -1)
+		{
+			switch(lastid)
+			{
+				case 1:Current_Position=3; StartGUI_Init();gui->Leave();break;
+				case 2:HighScoreGUI_Init();break;
+				case 3:OptionsGUI_Init();break;
+				case 4:
+					Credits=new hgeSprite(TexCredits,0,0,600,200);
+					Credits->SetHotSpot(300,100);
+					CreditsRail=new hgeSprite(TexCredits,0,2400,600,200);
+					CreditsRail->SetHotSpot(300,100);
+					creditsp=0;
+					Music_Init("./Resources/Music/BLR2_TR09.ogg");
+					lpst=lped=0;
+					Music_Play();
+					creditfly=1200;creditacc=0;credstop=creddone=false;
+					Current_Position=4;
+					AboutScene();
+					lastid=0;
+					break;
+				case 5: return true;
+			}
+		}
+		else if(id) { lastid=id; gui->Leave(); }
+	}
+	if (Current_Position==3)StartGUI_FrameFnk();
+	if (Current_Position==5)DeathGUI_FrameFnk();
+	if (Current_Position==6)CompleteGUI_FrameFnk();
+	if (Current_Position==7)NewHighScoreGUI_FrameFnk();
+	if (Current_Position==8)HighScoreGUI_FrameFnk();
+	if (Current_Position==9)HSViewGUI_FrameFnk();
+	if (Current_Position==10)HSDetGUI_FrameFnk();
+	if (Current_Position==11)PauseGUI_FrameFnk();
+	if (Current_Position==12)BkTTitleGUI_FrameFnk();
+	if (Current_Position==13)OptionsGUI_FrameFnk();
+	if (Current_Position==14)PlayerProfGUI_FrameFnk();
+	// Here we update our background animation
+	t+=dt;
+	tx=50*cosf(t/60);
+	ty=50*sinf(t/60);
+	quad.v[0].tx=tx;        quad.v[0].ty=ty;
+	quad.v[1].tx=tx+800/64; quad.v[1].ty=ty;
+	quad.v[2].tx=tx+800/64; quad.v[2].ty=ty+600/64;
+	quad.v[3].tx=tx;        quad.v[3].ty=ty+600/64;
+	//Rendering***********************************************************************************
+	//Super Spliter!*****Super Spliter!*****Super Spliter!*****Super Spliter!*****Super Spliter!**
+	//******Super Spliter!*****Super Spliter!*****Super Spliter!*****Super Spliter!***************
+	hge->Gfx_BeginScene();
+	for(int i=0;i<4;i++)
+	{
+		quad.v[i].z=0.5f;
+		quad.v[i].col=DBGColor;
+	}
+	hge->Gfx_Clear(DBGColor);
+	hge->Gfx_RenderQuad(&quad);
+	if (Current_Position==0||Current_Position==3||Current_Position==8||
+		Current_Position==9||Current_Position==10||Current_Position==13||Current_Position==14)
+	{
+		titlespr->Render(160,0);
+		if (Current_Position==0)
+			gui->Render();
+	}
+	if (Current_Position==3)
+		StartGUI->Render();
+	if (Current_Position==1||Current_Position==2||Current_Position==5||Current_Position==11||Current_Position==12)
+	{
+	//If we are at the main scene or tip scene(which towers and bullets should still appear..)
+	//Render towers, bullets and player.
+		if (Leaves.IsActive())Leaves.Update();
+		//Sky.Update();
+		if (LE_Active||Head){if (!Head)Tail=Head=new Leaf_Anim(),Head->init(990);Head->Process();}
+		shots=0;
+		dsmc=0;
+		scminus=0;
+		Mult_FrameFunc();
+		Music_Update();
+		ProcessTower1();
+		ProcessTower2();
+		ProcessTower3();
+		ProcessTower4();
+		ProcessTower5();
+		ProcessTower6();
+		ProcessTower7();
+		ProcessTower8();
+		ProcessTower9();
+		ProcessLaser();
+		for (int i=1;i<=bulcnt;++i)
+		{
+			switch (bullet[i].bullettype)
+			{
+				case 1:ProcessBullet1(i);break;
+				case 2:ProcessBullet2(i);break;
+				//No ProcessBullet3() needed
+				case 4:ProcessBullet4(i);break;
+				case 5:ProcessBullet5(i);break;
+				case 6:ProcessBullet6(i);break;
+				case 7:ProcessBullet7(i);break;
+				case 8:ProcessBullet8(i);break;
+				case 9:ProcessBullet9(i);break;
+				case 255:ProcessBullet255(i);break;
+			}
+		}
+		for (int i=1;i<=nonamecnt;++i)if (noname[i].Exist())noname[i].Process();
+		ProcessPlayer();
+		SCEffect_Process();
+		RefreshScore();
+		{
+			if (ATarg.visible)ATarg.TargFollowPlayer(),ATarg.TargRender();
+			//if (ATarg.isonshow)ATarg.TargShowProc();
+			//if (ATarg.isonhide)ATarg.TargHideProc();
+		}
+		{
+			if (BTarg.visible)BTarg.TargRender();
+			//if (BTarg.isonshow)BTarg.TargShowProc();
+			//if (BTarg.isonhide)BTarg.TargHideProc();
+		}
+		if (!DisablePlayer)
+		--frameleft;//If we are at the tip scene, disable the player movement.
+		if (!LOWFPS)
+		{
+			if (playerspeed<playerfulspd)playerspeed+=playerfulspd/400;
+			if (playerslospeed<playerfulslospd)playerslospeed+=playerfulslospd/400;
+		}
+		else
+		{
+			if (playerspeed<playerfulspd)playerspeed+=playerfulspd/25;
+			if (playerslospeed<playerfulslospd)playerslospeed+=playerfulslospd/25;
+		}
+	}
+	if (frameleft==0&&Current_Position==1)
+	{
+		IfCallLevel=true;
+		++part;
+		IfShowTip=true;
+	}
+	if (Current_Position==1)
+	{
+		CallLevels();
+	}
+	if (shots)
+		hge->Effect_Play(snd);
+	if (Current_Position==2)
+	{
+		ShowTip(lasttip);
+		//if (Complete)
+		//	TipFont->printf(200,200,HGETEXT_LEFT,"Score");
+	}
+	if (Current_Position==4)AboutScene();
+	if (Current_Position==5)DeathGUI->Render();
+	if (Current_Position==6)CompleteGUI->Render();
+	if (Current_Position==7)NewHighScoreGUI_Render();
+	if (Current_Position==8)HighScoreGUI->Render();
+	if (Current_Position==9)HSViewGUI->Render();
+	if (Current_Position==10)HSDetailGUI->Render();
+	if (Current_Position==11)PauseGUI->Render();
+	if (Current_Position==12)BkTTitleGUI->Render();
+	if (Current_Position==13)OptionsGUI->Render();
+	if (Current_Position==14)PlayerProfGUI->Render();
+	fnt->SetColor(0xFFFFFFFF);
+	fnt->printf(680, 575, HGETEXT_LEFT, "FPS: %d", hge->Timer_GetFPS());
+	if (Current_Position==1||Current_Position==2)
+	{
+		fnt->printf(670,560, HGETEXT_LEFT, "AF: %.2f", averfps);
+		if (playerpos.x<220&&playerpos.y<200)
+		{
+			if (!LOWFPS&&infofade>=0x33)--infofade;
+			if (LOWFPS&&infofade>0x33)infofade-=16;
+		}
+		else
+		{
+			if (!LOWFPS&&infofade<0xFF)++infofade;
+			if (LOWFPS&&infofade<=0xEF)infofade+=16;
+		}
+		fnt->SetColor(SETA(0xFFFFFF,infofade));
+		fnt->printf(5, 0, HGETEXT_LEFT, "Frames to go: %d",frameleft);
+#ifdef WIN32
+		fnt->printf(5, 25, HGETEXT_LEFT, "Score: %I64d",score);
+#endif
+#ifndef WIN32
+		fnt->printf(5, 25, HGETEXT_LEFT, "Score: %lld",score);
+#endif
+		fnt->printf(5, 50, HGETEXT_LEFT, "Level %d",level);
+		if (mode==3)
+			fnt->printf(5, 75, HGETEXT_LEFT, "Collisions: %d",coll);
+		else
+			fnt->printf(5, 75, HGETEXT_LEFT, "Restarts: %d",restarts);
+		fnt->printf(5, 100, HGETEXT_LEFT, "Semi-Collisions: %d",semicoll);
+		fnt->printf(5, 125, HGETEXT_LEFT, "Clear Range Left: %d",clrtime+clrbns);
+		fnt->printf(5, 150, HGETEXT_LEFT, "Multiplier: %d",mult);
+	}
+	hge->Gfx_EndScene();
+	return false;
+}
+#ifdef WIN32
+int WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+#endif
+#ifndef WIN32
+int main()
+#endif
+{
+	srand(time(NULL));
+	hge=hgeCreate(HGE_VERSION);
+	hge->System_SetState(HGE_LOGFILE, "BLRLOG.txt");
+	hge->System_Log("%s: Bullet Lab Remix Log File",MAIN_SRC_FN);
+#ifdef WIN32
+	if (_mkdir("./Resources")!=0||_mkdir("./Resources/Music")!=0)
+		Error("Cannot decompress resources!\nDetailed Information: An error occured while creating folder.\n\nTry restarting the game.");
+	hge->System_Log("Folders created successfully.");
+	/*Expand("./Resources/bg.lz","./Resources/bg.png");
+	Expand("./Resources/blnsns.lz","./Resources/blnsns.png");
+	Expand("./Resources/charmap.lz","./Resources/charmap.fnt");
+	Expand("./Resources/ss.lz","./Resources/ss.png");
+	Expand("./Resources/title.lz","./Resources/title.png");
+	Expand("./Resources/credits.lz","./Resources/credits.png");
+	Expand("./Resources/b_leaves.lz","./Resources/b_leaves.png");
+	Expand("./Resources/e_leaf.lz","./Resources/e_leaf.png");
+	Expand("./Resources/tap.lz","./Resources/tap.ogg");*/
+	Expand("BLRData.dtp","Resources");
+	Expand("BLRMusic.dtp","Resources/Music");
+	hge->System_Log("Resources decompressed successfully.");
+#endif
+	hge->System_SetState(HGE_FRAMEFUNC, FrameFunc);
+	hge->System_SetState(HGE_FOCUSLOSTFUNC, Foclost);
+	hge->System_SetState(HGE_DONTSUSPEND, true);
+	hge->System_SetState(HGE_TITLE, "Bullet Lab Remix");
+	hge->System_SetState(HGE_WINDOWED, true);
+	hge->System_SetState(HGE_SCREENWIDTH, 800);
+	hge->System_SetState(HGE_SCREENHEIGHT, 600);
+	hge->System_SetState(HGE_SCREENBPP, 32);
+#ifdef WIN32
+	hge->System_SetState(HGE_ICON, MAKEINTRESOURCE(1));
+#endif
+	hge->System_SetState(HGE_FPS,0);
+	if((access("blr.cfg",0))==-1)
+	{
+		hge->System_Log("%s: Config file not found. Calling first startup.",MAIN_SRC_FN);
+		firststartup();
+	}
+	hge->System_Log("%s: Loading config file",MAIN_SRC_FN);
+	freopen("blr.cfg","r",stdin);
+	char tch=getchar();
+	if (tch!=';'){}
+	tch=getchar();
+	if (tch!='C'){}
+	tch=getchar();
+	if (tch!='B'){}
+	tch=getchar();
+	if (tch!='L'){}
+	fpslvl=0;
+	tch=getchar();//LOWFPS
+	if (tch==1)
+	{
+		LOWFPS=true;
+		TenSeconds=600;
+		TwentySeconds=1200;
+		ThirtySeconds=1800;
+		AMinute=3600;
+		hge->System_SetState(HGE_FPS,61);
+		fpslvl=1;
+	}
+	tch=getchar();//FULLSCRREEN
+	tfs=false;
+	if (tch==1)
+	hge->System_SetState(HGE_WINDOWED, false),tfs=true;
+	tch=getchar();//LockFPS
+	if (tch==1&&!LOWFPS)
+	{
+		hge->System_SetState(HGE_FPS,1000);
+		fpslvl=2;
+	}
+	tch=getchar();//Key binding
+	if (tch==1)diffkey=true;
+	plrspd=tch=getchar();
+	playerfulspd=(tch)*0.05f;
+	playerspeed=playerfulspd;
+	plrslospd=tch=getchar();
+	playerfulslospd=(tch)*0.0125f;
+	playerslospeed=playerfulslospd;
+	tch=getchar();
+	clrbns=tch;
+	tch=getchar();
+	clrmode=tch;
+	fclose(stdin);
+	if (AP_Update(plrspd,plrslospd,clrbns)>10000)Error("Invalid configuration!\nDelete blr.cfg and run the game again!");
+	hge->System_Log("%s: Loading Score file",MAIN_SRC_FN);
+	Score_Init();
+#ifdef Debug
+	playerspeed=playerfulspd=0.2;
+	playerslospeed=playerfulslospd=0.05;
+#endif
+	Current_Position=0;//We are at the main menu at first
+	LE_Active=false;
+	if(hge->System_Initiate())
+	{
+		//nonamecnt=1;
+		quad.tex=hge->Texture_Load("./Resources/bg.png");
+		SprSheet=hge->Texture_Load("./Resources/ss.png");
+		TLeaf=hge->Texture_Load("./Resources/e_leaf.png");
+		TSflake=hge->Texture_Load("./Resources/e_sflake.png");
+		TexTitle=hge->Texture_Load("./Resources/title.png");
+		TexCredits=hge->Texture_Load("./Resources/credits.png");
+		snd=hge->Effect_Load("./Resources/tap.ogg");
+		titlespr=new hgeSprite(TexTitle,0,0,640,320);
+		playerspr=new hgeSprite(SprSheet,0,24,24,24);
+		playerspr->SetHotSpot(12,12);//Set player anchor
+		playerspr->SetColor(0xC0FFFFFF);
+		ATarg.Init(-0.001,vector2d(400,300));
+		BTarg.Init(-0.001,vector2d(400,300));
+		BTarg.targspr->SetColor(0xFFC00000);
+		if(!quad.tex||!SprSheet||!TexTitle||!TexCredits)
+		{
+			Error("Error Loading Resources!",true);
+		}
+		quad.blend=BLEND_ALPHABLEND | BLEND_COLORMUL | BLEND_NOZWRITE;
+		DBGColor=0xFF888820;
+		for(int i=0;i<4;i++)
+		{
+			quad.v[i].z=0.5f;
+			quad.v[i].col=DBGColor;
+		}
+		quad.v[0].x=0; quad.v[0].y=0;
+		quad.v[1].x=800; quad.v[1].y=0;
+		quad.v[2].x=800; quad.v[2].y=600;
+		quad.v[3].x=0; quad.v[3].y=600;
+		fnt=new hgeFont("./Resources/charmap.fnt");
+		TipFont=new hgeFont("./Resources/charmap.fnt");
+		MultFnt=new hgeFont("./Resources/charmap.fnt");
+		spr=new hgeSprite(SprSheet,216,0,24,24);
+		gui=new hgeGUI();
+		gui->AddCtrl(new hgeGUIMenuItem(1,fnt,snd,400,200,0.0f,"Start"));
+		gui->AddCtrl(new hgeGUIMenuItem(2,fnt,snd,400,240,0.1f,"Highscores && Records"));
+		gui->AddCtrl(new hgeGUIMenuItem(3,fnt,snd,400,280,0.2f,"Options"));
+		gui->AddCtrl(new hgeGUIMenuItem(4,fnt,snd,400,320,0.3f,"About"));
+		gui->AddCtrl(new hgeGUIMenuItem(5,fnt,snd,400,360,0.4f,"Exit"));
+		gui->SetNavMode(HGEGUI_UPDOWN | HGEGUI_CYCLED);
+		gui->SetCursor(spr);
+		gui->SetFocus(1);
+		gui->Enter();
+		if (LOWFPS)
+			hge->System_Log("%s: Low FPS Mode Enabled.\n",MAIN_SRC_FN);
+		hge->System_Start();
+		delete gui;
+		delete fnt;
+		delete spr;
+		//hge->Effect_Free(snd);
+		hge->Texture_Free(tex);
+		hge->Texture_Free(quad.tex);
+	}
+	// Clean up and shutdown
+	hge->System_Shutdown();
+	hge->Release();
+#ifdef WIN32
+	remove("./Resources/bg.png");
+	remove("./Resources/blnsns.png");
+	remove("./Resources/charmap.fnt");
+	remove("./Resources/ss.png");
+	remove("./Resources/title.png");
+	remove("./Resources/credits.png");
+	remove("./Resources/b_leaves.png");
+	remove("./Resources/e_leaf.png");
+	remove("./Resources/tap.ogg");
+	remove("./Resources/Music/BLR2_TR01.ogg");
+	remove("./Resources/Music/BLR2_TR07.ogg");
+	remove("./Resources/Music/BLR2_TR09.ogg");
+	_rmdir("./Resources/Music");
+	_rmdir("./Resources");
+#endif
+	return 0;
+}