40 lines
731 B
Plaintext
40 lines
731 B
Plaintext
|
//Created by Genisys / Guile 5/20/08
|
||
|
|
|
||
|
|
//Boot all non-guild members instantly out of the area..
|
||
|
|
|
||
|
|
location lTarget;
|
||
|
|
object oTarget;
|
||
|
|
|
||
|
|
//Put this script OnEnter
|
||
|
|
void main()
|
||
|
|
{
|
||
|
|
|
||
|
|
object oPC = GetEnteringObject();
|
||
|
|
|
||
|
|
if (!GetIsPC(oPC)) return;
|
||
|
|
|
||
|
|
if (GetItemPossessedBy(oPC, "guildpass")== OBJECT_INVALID)
|
||
|
|
{
|
||
|
|
oTarget = GetWaypointByTag("home");
|
||
|
|
|
||
|
|
lTarget = GetLocation(oTarget);
|
||
|
|
|
||
|
|
if (GetAreaFromLocation(lTarget)==OBJECT_INVALID)
|
||
|
|
{return;}
|
||
|
|
|
||
|
|
AssignCommand(oPC, ClearAllActions());
|
||
|
|
AssignCommand(oPC, ActionJumpToLocation(lTarget));
|
||
|
|
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
//if they dont' have a guild stone, but do have a guild pass..
|
||
|
|
if(GetItemPossessedBy(oPC, "guildstone")== OBJECT_INVALID)
|
||
|
|
{
|
||
|
|
CreateItemOnObject("guildstone", oPC, 1);
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|