#include"hensu.h"		//for iWidth,iHeight & #include<windows.h>
#include<math.h>

//int iWidth	画像横幅
//int iHeight	画像高さ

void RGBtoHSB(LPDWORD RGB,double *H,double *S,double *B)
{
	int r,g,b;
	int max,min;
	int x,y;

	for(y=0;y<iHeight;y++) 		for(x=0;x<iWidth;x++){ 			 			r=(RGB[x+y*iWidth] & 0x00ff0000)>>16;
			g=(RGB[x+y*iWidth] & 0x0000ff00)>>8;
			b= RGB[x+y*iWidth] & 0x000000ff;

			max=(r<g)?g:r; 			if(max<b) max=b;  			min=(r<g)?r:g; 			if(b<min) min=b;  			// H  			if(max==min)		//r==g==b 				H[x+y*iWidth]=-1; 			else{ 				if(g==max) 					if(b==min) 						H[x+y*iWidth]=(double)(max-r)/(max-min)*60+60;		// 60 〜 120 					else		//r==min 						H[x+y*iWidth]=(double)(b-min)/(max-min)*60+120;		//120 〜 180 				else if(b==max) 					if(r==min) 						H[x+y*iWidth]=(double)(max-g)/(max-min)*60+180;		//180 〜 240 					else		//g==min 						H[x+y*iWidth]=(double)(r-min)/(max-min)*60+240;		//240 〜 300 				else		//r==max 					if(b==min) 						H[x+y*iWidth]=(double)(g-min)/(max-min)*60;			//  0 〜  60 					else		//g==min 						H[x+y*iWidth]=(double)(max-b)/(max-min)*60+300;		//300 〜 360 			}  			// S  			if(max==0)		//r==0 g==0 b==0 				S[x+y*iWidth]=0; 			else 				S[x+y*iWidth]=(double)(max-min)/max*255;  			// B  			B[x+y*iWidth]=max; 		} }  void HSBtoRGB(double *H,double *S,double *B,LPDWORD RGB) { 	double max,min; 	double hue; 	double r,g,b; 	int x,y;  	for(y=0;y<iHeight;y++) 		for(x=0;x<iWidth;x++){  			max=B[x+y*iWidth];  			min=max-S[x+y*iWidth]*max/255;  			hue=H[x+y*iWidth];  			if(hue<60){ 				r=max; 				g=min+hue*(max-min)/60; 				b=min; 			}else if(hue<120){ 				r=max-(hue-60)*(max-min)/60; 				g=max; 				b=min; 			}else if(hue<180){ 				r=min; 				g=max; 				b=min+(hue-120)*(max-min)/60; 			}else if(hue<240){ 				r=min; 				g=max-(hue-180)*(max-min)/60; 				b=max; 			}else if(hue<300){ 				r=min+(hue-240)*(max-min)/60; 				g=min; 				b=max; 			}else{		//hue<360 				r=max; 				g=min; 				b=max-(hue-300)*(max-min)/60; 			}  			RGB[x+y*iWidth]=((int)r<<16)+((int)g<<8)+(int)b; 		} }  #define SAT_MAX 255 #define BRI_MAX 255  void tran_hsb(double *in_hue,double *in_sat,double *in_bri,		//-180<=hd<=180 度 			  double *out_hue,double *out_sat,double *out_bri,	//-100<=sm<=100 % 			  int hd,int sm,int bm)								//-100<=bm<=100 % { 	int x,y;  	for(y=0;y<iHeight;y++) 		for(x=0;x<iWidth;x++){  			out_hue[x+y*iWidth]=in_hue[x+y*iWidth]+hd; 			if(out_hue[x+y*iWidth]>360) out_hue[x+y*iWidth]-=360;
			else if(out_hue[x+y*iWidth]<0) out_hue[x+y*iWidth]+=360;
			
			if(sm>0)
				out_sat[x+y*iWidth]=in_sat[x+y*iWidth]+sm/100.0*(SAT_MAX-in_sat[x+y*iWidth]);
			else if(sm<0)
				out_sat[x+y*iWidth]=in_sat[x+y*iWidth]+sm/100.0*in_sat[x+y*iWidth];
			else
				out_sat[x+y*iWidth]=in_sat[x+y*iWidth];

			//if(in_sat[x+y*iWidth]==0) out_sat[x+y*iWidth]=0;		//グレースケールの疑似カラー化を防止

			if(bm>0){
				out_bri[x+y*iWidth]=in_bri[x+y*iWidth]+bm/100.0*(BRI_MAX-in_bri[x+y*iWidth]);
			}else if(bm<0)
				out_bri[x+y*iWidth]=in_bri[x+y*iWidth]+bm/100.0*in_bri[x+y*iWidth];
			else
				out_bri[x+y*iWidth]=in_bri[x+y*iWidth];
		}
}

void hue_image(double *hue,LPDWORD image_out,double *sat,double stdhue=0)	//stdhue=0 は赤を基準とする
{
	int x,y,H;
	double delt;

	for(y=0;y<iHeight;y++) 		for(x=0;x<iWidth;x++){ 			if(sat[x+y*iWidth]>0){
				delt=fabs(hue[x+y*iWidth]-stdhue);
				if(delt>180) delt=360-delt;
				H=(int)(255-delt*255/180.0);
				image_out[x+y*iWidth]=RGB(H,H,H);
			}else
				image_out[x+y*iWidth]=0;
		}
}

void sat_image(double *sat,LPDWORD image_out)
{
	int x,y,S;

	for(y=0;y