fix

expansions/script/c11626011.lua

@@ -12,7 +12,7 @@ function s.initial_effect(c)
 	--spsummon
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(id,0))
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
 	e1:SetType(EFFECT_TYPE_IGNITION)
 	e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
 	e1:SetCountLimit(1,id)
@@ -21,6 +21,7 @@ function s.initial_effect(c)
 	e1:SetTarget(s.sptg)
 	e1:SetOperation(s.spop)
 	c:RegisterEffect(e1)
+	Duel.AddCustomActivityCounter(97148796,ACTIVITY_SPSUMMON,Auxiliary.DrytronCounterFilter)
 end
 function s.splimit(e,se,sp,st)
 	return se:GetHandler():IsSetCard(0x154)
@@ -33,6 +34,14 @@ function s.spcon(e,tp,eg,ep,ev,re,r,rp)
 end
 function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetCustomActivityCount(97148796,tp,ACTIVITY_SPSUMMON)==0 end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(Auxiliary.DrytronSpSummonLimit)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
 	--cant special summon summonable card check
 	local e2=Effect.CreateEffect(e:GetHandler())
 	e2:SetType(EFFECT_TYPE_FIELD)

expansions/script/c28316149.lua

@@ -85,14 +85,17 @@ function c28316149.regop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetMatchingGroup(c28316149.setfilter,p,LOCATION_DECK,0,nil,e,p,c:GetPreviousCodeOnField())
 	if c:IsReason(REASON_DESTROY) and #g>0 then
 		Duel.Hint(HINT_CARD,0,28316149)
-		Duel.Hint(HINT_SELECTMSG,p,HINTMSG_SET)
-		local tc=g:Select(p,1,1,nil):GetFirst()
-		if tc:IsSSetable() then
-			Duel.SSet(tp,tc)
-		else
+		local tc=g:GetFirst()
+		if #g>=2 then
+			Duel.Hint(HINT_SELECTMSG,p,HINTMSG_SET)
+			tc=g:Select(p,1,1,nil):GetFirst()
+		end
+		if Duel.GetMZoneCount(p)>0 and tc:IsCanBeSpecialSummoned(e,0,p,false,false,POS_FACEDOWN_DEFENSE) and (not tc:IsSSetable() or Duel.SelectOption(tp,1152,1153)==0) then
 			Duel.SpecialSummon(tc,0,p,p,false,false,POS_FACEDOWN_DEFENSE)
+			Duel.ConfirmCards(1-p,tc)
+		else
+			Duel.SSet(tp,tc)
 		end
-		Duel.ConfirmCards(1-p,tc)
 	end
 	e:Reset()
 end

expansions/script/c28333723.lua

@@ -63,10 +63,13 @@ function c28333723.regop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetMatchingGroup(c28333723.thfilter,p,LOCATION_GRAVE,0,nil,e:GetLabel())
 	if c:IsReason(REASON_DESTROY) and #g>0 then
 		Duel.Hint(HINT_CARD,0,28333723)
-		Duel.Hint(HINT_SELECTMSG,p,HINTMSG_ATOHAND)
-		local sg=g:Select(p,1,1,nil)
-		Duel.HintSelection(sg)
-		Duel.SendtoHand(sg,nil,REASON_EFFECT)
+		local tc=g:GetFirst()
+		if #g>=2 then
+			Duel.Hint(HINT_SELECTMSG,p,HINTMSG_ATOHAND)
+			tc=g:Select(p,1,1,nil):GetFirst()
+		end
+		Duel.HintSelection(Group.FromCards(tc))
+		Duel.SendtoHand(tc,nil,REASON_EFFECT)
 	end
 	e:Reset()
 end

expansions/script/c28381783.lua

@@ -19,7 +19,7 @@ function c28381783.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
 	--e1:SetProperty(EFFECT_FLAG_DELAY)
-	--e1:SetCondition(c28381783.tgcon)
+	--e1:SetCondition(c28381783.descon)
 	e1:SetTarget(c28381783.destg)
 	e1:SetOperation(c28381783.desop)
 	c:RegisterEffect(e1)
@@ -28,7 +28,6 @@ function c28381783.initial_effect(c)
 	ce1:SetType(EFFECT_TYPE_SINGLE)
 	ce1:SetCode(EFFECT_MATERIAL_CHECK)
 	ce1:SetValue(c28381783.valcheck)
-	ce1:SetLabelObject(e1)
 	c:RegisterEffect(ce1)
 end
 function c28381783.ffilter(c)
@@ -65,19 +64,20 @@ function c28381783.sprop(e,tp,eg,ep,ev,re,r,rp,c)
 	mg:DeleteGroup()
 	Duel.RegisterFlagEffect(tp,28381783,RESET_PHASE+PHASE_END,EFFECT_FLAG_OATH,1)
 end
-function c28381783.tgcon(e,tp,eg,ep,ev,re,r,rp)
+function c28381783.descon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION)
 end
 function c28381783.destg(e,tp,eg,ep,ev,re,r,rp,chk)
