View/Edit #6397:tell_www_page

Name(s): tell_www_page

1:  if (dobjstr == "?mail")
2:    if (!player:isa($webber) || !$perm_utils:controls(player.user, this))
3:      return $www.error:unauthorized()
4:    endif
5:  endif
6:  player:tell("<BODY TEXT=\"#FFFFFF\" BGCOLOR=\"#000000\" LINK=\"#FFFF00\" VLINK=\"#FF0000\" ALINK=\"#000000\">")
7:  player:tell("<CENTER><IMG SRC=\"http://members.home.net/destro/stuff/jtg.jpg\"></IMG></CENTER>")
8:  player:tell("<HR SIZE=1 WIDTH=\"100%\">")
9:  player:tell("<FONT FACE=\"Arial,Helvetica\">")
10: if (this:connected())
11:   player:tell("Connected: Yes (For ", $time_utils:english_time(connected_seconds(this)), ")")
12: else
13:   player:tell("Connected: No (Last disconnected: ", ctime(this.last_disconnect_time), ")")
14: endif
15: player:tell("<BR>")
16: player:tell("Current Location: ", $www:link(this.location))
17: player:tell("<BR>")
18: player:tell("Homepage: <a href=\"http://members.home.net/destro\">http://members.home.net/destro</A>")
19: player:tell("<BR><a href=\"http://www.moo.ca/1448\">Grab some lyrics</A>")
20: player:tell("<HR SIZE=1 WIDTH=\"100%\">")
21: player:tell(this.description)
22: player:tell("<BR>")
23: player:Tell("<CENTER><IMG SRC=\"http://members.home.net/destro/james16.jpg\"></IMG></CENTER>")
24: player:tell("</BODY>")
25: "Last modified by James (#6397) on Mon Aug 16 20:03:23 1999 MDT."

Verb arguments: this none this
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: James (#6397)

You are not logged in.