boss17.c

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

#include <ansi.h>
inherit NPC;
string *order = ({""HIY"", ""HIG"", ""RED"", ""MAG"", ""HIB"", ""HIB"", ""HIB"", ""HIB"",""HIB"", ""CYN"",""WHT"",""HIM"",""BLU""});


void create()

{
	mapping npc,mp,j;
	int i,k,a,b,c,d,e,f,temp;
   set_name(order[random(13)]+"沙利叶"NOR, ({ "hongtian"}));
set("magicgift",1+random(6));
	set("magicset",1);
       set("title",HIW"复仇天使"NOR);
       set("zhuanbest",1);
       set("long",
"一位可怕的天使君主。\n");
              set("attitude", "aggressive");
                set("vendetta/authority",1);
	       set("max_qi",500+random(500));
	set("combat_exp",75000000+random(8000000));
        set("szj/passed",1);
        set("double_attack",1);
        set("breakup", 1);
        set("szj/over200", 1);
        set("jiuyin/full", 1);
        set("jiuyin/shang", 1);
        set("jiuyin/xia", 1);
        set_skill("force",550+random(300));
	set_skill("unarmed",550+random(300));
	set_skill("sword",550+random(300));
	set_skill("club",550+random(300));
	set_skill("whip",550+random(300));
	set_skill("throwing",550+random(300));
	set_skill("parry",550+random(300));
set_skill("spells",600+random(300));
      set_skill("jiuyin-zhengong", 680+random(300));
      set_skill("jiuyin-shenfa", 680+random(200));
      set_skill("dafumo-quan", 680+random(300));
      set_skill("jiuyin-shenzhang", 680+random(300));
      set_skill("jiuyin-shenzhua", 680+random(300));
      set_skill("xuanyin-jian", 680+random(300));
      set_skill("yinlong-bian", 680+random(300));
      set_skill("xuanyin-jian", 680+random(300));
      map_skill("dodge", "jiuyin-shenfa");
      map_skill("force", "jiuyin-zhengong");
      map_skill("strike", "cuixin-zhang");
      map_skill("sword", "xuanyin-jian");
      map_skill("unarmed", "dafumo-quan");
      map_skill("parry", "jiuyin-shenzhua");
      map_skill("claw", "jiuyin-shenzhua");
      map_skill("spells", "magic-light");
     map_skill("spells", "magic-light");
        set("chat_chance_combat", 90);
        set("chat_msg_combat", ({
               (: perform_action, "spells.moonlight hongtian" :),
               (: perform_action, "dodge.huanyinbu" :),
               (: perform_action, "unarmed.fumo" :),                                                            
               (: perform_action, "claw.sanjue" :),                                                            
               (: perform_action, "claw.sanjue" :),                                                            
               (: perform_action, "claw.sanjue" :),                                                            
               (: perform_action, "strike.cuixin" :),                                                            
        }) );
        set("no_get",1);
b=158000+random(68000);
a=188000+random(68000);
d=68+random(60);
set("str",d);
set("dex",40+d);
set("int",d);
set("con",d);
set("per",d);
set("kar",d);
        set("jing",b);
        set("max_jing",b);
set("eff_jing",b);
        set("qi",a);
        set("max_qi",a);
set("eff_qi",a);

        set("neili",a);
        set("max_neili",a);
       
    set("age", 15);

        set("shen_type", -1);

        set("intellgent",1);

	set("pursuer",1);
	set_temp("apply/attack",200);
	set_temp("apply/defense",200);
	set_temp("apply/armor",800);
	set_temp("apply/damage",600);

   setup();

//carry_object(__DIR__"obj/sword")->wield();
carry_object(__DIR__"obj/cloth")->wear();
}

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"))
        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",100);
        me->set("title",ob->query("title"));
        me->set("qi",me->query("max_qi"));
        me->set("jing",me->query("max_jing"));
        me->set("neili",me->query("max_neili"));
        message_vision(HIB"$N,化为了无数的光芒，消失在空中。\n"NOR,ob,me);
        message("vision", me->name() + HIG"在最终任务中!!打败了"+ob->query("title")+HIG":"+ob->query("name")+HIG"("+ob->query("id")+HIG")。\n"NOR, users());
        destruct(ob);
        return;
}