Comparing files xuanwu_tang\npc\nongfu.c and peacock\xuanwu_tang\npc\nongfu.c
FC: no differences encountered

Comparing files xuanwu_tang\npc\jieyin_ren.c and peacock\xuanwu_tang\npc\jieyin_ren.c
****** xuanwu_tang\npc\jieyin_ren.c
int ask_for_xuanwu( object );
object *all_chars( object );
void do_dailu0( object );
****** peacock\xuanwu_tang\npc\jieyin_ren.c
int ask_for_xuanwu( object );
void do_dailu0( object );
******

****** xuanwu_tang\npc\jieyin_ren.c
void do_dailu1( object );
void do_dailu2( object );
void do_dailu3( object );
void do_dailu4( object );
   
****** peacock\xuanwu_tang\npc\jieyin_ren.c
void do_dailu1( object );
   
******

****** xuanwu_tang\npc\jieyin_ren.c
{
    if ( msg != "灵龟" )
        message_vision( BLU "$N抬头看了$n一眼，脸上露出疑惑的表情。\n" NOR,
****** peacock\xuanwu_tang\npc\jieyin_ren.c
{
    if ( msg != "河图" )
        message_vision( BLU "$N抬头看了$n一眼，脸上露出疑惑的表情。\n" NOR,
******

****** xuanwu_tang\npc\jieyin_ren.c
        message_vision( "$N放下手里的锄头，转身离去。\n", ob );
        set("long", "一个典型的北方农民，赤着上身，手里提着一把锄头。\n");
        command( "north" );
****** peacock\xuanwu_tang\npc\jieyin_ren.c
        message_vision( "$N放下手里的锄头，转身离去。\n", ob );
        command( "north" );
******

****** xuanwu_tang\npc\jieyin_ren.c
        wait = 0;
        call_out( "do_dailu3", 3, me );
    }
****** peacock\xuanwu_tang\npc\jieyin_ren.c
        wait = 0;
    }
******

****** xuanwu_tang\npc\jieyin_ren.c

void do_dailu3( object ppl )
{
    object npc = this_object(), env = environment( npc );
    object *chars = all_chars( env ), *others = ({});
    
//    message_vision( sprintf( "%O\n", chars ), npc );
    foreach( object ob in chars )
    {
        if ( ob->ZuzhiZhiwu() == "玄武堂" )
        {
            command( "nod " + ob->query( "id" ) );
        }
        else if ( ob != ppl && ob != npc )
        {
            others += ({ ob });
        }
    }
    if ( !sizeof( others ) )
    {
        message_vision( "$N走到碗橱前，拉开橱门，伸手进去摆弄了两下。\n", npc );
        command( "push cupboard" );
        message_vision( "$N一闪身就钻了进去。\n", ppl );
        ppl->move( "/d/zuzhi/yipin_tang/xuanwu_tang/midao" );
        command( "push cupboard" );
        do_dailu4( ppl );
    }
    else if( wait < 10 )
    {
        wait ++;
        command( "whisper " + ppl->query( "id" ) + "有外人在，你把他弄走先。" );
        call_out( 5, "do_dailu3", ppl );
    }
    else
    {
        command( "sigh" );
        do_dailu4( ppl );
    }
}

void do_dailu4( object ppl )
{
    wait = 0;
    command( "south" );
    set("long", "一个典型的北方农民，正光着膀子在田里干活。\n");
}

object *all_chars( object env )
{
    object *chars = all_inventory( env );
    
    return filter( chars, function( object ob )
                {
                    return ob->is_character();
                } );
}
****** peacock\xuanwu_tang\npc\jieyin_ren.c
******


Comparing files xuanwu_tang\npc\weishi1.c and peacock\xuanwu_tang\npc\weishi1.c
FC: no differences encountered

Comparing files xuanwu_tang\npc\heiyiren.c and peacock\xuanwu_tang\npc\heiyiren.c
****** xuanwu_tang\npc\heiyiren.c

//inherit __DIR__"xwnpc";
//by lnwm

//static int last_time;
int summon_diaolan();
int alarm();

****** peacock\xuanwu_tang\npc\heiyiren.c

static int last_time;

******

****** xuanwu_tang\npc\heiyiren.c

    set("combat_exp", 3000000);
//    set_wugong("unarmed",30,30,1);

****** peacock\xuanwu_tang\npc\heiyiren.c

    set("combat_exp", 3000);
//    set_wugong("unarmed",30,30,1);
    set("inquiry", ([
        "玄武堂"  : "少用嘴多用手，你这颗脑袋自会长得牢靠些。",     
        ]) );

******

****** xuanwu_tang\npc\heiyiren.c
    {
        message_vision( "$n亮出一枚玄武令，$N微一点头，侧身让开道路。\n",
                        npc, me );
                alarm();
    }
****** peacock\xuanwu_tang\npc\heiyiren.c
    {
        message_vision( "$n亮出一枚玄武令，$N微一点头，侧身让开道路。",
                        npc, me );
    }
******

****** xuanwu_tang\npc\heiyiren.c
    command( "blow 3s" );
        return 1; // by lnwm
}
****** peacock\xuanwu_tang\npc\heiyiren.c
    command( "blow 3s" );
}
******

