// ********** Const
// ***** Timer
var m_iAnimeMilliSec = 66;

// ********** Common
var m_dStart;
var m_bFocus = 0;

// ********** Const
var m_strURLSend = '/cgi-bin/generator/dentaku.cgi';

var m_iMove0 = 20;
var m_iWait0 = 30;
var m_iMove1 = 60;
var m_iLoop1 = 3;
var m_iMargin = 0;

var m_iMainMode = 2 - 1;
var m_iCvWt;
var m_iCvHt;

// ********** Draw
var m_iAnimeIdx;
var m_timAnime;
var m_elmBody;
var m_strDefine;
var m_iPatnCnt;
var m_astrInit = [];
var m_astrLabel = [];
var m_astrPath = [];

var m_iMinX = 0;
var m_iMinY = 0;
var m_iMaxX = 0;
var m_iMaxY = 0;

var m_strReq = '';

// ********** Draw
var m_elmPn;

var m_astrArrayCv = new Array('frst','frdm');
var m_astrArrayNb = new Array('dbox');
var m_aelmCv = [];
var m_actxCv = [];
var m_aelmNb = [];
var m_astrNo = [];
var m_astrNn = [];

window.onload = sbInit;

function sbInit() {
	m_elmBody = document.getElementsByTagName('body').item(0);
	
	// ********** Init Canvas
	// Init Canvas
	m_elmPn = document.getElementById('gen_pn');
	for (iIdx = 0; iIdx < m_astrArrayCv.length; iIdx++) {
		strIdx = m_astrArrayCv[iIdx];
		m_aelmCv[strIdx] = document.getElementById('gen_cv' + iIdx);
		m_actxCv[strIdx] = m_aelmCv[strIdx].getContext('2d');
	}
	
	// Init Text
	for (iIdx = 0; iIdx < m_astrArrayNb.length; iIdx++) {
		strIdx = m_astrArrayNb[iIdx];
		m_aelmNb[strIdx] = document.getElementById('gen_nb' + iIdx);
	}
	
	sbChangeSize(false);
	sbInitGame();
	
	// Get Param
	var astrParam = [];
	astrParam = sbGetParam();
	var strReq = '';
	var astrReq = [];
	if ('n' in astrParam) {
		strReq = decodeURI(astrParam['n']);
		if (strReq != '') {
			astrReq = (strReq + ',').split(',');
			document.getElementById('gen_name0').value = astrReq[0];
			document.getElementById('gen_name1').value = astrReq[1];
			document.getElementById('gen_res').value = '';
			sbSend();
		}
	}
	
	// ********** Start Timer
	m_timAnime = setInterval('sbAnime()',m_iAnimeMilliSec);
}

// ********************************************************************************
function sbInitGame() {
	var iIdx,strIdx,iTemp;
	
	// ********** Resize Canvas
	m_elmPn.style.width  = m_iCvWt + 'px';
	m_elmPn.style.height = m_iCvHt + 'px';
	for (iIdx = 0; iIdx < m_astrArrayCv.length; iIdx++) {
		strIdx = m_astrArrayCv[iIdx];
		m_aelmCv[strIdx].width  = m_iCvWt;
		m_aelmCv[strIdx].height = m_iCvHt;
		m_actxCv[strIdx].lineWidth = 2;
		m_actxCv[strIdx].strokeStyle = '#ffffff';
	}
	
	// ********** Clear And Hidden
	sbClearAll('frst,frdm','dbox');
	
	// ********** Init Value
	m_strDefine = '';
}

