rm

deck/22-01-15 DIFO(1108).ydk

-#created by ...
-#main
-101108001
-101108002
-101108003
-101108004
-101108005
-101108006
-101108007
-101108008
-101108009
-101108010
-101108011
-101108012
-101108013
-101108014
-101108015
-101108016
-101108017
-101108018
-101108019
-101108020
-101108021
-101108022
-101108023
-101108024
-101108025
-101108026
-101108027
-101108028
-101108029
-101108030
-101108031
-101108032
-101108033
-101108034
-101108052
-101108053
-101108054
-101108055
-101108056
-101108057
-101108058
-101108059
-101108060
-101108061
-101108062
-101108063
-101108064
-101108065
-101108066
-101108067
-101108068
-101108069
-101108070
-101108071
-101108072
-101108073
-101108074
-101108075
-101108076
-101108077
-#extra
-101108035
-101108036
-101108037
-101108038
-101108039
-101108040
-101108041
-101108042
-101108043
-101108044
-101108045
-101108046
-101108047
-101108048
-101108049
-!side
-101108050
-101108051
-101108078
-101108079
-101108080

deck/22-01-21 new cards.ydk

@@ -10,12 +10,9 @@
 100418208
 100418211
 100418212
-100282002
 100287005
 100287014
 100287021
-100200211
-100282037
 100287006
 100287011
 100287019

expansions/pre-strings.conf

 #The first line is used for comment
-!victory 0x22 「席取-六双丸」效果胜利
 !counter 0x15f 指示物（逐渐削减的生命）
 !counter 0x161 指示物（命运的囚人）
-!setname 0x279 野蛮人	バーバリアン
-!setname 0x27a 兽带斗神	セリオンズ
-!setname 0x27b 肆世坏	スケアクロー
 !setname 0x27c 群豪	ヴァリアンツ

script/c100200211.lua

---霊道士チャンシー
---
---Script by mercury233
-function c100200211.initial_effect(c)
-	--to grave
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(100200211,0))
-	e1:SetCategory(CATEGORY_TOGRAVE)
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetCountLimit(1,100200211)
-	e1:SetTarget(c100200211.tgtg)
-	e1:SetOperation(c100200211.tgop)
-	c:RegisterEffect(e1)
-	--special summon
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(100200211,1))
-	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e2:SetProperty(EFFECT_FLAG_DELAY)
-	e2:SetCode(EVENT_REMOVE)
-	e2:SetCountLimit(1,100200211+100)
-	e2:SetCost(c100200211.spcost)
-	e2:SetTarget(c100200211.sptg)
-	e2:SetOperation(c100200211.spop)
-	c:RegisterEffect(e2)
-end
-function c100200211.tgfilter(c)
-	return c:IsRace(RACE_ZOMBIE) and c:IsAbleToGrave()
-end
-function c100200211.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c100200211.tgfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
-end
-function c100200211.tgop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
-	local g=Duel.SelectMatchingCard(tp,c100200211.tgfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil)
-	if g:GetCount()>0 then
-		Duel.SendtoGrave(g,REASON_EFFECT)
-	end
-end
-function c100200211.cfilter(c)
-	return c:IsRace(RACE_ZOMBIE) and c:IsAbleToRemoveAsCost()
-end
-function c100200211.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c100200211.cfilter,tp,LOCATION_GRAVE,0,1,nil) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-	local g=Duel.SelectMatchingCard(tp,c100200211.cfilter,tp,LOCATION_GRAVE,0,1,1,nil)
-	Duel.Remove(g,POS_FACEUP,REASON_COST)
-end
-function c100200211.spfilter(c,e,tp)
-	return c:IsRace(RACE_ZOMBIE) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
-end
-function c100200211.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 c100200211.spop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
-		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e1:SetReset(RESET_EVENT+RESETS_REDIRECT)
-		e1:SetValue(LOCATION_DECKBOT)
-		c:RegisterEffect(e1,true)
-	end
-end

script/c100282037.lua

