function makeArray(n) {
    this.length = n
    return this
}
function dbReference(NoRef,Titre,Auteur,Editeur,SiteInternetEditeur,TypeRef,Description,Commentaire,Note,Divers){
    this.NoRef = NoRef
    this.Titre = Titre
    this.Auteur = Auteur
    this.Editeur = Editeur
    this.SiteInternetEditeur = SiteInternetEditeur
    this.TypeRef = TypeRef
    this.Description = Description
    this.Commentaire = Commentaire
    this.Note = Note
    this.Divers = Divers
    return this
}
var dbRef = new makeArray(14)
dbRef[1] = new dbReference(5,"Grands initi&eacute;s (Les)", "Edouard Schur&eacute;", "Librairie Acad&eacute;mique P&eacute;rin", "","Livre", "La vie des initi&eacute;s (Rama, Krishna, Herm&egrave;s, Mo&iuml;se, Orph&eacute;e, Pythagore, Platon et J&eacute;sus).<BR>Les origines et le but de la vie.", "Excellente &eacute;tude", "18", "")
dbRef[2] = new dbReference(101,"Grande Hypoth&egrave;se (La)", "Albert Slosman", "Robert Laffont", "","Livre", "Etude sur l'Atlantide et l'Egypte, et leur monoth&eacute;isme...", "Un ouvrage de r&eacute;f&eacute;rence dans le domaine", "15", "")
dbRef[3] = new dbReference(66,"Grande Hypoth&egrave;se (La)", "Albert Slosman", "Robert Laffont", "","Livre", "Etude sur l'Atlantide et l'Egypte, et leur monoth&eacute;isme...", "Un ouvrage de r&eacute;f&eacute;rence dans le domaine", "15", "")
dbRef[4] = new dbReference(23,"R&eacute;cit d'un voyageur de l'astral", "Anne Givaudan", "Le Pers&eacute;a", "http://pro.wanadoo.fr/givaudan-achram/livresanetdan.html","Livre", "Connaissance initiatique", "Tr&egrave;s int&eacute;ressant", "17", "")
dbRef[5] = new dbReference(20,"Univers d'Edgar Cayce (L')", "Doroth&eacute;e Koechlin de Bizemont", "J'Ai Lu", "","Livre", "R&eacute;v&eacute;lations d'Edgar Cayce", "Tr&egrave;s int&eacute;ressant", "15", "")
dbRef[6] = new dbReference(100,"Monde Inconnu (Le), No 8, 07/1980", "", "", "","Magazine", "", "", "0", "")
dbRef[7] = new dbReference(102,"Monde Inconnu (Le), No 31, 07-08/1982", "", "", "","Magazine", "", "", "0", "Christian Jacq,")
dbRef[8] = new dbReference(104,"Monde Inconnu (Le), No 37, 02/1983", "", "", "","Magazine", "", "", "0", "")
dbRef[9] = new dbReference(404,"Chroniques des mondes parall&egrave;les (Les)", "Guy Tarade", "Robert Laffont", "","Livre", "De nombreuses informations sur le ph&eacute;nom&egrave;ne OVNI, la science, la technologie, etc...", "Tr&egrave;s int&eacute;ressant", "17", "")
dbRef[10] = new dbReference(501,"Secrets de l'aura (Les)", "T. Lobsang Rampa", "J'Ai Lu", "","Livre", "R&eacute;v&eacute;lations initiatiques sur l'aura, les chakras, les voyages astraux", "Excellent livre initiatique, tr&egrave;s complet...", "18", "")
dbRef[11] = new dbReference(547,"Doctrines secr&egrave;tes de J&eacute;sus (Les)", "Spencer Lewis (Dr H.)", "Rosicruciennes", "","Livre", "", "", "17", "")
dbRef[12] = new dbReference(823,"Essai de radiesth&eacute;sie vibratoire", "L. Chaumery et A. de B&eacute;lizal", "Desforges-Paris", "","Livre", "", "", "17", "3&egrave; &eacute;dition revue et augment&eacute;e,")
dbRef[13] = new dbReference(933,"Top Secret, No 1", "", "", "","Magazine", "Magazine traitant des sujets souvent occult&eacute;s par les m&eacute;dias.<BR>http://www.topsecret.fr", "Tr&egrave;s int&eacute;ressant.", "19", "Le myst&egrave;re et le secret des pierres, Jean Anne,")
dbRef[14] = new dbReference(1292,"http://antahkarana.forumzen.com/il-n-y-a-de-limites-que-celles-que-l-on-s-impose-f19/egypte-antique-t513.htm", "", "", "","Site Internet", "", "", "0", "")
function drawPage(NumeroRef) {
var newwindow = window.open("", "", "height=450,width=580,scrollbars")
var thePage = ""
var vtext = ""
var vRef = 0
var vTitre = ""
var vAuteur = ""
var vEditeur = ""
var vSiteInternetEditeur = ""
var vTypeRef = ""
var vDescription = ""
var vCommentaire = ""
var vNote = ""
var vDivers = ""

for (var i = 1; i <= dbRef.length; i++) {
    if (dbRef[i].NoRef == NumeroRef) {
        vRef = dbRef[i].NoRef
        vTitre = dbRef[i].Titre
        vAuteur = dbRef[i].Auteur
        vEditeur = dbRef[i].Editeur
        vSiteInternetEditeur = dbRef[i].SiteInternetEditeur
        vTypeRef = dbRef[i].TypeRef
        vDescription = dbRef[i].Description
        vCommentaire = dbRef[i].Commentaire
        vNote = dbRef[i].Note
        vDivers = dbRef[i].Divers
     }
}

vtext += "<p align='center' style='word-spacing: 0; margin: 0'><font face='Times New Roman' size='5'>"
vtext += vTypeRef
vtext += ",<font color='#ff0000'>"
vtext += "</font></font><span style='BACKGROUND-COLOR: #ffff00'><font face='Times New Roman' size='5'>"
if (vTypeRef == "Site Internet")    {
   vtext += "<a href='"
   vtext += vTitre
   vtext += "' target = _blank>"
}
vtext += vTitre
if (vTypeRef == "Site Internet")    {
    vtext += "</a>"
}
vtext += "</font><font size='4' face='Times New Roman'><br>"
vtext += "</font></span><font color='#006699'><font size='4' face='Times New Roman'>"
if (vAuteur != "")    {
   vtext += vAuteur 
   if (vEditeur != "")    { vtext += ", " }
}
if (vEditeur != "")    {
   if (vSiteInternetEditeur != "")    {
       vtext += "<a href='"
       vtext += vSiteInternetEditeur
       vtext += "' target = _blank>"
   }
   vtext += "Ed. "
   vtext += vEditeur 
   if (vSiteInternetEditeur != "")    {
       vtext += "</a>"
   }
}
vtext += "</font></font></p>"
vtext += "<p style='word-spacing: 0; margin: 0'>&nbsp;</p>"
vtext += "<p style='word-spacing: 0; margin: 0' align='left'><font face='Times New Roman' size='3'><b>"
if (vDivers != "") {
   vtext += vDivers
}
vtext += "</b></font></p>"
vtext += "<p style='word-spacing: 0; margin: 0'>&nbsp;</p>"
vtext += "<p style='word-spacing: 0; margin: 0' align='justify'><font face='Times New Roman' size='3'><i>Description</i>:</font></p>"
vtext += "<p style='word-spacing: 0; margin: 0' align='justify'><font face='Times New Roman' size='3'>"
vtext += vDescription
vtext += "</font></p>"
vtext += "<p style='word-spacing: 0; margin: 0' align='justify'><font face='Times New Roman' size='3'><i><BR>Notre avis</i>:</font></p>"
vtext += "<p style='word-spacing: 0; margin: 0' align='justify'><font face='Times New Roman' size='3'>"
vtext += vCommentaire
vtext += "</font></p>"
vtext += "<p style='word-spacing: 0; margin: 0' align='justify'><font face='Times New Roman' size='3'>"
if (vNote != "") {
    if (vNote != 0) {
        vtext += vNote
        vtext += " / 20"
    }
}
vtext += "</font></p>"
thePage += "<HTML><HEAD><TITLE>Reference</TITLE></HEAD><BODY background='../images/romtextb.jpg' bgcolor='#CCCC99' text='#000000'>"
thePage += vtext
thePage += "</BODY></HTML>"
newwindow.document.open()
newwindow.document.write (thePage)
newwindow.document.close()
}

