name: 暗黒方界邪神クリムゾン・ノヴァ・トリニティ
card_text: 「暗黒方界神クリムゾン・ノヴァ」×3
  このカードは上記のカードを融合素材にした融合召喚でのみ特殊召喚できる。
  1:フィールドのこのカードは相手の効果の対象にならず、相手の効果では破壊されない。
  2:このカードの攻撃宣言時に発動する。
  相手のLPを半分にする。
  3:このカードの攻撃でモンスターを破壊した時に発動できる。
  このバトルフェイズ中、このカードはもう1度だけ攻撃できる。
  4:自分が効果ダメージを受けた場合に発動する。
  受けたダメージの数値分だけ相手にダメージを与える。
external_ids: local CARD_ID_0 = 30270176 --暗黒方界神クリムゾン・ノヴァ
  
lua: local CARD_ID_0 = 30270176 --暗黒方界神クリムゾン・ノヴァ
  local s, id, o = GetID()
  function s.initial_effect(c)
  	--fusion material
  	c:EnableReviveLimit()
  	aux.AddFusionProcCodeRep(c, CARD_ID_0, 3, false, false)
  	--spsummon condition
  	local e0 = Effect.CreateEffect(c)
  	e0:SetType(EFFECT_TYPE_SINGLE)
  	e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE + EFFECT_FLAG_UNCOPYABLE)
  	e0:SetCode(EFFECT_SPSUMMON_CONDITION)
  	e0:SetValue(aux.fuslimit)
  	c:RegisterEffect(e0)
  	--Immune
  	local e1 = Effect.CreateEffect(c)
  	e1:SetType(EFFECT_TYPE_SINGLE)
  	e1:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
  	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
  	e1:SetRange(LOCATION_MZONE)
  	e1:SetValue(aux.tgoval)
  	c:RegisterEffect(e1)
  	local e2 = e1:Clone()
  	e2:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
  	e2:SetValue(aux.indoval)
  	c:RegisterEffect(e2)
  	--Halve LP
  	local e3 = Effect.CreateEffect(c)
  	e3:SetType(EFFECT_TYPE_SINGLE + EFFECT_TYPE_TRIGGER_F)
  	e3:SetCode(EVENT_ATTACK_ANNOUNCE)
  	e3:SetOperation(s.hvop)
  	c:RegisterEffect(e3)
  	--Extra Attack
  	local e4 = Effect.CreateEffect(c)
  	e4:SetType(EFFECT_TYPE_SINGLE + EFFECT_TYPE_TRIGGER_O)
  	e4:SetCode(EVENT_BATTLE_DESTROYING)
  	e4:SetCondition(aux.bdcon)
  	e4:SetTarget(s.atktg)
  	e4:SetOperation(s.atkop)
  	c:RegisterEffect(e4)
  	--damage
  	local e5 = Effect.CreateEffect(c)
  	e5:SetCategory(CATEGORY_DAMAGE)
  	e5:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_TRIGGER_F)
  	e5:SetCode(EVENT_DAMAGE)
  	e5:SetRange(LOCATION_MZONE)
  	e5:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
  	e5:SetCondition(s.damcon)
  	e5:SetTarget(s.damtg)
  	e5:SetOperation(s.damop)
  	c:RegisterEffect(e5)
  end
  function s.hvop(e, tp, eg, ep, ev, re, r, rp)
  	Duel.SetLP(1 - tp, math.ceil(Duel.GetLP(1 - tp) / 2))
  end
  function s.atktg(e, tp, eg, ep, ev, re, r, rp, chk)
  	if chk == 0 then
  		return e:GetHandler():IsRelateToBattle() and not e:GetHandler():IsHasEffect(EFFECT_EXTRA_ATTACK)
  	end
  end
  function s.atkop(e, tp, eg, ep, ev, re, r, rp)
  	local c = e:GetHandler()
  	if not c:IsRelateToBattle() then
  		return
  	end
  	local e1 = Effect.CreateEffect(c)
  	e1:SetType(EFFECT_TYPE_SINGLE)
  	e1:SetCode(EFFECT_EXTRA_ATTACK)
  	e1:SetValue(1)
  	e1:SetReset(RESET_EVENT + RESETS_STANDARD + RESET_PHASE + PHASE_BATTLE)
  	c:RegisterEffect(e1)
  end
  function s.damcon(e, tp, eg, ep, ev, re, r, rp)
  	return bit.band(r, REASON_EFFECT) ~= 0 and ep == tp
  end
  function s.damtg(e, tp, eg, ep, ev, re, r, rp, chk)
  	if chk == 0 then
  		return true
  	end
  	Duel.SetTargetPlayer(1 - tp)
  	Duel.SetTargetParam(ev)
  	Duel.SetOperationInfo(0, CATEGORY_DAMAGE, nil, 0, 1 - tp, ev)
  end
  function s.damop(e, tp, eg, ep, ev, re, r, rp)
  	local p, d = Duel.GetChainInfo(0, CHAININFO_TARGET_PLAYER, CHAININFO_TARGET_PARAM)
  	Duel.Damage(p, d, REASON_EFFECT)
  end
  
  
