Fix 影霊衣

pack/2024-11-23 TW02.ydk

@@ -11,3 +11,7 @@
 100227043
 100227044
 100227045
+100227072
+100227073
+100227074
+100227075

script/c100200263.lua

 --葬角のカルノヴルス
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	--Synchro summon
 	aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)

script/c100227001.lua

 --魔轟神獣ベヒルモス
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	--synchro summon
 	local e1=Effect.CreateEffect(c)

script/c100227002.lua

 --魔轟神ガミュジン
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	--synchro summon
 	aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0x35),aux.NonTuner(nil),1)

script/c100227003.lua

 --魔轟神レヴェルゼブル
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
 	c:EnableReviveLimit()

script/c100227004.lua

 --魔轟神界の復活
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)

script/c100227027.lua

 --ジュラック・メガロ
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	aux.AddCodeList(c,id)
 	--spsummon

script/c100227028.lua

 --ジュラック・メガロ
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	aux.AddCodeList(c,id)
 	--special summon

script/c100227029.lua

 --ジュラック・アステロ
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	aux.AddCodeList(c,17548456)
 	--synchro summon

script/c100227030.lua

 --ジュラック・ヴォルケーノ
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	aux.AddCodeList(c,17548456)
 	--Activate

script/c100227042.lua

 --ジェムナイトマスター・ダイヤ－ディスパージョン
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	--fusion material
 	aux.AddFusionProcFunRep(c,aux.FilterBoolFunction(Card.IsFusionSetCard,0x47),3,true)

script/c100227043.lua

 --ジェムナイト・ネピリム
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	--search
 	local e1=Effect.CreateEffect(c)

script/c100227044.lua

 --ジェムナイト・ヴォイドルーツ
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	aux.AddCodeList(c,1264319)
 	--special summon

script/c100227045.lua

 --ジェムナイト・ディスパージョン
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	aux.AddCodeList(c,1264319)
 	--Activate 1

script/c100227072.lua

 --影霊衣の魔剣士 アバンス
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	--special summon
 	local e1=Effect.CreateEffect(c)
@@ -55,7 +56,7 @@ function s.rlevel(e,c)
 	else return lv end
 end
 function s.thcon(e,tp,eg,ep,ev,re,r,rp)
-	return bit.band(r,REASON_EFFECT)~=0
+	return r&REASON_EFFECT~=0
 end
 function s.thfilter(c)
 	return c:IsFaceupEx() and c:IsSetCard(0xb4) and c:IsAbleToHand()

script/c100227073.lua

 --影霊衣の舞巫女 エミリア
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	--special summon
 	local e1=Effect.CreateEffect(c)
@@ -53,8 +54,7 @@ function s.spop(e,tp,eg,ep,ev,re,r,rp)
 end
 function s.thfilter(c)
 	return c:IsSetCard(0xb4) and c:IsAbleToHand()
-		and (c:GetType()&TYPE_MONSTER+TYPE_RITUAL==TYPE_MONSTER+TYPE_RITUAL
-		or c:IsType(TYPE_SPELL))
+		and (c:IsAllTypes(TYPE_MONSTER+TYPE_RITUAL) or c:IsType(TYPE_SPELL))
 end
 function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK,0,1,nil) end

script/c100227074.lua

 --メタトロンの影霊衣
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	aux.EnablePendulumAttribute(c)
 	--Cannot Special Summon
@@ -51,8 +52,7 @@ function s.mat_filter(c)
 end
 function s.cfilter(c,tp)
 	return c:IsPreviousPosition(POS_FACEUP) and c:IsPreviousControler(tp)
-		and c:IsControler(tp)
-		and c:IsSetCard(0xb4)
+		and c:IsControler(tp) and c:IsSetCard(0xb4)
 end
 function s.rmcon(e,tp,eg,ep,ev,re,r,rp)
 	return eg:IsExists(s.cfilter,1,nil,tp) and e:GetHandler():IsStatus(STATUS_EFFECT_ENABLED)
@@ -62,7 +62,7 @@ function s.rmfilter(c)
 end
 function s.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsOnField() and s.rmfilter(chkc) end
