1ff
@verb #9463:"q" any any any rdo #9463
@program #9463:"q" any any any
"Copied from Quadir (#9780):q Aug 22 20:13:32 2002"
player == this || raise(E_PERM)
msg = argstr
if (`argstr[1..2] == "::" ! E_RANGE')
  msg = `msg[3..$] ! E_RANGE => ""'
  action = ""
elseif (`msg[1] == ":" ! E_RANGE')
  msg = `msg[2..$] ! E_RANGE => ""'
  action = " "
else
  action = ": "
endif
people = {$quadir, $foe, $teya}
for person in (people)
  person:sub_tell(person.msg_q, player:title(), action, msg)
endfor
.

0