update new cards

deck/22-01-15 new cards.ydk → deck/22-01-21 new cards.ydk

 #created by ...
 #main
+100418201
+100418202
+100418203
+100418204
+100418205
+100418206
+100418207
+100418208
+100418211
+100418212
 100282002
 100287005
 100287014
@@ -22,4 +32,6 @@
 100284002
 100284003
 #extra
+100418209
+100418210
 !side

script/c100418201.lua

+--ヴァリアンツの巫女－東雲
+--
+--Script by Trishula9
+function c100418201.initial_effect(c)
+	--pendulum summon
+	aux.EnablePendulumAttribute(c)
+	--spsummon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_PZONE)
+	e1:SetCountLimit(1,100418201)
+	e1:SetTarget(c100418201.sptg)
+	e1:SetOperation(c100418201.spop)
+	c:RegisterEffect(e1)
+	--to hand
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,100418201+100)
+	e2:SetCondition(c100418201.thcon1)
+	e2:SetTarget(c100418201.thtg1)
+	e2:SetOperation(c100418201.thop1)
+	c:RegisterEffect(e2)
+	--to hand
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_MOVE)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCountLimit(1,100418201+200)
+	e3:SetCondition(c100418201.thcon2)
+	e3:SetTarget(c100418201.thtg2)
+	e3:SetOperation(c100418201.thop2)
+	c:RegisterEffect(e3)
+end
+function c100418201.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+end
+function c100418201.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	if c:IsRelateToEffect(e) then
+		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP,zone)
+	end
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(c100418201.splimit)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+end
+function c100418201.splimit(e,c)
+	return not c:IsSetCard(0x27c) and not c:IsLocation(LOCATION_EXTRA)
+end
+function c100418201.thcon1(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_SPECIAL)
+end
+function c100418201.thfilter1(c)
+	return c:IsSetCard(0x27c) and c:IsType(TYPE_SPELL) and c:IsAbleToHand()
+end
+function c100418201.thtg1(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c100418201.thfilter1,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c100418201.thop1(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c100418201.thfilter1,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+	end
+end
+function c100418201.thcon2(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsPreviousLocation(LOCATION_MZONE) and c:IsLocation(LOCATION_MZONE)
+		and (c:GetPreviousSequence()~=c:GetSequence() or c:GetPreviousControler()~=tp)
+end
+function c100418201.thfilter2(c)
+	return not c:IsCode(100418201) and c:IsSetCard(0x27c) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
+end
+function c100418201.thtg2(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c100418201.thfilter2,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c100418201.thop2(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c100418201.thfilter2,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+	end
+end

script/c100418202.lua

+--ヴァリアンツの弓引－西園
+--
+--Script by Trishula9
+function c100418202.initial_effect(c)
+	--pendulum summon
+	aux.EnablePendulumAttribute(c)
+	--spsummon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_PZONE)
+	e1:SetCountLimit(1,100418202)
+	e1:SetTarget(c100418202.sptg)
+	e1:SetOperation(c100418202.spop)
+	c:RegisterEffect(e1)
+	--coin
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_COIN)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCountLimit(1,100418202+100)
+	e2:SetCondition(c100418202.coincon1)
+	e2:SetTarget(c100418202.cointg1)
+	e2:SetOperation(c100418202.coinop1)
+	c:RegisterEffect(e2)
+	--coin
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_COIN)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_MOVE)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCountLimit(1,100418202+200)
+	e3:SetCondition(c100418202.coincon2)
+	e3:SetTarget(c100418202.cointg2)
+	e3:SetOperation(c100418202.coinop2)
+	c:RegisterEffect(e3)
+end
+function c100418202.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+end
+function c100418202.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	if c:IsRelateToEffect(e) then
+		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP,zone)
+	end
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(c100418202.splimit)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+end
+function c100418202.splimit(e,c)
+	return not c:IsSetCard(0x27c) and not c:IsLocation(LOCATION_EXTRA)
+end
+function c100418202.coincon1(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_SPECIAL)
+end
+function c100418202.coinfilter1(c)
+	return c:IsFaceup() and c:IsType(TYPE_EFFECT)
+end
+function c100418202.cointg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and c100418202.coinfilter1(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c100418202.coinfilter1,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+	Duel.SelectTarget(tp,c100418202.coinfilter1,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_COIN,nil,0,tp,1)
+end
+function c100418202.coinop1(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if not tc:IsRelateToEffect(e) then return end
+	local coin=Duel.TossCoin(tp,1)
+	if coin==1 then
+		if tc:IsFaceup() and not tc:IsDisabled() and not tc:IsImmuneToEffect(e) then
+			Duel.NegateRelatedChain(tc,RESET_TURN_SET)
+			local e1=Effect.CreateEffect(e:GetHandler())
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetCode(EFFECT_DISABLE)
+			e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+			tc:RegisterEffect(e1)
+			local e2=e1:Clone()
+			e2:SetCode(EFFECT_DISABLE_EFFECT)
+			e2:SetValue(RESET_TURN_SET)
+			tc:RegisterEffect(e2)
+		end
+	else
+		if tc:IsFaceup() then
+			local e1=Effect.CreateEffect(e:GetHandler())
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetCode(EFFECT_SET_ATTACK_FINAL)
+			e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+			e1:SetValue(math.ceil(tc:GetAttack()/2))
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+			tc:RegisterEffect(e1)
+		end
+	end
+end
+function c100418202.coincon2(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsPreviousLocation(LOCATION_MZONE) and c:IsLocation(LOCATION_MZONE)
+		and (c:GetPreviousSequence()~=c:GetSequence() or c:GetPreviousControler()~=tp)
+end
+function c100418202.cointg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsOnField() end
+	if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+	Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_COIN,nil,0,tp,1)
+end
+function c100418202.coinop2(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if not tc:IsRelateToEffect(e) then return end
+	local coin=Duel.TossCoin(tp,1)
+	if coin==1 then
+		Duel.Destroy(tc,REASON_EFFECT)
+	else
+		Duel.SendtoHand(tc,nil,REASON_EFFECT)
+	end
+end

script/c100418203.lua

+--ヴァリアンツの忍者－南月
+--
+--Script by Trishula9
+function c100418203.initial_effect(c)
+	--pendulum summon
+	aux.EnablePendulumAttribute(c)
+	--spsummon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_PZONE)
+	e1:SetCountLimit(1,100418203)
+	e1:SetCondition(c100418203.spcon)
+	e1:SetTarget(c100418203.sptg)
+	e1:SetOperation(c100418203.spop)
+	c:RegisterEffect(e1)
+	--move
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCountLimit(1,100418203+100)
+	e2:SetTarget(c100418203.seqtg)
+	e2:SetOperation(c100418203.seqop)
+	c:RegisterEffect(e2)
+	--move
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_MOVE)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
+	e3:SetCountLimit(1,100418203+200)
+	e3:SetCondition(c100418203.mvcon)
+	e3:SetTarget(c100418203.mvtg)
+	e3:SetOperation(c100418203.mvop)
+	c:RegisterEffect(e3)
+end
+function c100418203.cfilter(c)
+	return c:IsSetCard(0x27c) and c:IsAttribute(ATTRIBUTE_WATER) and c:IsFaceup()
+end
+function c100418203.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.IsEnvironment(100418211) or Duel.IsExistingMatchingCard(c100418203.cfilter,tp,LOCATION_MZONE,0,1,nil)
+end
+function c100418203.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+end
+function c100418203.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	if c:IsRelateToEffect(e) then
+		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP,zone)
+	end
+end
+function c100418203.filter(c)
+	local seq=c:GetSequence()
+	local tp=c:GetControler()
+	if seq>4 then return false end
+	return (seq>0 and Duel.CheckLocation(tp,LOCATION_MZONE,seq-1))
+		or (seq<4 and Duel.CheckLocation(tp,LOCATION_MZONE,seq+1))
+end
+function c100418203.seqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and c100418203.filter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c100418203.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,e:GetHandler()) end
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(100418203,0))
+	Duel.SelectTarget(tp,c100418203.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,e:GetHandler())
+end
+function c100418203.seqop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if not tc:IsRelateToEffect(e) then return end
+	local seq=tc:GetSequence()
+	if seq>4 then return end
+	local flag=0
+	if seq>0 and Duel.CheckLocation(tp,LOCATION_MZONE,seq-1) then flag=flag|(1<<(seq-1)) end
+	if seq<4 and Duel.CheckLocation(tp,LOCATION_MZONE,seq+1) then flag=flag|(1<<(seq+1)) end
+	if flag==0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOZONE)
+	local s=Duel.SelectField(tp,1,LOCATION_MZONE,0,~flag)
+	local nseq=math.log(s,2)
+	Duel.MoveSequence(tc,nseq)
+end
+function c100418203.mvcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsPreviousLocation(LOCATION_MZONE) and c:IsLocation(LOCATION_MZONE)
+		and (c:GetPreviousSequence()~=c:GetSequence() or c:GetPreviousControler()~=tp)
+end
+function c100418203.spfilter(c,e,tp)
+	local zone=1<<c:GetSequence()
+	return c:IsSetCard(0x27c) and c:IsFaceup() and c:GetSequence()<=4 and c:GetOriginalType()&TYPE_MONSTER~=0
+		and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone)
+end
+function c100418203.mvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_SZONE) and chkc:IsControler(tp) and c100418203.spfilter(chkc,e,tp) end
+	if chk==0 then return Duel.IsExistingTarget(c100418203.spfilter,tp,LOCATION_SZONE,0,1,nil,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectTarget(tp,c100418203.spfilter,tp,LOCATION_SZONE,0,1,1,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
+end
+function c100418203.mvop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	local zone=1<<tc:GetSequence()
+	if tc:IsRelateToEffect(e) then
+		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP,zone)
+	end
+end

script/c100418204.lua

+--ヴァリアンツの武者－北条
+--
+--Script by Trishula9
+function c100418204.initial_effect(c)
+	--pendulum summon
+	aux.EnablePendulumAttribute(c)
+	--spsummon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_PZONE)
+	e1:SetCountLimit(1,100418204)
+	e1:SetCondition(c100418204.spcon)
+	e1:SetTarget(c100418204.sptg)
+	e1:SetOperation(c100418204.spop)
+	c:RegisterEffect(e1)
+	--to hand
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOHAND)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCountLimit(1,100418204+100)
+	e2:SetTarget(c100418204.thtg)
+	e2:SetOperation(c100418204.thop)
+	c:RegisterEffect(e2)
+	--move
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_MOVE)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCountLimit(1,100418204+200)
+	e3:SetCondition(c100418204.mvcon)
+	e3:SetTarget(c100418204.mvtg)
+	e3:SetOperation(c100418204.mvop)
+	c:RegisterEffect(e3)
+end
+function c100418204.cfilter(c)
+	return c:IsSetCard(0x27c) and c:IsAttribute(ATTRIBUTE_WATER) and c:IsFaceup()
+end
+function c100418204.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.IsEnvironment(100418211) or Duel.IsExistingMatchingCard(c100418204.cfilter,tp,LOCATION_MZONE,0,1,nil)
+end
+function c100418204.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+end
+function c100418204.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	if c:IsRelateToEffect(e) then
+		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP,zone)
+	end
+end
+function c100418204.thfilter(c)
+	return c:GetSequence()<5 and c:IsFaceup() and c:IsAbleToHand()
+end
+function c100418204.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_SZONE) and c100418204.thfilter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c100418204.thfilter,tp,LOCATION_SZONE,LOCATION_SZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
+	local g=Duel.SelectTarget(tp,c100418204.thfilter,tp,LOCATION_SZONE,LOCATION_SZONE,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
+end
+function c100418204.thop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		Duel.SendtoHand(tc,nil,REASON_EFFECT)
+	end
+end
+function c100418204.mvcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsPreviousLocation(LOCATION_MZONE) and c:IsLocation(LOCATION_MZONE)
+		and (c:GetPreviousSequence()~=c:GetSequence() or c:GetPreviousControler()~=tp)
+end
+function c100418204.ffilter0(c,e)
+	return c:IsCanBeFusionMaterial() and not c:IsImmuneToEffect(e)
+end
+function c100418204.ffilter1(c,e)
+	return not c:IsImmuneToEffect(e)
+end
+function c100418204.ffilter2(c,e,tp,m,f,chkf)
+	return c:IsType(TYPE_FUSION) and c:IsSetCard(0x27c) and (not f or f(c))
+		and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf)
+end
+function c100418204.mvtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then
+		local chkf=tp
+		local mg1=Duel.GetFusionMaterial(tp)
+		mg1:Merge(Duel.GetMatchingGroup(c100418204.ffilter0,tp,LOCATION_PZONE,0,nil,e))
+		local res=Duel.IsExistingMatchingCard(c100418204.ffilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf)
+		if not res then
+			local ce=Duel.GetChainMaterial(tp)
+			if ce~=nil then
+				local fgroup=ce:GetTarget()
+				local mg2=fgroup(ce,e,tp)
+				local mf=ce:GetValue()
+				res=Duel.IsExistingMatchingCard(c100418204.ffilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,chkf)
+			end
+		end
+		return res
+	end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
+end
+function c100418204.mvop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local chkf=tp
+	local mg1=Duel.GetFusionMaterial(tp):Filter(c100418204.ffilter1,nil,e)
+	mg1:Merge(Duel.GetMatchingGroup(c100418204.ffilter0,tp,LOCATION_PZONE,0,nil,e))
+	local sg1=Duel.GetMatchingGroup(c100418204.ffilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf)
+	local mg2=nil
+	local sg2=nil
+	local ce=Duel.GetChainMaterial(tp)
+	if ce~=nil then
+		local fgroup=ce:GetTarget()
+		mg2=fgroup(ce,e,tp)
+		local mf=ce:GetValue()
+		sg2=Duel.GetMatchingGroup(c100418204.ffilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,chkf)
+	end
+	if sg1:GetCount()>0 or (sg2~=nil and sg2:GetCount()>0) then
+		local sg=sg1:Clone()
+		if sg2 then sg:Merge(sg2) end
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local tg=sg:Select(tp,1,1,nil)
+		local tc=tg:GetFirst()
+		if sg1:IsContains(tc) and (sg2==nil or not sg2:IsContains(tc) or not Duel.SelectYesNo(tp,ce:GetDescription())) then
+			local mat1=Duel.SelectFusionMaterial(tp,tc,mg1,nil,chkf)
+			tc:SetMaterial(mat1)
+			Duel.SendtoGrave(mat1,REASON_EFFECT+REASON_MATERIAL+REASON_FUSION)
+			Duel.BreakEffect()
+			Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
+		else
+			local mat2=Duel.SelectFusionMaterial(tp,tc,mg2,nil,chkf)
+			local fop=ce:GetOperation()
+			fop(ce,e,tp,tc,mat2)
+		end
+		tc:CompleteProcedure()
+	end
+end

