# File imported from www.infodrom.org/Styles/

# Global color definition
#
<define-tag black>000000</define-tag>
<define-tag white>ffffff</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>

# ========== 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>