move

expansions/lflist.conf

@@ -544,15 +544,12 @@
 24562476 1 --呼啸猛毒性 东西南北
 #268
 26800011 2 --bloom into a beauty
-26801001 0 --菲诺蒙丹帕-娜美塞拉
-26801002 0 --五十铃娜美-未成年魔导
 26801004 0 --樱木真乃的卡拉OK
 26801005 1 --樱木真乃的读书之秋
 26801009 1 --樱木真乃的小礼物
 26802017 0 --吃葡萄不吐葡萄皮
 26802022 2 --花之未眠
 26803002 1 --真实的一瞬
-26803013 1 --无火的尘埃
 26803014 0 --小巷探秘
 26803016 1 --终幕新约
 26803017 1 --燃烬的现实
@@ -1204,7 +1201,6 @@
 #810
 81000006 1 --甜花无敌
 81000017 2 --幸福论诞生
-81007007 0 --白雪安娜·天蓝
 81007017 2 --白雪安娜·初恋
 81008016 1 --不被吓个半死是不可能的
 81010021 1 --高空坠落
@@ -1220,7 +1216,6 @@
 81040037 1 --冬日回忆·周子
 81042009 0 --Nanahira & Mega
 81044010 0 --废墟之下的凝视
-81044021 0 --浅滩树荫下的约定
 81044034 2 --迅雷不及掩耳盗铃儿响叮当仁不让世界充满爱你没商量体裁衣衫不整个好活之势！
 81046025 1 --虚拟YouTuber 缀目日伞
 81048027 1 --猫咖 momoko
@@ -1232,7 +1227,6 @@
 81058004 0 --原田秋叶·夏祭
 81060007 2 --薇薇安·伊文捷琳 ω
 81060008 1 --薇薇安·伊文捷琳 θ
-81060070 1 --薇薇安·伊文捷琳 Ω
 #822
 82204215 0 --堕世魔镜-始源
 82204216 0 --堕世魔镜-极欲

expansions/script/c26800009.lua

---大崎甜花 & 桑山千雪
-function c26800009.initial_effect(c)
-	--fusion material
-	c:EnableReviveLimit()
-	aux.AddFusionProcCode2(c,81000000,26807000,true,true)	
-end

expansions/script/c26800010.lua

---大崎甘奈 & 桑山千雪
-function c26800010.initial_effect(c)
-	--fusion material
-	c:EnableReviveLimit()
-	aux.AddFusionProcCode2(c,81011000,26807000,true,true)	
-end

expansions/script/c26800013.lua

---朝活应急预案
-function c26800013.initial_effect(c)
-	--Activate
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(26800013,0))
-	e1:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_CHAINING)
-	e1:SetCountLimit(1,26800013)
-	e1:SetCondition(c26800013.condition)
-	e1:SetTarget(c26800013.target)
-	e1:SetOperation(c26800013.activate)
-	c:RegisterEffect(e1)
-	--special summon
-	local e2=Effect.CreateEffect(c)
-	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
-	e2:SetCode(EVENT_DESTROYED)
-	e2:SetRange(LOCATION_GRAVE)
-	e2:SetCountLimit(1,26800913)
-	e2:SetCost(aux.bfgcost)
-	e2:SetCondition(c26800013.spcon)
-	e2:SetTarget(c26800013.sptg)
-	e2:SetOperation(c26800013.spop)
-	c:RegisterEffect(e2)
-	--act in hand
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_SINGLE)
-	e3:SetCode(EFFECT_TRAP_ACT_IN_HAND)
-	e3:SetCondition(c26800013.shandcon)
-	c:RegisterEffect(e3)
-end
-function c26800013.cfilter(c)
-	return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_WIND) and ((c:IsType(TYPE_NORMAL) and c:IsLevel(8)) or (c:IsType(TYPE_FUSION) and not c:IsType(TYPE_EFFECT)) or c:IsCode(81011009))
-end
-function c26800013.condition(e,tp,eg,ep,ev,re,r,rp)
-	if not Duel.IsExistingMatchingCard(c26800013.cfilter,tp,LOCATION_MZONE,0,1,nil) then return false end
-	if not Duel.IsChainNegatable(ev) then return false end
-	return re:IsActiveType(TYPE_MONSTER) or re:IsHasType(EFFECT_TYPE_ACTIVATE)
-end
-function c26800013.target(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 c26800013.activate(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
-function c26800013.cfilter2(c,tp)
-	return c:GetPreviousControler()==tp and c:IsPreviousLocation(LOCATION_MZONE)
-		and c:IsPreviousPosition(POS_FACEUP) 
-		and bit.band(c:GetPreviousTypeOnField(),TYPE_FUSION)~=0
-		and bit.band(c:GetPreviousTypeOnField(),TYPE_EFFECT)==0 
-		and bit.band(c:GetPreviousAttributeOnField(),ATTRIBUTE_WIND)~=0
-		and (c:IsReason(REASON_BATTLE) or c:IsReason(REASON_EFFECT) and c:GetReasonPlayer()==1-tp)
-end
-function c26800013.spcon(e,tp,eg,ep,ev,re,r,rp)
-	return eg:IsExists(c26800013.cfilter2,1,nil,tp)
-end
-function c26800013.spfilter(c,e,tp)
-	return c:IsAttribute(ATTRIBUTE_WIND) and c:IsType(TYPE_NORMAL) and c:IsLevel(8) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
-end
-function c26800013.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(c26800013.spfilter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE)
-end
-function c26800013.spop(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c26800013.spfilter),tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,e,tp)
-	if g:GetCount()>0 then
-		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
-	end
-end
-function c26800013.scfilter(c)
-	return c:IsType(TYPE_EFFECT)
-end
-function c26800013.shandcon(e)
-	local tp=e:GetHandlerPlayer()
-	return not Duel.IsExistingMatchingCard(c26800013.scfilter,tp,LOCATION_MZONE,0,1,nil)
-		and Duel.IsExistingMatchingCard(c26800013.scfilter,tp,0,LOCATION_MZONE,1,nil)
-end

expansions/script/c26801000.lua

---苍南魔力国宝-蓝堡湾奶瓣
-local m=26801000
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	--link summon
-	c:EnableReviveLimit()
-	aux.AddLinkProcedure(c,nil,2,2)
-	--remove
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_REMOVE)
-	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e1:SetCode(EVENT_TO_GRAVE)
-	e1:SetCountLimit(1,m)
-	e1:SetTarget(cm.target)
-	e1:SetOperation(cm.operation)
-	c:RegisterEffect(e1)
-end
-function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_ONFIELD+LOCATION_GRAVE)
-end
-function cm.filter(c)
-	return c:IsAbleToRemove()
-end
-function cm.operation(e,tp,eg,ep,ev,re,r,rp)
-	if not Duel.IsPlayerCanRemove(tp) then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-	local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.filter),tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,1,nil)
-	local tc=g:GetFirst()
-	if tc then
-		Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
-	end
-end

