var tota=0; var totp=0; var totr=0; var bgn=0; var nd=0
var bsr=0; var loc=""; var opr=0; var txr=0;
var coNme=""; var str=""
var browser = navigator.appName
var version = navigator.appVersion.substring(0,4)

if(!((browser=="Netscape" && version.charAt(0) >="3")||(browser=="Microsoft Internet Explorer" && version.substring(0,4) >= "3.01"))){
		alert("This application requires Netscape Navigator 3.0 or later, or Internet Explorer 3.01 or later to perform properly.")}
	else {browser="OK"}

var p = new makeAra(36)
var q = new makeAra(36)
var a = new makeAra(36)
var nsf = new makeAra(36)
var nms = new makeSAra(36)

function procd(){
	var asf= Math.round(a[27]*q[27])
	str = totp+"%"+tota+"%"+q[13]+"%"+q[14]+"%"+q[25]+"%"+q[26]+"%"+asf+"%"
	setcookie("dasf",str)
	location="calc_annualrental.php"
}
function makeAra(n){
	this.length=n;
	for (i=1; i <= n; i++){
		this[i]=0
	}
return this
}
function makeSAra(n){
	this.length=n;
	for (i=1; i <= n; i++){
		this[i]=" "
	}
return this
}
function nxtfld(){
	nd=str.indexOf("%",bgn)
	bgn=nd+1
}
function setcookie(nme,cstr){
	document.cookie=" "+nme+"="+escape(cstr)+"; path=/"
}
function getcookie(nme){
	var cstr = "";
	var mycookie= " " +document.cookie+";"
	var snme=" "+nme+"="
	var schr=mycookie.indexOf(snme)
	var lchr=0
	if(schr!=-1){
		schr += snme.length
		lchr=mycookie.indexOf(";",schr);
		cstr=unescape(mycookie.substring(schr,lchr))
		}
	return cstr
}
function nxtf(){
	var nd=str.indexOf("%",bgn)
	var f=parseFloat(str.substring(bgn,nd))
	bgn=nd+1
	return f
}
function df(){
	loc="Unspecified";
	bsr=0;
	opr=0;
	txr=0;
}
function chngnm(){
	coNme = document.nm.nptname.value
	cmmn()
}
function cmmn(){
	str = coNme+"%"+loc+"%"+bsr+"%"+opr+"%"+txr+"%"
	setcookie("dals",str)
}
function initall(){
	str = getcookie("dals")
	var nch =str.indexOf("%");
	var nch2 = -1
	if(nch<0){
		coNme="Company name in title of report."
		df()}
		else{coNme=str.substring(0,nch);//company
			nch2=str.indexOf("%",nch+1)
			loc=str.substring(nch+1,nch2);//location
			bgn=nch2+1;
			bsr = nxtf();//net rent
			opr = nxtf();//operating expenses
			txr = nxtf();//taxes
		}
	document.nm.nptname.value = coNme;
	cmmn()
	nms[1]="Executive Office 15x20"; a[1]=325; nsf[1]=300
	nms[2]="Executive Office 15x15"; a[2]=250; nsf[2]=225
	nms[3]="Private Office 15x10"; a[3]=175; nsf[3]=150
	nms[4]="Semi-Enclosed Workstation 9x12"; a[4]=126; nsf[4]=108
	nms[5]="Semi-Enclosed Workstation 8x8"; a[5]=80; nsf[5]=64
	nms[6]="Semi-Enclosed Workstation 6x8"; a[6]=64; nsf[6]=48
	nms[7]="Open Workstation 6x6"; a[7]=48; nsf[7]=36
	nms[8]="Large Conference Room"; a[8]=325; nsf[8]=300
	nms[9]="Medium Conference Room"; a[9]=250; nsf[9]=225
	nms[10]="Small Conference Room"; a[10]=175; nsf[10]=150
	nms[11]="Open Conference Area"; a[11]=160; nsf[11]=140
	nms[12]="Small Open Conf. Area"; a[12]=80; nsf[12]=64
	nms[13]="Galley Kitchen"; a[13]=60; nsf[13]=40
	nms[14]="Kitchen"; a[14]=175; nsf[14]=150
	nms[15]="Lunch/Break Seating"; a[15]=12; nsf[15]=9
	nms[16]="Copier Room"; a[16]=175; nsf[16]=150
	nms[17]="Lateral Files (30&quot W)"; a[17]=10; nsf[17]=7.5
	nms[18]="Lateral Files (36&quot W)"; a[18]=12; nsf[18]=9
	nms[19]="Lateral Files (42&quot W)"; a[19]=14; nsf[19]=10.5
	nms[20]="Letter Sized Vert. Files"; a[20]=7.5; nsf[20]=4.5
	nms[21]="Legal Sized Vert. Files"; a[21]=9; nsf[21]=6
	nms[22]="Shelving (30&quot W)"; a[22]=10; nsf[22]=7.5
	nms[23]="Shelving (36&quot W)"; a[23]=12; nsf[23]=9
	nms[24]="Shelving (42&quot W)"; a[24]=14; nsf[24]=10.5
	nms[25]="Private Washroom"; a[25]=80; nsf[25]=55
	nms[26]="Private Washroom/Shower"; a[26]=95; nsf[26]=70
	nms[27]="Computer Room"; a[27]=0; nsf[27]=0
	nms[28]="Reception Room"; a[28]=175; nsf[28]=150; p[28]=1
	nms[29]="Add for Guest Seating"; a[29]=25; nsf[29]=20
	for (i=1; i<=7 ;i++){
		p[i]=1}
	for (i=1; i<=27; i++){
		q[i]=pF(document.sR.elements[i-1].value)}
	csf()
	q[28]=pF(document.sR.elements[31].value)
	q[29]=pF(document.sR.elements[32].value)
	for (i=30; i<=35 ;i++){
		c2sf(i)}
}
function pF(sNum){
	if(sNum == "" || sNum == " "){var x = 0}
	else{
		var x=parseFloat(sNum)
		if (isNaN(x)){
			x=0
			alert("'"+sNum+"' is not a number.  Value assumed to be zero.")
		}}
	return x
}
function c2sf(n){
	var i = parseInt(n)
	var j = (i-30)*6
	nms[i] = document.sR2.elements[j].value
	q[i] = pF(document.sR2.elements[j+1].value)
	var xl = pF(document.sR2.elements[j+2].value)
	var xw = pF(document.sR2.elements[j+3].value)
	var xa = pF(document.sR2.elements[j+4].value)
	p[i] = pF(document.sR2.elements[j+5].value)
	if (xa==0){
		xa=xl*xw
		document.sR2.elements[j+4].value=""}
	else {
		document.sR2.elements[j+2].value=""
		document.sR2.elements[j+3].value=""}
	nsf[i]=Math.round(xa)
	if (nsf[i]>125){
		a[i]=nsf[i]+25}
	else{
		if (nsf[i]>=100){
			a[i]=Math.round(nsf[i]*1.2)}
		else {
			if (nsf[i]>=64){
				a[i]=Math.round(nsf[i]*1.25)}
			else {
				if (nsf[i]>=36){
					a[i]=Math.round(nsf[i]*1.33)}
				else {a[i]=Math.round(nsf[i]*1.33)}}}}
}
function csf(){
	var j = 26
	var xl = pF(document.sR.elements[j+1].value)
	var xw = pF(document.sR.elements[j+2].value)
	var xa = pF(document.sR.elements[j+3].value)
	if (xa==0){
		xa=xl*xw
		document.sR.elements[j+3].value=""}
	else {
		document.sR.elements[j+1].value=""
		document.sR.elements[j+2].value=""}
	a[j+1]=xa
}
function acalc(){
	tota=0; totp=0
	for(var i=1; i<=35; i++){
		if(browser=="OK"){
			if(isNaN(q[i])){q[i]=0}
			if(isNaN(a[i])){a[i]=0}
			if(isNaN(p[i])){p[i]=0}}
		tota+= q[i]*a[i]
		totp+= Math.round(q[i]*p[i])
	}
	if (q[28]>0){
		var tmp=tota/q[28]
		if (tmp > 3750){
			tota+=(tmp-3750)*0.0075}}
	tota=Math.round(tota*1.3)
	totr=Math.round(tota*1.15/100)*100
}
function caltot(){
	var ln="";
	ln=".  If this is acceptable and you want to proceed with cost projections now, click on ";
	ln=ln+"'YES'.  Otherwise 'NO' to adjust your requirements or to display them.";
	acalc();
	if (confirm("Based on your input we have estimated that you will require "+ tota + 
	" usable square feet (approximately " + totr + 
	" rentable square feet for a staff of "+ totp + ln)){procd()}
}
function prt(){
	var w1=" WIDTH='200'"; var w2=" WIDTH='60'"; var w3=" WIDTH='50'"
	var w4=" WIDTH='55'"; var w5=" WIDTH='80'"
	var j=0; var ln=""
	Win1=window.open("","Results","scrollbars,resizable,width=500,height=500")
	ln="<HTML><HEAD><TITLE>Dallaslease.com Office Planning: Area Calculations</TITLE></HEAD>"
	Win1.document.writeln(ln)
	ln="<BODY BGCOLOR='#ffffff' style='font-family:Arial, Helvetica, sans-serif; font-size:12px;'>"
	Win1.document.writeln(ln)
	ln="</H2>SPACE REQ.</H2>"
	Win1.document.writeln(ln)
	ln="<P>The total floor area required will vary depending on the mix of space types and"
	Win1.document.writeln(ln)
	ln="the configuration of the space (its shape, dimensions, perimeter, etc.) quantity, "
	Win1.document.writeln(ln)
	ln="size and location of column and other building elements.</P>"
	Win1.document.writeln(ln)
	Win1.document.writeln("<TABLE WIDTH='480' BORDER='0' CELLSPACING='1' CELLPADDING='2' HEIGHT='50' bgcolor='#DBDBDB' style='font-family:Arial, Helvetica, sans-serif; font-size:12px;'>")
	Win1.document.writeln("<CAPTION ALIGN='TOP'><H3>Summary Listing</H3>")
	if (coNme.substring(0,12) == "Company name"){
		ln="&nbsp;"}
	else{
		ln="<H2>"+coNme+"</H2>"}
	Win1.document.writeln(ln)
	Win1.document.writeln("<TR bgcolor='#ffffff'><TD WIDTH='200' VALIGN='BOTTOM'><B>Room/Area Descripion</B></TD>")
	Win1.document.writeln("<TD WIDTH='60' ALIGN='CENTER' VALIGN='BOTTOM'><A HREF='explain/nsf.php'><B>Net Area</A> (SF)</B></TD>")
	Win1.document.writeln("<TD WIDTH='50' ALIGN='CENTER' VALIGN='BOTTOM'><B>Qty</B></TD>")
	Win1.document.writeln("<TD WIDTH='55' ALIGN='CENTER' VALIGN='BOTTOM'><B>Staff</B></TD>")
	ln="<TD WIDTH='80' ALIGN='CENTER' VALIGN='BOTTOM'><B>Extended <A HREF='explain/asf.php'>Assignable Area</A>(SF)</B></TD></TR>"
	Win1.document.writeln(ln)
	Win1.document.writeln("</TABLE><TABLE WIDTH='480' BORDER='0' CELLSPACING='1' CELLPADDING='2' bgcolor='#DBDBDB' style='font-family:Arial, Helvetica, sans-serif; font-size:12px;'>")
	tota=0; totp=0; var tmpt=0; var tmpn=0; var tmpa=0
	if(browser=="OK"){
	for (i=1; i<=35; i++){
			if(isNaN(q[i])){q[i]=0}
			if(isNaN(a[i])){a[i]=0}
			if(isNaN(p[i])){p[i]=0}
		}
	}
	for (i=30; i<=35; i++){
		tmpt=q[i]*a[i]
	}
	for (i=1; i<=35; i++){
		if (q[i]>0){
			j++
			tota+= q[i]*a[i]
			totp+= q[i]*p[i]
			if(j>1){
				w1=""; w2=""; w3=""; w4=""; w5=""}
			tmpn=nsf[i]
			tmpa=Math.round(q[i]*a[i])
			if (i==28){
				tmpt=tmpt+tota
				tmpt=tmpt/q[28]
				if (tmpt > 3750){
					tmpt=5*(Math.round((tmpt-3750)*0.0015));
					tmpn=Math.round(nsf[i]+tmpt)
					tmpa=Math.round(q[i]*(a[i]+tmpt))
					tota+=tmpt*q[i]
					}
				}
			ln="<TR bgcolor='#ffffff'><TD"+w1+" HEIGHT='21' >"+nms[i]+"</TD><TD"+w2+"><P ALIGN=RIGHT>"+tmpn+"</TD>";
			Win1.document.writeln(ln);
			ln="<TD"+w3+" ALIGN='RIGHT'>"+q[i]+"</TD><TD"+w4+"><P ALIGN=RIGHT>"
			if (p[i]>0){
				ln=ln+(p[i]*q[i])+"</TD>"}
			else{
				ln=ln+"&nbsp;</TD>"}
			Win1.document.writeln(ln);
			ln="<TD"+w5+"><P ALIGN=RIGHT>"+tmpa+"</TD></TR>"
			Win1.document.writeln(ln);
		}
	}
	Win1.document.writeln("</TABLE>")
	Win1.document.writeln("<TABLE WIDTH='480' BORDER='0' CELLSPACING='1' CELLPADDING='2' bgcolor='#DBDBDB' style='font-family:Arial, Helvetica, sans-serif; font-size:12px;'>")
	ln="<TR bgcolor='#ffffff'><TD WIDTH='318' HEIGHT='21'><B>Subtotal</B></TD><TD WIDTH='60' ALIGN='RIGHT'>"+totp+"</TD>"
	Win1.document.writeln(ln);
	ln="<TD WIDTH='82' ALIGN='RIGHT'>"+tota+"</TD></TR>"
	Win1.document.writeln(ln);
	Win1.document.writeln("<TR bgcolor='#ffffff'><TD><B>Area for layout factors, circulation, and miscellaneous support</B></TD>")
	Win1.document.writeln("<TD HEIGHT='36'>&nbsp;</TD>")
	tmpa=tota
	tota=Math.round(tota*1.3)
	totr=Math.round(tota*1.15/100)*100
	ln="<TD ALIGN='RIGHT'>"+(tota-tmpa)+"</TD></TR>"
	Win1.document.writeln(ln);
	Win1.document.writeln("<TR bgcolor='#ffffff'><TD><B>Total <A HREF='explain/usable.php'>Usable</A> Area</B></TD><TD HEIGHT='21'>&nbsp;</TD>")
	ln="<TD ALIGN='RIGHT'>"+tota+"</TD></TR>"
	Win1.document.writeln(ln);
	ln="<TR bgcolor='#ffffff'><TD><A HREF='explain/rentable.php'><B>Rentable</A> Square Feet </B>(rounded to nearest 100 SF)</TD><TD>&nbsp;</TD>"
	Win1.document.writeln(ln);
	ln="<TD ALIGN='RIGHT'>"+totr+"</TD></TR></TABLE><P>&nbsp;</P>"
	Win1.document.writeln(ln);
	ln="<P>The listing of spaces above and the allowances for circulation, minor support areas"
	Win1.document.writeln(ln)
	ln=", etc. are meant to provide an approximation of the usable and rentable space required"
	Win1.document.writeln(ln)
	ln="to support the functional elements that you have entered on the form.  For more"
	Win1.document.writeln(ln)
	ln="specific projections please consult a commercial broker.</P>"
	Win1.document.writeln(ln)
	ln="<P><CENTER>&nbsp;</CENTER></P>"
	Win1.document.writeln(ln)
	ln="<FORM><P><CENTER><INPUT NAME='name' TYPE='button' VALUE='Close' ONCLICK='self.close()'></CENTER></FORM>"
	Win1.document.writeln(ln)
	ln="<ADDRESS><CENTER>Dallaslease Inc.<BR>"
	Win1.document.writeln(ln)
	ln="2600 Beechcraft Street, Plano, Texas 75025<BR>"
	Win1.document.writeln(ln)
	ln="Phone (972)312-8790<BR>"
	Win1.document.writeln(ln)
	ln="<A HREF='mailto:kevin@dallaslease.com'<B>Write us</B></A> at kevin@dallaslease.com.com</CENTER></ADDRESS>"
	Win1.document.writeln("</BODY>")
//	Win1.focus()
	Win1.document.close()
}
function schd(){
	acalc();
	if (totr<=6000){
			Win1=open("datimeline1.php","timeline","scrollbars,width=500,height=600")}
		else if(totr<=30000){
				Win1=open("datimeline2.php","timeline","scrollbars,width=500,height=600")}
			else if(totr<=75000){
					Win1=open("datimeline3.php","timeline","scrollbars,width=500,height=600")}
				else {Win1=open("datimeline4.php","timeline","scrollbars,width=500,height=600")}
}
function find(){
	acalc();
	var asf= Math.round(a[27]*q[27]);
	str = totp+"%"+tota+"%"+q[13]+"%"+q[14]+"%"+q[25]+"%"+q[26]+"%"+asf+"%";
	setcookie("dasf",str);
	location="dafind.php";
}