strings and delete and redesign

expansions/lflist.conf

@@ -594,14 +594,6 @@
 33701021 1 --晦空士的日常
 33701023 2 --晦空士的日梦
 33701317 0 --卓越融合
-#345
-34503020 1 --仰望星空的少女
-34503030 1 --憧憬星空的少女
-34503040 2 --星空下的告白
-34511120 1 --纯白的巫女 结月
-34511150 1 --纯白的吉祥物 帕喵
-34511190 0 --神凤杏
-34511200 0 --月岛夕莉
 #375
 37564012 0 --元灵毁灭者·Aya Ayane
 37564041 0 --阎-少女之梦·虚无的世界

expansions/script/c21520071.lua

@@ -4,6 +4,7 @@ function c21520071.initial_effect(c)
 	local e0=Effect.CreateEffect(c)
 	e0:SetType(EFFECT_TYPE_ACTIVATE)
 	e0:SetCode(EVENT_FREE_CHAIN)
+	e0:SetCountLimit(1,21520071+EFFECT_COUNT_CODE_OATH)
 	e0:SetCondition(c21520071.actcon)
 	c:RegisterEffect(e0)
 	--special summon
@@ -43,6 +44,7 @@ function c21520071.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,LOCATION_HAND)
 end
 function c21520071.spop(e,tp,eg,ep,ev,re,r,rp)
+	if not e:GetHandler():IsRelateToEffect(e) then return end
 	local c=e:GetHandler()
 	local g=Duel.GetMatchingGroup(c21520071.spfilter,tp,LOCATION_HAND,0,nil,e,tp)
 	if g:GetCount()>0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsRelateToEffect(e) then 

expansions/script/c21520072.lua

@@ -4,6 +4,7 @@ function c21520072.initial_effect(c)
 	local e0=Effect.CreateEffect(c)
 	e0:SetType(EFFECT_TYPE_ACTIVATE)
 	e0:SetCode(EVENT_FREE_CHAIN)
+	e0:SetCountLimit(1,21520072+EFFECT_COUNT_CODE_OATH)
 	e0:SetCondition(c21520072.actcon)
 	c:RegisterEffect(e0)
 	--special summon
@@ -11,6 +12,7 @@ function c21520072.initial_effect(c)
 	e1:SetDescription(aux.Stringid(21520072,0))
 	e1:SetCategory(CATEGORY_TOHAND)
 	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e1:SetRange(LOCATION_FZONE)
 	e1:SetCountLimit(1)
 	e1:SetTarget(c21520072.thtg)
@@ -35,27 +37,28 @@ end
 function c21520072.actcon(e,tp,eg,ep,ev,re,r,rp)
 	return not Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_GRAVE,0,1,nil,TYPE_TRAP)
 end
-function c21520072.thfilter(c)
-	return c:IsAbleToHand() and c:IsSetCard(0x495) and c:IsFaceup()
+function c21520072.thfilter1(c)
+	return c:IsFaceup() and c:IsSetCard(0x495) and c:IsAbleToHand()
 end
-function c21520072.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c21520072.thfilter,tp,LOCATION_ONFIELD,0,1,e:GetHandler()) 
-		and Duel.IsExistingMatchingCard(Card.IsAbleToHand,tp,0,LOCATION_ONFIELD,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,2,0,LOCATION_ONFIELD)
+function c21520072.thfilter2(c)
+	return c:IsFaceup() and c:IsAbleToHand()
 end
-function c21520072.thop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local g=Duel.GetMatchingGroup(c21520072.thfilter,tp,LOCATION_ONFIELD,0,c)
-	local opg=Duel.GetMatchingGroup(Card.IsAbleToHand,tp,0,LOCATION_ONFIELD,nil)
-	if g:GetCount()>0 and opg:GetCount()>0 and c:IsRelateToEffect(e) then 
+function c21520072.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return false end
+	if chk==0 then return Duel.IsExistingTarget(c21520072.thfilter1,tp,LOCATION_MZONE,0,1,e:GetHandler()) and Duel.IsExistingTarget(c21520072.thfilter2,tp,0,LOCATION_ONFIELD,1,nil) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
-		local sg=g:Select(tp,1,1,nil)
+	local g1=Duel.SelectTarget(tp,c21520072.thfilter1,tp,LOCATION_MZONE,0,1,1,e:GetHandler())
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
-		local osg=opg:Select(tp,1,1,nil)
-		Duel.SendtoHand(sg,nil,REASON_EFFECT)
-		Duel.SendtoHand(osg,nil,REASON_EFFECT)
---		Duel.ConfirmCards(1-tp,sg)
---		Duel.ConfirmCards(tp,osg)
+	local g2=Duel.SelectTarget(tp,c21520072.thfilter2,tp,0,LOCATION_ONFIELD,1,1,nil)
+	g1:Merge(g2)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g1,2,0,0)
+end
+function c21520072.thop(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)
+	local vg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsFaceup,nil)
+	if tg:GetCount()>0 and tg:GetCount()==vg:GetCount() then
+		Duel.SendtoHand(tg,nil,REASON_EFFECT)
 	end
 end
 function c21520072.effectfilter(e,ct)

expansions/script/c21520073.lua

@@ -4,6 +4,7 @@ function c21520073.initial_effect(c)
 	local e0=Effect.CreateEffect(c)
 	e0:SetType(EFFECT_TYPE_ACTIVATE)
 	e0:SetCode(EVENT_FREE_CHAIN)
+	e0:SetCountLimit(1,21520073+EFFECT_COUNT_CODE_OATH)
 	e0:SetCondition(c21520073.actcon)
 	c:RegisterEffect(e0)
 	--special summon
@@ -28,27 +29,35 @@ end
 function c21520073.actcon(e,tp,eg,ep,ev,re,r,rp)
 	return not Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_GRAVE,0,1,nil,TYPE_TRAP)
 end
-function c21520073.spfilter(c,e,tp)
-	return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x495)
+function c21520073.rmfilter(c)
+	return c:IsAbleToRemove() and c:IsType(TYPE_MONSTER)
 end
-function c21520073.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c21520073.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) 
-		and Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_GRAVE,1,nil) 
-		and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
-	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,1-tp,LOCATION_GRAVE)
+function c21520073.spfilter(c,e,tp)
+	return c:IsSetCard(0x495) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSummonableCard()
 end
-function c21520073.spop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local g=Duel.GetMatchingGroup(c21520073.spfilter,tp,LOCATION_GRAVE,0,nil,e,tp)
-	local opg=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,0,LOCATION_GRAVE,nil)
-	if g:GetCount()>0 and opg:GetCount()>0 and c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then 
+function c21520073.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return false end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingTarget(c21520073.rmfilter,tp,0,LOCATION_GRAVE,0,1,nil)
+		and Duel.IsExistingTarget(c21520073.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-		local rg=opg:Select(tp,1,1,nil)
+	local g1=Duel.SelectTarget(tp,c21520073.rmfilter,tp,0,LOCATION_GRAVE,1,1,nil)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-		local sg=g:Select(tp,1,1,nil)
-		Duel.Remove(rg,POS_FACEUP,REASON_EFFECT)
-		Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
+	local g2=Duel.SelectTarget(tp,c21520073.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,g1,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g2,1,0,0)
+end
+function c21520073.spop(e,tp,eg,ep,ev,re,r,rp)
+	if not e:GetHandler():IsRelateToEffect(e) then return end
+	local ex,g1=Duel.GetOperationInfo(0,CATEGORY_REMOVE)
+	local ex,g2=Duel.GetOperationInfo(0,CATEGORY_SPECIAL_SUMMON)
+	local tc1=g1:GetFirst()
+	local tc2=g2:GetFirst()
+	if tc1:IsRelateToEffect(e) and tc1:IsType(TYPE_MONSTER) and tc1:IsLocation(LOCATION_GRAVE) then
+		Duel.Remove(tc1,POS_FACEUP,REASON_EFFECT)
+		if tc2:IsRelateToEffect(e) and tc2:IsSetCard(0x495) and tc2:IsType(TYPE_MONSTER) and tc2:IsLocation(LOCATION_GRAVE) and tc2:IsSummonableCard() then
+			Duel.SpecialSummon(tc2,0,tp,tp,false,false,POS_FACEUP)
+		end
 	end
 end
 function c21520073.chainop(e,tp,eg,ep,ev,re,r,rp)

expansions/script/c21520074.lua

@@ -6,6 +6,7 @@ function c21520074.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,21520074+EFFECT_COUNT_CODE_OATH)
 	e1:SetCondition(c21520074.actcon)
 	e1:SetCost(c21520074.cost)
 	e1:SetTarget(c21520074.target)
@@ -23,8 +24,8 @@ function c21520074.filter(c,e,tp,lv)
 	end
 end
 function c21520074.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.CheckLPCost(tp,600) end
-	Duel.PayLPCost(tp,600)
+	if chk==0 then return Duel.CheckLPCost(tp,1000) end
+	Duel.PayLPCost(tp,1000)
 end
 function c21520074.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then 

expansions/script/c21520075.lua

@@ -6,6 +6,7 @@ function c21520075.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOHAND)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,21520075+EFFECT_COUNT_CODE_OATH)
 	e1:SetCondition(c21520075.actcon)
 	e1:SetCost(c21520075.cost)
 	e1:SetTarget(c21520075.target)
@@ -27,8 +28,8 @@ end
 function c21520075.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then 
 		local g=Duel.GetMatchingGroup(c21520075.filter,tp,LOCATION_HAND+LOCATION_MZONE+LOCATION_GRAVE,0,nil)
-		return g:CheckWithSumEqual(Card.GetLevel,6,2,2) and Duel.CheckLPCost(tp,600) end
-	Duel.PayLPCost(tp,600)
+		return g:CheckWithSumEqual(Card.GetLevel,6,2,2) and Duel.CheckLPCost(tp,1000) end
+	Duel.PayLPCost(tp,1000)
 	local g=Duel.GetMatchingGroup(c21520075.filter,tp,LOCATION_HAND+LOCATION_MZONE+LOCATION_GRAVE,0,nil)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local sg=g:SelectWithSumEqual(tp,Card.GetLevel,6,2,2)

expansions/script/c21520076.lua

@@ -6,6 +6,7 @@ function c21520076.initial_effect(c)
 	e1:SetCategory(CATEGORY_DRAW+CATEGORY_TOHAND+CATEGORY_DECKDES)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,21520076+EFFECT_COUNT_CODE_OATH)
 	e1:SetCondition(c21520076.actcon)
 	e1:SetCost(c21520076.cost)
 	e1:SetTarget(c21520076.target)
@@ -33,8 +34,8 @@ function c21520076.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	sg:KeepAlive()
 	Duel.Release(sg,REASON_COST)
 	e:SetLabelObject(sg)--]]
-	if chk==0 then return Duel.IsExistingMatchingCard(c21520076.filter,tp,LOCATION_MZONE,0,2,nil) and Duel.CheckLPCost(tp,600) end
-	Duel.PayLPCost(tp,600)
+	if chk==0 then return Duel.IsExistingMatchingCard(c21520076.filter,tp,LOCATION_MZONE,0,2,nil) and Duel.CheckLPCost(tp,1000) end
+	Duel.PayLPCost(tp,1000)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
 	local g=Duel.SelectMatchingCard(tp,c21520076.filter,tp,LOCATION_MZONE,0,2,2,nil)
 	g:KeepAlive()

expansions/script/c21520077.lua

@@ -6,6 +6,7 @@ function c21520077.initial_effect(c)
 	e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,21520077+EFFECT_COUNT_CODE_OATH)
 	e1:SetCondition(c21520077.actcon)
 --  e1:SetTarget(c21520077.target)
 	e1:SetOperation(c21520077.activate)

expansions/script/c21520078.lua

@@ -6,6 +6,7 @@ function c21520078.initial_effect(c)
 	e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,21520078+EFFECT_COUNT_CODE_OATH)
 	e1:SetCondition(c21520078.actcon)
 --  e1:SetTarget(c21520078.target)
 	e1:SetOperation(c21520078.activate)

expansions/script/c21520079.lua

@@ -6,6 +6,7 @@ function c21520079.initial_effect(c)
 	e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,21520079+EFFECT_COUNT_CODE_OATH)
 	e1:SetCondition(c21520079.actcon)
 --  e1:SetTarget(c21520079.target)
 	e1:SetOperation(c21520079.activate)

