function Theme ( Nb, DateMaJ, TitreTheme, Texte_Theme,        // NOTA: DateMaJ est devenu inopérant avec le compteur inclus dans BasPage ()
                 Fichier11, Timbre11, Nom11, Comm11, Annee11,
                 Fichier12, Timbre12, Nom12, Comm12, Annee12,
                 Fichier13, Timbre13, Nom13, Comm13, Annee13,
                 Fichier14, Timbre14, Nom14, Comm14, Annee14,
                 Fichier15, Timbre15, Nom15, Comm15, Annee15,
  
                 Fichier21, Timbre21, Nom21, Comm21, Annee21,
                 Fichier22, Timbre22, Nom22, Comm22, Annee22,
                 Fichier23, Timbre23, Nom23, Comm23, Annee23,
                 Fichier24, Timbre24, Nom24, Comm24, Annee24,
                 Fichier25, Timbre25, Nom25, Comm25, Annee25, 
 
                 Fichier31, Timbre31, Nom31, Comm31, Annee31,
                 Fichier32, Timbre32, Nom32, Comm32, Annee32,
                 Fichier33, Timbre33, Nom33, Comm33, Annee33,
                 Fichier34, Timbre34, Nom34, Comm34, Annee34,
                 Fichier35, Timbre35, Nom35, Comm35, Annee35, 
 
                 Fichier41, Timbre41, Nom41, Comm41, Annee41,
                 Fichier42, Timbre42, Nom42, Comm42, Annee42,
                 Fichier43, Timbre43, Nom43, Comm43, Annee43,
                 Fichier44, Timbre44, Nom44, Comm44, Annee44,
                 Fichier45, Timbre45, Nom45, Comm45, Annee45, 
 
                 Fichier51, Timbre51, Nom51, Comm51, Annee51,
                 Fichier52, Timbre52, Nom52, Comm52, Annee52,
                 Fichier53, Timbre53, Nom53, Comm53, Annee53,
                 Fichier54, Timbre54, Nom54, Comm54, Annee54,
                 Fichier55, Timbre55, Nom55, Comm55, Annee55, 
 
                 Fichier61, Timbre61, Nom61, Comm61, Annee61,
                 Fichier62, Timbre62, Nom62, Comm62, Annee62,
                 Fichier63, Timbre63, Nom63, Comm63, Annee63,
                 Fichier64, Timbre64, Nom64, Comm64, Annee64,
                 Fichier65, Timbre65, Nom65, Comm65, Annee65    
                )

