Clear out experimental .35 files
Clear out experimental .35 files
This commit is contained in:
@@ -1,62 +0,0 @@
|
||||
//::///////////////////////////////////////////////
|
||||
//:: FileName pnp_lich_csgem
|
||||
//:://////////////////////////////////////////////
|
||||
//:://////////////////////////////////////////////
|
||||
//:: Created By: Script Wizard
|
||||
//:: Created On: 1/24/2004 9:39:35 AM
|
||||
//:://////////////////////////////////////////////
|
||||
#include "prc_alterations"
|
||||
#include "pnp_lich_inc"
|
||||
|
||||
void PrcFeats(object oPC)
|
||||
{
|
||||
object oSkin = GetPCSkin(oPC);
|
||||
ScrubPCSkin(oPC, oSkin);
|
||||
DeletePRCLocalInts(oSkin);
|
||||
DeletePRCLocalIntsT(oPC);
|
||||
EvalPRCFeats(oPC);
|
||||
}
|
||||
|
||||
// Crafts the soul gem
|
||||
void main()
|
||||
{
|
||||
object oPC = GetPCSpeaker();
|
||||
|
||||
// Make sure the PC has enough gold
|
||||
if (!GetHasGPToSpend(oPC, 120000))
|
||||
{
|
||||
FloatingTextStringOnCreature("You do not have enough gold to craft the soul gem", oPC);
|
||||
return;
|
||||
}
|
||||
// -------------------------------------------------------------------------
|
||||
// check for sufficient XP to create
|
||||
// -------------------------------------------------------------------------
|
||||
if (!GetHasXPToSpend(oPC, 4800))
|
||||
{
|
||||
FloatingTextStrRefOnCreature(3785, oPC); // Item Creation Failed - Not enough XP
|
||||
return;
|
||||
}
|
||||
// Allow the pc to get lich levels
|
||||
SetLocalInt(oPC,"PNP_AllowLich", 0);
|
||||
|
||||
|
||||
// Remove some gold from the player
|
||||
SpendGP(oPC, 120000);
|
||||
|
||||
// Remove some xp from the player
|
||||
SpendXP(oPC, 4800);
|
||||
|
||||
// do some VFX
|
||||
CraftVFX(OBJECT_SELF);
|
||||
|
||||
// Soul gem creation code
|
||||
object oSoulGem = CreateItemOnObject("soul_gem",oPC);
|
||||
itemproperty iProp = ItemPropertyCastSpell(851,IP_CONST_CASTSPELL_NUMUSES_1_USE_PER_DAY);
|
||||
AddItemProperty(DURATION_TYPE_PERMANENT,iProp,oSoulGem);
|
||||
|
||||
// Trigger the level up lich check
|
||||
// - This won't reset the PC hide... so let it be handled by the rest event.
|
||||
//DelayCommand(0.1, EvalPRCFeats(oPC));
|
||||
DelayCommand(0.1, PrcFeats(oPC));
|
||||
|
||||
}
|
Reference in New Issue
Block a user