ES2 MUD LIB :: 東方故事二(ES2) 天朝帝國 mudlib 瀏覽展示

// arrest command..

inherit F_CLEAN_UP;

int main(object me, string str)
{
        object ob;
        int i;

        seteuid(getuid(me));
        if(!str) return notify_fail("指令格式: arrest <使用者>\n");
        ob = LOGIN_D->find_body(str);
        if(!ob) return notify_fail("線上的使用者中沒有這個人。\n");
if(ob->query("level") > 4 ) 
return notify_fail("他不在是被保護的等級不用取消他的保護\n");

seteuid(geteuid(ob));
if (ob->query("get_kill") == 1) {
ob->set("get_kill", 0) ; 
tell_object(ob, "巫師("+me->query("id")+")恢復你的保護\n");
tell_object(me,"你恢復了玩家("+ob->query("id")+")的保護\n");
}
else {
ob->set("get_kill", 1) ;
tell_object(ob, "巫師("+me->query("id")+")取消你的保護\n");
                tell_object(me,"你取消玩家("+ob->query("id")+")的保護\n");
}
        return 1;
}

int help(object me)
{
write(@HELP
指令格式 : arrest <某人>

此指令可讓你取消特定惡劣玩家的等級保護
HELP
    );
    return 1;
}