|
|
@@ -190,6 +190,7 @@ if $ARGS[0] = 'regenerate':
|
|
|
msg '<b><font color = <<$SplTxtColGood>>>Your body surges with life. You feel better already.</font></b>'
|
|
|
killvar 'regenVal'
|
|
|
killvar 'regenArrIdx'
|
|
|
+ gs 'stat'
|
|
|
else
|
|
|
msg '<b><font color="red">The spell fizzles. Nothing seems to happen.</b>'
|
|
|
end
|
|
|
@@ -199,6 +200,7 @@ if $ARGS[0] = 'painblock':
|
|
|
if SuccessValue > 0:
|
|
|
pain['killer'] = 1
|
|
|
msg '<b><font color = <<$SplTxtColGood>>>Your pain recedes into a dull throb.</font></b>'
|
|
|
+ gs 'stat'
|
|
|
else
|
|
|
msg '<b><font color="red">The spell fizzles. Nothing seems to happen.</b>'
|
|
|
end
|
|
|
@@ -222,6 +224,7 @@ if $ARGS[0] = 'curedisease':
|
|
|
! You do not feel good
|
|
|
pcs_mood -= 30
|
|
|
msg '<b><font color = <<$SplTxtColGood>>>You burst into a high fever. You feel terrible, but you know you are now healthy.</font></b>'
|
|
|
+ gs 'stat'
|
|
|
else
|
|
|
msg '<b><font color="red">The spell fizzles. Nothing seems to happen.</b>'
|
|
|
end
|
|
|
@@ -233,6 +236,7 @@ if $ARGS[0] = 'curewounds':
|
|
|
gs 'medical_din','healthTreatment'
|
|
|
gs 'medical_din','healthTreatment'
|
|
|
msg '<b><font color = <<$SplTxtColGood>>>You feel yourself coursing with life. You feel better already.</font></b>'
|
|
|
+ gs 'stat'
|
|
|
else
|
|
|
msg '<b><font color="red">The spell fizzles. Nothing seems to happen.</b>'
|
|
|
end
|
|
|
@@ -248,6 +252,7 @@ if $ARGS[0] = 'curewounds2':
|
|
|
killvar 'spankedtime'
|
|
|
pcs_health = pcs_vital * 10 + pcs_stren * 5 + 1000
|
|
|
msg '<b><font color = <<$SplTxtColGood>>>You feel yourself coursing with life. All pain is gone.</font></b>'
|
|
|
+ gs 'stat'
|
|
|
else
|
|
|
msg '<b><font color="red">The spell fizzles. Nothing seems to happen.</b>'
|
|
|
end
|
|
|
@@ -296,6 +301,7 @@ if $ARGS[0] = 'berserk':
|
|
|
gs 'spellTimer', 'add', 'berserk', 120, $berserkCode, ''
|
|
|
end
|
|
|
msg '<b><font color = <<$SplTxtColGood>>>You feel a huge adrenalin surge. You begin looking for someone to battle.</font></b>'
|
|
|
+ gs 'stat'
|
|
|
else
|
|
|
msg '<b><font color="red">The spell fizzles. Nothing seems to happen.</b>'
|
|
|
end
|
|
|
@@ -314,6 +320,7 @@ if $ARGS[0] = 'shower':
|
|
|
! Brush Teeth
|
|
|
pcs_breath = 1
|
|
|
msg '<b><font color = <<$SplTxtColGood>>>You feel clean and refreshed.</font></b>'
|
|
|
+ gs 'stat'
|
|
|
else
|
|
|
msg '<b><font color="red">The spell fizzles. Nothing seems to happen.</b>'
|
|
|
end
|
|
|
@@ -330,6 +337,7 @@ if $ARGS[0] = 'glamour':
|
|
|
! TickCode = '' Do nothing
|
|
|
gs 'spellTimer', 'add', 'glamour', 120, 'pcs_apprncbase -= 150', ''
|
|
|
msg '<b><font color = <<$SplTxtColGood>>>You feel gorgeous. People will love you.</font></b>'
|
|
|
+ gs 'stat'
|
|
|
else
|
|
|
msg '<b><font color="red">The spell fizzles. Nothing seems to happen.</b>'
|
|
|
end
|
|
|
@@ -340,6 +348,7 @@ if $ARGS[0] = 'alterself':
|
|
|
! Stop Reputation accumulation.
|
|
|
!TODO
|
|
|
msg '<b><font color = <<$SplTxtColGood>>>Your features change. Your own mother wouldn''t recognize you.</font></b>'
|
|
|
+ gs 'stat'
|
|
|
else
|
|
|
msg '<b><font color="red">The spell fizzles. Nothing seems to happen.</b>'
|
|
|
end
|
|
|
@@ -371,6 +380,7 @@ if $ARGS[0] = 'makeup':
|
|
|
killvar 'MakeupArg'
|
|
|
killvar '$MakeupArg'
|
|
|
msg '<b><font color = <<$SplTxtColGood>>>Makeup is applied to your face.</font></b>'
|
|
|
+ gs 'stat'
|
|
|
else
|
|
|
msg '<b><font color="red">The spell fizzles. Nothing seems to happen.</b>'
|
|
|
end
|
|
|
@@ -415,6 +425,7 @@ if $ARGS[0] = 'cosmetica':
|
|
|
end
|
|
|
end
|
|
|
msg '<b><font color = <<$SplTxtColGood>>>You feel beautiful.</font></b>'
|
|
|
+ gs 'stat'
|
|
|
else
|
|
|
msg '<b><font color="red">The spell fizzles. Nothing seems to happen.</b>'
|
|
|
end
|
