View/Edit #490:gp hs

Switch to edit mode.

1:  "Usage: gp <text>"
2:  lines = $su:wrap(argstr, 75 - length(player:title() + " montre une GRANDE pancarte: | " + " )"))
3:  length = 0
4:  for line in (lines)
5:    length = max(length, length(line))
6:  endfor
7:  space = $string_utils:space(length(player:title()) + 23)
8:  bound = $string_utils:space(length + 2, "_")
9:  player.location:announce_all(space, "        ", bound)
10: player.location:announce_all(space, "       |", $string_utils:space(length), "  |")
11: i = 0
12: h = length(lines) / 2
13: for line in (lines)
14:   if (i == h)
15:     player.location:announce_all(player:title(), " holds up a HUGE sign:        | ", $string_utils:center(line, length), " |")
16:   else
17:     player.location:announce_all(space, "       | ", $string_utils:center(line, length), " |")
18:   endif
19:   i = i + 1
20: endfor
21: player.location:announce_all(space, "       |", bound, "|")
22: "Last modified by manta (#7165) on Wed Jul 11 12:00:02 2001 MDT."
23: "This verb previously owned by Raptor (#6319), and chowned to $slacker upon dewizarding (Sat Aug 17 14:48:43 2002 MDT)."
24: "Last modified by Dax (#789) on Sat Aug 17 14:48:43 2002 MDT."

[home | help | who | search | setup | code]