CODE: spell-subjugated transport

From: ironfist (ironfist@texas.net)
Date: 04/06/01


This spell summons all of a characters charmed followers, fairly
straight-forward I hope =) It could be modified to summon all followers
by taking out the CHARM check.


in spells.h

#define SPELL_SUBJUGATED_TRANS  112

also in spells.h under the define for MANUAL_SPELL

ASPELL(spell_subjugated_trans);

in spells.c


ASPELL(spell_subjugated_trans)
{
  struct follow_type *f;

  for (f = ch->followers; f; f = f->next) {
    if (IS_NPC(f->follower) && AFF_FLAGGED(f->follower, AFF_CHARM)) {
      act("$n disappears suddenly.", TRUE, f->follower, 0, 0, TO_ROOM);
      char_from_room(f->follower);
      char_to_room(f->follower, ch->in_room);
      act("$n arrives suddenly.", TRUE, f->follower, 0, 0, TO_ROOM);
      act("$n has transported you!", FALSE, ch, 0, f->follower,
TO_VICT);
      look_at_room(f->follower, 0);
    }
  }
}

in spell_parser.c in call_magic with the other manual functions...

case SPELL_SUBJUGATED_TRANS: MANUAL_SPELL(spell_subjugated_trans);
break;

in spell_parser.c in the spello function

spello(SPELL_SUBJUGATED_TRANS, "subjugated transport", 100, 50, 5,
POS_STANDING,
     TAR_IGNORE, FALSE, MAG_MANUAL,
     NULL);


R.M.
strife.betterbox.net 4100
ironfist@texas.net

--
   +---------------------------------------------------------------+
   | FAQ: http://qsilver.queensu.ca/~fletchra/Circle/list-faq.html |
   | Archives: http://post.queensu.ca/listserv/wwwarch/circle.html |
   +---------------------------------------------------------------+



This archive was generated by hypermail 2b30 : 12/05/01 PST