// Petrarch // Merentha Lib 1.0 // <promote> int command(string str) { object ob; string pos; if(!str) return notify_fail("Syntax: promote <person> <position>\n"); sscanf(str, "%s %s", str, pos); ob=find_player(str); if(!ob) ob=present(str, environment(this_player())); if(!ob) return notify_fail("Could not find "+str+".\n"); ob->set_position(pos); ob->save_player(ob->query_name()); message("command", ob->query_cap_name()+" promoted to "+pos+".", this_player()); message("command", "You have been promoted to "+pos+".", ob); mkdir("/realms/"+ob->query_name()); return 1; } string help() { return "Syntax: promote <person> <level>\n\nPromotes a player to admin or admin to a player.\nExamples: promote petrarch admin\n promote petrarch player"; }