/******************************************************************************
' Filename:       persianPopupCalendar.js
' Author:         Shahram Darvishi
' E-Mail:					Sloveir@yahoo.com (please mention persianPopupCalendar in subject)
' Project:        Persian Popup Calendar
' =============================================================================
' Copyright (c) 2006, Shahram Darvishi. All rights reserved.
'
' Permission is hereby granted, free of charge, to any person obtaining a copy
' of this script and associated files, to deal in the Software without restriction
' including without limitation the rights.
' to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
' copies of the Script, and to permit persons to whom the Software is
' furnished to do so, subject to the following conditions:
'
' The above copyright notice and this permission notice shall be included in
' all copies or substantial portions of the Scripts:
'
' THE SCRIPT IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
' IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
' FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
' AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
' LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
' OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
' SOFTWARE.
'
' =============================================================================
'	Thanks to:
' - Xin Yang (http://www.yxscripts.com) for his "Popup Calendar(Window)"
' which I have used as base kernel of this script.
' - Mehdi Vojoudi (http://www.vojoudi.com) for his Solar Date Conversion algorithms
' =============================================================================
'
' I will really appreciate if you send me any changed, fixed bugs or
' extended version of this Script by you to help to extend the script.
' Also I will have the pleasure to receive any reported bug and suggestions.
'
' You can use following fields to record your name to prove your
' Development participate in Persian Popup Calendar Script project.
'
' =============================================================================
' Date          Person							Description
' ----------    ----------------		---------------------------------
' 30.03.2006    Shahram Darvishi  	Initial Version
' 31.03.2006    Shahram Darvishi		Fix a bug in Return of Current date
' 20.04.2006    Shahram Darvishi		Major Change, Design as DIV instead of Window
'
*******************************************************************************/

// default settings
var fontFace="Tahoma";
var fontSize=11;

var titleWidth=100;
var titleMode=1;
var dayWidth=11;
var dayDigits=1;
var mmm=0;
var yyyy=0;

var titleColor="#F5CA1B";
var daysColor="#EEBB89";
var bodyColor="#FFFFCC";
var dayColor="#FFFF99";


var currentDayColor="#8080FF";
var footColor="#F5CA1B";
var borderColor="#333333";

var titleFontColor = "#333333";
var daysFontColor = "#333333";
var dayFontColor = "#333333";
var holidayFontColor = "#FF0000";
var currentDayFontColor = "#ffffff";
var footFontColor = "#333333";

var calFormat = "yyyy/mm/dd";

var weekDay = 0;
var dayCorrection = 4;
// ------

// codes
var calWidth=200, calHeight=200, calOffsetX=0, calOffsetY=0;
var calWin=null;
var winX=0, winY=0;
var cal="cal";
var cals=new Array();
var currentCal=null;

var yxMonths=new Array("فروردین", "اردیبهشت", "خرداد", "تیر", "مرداد", "شهریور", "مهر", "آبان", "آذر", "دی", "بهمن", "اسفند");
var yxDays=new Array("ش","ی","د", "س", "چ", "پ", "ج","ش");
var yxLinks=new Array("[پاک کردن]", "[بستن]");

var nav=navigator.userAgent.toLowerCase();
var isOpera=(nav.indexOf("opera")!=-1)?true:false;
var isOpera5=(nav.indexOf("opera 5")!=-1 || nav.indexOf("opera/5")!=-1)?true:false;
var isOpera6=(isOpera && parseInt(navigator.appVersion)>=6)?true:false;
var isN6=(nav.indexOf("gecko")!=-1);
var isN4=(document.layers)?true:false;
var isMac=(nav.indexOf("mac")!=-1);
var isIE=(document.all && !isOpera && (!isMac || navigator.appVersion.indexOf("MSIE 4")==-1))?true:false;

if (isN4) {
  fontSize+=2;
}

var span2="</span>";

var underLineIndex = -1;

function showCalendar() {
    currentCal.calIFrameContainer.style.visibility = 'visible';
  	currentCal.calDivContainer.style.visibility = 'visible';
}

function hideCalendar() {
    currentCal.calIFrameContainer.style.visibility = 'hidden';
  	currentCal.calDivContainer.style.visibility = 'hidden';
}

function hideAllCalendars() {
   for (var i = 0; i < cals.length; i ++) {
    cals[i].calIFrameContainer.style.visibility = 'hidden';
  	cals[i].calDivContainer.style.visibility = 'hidden';
	}
}

function span1(tag) {
  return "<span class='"+tag+"'>";
}
function spanx(tag, color) {
  return "."+tag+" { font-family:"+fontFace+"; font-size:"+fontSize+"px; color:"+color+"; }\n";
}

function a1(tag,tt) {
  return "<a class='"+tag+"' title='"+tt+"' href=";
}

function ax(tag, color) {
  return "."+tag+" { text-decoration:none; color:"+color+"; }\n";
}

function calOBJ(name, title, field, form) {
  this.name = name;
  this.title = title;
  this.field = field;
  this.formName = form;
  this.form = null;
	
	var tmpIframe = document.createElement("IFRAME");
	tmpIframe.id = name;
	tmpIframe.style.visibility = 'hidden';
  tmpIframe.style.position = 'absolute';
  tmpIframe.style.top = 0;
  tmpIframe.style.left = 0;
  tmpIframe.width = 0;
  tmpIframe.height = 0;
  tmpIframe.style.border = 0;
  tmpIframe.style.zIndex = 10000;
  document.body.appendChild(tmpIframe);

	var tmpContainer = document.createElement("DIV");
	tmpContainer.id = name;
	tmpContainer.style.visibility = 'hidden';
  tmpContainer.style.position = 'absolute';
  tmpContainer.style.top = 0;
  tmpContainer.style.left = 0;
  tmpContainer.width = 0;
  tmpContainer.height = 0;
  tmpContainer.style.border = 0;
  tmpContainer.style.zIndex = 10001;
  document.body.appendChild(tmpContainer);
  
  this.calIFrameContainer = tmpIframe;
  this.calDivContainer = tmpContainer
}

function findPosX()
{
	var fField = eval('document.' + currentCal.formName + '.' + currentCal.field);

	var curleft = 0;
	if (fField.offsetParent)
	{
		while (fField.offsetParent)
		{
			curleft += fField.offsetLeft;
			fField = fField.offsetParent;
		}
	}
	else if (fField.x)
		curleft += fField.x;
	return curleft;
}

function findPosY()
{
	var fField = eval('document.' + currentCal.formName + '.' + currentCal.field);
	var fHeight = fField.offsetHeight;//86-8-13
	
	var curtop = 0;
	if (fField.offsetParent)
	{
		while (fField.offsetParent)
		{
			curtop += fField.offsetTop;
			fField = fField.offsetParent;
		}
	}
	else if (fField.y)
		curtop += fField.y;
	return curtop + fHeight;
}

function setFont(font, size) {
  if (font != "") {
    fontFace=font;
  }
  if (size > 0) {
    fontSize=size;

    if (isN4) {
      fontSize+=2;
    }
  }
}

function setWidth(tWidth, tMode, dWidth, dDigits) {
  if (tWidth > 0) {
    titleWidth=tWidth;
  }
  if (tMode == 1 || tMode == 2) {
    titleMode=tMode;
  }
  if (dWidth > 0) {
    dayWidth=dWidth;
  }
  if (dDigits > 0) {
    dayDigits=dDigits;
  }
}

function setColor(tColor, dsColor, bColor, dColor, cdColor, fColor, bdColor) {
  if (tColor != "") {
    titleColor=tColor;
  }
  if (dsColor != "") {
    daysColor=dsColor;
  }
  if (bColor != "") {
    bodyColor=bColor;
  }
  if (dColor != "") {
    dayColor=dColor;
  }
  if (cdColor != "") {
    currentDayColor=cdColor;
  }
  if (fColor != "") {
    footColor=fColor;
  }
  if (bdColor != "") {
    borderColor=bdColor;
  }
}

function setFontColor(tColorFont, dsColorFont, dColorFont, cdColorFont, fColorFont) {
  if (tColorFont != "") {
    titleFontColor=tColorFont;
  }
  if (dsColorFont != "") {
    daysFontColor=dsColorFont;
  }
  if (dColorFont != "") {
    dayFontColor=dColorFont;
  }
  if (cdColorFont != "") {
    currentDayFontColor=cdColorFont;
  }
  if (fColorFont != "") {
    footFontColor=fColorFont;
  }
}

function setFormat(format) {
  calFormat = format;
}

function setSize(width, height, ox, oy) {
  if (width > 0) {
    calWidth=width;
  }
  if (height > 0) {
    calHeight=height;
  }

  calOffsetX=ox;
  calOffsetY=oy;
}

function setWeekDay(wDay) {
  if (wDay == 0 || wDay == 1) {
    weekDay = wDay;
  }
}

function setMonthNames(janName, febName, marName, aprName, mayName, junName, julName, augName, sepName, octName, novName, decName) {
  if (janName != "") {
    yxMonths[0] = janName;
  }
  if (febName != "") {
    yxMonths[1] = febName;
  }
  if (marName != "") {
    yxMonths[2] = marName;
  }
  if (aprName != "") {
    yxMonths[3] = aprName;
  }
  if (mayName != "") {
    yxMonths[4] = mayName;
  }
  if (junName != "") {
    yxMonths[5] = junName;
  }
  if (julName != "") {
    yxMonths[6] = julName;
  }
  if (augName != "") {
    yxMonths[7] = augName;
  }
  if (sepName != "") {
    yxMonths[8] = sepName;
  }
  if (octName != "") {
    yxMonths[9] = octName;
  }
  if (novName != "") {
    yxMonths[10] = novName;
  }
  if (decName != "") {
    yxMonths[11] = decName;
  }
}

function setDayNames(sunName, monName, tueName, wedName, thuName, friName, satName) {
  if (sunName != "") {
    yxDays[0] = sunName;
    yxDays[7] = sunName;
  }
  if (monName != "") {
    yxDays[1] = monName;
  }
  if (tueName != "") {
    yxDays[2] = tueName;
  }
  if (wedName != "") {
    yxDays[3] = wedName;
  }
  if (thuName != "") {
    yxDays[4] = thuName;
  }
  if (friName != "") {
    yxDays[5] = friName;
  }
  if (satName != "") {
    yxDays[6] = satName;
  }
}

function setLinkNames(closeLink, clearLink) {
  if (closeLink != "") {
    yxLinks[0] = closeLink;
  }
  if (clearLink != "") {
    yxLinks[1] = clearLink;
  }
}

