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)));
}