this.standardbody=(document.compatMode=="CSS2Compat")? document.documentElement : document.body //create reference to common "body" across doctypes
var popwindow=null;
var model=1, copydate="2011"; 
var listdate="<font style='font-family:Verdana; font-size:13.5pt; color:#000080; font-weight:bold'>As at 20 August 2011</font>";
var n=1
var d=new Array;
d[n++]=new Array("C002","Std","White Card","Seddon MK17/Metal Sections ","Kowloon Motor Bus","Red/Cream","-","-","Choice","Choice ","Choice","Supplied with two decal sheets with choice of Regn No, Route and Destination","?","?","?");
d[n++]=new Array("BH3013A","Std","?","Albion Viking EVK55CL/Duple Dominant","Kowloon Motor Bus","Cream/Gold","-","-","BH 3013","-","Training School","","Jan-07","?","60");
d[n++]=new Array("BH3013B","Std","?","Albion Viking EVK55CL/Duple Dominant","Kowloon Motor Bus","Cream/Gold","-","-","BH 7644","-","Training Unit","","Jan-07","?","60");
d[n++]=new Array("CHS004","Std","?","Albion Viking EVK41XL/Metal Sections","Kowloon Motor Bus","Cream/Red","-","L228","AR 7709","15A","Tsz Wan Shan","","Jan-06","?","300");
d[n++]=new Array("CHS0502","Std","Plastic Card Outer","Leyland Titan B15","China Motor Bus","Blue/Cream","-","TC1","CD 1213","260","Stanley","","Nov-05","Y","400");
d[n++]=new Array("CHS0602A","Std","?","Albion Viking EVK41XL/Metal Sections","Kowloon Motor Bus","Cream/Red","-","L265","AR 7746","62","Castle Peak Hospital","","Aug-06","Y","400");
d[n++]=new Array("CHS0602B","Std","?","Albion Viking EVK41XL/Metal Sections","Kowloon Motor Bus","Cream/Red","-","L268","AR 7749","73K","Man Kam To","","Aug-06","Y","200");
d[n++]=new Array("CHS0603A","Std","Plastic Card Outer","Albion Viking EVK55CL/Union Auto","Kowloon Motor Bus","Cream/Red 2 Stripes","-","L285","BK 4975","51","Un Long","","Dec-06","Y","360");
d[n++]=new Array("CHS0603B","Std","Plastic Card Outer","Albion Viking EVK55CL/Union Auto","Kowloon Motor Bus","Cream/Red 2 Stripes","-","L285","BK 4975","51","Tai Kok Tsui Ferry","","Dec-06","Y","360");
d[n++]=new Array("CHS0701A","Std","?","Volvo B10MD/Alexander RV 10m","Kowloon Motor Bus","Cream/Red","-","VMD1","DC 4146","101","Kennedy Town","","Oct-07","?","550");
d[n++]=new Array("CHS0701B","Std","?","Volvo B10MD/Alexander RV 10m","Kowloon Motor Bus","Cream/Red","-","VMD1","DC 4146","101","Kwun Tong","","Oct-07","?","550");
d[n++]=new Array("CHS0801A","Std","?"," Mitsubishi Fuso MK117J 9.1m","Kowloon Motor Bus","White Grey Skirt Red Stripe","-","AM127","FG 1189","2C","Yau Yat Tsuen","","Jul-08","Y","244");
d[n++]=new Array("CHS0801B","Std","?"," Mitsubishi Fuso MK117J 9.1m","Kowloon Motor Bus","White Grey Skirt Red Stripe","-","AM162","FP 5465","78K","Sheung Shui","","Jul-08","Y","244");
d[n++]=new Array("CHS0901A","Std","?","MCW Metrorider","Kowloon Motor Bus","White Grey Skirt/Roof Red Stripe","-","AMR1","DY 6050","208","Tsim Sha Tsui East","","Mar-09","?","400");
d[n++]=new Array("CHS0901B","Std","?","MCW Metrorider","Kowloon Motor Bus","White Grey Skirt/Roof Red Stripe","-","AMR2","EA 4591","299","Sai Kung","","Mar-09","?","");
d[n++]=new Array("CHS0902A","Std","?","Seddon Pennine 4 ","Kowloon Motor Bus","Red/Cream","-","-","AR 7604","33","Kwun Tong Ferry ","","Jan-09","?","300");
d[n++]=new Array("CHS0902B","Std","?","Seddon Pennine 4 ","Kowloon Motor Bus","Red/Cream","-","-","AR 7606","40","Sai Kung","","Jan-09","?","");
d[n++]=new Array("CHS0905A","Std","Plastic Card Outer"," Mitsubishi Fuso MK117J 9.1m","Kowloon Motor Bus","White Grey Skirt Red Stripe","-","AM95","EV 8949","212","Whampoa Garden","","Jun-09","Y","250");
d[n++]=new Array("CHS0905B","Std","Plastic Card Outer"," Mitsubishi Fuso MK117J 9.1m","Kowloon Motor Bus","White Grey Skirt Red Stripe","-","AM40","EN 419","A7","Airport - Kowloon Tong MTR","","Jun-09","Y","250");
d[n++]=new Array("CHS0907","Std","Plastic Card Outer","Dennis Falcon HC/Duple","Kowloon Motor Bus","White Grey Skirt Red Stripe  Airport Coach Service","-","AF1","DH 743","200","Airport","","Sep-09","Y","300");
d[n++]=new Array("CHS1001A","Std","Plastic Card Outer","Dennis Dragon/Duple Metsec 9.9m","Kowloon Motor Bus","White Grey Skirt Red Stripe","-","ADS2","FS 8396","606","Siu Sai Wan Estate ","","May-10","Y","100");
d[n++]=new Array("CHS1001B","Std","Plastic Card Outer","Dennis Dragon/Duple Metsec 9.9m","Kowloon Motor Bus","White Grey Skirt Red Stripe","-","ADS4","FS 9108","107","Kowloon Bay ","","May-10","Y","100");
d[n++]=new Array("CHS1001C","Std","Plastic Card Outer","Dennis Dragon/Duple Metsec 9.9m","Kowloon Motor Bus","White Grey Skirt Red Stripe","-","ADS5","FT 4173","108","Braemar Hill","","May-10","Y","100");
d[n++]=new Array("CHS1001D","Std","Plastic Card Outer","Dennis Dragon/Duple Metsec 9.9m","Kowloon Motor Bus","White Grey Skirt Red Stripe","-","ADS23","FT 8994","2","So Uk","","Jul-10","Y","100");
//Concorde Model Shop Code - © K. Ellis - Ver 2.4-concordemodelshop 02-10-10
var no_of_models=d.length-1;
function catnolist()
// Produce HTML code for main model list table
{
for (var l=1; l<d.length; l++)
{
//Add non_breakable space to any empty fields to preserve table borders
for (var f=1; f<15; f++)
{
if ((f==1 || f==2 || f==3||  f==4 || f==7 || f==8 || f==9 || f==12 || f==13) && (d[l][f]=="" || d[l][f]==" ")) d[l][f]="?";
if ((f==5  || f==6 || f==10 || f==11 || f==14) && (d[l][f]=="" || d[l][f]==" ")) d[l][f]="&nbsp;";
}
// Deal with any problem model entries
// None

// All fields Code - document.write("<tr><td id=x onmouseover = popup("+l+") onmouseout= hide_popup()>"+d[l][0]+"</a></td><td id=x>"+d[l][1]+"</td><td id=x>"+d[l][2]+"</td><td id=x>"+d[l][3]+"</td><td id=x>"+d[l][4]+"</td><td id=x>"+d[l][5]+"</td><td id=x>"+d[l][6]+"</td><td id=x>"+d[l][7]+"</td><td id=x>"+d[l][8]+"</td><td id=x>"+d[l][9]+"</td><td id=x>"+d[l][10]+"</td><td id=x>"+d[l][11]+"</td><td id=x>"+d[l][12]+"</td><td id=x>"+d[l][13]+"</td><td id=x>"+d[l][14]+"</td></tr>");

document.write("<tr><td id=x onmouseover = popup("+l+") onmouseout= hide_popup()>"+d[l][0]+"</a></td><td id=x>"+d[l][3]+"</td><td id=x>"+d[l][4]+"</td><td id=x>"+d[l][7]+"</td><td id=x>"+d[l][8]+"</td><td id=x>"+d[l][9]+"</td><td id=x>"+d[l][10]+"</td><td id=x>"+d[l][12]+"</td><td id=x>"+d[l][13]+"</td></tr>");

}
document.write("<tr><td id=x colspan='15'><p align='center'><font style='color:blue; font-family:arial; font-size:10pt'>&copy; Peter Harrison "+copydate+".<br>This list contains details of  "+ no_of_models+" produced by the Concorde Model Shop.</font></td></tr>");
window.document.getElementById("date").innerHTML=" - "+listdate;
hide_popup();
}