expansions/script/c26801001.lua

---菲诺蒙丹帕-娜美塞拉
-function c26801001.initial_effect(c)
-	--link summon
-	c:EnableReviveLimit()
-	aux.AddLinkProcedure(c,nil,2,2)
-	--remove
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_REMOVE)
-	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e1:SetCode(EVENT_TO_GRAVE)
-	e1:SetCountLimit(1,26801001)
-	e1:SetTarget(c26801001.target)
-	e1:SetOperation(c26801001.operation)
-	c:RegisterEffect(e1)
-end
-function c26801001.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_EXTRA)
-end
-function c26801001.filter(c)
-	return c:IsAbleToRemove()
-end
-function c26801001.operation(e,tp,eg,ep,ev,re,r,rp)
-	if not Duel.IsPlayerCanRemove(tp) then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-	local g=Duel.SelectMatchingCard(tp,c26801001.filter,tp,LOCATION_EXTRA,0,1,1,nil)
-	local tc=g:GetFirst()
-	if tc then
-		Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
-	end
-end

expansions/script/c26801002.lua

---五十铃娜美-未成年魔导
-function c26801002.initial_effect(c)
-	--link summon
-	c:EnableReviveLimit()
-	aux.AddLinkProcedure(c,nil,2,2)
-	--remove
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_REMOVE)
-	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e1:SetCode(EVENT_TO_GRAVE)
-	e1:SetCountLimit(1,26801002)
-	e1:SetTarget(c26801002.target)
-	e1:SetOperation(c26801002.operation)
-	c:RegisterEffect(e1)
-end
-function c26801002.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_DECK)
-end
-function c26801002.filter(c)
-	return c:IsAbleToRemove() and c:IsType(TYPE_SPELL+TYPE_TRAP)
-end
-function c26801002.operation(e,tp,eg,ep,ev,re,r,rp)
-	if not Duel.IsPlayerCanRemove(tp) then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-	local g=Duel.SelectMatchingCard(tp,c26801002.filter,tp,LOCATION_DECK,0,1,1,nil)
-	local tc=g:GetFirst()
-	if tc then
-		Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
-	end
-end

expansions/script/c26801003.lua

---温蒂娜米蒂-沃特玛塞班
-function c26801003.initial_effect(c)
-	--link summon
-	c:EnableReviveLimit()
-	aux.AddLinkProcedure(c,nil,2,2)
-	--remove
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_REMOVE)
-	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e1:SetCode(EVENT_TO_GRAVE)
-	e1:SetCountLimit(1,26801003)
-	e1:SetTarget(c26801003.target)
-	e1:SetOperation(c26801003.operation)
-	c:RegisterEffect(e1)
-end
-function c26801003.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_HAND)
-end
-function c26801003.filter(c)
-	return c:IsAbleToRemove()
-end
-function c26801003.operation(e,tp,eg,ep,ev,re,r,rp)
-	if not Duel.IsPlayerCanRemove(tp) then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-	local g=Duel.SelectMatchingCard(tp,c26801003.filter,tp,LOCATION_HAND,0,1,1,nil)
-	local tc=g:GetFirst()
-	if tc then
-		Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
-	end
-end

