7b9e44ebbb
Initial upload. PRC8 has been added. Module compiles, PRC's default AI & treasure scripts have been integrated. Started work on top hak for SLA / Ability / Scripting modifications.
28 lines
824 B
Plaintext
28 lines
824 B
Plaintext
//::///////////////////////////////////////////////
|
|
//:: x1_act_harper2
|
|
//:: Copyright (c) 2001 Bioware Corp.
|
|
//:://////////////////////////////////////////////
|
|
/*
|
|
Creates the Aura of Glory.
|
|
Take the gold and experience.
|
|
*/
|
|
//:://////////////////////////////////////////////
|
|
//:: Created By: Brent
|
|
//:: Created On:
|
|
//:://////////////////////////////////////////////
|
|
|
|
void main()
|
|
{
|
|
object oHerb=GetItemPossessedBy(GetPCSpeaker(),"jw_harpherb1");
|
|
if (GetIsObjectValid(oHerb))
|
|
{
|
|
DestroyObject(oHerb);
|
|
}
|
|
CreateItemOnObject("jw_harpot_1", GetPCSpeaker());
|
|
TakeGoldFromCreature(200, GetPCSpeaker(), TRUE);
|
|
SetXP(GetPCSpeaker(), GetXP(GetPCSpeaker()) - 28);
|
|
effect eVis = EffectVisualEffect(VFX_IMP_HEAD_ODD);
|
|
ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, GetPCSpeaker());
|
|
|
|
}
|