[CODE] gohome

From: Admin (admin@mudservices.com)
Date: 01/29/97


DOH!, sorry about the repeated message, I accidentally sent the other one
:P

Here's the last command.

The way I use them is givehome is a LVL_GOD command, takehome is a
LVL_GRGOD command and gohome is a any level command.

I hope you enjoy them, and don't forget to put them in interpreter.c as
well!

ACMD(do_takehome)
{
  struct char_data *vict;

  skip_spaces(&argument);

  if (!*argument)
  {
    send_to_char("Usage: takehome <player>\r\n", ch);
    return;
  }

  if (!(vict = get_char_vis(ch, argument)))
  {
     send_to_char(NOPERSON, ch);
     return;
  }

  if (GET_GOHOME(vict) == 0)
  {
    sprintf(buf, "%s does not even have a gohome!\r\n", GET_NAME(vict));
    send_to_char(buf, ch);
    return;
  }

    GET_GOHOME(vict) = 0;
    sprintf(buf, "%s removes your gohome!\r\n", GET_NAME(ch));
    send_to_char(buf, vict);
    sprintf(buf, "You remove %s gohome!\r\n", GET_NAME(vict));
    send_to_char(buf, ch);
}


=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
                                           ** FINALITY **
The Last Great Adventure           finality.mudservices.com 4444
             "Judge not, lest ye be judged."
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
   Rasdan: rasdan@necromium.com            Magus: magus560@aol.com

+-----------------------------------------------------------+
| Ensure that you have read the CircleMUD Mailing List FAQ: |
|   http://cspo.queensu.ca/~fletcher/Circle/list_faq.html   |
+-----------------------------------------------------------+



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