Mercurial > hg > batmud > ggrtf
changeset 69:3cfb24dca78d rel-0_5_3
Comments, moving bits around to reorganize for cleaner look
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Tue, 27 Sep 2005 12:45:03 +0000 |
parents | f2d0d922596b |
children | f7a22f1446d8 |
files | ggrtf.tf |
diffstat | 1 files changed, 26 insertions(+), 23 deletions(-) [+] |
line wrap: on
line diff
--- a/ggrtf.tf Sun Sep 25 08:40:16 2005 +0000 +++ b/ggrtf.tf Tue Sep 27 12:45:03 2005 +0000 @@ -545,7 +545,9 @@ /status_update +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Create normal regular prots without complexities +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; /prcreate -i"eaura" -n"EAura" -l"Energy Aura" -s -h /prcreate -i"pff" -n"PFF" -l"Personal Force Field" -r -u"^You surround yourself by a bubble of force.$" -d"^Your field disperses with a soft \*pop\* and is gone.$" @@ -610,6 +612,30 @@ /prcreate -i"frosts" -n"FrostS" -l"Frost Shield" -u"You see a frosty blue-white shield fade into existance around you." -d"Your frosty blue-white shield fades out." +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;; Unstun (NS) +/set stun_st=off + +/def -i -F -aCgreen -mregexp -t"^[A-Z][A-Za-z]+\'s chanting appears to do absolutely nothing.$" rec_unstun_on =\ + /pron unstun%;/set prot_unstun_w=0 + +;/def -i -F -aCgreen -msimple -t"You feel no longer protected from being stunned." rec_unstun_off = /proff unstun + +/def -i -F -aCgreen -msimple -t"You are STUNNED." stun_start =\ + /set stun_st=on%;/proff unstun + +/def -i -F -aCgreen -E({stun_st}=~"on") -msimple -t"You are no longer stunned." stun_end =\ + /set stun_st=off%;/msr No longer stunned + +/def -i -F -aCgreen -msimple -t"It doesn't hurt as much as it normally does!" stun_nohurt =\ + /proff unstun + +/def -i -F -aCgreen -msimple -t"It doesn't hurt at all!" stun_notall =\ + /set prot_unstun_w=$[prot_unstun_w + 1]%;\ + /msr Unstun weakened [#%{prot_unstun_w}] + + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Form the "current prots" strings /def -i prots_doget =\ /while ({#})\ @@ -650,29 +676,6 @@ ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -;; Unstun (NS) -/set stun_st=off - -/def -i -F -aCgreen -mregexp -t"^[A-Z][A-Za-z]+\'s chanting appears to do absolutely nothing.$" rec_unstun_on =\ - /pron unstun%;/set prot_unstun_w=0 - -;/def -i -F -aCgreen -msimple -t"You feel no longer protected from being stunned." rec_unstun_off = /proff unstun - -/def -i -F -aCgreen -msimple -t"You are STUNNED." stun_start =\ - /set stun_st=on%;/proff unstun - -/def -i -F -aCgreen -E({stun_st}=~"on") -msimple -t"You are no longer stunned." stun_end =\ - /set stun_st=off%;/msr No longer stunned - -/def -i -F -aCgreen -msimple -t"It doesn't hurt as much as it normally does!" stun_nohurt =\ - /proff unstun - -/def -i -F -aCgreen -msimple -t"It doesn't hurt at all!" stun_notall =\ - /set prot_unstun_w=$[prot_unstun_w + 1]%;\ - /msr Unstun weakened [#%{prot_unstun_w}] - - -;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Skill and skill-status reporting ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Start of skill