/***************************************************************
  MantisChessDraw.cpp : MantisChess 畫圖函數

  JiaJu   2004.10.16

******************************************************************/

#include "StdAfx.h"
#include "math.h"
#include "MantisChessDef.h"
#include "MantisChessDraw.h"

const float PAI=(float)3.1415927;
const int XC[2]={BWA/2,BWA/2-1};	//XC,YC-棋子寬的一半
const int YC[2]={BWA/2,BWA/2-2};	//[0].[1]分別為陰影和明線的偏移量



/******************************************************************
MakeWood:		繪制木紋

參數:
hdc:			設備描述表的句柄
cx,cy:			寬,高
color:			顏色
x0,y0,z0:		切割平面的原點在三維空間的位置
angle0:			切割角度（弧度）
dark:			深色條紋與淺色條紋的單色差值

返回值:			無
******************************************************************/
void MakeWood(HDC hdc, int cx, int cy, COLORREF color, int x0, int y0, int z0, float angle0,int dark)
{
	int i,j;
	FLOAT r,angle,u,v,w;

	for( j=0;j<cy;j++)
	for( i=0;i<cx;i++)
	{
		w=0;
		u=(FLOAT)j*2;
		v=(FLOAT)i;
		r=(FLOAT)sqrt(v*v+w*w);
		if(v==0)
			angle=PAI/2;
		else
			angle=(FLOAT)atan2(v,w);
		angle+=angle0;

		w=FLOAT(r*cos(angle));
		v=FLOAT(r*sin(angle));

		u+=x0;
		v+=y0;
		w+=z0;	

		SetPixel(hdc,i,j,WoodGrain(u,v,w,color,dark));
	}
}

/******************************************************************
WoodGrain:		假設木紋充滿整個空間，求某點的顏色

參數:
u,v,w			坐標
color			原始顏色
dark:			深色條紋與淺色條紋的單色差值

返回值:			無
******************************************************************/
COLORREF WoodGrain(FLOAT u, FLOAT v, FLOAT w,COLORREF color,int dark)
{
	int r,g,b;
	FLOAT radius,angle;
	int grain;
	radius = (FLOAT)sqrt(u*u+w*w);
	if(w==0)
		angle = PAI/2;
	else
		angle =(FLOAT) atan2(u,w);
	radius = FLOAT(radius+1.1*sin(20*angle+v/150));
	grain =int(radius)%10;

	r=GetRValue(color);
	g=GetGValue(color);
	b=GetBValue(color);

	switch(grain)
	{
	case 0:
		r=max(0,r-dark/2);
		g=max(0,g-dark/2);
		b=max(0,b-dark/2);
		color=RGB(r,g,b);
		break;
	case 1:
	case 2:
	case 3:
		r=max(0,r-dark);
		g=max(0,g-dark);
		b=max(0,b-dark);
		color=RGB(r,g,b);
		break;
	case 4:
	case 5:
	case 6:
	case 7:
	case 8:
	case 9:
	default: 
		break;
	}
	return color;
}
/******************************************************************
MakeBoard:		繪制棋盤

參數:
hdc:			設備描述表的句柄
cr:				棋盤的顏色

返回值:			無
******************************************************************/
void MakeBoard(HDC hdc,COLORREF cr)
{
	//填充
	int nCurTime=(int)::GetTickCount();
	MakeWood(hdc,XBW,YBW,cr,-nCurTime%XBW,nCurTime%YBW,nCurTime%1000+500,FLOAT(nCurTime%20/1000.1+0.01),20);
	//畫棋盤
	HPEN pen[2],oldpen;
	int r,g,b;
	COLORREF cr1,cr2;

	r=GetRValue(cr);
	g=GetGValue(cr);
	b=GetBValue(cr);
	cr1=RGB(min(255,r+40),min(255,g+40),min(255,b+40));
	cr2=RGB(max(0,r-40),max(0,g-40),max(0,b-40));
	pen[0]=CreatePen(PS_SOLID,0,cr1);
	pen[1]=CreatePen(PS_SOLID,0,cr2);

	oldpen=(HPEN)SelectObject(hdc,pen[0]);

	for(int i=0;i<=1;i++)
	{
	 	SelectObject(hdc,pen[i]);
		//畫邊框(雙線)
		MoveToEx(hdc,XC[i]+BWA-3,YC[i]-3,NULL);
		LineTo(hdc,XC[i]+BWA-3,YC[i]+3+BWA*10);
		LineTo(hdc,XC[i]+3+BWA*3,YC[i]+3+BWA*10);
		LineTo(hdc,XC[i]+3+BWA*3,YC[i]-3);
		LineTo(hdc,XC[i]+BWA-3,YC[i]-3);

		MoveToEx(hdc,XC[i]+BWA,YC[i],NULL);
		LineTo(hdc,XC[i]+BWA,YC[i]+BWA*10);
		LineTo(hdc,XC[i]+BWA*3,YC[i]+BWA*10);
		LineTo(hdc,XC[i]+BWA*3,YC[i]);
		LineTo(hdc,XC[i]+BWA,YC[i]);
		//畫豎線

	
		
			MoveToEx(hdc,XC[i]+BWA*2,YC[i],NULL);
			LineTo(hdc,XC[i]+BWA*2,YC[i]+BWA*10);

			for(int n=1;n<=9;n++)
		{
			MoveToEx(hdc,XC[i]+BWA,YC[i]+BWA*n,NULL);
			LineTo(hdc,XC[i]+BWA*3,YC[i]+BWA*n);
		}
		
		
	}
	SelectObject(hdc,oldpen);
	DeleteObject(pen[0]);
	DeleteObject(pen[1]);
}