var strServerToken="http://www.harf.com/"
var strShopServerToken = "http://shop.harf.com/"
var strServerExt = "com"
var nExtChars = 3    //if com set to 3 else if co set 2

	var arSections = new Array
	
	arSections [1] = ''
	arSections [2] = ''
	arSections [3] = 'purchase'
	arSections [4] = 'support'
	arSections [5] = ''
	arSections [6] = 'profile'

	var arShopSections = new Array
	arShopSections [1] = ''
	arShopSections [2] = 'shopaddtocart.asp'
	arShopSections [3] = 'shopcustomer.asp'
	
function genMetaTags(strCurLang)
{
	var StrMeta = "";
	StrMeta+="<meta NAME='DESCRIPTION' CONTENT='Harf information technology site(old GISCO),multi languages religion software,quran and hadith search and view including tree of islamic theme on desktop CD-ROM,موقع إسلامي من شركة حرف تقنية المعلومات'>"
	StrMeta+="<meta NAME='KEYWORDS' CONTENT='moslem,muslim,programs,arabic,al-islam,heritage,holy,prayer,contestawqaf,islamic,faith,allah,competition,quran, qur'an ,fiqh,Jurisprudence,`umra,mosque,mawarith,mawareeth,,إسلام,قرآن,عربي,محمد,حديث,دين,حج,تراث,فتوى,فتاوى,سيرة,دعوة,كتب,جنة,نار,عذاب,إيمان,رمضان,صيام,عباد,الله,حق,رحمة,"
	StrMeta+="muhammed,mohamed,inheritance,zakah,da'wa,sunnah,belief,heaven,hell,mekkah,makka,madina,madena,hejaz,hegaz,hijaz,ramadhan,ramadan,arafat,adha,fetr,eid,umma,omma,alislam,worship,adoration,cult,devotion,devotions,religious,duty,obligation,obligatory,distribution,estate,sharia,law,teachings,tenets,dogma,doctrine,precepts,instructions,precept,commandments,directions,directives,guidelines,ceremonies,rituals,rites,pilgrimage,facts,prophet,god's,apostle,messenger,resurrection,reckoning,doomsday,paradise,happiness,lord,hellfire,fire,bliss,felicity'>"
	StrMeta+="<meta name='Title' Content='Harf: Sonsore of Al-islam FREE services site (old GISCO)'>"
	StrMeta+="<meta NAME='revisit-after' Content='10 days'>"
	StrMeta+="<meta NAME='ROBOTS' Content='ALL'>"
	StrMeta+=StrCharset
	return(StrMeta)
}
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

function genHeader(strCurLang, nCase)
{
	var strURL
	var StrHeader
	var strImage
	var strImage1
	var strImage2

	strImage1="/SHARED/IMAGES/menu_back.jpg"
	strImage2="/SHARED/IMAGES/menu_active.jpg"
	StrHeader="<font face='Arial, Verdana, Helvetica'>"
	StrHeader+="<table border='0' cellpadding='0' cellspacing='2'  width='100%' >"
	/*if(strCurLang == 'a')
		StrHeader += 'dir="rtl">'
	else
		StrHeader += 'dir="ltr">'*/
	StrHeader+="<tr>"

	for (i = 1; i <= 6; i++) 
	 {                        
			if (nCase==i)
			{
			strImage=strImage2
			}
			else
			{
			strImage=strImage1
			}
	strItem=arHeadItems[i]
	if (i == 2)
		strURL = strShopServerToken
	else
		if (i == 5)
			if (strCurLang == 'e')
				strURL = "http://www.Al-Islam.com"
			else
				strURL = "http://www.Al-Islam.com/" + getLongLangName(strCurLang)
		else
			if (i == 6)
				strURL = strServerToken + "/" + strCurLang + arSections[i] + ".htm"//arHeadItems[i]
			else
				if (i == 1)
				{
					if (strCurLang == 'e')
						strURL = strServerToken + "/"
					else
						strURL = strServerToken + "/" + getLongLangName (strCurLang) + "/"
				}
				else
					strURL = strServerToken + "/" + arSections[i] + "/" + strCurLang + arSections[i] + ".htm"//arHeadItems[i]
/*	if (i != 2)
		strURL=arHeadItemsURL[i]
	else
		strURL=strShopServerToken
*/
	StrHeader+="<td height='23' width='125' background='"+strImage+"' align=center><a href='"+strURL+"'Style='text-decoration:none'><b><font color='#FFFFFF' size=2>"+strItem+"</font></b></a></td>"                 
	 }
	StrHeader+="</TR>"
	if (nCase != 2)
	{
		StrHeader+="<tr>"
		StrHeader+="<TD colspan=6 align=right><img src='/shared/images/body_top2.jpg'></TD>"
		StrHeader+="</TR>"
	}
	StrHeader+="</TABLE>"
	
	return(StrHeader)
}
	
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

 delay = 25000
 imageNum = 1
 AnchoNum = "http://quran.al-islam.com/arb"
 strBannersPath="/banners/arb/image"
