15 lines
501 B
Plaintext
15 lines
501 B
Plaintext
//::///////////////////////////////////////////////
|
|
//:: FileName at_givewine
|
|
//:://////////////////////////////////////////////
|
|
//:://////////////////////////////////////////////
|
|
//:: Created By: Script Wizard
|
|
//:: Created On: 10/10/2002 2:29:02 AM
|
|
//:://////////////////////////////////////////////
|
|
void main()
|
|
{
|
|
// Give the speaker the items
|
|
CreateItemOnObject("nw_it_mpotion023", GetPCSpeaker(), 1);
|
|
// Remove some gold from the player
|
|
TakeGoldFromCreature(20, GetPCSpeaker(), TRUE);
|
|
}
|