script/c100418205.lua

+--ヴァリアンツB－バロン
+--
+--Script by Trishula9
+function c100418205.initial_effect(c)
+	--pendulum summon
+	aux.EnablePendulumAttribute(c)
+	--spsummon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_PZONE)
+	e1:SetCountLimit(1,100418205)
+	e1:SetTarget(c100418205.sptg)
+	e1:SetOperation(c100418205.spop)
+	c:RegisterEffect(e1)
+	--move
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(100418205,0))
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCountLimit(1,100418205+100)
+	e2:SetCondition(c100418205.seqcon)
+	e2:SetTarget(c100418205.seqtg)
+	e2:SetOperation(c100418205.seqop)
+	c:RegisterEffect(e2)
+	--move
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_MOVE)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
+	e3:SetCountLimit(1,100418205+200)
+	e3:SetCondition(c100418205.mvcon)
+	e3:SetTarget(c100418205.mvtg)
+	e3:SetOperation(c100418205.mvop)
+	c:RegisterEffect(e3)
+end
+function c100418205.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+end
+function c100418205.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	if c:IsRelateToEffect(e) then
+		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP,zone)
+	end
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(c100418205.splimit)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+end
+function c100418205.splimit(e,c)
+	return not c:IsSetCard(0x27c) and not c:IsLocation(LOCATION_EXTRA)
+end
+function c100418205.seqcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_SPECIAL)
+end
+function c100418205.filter(c)
+	local seq=c:GetSequence()
+	local tp=c:GetControler()
+	if seq>4 or not c:IsSetCard(0x27c) or not c:IsFaceup() then return false end
+	return (seq>0 and Duel.CheckLocation(tp,LOCATION_MZONE,seq-1))
+		or (seq<4 and Duel.CheckLocation(tp,LOCATION_MZONE,seq+1))
+end
+function c100418205.seqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c100418205.filter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c100418205.filter,tp,LOCATION_MZONE,0,1,e:GetHandler()) end
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(100418205,0))
+	Duel.SelectTarget(tp,c100418205.filter,tp,LOCATION_MZONE,0,1,1,e:GetHandler())
+end
+function c100418205.seqop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if not tc:IsRelateToEffect(e) then return end
+	local seq=tc:GetSequence()
+	if seq>4 then return end
+	local flag=0
+	if seq>0 and Duel.CheckLocation(tp,LOCATION_MZONE,seq-1) then flag=flag|(1<<(seq-1)) end
+	if seq<4 and Duel.CheckLocation(tp,LOCATION_MZONE,seq+1) then flag=flag|(1<<(seq+1)) end
+	if flag==0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOZONE)
+	local s=Duel.SelectField(tp,1,LOCATION_MZONE,0,~flag)
+	local nseq=math.log(s,2)
+	Duel.MoveSequence(tc,nseq)
+end
+function c100418205.mvcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsPreviousLocation(LOCATION_MZONE) and c:IsLocation(LOCATION_MZONE)
+		and (c:GetPreviousSequence()~=c:GetSequence() or c:GetPreviousControler()~=tp)
+end
+function c100418205.mvfilter(c)
+	local seq=c:GetSequence()
+	local tp=c:GetControler()
+	return (seq==0 and Duel.CheckLocation(tp,LOCATION_SZONE,1))
+		or (seq==4 and Duel.CheckLocation(tp,LOCATION_SZONE,3))
+end
+function c100418205.mvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_PZONE) and c100418205.mvfilter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c100418205.mvfilter,tp,LOCATION_PZONE,LOCATION_PZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(100418205,1))
+	Duel.SelectTarget(tp,c100418205.mvfilter,tp,LOCATION_PZONE,LOCATION_PZONE,1,1,nil)
+end
+function c100418205.mvop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if not tc:IsRelateToEffect(e) then return end
+	local seq=tc:GetSequence()
+	if not seq==0 and not seq==4 then return end
+	local nseq=0
+	if seq==0 then nseq=1 end
+	if seq==4 then nseq=3 end
+	Duel.MoveSequence(tc,nseq)
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetCode(EFFECT_CHANGE_TYPE)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
+	e1:SetValue(TYPE_SPELL+TYPE_CONTINUOUS)
+	tc:RegisterEffect(e1)
+end

