Mercurial > hg > batmud > ggrtf
changeset 960:db5f3bd8422d
Improve slots mangler.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Sun, 22 Mar 2009 07:51:46 +0000 |
parents | 1988204522a1 |
children | b12463a6e836 |
files | ggrtf.tf |
diffstat | 1 files changed, 12 insertions(+), 10 deletions(-) [+] |
line wrap: on
line diff
--- a/ggrtf.tf Sun Mar 22 07:41:23 2009 +0000 +++ b/ggrtf.tf Sun Mar 22 07:51:46 2009 +0000 @@ -2147,9 +2147,9 @@ /substitute -ag%;\ /set slots_st=1%;\ /set slots_ftotal=0%;\ - /msw ,--------------------.%;\ - /msw | Free | Slot |%;\ - /msw +-------+------------+ + /msw ,-------------------------.%;\ + /msw | Free | Slot |%;\ + /msw +-------+-----------------+ /def -i -E(slots_st==1) -p9999 -mregexp -t"^ You have (.*) free ([a-z]*) slots?\.$" gslots_mangle2 =\ /let _tslot=%{P2}%;\ @@ -2173,13 +2173,15 @@ /else \ /let _tcol=BCred%;\ /endif%;\ - /mss | @{%{_tcol}}$[pad(_tnum,5)]@{n} | $[pad(_tslot,-10)] |%;\ - /if (_tslot=~"torso")\ - /set slots_st=0%;\ - /msw +--------------------+%;\ - /msw | Total free: @{BCgreen}$[pad(slots_ftotal,-6)]@{n} |%;\ - /msw `--------------------'%;\ - /endif + /mss | @{%{_tcol}}$[pad(_tnum,5)]@{n} | $[pad(_tslot,-15)] | + +/def -i -E(slots_st==1) -p9999 -mregexp -t"^$" gslots_mangle3 =\ + /set slots_st=0%;\ + /msw +-------------------------+%;\ + /msw | Total free: @{BCgreen}$[pad(slots_ftotal,-11)]@{n} |%;\ + /msw `-------------------------' + + ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Global script initialization