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.
26 lines
934 B
Plaintext
26 lines
934 B
Plaintext
//::///////////////////////////////////////////////
|
|
//:: FileName fr_take_ar
|
|
//:://////////////////////////////////////////////
|
|
//:://////////////////////////////////////////////
|
|
//:: Created By: Script Wizard
|
|
//:: Created On: 20.12.2002 20:34:00
|
|
//:://////////////////////////////////////////////
|
|
void main()
|
|
{
|
|
|
|
// Remove some gold from the player
|
|
TakeGoldFromCreature(500, GetPCSpeaker(), TRUE);
|
|
|
|
// Remove items from the player's inventory
|
|
object oItemToTake;
|
|
oItemToTake = GetItemPossessedBy(GetPCSpeaker(), "fr_elfscroll01");
|
|
if(GetIsObjectValid(oItemToTake) != 0)
|
|
DestroyObject(oItemToTake);
|
|
oItemToTake = GetItemPossessedBy(GetPCSpeaker(), "fr_elfscroll02");
|
|
if(GetIsObjectValid(oItemToTake) != 0)
|
|
DestroyObject(oItemToTake);
|
|
oItemToTake = GetItemPossessedBy(GetPCSpeaker(), "fr_elfscroll03");
|
|
if(GetIsObjectValid(oItemToTake) != 0)
|
|
DestroyObject(oItemToTake);
|
|
}
|