Refresh on 2024-09-29 10:08:32

script/c191981030.lua

@@ -28,22 +28,30 @@ function c191981030.initial_effect(c)
 	e3:SetRange(LOCATION_MZONE)
 	e3:SetOperation(s.dam)
 	c:RegisterEffect(e3)
-	--material check
+	-- redirect todeck
 	local e4=Effect.CreateEffect(c)
-	e4:SetType(EFFECT_TYPE_SINGLE)
-	e4:SetCode(EFFECT_MATERIAL_CHECK)
-	e4:SetValue(s.valcheck)
-	e4:SetCondition(s.regcon)
+	e4:SetType(EFFECT_TYPE_FIELD)
+	e4:SetProperty(EFFECT_FLAG_SET_AVAILABLE+EFFECT_FLAG_IGNORE_RANGE+EFFECT_FLAG_IGNORE_IMMUNE)
+	e4:SetRange(LOCATION_MZONE)
+	e4:SetCode(EFFECT_TO_GRAVE_REDIRECT)
+	e4:SetTargetRange(0,0xff)
+	e4:SetCondition(s.rdcon)
+	e4:SetValue(LOCATION_DECKBOT)
 	c:RegisterEffect(e4)
-	-- redirect todeck
+	--material check
 	local e5=Effect.CreateEffect(c)
-	e5:SetType(EFFECT_TYPE_FIELD)
-	e5:SetProperty(EFFECT_FLAG_SET_AVAILABLE+EFFECT_FLAG_IGNORE_RANGE+EFFECT_FLAG_IGNORE_IMMUNE)
-	e5:SetRange(LOCATION_MZONE)
-	e5:SetCode(EFFECT_TO_GRAVE_REDIRECT)
-	e5:SetTargetRange(0,0xff)
-	e5:SetValue(LOCATION_DECKBOT)
+	e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e5:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e5:SetCondition(s.matcon)
+	e5:SetOperation(s.matop)
 	c:RegisterEffect(e5)
+	local e6=Effect.CreateEffect(c)
+	e6:SetType(EFFECT_TYPE_SINGLE)
+	e6:SetCode(EFFECT_MATERIAL_CHECK)
+	e6:SetValue(s.valcheck)
+	e6:SetLabelObject(e5)
+	c:RegisterEffect(e6)
 end
 s.material_setcode=0x8
 s.dark_calling=true
@@ -78,16 +86,21 @@ function s.tdop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 --redirect
-function s.regcon(e,tp,eg,ep,ev,re,r,rp)
+function s.rdcon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION)
-		and e:GetLabelObject():GetLabel()~=0
+		and e:GetHandler():GetFlagEffect(id)~=0 and e:GetHandler():IsFaceup()
+end
+function s.matcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION) and e:GetLabel()>0
+end
+function s.matop(e,tp,eg,ep,ev,re,r,rp)
+	e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD,0,1,1)
 end
 function s.valcheck(e,c)
 	local mg=c:GetMaterial()
 	local flag=0
-	if mg:IsExists(Card.IsType,2,nil,TYPE_NORMAL) then flag=1 end
-	c:RegisterFlagEffect(id,RESET_EVENT+0x4fe0000,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,2))
-	e:SetLabel(flag)
+	if mg:IsExists(Card.IsFusionType,2,nil,TYPE_NORMAL) then flag=1 end
+	e:GetLabelObject():SetLabel(flag)
 end
 --damage
 function s.filter1(c,tp)