****** xuanwu_tang\npc\heiyiren.c
    command( "blow 1l" );
        return 1; // by lnwm
}
****** peacock\xuanwu_tang\npc\heiyiren.c
    command( "blow 1l" );
}
******


Comparing files xuanwu_tang\npc\weishi.c and peacock\xuanwu_tang\npc\weishi.c
****** xuanwu_tang\npc\weishi.c

inherit __DIR__"xwnpc";

int admonish( object npc, object me )
{
    return 1;
}
****** peacock\xuanwu_tang\npc\weishi.c

inherit NPC;

int welcome_visitor( object me )
{
    object npc = this_object(), cloth, ling;
    int time_available;

    foreach( object inv in deep_inventory( me ) )
    {
        if ( ( inv->name() == YEL"玄武令"NOR ) && inv->id( "ling pai" ) )
            ling = inv;
        if ( ( inv->name() == "号坎" ) && inv->id( "hao kan" ) )
            cloth = inv;
    }

    time_available = me->query_condition("can_stay_in_xuanwu");

    if ( !cloth && !ling )
    {
        message_vision2( "$N大喝一声：“什么人竟想混入玄武堂，今天教你来得"
                         "，去不得！”", npc);
        kill_ob( me );
    }
    else if ( cloth && cloth->time_available() > 0 )
    {
        message_vision( GRN "$N对$n正色道：“堂主有令，时辰到了即刻离去。\n"
                        "你再不走，我们也不好向上交待。”\n" NOR , npc, me );
    }
    else
    {
        if ( random( 10 ) > 8 )
            message_vision( "$N冲$n微微一笑，点了一下头。\n", npc, me );
    }
}
******

****** xuanwu_tang\npc\weishi.c

int greeting( object npc, object me )
{
    object *invs = all_inventory( me );
    return 1;
}

int query_ask_answer( object ppl, string arg )
****** peacock\xuanwu_tang\npc\weishi.c

int query_ask_answer( object ppl, string arg )
******

****** xuanwu_tang\npc\weishi.c

