/* death curse */
  
status death(string spell_type, mixed alt_type) {
  string file;
  int i, cl;
   object targ;
 targ == this_player();

   if(spell_type != "curse") {
    notify_fail("death curse?\n");
    return 0;
  }

  if(!alt_type) alt_type = "necromancy_sphere";
  cl = (objectp(alt_type))
     ? (int)alt_type->query_cast_level()
     : (int)this_player()->query(alt_type);
  
  this_player()->load_spell(({
  "target",    targ,
  "name",              "Death Curse",
  "sphere",            alt_type, 
  "cost",              30,
  "level",             30,
  "cast time",         1,
  "spell object",      "skills/obj/d_curse",
  "damage",            cl,  /* as time */
  "component",         "corpse#skeleton",
  "passive",
  }));
  return 1;
}

/* Native Mode Move */

#include <move.h>