expansions/script/c26802002.lua

---十五之月
-local m=26802002
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	aux.AddCodeList(c,81010004)
-	--special summon
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
-	e1:SetCountLimit(1,m)
-	e1:SetCondition(cm.spcon)
-	e1:SetTarget(cm.sptg)
-	e1:SetOperation(cm.spop)
-	c:RegisterEffect(e1)
-end
-function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.IsEnvironment(81010004)
-end
-function cm.spfilter(c,e,tp,ec)
-	local zone=c:GetLinkedZone(tp)
-	return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_WIND) and c:IsType(TYPE_LINK) and ec:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone)
-end
-function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	local c=e:GetHandler()
-	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and cm.spfilter(chkc,e,tp,c) end
-	if chk==0 then return Duel.IsExistingTarget(cm.spfilter,tp,LOCATION_MZONE,0,1,nil,e,tp,c) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
-	Duel.SelectTarget(tp,cm.spfilter,tp,LOCATION_MZONE,0,1,1,nil,e,tp,c)
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
-end
-function cm.spop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local tc=Duel.GetFirstTarget()
-	local zone=tc:GetLinkedZone(tp)
-	if c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) and zone&0x1f~=0 then
-		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP,zone)
-	end
-end

expansions/script/c26802006.lua

---Stargazer
-function c26802006.initial_effect(c)
-	aux.AddCodeList(c,81010004)
-	--fusion material
-	c:EnableReviveLimit()
-	aux.AddFusionProcFun2(c,c26802006.mfilter1,c26802006.mfilter2,false)
-	aux.AddContactFusionProcedure(c,Card.IsReleasable,LOCATION_MZONE,0,Duel.Release,REASON_COST+REASON_FUSION+REASON_MATERIAL)
-	--spsummon condition
-	local e0=Effect.CreateEffect(c)
-	e0:SetType(EFFECT_TYPE_SINGLE)
-	e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e0:SetCode(EFFECT_SPSUMMON_CONDITION)
-	e0:SetValue(c26802006.splimit)
-	c:RegisterEffect(e0)
-	--move
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetCountLimit(1)
-	e1:SetTarget(c26802006.mvtg)
-	e1:SetOperation(c26802006.mvop)
-	c:RegisterEffect(e1)
-	--field
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_FIELD)
-	e2:SetRange(LOCATION_MZONE)
-	e2:SetCode(EFFECT_CHANGE_ENVIRONMENT)
-	e2:SetValue(81010004)
-	c:RegisterEffect(e2)
-	--cannot be target
-	local e5=Effect.CreateEffect(c)
-	e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e5:SetCode(EVENT_TO_GRAVE)
-	e5:SetOperation(c26802006.tgop)
-	c:RegisterEffect(e5)
-end
-function c26802006.mfilter1(c)
-	return c:IsFusionAttribute(ATTRIBUTE_WIND) and c:IsFusionType(TYPE_TOKEN)
-end
-function c26802006.mfilter2(c)
-	return c:IsFusionAttribute(ATTRIBUTE_WIND) and not c:IsFusionType(TYPE_TOKEN)
-end
-function c26802006.splimit(e,se,sp,st)
-	return e:GetHandler():GetLocation()~=LOCATION_EXTRA
-end
-function c26802006.seqfilter(c)
-	return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_WIND)
-end
-function c26802006.mvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c26802006.seqfilter(chkc) end
-	if chk==0 then return Duel.IsExistingTarget(c26802006.seqfilter,tp,LOCATION_MZONE,0,1,nil)
-		and Duel.GetLocationCount(tp,LOCATION_MZONE,tp,LOCATION_REASON_CONTROL)>0 end
-	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(26802006,2))
-	Duel.SelectTarget(tp,c26802006.seqfilter,tp,LOCATION_MZONE,0,1,1,nil)
-end
-function c26802006.mvop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local tc=Duel.GetFirstTarget()
-	if not c:IsRelateToEffect(e) or not tc:IsRelateToEffect(e) or tc:IsControler(1-tp) or tc:IsImmuneToEffect(e) or Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOZONE)
-	local s=Duel.SelectDisableField(tp,1,LOCATION_MZONE,0,0)
-	local nseq=math.log(s,2)
-	Duel.MoveSequence(tc,nseq)
-end
-function c26802006.tgop(e,tp,eg,ep,ev,re,r,rp)
-	local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
-	e1:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
-	e1:SetTargetRange(LOCATION_MZONE,0)
-	e1:SetTarget(aux.TargetBoolFunction(Card.IsAttribute,ATTRIBUTE_WIND))
-	e1:SetValue(aux.tgoval)
-	e1:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e1,tp)
-end

expansions/script/c26802010.lua

