Newbie Command [by ? Update from Franco]

From: Franco <awe@mt.arias.net>

ACMD(do_newbie)
{
   struct char_data *victim;
   struct obj_data *obj;
   int ii, tmp;

        /* My objs...insert yours here */
   int give_obj[] = { 100, 112, 130, 141, 146, 160, -1 };

   one_argument(argument, buf);

   if(IS_NPC(ch)) {
      send_to_char("Monsters can't help newbies!\n\r", ch);
      return;
   }
   if (!*buf)
      send_to_char("Who would you like to newbie?\n\r", ch);
   else if (str_cmp("all", buf)) {
      if (!(victim = get_char_vis(ch, buf)))
          send_to_char("You cant find that person!\n\r", ch);
      else if (victim == ch)
          send_to_char("You're just a LITTLE to high to be newbied!\n\r", ch);
      else {
       if (GET_LEVEL(victim) > 4) {
          send_to_char("That victim is too experienced to newbie!\n\r", ch);
          return;
       }
       for(ii = 0; give_obj[ii] != -1; ii++) {

  obj = read_object(give_obj[ii], VIRTUAL);

    if (obj == NULL)

      continue;
          obj_to_char(obj, victim);
       }
       switch (GET_CLASS(victim)) {
       case CLASS_WHITE_MAGE:
       case CLASS_RED_MAGE:
       case CLASS_BLACK_MAGE:
         tmp = 3;

 break;
       case CLASS_THIEF:

 tmp = 0;

 break;
       case CLASS_WARRIOR:

 tmp = 1;

 break;
       }
       obj = read_object(tmp, VIRTUAL);
       if (obj == NULL)

 return;
       obj_to_char(obj, victim);
       send_to_char("Done.\n\r", ch);
         sprintf(buf, "(GC) %s just newbie-equipped %s.", GET_NAME(ch),
GET_NAME(victim));

 mudlog(buf, CMP, LVL_IMMORT, TRUE);
      }
      send_to_char("You have been equipped by the gods!\n\r", victim);
    }
}

<< Multiple Item Get/Put/Drop Commands [by Darksword] | Reply | View as text | Flattened | Newbie Guide Special Procedure [by Sliver] >>