script/c100418206.lua

+--ヴァリアンツV－ヴァイカント
+--
+--Script by Trishula9
+function c100418206.initial_effect(c)
+	--pendulum summon
+	aux.EnablePendulumAttribute(c)
+	--spsummon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_PZONE)
+	e1:SetCountLimit(1,100418206)
+	e1:SetTarget(c100418206.sptg)
+	e1:SetOperation(c100418206.spop)
+	c:RegisterEffect(e1)
+	--set
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,100418206+100)
+	e2:SetCondition(c100418206.stcon)
+	e2:SetTarget(c100418206.sttg)
+	e2:SetOperation(c100418206.stop)
+	c:RegisterEffect(e2)
+	--pzone set
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_MOVE)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCountLimit(1,100418206+200)
+	e3:SetCondition(c100418206.mvcon)
+	e3:SetTarget(c100418206.mvtg)
+	e3:SetOperation(c100418206.mvop)
+	c:RegisterEffect(e3)
+end
+function c100418206.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+end
+function c100418206.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	if c:IsRelateToEffect(e) then
+		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP,zone)
+	end
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(c100418206.splimit)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+end
+function c100418206.splimit(e,c)
+	return not c:IsSetCard(0x27c) and not c:IsLocation(LOCATION_EXTRA)
+end
+function c100418206.stcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_SPECIAL)
+end
+function c100418206.stfilter(c)
+	return c:IsSetCard(0x27c) and c:IsType(TYPE_PENDULUM) and c:IsFaceup() and not c:IsForbidden()
+end
+function c100418206.sttg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
+		and Duel.IsExistingMatchingCard(c100418206.stfilter,tp,LOCATION_EXTRA,0,1,nil) end
+end
+function c100418206.stop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
+	local g=Duel.SelectMatchingCard(tp,c100418206.stfilter,tp,LOCATION_EXTRA,0,1,1,nil)
+	local tc=g:GetFirst()
+	if tc then
+		Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetCode(EFFECT_CHANGE_TYPE)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
+		e1:SetValue(TYPE_SPELL+TYPE_CONTINUOUS)
+		tc:RegisterEffect(e1)
+	end
+end
+function c100418206.mvcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsPreviousLocation(LOCATION_MZONE) and c:IsLocation(LOCATION_MZONE)
+		and (c:GetPreviousSequence()~=c:GetSequence() or c:GetPreviousControler()~=tp)
+end
+function c100418206.mvtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1))
+		and Duel.IsExistingMatchingCard(c100418206.stfilter,tp,LOCATION_EXTRA,0,1,nil) end
+end
+function c100418206.mvop(e,tp,eg,ep,ev,re,r,rp)
+	if not (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1)) then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
+	local g=Duel.SelectMatchingCard(tp,c100418206.stfilter,tp,LOCATION_EXTRA,0,1,1,nil)
+	local tc=g:GetFirst()
+	if tc then
+		Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
+	end
+end

