//数値の桁数を取得
int GRH_GET_KETA(int nInt){
	string s=nInt.String();
	return s.Length();
}

//戦国ランス風の数字描画するクラス
//ランダムを使用しています。

class HeisuuDamage{
	const int CONST_MAX_KETA=5;//最大桁数
	
	public:
		void Init(bool bRight);
		~HeisuuDamage();
		
		void Update();
		void Damage(int nDamage);
		
		void SetHP(int nHP){NowHP=nHP;NowHPChange=true;}
		void SetShow(bool bshow){show=bshow;NowHPChange=true;}
		bool GetShow(){return show;}
		void SetPos(int nX,int nY){posX=nX;posY=nY;NowHPChange=true;}
		void SetZ(int nZ){posZ=nZ;NowHPChange=true;}
		void GetPos(ref int nX,ref int nY){nX=posX;nY=posY;}
		int GetZ(){return posZ;}
	private:
		void SuziMake();
		void InitViewDownSprites();
		void DrawArrayNumber(int number,ref array@int aSps,float rate);
	public:
	
	private:
		bool isRight;
		array@int aNumberSprites;//数字隠しスプライト
		array@int aViewSprites;//表示スプライト(格納は、0が1の位)
		array@int aDownSprites;//落下スプライト
		int posX,posY,posZ;
		bool show;
		int NowHP;
		bool NowHPChange;
		array@int HakkaHP;//HP変化
		int DownHP;
		array@int DownToX;
		array@int DownToY;
		
		ss_timer_t m_timer;
		ss_timming m_timming;
		ss_timming m_downtimming;
};

