fix

expansions/script/c11451520.lua

 --山雨欲来
 --21.04.21
-local m=11451520
-local cm=_G["c"..m]
+local cm,m=GetID()
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)
@@ -41,6 +40,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 		Duel.BreakEffect()
 		c:CancelToGrave()
 		Duel.SendtoHand(c,1-tp,REASON_EFFECT)
+		Duel.ShuffleHand(1-tp)
 	end
 end
 function cm.con(e)
@@ -48,5 +48,11 @@ function cm.con(e)
 	return Duel.GetCustomActivityCount(m,tp,ACTIVITY_CHAIN)<=3
 end
 function cm.aclimit(e,tp,eg,ep,ev,re,r,rp)
-	if ep==tp then Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1) end
+	local c=e:GetHandler()
+	local ct=Duel.GetCustomActivityCount(m,tp,ACTIVITY_CHAIN)
+	if ep==tp then
+		--Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
+		c:SetTurnCounter(ct)
+		if Duel.GetCustomActivityCount(m,tp,ACTIVITY_CHAIN)>=3 then e:Reset() end
+	end
 end
\ No newline at end of file

expansions/script/c11451531.lua

@@ -131,6 +131,7 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 			Duel.DisableShuffleCheck()
 			Duel.SendtoHand(tc,1-tp,REASON_EFFECT)
 			Duel.ConfirmCards(tp,tc)
+			Duel.ShuffleHand(1-tp)
 		end
 	end
 end
\ No newline at end of file

expansions/script/c11451532.lua

@@ -123,5 +123,5 @@ function cm.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.drop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) and Duel.SendtoHand(c,1-tp,REASON_EFFECT)>0 then Duel.Draw(tp,1,REASON_EFFECT) end
+	if c:IsRelateToEffect(e) and Duel.SendtoHand(c,1-tp,REASON_EFFECT)>0 then Duel.ShuffleHand(1-tp) Duel.Draw(tp,1,REASON_EFFECT) end
 end
\ No newline at end of file

expansions/script/c11451533.lua

@@ -137,6 +137,7 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 			Duel.DisableShuffleCheck()
 			Duel.SendtoHand(tc,1-tp,REASON_EFFECT)
 			Duel.ConfirmCards(tp,tc)
+			Duel.ShuffleHand(1-tp)
 		end
 	end
 end
\ No newline at end of file

expansions/script/c11451534.lua

@@ -157,5 +157,5 @@ function cm.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.drop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) and Duel.SendtoHand(c,1-tp,REASON_EFFECT)>0 then Duel.Draw(tp,1,REASON_EFFECT) end
+	if c:IsRelateToEffect(e) and Duel.SendtoHand(c,1-tp,REASON_EFFECT)>0 then Duel.ShuffleHand(1-tp) Duel.Draw(tp,1,REASON_EFFECT) end
 end
\ No newline at end of file

expansions/script/c11451535.lua

@@ -123,6 +123,7 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 			Duel.DisableShuffleCheck()
 			Duel.SendtoHand(tc,1-tp,REASON_EFFECT)
 			Duel.ConfirmCards(tp,tc)
+			Duel.ShuffleHand(1-tp)
 		end
 	end
 end
\ No newline at end of file

expansions/script/c11451536.lua

@@ -117,5 +117,5 @@ function cm.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.drop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) and Duel.SendtoHand(c,1-tp,REASON_EFFECT)>0 then Duel.Draw(tp,1,REASON_EFFECT) end
+	if c:IsRelateToEffect(e) and Duel.SendtoHand(c,1-tp,REASON_EFFECT)>0 then Duel.ShuffleHand(1-tp) Duel.Draw(tp,1,REASON_EFFECT) end
 end
\ No newline at end of file

expansions/script/c11451538.lua

@@ -118,6 +118,7 @@ function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()
 	if chk==0 then return c:IsAbleToHandAsCost() end
 	Duel.SendtoHand(c,1-tp,REASON_COST)
+	Duel.ShuffleHand(1-tp)
 end
 function cm.op(e,tp,eg,ep,ev,re,r,rp)
 	local e1=Effect.CreateEffect(e:GetHandler())

expansions/script/c11451539.lua

@@ -142,6 +142,7 @@ function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()
 	if chk==0 then return c:IsAbleToHandAsCost() end
 	Duel.SendtoHand(c,1-tp,REASON_COST)
+	Duel.ShuffleHand(1-tp)
 end
 function cm.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsOnField() and chkc:IsAbleToHand() end

expansions/script/c11451540.lua

@@ -70,6 +70,7 @@ function cm.otop(e,tp,eg,ep,ev,re,r,rp,c)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 	local sg=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,1,nil,e,tp)
 	Duel.SpecialSummon(sg,0,tp,1-tp,false,false,POS_FACEUP)
