// sui.c 太極劍法 [隨]字決#include <ansi.h>#include <combat.h>void remove_effect(object me, int a_amount, int d_amount);inherit F_SSERVER;int perform(object me, object target){	object weapon;	int skill,extra;	string msg;	if( !target ) target = offensive_target(me);	if( !target	||	!target->is_character()	||	!me->is_fighting(target) )		return notify_fail("太極劍法「隨」字訣只能在戰斗中使用。\n");	if (!objectp(weapon = me->query_temp("weapon"))		|| (string)weapon->query("skill_type") != "sword")		return notify_fail("你使用的武器不對。\n");	if( (int)me->query_skill("taiji-jian", 1) < 40 )		return notify_fail("你的太極劍法不夠嫻熟，不會使用「隨」字訣。\n");        if (me->query_skill("taiji-shengong", 1)<40)                return notify_fail("你的本門內功火候未到，！\n");	if( (int)me->query("neili") < 300  ) 		return notify_fail("你的內力不夠。\n");	if( (int)me->query_temp("tjj_sui") ) 		return notify_fail("你已經在運功中了。\n");	skill = me->query_skill("taiji-jian");	extra = me->query_skill("taiji-jian",1) / 20;	extra += me->query_skill("taiji-shengong",1) /20;	me->add_temp("apply/attack", extra);		me->add_temp("apply/damage", extra);    if( (int)me->query_skill("taiji-jian", 1) > 50 )    {    msg = HIC"$n看到劍光一閃，劍光隨著$n的周身畫了第一個圈！"NOR;       COMBAT_D->do_attack(me,target, me->query_temp("weapon"),TYPE_REGULAR,msg);    msg = HIG"$n看到劍光一閃，劍光隨著$n的周身畫了第二個圈！"NOR;       COMBAT_D->do_attack(me,target, me->query_temp("weapon"),TYPE_REGULAR,msg);    msg = HIY"$n看到劍光一閃，劍光隨著$n的周身畫了第三個圈！"NOR;       COMBAT_D->do_attack(me,target, me->query_temp("weapon"),TYPE_REGULAR,msg);    }	me->add_temp("apply/attack", -extra);	me->add_temp("apply/damage", -extra);   msg = HIB "隨后$N使出太極劍法「隨」字訣，劍圈逐漸縮小將周身護住。\n"NOR;	message_combatd(msg, me, target);	me->add_temp("apply/attack", -skill/4);	me->add_temp("apply/dodge", skill/3);	me->set_temp("tjj_sui", 1);	me->start_call_out( (: call_other, __FILE__, "remove_effect", me, skill/4, skill/3 :), skill/4);	me->add("neili", -200);	if( me->is_fighting() ) me->start_busy(2);	return 1;}void remove_effect(object me, int a_amount, int d_amount){	int skill;	skill = me->query_skill("taiji-jian");	me->add_temp("apply/attack", skill/4);	me->add_temp("apply/dodge", -skill/3);	me->delete_temp("tjj_sui");	tell_object(me, HIY "你的隨字決運行完畢，將內力收回丹田。\n");}