script/c100418207.lua

+--ヴァリアンツM－マーキス
+--
+--Script by Trishula9
+function c100418207.initial_effect(c)
+	--pendulum summon
+	aux.EnablePendulumAttribute(c)
+	--spsummon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_PZONE)
+	e1:SetCountLimit(1,100418207)
+	e1:SetCondition(c100418207.spcon)
+	e1:SetTarget(c100418207.sptg)
+	e1:SetOperation(c100418207.spop)
+	c:RegisterEffect(e1)
+	--dice
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_DICE+CATEGORY_TOHAND)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,100418207+100)
+	e2:SetTarget(c100418207.dctg)
+	e2:SetOperation(c100418207.dcop)
+	c:RegisterEffect(e2)
+	--dice
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_DICE+CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_MOVE)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCountLimit(1,100418207+200)
+	e3:SetCondition(c100418207.mvcon)
+	e3:SetTarget(c100418207.mvtg)
+	e3:SetOperation(c100418207.mvop)
+	c:RegisterEffect(e3)
+end
+function c100418207.cfilter(c)
+	return c:IsSetCard(0x27c) and c:IsAttribute(ATTRIBUTE_FIRE) and c:IsFaceup()
+end
+function c100418207.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.IsEnvironment(100418212) or Duel.IsExistingMatchingCard(c100418207.cfilter,tp,LOCATION_MZONE,0,1,nil)
+end
+function c100418207.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+end
+function c100418207.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	if c:IsRelateToEffect(e) then
+		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP,zone)
+	end
+end
+function c100418207.dctg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>0 end
+	Duel.SetOperationInfo(0,CATEGORY_DICE,nil,0,tp,1)
+end
+function c100418207.thfilter(c)
+	return c:IsSetCard(0x27c) and c:IsAbleToHand()
+end
+function c100418207.dcop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)==0 then return end
+	local dc=Duel.TossDice(tp,1)
+	Duel.ConfirmDecktop(tp,dc)
+	local dg=Duel.GetDecktopGroup(tp,dc)
+	local g=dg:Filter(c100418207.thfilter,nil)
+	if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(100418207,0)) then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+		local sg=g:Select(tp,1,1,nil)
+		Duel.SendtoHand(sg,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,sg)
+	end
+	Duel.ShuffleDeck(tp)
+end
+function c100418207.mvcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsPreviousLocation(LOCATION_MZONE) and c:IsLocation(LOCATION_MZONE)
+		and (c:GetPreviousSequence()~=c:GetSequence() or c:GetPreviousControler()~=tp)
+end
+function c100418207.spfilter(c,e,tp)
+	local zone=1<<c:GetSequence()
+	return c:IsFaceup() and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone)
+end
+function c100418207.mvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chk==0 then return Duel.IsExistingMatchingCard(c100418207.spfilter,tp,LOCATION_SZONE,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_DICE,nil,0,tp,1)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_SZONE)
+end
+function c100418207.mvop(e,tp,eg,ep,ev,re,r,rp)
+	local dc=Duel.TossDice(tp,1)
+	if dc<2 or dc>5 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,c100418207.spfilter,tp,LOCATION_SZONE,0,1,1,nil,e,tp)
+	local tc=g:GetFirst()
+	if tc then
+		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP,1<<tc:GetSequence())
+	end
+end
\ No newline at end of file

script/c100418208.lua

+--ヴァリアンツD－デューク
+--
+--Script by Trishula9
+function c100418208.initial_effect(c)
+	--pendulum summon
+	aux.EnablePendulumAttribute(c)
+	--spsummon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_PZONE)
+	e1:SetCountLimit(1,100418208)
+	e1:SetCondition(c100418208.spcon)
+	e1:SetTarget(c100418208.sptg)
+	e1:SetOperation(c100418208.spop)
+	c:RegisterEffect(e1)
+	--actlimit
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCountLimit(1,100418208+100)
+	e2:SetTarget(c100418208.altg)
+	e2:SetOperation(c100418208.alop)
+	c:RegisterEffect(e2)
+	--control
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_CONTROL)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_MOVE)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
+	e3:SetCountLimit(1,100418208+200)
+	e3:SetCondition(c100418208.mvcon)
+	e3:SetTarget(c100418208.mvtg)
+	e3:SetOperation(c100418208.mvop)
+	c:RegisterEffect(e3)
+end
+function c100418208.cfilter(c)
+	return c:IsSetCard(0x27c) and c:IsAttribute(ATTRIBUTE_FIRE) and c:IsFaceup()
+end
+function c100418208.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.IsEnvironment(100418212) or Duel.IsExistingMatchingCard(c100418208.cfilter,tp,LOCATION_MZONE,0,1,nil)
+end
+function c100418208.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+end
+function c100418208.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	if c:IsRelateToEffect(e) then
+		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP,zone)
+	end
+end
+function c100418208.alfilter(c)
+	return c:IsFacedown() and c:GetSequence()<5
+end
+function c100418208.altg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_SZONE) and c100418208.alfilter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c100418208.alfilter,tp,LOCATION_SZONE,LOCATION_SZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(100418208,0))
+	Duel.SelectTarget(tp,c100418208.alfilter,tp,LOCATION_SZONE,LOCATION_SZONE,1,1,nil)
+end
+function c100418208.alop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if tc:IsFacedown() and tc:IsRelateToEffect(e) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_CANNOT_TRIGGER)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e1)
+	end
+end
+function c100418208.mvcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsPreviousLocation(LOCATION_MZONE) and c:IsLocation(LOCATION_MZONE)
+		and (c:GetPreviousSequence()~=c:GetSequence() or c:GetPreviousControler()~=tp)
+end
+function c100418208.filter(c)
+	return c:IsFaceup() and c:IsControlerCanBeChanged() and c:GetSequence()<=4
+end
+function c100418208.mvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c100418208.filter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c100418208.filter,tp,0,LOCATION_MZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
+	local g=Duel.SelectTarget(tp,c100418208.filter,tp,0,LOCATION_MZONE,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_CONTROL,g,1,0,0)
+end
+function c100418208.mvop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and tc:IsFaceup() and Duel.GetControl(tc,tp)~=0 then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_CANNOT_ATTACK)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		tc:RegisterEffect(e1)
+		local e2=e1:Clone()
+		e2:SetCode(EFFECT_CANNOT_TRIGGER)
+		tc:RegisterEffect(e2)
+		local e3=e1:Clone()
+		e3:SetCode(EFFECT_ADD_SETCODE)
+		e3:SetValue(0x27c)
+		tc:RegisterEffect(e3)
+	end
+end

script/c100418209.lua