-	if chk==0 then return true end
+	if chk==0 then return Duel.IsExistingTarget(s.rmfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local g=Duel.SelectTarget(tp,s.rmfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
 	Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
@@ -81,8 +81,9 @@ function s.rmfilter2(c)
 	return c:IsType(TYPE_MONSTER) and c:IsFaceup() and c:IsAbleToRemove()
 end
 function s.rmtg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) and s.rmfilter2(chkc) end
-	if chk==0 then return true end
+	local c=e:GetHandler()
+	if chkc then return c:IsAbleToRemove() and chkc:IsOnField() and chkc:IsControler(1-tp) and s.rmfilter2(chkc) end
+	if chk==0 then return c:IsAbleToRemove() and Duel.IsExistingTarget(s.rmfilter2,tp,0,LOCATION_MZONE,1,nil) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local g=Duel.SelectTarget(tp,s.rmfilter2,tp,0,LOCATION_MZONE,1,1,nil)
 	g:AddCard(e:GetHandler())
@@ -91,8 +92,8 @@ end
 function s.rmop2(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	local tc=Duel.GetFirstTarget()
-	if c:IsFaceup() and c:IsRelateToEffect(e) and c:IsAbleToRemove() then
-		if Duel.Remove(c,0,REASON_EFFECT+REASON_TEMPORARY)~=0 and c:GetOriginalCode()==id then
+	if c:IsRelateToEffect(e) and c:IsAbleToRemove() and Duel.Remove(c,0,REASON_EFFECT+REASON_TEMPORARY)~=0 then
+		if c:GetOriginalCode()==id then
 			local e1=Effect.CreateEffect(c)
 			e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
 			e1:SetCode(EVENT_PHASE+PHASE_END)
@@ -101,10 +102,9 @@ function s.rmop2(e,tp,eg,ep,ev,re,r,rp)
 			e1:SetCountLimit(1)
 			e1:SetOperation(s.retop)
 			Duel.RegisterEffect(e1,tp)
-			if tc:IsRelateToEffect(e) then
-				Duel.BreakEffect()
-				Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
 		end
+		if tc:IsRelateToEffect(e) and tc:IsType(TYPE_MONSTER) then
+			Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
 		end
 	end
 end

script/c100227075.lua

 --影霊衣の神魔鏡
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(id,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
@@ -13,6 +15,7 @@ function s.initial_effect(c)
 	c:RegisterEffect(e1)
 	--search
 	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(id,1))
 	e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
 	e2:SetType(EFFECT_TYPE_IGNITION)
 	e2:SetRange(LOCATION_GRAVE)
@@ -63,9 +66,6 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
 		if not mat then goto cancel end
 		tc:SetMaterial(mat)
 		local mat2=mat:Filter(Card.IsLocation,nil,LOCATION_EXTRA):Filter(s.mfilter,nil)
-		if #mat2>0 then
-			Duel.HintSelection(mat2)
-		end
 		mat:Sub(mat2)
 		Duel.ReleaseRitualMaterial(mat)
 		Duel.SendtoGrave(mat2,REASON_EFFECT+REASON_MATERIAL+REASON_RITUAL)
@@ -78,11 +78,12 @@ function s.cfilter(c)
 	return c:IsSetCard(0xb4) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
 end
 function s.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost()
+	local c=e:GetHandler()
+	if chk==0 then return c:IsAbleToRemoveAsCost()
 		and Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_GRAVE,0,1,nil) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local g=Duel.SelectMatchingCard(tp,s.cfilter,tp,LOCATION_GRAVE,0,1,1,nil)
-	g:AddCard(e:GetHandler())
+	g:AddCard(c)
 	Duel.Remove(g,POS_FACEUP,REASON_COST)
 end
 function s.thfilter(c)

script/c100229033.lua

 --オルフェゴール・ガラテアi
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	--link summon
 	aux.AddCodeList(c,90351981)

script/c100229034.lua

 --宵星の騎士エンリルギルス
 local s,id,o=GetID()
+---@param c Card
 function s.initial_effect(c)
 	--link summon
 	aux.AddLinkProcedure(c,nil,2,99,s.lcheck)