16 lines
522 B
Plaintext
16 lines
522 B
Plaintext
//::///////////////////////////////////////////////
|
|
//:: FileName pro_take_50gp
|
|
//:://////////////////////////////////////////////
|
|
//:://////////////////////////////////////////////
|
|
//:: Created By: Script Wizard
|
|
//:: Created On: 12/07/2003 16:00:22
|
|
//:://////////////////////////////////////////////
|
|
void main()
|
|
{
|
|
|
|
// Remove some gold from the player
|
|
TakeGoldFromCreature(1000, GetPCSpeaker(), TRUE);
|
|
SetLocked(GetObjectByTag("TunnelTollDoor"), FALSE);
|
|
ActionOpenDoor(GetObjectByTag("TunnelTollDoor"));
|
|
}
|