---黑百合·风野灯织
-local m=26802010
-local cm=_G["c"..m]
-Duel.LoadScript("c26800000.lua")
-function cm.initial_effect(c)
-	--token
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
-	e1:SetType(EFFECT_TYPE_QUICK_O)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetRange(LOCATION_HAND)
-	e1:SetCountLimit(1,m)
-	e1:SetCost(cm.spcost)
-	e1:SetTarget(cm.sptg)
-	e1:SetOperation(cm.spop)
-	c:RegisterEffect(e1)
-end
-function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsDiscardable() end
-	Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_DISCARD)
-end
-function cm.spfilter(c,e,tp)
-	return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
-end
-function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chk==0 then return not Duel.IsPlayerAffectedByEffect(tp,59822133)
-		and Duel.GetLocationCount(1-tp,LOCATION_MZONE)>3
-		and Duel.IsPlayerCanSpecialSummonMonster(tp,26802012,0,0x4011,500,300,3,RACE_PLANT,ATTRIBUTE_DARK,POS_FACEUP_DEFENSE,1-tp) end
-	Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,4,0,0)
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,4,0,0)
-end
-function cm.spop(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.IsPlayerAffectedByEffect(tp,59822133) then return end
-	if Duel.GetLocationCount(1-tp,LOCATION_MZONE)<4 then return end
-	if not Duel.IsPlayerCanSpecialSummonMonster(tp,26802012,0,0x4011,500,300,3,RACE_PLANT,ATTRIBUTE_DARK,POS_FACEUP_DEFENSE,1-tp) then return end
-	for i=1,4 do
-		local token=Duel.CreateToken(tp,26802012)
-		if Duel.SpecialSummonStep(token,0,tp,1-tp,false,false,POS_FACEUP_DEFENSE) then
-			local e1=Effect.CreateEffect(e:GetHandler())
-			e1:SetType(EFFECT_TYPE_SINGLE)
-			e1:SetCode(EFFECT_UNRELEASABLE_SUM)
-			e1:SetValue(1)
-			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-			token:RegisterEffect(e1,true)
-			local e2=e1:Clone()
-			e2:SetCode(EFFECT_UNRELEASABLE_NONSUM)
-			token:RegisterEffect(e2,true)
-		end
-	end
-	Duel.SpecialSummonComplete()
-end

expansions/script/c26802011.lua

---天·天·白·布
-xpcall(function() require("expansions/script/c37564765") end,function() require("script/c37564765") end)
-function c26802011.initial_effect(c)
-	--Activate
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e1:SetCountLimit(1,26802011+EFFECT_COUNT_CODE_OATH)
-	e1:SetTarget(c26802011.target)
-	e1:SetOperation(c26802011.activate)
-	c:RegisterEffect(e1)
-	--Remove
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
-	e2:SetCode(EVENT_LEAVE_FIELD)
-	e2:SetOperation(c26802011.rmop)
-	c:RegisterEffect(e2)
-	--
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_EQUIP)
-	e3:SetCode(EFFECT_MINIATURE_GARDEN_GIRL)
-	e3:SetValue(1)
-	e3:SetTarget(function(e,c)
-		return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM)
-	end)
-	c:RegisterEffect(e3)
-end
-function c26802011.spfilter(c,e,tp)
-	return c:IsAttack(1550) and c:IsDefense(1050) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
-end
-function c26802011.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c26802011.spfilter(chkc,e,tp) end
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingTarget(c26802011.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectTarget(tp,c26802011.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
-	Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)
-end
-function c26802011.eqlimit(e,c)
-	return e:GetLabelObject()==c
-end
-function c26802011.activate(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local tc=Duel.GetFirstTarget()
-	if c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) and Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP) then
-		Duel.Equip(tp,c,tc)
-		--Add Equip limit
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_EQUIP_LIMIT)
-		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-		e1:SetValue(c26802011.eqlimit)
-		e1:SetLabelObject(tc)
-		c:RegisterEffect(e1)
-		local e2=Effect.CreateEffect(c)
-		e2:SetType(EFFECT_TYPE_SINGLE)
-		e2:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
-		e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e2:SetReset(RESET_EVENT+RESETS_REDIRECT)
-		e2:SetValue(LOCATION_REMOVED)
-		tc:RegisterEffect(e2)
-		Duel.SpecialSummonComplete()
-	end
-end
-function c26802011.rmop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local tc=e:GetHandler():GetEquipTarget()
-	if tc then
-		Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
-	end
-end

expansions/script/c26802014.lua