---Zektrike Kou-Ou
---
---script by Raye & mercury233
-function c100282037.initial_effect(c)
-	--Activate
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(100282037,0))
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetCountLimit(1,100282037+EFFECT_COUNT_CODE_OATH)
-	e1:SetCost(c100282037.cost)
-	e1:SetTarget(c100282037.optg)
-	e1:SetOperation(c100282037.opop)
-	c:RegisterEffect(e1)
-	local e2=e1:Clone()
-	e2:SetDescription(aux.Stringid(100282037,1))
-	e2:SetCategory(CATEGORY_EQUIP)
-	e2:SetTarget(c100282037.eqtg)
-	e2:SetOperation(c100282037.eqop)
-	c:RegisterEffect(e2)
-end
-function c100282037.tgcostfilter(c)
-	return c:IsSetCard(0x56) and c:IsAbleToGraveAsCost() and (c:IsLocation(LOCATION_HAND) or c:IsFaceup())
-end
-function c100282037.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c100282037.tgcostfilter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,e:GetHandler()) end
-	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
-	local g=Duel.SelectMatchingCard(tp,c100282037.tgcostfilter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,1,e:GetHandler())
-	Duel.SendtoGrave(g,REASON_COST)
-end
-function c100282037.opfilter(c,e,tp,spchk,eqchk)
-	return c:IsSetCard(0x56) and c:IsType(TYPE_MONSTER)
-		and (spchk and c:IsCanBeSpecialSummoned(e,0,tp,false,false) or eqchk and c:CheckUniqueOnField(tp) and not c:IsForbidden())
-end
-function c100282037.cfilter(c)
-	return c:IsFaceup() and c:IsSetCard(0x56)
-end
-function c100282037.optg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then
-		local spchk=Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		local eqchk=Duel.GetLocationCount(tp,LOCATION_SZONE)>0
-			and Duel.IsExistingMatchingCard(c100282037.cfilter,tp,LOCATION_MZONE,0,1,nil)
-		return Duel.IsExistingMatchingCard(c100282037.opfilter,tp,LOCATION_DECK,0,1,nil,e,tp,spchk,eqchk)
-	end
-end
-function c100282037.opop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
-	local spchk=Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-	local eqchk=Duel.GetLocationCount(tp,LOCATION_SZONE)>0
-		and Duel.IsExistingMatchingCard(c100282037.cfilter,tp,LOCATION_MZONE,0,1,nil)
-	local g=Duel.SelectMatchingCard(tp,c100282037.opfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp,spchk,eqchk)
-	local tc=g:GetFirst()
-	if tc then
-		if tc:IsCanBeSpecialSummoned(e,0,tp,false,false) and spchk
-			and (not eqchk or Duel.SelectOption(tp,1152,aux.Stringid(100282037,2))==0) then
-			Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
-		else
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
-			local sg=Duel.SelectMatchingCard(tp,c100282037.cfilter,tp,LOCATION_MZONE,0,1,1,nil)
-			local sc=sg:GetFirst()
-			if sc then
-				if not Duel.Equip(tp,tc,sc) then return end
-				--equip limit
-				local e1=Effect.CreateEffect(e:GetHandler())
-				e1:SetType(EFFECT_TYPE_SINGLE)
-				e1:SetCode(EFFECT_EQUIP_LIMIT)
-				e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-				e1:SetLabelObject(sc)
-				e1:SetValue(c100282037.eqlimit)
-				e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-				tc:RegisterEffect(e1)
-			end
-		end
-	end
-end
-function c100282037.eqfilter(c,tp)
-	return c:IsSetCard(0x56) and c:IsType(TYPE_EQUIP) and c:CheckUniqueOnField(tp) and not c:IsForbidden()
-		and Duel.IsExistingMatchingCard(c100282037.tgfilter,tp,LOCATION_MZONE,0,1,nil,c)
-end
-function c100282037.tgfilter(c,eqc)
-	return c:IsFaceup() and c:IsSetCard(0x56) and eqc:CheckEquipTarget(c)
-end
-function c100282037.eqtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
-		and Duel.IsExistingMatchingCard(c100282037.eqfilter,tp,LOCATION_DECK,0,1,nil,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_EQUIP,nil,1,tp,LOCATION_DECK)
-end
-function c100282037.eqop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
-	if Duel.GetLocationCount(tp,LOCATION_SZONE)>0 then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
-		local ec=Duel.SelectMatchingCard(tp,c100282037.eqfilter,tp,LOCATION_DECK,0,1,1,nil,tp):GetFirst()
-		if ec then
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
-			local tc=Duel.SelectMatchingCard(tp,c100282037.tgfilter,tp,LOCATION_MZONE,0,1,1,nil,ec):GetFirst()
-			Duel.Equip(tp,ec,tc)
-		end
-	end
-end
-function c100282037.eqlimit(e,c)
-	return c==e:GetLabelObject()
-end

