// meng.c 碧葉隨風(fēng)舞「萬毒」

#include <ansi.h>

inherit F_SSERVER;
string *du=({
"ice_poison",
"ill_dongshang",
"ill_fashao",
"ill_kesou",
"ill_shanghan",
"ill_zhongshu",
"xx_poison",
"cold_poison",
"flower_poison",
"rose_poison",
"x2_poison",
"sanpoison",
"scorpion_poison",
"qx_snake_poison",
"anqi_poison",
"yf_poison",
"nx_poison",
"chilian_poison",
"yufeng_poison",
"insect_poison",
});

int perform(object me, object target)
{
	string msg;
int level;
object weapon;
weapon = me->query_temp("weapon");
	if( !target ) target = offensive_target(me);

	if( !target
	||	!target->is_character()
	||	!me->is_fighting(target) )
            return notify_fail("「"+HIR"萬毒"NOR+"」只能對戰(zhàn)斗中的對手使用。\n");

	if( environment(me)->query("no_fight") )
		return notify_fail("這里不能攻擊別人! \n");

//	if( !userp(target) || wizardp(target) )
//		return notify_fail("施毒只能對玩家使用。\n");


	if( objectp(me->query_temp("weapon")) 
	&& (string)weapon->query("skill_type") != "throwing")
		return notify_fail("你必須空手才能使用「萬毒」！\n");		


	if( (int)me->query_skill("qiulinshiye", 1) < 60 )
                return notify_fail("你的秋林拾葉不夠高。\n");

	if( (int)me->query_skill("biyun-xinfa", 1) < 60 )
                return notify_fail("你的碧云心法不夠高。\n");

	if( (int)me->query("neili", 1) < 500 )
		return notify_fail("你現(xiàn)在內(nèi)力太弱，不能使用「萬毒」。\n");

        level=(int)me->query_skill("biye-wu", 1);
if (!level) level=10;
	if( (int)me->query("neili") < 500 )
		return notify_fail("你現(xiàn)在的內(nèi)力不夠！\n");

	msg = HIW "$N突然收掌，然后迅速發(fā)掌! 掌中盡然有毒砂，這掌風(fēng)盡然是五顏六色的！！\n";

	me->start_busy(1);
	if( random( (int)me->query("combat_exp",1))
          > target->query("combat_exp")/3  ) {
		msg += HIR"$n硬起頭皮，以掌硬接！！結(jié)果身中巨毒！\n" NOR;
            me->add("neili",-300);
		me->start_busy(2);
            target->receive_damage("qi",20);
            target->receive_wound("qi",15 + random(10));
            target->apply_condition(du[random(sizeof(du))], 25);
            target->apply_condition(du[random(sizeof(du))], 25);
            target->apply_condition(du[random(sizeof(du))], 25);
            target->apply_condition(du[random(sizeof(du))], 25);
            target->apply_condition(du[random(sizeof(du))], 25);
            target->start_busy(1 + random(2));
		message_combatd(msg, me, target);
		COMBAT_D->report_status(target);
	} else {
		msg += "$p急提內(nèi)力奮力一震，將$N撒出的毒粉卸在了身旁!\n" NOR;
		me->start_busy(3);
            me->add("neili",-300);
		message_combatd(msg, me, target);
	}
	return 1;
}