function sbAnime() {
	var iIdx;
	var strDefine;
	var astrDefine = [];
	var iConstDefine = 2;
	var astrTempPath = [];
	var strTemp;
	var iTemp;
	
	strDefine = '' + document.getElementById('gen_res').value;
	
	// ********** Start Animation
	if (strDefine != '' && strDefine != m_strDefine) {
		sbInitGame();
		
		// ********** Init
		astrDefine = strDefine.split('~');
		m_astrInit    = astrDefine[0].split(';');
		m_astrLabel   = astrDefine[1].split(';');
		astrTempPath  = astrDefine[2].split(';');
		
		m_iPatnCnt = (astrDefine[2] == '' ? 0 : astrTempPath.length);
		for (iIdx = 0; iIdx < m_iPatnCnt; iIdx++) {
			m_astrPath[iIdx] = [];
			m_astrPath[iIdx] = astrTempPath[iIdx].split(' ');
			sbAdjustPath(iIdx,1000,1000);
		}
		
		// ********** Time
		if (m_bFocus == 0) {
			document.getElementById('gen_wait').style.display = 'none';
			document.getElementById('gen_all').style.display = 'block';
			document.getElementById('gen_name0').focus();
			m_bFocus = 1;
		}
		m_dStart = new Date();
		
		// ********** Init Value
		m_iAnimeIdx = 0;
		m_strDefine = strDefine;
		
		// ********** Set Permalink 
		strTemp = window.location.href
		iTemp = strTemp.indexOf('?');
		if (iTemp >= 0) {
			strTemp = strTemp.substring(0,iTemp);
		}
		if (m_astrInit[2] != '') {
			strTemp = strTemp + '?n=' + encodeURI(m_astrInit[2]);
		}
		document.getElementById('gen_url').value = strTemp;
	}
	
	// ********** Draw
	var iSt;
	var iPar;
	var iPart;
	var iFontSize = m_iCvHt * 0.05;
	var iFontHeight = m_iCvHt * 0.06;
	var iM = m_iCvHt * 0.02;
	var iW = m_iCvWt - iM * 2;
	var iH = iFontSize * 2;
	var iSize = 0.8;
	var bFill = true;
	var iColorPar;
	
	if (m_iAnimeIdx > m_iMove0 + m_iWait0 * 2 + m_iMove1) {
		return;
	}
	
	iColorPar = (m_iAnimeIdx - (m_iMove0 + m_iWait0 * 2)) / (m_iMove1 - 1);
	m_actxCv['frdm'].fillStyle   = fnGetHexColor(255,255 - 187 * iColorPar,255 - 119 * iColorPar);
	if        (m_iAnimeIdx == 0) {
		iSt = 0;
		iPar = 0;
		m_actxCv['frdm'].clearRect(0,0,m_iCvWt,m_iCvHt);
		sbDrawLine(m_actxCv['frdm'],0,0,m_iCvWt,m_iCvHt,iSt,iPar,iSize,bFill);
	} else if (m_iAnimeIdx < m_iWait0) {
	} else if (m_iAnimeIdx < m_iMove0 + m_iWait0) {
		iSt = 0;
		iPar = (m_iAnimeIdx - m_iWait0) / (m_iMove0 - 1);
		m_actxCv['frdm'].clearRect(0,0,m_iCvWt,m_iCvHt);
		sbDrawLine(m_actxCv['frdm'],0,0,m_iCvWt,m_iCvHt,iSt,iPar,iSize,bFill);
	} else if (m_iAnimeIdx < m_iMove0 + m_iWait0 * 2) {
		if (m_iAnimeIdx - m_iWait0 - m_iMove0 - Math.floor(m_iWait0 / 2) == 0) {
			m_astrNn['dbox'] += sbDrawLabel(iM,iM,iW,iH,'l',iFontSize,'#ffffff',m_astrLabel[0]);
		}
	} else {
		iSt = 1;
		iPar = (m_iAnimeIdx - (m_iMove0 + m_iWait0 * 2)) / (m_iMove1 - 1);
		iPar = fnCos(0,1,m_iLoop1,iPar);
		iPart = Math.floor((m_iAnimeIdx - (m_iMove0 + m_iWait0 * 2)) / (m_iMove1 / m_iLoop1));
		if ((m_iAnimeIdx - (m_iMove0 + m_iWait0 * 2)) % (m_iMove1 / m_iLoop1) == m_iMove1 / m_iLoop1 - 1) {
			m_astrNn['dbox'] += sbDrawLabel(iM,iM + iFontHeight * (iPart + 2),iW,iH,'l',iFontSize,'#ffffff',m_astrLabel[iPart + 1]);
		}
		m_actxCv['frdm'].clearRect(0,0,m_iCvWt,m_iCvHt);
		sbDrawLine(m_actxCv['frdm'],0,0,m_iCvWt,m_iCvHt,iSt,iPar,iSize,bFill);
	}
	// ********** End Animation
	if (m_iAnimeIdx == m_iMove0 + m_iWait0 * 2 + m_iMove1 - 1) {
		//m_actxCv['frst'].strokeRect(2,2,m_iCvWt - 4,m_iCvHt - 4);
		//Amazon
		if (m_astrInit.length > 3) {
			sbGetAmazon('links','dentaku01-22','',encodeURIComponent(m_astrInit[3]),'',180,1);
		}
	}
	m_iAnimeIdx ++;
	
	// View Text
	sbViewText();
}

