154f2666433d517d87a6d18754c91cb9d363727d
[infodrom.org/infocon.infodrom.org] / 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 <meta name="Keywords"  content="GNU/Linux, Linux, Freie Software, Free Software, Oldenburg, \
65    Dienstleistung, Support, Schulung, Service, Perl, Python, PHP, Web, JavaScript, \
66    Programmierung, Anpassung, Consulting, Consulting, Customising">
67 <meta name="Robots"  content="index,follow">
68
69 </head>
70
71 <body>
72
73 <table cellspacing=0 cellpadding=0 border=0 width=100%>
74
75 <tr>
76   <td width=90><a href="<root_prefix>"><img src="<root_prefix>Pics/infocon-90.png" align=center alt="[InfoCon]" border=0></a></td>
77   <td width=<page-horiz-space>></td>
78   <td width=100%>
79         <h1 align=center><font face=Helvetica>Information &amp; Consulting</font></h1>
80
81 # Anfang der Menü-Tabelle
82 <table bgcolor=#5dbbf9 cellspacing=0 cellpadding=0 border=0 width=100%>
83 <tr>
84 <td><img src="<root_prefix>Pics/corner-upperleft.png" align="left" border="0" hspace="0" vspace="0" alt="" width="16" height="16"></td>
85 <td rowspan=2 align=center>
86
87 <:
88     # @menu = ('Infos','Dienstleistungen','Shop');
89     @menu = ('Infos','Dienstleistungen');
90     %menu_dir = ('Infos'            => 'infos',
91                  'Dienstleistungen' => 'service',
92                  'Shop'             => 'shop',
93                  );
94     %menu_width = ('Infos'            => 50,
95                    'Dienstleistungen' => 120,
96                    'Shop'             => 50,
97                    );
98     $menu_default = 'hspace="4" vspace="7" height="18" align="middle" border="0"';
99
100     foreach $rubrik (@menu) {
101         $dir = $menu_dir{$rubrik};
102         if ("<get-var WML_SRC_DIRNAME>" =~ /src\/$dir/) {
103             if ("<get-var WML_SRC_BASENAME>" eq "index") {
104                 # No link
105                 printf '<img src="%sPics/menu-%s.press.png" width="%d" alt="[%s]" %s>',
106                     $root_prefix, $dir, $menu_width{$rubrik}, $rubrik, $menu_default;
107             } else {
108                 # We're in but link required
109                 printf '<a href="%s%s/"><img src="%sPics/menu-%s.press.png" width="%d" alt="[%s]" %s></a>',
110                     $root_prefix, $dir, $root_prefix, $dir, $menu_width{$rubrik}, $rubrik, $menu_default;
111             }
112         } else {
113             # Link required
114             printf '<a href="%s%s/"><img src="%sPics/menu-%s.png" width="%d" alt="[%s]" %s></a>',
115                 $root_prefix, $dir, $root_prefix, $dir, $menu_width{$rubrik}, $rubrik, $menu_default;
116         }
117     }
118 :>
119
120 </td>
121 <td><img src="<root_prefix>Pics/corner-upperright.png" align="right" border="0" hspace="0" vspace="0" alt="" width="16" height="16"></td>
122 </tr>
123
124 # Untere Zeile, nur die Ecken
125 <tr>
126 <td><img src="<root_prefix>Pics/corner-lowerleft.png" align="left" border="0" hspace="0" vspace="0" alt="" width="16" height="16"></td>
127 <td><img src="<root_prefix>Pics/corner-lowerright.png" align="right" border="0" hspace="0" vspace="0" alt="" width="16" height="16"></td>
128 </tr>
129 </table>
130 # Ende der Menü-Tabelle
131   </td>
132 </tr>
133
134 <tr>
135   <td width=90 valign=top bgcolor=#5dbbf9>
136     <img src="<root_prefix>Pics/corner-upperleft.png" align="left" border="0" hspace="0" vspace="0" alt="" width="16" height="16">
137     <img src="<root_prefix>Pics/corner-upperright.png" align="right" border="0" hspace="0" vspace="0" alt="" width="16" height="16">
138   <font size="-1" face="Helvetica"><get-var menu>
139
140 #include "submenu.inc"
141
142   </font>
143
144 </td>
145   <td width=<page-horiz-space>></td>
146   <td width=100% valign=top>
147   <table width=100% border=0 cellspacing=2 cellpadding=0><tr><td width=100% align=left valign=top>
148   <font face=Helvetica>
149
150 #  <td width=100% valign=top><font face=Helvetica>
151
152 <div class="date">
153 <script type="text/javascript">
154   var today = new Date;
155   var year = today.getYear();
156   var mon = ['Januar','Februar','März','April','Mai','Juni','Juli','August','September','Oktober','November','Dezember'];
157
158   if (year < 200)
159     year += 1900;    
160
161   if (year > 2006 && year < 2100)
162     document.write(today.getDate()
163                    +". " + mon[today.getMonth()]
164                    +" " + year);
165 </script>
166 </div>
167
168 <div id=page>
169 <div id=border>
170 <h3 id=pagetitle><get-var title></h3>
171 <div id=content>
172
173   %body
174
175 </div>
176 </div>
177 </div>
178
179   </font>
180   </td></tr></table>
181   </td>
182 </tr>
183 <tr>
184   <td width=90 valign=bottom bgcolor=#5dbbf9>
185     <img src="<root_prefix>Pics/corner-lowerleft.png" align="left" border="0" hspace="0" vspace="0" alt="" width="17" height="16">
186     <img src="<root_prefix>Pics/corner-lowerright.png" align="right" border="0" hspace="0" vspace="0" alt="" width="16" height="16">
187   </td>
188   <td width=<page-horiz-space>></td>
189   <td width=100% valign=bottom align=right><page-footer></td>
190 </tr>
191 </table>
192 </body>
193 </html>
194
195 </define-tag>