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

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

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

var m_iRlMove = 10;
//var m_iRlMove = 2;
var m_iStatusCnt = 5;
var m_iPathSize = 1000;

var m_iCvWt = 768;
var m_iCvHt = m_iCvWt * 12 / (6 * 4);

var m_aiFrameLineY = new Array(6,1,1,1,3);
var m_strForeColor = '#fff';
var m_strBackColor = '#222';
var m_iLineWidth = 1;

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

var m_strReq = '';

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

var m_astrArrayCv = new Array('cvst','cvdm');
var m_astrArrayNb = new Array('lbst','lbdm');
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);
	}
	
	sbInitGame();
	
	// Get Param
	var astrParam = [];
	astrParam = sbGetParam();
	var strReq = '';
	if ('n' in astrParam) {
		strReq = decodeURI(astrParam['n']);
		if (strReq != '') {
			strReq = strReq.replace(/,/g,"\n");
			document.getElementById('gen_name').value = strReq;
			document.getElementById('gen_res').value = '';
			sbSend();
		}
	}
	
	// ********** Start Timer
	m_timAnime = setInterval('sbAnime()',m_iAnimeMilliSec);
}

// ********************************************************************************
function sbInitGame() {
	var iIdx,strIdx;
	
	// ********** 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 = m_iLineWidth;
	}
	
	// ********** Init Value
	m_strDefine = '';
}

function sbAnime() {
	var iIdx,iIdx2,strIdx,iTemp;
	var iX,iY,iZ,iW,iH;
	var strDefine;
	var astrDefine = [];
	var iConstDefine = 2;
	var astrTempPath = [];
	var strTemp;
	
	strDefine = '' + document.getElementById('gen_res').value;
	
	// ********** Start Animation
	if (strDefine != '' && strDefine != m_strDefine) {
		// ********** Init
		astrDefine = strDefine.split('~');
		m_astrInit    = astrDefine[0].split(';');
		m_astrColor   = astrDefine[1].split(';');
		m_astrLabel   = astrDefine[2].split(';');
		astrTempPath  = astrDefine[3].split(';');
		
		m_iPatnCnt = (astrDefine[3] == '' ? 0 : astrTempPath.length);
		m_iNameCnt = m_iPatnCnt / 3 - 1;
		for (iIdx = 0; iIdx < m_iPatnCnt; iIdx++) {
			m_astrPath[iIdx] = fnAdjustPath(astrTempPath[iIdx],m_iPathSize,m_iPathSize,m_iCvWt,m_iCvHt,0);
		}
		
		// ********** Time
		if (m_bFocus == 0) {
			document.getElementById('gen_wait').style.display = 'none';
			document.getElementById('gen_all').style.display = 'block';
			m_bFocus = 1;
		}
		m_dStart = new Date();
		
		
		// ********** Clear And Hidden
		sbClearAll('cvst,cvdm','lbst,lbdm');
		sbViewLayer('cvst,cvdm','lbst,lbdm');
		
		// ********** Draw Back
if (1 == 0) {
		m_actxCv['cvst'].strokeStyle = '#222';
		
		iW = m_iCvWt / 6;
		for (iX = 0; iX <= m_iNameCnt; iX++) {
			m_actxCv['cvst'].beginPath();
			m_actxCv['cvst'].moveTo(m_iCvWt * 0.5 - m_iNameCnt * iW * 0.5 + iX * iW,0);
			m_actxCv['cvst'].lineTo(m_iCvWt * 0.5 - m_iNameCnt * iW * 0.5 + iX * iW,m_iCvHt);
			m_actxCv['cvst'].stroke();
		}
		iH = m_iCvWt / 24;
		iIdx = 0;
		iY = 0;
		while (iIdx < m_aiFrameLineY.length - 1) {
			iY += m_aiFrameLineY[iIdx];
			m_actxCv['cvst'].beginPath();
			m_actxCv['cvst'].moveTo(m_iCvWt * 0.5 - m_iNameCnt * iW * 0.5,iY * iH);
			m_actxCv['cvst'].lineTo(m_iCvWt * 0.5 + m_iNameCnt * iW * 0.5,iY * iH);
			m_actxCv['cvst'].stroke();
			iIdx ++;
		}
}
		m_actxCv['cvst'].fillStyle = '#ffffff';
		m_actxCv['cvst'].strokeStyle = '#ffffff';
		
		// ********** Init Value
		m_iAnimeIdx = 0;
		m_iAnimeMax = (m_iRlMove * m_iPatnCnt) * m_iStatusCnt;
		m_strDefine = strDefine;
		
		// ********** Set Permalink 
		strTemp = window.location.href
		iTemp = strTemp.indexOf('?');
		if (iTemp >= 0) {
			strTemp = strTemp.substring(0,iTemp);
		}
		if (m_astrInit[1] != '') {
			strTemp = strTemp + '?n=' + encodeURI(m_astrInit[1]);
		}
		document.getElementById('gen_url').value = strTemp;
	}
	
	// ********** Draw
	var iAnimeIdx2;
	var iStatusIdx;
	var iSt,iPart;
	var iPar;
	
	if (m_iAnimeIdx >= 0 && m_iAnimeIdx < m_iAnimeMax) {
		// ***** Calc
		iAnimeIdx2 =            m_iAnimeIdx % (m_iRlMove * m_iPatnCnt);
		iStatusIdx = Math.floor(m_iAnimeIdx / (m_iRlMove * m_iPatnCnt));
		
		iSt = Math.floor(iAnimeIdx2 / m_iRlMove);
		iPart = Math.floor(iSt / 3);
		
		if (iStatusIdx == 2) {
			m_actxCv['cvdm'].clearRect(0,0,m_iCvWt,m_iCvHt);
			iPar = (iAnimeIdx2 - iSt * m_iRlMove) / (m_iRlMove - 1);
			iPar = (iPar - 0.3) / 0.7;
			iPar = (iPar < 0) ? 0 : iPar;
			iPar = (iPar > 1) ? 1 : iPar;
			
			if (iSt % 3 < 2 && iPart > 0) {
				if        (iSt % 3 == 0) {
					iX = 0;
					iY = 0;
					iZ = 1;
				} else if (iSt % 3 == 1) {
					iX = - (m_iCvWt / 12) * (m_iNameCnt - (iPart - 1) * 2 - 1) * iPar;
					iY = - (m_iCvWt / 12) * 1.5 * iPar;
					iZ = 1 + ((m_iCvWt / m_iCvHt / 6 * 1.5) - 1) * iPar + Math.sin(iPar * Math.PI) * 0.5;
				}
				sbDrawLine(m_actxCv[(iSt % 3 == 1 && iPar == 1) ? 'cvst' : 'cvdm'],m_iCvWt,m_iCvHt,iX,iY,m_iCvWt,m_iCvHt,m_astrPath[iSt],m_astrPath[iSt + 1],iPar,iZ,m_iLineWidth,'',m_astrColor[iPart]);
			}
		} else {
			iPar = (iAnimeIdx2 - iPart * m_iRlMove * 3) / (m_iRlMove * 3 - 1);
			iPar = (iPar < 0) ? 0 : iPar;
			iPar = (iPar > 1) ? 1 : iPar;
			
			m_astrNn['lbdm'] = '';
			if (iPar > 0) {
				iX = iPart - 1;
				iY = iStatusIdx - (iStatusIdx > 2 ? 1 : 0);
				iW = m_iCvWt / 6;
				iH = m_iCvWt / 24;
				m_astrNn[(iPar == 1) ? 'lbst' : 'lbdm'] += sbDrawLabel(m_iCvWt * 0.5 - m_iNameCnt * iW * 0.5 + iX * iW,(iY + m_aiFrameLineY[0]) * iH,iW,iH * m_aiFrameLineY[iY + 1],(iX < 0? 'r' : 'c'),iH * 0.4,(iX < 0 ? '#886666' : fnGetColor(iPar)),m_astrLabel[iY * (m_iNameCnt + 1) + iPart]);
			}
		}
	}
	
	// ********** End Animation
	if (m_iAnimeIdx == m_iAnimeMax) {
		sbViewLayer('cvst,cvdm','lbst,lbdm');
		
		// ********** Check Time
		dNow = new Date();
		//alert(parseInt((dNow.getTime() - m_dStart.getTime())));
	}
	
	// ********** Add FrameCount
	if (m_iAnimeIdx >= 0 && m_iAnimeIdx <= m_iAnimeMax) {
		m_iAnimeIdx ++;
	}
	
	// View Text
	sbViewText();
}