function fnGetHexColor(iR,iG,iB) {
	var strTemp;
	var strColor = '#';
	
	strTemp = iR;
	strTemp = (strTemp < 0 ? 0 : (strTemp > 255 ? 255 : strTemp));
	strTemp = Math.floor(strTemp).toString(16);
	strTemp = (strTemp.length < 2 ? '0' : '') + strTemp;
	strColor += strTemp;
	
	strTemp = iG;
	strTemp = (strTemp < 0 ? 0 : (strTemp > 255 ? 255 : strTemp));
	strTemp = Math.floor(strTemp).toString(16);
	strTemp = (strTemp.length < 2 ? '0' : '') + strTemp;
	strColor += strTemp;
	
	strTemp = iB;
	strTemp = (strTemp < 0 ? 0 : (strTemp > 255 ? 255 : strTemp));
	strTemp = Math.floor(strTemp).toString(16);
	strTemp = (strTemp.length < 2 ? '0' : '') + strTemp;
	strColor += strTemp;
	
	return strColor;
}

function fnCos(iMin,iMax,iNum,iPar) {
	return iMin + (iMax - iMin) * ((1 - Math.cos(iPar * (iNum * 2) * Math.PI)) / 2);
}

function sbSend() {
	var strReq;
	var strName0;
	var strName1;
	
	strName0 = document.getElementById('gen_name0').value;
	strName1 = document.getElementById('gen_name1').value;
	
	strReq = '';
	strReq += '&name=' + encodeURIComponent(strName0 + ';' + strName1);
	strReq += '&plat=' + document.getElementById('gen_plat').value;
	strReq += '&lang=' + document.getElementById('gen_lang').value;
	
	// Cache 
	var dNow = new Date();
	
	if (m_iAnimeIdx == m_iMove0 + m_iMove1 || strReq != m_strReq) {
		document.getElementById('gen_pn').style.backgroundImage = 'none';
		
		m_strReq = strReq;
		
		// Create Object
		var xmlhttp = fnCreateXMLHttp();
		if (xmlhttp) {
			xmlhttp.open('GET', m_strURLSend + '?time=' + dNow.getTime() + strReq);
			xmlhttp.onreadystatechange = function() {
				if (xmlhttp.readyState == 4 && xmlhttp.status == 200) {
					document.getElementById('gen_res').value = xmlhttp.responseText;
				}
			}
			xmlhttp.send(null);
		}
	}
	return false;
}

function sbChangeSize(bRedraw) {
	m_iMainMode = (m_iMainMode + 1) % 5;
	if        (m_iMainMode == 0) { m_iCvWt = 240;
	} else if (m_iMainMode == 1) { m_iCvWt = 320;
	} else if (m_iMainMode == 2) { m_iCvWt = 512;
	} else if (m_iMainMode == 3) { m_iCvWt = 640;
	} else if (m_iMainMode == 4) { m_iCvWt = 720;
	}
	m_iCvHt = m_iCvWt * 0.75;
	
	if (bRedraw) {
		sbInitGame();
	}
}

