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.
23 lines
745 B
Plaintext
23 lines
745 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(7500, GetPCSpeaker(), TRUE);
|
|
|
|
// Remove items from the player's inventory
|
|
object oItemToTake;
|
|
oItemToTake = GetItemPossessedBy(GetPCSpeaker(), "fr_ar_umberhulk");
|
|
if(GetIsObjectValid(oItemToTake) != 0)
|
|
DestroyObject(oItemToTake);
|
|
oItemToTake = GetItemPossessedBy(GetPCSpeaker(), "fr_gr_hide");
|
|
if(GetIsObjectValid(oItemToTake) != 0)
|
|
DestroyObject(oItemToTake);
|
|
}
|