#include<windows.h>
#include<tchar.h>
#include<d3dx9.h>
#include<dxerr9.h>
#include<time.h>
#include"main.h"
#include"RubikCube.h"

static int g_v;		// 現在の選択列
static int g_k[CUBES];		// キューブの添字

D3DXMATRIX g_matCube[CUBES];		// キューブの回転行列

// キューブの回転行列の初期化
void InitCubeMatrix(void)
{
	for(int i=0;i<CUBES;i++) 	{ 		g_k[i]=i; 		D3DXMatrixIdentity(&g_matCube[i]); 	} }  // 半透明にする static HRESULT Clear(int index,BYTE alpha) { 	ColorBuffer *pColorBuffer; 	HRESULT hr=g_pD3DVBColor->Lock(sizeof(ColorBuffer)*8*index,sizeof(ColorBuffer)*8,(void**)&pColorBuffer,0);
	if(FAILED(hr)) return DXTRACE_ERR_MSGBOX(_T("InitDXGraphics Lock ColorBuffer"),hr);

	pColorBuffer[0].color=D3DCOLOR_ARGB(alpha,0xff,0x00,0x00);
	pColorBuffer[1].color=D3DCOLOR_ARGB(alpha,0x00,0xff,0x00);
	pColorBuffer[2].color=D3DCOLOR_ARGB(alpha,0x00,0x00,0xff);
	pColorBuffer[3].color=D3DCOLOR_ARGB(alpha,0x00,0x00,0x00);
	pColorBuffer[4].color=D3DCOLOR_ARGB(alpha,0xff,0xff,0x00);
	pColorBuffer[5].color=D3DCOLOR_ARGB(alpha,0xff,0x00,0xff);
	pColorBuffer[6].color=D3DCOLOR_ARGB(alpha,0x00,0xff,0xff);
	pColorBuffer[7].color=D3DCOLOR_ARGB(alpha,0x00,0x00,0x00);

	hr=g_pD3DVBColor->Unlock();
	if(FAILED(hr)) return DXTRACE_ERR_MSGBOX(_T("InitDXGraphics UnLock ColorBuffer"),hr);

	return S_OK;
}

// 不透明にする
static HRESULT UnClear(int index)
{
	ColorBuffer *pColorBuffer;
	HRESULT hr=g_pD3DVBColor->Lock(sizeof(ColorBuffer)*8*index,sizeof(ColorBuffer)*8,(void**)&pColorBuffer,0);
	if(FAILED(hr)) return DXTRACE_ERR_MSGBOX(_T("InitDXGraphics Lock ColorBuffer"),hr);

	pColorBuffer[0].color=D3DCOLOR_ARGB(0xff,0xff,0x00,0x00);
	pColorBuffer[1].color=D3DCOLOR_ARGB(0xff,0x00,0xff,0x00);
	pColorBuffer[2].color=D3DCOLOR_ARGB(0xff,0x00,0x00,0xff);
	pColorBuffer[3].color=D3DCOLOR_ARGB(0xff,0x00,0x00,0x00);
	pColorBuffer[4].color=D3DCOLOR_ARGB(0xff,0xff,0xff,0x00);
	pColorBuffer[5].color=D3DCOLOR_ARGB(0xff,0xff,0x00,0xff);
	pColorBuffer[6].color=D3DCOLOR_ARGB(0xff,0x00,0xff,0xff);
	pColorBuffer[7].color=D3DCOLOR_ARGB(0xff,0x00,0x00,0x00);

	hr=g_pD3DVBColor->Unlock();
	if(FAILED(hr)) return DXTRACE_ERR_MSGBOX(_T("InitDXGraphics UnLock ColorBuffer"),hr);

	return S_OK;
}

// 指定の選択列の最初の添字を返す
static int operate(int index)
{
	switch(index)
	{
	case 1: return 0;
	case 2: return 1;
	case 3: return 2;
	case 4: return 0;
	case 5: return 3;
	case 6: return 6;
	case 7: return 0;
	case 8: return 9;
	case 9: return 18;
	default: return -1;		// error
	}
}