---第二形态？
-function c26802014.initial_effect(c)
-	--Activate
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_CHAINING)
-	e1:SetCondition(c26802014.condition)
-	e1:SetTarget(c26802014.target)
-	e1:SetOperation(c26802014.activate)
-	c:RegisterEffect(e1)
-end
-function c26802014.condition(e,tp,eg,ep,ev,re,r,rp)
-	local ph=Duel.GetCurrentPhase()
-	return (ph==PHASE_STANDBY or ph==PHASE_END)
-		and (re:IsActiveType(TYPE_MONSTER) or re:IsHasType(EFFECT_TYPE_ACTIVATE))
-		and Duel.IsChainNegatable(ev)
-end
-function c26802014.target(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 c26802014.activate(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

expansions/script/c26802015.lua

---Leave my Utopiatown
-function c26802015.initial_effect(c)
-	--Activate
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetCountLimit(1,26802015+EFFECT_COUNT_CODE_OATH)
-	e1:SetTarget(c26802015.target)
-	e1:SetOperation(c26802015.operation)
-	c:RegisterEffect(e1)
-end
-function c26802015.ttfilter(c)
-	return c:IsFaceup() and bit.band(c:GetType(),0x81)==0x81 and c:IsType(TYPE_PENDULUM)
-end
-function c26802015.exfilter0(c)
-	return c:IsType(TYPE_RITUAL) and c:IsLevelAbove(1) and c:IsAbleToGrave()
-end
-function c26802015.filter(c,e,tp,m,ft)
-	if not c:IsType(TYPE_PENDULUM) or bit.band(c:GetType(),0x81)~=0x81
-		or not c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,false,true) then return false end
-	local mg=m:Filter(Card.IsCanBeRitualMaterial,c,c)
-	if c.mat_filter then
-		mg=mg:Filter(c.mat_filter,nil,tp)
-	end
-	if ft>0 then
-		return mg:CheckWithSumGreater(Card.GetRitualLevel,c:GetLevel(),c)
-	else
-		return mg:IsExists(c26802015.mfilterf,1,nil,tp,mg,c)
-	end
-end
-function c26802015.mfilterf(c,tp,mg,rc)
-	if c:IsControler(tp) and c:IsLocation(LOCATION_MZONE) and c:GetSequence()<5 then
-		Duel.SetSelectedCard(c)
-		return mg:CheckWithSumGreater(Card.GetRitualLevel,rc:GetLevel(),rc)
-	else return false end
-end
-function c26802015.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then
-		local mg=Duel.GetRitualMaterial(tp):Filter(Card.IsType,nil,TYPE_PENDULUM)
-		if not Duel.IsExistingMatchingCard(c26802015.ttfilter,tp,LOCATION_MZONE,0,1,nil) then
-			local sg=Duel.GetMatchingGroup(c26802015.exfilter0,tp,LOCATION_EXTRA,0,nil)
-			mg:Merge(sg)
-		end
-		local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
-		return ft>-1 and Duel.IsExistingMatchingCard(c26802015.filter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp,mg,ft)
-	end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE)
-end
-function c26802015.operation(e,tp,eg,ep,ev,re,r,rp)
-	local mg=Duel.GetRitualMaterial(tp):Filter(Card.IsType,nil,TYPE_PENDULUM)
-	if not Duel.IsExistingMatchingCard(c26802015.ttfilter,tp,LOCATION_MZONE,0,1,nil) then
-		local sg=Duel.GetMatchingGroup(c26802015.exfilter0,tp,LOCATION_EXTRA,0,nil)
-		mg:Merge(sg)
-	end
-	local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local tg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c26802015.filter),tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,e,tp,mg,ft)
-	local tc=tg:GetFirst()
-	if tc then
-		mg=mg:Filter(Card.IsCanBeRitualMaterial,tc,tc)
-		if tc.mat_filter then
-			mg=mg:Filter(tc.mat_filter,nil,tp)
-		end
-		local mat=nil
-		if ft>0 then
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
-			mat=mg:SelectWithSumGreater(tp,Card.GetRitualLevel,tc:GetLevel(),tc)
-		else
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
-			mat=mg:FilterSelect(tp,c26802015.mfilterf,1,1,nil,tp,mg,tc)
-			Duel.SetSelectedCard(mat)
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
-			local mat2=mg:SelectWithSumGreater(tp,Card.GetRitualLevel,tc:GetLevel(),tc)
-			mat:Merge(mat2)
-		end
-		tc:SetMaterial(mat)
-		local mat2=mat:Filter(Card.IsLocation,nil,LOCATION_EXTRA)
-		mat:Sub(mat2)
-		Duel.ReleaseRitualMaterial(mat)
-		Duel.SendtoGrave(mat2,REASON_EFFECT+REASON_MATERIAL+REASON_RITUAL)
-		Duel.BreakEffect()
-		Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP)
-		tc:CompleteProcedure()
-	end
-end

expansions/script/c26802016.lua

