#c// ###################################################################
#c// Album Theme by David Ljung Madison
#c// Design by Dave Simmer of DaveWeb.com, modified by Dave Madison
#c// -- Auto generated by simmer_theme v3.10
#c// -- From: http://MarginalHacks.com/Hacks/album/
#c// ###################################################################
#c//
<:
# Path setting - this is the path to the images
$PATH = Theme_URL();
$CREDIT_FONT = "size='-1' color='#CCCCCC'";
$TITLE_FONT = "color='#CCCCCC'";
$link_color = "#FFFFFF";
$BODY = "bgcolor='black' link='$link_color' alink='$link_color' vlink='$link_color' text='#CCCCCC'";
@Border = ('white',5);
$START_TITLE = "";
$START_MAIN = "";
$START_CREDIT = "";
$END_FONT = "";
$SLIDESHOW = Option('slideshow');
# Icons/graphics
@Locked = ("$PATH/Locked.gif", 8, 11);
sub Bar {
my ($colspan) = @_;
return unless @Bar_M;
:>
<:
}
# Thumbnail border
:>//
#c//
#c// ###################################################################
#c// Everything beyond here is the same for every DaveWeb theme..
#c// ###################################################################
<: Meta() :>
<: foreach my $bar ( \@Bar_L, \@Bar_ML, \@Bar_M, \@Bar_MR, \@Bar_R ) {
next unless @$bar;
my $width = $bar->[1] =~ /100%/ ? "" : " width='$bar->[1]'";
print "\t\t\t\t\t\t\t
";
print Image_Array(@$bar);
print " \n";
} :>
<: Bar($SLIDESHOW ? 3 : 2) :>
<: if ($Icon) {
print Image_Ref($Icon,"align='middle'");
print "\n
<: if ($SLIDESHOW) { :>
\n";
} _:>
<:=$START_TITLE:>
<:= Parent_Albums(':'); :>
<:=$END_FONT:>
<: } :>
#c//
#c// Prev/caption/next
#c//
<: if (my $prev = Prev(This_Image, $opt->{image_loop})) { _:>
<:=$START_MAIN:>
<:=Caption(This_Image):><:=$END_FONT:>
<: if (my $next = Next(This_Image, $opt->{image_loop})) { _:>
#c//
#c// The image
#c//
<: PickOverlay(This_Image, 'full') if @Overlays :>
<: Border(This_Image,'full','image', @Border) :>
<: Bar(1) :>
<:=Image_Array("$PATH/Null.gif",20,20):>