function addCalendar(name, title, field, form) {
	
	
	
	// At first, I should change the fileds name not to have ":" // 86-5-30
	if(field.indexOf(":") != -1)
	{
		if(field.indexOf("_") == -1)
		{
			myfield = field.split(":");
			myfieldStr = "";
			for(i=0; i<myfield.length; i++)
			{
				myfieldStr += myfield[i]+"_";
			}	
			myfield2 = myfieldStr.substr(0,myfieldStr.length-1);			
  			
			if(document.guppyForm[field].name == document.guppyForm[field].id)
			{
				document.guppyForm[field].name = myfield2;  // here is form name to change 86-5-2
				document.guppyForm[field].id = myfield2;  // here is form name to change 86-5-2
			}
			else
				document.guppyForm[field].name = myfield2;  // here is form name to change 86-5-2
			//alert('true 406')
			
		}
		else
		{
			fieldArray = new Array();
			for(i=0; i<field.length; i++)
			{
				fieldArray[i] = field.substr(i,1)				
			}
			
			for(i=0; i<fieldArray.length; i++)
				if(fieldArray[i] == "_")
					underLineIndex = i;
					
			myfield = field.split(":");
  			myfieldStr = "";
			for(i=0; i<myfield.length; i++)
			{
				myfieldStr += myfield[i]+"_";
			}	
			myfield2 = myfieldStr.substr(0,myfieldStr.length-1);
			
			if(document.guppyForm[field].name == document.guppyForm[field].id)
			{
				document.guppyForm[field].name = myfield2;  // here is form name to change 86-5-2
				document.guppyForm[field].id = myfield2;  // here is form name to change 86-5-2
			}
			else
				document.guppyForm[field].name = myfield2;  // here is form name to change 86-5-2
				
				//alert('true 437')
			
			//alert(document.guppyForm[field].name)
		}
	}//if(field.indexOf(":") != -1)  
    
  cals[cals.length] = new calOBJ(name, title, myfield2, form);
}

function findCalendar(name) {
  
  for (var i = 0; i < cals.length; i++) {
    
    if (cals[i].name == name) {
      if (cals[i].form == null) {
        if (cals[i].formName == "") {
          if (document.forms[0]) {
            cals[i].form = document.forms[0];
          }
        }
        else if (document.forms[cals[i].formName]) {
          cals[i].form = document.forms[cals[i].formName];
          
          
          //cals[i].form = document.getElementById[name];
                

        }
      }

      return cals[i];
    }
  }

  return null;
}

function getDayName(y,m,d) {
  var wd=new Date(y,m,d);
  return yxDays[wd.getDay()].substring(0,3);
}

function getMonthFromName(m3) {
  for (var i = 0; i < yxMonths.length; i++) {
    if (yxMonths[i].toLowerCase().substring(0,3) == m3.toLowerCase()) {
      return i;
    }
  }

  return 0;
}

