Fix -アルカナフォース

script/c101207004.lua

@@ -105,7 +105,7 @@ function s.spfilter2(c,e,tp)
 end
 function s.coinop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	local res=0
+	local res=-1
 	if c:IsHasEffect(73206827) then
 		local b1=Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp)
 		local b2=Duel.GetLocationCount(1-tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(s.spfilter2,tp,LOCATION_DECK,0,1,nil,e,tp)
@@ -115,7 +115,7 @@ function s.coinop(e,tp,eg,ep,ev,re,r,rp)
 		end
 		if b2 and not b1 then
 			Duel.Hint(HINT_OPSELECTED,1-tp,61)
-			res=2
+			res=0
 		end
 		if b1 and b2 then
 			res=aux.SelectFromOptions(tp,
@@ -132,7 +132,7 @@ function s.coinop(e,tp,eg,ep,ev,re,r,rp)
 		if g:GetCount()>0 then
 			Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
 		end
-	else
+	elseif res==0 then
 		if Duel.GetLocationCount(1-tp,LOCATION_MZONE)<=0 then return end
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 		local g=Duel.SelectMatchingCard(tp,s.spfilter2,tp,LOCATION_DECK,0,1,1,nil,e,tp)

script/c101207005.lua

@@ -59,7 +59,7 @@ function s.desfilter(c)
 end
 function s.coinop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	local res=0
+	local res=-1
 	if c:IsHasEffect(73206827) then
 		local b1=Duel.IsExistingMatchingCard(s.setfilter,tp,LOCATION_DECK,0,1,nil)
 		local b2=Duel.IsExistingMatchingCard(s.desfilter,tp,LOCATION_SZONE,LOCATION_SZONE,1,nil)
@@ -69,7 +69,7 @@ function s.coinop(e,tp,eg,ep,ev,re,r,rp)
 		end
 		if b2 and not b1 then
 			Duel.Hint(HINT_OPSELECTED,1-tp,61)
-			res=2
+			res=0
 		end
 		if b1 and b2 then
 			res=aux.SelectFromOptions(tp,
@@ -83,7 +83,7 @@ function s.coinop(e,tp,eg,ep,ev,re,r,rp)
 		if g:GetCount()>0 then
 			Duel.SSet(tp,g:GetFirst())
 		end
-	else
+	elseif res==0 then
 		local sg=Duel.GetMatchingGroup(s.desfilter,tp,LOCATION_SZONE,LOCATION_SZONE,nil)
 		Duel.Destroy(sg,REASON_EFFECT)
 	end

script/c101207034.lua

@@ -51,7 +51,7 @@ function s.thfilter(c)
 end
 function s.coinop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	local res=0
+	local res=-1
 	if c:IsHasEffect(73206827) then
 		local b1=Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK+LOCATION_HAND,0,1,nil,e,tp)
 		local b2=Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK,0,1,nil)
@@ -61,7 +61,7 @@ function s.coinop(e,tp,eg,ep,ev,re,r,rp)
 		end
 		if b2 and not b1 then
 			Duel.Hint(HINT_OPSELECTED,1-tp,61)
-			res=2
+			res=0
 		end
 		if b1 and b2 then
 			res=aux.SelectFromOptions(tp,
@@ -76,7 +76,7 @@ function s.coinop(e,tp,eg,ep,ev,re,r,rp)
 		if g:GetCount()>0 then
 			Duel.SpecialSummon(g,0,tp,tp,true,false,POS_FACEUP)
 		end
-	else
+	elseif res==0 then
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 		local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil)
 		if g:GetCount()>0 then

script/c101207054.lua

@@ -38,7 +38,7 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_COIN,nil,0,tp,1)
 end
 function s.activate(e,tp,eg,ep,ev,re,r,rp)
-	local res
+	local res=-1
 	if Duel.IsEnvironment(73206827,tp,LOCATION_FZONE) then
 		if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
 		local b1=Duel.IsExistingMatchingCard(s.spfilter1,tp,LOCATION_DECK,0,1,nil,e,tp)
@@ -49,7 +49,7 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
 		end
 		if b2 and not b1 then
 			Duel.Hint(HINT_OPSELECTED,1-tp,61)
-			res=2
+			res=0
 		end
 		if b1 and b2 then
 			res=aux.SelectFromOptions(tp,
@@ -66,7 +66,7 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
 		if g:GetCount()>0 then
 			Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
 		end
-	else
+	elseif res==0 then
 		if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 		local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.spfilter2),tp,LOCATION_GRAVE,0,1,1,nil,e,tp)