rm

deck/18-12-29 19PP+20TH+JF19+VJMP.ydk

-#created by ...
-#main
-100238007
-100238008
-100238009
-100238015
-100238016
-100238017
-100238018
-100238019
-100238020
-100236001
-100236003
-100236009
-100236015
-100236020
-100236021
-100236025
-100236026
-100236027
-100236033
-#extra
-100238001
-100238002
-100238003
-100238004
-100238005
-100238006
-100238010
-100238011
-100238012
-100238013
-100238014
-!side
-100236002
-40080312
-100236008
-100236013
-77075360
-100236019
-100236031
-100236032
-100239001
-100239002
-100239003
-100239004
-100239005
-100200157

expansions/strings.conf

 #The first line is used for comment
-!counter 0x1050 信号指示物
-!counter 0x1151 蛊指示物
-!counter 0x152 指示物（魂之灵摆）
-!setname 0x225 笑容
 !setname 0x226 咒眼

script/c100200157.lua

---ゴッドアイズ・ファントム・ドラゴン
---
---Script by mercury233
-function c100200157.initial_effect(c)
-	c:EnableReviveLimit()
-	aux.EnablePendulumAttribute(c)
-	--chain attack
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e1:SetCode(EVENT_DAMAGE_STEP_END)
-	e1:SetCountLimit(1)
-	e1:SetRange(LOCATION_PZONE)
-	e1:SetCondition(c100200157.atcon)
-	e1:SetCost(c100200157.atcost)
-	e1:SetOperation(c100200157.atop)
-	c:RegisterEffect(e1)
-	--spsummon condition
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_SINGLE)
-	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e2:SetCode(EFFECT_SPSUMMON_CONDITION)
-	c:RegisterEffect(e2)
-	--special summon
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(100200157,0))
-	e3:SetType(EFFECT_TYPE_FIELD)
-	e3:SetCode(EFFECT_SPSUMMON_PROC)
-	e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e3:SetRange(LOCATION_HAND)
-	e3:SetCountLimit(1,100200157)
-	e3:SetCondition(c100200157.hspcon)
-	e3:SetOperation(c100200157.hspop)
-	c:RegisterEffect(e3)
-	local e4=e3:Clone()
-	e4:SetRange(LOCATION_EXTRA)
-	c:RegisterEffect(e4)
-	--attack up
-	local e5=Effect.CreateEffect(c)
-	e5:SetCategory(CATEGORY_ATKCHANGE)
-	e5:SetType(EFFECT_TYPE_TRIGGER_F+EFFECT_TYPE_SINGLE)
-	e5:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
-	e5:SetCountLimit(1)
-	e5:SetCondition(c100200157.atkcon)
-	e5:SetOperation(c100200157.atkop)
-	c:RegisterEffect(e5)
-	--negate
-	local e6=Effect.CreateEffect(c)
-	e6:SetDescription(aux.Stringid(100200157,1))
-	e6:SetCategory(CATEGORY_NEGATE)
-	e6:SetType(EFFECT_TYPE_QUICK_O)
-	e6:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
-	e6:SetCode(EVENT_CHAINING)
-	e6:SetRange(LOCATION_MZONE)
-	e6:SetCountLimit(1)
-	e6:SetCondition(c100200157.negcon)
-	e6:SetCost(c100200157.negcost)
-	e6:SetTarget(c100200157.negtg)
-	e6:SetOperation(c100200157.negop)
-	c:RegisterEffect(e6)
-	--
-	if not c100200157.global_check then
-		c100200157.global_check=true
-		c100200157[0]=0
-		c100200157[1]=0
-		local ge1=Effect.CreateEffect(c)
-		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-		ge1:SetCode(EVENT_ATTACK_ANNOUNCE)
-		ge1:SetOperation(c100200157.check)
-		Duel.RegisterEffect(ge1,0)
-		local ge2=Effect.CreateEffect(c)
-		ge2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-		ge2:SetCode(EVENT_PHASE_START+PHASE_DRAW)
-		ge2:SetOperation(c100200157.clear)
-		Duel.RegisterEffect(ge2,0)
-	end
-end
-function c100200157.check(e,tp,eg,ep,ev,re,r,rp)
-	local at=Duel.GetAttacker()
-	if c100200157[2] and c100200157[2]~=at then
-		c100200157[at:GetControler()]=1
-		return
-	end
-	c100200157[2]=at
-end
-function c100200157.clear(e,tp,eg,ep,ev,re,r,rp)
-	c100200157[0]=0
-	c100200157[1]=0
-	c100200157[2]=nil
-end
-function c100200157.atcon(e,tp,eg,ep,ev,re,r,rp)
-	local at=Duel.GetAttacker()
-	return at:IsControler(tp) and Duel.GetAttackTarget()~=nil
-		and at:IsRace(RACE_DRAGON) and at:IsType(TYPE_PENDULUM) and at:IsChainAttackable(0)
-end
-function c100200157.atcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return c100200157[tp]==0 end
-	local at=Duel.GetAttacker()
-	at:RegisterFlagEffect(100200157,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
-	local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetCode(EFFECT_CANNOT_ATTACK_ANNOUNCE)
-	e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_OATH)
-	e1:SetTargetRange(LOCATION_MZONE,0)
-	e1:SetTarget(c100200157.atktg)
-	e1:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e1,tp)
-end
-function c100200157.atktg(e,c)
-	return c:GetFlagEffect(100200157)==0
-end
-function c100200157.atop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.ChainAttack()
-end
-function c100200157.hspfilter(c)
-	return c:IsRace(RACE_DRAGON) and c:IsType(TYPE_PENDULUM)
-end
-function c100200157.hspcon(e,c)
-	if c==nil then return true end
-	local tp=c:GetControler()
-	local g=Duel.GetReleaseGroup(tp)
-	return g:GetCount()>=2 and g:FilterCount(Card.IsReleasable,nil)==g:GetCount()
-		and g:IsExists(c100200157.hspfilter,1,nil)
-		and (c:IsLocation(LOCATION_EXTRA) and Duel.GetLocationCountFromEx(tp,tp,g,c)>0
-			or c:IsLocation(LOCATION_HAND) and Duel.GetMZoneCount(tp,g,tp)>0)
-end
-function c100200157.hspop(e,tp,eg,ep,ev,re,r,rp,c)
-	local g=Duel.GetReleaseGroup(tp)
-	Duel.Release(g,REASON_COST)
-end
-function c100200157.atkcon(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local bc=c:GetBattleTarget()
-	return bc and bc:IsControler(1-tp)
-end
-function c100200157.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_SET_ATTACK_FINAL)
-		e1:SetValue(c:GetAttack()*2)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END)
-		c:RegisterEffect(e1)
-	end
-end
-function c100200157.negcon(e,tp,eg,ep,ev,re,r,rp)
-	return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED)
-		and ep~=tp and re:IsActiveType(TYPE_SPELL+TYPE_TRAP) and Duel.IsChainNegatable(ev)
-end
-function c100200157.cfilter(c)
-	return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToGraveAsCost()
-end
-function c100200157.negcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c100200157.cfilter,tp,LOCATION_ONFIELD,0,1,nil) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
-	local g=Duel.SelectMatchingCard(tp,c100200157.cfilter,tp,LOCATION_ONFIELD,0,1,1,nil)
-	Duel.SendtoGrave(g,REASON_COST)
-end
-function c100200157.negtg(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)
-end
-function c100200157.negop(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.NegateActivation(ev) and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:GetHandler():IsRelateToEffect(re) then
-		Duel.SendtoGrave(eg,REASON_EFFECT)
-	end
-end

script/c100236001.lua

---マジシャン・オブ・カオス
---Magician of Chaos
---Scripted by Eerie Code
-function c100236001.initial_effect(c)
-	c:EnableReviveLimit()
-	--change name
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_SINGLE)
-	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-	e1:SetCode(EFFECT_CHANGE_CODE)
-	e1:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
-	e1:SetValue(46986414)
-	c:RegisterEffect(e1)
-	--destroy
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(100236001,0))
-	e2:SetCategory(CATEGORY_DESTROY)
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetCode(EVENT_CHAINING)
-	e2:SetRange(LOCATION_MZONE)
-	e2:SetCountLimit(1)
-	e2:SetCondition(c100236001.descon)
-	e2:SetTarget(c100236001.destg)
-	e2:SetOperation(c100236001.desop)
-	c:RegisterEffect(e2)
-	--spsummon
-	local e3=Effect.CreateEffect(c)
-	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e3:SetCode(EVENT_DESTROYED)
-	e3:SetProperty(EFFECT_FLAG_DELAY)
-	e3:SetCondition(c100236001.spcon)
-	e3:SetTarget(c100236001.sptg)
-	e3:SetOperation(c100236001.spop)
-	c:RegisterEffect(e3)
-end
-function c100236001.descon(e,tp,eg,ep,ev,re,r,rp)
-	return re:IsActiveType(TYPE_SPELL+TYPE_TRAP)
-end
-function c100236001.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsOnField() end
-	if chk==0 then return Duel.IsExistingTarget(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
-	local g=Duel.SelectTarget(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
-	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,#g,0,0)
-end
-function c100236001.desop(e,tp,eg,ep,ev,re,r,rp)
-	local tc=Duel.GetFirstTarget()
-	if tc:IsRelateToEffect(e) then
-		Duel.Destroy(tc,REASON_EFFECT)
-	end
-end
-function c100236001.spcon(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	return c:IsSummonType(SUMMON_TYPE_RITUAL) and c:IsReason(REASON_BATTLE+REASON_EFFECT)
-end
-function c100236001.spfilter(c,e,tp)
-	return c:IsSetCard(0xcf) and bit.band(c:GetType(),0x81)==0x81 and not c:IsCode(100236001) and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
-end
-function c100236001.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(c100236001.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
-end
-function c100236001.spop(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectMatchingCard(tp,c100236001.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
-	if #g>0 then
-		Duel.SpecialSummon(g,0,tp,tp,true,false,POS_FACEUP)
-	end
-end

script/c100236002.lua

---超魔導騎士－ブラック・キャバルリー
---
---Script by mercury233
-function c100236002.initial_effect(c)
-	--fusion material
-	c:EnableReviveLimit()
-	aux.AddFusionProcCodeFun(c,46986414,aux.FilterBoolFunction(Card.IsRace,RACE_WARRIOR),1,true,true)
-	--atkup
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_SINGLE)
-	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-	e1:SetCode(EFFECT_UPDATE_ATTACK)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetValue(c100236002.atkval)
-	c:RegisterEffect(e1)
-	--pierce
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_SINGLE)
-	e2:SetCode(EFFECT_PIERCE)
-	c:RegisterEffect(e2)
-	--negate
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(100236002,0))
-	e3:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
-	e3:SetType(EFFECT_TYPE_QUICK_O)
-	e3:SetCode(EVENT_CHAINING)
-	e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
-	e3:SetRange(LOCATION_MZONE)
-	e3:SetCondition(c100236002.discon)
-	e3:SetCost(c100236002.discost)
-	e3:SetTarget(c100236002.distg)
-	e3:SetOperation(c100236002.disop)
-	c:RegisterEffect(e3)
-end
-function c100236002.atkval(e,c)
-	return Duel.GetMatchingGroupCount(Card.IsType,0,LOCATION_ONFIELD+LOCATION_GRAVE,LOCATION_ONFIELD+LOCATION_GRAVE,nil,TYPE_SPELL+TYPE_TRAP)*100
-end
-function c100236002.discon(e,tp,eg,ep,ev,re,r,rp)
-	if e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) then return false end
-	if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end
-	local tg=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS)
-	return tg and tg:IsExists(Card.IsOnField,1,nil) and Duel.IsChainNegatable(ev)
-end
-function c100236002.discost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil) end
-	Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD,nil)
-end
-function c100236002.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)
-	if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
-		Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
-	end
-end
-function c100236002.disop(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
-		Duel.Destroy(eg,REASON_EFFECT)
-	end
-end

script/c100236003.lua

---運命のドロー
---
---Script by Djeeta
-function c100236003.initial_effect(c)
-	--Activate
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_DRAW)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetCountLimit(1,100236003+EFFECT_COUNT_CODE_OATH)
-	e1:SetCondition(c100236003.condition)
-	e1:SetTarget(c100236003.target)
-	e1:SetOperation(c100236003.activate)
-	c:RegisterEffect(e1)
-end
-function c100236003.condition(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
-	if g:GetCount()==0 then return false end
-	local tg=g:GetMaxGroup(Card.GetAttack)
-	return tg:IsExists(Card.IsControler,1,nil,1-tp) and Duel.GetLP(tp)<Duel.GetLP(1-tp)
-end
-function c100236003.check(g)
-	return g:GetClassCount(Card.GetCode)==#g
-end
-function c100236003.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then
-		if not Duel.IsPlayerCanDraw(tp,1) then return false end
-		local g=Duel.GetMatchingGroup(nil,tp,LOCATION_DECK,0,nil)
-		return g:CheckSubGroup(c100236003.check,3,3)
-	end
-	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
-end
-function c100236003.activate(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local g=Duel.GetMatchingGroup(nil,tp,LOCATION_DECK,0,nil)
-	if g:GetCount()>=3 then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
-		local sg=g:SelectSubGroup(tp,c100236003.check,false,3,3)
-		Duel.ConfirmCards(1-tp,sg)
-		if Duel.ShuffleDeck(tp)~=0 then
-			for i=1,3 do
-				local tc
-				if i<3 then
-					tc=sg:RandomSelect(tp,1):GetFirst()
-				else
-					tc=sg:GetFirst()
-				end
-				Duel.MoveSequence(tc,0)
-				sg:RemoveCard(tc)
-			end
-		end
-		Duel.Draw(tp,1,REASON_EFFECT)
-	end
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
-	e1:SetCode(EFFECT_CANNOT_SSET)
-	e1:SetReset(RESET_PHASE+PHASE_END)
-	e1:SetTargetRange(1,0)
-	Duel.RegisterEffect(e1,tp)
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e2:SetCode(EVENT_CHAINING)
-	e2:SetCondition(c100236003.regcon)
-	e2:SetOperation(c100236003.regop)
-	e2:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e2,tp)
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_FIELD)
-	e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e3:SetCode(EFFECT_CANNOT_ACTIVATE)
-	e3:SetTargetRange(1,0)
-	e3:SetCondition(c100236003.actcon)
-	e3:SetValue(1)
-	e3:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e3,tp)
-end
-function c100236003.regcon(e,tp,eg,ep,ev,re,r,rp)
-	return ep==tp
-end
-function c100236003.regop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.RegisterFlagEffect(tp,100236003,RESET_PHASE+PHASE_END,0,1)
-end
-function c100236003.actcon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetFlagEffect(tp,100236003)>0
-end

