@verb #307:"tell_www_body" this none this rxdo #60
@program #307:"tell_www_body" this none this
pass(@args)
player:tell("<HR><H3>Preview:</H3>")
player:tell("<TABLE WIDTH='33%' cellspacing=0 border=0><TR>")
player:tell("<TH BGCOLOR=\"", $home:_get_colours(player)[2], "\" ALIGN=\"left\">")
player:tell("<IMG SRC=\"http://files.moo.ca/3/0/6/controls.gif\" WIDTH=111 HEIGHT=18 ALT=\"Toolbar Demo\" ALIGN=\"right\">")
player:tell("<FONT COLOR=\"", $home:_get_colours(player)[3], "\" FACE=\"system\"><B>&nbsp;", this:title(), "</B></FONT></TH>")
player:tell("</TR><TR>")
player:tell("<TD BGCOLOR=\"", $home:_get_colours(player)[3], "\" VALIGN=\"top\">")
this:tell_www_data()
player:tell("</TD></TR></TABLE>")
if (player.user != $no_one)
  player:tell("<P><FORM ACTION=\"/home/add\"><INPUT TYPE=\"hidden\" NAME=\"what\" VALUE=\"", toint(this), "\"><INPUT TYPE=\"submit\" VALUE=\"Add this box\"></FORM>")
endif
"Last modified by Dax (#789) on Tue May  3 14:09:31 2005 MDT."
.