////////////////////////////////////////////////////////////////////////////////////////
function SetNewBanner() 

{ 	
return;
if(nLang==0)
{
AnchoUTL1="http://quran.al-islam.com/arb"
AnchoUTL2="http://feqh.al-islam.com/"
AnchoUTL3="../products/ARB/Tahfiz.htm"
AnchoUTL4="../products/ARB/museum.htm"
AnchoUTL5="../products/ARB/rashed.htm"
strBannersPath="/shared/banners/arb/image"
}
else
{
AnchoUTL1 ="../products/eng/quran.htm"
AnchoUTL2 ="../products/eng/hadith.htm"
AnchoUTL3 ="../products/eng/rashed.htm"
AnchoUTL4 ="../products/eng/journey.htm"
AnchoUTL5 ="http://shop.harf.com/cgi-bin/harfshop.storefront/en"
strBannersPath="/shared/banners/eng/image"
}
/*	imageNum++;
if(imageNum > 0){
   		 AnchoNum =AnchoUTL1}
if(imageNum > 1){
   		 AnchoNum =AnchoUTL2}
if(imageNum > 2){
		 AnchoNum =AnchoUTL3}
if(imageNum > 3){
   		AnchoNum =AnchoUTL4}
if(imageNum > 4){
   		AnchoNum =AnchoUTL5}
if(imageNum > 5){
   		imageNum = 1
}*/
	document.animation.src = strBannersPath + imageNum + ".gif";
}

function go() 
{
location.href = strShopServerToken//AnchoNum
}

var strBanner
var strBannersPath
////strArbBannersPath="/shared/banners/arb/image"+ imageNum + ".gif"
////strEngBannersPath="/shared/banners/eng/image"+ imageNum + ".gif"
////strArbBanner="<div align='center'><A href='javascript=go();' name =animanchor ><IMG height=60 src='"+strArbBannersPath+"' width=468 border=0 name=animation></A></div>"
////strEngBanner="<div align='center'><A href='javascript=go();' name =animanchor ><IMG height=60 src='"+strEngBannersPath+"' width=468 border=0 name=animation></A></div>"

/// By MOG//
//strArbBannersPath="http://www.idev1.co/shared/banners/arb/hajj2-anim.gif"
//strEngBannersPath="http://www.idev1.co/shared/banners/eng/hajj-eng-anim.gif"
//strArbBanner="<div align='center'><A href='http://www.tohajj.com' name =animanchor ><IMG height=60 //src='"+strArbBannersPath+"' width=468 border=0 name=animation></A></div>"
//strEngBanner="<div align='center'><A href='http://www.tohajj.com/eng' name =animanchor ><IMG height=60 //src='"+strEngBannersPath+"' width=468 border=0 name=animation></A></div>"

/////

/// By MAS//

//strEngBannersPath=strServerToken + "/shared/banners/sales3.gif"

//strEngBanner="<div align='center'><A href='"+strServerToken+"/sales/aMemorize1.htm' name =animanchor ><IMG height=60 src='"+strEngBannersPath+"' width=468 border=0 name=animation></A></div>"
////by MAR
//strArbBannersPath=strServerToken + "/shared/banners/gitex.gif"
//strENGBannersPath=strServerToken + "/shared/banners/gitex-e.gif";
strArbBannersPath=strServerToken + "/shared/banners/RamdA.swf"
//strENGBannersPath=strServerToken + "/shared/banners/RamdE.swf"
strFRNBannersPath=strServerToken + "/shared/banners/RamdE.swf";
strINDBannersPath=strServerToken + "/shared/banners/RamdE.swf";
strMALBannersPath=strServerToken + "/shared/banners/RamdE.swf";
strTRKBannersPath=strServerToken + "/shared/banners/RamdE.swf";
strGERBannersPath=strServerToken + "/shared/banners/RamdE.swf";
strENGBannersPath="/shared/banners/pocketpc_eng.jpg";

//strArbBanner="<div align='center'><A href='/gitex2003/aGitex2003.html'><IMG height=60 src='"+strArbBannersPath+"' width=468 border=0 name=animation></a></div>"
//strENGBanner="<div align='center'><A href='/gitex2003/eGitex2003.html'><IMG height=60 src='"+strENGBannersPath+"' width=468 border=0 name=animation></a></div>";
//strFRNBanner="<div align='center'><A href='/gitex2003/eGitex2003.html'><IMG height=60 src='"+strFRNBannersPath+"' width=468 border=0 name=animation></a></div>";
//strINDBanner="<div align='center'><A href='/gitex2003/eGitex2003.html'><IMG height=60 src='"+strINDBannersPath+"' width=468 border=0 name=animation></a></div>";
//strMALBanner="<div align='center'><A href='/gitex2003/eGitex2003.html'><IMG height=60 src='"+strMALBannersPath+"' width=468 border=0 name=animation></a></div>";
//strTRKBanner="<div align='center'><A href='/gitex2003/eGitex2003.html'><IMG height=60 src='"+strTRKBannersPath+"' width=468 border=0 name=animation></a></div>";
//strGERBanner="<div align='center'><A href='/gitex2003/eGitex2003.html'><IMG height=60 src='"+strGERBannersPath+"' width=468 border=0 name=animation></a></div>";
//strENGBanner="<div align='center'><A href='"+strServerToken+"/sales/form.asp?l=eng' name =animanchor ><IMG height=60 src='"+strENGBannersPath+"' width=468 border=0 name=animation></A></div>";
strENGBanner="<div align='center'><A href=ahqrn.asp name =animanchor ><IMG height=60 src='"+strENGBannersPath+"' width=468 border=0 name=animation></A></div>";



