battle destroy

script/c13521194.lua

@@ -6,7 +6,7 @@ function c13521194.initial_effect(c)
 	e1:SetCategory(CATEGORY_DAMAGE)
 	e1:SetCode(EVENT_BATTLE_DESTROYING)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e1:SetCondition(c13521194.damcondition)
+	e1:SetCondition(aux.bdcon1)
 	e1:SetTarget(c13521194.damtarget)
 	e1:SetOperation(c13521194.damoperation)
 	c:RegisterEffect(e1)
@@ -21,11 +21,6 @@ function c13521194.initial_effect(c)
 	e2:SetOperation(c13521194.spoperation)
 	c:RegisterEffect(e2)
 end
-function c13521194.damcondition(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local bc=c:GetBattleTarget()
-	return c:IsRelateToBattle() and bc and bc:IsLocation(LOCATION_GRAVE) and bc:IsType(TYPE_MONSTER)
-end
 function c13521194.damtarget(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	local a=Duel.GetAttacker()

script/c21435914.lua

@@ -32,7 +32,7 @@ end
 function c21435914.atcon(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	local bc=c:GetBattleTarget()
-	return bc and bc:IsLocation(LOCATION_GRAVE) and bc:IsType(TYPE_MONSTER) and c:IsChainAttackable(2,true) and not c:IsHasEffect(EFFECT_EXTRA_ATTACK)
+	return bc:IsLocation(LOCATION_GRAVE) and bc:IsType(TYPE_MONSTER) and c:IsChainAttackable(2,true) and not c:IsHasEffect(EFFECT_EXTRA_ATTACK)
 end
 function c21435914.atop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()

script/c58820853.lua

@@ -6,16 +6,11 @@ function c58820853.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_BATTLE_DESTROYING)
-	e1:SetCondition(c58820853.condition)
+	e1:SetCondition(aux.bdcon1)
 	e1:SetTarget(c58820853.target)
 	e1:SetOperation(c58820853.operation)
 	c:RegisterEffect(e1)
 end
-function c58820853.condition(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local bc=c:GetBattleTarget()
-	return c:IsRelateToBattle() and bc and bc:IsLocation(LOCATION_GRAVE) and bc:IsType(TYPE_MONSTER)
-end
 function c58820853.filter(c,e,tp)
 	return c:IsAttackBelow(1500) and c:IsSetCard(0x33) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end

script/c80321197.lua

@@ -8,15 +8,10 @@ function c80321197.initial_effect(c)
 	e1:SetDescription(aux.Stringid(80321197,0))
 	e1:SetCode(EVENT_BATTLE_DESTROYING)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e1:SetCondition(c80321197.spcon)
+	e1:SetCondition(aux.bdcon1)
 	e1:SetOperation(c80321197.spop)
 	c:RegisterEffect(e1)
 end
-function c80321197.spcon(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local bc=c:GetBattleTarget()
-	return c:IsRelateToBattle() and bc and bc:IsLocation(LOCATION_GRAVE) and bc:IsType(TYPE_MONSTER)
-end
 function c80321197.spop(e,tp,eg,ep,ev,re,r,rp)
 	local e1=Effect.CreateEffect(e:GetHandler())
 	e1:SetType(EFFECT_TYPE_FIELD)

script/utility.lua

@@ -948,6 +948,13 @@ function Auxiliary.disfilter1(c)
 		or c:IsType(TYPE_TRAPMONSTER)
 end
 function Auxiliary.atrst(e,tp,eg,ep,ev,re,r,rp)
+	--reset of chain attack
 	local e1=e:GetLabelObject()
 	if eg:GetFirst()~=e1:GetHandler() then e1:Reset() end
 end
+function Auxiliary.bdcon1(e,tp,eg,ep,ev,re,r,rp)
+	--condition of EVENT_BATTLE_DESTROYING + to_grave
+	local c=e:GetHandler()
+	local bc=c:GetBattleTarget()
+	return c:IsRelateToBattle() and bc:IsLocation(LOCATION_GRAVE) and bc:IsType(TYPE_MONSTER)
+end