fix

script/c29223325.lua

@@ -21,23 +21,41 @@ function c29223325.initial_effect(c)
 	c:RegisterEffect(e2)
 end
 function c29223325.filter(c)
-	return c:IsSetCard(0x97) and c:IsType(TYPE_MONSTER) and c:IsSSetable()
+	return c:IsSetCard(0x97) and c:IsType(TYPE_MONSTER) and c:IsSSetable(true)
 end
 function c29223325.desfilter(c)
 	return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable()
 end
+function c29223325.desfilter2(c)
+	return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable() and c:GetSequence()~=5
+end
 function c29223325.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsOnField() and c29223325.desfilter(chkc) end
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
-		and Duel.IsExistingTarget(c29223325.desfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler())
-		and Duel.IsExistingMatchingCard(c29223325.filter,tp,LOCATION_DECK,0,1,nil) end
+	if chk==0 then
+		if not Duel.IsExistingMatchingCard(c29223325.filter,tp,LOCATION_DECK,0,1,nil) then return false end
+		local ft=Duel.GetLocationCount(tp,LOCATION_SZONE)
+		if e:GetHandler():IsLocation(LOCATION_HAND) then ft=ft-1 end
+		if ft<0 then return false
+		elseif ft>0 then
+			return Duel.IsExistingTarget(c29223325.desfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler())
+		else
+			return Duel.IsExistingTarget(c29223325.desfilter2,tp,LOCATION_SZONE,0,1,e:GetHandler())
+		end
+	end
+	local ft=Duel.GetLocationCount(tp,LOCATION_SZONE)
+	local g=nil
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
-	local g=Duel.SelectTarget(tp,c29223325.desfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,e:GetHandler())
+	if ft>0 then
+		g=Duel.SelectTarget(tp,c29223325.desfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,e:GetHandler())
+	else
+		g=Duel.SelectTarget(tp,c29223325.desfilter2,tp,LOCATION_SZONE,0,1,1,e:GetHandler())
+	end
 	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
 end
 function c29223325.activate(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
 	if tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)~=0 then
+		if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
 		local g=Duel.SelectMatchingCard(tp,c29223325.filter,tp,LOCATION_DECK,0,1,1,nil)
 		if g:GetCount()>0 then

script/c32623004.lua

@@ -6,7 +6,7 @@ function c32623004.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_QUICK_F)
 	e1:SetCode(EVENT_CHAINING)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
 	e1:SetRange(LOCATION_GRAVE)
 	e1:SetCondition(c32623004.spcon)
 	e1:SetCost(c32623004.spcost)
@@ -28,7 +28,11 @@ function c32623004.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return re:GetHandler():IsSetCard(0x5a)
 end
 function c32623004.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,32623004)==0 end
+	if chk==0 then
+		if Duel.GetFlagEffect(tp,32623005)~=0 then return false end
+		Duel.RegisterFlagEffect(tp,32623005,RESET_CHAIN,0,1)
+		return Duel.GetFlagEffect(tp,32623004)==0
+	end
 	Duel.RegisterFlagEffect(tp,32623004,RESET_PHASE+PHASE_END,0,1)
 end
 function c32623004.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
@@ -41,6 +45,5 @@ function c32623004.spop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function c32623004.rmtg(e,c)
-	local rc=c:GetReasonCard()
-	return rc and rc:IsSetCard(0x5a) and c:IsReason(REASON_EFFECT)
+	return c:IsReason(REASON_EFFECT) and c:GetReasonEffect():GetHandler():IsSetCard(0x5a)
 end

script/c35537251.lua

@@ -12,6 +12,25 @@ function c35537251.initial_effect(c)
 	c:RegisterEffect(e1)
 end
 function c35537251.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetFlagEffect(tp,35537251)==0 end
+	Duel.RegisterFlagEffect(tp,35537251,RESET_PHASE+PHASE_END,0,1)
+end
+function c35537251.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then
+		local g=Group.CreateGroup()
+		for i=0,4 do
+			local tc=Duel.GetFieldCard(tp,LOCATION_MZONE,i)
+			if tc and tc:IsFaceup() and tc:IsSetCard(0x84) and tc:IsType(TYPE_XYZ) then
+				g:Merge(tc:GetOverlayGroup())
+			end
+		end
+		if g:GetCount()==0 then return false end
+		return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+			and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false)
+	end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function c35537251.spop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Group.CreateGroup()
 	for i=0,4 do
 		local tc=Duel.GetFieldCard(tp,LOCATION_MZONE,i)