expansions/script/c33500006.lua

@@ -3,7 +3,7 @@ local m=33500006
 local cm=_G["c"..m]
 function cm.initial_effect(c)
 	--synchro summon
-	aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0xa82),aux.NonTuner(nil),1)
+	aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0xa82),aux.NonTuner(Card.IsRace,RACE_FAIRY),1)
 	c:EnableReviveLimit()
 	--search
 	local e1=Effect.CreateEffect(c)
@@ -33,6 +33,7 @@ function cm.initial_effect(c)
 	e3:SetType(EFFECT_TYPE_IGNITION)
 	e3:SetRange(LOCATION_GRAVE)
 	e3:SetCountLimit(1,m+10000)
+	e3:SetCondition(aux.exccon)
 	e3:SetCost(aux.bfgcost)
 	e3:SetTarget(cm.settg)
 	e3:SetOperation(cm.setop)
@@ -66,12 +67,33 @@ function cm.filter(c)
 	return  c:IsAbleToHand() 
 end
 function cm.thtg2(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,2,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,2,tp,LOCATION_DECK)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,1,tp,LOCATION_DECK)
 end
 function cm.thop2(e,tp,eg,ep,ev,re,r,rp)
-	if  Duel.IsPlayerCanDraw(tp,2) then
-		Duel.Draw(tp,2,REASON_EFFECT)
+	if not e:GetHandler():IsRelateToEffect(e) then return end
+	if Duel.IsPlayerCanDraw(tp,1) and Duel.Draw(tp,1,REASON_EFFECT)~=0 and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
+			Duel.BreakEffect()
+			local res=0
+			if c:GetLevel()<=4 then
+				res=Duel.SelectOption(tp,aux.Stringid(m,3))
+			else
+				res=Duel.SelectOption(tp,aux.Stringid(m,3),aux.Stringid(m,4))
+			end
+			if res>0 then
+				local e1=Effect.CreateEffect(c)
+				e1:SetType(EFFECT_TYPE_SINGLE)
+				e1:SetCode(EFFECT_UPDATE_LEVEL)
+				e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+				if res==1 then
+					e1:SetValue(-4)
+				else
+					e1:SetValue(-2)
+				end
+				e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
+				c:RegisterEffect(e1)
+			end
+		end
 	end
 end
 --e3
@@ -79,11 +101,11 @@ function cm.setfilter(c)
 	return c:IsSetCard(0xa82) and (c:IsType(TYPE_TRAP) or c:IsType(TYPE_SPELL)) and c:IsSSetable()
 end
 function cm.settg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(cm.setfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.setfilter,tp,LOCATION_DECK,0,1,nil) end
 end
 function cm.setop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
-	local g=Duel.SelectMatchingCard(tp,cm.setfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil)
+	local g=Duel.SelectMatchingCard(tp,cm.setfilter,tp,LOCATION_DECK,0,1,1,nil)
 	if g:GetCount()>0 then
 		Duel.SSet(tp,g:GetFirst())
 		Duel.ConfirmCards(1-tp,g)

expansions/script/c33500008.lua

@@ -32,12 +32,12 @@ function cm.initial_effect(c)
 end
 --Synchro SUMMON
 function cm.sfilter1(c)
-	return c:IsSetCard(0xa82) and c:IsType(TYPE_SYNCHRO)
+	return c:IsSetCard(0xa83) and c:IsType(TYPE_SYNCHRO)
 end
 function cm.sfilter2(c)
-	return c:IsSetCard(0xa82) 
+	return c:IsSetCard(0xa82) and c:IsType(TYPE_SYNCHRO)
 end
---indes
+--
 function cm.indct(e,re,r,rp)
 	if bit.band(r,REASON_BATTLE+REASON_EFFECT)~=0 then
 		return 1

expansions/script/c33500010.lua

@@ -5,6 +5,14 @@ function cm.initial_effect(c)
 	--link summon
 	aux.AddLinkProcedure(c,cm.mfilter,1)
 	c:EnableReviveLimit()
+	--splimit
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e0:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e0:SetCondition(cm.regcon)
+	e0:SetOperation(cm.regop)
+	c:RegisterEffect(e0)
 	--tohand
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
@@ -19,7 +27,7 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e1)
 end
 function cm.mfilter(c)
-	return c:IsLinkSetCard(0xa83)
+	return c:IsLinkSetCard(0xa83) and c:IsLevelBelow(4)
 end
 --e1
 function cm.condition(e,tp,eg,ep,ev,re,r,rp)
@@ -33,6 +41,7 @@ function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
 end
 function cm.thop(e,tp,eg,ep,ev,re,r,rp)
+	if not e:GetHandler():IsRelateToEffect(e) then return end
 	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
@@ -40,3 +49,19 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.ConfirmCards(1-tp,g)
 	end
 end
+function cm.regcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
+end
+function cm.regop(e,tp,eg,ep,ev,re,r,rp)
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetTargetRange(1,0)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	e1:SetTarget(cm.splimit)
+	Duel.RegisterEffect(e1,tp)
+end
+function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
+	return c:IsCode(m) and bit.band(sumtype,SUMMON_TYPE_LINK)==SUMMON_TYPE_LINK
+end

expansions/script/c33500013.lua

@@ -3,7 +3,7 @@ local m=33500013
 local cm=_G["c"..m]
 function cm.initial_effect(c)
 	--link summon
-	aux.AddLinkProcedure(c,nil,2,2,cm.lcheck)
+	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkRace,RACE_FAIRY),2,2,cm.lcheck)
 	c:EnableReviveLimit()
 	--can not be effect target
 	local e1=Effect.CreateEffect(c)
@@ -21,9 +21,28 @@ function cm.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_IGNITION)
 	e2:SetRange(LOCATION_MZONE)
 	e2:SetCountLimit(1,m)
+	e2:SetCost(cm.cost)
 	e2:SetTarget(cm.sptg)
 	e2:SetOperation(cm.spop)
 	c:RegisterEffect(e2)
+	Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)  
+end
+function cm.counterfilter(c)  
+	return c:IsSetCard(0xa82)
+end  
+function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)  
+	if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end  
+	local e1=Effect.CreateEffect(e:GetHandler())  
+	e1:SetType(EFFECT_TYPE_FIELD)  
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)  
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)  
+	e1:SetTargetRange(1,0)  
+	e1:SetTarget(cm.splimit)  
+	e1:SetReset(RESET_PHASE+PHASE_END)  
+	Duel.RegisterEffect(e1,tp)  
+end  
+function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)  
+	return not c:IsSetCard(0xa82)
 end  
 --
 function cm.lcheck(g)

expansions/script/c33500015.lua

@@ -31,6 +31,7 @@ function cm.initial_effect(c)
 	e11:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
 	e11:SetRange(LOCATION_MZONE)
 	e11:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e11:SetCondition(cm.damcon)
 	e11:SetOperation(cm.disop)
 	c:RegisterEffect(e11)
 end
@@ -39,7 +40,7 @@ function cm.sfilter1(c)
 	return c:IsSetCard(0xa83) and c:IsType(TYPE_SYNCHRO)
 end
 function cm.sfilter2(c)
-	return c:IsSetCard(0xa82) 
+	return c:IsSetCard(0xa82) and c:IsType(TYPE_SYNCHRO)
 end
 --e2
 function cm.negcon(e,tp,eg,ep,ev,re,r,rp)
@@ -55,6 +56,7 @@ function cm.negtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	end
 end
 function cm.negop(e,tp,eg,ep,ev,re,r,rp)
+	if not e:GetHandler():IsRelateToEffect(e) then return end
 	local ty=re:GetActiveType()
 	if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
 		Duel.Destroy(eg,REASON_EFFECT)
@@ -73,12 +75,18 @@ function cm.aclimit(e,re,tp)
 	return re:GetActiveType()==e:GetLabel()
 end
 --e11
+function cm.ctfilter(c,tp)
+	return c:GetSummonPlayer()==tp
+end
+function cm.damcon(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(cm.ctfilter,1,nil,1-tp)
+end
 function cm.filter(c)
-	return c:IsFaceup() and c:IsRace(RACE_FAIRY) and c:IsType(TYPE_MONSTER)
+	return c:IsFaceup() and c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO)
 end
 function cm.disop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_CARD,0,m)
-	Duel.Recover(tp,500,REASON_EFFECT)
+	Duel.Recover(tp,200,REASON_EFFECT)
 	local g=Duel.GetMatchingGroup(cm.filter,tp,LOCATION_MZONE,0,nil)
 	local tc=g:GetFirst()
 	while tc do

expansions/script/c33500115.lua

@@ -8,6 +8,7 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
 	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER)
+	e1:SetCountLimit(1,m+10000)
 	e1:SetCondition(cm.condition)
 	e1:SetTarget(cm.target)
 	e1:SetOperation(cm.activate)
@@ -27,7 +28,7 @@ function cm.initial_effect(c)
 end
 --e1
 function cm.cfilter(c)
-	return c:IsFaceup() and c:IsSetCard(0xa82)
+	return c:IsFaceup() and c:IsSetCard(0xa82) and c:GetSummonLocation()==LOCATION_EXTRA
 end
 function cm.condition(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_MZONE,0,1,nil)

expansions/script/c33500307.lua

@@ -5,6 +5,14 @@ function cm.initial_effect(c)
 	--link summon
 	aux.AddLinkProcedure(c,cm.mfilter,1)
 	c:EnableReviveLimit()
+	--splimit
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e0:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e0:SetCondition(cm.regcon)
+	e0:SetOperation(cm.regop)
+	c:RegisterEffect(e0)
 	--tohand
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
@@ -39,7 +47,7 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e2)
 end
 function cm.mfilter(c)
-	return c:IsLinkSetCard(0xa84)
+	return c:IsLinkSetCard(0xa84) and c:IsLevelBelow(4)
 end
 --e1
 function cm.condition(e,tp,eg,ep,ev,re,r,rp)
@@ -53,6 +61,7 @@ function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
 end
 function cm.thop(e,tp,eg,ep,ev,re,r,rp)
+	if not e:GetHandler():IsRelateToEffect(e) then return end
 	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
@@ -84,3 +93,19 @@ function cm.slevel(e,c)
 	local lv=e:GetHandler():GetLevel()
 	return 4*65536+lv
 end
+function cm.regcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
+end
+function cm.regop(e,tp,eg,ep,ev,re,r,rp)
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetTargetRange(1,0)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	e1:SetTarget(cm.splimit)
+	Duel.RegisterEffect(e1,tp)
+end
+function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
+	return c:IsCode(m) and bit.band(sumtype,SUMMON_TYPE_LINK)==SUMMON_TYPE_LINK
+end

expansions/script/c34501121.lua