---迷惑行为大赏
-function c26802016.initial_effect(c)
-	--Activate
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_NEGATE+CATEGORY_REMOVE)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_CHAINING)
-	e1:SetCondition(c26802016.condition)
-	e1:SetTarget(c26802016.target)
-	e1:SetOperation(c26802016.activate)
-	c:RegisterEffect(e1)
-end
-function c26802016.condition(e,tp,eg,ep,ev,re,r,rp)
-	local loc=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION)
-	return loc==LOCATION_EXTRA and re:IsActiveType(TYPE_MONSTER) and Duel.IsChainNegatable(ev)
-end
-function c26802016.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return aux.nbcon(tp,re) end
-	Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
-	if re:GetHandler():IsRelateToEffect(re) then
-		Duel.SetOperationInfo(0,CATEGORY_REMOVE,eg,1,0,0)
-	end
-end
-function c26802016.activate(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
-		Duel.Remove(eg,POS_FACEUP,REASON_EFFECT)
-	end
-end

expansions/script/c26802019.lua

---追杀行为
-local m=26802019
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	--Activate
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCategory(CATEGORY_NEGATE+CATEGORY_TOHAND)
-	e1:SetCode(EVENT_CHAINING)
-	e1:SetCondition(cm.condition)
-	e1:SetTarget(cm.target)
-	e1:SetOperation(cm.activate)
-	c:RegisterEffect(e1)
-end
-function cm.cfilter(c)
-	return c:IsFacedown() and c:GetSequence()<5
-end
-function cm.condition(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_SZONE,0,1,e:GetHandler()) then return false end
-	for i=1,ev do
-		local te,tgp=Duel.GetChainInfo(i,CHAININFO_TRIGGERING_EFFECT,CHAININFO_TRIGGERING_PLAYER)
-		if tgp~=tp and (te:IsActiveType(TYPE_MONSTER) or te:IsHasType(EFFECT_TYPE_ACTIVATE)) and Duel.IsChainNegatable(i) then
-			return true
-		end
-	end
-	return false
-end
-function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	local ng=Group.CreateGroup()
-	local dg=Group.CreateGroup()
-	for i=1,ev do
-		local te,tgp=Duel.GetChainInfo(i,CHAININFO_TRIGGERING_EFFECT,CHAININFO_TRIGGERING_PLAYER)
-		if tgp~=tp and (te:IsActiveType(TYPE_MONSTER) or te:IsHasType(EFFECT_TYPE_ACTIVATE)) and Duel.IsChainNegatable(i) then
-			local tc=te:GetHandler()
-			ng:AddCard(tc)
-			if tc:IsOnField() and tc:IsRelateToEffect(te) and not tc:IsHasEffect(EFFECT_CANNOT_TO_HAND) and Duel.IsPlayerCanSendtoHand(tp,tc) then
-				dg:AddCard(tc)
-			end
-		end
-	end
-	Duel.SetTargetCard(dg)
-	Duel.SetOperationInfo(0,CATEGORY_NEGATE,ng,ng:GetCount(),0,0)
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,dg,dg:GetCount(),0,0)
-end
-function cm.activate(e,tp,eg,ep,ev,re,r,rp)
-	local dg=Group.CreateGroup()
-	for i=1,ev do
-		local te,tgp=Duel.GetChainInfo(i,CHAININFO_TRIGGERING_EFFECT,CHAININFO_TRIGGERING_PLAYER)
-		if tgp~=tp and (te:IsActiveType(TYPE_MONSTER) or te:IsHasType(EFFECT_TYPE_ACTIVATE)) and Duel.NegateActivation(i) then
-			local tc=te:GetHandler()
-			if tc:IsRelateToEffect(e) and tc:IsRelateToEffect(te) and not tc:IsHasEffect(EFFECT_CANNOT_TO_HAND) and Duel.IsPlayerCanSendtoHand(tp,tc) then
-				tc:CancelToGrave()
-				dg:AddCard(tc)
-			end
-		end
-	end
-	Duel.SendtoHand(dg,nil,REASON_EFFECT)
-end

expansions/script/c26802020.lua