+--ヴァリアンツの聚－幻中
+--
+--Script by Trishula9
+function c100418209.initial_effect(c)
+	--fusion summon
+	c:EnableReviveLimit()
+	aux.AddFusionProcFunRep(c,c100418209.ffilter,3,true)
+	--pendulum summon
+	aux.EnablePendulumAttribute(c,false)
+	--pzone effect
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_PZONE)
+	e1:SetCountLimit(1,100418209)
+	e1:SetTarget(c100418209.ptg)
+	e1:SetOperation(c100418209.pop)
+	c:RegisterEffect(e1)
+	--set
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCountLimit(1,100418209+100)
+	e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
+	e2:SetCondition(c100418209.stcon)
+	e2:SetTarget(c100418209.sttg)
+	e2:SetOperation(c100418209.stop)
+	c:RegisterEffect(e2)
+	--pendulum
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_DESTROYED)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCondition(c100418209.pencon)
+	e3:SetTarget(c100418209.pentg)
+	e3:SetOperation(c100418209.penop)
+	c:RegisterEffect(e3)
+end
+function c100418209.ffilter(c,fc,sub,mg,sg)
+	return c:IsFusionSetCard(0x27c)
+end
+function c100418203.pfilter(c)
+	local seq=c:GetSequence()
+	local tp=c:GetControler()
+	if seq>4 then return false end
+	return (seq>0 and Duel.CheckLocation(tp,LOCATION_MZONE,seq-1))
+		or (seq<4 and Duel.CheckLocation(tp,LOCATION_MZONE,seq+1))
+end
+function c100418209.ptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	local b1=c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone)
+	local b2=Duel.IsExistingMatchingCard(c100418203.pfilter,tp,LOCATION_MZONE,0,1,nil)
+	if chk==0 then return b1 or b2 end
+	local s=0
+	if b1 and not b2 then
+		s=Duel.SelectOption(tp,aux.Stringid(100418209,0))
+	end
+	if not b1 and b2 then
+		s=Duel.SelectOption(tp,aux.Stringid(100418209,1))+1
+	end
+	if b1 and b2 then
+		s=Duel.SelectOption(tp,aux.Stringid(100418209,0),aux.Stringid(100418209,1))
+	end
+	e:SetLabel(s)
+	if s==0 then
+		Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+	end
+end
+function c100418209.pop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if not c:IsRelateToEffect(e) then return end
+	local zone=1<<c:GetSequence()
+	if e:GetLabel()==0 then
+		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP,zone)
+	end
+	if e:GetLabel()==1 then
+		Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(100418209,2))
+		local sc=Duel.SelectMatchingCard(tp,c100418209.pfilter,tp,LOCATION_MZONE,0,1,1,nil):GetFirst()
+		if sc then
+			local seq=sc:GetSequence()
+			if seq>4 then return end
+			local flag=0
+			if seq>0 and Duel.CheckLocation(tp,LOCATION_MZONE,seq-1) then flag=flag|(1<<(seq-1)) end
+			if seq<4 and Duel.CheckLocation(tp,LOCATION_MZONE,seq+1) then flag=flag|(1<<(seq+1)) end
+			if flag==0 then return end
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOZONE)
+			local s=Duel.SelectDisableField(tp,1,LOCATION_MZONE,0,~flag)
+			local nseq=math.log(s,2)
+			Duel.MoveSequence(sc,nseq)
+		end
+	end
+end
+function c100418209.stcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
+end
+function c100418209.stfilter(c)
+	local seq=c:GetSequence()
+	return seq<=4 and c:IsType(TYPE_EFFECT) and c:IsFaceup()
+end
+function c100418209.sttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c100418209.stfilter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c100418209.stfilter,tp,0,LOCATION_MZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(100418209,3))
+	Duel.SelectTarget(tp,c100418209.stfilter,tp,0,LOCATION_MZONE,1,1,nil)
+end
+function c100418209.stop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if not (tc:IsRelateToEffect(e) and tc:IsControler(1-tp) and not tc:IsImmuneToEffect(e)) then return end
+	local zone=1<<tc:GetSequence()
+	local oc=Duel.GetMatchingGroup(c100418209.seqfilter,tp,0,LOCATION_SZONE,nil,tc:GetSequence()):GetFirst()
+	if oc and Duel.Destroy(oc,REASON_EFFECT)>0 and oc:IsType(TYPE_MONSTER) then
+		Duel.SetLP(1-tp,Duel.GetLP(1-tp)-oc:GetAttack())
+	end
+	if Duel.MoveToField(tc,tp,1-tp,LOCATION_SZONE,POS_FACEUP,true,zone) then
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetCode(EFFECT_CHANGE_TYPE)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
+		e1:SetValue(TYPE_SPELL+TYPE_CONTINUOUS)
+		tc:RegisterEffect(e1)
+	end
+end
+function c100418209.seqfilter(c,seq)
+	return c:GetSequence()==seq
+end
+function c100418209.pencon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsSummonType(SUMMON_TYPE_SPECIAL) and rp==1-tp and c:IsReason(REASON_EFFECT)
+		and c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_MZONE) and c:IsFaceup()
+end
+function c100418209.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) end
+end
+function c100418209.penop(e,tp,eg,ep,ev,re,r,rp)
+	if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return end
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) then
+		Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
+	end
+end

script/c100418210.lua

+--ヴァリアンツG－グランデューク
+--
+--Script by Trishula9
+function c100418210.initial_effect(c)
+	--fusion summon
+	c:EnableReviveLimit()
+	aux.AddFusionProcFunRep(c,c100418210.ffilter,2,true)
+	--pendulum summon
+	aux.EnablePendulumAttribute(c,false)
+	--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(c100418210.splimit)
+	c:RegisterEffect(e1)
+	--spsummon
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e2:SetCode(EFFECT_SPSUMMON_PROC)
+	e2:SetRange(LOCATION_EXTRA)
+	e2:SetCondition(c100418210.hspcon)
+	e2:SetOperation(c100418210.hspop)
+	c:RegisterEffect(e2)
+	--pzone effect
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_IGNITION)
+	e3:SetRange(LOCATION_PZONE)
+	e3:SetCountLimit(1,100418210)
+	e3:SetTarget(c100418210.ptg)
+	e3:SetOperation(c100418210.pop)
+	c:RegisterEffect(e3)
+	--to hand
+	local e4=Effect.CreateEffect(c)
+	e4:SetCategory(CATEGORY_TOHAND+CATEGORY_DAMAGE+CATEGORY_ATKCHANGE)
+	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e4:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e4:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
+	e4:SetTarget(c100418210.thtg)
+	e4:SetOperation(c100418210.thop)
+	c:RegisterEffect(e4)
+end
+function c100418210.ffilter(c,fc,sub,mg,sg)
+	return c:IsFusionSetCard(0x27c)
+end
+function c100418210.splimit(e,se,sp,st)
+	local c=e:GetHandler()
+	if c:IsLocation(LOCATION_EXTRA) and c:IsFacedown() then return st&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION end
+	return true
+end
+function c100418210.hspfilter(c,tp,sc)
+	local seq=c:GetSequence()
+	return (seq==1 or seq==3) and not c:IsFusionType(TYPE_FUSION) and c:IsLevelAbove(5) and c:IsSetCard(0x27c) 
+		and c:IsControler(tp) and Duel.GetLocationCountFromEx(tp,tp,c,sc)>0 and c:IsCanBeFusionMaterial(sc,SUMMON_TYPE_SPECIAL)
+end
+function c100418210.hspcon(e,c)
+	if c==nil then return true end
+	return Duel.CheckReleaseGroup(c:GetControler(),c100418210.hspfilter,1,nil,c:GetControler(),c)
+end
+function c100418210.hspop(e,tp,eg,ep,ev,re,r,rp,c)
+	local g=Duel.SelectReleaseGroup(tp,c100418210.hspfilter,1,1,nil,tp,c)
+	c:SetMaterial(g)
+	Duel.Release(g,REASON_COST)
+end
+function c100418210.pfilter(c)
+	local seq=c:GetSequence()
+	local tp=c:GetControler()
+	if seq>4 then return false end
+	return (seq>0 and Duel.CheckLocation(tp,LOCATION_MZONE,seq-1))
+		or (seq<4 and Duel.CheckLocation(tp,LOCATION_MZONE,seq+1))
+end
+function c100418210.ptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	local zone=1<<c:GetSequence()
+	local b1=c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone)
+	local b2=Duel.IsExistingMatchingCard(c100418210.pfilter,tp,LOCATION_MZONE,0,1,nil)
+	if chk==0 then return b1 or b2 end
+	local s=0
+	if b1 and not b2 then
+		s=Duel.SelectOption(tp,aux.Stringid(100418210,0))
+	end
+	if not b1 and b2 then
+		s=Duel.SelectOption(tp,aux.Stringid(100418210,1))+1
+	end
+	if b1 and b2 then
+		s=Duel.SelectOption(tp,aux.Stringid(100418210,0),aux.Stringid(100418210,1))
+	end
+	e:SetLabel(s)
+	if s==0 then
+		Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+	end
+end
+function c100418210.pop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if not c:IsRelateToEffect(e) then return end
+	local zone=1<<c:GetSequence()
+	if e:GetLabel()==0 then
+		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP,zone)
+	end
+	if e:GetLabel()==1 then
+		Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(100418210,2))
+		local sc=Duel.SelectMatchingCard(tp,c100418210.pfilter,tp,LOCATION_MZONE,0,1,1,nil):GetFirst()
+		if sc then
+			local seq=sc:GetSequence()
+			if seq>4 then return end
+			local flag=0
+			if seq>0 and Duel.CheckLocation(tp,LOCATION_MZONE,seq-1) then flag=flag|(1<<(seq-1)) end
+			if seq<4 and Duel.CheckLocation(tp,LOCATION_MZONE,seq+1) then flag=flag|(1<<(seq+1)) end
+			if flag==0 then return end
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOZONE)
+			local s=Duel.SelectDisableField(tp,1,LOCATION_MZONE,0,~flag)
+			local nseq=math.log(s,2)
+			Duel.MoveSequence(sc,nseq)
+		end
+	end
+end
+function c100418210.thfilter(c)
+	return c:GetOriginalType()&TYPE_MONSTER>0 and c:IsAbleToHand() and c:IsFaceup()
+end
+function c100418210.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_SZONE) and chkc:IsControler(1-tp) and c100418210.thfilter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c100418210.thfilter,tp,0,LOCATION_SZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
+	local g=Duel.SelectTarget(tp,c100418210.thfilter,tp,0,LOCATION_SZONE,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,g:GetFirst():GetAttack())
+end
+function c100418210.thop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	local c=e:GetHandler()
+	if tc:IsRelateToEffect(e) and Duel.SendtoHand(tc,nil,REASON_EFFECT)>0 and tc:IsLocation(LOCATION_HAND) then
+		local dam=Duel.Damage(1-tp,tc:GetAttack(),REASON_EFFECT)
+		if dam>0 and c:IsRelateToEffect(e) and c:IsFaceup() then
+			Duel.BreakEffect()
+			local e1=Effect.CreateEffect(c)
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetProperty(EFFECT_FLAG_COPY_INHERIT)
+			e1:SetCode(EFFECT_UPDATE_ATTACK)
+			e1:SetValue(math.floor(dam/2))
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
+			c:RegisterEffect(e1)
+		end
+	end
+end
\ No newline at end of file

script/c100418211.lua