---笹濑川佐佐美
-function c34501121.initial_effect(c)
-	--link summon
-	c:EnableReviveLimit()
-	aux.AddLinkProcedure(c,c34501121.matfilter,1,1)
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(34501121,0))
-	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetRange(LOCATION_MZONE)
-	e2:SetCode(EVENT_FREE_CHAIN)
-	e2:SetCountLimit(1,34501121)
-	e2:SetCondition(c34501121.thcon)
-	e2:SetTarget(c34501121.sptg)
-	e2:SetOperation(c34501121.spop)
-	c:RegisterEffect(e2)
-end
-function c34501121.thcon(e,tp,eg,ep,ev,re,r,rp)
-	return e:GetHandler():GetMutualLinkedGroupCount()>0
-end
-function c34501121.matfilter(c)
-	return c:IsRace(RACE_CYBERSE) and not c:IsType(TYPE_LINK)
-end
-function c34501121.spcon(e)
-	return e:GetHandler():GetMutualLinkedGroupCount()>0
-end
-function c34501121.cfilter(c,ec)
-	return c:IsFaceup() and c:IsType(TYPE_LINK) and c:GetLinkedGroup():IsContains(ec)
-end
-function c34501121.spfilter(c,e,tp)
-	local g1=Duel.GetMatchingGroup(c34501121.cfilter,0,LOCATION_MZONE,LOCATION_MZONE,nil,e:GetHandler())
-	return c:IsType(TYPE_MONSTER) and c:IsRace(RACE_CYBERSE) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsLevelBelow(g1:GetSum(Card.GetLink)*1)
-end
-function c34501121.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(c34501121.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
-end
-function c34501121.spop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectMatchingCard(tp,c34501121.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
-	local tc=g:GetFirst()
-	if tc and Duel.SpecialSummonStep(tc,0,tp,tp,true,false,POS_FACEUP) then
-		local e1=Effect.CreateEffect(tc)
-		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=Effect.CreateEffect(tc)
-		e2:SetType(EFFECT_TYPE_SINGLE)
-		e2:SetCode(EFFECT_DISABLE_EFFECT)
-		e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e2:SetReset(RESET_EVENT+RESETS_STANDARD)
-		tc:RegisterEffect(e2)
-		local e3=Effect.CreateEffect(tc)
-		e3:SetType(EFFECT_TYPE_SINGLE)
-		e3:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
-		e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e3:SetReset(RESET_EVENT+RESETS_REDIRECT)
-		e3:SetValue(LOCATION_REMOVED)
-		tc:RegisterEffect(e3)
-	end
-end
\ No newline at end of file

expansions/script/c34503000.lua

---共同遥望的星空
-function c34503000.initial_effect(c)
-	--activate
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	c:RegisterEffect(e1)   
-	-----------------
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e2:SetCode(EVENT_CHAINING)
-	e2:SetRange(LOCATION_FZONE)
-	e2:SetOperation(c34503000.chainop)
-	c:RegisterEffect(e2)
-	-----------------
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(8802510,0))
-	e3:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
-	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e3:SetProperty(EFFECT_FLAG_DELAY)
-	e3:SetRange(LOCATION_FZONE)
-	e3:SetCode(EVENT_REMOVE)
-	e3:SetCountLimit(1,34503000)
-	e3:SetCondition(c34503000.regcon)
-	e3:SetTarget(c34503000.target)
-	e3:SetOperation(c34503000.activate)
-	c:RegisterEffect(e3)
-end
-function c34503000.chainop(e,tp,eg,ep,ev,re,r,rp)
-	if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_RITUAL) and re:IsActiveType(TYPE_SPELL) then
-		Duel.SetChainLimit(c34503000.chainlm)
-	end
-end
-function c34503000.chainlm(e,rp,tp)
-	return tp==rp
-end
------------------
-function c34503000.cfilter(c,tp)
-	return c:IsType(TYPE_MONSTER) and c:IsType(TYPE_RITUAL) 
-end
-function c34503000.regcon(e,tp,eg,ep,ev,re,r,rp)
-	return eg:IsExists(c34503000.cfilter,1,nil,tp)
-end
-function c34503000.filter(c)
-	return c:IsType(TYPE_MONSTER) and (c:IsSetCard(0xac4) or c:IsCode(4335427) or c:IsCode(17469113) or c:IsCode(91588074) or c:IsCode(75713017) or c:IsCode(2648201)) and c:IsAbleToHand()
-end
-function c34503000.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34503000.filter,tp,LOCATION_DECK,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-end
-function c34503000.activate(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c34503000.filter,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
\ No newline at end of file

expansions/script/c34503010.lua

-
-
-function c34503010.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:SetTarget(c34503010.target)
-	e1:SetOperation(c34503010.activate)
-	c:RegisterEffect(e1)
-end
-
-function c34503010.filter(c,e,tp)
-	return c:IsSetCard(0xac4) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,false,true)
-end
-function c34503010.mfilter(c)
-	return c:GetLevel()>0 and c:IsFaceup() and c:IsAbleToDeck()
-end
-function c34503010.mfilter1(c)
-	return not c:IsReleasable()
-end
-function c34503010.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then
-		local mg1=Duel.GetRitualMaterial(tp):Filter(c34503010.mfilter1,nil)
-		local mg2=Duel.GetMatchingGroup(c34503010.mfilter,tp,LOCATION_REMOVED,0,nil)
-		return Duel.IsExistingMatchingCard(aux.RitualUltimateFilter,tp,LOCATION_HAND,0,1,nil,c34503010.filter,e,tp,mg1,mg2,Card.GetLevel,"Greater")
-	end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
-	Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,0,tp,LOCATION_REMOVED)
-end
-function c34503010.activate(e,tp,eg,ep,ev,re,r,rp)
-	local mg1=Duel.GetRitualMaterial(tp):Filter(c34503010.mfilter1,nil)
-	local mg2=Duel.GetMatchingGroup(c34503010.mfilter,tp,LOCATION_REMOVED,0,nil)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectMatchingCard(tp,aux.RitualUltimateFilter,tp,LOCATION_HAND,0,1,1,nil,c34503010.filter,e,tp,mg1,mg2,Card.GetLevel,"Greater")
-	local tc=g:GetFirst()
-	if tc then
-		local mg=mg1:Filter(Card.IsCanBeRitualMaterial,tc,tc)
-		mg:Merge(mg2)
-		if tc.mat_filter then
-			mg=mg:Filter(tc.mat_filter,tc,tp)
-		else
-			mg:RemoveCard(tc)
-		end
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
-		aux.GCheckAdditional=aux.RitualCheckAdditional(tc,tc:GetLevel(),"Greater")
-		local mat=mg:SelectSubGroup(tp,aux.RitualCheck,false,1,tc:GetLevel(),tp,tc,tc:GetLevel(),"Greater")
-		aux.GCheckAdditional=nil
-		if not mat or mat:GetCount()==0 then return end
-		tc:SetMaterial(mat)
-		local mat2=mat:Filter(Card.IsLocation,nil,LOCATION_REMOVED)
-		mat:Sub(mat2)
-		Duel.ReleaseRitualMaterial(mat)
-		Duel.SendtoDeck(mat2,nil,2,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/c34503020.lua

---仰望星空的少女
-function c34503020.initial_effect(c)
-	c:EnableReviveLimit()
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_SINGLE)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
-	e1:SetValue(aux.ritlimit)
-	c:RegisterEffect(e1)
-	----------------------
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(34503020,0))
-	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetRange(LOCATION_HAND)
-	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e2:SetCountLimit(1,34503020)
-	e2:SetCost(c34503020.thcost)
-	e2:SetTarget(c34503020.thtg)
-	e2:SetOperation(c34503020.thop)
-	c:RegisterEffect(e2)
-	--------------------
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(34503020,1))
-	e3:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
-	e3:SetType(EFFECT_TYPE_IGNITION)
-	e3:SetRange(LOCATION_GRAVE)
-	e3:SetCountLimit(1,34503021)
-	e3:SetCost(c34503020.spcost)
-	e3:SetTarget(c34503020.thtg1)
-	e3:SetOperation(c34503020.thop1)
-	c:RegisterEffect(e3)
-	--------------------
-	local e4=Effect.CreateEffect(c)
-	e4:SetDescription(aux.Stringid(34503020,2))
-	e4:SetCategory(CATEGORY_DESTROY)
-	e4:SetType(EFFECT_TYPE_IGNITION)
-	e4:SetCode(EVENT_FREE_CHAIN)
-	e4:SetRange(LOCATION_MZONE)
-	e4:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e4:SetCondition(c34503020.condition)
-	e4:SetCost(c34503020.cost)
-	e4:SetTarget(c34503020.target)
-	e4:SetOperation(c34503020.activate)
-	c:RegisterEffect(e4)
-	--------------------
-	local e5=Effect.CreateEffect(c)
-	e5:SetDescription(aux.Stringid(34503020,2))
-	e5:SetCategory(CATEGORY_DESTROY)
-	e5:SetType(EFFECT_TYPE_QUICK_O)
-	e5:SetCode(EVENT_FREE_CHAIN)
-	e5:SetRange(LOCATION_MZONE)
-	e5:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e5:SetCountLimit(1,34503022)	
-	e5:SetCondition(c34503020.condition1)
-	e5:SetCost(c34503020.cost)
-	e5:SetTarget(c34503020.target)
-	e5:SetOperation(c34503020.activate)
-	c:RegisterEffect(e5)
-end
-function c34503020.thcost(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 c34503020.thfilter(c)
-	return c:IsSetCard(0xac4) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand()
-end
-function c34503020.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34503020.thfilter,tp,LOCATION_DECK,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-end
-function c34503020.thop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c34503020.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
-end
------------------------
-function c34503020.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-   if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost() end
-	Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_COST)
-	local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
-	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
-	e1:SetTargetRange(1,0)
-	e1:SetTarget(c34503020.splimit)
-	e1:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e1,tp)
-end
-function c34503020.splimit(e,c,sump,sumtype,sumpos,targetp,se)
-	return c:IsLocation(LOCATION_EXTRA) and not c:IsRace(RACE_FAIRY)
-end
------------------------
-function c34503020.thcon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==0
-end
-function c34503020.thfilter1(c)
-	return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
-end
-function c34503020.thtg1(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34503020.thfilter1,tp,LOCATION_DECK,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-end
-function c34503020.thop1(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c34503020.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 c34503020.condition(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetTurnPlayer()==tp
-end
-function c34503020.condition1(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetTurnPlayer()~=tp
-end
-function c34503020.cfilter(c)
-	return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
-end
-function c34503020.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34503020.cfilter,tp,LOCATION_HAND,0,1,nil) end
-	local g=Duel.SelectMatchingCard(tp,c34503020.cfilter,tp,LOCATION_HAND,0,1,1,nil)
-	if g:GetCount()>0 then
-	Duel.Remove(g,POS_FACEUP,REASON_COST)
-	end
-end
-function c34503020.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	local g=Duel.GetMatchingGroup(nil,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
-	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
-end
-function c34503020.activate(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
-	local g=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
-	if g:GetCount()>0 then
-		Duel.HintSelection(g)
-		Duel.Destroy(g,REASON_EFFECT)
-	end
-end

expansions/script/c34503030.lua

---憧憬星空的少女
-function c34503030.initial_effect(c)
-	c:EnableReviveLimit()
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_SINGLE)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
-	e1:SetValue(aux.ritlimit)
-	c:RegisterEffect(e1)
-	----------------------
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(34503030,0))
-	e2:SetCategory(CATEGORY_TOHAND)
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetRange(LOCATION_HAND)
-	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e2:SetCountLimit(1,34503030)
-	e2:SetCost(c34503030.thcost)
-	e2:SetTarget(c34503030.thtg)
-	e2:SetOperation(c34503030.thop)
-	c:RegisterEffect(e2)
-	--------------------
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(34503030,1))
-	e3:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
-	e3:SetType(EFFECT_TYPE_IGNITION)
-	e3:SetRange(LOCATION_GRAVE)
-	e3:SetCountLimit(1,34503031)
-	e3:SetCost(c34503030.spcost)
-	e3:SetTarget(c34503030.thtg1)
-	e3:SetOperation(c34503030.thop1)
-	c:RegisterEffect(e3)
-	--------------------
-	local e4=Effect.CreateEffect(c)
-	e4:SetDescription(aux.Stringid(34503030,2))
-	e4:SetCategory(CATEGORY_DESTROY)
-	e4:SetType(EFFECT_TYPE_IGNITION)
-	e4:SetCode(EVENT_FREE_CHAIN)
-	e4:SetRange(LOCATION_MZONE)
-	e4:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e4:SetCondition(c34503030.condition)
-	e4:SetCost(c34503030.cost)
-	e4:SetTarget(c34503030.target)
-	e4:SetOperation(c34503030.activate)
-	c:RegisterEffect(e4)
-	--------------------
-	local e5=Effect.CreateEffect(c)
-	e5:SetDescription(aux.Stringid(34503030,2))
-	e5:SetCategory(CATEGORY_DESTROY)
-	e5:SetType(EFFECT_TYPE_QUICK_O)
-	e5:SetCode(EVENT_FREE_CHAIN)
-	e5:SetRange(LOCATION_MZONE)
-	e5:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e5:SetCountLimit(1,34503032)	
-	e5:SetCondition(c34503030.condition1)
-	e5:SetCost(c34503030.cost)
-	e5:SetTarget(c34503030.target)
-	e5:SetOperation(c34503030.activate)
-	c:RegisterEffect(e5)
-end
-function c34503030.thcost(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 c34503030.thfilter(c)
-	return c:IsSetCard(0xac4) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand()
-end
-function c34503030.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34503030.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
-end
-function c34503030.thop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c34503030.thfilter,tp,LOCATION_GRAVE,0,1,1,nil)
-	if g:GetCount()>0 then
-		Duel.SendtoHand(g,nil,REASON_EFFECT)
-		Duel.ConfirmCards(1-tp,g)
-	end
-end
------------------------
-function c34503030.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-   if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost() end
-	Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_COST)
-	local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
-	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
-	e1:SetTargetRange(1,0)
-	e1:SetTarget(c34503030.splimit)
-	e1:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e1,tp)
-end
-function c34503030.splimit(e,c,sump,sumtype,sumpos,targetp,se)
-	return c:IsLocation(LOCATION_EXTRA) and not c:IsRace(RACE_FAIRY)
-end
------------------------
-function c34503030.thcon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==0
-end
-function c34503030.thfilter1(c)
-	return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
-end
-function c34503030.thtg1(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34503030.thfilter1,tp,LOCATION_DECK,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-end
-function c34503030.thop1(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c34503030.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 c34503030.condition(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetTurnPlayer()==tp
-end
-function c34503030.condition1(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetTurnPlayer()~=tp
-end
-function c34503030.cfilter(c)
-	return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
-end
-function c34503030.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34503030.cfilter,tp,LOCATION_HAND,0,1,nil) end
-	local g=Duel.SelectMatchingCard(tp,c34503030.cfilter,tp,LOCATION_HAND,0,1,1,nil)
-	if g:GetCount()>0 then
-	Duel.Remove(g,POS_FACEUP,REASON_COST)
-	end
-end
-function c34503030.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	local g=Duel.GetMatchingGroup(nil,tp,LOCATION_SZONE,LOCATION_SZONE,nil)
-	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
-end
-function c34503030.activate(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
-	local g=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_SZONE,LOCATION_SZONE,1,1,nil)
-	if g:GetCount()>0 then
-		Duel.HintSelection(g)
-		Duel.Destroy(g,REASON_EFFECT)
-	end
-end
\ No newline at end of file

expansions/script/c34503040.lua

---星空下的告白
-function c34503040.initial_effect(c)
-	--Activate
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH+CATEGORY_GRAVE_ACTION)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetCountLimit(1,34503040+EFFECT_COUNT_CODE_OATH)
-	e1:SetCost(c34503040.cost)
-	e1:SetTarget(c34503040.target)
-	e1:SetOperation(c34503040.activate)
-	c:RegisterEffect(e1)
-	---------------
-	local e2=Effect.CreateEffect(c)
-	e2:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetCode(EVENT_FREE_CHAIN)
-	e2:SetCountLimit(1,34503041)
-	e2:SetRange(LOCATION_GRAVE)
-	e2:SetCondition(aux.exccon)
-	e2:SetCost(aux.bfgcost)
-	e2:SetTarget(c34503040.target1)
-	e2:SetOperation(c34503040.activate1)
-	c:RegisterEffect(e2)
-end
-function c34503040.cfilter(c)
-	return bit.band(c:GetType(),0x81)==0x81 and c:IsAbleToRemoveAsCost()
-end
-function c34503040.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34503030.cfilter,tp,LOCATION_GRAVE,0,1,nil) end
-	local g=Duel.SelectMatchingCard(tp,c34503030.cfilter,tp,LOCATION_GRAVE,0,1,1,nil)
-	if g:GetCount()>0 then
-	Duel.Remove(g,POS_FACEUP,REASON_COST)
-	end
-end
-function c34503040.filter(c)
-	return bit.band(c:GetType(),0x81)==0x81 and c:IsRace(RACE_FAIRY) and c:IsAbleToHand()
-end
-function c34503040.filter2(c)
-	return bit.band(c:GetType(),0x82)==0x82 and c:IsAbleToHand()
-end
-function c34503040.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34503040.filter,tp,LOCATION_REMOVED,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_REMOVED)
-end
-function c34503040.activate(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c34503040.filter,tp,LOCATION_REMOVED,0,1,1,nil)
-	if g:GetCount()>0 then
-		Duel.SendtoHand(g,nil,REASON_EFFECT)
-		Duel.ConfirmCards(1-tp,g)
-		local mg=Duel.GetMatchingGroup(aux.NecroValleyFilter(c34503040.filter2),tp,LOCATION_DECK,0,nil)
-		if mg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(34503040,0)) then
-			Duel.BreakEffect()
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-			local sg=mg:Select(tp,1,1,nil)
-			Duel.SendtoHand(sg,nil,REASON_EFFECT)
-			Duel.ConfirmCards(1-tp,sg)
-		end
-	end
-end
-----------------------------------------------------
-function c34503040.filter4(c)
-	return c:IsFaceup() and c:IsType(TYPE_MONSTER) and c:IsType(TYPE_RITUAL) and c:IsAbleToDeck()
-end
-function c34503040.sfilter(c,tp)
-	return c:IsLocation(LOCATION_DECK) and c:IsControler(tp)
-end
-function c34503040.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_REMOVED) and c34503040.filter4(chkc) end
-	if chk==0 then return Duel.IsPlayerCanDraw(tp,1)
-		and Duel.IsExistingTarget(c34503040.filter4,tp,LOCATION_REMOVED,0,3,nil) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
-	local g=Duel.SelectTarget(tp,c34503040.filter4,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 c34503040.activate1(e,tp,eg,ep,ev,re,r,rp)
-	local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
-	if not tg or tg:FilterCount(Card.IsRelateToEffect,nil,e)~=3 then return end
-	Duel.SendtoDeck(tg,nil,0,REASON_EFFECT)
-	local g=Duel.GetOperatedGroup()
-	if g:IsExists(c34503040.sfilter,1,nil,tp) then Duel.ShuffleDeck(tp) end
-	if g:IsExists(c34503040.sfilter,1,nil,1-tp) then Duel.ShuffleDeck(1-tp) end
-	local ct=g:FilterCount(Card.IsLocation,nil,LOCATION_DECK)
-	if ct==3 then
-		Duel.BreakEffect()
-		Duel.Draw(tp,1,REASON_EFFECT)
-	end
-end

expansions/script/c34511100.lua

---纯白的妹妹 樱乃
-function c34511100.initial_effect(c)
-	aux.EnablePendulumAttribute(c)
-	--pendulum set/spsummon
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(34511100,0))
-	e1:SetCategory(CATEGORY_DESTROY+CATEGORY_SEARCH+CATEGORY_TOHAND)
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetRange(LOCATION_PZONE)
-	e1:SetCountLimit(1,34511100)
-	e1:SetTarget(c34511100.rptg)
-	e1:SetOperation(c34511100.rpop)
-	c:RegisterEffect(e1)
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(34511100,5))
-	e3:SetCategory(CATEGORY_TOHAND)
-	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e3:SetCode(EVENT_DESTROYED)
-	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
-	e3:SetCondition(c34511100.spcon1)
-	e3:SetTarget(c34511100.rmtg1)
-	e3:SetOperation(c34511100.rmop1)
-	c:RegisterEffect(e3)
--------------------------------------------
-	local e5=Effect.CreateEffect(c)
-	e5:SetType(EFFECT_TYPE_FIELD)
-	e5:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
-	e5:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e5:SetTargetRange(1,0)
-	e5:SetRange(LOCATION_PZONE)
-	e5:SetTarget(c34511100.splimit)
-	c:RegisterEffect(e5)
-end
-function c34511100.rpfilter(c,e,tp)
-	return c:IsSetCard(0xac5) and c:IsAbleToHand()
-end
-function c34511100.rptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34511100.rpfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_DESTROY,e:GetHandler(),1,0,0)
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-end
-function c34511100.rpop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) and Duel.Destroy(c,REASON_EFFECT)>0 then
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-		local g=Duel.SelectMatchingCard(tp,c34511100.rpfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
-		Duel.SendtoHand(g,nil,REASON_EFFECT)
-		Duel.ConfirmCards(1-tp,g)
-	end
-end
-function c34511100.spcon1(e,tp,eg,ep,ev,re,r,rp)
-	return bit.band(r,REASON_EFFECT+REASON_BATTLE)~=0
-end
-function c34511100.rmtg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsAbleToHand() end
-	if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToHand,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
-	local g=Duel.SelectTarget(tp,Card.IsAbleToHand,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
-end
-function c34511100.rmop1(e,tp,eg,ep,ev,re,r,rp)
-	local tc=Duel.GetFirstTarget()
-	if tc and tc:IsRelateToEffect(e) then
-		Duel.SendtoHand(tc,nil,REASON_EFFECT)
-	end
-end
-function c34511100.splimit(e,c)
-	return not c:IsSetCard(0xac5) and c:IsLocation(LOCATION_HAND)
-end

expansions/script/c34511110.lua

---纯白的学姐 美羽
-function c34511110.initial_effect(c)
-	--pendulum summon
-	aux.EnablePendulumAttribute(c)
-	--pendulum set
-	local e2=Effect.CreateEffect(c)
-	e2:SetCategory(CATEGORY_DESTROY)
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetRange(LOCATION_PZONE)
-	e2:SetCountLimit(1,34511110)
-	e2:SetTarget(c34511110.pentg)
-	e2:SetOperation(c34511110.penop)
-	c:RegisterEffect(e2)
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(34511110,1))
-	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e3:SetCountLimit(1,34511111)
-	e3:SetProperty(EFFECT_FLAG_DELAY)
-	e3:SetCondition(c34511110.spcon)
-	e3:SetTarget(c34511110.sptg)
-	e3:SetOperation(c34511110.spop)
-	c:RegisterEffect(e3)
--------------------------------------------
-	local e5=Effect.CreateEffect(c)
-	e5:SetType(EFFECT_TYPE_FIELD)
-	e5:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
-	e5:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e5:SetTargetRange(1,0)
-	e5:SetRange(LOCATION_PZONE)
-	e5:SetTarget(c34511110.splimit)
-	c:RegisterEffect(e5)
-end
-function c34511110.penfilter(c)
-	return c:IsSetCard(0xac5) and c:IsType(TYPE_PENDULUM) and not c:IsCode(c34511110) and not c:IsForbidden()
-end
-function c34511110.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsDestructable()
-		and Duel.IsExistingMatchingCard(c34511110.penfilter,tp,LOCATION_DECK,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_DESTROY,e:GetHandler(),1,0,0)
-end
-function c34511110.penop(e,tp,eg,ep,ev,re,r,rp)
-	if not e:GetHandler():IsRelateToEffect(e) then return end
-	if Duel.Destroy(e:GetHandler(),REASON_EFFECT)~=0 then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
-		local g=Duel.SelectMatchingCard(tp,c34511110.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
-end
-function c34511110.spcon(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	return c:IsSummonType(SUMMON_TYPE_PENDULUM) and c:IsPreviousLocation(LOCATION_HAND+LOCATION_EXTRA)
-end
-function c34511110.spfilter(c,e,tp)
-	return c:IsSetCard(0xac5) and c:IsLevelBelow(4) and c:IsType(TYPE_PENDULUM) and not c:IsCode(34511110)
-		and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
-end
-function c34511110.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(c34511110.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
-end
-function c34511110.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,c34511110.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
-	local tc=g:GetFirst()
-	if tc and Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP_DEFENSE) then
-		local c=e:GetHandler()
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_DISABLE)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-		tc:RegisterEffect(e1,true)
-		local e2=Effect.CreateEffect(c)
-		e2:SetType(EFFECT_TYPE_SINGLE)
-		e2:SetCode(EFFECT_DISABLE_EFFECT)
-		e2:SetReset(RESET_EVENT+RESETS_STANDARD)
-		tc:RegisterEffect(e2,true)
-		Duel.SpecialSummonComplete()
-	end
-end
-function c34511110.splimit(e,c)
-	return not c:IsSetCard(0xac5) and c:IsLocation(LOCATION_HAND)
-end

expansions/script/c34511120.lua

---纯白的巫女 结月
-function c34511120.initial_effect(c)
-	aux.EnablePendulumAttribute(c)
-	--change scale
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(34511120,0))
-	e2:SetCategory(CATEGORY_TOEXTRA)
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetRange(LOCATION_PZONE)
-	e2:SetCountLimit(1,34511120)
-	e2:SetTarget(c34511120.sctg)
-	e2:SetOperation(c34511120.scop)
-	c:RegisterEffect(e2)
-	local e4=Effect.CreateEffect(c)
-	e4:SetDescription(aux.Stringid(34511120,3))
-	e4:SetCategory(CATEGORY_DISABLE)
-	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e4:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
-	e4:SetCode(EVENT_DESTROYED)
-	e4:SetCondition(c34511120.spcon1)
-	e4:SetTarget(c34511120.target)
-	e4:SetOperation(c34511120.activate)
-	c:RegisterEffect(e4)
-	local e5=Effect.CreateEffect(c)
-	e5:SetType(EFFECT_TYPE_FIELD)
-	e5:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
-	e5:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e5:SetTargetRange(1,0)
-	e5:SetRange(LOCATION_PZONE)
-	e5:SetTarget(c34511120.splimit)
-	c:RegisterEffect(e5)
-end
-function c34511120.scfilter(c,pc)
-	return c:IsType(TYPE_PENDULUM) and c:IsSetCard(0xac5) and not c:IsForbidden()
-		and c:GetLeftScale()~=pc:GetLeftScale()
-end
-function c34511120.sctg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34511120.scfilter,tp,LOCATION_DECK,0,1,nil,e:GetHandler()) end
-	Duel.SetOperationInfo(0,CATEGORY_TOEXTRA,nil,1,tp,LOCATION_DECK)
-end
-function c34511120.scop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if not c:IsRelateToEffect(e) then return end
-	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(34511120,1))
-	local g=Duel.SelectMatchingCard(tp,c34511120.scfilter,tp,LOCATION_DECK,0,1,1,nil,c)
-	local tc=g:GetFirst()
-	if tc and Duel.SendtoExtraP(tc,tp,REASON_EFFECT)>0 then
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_CHANGE_LSCALE)
-		e1:SetValue(tc:GetLeftScale())
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-		c:RegisterEffect(e1)
-		local e2=e1:Clone()
-		e2:SetCode(EFFECT_CHANGE_RSCALE)
-		e2:SetValue(tc:GetRightScale())
-		c:RegisterEffect(e2)
-	end
-end
-function c34511120.spcon1(e,tp,eg,ep,ev,re,r,rp)
-	return bit.band(r,REASON_EFFECT+REASON_BATTLE)~=0
-end
-function c34511120.disfilter(c)
-	return c:IsFaceup() and not c:IsDisabled() and c:IsType(TYPE_EFFECT)
-end
-function c34511120.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c34511120.disfilter(chkc) end
-	if chk==0 then return Duel.IsExistingTarget(c34511120.disfilter,tp,0,LOCATION_MZONE,1,nil) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
-	Duel.SelectTarget(tp,c34511120.disfilter,tp,0,LOCATION_MZONE,1,1,nil)
-end
-function c34511120.activate(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local tc=Duel.GetFirstTarget()
-	if tc:IsFaceup() and tc:IsRelateToEffect(e) and not tc:IsDisabled() and not tc:IsImmuneToEffect(e) then
-		Duel.NegateRelatedChain(tc,RESET_TURN_SET)
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_DISABLE)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-		tc:RegisterEffect(e1)
-		local e2=Effect.CreateEffect(c)
-		e2:SetType(EFFECT_TYPE_SINGLE)
-		e2:SetCode(EFFECT_DISABLE_EFFECT)
-		e2:SetValue(RESET_TURN_SET)
-		e2:SetReset(RESET_EVENT+RESETS_STANDARD)
-		tc:RegisterEffect(e2)
-		if not c:IsStatus(STATUS_ACT_FROM_HAND) and c:IsLocation(LOCATION_SZONE) then
-			local e4=Effect.CreateEffect(c)
-			e4:SetType(EFFECT_TYPE_FIELD)
-			e4:SetCode(EFFECT_DISABLE)
-			e4:SetTargetRange(LOCATION_SZONE,LOCATION_SZONE)
-			e4:SetTarget(c34511120.distg)
-			e4:SetReset(RESET_EVENT+RESETS_STANDARD)
-			e4:SetLabel(c:GetSequence())
-			Duel.RegisterEffect(e4,tp)
-			local e5=Effect.CreateEffect(c)
-			e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-			e5:SetCode(EVENT_CHAIN_SOLVING)
-			e5:SetOperation(c34511120.disop)
-			e5:SetReset(RESET_EVENT+RESETS_STANDARD)
-			e5:SetLabel(c:GetSequence())
-			Duel.RegisterEffect(e5,tp)
-			local e6=Effect.CreateEffect(c)
-			e6:SetType(EFFECT_TYPE_FIELD)
-			e6:SetCode(EFFECT_DISABLE_TRAPMONSTER)
-			e6:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
-			e6:SetTarget(c34511120.distg)
-			e6:SetReset(RESET_EVENT+RESETS_STANDARD)
-			e6:SetLabel(c:GetSequence())
-			Duel.RegisterEffect(e6,tp)
-		end
-	end
-end
-function c34511120.distg(e,c)
-	local seq=e:GetLabel()
-	local tp=e:GetHandlerPlayer()
-	return c:IsType(TYPE_SPELL+TYPE_TRAP) and aux.GetColumn(c,tp)==seq
-end
-function c34511120.disop(e,tp,eg,ep,ev,re,r,rp)
-	local tseq=e:GetLabel()
-	local loc,seq=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION,CHAININFO_TRIGGERING_SEQUENCE)
-	if loc&LOCATION_SZONE~=0 and seq<=4 and re:IsActiveType(TYPE_SPELL+TYPE_TRAP)
-		and ((rp==tp and seq==tseq) or (rp==1-tp and seq==4-tseq)) then
-		Duel.NegateEffect(ev)
-	end
-end
-function c34511120.handcon(e)
-	return Duel.GetFieldGroupCount(e:GetHandlerPlayer(),LOCATION_ONFIELD,0)==0
-end
-function c34511120.splimit(e,c)
-	return not c:IsSetCard(0xac5) and c:IsLocation(LOCATION_HAND)
-end
\ No newline at end of file