@@ -19,18 +38,10 @@ function c35537251.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
 			g:Merge(tc:GetOverlayGroup())
 		end
 	end
-	if chk==0 then return g:GetCount()>0 and Duel.GetFlagEffect(tp,35537251)==0 end
+	if g:GetCount()==0 then return end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVEXYZ)
 	local sg=g:Select(tp,1,1,nil)
-	Duel.SendtoGrave(sg,REASON_COST)
-	Duel.RegisterFlagEffect(tp,35537251,RESET_PHASE+PHASE_END,0,1)
-end
-function c35537251.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
-end
-function c35537251.spop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.SendtoGrave(sg,REASON_EFFECT)
 	if e:GetHandler():IsRelateToEffect(e) then
 		Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)
 	end

script/c46925518.lua

@@ -64,7 +64,7 @@ function c46925518.operation(e,tp,eg,ep,ev,re,r,rp)
 	if sg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(46925518,1)) then
 		Duel.BreakEffect()
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-		local tg=g:Select(tp,1,1,nil)
+		local tg=sg:Select(tp,1,1,nil)
 		if Duel.SpecialSummon(tg,0,tp,tp,false,false,POS_FACEDOWN_DEFENCE)~=0 then
 			Duel.ConfirmCards(1-tp,tg)
 		end

script/c56051086.lua

@@ -69,12 +69,11 @@ function c56051086.eqop(e,tp,eg,ep,ev,re,r,rp)
 		e1:SetCode(EFFECT_EQUIP_LIMIT)
 		e1:SetReset(RESET_EVENT+0x1fe0000)
 		e1:SetValue(c56051086.eqlimit)
-		e1:SetLabelObject(tc)
 		tc:RegisterEffect(e1)
 	end
 end
 function c56051086.eqlimit(e,c)
-	return c==e:GetLabelObject()
+	return c==e:GetOwner()
 end
 function c56051086.indcon(e)
 	return e:GetHandler():GetEquipGroup():IsExists(Card.IsSetCard,1,nil,0x48)

script/c57734012.lua

@@ -3,7 +3,7 @@ function c57734012.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e1:SetCode(EVENT_DRAW)
+	e1:SetCode(EVENT_TO_HAND)
 	e1:SetCondition(c57734012.regcon)
 	e1:SetOperation(c57734012.regop)
 	c:RegisterEffect(e1)
@@ -17,8 +17,9 @@ function c57734012.initial_effect(c)
 	c:RegisterEffect(e2)
 end
 function c57734012.regcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
 	return Duel.GetFlagEffect(tp,57734012)==0 and Duel.GetCurrentPhase()==PHASE_DRAW
-		and e:GetHandler():IsReason(REASON_RULE) and not e:GetHandler():IsPublic()
+		and c:IsReason(REASON_DRAW) and c:IsReason(REASON_RULE) and not c:IsPublic()
 end
 function c57734012.regop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()

script/c59708927.lua

@@ -31,14 +31,14 @@ end
 function c59708927.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>1
 		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false)
-		and Duel.IsExistingMatchingCard(c59708927.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end
+		and Duel.IsExistingMatchingCard(c59708927.filter,tp,LOCATION_HAND,0,1,e:GetHandler(),e,tp) end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,2,tp,LOCATION_HAND)
 end
 function c59708927.spop(e,tp,eg,ep,ev,re,r,rp)
 	if not e:GetHandler():IsRelateToEffect(e) then return end
 	if Duel.GetLocationCount(tp,LOCATION_MZONE)<2 then return end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectMatchingCard(tp,c59708927.filter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
+	local g=Duel.SelectMatchingCard(tp,c59708927.filter,tp,LOCATION_HAND,0,1,1,e:GetHandler(),e,tp)
 	if g:GetCount()>0 then
 		g:AddCard(e:GetHandler())
 		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)

script/c6351548.lua

@@ -6,7 +6,7 @@ function c6351548.initial_effect(c)
 	e1:SetCategory(CATEGORY_TOGRAVE)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_TO_GRAVE)
-	e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
 	e1:SetCondition(c6351548.condition)
 	e1:SetCost(c6351548.cost)
 	e1:SetTarget(c6351548.target)

script/c69840739.lua

@@ -11,6 +11,7 @@ function c69840739.initial_effect(c)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCondition(c69840739.chcon)
 	e1:SetCost(c69840739.cost)
+	e1:SetTarget(c69840739.chtg)
 	e1:SetOperation(c69840739.chop)
 	c:RegisterEffect(e1)
 	--reload
