changeset 648:8322134a1989

Make train liting work also in HC.
author Matti Hamalainen <ccr@tnsp.org>
date Tue, 24 Jul 2007 01:19:34 +0000
parents 31167a160b57
children fcaf1254d25f
files ggrtf-hc.tf
diffstat 1 files changed, 10 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/ggrtf-hc.tf	Tue Jul 24 01:19:14 2007 +0000
+++ b/ggrtf-hc.tf	Tue Jul 24 01:19:34 2007 +0000
@@ -24,3 +24,13 @@
 /def get_corpse = @get corpse
 
 
+;; Lite skills/spells you can train with current exp
+/def -i -F -p9999 -mregexp -t"^\| ([A-Z][A-Za-z ]+) +\| +([0-9]+) \| +([0-9]+) \| +([0-9]+) \|$" glite_trainexp =\
+	/if ({P4} <= status_qexp)\
+		/let _tcs=Cgreen%;\
+	/else \
+		/let _tcs=n%;\
+	/endif%;\
+	/substitute -p | @{%{_tcs}}%{P1}@{n} | @{%{_tcs}}$[pad({P2},3)]@{n} | @{%{_tcs}}$[pad({P3},3)]@{n} | @{%{_tcs}}$[pad({P4},8)]@{n} |
+
+