/*Code to punish dumb morts -- Theodryck */ /*You'll have to set up your own declarations in mer.h */ /*Also need to add do_bolt to the command table in interp.c */ /*Add this to act_wiz.c */ void do_bolt( CHAR_DATA * ch, char * argument ) { CHAR_DATA * victim; CHAR_DATA * rch; char arg[MAX_INPUT_LENGTH]; int amnt; argument = one_argument( argument, arg ); rch = get_char( ch ); if ( !authorized( rch, "bolt" ) ) return; if( arg[0] =='\0' ) { send_to_char( "Cast a bolt of energy at who?", ch ); return; } if( argument[0] == '\0' ) { send_to_char( "How hard do you want to bolt them?", ch ); return; } amnt = atoi( argument ); if ( !( victim = get_char_world( ch, arg ) ) ) { send_to_char( "They aren't here.\n\r", ch ); return; } if( amnt >= victim->hit ) { send_to_char( "That would kill them....", ch ); return; } if( victim->fighting ) { send_to_char( "Not while they are fighting", ch ); return; } act( "You send a {o{l{cbolt of lightning{x hurling towards $N!", ch, NULL, victim, TO_CHAR ); act( "$n sends a {o{l{cbolt of lightning{x hurling towards you!", ch, NULL, victim, TO_VICT ); act( "$n sends a {o{l{cbolt of lightning{x streaking towards $N!", ch, NULL, victim, TO_NOTVICT ); damage( ch, victim, amnt, gsn_bolt, WEAR_NONE, DAM_PIERCE ); stop_fighting( ch, TRUE ); /* Ahapin added this */ return; }