Imported file from www.infodrom.org
authorJoey Schulze <joey@infodrom.org>
Wed, 6 Aug 2003 13:38:35 +0000 (13:38 +0000)
committerJoey Schulze <joey@infodrom.org>
Wed, 6 Aug 2003 13:38:35 +0000 (13:38 +0000)
Styles/basic.style [new file with mode: 0644]
Styles/infodrom.style [new file with mode: 0644]
Styles/menu.style [new file with mode: 0644]
Styles/quote.style [new file with mode: 0644]
Styles/tools.inc [new file with mode: 0644]

diff --git a/Styles/basic.style b/Styles/basic.style
new file mode 100644 (file)
index 0000000..64efd1c
--- /dev/null
@@ -0,0 +1,96 @@
+
+# Global color definition
+#
+<define-tag black>000000</define-tag>
+<define-tag white>ffffff</define-tag>
+
+#<define-tag bgcolor>39dff7</define-tag>
+<define-tag bgcolor>f7f7f7</define-tag>
+<define-tag textcolor>000000</define-tag>
+<define-tag submenubgcolor>ededff</define-tag>
+
+<define-tag menu-bgcolor>80CCF8</define-tag>
+<define-tag menu-bgcolorsel>68A4C8</define-tag>
+<define-tag menu-fgcolor>008dfd</define-tag>
+<define-tag box-bdcolor>008dfd</define-tag>
+<define-tag box-bgcolor><bgcolor></define-tag>
+<define-tag box-fgcolor>1014e8</define-tag>
+<define-tag box-blue>4876ff</define-tag>
+
+# Generelle Konstanten
+#
+<define-tag colh>#abdcfc</define-tag>
+<define-tag cold>#ededff</define-tag>
+<define-tag coln>#ffffff</define-tag>
+
+# Alternatives Farbschema
+# <define-tag bgcolor>ffffff</define-tag>
+# <define-tag textcolor>000000</define-tag>
+# <define-tag submenubgcolor>eff0f1</define-tag>
+# 
+# <define-tag colh>#abdcfc</define-tag>
+# <define-tag cold>#eff0f1</define-tag>
+# <define-tag coln>#ffffff</define-tag>
+
+
+<define-tag lightblue>#e2f6ff</define-tag>
+
+#<define-tag mehr><img src="<root_prefix>gifs/lt2k-mehr.gif" width=45 height=14 alt="*mehr*"></define-tag>
+#<define-tag phpmehr><img src=\"<root_prefix>gifs/lt2k-mehr.gif\" width=\"45\" height=\"14\" alt=\"*mehr*\" border=\"0\"></define-tag>
+<define-tag mehr><img src="<root_prefix>gifs/mehr.gif" width=45 height=14 alt="*mehr*"></define-tag>
+<define-tag phpmehr><img src=\"<root_prefix>gifs/mehr.gif\" width=\"45\" height=\"14\" alt=\"*mehr*\" border=\"0\"></define-tag>
+
+# Page footer
+#
+<define-tag page-footer>
+# &copy; = &#169;
+<hr><address>&copy; <a href="http://www.infodrom.ffis.de/">Infodrom Oldenburg</a>, <:
+@months =
+#    ("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec");
+    ("Dummy", "Januar","Februar","März","April","Mai","Juni","Juli","August","September","Oktober","November","Dezember");
+
+#($date_sec,$date_min,$date_hour,$date_mday,$date_mon,$date_year,$date_wday,$date_isdst)
+#    = localtime(); $date_year += 1900;
+#printf "%d %s %d", $date_mday, $months[$date_mon], $date_year;
+
+"<get-var WML_SRC_ISOTIME>" =~ /^(\d+)-(\d+)-(\d+)\s/;
+
+printf "Page source last modified: %d. %s %d", $3, $months[$2], $1;
+:></address>
+</define-tag>
+
+# ========== Abstand berechnen ==========
+# in ePerl: $root_prefix
+# in WML: <get-var root_prefix>
+<:
+  $root_prefix = "<get-var WML_SRC_DIRNAME>";
+  $root_prefix =~ s/^.*src\/?(.*)$/$1/;
+  @foo = split (/\//, $root_prefix);
+  $root_prefix = "../"x($#foo+1);
+:>
+<if <not <get-var root_prefix>>
+  <define-tag root_prefix><: print "$root_prefix"; :></define-tag>
+  "<: $root_var = \"<get-var root_prefix>\"; :>"
+>
+
+# Used for menus in submenu.inc, link=foo.html is optional, only required for .php3
+<define-tag menu-item whitespace=delete>
+<preserve base text href>
+<set-var %attributes>
+
+<if <not <get-var href>>
+  <set-var href="<get-var base>.html">>
+
+<ifneq <get-var WML_SRC_BASENAME> "<get-var base>" "<a href="<get-var href>">" "">
+<get-var text>
+<ifneq <get-var WML_SRC_BASENAME> "<get-var base>" "</a>" "">
+
+<restore base text href>
+</define-tag>
+
+# Path to the download area
+#
+<define-tag download whitespace=delete>
+<root_prefix>download/
+</define-tag>
+
diff --git a/Styles/infodrom.style b/Styles/infodrom.style
new file mode 100644 (file)
index 0000000..41925e4
--- /dev/null
@@ -0,0 +1,115 @@
+#include <basic.style>
+#include <tools.inc>
+#include <menu.style>
+#use wml::std::box
+#use wml::std::info
+
+<define-tag page endtag=required>
+<preserve title menugbcolor keywords source>
+<set-var %attributes>
+
+<if <not <get-var title>>
+    <set-var title="Infodrom Oldenburg">>
+<if <not <get-var menubgcolor>>
+    <set-var menubgcolor="<submenubgcolor>">>
+
+<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
+<html>
+<head>
+<title><get-var title></title>
+<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<meta name="Author"    content="joey@infodrom.org (Martin Schulze)">
+<if <get-var keywords>
+<meta name="Keywords"  content="<get-var keywords>">
+>
+<info style=meta domainname="infodrom.org" copyright="(c) Martin Schulze, Infodrom Oldenburg, reuse has to be negotiated">
+</head>
+<body bgcolor="#<bgcolor>" text="#<textcolor>" vlink="#000090" alink="#e709f7" link="#1717ef">
+
+
+<: main_menu (); :>
+<table border=0 cellpadding=0 cellspacing=0 width=100%>
+<tr>
+#  <td align=left valign=top width=10% bgcolor=#eff0f1><font face="Helvetica,Arial" size=-1 color="#<menu-fgcolor>">
+<td align=left valign=top width=10% bgcolor=#<get-var menubgcolor>><font face="Helvetica,Arial" size=-1 color="#<menucolor>">
+
+#include "submenu.inc"
+
+  <p>
+  </font></td>
+  <td valign=top><img src=<root_prefix>gifs/imgdot-1x1-transp.gif width=3 height=0 alt=""></td>
+  <td valign=top align=left width=90%><font face="Helvetica,Arial">
+
+%body
+
+  </font></td>
+</tr>
+</table>
+
+<line color=<menu-fgcolor> height=1 align=center>
+#<hr>
+
+# &copy; = &#169;
+<address><small>&copy; <a href="<root_prefix>Infodrom/impressum.html">Infodrom Oldenburg</a>, <:
+$cvsurl = "http://cvs.infodrom.org/www.infodrom.org/%s%s?cvsroot=infodrom.org";
+@months =
+    ("Dummy", "Januar","Februar","März","April","Mai","Juni","Juli","August","September","Oktober","November","Dezember");
+
+"<get-var WML_SRC_ISOTIME>" =~ /^(\d+)-(\d+)-(\d+)\s/;
+printf "last modified: %s %d, %d", $months[$2], $3, $1;
+
+if (length ("<get-var source>")) {
+    if ("<get-var source>" ne ".") {
+        $url = "<get-var source>";
+    } else {
+        $url = '';
+    }
+} else {
+    "<get-var WML_SRC_DIRNAME>/" =~ /.*\/(src\/.*)$/;
+    $url = sprintf ($cvsurl, $1, "<get-var WML_SRC_FILENAME>");
+}
+
+printf ", <a href=\"%s\">page source</a>", $url if (length ($url));
+
+print ".";
+:></small></address>
+
+</body>
+</html>
+<restore title menubgcolor keywords source>
+</define-tag>
+
+<define-tag flaglink whitespace=delete>
+<preserve url lang>
+<set-var %attributes>
+<div align=right>
+<a href="<get-var url>"><img src="<root_prefix>gifs/flag-<get-var lang>.gif" width=20 height=13 border=0 alt="<get-var lang>"></a>
+</div>
+# The events pages need an extra space between flag and red line
+<:
+  if ("<get-var WML_SRC_DIRNAME>" =~ /src\/Debian\/events\/.*/) {
+    print "<p>";
+  }
+:>
+<restore url lang>
+</define-tag>
+
+<define-tag frontad>
+<table width=100% border=0>
+<tr>
+  <td align=left valign=top>
+     <a href="http://www.linuxtag.org/"><img src="<root_prefix>gifs/lt2kblue.gif" width=100 height=66 alt="LinuxTag 2003 - July 10-13 2003" border=0></a>
+#     <font face="Helvetica,Arial"><a href="http://oldenburger.linuxtage.de/"><b>Oldenburger LinuxTag</b></a></font>
+  </td>
+  <td align=right valign=top>
+     <a href="<root_prefix>Linux/"><img src="<root_prefix>gifs/powered_by_linux.gif" alt="Powered by Linux" width=180 height=70 border=0></a>
+  </td>
+</tr>
+</table>
+</define-tag>
+
+# <db>
+#   Name der Haupt-Datenbank fuer diesen Bereich
+#
+#   OBSOLETE!!!!!!!!!!
+<define-tag db>web</define-tag>
diff --git a/Styles/menu.style b/Styles/menu.style
new file mode 100644 (file)
index 0000000..4f15a25
--- /dev/null
@@ -0,0 +1,117 @@
+<:
+
+  # First the menu definition
+  #
+  @menu = ('Infodrom','Linux','Debian','linx','text','service','zeitungen','News','projects');
+  %menu_name = (
+               'Infodrom'  => 'Infodrom',
+               'Linux'     => 'Linux',
+               'Debian'    => 'Debian',
+               'linx'      => 'Linx',
+               'text'     => 'Texte',
+               'service'   => 'Service',
+               'zeitungen' => 'Zeitungen',
+               'News'      => 'News',
+               'projects'  => 'Projekte',
+               );
+# Noch frei: #ba55d3 (dunkelviolett), dann aber die beiden Grüntöne tauschen
+  %menu_colors = (
+                 'Infodrom'  => '0000ff',
+                 'Linux'     => '00bdff',
+                 'Debian'    => 'ff4040',
+#                'linx'      => 'ff7f00',
+#                'linx'      => 'f6be00',
+#                'linx'      => 'f6d629',
+#                'linx'      => 'f9bd09',
+                 'linx'      => 'ff8c00',
+#                'text'      => 'ffd700',
+                 'text'      => 'ffc125',
+                 'service'   => 'ff00ff',
+                 'zeitungen' => 'ab82ff',
+#                'News'      => '32cd05',
+#                'projects'  => '3cb371',
+#                'News'      => '00ee00',
+#                'projects'  => '66cd00',
+                 'News'      => '32cd05',
+#                'projects'  => '19c100',
+                 'projects'  => '20b705',
+                 );
+
+
+sub main_menu
+{
+  $menucolor = "008dfd"; # Default: <menu-fgcolor> - Infodrom-Blau
+
+  # The main menu
+  print "<table width=\"100%\" cellspacing=\"0\" cellpadding=\"0\" summary=\"\"><tr>";
+  for ($index=0; $index <= $#menu; $index++) {
+    print "<td width=\"1\"> </td>" if ($index > 0);
+    if (("<get-var WML_SRC_DIRNAME>" =~ /src\/$menu[$index]$/) && ("<get-var WML_SRC_BASENAME>" eq "index")) {
+      printf "<td align=\"center\" valign=\"top\" bgcolor=\"#%s\">"
+           ."<font color=\"#ffffff\" face=\"Helvetica,Arial\"><b>%s</b></font></td>",
+            $menu_colors{$menu[$index]},
+            $menu_name{$menu[$index]};
+    } else {
+      printf "<td align=\"center\" valign=\"top\" bgcolor=\"#%s\"><a href=\"%s%s/\" target=\"_top\">"
+           ."<font color=\"#ffffff\" face=\"Helvetica,Arial\"><b>%s</b></font></a></td>",
+            $menu_colors{$menu[$index]},
+            $root_prefix,
+            $menu[$index],
+            $menu_name{$menu[$index]};
+    }
+  } 
+  print "</tr></table>";
+
+  # The second menu
+  for ($index=0; $index <= $#menu; $index++) {
+    if ("<get-var WML_SRC_DIRNAME>" =~ /src\/$menu[$index](\/|$)/) {
+      $menucolor = $menu_colors{$menu[$index]};
+      if (open (MENU, "$root_prefix$menu[$index]/menu.def")) {
+        printf "<table border=\"0\" cellspacing=\"0\" cellpadding=\"3\" summary=\"\">"
+             ."<tr bgcolor=\"#%s\"><td align=\"center\" valign=\"top\">", $menucolor;
+        $nr = 0;
+        while (<MENU>) {
+         chomp();
+         next if /^\s*#/;
+         next if /^\s*$/;
+         print " <font color=\"#ffffff\" face=\"Helvetica,Arial\"><b>|</b></font> " if ($nr > 0);
+         ($name,$link) = split (/:/);
+         $selected = 0;
+         if ($link =~ /(.*)\/$/) {
+           $dir = $1;
+           "<get-var WML_SRC_DIRNAME>" =~ /.*\/(src\/.*)$/; $wdir = $1;
+           if (($wdir eq "src/$menu[$index]/$dir") && ("<get-var WML_SRC_BASENAME>" eq "index")) {
+             $selected = 1;
+           }
+         # ACHTUNG: Ist etwas unsauber, wegen foo/bar.html != bar.php3
+         } elsif ($link =~ /(.*)\.(html|php3)$/) {
+           if ("<get-var WML_SRC_BASENAME>" eq "$1") {
+             $selected = 1;
+           }
+         }
+
+         if ($selected) {
+           printf "<font size=\"-1\" color=\"#ffffff\" face=\"Helvetica,Arial\"><b>%s</b></font>", $name;
+         } else {
+           printf "<a href=\"%s%s/%s\" target=\"_top\"><font size=\"-1\" color=\"#ffffff\" face=\"Helvetica,Arial\"><b>%s</b></font></a>",
+                  $root_prefix, $menu[$index], $link, $name;
+         }
+          $nr++;
+       }
+        close (MENU);
+       print "</td></tr></table>";
+      }
+    }
+  }
+
+}
+
+:>
+
+# The color of the current 2nd menu (regardless if there is any)
+<define-tag menucolor><: print $menucolor; :></define-tag>
+
+# Local variables:
+# mode: indented-text
+# mode: auto-fill
+# end:
diff --git a/Styles/quote.style b/Styles/quote.style
new file mode 100644 (file)
index 0000000..1d9a117
--- /dev/null
@@ -0,0 +1,125 @@
+#use wml::std::box
+
+# <quotebox [lang={deutsch|english}] [type={linux|infodrom|general}]>
+#
+<define-tag quotebox>
+  <preserve lang type btitle error fortune>
+  <set-var %attributes>
+  <if <not <get-var lang>>  <set-var lang=deutsch>>
+  <if <not <get-var type>>  <set-var type=general>>
+
+  <ifeq "<get-var lang>" "deutsch"  "<set-var btitle="Zitat des Tages">">
+  <ifeq "<get-var lang>" "english"  "<set-var btitle="Quote of the day">">
+
+  <ifeq "<get-var lang>" "deutsch"  "<set-var error="Leider heute kein Zitat.">">
+  <ifeq "<get-var lang>" "english"  "<set-var error="Sorry, no quote today.">">
+
+  <ifeq "<get-var type>" "infodrom"  "<set-var fortune="<root_prefix>fortune-infodrom.html">">
+  <ifeq "<get-var type>" "linux"     "<set-var fortune="<root_prefix>fortune-linux.html">">
+
+  <ifeq "<get-var type>" "general"
+    <ifeq "<get-var lang>" "english"
+      "<set-var fortune="<root_prefix>fortune-general-en.html">"
+      "<set-var fortune="<root_prefix>fortune-general.html">"
+    >
+  >
+
+  <center><box header="<font size=-1 face="Helvetica,Arial" color="#<box-fgcolor>"><b><get-var btitle></b></font>"
+       bdcolor="#<box-bdcolor>" bdwidth=1 bdspace=10 width=100
+       bgcolor="#<box-bgcolor>">
+    <font face="helvetica,arial" size=-1 color="#<box-fgcolor>">
+    <?
+      # FIXME: Was gibt fopen() zurück, wenn die Datei nicht geöffnet werden konnte?
+      if (is_file ("<get-var fortune>") && ($fortune = fopen ("<get-var fortune>", "r"))) {
+       while (!feof ($fortune)) {
+         $line = fgets ($fortune, 255);
+         echo $line;
+       }
+       fclose ($fortune);
+      } else {
+       echo "<get-var error>";
+      }
+    ?>
+    </font>
+  </box></center>
+  <restore lang type btitle error fortune>
+</define-tag>
+
+
+
+
+
+
+# -- [ Old ] -----------------------------------------------------------
+#
+# Quote of the day boxes
+#
+# quotebox-de-shtml
+# quotebox-en-shtml
+# quotebox-de-php
+# quotebox-en-php
+#
+
+# FIXME: Schöner wäre es, wenn ich %0 == "" -> .fortune, sonst %0 abfragen könnte
+
+<define-tag quotebox-de-shtml whitespace=delete>
+  <box header="<font size=-1 face="Helvetica,Arial" color="#<box-bdcolor>"><b>Zitat des Tages</b></font>"
+       bdcolor="#<box-bdcolor>" bdwidth=2 bdspace=10
+       bgcolor="#<box-bgcolor>"
+       width=500>
+    <font face="helvetica,arial" size=-1 color="#<box-fgcolor>">
+    <!--#include file="%0"-->
+    </font>
+  </box>
+</define-tag>
+
+<define-tag quotebox-en-shtml whitespace=delete>
+  <box header="<font size=-1 face="Helvetica,Arial" color="#<box-fgcolor>"><b>Quote of the day</b></font>"
+       bdcolor="#<box-bdcolor>" bdwidth=2 bdspace=10
+       bgcolor="#<box-bgcolor>">
+    <font face="helvetica,arial" size=-1 color="#<box-fgcolor>">
+    <!--#include file="%0"-->
+    </font>
+  </box>
+</define-tag>
+
+<define-tag quotebox-en-php whitespace=delete>
+  <box header="<font size=-1 face="Helvetica,Arial" color="#<box-fgcolor>"><b>Zitat des Tages</b></font>"
+       bdcolor="#<box-bdcolor>" bdwidth=2 bdspace=10
+       bgcolor="#<box-bgcolor>">
+    <font face="helvetica,arial" size=-1 color="#<box-fgcolor>">
+<?
+  if ($fortune = fopen ("index-fortune.html", "r")) {
+    while (!feof ($fortune)) {
+      $line = fgets ($fortune, 255);
+      echo $line;
+    }
+    fclose ($fortune);
+  }
+?>
+    </font>
+  </box>
+</define-tag>
+
+<define-tag quotebox-en-php whitespace=delete>
+  <box header="<font size=-1 face="Helvetica,Arial" color="#<box-fgcolor>"><b>Quote of the day</b></font>"
+       bdcolor="#<box-bdcolor>" bdwidth=2 bdspace=10
+       bgcolor="#<box-bgcolor>">
+    <font face="helvetica,arial" size=-1 color="#<box-fgcolor>">
+<?
+  if ($fortune = fopen ("index-fortune.html", "r")) {
+    while (!feof ($fortune)) {
+      $line = fgets ($fortune, 255);
+      echo $line;
+    }
+    fclose ($fortune);
+  }
+?>
+    </font>
+  </box>
+</define-tag>
+
+# Local variables:
+# mode: text
+# mode: auto-fill
+# end:
diff --git a/Styles/tools.inc b/Styles/tools.inc
new file mode 100644 (file)
index 0000000..9fbb717
--- /dev/null
@@ -0,0 +1,178 @@
+# <border color=foo>  zeichnet einen Rahmen
+#
+<define-tag border endtag=required>
+<preserve color width>
+<set-var %attributes>
+<if <not <get-var color>>
+  <set-var color="000000">
+>
+<if <not <get-var width>>
+  <set-var width="100%">
+>
+
+<table width=<get-var width> border=0 cellpadding=0 cellspacing=0><tr bgcolor=#<get-var color>><td>
+<table width=100% border=0 cellpadding=0 cellspacing=1><tr bgcolor=#<bgcolor>><td>
+<font face="Helvetica,Arial">
+
+%body
+
+</font>
+</td></tr></table>
+</td></tr></table>
+
+<restore color width>
+</define-tag>
+
+# <line> Zeichnet eine Linie
+#
+<define-tag line whitespace=delete>
+<preserve color align width height>
+<set-var %attributes>
+
+<if <not <get-var align>>
+  <set-var align=center>>
+<if <not <get-var color>>
+  <set-var color=000000>>
+<if <not <get-var width>>
+  <set-var width=100%>>
+<if <not <get-var height>>
+  <set-var height=1>>
+
+<div align=<get-var align>>
+<table width=<get-var width> border=0 cellpadding=0 cellspacing=0 bgcolor=<get-var color>>
+<tr><td align=<get-var align>>
+<img src=<root_prefix>gifs/imgdot-1x1-transp.gif width=1 height=<get-var height> alt="------------------------------">
+</td></tr>
+</table>
+</div>
+
+<restore color align width height>
+</define-tag>
+
+# Draws a 80% line in the menu color for submenu.inc
+<define-tag submenuhr>
+<p><line width=80% color="<menucolor>" height=1 align=center><p>
+</define-tag>
+
+# Draws a 100% line in the menu color for normal pages
+<define-tag colorhr whitespace=delete>
+<preserve width>
+<set-var %attributes>
+
+<if <not <get-var width>>
+  <set-var width=100%>>
+
+<line width=<get-var width> color="<menucolor>" height=1 align=center>
+<restore width>
+</define-tag>
+
+# Draw a colored box
+#
+# bcolor=border color (default black)
+# bgcolor=background color (default <bgcolor>)
+#
+<define-tag colorbox endtag=required>
+<preserve bgcolor bcolor width>
+<set-var %attributes>
+
+<if <not <get-var bcolor>>
+  <set-var bcolor=000000>>
+<if <not <get-var bgcolor>>
+  <set-var bgcolor=<bgcolor>>>
+<if <not <get-var width>>
+  <set-var width=100%>>
+
+<center>
+# <border>
+<table width=<get-var width> border=0 cellpadding=0 cellspacing=0><tr bgcolor=#<get-var bcolor>><td>
+<table width=100% border=0 cellpadding=0 cellspacing=1><tr bgcolor=#ffffff><td>
+<font face="Helvetica,Arial">
+# <border>
+
+<table width=100% border=0 bgcolor="#<get-var bgcolor>" cellpadding=5 cellspacing=0>
+<tr><th align=center><font face="Helvetica,Arial">
+
+%body
+
+</font></th></tr>
+</table>
+
+# </border>
+</font>
+</td></tr></table>
+</td></tr></table>
+# </border>
+
+</center>
+<restore bgcolor bcolor width>
+</define-tag>
+
+# Draws a coloured box with a title, see <root_prefix>Infodrom/web.html
+#
+<define-tag titlebox endtag=required>
+<preserve width title titlebgcolor titlecolor titlebar titlealign titlepadding bordercolor bgcolor>
+<set-var %attributes>
+
+<if <not <get-var width>>
+  <set-var width="100%">
+>
+<if <not <get-var titlebgcolor>>
+  <set-var titlebgcolor="<menucolor>">
+>
+<if <not <get-var titlecolor>>
+  <set-var titlecolor="<white>">
+>
+<if <not <get-var bordercolor>>
+  <set-var bordercolor="<black>">
+>
+<if <not <get-var bgcolor>>
+  <set-var bgcolor="<bgcolor>">
+>
+<if <not <get-var titlealign>>
+  <set-var titlealign="center">
+>
+<if <not <get-var titlepadding>>
+  <set-var titlepadding="5">
+>
+
+<ifeq <get-var titlebar> "small" "<div align="<get-var titlealign>">
+<table border=0 cellpadding=0 cellspacing=0><tr bgcolor=#<get-var titlebgcolor>><td align=center>
+<img src=<root_prefix>gifs/imgdot-1x1-transp.gif height=0 width=<get-var titlepadding> alt="">
+<font face="Helvetica,Arial" color="#<get-var titlecolor>"><b><get-var title></b></font>
+<img src=<root_prefix>gifs/imgdot-1x1-transp.gif height=0 width=<get-var titlepadding> alt="">
+</td></tr></table></div>">
+
+#<table width=100% border=0 cellpadding=0 cellspacing=0><tr bgcolor=#<get-var bordercolor>><td>
+<table width=<get-var width> border=0 cellpadding=0 cellspacing=0><tr bgcolor=#<get-var bordercolor>><td>
+<table width=100% border=0 cellpadding=0 cellspacing=1>
+<ifneq <get-var titlebar> "small" "<tr bgcolor=#<get-var titlebgcolor>><td align=center>
+<font face="Helvetica,Arial" color="#<get-var titlecolor>"><b><get-var title></b></font>
+</td></tr>">
+
+<tr bgcolor=#<get-var bgcolor>><td>
+<font face="Helvetica,Arial">
+
+%body
+
+</font>
+</td></tr></table>
+</td></tr></table>
+
+<restore width title titlebgcolor titlecolor titlebar titlealign titlepadding bordercolor bgcolor>
+</define-tag>
+
+<define-tag author endtag=required whitespace=delete>
+<div align=right><font size=-1><em>
+%body
+</em></font></div>
+</define-tag>
+
+<define-tag colorbg endtag=required>
+<preserve bgcolor>
+<set-var %attributes>
+<table width=100% cellpadding=2 cellspacing=0 border=0 bgcolor=<get-var bgcolor>>
+<tr><td><font face="Helvetica,Arial">
+%body
+</font></td></tr></table>
+<restore bgcolor>
+</define-tag>