// lzmain.js

 var curobj=null, curlot=0, winnew, winsearch='', wintest;

function initpage() { var i, msg, pricemsg, nbrpics, picmsg, tempimg, areaobj, overobj, linkobj, overparent;
 var picpfx = '<br /><br /><span style="font-weight: normal">';

 overparent = ge('mapovr');
 ge('radion').onclick = chgmapn;
 ge('radioa').onclick = chgmapa;
 ge('maptype').curtype = 'n';

 for (i=1; i<=25; i++) {
   areaobj = ge(za('pa',i));
   if (!areaobj) {continue;}
   overobj = document.createElement('div');
   overobj.id = za('pb',i);
   overparent.appendChild(overobj);
   overobj.style.backgroundImage = 'url(images/' + za('map',i) + '.gif)';
   linkobj = ge(za('pn',i));
   if (lots[i][1] == 'A') {linkobj.className = 'linka';}

   pricemsg = pricestr(lots[i][4]);
   nbrpics = lots[i].length - 14;
   msg = 'Parcel ' + i + ': ' + stsname(lots[i][1]) + '<br />' + lots[i][2] + ' acres<br />';
   msg += (pricemsg == '&nbsp;') ? lots[i][11] : pricemsg;
   if (pricemsg != '&nbsp;') {msg += '<br />' + lots[i][11];}
   if (nbrpics) {
     if (nbrpics == 1) {msg += picpfx + '1 picture</span>'; picmsg = ' - 1 picture';}
     else              {msg += picpfx + nbrpics + ' pictures</span>'; picmsg = ' - ' + nbrpics + ' pictures';}
   }
   else {picmsg = '';}

   areaobj.nohref = 'nohref'; // required for status bar to work in IE
   areaobj.idx   = linkobj.idx = i;
   areaobj.pbobj = linkobj.pbobj = overobj;
   areaobj.msg   = linkobj.msg   = msg;
   areaobj.sts   = linkobj.sts   = 'Parcel ' + i + ' ' + stsname(lots[i][1]) + picmsg;

   areaobj.onmouseover = linkobj.onmouseover = linkobj.onfocus = function(){return mi(this);};
   areaobj.onclick = linkobj.onclick = function(){mc(this);};
 }

 var tempimg = new Image(688,552);
 tempimg.src = 'images/map27.jpg';
}

function initnewpage() {
 if (winsearch && winsearch.length >= 8) {
   switch (winsearch.substr(5,3)) {
     case 'col': document.title += ' Color Parcel Map'; break;
     case 'bnw': document.title += ' BW Parcel Map'; break;
     case 'aer': document.title += ' Aerial Parcel Map'; break;
     case 'prc': document.title += ' Price List'; break;
     case 'lot': if (curlot) {document.title += ' Parcel ' + curlot;} break;
   }
 }
 window.focus();
}

function chgmapn() { var obj;
 obj = ge('maptype');
 if (obj.curtype != 'n') {
   ge('mapnotice').style.color = '#005';
   ge('mapinfo').style.color = 'black';
   ge('mapovr').style.backgroundImage = 'url(images/map26.gif)';
   obj.style.backgroundColor = 'black';
   obj.curtype = 'n';
 }
}
function chgmapa() { var obj;
 obj = ge('maptype');
 if (obj.curtype != 'a') {
   ge('mapnotice').style.color = '#0c0';
   ge('mapinfo').style.color = '#ffe';
   ge('mapovr').style.backgroundImage = 'url(images/map27.jpg)';
   obj.style.backgroundColor = '#00c';
   obj.curtype = 'a';
 }
}

function mi(obj) {
 if (curobj) {
   curobj.pbobj.style.visibility = 'hidden';
 }
 obj.pbobj.style.visibility = 'visible';
 ge('mapinfo').innerHTML = obj.msg;
 window.status = obj.sts;
 curobj = obj;
 return true;
}

function mc(obj) {
 winnew = window.open('lzrnew.html?pge=lot'+obj.idx,'winnew')
 return;
}

function windsp(code) {
 if (code.substr(0,4) == 'http') {winnew = window.open(code,'winnew'); return;}
 if (code == 'docs')             {winnew = window.open('lzrdocs.html','winnew'); return;}
 winnew = window.open('lzrnew.html?pge='+code,'winnew');
 winnew.focus();
}