source_text: 暗黒方界邪神クリムゾン・ノヴァ・トリニティ
  「暗黒方界神クリムゾン・ノヴァ」×3
  このカードは上記のカードを融合素材にした融合召喚でのみ特殊召喚できる。
  1:フィールドのこのカードは相手の効果の対象にならず、相手の効果では破壊されない。
  2:このカードの攻撃宣言時に発動する。
  相手のLPを半分にする。
  3:このカードの攻撃でモンスターを破壊した時に発動できる。
  このバトルフェイズ中、このカードはもう1度だけ攻撃できる。
  4:自分が効果ダメージを受けた場合に発動する。
  受けたダメージの数値分だけ相手にダメージを与える。
target_text: -- 暗黒方界邪神クリムゾン・ノヴァ・トリニティ
  local CARD_ID_0 = 30270176 --暗黒方界神クリムゾン・ノヴァ
  local s, id, o = GetID()
  function s.initial_effect(c)
  	--fusion material
  	c:EnableReviveLimit()
  	aux.AddFusionProcCodeRep(c, CARD_ID_0, 3, false, false)
  	--spsummon condition
  	local e0 = Effect.CreateEffect(c)
  	e0:SetType(EFFECT_TYPE_SINGLE)
  	e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE + EFFECT_FLAG_UNCOPYABLE)
  	e0:SetCode(EFFECT_SPSUMMON_CONDITION)
  	e0:SetValue(aux.fuslimit)
  	c:RegisterEffect(e0)
  	--Immune
  	local e1 = Effect.CreateEffect(c)
  	e1:SetType(EFFECT_TYPE_SINGLE)
  	e1:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
  	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
  	e1:SetRange(LOCATION_MZONE)
  	e1:SetValue(aux.tgoval)
  	c:RegisterEffect(e1)
  	local e2 = e1:Clone()
  	e2:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
  	e2:SetValue(aux.indoval)
  	c:RegisterEffect(e2)
  	--Halve LP
  	local e3 = Effect.CreateEffect(c)
  	e3:SetType(EFFECT_TYPE_SINGLE + EFFECT_TYPE_TRIGGER_F)
  	e3:SetCode(EVENT_ATTACK_ANNOUNCE)
  	e3:SetOperation(s.hvop)
  	c:RegisterEffect(e3)
  	--Extra Attack
  	local e4 = Effect.CreateEffect(c)
  	e4:SetType(EFFECT_TYPE_SINGLE + EFFECT_TYPE_TRIGGER_O)
  	e4:SetCode(EVENT_BATTLE_DESTROYING)
  	e4:SetCondition(aux.bdcon)
  	e4:SetTarget(s.atktg)
  	e4:SetOperation(s.atkop)
  	c:RegisterEffect(e4)
  	--damage
  	local e5 = Effect.CreateEffect(c)
  	e5:SetCategory(CATEGORY_DAMAGE)
  	e5:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_TRIGGER_F)
  	e5:SetCode(EVENT_DAMAGE)
  	e5:SetRange(LOCATION_MZONE)
  	e5:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
  	e5:SetCondition(s.damcon)
  	e5:SetTarget(s.damtg)
  	e5:SetOperation(s.damop)
  	c:RegisterEffect(e5)
  end
  function s.hvop(e, tp, eg, ep, ev, re, r, rp)
  	Duel.SetLP(1 - tp, math.ceil(Duel.GetLP(1 - tp) / 2))
  end
  function s.atktg(e, tp, eg, ep, ev, re, r, rp, chk)
  	if chk == 0 then
  		return e:GetHandler():IsRelateToBattle() and not e:GetHandler():IsHasEffect(EFFECT_EXTRA_ATTACK)
  	end
  end
  function s.atkop(e, tp, eg, ep, ev, re, r, rp)
  	local c = e:GetHandler()
  	if not c:IsRelateToBattle() then
  		return
  	end
  	local e1 = Effect.CreateEffect(c)
  	e1:SetType(EFFECT_TYPE_SINGLE)
  	e1:SetCode(EFFECT_EXTRA_ATTACK)
  	e1:SetValue(1)
  	e1:SetReset(RESET_EVENT + RESETS_STANDARD + RESET_PHASE + PHASE_BATTLE)
  	c:RegisterEffect(e1)
  end
  function s.damcon(e, tp, eg, ep, ev, re, r, rp)
  	return bit.band(r, REASON_EFFECT) ~= 0 and ep == tp
  end
  function s.damtg(e, tp, eg, ep, ev, re, r, rp, chk)
  	if chk == 0 then
  		return true
  	end
  	Duel.SetTargetPlayer(1 - tp)
  	Duel.SetTargetParam(ev)
  	Duel.SetOperationInfo(0, CATEGORY_DAMAGE, nil, 0, 1 - tp, ev)
  end
  function s.damop(e, tp, eg, ep, ev, re, r, rp)
  	local p, d = Duel.GetChainInfo(0, CHAININFO_TARGET_PLAYER, CHAININFO_TARGET_PARAM)
  	Duel.Damage(p, d, REASON_EFFECT)
  end
  
  