+	c:SetMaterial(nil)
 end
 function cm.con(e,tp,eg,ep,ev,re,r,rp)
 	e:SetLabel(#eg)
@@ -79,6 +80,7 @@ function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()
 	if chk==0 then return c:IsAbleToHandAsCost() end
 	Duel.SendtoHand(c,1-tp,REASON_COST)
+	Duel.ShuffleHand(1-tp)
 end
 function cm.setfilter(c)
 	return c:GetType()==TYPE_TRAP and c:IsSSetable()

expansions/script/c11451558.lua

@@ -209,6 +209,7 @@ function cm.excost(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,1))
 	local cg=g:Select(tp,1,#g,nil)
 	Duel.SendtoHand(cg,1-tp,REASON_COST)
+	Duel.ShuffleHand(1-tp)
 	local ft=Duel.GetOperatedGroup():FilterCount(cm.thfilter,nil,tp)
 	e:SetLabel(ft)
 end

expansions/script/c11451710.lua

@@ -80,6 +80,7 @@ function cm.cacost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()
 	if chk==0 then return c:IsAbleToHandAsCost() end
 	Duel.SendtoHand(c,1-tp,REASON_COST)
+	Duel.ShuffleHand(1-tp)
 end
 function cm.catg(e,tp,eg,ep,ev,re,r,rp,chk)
 	local g=Duel.GetMatchingGroup(cm.setfilter,tp,LOCATION_DECK,0,nil,tp)

expansions/script/c22348428.lua

@@ -84,8 +84,11 @@ function c22348428.seqtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	local tctb={}
 	for tc in aux.Next(g) do
 		local lv=tc:GetLevel()
+		if not tct[lv] then
+			tct[lv]=true
 			table.insert(tctb,lv)
 		end
+	end
 	local num=Duel.AnnounceNumber(tp,table.unpack(tctb))
 	e:SetLabel(num)
 	Duel.ShuffleExtra(tp)

expansions/script/c25000037.lua

@@ -6,14 +6,39 @@ function s.initial_effect(c)
 	e1:SetDescription(aux.Stringid(id,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_QUICK_O)
-	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCode(EVENT_CHAINING)
 	e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
 	e1:SetCountLimit(1,id)
 	e1:SetCondition(s.spcon)
 	e1:SetCost(s.spcost)
-	e1:SetTarget(s.sptg)
+	e1:SetTarget(s.sptg(EVENT_CHAINING))
 	e1:SetOperation(s.spop)
 	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetHintTiming(TIMING_BATTLE_END,TIMING_BATTLE_START+TIMING_BATTLE_END)
+	e2:SetTarget(s.sptg(EVENT_FREE_CHAIN))
+	c:RegisterEffect(e2)
+	local e3=e1:Clone()
+	e3:SetCode(EVENT_SUMMON)
+	e3:SetTarget(s.sptg(EVENT_SUMMON))
+	c:RegisterEffect(e3)
+	local e4=e1:Clone()
+	e4:SetCode(EVENT_FLIP_SUMMON)
+	e4:SetTarget(s.sptg(EVENT_FLIP_SUMMON))
+	c:RegisterEffect(e4)
+	local e5=e1:Clone()
+	e5:SetCode(EVENT_SPSUMMON)
+	e5:SetTarget(s.sptg(EVENT_SPSUMMON))
+	c:RegisterEffect(e5)
+	local e6=e1:Clone()
+	e6:SetCode(EVENT_TO_HAND)
+	e6:SetTarget(s.sptg(EVENT_TO_HAND))
+	c:RegisterEffect(e6)
+	local e7=e1:Clone()
+	e7:SetCode(EVENT_ATTACK_ANNOUNCE)
+	e7:SetTarget(s.sptg(EVENT_ATTACK_ANNOUNCE))
+	c:RegisterEffect(e7)
 	Duel.AddCustomActivityCounter(id,ACTIVITY_CHAIN,s.chainfilter)
 end
 function s.chainfilter(re,tp,cid)
@@ -23,19 +48,30 @@ end
 function s.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return (Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2)
 end
-function s.costfilter(c)
-	return bit.band(c:GetType(),TYPE_TRAP+TYPE_COUNTER)==TYPE_TRAP+TYPE_COUNTER and c:IsAbleToRemoveAsCost()
-		and c:CheckActivateEffect(false,true,false)
+function s.costfilter(c,event)
+	if not (bit.band(c:GetType(),TYPE_TRAP+TYPE_COUNTER)==TYPE_TRAP+TYPE_COUNTER and c:IsAbleToDeckAsCost()) then return false end
+	local te=c:CheckActivateEffect(true,true,false)
+	return te and te:GetCode()==event
 end
 function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	local c=e:GetHandler()
-	if chk==0 then return Duel.IsExistingMatchingCard(s.costfilter,tp,LOCATION_GRAVE,0,1,e:GetHandler()) end
+	e:SetLabel(1)
+	return true
+end
+function s.sptg(event)
+	return  function(e,tp,eg,ep,ev,re,r,rp,chk)
+			if chk==0 then
+				if e:GetLabel()==0 then return false end
+				e:SetLabel(0)
+				return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+				and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) 
+				and Duel.IsExistingMatchingCard(s.costfilter,tp,LOCATION_GRAVE,0,1,c,event)
+			end
 			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
-	local g=Duel.SelectMatchingCard(tp,s.costfilter,tp,LOCATION_GRAVE,0,1,1,e:GetHandler())
+			local g=Duel.SelectMatchingCard(tp,s.costfilter,tp,LOCATION_GRAVE,0,1,1,c,event)
 			Duel.HintSelection(g)
-	Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_COST)
 			local tc=g:GetFirst()
