@verb #490:"gp hs" any any any rxdo #55
@program #490:"gp hs" any any any
"Usage: gp <text>"
lines = $su:wrap(argstr, 75 - length(player:title() + " montre une GRANDE pancarte: | " + " )"))
length = 0
for line in (lines)
  length = max(length, length(line))
endfor
space = $string_utils:space(length(player:title()) + 23)
bound = $string_utils:space(length + 2, "_")
player.location:announce_all(space, "        ", bound)
player.location:announce_all(space, "       |", $string_utils:space(length), "  |")
i = 0
h = length(lines) / 2
for line in (lines)
  if (i == h)
    player.location:announce_all(player:title(), " holds up a HUGE sign:        | ", $string_utils:center(line, length), " |")
  else
    player.location:announce_all(space, "       | ", $string_utils:center(line, length), " |")
  endif
  i = i + 1
endfor
player.location:announce_all(space, "       |", bound, "|")
"Last modified by manta (#7165) on Wed Jul 11 12:00:02 2001 MDT."
"This verb previously owned by Raptor (#6319), and chowned to $slacker upon dewizarding (Sat Aug 17 14:48:43 2002 MDT)."
"Last modified by Dax (#789) on Sat Aug 17 14:48:43 2002 MDT."
.