script/c101108001.lua

---EMジェントルード
---
---Script by Trishula9
-function c101108001.initial_effect(c)
-	aux.EnablePendulumAttribute(c)
-	--search
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(101108001,0))
-	e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetRange(LOCATION_PZONE)
-	e1:SetCountLimit(1,101108001)
-	e1:SetCondition(c101108001.scon)
-	e1:SetTarget(c101108001.stg)
-	e1:SetOperation(c101108001.sop)
-	c:RegisterEffect(e1)
-	--pendulum set
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(101108001,1))
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e2:SetCode(EVENT_DESTROYED)
-	e2:SetProperty(EFFECT_FLAG_DELAY)
-	e2:SetCountLimit(1,101108001+100)
-	e2:SetTarget(c101108001.pentg)
-	e2:SetOperation(c101108001.penop)
-	c:RegisterEffect(e2)
-	--to hand
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(101108001,2))
-	e3:SetCategory(CATEGORY_TOHAND)
-	e3:SetType(EFFECT_TYPE_IGNITION)
-	e3:SetRange(LOCATION_EXTRA)
-	e3:SetCountLimit(1,101108001+100)
-	e3:SetCondition(c101108001.thcon)
-	e3:SetCost(c101108001.thcost)
-	e3:SetTarget(c101108001.thtg)
-	e3:SetOperation(c101108001.thop)
-	c:RegisterEffect(e3)
-end
-function c101108001.cfilter(c)
-	return c:IsCode(101108002)
-end
-function c101108001.gfilter(c)
-	return c:IsFaceup() and c:IsType(TYPE_PENDULUM)
-end
-function c101108001.scon(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.GetFieldGroup(tp,LOCATION_MZONE,0)
-	return Duel.IsExistingMatchingCard(c101108001.cfilter,tp,LOCATION_PZONE,0,1,e:GetHandler())
-		and (g:GetCount()==0 or g:FilterCount(c101108001.gfilter,nil)==g:GetCount())
-end
-function c101108001.sfilter(c)
-	return c:IsSetCard(0x99) and c:IsAbleToHand()
-end
-function c101108001.stg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c101108001.sfilter,tp,LOCATION_DECK,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-end
-function c101108001.sop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c101108001.sfilter,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 c101108001.penfilter(c)
-	return c:IsSetCard(0x9f) and c:IsType(TYPE_PENDULUM) and not c:IsCode(101108001) and not c:IsForbidden()
-end
-function c101108001.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))
-		and Duel.IsExistingMatchingCard(c101108001.penfilter,tp,LOCATION_DECK,0,1,nil) end
-end
-function c101108001.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
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
-	local g=Duel.SelectMatchingCard(tp,c101108001.penfilter,tp,LOCATION_DECK,0,1,1,nil)
-	local tc=g:GetFirst()
-	if tc then
-		Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
-	end
-end
-function c101108001.thcon(e,tp,eg,ep,ev,re,r,rp)
-	return e:GetHandler():IsFaceup()
-end
-function c101108001.costfilter(c)
-	return c:IsType(TYPE_PENDULUM) and c:IsDiscardable()
-end
-function c101108001.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c101108001.costfilter,tp,LOCATION_HAND,0,1,nil) end
-	Duel.DiscardHand(tp,c101108001.costfilter,1,1,REASON_COST+REASON_DISCARD,nil)
-end
-function c101108001.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsAbleToHand() end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,e:GetHandler(),1,0,0)
-end
-function c101108001.thfilter(c)
-	return c:IsSetCard(0x9f,0x99) and c:IsAbleToHand()
-end
-function c101108001.thop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) then
-		Duel.SendtoHand(c,nil,REASON_EFFECT)
-		local g=Duel.GetMatchingGroup(c101108001.thfilter,tp,LOCATION_PZONE,0,nil)
-		if c:IsLocation(LOCATION_HAND) and g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(101108001,3)) then
-			Duel.BreakEffect()
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
-			local sg=g:Select(tp,1,1,nil)
-			Duel.HintSelection(sg)
-			Duel.SendtoHand(sg,nil,REASON_EFFECT)
-		end
-	end
-end