function fnGetColor(iPar) {
	var strColor = '0123456789ABCDEF'.charAt(Math.floor(15 * iPar));
	return '#' + strColor + strColor + strColor + strColor + strColor + strColor;
}

function sbSend() {
	var strReq;
	var strName;
	
	strName = document.getElementById('gen_name').value.replace(/\n|\r/g,';');
	
	strReq = '';
	strReq += '&name=' + encodeURIComponent(strName);
	strReq += '&plat=' + document.getElementById('gen_plat').value;
	strReq += '&lang=' + document.getElementById('gen_lang').value;
	
	// Cache 
	var dNow = new Date();
	
	if (m_iAnimeIdx > m_iAnimeMax || strReq != m_strReq) {
		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;
}

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

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

// ********************************************************************************
// Common
// ********************************************************************************
function sbDrawLabel(iX,iY,iW,iH,strAlign,iFontSize,strColor,strText) {
	var strStyleAlign;
	var strTemp;
	var strHTML;
	
	iX = Math.round(iX);
	iY = Math.round(iY);
	iW = Math.round(iW);
	iH = Math.round(iH);
	iFontSize = Math.round(iFontSize);
	
	iW = (iW > 0 ? iW : m_iCvWt - iX);
	strStyleAlign = (strAlign == 'c' ? 'center' : (strAlign == 'r' ? 'right' : 'left'));
	
	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 + '; text-align:' + strStyleAlign + ';"><tr><td>' + strTemp + '</td></tr></table>';
	}
	return strHTML;
}