{
var TabFichier= new Array(30);
var TabTimbre= new Array(30);   
var TabNom= new Array(30);
var TabComm= new Array(30); 
var TabAnnee= new Array(30); 

var Image= new Array(30); 
var Comment= new Array(30); 
var TabLigne=new Array(30);
var CellImg=new Array(6);
var CellCom=new Array(6);

/*** 1 ***/            
TabFichier [ 1]= Fichier11; 
TabTimbre  [ 1]= Timbre11; 
TabNom     [ 1]= Nom11; 
TabComm    [ 1]= Comm11; 
TabAnnee   [ 1]= Annee11;

TabFichier [ 2]= Fichier12; 
TabTimbre  [ 2]= Timbre12; 
TabNom     [ 2]= Nom12; 
TabComm    [ 2]= Comm12; 
TabAnnee   [ 2]= Annee12;

TabFichier [ 3]= Fichier13; 
TabTimbre  [ 3]= Timbre13; 
TabNom     [ 3]= Nom13; 
TabComm    [ 3]= Comm13; 
TabAnnee   [ 3]= Annee13;

TabFichier [ 4]= Fichier14; 
TabTimbre  [ 4]= Timbre14; 
TabNom     [ 4]= Nom14; 
TabComm    [ 4]= Comm14; 
TabAnnee   [ 4]= Annee14;

TabFichier [ 5]= Fichier15; 
TabTimbre  [ 5]= Timbre15; 
TabNom     [ 5]= Nom15; 
TabComm    [ 5]= Comm15; 
TabAnnee   [ 5]= Annee15;

/*** 2 ***/            
TabFichier [ 6]= Fichier21; 
TabTimbre  [ 6]= Timbre21; 
TabNom     [ 6]= Nom21; 
TabComm    [ 6]= Comm21; 
TabAnnee   [ 6]= Annee21;

TabFichier [ 7]= Fichier22; 
TabTimbre  [ 7]= Timbre22; 
TabNom     [ 7]= Nom22; 
TabComm    [ 7]= Comm22; 
TabAnnee   [ 7]= Annee22;

TabFichier [ 8]= Fichier23; 
TabTimbre  [ 8]= Timbre23; 
TabNom     [ 8]= Nom23; 
TabComm    [ 8]= Comm23; 
TabAnnee   [ 8]= Annee23;

TabFichier [ 9]= Fichier24; 
TabTimbre  [ 9]= Timbre24; 
TabNom     [ 9]= Nom24; 
TabComm    [ 9]= Comm24; 
TabAnnee   [ 9]= Annee24;

TabFichier [10]= Fichier25; 
TabTimbre  [10]= Timbre25; 
TabNom     [10]= Nom25; 
TabComm    [10]= Comm25; 
TabAnnee   [10]= Annee25;

/*** 3 ***/
TabFichier [11]= Fichier31; 
TabTimbre  [11]= Timbre31; 
TabNom     [11]= Nom31; 
TabComm    [11]= Comm31; 
TabAnnee   [11]= Annee31;

TabFichier [12]= Fichier32; 
TabTimbre  [12]= Timbre32; 
TabNom     [12]= Nom32; 
TabComm    [12]= Comm32; 
TabAnnee   [12]= Annee32;

TabFichier [13]= Fichier33; 
TabTimbre  [13]= Timbre33; 
TabNom     [13]= Nom33; 
TabComm    [13]= Comm33; 
TabAnnee   [13]= Annee33;

TabFichier [14]= Fichier34; 
TabTimbre  [14]= Timbre34; 
TabNom     [14]= Nom34; 
TabComm    [14]= Comm34; 
TabAnnee   [14]= Annee34;

TabFichier [15]= Fichier35; 
TabTimbre  [15]= Timbre35; 
TabNom     [15]= Nom35; 
TabComm    [15]= Comm35; 
TabAnnee   [15]= Annee35;

/*** 4 ***/
TabFichier [16]= Fichier41; 
TabTimbre  [16]= Timbre41; 
TabNom     [16]= Nom41; 
TabComm    [16]= Comm41; 
TabAnnee   [16]= Annee41;

TabFichier [17]= Fichier42; 
TabTimbre  [17]= Timbre42; 
TabNom     [17]= Nom42; 
TabComm    [17]= Comm42; 
TabAnnee   [17]= Annee42;

TabFichier [18]= Fichier43; 
TabTimbre  [18]= Timbre43; 
TabNom     [18]= Nom43; 
TabComm    [18]= Comm43; 
TabAnnee   [18]= Annee43;

TabFichier [19]= Fichier44; 
TabTimbre  [19]= Timbre44; 
TabNom     [19]= Nom44; 
TabComm    [19]= Comm44; 
TabAnnee   [19]= Annee44;

TabFichier [20]= Fichier45; 
TabTimbre  [20]= Timbre45; 
TabNom     [20]= Nom45; 
TabComm    [20]= Comm45; 
TabAnnee   [20]= Annee45;

/*** 5 ***/
TabFichier [21]= Fichier51; 
TabTimbre  [21]= Timbre51; 
TabNom     [21]= Nom51; 
TabComm    [21]= Comm51; 
TabAnnee   [21]= Annee51;

TabFichier [22]= Fichier52; 
TabTimbre  [22]= Timbre52; 
TabNom     [22]= Nom52; 
TabComm    [22]= Comm52; 
TabAnnee   [22]= Annee52;

TabFichier [23]= Fichier53; 
TabTimbre  [23]= Timbre53; 
TabNom     [23]= Nom53; 
TabComm    [23]= Comm53; 
TabAnnee   [23]= Annee53;

TabFichier [24]= Fichier54; 
TabTimbre  [24]= Timbre54; 
TabNom     [24]= Nom54; 
TabComm    [24]= Comm54; 
TabAnnee   [24]= Annee54;

TabFichier [25]= Fichier55; 
TabTimbre  [25]= Timbre55; 
TabNom     [25]= Nom55; 
TabComm    [25]= Comm55; 
TabAnnee   [25]= Annee55;

/*** 6 ***/
TabFichier [26]= Fichier61; 
TabTimbre  [26]= Timbre61; 
TabNom     [26]= Nom61; 
TabComm    [26]= Comm61; 
TabAnnee   [26]= Annee61;

TabFichier [27]= Fichier62; 
TabTimbre  [27]= Timbre62; 
TabNom     [27]= Nom62; 
TabComm    [27]= Comm62; 
TabAnnee   [27]= Annee62;

TabFichier [28]= Fichier63; 
TabTimbre  [28]= Timbre63; 
TabNom     [28]= Nom63; 
TabComm    [28]= Comm63; 
TabAnnee   [28]= Annee63;

TabFichier [29]= Fichier64; 
TabTimbre  [29]= Timbre64; 
TabNom     [29]= Nom64; 
TabComm    [29]= Comm64; 
TabAnnee   [29]= Annee64;

TabFichier [30]= Fichier65; 
TabTimbre  [30]= Timbre65; 
TabNom     [30]= Nom65; 
TabComm    [30]= Comm65; 
TabAnnee   [30]= Annee65;

var Test=false;
if (Test==true) 
{
 Fenetre=window.open ("","","toolbar=no,location=no,directories=no,menuBar=no,scrollbars=yes,resizable=yes,width=1000,left=300,left=5,top=10"); 
 Fenetre.document.open ();
 Fenetre.document.writeln ('<HTML><BODY BACKGROUND="../Images/Fond_Bleu.gif" BGCOLOR="#2404A6" TEXT="#00FF40" LINK="#68FF60" VLINK="#68FF60" ALINK="#68FF60" onLoad="windows.satus=document.title; return true;"><FONT COLOR="#FFFF00" FACE="Arial" SIZE="3"><DIV ALIGN="center"><B>TESTS</B></DIV><BR>');
}

// ======================================== Zone de texte =====================================

var Zone_Texte='';
var Alt='';

if (navigator.appName!="Microsoft Internet Explorer") Texte_Theme='';

if (Texte_Theme!='')
Zone_Texte='<TR><TD ALIGN="Center" BGCOLOR ="#4851A5"><DIV STYLE="text-align:justify;"><FONT FACE="Arial" COLOR="#F2CE02" SIZE="3">' + Texte_Theme + '</FONT></TD></TR>';
var CoulCom='Yellow';
   
// ======================================== TABLEAU =====================================

var Titre_Theme="'" + TitreTheme + "'" ;
var Sous_Titre ="'Sous_titre_theme.html'";

document.writeln('<BASEFONT SIZE="3" COLOR="#FEF801" FACE="Arial">');
 
document.writeln('<BR><DIV ALIGN="Center">');
document.writeln('<TABLE BORDER="1" CELLPADDING="5" BGCOLOR="Turquoise" WIDTH="95%">');
document.writeln(' <TR>');
document.writeln('  <TD ALIGN="Center" BGCOLOR ="Turquoise"><B><FONT FACE="Arial" COLOR ="#2301C0">' + TitreTheme + '</B></TD>');
document.writeln(' </TR>');
document.writeln(   Zone_Texte);
document.writeln('</TABLE><BR>');
document.writeln('<DIV ALIGN="Center"><FONT FACE="Arial" COLOR="#D9D9D9" SIZE="1">Vous pouvez cliquer sur chaque timbre pour accéder à sa page complète.</FONT></DIV><BR>');

document.writeln('<DIV ALIGN="Center">');

var Ligne=0;
var Col=0;
for (Ligne=0; Ligne<=5; Ligne++) // Boucle sur 6 lignes de 5 colonnes
{
 if (TabTimbre[(Ligne*5+1)]!='') // si il y a une image en colonne 1 
 {
  document.writeln( '<TABLE BORDER="1" BORDERCOLOR="#0101FF" BORDERCOLORLIGHT="#1704FF" BORDERCOLORDARK="#0002C0">');
  document.writeln( ' <TR>');
  for(Col=1; Col<=5; Col++) // Ligne des images de timbres 
  {
   if (TabTimbre[Ligne*5+Col]!='')
   {
	
    Alt=TabNom[Ligne*5+Col] + ' ' + TabComm[Ligne*5+Col];
    if (TabComm[Ligne*5+Col].indexOf('<')!=-1)
	Alt=TabNom[Ligne*5+Col];
	
    if (TabFichier[Ligne*5+Col]=='')
    {
     TabFichier[Ligne*5+Col]='';
     Image[Ligne*5+Col]= 
      '<TD BGCOLOR="#000000" ALIGN="Center" VALIGN="Middle">'
     +' <IMG SRC="' + TabTimbre[Ligne*5+Col]+ '" BORDER="0" ALT=" ' + Alt +' ">'
     +'</TD>';
    }
    else
    {
     Image[Ligne*5+Col]=   
      '<TD BGCOLOR="#000000" ALIGN="Center" VALIGN="Middle">'
     +' <A HREF="'+ TabFichier[Ligne*5+Col]+'" TARGET="Gauche" onMouseOver="window.status=\''+Alt+'\'; return true" onMouseOut="window.status=document.title; return true">'
     +' <IMG SRC="' + TabTimbre[Ligne*5+Col]+ '" BORDER="0" ALT=" ' + Alt +' "></A>'
     +'</TD>';
    }   
    document.writeln( Image[Ligne*5+Col] ); // écriture de la cellule du tableau
   }	 
  }
  document.writeln( ' </TR>');
  document.writeln( ' <TR>');
  
  for(Col=1; Col<=5; Col++) // Ligne du texte sur les timbres
  {
   if (TabTimbre[Ligne*5+Col]!='')
   {
    if (TabFichier[Ligne*5+Col]=='')
    {
     CoulCom='LightBlue';
     Fond_cadre='#200F82';
	}
	else
	{
     CoulCom='Yellow';
     Fond_cadre='#3217CA';	
	} 

    if (Test==true) Fenetre.document.write ( '<FONT COLOR="'+CoulCom+'" FACE="Arial" SIZE="3">Ligne='+Ligne+' Col='+Col+' TabFichier['+(Ligne*5+Col)+']='+TabFichier[Ligne*5+Col]+' TabTimbre['+(Ligne*5+Col)+']='+ TabTimbre[Ligne*5+Col]+'<BR>');
	  
    document.writeln( ' <TD ALIGN="Center" BGCOLOR="'+Fond_cadre+'">');
    document.writeln( '  <FONT COLOR="'+CoulCom+'" FACE="Arial" SIZE="3"><B>'+TabNom[Ligne*5+Col]+'</B>');
    document.writeln( '  <BR>'+TabComm[Ligne*5+Col]+'</FONT><BR>');
    document.writeln( '  <FONT COLOR="#CAFFFD" FACE="Arial" SIZE="3"><B>'+TabAnnee[Ligne*5+Col]+'</FONT>');
    document.writeln( '</TD>');
   }	 
  }
  document.writeln( ' </TR>');
  document.write  ( '</TABLE><BR>');
 }
}

document.writeln('</DIV>');

if (Test==true) Fenetre.document.writeln ('</FONT></BODY></HTML>'); 

}