function getFormat() {
  var calF = calFormat;

  calF = calF.replace(/\\/g, '\\\\');
  calF = calF.replace(/\//g, '\\\/');
  calF = calF.replace(/\[/g, '\\\[');
  calF = calF.replace(/\]/g, '\\\]');
  calF = calF.replace(/\(/g, '\\\(');
  calF = calF.replace(/\)/g, '\\\)');
  calF = calF.replace(/\{/g, '\\\{');
  calF = calF.replace(/\}/g, '\\\}');
  calF = calF.replace(/\</g, '\\\<');
  calF = calF.replace(/\>/g, '\\\>');
  calF = calF.replace(/\|/g, '\\\|');
  calF = calF.replace(/\*/g, '\\\*');
  calF = calF.replace(/\?/g, '\\\?');
  calF = calF.replace(/\+/g, '\\\+');
  calF = calF.replace(/\^/g, '\\\^');
  calF = calF.replace(/\$/g, '\\\$');

  calF = calF.replace(/dd/i, '\\d\\d');
  calF = calF.replace(/mm/i, '\\d\\d');
  calF = calF.replace(/yyyy/i, '\\d\\d\\d\\d');
  calF = calF.replace(/day/i, '\\w\\w\\w');
  calF = calF.replace(/mon/i, '\\w\\w\\w');

  return new RegExp(calF);
}

function getDateNumbers(date) {
  var y, m, d;

  var yIdx = calFormat.search(/yyyy/i);
  var mIdx = calFormat.search(/mm/i);
  var m3Idx = calFormat.search(/mon/i);
  var dIdx = calFormat.search(/dd/i);

  y=date.substring(yIdx,yIdx+4)-0;
  if (mIdx != -1) {
    m=date.substring(mIdx,mIdx+2)-1;
  }
  else {
    var m = getMonthFromName(date.substring(m3Idx,m3Idx+3));
  }
  d=date.substring(dIdx,dIdx+2)-0;
  return new Array(y,m,d);
}

function getLeftIE(x,m) {
  var dx=0;
  if (x.tagName=="TD"){
    dx=x.offsetLeft;
  }
  else if (x.tagName=="TABLE") {
    dx=x.offsetLeft;
    if (m) { dx+=(x.cellPadding!=""?parseInt(x.cellPadding):2); m=false; }
  }
  return dx+(x.parentElement.tagName=="BODY"?0:getLeftIE(x.parentElement,m));
}
function getTopIE(x,m) {
  var dy=0;
  if (x.tagName=="TR"){
    dy=x.offsetTop;
  }
  else if (x.tagName=="TABLE") {
    dy=x.offsetTop;
    if (m) { dy+=(x.cellPadding!=""?parseInt(x.cellPadding):2); m=false; }
  }
  return dy+(x.parentElement.tagName=="BODY"?0:getTopIE(x.parentElement,m));
}

function getLeftN4(l) { return l.pageX; }
function getTopN4(l) { return l.pageY; }

function getLeftN6(l) { return l.offsetLeft; }
function getTopN6(l) { return l.offsetTop; }

function lastDay(d) {
  var yy=d.getFullYear(), mm=d.getMonth() + 1;

  if (mm >= 1 && mm <= 6) return 31;
  if (mm >= 7 && mm <= 11) return 30;
  if (mm == 12)
  	if (IsLeapYear(dkSolar, yy)) return 30;
  	else return 29;
}

function firstDay(d) {
  var yy=d.getFullYear(), mm=d.getMonth() + 1;
  var fd=SolarToGregorian(yy, mm, 1);

  var dd = fd.getDay() + 2;

  if (dd > 6)
  	dd -= 6;

  return dd;
}

function dayDisplay(i) {
  if (dayDigits == 0) {
    return yxDays[i];
  }
  else {
    return yxDays[i].substring(0,dayDigits);
  }
}

function calTitle(d) {
  var yy=d.getFullYear(), mm=yxMonths[d.getMonth()];
  var s;
  if (titleMode == 2) {
    s="<tr align='center' bgcolor='"+titleColor+"'><td colspan='7'>\n<table dir='rtl' cellpadding='0' cellspacing='0' border='0'><tr align='center' valign='middle'><td align='center'>"+span1("title")+"<b>"+a1("titlea")+"'javascript: moveYear(-10)'>&nbsp;&#171;</a>&nbsp;"+a1("titlea")+"'javascript:moveYear(-1)'>&#139;&nbsp;</a></b>"+span2+"</td><td width='"+titleWidth+"'><b>"+span1("title")+getFarsiNumber(yy)+span2+"</b></td><td align='left'>"+span1("title")+"<b>"+a1("titlea")+"'javascript:moveYear(1)'>&nbsp;&#155;</a>&nbsp;"+a1("titlea")+"'javascript:moveYear(10)'>&#187;&nbsp;</a></b>"+span2+"</td></tr><tr align='center' valign='middle'><td align='right'>"+span1("title")+"<b>"+a1("titlea")+"'javascript:prepMonth("+d.getMonth()+")'>&nbsp;&#139;&nbsp;</a></b>"+span2+"</td><td width='"+titleWidth+"'><b>"+span1("title")+mm+span2+"</b></td><td align='left'>"+span1("title")+"<b>"+a1("titlea")+"'javascript:nextMonth("+d.getMonth()+")'>&nbsp;&#155;&nbsp;</a></b>"+span2+"</td></tr></table>\n</td></tr><tr align='center' bgcolor='"+daysColor+"'>";
  }
  else {
    s="<tr  bgcolor='"+titleColor+"'><td  height='18' colspan='7'>\n<table dir='rtl' cellpadding='0' cellspacing='0' border='0'><tr align='center' valign='middle'><td>"+span1("title")+"<b>"+a1("titlea")+"'javascript:moveYear(-1)'>&nbsp;&#171;</a>&nbsp;"+a1("titlea")+"'javascript:prepMonth("+d.getMonth()+")'>&#139;&nbsp;</a></b>"+span2+"</td><td width='"+titleWidth+"'><nobr><b>"+span1("title")+mm+" "+getFarsiNumber(yy)+span2+"</b></nobr></td><td>"+span1("title")+"<b>"+a1("titlea")+"'javascript:nextMonth("+d.getMonth()+")'>&nbsp;&#155;</a>&nbsp;"+a1("titlea")+"'javascript:moveYear(1)'>&#187;&nbsp;</a></b>"+span2+"</td></tr></table>\n</td></tr><tr bgcolor='"+daysColor+"'>";
  }
  // Fill Week Header  
  for (var i = weekDay; i < weekDay + 7; i ++) {
//    s+="<td width='"+dayWidth+"'>"+span1("days")+dayDisplay(i)+span2+" </td>";

s+="<td align='center' width='"+dayWidth+"' bgcolor='#FFCC66' height='15'  align='center' >"+span1("days")+dayDisplay(i)+span2+" </td>";
  }
  s+="</tr>";

  return s;
}

function calHeader() {
  return "<table dir='rtl'  align='center' border='1' bgcolor='"+borderColor+"' cellspacing='0' cellpadding='1'><tr><td>\n<style type='text/css'>\n"+spanx("title",titleFontColor)+spanx("days",daysFontColor)+spanx("foot",footColor)+spanx("holiday",holidayFontColor)+spanx("day",dayFontColor)+spanx("currentDay",currentDayFontColor)+ax("titlea",titleFontColor)+ax("daya",dayFontColor)+ax("haya",holidayFontColor)+ax("currenta",currentDayFontColor)+ax("foota",footFontColor)+"</style>\n<table dir='rtl' cellspacing='1' cellpadding='0' border='0'  >";
}

function calFooterClick(d) {
	var cd=GregorianToSolar(0, 0, 0);
	cM = cd.getMonth();
	cY = cd.getFullYear();
	pickDate2(d);
}
//D1
function calFooter() {
	var s = '';
	var cd=GregorianToSolar(0, 0, 0);

	var mm=yxMonths[cd.getMonth()];
    mmm=cd.getMonth();
    yyy=cd.getFullYear();
	s += 'امروز: ';
	s += getFarsiNumber(cd.getDate()) + '&nbsp;';
	s += mm + '&nbsp;';
	s += getFarsiNumber(cd.getFullYear());
  return "<tr height='20' bgcolor='"+footColor+"'><td colspan='7' align='center'>"+span1("foot")+"<b>"+a1("foota")+"'javascript: calFooterClick("+cd.getDate()+")'>"+s+"</a></b>"+span2+"</td></tr></table>\n</td></tr></table>\n";
}

function calBody(d,day) {
  var s="",  dayCount=1, fd=firstDay(d), ld=lastDay(d);
	var arrCal = new Array(6);
	var i, j, k;
	var blnRowHasValue = false;
  if (weekDay > 0 && fd == 0) {
    fd = 7;
  }
  //bodyColor
  for (i = 0; i < 6; i++) {
    s = "<tr align='center' bgcolor='"+bodyColor+"'>";
		for (j = 0; j < 7; j ++)
        s += "<td>"+span1("day")+"&nbsp;"+span2+"</td>";
    s += "</tr>";
    
    arrCal[i] = s;
    
	}
  k = 0;
var d=0;
var c=0;
  for (i = 0; i < 6; i++) {
    blnRowHasValue = false;
    //Free Row
    s = "<tr align='center' bgcolor='"+"#FFF0FA"+"'>";
    for (j = weekDay - dayCorrection; j < weekDay + 7 - dayCorrection; j++) {
      if (i * 7 + j < fd || dayCount > ld) {
        s += "<td>"+span1("day")+"&nbsp;"+span2+"</td>";
        if (d=!0)
            {c=c+1;}
      }
      else {
                if (d=!0)
                    {
                        if (c>7)
                            {
                                c=c-7;
                           }
                           else
                           {
                            //c=c+1;
                           }
                   }        
                d=0;
                //alert(dayCount);
                //alert(weekDay + 7 - dayCorrection);
      	  blnRowHasValue = true;
          bgColor=currentDayColor;
          fgTag="currentDay";
          fgTagA="currenta";
  	    if ((dayCount + c) % 7 == 0 )
      	{
            var fgTag="holiday";
            var fgTagA="haya";
            var bgColor=dayColor;
      	}
        else
        {
            var fgTag="day";
            var fgTagA="daya";
            var bgColor=dayColor;
        }
//=========================== Holiday Year
        var tt=""        ;
        if (mmm==1)
        {
            if ((dayCount==1) || (dayCount==2) || (dayCount==3) || (dayCount==4) || (dayCount==5)  || (dayCount==12)  || (dayCount==13))
            {
                var fgTag="holiday";
                var fgTagA="haya";
                var bgColor=dayColor;
            }
            tt="تعطیلات نوروز";
            if (dayCount==12) {tt="روز جمهوری اسلامی"};
            if (dayCount==13) {tt="روز طبیعت"};
        }

        if (mmm==3)
        {
            if ((dayCount==14) || (dayCount==15))
            {
                var fgTag="holiday";
                var fgTagA="haya";
                var bgColor=dayColor;
            }
            if (dayCount==14) {tt="وفات حضرت امام خمینی"};
            if (dayCount==15) {tt="قیام پانزده خرداد"};
        }

        if (mmm==11)
        {
            if ((dayCount==22) )
            {
                var fgTag="holiday";
                var fgTagA="haya";
                var bgColor=dayColor;
            }
            tt="روز پیروزی انقلاب اسلامی";
        }

        if (mmm==12)
        {
            if ((dayCount==29) )
            {
                var fgTag="holiday";
                var fgTagA="haya";
                var bgColor=dayColor;
            }
            tt="روز ملی شدن صنعت نفت";
        }
//=========================== Holiday Year 1385        
   if (yyy==1385)
    { 
        if (mmm==4)
        {
            if ((dayCount==8) )
            {
                var fgTag="holiday";
                var fgTagA="haya";
                var bgColor=dayColor;
                tt="شهادت حضرت فاطمه";
            }
           } 

        if (mmm==5)
        {
            if ((dayCount==17) )
            {
                var fgTag="holiday";
                var fgTagA="haya";
                var bgColor=dayColor;
                tt="ولادت حضرت علی";
            }
           } 

        if (mmm==5)
        {
            if ((dayCount==31) )
            {
                var fgTag="holiday";
                var fgTagA="haya";
                var bgColor=dayColor;
                tt="مبعث رسول اکرم";
            }
           } 

        if (mmm==6)
        {
            if ((dayCount==18) )
            {
                var fgTag="holiday";
                var fgTagA="haya";
                var bgColor=dayColor;
                tt="ولادت حضرت قائم";
            }
           } 

        if (mmm==8)
        {
            if ((dayCount==3) )
            {
                var fgTag="holiday";
                var fgTagA="haya";
                var bgColor=dayColor;
                tt="عید سعید فطر";
            }
           } 


        if (mmm==8)
        {
            if ((dayCount==27) )
            {
                var fgTag="holiday";
                var fgTagA="haya";
                var bgColor=dayColor;
                tt="شهادت حضرت امام جعفر صادق";
            }
           } 

        if (mmm==10)
        {
            if ((dayCount==10) )
            {
                var fgTag="holiday";
                var fgTagA="haya";
                var bgColor=dayColor;
                tt="عید سعید قربان";
            }
           } 

        if (mmm==10)
        {
            if ((dayCount==18) )
            {
                var fgTag="holiday";
                var fgTagA="haya";
                var bgColor=dayColor;
                tt="عید سعید غدیر خم";
            }
           } 

        if (mmm==11)
        {
            if ((dayCount==9) )
            {
                var fgTag="holiday";
                var fgTagA="haya";
                var bgColor=dayColor;
                tt="تاسوعای حسینی";
            }
           } 

        if (mmm==11)
        {
            if ((dayCount==10) )
            {
                var fgTag="holiday";
                var fgTagA="haya";
                var bgColor=dayColor;
                tt="عاشورای حسینی";
            }
           } 

        if (mmm==12)
        {
            if ((dayCount==19) )
            {
                var fgTag="holiday";
                var fgTagA="haya";
                var bgColor=dayColor;
                tt="اربعین حسینی";
            }
           } 
        if (mmm==12)
        {
            if ((dayCount==27) )
            {
                var fgTag="holiday";
                var fgTagA="haya";
                var bgColor=dayColor;
                tt="رحلت حضرت رسول اکرم";
            }
           } 


   } 
//===============================        
        
        if (dayCount==day) 
        {
          bgColor=currentDayColor;
          fgTag="currentDay";
          fgTagA="currenta";
        }
        s += "<td bgcolor='"+bgColor+"'> "+span1(fgTag)+a1(fgTagA,tt)+"'javascript: pickDate2("+dayCount+")'>"+ getFarsiNumber(dayCount++) + "</a>"+span2+" </td>";
      }
    }
    s += "</tr>";

    if (blnRowHasValue)
    	arrCal[k ++] = s;
  }

  s = '';
  for (i = 0; i < 6; i++) {
    s += arrCal[i];
	}

  return s;
}

function moveYear(dy) {
  cY+=dy;
  var nd=new Date(cY,cM,1);
  
  changeCal(nd);
}

function prepMonth(m) {
  cM=m-1;
  if (cM<0) { cM=11; cY--; }
  var nd=new Date(cY,cM,1);
  changeCal(nd);
}

function nextMonth(m) {
  cM=m+1;
  if (cM>11) { cM=0; cY++;}
  var nd=new Date(cY,cM,1);
  changeCal(nd);
}

function changeCal(d) {
  var dd = 0;

  if (currentCal != null) {
    var calRE = getFormat();

    if (currentCal.form[currentCal.field].value!="" && calRE.test(currentCal.form[currentCal.field].value)) {
      var cd = getDateNumbers(currentCal.form[currentCal.field].value);
      if (cd[0] == d.getFullYear() && cd[1] == d.getMonth()) {
        dd=cd[2];
      }
    }
    else {
      var cd = GregorianToSolar(0,0,0);
      if (cd.getFullYear() == d.getFullYear() && cd.getMonth() == d.getMonth()) {
        dd=cd.getDate();
      }
    }
  }
  mmm=(d.getMonth()+1);
  yyy=(d.getFullYear());
  
  var calendar=calHeader()+calTitle(d)+calBody(d,dd)+calFooter();

	currentCal.calDivContainer.innerHTML = calendar;
}

function markClick(e) {
  if (isIE || isOpera6) {
    winX=event.screenX;
    winY=event.screenY;
  }
  else if (isN4 || isN6) {
    winX=e.screenX;
    winY=e.screenY;

    document.routeEvent(e);
  }

  if (isN4 || isN6) {
    document.routeEvent(e);
  }
  else {
    event.cancelBubble=false;
  }

  return true;
}

function getCalendarDivWidth (){
	var tableWidth = "" + currentCal.calDivContainer.getElementsByTagName("table").item(0).offsetWidth;
	if(tableWidth.indexOf('px') > -1){
			return parseInt(tableWidth.substring(0, tableWidth.infexOf('px')));
	} else {
			return tableWidth;
	}
}

function getCalendarDivHight (){
	var tableHeight = "" + currentCal.calDivContainer.getElementsByTagName("table").item(0).offsetHeight;
	if(tableHeight.indexOf('px') > -1){
			return parseInt(tableHeight.substring(0, tableHeight.infexOf('px')));
	} else {
			return tableHeight;
	}
}

function showCal(name) {
  var lastCal=currentCal;
  var d, hasCal=false;
	
  currentCal = findCalendar(name);
  
	if (currentCal != null)
		if (currentCal.calDivContainer.style.visibility == 'visible')
			{ hideCalendar(); return; }

	hideAllCalendars();
	
  if (currentCal != null && currentCal.form != null && currentCal.form[currentCal.field]) {
    var calRE = getFormat();

    if (currentCal.form[currentCal.field].value!="" && calRE.test(currentCal.form[currentCal.field].value)) {
      var cd = getDateNumbers(currentCal.form[currentCal.field].value);
      d = new Date(cd[0], cd[1], cd[2]);

      cY=cd[0];
      cM=cd[1];
      dd=cd[2];
    }
    else {
      d=GregorianToSolar(0, 0, 0);
    	cY=d.getFullYear();
      cM=d.getMonth();
      dd=d.getDate();
    }
    mmm=cM+1;
    yyy=cY
    var calendar=calHeader()+calTitle(d)+calBody(d,dd)+calFooter();
    
    currentCal.calIFrameContainer.style.left = findPosX() -10 + 'px';
    currentCal.calIFrameContainer.style.top = findPosY()  +18+ 'px';

    currentCal.calIFrameContainer.style.border = 'none';

    currentCal.calDivContainer.style.left = findPosX() - 13 + 'px';
    currentCal.calDivContainer.style.top = findPosY() +18+ 'px';
    
		currentCal.calDivContainer.innerHTML = calendar;
		
		currentCal.calIFrameContainer.width = parseInt(getCalendarDivWidth(), 10) ;
    currentCal.calIFrameContainer.height = parseInt(getCalendarDivHight(), 10) ;

    currentCal.calIFrameContainer.style.visibility = 'visible';
    currentCal.calDivContainer.style.visibility = 'visible';
  }
  else {
    if (currentCal == null) {
      window.status = "Calendar ["+name+"] not found.";
    }
    else if (!currentCal.form) {
      window.status = "Form ["+currentCal.formName+"] not found.";
    }
    else if (!currentCal.form[currentCal.field]) {
      window.status = "Form Field ["+currentCal.formName+"."+currentCal.field+"] not found.";
    }

    if (lastCal != null) {
      currentCal = lastCal;
    }
  }  
  
  
}

function get2Digits(n) {
  return ((n<10)?"0":"")+n;
}

function clearDate() {
  currentCal.form[currentCal.field].value="";
  hideCalendar();
}

function pickDate(d) {
  hideCalendar();

  var dDate=calFormat;
  dDate = dDate.replace(/yyyy/i, cY);
  dDate = dDate.replace(/mm/i, get2Digits(cM+1));
  dDate = dDate.replace(/MON/, yxMonths[cM].substring(0,3).toUpperCase());
  dDate = dDate.replace(/Mon/i, yxMonths[cM].substring(0,3));
  dDate = dDate.replace(/dd/i, get2Digits(d));
  dDate = dDate.replace(/DAY/, getDayName(cY,cM,d).toUpperCase());
  dDate = dDate.replace(/day/i, getDayName(cY,cM,d));

  var gd = new Date();
//  currentCal.form[currentCal.field].value= dDate + ' ' + get2Digits(gd.getHours()) + ':' + get2Digits(gd.getMinutes()) + ':' + get2Digits(gd.getSeconds());
//darvishi
   currentCal.form[currentCal.field].value= dDate ;
  // IE5/Mac needs focus to show the value, weird.
  currentCal.form[currentCal.field].focus();
}
// ------

///////////////////////////////////////////////////////////////////////////////////////////////86-5-28
function pickDate2(d) {
  hideCalendar();
  
  //alert(cY+"-"+(cM+1)+"-"+d)
    
  gdate = new Array();
  gdate = jalali_to_gregorian(cY,(cM+1),d);
  gyear = gdate[0] +"";
  gmonth = gdate[1] +"";
  gday = gdate[2] +"";
  
  if(gmonth.length < 2)
		gmonth = "0" + gmonth;
				
  if(gday.length < 2)
		gday = "0" + gday;

  //var gd = new Date();
//  currentCal.form[currentCal.field].value= dDate + ' ' + get2Digits(gd.getHours()) + ':' + get2Digits(gd.getMinutes()) + ':' + get2Digits(gd.getSeconds());

    currentCal.form[currentCal.field].value= gyear + '-' + gmonth + '-' + gday ;
       
  // IE5/Mac needs focus to show the value, weird.
  currentCal.form[currentCal.field].focus();
    
	
	// At end, I should rechange the fileds name to be their real names // 86-5-30
	if(underLineIndex == -1)
	{	
		//alert('true 1176')
		
		myfield = currentCal.form[currentCal.field].name.split("_");		
		myfieldStr = "";
		for(i=0; i<myfield.length; i++)
		{
			myfieldStr += myfield[i]+":";
		}	
		myfield2 = myfieldStr.substr(0,myfieldStr.length-1);

	/******************************* Show JalaliDate in Label **************************************************/
		mytemp = myfield2;
		mytemp = mytemp.concat("_jalali");   
	    document.getElementById(mytemp).innerHTML = cY+'-'+(cM+1)+'-'+d;
		
	/******************************* Show JalaliDate in Label **************************************************/	
		
		if(currentCal.form[currentCal.field].name == currentCal.form[currentCal.field].id)
		{
			currentCal.form[currentCal.field].name = myfield2;  // here is form name to change 86-5-2
			currentCal.form[currentCal.field].id = myfield2;  // here is form name to change 86-5-2
		}
		else
			currentCal.form[currentCal.field].name = myfield2;  // here is form name to change 86-5-2
		//alert('true 1193')
		
	}
	else
	{	
		myfield = currentCal.form[currentCal.field].name.split("_");
		
		myfieldStr = "";
		for(i=0; i<myfield.length; i++)
		{
			myfieldStr += myfield[i]+":";
		}	
		myfield2 = myfieldStr.substr(0,myfieldStr.length-1);
		
		//alert(myfield2)->true
		
		fieldArray = new Array();
		for(i=0; i<myfield2.length; i++)
		{
			fieldArray[i] = myfield2.substr(i,1);				
		}
		
		//alert(underLineIndex)->true
		
		for(i=0; i<fieldArray.length; i++)
			if(i == underLineIndex)
			{
				fieldArray[i] = "_";				
			}
				
		myfieldStr = "";
		for(i=0; i<fieldArray.length; i++)
		{
			myfieldStr += fieldArray[i];
		}	
		myfield2 = myfieldStr;
		
		//alert(myfield2)->true
		
	/******************************* Show JalaliDate in Label **************************************************/
		mytemp = myfield2;
		mytemp = mytemp.concat("_jalali");   
	    document.getElementById(mytemp).innerHTML = cY+'-'+(cM+1)+'-'+d;
		
	/******************************* Show JalaliDate in Label **************************************************/
		if(currentCal.form[currentCal.field].name == currentCal.form[currentCal.field].id)
		{
			currentCal.form[currentCal.field].name = myfield2;  // here is form name to change 86-5-2
			currentCal.form[currentCal.field].id = myfield2;  // here is form name to change 86-5-2
		}
		else
			currentCal.form[currentCal.field].name = myfield2;  // here is form name to change 86-5-2
			
	}
	
	
  
}

var g_days_in_month = new Array(31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);  
var j_days_in_month = new Array(31, 31, 31, 31, 31, 31, 30, 30, 30, 30, 30, 29);
	
function  jalali_to_gregorian(j_y,j_m,j_d)
{
	jy = j_y-979;
	jm = j_m-1;
	jd = j_d-1;

	j_day_no = 365*jy + div(jy, 33)*8 + div(jy%33+3, 4);


	for (i=0; i < jm; ++i)

		j_day_no += j_days_in_month[i];

	j_day_no += jd;

	g_day_no = j_day_no+79;


	gy = 1600 + 400*div(g_day_no, 146097); /* 146097 = 365*400 + 400/4 - 400/100 + 400/400 */


	g_day_no = g_day_no % 146097;


	leap = true;


	if (g_day_no >= 36525) /* 36525 = 365*100 + 100/4 */
	{

		g_day_no--;

		gy += 100*div(g_day_no,  36524); /* 36524 = 365*100 + 100/4 - 100/100 */

		g_day_no = g_day_no % 36524;


		if (g_day_no >= 365)


			g_day_no++;


		else


			leap = false;


	}


	gy += 4*div(g_day_no, 1461); /* 1461 = 365*4 + 4/4 */

	g_day_no %= 1461;


	if (g_day_no >= 366) {

		leap = false;

		g_day_no--;

		gy += div(g_day_no, 365);

		g_day_no = g_day_no % 365;

	}
	
	for (i = 0; g_day_no >= g_days_in_month[i] + (i == 1 && leap); i++)

		g_day_no -= g_days_in_month[i] + (i == 1 && leap);


	gm = i+1;


	gd = g_day_no+1;


	return new Array(gy, gm, gd);
	
}
function div(a,b) {

    	return (Math.floor(a / b));

}

///////////////////////////////////////////////////////////////////////////////////////////////86-5-28


// user functions
function checkDate(name) {
  var thisCal = findCalendar(name);

  if (thisCal != null && thisCal.form != null && thisCal.form[thisCal.field]) {
    var calRE = getFormat();

    if (calRE.test(thisCal.form[thisCal.field].value)) {
      return 0;
    }
    else {
      return 1;
    }
  }
  else {
    return 2;
  }
}

function getCurrentDate() {
  var dDate=calFormat, d = GregorianToSolar(0, 0, 0);
  dDate = dDate.replace(/yyyy/i, d.getFullYear());
  dDate = dDate.replace(/mm/i, get2Digits(d.getMonth()+1));
  dDate = dDate.replace(/dd/i, get2Digits(d.getDate()));

  return dDate;
}

function compareDates(date1, date2) {
  var calRE = getFormat();
  var d1, d2;

  if (calRE.test(date1)) {
    d1 = getNumbers(date1);
  }
  else {
    d1 = getNumbers(getCurrentDate());
  }

  if (calRE.test(date2)) {
    d2 = getNumbers(date2);
  }
  else {
    d2 = getNumbers(getCurrentDate());
  }

  var dStr1 = d1[0] + "" + d1[1] + "" + d1[2];
  var dStr2 = d2[0] + "" + d2[1] + "" + d2[2];

  if (dStr1 == dStr2) {
    return 0;
  }
  else if (dStr1 > dStr2) {
    return 1;
  }
  else {
    return -1;
  }
}

function getFarsiNumber(num){
	var res = '';
	var sNum = num.toString(10);

	for (i = 0; i < sNum.length; i ++)
		res += ('&#' + (sNum.charCodeAt(i) + 1728) + ';');

	return res;
}

function getNumbers(date) {
  var calRE = getFormat();
  var y, m, d;

  if (calRE.test(date)) {
    var yIdx = calFormat.search(/yyyy/i);
    var mIdx = calFormat.search(/mm/i);
    var m3Idx = calFormat.search(/mon/i);
    var dIdx = calFormat.search(/dd/i);

    y=date.substring(yIdx,yIdx+4);
    if (mIdx != -1) {
      m=date.substring(mIdx,mIdx+2);
    }
    else {
      var mm=getMonthFromName(date.substring(m3Idx,m3Idx+3))+1;
      m=(mm<10)?("0"+mm):(""+mm);
    }
    d=date.substring(dIdx,dIdx+2);

    return new Array(y,m,d);
  }
  else {
    return new Array("", "", "");
  }
}
// ------

if (isN4 || isN6) {
  document.captureEvents(Event.CLICK);
}
document.onclick=markClick;


function showtoday(name) {
  var lastCal=currentCal;
  var d, hasCal=false;
	
  currentCal = findCalendar(name);
  
  d=GregorianToSolar(0, 0, 0);
  cY=d.getFullYear();
  cM=d.getMonth();
  dd=d.getDate();
  pickDate(dd);
}

/*function setFieldName ()
{
	myfield = field.split("zz");
    myfield2 = myfield[0] + ":" + myfield[1] + ":" + myfield[2] + ":" + myfield[3] ; 
  
    document.guppyForm[field].name = myfield2; 
	document.guppyForm[field].id = myfield2;
    // mabe need focus 86-5-29
  
}*/