#c// ###################################################################
#c// Image Theme by Ed Maste, updated by DaveSource
#c// ###################################################################
#c//
<:
  # Path setting - this is the path to the images
  $PATH = Theme_URL();

  $BORDER_WIDTH = "0";

  # Font/color settings for the document
  $TITLE_FONT = "face='Verdana,Arial,Helvetica' color='black' size='-1'";
  $MAIN_FONT = "face='Verdana,Arial,Helvetica' color='#777777' size='-2'";
  $CREDIT_FONT = "face='Verdana,Arial,Helvetica' color='blue' size='-2'";
  $BODY = "bgcolor='#ffffff' text='#777777' link='blue' alink='blue' vlink='purple'";
  $SEP_BAR = "<div align='center'><img src='$PATH/Null.gif' height='5' width='1'><br><img src='$PATH/Bar.gif' width='95%' height='3' border='0'><br><img src='$PATH/Null.gif' height='5' width='1'></div>";

  # Thumbnail border
  @ThBord_L =   ("$PATH/ThBord_L.gif", 11, 0);
  @ThBord_R =   ("$PATH/ThBord_R.gif", 13, 0);
  @ThBord_TL =  ("$PATH/ThBord_TL.gif", 11, 11);
  @ThBord_TR =  ("$PATH/ThBord_TR.gif", 13, 11);
  @ThBord_BL =  ("$PATH/ThBord_BL.gif", 11, 13);
  @ThBord_BR =  ("$PATH/ThBord_BR.gif", 13, 13);
  @ThBord_T =   ("$PATH/ThBord_T.gif", 0, 11);
  @ThBord_B =   ("$PATH/ThBord_B.gif", 0, 13);
  @Border = (\@ThBord_TL,\@ThBord_T,\@ThBord_TR,\@ThBord_RT,\@ThBord_R,\@ThBord_RB,\@ThBord_BR,\@ThBord_B,\@ThBord_BL,\@ThBord_LB,\@ThBord_L,\@ThBord_LT);
:>//
<html>

<head>
  <meta http-equiv="content-type" content="text/html;charset=ISO-8859-1">
  <: Meta() :>
  <title>Image: <:=Name(This_Image) :></title>
</head>

<body <:=$BODY:>>
<div align="center">
  <table border="<:=$BORDER_WIDTH:>" cellpadding="0" cellspacing="0" width="95%">
    <tr>
      <td colspan="2">
        <font <:=$TITLE_FONT:>>
        <:= Parent_Albums(":") :>
        </font>
      </td>

      <td width="25%">
        <div align="right">
          <a href='../index.html'><font <:=$TITLE_FONT:>>Up</font></a></div>
      </td>
    </tr>
  </table>

  <:=$SEP_BAR:>

#c// PREV 
  <table border="<:=$BORDER_WIDTH:>" width='95%' cellpadding='0' cellspacing='0'>
    <tr>
      <td width='25%'>
<: if (my $Prev = Prev(This_Image, $opt->{image_loop})) { _:>
        <font <:=$MAIN_FONT:>>
        <div align="left">
          &lt;&lt;&nbsp;<:=Get($Prev,'href','image_page','image_page'):><:=Pretty(Name($Prev),1):></a>
        </div>
        </font>
<: } :>
      </td>

#c// CAPTION
      <td width='50%'>
        <div align="center">
        <font <:=$TITLE_FONT:>>
        <:=Get(This_Image,'href','image'):>
        <:=Pretty(Name(This_Image),1,1):></a></font>
        <br />
        <font <:=$MAIN_FONT:>>
        <:=Caption(This_Image):></font>
        </div>
      </td>

#c// NEXT
      <td width='25%'>
<: if (my $Next = Next(This_Image, $opt->{image_loop})) { _:>
        <font <:=$MAIN_FONT:>>
          <div align="right">
            <:=Get($Next,'href','image_page','image_page'):><:=Pretty(Name($Next),1):></a>&nbsp;&gt;&gt;
          </div>
        </font>
<: } :>
      </td>
    </tr>
  </table>
</div>

#c//
#c// The image
#c//
  <div align="center"><br />
    <: Border(This_Image,'full','image', @Border) :>
  </div>

  <:=$SEP_BAR:>    

  <div align="center">
    <font <:=$CREDIT_FONT:>><: Credit() :> on <:=scalar localtime:></font></div>
  <p></p>

  </body>

</html>
