View/Edit #8327:tell_www_tail

Switch to edit mode.

1:  player:tell("<!-- Start ", this, ":tell_www_tail --> <BR CLEAR=\"all\"><HR>")
2:  {?what = caller} = args
3:  $toolbar:common_info(what)
4:  "Print out the toolbar."
5:  alturl = tostr($www.url, toint(this), "/alt?obj=", toint(what))
6:  menu = this:submenu("Player", what, this.menu_player)
7:  alt = "&gt; <A HREF=\"" + alturl + "#Player\">Player</A> "
8:  if (player.user:isa($builder) && player.user != $no_one)
9:    menu = {@menu, @this:submenu("Builder", what, this.menu_builder)}
10:   alt = alt + "&gt; <A HREF=\"" + alturl + "#Builder\">Builder</A> "
11:   if (player.user:isa($prog))
12:     menu = {@menu, @this:submenu("Programmer", what, this.menu_programmer)}
13:     alt = alt + "&gt; <A HREF=\"" + alturl + "#Programmer\">Programmer</A> "
14:     if (player.user:isa($guardian))
15:       menu = {@menu, @this:submenu("Wizzen", what, this.menu_wizzen)}
16:       alt = alt + "&gt; <A HREF=\"" + alturl + "#Wizzen\">Wizzen</A>"
17:     endif
18:   endif
19: endif
20: name = player.user == $no_one ? "Guest" | player.user.name
21: menu = {@menu, @this:submenu(name, what, this:_get_data(player.user))}
22: alt = alt + "&gt; <A HREF=\"" + alturl + "#" + name + "\">" + name + "</A>"
23: template = this.template
24: x = "***MENU GOES HERE***" in template
25: template = {@template[1..x - 1], @menu, @template[x + 1..$]}
26: template["***NO SUPPORT GOES HERE***" in template] = "document.write('" + alt + "');"
27: template["***NO SCRIPT GOES HERE***" in template] = "<noscript>" + alt + "</noscript>"
28: player:tell(template)
29: player:tell("<!-- End ", this, ":tell_www_tail -->")
30: "Last modified by Dax (#789) on Tue May  3 14:09:37 2005 MDT."

Commands: