//判斷是否為興櫃股
function IsEmg(sID) {

	var nLeng;

	sID = trim(sID);
	sID = sID.toUpperCase();

	nLeng = sID.length;

	//if (nLeng == 6 || nLeng == 4) {
		if (sID.substring(0,1) == "R" || sID.substring(0,3) == "ASR")
			return true;
	//}

	return false;
}

//去掉空白
function trim(s) 
{
  if (s.length == 0)
   return s;
   
  var b = 0;
  var e = s.length - 1;
 
  while (s.substr(b, 1) == " " && b < s.length - 1) b++;
  while (s.substr(e, 1) == " " && e != 0) e--;
  
  if (b == s.length) // all blank
   return "";
  
  return s.substr(b, e- b + 1);
}

//replace字串(同asp用法)
function replaceString (sStr,rStr,tStr) {
	var sStr_array = sStr.split(rStr);
	var newStr = "";	
	for (i=0 ; i< sStr_array.length ; i++){
	      newStr +=  sStr_array [i] + tStr;
        }                
        newStr = newStr.substring(0,newStr.length-1);
	return newStr;
}

// 兜出 URL  
function mdj_makeURL(sno)
{
	if (typeof(top.mainFrame.content) != 'undefined') 
	{
		var oIframe = top.mainFrame.document.getElementById('SysJustIFRAME');		
		var dd = '' + oIframe.src;
	}	
	
	var dd1 = dd;
	var sURL = "";
	
	sno = sno.toUpperCase();
	dd=dd.toUpperCase();
	
	if (parent.sWhoAmI == 'VIP') {	

		// 興櫃股
		if (IsEmg(sno)) {
			if (dd.indexOf("ZU") == -1) { // 目前為台股個股頁面, 轉到興櫃分時圖
				//如果目前為"即時興櫃個股買賣明細頁",則直接SHOW這頁.
				if (dd.indexOf("ZJDE_") >= 0 && dd.indexOf("_23_") >= 0) 
					sURL = "/z/vipRedirect.asp?URL=/z/zj/zjd/zjda/zjde_" + sno + "_23.djhtm";
				else
					sURL = "/z/vipRedirect.asp?URL=/z/zj/zjd/zjda/zjde_" + sno + "_21.djhtm";
				
			}
			else { // 目前為興櫃, 換股號
				//alert(dd);
				
				var arr = dd.split("_");
				
				if (arr.length == 2) {
					var arr2 = arr[1].split(".");
					sURL = arr[0] + '_' + 'AS' + sno + '.' + arr2[1];
					//alert(sURL);
				}
				else {
					for (i = 0; i < arr.length; i++) {
						if (!IsEmg(arr[i])) // 非股號參數
							sURL = sURL + arr[i];	
						else
							sURL = sURL + 'AS' + sno;	
						
						if (i != arr.length - 1)
						 	sURL = sURL + "_";	
					}
					
					//alert(sURL);
				}
			}
			return sURL;
		}
	
		// 目前為興櫃個股頁面, 切換到台股個股分時圖
		if (IsEmg(sno) == false && dd.indexOf("ZU") != -1) {
			sURL = "/z/VipRedirect.asp?URL=/z/zj/zja/zjag/zjag_" + sno + "_1_E_E.djhtm";	
			return sURL;
		}

		if (sno.substring(0,1) == "0" || sno.substring(0,2) == "85") {
			if (dd.indexOf("/Z/ZC/ZCW/ZCW_") != -1 || 
				dd.indexOf("/Z/ZC/ZCW/ZCWG/ZCWG_") != -1 ||
				dd.indexOf("/Z/ZC/ZC0/ZC08/ZC08_") != -1) {
				sURL = dd.substring(dd.indexOf("/Z/ZC/ZC"),dd.indexOf("_") + 1) + sno + ".djhtm";
			} else {
				currPath = parent.up1.History1.ShowCur();
				if (currPath.toLowerCase().indexOf("/z/zj/zja/zjag/zjag_") != -1) {
					var d1 = currPath.substring(currPath.toLowerCase().indexOf("/z/zj/zja/zjag/zjag_"),currPath.indexOf("_")+1);
						var p1 = currPath.substring(currPath.indexOf("_")+1,currPath.length);
						var d2 = p1.substring(0,p1.indexOf("."));
						var d3 = p1.substring(p1.indexOf("."),p1.length);
						var p = d2.split("_");
						p[0] = sno;
						p[3] = "E";
						if (sno.length == 5 || sno.substring(0,1) == "0" || sno.substring(0,2) == "85") {
							p[2] = "D";
						}
						var pStr = "";
						for (i = 0; i < p.length - 1; i++)
							pStr = pStr + p[i] + "_";
						sURL = "/z/VipRedirect.asp?URL=" + d1 + pStr.substring(0,pStr.length-1) + d3;
				} else
					sURL = "/z/VipRedirect.asp?URL=/z/zj/zja/zjag/zjag_" + sno + "_1_E_E.djhtm";
			}
			return sURL;
		}
	}
	
	//alert('sno=' + sno);	
	if((j=dd.indexOf("/Z/ZC/ZC")) != -1 && 
		!(dd.charAt(j+8) == '0' && dd.charAt(j+13) == '_') &&
		(i=dd.indexOf("_")) != -1 && 
		((k=dd.indexOf(".ASP.HTM")) != -1 || (k=dd.indexOf(".DJHTM")) != -1)) {
		if((kk=dd.indexOf("Z_")) >= 0) {
			while (dd.charAt(kk) != "/" && kk > 0) kk--;

			if(kk>0) {
				if(dd.indexOf("VZ_") >= 0)
					sURL = dd.substring(j, kk-1)+"_" +sno+"_E_1.ASP.HTM";
				else
					sURL = dd.substring(j, kk-1)+"_" +sno+"_E_E_E_E_1.ASP.HTM";
			} 
			else {
				if (parent.sWhoAmI == 'VIP') {
					currPath = parent.up1.History1.ShowCur();
					if (currPath.toLowerCase().indexOf("/z/zj/zja/zjag/zjag_") != -1) {
						var d1 = currPath.substring(currPath.toLowerCase().indexOf("/z/zj/zja/zjag/zjag_"),currPath.indexOf("_")+1);
						var p1 = currPath.substring(currPath.indexOf("_")+1,currPath.length);
						var d2 = p1.substring(0,p1.indexOf("."));
						var d3 = p1.substring(p1.indexOf("."),p1.length);
						var p = d2.split("_");
						p[0] = sno;
						p[3] = "E";
						if (sno.length == 5 || sno.substring(0,1) == "0" || sno.substring(0,2) == "85") {
							p[2] = "D";
						}
						var pStr = "";
						for (i = 0; i < p.length - 1; i++)
							pStr = pStr + p[i] + "_";
						sURL = "/z/VipRedirect.asp?URL=" + d1 + pStr.substring(0,pStr.length-1) + d3;
					} else
						sURL = "/z/VipRedirect.asp?URL=/z/zj/zja/zjag/zjag_" + sno + "_1_E_E.ASP.HTM";
				}
				else {			
					sURL = "/Z/ZC/ZCW/ZCW_" + sno + ".ASP.HTM";
				}
			}
		} 
		else {
			if (sno.substring(0,1) == "0" || sno.substring(0,2) == "85") {
				if (dd.indexOf("/Z/ZC/ZCW/ZCW_") != -1 || 
					dd.indexOf("/Z/ZC/ZCW/ZCWG/ZCWG_") != -1 ||
					dd.indexOf("/Z/ZC/ZC0/ZC08/ZC08_") != -1) {
					tt = dd.substring(j,i+1)+sno;//+dd.substring(i+5,k);
					sURL = tt + ".ASP.HTM";
				} else {
					tt = "/Z/ZC/ZCW/ZCW_" + sno;
					sURL = tt + ".ASP.HTM";
				}
			} else {
				tt = dd.substring(j,i+1)+sno;//+dd.substring(i+5,k);
				tt1 = dd.substring(i+1,dd.length);
				if (tt1.indexOf("_") != -1)
					tt2 = tt1.substring(tt1.indexOf("_"),tt1.length);
				else
					tt2 = tt1.substring(tt1.indexOf("."),tt1.length);
				sURL = tt + tt2;
			}
		}
	} 
	else {
		// for 前台 asp, 置換 SID 後面的股號
		var sTalk = "ZLX"; // 個股討論區 key word
		var sTalkHome = "ZLX16.ASP?SID=";	// 個股討論區首頁 key word
		var sNote ="NOTE";	// 個股筆記本 key word
		var sSID = "SID=";
		var bTalk = dd.indexOf(sTalk) != -1 ? true : false;
		var bTalkHome = dd.indexOf(sTalkHome) != -1 ? true : false;
		var bNote = dd.indexOf(sNote) != -1 ? true : false;
		var j=dd.indexOf(sSID);
							
		if (bTalk) { // 討論區
			if (bTalkHome) { // 討論區首頁, 可換股號
				var stkno = "" + sno;	
				i=dd.indexOf("/Z/ZC/ZC");	
				sURL = dd.substring(i, j + sSID.length) + stkno;
			}	
			else {	//不能換股號的, 跳到個股討論區首頁
				sURL = "/Z/zc/zc5/ZLX16.asp?SID=" + sno;
			}
		}
		else if (bNote) { // 筆記區, 可換股號
			var stkno = "" + sno;	
//			var sEnd = "" + dd.substring(j + sSID.length + stkno.length, dd.length);
		
			i=dd.indexOf("/Z/ZC/ZC");	
			sURL = dd.substring(i, j + sSID.length) + stkno;// + sEnd;	
		}
		else { // 不曉得哪來的? 跳到個股 K 線圖
			if (parent.sWhoAmI == 'VIP') {
				if (sno.substring(0,1) == "R")
					sURL = "/z/vipRedirect.asp?URL=/z/zj/zjd/zjda/zjde_" + sno + "_21.djhtm";
				else {
					currPath = parent.up1.History1.ShowCur();
					if (currPath.toLowerCase().indexOf("/z/zj/zja/zjag/zjag_") != -1) {
						var d1 = currPath.substring(currPath.toLowerCase().indexOf("/z/zj/zja/zjag/zjag_"),currPath.indexOf("_")+1);
						var p1 = currPath.substring(currPath.indexOf("_")+1,currPath.length);
						var d2 = p1.substring(0,p1.indexOf("."));
						var d3 = p1.substring(p1.indexOf("."),p1.length);
						var p = d2.split("_");
						p[0] = sno;
						p[3] = "E";
						if (sno.length == 5 || sno.substring(0,1) == "0" || sno.substring(0,2) == "85") {
							p[2] = "D";
						}
						var pStr = "";
						for (i = 0; i < p.length - 1; i++)
							pStr = pStr + p[i] + "_";
						sURL = "/z/VipRedirect.asp?URL=" + d1 + pStr.substring(0,pStr.length-1) + d3;
					} else
						sURL = "/z/VipRedirect.asp?URL=/z/zj/zja/zjag/zjag_" + sno + "_1_E_E.ASP.HTM";
				}
			}
			else	
//				if(parent.up1.FrmID==3)	//研究報告...跳到個股.
//				{
//					sURL = "/Z/ZC/ZCT/ZCT_" + sno + ".djhtm";
//				}	
//				else if(parent.up1.FrmID==16)	//即時新聞...到個股新聞
//				{
//					sURL = '/z/zc/zcv/zcv_' + sno + '.djhtm';
//				}
//				else
				{	
					if ( isSpecialKind(sno) )		
						sURL = "/Z/ZC/ZCW/ZCW_" + sno + ".ASP.HTM";
					else
						sURL = "/Z/ZC/ZCX/ZCX_" + sno + ".ASP.HTM";
				}
		}
	}	
	return sURL;
}