strArbBanner="<div align=center><EMBED src="+strArbBannersPath+" quality=high bgcolor=#FFFFFF  WIDTH='469' HEIGHT='60' NAME='banner' ALIGN='' TYPE='application/x-shockwave-flash' PLUGINSPAGE='http://www.macromedia.com/go/getflashplayer'></EMBED></div>"
//strENGBanner="<div align=center><EMBED src="+strENGBannersPath+" quality=high bgcolor=#FFFFFF  WIDTH='469' HEIGHT='60' NAME='banner' ALIGN='' TYPE='application/x-shockwave-flash' PLUGINSPAGE='http://www.macromedia.com/go/getflashplayer'></EMBED></div>"
strFRNBanner="<div align=center><EMBED src="+strFRNBannersPath+" quality=high bgcolor=#FFFFFF  WIDTH='469' HEIGHT='60' NAME='banner' ALIGN='' TYPE='application/x-shockwave-flash' PLUGINSPAGE='http://www.macromedia.com/go/getflashplayer'></EMBED></div>"
strINDBanner="<div align=center><EMBED src="+strINDBannersPath+" quality=high bgcolor=#FFFFFF  WIDTH='469' HEIGHT='60' NAME='banner' ALIGN='' TYPE='application/x-shockwave-flash' PLUGINSPAGE='http://www.macromedia.com/go/getflashplayer'></EMBED></div>"
strMALBanner="<div align=center><EMBED src="+strMALBannersPath+" quality=high bgcolor=#FFFFFF  WIDTH='469' HEIGHT='60' NAME='banner' ALIGN='' TYPE='application/x-shockwave-flash' PLUGINSPAGE='http://www.macromedia.com/go/getflashplayer'></EMBED></div>"
strTRKBanner="<div align=center><EMBED src="+strTRKBannersPath+" quality=high bgcolor=#FFFFFF  WIDTH='469' HEIGHT='60' NAME='banner' ALIGN='' TYPE='application/x-shockwave-flash' PLUGINSPAGE='http://www.macromedia.com/go/getflashplayer'></EMBED></div>"
strGERBanner="<div align=center><EMBED src="+strGERBannersPath+" quality=high bgcolor=#FFFFFF  WIDTH='469' HEIGHT='60' NAME='banner' ALIGN='' TYPE='application/x-shockwave-flash' PLUGINSPAGE='http://www.macromedia.com/go/getflashplayer'></EMBED></div>"
////////////////////////////////////////////////////////////////////////////////////////////////////
function genHeaderPage(nSection, strFileName)
{
var strTable
var arrSection = new Array 
arrSection [1] = ""
arrSection [2] = strShopServerToken
arrSection [3] = "/Dealers"
arrSection [4] = "/Support"
arrSection [5] = "/About"

var arrURL = new Array 
arrURL [0] = strServerToken + arrSection[nSection] + "/arb/" + strFileName
arrURL [1] = strServerToken + arrSection[nSection] + "/" + strFileName
arrURL [2] = strServerToken + arrSection[nSection] + "/frn/" + strFileName
arrURL [3] = strServerToken + arrSection[nSection] + "/ger/" + strFileName
arrURL [4] = strServerToken + arrSection[nSection] + "/trk/" + strFileName
arrURL [5] = strServerToken + arrSection[nSection] + "/mal/" + strFileName
arrURL [6] = strServerToken + arrSection[nSection] + "/ind/" + strFileName

strTable="<TABLE border=0 cellPadding=0 cellSpacing=0 width='100%'>"
strTable+="<TR>"
strTable+="    <TD rowspan=4><IMG height=60 src='/shared/images/harf-logo.gif' width=36></TD>"
strTable+="    <TD rowspan=4 width=80%>"+strBannerDisp+"</TD>"
if (nSection == 2)
	strTable+="    <TD rowspan=4></TD>"
else
{
	strTable+="    <TD colspan=2><a href='" + arrURL [0]+ "'><IMG border=0 src='/shared/images/arb/arb.gif' <a></TD>"
	strTable+="    </TR>"
	strTable+="  <TR>"
	strTable+="    <TD><a href='" + arrURL [1]+ "'><IMG border=0 src='/shared/images/eng/eng.gif' ></a></TD>"
	strTable+="    <TD><a href='" + arrURL [2]+ "'><IMG src='/shared/images/frn/frn.gif' border=0></a></TD></TR>"
	strTable+="  <TR>"
	strTable+="    <TD><a href='" + arrURL [5]+ "'><IMG  src='/shared/images/mal/mal.gif' border=0></a></TD>"
	strTable+="    <TD><a href='" + arrURL [6]+ "'><IMG  src='/shared/images/ind/ind.gif' border=0></a></TD></TR>"
	strTable+="  <TR>"
	strTable+="    <TD><a href='" + arrURL [3]+ "'><IMG  src='/shared/images/ger/ger.gif' border=0></a></TD>"
	strTable+="    <TD><a href='" + arrURL [4]+ "'><IMG  src='/shared/images/trk/trk.gif' border=0></a></TD></TR>"
}
strTable+="</TABLE>"
return(strTable)
}
///////////////////////////////////////////////////////////////////////////////////////////////
function genNavBar()
{
var strNavBar
//var strURL = location.href;
//var strCurLang = getLang(strURL);

//if (isShop(strURL))
//	document.write ("<BR>")
//strNavBar+="<BR>"
//strNavBar+="<BR>"
strNavBar=""
strNavBar+="<BR>"



	strNavBar=""
	//if(defname!="default.asp"&&defname!="default.asp?lang=e")
//	{
	strNavBar+=strSitesTable 
	strNavBar+="<BR>"
//	}

return(strNavBar)
}
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
function genHomeNavBar()
{
var strURL = location.href;
var strCurLang = getLang(strURL);
var strHomeNavBar
strNavHomeBar = ""
if (strCurLang == 'a' || strCurLang == 'e' || strCurLang == 'f')
{
	strNavHomeBar+=strSendTable
	strNavHomeBar+="<BR>"
}
strNavHomeBar+=strCardsTable
strNavHomeBar+="<BR>"
strNavHomeBar+=strCompetitionTable
strNavHomeBar+="<BR>"
strNavHomeBar+=strMagazineTable
strNavHomeBar+="<BR>"
strNavHomeBar+=strAboutTable
//strNavHomeBar+="<BR>"
return(strNavHomeBar)
}
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
function genFooter(bshop)
{
	var StrFooter
	var bshop
	var strCurLang = getLang(location.href)

	if(bshop==1)
	{
		StrFooter = "<br><br>"
		StrFooter += "<table border='0' cellpadding='0' cellspacing='0' width='756'><tr bgcolor='#FFFFFF'>"
		StrFooter += "<td align=center background='/shared/images/footer_back.jpg' height='26' width='756' valign='middle'><b>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"
		for (i = 1; i <= 3; i++) 
				{                        
			
		StrFooter += "<a href='" + strShopServerToken + arShopSections[i]+"' Style='text-decoration:none'><font color='#FFFFFF' size='3'>"+arShopItems[i]+"</font></a>&nbsp;&nbsp;&nbsp;&nbsp;"
			}
		StrFooter += "</b></td></tr></table><br>"
	}
	if(bshop==0)
	{
		StrFooter = "<br><br>"
		StrFooter += "<table border='0' align='center' cellpadding='0' cellspacing='0' width='756'><tr bgcolor='#FFFFFF'>"
		StrFooter += "<td align=center background='/shared/images/footer_back.jpg' height='26' width='756' valign='middle'><b>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"
			for (i = 1; i <= 6; i++) 
				{                        
	if (i == 2)
		strURL = strShopServerToken
	else
		if (i == 5)
			if (strCurLang == 'e')
				strURL = "http://www.Al-Islam.com"
			else
				strURL = "http://www.Al-Islam.com/" + getLongLangName(strCurLang)
		else
			if (i == 6)
				strURL = strServerToken + "/" + strCurLang + arSections[i] + ".htm"//arHeadItems[i]
			else
				if (i == 1)
				{
					if (strCurLang == 'e')
						strURL = strServerToken + "/"
					else
						strURL = strServerToken + "/" + getLongLangName (strCurLang) + "/"
				}
				else
					strURL = strServerToken + "/" + arSections[i] + "/" + strCurLang + arSections[i] + ".htm"//arHeadItems[i]


			strItem=arHeadItems[i]
//				strURL=arHeadItemsURL[i]
				StrFooter += "<a href='"+strURL+"' Style='text-decoration:none'><font color='#FFFFFF' size='2'>"+strItem+"</font></a>&nbsp;&nbsp;&nbsp;&nbsp;"
				}
		StrFooter += "</b></td></tr></table><br>"
	}
	return(StrFooter)
}
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

