Mercurial > hg > batmud > ggrtf
changeset 1496:75f99ae1cdb3
Move utility function to the main module.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Tue, 12 Jun 2012 20:13:32 +0300 |
parents | 34d742910e20 |
children | 384f8ceb4a32 |
files | ggrtf.tf gm-spider.tf |
diffstat | 2 files changed, 7 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/ggrtf.tf Tue Jun 12 20:11:52 2012 +0300 +++ b/ggrtf.tf Tue Jun 12 20:13:32 2012 +0300 @@ -258,6 +258,13 @@ /def -i prconvpm = /return replace("_"," ",{1}) /def -i prgetval = /return eval("/return %{*}",2) +;; Return a string of given value {2} repeated {1} times. +/def -i prrepval_do =\ + /for _i 1 %{1} /echo %{2} + +/def -i prrepval =\ + /return "$(/prrepval_do %{1} %{2})" + ;; Return ratio of 2 arguments (avoid divide by zero) /def -i prdiv = /if ({2} != 0) /return {1}/{2}%;/else /return 0%;/endif
--- a/gm-spider.tf Tue Jun 12 20:11:52 2012 +0300 +++ b/gm-spider.tf Tue Jun 12 20:13:32 2012 +0300 @@ -17,12 +17,6 @@ /set spider_avgn_min=60 /set spider_avgq_min=80 -/def -i prrepval_do =\ - /for _i 1 %{1} /echo %{2} - -/def -i prrepval =\ - /return "$(/prrepval_do %{1} %{2})" - /def -i gspider_reset =\ /set spider_drain_t=0%;\ /set spider_ctrl_t=0%;\