/*************************************************************************** * Original Diku Mud copyright (C) 1990, 1991 by Sebastian Hammer, * * Michael Seifert, Hans Henrik St{rfeldt, Tom Madsen, and Katja Nyboe. * * * * Merc Diku Mud improvments copyright (C) 1992, 1993 by Michael * * Chastain, Michael Quan, and Mitchell Tse. * * * * Envy Diku Mud improvements copyright (C) 1994 by Michael Quan, David * * Love, Guilherme 'Willie' Arnold, and Mitchell Tse. * * * * In order to use any part of this Envy Diku Msud, you must comply with * * the original Diku license in 'license.doc', the Merc license in * * 'license.txt', as well as the Envy license in 'license.nvy'. * * In particular, you may not remove either of these copyright notices. * * * * Much time and thought has gone into this software and you are * * benefitting. We hope that you share your changes too. What goes * * around, comes around. * ***************************************************************************/ /*$Id: cls_mag.c,v 1.3 2005/03/10 14:54:58 tyrion Exp $*/ #if defined( macintosh ) #include <types.h> #else #include <sys/types.h> #endif #include <stdio.h> #include <time.h> #include "merc.h" int spell_mana_shield( int sn, int level, CHAR_DATA *ch, void *vo ) { CHAR_DATA *victim = (CHAR_DATA *) vo; AFFECT_DATA af; int gain; if ( IS_AFFECTED3( victim, AFF_MANA_SHIELD ) ) return SKPELL_MISSED; if(victim->class == CLASS_VAMPIRE || victim->class == CLASS_ANTI_PALADIN ) { send_to_char(AT_WHITE, "You do not use mana and this spell is useless to you.\n\r", victim ); return SKPELL_MISSED; } gain = victim->max_mana-150; if( gain > victim->level * 40 ) { gain = victim->level * 40; } if ( ch->level >= skill_table[sn].skill_level[ch->class ] ) { if( ch->mana + MANA_COST( ch, sn ) < gain * 1.5 + 1 ) { send_to_char(AT_WHITE, "You do not have enough mana to form the shield.\n\r", victim ); return SKPELL_MISSED; } } if ( ch->level >= skill_table[sn].skill_level[ch->multied ] ) { if( ch->mana + MANA_COST_MULTI( ch, sn ) < gain * 1.5 + 1 ) { send_to_char(AT_WHITE, "You do not have enough mana to form the shield.\n\r", victim ); return SKPELL_MISSED; } } af.type = sn; af.level = level; af.duration = number_fuzzy( level / 2 ); af.location = APPLY_HIT; af.modifier = gain; af.bitvector = AFF_MANA_SHIELD; affect_to_char3( victim, &af ); af.location = APPLY_MANA; af.modifier = (int) (gain * -1.5); affect_to_char( victim, &af ); victim->mana -= (int) (gain * 1.5); send_to_char(AT_WHITE, "A pearly white ball appears above your head.\n\r", victim ); act(AT_WHITE, "A pearly white ball appears above $n's head.", victim, NULL, NULL, TO_ROOM ); return SKPELL_NO_DAMAGE; }