Replace c50224085.lua

expansions/script/c50224085.lua

@@ -23,7 +23,11 @@ function c50224085.initial_effect(c)
 	c:RegisterEffect(e2)
 end
 function c50224085.con(e,tp,eg,ep,ev,re,r,rp)
-	return ep==1-tp and Duel.GetCurrentChain()==1
+	local ct1=Duel.GetLocationCount(tp,LOCATION_MZONE)
+	local ct2=Duel.GetLocationCount(tp,LOCATION_SZONE)
+	local ct3=Duel.GetLocationCount(1-tp,LOCATION_MZONE)
+	local ct4=Duel.GetLocationCount(1-tp,LOCATION_SZONE)
+	return ep==1-tp and Duel.GetCurrentChain()==1 and math.max(ct1,ct2,ct3,ct4)>0
 end
 function c50224085.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()
@@ -42,8 +46,21 @@ function c50224085.op(e,tp,eg,ep,ev,re,r,rp)
 	e1:SetReset(RESET_EVENT+RESET_CHAIN)
 	Duel.RegisterEffect(e1,tp)
 end
+function c50224085.filter(c)
+	return c:GetSequence()<5
+end
 function c50224085.disval(e)
-	return 0x1f1f1f1f
+	local tp=e:GetOwnerPlayer()
+	local mg=Duel.GetMatchingGroup(c50224085.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
+	local occupy=0
+	if #mg<1 then return end
+	local sc=mg:GetFirst()
+	while sc do
+		occupy=occupy|aux.SequenceToGlobal(sc:GetControler(),sc:GetLocation()&0x0c,sc:GetSequence())
+		sc=mg:GetNext()
+	end
+	local lock=(0x1f1f1f1f)&(bit.bnot(occupy))
+	return lock
 end
 function c50224085.indtg(e,c)
 	local tc=e:GetHandler()