#c// options: -image_sizes
#c// ###################################################################
#c// Image Theme by Ed Maste, updated by DaveSource
#c// 2003/06:  XHTML 1.0 & .htaccess: Magnus von Koeller, vonkoeller.de
#c// 2003/06:  CSS: hnilek, hnilek.zsbarr.cz
#c// ###################################################################
#c//
<:
  # Path setting - this is the path to the images
  $PATH = Theme_Path();

  $MAX_IMG_WIDTH = 760;
  $MAX_IMG_HEIGHT = 550;
  $BORDER_WIDTH = "0";

  # Font/color settings for the document
  $BODY = "bgcolor='#ffffff' text='#666666' link='blue' alink='blue' vlink='purple'";
  $SEP_BAR = "<div align='center'><img src='$PATH/Null.gif' height='5' width='1' alt='' /><br /><img src='$PATH/Bar.gif' width='95%' height='3' border='0' alt='Seperator bar' /><br /><img src='$PATH/Null.gif' height='5' width='1' alt='' /></div>";

  # Image arrays are: name, width, height
  sub img_src { print "<img src='$PATH/$_[0]' width='$_[1]' height='$_[2]' $_[3] border='0' alt='' />" if ($_[1]); }

  # Thumbnail border
  $X = Image_Page() ? Image_Width() : Get_Opt('x');
  $Y = Image_Page() ? Image_Height() : Get_Opt('y');

# Not anymore - just use -medium option
#  # If the picture's too big to fit in a 1024x768ish browser window,
#  # apply height and width tags to have the browser scale it.
#  # This theme was originally created for a CD album, so using tags to
#  # scale a full-size image is fine, and it saves disk space over -medium.
#  if ($X > $MAX_IMG_WIDTH) {
#    $Y /= ($X/$MAX_IMG_WIDTH);
#    $X = $MAX_IMG_WIDTH;
#  }
#  if ($Y > $MAX_IMG_HEIGHT) {
#    $X /= ($Y/$MAX_IMG_HEIGHT);
#    $Y = $MAX_IMG_HEIGHT;
#  }
#  $Y = int($Y);
#  $X = int($X);

  @ThBord_L =   ("ThBord_L.gif", 11, $Y-0-0);
  @ThBord_R =   ("ThBord_R.gif", 13, $Y-0-0);
  @ThBord_TL =  ("ThBord_TL.gif", 11, 11);
  @ThBord_TR =  ("ThBord_TR.gif", 13, 11);
  @ThBord_BL =  ("ThBord_BL.gif", 11, 13);
  @ThBord_BR =  ("ThBord_BR.gif", 13, 13);
  @ThBord_T =   ("ThBord_T.gif", $X+11+13-11-13, 11);
  @ThBord_B =   ("ThBord_B.gif", $X+11+13-11-13, 13);
:>//
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
      "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>

<head>
  <meta http-equiv="content-type" content="text/html;charset=ISO-8859-1" />
  <: Meta() :>
  <title>Image: <:=Image_Name() :></title>
  <link rel="stylesheet" type="text/css" href="<:=$PATH:>/style.css">
</head>

<body <:=$BODY:>>
<div align="center">
  <table border="<:=$BORDER_WIDTH:>" cellpadding="0" cellspacing="0" width="95%">
    <tr>
      <td colspan="2" align='left'>
        <p class='title'>
          <b>Album</b>:
          <: pJoin_Parent_Albums("::"); :>
        </p>
      </td>

      <td width="25%">
        <div align="right">
          <a href=<:=Back():> class='title'>Up</a></div>
      </td>
    </tr>
  </table>

  <:=$SEP_BAR:>

#c//
#c// Prev/caption/next
#c//

  <table border="<:=$BORDER_WIDTH:>" width='95%' cellpadding='0' cellspacing='0'>
    <tr>
      <td width='25%'>
<: 
  if (Image_Cnt() > 1) { 
  Set_Image_Prev(); 
:>//	PREV
        <span class='main'>
        <div align="left">
          &lt;&lt;&nbsp;<a href=<:=Image_Page_URL():>><:=Image_Name():></a>
        </div>
        </span>
<: } :>
      </td>

      <td width='50%'>
<: Set_Image_This() :>//	CAPTION

        <div align="center">
        <span class='title'>
        <a href=<:=Image_URL():>>
        <:=Image_Name():></a></span>
        <br />
        <span class='main'>
        <:pImage_Caption():></span>
        </div>
      </td>

      <td width='25%'>
<:
  if (Images_Left() > 1) {
  Set_Image_Next(); 
:>//	NEXT
        <span class='main'>
          <div align="right">
            <a href=<:=Image_Page_URL():>><:=Image_Name():></a>&nbsp;&gt;&gt;
          </div>
        </span>
<: } :>
      </td>
    </tr>
<: Set_Image_This() :>//
  </table>
</div>
#c//
#c// The image
#c//
  <div align="center"><br />
    <span style='white-space:nowrap;'><:img_src(@ThBord_TL):><:img_src(@ThBord_T):><:img_src(@ThBord_TR):></span><br />
    <span style='white-space:nowrap;'><:img_src(@ThBord_L):><a href=<:=Image_URL():>><:pImage_Src():></a><:img_src(@ThBord_R):></span><br />
    <span style='white-space:nowrap;'><:img_src(@ThBord_BL):><:img_src(@ThBord_B):><:img_src(@ThBord_BR):></span><br />
  </div>

  <:=$SEP_BAR:>    

  <div align="center">
    <p class='credit'><: Credit() :> on <:=scalar localtime:></p>
  </div>
  <p></p>

  </body>

</html>
