?? zhang.c
字號:
// zhang.c 張三豐#include <ansi.h>inherit NPC;inherit F_MASTER;string ask_me_1();string ask_me_2();void create(){ set_name("張三豐", ({ "zhang sanfeng", "zhang" })); set("nickname", "邋遢真人"); set("long", "他就是武當(dāng)派開山鼻祖、當(dāng)今武林的泰山北斗張三豐真人。\n" "身穿一件污穢的灰色道袍,不修邊幅。\n" "身材高大,年滿百歲,滿臉紅光,須眉皆白。\n"); set("gender", "男性"); set("age", 100); set("attitude", "friendly"); set("shen_type", 1); set("str", 50); set("int", 50); set("con", 50); set("dex", 50); set("max_qi", 18000); set("max_jing", 18000); set("neili", 55000); set("max_neili", 55000); set("jiali", 100); set("combat_exp", 5000000); set("score", 600000); set("chat_chance_combat", 90); set("chat_msg_combat", ({ (: perform_action, "dodge.zong" :), (: perform_action, "unarmed.zhenup" :), (: perform_action, "unarmed.zhan" :), (: perform_action, "unarmed.ji" :), (: perform_action, "unarmed.jielidali" :), (: perform_action, "sword.lian" :), (: perform_action, "sword.chan" :), (: perform_action, "sword.chanup" :), (: perform_action, "sword.sui" :), (: perform_action, "sword.lian" :), (: perform_action, "sword.lian" :), (: perform_action, "sword.lian" :), }) );set_skill("claw", 250);set_skill("strike", 300); set_skill("force", 250); set_skill("taiji-shengong", 300); set_skill("dodge", 150); set_skill("tiyunzong", 300); set_skill("unarmed", 200); set_skill("taiji-quan", 300); set_skill("parry", 300); set_skill("sword", 300); set_skill("taiji-jian", 300); set_skill("liangyi-jian", 150); set_skill("wudang-array", 300); set_skill("array",100); set_skill("taoism", 300); set_skill("literate", 200); set_skill("yitian-tulong", 300); set_skill("juehu-shou", 300); set_skill("raozhi-roujian", 300); set_skill("wudang-mianzhang", 300); map_skill("force", "taiji-shengong"); map_skill("dodge", "tiyunzong"); map_skill("unarmed", "taiji-quan"); map_skill("parry", "taiji-jian"); map_skill("sword", "taiji-jian");set("count",1); set("inquiry", ([ "真武劍" : (: ask_me_1 :), "考驗(yàn)" : (: ask_me_2 :), ])); create_family("武當(dāng)派", 1, "開山祖師"); set("class", "taoist"); setup(); carry_object("/clone/weapon/changjian")->wield();}void attempt_apprentice(object ob){ if ((int)ob->query("guarded") < 5) { command("say " + RANK_D->query_respect(ob) + "你對我武當(dāng)派盡了多少心力,有幾分忠心呢?"); return; } if ((int)ob->query_skill("taiji-shengong", 1) < 60) { command("say 我武當(dāng)派乃內(nèi)家武功,最重視內(nèi)功心法。"); command("say " + RANK_D->query_respect(ob) + "是否還應(yīng)該在太極神功上多下點(diǎn)功夫?"); return; } if ((int)ob->query_skill("taoism", 1) < 80) { command("say 我武當(dāng)派乃道家武功,高深的武功離不開道學(xué)心法。"); command("say " + RANK_D->query_respect(ob) + "是否還應(yīng)該多讀讀道德經(jīng)?"); return; } if ((int)ob->query("shen") < 2000) { command("say 學(xué)武之人,德義為先,功夫的高低倒還在其次,未練武,要先學(xué)做人。"); command("say 在德行方面," + RANK_D->query_respect(ob) + "是否還做得不夠?"); return; } if (ob->query_int() < 30) { command("say 我武當(dāng)派武功全從道藏悟出。"); command("say 要能達(dá)到爐火純青之境,體質(zhì)什么的倒是無關(guān)緊要,悟性卻是半點(diǎn)也馬虎不得。"); command("say " + RANK_D->query_respect(ob) + "的悟性還大有潛力可挖,還是請回吧。"); return; } command("chat 哈哈哈哈!!!!"); command("chat 想不到老道在垂死之年,又覓得一個(gè)可塑之才,真是可喜可賀。"); command("recruit " + ob->query("id"));}string ask_me_1(){ mapping fam; if (!(fam = this_player()->query("family")) || fam["family_name"] !="武當(dāng)派") return RANK_D->query_respect(this_player())+"與本派素?zé)o來往,不知此話從何談起?"; if (!this_object()->query("count")) return "啊!我真老糊涂了,劍不知放哪了。\n"; command("pat "+ (string)this_player()->query("id")); return "此劍乃本門鎮(zhèn)山之寶!不經(jīng)過考驗(yàn)我如何能放心交你保管?\n";}string ask_me_2(){ mapping fam; if (!(fam = this_player()->query("family")) || fam["family_name"] !="武當(dāng)派") return RANK_D->query_respect(this_player())+"與本派素?zé)o來往,不知此話從何談起?"; command("thumb "+ (string)this_player()->query("id")); return "你把郭女俠送我的禮物找來,就算你通過考驗(yàn)!你到我年輕時(shí)練功的附近找吧。\n";}int accept_object(object who, object ob){ object sword, me; mapping fam; me = this_object(); if (!(fam = this_player()->query("family")) || fam["family_name"] !="武當(dāng)派") { command("thank "+ (string)who->query("id")); command("say 你與本派素?zé)o來往,不知為何送如此厚禮? \n");// call_out("destroying", 1, ob); return 0; } if (fam["generation"] == 2) if ((string)ob->query("id") == "tie luohan") { command("goodkid "+(string)who->query("id")); call_out("destroying", 1, ob); if (present("zhenwu jian", who)) { command("? " + who->query("id")); command("say 不是已經(jīng)給你了嗎?"); return 1; } if (!me->query("count")) { command("say 啊!真老糊涂了,劍不知放哪了。\n"); return 1; } sword = new("/clone/unique/zhenwu-jian"); sword->move(this_player()); me->set("count", 0); command("say 你如果用這劍為非做歹,我必取你性命!\n"); return 1; } command("? "+ (string)who->query("id")); command("say 今天不是老道的生日,你送什么禮呀!");// call_out("destroying", 1, ob); return 0;}void destroying(object obj){ if (!obj) return; if (userp(obj)) command("drop "+obj->parse_command_id_list()[0]); else destruct(obj);}
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -