1 files changed, 113 insertions, 0 deletions
diff --git a/archive/blr2/src/libcghEx.cpp b/archive/blr2/src/libcghEx.cpp
new file mode 100644
index 0000000..a8fa698
--- /dev/null
+++ b/archive/blr2/src/libcghEx.cpp
@@ -0,0 +1,113 @@
+// Chrisoft Bullet Lab Remix HGE -*- C++ -*-
+// Chrisoft Game Helper Extras implementations
+// Copyright Chrisoft 2014
+#include "libcgh.h"
+#include <cmath>
+#include <cstring>
+//static const char* LIBCGH_SRC_FN="libcghEx.cpp";
+
+void RandomEngine::SetSeed(unsigned int seed){cseed=seed;}
+int RandomEngine::NextInt(int min,int max)
+{
+	if (min>max){int t=min;min=max;max=t;}
+	cseed*=214013;cseed+=2531011;
+	return min+(cseed^cseed>>15)%(max-min+1);
+}
+double RandomEngine::NextDouble(double min,double max)
+{
+	if (min>max){double t=min;min=max;max=t;}
+	cseed*=214013;cseed+=2531011;
+	return min+(cseed>>16)*(1.0f/65535.0f)*(max-min);
+}
+void CircleIndicator::Init(double _r,double _thk,BYTE _a,bool _gr,HTEXTURE _Texture,TextureRect _TR,DWORD _cc)
+{
+	circle=new hgeDistortionMesh(1025,3);
+	circle->SetTexture(_Texture);
+	circle->SetTextureRect(_TR.x,_TR.y,_TR.w,_TR.h);
+	radius=_r;thk=_thk;gradient=_gr;alpha=_a;
+	if (_gr)ccolour=SETA(0x00FF0000,alpha);else ccolour=_cc;
+	for (int i=0;i<=1024;++i)
+	{
+		double tang,tx,ty;
+		tang=(double)i/1024.0f*pi*2-pi/2;
+		tx=-cos(tang)*radius;ty=sin(tang)*radius;
+		circle->SetDisplacement(i,2,tx,ty,HGEDISP_TOPLEFT);
+		tx*=thk;ty*=thk;
+		circle->SetDisplacement(i,1,tx,ty,HGEDISP_TOPLEFT);
+		tx*=thk;ty*=thk;
+		circle->SetDisplacement(i,0,tx,ty,HGEDISP_TOPLEFT);
+	}
+}
+void CircleIndicator::SetAlpha(BYTE _alpha){alpha=_alpha;}
+void CircleIndicator::SetValue(double _value)
+{
+	value=_value;
+	for (int i=0;i<=1024;++i)
+	{
+		int tr=(int)((1.0f-value)*255);
+		int tg=(int)(value*255);
+		DWORD tcolour=ARGB(alpha,tr,tg,0);
+		hgeColorHSV *tc=new hgeColorHSV(tcolour);
+		if (tc->v<0.85)tc->v=0.85;
+		if (gradient)tcolour=SETA(tc->GetHWColor(),alpha);else tcolour=SETA(ccolour,alpha);
+		if ((double)i/1024.0f<=value)
+		{
+			circle->SetColor(i,0,tcolour);
+			circle->SetColor(i,1,SETA(0x00FFFFFF,alpha));
+			circle->SetColor(i,2,tcolour);
+		}
+		else
+		{
+			circle->SetColor(i,0,0x00000000);
+			circle->SetColor(i,1,0x00000000);
+			circle->SetColor(i,2,0x00000000);
+		}
+		delete tc;
+	}
+}
+void CircleIndicator::Render(double x,double y){circle->Render(x,y);}
+
+void LinearProgresser::Init(double _a,double _b,double _Lim){a=_a,b=_b,Limit=_Lim;}
+void LinearProgresser::Launch(){Elapsed=0;val=a;}
+void LinearProgresser::Update(double DT){if (Elapsed+DT>=Limit)return (void)(val=b,Elapsed=Limit);Elapsed+=DT;val=(b-a)*(Elapsed/Limit)+a;}
+double LinearProgresser::GetValue(){return val;}
+double LinearProgresser::GetA(){return a;}
+double LinearProgresser::GetB(){return b;}
+double LinearProgresser::GetPercentage(){return (Elapsed/Limit);}
+double LinearProgresser::GetDelta(){return val-a;}
+double LinearProgresser::GetElapsed(){return Elapsed;}
+
+bool HangUpText::Active(){return TFont&&!done;}
+void HangUpText::Init(const char *Font,const char *_Text,double _tlim,double _alim,double _dlim,DWORD _color)
+{
+	TFont=new hgeFont(Font);
+	TFont->SetScale(0.8);
+	strcpy(Text,_Text);
+	Limit=_tlim;alim=_alim;dlim=_dlim;TFont->SetColor(_color);
+	Progresser.Init(0,dlim,Limit);Progalpha.Init(0,255,Limit/2);
+}
+void HangUpText::Launch(vector2d pos)
+{
+	Position=pos;Elapsed=0;delta=0;Progresser.Launch();Progalpha.Launch();done=false;
+}
+void HangUpText::Process(double DT)
+{
+	Progresser.Update(DT);
+	Position.y-=delta;
+	delta=Progresser.GetDelta();
+	Position.y+=delta;
+	if (Progresser.GetElapsed()>Limit/2&&Progalpha.GetA()<Progalpha.GetB())
+	{
+		Progalpha.Init(255,0,Limit/2);
+		Progalpha.Launch();
+	}
+	if (Progalpha.GetA()>Progalpha.GetB()&&Progresser.GetElapsed()>=Limit)
+	{
+		delete TFont;TFont=0;
+		return (void)(done=true);
+	}
+	Progalpha.Update(DT);
+	if(!TFont)return;
+	TFont->SetColor(SETA(TFont->GetColor(),Progalpha.GetValue()));
+	TFont->printf(Position.x,Position.y,HGETEXT_CENTER,Text);
+}