panxiuda.c

来自「C实现的MUD,对大家基本入门网络游戏很有帮助!」· C语言 代码 · 共 116 行

// panxiuda.c
// 潘秀达
// by victori
#include <ansi.h>

inherit NPC;
inherit F_MASTER;

void create()
{
        set_name("潘秀达", ({ "pan xiuda", "pan" }));
        set("nickname", HIG "笑面阎罗" NOR);
        set("long",@LONG
他就是五毒教的左护法，人称笑面阎罗的潘秀达。别看他一脸笑眯眯的
，但是常常杀人于弹指之间，一手五毒钩法也已达到登峰造极的境界。
LONG
        );
        set("title","五毒教护法");
        set("gender", "男性");
        set("age", 38);
        set("attitude", "friendly");
        set("shen_type", -1);
        set("str", 30);
        set("int", 30);
        set("con", 30);
        set("dex", 30);
        set("max_qi", 3000);
        set("max_jing", 3000);
        set("neili", 3000);
        set("max_neili", 3000);
        set("jiali", 100);
        set("combat_exp", 500000);
        set("score", 50000);

        set_skill("force", 120);
        set_skill("wudu-shengong", 120);
        set_skill("dodge", 130);
        set_skill("wudu-yanluobu", 110);
        set_skill("unarmed", 120);
        set_skill("qianzhu-wandushou", 120);
        set_skill("parry", 120);
        set_skill("sword", 140);
        set_skill("wudu-goufa", 140);
        set_skill("poison", 110);
        set_skill("literate", 80); 
        set_skill("finger",120);
        set_skill("shedu-qiqiao",120);
//        set_skill("hammer", 100);
//       set_skill("jinshe-chui", 140 );
//      set_skill("strike", 200 );
 


        map_skill("finger","shedu-qiqiao");
        map_skill("force", "wudu-goufa");
        map_skill("dodge", "wudu-yanluobu");
        map_skill("unarmed", "qianzhu-wandushou");
        map_skill("parry", "wudu-goufa");
        map_skill("sword", "wudu-goufa");
//        map_skill("hammer", "jinshe-chui");
 
        create_family("五毒教", 12, "护法");

        setup();

        carry_object(__DIR__"obj/ganggou")->wield();
        carry_object("/d/city/obj/cloth")->wear();

        add_money("gold",1);
}

void attempt_apprentice(object ob)
{

                  if ((string)ob->query("gender") == "无性") {
                                 command("say 这位公公不要开玩笑了。");
                command("say 这位" + RANK_D->query_respect(ob) +
                        "还是快去伺候皇上吧！");
                return;
                  }

                  if ((int)ob->query("shen") > -5000) {
                                 command("say 做我五毒教弟子必须心狠手辣。");
                command("say 这位" + RANK_D->query_respect(ob) +
                        "心慈手软，可惜与我教没有缘分啊！");
                return;
                  }

        if ((string)ob->query("family/family_name") != "五毒教")        {
                command("say 这位" + RANK_D->query_respect(ob) +
                        "不是本教弟子，还是请回吧！");
                return;
                  }

        if ((int)ob->query_skill("poison", 1) < 60) {
                command("say 我五毒教弟子以毒杀人，修习毒技是首要的。");
                command("say 这位" + RANK_D->query_respect(ob) +
                        "是否还应该多多钻研本门的绝学？");
                return;
        }
        if ((int)ob->query_skill("wudu-shengong", 1) < 60) {
                command("say 你的五毒神功还学的不够啊。");
                return;
        }

//          command("chat 嘿嘿嘿嘿！！！！！");
//          command("chat 该当我五毒教发扬光大，称霸武林指日可待了。");
//          command("chat 嘿嘿嘿嘿！！！！！");
        command("recruit " + ob->query("id"));
        ob->set("class", "none");

         ob->set("title","五毒教弟子");
         return;
}