name: 漆黒の魔王
card_text: 「漆黒の魔王 LV6」の効果で特殊召喚した場合、このカードが戦闘によって破壊した相手モンスターの効果を無効にし、ゲームから除外する。
external_ids: local CARD_ID_0 = 12817939 --漆黒の魔王 LV6
  local CARD_ID_1 = 85313220 --漆黒の魔王 LV4
  
lua: local CARD_ID_0 = 12817939 --漆黒の魔王 LV6
  local CARD_ID_1 = 85313220 --漆黒の魔王 LV4
  local s, id, o = GetID()
  function s.initial_effect(c)
  	--disable
  	local e1 = Effect.CreateEffect(c)
  	e1:SetType(EFFECT_TYPE_SINGLE + EFFECT_TYPE_CONTINUOUS)
  	e1:SetCode(EVENT_BATTLED)
  	e1:SetRange(LOCATION_MZONE)
  	e1:SetCondition(s.discon)
  	e1:SetOperation(s.disop)
  	c:RegisterEffect(e1)
  	--redirect
  	local e2 = Effect.CreateEffect(c)
  	e2:SetType(EFFECT_TYPE_SINGLE)
  	e2:SetCode(EFFECT_BATTLE_DESTROY_REDIRECT)
  	e2:SetCondition(s.discon)
  	e2:SetValue(LOCATION_REMOVED)
  	c:RegisterEffect(e2)
  end
  s.lvup = { CARD_ID_0 }
  s.lvdn = { CARD_ID_1, CARD_ID_0 }
  function s.discon(e)
  	return e:GetHandler():GetSummonType() == SUMMON_TYPE_SPECIAL + SUMMON_VALUE_LV
  end
  function s.disop(e, tp, eg, ep, ev, re, r, rp)
  	local c = e:GetHandler()
  	local d = Duel.GetAttackTarget()
  	if d == c then
  		d = Duel.GetAttacker()
  	end
  	if d and d:IsStatus(STATUS_BATTLE_DESTROYED) and d:IsType(TYPE_EFFECT) and not c:IsStatus(STATUS_BATTLE_DESTROYED) then
  		local e1 = Effect.CreateEffect(c)
  		e1:SetType(EFFECT_TYPE_SINGLE)
  		e1:SetCode(EFFECT_DISABLE)
  		e1:SetReset(RESET_EVENT + 0x17a0000)
  		d:RegisterEffect(e1)
  	end
  end
  
  
source_text: 漆黒の魔王
  「漆黒の魔王 LV6」の効果で特殊召喚した場合、このカードが戦闘によって破壊した相手モンスターの効果を無効にし、ゲームから除外する。
target_text: -- 漆黒の魔王
  local CARD_ID_0 = 12817939 --漆黒の魔王 LV6
  local CARD_ID_1 = 85313220 --漆黒の魔王 LV4
  local s, id, o = GetID()
  function s.initial_effect(c)
  	--disable
  	local e1 = Effect.CreateEffect(c)
  	e1:SetType(EFFECT_TYPE_SINGLE + EFFECT_TYPE_CONTINUOUS)
  	e1:SetCode(EVENT_BATTLED)
  	e1:SetRange(LOCATION_MZONE)
  	e1:SetCondition(s.discon)
  	e1:SetOperation(s.disop)
  	c:RegisterEffect(e1)
  	--redirect
  	local e2 = Effect.CreateEffect(c)
  	e2:SetType(EFFECT_TYPE_SINGLE)
  	e2:SetCode(EFFECT_BATTLE_DESTROY_REDIRECT)
  	e2:SetCondition(s.discon)
  	e2:SetValue(LOCATION_REMOVED)
  	c:RegisterEffect(e2)
  end
  s.lvup = { CARD_ID_0 }
  s.lvdn = { CARD_ID_1, CARD_ID_0 }
  function s.discon(e)
  	return e:GetHandler():GetSummonType() == SUMMON_TYPE_SPECIAL + SUMMON_VALUE_LV
  end
  function s.disop(e, tp, eg, ep, ev, re, r, rp)
  	local c = e:GetHandler()
  	local d = Duel.GetAttackTarget()
  	if d == c then
  		d = Duel.GetAttacker()
  	end
  	if d and d:IsStatus(STATUS_BATTLE_DESTROYED) and d:IsType(TYPE_EFFECT) and not c:IsStatus(STATUS_BATTLE_DESTROYED) then
  		local e1 = Effect.CreateEffect(c)
  		e1:SetType(EFFECT_TYPE_SINGLE)
  		e1:SetCode(EFFECT_DISABLE)
  		e1:SetReset(RESET_EVENT + 0x17a0000)
  		d:RegisterEffect(e1)
  	end
  end
  
  