Initial commit

Adding all of the current content for Anphillia Unlimited.

_module/nss/cnr_tree_ondam.nss

@@ -0,0 +1,69 @@
+/////////////////////////////////////////////////////////
+//
+//  Craftable Natural Resources (CNR) by Festyx
+//
+//  Name:  cnr_tree_ondam
+//
+//  Desc:  When a tree is beaten, wood is produced.
+//
+//  Author: David Bobeck 26Jan03
+//
+/////////////////////////////////////////////////////////
+#include "cnr_language_inc"
+#include "cnr_config_inc"
+
+void SpawnNewTree(string sTreeTag, location locTree)
+{
+  CreateObject(OBJECT_TYPE_PLACEABLE, sTreeTag, locTree);
+  DestroyObject(OBJECT_SELF);
+}
+
+void main()
+{
+  object oDamager = GetLastDamager();
+  location locTree = GetLocation(OBJECT_SELF);
+  string sTreeTag = GetTag(OBJECT_SELF);
+
+  if (!GetIsObjectValid(oDamager) || !GetIsPC(oDamager))
+  {
+    return;
+  }
+
+  if (GetLocalInt(OBJECT_SELF, "CnrDamageBelowThreshold"))
+  {
+    return;
+  }
+
+  // the tree starts with 100 hit points or more
+  if (GetCurrentHitPoints() < 80)
+  {
+    SetLocalInt(OBJECT_SELF, "CnrDamageBelowThreshold", TRUE);
+
+    // Create a branch and have the PC pick it up.
+    string sBranchTag = GetLocalString(GetModule(), sTreeTag + "_BranchTag");
+    if (sBranchTag != "")
+    {
+      object oBranch = CreateObject(OBJECT_TYPE_ITEM, sBranchTag, GetLocation(oDamager));
+      FloatingTextStringOnCreature(CNR_TEXT_YOU_HAVE_CHOPPED_OFF_A + GetName(oBranch) + "!", oDamager);
+      AssignCommand(GetLastDamager(), ActionPickUpItem(oBranch));
+    }
+
+    // Sometimes the tree will get used up
+    if (cnr_d100(1) <= CNR_FLOAT_WOOD_MINING_TREE_BREAKAGE_PERCENTAGE)
+    {
+      if (CNR_FLOAT_WOOD_MINING_TREE_RESPAWN_TIME_SECS > 0.0)
+      {
+        ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDeath(), OBJECT_SELF);
+        object oSpawner = CreateObject(OBJECT_TYPE_PLACEABLE, "cnrobjectspawner", locTree);
+        AssignCommand(oSpawner, DelayCommand(CNR_FLOAT_WOOD_MINING_TREE_RESPAWN_TIME_SECS, SpawnNewTree(sTreeTag, locTree)));
+        DestroyObject(OBJECT_SELF, 2.0); // provide time for death effect
+        FloatingTextStringOnCreature(CNR_TEXT_THATS_THE_END_OF_THAT, oDamager);
+      }
+      return;
+    }
+
+    // Create a new tree with full hitpoints
+    DestroyObject(OBJECT_SELF);
+    CreateObject(OBJECT_TYPE_PLACEABLE, sTreeTag, locTree);
+  }
+}