script/c101108002.lua

---EMレディアンジュ
---
---Script by Trishula9
-function c101108002.initial_effect(c)
-	aux.EnablePendulumAttribute(c)
-	--atk down
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(101108002,0))
-	e1:SetCategory(CATEGORY_ATKCHANGE)
-	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e1:SetCode(EVENT_ATTACK_ANNOUNCE)
-	e1:SetRange(LOCATION_PZONE)
-	e1:SetCountLimit(1)
-	e1:SetCondition(c101108002.atkcon)
-	e1:SetCost(c101108002.atkcost)
-	e1:SetOperation(c101108002.atkop)
-	c:RegisterEffect(e1)
-	--draw
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(101108002,1))
-	e2:SetCategory(CATEGORY_DRAW)
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetRange(LOCATION_HAND)
-	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e2:SetCountLimit(1,101108002)
-	e2:SetCost(c101108002.drcost)
-	e2:SetTarget(c101108002.drtg)
-	e2:SetOperation(c101108002.drop)
-	c:RegisterEffect(e2)
-	--pendulum set
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(101108002,2))
-	e3:SetCategory(CATEGORY_LEAVE_GRAVE)
-	e3:SetType(EFFECT_TYPE_IGNITION)
-	e3:SetRange(LOCATION_GRAVE)
-	e3:SetCountLimit(1,101108002)
-	e3:SetCondition(c101108002.pencon)
-	e3:SetTarget(c101108002.pentg)
-	e3:SetOperation(c101108002.penop)
-	c:RegisterEffect(e3)
-end
-function c101108002.atkcon(e,tp,eg,ep,ev,re,r,rp)
-	local a,d=Duel.GetBattleMonster(tp)
-	return a and d and d:IsFaceup()
-end
-function c101108002.costfilter(c)
-	return c:IsType(TYPE_PENDULUM) and c:IsDiscardable()
-end
-function c101108002.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c101108002.costfilter,tp,LOCATION_HAND,0,1,nil) end
-	Duel.DiscardHand(tp,c101108002.costfilter,1,1,REASON_COST+REASON_DISCARD,nil)
-end
-function c101108002.atkop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local tc=Duel.GetBattleMonster(1-tp)
-	if tc and tc:IsRelateToBattle() then
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_UPDATE_ATTACK)
-		e1:SetValue(-1000)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-		tc:RegisterEffect(e1)
-	end
-end
-function c101108002.drfilter(c)
-	return c:IsSetCard(0x9f) and c:IsType(TYPE_MONSTER) and not c:IsCode(101108002) and c:IsDiscardable()
-end
-function c101108002.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	local c=e:GetHandler()
-	if chk==0 then return c:IsDiscardable() and Duel.IsExistingMatchingCard(c101108002.drfilter,tp,LOCATION_HAND,0,1,c) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISCARD)
-	local g=Duel.SelectMatchingCard(tp,c101108002.drfilter,tp,LOCATION_HAND,0,1,1,c)
-	g:AddCard(c)
-	Duel.SendtoGrave(g,REASON_COST+REASON_DISCARD)
-end
-function c101108002.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsPlayerCanDraw(tp,2) end
-	Duel.SetTargetPlayer(tp)
-	Duel.SetTargetParam(2)
-	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,2)
-end
-function c101108002.drop(e,tp,eg,ep,ev,re,r,rp)
-	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
-	Duel.Draw(p,d,REASON_EFFECT)
-end
-function c101108002.penfilter(c)
-	return (c:IsSetCard(0x99) or c:IsCode(101108001)) and c:IsFaceup()
-end
-function c101108002.pencon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.IsExistingMatchingCard(c101108002.penfilter,tp,LOCATION_ONFIELD,0,1,nil)
-end
-function c101108002.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
-	Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
-end
-function c101108002.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/c101108003.lua

