Here is a nice command for any mud

Put this in act_wiz.c

void do_resetxp( CHAR_DATA *ch, char *argument )
{
    CHAR_DATA *victim;
    char arg[MAX_STRING_LENGTH];

    argument = one_argument( argument, arg );

    if ( arg[0] == '\0' )
    {
        send_to_char( "Reset who's xp?\n\r", ch );
        return;
    }

    if ( !(victim = get_char_world( ch, arg )))  
  {
        send_to_char("They are not currently on.\n\r", ch );
        return;
    }

    if ( IS_NPC( victim ))
    {
        send_to_char("Not on  a NPC.\n\r", ch );
        return;
    }

    ch->exp = exp_per_level(ch,ch->pcdata->points) * ch->level;
    send_to_char( "Xp to level has been reseted.\n\r", ch );
    send_to_char( "Your Xp to level has been reset.\n\r", victim );
    save_char_obj( ch );
    return;
}                                

/* email me comments or complaints to salem@limpbizkit.com */