void HeisuuDamage::Init(bool bRight){
	isRight=bRight;
	SuziMake();
	
	InitViewDownSprites();
	NowHPChange=false;
	
	m_timming.InitTimming(m_timer);
	m_timming.StartInterval(300);
	m_timming.Stop();
	
	m_downtimming.InitTimming(m_timer);
	m_downtimming.StartInterval(300);
	m_downtimming.Stop();
}
void HeisuuDamage::InitViewDownSprites(){
	//表示用のスプライト設定
	aViewSprites.Alloc(CONST_MAX_KETA);
	aDownSprites.Alloc(CONST_MAX_KETA);
	SP_GET_UNUSE_NUM_ARRAY(aViewSprites);
	SP_GET_UNUSE_NUM_ARRAY(aDownSprites);
	int i;
	for(i=0;i<CONST_MAX_KETA;i++){
		SP_CREATE(aViewSprites[i],50,50,255,255,255,255,false);
		SP_CREATE(aDownSprites[i],50,50,255,255,255,255,false);
	}
}
void HeisuuDamage::Damage(int nDamage){
	int from=NowHP;
	if(!HakkaHP.Empty()){
		from=HakkaHP[HakkaHP.Numof()-1];
		HakkaHP.Free();
		m_downtimming.Stop();
	}
	int to=from-nDamage;
	if(to<0) to=0;
	int i;
	for(i=0;i<8;i++){
		float rate=(i+1)/8.0f;
		HakkaHP.PushBack( from*(1-rate) + to*rate );
	}
	m_timming.Start();
	NowHPChange=true;
	system.Output("from %d = to %d\n" % from % to);
}
void HeisuuDamage::Update(){
	int i;
	if(m_timming.Check()){
		//発火検知 HPを更新する。
		DownHP=NowHP;
		NowHP=HakkaHP[0];
		HakkaHP.Erase(0);
		NowHPChange=true;
		m_timming.Start();
		if(HakkaHP.Empty()){m_timming.Stop();}
		
		//Downに画像を書き込む
		m_downtimming.Start();
		DownToX.Free();
		DownToY.Free();
		for(i=0;i<aViewSprites.Numof();i++){
			DownToX.PushBack(RAND(20)+10);
			DownToY.PushBack(RAND(30)+55);
		}

	}
	if(NowHPChange){
		//HP更新を検知
		//Viewに画像を書き込む
		DrawArrayNumber(NowHP,aViewSprites,0.0f);
		for(i=0;i<CONST_MAX_KETA;i++){
			SP_SET_SHOW(aViewSprites[i],show);
			SP_SET_Z(aViewSprites[i],posZ);
			SP_SET_POS(aViewSprites[i],posX+(CONST_MAX_KETA-i)*25,posY);
		}
		NowHPChange=false;
	}
	
	
	//落下画像処理
	if(m_downtimming.IsRunning){
		if(m_downtimming.Check){
			//終了処理
			m_downtimming.Stop();
			for(i=0;i<CONST_MAX_KETA;i++){
				SP_SET_SHOW(aDownSprites[i],false);
			}
		}else{
			//位置や透過度を計算
			float rate=m_downtimming.GetPercent();
			DrawArrayNumber(DownHP,aDownSprites,rate);
			for(i=0;i<CONST_MAX_KETA;i++){
				int fixx,fixy;
				fixy=DownToY[i]*rate+10;
				if(isRight){
					fixx=DownToX[i]*rate+7;
				}else{
					fixx=-1*DownToX[i]*rate-7;
				}
				SP_SET_SHOW(aDownSprites[i],show);
				SP_SET_Z(aDownSprites[i],posZ+1);
				SP_SET_POS(aDownSprites[i],posX+(CONST_MAX_KETA-i)*25+fixx,posY+fixy);
				SP_SET_BLEND_RATE(aDownSprites[i],(1-rate)*250);
			}
		}
	}
}
void HeisuuDamage::DrawArrayNumber(int number,ref array@int aSps,float rate){
	int keta=GRH_GET_KETA(number);
	if(keta>CONST_MAX_KETA){
		//ケタを超えてれば、99999
		number=Math.Pow(10,CONST_MAX_KETA+1) -1;
		keta=CONST_MAX_KETA;
	}
	int i;
	//一番下からとってくよ
	for(i=0;i<keta;i++){
		int kai=number % 10;
		number=number / 10;
		int ima=rate*8;
		if(ima>=8) ima=7;
		CG_COPY(aSps[i],0,0, aNumberSprites[kai+ima*10],0,0, 50,50);
		CG_COPY_AMAP(aSps[i],0,0, aNumberSprites[kai+ima*10],0,0, 50,50);
	}
	for(i=keta;i<CONST_MAX_KETA;i++){
		//AMAPを空で塗りつぶす
		CG_FILL_AMAP(aSps[i], 0, 0, 50,50, 0);
	}
}
//デストラクタ
HeisuuDamage::~HeisuuDamage(){
	SP_DEL_ARRAY(aNumberSprites);
	SP_DEL_ARRAY(aViewSprites);
	SP_DEL_ARRAY(aDownSprites);
}

