@verb #3236:"music" none any none rxdo #2773
@program #3236:"music" none any none
"Copied from Generic Super-Enhanced Room (#6886):music by Raptor (#6319)Jul 15 12:23:09 1999"
"Allows a background .midi file to be played.  Also for Puebloites only, until a web-adaptor can be built."
{?player = player} = args
if (prepstr == "off")
  return player:tell("<img xch_sound=stop xch_device=midi>Music turned off.")
elseif (player.pueblo_version && this.music[1])
  "Only one .mid at a time, until we have the ability to use lengths."
  return player:tell("<img xch_sound=loop href=\"", this.music[1], "\">")
elseif (this.music[2])
  "No music, but a description of some..."
  return player:tell(this.music[2])
elseif (caller != this)
  "No music..."
  return player:tell("There is no music in this room.")
endif
.