byd

expansions/script/c81024031.lua

@@ -43,36 +43,28 @@ end
 function cm.bacon(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
 end
-function cm.bafilter(c,tp)
+function cm.bafilter(c)
 	return c:IsAttackable() and c:IsAttack(1550) and c:IsDefense(1050) and c:IsFaceup()
-		 and Duel.IsExistingTarget(cm.bbfilter,tp,0,LOCATION_MZONE,1,c,c)
 end
-function cm.bbfilter(c,tc)
-	return c:IsCanBeBattleTarget(tc) and c:IsFaceup()
+function cm.bbfilter(c)
+	return c:IsFaceup()
 end
 function cm.batg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return false end
-	if chk==0 then return Duel.IsExistingTarget(cm.bafilter,tp,LOCATION_MZONE,0,1,e:GetHandler()) end
+	if chk==0 then return Duel.IsExistingTarget(cm.bafilter,tp,LOCATION_MZONE,0,1,nil) 
+		and Duel.IsExistingTarget(cm.bbfilter,tp,0,LOCATION_MZONE,1,nil)  end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELF)
-	local g1=Duel.SelectTarget(tp,cm.bafilter,tp,LOCATION_MZONE,0,1,1,e:GetHandler(),tp)
-	local ac=g1:GetFirst()
+	local g1=Duel.SelectTarget(tp,cm.bafilter,tp,LOCATION_MZONE,0,1,1,nil)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPPO)
-	local g2=Duel.SelectTarget(tp,cm.bbfilter,tp,0,LOCATION_MZONE,1,1,ac,ac)
-	e:SetLabelObject(ac)
-end
-function cm.cf(c,e)
-	return not c:IsRelateToEffect(e)
+	local g2=Duel.SelectTarget(tp,cm.bbfilter,tp,0,LOCATION_MZONE,1,1,nil)
 end
 function cm.baop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
 	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
-	if #g>1 and not g:IsExists(cm.cf,1,nil,e) then
-		local tc=g:GetFirst()
-		local sc=g:GetNext()
-		local ac=e:GetLabelObject()
-		if tc==ac then tc=sc end
-		if ac:IsAttackable() then Duel.CalculateDamage(ac,tc) end
-	end
+	local tg=g:Filter(Card.IsRelateToEffect,nil,e)
+	if tg:GetCount()~=2 then return end
+	local ac=tg:Filter(Card.IsControler,nil,tp):GetFirst()
+	local at=tg:Filter(Card.IsControler,nil,1-tp):GetFirst()
+	Duel.CalculateDamage(ac,at)
 end
 function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0