function writebody() {
 dw('');
 winsearch = window.location.search;
 if (!winsearch || winsearch.length < 8) {dsppageerr(); return;}
 switch (winsearch.substr(5,3)) {
   case 'col': dw('<p><img src="images/map26.gif" alt="Lazy Z parcel map" /></p>'); break;
   case 'bnw': dw('<p><img src="images/mapbw.gif" alt="Lazy Z parcel map" /></p>'); break;
   case 'aer': dw('<p><img src="images/map27.jpg" alt="Lazy Z parcel map" /></p>'); break;
   case 'prc': pricetable(); break;
   case 'lot': writelot(); break;
   default:    dsppageerr(); break;
 }
}

function writelot() { var i, j, maxj, tdsp='<td>&nbsp;</td>';
 curlot = parseInt(winsearch.substr(8),10);
 if (isNaN(curlot)) {curlot = 0;}
 if (curlot < 1 || curlot > 25) {dsppageerr(); return;}
 i = curlot;
 if (lots[i][1] == 'X') {dsppageerr(); return;}
 maxj = lots[i].length - 2;
 dw('<p id="lotttl">Parcel ' + curlot + '</p>');

 if (lots[i][11]) {dw('<p class="lotcap">' + lots[i][11] + '</p>');}
 dw('<table id="lottbl" cellspacing="0">');
 dw('<tr><td class="lothdr1">Status:</td><td colspan="3">' + stsname(lots[i][1]) + '</td></tr>');
 dw('<tr>');
 dw('<td class="lothdr1">Total acres:</td><td>' + lots[i][2] + '</td>');
 if (lots[i][5]) {dw('<td class="lothdr2">Bedrooms:</td><td>' + lots[i][5] + '</td>');}
 else            {dw(tdsp+tdsp);}
 dw('</tr>');
 dw('<tr>');
 dw('<td class="lothdr1">Irrigated acres:</td><td>' + lots[i][3] + '</td>');
 if (lots[i][6]) {dw('<td class="lothdr2">Baths:</td><td>' + lots[i][6] + '</td>');}
 else            {dw(tdsp+tdsp);}
 dw('</tr>');
 dw('<tr>');
 dw('<td class="lothdr1">Price:</td><td>' + pricestr(lots[i][4]) + '</td>');
 if (lots[i][7]) {dw('<td class="lothdr2">Floors:</td><td>' + lots[i][7] + '</td>');}
 else            {dw(tdsp+tdsp);}
 dw('</tr>');
 if (lots[i][8]) {dw('<tr>' + tdsp+tdsp + '<td class="lothdr2">Square feet:</td><td>' + lots[i][8] + '</td></tr>');}
 if (lots[i][9] || lots[i][10]) {
   dw('</tr>');
   if (lots[i][10]) {dw('<td class="lothdr1">Garage size:</td><td>' + lots[i][10] + '</td>');}
   else             {dw(tdsp+tdsp);}
   if (lots[i][9]) {dw('<td class="lothdr2">Date built:</td><td>' + lots[i][9] + '</td>');}
   else            {dw(tdsp+tdsp);}
   dw('</tr>');
 }
 dw('</table>');
 if (lots[i][12].length) {dw('<div id="lotdesc"><ul>' + getlotdesc(lots[i][12]) + '</ul></div>');}
 if (maxj > 12) {
   dw('<div id="lotpics">');
   for (j=13; j<=maxj; j++) {
     dw('<p><img src="lotimg/' + za('p',curlot) + za('',j-12) + '.jpg" alt="' + lots[i][j] + '" /></p>');
     dw('<p class="lotcap">' + lots[i][j] + '</p>');
   }
   dw('</div>');
 }
 dw('<hr />\r\n<div><a href="lzrdocs.html"><b>Lazy Z Ranch Documents</b></a></div>');

}

function getlotdesc(lotarr) { var i, desc, rtndesc;
 rtndesc = '\r\n';
 for (i in lotarr) {
   desc = lotarr[i];
   rtndesc += '<li>' + desc;
   if (desc.substr(desc.length-1) != '>') {rtndesc += '</li>';}
   rtndesc += '\r\n';
 }
 return rtndesc;
}