function show_popup(divobj){ //Centers a div element on the page
var ie=document.all && !window.opera
var dom=document.getElementById("popup1");
var scroll_top=(ie)? this.standardbody.scrollTop : window.pageYOffset
var scroll_left=(ie)? this.standardbody.scrollLeft : window.pageXOffset
var docwidth=(ie)? this.standardbody.clientWidth : window.innerWidth-this.scrollbarwidth
var docheight=(ie)? this.standardbody.clientHeight: window.innerHeight
var docheightcomplete=(this.standardbody.offsetHeight>this.standardbody.scrollHeight)? this.standardbody.offsetHeight : this.standardbody.scrollHeight //Full scroll height of document
var objwidth=560 //width of div element
var objheight=340//height of div element
var topposition=(docheight>objheight)? scroll_top+docheight/2-objheight/2+"px" : scroll_top+10+"px" //Vertical position of div element: Either centered, or if element height larger than viewpoint height, 10px from top of viewpoint
//dom.style.left=100
dom.style.top=Math.floor(parseInt(topposition))+"px"
dom.style.visibility="visible";
dom.style.width="560"
dom.style.height="auto"
}

function hide_popup()
// Hide pop up division
{
var obj=window.document.getElementById("popup1");
obj.style.visibility="hidden";
}

