git.infodrom.org Git - infodrom.org/infocon.infodrom.org/blob - Styles/infocon.style

   1 # ========== Abstand berechnen ==========
   2 # in ePerl: $root_prefix
   3 # in WML: <get-var root_prefix>
   4 <:
   5   $root_prefix = "<get-var WML_SRC_DIRNAME>";
   6   $root_prefix =~ s/^.*src\/?(.*)$/$1/;
   7   @foo = split (/\//, $root_prefix);
   8   $root_prefix = "../"x($#foo+1);
   9 :>
  10 <if <not <get-var root_prefix>>
  11   <define-tag root_prefix><: print "$root_prefix"; :></define-tag>
  12   "<: $root_prefix = \"<get-var root_prefix>\"; :>"
  13 >
  14
  15
  16 # ========== Page footer ==========
  17 #
  18 # Sollte eigentlich in <address></address> eingefaßt sein, kursiv sieht's aber nicht aus.
  19 #
  20 <define-tag page-footer>
  21 <font face="Helvetica,Arial" size="-1">&copy; <a href="<root_prefix>impressum.html">InfoCon</a>
  22 </font>
  23 </define-tag>
  24
  25 <define-tag old-page-footer>
  26 # &copy; = &#169;
  27 <font face="Helvetica,Arial" size="-1">&copy; <a href="<root_prefix>impressum.html">InfoCon</a>, <:
  28 @months =
  29 #    ("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec");
  30     ("Dummy", "Januar","Februar","März","April","Mai","Juni","Juli","August","September","Oktober","November","Dezember");
  31
  32 #($date_sec,$date_min,$date_hour,$date_mday,$date_mon,$date_year,$date_wday,$date_isdst)
  33 #    = localtime(); $date_year += 1900;
  34 #printf "%d %s %d", $date_mday, $months[$date_mon], $date_year;
  35
  36 "<get-var WML_SRC_ISOTIME>" =~ /^(\d+)-(\d+)-(\d+)\s/;
  37
  38 printf "Letzte Änderung: %d. %s %d", $3, $months[$2], $1;
  39 :></font>
  40 </define-tag>
  41
  42
  43 # ========== Page ==========
  44 #
  45 <define-tag page-horiz-space>10</define-tag>
  46 <define-tag page endtag=required>
  47 <set-var %attributes>
  48
  49 <if <not <get-var title>>
  50     <set-var title="InfoCon - Information & Consulting">>
  51
  52 # Titel im linken Submenü
  53 <if <not <get-var menu>>
  54     <set-var menu="<div align=center>&nbsp;</div><br>">
  55     <set-var menu="<div align=center><b>Infos</b></div><br>">
  56 >
  57
  58 <html lang="de">
  59 <head>
  60 <title>InfoCon - <get-var title></title>
  61 <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
  62 <link href="<root_prefix>infocon.css" rel="stylesheet" type="text/css">
  63 <meta name="Language"  content="de">
  64
  65 <meta name="Keywords"  content="GNU/Linux, Linux, Freie Software, Free Software, Oldenburg, \
  66    Dienstleistung, Support, Schulung, Service, Perl, Python, PHP, Web, JavaScript, \
  67    Programmierung, Anpassung, Consulting, Customising, Norddeutschland, Weser-Ems, \
  68    RRD, Datenbanken, SQL, kommerz, Kommerziell, Business, Joey, IT-Consulting, \
  69    Entwicklung, Planung, Wartung, Administration, Niedersachsen, <get-var keywords>">
  70 <meta name="Robots"  content="index,follow">
  71
  72 </head>
  73
  74 <body>
  75
  76 <table cellspacing=0 cellpadding=0 border=0 width=100%>
  77
  78 <tr>
  79   <td width=90><a href="<root_prefix>"><img src="<root_prefix>Pics/infocon-90.png" align=center alt="[InfoCon]" border=0></a></td>
  80   <td width=<page-horiz-space>></td>
  81   <td width=100%>
  82         <h1 align=center><font face=Helvetica>Information &amp; Consulting</font></h1>
  83
  84 # Anfang der Menü-Tabelle
  85 <table bgcolor=#5dbbf9 cellspacing=0 cellpadding=0 border=0 width=100%>
  86 <tr>
  87 <td><img src="<root_prefix>Pics/corner-upperleft.png" align="left" border="0" hspace="0" vspace="0" alt="" width="16" height="16"></td>
  88 <td rowspan=2 align=center>
  89
  90 <:
  91     # @menu = ('Infos','Dienstleistungen','Shop');
  92     @menu = ('Infos','Dienstleistungen');
  93     %menu_dir = ('Infos'            => 'infos',
  94                  'Dienstleistungen' => 'service',
  95                  'Shop'             => 'shop',
  96                  );
  97     %menu_width = ('Infos'            => 50,
  98                    'Dienstleistungen' => 120,
  99                    'Shop'             => 50,
 100                    );
 101     $menu_default = 'hspace="4" vspace="7" height="18" align="middle" border="0"';
 102
 103     foreach $rubrik (@menu) {
 104         $dir = $menu_dir{$rubrik};
 105         if ("<get-var WML_SRC_DIRNAME>" =~ /src\/$dir/) {
 106             if ("<get-var WML_SRC_BASENAME>" eq "index") {
 107                 # No link
 108                 printf '<img src="%sPics/menu-%s.press.png" width="%d" alt="[%s]" %s>',
 109                     $root_prefix, $dir, $menu_width{$rubrik}, $rubrik, $menu_default;
 110             } else {
 111                 # We're in but link required
 112                 printf '<a href="%s%s/"><img src="%sPics/menu-%s.press.png" width="%d" alt="[%s]" %s></a>',
 113                     $root_prefix, $dir, $root_prefix, $dir, $menu_width{$rubrik}, $rubrik, $menu_default;
 114             }
 115         } else {
 116             # Link required
 117             printf '<a href="%s%s/"><img src="%sPics/menu-%s.png" width="%d" alt="[%s]" %s></a>',
 118                 $root_prefix, $dir, $root_prefix, $dir, $menu_width{$rubrik}, $rubrik, $menu_default;
 119         }
 120     }
 121 :>
 122
 123 </td>
 124 <td><img src="<root_prefix>Pics/corner-upperright.png" align="right" border="0" hspace="0" vspace="0" alt="" width="16" height="16"></td>
 125 </tr>
 126
 127 # Untere Zeile, nur die Ecken
 128 <tr>
 129 <td><img src="<root_prefix>Pics/corner-lowerleft.png" align="left" border="0" hspace="0" vspace="0" alt="" width="16" height="16"></td>
 130 <td><img src="<root_prefix>Pics/corner-lowerright.png" align="right" border="0" hspace="0" vspace="0" alt="" width="16" height="16"></td>
 131 </tr>
 132 </table>
 133 # Ende der Menü-Tabelle
 134   </td>
 135 </tr>
 136
 137 <tr>
 138   <td width=90 valign=top bgcolor=#5dbbf9>
 139     <img src="<root_prefix>Pics/corner-upperleft.png" align="left" border="0" hspace="0" vspace="0" alt="" width="16" height="16">
 140     <img src="<root_prefix>Pics/corner-upperright.png" align="right" border="0" hspace="0" vspace="0" alt="" width="16" height="16">
 141   <font size="-1" face="Helvetica"><get-var menu>
 142
 143 #include "submenu.inc"
 144
 145   </font>
 146
 147 </td>
 148   <td width=<page-horiz-space>></td>
 149   <td width=100% valign=top>
 150   <table width=100% border=0 cellspacing=2 cellpadding=0><tr><td width=100% align=left valign=top>
 151   <font face=Helvetica>
 152
 153 #  <td width=100% valign=top><font face=Helvetica>
 154
 155 <div class="date">
 156 <script type="text/javascript">
 157   var today = new Date;
 158   var year = today.getYear();
 159   var mon = ['Januar','Februar','März','April','Mai','Juni','Juli','August','September','Oktober','November','Dezember'];
 160
 161   if (year < 200)
 162     year += 1900;
 163
 164   if (year > 2006 && year < 2100)
 165     document.write(today.getDate()
 166                    +". " + mon[today.getMonth()]
 167                    +" " + year);
 168 </script>
 169 </div>
 170
 171 <div id=page>
 172 <div id=border>
 173 <h3 id=pagetitle><get-var title></h3>
 174 <div id=content>
 175
 176   %body
 177
 178 </div>
 179 </div>
 180 </div>
 181
 182   </font>
 183   </td></tr></table>
 184   </td>
 185 </tr>
 186 <tr>
 187   <td width=90 valign=bottom bgcolor=#5dbbf9>
 188     <img src="<root_prefix>Pics/corner-lowerleft.png" align="left" border="0" hspace="0" vspace="0" alt="" width="17" height="16">
 189     <img src="<root_prefix>Pics/corner-lowerright.png" align="right" border="0" hspace="0" vspace="0" alt="" width="16" height="16">
 190   </td>
 191   <td width=<page-horiz-space>></td>
 192   <td width=100% valign=bottom align=right><page-footer></td>
 193 </tr>
 194 </table>
 195 </body>
 196 </html>
 197
 198 </define-tag>