Mercurial > hg > batmud > ggrtf
changeset 297:e11831583981
Added support for spells that cause physical damage.
| author | Matti Hamalainen <ccr@tnsp.org> |
|---|---|
| date | Thu, 02 Mar 2006 00:21:00 +0000 |
| parents | 4658783e4ed2 |
| children | 3daaeb706478 |
| files | ggrtf-magical.tf |
| diffstat | 1 files changed, 4 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/ggrtf-magical.tf Wed Mar 01 20:02:27 2006 +0000 +++ b/ggrtf-magical.tf Thu Mar 02 00:21:00 2006 +0000 @@ -158,7 +158,7 @@ ;; Spell rounds /def -i -p9999 -ag -mregexp -t"^([A-Z][a-z ]+): (#+)$" spell_status1 =\ /set spell_rleft=$[strlen({P2})]%;\ - /echo -p @{Cyellow}%{P1}: %{P2}@{n} [@{BCgreen}%{spell_rleft}@{n}]%;\ + /msw @{Cyellow}%{P1}: %{P2}@{n} [@{BCgreen}%{spell_rleft}@{n}]%;\ /if (spell_rfirst=~"on")\ /set spell_rfirst=off%;\ /set spell_rcount=%{spell_rleft}%;\ @@ -202,11 +202,12 @@ /elseif (regmatch(strcat("^(",gspell_type_cold,")$"),{1})) /return "cold"%;\ /elseif (regmatch(strcat("^(",gspell_type_acid,")$"),{1})) /return "acid"%;\ /elseif (regmatch(strcat("^(",gspell_type_psi,")$"),{1})) /return "psi"%;\ + /elseif (regmatch(strcat("^(",gspell_type_phys,")$"),{1})) /return "phys"%;\ /else /return "???"%;/endif /def -i prspellhit=\ /set resist_spell=%{1}%;/test gbattle_settarget({2})%;\ - /echo -p @{BCcyan}Your@{n} [@{Cred}%{1}@{n}] @{BCcyan}hits@{n} [@{BCgreen}%{2}@{n}] + /msw @{BCcyan}Your@{n} [@{Cred}%{1}@{n}] @{BCcyan}hits@{n} [@{BCgreen}%{2}@{n}] /def -i prspresist =\ @@ -219,7 +220,7 @@ /else /let resist_str=???%; /let resist_val=???%; /let resist_col=@{Cwhite}%;\ /endif%;\ /let resist_type=$[prgetspelltype(resist_spell)]%;\ - /echo -p [@{BCyellow}%{2}@{n}] %{resist_col}%{resist_str}@{n} @{BCcyan}%{resist_type}@{n} (@{BCwhite}%{resist_val}%%@{n} resist)%;\ + /msw [@{BCyellow}%{2}@{n}] %{resist_col}%{resist_str}@{n} @{BCcyan}%{resist_type}@{n} (@{BCwhite}%{resist_val}%%@{n} resist)%;\ /if (opt_rresist=~"on")\ /msr [%{2}] %{resist_val}%% %{resist_type} resist%;\ /endif