@@ -36,6 +37,9 @@ function c69840739.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
 	e:GetHandler():RegisterFlagEffect(69840739,RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END,0,1)
 end
+function c69840739.chtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c69840739.filter,rp,0,LOCATION_ONFIELD,1,nil) end
+end
 function c69840739.chop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Group.CreateGroup()
 	Duel.ChangeTargetCard(ev,g)

script/c71921856.lua

@@ -33,7 +33,7 @@ function c71921856.initial_effect(c)
 end
 c71921856.xyz_number=79
 function c71921856.filter(c)
-	return c:IsSetCard(0x85)
+	return c:IsSetCard(0x84)
 end
 function c71921856.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(c71921856.filter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil) end

script/c8038143.lua

@@ -21,6 +21,7 @@ function c8038143.cfilter(c)
 end
 function c8038143.condition(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.IsExistingMatchingCard(c8038143.cfilter,tp,LOCATION_MZONE,0,1,nil)
+		and rp~=tp and (re:IsActiveType(TYPE_MONSTER) or re:IsHasType(EFFECT_TYPE_ACTIVATE)) and Duel.IsChainNegatable(ev)
 end
 function c8038143.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
@@ -28,7 +29,7 @@ function c8038143.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	local dg=Group.CreateGroup()
 	for i=1,ev do
 		local te,tgp=Duel.GetChainInfo(i,CHAININFO_TRIGGERING_EFFECT,CHAININFO_TRIGGERING_PLAYER)
-		if tgp~=tp and (te:IsActiveType(TYPE_MONSTER) or te:IsHasType(EFFECT_TYPE_ACTIVATE)) then
+		if tgp~=tp then
 			local tc=te:GetHandler()
 			ng:AddCard(tc)
 			if tc:IsOnField() and tc:IsRelateToEffect(te) and tc:IsAbleToDeck() then
@@ -44,7 +45,7 @@ function c8038143.activate(e,tp,eg,ep,ev,re,r,rp)
 	local dg=Group.CreateGroup()
 	for i=1,ev do
 		local te,tgp=Duel.GetChainInfo(i,CHAININFO_TRIGGERING_EFFECT,CHAININFO_TRIGGERING_PLAYER)
-		if tgp~=tp and (te:IsActiveType(TYPE_MONSTER) or te:IsHasType(EFFECT_TYPE_ACTIVATE)) then
+		if tgp~=tp then
 			Duel.NegateActivation(i)
 			local tc=te:GetHandler()
 			if tc:IsRelateToEffect(e) and tc:IsRelateToEffect(te) and tc:IsAbleToDeck() then

script/c8316565.lua

@@ -16,7 +16,8 @@ end
 function c8316565.condition(e,tp,eg,ep,ev,re,r,rp)
 	local ph=Duel.GetCurrentPhase()
 	return Duel.IsExistingMatchingCard(c8316565.cfilter,tp,LOCATION_MZONE,0,1,nil)
-		and ph>PHASE_MAIN1 and ph<PHASE_MAIN2 and re:IsHasType(EFFECT_TYPE_ACTIVATE) and Duel.IsChainNegatable(ev)
+		and ph>PHASE_MAIN1 and ph<PHASE_MAIN2
+		and (re:IsActiveType(TYPE_MONSTER) or re:IsHasType(EFFECT_TYPE_ACTIVATE)) and Duel.IsChainNegatable(ev)
 end
 function c8316565.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end

script/c93238626.lua

@@ -14,6 +14,7 @@ function c93238626.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
 	e2:SetCode(EVENT_PHASE+PHASE_END)
 	e2:SetRange(LOCATION_SZONE)
+	e2:SetCountLimit(1)
 	e2:SetCondition(c93238626.reccon)
 	e2:SetTarget(c93238626.rectg)
 	e2:SetOperation(c93238626.recop)

script/c95239444.lua

@@ -47,7 +47,8 @@ function c95239444.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
 end
 function c95239444.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>0 end
+	if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>0
+		and Duel.IsExistingMatchingCard(Card.IsAbleToHand,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler()) end
 end
 function c95239444.operation(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
@@ -65,6 +66,7 @@ function c95239444.operation(e,tp,eg,ep,ev,re,r,rp)
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
 		local tg=Duel.SelectMatchingCard(tp,Card.IsAbleToHand,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,sg:GetCount(),c)
 		if tg:GetCount()>0 then
+			Duel.BreakEffect()
 			Duel.DisableShuffleCheck(false)
 			Duel.SendtoHand(tg,nil,REASON_EFFECT)
 		end