129 lines
3.1 KiB
Plaintext
129 lines
3.1 KiB
Plaintext
#include "nw_i0_2q4luskan"
|
|
#include "nw_i0_generic"
|
|
/* Script generated by
|
|
Lilac Soul's NWN Script Generator, v. 1.6
|
|
|
|
For download info, please visit:
|
|
http://www.lilacsoul.revility.com */
|
|
|
|
//Put this OnEnter
|
|
void main()
|
|
{
|
|
|
|
object oPC = GetEnteringObject();
|
|
|
|
if (!GetIsPC(oPC)) return;
|
|
|
|
object oTarget;
|
|
object oTarget1;
|
|
object oSpawn;
|
|
location lTarget;
|
|
oTarget = GetWaypointByTag("ke_planteangreb");
|
|
|
|
oTarget1 = GetObjectByTag("ke_plantedoor");
|
|
|
|
AssignCommand(oTarget1, ActionCloseDoor(oTarget1));
|
|
|
|
// SetLocked(oTarget1, TRUE);
|
|
|
|
// Removing the intire teleport group concept....
|
|
|
|
// object oTarget2;
|
|
// location lTarget2;
|
|
// oTarget2 = GetWaypointByTag("ke_planteteleport");
|
|
|
|
// lTarget2 = GetLocation(oTarget2);
|
|
|
|
//only do the jump if the location is valid.
|
|
//though not flawless, we just check if it is in a valid area.
|
|
//the script will stop if the location isn't valid - meaning that
|
|
//nothing put after the teleport will fire either.
|
|
//the current location won't be stored, either
|
|
|
|
// if (GetAreaFromLocation(lTarget2)==OBJECT_INVALID) return;
|
|
|
|
// oTarget2=GetFirstFactionMember(oPC, FALSE);
|
|
|
|
// while (GetIsObjectValid(oTarget2))
|
|
// {
|
|
// AssignCommand(oTarget2, ClearAllActions());
|
|
|
|
// AssignCommand(oTarget2, ActionJumpToLocation(lTarget2));
|
|
// oTarget2=GetNextFactionMember(oPC, FALSE);
|
|
// }
|
|
// ANd returning to the normal spawn sequence again
|
|
lTarget = GetLocation(oTarget);
|
|
|
|
oSpawn = CreateObject(OBJECT_TYPE_CREATURE, "zep_vegepygmy001", lTarget);
|
|
|
|
oTarget = oSpawn;
|
|
|
|
SetIsTemporaryEnemy(oPC, oTarget);
|
|
|
|
AssignCommand(oTarget, ActionAttack(oPC));
|
|
|
|
AssignCommand(oTarget, DetermineCombatRound(oPC));
|
|
|
|
oTarget = GetWaypointByTag("ke_planteangreb");
|
|
|
|
lTarget = GetLocation(oTarget);
|
|
|
|
DelayCommand(10.0, CreateObjectVoid(OBJECT_TYPE_CREATURE, "zep_vegepygmy001", lTarget));
|
|
|
|
oTarget = GetWaypointByTag("ke_planteangreb");
|
|
|
|
lTarget = GetLocation(oTarget);
|
|
|
|
DelayCommand(10.0, CreateObjectVoid(OBJECT_TYPE_CREATURE, "zep_vegepygmy001", lTarget));
|
|
|
|
oTarget = GetWaypointByTag("ke_planteangeb");
|
|
|
|
lTarget = GetLocation(oTarget);
|
|
|
|
DelayCommand(30.0, CreateObjectVoid(OBJECT_TYPE_CREATURE, "zep_vegepygmy001", lTarget));
|
|
|
|
oTarget = GetWaypointByTag("ke_planteangreb");
|
|
|
|
lTarget = GetLocation(oTarget);
|
|
|
|
DelayCommand(30.0, CreateObjectVoid(OBJECT_TYPE_CREATURE, "zep_vegepygmy001", lTarget));
|
|
|
|
oTarget = GetWaypointByTag("ke_planteangreb");
|
|
|
|
lTarget = GetLocation(oTarget);
|
|
|
|
DelayCommand(30.0, CreateObjectVoid(OBJECT_TYPE_CREATURE, "zep_vegepygmy001", lTarget));
|
|
|
|
oTarget = GetWaypointByTag("ke_planteangreb");
|
|
|
|
lTarget = GetLocation(oTarget);
|
|
|
|
DelayCommand(50.0, CreateObjectVoid(OBJECT_TYPE_CREATURE, "zep_vegepygmy001", lTarget));
|
|
|
|
oTarget = GetWaypointByTag("ke_planteangreb");
|
|
|
|
lTarget = GetLocation(oTarget);
|
|
|
|
DelayCommand(50.0, CreateObjectVoid(OBJECT_TYPE_CREATURE, "zep_vegepygmy001", lTarget));
|
|
|
|
oTarget = GetWaypointByTag("ke_planteangreb");
|
|
|
|
lTarget = GetLocation(oTarget);
|
|
|
|
DelayCommand(50.0, CreateObjectVoid(OBJECT_TYPE_CREATURE, "zep_vegepygmy001", lTarget));
|
|
|
|
oTarget = GetWaypointByTag("ke_planteangreb");
|
|
|
|
lTarget = GetLocation(oTarget);
|
|
|
|
|
|
//
|
|
|
|
if (d100()>100)
|
|
return;
|
|
|
|
DelayCommand(70.0, CreateObjectVoid(OBJECT_TYPE_CREATURE, "zep_vegepygmy003", lTarget));
|
|
|
|
//
|
|
}
|