View/Edit #6565:com com: monitor

Switch to edit mode.

1:  if (verb == "monitor" && $perm_utils:can_hack())
2:    for x in (this.contents)
3:      if (this:loc(x) != 2)
4:        x:tell("[Com] (Monitor) ", @args)
5:      endif
6:    endfor
7:    return
8:  endif
9:  if (!args)
10:   return player:tell("Usage: Com <text>")
11: endif
12: if (length(argstr) == 1)
13:   if (argstr[1] == ":")
14:     return this:shoutout("[Com] ", player.name)
15:   else
16:     return this:shoutout("[Com] ", player.name, ": ", argstr)
17:   endif
18: endif
19: if (length(argstr) == 2)
20:   if (argstr[1..2] == ":)")
21:     return this:shoutout("[Com] ", player.name, ": :)")
22:   endif
23:   if (argstr[1..2] == "::")
24:     return this:shoutout("[Com] ", player.name)
25:   elseif (argstr[1] == ":")
26:     string = argstr[2]
27:     return this:shoutout("[Com] ", player.name, " ", string)
28:   else
29:     return this:shoutout("[Com] ", player.name, ": ", argstr)
30:   endif
31: endif
32: if (argstr[1..2] == "::")
33:   string = argstr[3..length(argstr)]
34:   return this:shoutout("[Com] ", player.name, "", string)
35: elseif (argstr[1..2] == ":)")
36:   return this:shoutout("[Com] ", player.name, ": ", argstr)
37: elseif (argstr[1] == ":")
38:   string = argstr[2..length(argstr)]
39:   return this:shoutout("[Com] ", player.name, " ", string)
40: else
41:   return this:shoutout("[Com] ", player.name, ": ", argstr)
42: endif
43: "Last modified by Dax (#789) on Thu Nov  8 11:38:34 2001 MST."

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