---セリオンズ“ブルズ”アイン
---
---Script by JustFish
-function c101108003.initial_effect(c)
-	--special summon
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(101108003,0))
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_EQUIP)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetRange(LOCATION_HAND)
-	e1:SetCountLimit(1,101108003)
-	e1:SetTarget(c101108003.sptg)
-	e1:SetOperation(c101108003.spop)
-	c:RegisterEffect(e1)
-	--Destroy
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(101108003,1))
-	e2:SetCategory(CATEGORY_DESTROY)
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetRange(LOCATION_MZONE)
-	e2:SetCountLimit(1,101108003+100)
-	e2:SetTarget(c101108003.destg)
-	e2:SetOperation(c101108003.desop)
-	c:RegisterEffect(e2)
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
-	e3:SetRange(LOCATION_SZONE)
-	e3:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
-	e3:SetTarget(c101108003.eftg)
-	e3:SetLabelObject(e2)
-	c:RegisterEffect(e3)
-	--Atk up
-	local e4=Effect.CreateEffect(c)
-	e4:SetType(EFFECT_TYPE_EQUIP)
-	e4:SetCode(EFFECT_UPDATE_ATTACK)
-	e4:SetValue(700)
-	e4:SetCondition(c101108003.atkcon)
-	c:RegisterEffect(e4)
-end
-function c101108003.eqfilter(c,tp)
-	return (c:IsRace(RACE_WARRIOR) or c:IsSetCard(0x27a)) and c:IsType(TYPE_MONSTER) and c:CheckUniqueOnField(tp)
-end
-function c101108003.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and c101108003.eqfilter(chkc,e,tp) and chkc:IsControler(tp) end
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.GetLocationCount(tp,LOCATION_SZONE)>0
-		and Duel.IsExistingTarget(c101108003.eqfilter,tp,LOCATION_GRAVE,0,1,nil,tp)
-		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
-	local sg=Duel.SelectTarget(tp,c101108003.eqfilter,tp,LOCATION_GRAVE,0,1,1,nil,tp)
-	Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,sg,1,0,0)
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
-end
-function c101108003.spop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsRelateToEffect(e)
-		and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
-		local tc=Duel.GetFirstTarget()
-		if tc:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 then
-			Duel.Equip(tp,tc,c,false)
-			local e1=Effect.CreateEffect(c)
-			e1:SetType(EFFECT_TYPE_SINGLE)
-			e1:SetProperty(EFFECT_FLAG_OWNER_RELATE)
-			e1:SetCode(EFFECT_EQUIP_LIMIT)
-			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-			e1:SetValue(c101108003.eqlimit)
-			tc:RegisterEffect(e1)
-		end
-	end
-end
-function c101108003.eqlimit(e,c)
-	return e:GetOwner()==c
-end
-function c101108003.filter(c)
-	return c:IsFaceup() and c:IsSetCard(0x27a)
-end
-function c101108003.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return false end
-	if chk==0 then return Duel.IsExistingTarget(c101108003.filter,tp,LOCATION_ONFIELD,0,1,nil)
-		and Duel.IsExistingTarget(aux.TRUE,tp,0,LOCATION_ONFIELD,1,nil) end
-	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
-	local g1=Duel.SelectTarget(tp,c101108003.filter,tp,LOCATION_ONFIELD,0,1,1,nil)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
-	local g2=Duel.SelectTarget(tp,aux.TRUE,tp,0,LOCATION_ONFIELD,1,1,nil)
-	g1:Merge(g2)
-	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g1,2,0,0)
-end
-function c101108003.desop(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
-	local tg=g:Filter(Card.IsRelateToEffect,nil,e)
-	if tg:GetCount()>0 then
-		Duel.Destroy(tg,REASON_EFFECT)
-	end
-end
-function c101108003.eftg(e,c)
-	return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x27a) and c:GetEquipGroup():IsContains(e:GetHandler())
-end
-function c101108003.atkcon(e,tp,eg,ep,ev,re,r,rp)
-	local ec=e:GetHandler():GetEquipTarget()
-	return ec and ec:IsSetCard(0x27a)
-end