int accept_duilian( object me )
{
****** peacock\xuanwu_tang\npc\weishi.c

int accept_fight( object me )
{
******


Comparing files xuanwu_tang\npc\weishi2.c and peacock\xuanwu_tang\npc\weishi2.c
FC: no differences encountered

Comparing files xuanwu_tang\npc\zhangfang.c and peacock\xuanwu_tang\npc\zhangfang.c
FC: no differences encountered

Comparing files xuanwu_tang\npc\qinhaoran.c and peacock\xuanwu_tang\npc\qinhaoran.c
****** xuanwu_tang\npc\qinhaoran.c
    object npc = this_object(), yin, ling;
    mapping clocks;

****** peacock\xuanwu_tang\npc\qinhaoran.c
    object npc = this_object(), yin, ling;

******

****** xuanwu_tang\npc\qinhaoran.c
        {
            clocks = me->query_condition( "clock" );
            if ( !mapp( clocks ) ) clocks = ([ ]);
            clocks["玄武"] = ([
                "warning_time" : 2,
                "warning_msg" : "你在玄武堂学艺的期限到了，该下山了。\n",
                "duration" : 216,
            ]);
            me->apply_condition( "clock", clocks );

            message_vision( "\n" CYN , me );
****** peacock\xuanwu_tang\npc\qinhaoran.c
        {
            message_vision( "\n" CYN , me );
******


Comparing files xuanwu_tang\npc\weishi3.c and peacock\xuanwu_tang\npc\weishi3.c
FC: no differences encountered

Comparing files xuanwu_tang\npc\asan.c and peacock\xuanwu_tang\npc\asan.c
****** xuanwu_tang\npc\asan.c

inherit __DIR__"xwnpc";

****** peacock\xuanwu_tang\npc\asan.c

inherit NPC;

******


Comparing files xuanwu_tang\npc\chushi.c and peacock\xuanwu_tang\npc\chushi.c
****** xuanwu_tang\npc\chushi.c

inherit __DIR__"xwnpc";

****** peacock\xuanwu_tang\npc\chushi.c

inherit NPC;

******


Comparing files xuanwu_tang\npc\tuzhong.c and peacock\xuanwu_tang\npc\tuzhong.c
****** xuanwu_tang\npc\tuzhong.c

inherit __DIR__"xwnpc";

****** peacock\xuanwu_tang\npc\tuzhong.c

inherit __DIR__"weishi";

******

****** xuanwu_tang\npc\tuzhong.c
{
    set_name( "徒众" , ({ "tuzhong" }) );
    set("gender", "男性" );
****** peacock\xuanwu_tang\npc\tuzhong.c
{
    set_name( HIG "徒众" NOR , ({ "tuzhong" }) );
    set("gender", "男性" );
******

****** xuanwu_tang\npc\tuzhong.c
    set("combat_exp", 3000);
    set_wugong("unarmed",60,60,1);
    set_wugong("qiang"  ,60,60,1);
    set_wugong("force"  ,30,30,1);
    set_xiuwei_by_type("long", 1000);

****** peacock\xuanwu_tang\npc\tuzhong.c
    set("combat_exp", 3000);
//    set_wugong("unarmed",30,30,1);

******

****** xuanwu_tang\npc\tuzhong.c
    setup();
    carry_object( CLOTH_DIR"jingzhuang1" )->wear();
    carry_object( LONG_DIR"qiang")->wield();
//    carry_object(__DIR__"obj/cloth1")->wear();
}
****** peacock\xuanwu_tang\npc\tuzhong.c
    setup();
    carry_object(__DIR__"obj/cloth1")->wear();
}
******


Comparing files xuanwu_tang\npc\wushi.c and peacock\xuanwu_tang\npc\wushi.c
FC: no differences encountered

Comparing files xuanwu_tang\npc\yinwuji.c and peacock\xuanwu_tang\npc\yinwuji.c
****** xuanwu_tang\npc\yinwuji.c

inherit __DIR__"xwnpc";

****** peacock\xuanwu_tang\npc\yinwuji.c

inherit NPC;

******


Comparing files xuanwu_tang\npc\litaiping.c and peacock\xuanwu_tang\npc\litaiping.c
****** xuanwu_tang\npc\litaiping.c

inherit __DIR__"hufa";

****** peacock\xuanwu_tang\npc\litaiping.c

inherit NPC;

******

****** xuanwu_tang\npc\litaiping.c
{
    set_name( "李太平" , ({ "li taiping", "li", "hufa" }) );
    set("gender", "男性" );
****** peacock\xuanwu_tang\npc\litaiping.c
{
    set_name( "李太平" , ({ "li mofei", "li", "jiaotou" }) );
    set("gender", "男性" );
******

****** xuanwu_tang\npc\litaiping.c

    set_wugong("shaolin-shenfa" , 140, 140, 1);
    set_wugong("fuhu-quan"      , 120, 120, 1);
    set_wugong("sanhua-zhang"   , 120, 120, 1);
    set_wugong("qianye-shou"    , 120, 120, 1);
    set_wugong("banruo-zhang"   , 120, 120, 1);
    set_wugong("shaolin-neigong", 150, 150, 1);
****** peacock\xuanwu_tang\npc\litaiping.c

    set_wugong("shaolin-shenfa"  , 140, 140, 1);
    set_wugong("fuhu-quan"      , 120, 120, 1);
    set_wugong("shaolin-neigong", 150, 150, 1);
******

****** xuanwu_tang\npc\litaiping.c
****** peacock\xuanwu_tang\npc\litaiping.c

int welcome_visitor( object me )
{
    object npc = this_object(), cloth, ling;

    foreach( object inv in deep_inventory( me ) )
    {
        if ( ( inv->name() == YEL"玄武令"NOR ) && inv->id( "ling pai" ) )
            ling = inv;
        if ( ( inv->name() == "号坎" ) && inv->id( "hao kan" ) )
            cloth = inv;
    }

    if ( !cloth && !ling )
    {
        message_vision( CYN "$N看了$n一眼，喝道：“阁下闯关杀人，莫非当我西夏无人吗？！”\n" NOR,
                        npc, me );
        kill_ob( me );
    }
}

int refuse_killing( object me )
{
    set("force_factor", 100);
    return 0;
}

int accept_fight( object me )
{
    if ( me->IsMemberOf("yipin") )
    {
        message_vision( CYN "$N瞟了你一眼，道：“我很忙，要找人对练就到练武场去。”\n" NOR,
                        this_object() );
        return 0;
    }
    else
    {
        message_vision( CYN "$N看了$n一眼，脸色忽然大变：“咦？你是什么人？"
                            "怎么闯上来的？”\n" NOR 
                        ,this_object() ,me);
        kill_ob( me );
        return notify_fail("");
    }
}

int valid_teach( object me, string skill )
{
    return 0;
}
******


Comparing files xuanwu_tang\npc\helianchunshui.c and peacock\xuanwu_tang\npc\helianchunshui.c
****** xuanwu_tang\npc\helianchunshui.c

inherit __DIR__"xwnpc";

****** peacock\xuanwu_tang\npc\helianchunshui.c

inherit NPC;

******

****** xuanwu_tang\npc\helianchunshui.c

int accept_duilian( object me )
{
****** peacock\xuanwu_tang\npc\helianchunshui.c

int accept_fight( object me )
{
******


Comparing files xuanwu_tang\npc\tuzhong1.c and peacock\xuanwu_tang\npc\tuzhong1.c
****** xuanwu_tang\npc\tuzhong1.c

inherit __DIR__"xwnpc";

****** peacock\xuanwu_tang\npc\tuzhong1.c

inherit __DIR__"weishi";

******

****** xuanwu_tang\npc\tuzhong1.c
{
    set_name( "徒众" , ({ "tu zhong", "tuzhong" }) );
    set("gender", "男性" );
****** peacock\xuanwu_tang\npc\tuzhong1.c
{
    set_name( "徒众" , ({ "tu zhong"，"tuzhong" }) );
    set("gender", "男性" );
******

****** xuanwu_tang\npc\tuzhong1.c
    set("combat_exp", 3000);
    set_wugong("unarmed",60,60,1);
    set_wugong("qiang"  ,60,60,1);
    set_wugong("force"  ,30,30,1);
    set_xiuwei_by_type("long", 1000);

****** peacock\xuanwu_tang\npc\tuzhong1.c
    set("combat_exp", 3000);
    set_wugong("qiang",60,60,1);
    set_xiuwei_by_type("long",300);

******

****** xuanwu_tang\npc\tuzhong1.c
    setup();
    carry_object( CLOTH_DIR"jingzhuang1" )->wear();
    carry_object( LONG_DIR"qiang")->wield();
    JoinZuzhi("yipin", "徒众", "玄武堂");
****** peacock\xuanwu_tang\npc\tuzhong1.c
    setup();
    carry_object( LONG_DIR"qiang")->wield();
    carry_object( CLOTH_DIR"jingzhuang1")->wear();

    JoinZuzhi("yipin", "徒众", "玄武堂");
******

****** xuanwu_tang\npc\tuzhong1.c
****** peacock\xuanwu_tang\npc\tuzhong1.c

int accept_fight( object me )
{
    if ( 100*query("kee")/query("max_kee") < 50)
    {
        message_vision( CYN "$N冲$n歉然一笑，道：“我今天太累了。改天吧。”\n" NOR,
                this_object(), me );
        return 0;
    }
    else return 1;
}
******


Comparing files xuanwu_tang\npc\tuzhong2.c and peacock\xuanwu_tang\npc\tuzhong2.c
FC: cannot open peacock\xuanwu_tang\npc\tuzhong2.c - No such file or directory

Comparing files xuanwu_tang\npc\xwnpc.c and peacock\xuanwu_tang\npc\xwnpc.c
FC: cannot open peacock\xuanwu_tang\npc\xwnpc.c - No such file or directory

Comparing files xuanwu_tang\npc\hufa.c and peacock\xuanwu_tang\npc\hufa.c
FC: cannot open peacock\xuanwu_tang\npc\hufa.c - No such file or directory