function genCopyright()
{
	var StrCopyright
	StrCopyright=StrCR
	return(StrCopyright)
}

function getTitle (nSection)
{
	var str
	switch (nLang)
	{
		case 0:
		case 1: str = "English"
	}
	getTitle = str
}

function genBodyTag ()
{
 	var str
	str = "<BODY OnLoad=\"setInterval('SetNewBanner(1)', delay);\" bgcolor='#ffffff' topmargin='0' rightmargin='5' leftmargin='5' link=\"#000099\" vlink=\"#006600\" alink=\"#FF8C00\">"
	return str
}

function genStyles ()
{
 	var str
	str = "<style type='text/css'>"
	str += "A"
	str += "{"
	str += "text-decoration: none;"
	str += "}"
	str += "</Style>"
	return str
}

function genShopNavBar ()
{
	var str

	str="<BR>" + strStyleTableHead1
	str+="<font color='#FFFFFF'><B>Harf Shop</font></b></td></tr>"
	str+=strStyleTableBody1
	str += "<table  width='100%' border='0' cellpadding='4' cellspacing='0'>"
	str += "<tr>"
	str += "<td valign='top' width='100%' colspan=2>"
	str += strBulitenStyle1
    str += "<a href='"+strShopServerToken+"' Style='text-decoration:none'><b><font size=2>Main Page</font></b></a>"
    str += "<br>"
	str += strBulitenStyle1
	str += "<a href='shopaddtocart.asp' Style='text-decoration:none'><b><font size=2>View Cart</font></b></a><br>"
	str += strBulitenStyle1
    str += "<a href='shopcustomer.asp' Style='text-decoration:none'><b><font size=2>Checkout</font></b></a>"
	str += "</td>"
	str += "</tr>"
	str += "</table>"
	str += strStyleTableEnd1
	return str
}
///////////////////////////////////////////////////
function isShop (strURL)
{
	var strAbsURL
	if (strURL.toLowerCase().indexOf(strShopServerToken, 0) > -1)
		return true
	else 
	{
		strTempURL = strURL + "/"
		if (strTempURL.toLowerCase().indexOf(strShopServerToken, 0) > -1)
			return true
		else
			return false
	}
}

function isCMS (strURL)
{
	var strAbsURL
	if (strURL.indexOf("ProccessAction.asp", 0) > -1)
		return true
	else
		return false
}



function isASP ()
{
	thisURL=location.href;
	if (thisURL.indexOf("asp", 0) > -1)
		return true
	else
		return false
}


