/*
 * Losereply code (immortal command)
 *
 *  Written by John Patrick (j.s.patrick@ieee.org)
 *   for Ansalon (ansalon.wolfpaw.net 8679)
 *
 * I'm very big in intellectual property rights.  In order to use
 * this code or any derivatives in your MUD, you must do the following:
 *
 *  - E-mail me at j.s.patrick@ieee.org
 *  - Have a helpfile for the item that includes a credit to me, with
 *    the above e-mail address in it.  (E.g. This code was written by
 *    John Patrick (j.s.patrick@ieee.org) and used with permission.)
 *
*/

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "merc.h"

void
do_losereply (CHAR_DATA * ch, char *argument)
{

  char arg1[MAX_INPUT_LENGTH];
  CHAR_DATA *victim;
  char buffer[64];
  argument = one_argument (argument, arg1);
  if (arg1[0] == '\0')
    {
      send_to_char ("Who do you want to lose their reply?\n\r", ch);
      return;
    }

  if ((victim = get_char_world (ch, arg1)) == NULL)
    {
      send_to_char ("They aren't here.\n\r", ch);
      return;
    }

  /* And here's the real magic....  All of one line!  */
  victim->reply = NULL;
  sprintf (buffer, "Reply lost for %s.\n\r", victim->name);
  send_to_char (buffer, ch);
}