[Semi-Snippet] ACMD(do_chown)

From: Crimson Wizard (cwizard@GIBLETS.COM)
Date: 08/09/97


Got it working today, thanks to those that helped.  I'll continue to work
on this.. right now I know it works for items in inv, but I make no
gaurantee about anything else.

ACMD(do_chown)
{
  struct char_data *victim;
  struct obj_data *obj;

  two_arguments(argument, buf, buf2);

  if (!*buf)
    send_to_char("Syntax: chown <object> <character>.\r\n", ch);
  else if (!(victim = get_char_vis(ch, buf2)))
    send_to_char("No one by that name here.\r\n", ch);
  else if (victim == ch)
    send_to_char("Are you sure you're feeling ok?\r\n", ch);
  else if (GET_LEVEL(victim) >= GET_LEVEL(ch))
    send_to_char("That's really not such a good idea.\r\n", ch);
  else if (!*buf2)
    send_to_char("Syntax: chown <object> <character>.\r\n", ch);
  else if (!(obj = get_obj_in_list_vis(victim, buf, victim->carrying))) {
        sprintf(buf, "%s does not appear to have the %s.\r\n",
                      GET_NAME(victim), buf);
        send_to_char(buf, ch);
    }
  else {
    act("$n makes a magical gesture and $p flies from $N to $m.",FALSE,ch,obj,
         victim,TO_NOTVICT);
    act("$n makes a magical gesture and $p flies away from you to $m.",FALSE,ch,
         obj,victim,TO_VICT);
    act("You make a magical gesture and $p flies away from $N to you.",FALSE,ch,
         obj, victim,TO_CHAR);

    obj_from_char(obj);
    obj_to_char(obj, ch);
  }
}


--
#!/bin/sh
whois yea.com|grep YEA2|awk '{print $1}'
whois aree.com|grep DOM|awk '{print $1}'
whois aree.com|grep DOM|awk '{print $1}'|cut -c1
whois tm920|grep TM920|awk '{print $4}'|cut -d@ -f1


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



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