script/c100236008.lua

---E・HERO グランドマン
---Elemental HERO Grandman
---Scripted by AlphaKretin
-function c100236008.initial_effect(c)
-	--fusion material
-	c:EnableReviveLimit()
-	aux.AddFusionProcFunRep(c,c100236008.ffilter,2,true)
-	--spsummon condition
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_SINGLE)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
-	e1:SetValue(aux.fuslimit)
-	c:RegisterEffect(e1)
-	--atk
-	local e0=Effect.CreateEffect(c)
-	e0:SetType(EFFECT_TYPE_SINGLE)
-	e0:SetCode(EFFECT_MATERIAL_CHECK)
-	e0:SetValue(c100236008.valcheck)
-	c:RegisterEffect(e0)
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e2:SetCondition(c100236008.atkcon)
-	e2:SetOperation(c100236008.atkop)
-	e2:SetLabelObject(e0)
-	c:RegisterEffect(e2)
-	--special summon
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(100236008,0))
-	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e3:SetCode(EVENT_BATTLE_DESTROYING)
-	e3:SetCondition(c100236008.spcon)
-	e3:SetCost(c100236008.spcost)
-	e3:SetTarget(c100236008.sptg)
-	e3:SetOperation(c100236008.spop)
-	c:RegisterEffect(e3)
-end
-c100236008.material_setcode=0x8
-function c100236008.ffilter(c)
-	return c:IsFusionType(TYPE_NORMAL) and c:IsFusionSetCard(0x8)
-end
-function c100236008.valcheck(e,c)
-	local g=c:GetMaterial()
-	local atk=0
-	for tc in aux.Next(g) do
-		atk=atk+tc:GetOriginalLevel()
-	end
-	e:SetLabel(atk)
-end
-function c100236008.atkcon(e,tp,eg,ep,ev,re,r,rp)
-	return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION)
-end
-function c100236008.atkop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local atk=e:GetLabelObject():GetLabel()*300
-	if atk>0 then
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_UPDATE_ATTACK)
-		e1:SetValue(atk)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
-		c:RegisterEffect(e1)
-	end
-end
-function c100236008.spcon(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local bc=c:GetBattleTarget()
-	return c:IsRelateToBattle() and bc and bc:IsType(TYPE_MONSTER)
-end
-function c100236008.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsReleasable() end
-	Duel.Release(e:GetHandler(),REASON_COST)
-end
-function c100236008.spfilter(c,e,tp)
-	return c:IsType(TYPE_FUSION) and c:IsSetCard(0x3008) and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
-end
-function c100236008.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCountFromEx(tp,tp,e:GetHandler())>0
-		and Duel.IsExistingMatchingCard(c100236008.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
-end
-function c100236008.spop(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.GetLocationCountFromEx(tp)<=0 then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectMatchingCard(tp,c100236008.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
-	local tc=g:GetFirst()
-	local c=e:GetHandler()
-	if tc and Duel.SpecialSummonStep(tc,0,tp,tp,true,false,POS_FACEUP) then
-		--atklimit
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_CANNOT_SELECT_BATTLE_TARGET)
-		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_IGNORE_IMMUNE)
-		e1:SetValue(c100236008.bttg)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-		tc:RegisterEffect(e1)
-		Duel.SpecialSummonComplete()
-	end
-end
-function c100236008.bttg(e,c)
-	return c:IsFaceup() and c:IsLevelBelow(e:GetHandler():GetLevel())
-end

script/c100236009.lua

---ダブルヒーローアタック
---Double Hero Attack
---Script by mercury233
-function c100236009.initial_effect(c)
-	--Activate
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetCountLimit(1,100236009+EFFECT_COUNT_CODE_OATH)
-	e1:SetCondition(c100236009.condition)
-	e1:SetTarget(c100236009.target)
-	e1:SetOperation(c100236009.activate)
-	c:RegisterEffect(e1)
-end
-c100236009.card_code_list={89943723}
-function c100236009.cfilter(c)
-	return c:IsFaceup() and c:IsType(TYPE_FUSION) and aux.IsMaterialListCode(c,89943723)
-end
-function c100236009.condition(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.IsExistingMatchingCard(c100236009.cfilter,tp,LOCATION_MZONE,0,1,nil)
-end
-function c100236009.filter(c,e,tp)
-	return c:IsSetCard(0x8) and c:IsType(TYPE_FUSION) and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
-end
-function c100236009.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c100236009.filter(chkc,e,tp) end
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingTarget(c100236009.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectTarget(tp,c100236009.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
-end
-function c100236009.activate(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
-	local tc=Duel.GetFirstTarget()
-	if tc:IsRelateToEffect(e) then
-		Duel.SpecialSummon(tc,0,tp,tp,true,false,POS_FACEUP)
-	end
-end