function dsppageerr() {
 dw('<p id="pageerr">Sorry, but your request cannot be processed.<br />');
 dw('Please return to the <a href="http://www.lazyzranch.com">Lazy Z Ranch</a> home page to continue.</p>');
}

function pricetable() { var i;
 dw('<div id="pricettl">Lazy Z Ranch Parcel Price List</div>');
 dw('<table id="pricetbl" cellspacing="0">');
 dw('<tr>');
 dw('<td class="pricehdr">Parcel</td>');
 dw('<td class="pricehdr">Total<br />Acres</td>');
 dw('<td class="pricehdr">Irrigated<br />Acres</td>');
 dw('<td class="pricehdr">Status</td>');
 dw('<td class="pricehdr">Price</td>');
 dw('<td class="pricehdr">Comment</td>');
 dw('</tr>');
 for (i=1; i<=25; i++) {
   if (lots[i][1] == 'X') {continue;}
   dw('<tr>');
   dw('<td>' + i + '</td>');
   dw('<td>' + lots[i][2] + '</td>');
   dw('<td>' + lots[i][3] + '</td>');
   dw('<td class="pricests">' + stsname(lots[i][1]) + '</td>');
   dw('<td>' + pricestr(lots[i][4]) + '</td>');
   dw('<td class="pricecomt">' + nbsp(lots[i][11]) + '</td>');
   dw('</tr>');
 }
 dw('</table>');
}

function pricestr(price) { var nbrstr, pos;
 if (!price) {return '&nbsp;';}
 nbrstr = price.toString();
 pos = nbrstr.length - 3;
 while (pos >= 1) {
   nbrstr = nbrstr.substring(0,pos) + ',' + nbrstr.substring(pos,nbrstr.length);
   pos -= 3;
 }		
 return '$'+nbrstr;
}

function stsname(sts) { var rtnstr;
 switch (sts) {
  case 'A': rtnstr = 'AVAILABLE'; break;
  case 'P': rtnstr = 'PENDING'; break;
  case 'R': rtnstr = 'RESERVED'; break;
  case 'S': rtnstr = 'SOLD !'; break;
  case 'X': rtnstr = 'EXCLUDED'; break;
  default:  rtnstr = 'UNKNOWN'; break;
 }
 return rtnstr;
}

function nbsp(str) {
 if (str == '') {return '&nbsp;';}
 else           {return str;}
}

function nn(){}

function ge(id) {
 return document.getElementById(id);
}

function dw(str) {
 document.write(str+'\r\n');
}

function dwtest(str) {
 if (!wintest) {wintest = window.open('','wintest');}
 wintest.document.write(str+'\r\n');
}

function za(str, nbr) {return (nbr <= 9) ? str+'0'+nbr : str+nbr;}

var edta = '636F6E746163746C7A72406C617A797A72616E63682E636F6D';
function emload() {var elem
 for (i in document.links) {
   elem = document.links[i];
   if (!elem.href) {continue;}
   if (elem.href.indexOf('eml(')>0) {
     elem.innerHTML = emdecode(edta);
   }
 }
}
function eml() {var addr,dname;
 addr = emdecode(edta);
 dname = addr.substring(addr.indexOf('@')+1).toUpperCase();
 parent.location = 'mailto:' + addr + '?subject=' + dname + ' web inquiry';
}
function emdecode(edta) {var str='',i;
 for (i=0; i<edta.length; i+=2) {str += String.fromCharCode(parseInt(edta.substr(i,2),16));}
 return str;
}

function writebtm() {
 dw('<table class="btmtbl" cellspacing="0" cellpadding="0">');
 dw('<tr><td class="btmtbllft">Presented by:</td><td>David Herman</td></tr>');
 dw('<tr><td class="btmtbllft">Phone:</td><td>541-495-2222</td></tr>');
 dw('<tr><td class="btmtbllft">Email:</td><td><a href="javascript:eml()"></a></td></tr>');
 dw('<tr><td colspan="2" class="btmtblitalic">Information deemed reliable, but not guaranteed.</td></tr>');
 dw('</table>');
 dw('<div><a id="toplnk" href="#pgetop">Top</a></div>');
 emload();
}