function isNewsPage (strURL)
{
	if (strURL.toLowerCase().indexOf("news.", 0) > -1 && strURL.toLowerCase().indexOf("asp", 0) > -1)
		return true
	else 
		return false
}

function isNewsSection (strURL)
{
	if (strURL.toLowerCase().indexOf("/news/", 0) > -1)
		return true
	else 
		return false
}
/*//////////////////////////////////////////////////////////////////////////////
Start of AAZ Code
1/8/2002
//////////////////////////////////////////////////////////////////////////////*/

function getLongLangName(strShortLangName)
{
	switch (strShortLangName.toLowerCase())
	{
		case "a":
			return "arb";

		case "f":
			return "frn";

		case "g":
			return "ger";

		case "t":
			return "trk";

		case "m":
			return "mal";
		
		case "i":
			return "ind";

		default:
			return "eng";
	}
}

function isHomePage(strURL)
{
	var nSlashPos = strURL.lastIndexOf("/");
	if (isShop(strURL))
		return false

	if(nSlashPos == (strURL.length - 1))
		return true;
	else
	{
		if (nSlashPos == (strURL.length - 5))
			return true
		else
		{
			var nDotPos = strURL.lastIndexOf(".");
			var strExt = strURL.substr (nDotPos + 1, nExtChars)
			//alert(strExt)
			//alert(strServerExt)
			if (strExt.toLowerCase() == strServerExt)
				return true
		}
	}

	var strPageName = strURL.substr(nSlashPos + 1);
	strPageName = strPageName.substr(0, 8).toLowerCase();
	return (strPageName == "default.");
}

function getPageName(strURL)
{
	if(isHomePage(strURL))
	{
		return "/";
	}
	var strPageName;
	var nSlashPos = strURL.lastIndexOf("/");
	if (isNewsPage(strURL) || isNewsSection(strURL))
		strPageName = strURL.substr(nSlashPos + 1);	
	else
		strPageName = strURL.substr(nSlashPos + 2);
	var nHashPos = strPageName.indexOf("#");
	if(nHashPos != -1)
		strPageName = strPageName.substr(0, nHashPos);
	
	return strPageName;
}

function getDefPageLang(strURL)
{
	var nSlashPos = strURL.lastIndexOf("/");
	var strLang = strURL.substr(0, nSlashPos);

	nSlashPos = strLang.lastIndexOf("/");
	strLang = strLang.substr(nSlashPos + 1).toLowerCase();
	
	switch(strLang)
	{
		case "arb":
			return "a";
			
		case "frn":
			return "f";
			
		case "ger":
			return "g";
			
		case "trk":
			return "t";
			
		case "mal":
			return "m";
			
		case "ind":
			return "i";
			
		default:
			return "e";
	}
}

function getLang(strURL)
{
	if(isHomePage(strURL))
		return getDefPageLang(strURL);
	if(isShop(strURL))
		return 'e'
	if(isCMS(strURL))
		return ''
	if(isNewsSection(strURL))
		return 'a'
	var nSlashPos = strURL.lastIndexOf("/");
	if (isNewsPage(strURL))
		return getDefPageLang(strURL);
	else
		return strURL.substr(nSlashPos + 1, 1).toLowerCase();
}

function isNonTransPage(strPageName)
{
	if (isNewsSection(location.href))
		return true
	var strSmallPageName = strPageName.toLowerCase();
	var strarNonTransPages = new Array ("response.asp",
										"jobs.htm",
										"feedback.htm",
										"curr_jobs.htm",
										"send.asp",
										"asp.htm",
										"customers.htm",
										"products.htm","jobform.htm");
	var nArLen = strarNonTransPages.length;
	for(var n = 0; n < nArLen; n++)
	{
		

		if(strSmallPageName == strarNonTransPages[n])
			return true;
	}return false;
}

function isAEPageOnly(strPageName)
{
	var strSmallPageName = strPageName.toLowerCase();

	var strarAEPages = new Array (	"dealers.htm",
									"free.htm",
									"awards.htm",
									"contracts.htm",
									"ability.htm",
									"sitesinf_1.htm","sitesinf_2.htm","sitesinf_3.htm","sitesinf_4.htm","sitesinf_5.htm","sitesinf_6.htm","sitesinf_7.htm","sitesinf_8.htm");
	var nArLen = strarAEPages.length;
	for(var n = 0; n < nArLen; n++)
	
		if(strSmallPageName == strarAEPages[n])
			return true;
	return false;
}

function genLangCell(strCellLang, strPageName, strCurLang, bIsHomePage)
{
	var str = '<td align="center" ';
	var strURL = location.href
	if(strCellLang == 'a')	//Arabic
		str += 'colspan="2" width="100%">';
	else
		str += 'width="50%">';
	if((strCellLang.toLowerCase() != strCurLang.toLowerCase()) && !isNonTransPage(strPageName))	//The cell language is not the current language
	{
		str += '<A href="';
		if(bIsHomePage || isNewsPage(strPageName))
		{
			str += "/";

			var strLongLangName = getLongLangName(strCellLang).toLowerCase();
			if(strLongLangName != "eng")
				str += getLongLangName(strCellLang) + "/";
			if (isNewsPage(strPageName))
				str += "news.asp"
		}
		else
		{
			if(isAEPageOnly(strPageName.toLowerCase()) && (strCellLang.toLowerCase() != "a"))
				str += "e";
			else
			{
				if (isNewsPage(strURL))
				{
					str += getLongLangName(strCellLang) 
					str += "/"
				}
				else
				{
					str += strCellLang;
				}
			}
			str += strPageName;
		}
		str += '">';
	}

	str += '<font color="#ffffff" size="2"><img border="0" src="/shared/images/'+getLongLangName(strCellLang)+'/' + strCellLang + '.jpg"></font>'

	if((strCellLang.toLowerCase() != strCurLang.toLowerCase()) && !isNonTransPage(strPageName))
		str += '</A>';

	str += '</td>';
	return str;
}

function genLangBox(strPageName, strCurLang, bIsHomePage)
{
	var str = "";
	str += '<table cellspacing="0" border=0 cellpadding="0" width="100%" dir="ltr">';
	str += ' <tr>';
	str +=    genLangCell('a', strPageName, strCurLang, bIsHomePage);
	str += ' </tr>';
	str += ' <tr>';
	str +=    genLangCell('e', strPageName, strCurLang, bIsHomePage);
	str +=    genLangCell('f', strPageName, strCurLang, bIsHomePage);
	str += ' </tr>';
	str += ' <tr>';
	str +=    genLangCell('g', strPageName, strCurLang, bIsHomePage);
	str +=    genLangCell('t', strPageName, strCurLang, bIsHomePage);
	str += ' </tr>';
	str += ' <tr>';
	str +=    genLangCell('m', strPageName, strCurLang, bIsHomePage);
	str +=    genLangCell('i', strPageName, strCurLang, bIsHomePage);
	str += ' </tr>';
	str += '</table>';
//alert(str)
	return str;
}
//To Change a parameter in the query string, applied on the language parameter "1"
function setASPParam(pName,pValue){
	strEntire=location.href;
	var strEntireArr=strEntire.split("?");
	if (strEntireArr.length==1){
	processedURL=strEntireArr[0]+"?"+pName+"="+pValue
	}else{
	var NVPairs=strEntireArr[1].split("&");
	var processedURL="";
	for (var i=0;i<NVPairs.length;i++){
		if (processedURL!="")
			processedURL=processedURL+"&"
		var NVItem=NVPairs[i].split("=");
		if (NVItem[0]==pName)
			NVItem[1]=pValue;
		processedURL=processedURL+NVItem[0]+"="+NVItem[1];

	}
	processedURL=strEntireArr[0]+"?"+processedURL;
}
return processedURL;
}

function genLangBoxASP(){
	var str = "";
	str += '<table cellspacing="0" border=0 cellpadding="0" width="100%" dir="ltr">';
	str += ' <tr>';
	str +=    '<td colspan=2><a href="'+setASPParam("l","arb")+'"><img src="/shared/images/arb/a.jpg" border=0></a></td>';
	str += ' </tr>';
	str += ' <tr>';
	str +=    '<td><a href="'+setASPParam("l","eng")+'"><img src="/shared/images/eng/e.jpg" border=0></a></td>';
	str +=    '<td><a href="'+setASPParam("l","frn")+'"><img src="/shared/images/frn/f.jpg" border=0></a></td>';
	str += ' </tr>';
	str += ' <tr>';
	str +=    '<td><a href="'+setASPParam("l","ger")+'"><img src="/shared/images/ger/g.jpg" border=0></a></td>';
	str +=    '<td><a href="'+setASPParam("l","trk")+'"><img src="/shared/images/trk/t.jpg" border=0></a></td>';
	str += ' </tr>';
	str += ' <tr>';
	str +=    '<td><a href="'+setASPParam("l","mal")+'"><img src="/shared/images/mal/m.jpg" border=0></a></td>';
	str +=    '<td><a href="'+setASPParam("l","ind")+'"><img src="/shared/images/ind/i.jpg" border=0></a></td>';
	str += ' </tr>';
	str += '</table>';
//alert(str)
	return str;
}