// ********************************************************************************
// Common
// ********************************************************************************
function sbDrawLabel(iX,iY,iW,iH,strAlign,iFontSize,strColor,strText) {
	var strTemp;
	var strHTML;
	
	iX = Math.round(iX);
	iY = Math.round(iY);
	iW = Math.round(iW);
	iH = Math.round(iH);
	iFontSize = Math.round(iFontSize);
	
	strHTML = '';
	if (iX >= 0 && iY >= 0 && iX + iW <= m_iCvWt && iY + iH <= m_iCvHt) {
		strTemp = strText.replace(/#/g, '<br />');
		strHTML += '<table style="left:' + iX + 'px; top:' + iY + 'px; width:' + iW + 'px;height:' + iH + 'px; font-size:' + iFontSize + 'px; color:' + strColor + ';"><tr><td>' + strTemp + '</td></tr></table>';
	}
	return strHTML;
}

// ********************************************************************************
// Common Layer
// ********************************************************************************
function sbClearAll(strCv,strNb) {
	strCv = ',' + strCv + ',';
	strNb = ',' + strNb + ',';
	var iIdx,strIdx;
	
	for (iIdx = 0; iIdx < m_astrArrayCv.length; iIdx++) {
		strIdx = m_astrArrayCv[iIdx];
		if (strCv.indexOf(strIdx) >= 0) {
			m_actxCv[strIdx].clearRect(0,0,m_iCvWt,m_iCvHt);
		}
	}
	for (iIdx = 0; iIdx < m_astrArrayNb.length; iIdx++) {
		strIdx = m_astrArrayNb[iIdx];
		if (strNb.indexOf(strIdx) >= 0) {
			m_astrNo[strIdx] = '';
			m_astrNn[strIdx] = '';
			m_aelmNb[strIdx].innerHTML = '';
		}
	}
}
function sbViewText() {
	var iIdx,strIdx;
	for (iIdx = 0; iIdx < m_astrArrayNb.length; iIdx++) {
		strIdx = m_astrArrayNb[iIdx];
		if (m_astrNn[strIdx] != m_astrNo[strIdx]) {
			m_astrNo[strIdx] = m_astrNn[strIdx];
			m_aelmNb[strIdx].innerHTML = m_astrNo[strIdx];
		}
	}
}

// ********************************************************************************
// Common Graphic
// ********************************************************************************
function sbAdjustPath(iIdx2,iScaleW,iScaleH) {
	var aiTemp = [];
	var iTempW;
	var iTempH;
	var iZoomin;
	var iMarginX;
	var iMarginY;
	var iX,iY;
	var iIdx;
	var strPath;
	
	iTempW = (m_iCvWt - m_iMargin) / iScaleW;
	iTempH = (m_iCvHt - m_iMargin) / iScaleH;
	iZoomin = (iTempW < iTempH ? iTempW : iTempH)
	iMarginX = m_iCvWt / 2 - iScaleW * iZoomin / 2;
	iMarginY = m_iCvHt / 2 - iScaleH * iZoomin / 2;
	
	strPath = '';
	for (iIdx = 0; iIdx < m_astrPath[iIdx2].length; iIdx++) {
		if        (m_astrPath[iIdx2][iIdx].length == 0) {
		} else if (m_astrPath[iIdx2][iIdx].length == 1) {
			strPath += m_astrPath[iIdx2][iIdx] + ' ';
		} else {
			aiTemp = m_astrPath[iIdx2][iIdx].split(',');
			iX = Number(aiTemp[0]) * iZoomin + iMarginX;
			iY = Number(aiTemp[1]) * iZoomin + iMarginY;
			strPath += iX + ',' + iY + ' ';
		}
	}
	m_astrPath[iIdx2] = strPath.split(' ');
}

function sbDrawLine(ctxCv,iBaseX,iBaseY,iBaseW,iBaseH,iSt,iPar,iSize,bFill) {
	var iX,iY;
	var aiX = [];
	var aiY = [];
	var aiTemp = [];
	var aiCurve = [];
	var iCurve;
	var iIdx,iIdx2;
	var strMode;
	var iCol;
	
	iPar = (iPar < 0 ? 0 : (iPar > 1 ? 1 : iPar));
	
	var bFirst = true;
	m_iMinX = 0;
	m_iMinY = 0;
	m_iMaxX = 0;
	m_iMaxY = 0;
	
	strMode = '';
	iCol = 0;
	for (iIdx = 0; iIdx < m_astrPath[iSt].length; iIdx++) {
		if        (m_astrPath[iSt][iIdx].length == 0) {
		} else if (m_astrPath[iSt][iIdx].length == 1) {
			strMode = m_astrPath[iSt][iIdx];
			if        (strMode == 'M')  {
			} else if (strMode == 'C')  { iCurve = 0;
			} else if (strMode == 'L')  {
			} else if (strMode == 'z')  { bFill ? ctxCv.fill() : ctxCv.stroke();
			} else if (strMode == "\n") {
			} else                      {
			}
		} else {
			for (iIdx2 = 0; iIdx2 <= 1; iIdx2++) {
				aiTemp = m_astrPath[iSt + iIdx2][iIdx].split(',');
				aiX[iIdx2] = Number(aiTemp[0]);
				aiY[iIdx2] = Number(aiTemp[1]);
			}
			iX = Math.round(aiX[0] + (aiX[1] - aiX[0]) * iPar);
			iY = Math.round(aiY[0] + (aiY[1] - aiY[0]) * iPar);
			
			iX = iX * iSize - m_iCvWt * iSize / 2 + m_iCvWt / 2;
			iY = iY * iSize - m_iCvHt * iSize / 2 + m_iCvHt / 2;
			
			iX = iBaseX + iX * (iBaseW / m_iCvWt);
			iY = iBaseY + iY * (iBaseH / m_iCvHt);
			
			if (bFirst || iX < m_iMinX) { m_iMinX = iX; }
			if (bFirst || iY < m_iMinY) { m_iMinY = iY; }
			if (bFirst || iX > m_iMaxX) { m_iMaxX = iX; }
			if (bFirst || iY > m_iMaxY) { m_iMaxY = iY; }
			bFirst = false;
			
			if        (strMode == 'M') {
				iCol = (iCol + 1) % 2;
				ctxCv.beginPath();
				ctxCv.moveTo(iX,iY);
			} else if (strMode == 'C') { 
				aiCurve[iCurve * 2 + 0] = iX;
				aiCurve[iCurve * 2 + 1] = iY;
				iCurve++;
				
				if (iCurve == 3)   {
					ctxCv.bezierCurveTo(aiCurve[0],aiCurve[1],aiCurve[2],aiCurve[3],aiCurve[4],aiCurve[5]);
				}
			} else if (strMode == 'L') { ctxCv.lineTo(iX,iY);
			} else if (strMode == 'z') {
			} else                     {
			}
		}
	}
}

function sbGetParam() {
	var iIdx,iTemp;
	var strKey,strVal;
	var astrParam = [];
	var strQuery = window.location.search.substring(1);
	var astrParam = strQuery.split('&');
	for (iIdx = 0; iIdx < astrParam.length; iIdx++) {
		var iTemp = astrParam[iIdx].indexOf('=');
		if (iTemp > 0) {
			strKey = astrParam[iIdx].substring(0,iTemp);
			strVal = astrParam[iIdx].substring(iTemp + 1);
			astrParam[strKey] = strVal;
		}
	}
	return astrParam;
}

function fnCreateXMLHttp() {
	if(window.ActiveXObject){
		try {
			return new ActiveXObject("Msxml2.XMLHTTP");
		} catch (e) {
			try {
				return new ActiveXObject("Microsoft.XMLHTTP");
			} catch (e2) {
				return null;
	 		}
	 	}
	} else if(window.XMLHttpRequest){
		return new XMLHttpRequest();
	} else {
		return null;
	}
}


// EnterKey Event
var m_elmFocus;
function sbFocus(elmTemp){
	m_elmFocus = elmTemp
	elmTemp.style.backgroundColor = '#ffcccc';
	elmTemp.select();
}

function sbBlur(elmNum){
	elmNum.style.backgroundColor = '';
}

function fnGetKeycode(e){
	if (document.all) {
		return event.keyCode;
	} else if (document.getElementById) {
		return (e.keyCode!=0) ? e.keyCode : e.charCode;
	} else if(document.layers){
		return e.which;
	}
}
function fnKeyPress(e){
	if(fnGetKeycode(e) == 13) {
		if        (m_elmFocus.id == 'gen_send')  { document.getElementById('gen_name0').focus(); sbSend();
		} else if (m_elmFocus.id == 'gen_name0') { document.getElementById('gen_name1').focus();
		} else if (m_elmFocus.id == 'gen_name1') { document.getElementById('gen_send').focus();
		}
		return false;
	}
}
document.onkeypress = fnKeyPress;