#include"transform_affine5.h"
#include"bmpio.h"

static BmpIO g_bmpio;
static int g_w=0,g_h=0,g_len=0;
static HDC g_hdc=NULL;
static BYTE *g_pixel=NULL;

static BYTE *g_buf=NULL;		// 原画像の保存バッファ

#define POINTS 5		// 5 以外は無理

static Point g_ptIn[POINTS],g_ptOut[POINTS];		// 入力と出力の参照点
static int g_ci=0,g_co=0;		// 設定した参照点の個数

static POINT g_lineIn[POINTS],g_lineOut[POINTS];		// ポリライン座標

// 5点アフィン変換
void Transform(void)
{
	// 出力から入力を求める

	SetSrcPoint(g_ptOut[0],g_ptOut[1],g_ptOut[2],g_ptOut[3],g_ptOut[4]);		// 出力を変形元に
	SetDstPoint(g_ptIn[0],g_ptIn[1],g_ptIn[2],g_ptIn[3],g_ptIn[4]);		// 入力を変形先に

	BYTE *temp=(BYTE*)malloc(g_len*g_h);
	memset(temp,0,g_len*g_h);

	Point P;
	int ix,iy;
	BYTE b=(BYTE)g_bmpio.GetBitCount()/8;

	for(int y=0;y<g_h;y++) 	{ 		for(int x=0;x<g_w;x++) 		{ 			P=TransformAffine5(Point(x,y),false);		// 出力座標から入力座標を求める 			if(P.x<0 || P.y<0) continue; 			ix=(int)(P.x+0.5); iy=(int)(P.y+0.5);		// 入力座標(最近傍) 			if(ix>=g_w || iy>=g_h) continue;
			memcpy(&temp[x*b+y*g_len],&g_pixel[ix*b+iy*g_len],b);
		}
	}

	memcpy(g_pixel,temp,g_len*g_h);
	free(temp);
}

// 参照点を全てクリア
void DeletePoint(void)
{
	for(int i=0;i<POINTS;i++) 	{ 		g_ptIn[i].x=0; g_ptIn[i].y=0; 		g_ptOut[i].x=0; g_ptOut[i].y=0;  		g_lineIn[i].x=0; g_lineIn[i].y=0; 		g_lineOut[i].x=0; g_lineOut[i].y=0; 	} 	g_ci=0; g_co=0; }  // 画像ファイルを読み込む void LoadImageFile(HWND hWnd) { 	g_bmpio.LoadImage(hWnd,BIT24); 	const TCHAR *error=g_bmpio.GetLastErr(); 	if(error) MessageBox(hWnd,error,NULL,MB_OK);  	g_w=g_bmpio.GetWidth(); g_h=g_bmpio.GetHeight(); g_len=g_bmpio.GetLength(); 	g_hdc=g_bmpio.GetHDC(); 	g_pixel=g_bmpio.GetPixel();  	if(g_buf) free(g_buf); 	g_buf=(BYTE*)malloc(g_len*g_h); 	memcpy(g_buf,g_pixel,g_len*g_h); }  // 原座像を設定 void ResetImage(void) { 	if(g_pixel==NULL || g_buf==NULL) return;  	memcpy(g_pixel,g_buf,g_len*g_h); }  // 画像をファイルに保存 void SaveImageFile(HWND hWnd) { 	g_bmpio.SaveBmp(hWnd,false,BIT24); 	const TCHAR *error=g_bmpio.GetLastErr(); 	if(error) MessageBox(hWnd,error,NULL,MB_OK); }  // 描画 void Draw(HDC hdc) { 	BitBlt(hdc,0,0,g_w,g_h,g_hdc,0,0,SRCCOPY);  	HPEN hPen=CreatePen(PS_SOLID,1,RGB(0,0,255)); 	HPEN hOldPen=(HPEN)SelectObject(hdc,hPen);  	Polyline(hdc,g_lineIn,g_ci); 	if(g_ci>=POINTS)
	{
		MoveToEx(hdc,g_lineIn[3].x,g_lineIn[3].y,NULL);
		LineTo(hdc,g_lineIn[0].x,g_lineIn[0].y);
		for(int i=0;i<POINTS-2;i++) 		{ 			MoveToEx(hdc,g_lineIn[4].x,g_lineIn[4].y,NULL); 			LineTo(hdc,g_lineIn[i].x,g_lineIn[i].y); 		} 	}  	SelectObject(hdc,hOldPen); 	DeleteObject(hPen);  	hPen=CreatePen(PS_SOLID,1,RGB(255,0,0)); 	hOldPen=(HPEN)SelectObject(hdc,hPen);  	Polyline(hdc,g_lineOut,g_co); 	if(g_co>=POINTS)
	{
		MoveToEx(hdc,g_lineOut[3].x,g_lineOut[3].y,NULL);
		LineTo(hdc,g_lineOut[0].x,g_lineOut[0].y);
		for(int i=0;i