白銀のバリア-シルバーフォース-
相手がダメージを与える罠カードを発動した時に発動する事ができる。
その発動を無効にし、そのカードと相手フィールド上に表側表示で存在する魔法・罠カードを全て破壊する。
local s, id, o = GetID()
function s.initial_effect(c)
	--Negate
	local e1 = Effect.CreateEffect(c)
	e1:SetCategory(CATEGORY_NEGATE + CATEGORY_DESTROY)
	e1:SetType(EFFECT_TYPE_ACTIVATE)
	e1:SetCode(EVENT_CHAINING)
	e1:SetCondition(s.discon)
	e1:SetTarget(s.distg)
	e1:SetOperation(s.disop)
	c:RegisterEffect(e1)
end
function s.discon(e, tp, eg, ep, ev, re, r, rp)
	if ep == tp or not re:IsHasType(EFFECT_TYPE_ACTIVATE) or not re:IsActiveType(TYPE_TRAP) or not Duel.IsChainNegatable(ev) then
		return false
	end
	local ex, cg, ct, cp, cv = Duel.GetOperationInfo(ev, CATEGORY_DAMAGE)
	if ex then
		return true
	end
	ex, cg, ct, cp, cv = Duel.GetOperationInfo(ev, CATEGORY_RECOVER)
	return ex
		and (
			(cp ~= PLAYER_ALL and Duel.IsPlayerAffectedByEffect(cp, EFFECT_REVERSE_RECOVER))
			or (cp == PLAYER_ALL and (Duel.IsPlayerAffectedByEffect(0, EFFECT_REVERSE_RECOVER) or Duel.IsPlayerAffectedByEffect(1, EFFECT_REVERSE_RECOVER)))
		)
end
function s.dfilter(c)
	return c:IsFaceup() and c:IsType(TYPE_SPELL + TYPE_TRAP)
end
function s.distg(e, tp, eg, ep, ev, re, r, rp, chk)
	if chk == 0 then
		return true
	end
	Duel.SetOperationInfo(0, CATEGORY_NEGATE, eg, 1, 0, 0)
	local g = Duel.GetMatchingGroup(s.dfilter, tp, 0, LOCATION_ONFIELD, nil)
	if re:GetHandler():IsRelateToEffect(re) then
		g:Merge(eg)
	end
	Duel.SetOperationInfo(0, CATEGORY_DESTROY, g, g:GetCount(), 0, 0)
end
function s.disop(e, tp, eg, ep, ev, re, r, rp)
	if Duel.NegateActivation(ev) then
		local g = Duel.GetMatchingGroup(s.dfilter, tp, 0, LOCATION_ONFIELD, nil)
		if re:GetHandler():IsRelateToEffect(re) then
			g:Merge(eg)
		end
		Duel.Destroy(g, REASON_EFFECT)
	end
end


白銀のバリア-シルバーフォース-
相手がダメージを与える罠カードを発動した時に発動する事ができる。
その発動を無効にし、そのカードと相手フィールド上に表側表示で存在する魔法・罠カードを全て破壊する。
-- 白銀のバリア-シルバーフォース-
local s, id, o = GetID()
function s.initial_effect(c)
	--Negate
	local e1 = Effect.CreateEffect(c)
	e1:SetCategory(CATEGORY_NEGATE + CATEGORY_DESTROY)
	e1:SetType(EFFECT_TYPE_ACTIVATE)
	e1:SetCode(EVENT_CHAINING)
	e1:SetCondition(s.discon)
	e1:SetTarget(s.distg)
	e1:SetOperation(s.disop)
	c:RegisterEffect(e1)
end
function s.discon(e, tp, eg, ep, ev, re, r, rp)
	if ep == tp or not re:IsHasType(EFFECT_TYPE_ACTIVATE) or not re:IsActiveType(TYPE_TRAP) or not Duel.IsChainNegatable(ev) then
		return false
	end
	local ex, cg, ct, cp, cv = Duel.GetOperationInfo(ev, CATEGORY_DAMAGE)
	if ex then
		return true
	end
	ex, cg, ct, cp, cv = Duel.GetOperationInfo(ev, CATEGORY_RECOVER)
	return ex
		and (
			(cp ~= PLAYER_ALL and Duel.IsPlayerAffectedByEffect(cp, EFFECT_REVERSE_RECOVER))
			or (cp == PLAYER_ALL and (Duel.IsPlayerAffectedByEffect(0, EFFECT_REVERSE_RECOVER) or Duel.IsPlayerAffectedByEffect(1, EFFECT_REVERSE_RECOVER)))
		)
end
function s.dfilter(c)
	return c:IsFaceup() and c:IsType(TYPE_SPELL + TYPE_TRAP)
end
function s.distg(e, tp, eg, ep, ev, re, r, rp, chk)
	if chk == 0 then
		return true
	end
	Duel.SetOperationInfo(0, CATEGORY_NEGATE, eg, 1, 0, 0)
	local g = Duel.GetMatchingGroup(s.dfilter, tp, 0, LOCATION_ONFIELD, nil)
	if re:GetHandler():IsRelateToEffect(re) then
		g:Merge(eg)
	end
	Duel.SetOperationInfo(0, CATEGORY_DESTROY, g, g:GetCount(), 0, 0)
end
function s.disop(e, tp, eg, ep, ev, re, r, rp)
	if Duel.NegateActivation(ev) then
		local g = Duel.GetMatchingGroup(s.dfilter, tp, 0, LOCATION_ONFIELD, nil)
		if re:GetHandler():IsRelateToEffect(re) then
			g:Merge(eg)
		end
		Duel.Destroy(g, REASON_EFFECT)
	end
end

