// migong lev5 假辟邪劍#include <ansi.h>inherit NPC;string* names = ({"趙","錢","孫","李","周","吳","鄭","王","馮","陳","褚","衛","蔣","沈","韓","楊","朱","秦","尤","許","何","呂","施","張","孔","曹","嚴","華","金","魏","陶","姜","戚","謝","鄒","喻","柏","水","竇","章","云","蘇","潘","葛","奚","范","彭","郎","魯","韋","昌","馬","苗","鳳","花","方","傻","任","袁","柳","鄧","鮑","史","唐","費","廉","岑","薛","雷","賀","倪","湯","藤","殷","羅","華","郝","鄔","安","常","樂","呆","時","付","皮","卞","齊","康","伍","余","元","卜","顧","盈","平","黃","和","穆","肖","尹","姚","邵","湛","汪","祁","毛","禹","狄","米","貝","明","藏","計","伏","成","戴","談","宋","茅","龐","熊","紀","舒","屈","項","祝","董","梁","樊","胡","凌","霍","虞","萬","支","柯","昝","管","盧","英","仇","候","岳","帥","司馬","上官","歐陽","夏候","諸葛","聞人","東方","赫連","皇甫","尉遲","公羊","澹臺","公治","宗政","濮陽","淳于","單于","太叔","申屠","公孫","仲孫","轅軒","令狐","鐘離","宇文","長孫","幕容","司徒","師空","顓孔","端木","巫馬","公西","漆雕","樂正","壤駟","公良","拓趾","夾谷","宰父","谷梁","楚晉","閻法","汝鄢","涂欽","段千","百里","東郭","南郭","呼延","歸海","羊舌","微生","梁丘","左丘","東門","西門","佰賞","南官","緱","亢","況","后","有","琴","商","牟","佘","耳","墨","哈","譙","年","愛","陽","佟","第","五","言","福","蒯","鐘","宗","林","石",});string* nm2 = ({"忠","孝","禮","義","智","勇","仁","匡","憲","令","福","祿","大","小","曉","高","可","阿","金","世","克","叔","之","公","夫","時","若","慶","文","武","多","才","長","子","永","友","自","人","為","鐵","","","","","","","","","","","","","","","","","","","","","","",});string* nm3 = ({"霸","白","班","斌","賓","昌","超","誠","川","鼎","定","斗","法","飛","風","鋒","鋼","罡","貫","光","海","虎","華","浩","宏","濟","堅","健","劍","江","進","杰","俊","康","良","麟","民","明","鳴","寧","培","啟","強","榮","山","泰","濤","挺","偉","熙","祥","雄","旭","毅","瑜","羽","宇","岳","舟",});void create(){         int i = random(sizeof(names));   set_name(names[i]+nm2[random(sizeof(nm2))]+nm3[random(sizeof(nm3))],  ({ "man" })); set("title", HIC"亡命徒"NOR);   set("gender", "男性" ); set("long","判離師門，亡命江湖的匪徒。\n");        set("attitude", "aggressive");        set("vendetta/authority",1);	  set("force_factor",30+random(200));  set("max_qi",1500+random(1500));  set("max_jing",1500+random(1500));  set("max_sen",1500+random(1500));  set("max_neili",1500+random(1500));  set("max_mana",1500+random(1500));  set("eff_neili",1500+random(1500));  set("neili",2000+random(1500));        set("per", 1);        set("age", 22);       set("jiali" , 50);        set("shen", -5000);        set("intellgent",1);	set("pursuer",1);        set("combat_exp", 1000000+random(250000));                 set_skill("unarmed", 190+random(30));set_skill("changquan", 190+random(30));set_skill("force", 190+random(30));set_skill("sword", 190+random(30));set_skill("parry", 190+random(30));set_skill("dodge", 190+random(30));set_skill("pixie-sword", 190+random(30));set_skill("feiyan-huixiang", 190+random(30));set_skill("zixia-shengong", 190+random(30));          map_skill("sword", "pixie-sword");        map_skill("parry", "pixie-sword"); map_skill("force", "zixia-shengong"); map_skill("dodge", "feiyan-huixiang"); map_skill("unarmed"  , "changquan");prepare_skill("unarmed", "changquan");set("chat_chance_combat", 50);        set("chat_msg_combat", ({                  (: perform_action, "sword.cimu" :),	      (: exert_function, "recover" :), }) );     set_temp("apply/attack", 100);        set_temp("apply/defense", 100);        set_temp("apply/armor", 100);        set_temp("apply/damage", 100);     set("chat_chance", 30);        set("chat_msg", ({		(: command("get silver") :),		(: command("get gold") :),		(: command("get coin") :),                (: random_move :),           }) );        setup();        carry_object("/d/migong/obj/cloth")->wear();       carry_object("/d/migong/obj/sword")->wield();		}void init( ){	object ob;	        remove_call_out("hunting");	if( interactive(ob = this_player())  ) {        ob->start_busy(1);        call_out("hunting",0);        }	if(!environment()->query("no_fight") && random(10) < 5)        call_out("hunting",0);}void hunting(){	int i;        object *ob;        ob = all_inventory(environment());        for(i=sizeof(ob)-1; i>=0; i--) {        if( !ob[i]->is_character() || ob[i]==this_object() || !living(ob[i])) continue;        if(ob[i]->query("vendetta/authority")) continue;                kill_ob(ob[i]);                ob[i]->fight(this_object());        }}void die(){        object ob, me, corpse;                ob = this_object();        me = query_temp("last_damage_from");        if (!me) return;                me->add("score",1);        me->add("shen",10);        message_vision(WHT"$N口中鮮血狂噴,倒地而亡。\n"NOR,ob,me);        if( objectp(corpse = CHAR_D->make_corpse(this_object())) )        corpse->move(environment(this_object()));me->add("combat_exp",random(12));me->add("potential",random(8));        if((int)me->query("combat_exp") < 1500000)   {        message("vision", me->name() + "為江湖除害,增加了100經驗和50潛能。\n", me);        me->add("combat_exp",100);        me->add("potential",50);        destruct(ob);        }        destruct(ob);        return;}