foundationI_fluffos_v1/
foundationI_fluffos_v1/bin/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/ChangeLog.old/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/Win32/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/compat/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/compat/simuls/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/include/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/testsuite/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/testsuite/clone/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/testsuite/command/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/testsuite/data/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/testsuite/etc/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/testsuite/include/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/testsuite/inherit/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/testsuite/inherit/master/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/testsuite/log/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/testsuite/single/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/testsuite/single/tests/compiler/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/testsuite/single/tests/efuns/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/testsuite/single/tests/operators/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/testsuite/u/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/tmp/
foundationI_fluffos_v1/fluffos-2.9-ds2.12/windows/
foundationI_fluffos_v1/lib/
foundationI_fluffos_v1/lib/cmds/ambassador/
foundationI_fluffos_v1/lib/cmds/database/
foundationI_fluffos_v1/lib/cmds/soul/
foundationI_fluffos_v1/lib/daemon/include/
foundationI_fluffos_v1/lib/daemon/save/
foundationI_fluffos_v1/lib/daemon/services/
foundationI_fluffos_v1/lib/daemon/soul/
foundationI_fluffos_v1/lib/doc/build/
foundationI_fluffos_v1/lib/doc/build/room/
foundationI_fluffos_v1/lib/doc/build/virtual/
foundationI_fluffos_v1/lib/doc/driver/
foundationI_fluffos_v1/lib/doc/efun/
foundationI_fluffos_v1/lib/doc/etc/
foundationI_fluffos_v1/lib/doc/help/creator/
foundationI_fluffos_v1/lib/doc/help/hm/
foundationI_fluffos_v1/lib/doc/help/user/
foundationI_fluffos_v1/lib/doc/lpc/basic/
foundationI_fluffos_v1/lib/doc/lpc/data_types/
foundationI_fluffos_v1/lib/doc/lpc/etc/
foundationI_fluffos_v1/lib/doc/lpc/intermediate/
foundationI_fluffos_v1/lib/doc/lpc/types/
foundationI_fluffos_v1/lib/doc/mudlib/
foundationI_fluffos_v1/lib/doc/mudlib/features/
foundationI_fluffos_v1/lib/domains/Examples/etc/
foundationI_fluffos_v1/lib/domains/Examples/room/
foundationI_fluffos_v1/lib/domains/Examples/virtual/
foundationI_fluffos_v1/lib/domains/Examples/virtual/exaA/
foundationI_fluffos_v1/lib/domains/Examples/virtual/exaB/
foundationI_fluffos_v1/lib/domains/Examples/weapon/
foundationI_fluffos_v1/lib/domains/Standard/
foundationI_fluffos_v1/lib/domains/Standard/pools/
foundationI_fluffos_v1/lib/domains/Standard/std/
foundationI_fluffos_v1/lib/domains/Standard/xtra/
foundationI_fluffos_v1/lib/include/
foundationI_fluffos_v1/lib/news/
foundationI_fluffos_v1/lib/secure/cfg/
foundationI_fluffos_v1/lib/secure/cmds/adm/
foundationI_fluffos_v1/lib/secure/cmds/ambassador/
foundationI_fluffos_v1/lib/secure/cmds/mortal/
foundationI_fluffos_v1/lib/secure/etc/
foundationI_fluffos_v1/lib/secure/etc/approval/
foundationI_fluffos_v1/lib/secure/etc/elections/
foundationI_fluffos_v1/lib/secure/etc/mudlib/
foundationI_fluffos_v1/lib/secure/etc/quests/
foundationI_fluffos_v1/lib/secure/save/daemon/
foundationI_fluffos_v1/lib/secure/save/postal/d/descartes/
foundationI_fluffos_v1/lib/secure/save/users/d/
foundationI_fluffos_v1/lib/secure/std/
foundationI_fluffos_v1/lib/std/obj/
foundationI_fluffos_v1/lib/std/room/
foundationI_fluffos_v1/lib/std/user/
foundationI_fluffos_v1/lib/std/virtual/
foundationI_fluffos_v1/old/
foundationI_fluffos_v1/win32/
/*    /cmds/adm/_xmote.c
 *    from the Nightmare Mudlib 3.2
 *    a promote/demote style command for use with the Nightmare system
 *    created by Descartes of Borg 940124
 */

#include <std.h>
#include <daemons.h>

inherit DAEMON;
 
int cmd_xmote(string str) {
    string pos, nom;
    object ob;
    int lev;

    if(!adminp(previous_object())) return 0;
    if(sscanf(str, "%s %s", nom, str) != 2)
      return notify_fail("Usage: <xmote [player] ([level]) ([position])>\n");
    if(sscanf(str, "%d %s", lev, pos) != 2) {
        if(!sscanf(str, "%d", lev)) {
            log_file("xmote", sprintf("%s went to position %s thanks to "
              "%s on %s.\n", nom, str, (string)previous_object()->query_name(),
              ctime(time())));
            if(ob = find_player(nom = lower_case(nom))) ob->set_position(str);
            else USERS_D->xmote(nom, str, 0);
            message("info", sprintf("%s is now position %s", capitalize(nom),
              str), this_player());
            message("info", sprintf("You have been xmoted to %s", str), ob);
            return 1;
        }
        log_file("xmote", sprintf("%s went to level %d thanks to %s on %s.\n",
          nom, lev, (string)previous_object()->query_name(), ctime(time())));
        if(ob = find_player(nom = lower_case(nom))) ob->set_level(lev);
        else USERS_D->xmote(nom, 0, lev);
        message("info", sprintf("%s is now level %d.", capitalize(nom), lev),
          this_player());
        message("info", sprintf("You have been xmoted to level %d.\n",lev),ob);
        return 1;
    }
    log_file("xmote", sprintf("%s went to position %s and level %d thanks to "
      "%s on %s.\n", nom, pos, lev, (string)previous_object()->query_name(),
      ctime(time())));
    if(ob = find_player(nom = lower_case(nom))) {
        ob->set_level(lev);
        ob->set_position(pos);
    }
    else USERS_D->xmote(nom, pos, lev);
    message("info", sprintf("%s is now level %d and position %s.\n",
      capitalize(nom), lev, pos), this_player());
    message("info", sprintf("You are now level %d %s.\n", lev, pos), ob);
    return 1;
}

void help() {
    message("help", "Syntax: <xmote [player] ([level]) ([position])>\n\n"
      "Changes the level, position, or both of a player.", this_player());
}