16 lines
545 B
Plaintext
16 lines
545 B
Plaintext
|
// vamp_act_edrain
|
||
|
|
#include "vampire_header"
|
||
|
|
void main()
|
||
|
|
{
|
||
|
|
object oPC=GetPCSpeaker();
|
||
|
|
if (!GetIsObjectValid(oPC)) oPC=OBJECT_SELF;
|
||
|
|
int nBlood=GetLocalInt(oPC,"nBloodPool");
|
||
|
|
object oT=GetLocalObject(oPC,"oTarget");
|
||
|
|
nBlood=nBlood-40;
|
||
|
|
SetLocalInt(oPC,"nBloodPool",nBlood);
|
||
|
|
AssignCommand(oPC,ClearAllActions(TRUE));
|
||
|
|
AssignCommand(oPC,ActionCastSpellAtObject(SPELL_ENERGY_DRAIN,oT,METAMAGIC_ANY,TRUE));
|
||
|
|
fnGiveVampXP(oPC,75);
|
||
|
|
SendMessageToPC(oPC,"You used 40 blood to cast energy drain on "+GetName(oT)+".");
|
||
|
|
}
|