NWScript:

//::///////////////////////////////////////////////

//:: Name - Useable Combat Dummy

//:: FileName - pl_cd_training

//:://////////////////////////////////////////////

/*

This script goes into the OnDamaged handler of a combat dummy and allows a PC

to gain XP for attacking the dummy.  The amount of XP that a PC is given is

controlled by the value of "iReward".  The cost of training is dependant upon

the PC level and is controlled by the iCost variable.  The combat dummy should

be set as a PLOT object if you do not want it destroyed.

*/

//:://////////////////////////////////////////////

void main()

{

object oPC = GetLastDamager();

int iGold = GetGold(oPC);

int iReward = 5;  //Sets the amount of XP to give the PC

int iLevel1 = GetLevelByPosition(1, oPC);

int iLevel2 = GetLevelByPosition(2, oPC);

int iLevel3 = GetLevelByPosition(3, oPC);

int iCharLevel = (iLevel1 + iLevel2 + iLevel3);

int iCost =  iCharLevel * 5; //Sets the training cost.  Training is equal to PC level times 5.

ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectRegenerate(10, 3.0f), OBJECT_SELF, 300.0f);

if (iGold >= iCost){

    GiveXPToCreature(oPC, iReward);

    TakeGoldFromCreature(iCost, oPC, TRUE);}

else

    SendMessageToPC(oPC, "You do not have enough money to train.");

}