#c// ###################################################################
#c// Album Theme created by shawn@teq.org
#c// ###################################################################
<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Transitional//EN'
    'http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd'>
<html xmlns='http://www.w3.org/1999/xhtml'>
  <head>
    <title> 
      Album: <: pAlbum_Name() :>
    </title>
    <: Meta() :>
  </head>
  <body bgcolor='white' link="gray"><center>
  <table width='100%'  bgcolor="#f0f0f0">
    <tr>
      <td align='left'>
        <h2> <: pJoin_Parent_Albums(":"); :> </h2>
      </td>
      <td align='right'>
        <h1><a href=<:=Back():>>Up</a></h1>
	updated <: print `date` :>
      </td>
    </tr>
  </table>

<: if (isHeader()) { _:>
        <center>              
          <:pHeader():>         
        </center>
        <br>
<: } _:>

#c  # Are there more albums below this one?
<:  if (Child_Albums()) { _:>
  <table align='center' cellspacing='3'>
    <tr>
      <td width='110' valign='top'>
<h3>more:</h3>
      </td>

#c    # Loop on all the albums
<:    while (Child_Albums()) { _:>
        <td width='110' valign='top'>
          <font size='+1'>
            <: pChild_Album() :>
          </font>
        </td>

#c      # And start a new row every fourth one
<:      if (!((Child_Album_Cnt()+1) % 4)) { _:>
</tr><tr>
<:      } :>

#c    # End album loop
<:    Next_Child_Album() :>
<:    } :>
    </tr>
  </table>

#c  # End if albums
<:  } :>

#c  # Are there any images?  (There might only be Child_Albums!)
<:  if (Images()) { _:>
  <table cellspacing='3' align='center'>
    <tr>

#c    # Loop on the images
<:    while(Images()) { _:>
        <td width='110' valign='top'>
          <: pImage() :>
          <br />
          <!-- *should be an IF statement*  font size='-2' --!>
            <: pImage_Caption() :>
          <!-- /font -->
        </td>

<:      if (!(Image_Cnt() % 4)) { _:>
          </tr><tr>
<:      } :>

#c    # End while images
<:    Next_Image() :>
<:    } :>
    </tr>
  </table>

#c  # End if images
<:  } :>
</center>

<: if (isHeader()) { _:>
        <center>              
          <:pHeader():>         
        </center>
        <br>
<: } _:>

<br>
    <font size='-1'>
      <: Credit() :> 
    </font>
  </body>
</html>
