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