#c// ################################################################### #c// Big Maste Image Theme based on theme by Ed Maste #c// ################################################################### #c// <: # Path setting - this is the path to the images $PATH = Theme_URL(); $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 = "

Seperator bar
"; @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); @Next = ("$PATH/Next.gif", 15, 10); @Prev = ("$PATH/Prev.gif", 15, 10); :>// <: Meta() :> Image: <:=Name(This_Image) :> >
Album: <:=Parent_Albums("::"):>
<:=Get(This_Image,'href','image'):> <:=Name(This_Image):>
<: if (my $Prev = Prev(This_Image, $opt->{image_loop})) { _:> <:=Get($Prev,'href','image_page','image_page'):><:=Image_Array(@Prev):> <: } else { print Image_Array("$PATH/Null.gif",15,1); } :> <: if (my $Next = Next(This_Image, $opt->{image_loop})) { _:> <:=Get($Next,'href','image_page','image_page'):><:=Image_Array(@Next):> <: } else { print Image_Array("$PATH/Null.gif",15,1); } :>    class='title'>Up
<:=Caption(This_Image):>
#c// #c// The image #c//
<: Border(This_Image,'full','image', @Border) :>
<:=$SEP_BAR:>

<: Credit() :> on <:=scalar localtime:>