# HG changeset patch # User Matti Hamalainen # Date 1127825103 0 # Node ID 3cfb24dca78d0b608dd273bd9bdde7c1d12788c7 # Parent f2d0d922596b268abaeb937bcf3da67c3de5e804 Comments, moving bits around to reorganize for cleaner look diff -r f2d0d922596b -r 3cfb24dca78d ggrtf.tf --- 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