-	local ct=e:GetLabel()
-	if chk==0 then return ct>0 and Duel.IsExistingMatchingCard(Card.IsSetCard,tp,LOCATION_DECK,0,1,nil,0x285) end
+	local ct=e:GetHandler():GetFlagEffectLabel(28381783)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsSetCard,tp,LOCATION_DECK,0,1,nil,0x285) and ct and ct>0 end
+	e:SetLabel(ct)
 	Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,tp,LOCATION_DECK)
 end
 function c28381783.thfilter(c)
 	return c:IsSetCard(0x285) and c:IsAbleToHand() and c:IsFaceupEx() and aux.NecroValleyFilter()(c)
 end
 function c28381783.desop(e,tp,eg,ep,ev,re,r,rp)
-	local ct=e:GetHandler():IsRelateToChain() and e:GetLabel() or 0
+	local ct=e:GetLabel()
 	if ct>0 then
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
 		local g=Duel.SelectMatchingCard(tp,Card.IsSetCard,tp,LOCATION_DECK,0,1,ct,nil,0x285)
@@ -91,5 +91,5 @@ function c28381783.desop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function c28381783.valcheck(e,c)
-	e:GetLabelObject():SetLabel(c:GetMaterialCount())
+	c:RegisterFlagEffect(28381783,RESET_EVENT+0xff0000,0,1,c:GetMaterialCount())
 end

expansions/script/c28382113.lua

@@ -29,7 +29,6 @@ function c28382113.initial_effect(c)
 	ce1:SetType(EFFECT_TYPE_SINGLE)
 	ce1:SetCode(EFFECT_MATERIAL_CHECK)
 	ce1:SetValue(c28382113.valcheck)
-	ce1:SetLabelObject(e1)
 	c:RegisterEffect(ce1)
 end
 function c28382113.ffilter(c)
@@ -70,17 +69,18 @@ function c28382113.descon(e,tp,eg,ep,ev,re,r,rp)
 	return rp==1-tp
 end
 function c28382113.destg(e,tp,eg,ep,ev,re,r,rp,chk)
-	local ct=e:GetHandler():GetMaterialCount()
+	local ct=e:GetHandler():GetFlagEffectLabel(28382113)
 	local g=Duel.GetMatchingGroup(nil,tp,LOCATION_ONFIELD,0,nil)
-	if chk==0 then return ct>0 and #g>0 end
+	if chk==0 then return ct and ct>0 and #g>0 end
 	e:GetHandler():RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(28382113,1))
+	e:SetLabel(ct)
 	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
 end
 function c28382113.gcheck(sg,tp)
 	return sg:IsExists(Card.IsControler,1,nil,tp)
 end
 function c28382113.desop(e,tp,eg,ep,ev,re,r,rp)
-	local ct=e:GetHandler():IsRelateToChain() and e:GetHandler():GetMaterialCount() or 0
+	local ct=e:GetLabel()
 	local g=Duel.GetMatchingGroup(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
 	if ct>0 and #g>0 then
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
@@ -93,5 +93,5 @@ function c28382113.desop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function c28382113.valcheck(e,c)
-	e:GetLabelObject():SetLabel(c:GetMaterialCount())
+	c:RegisterFlagEffect(28382113,RESET_EVENT+0xff0000,0,1,c:GetMaterialCount())
 end

expansions/script/c33201755.lua

@@ -22,10 +22,10 @@ function s.initial_effect(c)
 	e1:SetDescription(aux.Stringid(id, 0))
 	e1:SetCategory(CATEGORY_TOHAND + CATEGORY_SEARCH)
 	e1:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_TRIGGER_O) -- 诱发效果
-	e1:SetCode(EVENT_SPSUMMON_SUCCESS)				 -- 特殊召唤成功时
-	e1:SetProperty(EFFECT_FLAG_DELAY)				   -- 即使在连锁2以后特召也能发动
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)			   -- 特殊召唤成功时
+	e1:SetProperty(EFFECT_FLAG_DELAY)				  -- 即使在连锁2以后特召也能发动
 	e1:SetRange(LOCATION_PZONE)
-	e1:SetCountLimit(1, id)						   -- 卡名1回合1次
+	e1:SetCountLimit(1, id)						-- 卡名1回合1次
 	e1:SetCondition(s.srcon)
 	e1:SetTarget(s.srtg)
 	e1:SetOperation(s.srop)
@@ -54,7 +54,7 @@ end
 -- 判断特召的怪兽是否出现在这张卡的连接区
 function s.cfilter(c, lc)
 	-- 获取该连接怪兽当前指向的所有格子中的怪兽
-	return lc:GetLinkedGroup():IsContains(c)
+	return lc:GetLinkedGroup():IsContains(c) and c:GetSequence()<5
 end
 
 function s.srcon(e, tp, eg, ep, ev, re, r, rp)