<% if (prepstr == "/alt") return this:tell_alt_page(); endif if (iobj) if ($www:parse_POST("apply")) player.user.www_toolbar = tostr(this, ":tell_www_tail(this)"); endif data = {}; for datum in (iobj) {name, value} = datum; if (length(name) > 4 && name[1..4] in {"name", "link", "alt_"}) n = toint(name[5..$]); while (length(data) < n) data = {@data, {"", "", ""}}; endwhile value = $su:trim(value); if (name[1..4] == "name") data[n][1] = value; elseif (name[1..4] == "link") data[n][2] = value; else data[n][3] = value; endif endif endfor while (data && data[$] == {"", "", ""}) data = data[1..$-1]; endwhile this:_set_data(player.user, data); endif data = this:_get_data(player.user); %> <!DOCTYPE HTML PUBLIC "<%=this.www_doctype_fpi%>" "<%=this.www_doctype_uri%>"> <HTML><HEAD> <TITLE><%=$name%>: <%=this.name%></TITLE> <%=$html_utils:nav_links(this:www_nav_links())%> </HEAD> <BODY <%=this.www_body_args%>> <H1><%=this.name%></H1> You may change the links on your personal menu of the DHTML toolbar. Four number signs (####) in a link get replaced with the object's number (1234). <FORM METHOD="post" ACTION="/<%=toint(this)%>"> <TABLE> <TR><TH>#</TH><TH>Name</TH><TH>Link</TH><TH>Tooltip (optional)</TH></TR> <% count = 0; for datum in ({@data, {"", "", ""}, {"", "", ""}, {"", "", ""}, {"", "", ""}}) {name, link, alt} = datum; if (name && (name+"__")[1..2] == "__") continue; endif count = count + 1; %> <TR> <TD ALIGN=right><%=count%></TD> <TD><%=$html_utils:input_text(tostr("name", count), name, 10)%></TD> <TD><%=$html_utils:input_text(tostr("link", count), link, 20)%></TD> <TD><%=$html_utils:input_text(tostr("alt_", count), alt, 30)%></TD> </TR> <% endfor %> </TABLE> <P> <%if (player.user.www_toolbar != tostr(this, ":tell_www_tail(this)"))%> <INPUT TYPE="checkbox" NAME="apply"> Make this be your default toolbar. <P> <%endif%> <INPUT TYPE='submit' VALUE='Set Toolbar'> </FORM> <P>The DHTML menu is based on code by <A HREF="http://www.likno.com/">Likno Software</A>. Moo Canada has a licence to use this code.</P> <P><B>< Choose a different <%=$www:link($toolbar, "toolbar")%></B></P> <% this:tell_www_tail(); %> </BODY></HTML> <!-- Last modified by Dax (#789) on Sat Aug 16 13:40:01 2003 MDT. -->
Commands: Commands: