From: Phil Jensen - Network Administrator <phil@qnis.net>
Subject: 'Gate Demon' spell

Good morning:
I took the DO_SUMMON routine, and the skeletal code from Jedi, and wrote
my own gate spell.  Here's what I have: 

#define MOB_DEMON       50

In your switch statement where you have an animate dead skeleton at,
(magic.c, line 897):

struct char_data *mob = NULL;

case SPELL_GATE: 
  send_to_room("You gasp in awe as a huge demon steps from a portal above you.\r\n", ch->in_room);
  send_to_char("You wave your arms around, conjuring a huge portal from which a demon steps out.\r\n", ch);
  mob_num = MOB_DEMON;
  mob = read_mobile(mob_num, VIRTUAL);
  char_to_room(ch, ch->in_room);
  IS_CARRYING_W(mob) = 0;
  IS_CARRYING_N(mob) = 0;
  SET_BIT(AFF_FLAG(mob), AFF_CHARM);
  add_follower(mob, ch);
  return;

You've probably already written a few of these already, but since this 
was one of the harder spells I've written, I thought I'd share it with 
you.  

Phil

