Spec_proc

From: Brett C Helgeson (bhelgeson@csc.Cornell-Iowa.edu)
Date: 02/22/94


	For you coding impaired (like me=) here is the spec_proc.
Maybe I goofed mine up, trying to "improve" it =)...here it is..

SPECIAL(snake)
{
   if (cmd)
      return FALSE;

   if (GET_POS(ch) != POSITION_FIGHTING)
      return FALSE;

   if (ch->specials.fighting &&
       (ch->specials.fighting->in_room == ch->in_room) &&
       (number(0, 42 - GET_LEVEL(ch)) == 0)) {
      act("$n bites $N!", 1, ch, 0, ch->specials.fighting, TO_NOTVICT);
      act("$n bites you!", 1, ch, 0, ch->specials.fighting, TO_VICT);
      cast_poison( GET_LEVEL(ch), ch, "", SPELL_TYPE_SPELL,
          ch->specials.fighting, 0);
      return TRUE;
   }
   return FALSE;
}

 Thats as it is in my spec_procs.c I assume that the 0,42 is the regularity of
the snake poisoning?(like I said, I am coding impaired). Or should this work?
I really want to know, cause I can base all my other spec_procs off this, such
as energy drain for undead =) more poison attacks, medusae,etc,etc,etc. thanks
a bunch... 

Brett@Legends



This archive was generated by hypermail 2b30 : 12/07/00 PST