// 現在の選択列を示す
void Indicate(int index)
{
	int i,min,max,start,end;
	int a=operate(index);
	switch(index)
	{
	case 1: case 2: case 3:		// x軸を回転軸にして回転
		for(i=0;i<CUBES;i++) 		{ 			if(i%3==a) Clear(g_k[i],0xc0); 			else UnClear(g_k[i]); 		} 		break; 	case 4: case 5:	case 6:		// y軸を回転軸にして回転 		min=a; max=min+3; 		for(i=0;i<CUBES;i++) 		{ 			if(i%9>=min && i%9<max) Clear(g_k[i],0xc0); 			else UnClear(g_k[i]); 		} 		break; 	case 7: case 8: case 9:		// z軸を回転軸にして回転 		start=a; end=start+9; 		for(i=0;i<CUBES;i++) 		{ 			if(i>=start && i<end) Clear(g_k[i],0xc0); 			else UnClear(g_k[i]); 		} 		break; 	default:		// 0 		for(i=0;i<CUBES;i++) UnClear(g_k[i]); 		break; 	} 	g_v=index; }  // x軸を回転軸にして回転 static void RotationX(int index,bool turn) { 	D3DXMATRIX temp; 	int a=index%3; 	for(int i=0;i<CUBES;i++) 	{ 		if(i%3==a) 		{ 			D3DXMatrixRotationX(&temp,(turn)?D3DX_PI/18:-D3DX_PI/18); 			g_matCube[ g_k[i] ]*=temp; 		} 	} }  // 添字変更 static void ChangeIndexX(int index,bool turn) { 	int s=index%3; 	int t[CUBES];  	if(turn) 	{ 		t[s+24]=g_k[s+18]; t[s+21]=g_k[s+ 9]; t[s+18]=g_k[s+ 0]; 		t[s+ 6]=g_k[s+24]; t[s+15]=g_k[s+21]; t[s+24]=g_k[s+18]; 		t[s+ 0]=g_k[s+ 6]; t[s+ 3]=g_k[s+15]; t[s+ 6]=g_k[s+24]; 		t[s+18]=g_k[s+ 0]; t[s+ 9]=g_k[s+ 3]; t[s+ 0]=g_k[s+ 6];  		g_k[s+24]=t[s+24]; g_k[s+21]=t[s+21]; g_k[s+18]=t[s+18]; 		g_k[s+ 6]=t[s+ 6]; g_k[s+15]=t[s+15]; g_k[s+24]=t[s+24]; 		g_k[s+ 0]=t[s+ 0]; g_k[s+ 3]=t[s+ 3]; g_k[s+ 6]=t[s+ 6]; 		g_k[s+18]=t[s+18]; g_k[s+ 9]=t[s+ 9]; g_k[s+ 0]=t[s+ 0]; 	} 	else 	{ 		t[s+ 0]=g_k[s+18]; t[s+ 3]=g_k[s+ 9]; t[s+ 6]=g_k[s+ 0]; 		t[s+18]=g_k[s+24]; t[s+ 9]=g_k[s+21]; t[s+ 0]=g_k[s+18]; 		t[s+24]=g_k[s+ 6]; t[s+21]=g_k[s+15]; t[s+18]=g_k[s+24]; 		t[s+ 6]=g_k[s+ 0]; t[s+15]=g_k[s+ 3]; t[s+24]=g_k[s+ 6];  		g_k[s+ 0]=t[s+ 0]; g_k[s+ 3]=t[s+ 3]; g_k[s+ 6]=t[s+ 6]; 		g_k[s+18]=t[s+18]; g_k[s+ 9]=t[s+ 9]; g_k[s+ 0]=t[s+ 0]; 		g_k[s+24]=t[s+24]; g_k[s+21]=t[s+21]; g_k[s+18]=t[s+18]; 		g_k[s+ 6]=t[s+ 6]; g_k[s+15]=t[s+15]; g_k[s+24]=t[s+24]; 	} }  // y軸を回転軸にして回転 static void RotationY(int index,bool turn) { 	D3DXMATRIX temp; 	int a=index%9; 	int min=(a/3)*3,max=min+3; 	for(int i=0;i<CUBES;i++) 	{ 		if(i%9>=min && i%9