+--VV－真羅万象
+--
+--Script by Trishula9
+function c100418211.initial_effect(c)
+	--activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetTarget(c100418211.target)
+	e1:SetOperation(c100418211.activate)
+	c:RegisterEffect(e1)
+	--spsummon
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_FZONE)
+	e2:SetProperty(EFFECT_FLAG_BOTH_SIDE+EFFECT_FLAG_CARD_TARGET)
+	e2:SetCountLimit(1,100418211)
+	e2:SetCondition(c100418211.spcon)
+	e2:SetTarget(c100418211.sptg)
+	e2:SetOperation(c100418211.spop)
+	c:RegisterEffect(e2)
+end
+function c100418211.setfilter(c,tp)
+	return c:IsSetCard(0x27c) and not c:IsCode(100418211) and c:IsType(TYPE_FIELD) and not c:IsForbidden() and c:CheckUniqueOnField(1-tp)
+end
+function c100418211.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c100418211.setfilter,tp,LOCATION_DECK,0,1,nil,tp) end
+end
+function c100418211.activate(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
+	local tc=Duel.SelectMatchingCard(tp,c100418211.setfilter,tp,LOCATION_DECK,0,1,1,nil,tp):GetFirst()
+	if tc then
+		local fc=Duel.GetFieldCard(1-tp,LOCATION_SZONE,5)
+		if fc then
+			Duel.SendtoGrave(fc,REASON_RULE)
+			Duel.BreakEffect()
+		end
+		Duel.MoveToField(tc,tp,1-tp,LOCATION_FZONE,POS_FACEUP,true)
+	end
+end
+function c100418211.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetMatchingGroupCount(Card.IsLocation,tp,LOCATION_FZONE,LOCATION_FZONE,nil,LOCATION_FZONE)==2
+end
+function c100418211.spfilter(c,e,tp)
+	local zone=1<<c:GetSequence()
+	return c:IsFaceup() and c:GetSequence()<=4 and c:GetOriginalType()&TYPE_MONSTER~=0
+		and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone)
+end
+function c100418211.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_SZONE) and chkc:IsControler(tp) and c100418211.spfilter(chkc,e,tp) end
+	if chk==0 then return Duel.IsExistingTarget(c100418211.spfilter,tp,LOCATION_SZONE,0,1,nil,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectTarget(tp,c100418211.spfilter,tp,LOCATION_SZONE,0,1,1,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
+end
+function c100418211.spop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	local zone=1<<tc:GetSequence()
+	if tc:IsRelateToEffect(e) then
+		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP,zone)
+	end
+end

script/c100418212.lua

+--VV－百識公国
+--
+--Script by Trishula9
+function c100418212.initial_effect(c)
+	--activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetTarget(c100418212.target)
+	e1:SetOperation(c100418212.activate)
+	c:RegisterEffect(e1)
+	--set
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_FZONE)
+	e2:SetProperty(EFFECT_FLAG_BOTH_SIDE+EFFECT_FLAG_CARD_TARGET)
+	e2:SetCountLimit(1,100418212)
+	e2:SetCondition(c100418212.stcon)
+	e2:SetTarget(c100418212.sttg)
+	e2:SetOperation(c100418212.stop)
+	c:RegisterEffect(e2)
+end
+function c100418212.setfilter(c,tp)
+	return c:IsSetCard(0x27c) and not c:IsCode(100418212) and c:IsType(TYPE_FIELD) and not c:IsForbidden() and c:CheckUniqueOnField(1-tp)
+end
+function c100418212.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c100418212.setfilter,tp,LOCATION_DECK,0,1,nil,tp) end
+end
+function c100418212.activate(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
+	local tc=Duel.SelectMatchingCard(tp,c100418212.setfilter,tp,LOCATION_DECK,0,1,1,nil,tp):GetFirst()
+	if tc then
+		local fc=Duel.GetFieldCard(1-tp,LOCATION_SZONE,5)
+		if fc then
+			Duel.SendtoGrave(fc,REASON_RULE)
+			Duel.BreakEffect()
+		end
+		Duel.MoveToField(tc,tp,1-tp,LOCATION_FZONE,POS_FACEUP,true)
+	end
+end
+function c100418212.stcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetMatchingGroupCount(Card.IsLocation,tp,LOCATION_FZONE,LOCATION_FZONE,nil,LOCATION_FZONE)==2
+end
+function c100418212.stfilter(c,tp)
+	local seq=c:GetSequence()
+	return seq<=4 and c:IsType(TYPE_EFFECT) and c:IsFaceup()
+		and Duel.IsExistingMatchingCard(c100418212.cfilter,tp,LOCATION_MZONE,0,1,nil,seq)
+end
+function c100418212.cfilter(c,seq)
+	return aux.MZoneSequence(c:GetSequence())==4-seq
+end
+function c100418212.sttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c100418212.stfilter(chkc,tp) end
+	if chk==0 then return Duel.IsExistingTarget(c100418212.stfilter,tp,0,LOCATION_MZONE,1,nil,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(100418212,0))
+	Duel.SelectTarget(tp,c100418212.stfilter,tp,0,LOCATION_MZONE,1,1,nil,tp)
+end
+function c100418212.seqfilter(c,seq)
+	return c:GetSequence()==seq
+end
+function c100418212.stop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if not (tc:IsRelateToEffect(e) and tc:IsControler(1-tp) and not tc:IsImmuneToEffect(e)) then return end
+	local zone=1<<tc:GetSequence()
+	local oc=Duel.GetMatchingGroup(c100418212.seqfilter,tp,0,LOCATION_SZONE,nil,tc:GetSequence()):GetFirst()
+	if oc then
+		Duel.Destroy(oc,REASON_EFFECT)
+	end
+	if Duel.MoveToField(tc,tp,1-tp,LOCATION_SZONE,POS_FACEUP,true,zone) then
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetCode(EFFECT_CHANGE_TYPE)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
+		e1:SetValue(TYPE_SPELL+TYPE_CONTINUOUS)
+		tc:RegisterEffect(e1)
+	end
+end
+function c100418212.seqfilter(c,seq)
+	return c:GetSequence()==seq
+end

script/c101108028.lua

+--白昼のスナイパー
+--
+--script by Raye Hikawa
+function c101108028.initial_effect(c)
+	--set
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_MONSTER_SSET)
+	e1:SetValue(TYPE_SPELL)
+	c:RegisterEffect(e1)
+	--sp summon
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e2:SetCode(EVENT_TO_GRAVE)
+	e2:SetOperation(c101108028.regop)
+	c:RegisterEffect(e2)
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(101108028,0))
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY)
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_PHASE+PHASE_STANDBY)
+	e3:SetRange(LOCATION_GRAVE)
+	e3:SetCondition(c101108028.spcon)
+	e3:SetTarget(c101108028.sptg)
+	e3:SetOperation(c101108028.spop)
+	c:RegisterEffect(e3)
+end
+function c101108028.regop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsPreviousLocation(LOCATION_SZONE) and c:IsPreviousPosition(POS_FACEDOWN) and c:IsReason(REASON_DESTROY) then
+		c:RegisterFlagEffect(101108028,RESET_EVENT+RESETS_STANDARD,1,0)
+	end
+end
+function c101108028.spcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return Duel.GetTurnCount()==c:GetTurnID()+1 and c:GetFlagEffect(101108028)>0
+end
+function c101108028.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function c101108028.spop(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
+		local cg=c:GetColumnGroup():Filter(Card.IsControler,nil,1-tp)
+		if #cg==0 then return end
+		Duel.BreakEffect()
+		Duel.Destroy(cg,REASON_EFFECT)
+	end
+end

script/c101108030.lua

+--絶海のマーレ
+--
+--Script by mercury233
+local s,id,o=GetID()
+function s.initial_effect(c)
+	--send to grave
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(id,0))
+	e1:SetCategory(CATEGORY_TOGRAVE)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCountLimit(1,id)
+	e1:SetTarget(s.target)
+	e1:SetOperation(s.operation)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	c:RegisterEffect(e2)
+	--to hand
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(id,1))
+	e3:SetCategory(CATEGORY_TOHAND)
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_PHASE+PHASE_END)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e3:SetCountLimit(1,id+o)
+	e3:SetCondition(s.thcon)
+	e3:SetCost(s.thcost)
+	e3:SetTarget(s.thtg)
+	e3:SetOperation(s.thop)
+	c:RegisterEffect(e3)
+end
+function s.tgfilter(c)
+	return c:IsType(TYPE_MONSTER) and c:IsRace(RACE_AQUA) and not c:IsCode(id) and c:IsAbleToGrave()
+end
+function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(s.tgfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
+end
+function s.operation(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g=Duel.SelectMatchingCard(tp,s.tgfilter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoGrave(g,REASON_EFFECT)
+	end
+end
+function s.thcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetTurnPlayer()==tp
+end
+function s.thcost(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 s.thfilter(c)
+	return c:IsType(TYPE_MONSTER) and c:IsRace(RACE_AQUA) and not c:IsCode(id) and c:IsAbleToHand()
+end
+function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and s.thfilter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(s.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectTarget(tp,s.thfilter,tp,LOCATION_GRAVE,0,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
+end
+function s.thop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		Duel.SendtoHand(tc,nil,REASON_EFFECT)
+	end
+end

script/c101108032.lua

+--ヤマタコオロチ
+--
+--script by Raye Hikawa
+function c101108032.initial_effect(c)
+	--synclv
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_SYNCHRO_LEVEL)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetValue(c101108032.synclv)
+	c:RegisterEffect(e1)
+	--gain effect
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e2:SetCode(EVENT_BE_MATERIAL)
+	e2:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
+	e2:SetCondition(c101108032.efcon)
+	e2:SetOperation(c101108032.efop)
+	c:RegisterEffect(e2)
+end
+function c101108032.synclv(e,c)
+	local lv=e:GetHandler():GetLevel()
+	return 8*65536+lv
+end
+function c101108032.efcon(e,tp,eg,ep,ev,re,r,rp)
+	return r==REASON_SYNCHRO
+end
+function c101108032.efop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local rc=c:GetReasonCard()
+	local lv=rc:GetOriginalLevel()
+	if lv>0 and lv<=8 then
+		--atkup
+		local e1=Effect.CreateEffect(rc)
+		e1:SetDescription(aux.Stringid(101108032,0))
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		e1:SetValue(800)
+		rc:RegisterEffect(e1,true)
+		local e2=e1:Clone()
+		e2:SetCode(EFFECT_UPDATE_DEFENSE)
+		rc:RegisterEffect(e2,true)
+		reg=true
+	elseif lv>=9 then
+		--inflict damage
+		local e2=Effect.CreateEffect(rc)
+		e2:SetDescription(aux.Stringid(101108032,0))
+		e2:SetType(EFFECT_TYPE_SINGLE)
+		e2:SetCode(EFFECT_PIERCE)
+		e2:SetProperty(EFFECT_FLAG_CLIENT_HINT)
+		e2:SetReset(RESET_EVENT+RESETS_STANDARD)
+		rc:RegisterEffect(e2,true)
+		reg=true
+	end
+	if reg then
+		if not rc:IsType(TYPE_EFFECT) then
+			local e0=Effect.CreateEffect(c)
+			e0:SetType(EFFECT_TYPE_SINGLE)
+			e0:SetCode(EFFECT_ADD_TYPE)
+			e0:SetValue(TYPE_EFFECT)
+			e0:SetReset(RESET_EVENT+RESETS_STANDARD)
+			rc:RegisterEffect(e0,true)
+		end
+	end
+end

script/c101108047.lua

+--席取－六双丸
+--
+--Script by JoyJ & mercury233
+function c101108047.initial_effect(c)
+	--xyz summon
+	aux.AddXyzProcedure(c,nil,6,2)
+	c:EnableReviveLimit()
+	--move
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(101108047,0))
+	e1:SetCategory(CATEGORY_DICE)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+	e1:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1)
+	e1:SetCondition(c101108047.movcon)
+	e1:SetTarget(c101108047.movtg)
+	e1:SetOperation(c101108047.movop)
+	c:RegisterEffect(e1)
+end
+function c101108047.movcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetTurnPlayer()==1-tp
+end
+function c101108047.movtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_DICE,nil,0,tp,1)
+end
+function c101108047.movop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if not c:IsRelateToEffect(e) or c:GetSequence()>=5 then return end
+	local winflag=c:GetOverlayCount()<=6
+	local dice=Duel.TossDice(tp,1)
+	if dice<1 or dice>6 then return end
+	local p=tp
+	local seq=c:GetSequence()-dice
+	if seq<0 then
+		seq=seq+5
+		p=1-tp
+	end
+	local zone=1<<seq
+	local tc=Duel.GetFieldCard(p,LOCATION_MZONE,seq)
+	if p~=tp and not c:IsControlerCanBeChanged(true)
+		or Duel.GetMZoneCount(p,tc,tp,LOCATION_REASON_CONTROL,zone)<=0
+		or tc and (not tc:IsCanOverlay(p) or tc:IsImmuneToEffect(e)) then
+		Duel.SendtoGrave(c,REASON_EFFECT)
+		return
+	end
+	if tc then
+		local og=tc:GetOverlayGroup()
+		og:AddCard(tc)
+		Duel.Overlay(c,og)
+	end
+	if p==tp then
+		Duel.MoveSequence(c,seq)
+	else
+		Duel.GetControl(c,1-tp,0,0,zone)
+	end
+	if winflag and c:GetOverlayCount()>6 then Duel.Win(tp,0x22) end
+end

script/c101108068.lua

+--サプライズ・チェーン
+--
+--script by Raye Hikawa
+function c101108068.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,101108068+EFFECT_COUNT_CODE_OATH)
+	e1:SetCondition(c101108068.condition)
+	e1:SetTarget(c101108068.target)
+	e1:SetOperation(c101108068.activate)
+	c:RegisterEffect(e1)
+end
+function c101108068.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetCurrentChain()>0 and Duel.CheckChainUniqueness()
+end
+function c101108068.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	local cl=Duel.GetCurrentChain()
+	if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=cl
+		and (cl<3 or Duel.IsPlayerCanDiscardDeck(tp,1))
+		and (cl<4 or Duel.IsPlayerCanDraw(tp,1))
+	end
+	local cat=0
+	if cl>=3 then
+		cat=cat|CATEGORY_TOGRAVE
+		Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
+	end
+	if cl>=4 then
+		cat=cat|CATEGORY_DRAW
+		Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
+	end
+	e:SetCategory(cat)
+end
+function c101108068.activate(e,tp,eg,ep,ev,re,r,rp)
+	local cl=Duel.GetCurrentChain()
+	if cl>=2 then
+		Duel.SortDecktop(tp,tp,cl)
+	end
+	if cl>=3 then
+		Duel.BreakEffect()
+		Duel.SendtoGrave(Duel.GetDecktopGroup(tp,1),REASON_EFFECT)
+	end
+	if cl>=4 then
+		Duel.BreakEffect()
+		Duel.Draw(tp,1,REASON_EFFECT)
+	end
+end

script/c101108078.lua

+--イチロクの魔物台帳
+--
+--Script by mercury233
+local s,id,o=GetID()
+function s.initial_effect(c)
+	--temp banish
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(id,0))
+	e1:SetCategory(CATEGORY_REMOVE+CATEGORY_RECOVER)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER)
+	e1:SetTarget(s.target)
+	e1:SetOperation(s.operation)
+	c:RegisterEffect(e1)
+end
+function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_MZONE) and chkc:IsAbleToRemove() end
+	if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToRemove,tp,0,LOCATION_MZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,0,LOCATION_MZONE,1,2,nil)
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,#g,0,0)
+end
+function s.operation(e,tp,eg,ep,ev,re,r,rp)
+	local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
+	if #tg==0 then return end
+	if Duel.Remove(tg,0,REASON_EFFECT+REASON_TEMPORARY)~=0 then
+		local og=Duel.GetOperatedGroup()
+		local oc=og:GetFirst()
+		while oc do
+			oc:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
+			oc=og:GetNext()
+		end
+		og:KeepAlive()
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		e1:SetCode(EVENT_PHASE+PHASE_END)
+		e1:SetReset(RESET_PHASE+PHASE_END)
+		e1:SetCountLimit(1)
+		e1:SetLabelObject(og)
+		e1:SetOperation(s.retop)
+		Duel.RegisterEffect(e1,tp)
+		Duel.BreakEffect()
+		Duel.Recover(1-tp,#og*1000,REASON_EFFECT)
+	end
+end
+function s.retfilter(c)
+	return c:GetFlagEffect(id)~=0
+end
+function s.retop(e,tp,eg,ep,ev,re,r,rp)
+	local g=e:GetLabelObject()
+	local sg=g:Filter(s.retfilter,nil)
+	if sg:GetCount()>1 and Duel.GetLocationCount(1-tp,LOCATION_MZONE)==1 then
+		Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(id,1))
+		local tc=sg:Select(tp,1,1,nil):GetFirst()
+		Duel.ReturnToField(tc)
+	else
+		local tc=sg:GetFirst()
+		while tc do
+			Duel.ReturnToField(tc)
+			tc=sg:GetNext()
+		end
+	end
+end