-	local te,ceg,cev,cre,cr,crp=tc:CheckActivateEffect(false,true,true)
+			local te,ceg,cev,cre,cr,crp=tc:CheckActivateEffect(true,true,true)
+			Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_COST)
 			Duel.ClearTargetCard()
 			tc:CreateEffectRelation(e)
 			local tg=te:GetTarget()
@@ -43,11 +79,8 @@ function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
 			te:SetLabelObject(e:GetLabelObject())
 			e:SetLabelObject(te)
 			Duel.ClearOperationInfo(0)
-end
-function s.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
 end
 function s.setfilter(c)
 	return c:IsCode(92512625) and c:IsSSetable()

expansions/script/c43990025.lua

@@ -38,7 +38,7 @@ function cm.initial_effect(c)
 	e4:SetRange(LOCATION_MZONE)
 	e4:SetCountLimit(1)
 	e4:SetCondition(c43990025.chcon)
-	e4:SetTarget(c43990025.chtg)
+	--e4:SetTarget(c43990025.chtg)
 	e4:SetOperation(c43990025.chop)
 	c:RegisterEffect(e4)
 	

expansions/script/c43990026.lua

@@ -33,12 +33,12 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e3)
 	--change effect
 	local e4=Effect.CreateEffect(c)
-	e4:SetType(EFFECT_TYPE_QUICK_O)
+	e4:SetType(EFFECT_TYPE_QUICK_F)
 	e4:SetCode(EVENT_CHAINING)
 	e4:SetRange(LOCATION_MZONE)
 	e4:SetCountLimit(1)
 	e4:SetCondition(c43990026.chcon)
-	e4:SetTarget(c43990026.chtg)
+	--e4:SetTarget(c43990026.chtg)
 	e4:SetOperation(c43990026.chop)
 	c:RegisterEffect(e4)
 	

expansions/script/c43990027.lua

@@ -38,7 +38,7 @@ function cm.initial_effect(c)
 	e4:SetRange(LOCATION_MZONE)
 	e4:SetCountLimit(1)
 	e4:SetCondition(c43990027.chcon)
-	e4:SetTarget(c43990027.chtg)
+	--e4:SetTarget(c43990027.chtg)
 	e4:SetOperation(c43990027.chop)
 	c:RegisterEffect(e4)
 	

expansions/script/c49811179.lua

@@ -39,7 +39,7 @@ function c49811179.initial_effect(c)
 	c:RegisterEffect(e3)
 	local e4=Effect.CreateEffect(c)
 	e4:SetDescription(aux.Stringid(49811179,1))
-    e4:SetCategory(CATEGORY_DESTROY)
+	e4:SetCategory(CATEGORY_POSITION)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e4:SetProperty(EFFECT_FLAG_DELAY)
 	e4:SetCode(EVENT_DESTROYED)
@@ -54,7 +54,7 @@ function c49811179.sdcon(e)
 		and not Duel.IsExistingMatchingCard(Card.IsFacedown,e:GetHandlerPlayer(),0,LOCATION_ONFIELD,1,nil)
 end
 function c49811179.imfilter(c)
-    return c:IsSetCard(1) and c:IsType(TYPE_SYNCHRO) and c:IsFaceup()
+	return c:IsSetCard(0x1) and c:IsType(TYPE_SYNCHRO) and c:IsFaceup()
 end
 function c49811179.imcon(e)
 	return Duel.IsExistingMatchingCard(c49811179.imfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
@@ -64,7 +64,7 @@ function c49811179.gravecon(e)
 	return Duel.IsExistingMatchingCard(c49811179.imfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil) and not Duel.IsPlayerAffectedByEffect(1-tp,EFFECT_NECRO_VALLEY)
 end
 function c49811179.filter(c)
-    return c:IsSetCard(1) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
+	return c:IsSetCard(0x1) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
 end
 function c49811179.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then 

expansions/script/c49811180.lua

@@ -57,7 +57,7 @@ function c49811180.initial_effect(c)
 	c:RegisterEffect(e5)
 	local e6=Effect.CreateEffect(c)
 	e6:SetDescription(aux.Stringid(49811180,2))
-    e6:SetCategory(CATEGORY_DESTROY)
+	e6:SetCategory(CATEGORY_POSITION)
 	e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e6:SetProperty(EFFECT_FLAG_DELAY)
 	e6:SetCode(EVENT_DESTROYED)