fix

expansions/script/c111443942.lua

@@ -103,18 +103,19 @@ function c111443942.sdop(e,tp,eg,ep,ev,re,r,rp)
 			local ae=tc:GetActivateEffect()
 			local oath=0
 			if c111443942.sdfilter(tc) then oath=EFFECT_COUNT_CODE_OATH end
-            local e1=Effect.CreateEffect(tc)
-            e1:SetType(EFFECT_TYPE_ACTIVATE)
-            e1:SetCode(ae:GetCode())
-            e1:SetCategory(ae:GetCategory())
-            e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+ae:GetProperty())
+			local e1=ae:Clone() --Effect.CreateEffect(tc)
+			--e1:SetType(EFFECT_TYPE_ACTIVATE)
+			--e1:SetCode(ae:GetCode())
+			--e1:SetCategory(ae:GetCategory())
+			--e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+ae:GetProperty())
 			e1:SetRange(LOCATION_DECK)
-            e1:SetCountLimit(1,code+oath)
-            e1:SetCondition(c111443942.sfcon)
-            e1:SetTarget(c111443942.sftg)
-            e1:SetOperation(c111443942.sfop)
+			--e1:SetCountLimit(1,code+oath)
+			--e1:SetCondition(c111443942.sfcon)
+			--e1:SetTarget(c111443942.sftg)
+			--e1:SetOperation(c111443942.sfop)
 			e1:SetReset(RESET_EVENT+0x1fe0000)
 			tc:RegisterEffect(e1)
+			c111443942[e1]=true
 			--activate cost
 			local e2=Effect.CreateEffect(tc)
 			e2:SetType(EFFECT_TYPE_FIELD)
@@ -171,22 +172,26 @@ function c111443942.costfilter(c)
 	return c:IsSetCard(0x9d) and c:IsType(TYPE_MONSTER) and c:IsAbleToDeck()
 end
 function c111443942.costchk(e,te_or_c,tp)
+	local c=e:GetHandler()
 	local tp=e:GetHandler():GetControler()
 	return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
 		and Duel.IsExistingMatchingCard(c111443942.costfilter,tp,LOCATION_GRAVE,0,1,nil)
+		and Duel.GetFlagEffect(tp,111443942)>0 and Duel.GetFlagEffect(tp,e:GetHandler():GetOriginalCode())==0
+		and c:IsSetCard(0x9d) and c:IsType(TYPE_SPELL+TYPE_TRAP)
 end
 function c111443942.costtg(e,te,tp)
 	e:SetLabelObject(te)
-    return te:GetHandler():IsLocation(LOCATION_DECK) and te:GetHandler()==e:GetHandler()
+	return te:GetHandler():IsLocation(LOCATION_DECK) and te:GetHandler()==e:GetHandler() and c111443942[te]
 end
 function c111443942.costop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
+	Duel.RegisterFlagEffect(tp,e:GetHandler():GetOriginalCode(),RESET_PHASE+PHASE_END,0,1)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
 	local g=Duel.SelectMatchingCard(tp,c111443942.costfilter,tp,LOCATION_GRAVE,0,1,1,nil)
 	if g:GetCount()>0 then
 		local te=e:GetLabelObject()
 		Duel.SendtoDeck(g,nil,0,REASON_EFFECT)
-        Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+		Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,false)
 		c:CreateEffectRelation(te)
 		local ev0=Duel.GetCurrentChain()+1
 		local e1=Effect.CreateEffect(c)
@@ -213,7 +218,7 @@ function c111443942.rsop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 
-local re=Card.RegisterEffect
+--[[local re=Card.RegisterEffect
 Card.RegisterEffect=function(c,e)
 	if c111443942.filter(c) and c:IsType(TYPE_CONTINUOUS+TYPE_EQUIP+TYPE_FIELD) and not e:IsHasType(EFFECT_TYPE_ACTIVATE) and e:GetLabel()~=111443942 then
 		local tg=e:GetTarget()
@@ -221,4 +226,4 @@ Card.RegisterEffect=function(c,e)
 		e:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return tg(e,tp,eg,ep,ev,re,r,rp,0) and not c:IsStatus(STATUS_CHAINING) end tg(e,tp,eg,ep,ev,re,r,rp,1) end)
 	end
 	re(c,e)
-end
+end--]]

expansions/script/c119974580.lua

@@ -41,6 +41,38 @@ function s.initial_effect(c)
 	e3:SetTarget(s.sptg)
 	e3:SetOperation(s.spop)
 	c:RegisterEffect(e3)
+	--replace
+	local e5=Effect.CreateEffect(c)
+	e5:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+	e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e5:SetCode(EVENT_PHASE_START+PHASE_DRAW)
+	e5:SetCountLimit(1,id+EFFECT_COUNT_CODE_DUEL)
+	e5:SetRange(LOCATION_HAND+LOCATION_DECK)
+	e5:SetOperation(s.rep)
+	c:RegisterEffect(e5)
+end
+function s.rep(e,tp,eg,ep,ev,re,r,rp)
+	local table={26118970}
+	for i,code in ipairs(table) do
+		local g=Duel.GetMatchingGroup(aux.FilterEqualFunction(Card.GetOriginalCode,code),0,0xff,0xff,nil)
+		local cn=_G["c"..code]
+		if type(cn)=="table" then
+			for tc in aux.Next(g) do
+				--special summon
+				local e1=Effect.CreateEffect(e:GetHandler())
+				e1:SetDescription(aux.Stringid(26118970,0))
+				e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+				e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+				e1:SetCode(EVENT_BE_MATERIAL)
+				e1:SetProperty(EFFECT_FLAG_DELAY)
+				e1:SetCountLimit(1,26118970)
+				e1:SetCondition(cn.spcon)
+				e1:SetTarget(cn.sptg)
+				e1:SetOperation(cn.spop)
+				tc:RegisterEffect(e1)
+			end
+		end
+	end
 end
 function s.drdiseff(c,e,tp,eg,ep,ev,re,r,rp)
 	if c.Dragon_Ruler_handes_effect then return c.Dragon_Ruler_handes_effect end

expansions/script/c4058.lua

@@ -326,16 +326,16 @@ function c4058.adop(e,tp,eg,ep,ev,re,r,rp)
 			local code=tc:GetOriginalCode()
 			local ae=tc:GetActivateEffect()
 			--deck activate
-			local e1=Effect.CreateEffect(tc)
-			e1:SetType(EFFECT_TYPE_ACTIVATE)
-			e1:SetCode(ae:GetCode())
-			e1:SetCategory(ae:GetCategory())
-			e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+ae:GetProperty())
+			local e1=ae:Clone() --Effect.CreateEffect(tc)
+			--e1:SetType(EFFECT_TYPE_ACTIVATE)
+			--e1:SetCode(ae:GetCode())
+			--e1:SetCategory(ae:GetCategory())
+			--e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+ae:GetProperty())
 			e1:SetRange(LOCATION_DECK)
-			e1:SetCountLimit(1,code+EFFECT_COUNT_CODE_OATH)
-			e1:SetCondition(c4058.sfcon)
-			e1:SetTarget(c4058.sftg)
-			e1:SetOperation(c4058.sfop)
+			--e1:SetCountLimit(1,code+EFFECT_COUNT_CODE_OATH)
+			--e1:SetCondition(c4058.sfcon)
+			--e1:SetTarget(c4058.sftg)
+			--e1:SetOperation(c4058.sfop)
 			e1:SetReset(RESET_EVENT+0x1fe0000)
 			tc:RegisterEffect(e1)
 			--activate cost
@@ -390,10 +390,13 @@ end
 function c4058.costchk(e,te_or_c,tp)
 	local tp=e:GetHandler():GetControler()
 	return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
+		and Duel.IsPlayerAffectedByEffect(tp,4058) and Duel.GetFlagEffect(tp,e:GetHandler():GetOriginalCode())==0
+		and e:GetHandler():IsCode(16067089,93217231,80678380,1683982)
 end
 function c4058.costop(e,tp,eg,ep,ev,re,r,rp)
 	local te=e:GetLabelObject()
 	local c=e:GetHandler()
+	Duel.RegisterFlagEffect(tp,e:GetHandler():GetOriginalCode(),RESET_PHASE+PHASE_END,0,1)
 	Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,false)
 	c:CreateEffectRelation(te)
 	local ev0=Duel.GetCurrentChain()+1
@@ -432,7 +435,7 @@ function c4058.regop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 
-local re=Card.RegisterEffect
+--[[local re=Card.RegisterEffect
 Card.RegisterEffect=function(c,e)
 	if c:IsType(TYPE_TRAP) and c:IsCode(16067089,93217231,80678380,1683982) and c:IsType(TYPE_CONTINUOUS+TYPE_EQUIP+TYPE_FIELD) and not e:IsHasType(EFFECT_TYPE_ACTIVATE) and e:GetLabel()~=4058 then
 		local tg=e:GetTarget()
@@ -440,4 +443,4 @@ Card.RegisterEffect=function(c,e)
 		e:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return tg(e,tp,eg,ep,ev,re,r,rp,0) and not c:IsStatus(STATUS_CHAINING) end tg(e,tp,eg,ep,ev,re,r,rp,1) end)
 	end
 	re(c,e)
-end
+end--]]