-@discard{
-
This file is part of DisOrder.
Copyright (C) 2008 Richard Kettlewell
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
USA
+
+------------------------------------------------------------------------
+Standard macros
+
+
+This file is read before any other template. Its output is discarded
+but side effects (definitions of macros) are retained. To override it,
+create /etc/disorder/macros.tmpl that includes this file by absolute path
+and then redefines macros as desired.
+------------------------------------------------------------------------
+
+
@# Standard width and height of an image
@define {width} {} {16}
@define {height} {} {16}
-@# Expand to @yes for the Manage page and @no for the playing page
-@define {ifmanage} {yes no}
- {@if {@eq {@arg{action}}{manage}}
- {@yes}
- {@no}}
+@# Standard <head> text
+@# @name is the name of this page, for the <title> element
+@define {stdhead} {name}
+ {@quiethead
+<link rel=stylesheet
+ type="text/css"
+ href="@label{url.static}/disorder.css">
+<title>@label{@name.title}</title>}
+
+@# Non-displaying <head> text
+@define {quiethead} {}
+ {<link rel=stylesheet
+ type="text/css"
+ href="@label{url.static}/disorder.css">}
+
+@# Standard menu
+@# @current is the name of the current page, e.g. choosealpha, login
+@define {stdmenu} {current}
+ {<p class=menubar>
+@menuitem{@current}{playing}{true}
+@menuitem{@current}{choose}{@right{play}}
+@menuitem{@current}{manage}{true}
+@menuitem{@current}{login}{true}
+@menuitem{@current}{help}{true}
+@menuitem{@current}{about}{true}
+</p>
+<hr>
+}
+
+@# Menu entry
+@# Used by @stdmenu
+@# @current is the name of the current page (not necessarily the action that
+@# got there!)
+@# @name is the name of the menu item
+@# @available is true if the menu item is available, else false
+@#
+@define {menuitem} {current name available}
+ {@if{@available}
+ { <a @if{@eq{@current}{@name}}
+ {class=activemenu}
+ {class=inactivemenu}
+ @if{@eq{name}{playing}}
+ {href="@url"}
+ {href="@url?action=@name"}
+ title="@label{menu.@q{@name}verbose}"
+ @label{menu.@name}</a>}
+ { <span class=invaldmenu title="@label{menu.@q{@name}verbose}">
+ @label{menu.@name}</span>}}
+
-@# Expand to &back=manage or to nothing
-@define {back} {}
- {@ifmanage{&back=manage}{}}
+@# Standard footer text
+@define {credits} {}
+ {<p class=credits>
+ <a href="http://www.greenend.org.uk/rjk/disorder/"
+ title="DisOrder web site">DisOrder
+ version @version</a>
+ © 2003-2008 Richard Kettlewell et al
+</p>}
@# Expand to the time that @id will be played
@# @what is the section
width=@width height=@height
title="@label{playing.@q{@dir}verbose}"
alt="@label{playing.@dir}">}}
-}@#