31 lines
835 B
Plaintext
31 lines
835 B
Plaintext
|
//::///////////////////////////////////////////////
|
||
|
|
//:: FileName jw_ogre_500
|
||
|
|
//:://////////////////////////////////////////////
|
||
|
|
//:://////////////////////////////////////////////
|
||
|
|
//:: Created By: Script Wizard
|
||
|
|
//:: Created On: 21/08/2002 23:14:46
|
||
|
|
//:://////////////////////////////////////////////
|
||
|
|
#include "nw_i0_tool"
|
||
|
|
|
||
|
|
|
||
|
|
void main()
|
||
|
|
{
|
||
|
|
|
||
|
|
object oPC=GetPCSpeaker();
|
||
|
|
|
||
|
|
object oPartyMember = GetFirstFactionMember(oPC, TRUE);
|
||
|
|
while (GetIsObjectValid(oPartyMember) == TRUE)
|
||
|
|
{
|
||
|
|
if (GetArea(oPartyMember)==GetArea(OBJECT_SELF))
|
||
|
|
{
|
||
|
|
CreateItemOnObject("jw_ogre_amulet", oPartyMember, 1);
|
||
|
|
}
|
||
|
|
oPartyMember = GetNextFactionMember(oPC, TRUE);
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
// Remove some gold from the player
|
||
|
|
TakeGoldFromCreature(500, GetPCSpeaker(), TRUE);
|
||
|
|
}
|