name: 剛鬼サンダー・オーガ
card_text: 「剛鬼」モンスター2体以上
  1:このカードがモンスターゾーンに存在する限り、ターンプレイヤーは以下の効果を適用する。
  ●自分メインフェイズに通常召喚に加えて1度だけ、このカードのリンク先となる自分フィールドに手札からモンスター1体を召喚できる。
  2:このカードのリンク先のモンスターが戦闘・効果で破壊された場合に発動できる。
  このカードの攻撃力は400アップする。
external_ids: local SETCARD_ID_0 = 0xfc --剛鬼
  
lua: local SETCARD_ID_0 = 0xfc --剛鬼
  local s, id, o = GetID()
  function s.initial_effect(c)
  	--link summon
  	aux.AddLinkProcedure(c, aux.FilterBoolFunction(Card.IsLinkSetCard, SETCARD_ID_0), 2)
  	c:EnableReviveLimit()
  	--extra summon
  	local e1 = Effect.CreateEffect(c)
  	e1:SetDescription(aux.Stringid(id, 0))
  	e1:SetType(EFFECT_TYPE_FIELD)
  	e1:SetCode(EFFECT_EXTRA_SUMMON_COUNT)
  	e1:SetRange(LOCATION_MZONE)
  	e1:SetTargetRange(LOCATION_HAND, LOCATION_HAND)
  	e1:SetValue(s.sumval)
  	c:RegisterEffect(e1)
  	--atk
  	local e3 = Effect.CreateEffect(c)
  	e3:SetDescription(aux.Stringid(id, 1))
  	e3:SetCategory(CATEGORY_ATKCHANGE)
  	e3:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_TRIGGER_O)
  	e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP + EFFECT_FLAG_DELAY)
  	e3:SetCode(EVENT_DESTROYED)
  	e3:SetRange(LOCATION_MZONE)
  	e3:SetCondition(s.atkcon)
  	e3:SetOperation(s.atkop)
  	c:RegisterEffect(e3)
  end
  function s.sumval(e, c)
  	if c:IsControler(e:GetHandlerPlayer()) then
  		local sumzone = e:GetHandler():GetLinkedZone()
  		local relzone = -bit.lshift(1, e:GetHandler():GetSequence())
  		return 0, sumzone, relzone
  	else
  		local sumzone = e:GetHandler():GetLinkedZone(1 - e:GetHandlerPlayer())
  		local relzone = -bit.lshift(1, e:GetHandler():GetSequence() + 16)
  		return 0, sumzone, relzone
  	end
  end
  function s.cfilter(c, tp, zone)
  	local seq = c:GetPreviousSequence()
  	if c:IsPreviousControler(1 - tp) then
  		seq = seq + 16
  	end
  	return c:IsReason(REASON_BATTLE + REASON_EFFECT) and c:IsPreviousLocation(LOCATION_MZONE) and bit.extract(zone, seq) ~= 0
  end
  function s.atkcon(e, tp, eg, ep, ev, re, r, rp)
  	return eg:IsExists(s.cfilter, 1, nil, tp, e:GetHandler():GetLinkedZone())
  end
  function s.atkop(e, tp, eg, ep, ev, re, r, rp)
  	local c = e:GetHandler()
  	if c:IsFaceup() and c:IsRelateToEffect(e) then
  		local e1 = Effect.CreateEffect(c)
  		e1:SetType(EFFECT_TYPE_SINGLE)
  		e1:SetCode(EFFECT_UPDATE_ATTACK)
  		e1:SetValue(400)
  		e1:SetReset(RESET_EVENT + RESETS_STANDARD + RESET_DISABLE)
  		c:RegisterEffect(e1)
  	end
  end
  
  
source_text: 剛鬼サンダー・オーガ
  「剛鬼」モンスター2体以上
  1:このカードがモンスターゾーンに存在する限り、ターンプレイヤーは以下の効果を適用する。
  ●自分メインフェイズに通常召喚に加えて1度だけ、このカードのリンク先となる自分フィールドに手札からモンスター1体を召喚できる。
  2:このカードのリンク先のモンスターが戦闘・効果で破壊された場合に発動できる。
  このカードの攻撃力は400アップする。
target_text: -- 剛鬼サンダー・オーガ
  local SETCARD_ID_0 = 0xfc --剛鬼
  local s, id, o = GetID()
  function s.initial_effect(c)
  	--link summon
  	aux.AddLinkProcedure(c, aux.FilterBoolFunction(Card.IsLinkSetCard, SETCARD_ID_0), 2)
  	c:EnableReviveLimit()
  	--extra summon
  	local e1 = Effect.CreateEffect(c)
  	e1:SetDescription(aux.Stringid(id, 0))
  	e1:SetType(EFFECT_TYPE_FIELD)
  	e1:SetCode(EFFECT_EXTRA_SUMMON_COUNT)
  	e1:SetRange(LOCATION_MZONE)
  	e1:SetTargetRange(LOCATION_HAND, LOCATION_HAND)
  	e1:SetValue(s.sumval)
  	c:RegisterEffect(e1)
  	--atk
  	local e3 = Effect.CreateEffect(c)
  	e3:SetDescription(aux.Stringid(id, 1))
  	e3:SetCategory(CATEGORY_ATKCHANGE)
  	e3:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_TRIGGER_O)
  	e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP + EFFECT_FLAG_DELAY)
  	e3:SetCode(EVENT_DESTROYED)
  	e3:SetRange(LOCATION_MZONE)
  	e3:SetCondition(s.atkcon)
  	e3:SetOperation(s.atkop)
  	c:RegisterEffect(e3)
  end
  function s.sumval(e, c)
  	if c:IsControler(e:GetHandlerPlayer()) then
  		local sumzone = e:GetHandler():GetLinkedZone()
  		local relzone = -bit.lshift(1, e:GetHandler():GetSequence())
  		return 0, sumzone, relzone
  	else
  		local sumzone = e:GetHandler():GetLinkedZone(1 - e:GetHandlerPlayer())
  		local relzone = -bit.lshift(1, e:GetHandler():GetSequence() + 16)
  		return 0, sumzone, relzone
  	end
  end
  function s.cfilter(c, tp, zone)
  	local seq = c:GetPreviousSequence()
  	if c:IsPreviousControler(1 - tp) then
  		seq = seq + 16
  	end
  	return c:IsReason(REASON_BATTLE + REASON_EFFECT) and c:IsPreviousLocation(LOCATION_MZONE) and bit.extract(zone, seq) ~= 0
  end
  function s.atkcon(e, tp, eg, ep, ev, re, r, rp)
  	return eg:IsExists(s.cfilter, 1, nil, tp, e:GetHandler():GetLinkedZone())
  end
  function s.atkop(e, tp, eg, ep, ev, re, r, rp)
  	local c = e:GetHandler()
  	if c:IsFaceup() and c:IsRelateToEffect(e) then
  		local e1 = Effect.CreateEffect(c)
  		e1:SetType(EFFECT_TYPE_SINGLE)
  		e1:SetCode(EFFECT_UPDATE_ATTACK)
  		e1:SetValue(400)
  		e1:SetReset(RESET_EVENT + RESETS_STANDARD + RESET_DISABLE)
  		c:RegisterEffect(e1)
  	end
  end
  
  