script/c101108004.lua

---セリオンズ“リーパー”ファム
---
---Script by JustFish
-function c101108004.initial_effect(c)
-	--special summon
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(101108004,0))
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_EQUIP)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetRange(LOCATION_HAND)
-	e1:SetCountLimit(1,101108004)
-	e1:SetTarget(c101108004.sptg)
-	e1:SetOperation(c101108004.spop)
-	c:RegisterEffect(e1)
-	--to hand
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(101108004,1))
-	e2:SetCategory(CATEGORY_TOHAND)
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetCode(EVENT_FREE_CHAIN)
-	e2:SetRange(LOCATION_MZONE)
-	e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
-	e2:SetCountLimit(1,101108004+100)
-	e2:SetCondition(c101108004.thcon)
-	e2:SetTarget(c101108004.thtg)
-	e2:SetOperation(c101108004.thop)
-	c:RegisterEffect(e2)
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
-	e3:SetRange(LOCATION_SZONE)
-	e3:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
-	e3:SetTarget(c101108004.eftg)
-	e3:SetLabelObject(e2)
-	c:RegisterEffect(e3)
-	--Atk up
-	local e4=Effect.CreateEffect(c)
-	e4:SetType(EFFECT_TYPE_EQUIP)
-	e4:SetCode(EFFECT_UPDATE_ATTACK)
-	e4:SetValue(700)
-	e4:SetCondition(c101108004.atkcon)
-	c:RegisterEffect(e4)
-end
-function c101108004.eqfilter(c,tp)
-	return (c:IsRace(RACE_AQUA) or c:IsSetCard(0x27a)) and c:IsType(TYPE_MONSTER) and c:CheckUniqueOnField(tp)
-end
-function c101108004.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and c101108004.eqfilter(chkc,e,tp) and chkc:IsControler(tp) end
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.GetLocationCount(tp,LOCATION_SZONE)>0
-		and Duel.IsExistingTarget(c101108004.eqfilter,tp,LOCATION_GRAVE,0,1,nil,tp)
-		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
-	local sg=Duel.SelectTarget(tp,c101108004.eqfilter,tp,LOCATION_GRAVE,0,1,1,nil,tp)
-	Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,sg,1,0,0)
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
-end
-function c101108004.spop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsRelateToEffect(e)
-		and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
-		local tc=Duel.GetFirstTarget()
-		if tc:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 then
-			Duel.Equip(tp,tc,c,false)
-			local e1=Effect.CreateEffect(c)
-			e1:SetType(EFFECT_TYPE_SINGLE)
-			e1:SetProperty(EFFECT_FLAG_OWNER_RELATE)
-			e1:SetCode(EFFECT_EQUIP_LIMIT)
-			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-			e1:SetValue(c101108004.eqlimit)
-			tc:RegisterEffect(e1)
-		end
-	end
-end
-function c101108004.eqlimit(e,c)
-	return e:GetOwner()==c
-end
-function c101108004.thcon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetTurnPlayer()==1-tp
-end
-function c101108004.filter(c)
-	return c:IsFaceup() and c:IsSetCard(0x27a) and c:GetSequence()<5 and c:IsAbleToHand()
-end
-function c101108004.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return false end
-	if chk==0 then return Duel.IsExistingTarget(c101108004.filter,tp,LOCATION_SZONE,0,1,nil)
-		and Duel.IsExistingTarget(Card.IsAbleToHand,tp,0,LOCATION_ONFIELD,1,nil) end
-	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
-	local g1=Duel.SelectTarget(tp,c101108004.filter,tp,LOCATION_SZONE,0,1,1,nil)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
-	local g2=Duel.SelectTarget(tp,Card.IsAbleToHand,tp,0,LOCATION_ONFIELD,1,1,nil)
-	g1:Merge(g2)
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g1,2,0,0)
-end
-function c101108004.thop(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
-	local tg=g:Filter(Card.IsRelateToEffect,nil,e)
-	if tg:GetCount()>0 then
-		Duel.SendtoHand(tg,nil,REASON_EFFECT)
-	end
-end
-function c101108004.eftg(e,c)
-	return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x27a) and c:GetEquipGroup():IsContains(e:GetHandler())
-end
-function c101108004.atkcon(e,tp,eg,ep,ev,re,r,rp)
-	local ec=e:GetHandler():GetEquipTarget()
-	return ec and ec:IsSetCard(0x27a)
-end

