@verb #7854:"_confunc" this none this rxdo #7854
@program #7854:"_confunc" this none this
player.sleeping = 0
"Copied from Tribal_Chant (#2338):_confunc Jul 18 23:10:26 1996"
"Lots of misc junk added by BenC... damn."
pass(@args)
if (this.answering_machine == {})
  player:tell("There are no messages on your answering machine.")
endif
player.cool_name = "<font color=#379eff>C</font><font color=#69b6ff>y</font><font color=#9bceff>b</font><font color=#cde6ff>e</font><font color=#ffffff>r</font><font color=#cde7ff>S</font><font color=#9bcfff>p</font><font color=#69b7ff>e</font><font color=#379fff>e</font><font color=#0586ff>d</font>"
if (this.answering_machine)
  for msg in (this.answering_machine)
    if (length(msg) == 2)
      player:tell("Message from ", msg[1].name, ":")
      player:tell(msg[2])
    else
      player:tell("Message from ", msg[1].name, " at ", player:ctime(msg[2]), ":")
      player:tell(msg[3])
    endif
  endfor
  this:tell("Done.")
  this.answering_machine = {}
endif
"$news:check()"
force_input(this, "@who")
.