expansions/script/c34511130.lua

---纯白的女仆 安洁
-function c34511130.initial_effect(c)
-	aux.EnablePendulumAttribute(c)
-	--to hand
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(34511130,0))
-	e2:SetCategory(CATEGORY_TOHAND)
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetRange(LOCATION_PZONE)
-	e2:SetCountLimit(1,34511130)
-	e2:SetTarget(c34511130.ptg)
-	e2:SetOperation(c34511130.pop)
-	c:RegisterEffect(e2)
-	local e4=Effect.CreateEffect(c)
-	e4:SetDescription(aux.Stringid(34511130,2))
-	e4:SetCategory(CATEGORY_POSITION)
-	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e4:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e4:SetCode(EVENT_DESTROYED)
-	e4:SetHintTiming(TIMING_BATTLE_PHASE,TIMINGS_CHECK_MONSTER+TIMING_BATTLE_PHASE)
-	e4:SetCountLimit(1,34511132)
-	e4:SetCondition(c34511130.spcon1)
-	e4:SetTarget(c34511130.target1)
-	e4:SetOperation(c34511130.activate1)
-	c:RegisterEffect(e4)
-	local e5=Effect.CreateEffect(c)
-	e5:SetType(EFFECT_TYPE_FIELD)
-	e5:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
-	e5:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e5:SetTargetRange(1,0)
-	e5:SetRange(LOCATION_PZONE)
-	e5:SetTarget(c34511130.splimit)
-	c:RegisterEffect(e5)
-end
-function c34511130.pfilter(c)
-	return c:IsFaceup() and c:IsSetCard(0xac5) and c:IsAbleToHand()
-end
-function c34511130.ptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34511130.pfilter,tp,LOCATION_EXTRA,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_EXTRA)
-end
-function c34511130.pop(e,tp,eg,ep,ev,re,r,rp)
-	if not e:GetHandler():IsRelateToEffect(e) then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c34511130.pfilter,tp,LOCATION_EXTRA,0,1,1,nil)
-	if g:GetCount()>0 then
-		Duel.SendtoHand(g,nil,REASON_EFFECT)
-		Duel.ConfirmCards(1-tp,g)
-	end
-end
-function c34511130.spcon1(e,tp,eg,ep,ev,re,r,rp)
-	return bit.band(r,REASON_EFFECT+REASON_BATTLE)~=0
-end
-function c34511130.filter(c)
-	return c:IsFaceup() and c:IsCanTurnSet()
-end
-function c34511130.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_MZONE) and c34511130.filter(chkc) end
-	if chk==0 then return Duel.IsExistingTarget(c34511130.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
-	local g=Duel.SelectTarget(tp,c34511130.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
-	Duel.SetOperationInfo(0,CATEGORY_POSITION,g,1,0,0)
-end
-function c34511130.activate1(e,tp,eg,ep,ev,re,r,rp)
-	local tc=Duel.GetFirstTarget()
-	if tc:IsRelateToEffect(e) and tc:IsLocation(LOCATION_MZONE) and tc:IsFaceup() then
-		Duel.ChangePosition(tc,POS_FACEDOWN_DEFENSE)
-	end
-end
-function c34511130.splimit(e,c)
-	return not c:IsSetCard(0xac5) and c:IsLocation(LOCATION_HAND)
-end
\ No newline at end of file

expansions/script/c34511140.lua

---纯白的少女 爱理
-function c34511140.initial_effect(c)
-	--pendulum summon
-	aux.EnablePendulumAttribute(c)
-	--to hand
-	local e2=Effect.CreateEffect(c)
-	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetRange(LOCATION_PZONE)
-	e2:SetCountLimit(1,34511140)
-	e2:SetCondition(c34511140.thcon)
-	e2:SetTarget(c34511140.thtg)
-	e2:SetOperation(c34511140.thop)
-	c:RegisterEffect(e2)
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(34511140,1))
-	e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
-	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e3:SetProperty(EFFECT_FLAG_DELAY)
-	e3:SetCondition(c34511140.spcon)
-	e3:SetTarget(c34511140.target)
-	e3:SetOperation(c34511140.activate)
-	c:RegisterEffect(e3)
-	local e5=Effect.CreateEffect(c)
-	e5:SetType(EFFECT_TYPE_FIELD)
-	e5:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
-	e5:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e5:SetTargetRange(1,0)
-	e5:SetRange(LOCATION_PZONE)
-	e5:SetTarget(c34511140.splimit)
-	c:RegisterEffect(e5)
-end
-function c34511140.thcon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.IsExistingMatchingCard(nil,tp,LOCATION_PZONE,0,1,e:GetHandler())
-end
-function c34511140.thfilter(c,code)
-	return c:IsCode(code) and c:IsAbleToHand() and c:IsSetCard(0xac5)
-end
-function c34511140.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	local sc=Duel.GetFirstMatchingCard(nil,tp,LOCATION_PZONE,0,e:GetHandler())
-	if chk==0 then return Duel.IsExistingMatchingCard(c34511140.thfilter,tp,LOCATION_DECK,0,1,nil,sc:GetOriginalCode()) end
-	Duel.SetTargetCard(sc)
-	Duel.SetOperationInfo(0,CATEGORY_DESTROY,sc,1,0,0)
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-end
-function c34511140.thop(e,tp,eg,ep,ev,re,r,rp)
-	if not e:GetHandler():IsRelateToEffect(e) then return end
-	local tc=Duel.GetFirstTarget()
-	if tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)~=0 then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-		local g=Duel.SelectMatchingCard(tp,c34511140.thfilter,tp,LOCATION_DECK,0,1,1,nil,tc:GetOriginalCode())
-		if g:GetCount()>0 then
-			Duel.SendtoHand(g,nil,REASON_EFFECT)
-			Duel.ConfirmCards(1-tp,g)
-		end
-	end
-end
-function c34511140.spcon(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	return c:IsSummonType(SUMMON_TYPE_PENDULUM) and c:IsPreviousLocation(LOCATION_HAND+LOCATION_EXTRA)
-end
-function c34511140.filter(c)
-	return c:IsSetCard(0xac5) and c:IsAbleToHand()
-end
-function c34511140.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34511140.filter,tp,LOCATION_DECK,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-end
-function c34511140.activate(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c34511140.filter,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 c34511140.splimit(e,c)
-	return not c:IsSetCard(0xac5) and c:IsLocation(LOCATION_HAND)
-end
\ No newline at end of file

expansions/script/c34511150.lua

---纯白的吉祥物 帕喵
-function c34511150.initial_effect(c)
-	aux.EnablePendulumAttribute(c)
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_FIELD)
-	e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
-	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e2:SetTargetRange(1,0)
-	e2:SetRange(LOCATION_PZONE)
-	e2:SetTarget(c34511150.splimit)
-	c:RegisterEffect(e2)
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(34511150,1))
-	e3:SetCategory(CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON)
-	e3:SetType(EFFECT_TYPE_QUICK_O)
-	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e3:SetCode(EVENT_FREE_CHAIN)
-	e3:SetRange(LOCATION_HAND)
-	e3:SetCountLimit(1,34511150)
-	e3:SetTarget(c34511150.destg)
-	e3:SetOperation(c34511150.desop)
-	c:RegisterEffect(e3)
--------------------------------------
-	local e4=Effect.CreateEffect(c)
-	e4:SetDescription(aux.Stringid(34511150,2))
-	e4:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
-	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
-	e4:SetCode(EVENT_SUMMON_SUCCESS)
-	e4:SetCountLimit(1,34511151)
-	e4:SetTarget(c34511150.target)
-	e4:SetOperation(c34511150.operation)
-	c:RegisterEffect(e4)
-	local e5=e4:Clone()
-	e5:SetCode(EVENT_SPSUMMON_SUCCESS)
-	c:RegisterEffect(e5)
-end
-function c34511150.splimit(e,c)
-	return not c:IsSetCard(0xac5) and c:IsLocation(LOCATION_HAND)
-end
-function c34511150.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsOnField() and chkc:IsFaceup() end
-	if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_ONFIELD,0,1,nil) end
-	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
-	local g=Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_ONFIELD,0,1,1,nil)
-	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)
-	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
-end
-function c34511150.desop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local tc=Duel.GetFirstTarget()
-	if tc:IsRelateToEffect(e) then
-		Duel.Destroy(tc,REASON_EFFECT)
-	end
-	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_REMOVED)
-		c:RegisterEffect(e1,true)
-	end
-end
---------------------------------
-function c34511150.tgfilter(c)
-	return c:IsSetCard(0xac5) and c:IsAbleToHand()
-end
-function c34511150.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34511150.tgfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-end
-function c34511150.operation(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) then
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-		local g=Duel.SelectMatchingCard(tp,c34511150.tgfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
-		Duel.SendtoHand(g,nil,REASON_EFFECT)
-		Duel.ConfirmCards(1-tp,g)
-	end
-end
\ No newline at end of file

expansions/script/c34511160.lua

---纯白之恋 纱凪
-function c34511160.initial_effect(c)
-	c:EnableReviveLimit()
-	aux.AddXyzProcedure(c,c34511160.matfilter,4,2) 
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(34511130,0))
-	e2:SetCategory(CATEGORY_TOHAND)
-	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetRange(LOCATION_MZONE)
-	e2:SetCode(EVENT_FREE_CHAIN)
-	e2:SetCost(c34511160.atkcost)
-	e2:SetCountLimit(1,34511160)
-	e2:SetTarget(c34511160.ptg)
-	e2:SetOperation(c34511160.pop)
-	c:RegisterEffect(e2)
-------------------------------   
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(34511160,3))
-	e3:SetCategory(CATEGORY_TOHAND)
-	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e3:SetCode(EVENT_DESTROYED)
-	e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
-	e3:SetRange(LOCATION_MZONE)
-	e3:SetCountLimit(1,34511170)
-	e3:SetCondition(c34511160.spcon)
-	e3:SetTarget(c34511160.ptg1)
-	e3:SetOperation(c34511160.pop1)
-	c:RegisterEffect(e3)
-end
-function c34511160.matfilter(c)
-	return c:IsXyzType(TYPE_PENDULUM)
-end
-function c34511160.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
-	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
-end
-function c34511160.pfilter(c)
-	return c:IsFaceup() and c:IsAbleToHand()
-end
-function c34511160.ptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34511160.pfilter,tp,LOCATION_EXTRA,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_EXTRA)
-	local g2=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,0,nil)
-	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g2,1,0,0)
-end
-function c34511160.pop(e,tp,eg,ep,ev,re,r,rp)
-	if not e:GetHandler():IsRelateToEffect(e) then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c34511160.pfilter,tp,LOCATION_EXTRA,0,1,1,nil)
-	if g:GetCount()>0 then
-		Duel.SendtoHand(g,nil,REASON_EFFECT)
-		Duel.ConfirmCards(1-tp,g)
-	end
-	if Duel.SelectYesNo(tp,aux.Stringid(34511160,2)) then
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
-	local g2=Duel.SelectMatchingCard(tp,aux.TRUE,tp,LOCATION_ONFIELD,0,1,1,nil)
-	if g2:GetCount()>0 then
-		Duel.BreakEffect()
-		Duel.HintSelection(g2)
-		Duel.Destroy(g2,REASON_EFFECT)
-		end
-	end
-end
-function c34511160.spcfilter(c,tp)
-	return c:IsReason(REASON_BATTLE+REASON_EFFECT)
-		and c:GetPreviousControler()==tp and c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsType(TYPE_PENDULUM)
-end
-function c34511160.spcon(e,tp,eg,ep,ev,re,r,rp)
-	return eg:IsExists(c34511160.spcfilter,1,nil,tp)
-end
------------------------
-function c34511160.thfilter(c)
-	return c:IsSetCard(0xac5) and c:IsType(TYPE_SPELL or TYPE_TRAP) and c:IsAbleToHand()
-end
-function c34511160.ptg1(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34511160.thfilter,tp,LOCATION_DECK,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-end
-function c34511160.pop1(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c34511160.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
-end
\ No newline at end of file

expansions/script/c34511170.lua

---乾 纱凪
-function c34511170.initial_effect(c)
-	aux.EnablePendulumAttribute(c)
-	--fusion (p)
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_DESTROY)
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetRange(LOCATION_PZONE)
-	e1:SetCountLimit(1,34511170)
-	e1:SetTarget(c34511170.pentg)
-	e1:SetOperation(c34511170.penop)
-	c:RegisterEffect(e1)
-	--special summon
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(34511170,3))
-	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e2:SetCode(EVENT_DESTROYED)
-	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
-	e2:SetRange(LOCATION_HAND)
-	e2:SetCountLimit(1,34511171)
-	e2:SetCondition(c34511170.spcon)
-	e2:SetTarget(c34511170.sptg)
-	e2:SetOperation(c34511170.spop)
-	c:RegisterEffect(e2)
-	local e3=Effect.CreateEffect(c)
-	e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON)
-	e3:SetType(EFFECT_TYPE_IGNITION)
-	e3:SetRange(LOCATION_MZONE)
-	e3:SetTarget(c34511170.mftg)
-	e3:SetOperation(c34511170.mfop)
-	c:RegisterEffect(e3)
-end
-function c34511170.penfilter(c)
-	return c:IsSetCard(0xac5) and c:IsType(TYPE_PENDULUM) and not c:IsCode(34511170) and not c:IsForbidden()
-end
-function c34511170.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsDestructable()
-		and Duel.IsExistingMatchingCard(c34511170.penfilter,tp,LOCATION_DECK,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_DESTROY,e:GetHandler(),1,0,0)
-end
-function c34511170.penop(e,tp,eg,ep,ev,re,r,rp)
-	if not e:GetHandler():IsRelateToEffect(e) then return end
-	if Duel.Destroy(e:GetHandler(),REASON_EFFECT)~=0 then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
-		local g=Duel.SelectMatchingCard(tp,c34511170.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
-end
-function c34511170.spcfilter(c,tp)
-	return c:IsReason(REASON_BATTLE+REASON_EFFECT)
-		and c:GetPreviousControler()==tp and c:IsPreviousLocation(LOCATION_ONFIELD)
-end
-function c34511170.spcon(e,tp,eg,ep,ev,re,r,rp)
-	return eg:IsExists(c34511170.spcfilter,1,nil,tp)
-end
-function c34511170.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	local c=e:GetHandler()
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
-end
-function c34511170.spop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if not c:IsRelateToEffect(e) then return end
-	if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)==0 then
-		return
-	end
-	local ec=eg:GetFirst()
-	while ec do
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and (not ec:GetOriginalType(TYPE_PENDULUM)) and (not ec:GetOriginalType(TYPE_LINK)) and (not ec:GetOriginalType(TYPE_TOKEN)) and ec:IsPreviousPosition(POS_FACEDOWN) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511170,1)) then 
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEDOWN_DEFENSE)
-	end
--------------------------------
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and (not ec:GetOriginalType(TYPE_PENDULUM)) and (not ec:GetOriginalType(TYPE_TOKEN)) and ec:IsPreviousPosition(POS_FACEUP_ATTACK) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511170,1))  then
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEUP_ATTACK)
-	end
--------------------------------
-	if ec:IsPreviousLocation(LOCATION_SZONE) and (not ec:IsForbidden()) and ec:IsPreviousPosition(POS_FACEDOWN) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511170,4)) then
-		Duel.MoveToField(ec,tp,tp,LOCATION_SZONE,POS_FACEDOWN,true)
-	end
-------------------------------
-	if ec:IsPreviousLocation(LOCATION_SZONE) and ec:IsPreviousPosition(POS_FACEUP) and (not ec:IsForbidden()) and (not ec:GetOriginalType(TYPE_PENDULUM)) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511170,4)) then
-		Duel.MoveToField(ec,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
-	end
-------------------------------
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and (not ec:GetOriginalType(TYPE_PENDULUM)) and (not ec:GetOriginalType(TYPE_TOKEN)) and ec:IsPreviousPosition(POS_FACEUP_DEFENSE) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511170,1)) then 
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEUP_DEFENSE)
-	end
-------------------------
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and (not ec:IsLocation(LOCATION_EXTRA)) and ec:GetOriginalType(TYPE_PENDULUM) and ec:IsPreviousPosition(POS_FACEDOWN) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511170,1)) then
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEDOWN_DEFENSE)
-	end
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and (not ec:IsLocation(LOCATION_EXTRA)) and ec:GetOriginalType(TYPE_PENDULUM) and ec:IsPreviousPosition(POS_FACEUP_ATTACK) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511170,1))  then
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEUP_ATTACK)
-	end
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and (not ec:IsLocation(LOCATION_EXTRA)) and ec:GetOriginalType(TYPE_PENDULUM) and ec:IsPreviousPosition(POS_FACEUP_DEFENSE) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511170,1)) then 
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEUP_DEFENSE)
-	end
-----------------------------
-	if ec:IsPreviousLocation(LOCATION_SZONE) and ec:IsPreviousPosition(POS_FACEUP) and (not ec:IsForbidden()) and ec:GetOriginalType(TYPE_PENDULUM) and (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1)) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511170,4)) then
-		Duel.MoveToField(ec,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
-	end
-------------------------
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and ec:IsLocation(LOCATION_EXTRA) and ec:GetOriginalType(TYPE_PENDULUM) and ec:IsPreviousPosition(POS_FACEDOWN) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511170,1)) then
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEDOWN_DEFENSE)
-	end
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and ec:IsLocation(LOCATION_EXTRA) and ec:GetOriginalType(TYPE_PENDULUM) and ec:IsPreviousPosition(POS_FACEUP_ATTACK) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511170,1))  then
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEUP_ATTACK)
-	end
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and ec:IsLocation(LOCATION_EXTRA) and ec:GetOriginalType(TYPE_PENDULUM) and ec:IsPreviousPosition(POS_FACEUP_DEFENSE) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511170,1)) then 
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEUP_DEFENSE)
-	end
-----------------------------
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and (not ec:IsLocation(LOCATION_EXTRA)) and ec:GetOriginalType(TYPE_LINK) and ec:IsPreviousPosition(POS_FACEUP_ATTACK) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511170,1))  then
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEUP_ATTACK)
-	end
-----------------------------
-  if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and ec:IsLocation(LOCATION_EXTRA) and ec:GetOriginalType(TYPE_LINK) and ec:IsPreviousPosition(POS_FACEUP_ATTACK) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511170,1)) then
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEUP_ATTACK)
-	end
------------------------------
-		ec=eg:GetNext()
-  end
-end
-function c34511170.mffilter0(c,e)
-	return c:IsCanBeFusionMaterial() and not c:IsImmuneToEffect(e)
-end
-function c34511170.mffilter1(c,e)
-	return c:IsOnField() and not c:IsImmuneToEffect(e)
-end
-function c34511170.mffilter2(c,e,tp,m,f,gc,chkf)
-	return c:IsType(TYPE_FUSION) and (not f or f(c))
-		and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,gc,chkf)
-end
-function c34511170.mftg(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):Filter(Card.IsOnField,nil)
-		mg1:Merge(Duel.GetMatchingGroup(c34511170.mffilter0,tp,LOCATION_PZONE,0,nil,e))
-		local res=Duel.IsExistingMatchingCard(c34511170.mffilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,c,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(c34511170.mffilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,c,chkf)
-			end
-		end
-		return res
-	end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
-end
-function c34511170.mfop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local chkf=tp
-	if c:IsFacedown() or not c:IsRelateToEffect(e) or c:IsImmuneToEffect(e) then return end
-	local mg1=Duel.GetFusionMaterial(tp):Filter(c34511170.mffilter1,nil,e)
-	mg1:Merge(Duel.GetMatchingGroup(c34511170.mffilter0,tp,LOCATION_PZONE,0,nil,e))
-	local sg1=Duel.GetMatchingGroup(c34511170.mffilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,c,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(c34511170.mffilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,c,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,c,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 mat5=Duel.SelectFusionMaterial(tp,tc,mg5,c,chkf)
-			local fop=ce:GetOperation()
-			fop(ce,e,tp,tc,mat5)
-		end
-		tc:CompleteProcedure()
-	end
-end
\ No newline at end of file

expansions/script/c34511180.lua

---恋花绽放樱飞时
-function c34511180.initial_effect(c)
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e1:SetRange(LOCATION_HAND)
-	e1:SetCode(EVENT_DESTROYED)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
-	e1:SetCost(c34511180.shcost)
-	e1:SetCondition(c34511180.spcon)
-	e1:SetOperation(c34511180.spop)
-	c:RegisterEffect(e1)
-end
-function c34511180.dfilter(c)
-	return c:IsDiscardable() and c:IsAbleToGraveAsCost()
-end
-function c34511180.shcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsDiscardable() and e:GetHandler():IsAbleToGraveAsCost()
-		and Duel.IsExistingMatchingCard(c34511180.dfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISCARD)
-	local g=Duel.SelectMatchingCard(tp,c34511180.dfilter,tp,LOCATION_HAND,0,1,1,e:GetHandler())
-	g:AddCard(e:GetHandler())
-	Duel.SendtoGrave(g,REASON_COST+REASON_DISCARD)
-end
-function c34511180.spcfilter(c,tp)
-	return c:IsReason(REASON_BATTLE+REASON_EFFECT)
-		and c:GetPreviousControler()==tp and c:IsPreviousLocation(LOCATION_ONFIELD)
-end
-function c34511180.spcon(e,tp,eg,ep,ev,re,r,rp)
-	return eg:IsExists(c34511180.spcfilter,1,nil,tp)
-end
-function c34511180.spop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e1:SetCode(EFFECT_CHANGE_DAMAGE)
-	e1:SetTargetRange(0,1)
-	e1:SetValue(0)
-	e1:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e1,tp)
-	local e2=e1:Clone()
-	e2:SetCode(EFFECT_NO_EFFECT_DAMAGE)
-	e2:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e2,tp)
-	local ec=eg:GetFirst()
-	while ec do
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and (not ec:GetOriginalType(TYPE_PENDULUM)) and (not ec:GetOriginalType(TYPE_LINK)) and (not ec:GetOriginalType(TYPE_TOKEN)) and ec:IsPreviousPosition(POS_FACEDOWN) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511180,1)) then 
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEDOWN_DEFENSE)
-	end
--------------------------------
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and (not ec:GetOriginalType(TYPE_PENDULUM)) and (not ec:GetOriginalType(TYPE_TOKEN)) and ec:IsPreviousPosition(POS_FACEUP_ATTACK) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511180,1))  then
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEUP_ATTACK)
-	end
--------------------------------
-	if ec:IsPreviousLocation(LOCATION_SZONE) and (not ec:IsForbidden()) and ec:IsPreviousPosition(POS_FACEDOWN) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511180,4)) then
-		Duel.MoveToField(ec,tp,tp,LOCATION_SZONE,POS_FACEDOWN,true)
-	end
-------------------------------
-	if ec:IsPreviousLocation(LOCATION_SZONE) and ec:IsPreviousPosition(POS_FACEUP) and (not ec:IsForbidden()) and (not ec:GetOriginalType(TYPE_PENDULUM)) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511180,4)) then
-		Duel.MoveToField(ec,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
-	end
-------------------------------
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and (not ec:GetOriginalType(TYPE_PENDULUM)) and (not ec:GetOriginalType(TYPE_TOKEN)) and ec:IsPreviousPosition(POS_FACEUP_DEFENSE) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511180,1)) then 
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEUP_DEFENSE)
-	end
-------------------------
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and (not ec:IsLocation(LOCATION_EXTRA)) and ec:GetOriginalType(TYPE_PENDULUM) and ec:IsPreviousPosition(POS_FACEDOWN) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511180,1)) then
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEDOWN_DEFENSE)
-	end
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and (not ec:IsLocation(LOCATION_EXTRA)) and ec:GetOriginalType(TYPE_PENDULUM) and ec:IsPreviousPosition(POS_FACEUP_ATTACK) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511180,1))  then
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEUP_ATTACK)
-	end
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and (not ec:IsLocation(LOCATION_EXTRA)) and ec:GetOriginalType(TYPE_PENDULUM) and ec:IsPreviousPosition(POS_FACEUP_DEFENSE) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511180,1)) then 
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEUP_DEFENSE)
-	end
-----------------------------
-	if ec:IsPreviousLocation(LOCATION_SZONE) and ec:IsPreviousPosition(POS_FACEUP) and (not ec:IsForbidden()) and ec:GetOriginalType(TYPE_PENDULUM) and (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1)) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511180,4)) then
-		Duel.MoveToField(ec,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
-	end
-------------------------
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and ec:IsLocation(LOCATION_EXTRA) and ec:GetOriginalType(TYPE_PENDULUM) and ec:IsPreviousPosition(POS_FACEDOWN) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511180,1)) then
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEDOWN_DEFENSE)
-	end
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and ec:IsLocation(LOCATION_EXTRA) and ec:GetOriginalType(TYPE_PENDULUM) and ec:IsPreviousPosition(POS_FACEUP_ATTACK) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511180,1))  then
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEUP_ATTACK)
-	end
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and ec:IsLocation(LOCATION_EXTRA) and ec:GetOriginalType(TYPE_PENDULUM) and ec:IsPreviousPosition(POS_FACEUP_DEFENSE) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511180,1)) then 
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEUP_DEFENSE)
-	end
-----------------------------
-	if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and (not ec:IsLocation(LOCATION_EXTRA)) and ec:GetOriginalType(TYPE_LINK) and ec:IsPreviousPosition(POS_FACEUP_ATTACK) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511180,1))  then
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEUP_ATTACK)
-	end
-----------------------------
-  if ec:IsPreviousLocation(LOCATION_MZONE) and (not Duel.IsPlayerAffectedByEffect(tp,59822133)) and ec:IsLocation(LOCATION_EXTRA) and ec:GetOriginalType(TYPE_LINK) and ec:IsPreviousPosition(POS_FACEUP_ATTACK) and ec:IsCanBeSpecialSummoned(e,0,tp,true,false) and ec:GetPreviousControler()==tp and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and Duel.SelectYesNo(tp,aux.Stringid(34511180,1)) then
-		Duel.SpecialSummon(ec,0,tp,tp,true,false,POS_FACEUP_ATTACK)
-	end
------------------------------
-		ec=eg:GetNext()
-  end
-end
\ No newline at end of file