---再度放弃思考
-function c26802020.initial_effect(c)
-	--Activate
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetHintTiming(0,TIMING_END_PHASE)
-	e1:SetCost(c26802020.cost)
-	e1:SetTarget(c26802020.target)
-	e1:SetOperation(c26802020.activate)
-	c:RegisterEffect(e1)
-	--spsummon
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(26802020,0))
-	e2:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
-	e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
-	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e2:SetCode(EVENT_DESTROYED)
-	e2:SetTarget(c26802020.sptg)
-	e2:SetOperation(c26802020.spop)
-	c:RegisterEffect(e2)
-	--act in hand
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_SINGLE)
-	e3:SetCode(EFFECT_TRAP_ACT_IN_HAND)
-	e3:SetCondition(c26802020.handcon)
-	c:RegisterEffect(e3)
-end
-function c26802020.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetActivityCount(tp,ACTIVITY_BATTLE_PHASE)==0 end
-	local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetCode(EFFECT_CANNOT_BP)
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
-	e1:SetTargetRange(1,0)
-	e1:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e1,tp)
-end
-function c26802020.filter(c,e,tp)
-	return c:IsType(TYPE_NORMAL) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
-end
-function c26802020.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(c26802020.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,LOCATION_DECK)
-end
-function c26802020.activate(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectMatchingCard(tp,c26802020.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
-	if g:GetCount()>0 then
-		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
-	end
-end
-function c26802020.spfilter(c,e,tp)
-	return c:IsType(TYPE_MONSTER) and not c:IsType(TYPE_EFFECT) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
-end
-function c26802020.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and c26802020.spfilter(chkc,e,tp) end
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingTarget(c26802020.spfilter,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,nil,e,tp) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectTarget(tp,c26802020.spfilter,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,1,nil,e,tp)
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
-end
-function c26802020.spop(e,tp,eg,ep,ev,re,r,rp)
-	local tc=Duel.GetFirstTarget()
-	if tc:IsRelateToEffect(e) then
-		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
-	end
-end
-function c26802020.cfilter(c)
-	return c:IsType(TYPE_EFFECT) and c:IsFaceup()
-end
-function c26802020.handcon(e)
-	local tp=e:GetHandlerPlayer()
-	return not Duel.IsExistingMatchingCard(c26802020.cfilter,tp,LOCATION_MZONE,0,1,nil)
-		and Duel.IsExistingMatchingCard(c26802020.cfilter,tp,0,LOCATION_MZONE,1,nil)
-end

expansions/script/c26803004.lua

---终幕追想
-local m=26803004
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	--damage
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCategory(CATEGORY_RECOVER)
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetTarget(cm.damtg)
-	e1:SetOperation(cm.damop)
-	c:RegisterEffect(e1)
-end
-function cm.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	Duel.SetTargetPlayer(tp)
-	Duel.SetTargetParam(1500)
-	Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,1500)
-	if e:IsHasType(EFFECT_TYPE_ACTIVATE) then
-		Duel.SetChainLimit(aux.FALSE)
-	end
-end
-function cm.damop(e,tp,eg,ep,ev,re,r,rp)
-	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
-	Duel.Recover(p,d,REASON_EFFECT)
-end

expansions/script/c26803005.lua

---真实噩梦
-function c26803005.initial_effect(c)
-	--damage
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCategory(CATEGORY_DAMAGE)
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetTarget(c26803005.damtg)
-	e1:SetOperation(c26803005.damop)
-	c:RegisterEffect(e1)
-end
-function c26803005.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	Duel.SetTargetPlayer(tp)
-	Duel.SetTargetParam(1000)
-	Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,tp,1000)
-	if e:IsHasType(EFFECT_TYPE_ACTIVATE) then
-		Duel.SetChainLimit(aux.FALSE)
-	end
-end
-function c26803005.damop(e,tp,eg,ep,ev,re,r,rp)
-	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
-	Duel.Damage(p,d,REASON_EFFECT)
-end

expansions/script/c26803008.lua

---AAAA
-local m=26803008
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	--activate
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	c:RegisterEffect(e1)
-	--maintain
-	local e0=Effect.CreateEffect(c)
-	e0:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e0:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
-	e0:SetRange(LOCATION_SZONE)
-	e0:SetCountLimit(1)
-	e0:SetCode(EVENT_PHASE+PHASE_STANDBY)
-	e0:SetCondition(cm.descon)
-	e0:SetOperation(cm.desop)
-	c:RegisterEffect(e0)
-	--actlimit
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e1:SetCode(EVENT_CHAINING)
-	e1:SetRange(LOCATION_SZONE)
-	e1:SetOperation(cm.chainop)
-	c:RegisterEffect(e1)
-	--spsummon
-	local e2=Effect.CreateEffect(c)
-	e2:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
-	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e2:SetCode(EVENT_FREE_CHAIN)
-	e2:SetRange(LOCATION_SZONE)
-	e2:SetHintTiming(0,TIMING_END_PHASE)
-	e2:SetCountLimit(1)
-	e2:SetTarget(cm.drtg)
-	e2:SetOperation(cm.drop)
-	c:RegisterEffect(e2)
-end
-function cm.descon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetTurnPlayer()==tp
-end
-function cm.desfilter(c)
-	return c:IsType(TYPE_CONTINUOUS) and c:IsAbleToGraveAsCost() and c:IsFaceup()
-end
-function cm.desop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	Duel.HintSelection(Group.FromCards(c))
-	local g=Duel.GetMatchingGroup(cm.desfilter,tp,LOCATION_ONFIELD,0,e:GetHandler())
-	if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
-		local tg=g:Select(tp,1,1,nil)
-		Duel.SendtoGrave(tg,REASON_COST)
-	else Duel.Destroy(c,REASON_COST) end
-end
-function cm.chfilter(c)
-	return c:IsType(TYPE_CONTINUOUS)
-end
-function cm.chainop(e,tp,eg,ep,ev,re,r,rp)
-	local rc=re:GetHandler()
-	local loc=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION)
-	if re:IsHasType(EFFECT_TYPE_ACTIVATE) and loc==LOCATION_SZONE and cm.chfilter(rc) then
-		Duel.SetChainLimit(cm.chainlm)
-	end
-end
-function cm.chainlm(e,rp,tp)
-	return tp==rp
-end
-function cm.tdfilter(c)
-	return c:IsType(TYPE_CONTINUOUS) and c:IsAbleToDeck()
-end
-function cm.drtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and cm.tdfilter(chkc) end
-	if chk==0 then return Duel.IsPlayerCanDraw(tp,1)
-		and Duel.IsExistingTarget(cm.tdfilter,tp,LOCATION_GRAVE,0,3,nil) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
-	local g=Duel.SelectTarget(tp,cm.tdfilter,tp,LOCATION_GRAVE,0,3,3,nil)
-	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
-	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
-end
-function cm.drop(e,tp,eg,ep,ev,re,r,rp)
-	if not e:GetHandler():IsRelateToEffect(e) then return end
-	local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
-	if tg:GetCount()<=0 then return end
-	Duel.SendtoDeck(tg,nil,0,REASON_EFFECT)
-	Duel.ShuffleDeck(tp)
-	Duel.BreakEffect()
-	Duel.Draw(tp,1,REASON_EFFECT)
-end

