//yaochu.c 藥鋤

//海洋II（云起云落）

//星星lywin 2000/6/15



#include <ansi.h>

inherit ITEM;



string *she1=({"/d/shenlong/npc/dushe","/d/shenlong/npc/jinshe","/d/shenlong/npc/qingshe"});

string *she2=({"/d/shenlong/npc/fushe"});

string *yao1=({"/quest/liandan/yaocao1","quest/liandan/yaocao2"});



void init()

{

	add_action("do_wayao", "wayao");

}



void create()

{

	set_name("藥鋤", ({"yao chu", "chu"}));

        set_temp("workchu", 8);

	if (clonep())

		set_default_object(__FILE__);

	else {

		set("unit", "把");

		set("no_drop","不要亂丟，這東西打到人痛！\n");

		set("no_put",1);

		set("long", "這是一把破藥鋤，你可以用它來挖藥（wayao）。\n");

		set("value", 0);

	}

	setup();

}



int do_wayao()

{

        object me=this_player();





        if (me->is_busy())

        {

          tell_object(me,"等你忙完了，再挖吧，！\n");

          return 1;

        }

	if( me->is_fighting() )

        {

          tell_object(me,"等打完了，再挖吧，！\n");

          return 1;

        }



        if ((me->query("jing") < 20))

        {  

          tell_object(me,"你的精力不能集中，不可以挖藥！\n");

          return 1;

        }

        else

        if ((me->query("qi") < 30 ))

        {

          tell_object(me,"你的身體狀態太差，不能挖藥！\n");

          return 1;

        }

        else

        if ((int)me->query_condition("skill2_busy"))  

            {

         tell_object(me,"你剛剛才干過活,要休息一會了！\n");

                      return 1;

            }

        else          

	if (environment(me)->query_temp("wayao1") >= 1)

        {

        message_vision(HIC"$N揮動藥鋤開始在地上挖了起來。\n"NOR,me);

        me->add("jing",-10);

        me->add("qi",-20);

        me->start_busy(3);   

       	call_out("wayao1",3,me);

       	me->stop_busy();

       	return 1;

      	}

      	else

	if (environment(me)->query_temp("wayao2") >= 1)

        {

        message_vision(HIC"$N揮動藥鋤開始在地上挖了起來。\n"NOR,me);

        me->add("jing",-20);

        me->add("qi",-30);

        me->start_busy(4);   

       	call_out("wayao2",4,me);

       	me->stop_busy();

       	return 1;

      	}

        return notify_fail("這里的藥草早已被人挖光了。\n");

}



int wayao1(object me)

{

      object ob;

      object ob1;        



      if(random(7)<2) 

      {         

        tell_room(environment(me),HIY"草叢中一陣晃動，突然鉆出一條蛇。\n"NOR );

        ob=new(she1[random(3)]);

        ob->move(environment(me));

        me->start_busy(2);

        ob->kill(me);

        ob->set_leader(me);

      }

      else

      if (random(7)<3)

      {

          message_vision(CYN"一翻摸索后，草叢中似乎沒有$N要找的東西，$N失望的嘆了口氣。\n"NOR,me);



      }

      else

      { 

        message_vision(HIG"$N找了半天，終于發現其中一株草苗與其它的草略有不同，小心翼翼地掘了出來。\n"NOR,me); 

//        message_vision(HIG"藥草倒是挖到了，可惜藥鋤卻不小碰壞了。\n"NOR,me); 

        ob1 = new( __DIR__ "yaocao1");

        ob1->move(me);

        add_temp("workchu", -1);

        environment(me)->add_temp("wayao1",-1);

        me->apply_condition("skill2_busy",1+random(1));

        if ( query_temp("workchu") < 1)

             {

    message_vision(HIG"藥草倒是挖到了，可惜藥鋤卻不小碰壞了。\n"NOR,me); 

        destruct(this_object());

             }

      }

      return 1;

}



int wayao2(object me)

{

      object ob;

      object ob1;        



      if(random(7)<2) 

      {         

        tell_room(environment(me),HIY"草叢中一陣晃動，突然鉆出一條蛇。\n"NOR );

        ob=new(she2[random(1)]);

        ob->move(environment(me));

      }

      else

      if (random(7)<3)

      {

          message_vision(CYN"一翻摸索后，草叢中似乎沒有$N要找的東西，$N失望的嘆了口氣。\n"NOR,me);



      }

      else

      { 

        message_vision(HIG"$N找了半天，終于發現其中一株草苗與其它的草略有不同，小心翼翼地掘了出來。\n"NOR,me); 

        ob1 = new(yao1[random(2)]);

        ob1->move(me);

        environment(me)->add_temp("wayao2",-1);

        me->apply_condition("skill2_busy",1+random(1));

        add_temp("workchu", -1);

        if ( query_temp("workchu") < 1)

             {

    message_vision(HIG"藥草倒是挖到了，可惜藥鋤卻不小碰壞了。\n"NOR,me); 

        destruct(this_object());

             }

      }

      return 1;

}