script/c101108005.lua

---セリオンズ“デューク”ユール
---
---Script by JustFish
-function c101108005.initial_effect(c)
-	--special summon
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(101108005,0))
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_EQUIP)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetRange(LOCATION_HAND)
-	e1:SetCountLimit(1,101108005)
-	e1:SetTarget(c101108005.sptg)
-	e1:SetOperation(c101108005.spop)
-	c:RegisterEffect(e1)
-	--indes
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_FIELD)
-	e2:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
-	e2:SetTargetRange(LOCATION_MZONE,0)
-	e2:SetRange(LOCATION_MZONE)
-	e2:SetCondition(c101108005.indcon)
-	e2:SetTarget(c101108005.indtg)
-	e2:SetValue(aux.indoval)
-	c:RegisterEffect(e2)
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
-	e3:SetRange(LOCATION_SZONE)
-	e3:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
-	e3:SetTarget(c101108005.eftg)
-	e3:SetLabelObject(e2)
-	c:RegisterEffect(e3)
-	--Atk up
-	local e4=Effect.CreateEffect(c)
-	e4:SetType(EFFECT_TYPE_EQUIP)
-	e4:SetCode(EFFECT_UPDATE_ATTACK)
-	e4:SetValue(700)
-	e4:SetCondition(c101108005.atkcon)
-	c:RegisterEffect(e4)
-end
-function c101108005.eqfilter(c,tp)
-	return (c:IsRace(RACE_PSYCHO) or c:IsSetCard(0x27a)) and c:IsType(TYPE_MONSTER) and c:CheckUniqueOnField(tp)
-end
-function c101108005.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and c101108005.eqfilter(chkc,e,tp) and chkc:IsControler(tp) end
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.GetLocationCount(tp,LOCATION_SZONE)>0
-		and Duel.IsExistingTarget(c101108005.eqfilter,tp,LOCATION_GRAVE,0,1,nil,tp)
-		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
-	local sg=Duel.SelectTarget(tp,c101108005.eqfilter,tp,LOCATION_GRAVE,0,1,1,nil,tp)
-	Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,sg,1,0,0)
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
-end
-function c101108005.spop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsRelateToEffect(e)
-		and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
-		local tc=Duel.GetFirstTarget()
-		if tc:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 then
-			Duel.Equip(tp,tc,c,false)
-			local e1=Effect.CreateEffect(c)
-			e1:SetType(EFFECT_TYPE_SINGLE)
-			e1:SetProperty(EFFECT_FLAG_OWNER_RELATE)
-			e1:SetCode(EFFECT_EQUIP_LIMIT)
-			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-			e1:SetValue(c101108005.eqlimit)
-			tc:RegisterEffect(e1)
-		end
-	end
-end
-function c101108005.eqlimit(e,c)
-	return e:GetOwner()==c
-end
-function c101108005.indcfilter(c)
-	return c:GetEquipTarget() or c:IsFaceup() and c:IsType(TYPE_EQUIP)
-end
-function c101108005.indcon(e)
-	return Duel.IsExistingMatchingCard(c101108005.indcfilter,e:GetHandlerPlayer(),LOCATION_ONFIELD,0,1,nil)
-end
-function c101108005.indtg(e,c)
-	return c:IsSetCard(0x27a)
-end
-function c101108005.eftg(e,c)
-	return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x27a) and c:GetEquipGroup():IsContains(e:GetHandler())
-end
-function c101108005.atkcon(e,tp,eg,ep,ev,re,r,rp)
-	local ec=e:GetHandler():GetEquipTarget()
-	return ec and ec:IsSetCard(0x27a)
-end