expansions/script/c26803013.lua

---无火的尘埃
-local m=26803013
-local cm=_G["c"..m]
-xpcall(function() require("expansions/script/c81000000") end,function() require("script/c81000000") end)
-function cm.initial_effect(c)
-	--Activate
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH+CATEGORY_SUMMON)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
-	e1:SetTarget(cm.target)
-	e1:SetOperation(cm.activate)
-	c:RegisterEffect(e1)
-	Duel.AddCustomActivityCounter(m,ACTIVITY_CHAIN,cm.chainfilter)
-end
-function cm.chainfilter(re,tp,cid)
-	local ph=Duel.GetCurrentPhase()
-	return not ((re:IsActiveType(TYPE_SPELL) or re:IsActiveType(TYPE_TRAP)) and (ph==PHASE_MAIN1 or ph==PHASE_MAIN2))
-end
-function cm.condition(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetCustomActivityCount(m,1-tp,ACTIVITY_CHAIN)~=0
-end
-function cm.thfilter(c)
-	return c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
-end
-function cm.filter(c)
-	return c:IsType(TYPE_MONSTER) and c:IsSummonable(true,nil)
-end
-function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	local b1=Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil)
-	local b2=Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_HAND,0,1,nil)
-	if chk==0 then return b1 or b2 end
-	local op=0
-	if b1 and b2 then
-		op=Duel.SelectOption(tp,aux.Stringid(m,0),aux.Stringid(m,1))
-	elseif b1 then
-		op=Duel.SelectOption(tp,aux.Stringid(m,0))
-	else
-		op=Duel.SelectOption(tp,aux.Stringid(m,1))+1
-	end
-	e:SetLabel(op)
-	if op==0 then
-		Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-	else
-		Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
-	end
-end
-function cm.activate(e,tp,eg,ep,ev,re,r,rp)
-	if e:GetLabel()==0 then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-		local g=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_DECK,0,1,1,nil)
-		if g:GetCount()>0 then
-			Duel.SendtoHand(g,nil,REASON_EFFECT)
-			Duel.ConfirmCards(1-tp,g)
-		end
-	else
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
-		local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_HAND,0,1,1,nil)
-		local tc=g:GetFirst()
-		if tc then
-			Duel.Summon(tp,tc,true,nil)
-		end
-	end
-end

expansions/script/c26803020.lua

---THANK YOU FOR PLAYING
-local m=26803020
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	--damage
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetTarget(cm.damtg)
-	e1:SetOperation(cm.damop)
-	c:RegisterEffect(e1)
-end
-function cm.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	if e:IsHasType(EFFECT_TYPE_ACTIVATE) then
-		Duel.SetChainLimit(aux.FALSE)
-	end
-end
-function cm.damop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.SetLP(tp,0)
-end

expansions/script/c26803027.lua

---绿意盎然之晨
-local m=26803027
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	aux.AddRitualProcGreater2(c,cm.ritual_filter)
-	--draw
-	local e2=Effect.CreateEffect(c)
-	e2:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetRange(LOCATION_GRAVE)
-	e2:SetCost(aux.bfgcost)
-	e2:SetTarget(cm.drtg)
-	e2:SetOperation(cm.drop)
-	c:RegisterEffect(e2)
-end
-function cm.ritual_filter(c)
-	return c:IsType(TYPE_RITUAL) and c:IsRace(RACE_SPELLCASTER)
-end
-function cm.tdfilter(c)
-	return c:IsFaceup() and c:IsType(TYPE_MONSTER)
-		and c:IsRace(RACE_SPELLCASTER) and c:IsAbleToDeck()
-end
-function cm.drtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_REMOVED) and chkc:IsControler(tp) and cm.tdfilter(chkc) end
-	if chk==0 then return Duel.IsPlayerCanDraw(tp,1)
-		and Duel.IsExistingTarget(cm.tdfilter,tp,LOCATION_REMOVED,0,3,nil) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
-	local g=Duel.SelectTarget(tp,cm.tdfilter,tp,LOCATION_REMOVED,0,3,3,nil)
-	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
-	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
-end
-function cm.drop(e,tp,eg,ep,ev,re,r,rp)
-	local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
-	if tg:GetCount()<=0 then return end
-	Duel.SendtoDeck(tg,nil,0,REASON_EFFECT)
-	local g=Duel.GetOperatedGroup()
-	if g:IsExists(Card.IsLocation,1,nil,LOCATION_DECK) then Duel.ShuffleDeck(tp) end
-	local ct=g:FilterCount(Card.IsLocation,nil,LOCATION_DECK+LOCATION_EXTRA)
-	if ct>0 then
-		Duel.BreakEffect()
-		Duel.Draw(tp,1,REASON_EFFECT)
-	end
-end