expansions/script/c34511190.lua

---じんぽう あん
-function c34511190.initial_effect(c)
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_QUICK_O)
-	e1:SetRange(LOCATION_HAND)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CARD_TARGET)
-	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
-	e1:SetCost(c34511190.shcost)
-	e1:SetTarget(c34511190.target)
-	e1:SetOperation(c34511190.activate)
-	c:RegisterEffect(e1)
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(57288708,2))
-	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetRange(LOCATION_GRAVE)
-	e2:SetCountLimit(1,34511190)
-	e2:SetCondition(c34511190.spcon)
-	e2:SetCost(aux.bfgcost)
-	e2:SetTarget(c34511190.sptg)
-	e2:SetOperation(c34511190.spop)
-	c:RegisterEffect(e2)
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_SINGLE)
-	e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e3:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
-	e3:SetValue(1)
-	c:RegisterEffect(e3)
-end
-function c34511190.cfilter(c)
-	return c:IsFacedown() or (not c:IsType(TYPE_TUNER+TYPE_SPELL+TYPE_TRAP))
-end
-function c34511190.spcon(e,tp,eg,ep,ev,re,r,rp)
-	return not Duel.IsExistingMatchingCard(c34511190.cfilter,tp,LOCATION_GRAVE,0,1,nil)
-end
-function c34511190.dfilter(c)
-	return c:IsDiscardable() and c:IsAbleToGraveAsCost()
-end
-function c34511190.shcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsDiscardable() and e:GetHandler():IsAbleToGraveAsCost()
-		and Duel.IsExistingMatchingCard(c34511190.dfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISCARD)
-	local g=Duel.SelectMatchingCard(tp,c34511190.dfilter,tp,LOCATION_HAND,0,1,1,e:GetHandler())
-	g:AddCard(e:GetHandler())
-	Duel.SendtoGrave(g,REASON_COST+REASON_DISCARD)
-end
-function c34511190.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsAbleToHand() end
-	if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToHand,tp,0,LOCATION_MZONE,1,nil) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
-	local g=Duel.SelectTarget(tp,Card.IsAbleToHand,tp,0,LOCATION_MZONE,1,1,nil)
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
-end
-function c34511190.activate(e,tp,eg,ep,ev,re,r,rp)
-	local tc=Duel.GetFirstTarget()
-	if tc and tc:IsRelateToEffect(e) then
-		Duel.SendtoHand(tc,nil,REASON_EFFECT)
-	end
-end
-function c34511190.spfilter(c,e,tp)
-	return c:IsType(TYPE_TUNER) and c:IsAttack(0) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
-end
-function c34511190.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(c34511190.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
-end
-function c34511190.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,c34511190.spfilter,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
-	local tc=g:GetFirst()
-	local e1=Effect.CreateEffect(tc)
-	e1:SetType(EFFECT_TYPE_SINGLE)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e1:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
-	e1:SetValue(1)
-	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-	tc:RegisterEffect(e1)
-	Duel.BreakEffect()
-	local g2=Duel.GetFieldGroup(tp,LOCATION_GRAVE,0)
-	if g2:GetSum(Card.GetTextAttack)==0 and Duel.IsPlayerCanDraw(tp,1) and Duel.SelectYesNo(tp,aux.Stringid(34511190,1)) then
-	Duel.Draw(tp,1,REASON_EFFECT)
-	end
-end
\ No newline at end of file

expansions/script/c34511200.lua

---纯白的巫女 结月
-function c34511200.initial_effect(c)
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_QUICK_O)
-	e1:SetRange(LOCATION_HAND)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CARD_TARGET)
-	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
-	e1:SetCost(c34511200.shcost)
-	e1:SetOperation(c34511200.activate)
-	c:RegisterEffect(e1)
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(34511200,1))
-	e2:SetCategory(CATEGORY_TOGRAVE)
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetRange(LOCATION_GRAVE)
-	e2:SetCountLimit(1,34511200)
-	e2:SetCondition(c34511200.spcon)
-	e2:SetCost(aux.bfgcost)
-	e2:SetTarget(c34511200.sptg)
-	e2:SetOperation(c34511200.spop)
-	c:RegisterEffect(e2)
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_SINGLE)
-	e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e3:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
-	e3:SetValue(1)
-	c:RegisterEffect(e3)
-end
-function c34511200.cfilter(c)
-	return c:IsFacedown() or (not c:IsType(TYPE_TUNER+TYPE_SPELL+TYPE_TRAP))
-end
-function c34511200.spcon(e,tp,eg,ep,ev,re,r,rp)
-	return not Duel.IsExistingMatchingCard(c34511200.cfilter,tp,LOCATION_GRAVE,0,1,nil)
-end
-function c34511200.shcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsDiscardable() and e:GetHandler():IsAbleToGraveAsCost()
-		and Duel.IsExistingMatchingCard(c34511190.dfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISCARD)
-	local g=Duel.SelectMatchingCard(tp,c34511190.dfilter,tp,LOCATION_HAND,0,1,1,e:GetHandler())
-	g:AddCard(e:GetHandler())
-	Duel.SendtoGrave(g,REASON_COST+REASON_DISCARD)
-end
-function c34511200.activate(e,tp,eg,ep,ev,re,r,rp)
-	local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetCode(EFFECT_REFLECT_BATTLE_DAMAGE)
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e1:SetTargetRange(1,0)
-	e1:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e1,tp)
-end
---------------
-function c34511200.tgfilter(c)
-	return c:IsType(TYPE_TUNER) and c:IsAbleToGrave()
-end
-function c34511200.tgfilter1(c)
-	return c:IsType(TYPE_TUNER) and c:IsAbleToHand()
-end
-function c34511200.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34511200.tgfilter,tp,LOCATION_DECK,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
-end
-function c34511200.spop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
-	local g=Duel.SelectMatchingCard(tp,c34511200.tgfilter,tp,LOCATION_DECK,0,1,1,nil)
-	if g:GetCount()>0 then
-		Duel.SendtoGrave(g,REASON_EFFECT)
-	end
-	Duel.BreakEffect()
-	local g2=Duel.GetFieldGroup(tp,LOCATION_GRAVE,0)
-	if g2:GetSum(Card.GetTextAttack)==0 and Duel.IsExistingMatchingCard(c34511200.tgfilter1,tp,LOCATION_REMOVED,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(34511200,1)) then
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g3=Duel.SelectMatchingCard(tp,c34511200.tgfilter,tp,LOCATION_REMOVED,0,1,1,nil)
-	Duel.SendtoHand(g3,nil,REASON_EFFECT)
-	Duel.ConfirmCards(1-tp,g3)
-	end
-end
\ No newline at end of file

expansions/script/c34520001.lua

---Coffee-茶会
-function c34520001.initial_effect(c)
-	aux.EnablePendulumAttribute(c)
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(34520001,0))
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetRange(LOCATION_HAND)
-	e1:SetCountLimit(1,34520001)
-	e1:SetCost(c34520001.cost)
-	e1:SetTarget(c34520001.sptg)
-	e1:SetOperation(c34520001.spop)
-	c:RegisterEffect(e1)
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e2:SetCode(EVENT_CHAINING)
-	e2:SetRange(LOCATION_PZONE)
-	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-	e2:SetOperation(c34520001.regop)
-	c:RegisterEffect(e2)
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e3:SetCode(EVENT_CHAIN_SOLVED)
-	e3:SetRange(LOCATION_PZONE)
-	e3:SetCondition(c34520001.damcon)
-	e3:SetOperation(c34520001.damop)
-	c:RegisterEffect(e3)
-end
-function c34520001.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.CheckLPCost(tp,800) end
-	Duel.PayLPCost(tp,800)
-end
-function c34520001.regop(e,tp,eg,ep,ev,re,r,rp)
-	if (not re:IsHasType(EFFECT_TYPE_ACTIVATE)) then return end
-	e:GetHandler():RegisterFlagEffect(34520001,RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET+RESET_CHAIN,0,1)
-end
-function c34520001.damcon(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	return c:GetFlagEffect(34520001)~=0 and re:IsHasType(EFFECT_TYPE_ACTIVATE)
-end
-function c34520001.damop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_CARD,0,34520001)
-	Duel.Recover(tp,200,REASON_EFFECT)
-end
-function c34520001.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	local c=e:GetHandler()
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
-end
-function c34520001.spop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if not c:IsRelateToEffect(e) then return end
-	Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
-end
\ No newline at end of file

expansions/script/c34520002.lua

---Meyer-茶会
-function c34520002.initial_effect(c)
-	aux.EnablePendulumAttribute(c)
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(34520002,0))
-	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetCountLimit(1,34520002)
-	e1:SetCost(c34520002.cost)
-	e1:SetTarget(c34520002.target)
-	e1:SetOperation(c34520002.activate)
-	c:RegisterEffect(e1)
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e2:SetCode(EVENT_CHAINING)
-	e2:SetRange(LOCATION_PZONE)
-	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-	e2:SetOperation(c34520002.regop)
-	c:RegisterEffect(e2)
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e3:SetCode(EVENT_CHAIN_SOLVED)
-	e3:SetRange(LOCATION_PZONE)
-	e3:SetCondition(c34520002.damcon)
-	e3:SetOperation(c34520002.damop)
-	c:RegisterEffect(e3) 
-end
-function c34520002.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.CheckLPCost(tp,800) end
-	Duel.PayLPCost(tp,800)
-end
-function c34520002.regop(e,tp,eg,ep,ev,re,r,rp)
-	if (not re:IsActiveType(TYPE_MONSTER)) then return end
-	e:GetHandler():RegisterFlagEffect(34520002,RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET+RESET_CHAIN,0,1)
-end
-function c34520002.damcon(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	return c:GetFlagEffect(34520002)~=0 and re:IsActiveType(TYPE_MONSTER)
-end
-function c34520002.damop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_CARD,0,34520002)
-	Duel.Recover(tp,200,REASON_EFFECT)
-end
-function c34520002.filter(c)
-	return c:IsLevelBelow(4) and c:IsRace(RACE_PLANT) and c:IsAbleToHand()
-end
-function c34520002.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c34520002.filter,tp,LOCATION_DECK,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-end
-function c34520002.activate(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c34520002.filter,tp,LOCATION_DECK,0,1,1,nil)
-	if g:GetCount()>0 then
-		Duel.SendtoHand(g,nil,REASON_EFFECT)
-		Duel.ConfirmCards(1-tp,g)
-	end
-	Duel.BreakEffect()
-	local g=Duel.GetFieldGroup(tp,LOCATION_HAND,0)
-	if g:GetCount()>0 then Duel.ShuffleHand(tp)
-	Duel.DiscardHand(tp,aux.TRUE,1,1,REASON_EFFECT+REASON_DISCARD) end
-end
\ No newline at end of file

expansions/strings.conf

@@ -7,6 +7,9 @@
 #某失智の刀客塔 3529764274 1 0xca0-0xcaf
 !setname 0xca7 爱国者
 !setname 0xca8 霜星
+!setname 0xcad 鲨鱼
+!setname 0x1cad 鲨鱼娘
+!counter 0xcad 鲨鱼指示物
 
 #芙兰 657556329 7
 #is_named_with_cyberaqua 电子水蓝
@@ -66,6 +69,7 @@
 #septluna 495073131 42 0xa20-0xa2f
 !setname 0xa20 灵魂决斗同盟
 !setname 0xa22 决斗同盟
+!setname 0xa23 幽狐
 !setname 0xa25 工作室
 !setname 0xa26 手冲魔女
 !setname 0xa2a 元素塔罗使
@@ -96,6 +100,17 @@
 !setname 0x5a3 UW
 !counter 0x5aa 妖精指示物
 
+#洛基卡奥斯 670489248 107 0x7c0-0x7cf
+!setname 0x7c0 精生幻虫
+!setname 0x7c1 姬绊连结
+!setname 0x17c1 夏日连结
+!setname 0x27c1 美食连结
+!setname 0x37c1 破晓连结
+!setname 0x47c1 墨丘利连结
+!setname 0x7c2 奇术师
+!setname 0x17c2 奇术师狂欢节
+#AddCodeList(10700270) 奇术师 狂欢节K卡名记述
+
 #嘿子 2686488312 109 0x230-0x23f
 !setname 0x233 纸上
 !setname 0x1233 纸上魔法使
@@ -189,12 +204,17 @@
 !setname 0x4fbd 牙月
 !setname 0x8fbd 失落王国
 !setname 0x3fbe 原数黑姬
+!setname 0x9fac 处刑人偶
+!setname 0xafac 鹭草
+!setname 0x5fbe 蜂兵
+!setname 0x6fbe 百鬼目木更
 #setcode="BlueAngel" 空乃泊
 #setcode="yatori" yatori
 #named_with_Mei 涅依
 #named_with_Unleashed 感情爆发
 !counter 0x1fb0 恋猫指示物
 !counter 0x1fb1 深绿指示物
+!counter 0x1fba 蜂后指示物
 
 #优雨 121&1210 0x920-0x92f
 !setname 0x921 绯樱
@@ -241,8 +261,11 @@
 !setname 0x480b 星际战舰
 !counter 0x48f 能量指示物
 
-#林茂爽 2802160475 150
+#廷达的信徒&林茂爽 401940250&2802160475 150 0xf30-0xf3f
 #AddCodeList(15002000) 神名浅海卡名记述
+!setname 0xf33 色带
+!setname 0x1f33 色带神
+!counter 0x1f33 理智
 
 #嫦娥 1242097645 154 0xb60-0xb6f
 !setname 0xb60 十六夜咲夜
@@ -289,6 +312,7 @@
 !setname 0x37f5 失落公主
 !setname 0x97f5 公主形态
 !setname 0x7f6 苍空
+!setname 0x27f2 雷维翁
 
 #圣灵兽骑 - 180
 #setname="advency" 冒险遗产
@@ -361,6 +385,7 @@
 #沃亚森斯奥克斯 2201771890 300 0x930-0x93f
 
 #饼干猫 2428706561 305 0x300-0x30f
+!setname 0x303 异械教国
 !setname 0x305 空中都市
 !setname 0x307 破灭幻械
 
@@ -428,6 +453,7 @@
 !setname 0xa85 萨塔妮亚
 !setname 0xa86 菈菲尔
 !setname 0xa89 次元恋色
+!setname 0x5a80 自然色彩
 #cm.setname="Gmemories" 灰色记忆
 !counter 0x1a80 灵气指示物
 
@@ -459,10 +485,6 @@
 !counter 0x442 太阳之道指示物
 !counter 0x144b 虚空指示物
 
-#Mio 1248959763 345 0xac0-0xacf
-!setname 0xac4 星空
-!setname 0xac5 纯白交响曲
-
 #Nanahira 78877 375 0x770-0x77f(-0x777) global:senya
 !setname 0x771 「梦现·柚木梨沙」检测用
 #Senya_name_with_elem 元灵	エレメント
@@ -485,11 +507,17 @@
 !setname 0xf16 降临
 !setname 0xf17 刻兽
 !setname 0xf18 究极异兽
+!setname 0xf1c 时机
+!setname 0x1f1c 时机龙骑
+!setname 0x2f1c 时机降神
 !setname 0xaf1d 阿尔弗雷德
 !setname 0xbf1d 狂风
 !setname 0xdf1d 一人千面
 !setname 0x1f1e 首领赎救
-#setname 0x4f1e 
+!setname 0x4f1e 神圣赎救
+!counter 0xf1c 时机指示物
+
+#雪鸮 3234454893 440 0x440-0x44f
 
 #极の一击 煌武院悠阳 - 462 0xfc0-0xfcf
 !setname 0xfc1 人魂
@@ -532,6 +560,11 @@
 !setname 0xcb5 伏龙
 !setname 0xcb6 天星
 
+#桑山千雪 2207455797 525 0xbe0-0xbef
+!setname 0x3be0 机龙使
+!setname 0x5be0 神装机龙
+!setname 0x6be0 特殊武装
+
 #AD钙 540551322 537 0x530-0x53f
 !setname 0x530 惧轮
 !setname 0x533 圆盘生物
@@ -664,6 +697,8 @@
 
 ##飄上月球の不死煙 2338626051 724 0x720-0x72f
 !setname 0x724 马纳历亚
+!setname 0x720 大庭院
+!setname 0x723 钢铁叛乱
 
 #樱彩 2543857838 732 global:nep
 #named_with_nep 海王星
@@ -739,6 +774,7 @@
 !setname 0x29c 邪界幻灵
 !setname 0x29d 植占
 !setname 0x129d 植占师
+!setname 0x3299 孑影
 
 #Yuki 2574476144 870 0xaf0-0xaff