// ********************************************************************************
// Common Layer
// ********************************************************************************
function sbViewLayer(strCv,strNb) {
	strCv = ',' + strCv + ',';
	strNb = ',' + strNb + ',';
	var iIdx,strIdx;
	
	for (iIdx = 0; iIdx < m_astrArrayCv.length; iIdx++) {
		strIdx = m_astrArrayCv[iIdx];
		m_aelmCv[strIdx].style.visibility = (strCv.indexOf(strIdx) >= 0 ? 'visible' : 'hidden');
	}
	for (iIdx = 0; iIdx < m_astrArrayNb.length; iIdx++) {
		strIdx = m_astrArrayNb[iIdx];
		m_aelmNb[strIdx].style.visibility = (strNb.indexOf(strIdx) >= 0 ? 'visible' : 'hidden');
	}
}

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 fnAdjustPath(strPathCt,iScaleW,iScaleH,iCvWt,iCvHt,iMargin) {
	var astrPathCt = [];
	var aiTemp = [];
	var iTempW;
	var iTempH;
	var iZoomin;
	var iMarginX;
	var iMarginY;
	var iX,iY;
	var iIdx;
	var strPath;
	
	astrPathCt = strPathCt.split(' ');
	
	iTempW = (iCvWt - iMargin) / iScaleW;
	iTempH = (iCvHt - iMargin) / iScaleH;
	iZoomin = (iTempW < iTempH ? iTempW : iTempH)
	iMarginX = iCvWt / 2 - iScaleW * iZoomin / 2;
	iMarginY = iCvHt / 2 - iScaleH * iZoomin / 2;
	
	strPath = '';
	for (iIdx = 0; iIdx < astrPathCt.length; iIdx++) {
		if        (astrPathCt[iIdx].length == 0) {
		} else if (astrPathCt[iIdx].length == 1) {
			strPath += astrPathCt[iIdx] + ' ';
		} else {
			aiTemp = astrPathCt[iIdx].split(',');
			iX = Number(aiTemp[0]) * iZoomin + iMarginX;
			iY = Number(aiTemp[1]) * iZoomin + iMarginY;
			strPath += iX + ',' + iY + ' ';
		}
	}
	return strPath;
}

function sbDrawLine(ctxCv,iCvWt,iCvHt,iBaseX,iBaseY,iBaseW,iBaseH,strPathSt,strPathEd,iPar,iSize,iLineWidth,strColorStroke,strColorFill) {
	var iX,iY;
	var aiX = [];
	var aiY = [];
	var aiTemp = [];
	var aiCurve = [];
	var iCurve;
	var iIdx,iIdx2;
	var strMode;
	var iCol;
	var astrPathSt = [];
	var astrPathEd = [];
	var iCnt;
	var iIdx3;
	
	astrPathSt = strPathSt.split(' ');
	astrPathEd = strPathEd.split(' ');
	iCnt = astrPathSt.length;
	
	ctxCv.lineWidth = iLineWidth;
	ctxCv.strokeStyle = strColorStroke;
	ctxCv.fillStyle = strColorFill;
	
	iPar = (iPar < 0 ? 0 : (iPar > 1 ? 1 : iPar));
	
	var iLoopSt = (strColorStroke != '' ? 0 : 1);
	var iLoopEd = (strColorFill   != '' ? 2 : 1);
	
	for (iIdx3 = iLoopSt; iIdx3 < iLoopEd; iIdx3++) {
		strMode = '';
		iCol = 0;
		for (iIdx = 0; iIdx < iCnt; iIdx++) {
			if        (astrPathSt[iIdx].length == 0) {
			} else if (astrPathSt[iIdx].length == 1) {
				strMode = astrPathSt[iIdx];
				if        (strMode == 'M')  {
				} else if (strMode == 'C')  { iCurve = 0;
				} else if (strMode == 'L')  {
				} else if (strMode == 'z')  {
					if        (1 == 0)  {
					} else if (iIdx3 == 0 && strColorStroke != '') { ctxCv.stroke();
					} else if (iIdx3 == 1 && strColorFill   != '') { ctxCv.fill();
					}
				} else if (strMode == "\n") {
				} else                      {
				}
			} else {
				if (iPar == 0) {
					aiTemp = astrPathSt[iIdx].split(',');
					iX = Number(aiTemp[0]);
					iY = Number(aiTemp[1]);
				} else if (iPar == 1) {
					aiTemp = astrPathEd[iIdx].split(',');
					iX = Number(aiTemp[0]);
					iY = Number(aiTemp[1]);
				} else {
					for (iIdx2 = 0; iIdx2 <= 1; iIdx2++) {
						aiTemp = (iIdx2 == 0 ? astrPathSt[iIdx] : astrPathEd[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 - iCvWt * iSize / 2 + iCvWt / 2;
				iY = iY * iSize - iCvHt * iSize / 2 + iCvHt / 2;
				
				iX = iBaseX + iX * (iBaseW / iCvWt);
				iY = iBaseY + iY * (iBaseH / iCvHt);
				
				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;
	}
}