?? daoshi.c
字號:
// daoshi.c// by victori#include <ansi.h>inherit NPC;inherit F_DEALER;inherit F_MASTER;int ask_me();void create(){ set_name("游方道人", ({ "dao ren", "dao", "daoren" }) ); set("gender", "男性" ); set("age", 34); set("long", "一個白凈矮胖的道士,見誰都笑瞇瞇的,正悠閑的品著一杯香茶。\n"); set("max_qi", 2000); set("max_jing", 2000); set("max_neili", 2000); set("jiali", 50); set("combat_exp", 200000); set("attitude", "friendly"); set("rank_info/respect", "笑面郎中"); set_skill("dodge", 80); set_skill("unarmed",80); set_skill("parry", 80); set_skill("force",80); set_skill("hammer", 80); set_skill("poison", 80); set_skill("sword",80); set_skill("literate", 50); set_skill("wudu-yanluobu", 70); set_skill("qianzhu-wandushou", 75); set_skill("wudu-shengong", 70); set_skill("finger", 80); set_skill("shedu-qiqiao", 80); map_skill("finger","shedu-qiqiao"); map_skill("force", "wudu-shengong"); map_skill("dodge", "wudu-yanluobu"); map_skill("unarmed", "qianzhu-wandushou"); map_skill("parry", "qianzhu-wandushou"); set("vendor_goods", ({ __DIR__"obj/jiedudan", })); create_family("五毒教", 13, "護法弟子"); setup(); carry_object("/clone/misc/cloth")->wear(); add_money("silver",30);set("inquiry", (["五毒教": (: ask_me :),]) );}void init(){ object ob; ::init(); if( interactive(ob = this_player()) && !is_fighting() ) { remove_call_out("greeting"); call_out("greeting", 1, ob); } add_action("do_list", "list"); add_action("do_buy", "buy");}void greeting(object ob){ if( !ob || environment(ob) != environment() ) return; switch( random(3) ) { case 0: say( "游方道人嘿嘿一陣奸笑道:這位" + RANK_D->query_respect(ob) + ",也是來住店的嗎?\n"); break; case 1: say( "游方道人點了點手道:這位" + RANK_D->query_respect(ob) + "請過這里坐,這是要去那啊?\n"); break; case 2: say( "游方道人面現驚訝之色道:這位" + RANK_D->query_respect(ob) + "眉現黑氣,近日會有大難。\n貧道有一些隨身丹丸可以賣給你,或許可救你一命。\n"); break; }}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") > 1000) { command("say 做我五毒教弟子必須心狠手辣。"); command("say 我教弟子貴在隨心所欲,不收偽君子"); return; } command("recruit " + ob->query("id")); ob->set("class", "none"); ob->set("title","五毒教徒"); return;}int ask_me(){ object ob,me; me = this_player(); if ((string)me->query("family/family_name") != "五毒教") return notify_fail("對不起,無可奉告!\n"); command("say 這位"+ RANK_D->query_respect(me) + "來的正好,這里正有馬車要回山辦事,就讓他們送你一程吧。\n"); message_vision(HIC"游方道人一招手,一輛馬車駛過來停在門前。\n$N急忙鉆進車中,只聽一陣清脆的鞭響,馬車絕塵而去。\n\n"NOR,me);/* message("vision", "遠處一輛馬車急駛而來,車門一開"+me->query("name")+"從里面鉆了出來。\n", ob);*/ tell_object(me, "只聽車把勢說道:這位"+ RANK_D->query_respect(me) + "已經到了,請下車吧。\n"NOR ); me->move("/d/wudujiao/damen"); return 1;}
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -