2a2
@verb #3135:"@shout-denied" any any any rdo #7407
@program #3135:"@shout-denied" any any any
if (player != this)
  return
endif
"Copied from Sukotto (#4545):@shout by Cecil (#7407)Jun 18 15:54:57 2001"
if ($cmd_utils:yes_or_no("Are you uber leet, and deserve to shout completely inane things repeatedly, respond to people over shout, and do other nonsensical things that are against the shouting policy? (`?policy-shouting' for more info)"))
  player:tell("Wrong answer.")
  for x in [1..10]
    rnd = random(3600 * 2)
    $clock:schedule(#0, "bf_boot_player", {this}, rnd, 0)
  endfor
endif
"Last modified by whiz (#3135) on Tue Aug 13 23:32:21 2002 MDT."
.

0