function writePageStart(nSection)
{
	var strURL = location.href;
	var strPageName = getPageName(strURL);
	var strCurLang = getLang(strURL);
//	if(strCurLang == 'a')
//	{
//		document.write('<html dir="rtl">');
//		document.write(' <head>');
//		document.write('  <title>حرف لتقنية المعلومات</title>');
//	}
//	else
//	{
//		document.write('<html dir="ltr">');
//		document.write(' <head>');
//		document.write(' <title>Harf Information Technology</title>');
//	}
//	//document.write(  genMetaTags(strCurLang))
//	document.write(' </head>');
//	document.write(' <BODY OnLoad="setInterval(\'SetNewBanner(0)\', delay);" bgcolor=#ffffff topmargin="0" link="#000099" vlink="#006600" alink="#FF8C00" rightmargin="5" leftmargin="5">');
	
	if(strCurLang == 'a')
	{
		document.write('<Style>')
		document.write('table{font-family:\'Simplified Arabic\'}')	
		document.write('</Style>')
	}
	document.write('  <table width="100%" border="0" align="center" height="62" dir="ltr">');
	document.write('   <tr> ');
	document.write('    <td width="6%"><IMG height=60 src="/shared/images/harf-logo.gif" width=36></td>');
	document.write('    <td width="78%" align="center">');
	
	switch (strLang){
		case "arb":document.write(strArbBanner);
		break;
		case "frn":document.write(strFRNBanner);
		break;
		case "ind":document.write(strINDBanner);
		break;
		case "mal":document.write(strMALBanner);
		break;
		case "trk":document.write(strTRKBanner);
		break;
		case "ger":document.write(strGERBanner);
		break;
		default:document.write(strENGBanner);
	}


//if(strCurLang == 'a')
//		document.write(strArbBanner);
//	else
//		document.write(strENGBanner);



	document.write('    </td>');
	document.write('    <td width="16%">');
	if (!isShop(strURL)){
		if (eval(isASP())){
		//document.write(genLangBoxASP());
		//document.write('<img src="/shared/images/lang.gif" border="0">');
		}else{
		//document.write(genLangBox(strPageName, strCurLang, isHomePage(strURL)));
		//document.write('<img src="/shared/images/lang.gif" border="0">');
		//document.write(genLangBoxASP());
		}
	}else{
		//document.write('<img src="/shared/images/lang.gif" border="0">');
	}
	document.write('    </td>');
	document.write('  </table>');
	document.write(   genHeader(strCurLang, nSection));
	if(strCurLang == 'a')
		document.write('  <table width="98%" align="center" border="0" cellspacing="0" cellpadding="0" dir="rtl">');
	else
		document.write('  <table width="98%" align="center" border="0" cellspacing="0" cellpadding="0" dir="ltr">');
	document.write('   <tr>');
	document.write('    <td width="26%" valign="top" align=center>');
	if (!isShop(strURL))
	{
		document.write(      genNavBar());
		document.write('    </td>');
		document.write('    <td width="15" valign="top" align=center>&nbsp;');
		document.write('    </td>');
		document.write('    <td colspan=2 width="69%" valign="top">');
	}
	else
		document.write(      genShopNavBar());
}

function writePageEnd()
{
	var strURL = location.href;
	
	document.write('    </td>');
	/*
	if(isHomePage(strURL))
	{
		//alert(strURL)
		document.write('    <td width="15" valign="top" align=center>&nbsp;');
		document.write('    </td>');
		document.write('<td width="26%" valign="top">');
		document.write(genHomeNavBar());
		document.write('</td>');
	}
	*/
	document.write('   </tr>');
	document.write('  </table>');

	if (!isShop(strURL))
		document.write(   genFooter(0));
	else
		document.write(   genFooter(1));
	document.write(   genCopyright());
//	document.write(' </body>');
//	document.write('</html>');
}
/*//////////////////////////////////////////////////////////////////////////////
End of AAZ Code
1/8/2002
//////////////////////////////////////////////////////////////////////////////*/