/*    /spells/cure.c
 *    From Nightmare LPMud
 *    Created by Faldir 961101
 *    Version: @(#) cure.c 1.6@(#)
 *    Last modified: %D%
 */

#include <lib.h>
#include <magic.h>
#include <damage_types.h>
#include <magic_protection.h>

inherit LIB_SPELL;

static void create() {
    spell::create();
    SetSpell("cure");
    SetRules("LIV");
    SetSpellType(SPELL_HEALING);
    SetRequiredMagic(300);
    SetSkills(([ "healing" : 30 ]));
    SetMagicCost( 3, 3);
	SetHealing(3,3);
    SetDifficulty(30);
    SetHelp("Syntax: <cast cure on LIV>\n\n"
	    "This powerful healing spell completely heals the"
     " target at great expense to the caster.");
}

int eventCast(object who, int level, mixed limbs, object array targets) {
    object target = targets[0];
    int health,magic,stamina,tot;
    if(!spell::eventCast(who,level,targets)) return 0;
    if( target == who ) {
	who->eventPrint("You can't cast cure on yourself!");
 return 0;
    }
    else {
	send_messages("", "$agent_possessive_noun spell completely heals "
		  "$target_name!",who,
		      target, environment(target));
        health = target->GetMaxHealthPoints()-target->GetHealthPoints();
        magic = target->GetMaxMagicPoints()-target->GetMagicPoints();
        stamina = target->GetMaxStaminaPoints()-target->GetStaminaPoints();
        if(health) target->eventHealDamage(health);
        if(magic) target->AddMagicPoints(magic);
        if(stamina) target->AddStaminaPoints(stamina);
        tot = health+magic+stamina;
        if(tot) 
          who->eventTrainSkill("healing",0,0,1,tot);
        health -= level * 3;
        stamina -= level * 3;
	send_messages("collapse","%^RED%^$agent_name $agent_verb "
			 "from the effort of casting " 
        "such a spell!%^RESET%^", who,
		      0, environment(target));        
        if(health > who->GetHealthPoints()) 
          who->eventReceiveDamage(who,SHOCK,who->GetHealthPoints()-1);
        else who->eventReceiveDamage(who,SHOCK,health);
        who->AddStaminaPoints(-stamina);
        who->AddMagicPoints(-who->GetMagicPoints());
        who->eventForce("lie down");
        who->SetParalyzed(3+random(3));
    }
    return 1;
}