git.infodrom.org Git - infodrom.org/www.infodrom.org/blob - Styles/tools.inc

   1 # <border color=foo>  zeichnet einen Rahmen
   2 #
   3 <define-tag border endtag=required>
   4 <preserve color width>
   5 <set-var %attributes>
   6 <if <not <get-var color>>
   7   <set-var color="000000">
   8 >
   9 <if <not <get-var width>>
  10   <set-var width="100%">
  11 >
  12
  13 <table width=<get-var width> border=0 cellpadding=0 cellspacing=0><tr bgcolor=#<get-var color>><td>
  14 <table width=100% border=0 cellpadding=0 cellspacing=1><tr bgcolor=#<bgcolor>><td>
  15 <ifont>
  16
  17 %body
  18
  19 </ifont>
  20 </td></tr></table>
  21 </td></tr></table>
  22
  23 <restore color width>
  24 </define-tag>
  25
  26 # <line> Zeichnet eine Linie
  27 #
  28 <define-tag line whitespace=delete>
  29 <preserve color align width height>
  30 <set-var %attributes>
  31
  32 <if <not <get-var align>>
  33   <set-var align=center>>
  34 <if <not <get-var color>>
  35   <set-var color=000000>>
  36 <if <not <get-var width>>
  37   <set-var width=100%>>
  38 <if <not <get-var height>>
  39   <set-var height=1>>
  40
  41 <div align=<get-var align>>
  42 <table width=<get-var width> border=0 cellpadding=0 cellspacing=0 bgcolor=<get-var color>>
  43 <tr><td align=<get-var align>>
  44 <img src=<root_prefix>gifs/imgdot-1x1-transp.gif width=1 height=<get-var height> alt="------------------------------">
  45 </td></tr>
  46 </table>
  47 </div>
  48
  49 <restore color align width height>
  50 </define-tag>
  51
  52 # Draws a 80% line in the menu color for submenu.inc
  53 <define-tag submenuhr>
  54 <p><line width=80% color="<menu-fgcolor>" height=1 align=center><p>
  55 </define-tag>
  56
  57 # Draws a 100% line in the menu color for normal pages
  58 <define-tag colorhr whitespace=delete>
  59 <preserve width>
  60 <set-var %attributes>
  61
  62 <if <not <get-var width>>
  63   <set-var width=100%>>
  64
  65 <line width=<get-var width> color="<menu-fgcolor>" height=1 align=center>
  66 <restore width>
  67 </define-tag>
  68
  69 # Draw a colored box
  70 #
  71 # bcolor=border color (default black)
  72 # bgcolor=background color (default <bgcolor>)
  73 #
  74 <define-tag colorbox endtag=required>
  75 <preserve bgcolor bcolor width>
  76 <set-var %attributes>
  77
  78 <if <not <get-var bcolor>>
  79   <set-var bcolor=000000>>
  80 <if <not <get-var bgcolor>>
  81   <set-var bgcolor=<bgcolor>>>
  82 <if <not <get-var width>>
  83   <set-var width=100%>>
  84
  85 <center>
  86 # <border>
  87 <table width=<get-var width> border=0 cellpadding=0 cellspacing=0><tr bgcolor=#<get-var bcolor>><td>
  88 <table width=100% border=0 cellpadding=0 cellspacing=1><tr bgcolor=#ffffff><td>
  89 <ifont>
  90 # <border>
  91
  92 <table width=100% border=0 bgcolor="#<get-var bgcolor>" cellpadding=5 cellspacing=0>
  93 <tr><th align=center><ifont>
  94
  95 %body
  96
  97 </ifont></th></tr>
  98 </table>
  99
 100 # </border>
 101 </ifont>
 102 </td></tr></table>
 103 </td></tr></table>
 104 # </border>
 105
 106 </center>
 107 <restore bgcolor bcolor width>
 108 </define-tag>
 109
 110 # Draws a coloured box with a title, see <root_prefix>Infodrom/web.html
 111 #
 112 <define-tag titlebox endtag=required>
 113 <preserve width title titlebgcolor titlecolor titlebar titlealign titlepadding bordercolor bgcolor>
 114 <set-var %attributes>
 115
 116 <if <not <get-var width>>
 117   <set-var width="100%">
 118 >
 119 <if <not <get-var titlebgcolor>>
 120   <set-var titlebgcolor="<menu-fgcolor>">
 121 >
 122 <if <not <get-var titlecolor>>
 123   <set-var titlecolor="<white>">
 124 >
 125 <if <not <get-var bordercolor>>
 126   <set-var bordercolor="<black>">
 127 >
 128 <if <not <get-var bgcolor>>
 129   <set-var bgcolor="<bgcolor>">
 130 >
 131 <if <not <get-var titlealign>>
 132   <set-var titlealign="center">
 133 >
 134 <if <not <get-var titlepadding>>
 135   <set-var titlepadding="5">
 136 >
 137
 138 <ifeq <get-var titlebar> "small" "<div align="<get-var titlealign>">
 139 <table class=font border=0 cellpadding=0 cellspacing=0><tr bgcolor=#<get-var titlebgcolor>><td align=center>
 140 <img src=<root_prefix>gifs/imgdot-1x1-transp.gif height=0 width=<get-var titlepadding> alt="">
 141 <font color="#<get-var titlecolor>"><b><get-var title></b></font>
 142 <img src=<root_prefix>gifs/imgdot-1x1-transp.gif height=0 width=<get-var titlepadding> alt="">
 143 </td></tr></table></div>">
 144
 145 #<table width=100% border=0 cellpadding=0 cellspacing=0><tr bgcolor=#<get-var bordercolor>><td>
 146 <table width=<get-var width> border=0 cellpadding=0 cellspacing=0><tr bgcolor=#<get-var bordercolor>><td>
 147 <table width=100% class=font border=0 cellpadding=0 cellspacing=1>
 148 <ifneq <get-var titlebar> "small" "<tr bgcolor=#<get-var titlebgcolor>><td align=center>
 149 <font color="#<get-var titlecolor>"><b><get-var title></b></font>
 150 </td></tr>">
 151
 152 <tr bgcolor=#<get-var bgcolor>><td>
 153
 154 %body
 155
 156 </td></tr></table>
 157 </td></tr></table>
 158
 159 <restore width title titlebgcolor titlecolor titlebar titlealign titlepadding bordercolor bgcolor>
 160 </define-tag>
 161
 162 <define-tag author endtag=required whitespace=delete>
 163 <div align=right><font size=-1><em>
 164 %body
 165 </em></font></div>
 166 </define-tag>
 167
 168 <define-tag colorbg endtag=required>
 169 <preserve bgcolor>
 170 <set-var %attributes>
 171 <table width=100% class=font cellpadding=2 cellspacing=0 border=0 bgcolor=<get-var bgcolor>>
 172 <tr><td>
 173 %body
 174 </td></tr></table>
 175 <restore bgcolor>
 176 </define-tag>