#c// options: -known_images #c// ################################################################### #c// Story Theme (based of Maste theme by DaveSource.com) #c// ################################################################### #c// <: # Path setting - this is the path to the images $PATH = Theme_URL(); # Font/color settings for the document $INTER_ROW_HEIGHT = "10"; $BORDER_WIDTH = "0"; $TITLE_FONT = "face='Verdana,Arial,Helvetica' color='black' size='-1'"; $MAIN_FONT = "face='Verdana,Arial,Helvetica' color='#777777' size='-2'"; $STORY_FONT = "face='Verdana,Arial,Helvetica' color='#555555' size='-1'"; $CREDIT_FONT = "face='Verdana,Arial,Helvetica' color='blue' size='-2'"; $BODY = "bgcolor='#ffffff' text='#777777' link='blue' alink='blue' vlink='purple'"; $SEP_BAR = "
> Album: <:=Parent_Albums(":"):> | <: my $back = Back(); if ($back && $back ne "''" && $back ne "'0'") { _:> <: } _:> |
>
|
>Folders: <: # Loop on all the albums if ($alb) { while ($alb) { print " "; print Get($alb,'href','dir'); print Pretty(Name($alb),1); print ""; print Caption($alb)," \n"; print "\n"; $alb = Next($alb); } } _:> |
'> | '> > <: print read_file($Story); :> | ||
<: Border($img,'thumb','image', @Border) if Get($img,'thumb','x') :>
>
<:=Get($img,'href','image'):>
<:=Pretty(Name($img),1,1):>
|
<: if (New_Row($img,2) && Next($img)) { _:>
#c//
#c// Start a new row
|||