function popup(l)
// process raw model data, pre-format fields for pop-up window
{
var fno=d[l][7];
var reg=d[l][8];
var release=d[l][1];
var details=d[l][11];
var cert=d[l][13];
var qty=d[l][14];
var month=d[l][12].substr(0,3);
var yt= d[l][12].substr(4,2);
if (yt=="") yt="88";
if (d[l][4]=="") d[l][4]="&nbsp;";
switch(month)
{
case "Jan" : month="January"; break;
case "Feb" : month="February"; break;
case "Mar" : month="March"; break;
case "Apr" : month="April"; break;
case "Jun" : month="June"; break;
case "Jul" : month="July"; break;
case "Aug" : month="August"; break;
case "Sep" : month="September"; break;
case "Oct" : month="October"; break;
case "Nov" : month="November"; break;
case "Dec" : month="December"; break;
case "?" : month="Unknown"; break;
}
var year=parseInt(yt,10);
if (fno=="-") fno="None";
if (reg=="-") reg="None";
if (details.length==0) details="-";
if (cert=="Y") cert="Yes"; else cert="No";
if (release=="Std") release="Standard";
if (release=="Com") release="Commissioned";
if (qty.length==0) qty="Not disclosed by ABC";
if (year>88) year+=1900; else year+=2000;
if (year==2088) year="";

// HTML Code strings for pop up window
// <img width=568 height=48 border=0 src='pop_header1.gif'>

// HTML Code strings for pop up window
// <img width=568 height=48 border=0 src='pop_header1.gif'>
var info1="<center><table width=98% border=1 cellpadding=2 cellspacing=1 bordercolor=#687BF8><tr><td id=ph colspan=2>"+d[l][0]+" - "+d[l][3]+"<br>"+d[l][4]+"</td></tr><tr><td colspan=2 align=left id=px><b>Operator:</b> "+d[l][6]+"</td></tr><tr><td colspan=2 align=left id=px><b>Livery:</b> "+d[l][5]+"</td></tr><tr><td width=50% id=px><b>Fleet No.:</b> "+fno+"</td><td width=50% id=px><b>Registration:</b> "+reg+"</td></tr>";
var info2="<tr><td colspan=2 align=left id=px><b>Route &amp; Destination:</b> "+d[l][9]+" "+d[l][10]+"</td></tr><tr><td id=px><b>Issue Type:</b> "+release+"</td><td id=px><b>Release Date:</b> "+month+" "+year+"</td></tr><tr><td colspan=2 id=px><b>Box Type:</b> "+d[l][2]+"</td></tr><tr><td id=px><b>Quantity:</b> "+qty+"</td><td id=px><b>Certificated:</b> "+cert+"</td></tr><tr><td colspan=2 id=px><b>Notes:</b> "+details+"</td></tr></table><font style='color:blue; font-family:arial; font-size:10pt'>&copy; Peter Harrison "+copydate+"</font></center>";
//</body></html>";

// Insert model data into hidden pop up window division & make visible
hide_popup();
document.getElementById("popup1").innerHTML=info1+info2;
show_popup("popup1");
}

catnolist();

