Files
HeroesStone_PRC8/_module/nss/rand_wild.nss
Jaysyn904 1eefc84201 Initial Commit
Initial Commit.
2025-09-14 15:40:46 -04:00

76 lines
4.1 KiB
Plaintext

void main()
{
object self = OBJECT_SELF;
location loc = GetLocation(self);
object new;
DestroyObject(self,0.1);
int r = Random(39)+1;
if (r==1) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_treeautumn",loc);
if (r==2) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_campfrwspit",loc);
if (r==3) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_shrub",loc);
if (r==4) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_stones",loc);
if (r==5) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_pileskulls",loc);
if (r==6) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_butterflies",loc);
if (r==7) new = CreateObject(OBJECT_TYPE_PLACEABLE,"nw_pl_rubble001",loc);
if (r==8) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_statue1",loc);
if (r==9) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_woodpile",loc);
if (r==10) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_tree",loc);
if (r==11) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_headstone",loc);
if (r==12) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_boulder",loc);
if (r==13) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_wagonwheel",loc);
if (r==14) new = CreateObject(OBJECT_TYPE_ITEM,"nw_it_msmlmisc23",loc);
if (r==15) new = CreateObject(OBJECT_TYPE_ITEM,"nw_it_msmlmisc12",loc);
if (r==16) new = CreateObject(OBJECT_TYPE_ITEM,"nw_it_msmlmisc24",loc);
if (r==17) new = CreateObject(OBJECT_TYPE_ITEM,"nw_it_msmlmisc18",loc);
if (r==18)
{new = CreateObject(OBJECT_TYPE_CREATURE,"nw_deer",loc);
ApplyEffectToObject(DURATION_TYPE_PERMANENT,EffectPetrify(),new);
SetPlotFlag(new,TRUE);}
if (r==19) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_garbage",loc);
if (r==20) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_flamemedium",loc);
if (r==21)
{new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_treeautumn",loc);
CreateObject(OBJECT_TYPE_CREATURE,"nw_raven",loc);
CreateObject(OBJECT_TYPE_CREATURE,"nw_raven",loc);
CreateObject(OBJECT_TYPE_CREATURE,"nw_raven",loc);}
if (r==22) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_spdcocoon",loc);
if (r==23) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_campfrwpot",loc);
if (r==24)
{new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_impledhead2",loc);
CreateObject(OBJECT_TYPE_PLACEABLE,"plc_impledhead2",loc);
CreateObject(OBJECT_TYPE_PLACEABLE,"plc_impledhead2",loc);}
if (r==25) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_campfr",loc);
if (r==26) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_dustplume",loc);
if (r==27)
{object dead = CreateObject(OBJECT_TYPE_CREATURE,"nw_bearbrwn",loc);
AssignCommand(dead,SetIsDestroyable(FALSE,TRUE,TRUE));
ApplyEffectToObject(DURATION_TYPE_INSTANT,EffectDeath(),dead);}
if (r==28) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_catplt",loc);
if (r==29) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_catpltbrk",loc);
if (r==30)
{object pet = CreateObject(OBJECT_TYPE_CREATURE,"nw_troll",loc);
ChangeToStandardFaction(pet,STANDARD_FACTION_MERCHANT);
ApplyEffectToObject(DURATION_TYPE_PERMANENT,EffectPetrify(),pet);
SetPlotFlag(pet,TRUE);}
if (r==31)
{object dead = CreateObject(OBJECT_TYPE_CREATURE,"nw_skeleton",loc);
AssignCommand(dead,SetIsDestroyable(FALSE,TRUE,TRUE));
ApplyEffectToObject(DURATION_TYPE_INSTANT,EffectDeath(),dead);}
if (r==32) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_arrowcorpse",loc);
if (r==33)
{new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_impledhead1",loc);
CreateObject(OBJECT_TYPE_PLACEABLE,"plc_impledhead1",loc);
CreateObject(OBJECT_TYPE_PLACEABLE,"plc_impledhead1",loc);}
if (r==34) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_well",loc);
if (r==35) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_grasstuft",loc);
if (r==36)
{new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_headstone",loc);
CreateObject(OBJECT_TYPE_PLACEABLE,"plc_headstone",loc);
CreateObject(OBJECT_TYPE_PLACEABLE,"plc_headstone",loc);}
if (r==37) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_stocks",loc);
if (r==38) ApplyEffectAtLocation(DURATION_TYPE_PERMANENT,EffectAreaOfEffect(AOE_PER_FOGSTINK," "," "," "),loc);
if (r==39) new = CreateObject(OBJECT_TYPE_PLACEABLE,"plc_bones",loc);
AssignCommand(new,SetFacing(1.0+Random(359)));
}