Mercurial > hg > batmud > ggrtf
changeset 760:c47bb6068adf
Use substitute for gagging in slot mangler.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Sun, 06 Jul 2008 17:40:29 +0000 |
parents | c525ebc0448c |
children | 86f3e5d86831 |
files | ggrtf-misc.tf |
diffstat | 1 files changed, 4 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/ggrtf-misc.tf Sat Jul 05 09:26:49 2008 +0000 +++ b/ggrtf-misc.tf Sun Jul 06 17:40:29 2008 +0000 @@ -418,14 +418,16 @@ ;; FIXME: What if torso is not the last slot listed? How to elegantly print ;; the bottom of the table? -/def -i -ag -p9999 -msimple -t"Your current armour status is:" gslots_mangle1 =\ +/def -i -p9999 -msimple -t"Your current armour status is:" gslots_mangle1 =\ + /substitute -ag%;\ /set slots_st=1%;\ /set slots_ftotal=0%;\ /msw ,--------------------.%;\ /msw | Free | Slot |%;\ /msw +-------+------------+ -/def -i -E(slots_st==1) -ag -p9999 -mregexp -t"^ You have (.*) free ([a-z]*) slots?\.$" gslots_mangle2 =\ +/def -i -E(slots_st==1) -p9999 -mregexp -t"^ You have (.*) free ([a-z]*) slots?\.$" gslots_mangle2 =\ + /substitute -ag%;\ /let _tslot=%{P2}%;\ /if ({P1}=~"no") /let _tnum=0%;\ /elseif ({P1}=~"one") /let _tnum=1%;\