text

expansions/script/c37564011.lua

@@ -97,13 +97,34 @@ function cm.operation2(e,tp,eg,ep,ev,re,r,rp)
 	for tc in aux.Next(mg) do
 		Duel.SpecialSummonStep(tc,0,tp,tp,true,true,POS_FACEUP)
 		tc:RegisterFlagEffect(m,RESET_EVENT+0x1fe0000,0,1,fid)
-		local e2=Effect.CreateEffect(c)
-		e2:SetType(EFFECT_TYPE_SINGLE)
+		local codes={
+			EFFECT_CANNOT_BE_XYZ_MATERIAL,
+			EFFECT_CANNOT_BE_LINK_MATERIAL,
+			EFFECT_UNRELEASABLE_NONSUM,
+			EFFECT_UNRELEASABLE_SUM
+		}
+
+		for _,code in ipairs(codes) do
+			local e2=Effect.CreateEffect(c)
+			e2:SetType(EFFECT_TYPE_SINGLE)
+			e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+			e2:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
+			e2:SetValue(1)
+			e2:SetReset(RESET_EVENT+0x1fe0000)
+			tc:RegisterEffect(e2,true)
+		end
+
+		local e2=Effect.CreateEffect(e:GetHandler())
+		e2:SetDescription(aux.Stringid(m,2))
+		e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+		e2:SetCode(EFFECT_OVERLAY_REMOVE_REPLACE)
 		e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e2:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
-		e2:SetValue(1)
-		e2:SetReset(RESET_EVENT+0x1fe0000)
+		e2:SetRange(LOCATION_MZONE)
+		e2:SetCondition(cm.rcon)
+		e2:SetOperation(cm.rop)
+		e2:SetReset(0x1fc1000+RESET_PHASE+PHASE_END)
 		tc:RegisterEffect(e2,true)
+
 		tc:CompleteProcedure()
 	end
 	Duel.SpecialSummonComplete()
@@ -145,3 +166,12 @@ function cm.desop(e,tp,eg,ep,ev,re,r,rp)
 	local tg=g:Filter(cm.retfilter,nil,e:GetLabel())
 	Duel.Destroy(tg,REASON_EFFECT)
 end
+
+function cm.rcon(e,tp,eg,ep,ev,re,r,rp)
+	local ct=(ev & 0xffff)
+	return (r & REASON_COST)~=0 and re:GetHandler()==e:GetHandler() and re:IsHasType(0x7e0)
+end
+function cm.rop(e,tp,eg,ep,ev,re,r,rp)
+	e:Reset()
+end
+

expansions/script/c37564345.lua

 --Omoiyoshino
 local m=37564345
 local cm=_G["c"..m]
-Duel.LoadScript("c37564765.lua")
 function cm.initial_effect(c)
 	--link summon
 	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsAttribute,ATTRIBUTE_DARK),3,5)

expansions/script/c37573001.lua

@@ -80,7 +80,8 @@ function c37573001.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	local attr=c1:GetAttribute()
 	local race=c1:GetRace()
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
-	local g2=Duel.SelectMatchingCard(tp,c37573001.costfilter2,tp,LOCATION_GRAVE,0,2,2,c1,attr,race)
+	local minc=(attr==ATTRIBUTE_WIND and race==RACE_SPELLCASTER) and 2 or 3
+	local g2=Duel.SelectMatchingCard(tp,c37573001.costfilter2,tp,LOCATION_GRAVE,0,minc,3,c1,attr,race)
 	Duel.SendtoDeck(g1+g2,nil,2,REASON_COST)
 	race_list[e]={attr=attr,race=race}
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)

expansions/script/c37573004.lua

@@ -20,7 +20,7 @@ function c37573004.initial_effect(c)
 	c:RegisterEffect(e2)
 end
 function c37573004.handcon(e)
-	return Duel.GetFieldGroupCount(e:GetHandlerPlayer(),LOCATION_ONFIELD,0)==0
+	return true -- Duel.GetFieldGroupCount(e:GetHandlerPlayer(),LOCATION_ONFIELD,0)==0
 end
 function c37573004.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.CheckLPCost(tp,2000) end