//数字は毎バトル自動作成します＾＾；
//うわー、無駄おおー。
//ま、まぁ、CPUパワーは余り余ってると仮定して、、駄目じゃん
void HeisuuDamage::SuziMake(){
	sact_group_t spm;
	spm.SetAutoDel();

	int nWakuR=76,nWakuG=8,nWakuB=84;
	int nUR=255,nUG=255,nUB=255;
	int nBR=233,nBG=41,nBB=176;
	
	int B1nWakuR=93,B1nWakuG=0,B1nWakuB=0;
	int B1nUR=255,B1nUG=255,B1nUB=255;
	int B1nBR=255,B1nBG=176,B1nBB=25;
	int B2nWakuR=76,B2nWakuG=8,B2nWakuB=84;
	int B2nUR=255,B2nUG=255,B2nUB=255;
	int B2nBR=248,B2nBG=7,B2nBB=68;
	float kaku=0.0f;
	
	int nSpTmp=spm.AddNew();
	int nSpTmpa=spm.AddNew();
	int nSpTmp2=spm.AddNew();
	int nSpTmp3=spm.AddNew();
	
	int ri;
	array@string strs[10];
	for(ri=0;ri<strs.Numof();ri++){
		strs[ri]=NUM_TO_ZENKAKU(ri);
	}
	
	ref array@int aSpResults;
	aSpResults<-aNumberSprites;
	int loop;
	if(isRight){
		kaku=20.0f;
	}else{
		kaku=-20.0f;
	}
	for(loop=0.0;loop<8;loop++){
		if(isRight){
			kaku+=-20.0f;
		}else{
			kaku+=20.0f;
		}
		float rate= loop/8.0f;
		nWakuR=B1nWakuR * (1-rate) + B2nWakuR * (rate);
		nWakuG=B1nWakuG * (1-rate) + B2nWakuG * (rate);
		nWakuB=B1nWakuB * (1-rate) + B2nWakuB * (rate);
		nUR=B1nUR * (1-rate) + B2nUR * (rate);
		nUG=B1nUG * (1-rate) + B2nUG * (rate);
		nUB=B1nUB * (1-rate) + B2nUB * (rate);
		nBR=B1nBR * (1-rate) + B2nBR * (rate);
		nBG=B1nBG * (1-rate) + B2nBG * (rate);
		nBB=B1nBB * (1-rate) + B2nBB * (rate);
		
	
	for(ri=0;ri<strs.Numof();ri++){
		SP_CREATE(nSpTmp,50,50,nWakuR,nWakuG,nWakuB,255,false);
		SP_CREATE(nSpTmpa,50,50,255,255,255,255,false);
		font_metrics_t fm;
		fm.nSize=30;
		CG_FILL_AMAP(nSpTmp, 0, 0, 50,50, 0);
		CG_FILL_AMAP(nSpTmpa, 0, 0, 50,50, 0);
		CG_DRAW_TEXT_TO_AMAP_FONT(nSpTmpa, 10, 10, strs[ri],fm);
		int i,j;
		for(i=-2;i<=2;i++){
			for(j=-2;j<=2;j++){
				CG_ADD_DA_DAXSA(nSpTmp, 10+i, 10+j, nSpTmpa, 10,10,30, 30);
			}	
		}
		
		
		SP_CREATE(nSpTmp2,50,50,255,0,0,0,false);
		DrawGraph.DrawColorPolygon(nSpTmp2,0,0,1,nUR,nUG,nUB,255,
									  	   0,50,1,nBR,nBG,nBB,255,
									   	   50,0,1,nUR,nUG,nUB,255);
		DrawGraph.DrawColorPolygon(nSpTmp2,50,50,1,nBR,nBG,nBB,255,
									  	    0,50,1,nBR,nBG,nBB,255,
									  	    50,0,1,nUR,nUG,nUB,255);
		font_metrics_t fm2;
		fm2.nSize=30;
		CG_FILL_AMAP(nSpTmp2, 0, 0, 50,50, 0);
		CG_FILL_AMAP(nSpTmpa, 0, 0, 50,50, 0);
		CG_DRAW_TEXT_TO_AMAP_FONT(nSpTmpa, 10, 10, strs[ri],fm2);
		for(i=-1;i<=1;i++){
			for(j=-1;j<=1;j++){
				CG_ADD_DA_DAXSA(nSpTmp2, 10+i, 10+j, nSpTmpa, 10,10,30, 30);
			}	
		}
		
		int makeSp=SP_GET_UNUSE_NUM();
		aSpResults.PushBack(makeSp);
		SP_CREATE(makeSp,50,50,255,255,255,255,false);
		SP_CREATE(nSpTmp3,50,50,255,255,255,255,false);
		CG_FILL_AMAP(nSpTmp3, 0, 0, 50,50, 0);
		CG_COPY(nSpTmp3,0,0, nSpTmp,0,0, 50,50);
		CG_COPY_AMAP(nSpTmp3,0,0, nSpTmp,0,0, 50,50);
		CG_BLEND_AMAP(nSpTmp3,0,0, nSpTmp2,0,0, 50,50);
		
		CG_COPY_ROT_ZOOM_USE_AMAP(makeSp, nSpTmp3,0 ,0, 50,50, kaku,1.0f);
	}

	}
	
}