Initial commit
Initial commit.
This commit is contained in:
127
_module/nss/spawn.nss
Normal file
127
_module/nss/spawn.nss
Normal file
@@ -0,0 +1,127 @@
|
||||
void main()
|
||||
{
|
||||
object oPC = GetEnteringObject();
|
||||
int iLevel = GetHitDice(oPC);
|
||||
if (iLevel>20) iLevel=20;
|
||||
string sLevel = IntToString(iLevel);
|
||||
string sMytag;
|
||||
int iType;
|
||||
location lMyloc;
|
||||
int iNum;
|
||||
string sNum;
|
||||
string sPtag;
|
||||
int iSix;
|
||||
string sSix;
|
||||
if (GetIsPC(oPC) != TRUE) return;
|
||||
|
||||
object oSpawn = GetFirstObjectInArea(OBJECT_SELF);
|
||||
//SendMessageToPC(oPC,"get first wp");
|
||||
int iSpawn = GetLocalInt(oSpawn,"done");
|
||||
int iKind = GetObjectType(oSpawn);
|
||||
|
||||
|
||||
while (oSpawn != OBJECT_INVALID)
|
||||
{
|
||||
int iKind = GetObjectType(oSpawn);
|
||||
if (iSpawn != 1 && iKind == OBJECT_TYPE_WAYPOINT)
|
||||
{
|
||||
string sWTF = GetTag(oSpawn);
|
||||
//SendMessageToPC(oPC,"tag is "+sWTF);
|
||||
SetLocalInt(oSpawn,"done",1);
|
||||
//SendMessageToPC(oPC,"spawning stuff");
|
||||
sMytag = GetTag(oSpawn)+sLevel;
|
||||
sPtag = GetTag(oSpawn);
|
||||
iType = StringToInt(GetStringLeft(sMytag,1));
|
||||
lMyloc = GetLocation(oSpawn);
|
||||
iNum = d10(1);
|
||||
sNum = IntToString(Random(40)+1);
|
||||
iSix = d6();
|
||||
sSix = IntToString(iSix);
|
||||
switch (iType)
|
||||
{
|
||||
case 1:
|
||||
switch (iNum)
|
||||
{
|
||||
case 1:
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"m",lMyloc);
|
||||
break;
|
||||
case 2:
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"m",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"m",lMyloc);
|
||||
break;
|
||||
case 3:
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"m",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"m",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"m",lMyloc);
|
||||
break;
|
||||
case 4:
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
break;
|
||||
case 5:
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
break;
|
||||
case 6:
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
break;
|
||||
case 7:
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h_alt",lMyloc);
|
||||
break;
|
||||
case 8:
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h_alt",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h_alt",lMyloc);
|
||||
break;
|
||||
case 9:
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h_alt",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h_alt",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h_alt",lMyloc);
|
||||
break;
|
||||
case 10:
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h_alt",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h_alt",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"h_alt",lMyloc);
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sMytag+"b",lMyloc);
|
||||
break;
|
||||
}
|
||||
//CreateObject(OBJECT_TYPE_CREATURE,sMytag,lMyloc);
|
||||
break;
|
||||
case 2:
|
||||
CreateObject(OBJECT_TYPE_PLACEABLE,sPtag+sNum,lMyloc);//interactive placeables
|
||||
break;
|
||||
case 3:
|
||||
CreateObject(OBJECT_TYPE_PLACEABLE,sPtag+sNum,lMyloc);//mundane placeables
|
||||
break;
|
||||
case 4:
|
||||
CreateObject(OBJECT_TYPE_ITEM,sMytag+"_"+sSix,lMyloc);//loose items
|
||||
break;
|
||||
case 5:
|
||||
CreateObject(OBJECT_TYPE_CREATURE,sPtag+sNum,lMyloc);//special encounters
|
||||
break;
|
||||
case 6:
|
||||
CreateObject(OBJECT_TYPE_PLACEABLE,sMytag,lMyloc);//treasure chests
|
||||
break;
|
||||
}
|
||||
|
||||
}
|
||||
oSpawn = GetNextObjectInArea(OBJECT_SELF);
|
||||
iSpawn = GetLocalInt(oSpawn,"done");
|
||||
//SendMessageToPC(oPC,"get next wp");
|
||||
|
||||
}
|
||||
|
||||
|
||||
}
|
||||
Reference in New Issue
Block a user