View/Edit #12:tell_www_body

Switch to edit mode.

1:  pass(@args)
2:  if (!this.ignore_www && !(#-1 in this.gaglist) && !(player.user in this.gaglist))
3:    this:tell(player.user == $no_one ? "Somebody from " + $su:connection_hostname(connection_name(player)) | player.user:nn(), " looks at you from the web.")
4:  endif
5:  player:tell("<P>")
6:  if (!$object_utils:connected(this, 0))
7:    if ($wiz_utils:isnewt(this))
8:      player:sub_tell(this.nologin[2], this, $string_utils:from_seconds(this.nologin[1] - time()))
9:    else
10:     $msg:mtell("sleeping")
11:   endif
12: elseif ((idle = idle_seconds(this)) < 60)
13:   $msg:mtell(#-1 in this.gaglist ? "deaf" | "awake")
14: else
15:   $msg:mtell("idle", $string_utils:from_seconds(idle))
16: endif
17: player:tell("<BR>")
18: things = {}
19: for x in (this:contents())
20:   things = {@things, $web:link(x)}
21:   $command_utils:suspend_if_needed()
22: endfor
23: if (length(things) > 1)
24:   things = $www:format_list(this.www_list_type, things)
25: endif
26: this:tell_contents(things)
27: if (is_player(this))
28:   player:tell("<P><FORM ACTION='/audit'><INPUT TYPE='hidden' NAME='isindex' VALUE='", toint(this), "'><INPUT TYPE='submit' VALUE='Audit ", $html_utils:literal_text(this.name), "'> List everything ", this.name, " owns.</FORM>")
29:   player:tell("<P><FORM ACTION='/mailer/send'><INPUT TYPE='hidden' NAME='to' VALUE='", $html_utils:literal_text(this:nn()), "'><INPUT TYPE='submit' VALUE='Mail ", $html_utils:literal_text(this.name), "'> Send mail to ", this.name, ".</FORM>")
30: endif
31: "Last modified by Dax (#789) on Tue May  3 14:09:29 2005 MDT."

[home | help | who | search | setup | code]