update 250224 wd

expansions/lflist.conf

@@ -6266,6 +6266,33 @@
 60000024 0
 65010047 0
 65010512 0
+114671068 0
+118601317 0
+119974580 0
+122638495 0
+133878367 0
+134079868 0
+211000014 0
+75646401 0
+75646402 0
+75646403 0
+75646404 0
+75646405 0
+75646406 0
+75646407 0
+75646408 0
+75646409 0
+75646410 0
+75646412 0
+75646413 0
+75646414 0
+75646415 0
+75646416 0
+75646417 0
+75646418 0
+75646419 0
+75646421 0
+75646423 0
 #limit
 33403513 1
 82204250 0

expansions/script/c114671068.lua

+--黑羽-幽玄之库里斯塔尔
+local s,id,o=GetID()
+function s.initial_effect(c)
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCountLimit(1,id)
+	e1:SetCost(s.spcost)
+	e1:SetTarget(s.sptg)
+	e1:SetOperation(s.spop)
+	c:RegisterEffect(e1)
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(id,0))
+	e3:SetCategory(CATEGORY_COUNTER)
+	e3:SetType(EFFECT_TYPE_QUICK_O)
+	e3:SetCode(EVENT_FREE_CHAIN)
+	e3:SetRange(LOCATION_GRAVE)
+	e3:SetCountLimit(1,id+o)
+	e3:SetCost(aux.bfgcost)
+	e3:SetTarget(s.cttg1)
+	e3:SetOperation(s.ctop1)
+	c:RegisterEffect(e3)
+	local e4=e3:Clone()
+	e4:SetDescription(aux.Stringid(id,1))
+	e4:SetTarget(s.cttg2)
+	e4:SetOperation(s.ctop2)
+	c:RegisterEffect(e4)
+end
+function s.tgfilter(c)
+	return c:IsSetCard(0x33) and c:IsType(TYPE_MONSTER) and c:IsAbleToGraveAsCost()
+end
+function s.cfilter(c,e,tp)
+	return c:IsSetCard(0x33) and c:IsType(TYPE_SYNCHRO) and c:IsFacedown() and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and Duel.GetMatchingGroup(s.tgfilter,tp,LOCATION_DECK,0,nil):CheckWithSumEqual(Card.GetLevel,c:GetLevel(),1,99)
+end
+function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsDiscardable() and Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
+	local g=Duel.SelectMatchingCard(tp,s.cfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
+	local sc=g:GetFirst()
+	Duel.ConfirmCards(1-tp,sc)
+	local tg=Duel.GetMatchingGroup(s.tgfilter,tp,LOCATION_DECK,0,nil)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local stg=tg:SelectWithSumEqual(tp,Card.GetLevel,sc:GetLevel(),1,99)
+	Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_DISCARD)
+	Duel.SendtoGrave(stg,REASON_COST)
+	Duel.SetTargetCard(sc)
+end
+function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,Duel.GetFirstTarget(),1,0,0)
+end
+function s.spop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and Duel.GetLocationCountFromEx(tp,tp,nil,tc)>0 then
+		Duel.SpecialSummon(tc,SUMMON_TYPE_SYNCHRO,tp,tp,false,false,POS_FACEUP)
+	end
+end
+function s.ctfilter(c)
+	return c:GetCounter(0x1002)>0 and c:IsControlerCanBeChanged()
+end
+function s.cttg1(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(s.ctfilter,tp,0,LOCATION_MZONE,1,nil) end
+	local g=Duel.GetMatchingGroup(s.ctfilter,tp,0,LOCATION_MZONE,nil)
+	Duel.SetOperationInfo(0,CATEGORY_CONTROL,g,1,0,0)
+end
+function s.ctop1(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
+	local g=Duel.SelectMatchingCard(tp,s.ctfilter,tp,0,LOCATION_MZONE,1,1,nil)
+	if #g>0 then
+		Duel.GetControl(g,tp)
+	end
+end
+function s.ctfilter2(c)
+	return c:IsFaceup() and c:GetCounter(0x1002)==0 and c:IsCanAddCounter(0x1002,1)
+end
+function s.cttg2(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(s.ctfilter2,tp,0,LOCATION_MZONE,1,nil) end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x1002)
+end
+function s.ctop2(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(s.ctfilter2,tp,0,LOCATION_MZONE,nil)
+	local tc=g:GetFirst()
+	while tc do
+		tc:AddCounter(0x1002,1)
+		tc=g:GetNext()
+	end
+end

expansions/script/c119974580.lua

+--禁征龙-缄龙
+local s,id,o=GetID()
+function s.initial_effect(c)
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e0:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
+	e0:SetCode(EVENT_ADJUST)
+	e0:SetRange(0xff)
+	e0:SetOperation(s.adjustop)
+	c:RegisterEffect(e0)
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(id,0))
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_HAND+LOCATION_MZONE)
+	e1:SetTarget(s.copytg)
+	e1:SetOperation(s.copyop)
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
+	e0:SetRange(LOCATION_DECK)
+	e0:SetTargetRange(LOCATION_HAND+LOCATION_MZONE,0)
+	e0:SetTarget(s.eftg)
+	e0:SetLabelObject(e1)
+	c:RegisterEffect(e0)
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOHAND|CATEGORY_SEARCH|CATEGORY_SPECIAL_SUMMON)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e2:SetCode(EVENT_TO_GRAVE)
+	e2:SetCountLimit(1,id)
+	e2:SetTarget(s.thtg)
+	e2:SetOperation(s.thop)
+	c:RegisterEffect(e2)
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e3:SetType(EFFECT_TYPE_QUICK_O)
+	e3:SetCode(EVENT_FREE_CHAIN)
+	e3:SetRange(LOCATION_GRAVE)
+	e3:SetCountLimit(1,id+o)
+	e3:SetCost(aux.bfgcost)
+	e3:SetTarget(s.sptg)
+	e3:SetOperation(s.spop)
+	c:RegisterEffect(e3)
+end
+function s.drdiseff(c,e,tp,eg,ep,ev,re,r,rp)
+	if c.Dragon_Ruler_handes_effect then return c.Dragon_Ruler_handes_effect end
+	return s[c:GetOriginalCodeRule()]
+end
+function s.efffilter(c,e,tp,eg,ep,ev,re,r,rp)
+	if not (c:IsSetCard(0x1c4) and c:IsAbleToGraveAsCost()) then return false end
+	local te=s.drdiseff(c,e,tp,eg,ep,ev,re,r,rp)
+	if not te then return false end
+	local tg=te:GetTarget()
+	return not tg or tg(e,tp,eg,ep,ev,re,r,rp,0,nil,c)
+end
+function s.costfilter(c)
+	return c:IsCode(id) and c:IsAbleToGraveAsCost()
+end
+function s.copytg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return e:IsCostChecked() and s.efffilter(c,e,tp,eg,ep,ev,re,r,rp) and Duel.IsExistingMatchingCard(s.costfilter,tp,LOCATION_DECK,0,1,nil) end
+	local tc=Duel.GetFirstMatchingCard(s.costfilter,tp,LOCATION_DECK,0,1,nil)
+	Duel.SendtoGrave(Group.FromCards(c,tc),REASON_COST)
+	local te=s.drdiseff(c,e,tp,eg,ep,ev,re,r,rp)
+	e:SetProperty(te:GetProperty())
+	Duel.ClearTargetCard()
+	e:SetLabelObject(te)
+	local tg=te:GetTarget()
+	if tg then tg(e,tp,eg,ep,ev,re,r,rp,1) end
+	Duel.ClearOperationInfo(0)
+end
+function s.copyop(e,tp,eg,ep,ev,re,r,rp)
+	local te=e:GetLabelObject()
+	local op=te:GetOperation()
+	if op then op(e,tp,eg,ep,ev,re,r,rp) end
+end
+function s.eftg(e,c)
+	return c:IsSetCard(0x1c4) and c:IsType(TYPE_MONSTER)
+end
+function s.thfilter(c,e,tp)
+	if not (c:IsSetCard(0x1c4) and c:IsType(TYPE_MONSTER)) then return false end
+	local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
+	return c:IsAbleToHand() or ft>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
+end
+function s.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
+	local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
+	local tc=g:GetFirst()
+	local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
+	if tc:IsAbleToHand() or ft>0 and tc:IsCanBeSpecialSummoned(e,0,tp,false,false) then
+		if Duel.SelectOption(tp,1190,1152)==0 then
+			Duel.SendtoHand(tc,nil,REASON_EFFECT)
+			Duel.ConfirmCards(1-tp,tc)
+		elseif Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP) then
+			local e1=Effect.CreateEffect(e:GetHandler())
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetCode(EFFECT_CANNOT_ATTACK)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+			tc:RegisterEffect(e1)
+			Duel.SpecialSummonComplete()
+		end
+	end
+end
+function s.spfilter(c,e,tp)
+	return c:IsSetCard(0x1c4) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
+end
+function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and s.spfilter(chkc,e,tp) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingTarget(s.spfilter,tp,LOCATION_GRAVE,0,1,e:GetHandler(),e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectTarget(tp,s.spfilter,tp,LOCATION_GRAVE,0,1,1,e:GetHandler(),e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
+end
+function s.spop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and aux.NecroValleyFilter()(tc) and Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP_DEFENSE) then
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_DISABLE)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		tc:RegisterEffect(e1)
+		local e2=e1:Clone()
+		e2:SetCode(EFFECT_DISABLE_EFFECT)
+		e2:SetValue(RESET_TURN_SET)
+		tc:RegisterEffect(e2)
+		Duel.SpecialSummonComplete()
+		local op=aux.SelectFromOptions(tp,{Duel.IsExistingMatchingCard(Card.IsSynchroSummonable,tp,LOCATION_EXTRA,0,1,nil,nil),1164},{Duel.IsExistingMatchingCard(Card.IsXyzSummonable,tp,LOCATION_EXTRA,0,1,nil,nil),1165},{true,1212})
+		if op==1 then
+			Duel.BreakEffect()
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+			local sg=Duel.SelectMatchingCard(tp,Card.IsSynchroSummonable,tp,LOCATION_EXTRA,0,1,1,nil,nil)
+			Duel.SynchroSummon(tp,sg:GetFirst(),nil)
+		elseif op==2 then
+			Duel.BreakEffect()
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+			local sg=Duel.SelectMatchingCard(tp,Card.IsXyzSummonable,tp,LOCATION_EXTRA,0,1,1,nil,nil)
+			Duel.XyzSummon(tp,sg:GetFirst(),nil)
+		end
+	end
+end
+
+function s.filter(c)
+	return c:IsSetCard(0x1c4) and c:IsType(TYPE_MONSTER) and not c:IsCode(id)
+end
+function s.adjustop(e,tp,eg,ep,ev,re,r,rp)
+	if not s.globle_check then
+		s.globle_check=true
+		local g=Duel.GetMatchingGroup(s.filter,0,0xff,0xff,nil)
+		cregister=Card.RegisterEffect
+		cisDiscardable=Card.IsDiscardable
+		local marked=false
+		Card.IsDiscardable=function(card)
+			marked=true
+			return true
+		end
+		Card.RegisterEffect=function(card,effect,flag)
+			if effect and effect:GetType()~=EFFECT_TYPE_FIELD then
+				marked=false
+				local cost=effect:GetCost()
+				if cost and cost(e,tp,eg,ep,ev,re,r,rp,0) then end
+				if marked then 
+					local eff=effect:Clone()
+					table.insert(table_effect,eff) 
+				end
+			end
+			return 
+		end
+		for tc in aux.Next(g) do
+			marked=false
+			table_effect={}
+			Duel.CreateToken(0,tc:GetOriginalCode())
+			for key,eff in ipairs(table_effect) do
+				s[tc:GetOriginalCode()]=eff
+			end
+		end
+		Card.RegisterEffect=cregister
+		Card.IsDiscardable=cisDiscardable
+	end
+	e:Reset()
+end

expansions/script/c122638495.lua

+--轰龙剑士 雾动机龙·强力
+local s,id,o=GetID()
+function s.initial_effect(c)
+	c:EnableReviveLimit()
+	aux.AddFusionProcFun2(c,s.mfilter1,s.mfilter2,true)
+	aux.AddContactFusionProcedure(c,s.cfilter,LOCATION_HAND+LOCATION_EXTRA+LOCATION_ONFIELD+LOCATION_GRAVE,0,Duel.SendtoDeck,nil,2,REASON_SPSUMMON)
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
+	e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetTargetRange(LOCATION_MZONE,0)
+	e2:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0xc7))
+	e2:SetValue(aux.tgoval)
+	c:RegisterEffect(e2)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_UPDATE_ATTACK)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetTargetRange(LOCATION_MZONE,0)
+	e1:SetValue(s.atkval)
+	c:RegisterEffect(e1)
+	local e3=e1:Clone()
+	e3:SetCode(EFFECT_UPDATE_DEFENSE)
+	c:RegisterEffect(e3)
+	local e4=Effect.CreateEffect(c)
+	e4:SetCategory(CATEGORY_REMOVE)
+	e4:SetType(EFFECT_TYPE_IGNITION)
+	e4:SetRange(LOCATION_MZONE)
+	e4:SetCountLimit(1)
+	e4:SetTarget(s.extg)
+	e4:SetOperation(s.exop)
+	c:RegisterEffect(e4)
+end
+function s.mfilter1(c)
+	return c:IsType(TYPE_MONSTER) and c:IsOriginalSetCard(0xc7)
+end
+function s.mfilter2(c)
+	return c:IsType(TYPE_PENDULUM)
+end
+function s.cfilter(c,fc)
+	return c:IsAbleToDeckOrExtraAsCost() and bit.band(c:GetOriginalType(),TYPE_MONSTER)~=0 and c:IsFaceupEx()
+end
+function s.atkfilter(c)
+	return c:IsFaceup() and c:IsSetCard(0xc7)
+end
+function s.atkval(e,c)
+	local g=Duel.GetMatchingGroup(s.atkfilter,c:GetControler(),LOCATION_MZONE,LOCATION_MZONE,nil)
+	return #g*300
+end
+function s.extg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_DECK,1,nil,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,1-tp,LOCATION_DECK)
+end
+function s.exop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetFieldGroup(tp,0,LOCATION_DECK)
+	Duel.ConfirmCards(tp,g)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local sg=g:FilterSelect(tp,Card.IsAbleToRemove,1,1,nil,tp)
+	Duel.Remove(sg,POS_FACEUP,REASON_EFFECT)
+	Duel.ShuffleDeck(1-tp)
+end

expansions/script/c133878367.lua

+--壹世坏浸染的无彩
+local s,id,o=GetID()
+function s.initial_effect(c)
+	aux.AddCodeList(c,56099748)
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_TOGRAVE)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,id)
+	e1:SetTarget(s.target)
+	e1:SetOperation(s.activate)
+	c:RegisterEffect(e1)
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCountLimit(1,id+o)
+	e3:SetCondition(s.thcon)
+	e3:SetTarget(s.thtg)
+	e3:SetOperation(s.thop)
+	c:RegisterEffect(e3)
+	local e2=e3:Clone()
+	e2:SetCode(EVENT_REMOVE)
+	c:RegisterEffect(e2)
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_FIELD)
+	e4:SetCode(EFFECT_CANNOT_REMOVE)
+	e4:SetRange(LOCATION_REMOVED)
+	e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e4:SetTargetRange(1,1)
+	e4:SetTarget(s.rmlimit)
+	c:RegisterEffect(e4)
+end
+function s.tgfilter(c)
+	return c:IsSetCard(0x181) and c:IsAbleToGrave()
+end
+function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(s.tgfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
+end
+function s.activate(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(s.tgfilter,tp,LOCATION_DECK,0,nil)
+	local ct=Duel.GetFieldGroupCount(tp,0,LOCATION_MZONE)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local sg=g:SelectSubGroup(tp,aux.dncheck,false,1,ct+1)
+	if sg and sg:GetCount()>0 then
+		Duel.SendtoGrave(sg,REASON_EFFECT)
+	end
+end
+function s.thcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsReason(REASON_EFFECT)
+end
+function s.thfilter(c)
+	return c:IsSetCard(0x181) and c:IsType(TYPE_SPELL) and not c:IsCode(id) and c:IsAbleToHand()
+end
+function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function s.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil)
+	if #g>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+	end
+end
+function s.rmlimit(e,c,rp,r,re)
+	return c:IsCode(56099748) or c:IsSetCard(0x181)
+end

expansions/script/c134079868.lua

+--龙剑士 魔道矢·灵摆
+local s,id,o=GetID()
+function s.initial_effect(c)
+	aux.EnablePendulumAttribute(c)
+	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(s.splimit)
+	c:RegisterEffect(e1)
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_PZONE)
+	e2:SetTarget(s.sptg)
+	e2:SetOperation(s.spop)
+	c:RegisterEffect(e2)
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(id,0))
+	e3:SetCategory(CATEGORY_DESTROY)
+	e3:SetType(EFFECT_TYPE_QUICK_O)
+	e3:SetCode(EVENT_FREE_CHAIN)
+	e3:SetRange(LOCATION_HAND)
+	e3:SetCountLimit(1,id)
+	e3:SetCost(s.descost)
+	e3:SetTarget(s.destg)
+	e3:SetOperation(s.desop)
+	c:RegisterEffect(e3)
+	local e5=Effect.CreateEffect(c)
+	e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e5:SetProperty(EFFECT_FLAG_DELAY)
+	e5:SetCode(EVENT_DESTROYED)
+	e5:SetTarget(s.sptg2)
+	e5:SetOperation(s.spop2)
+	c:RegisterEffect(e5)
+end
+function s.splimit(e,se,sp,st)
+	return se:IsHasType(EFFECT_TYPE_ACTIONS)
+end
+function s.spfilter(c,e,tp)
+	return c:IsSetCard(0xc7) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
+end
+function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsDestructable() and Duel.GetMZoneCount(tp)>0 and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,e:GetHandler(),1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
+end
+function s.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and Duel.Destroy(c,REASON_EFFECT)~=0 and Duel.GetMZoneCount(tp)>0 then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
+		if g:GetCount()>0 then
+			Duel.SpecialSummon(g,0,tp,tp,true,false,POS_FACEUP)
+		end
+	end
+end
+function s.descost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return not e:GetHandler():IsPublic() end
+end
+function s.destg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(nil,tp,0,LOCATION_ONFIELD,1,nil) end
+	local g=Duel.GetMatchingGroup(nil,tp,0,LOCATION_ONFIELD,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
+end
+function s.desop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+	local g=Duel.SelectMatchingCard(tp,nil,tp,0,LOCATION_ONFIELD,1,1,nil)
+	if #g>0 then
+		Duel.HintSelection(g)
+		Duel.Destroy(g,REASON_EFFECT)
+	end
+end
+function s.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetMZoneCount(tp)>0 and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
+end
+function s.spop2(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetMZoneCount(tp)>0 then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
+		if g:GetCount()>0 then
+			Duel.SpecialSummon(g,0,tp,tp,true,false,POS_FACEUP)
+		end
+	end
+end

expansions/script/c211000002.lua

@@ -83,11 +83,11 @@ function s.splimit(e,c)
 	return c:IsLocation(LOCATION_EXTRA)
 end
 --remove
-function s.rmfilter(c)
+function s.rmconfilter(c)
 	return c:IsFaceupEx() and c:IsCode(25801745)
 end
 function s.rmcon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.IsExistingMatchingCard(s.rmfilter,tp,LOCATION_ONFIELD,0,1,nil)
+	return Duel.IsExistingMatchingCard(s.rmconfilter,tp,LOCATION_ONFIELD,0,1,nil)
 end
 function s.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsOnField() and chkc:IsAbleToRemove() end

expansions/script/c211000014.lua

+--相剑外道-鸣鸿
+local s,id,o=GetID()
+function s.initial_effect(c)
+	c:EnableReviveLimit()
+	--同调素材
+	aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
+	--化雀飞遁
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(id,0))
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,id)
+	e1:SetCost(s.avocost)
+	e1:SetOperation(s.avoop)
+	c:RegisterEffect(e1)
+	--不灭之刃
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(id,1))
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetCode(EVENT_REMOVE)
+	e2:SetCountLimit(1,id+10000)
+	e2:SetTarget(s.sptg)
+	e2:SetOperation(s.spop)
+	c:RegisterEffect(e2)
+	--凶刀噬主
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(id,2))
+	e3:SetCategory(CATEGORY_DAMAGE)
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+	e3:SetCode(EVENT_PHASE+PHASE_END)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCountLimit(1)
+	e3:SetTarget(s.damtg)
+	e3:SetOperation(s.damop)
+	c:RegisterEffect(e3)
+end
+--化雀飞遁
+function s.avocost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return c:IsAbleToRemoveAsCost() end
+	if Duel.Remove(c,0,REASON_COST+REASON_TEMPORARY)~=0 and c:GetOriginalCode()==id then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		e1:SetCode(EVENT_PHASE+PHASE_END)
+		e1:SetReset(RESET_PHASE+PHASE_END)
+		e1:SetLabelObject(c)
+		e1:SetCountLimit(1)
+		e1:SetOperation(s.retop)
+		Duel.RegisterEffect(e1,tp)
+	end
+end
+function s.retop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.ReturnToField(e:GetLabelObject())
+end
+function s.avoop(e,tp,eg,ep,ev,re,r,rp)
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetTargetRange(1,0)
+	e1:SetValue(1)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+end
+--不灭之刃
+function s.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 s.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) then
+		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
+--凶刀噬主
+function s.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetTargetPlayer(tp)
+	Duel.SetTargetParam(1000)
+	Duel.SetOperationInfo(0,CATEGORY_DAMAGE,0,0,tp,1000)
+end
+function s.damop(e,tp,eg,ep,ev,re,r,rp)
+	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
+	Duel.Damage(p,d,REASON_EFFECT)
+end
\ No newline at end of file

expansions/script/c65810020.lua

@@ -13,7 +13,7 @@ function c65810020.initial_effect(c)
 	e2:SetTargetRange(LOCATION_MZONE,0)
 	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
 	e2:SetTarget(aux.TargetBoolFunction(Card.IsRace,RACE_INSECT))
-	e2:SetValue(1)
+	e2:SetValue(aux.indoval)
 	c:RegisterEffect(e2)
 	--
 	local e3=Effect.CreateEffect(c)

expansions/script/c65810100.lua

@@ -37,31 +37,21 @@ function c65810100.condition(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
 end
 function c65810100.filter(c,tp)
-	return c:IsSetCard(0xa31) and c:IsType(TYPE_FIELD) and c:GetActivateEffect():IsActivatable(tp,true,true) and aux.NecroValleyFilter()
+	return c:IsSetCard(0xa31) and c:IsType(TYPE_FIELD) and not c:IsForbidden() and c:CheckUniqueOnField(tp) and aux.NecroValleyFilter()
 end
 function c65810100.target1(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(c65810100.filter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,tp) end
-	if not Duel.CheckPhaseActivity() then e:SetLabel(1) else e:SetLabel(0) end
 end
 function c65810100.activate1(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(65810100,0))
-	if e:GetLabel()==1 then Duel.RegisterFlagEffect(tp,65810100,RESET_CHAIN,0,1) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
 	local tc=Duel.SelectMatchingCard(tp,c65810100.filter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,tp):GetFirst()
-	Duel.ResetFlagEffect(tp,65810100)
 	if tc then
 		local fc=Duel.GetFieldCard(tp,LOCATION_FZONE,0)
 		if fc then
 			Duel.SendtoGrave(fc,REASON_RULE)
-			Duel.BreakEffect()
 		end
-		Duel.MoveToField(tc,tp,tp,LOCATION_FZONE,POS_FACEUP,true)
-		local te=tc:GetActivateEffect()
-		te:UseCountLimit(tp,1,true)
-		local tep=tc:GetControler()
-		local cost=te:GetCost()
-		if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
-		Duel.RaiseEvent(tc,4179255,te,0,tp,tp,Duel.GetCurrentChain())
+		Duel.MoveToField(tc,tp,tp,LOCATION_FZONE,POS_FACEUP,true) 
 		local e1=Effect.CreateEffect(c)
 		e1:SetType(EFFECT_TYPE_FIELD)
 		e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)

expansions/script/c75646401.lua

+--Nowhere 鹿乃
+function c75646401.initial_effect(c)
+	--draw
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(75646401,0))
+	e1:SetCategory(CATEGORY_DECKDES)
+	e1:SetType(0x100)
+	e1:SetCode(1002)
+	e1:SetRange(0x2)
+	e1:SetCountLimit(1,75646401)
+	e1:SetCost(c75646401.cost)
+	e1:SetOperation(c75646401.operation)
+	c:RegisterEffect(e1)
+	--up
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_IGNITION)
+	e4:SetRange(LOCATION_GRAVE)
+	e4:SetCost(c75646401.costs)
+	e4:SetTarget(c75646401.tg)
+	e4:SetOperation(c75646401.op)
+	c:RegisterEffect(e4)
+end
+function c75646401.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
+	Duel.SendtoGrave(e:GetHandler(),0x80)
+end
+function c75646401.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(0x802)
+	e1:SetProperty(0x10000)
+	e1:SetCode(1012)
+	e1:SetCondition(c75646401.drcon1)
+	e1:SetOperation(c75646401.drop1)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(0x802)
+	e2:SetCode(1012)
+	e2:SetCondition(c75646401.regcon)
+	e2:SetOperation(c75646401.regop)
+	e2:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e2,tp)
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(0x802)
+	e3:SetCode(1022)
+	e3:SetCondition(c75646401.drcon2)
+	e3:SetOperation(c75646401.drop2)
+	e3:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e3,tp)
+end
+function c75646401.cfilter(c,tp)
+	return c:IsControler(1-tp)
+end
+function c75646401.drcon1(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetCurrentPhase()~=0x1 and eg:IsExists(c75646401.cfilter,1,nil,tp) 
+		and (not re:IsHasType(0x8) or re:IsHasType(0x800))
+end
+function c75646401.drop1(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.IsPlayerCanDiscardDeck(tp,2) then
+		Duel.DiscardDeck(tp,2,0x40)
+	end
+end
+function c75646401.regcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetCurrentPhase()~=PHASE_DRAW and eg:IsExists(c75646401.cfilter,1,nil,tp) and Duel.GetFlagEffect(tp,75646401)==0 
+		and re:IsHasType(EFFECT_TYPE_ACTIONS) and not re:IsHasType(EFFECT_TYPE_CONTINUOUS)
+end
+function c75646401.regop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.RegisterFlagEffect(tp,75646401,RESET_CHAIN,0,1)
+end
+function c75646401.drcon2(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFlagEffect(tp,75646401)>0
+end
+function c75646401.drop2(e,tp,eg,ep,ev,re,r,rp)
+	Duel.ResetFlagEffect(tp,75646401)   
+	if Duel.IsPlayerCanDiscardDeck(tp,2) then
+		Duel.DiscardDeck(tp,2,0x40)
+	end
+end
+function c75646401.costs(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToDeckAsCost() end
+	Duel.SendtoDeck(e:GetHandler(),nil,2,REASON_COST)
+end
+function c75646401.filter(c)
+	return c:IsSetCard(0x32c4) and not c:IsCode(75646401)
+end
+function c75646401.tg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c75646401.filter,tp,LOCATION_DECK,0,1,nil)
+		and Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>1 end
+end
+function c75646401.op(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(75646402,0))
+	local g=Duel.SelectMatchingCard(tp,c75646401.filter,tp,LOCATION_DECK,0,1,1,nil)
+	local tc=g:GetFirst()
+	if tc then
+		Duel.ShuffleDeck(tp)
+		Duel.MoveSequence(tc,0)
+		Duel.ConfirmDecktop(tp,1)
+	end
+end
\ No newline at end of file

expansions/script/c75646402.lua

+--Toy-toi 鹿乃
+function c75646402.initial_effect(c)
+	--
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCountLimit(1,5646402)
+	e1:SetCost(c75646402.cost1)
+	e1:SetTarget(c75646402.tg1)
+	e1:SetOperation(c75646402.op1)
+	c:RegisterEffect(e1)
+	--TOGRAVE
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOGRAVE)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,75646402)
+	e2:SetCost(c75646402.cost)
+	e2:SetTarget(c75646402.tg)
+	e2:SetOperation(c75646402.op)
+	c:RegisterEffect(e2)
+end
+function c75646402.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
+	Duel.SendtoGrave(e:GetHandler(),REASON_COST)
+end
+function c75646402.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsSetCard,tp,LOCATION_DECK,0,1,nil,0x32c4)
+		and Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>1 end
+end
+function c75646402.op1(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(75646402,0))
+	local g=Duel.SelectMatchingCard(tp,Card.IsSetCard,tp,LOCATION_DECK,0,1,1,nil,0x32c4)
+	local tc=g:GetFirst()
+	if tc then
+		Duel.ShuffleDeck(tp)
+		Duel.MoveSequence(tc,0)
+		Duel.ConfirmDecktop(tp,1)
+	end
+end
+function c75646402.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=Duel.GetDecktopGroup(tp,1)
+	if chk==0 then return g:FilterCount(Card.IsAbleToGraveAsCost,nil)==1 and Duel.IsExistingMatchingCard(c75646402.tgfilter,tp,LOCATION_DECK,0,1,g:GetFirst()) end
+	if g:GetFirst():IsSetCard(0x32c4) then e:SetLabel(1) else e:SetLabel(0) end
+	Duel.DisableShuffleCheck()
+	Duel.SendtoGrave(g,REASON_COST)
+end
+function c75646402.tgfilter(c)
+	return c:IsSetCard(0x32c4) and c:IsAbleToGrave()
+end
+function c75646402.filter(c)
+	return c:IsSetCard(0x32c4) and c:IsAbleToHand()
+end
+function c75646402.tg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c75646402.tgfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
+	if e:GetLabel()==1
+		and Duel.IsExistingMatchingCard(c75646402.filter,tp,LOCATION_DECK,0,1,nil) then
+		e:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
+		Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+	end
+end
+function c75646402.op(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g=Duel.SelectMatchingCard(tp,c75646402.tgfilter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoGrave(g,REASON_EFFECT) 
+	end
+	if e:GetLabel()==1 and Duel.IsExistingMatchingCard(c75646402.filter,tp,LOCATION_DECK,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(75646402,2)) then
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c75646402.filter,tp,LOCATION_DECK,0,1,1,nil)
+		if g:GetCount()>0 then
+		Duel.BreakEffect()
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+		end
+	end
+end
\ No newline at end of file

expansions/script/c75646403.lua

+--Nameless 鹿乃
+function c75646403.initial_effect(c)
+	--spsummon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(75646403,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,75646403)
+	e1:SetCost(c75646403.cost)
+	e1:SetTarget(c75646403.sptg)
+	e1:SetOperation(c75646403.spop)
+	c:RegisterEffect(e1)
+	--tohand (self)
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_FIELD)
+	e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_PLAYER_TARGET)
+	e3:SetCode(EFFECT_ACTIVATE_COST)
+	e3:SetTargetRange(1,0)
+	e3:SetRange(LOCATION_GRAVE)
+	e3:SetOperation(aux.chainreg)
+	c:RegisterEffect(e3)
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOHAND)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_CAL)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetCode(EVENT_TO_GRAVE)
+	e2:SetCountLimit(1,7564643)
+	e2:SetCost(c75646403.thcost)
+	e2:SetCondition(c75646403.con)
+	e2:SetTarget(c75646403.tg)
+	e2:SetOperation(c75646403.op)
+	c:RegisterEffect(e2)
+end
+function c75646403.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToDeckAsCost() end
+	Duel.SendtoDeck(e:GetHandler(),nil,2,REASON_COST)
+end
+function c75646403.filter1(c,e,tp)
+	return not c:IsType(TYPE_XYZ) and c:IsAbleToGraveAsCost()
+end
+function c75646403.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c75646403.filter1,tp,LOCATION_MZONE,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g=Duel.SelectMatchingCard(tp,c75646403.filter1,tp,LOCATION_MZONE,0,1,1,nil)
+	e:SetLabel(g:GetFirst():GetLevel())
+	Duel.SendtoGrave(g,REASON_COST)
+end
+function c75646403.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function c75646403.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if not c:IsRelateToEffect(e) then return end
+	if Duel.SpecialSummonStep(c,0,tp,tp,false,false,POS_FACEUP) then
+		local e1=Effect.CreateEffect(c)
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetCode(EFFECT_CHANGE_LEVEL)
+			e1:SetValue(e:GetLabel())
+			e1:SetReset(RESET_EVENT+0x1ff0000)
+			c:RegisterEffect(e1)
+		Duel.SpecialSummonComplete()
+	elseif Duel.GetLocationCount(tp,LOCATION_MZONE)<=0
+		and c:IsCanBeSpecialSummoned(e,0,tp,false,false) then
+		Duel.SendtoGrave(c,REASON_RULE)
+	end
+end
+function c75646403.cfilter(c)
+	return c:IsReason(REASON_COST)
+end
+function c75646403.con(e,tp,eg,ep,ev,re,r,rp)
+	return re and re:IsHasType(0x7f0) and eg:IsExists(c75646403.cfilter,1,nil) and re:GetHandler():IsSetCard(0x32c4) and e:GetHandler():GetFlagEffect(1)>0
+end
+function c75646403.tg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToHand,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
+	local g=Duel.GetMatchingGroup(Card.IsAbleToHand,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
+end
+function c75646403.op(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,Card.IsAbleToHand,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,2,REASON_EFFECT)
+	end
+end
\ No newline at end of file

expansions/script/c75646404.lua

+--戏言 鹿乃
+function c75646404.initial_effect(c)
+	--synchro summon
+	aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
+	c:EnableReviveLimit()
+	--atkup
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_UPDATE_ATTACK)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetValue(c75646404.atkval)
+	c:RegisterEffect(e1)
+	--Remove
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(75646404,0))
+	e2:SetCategory(CATEGORY_REMOVE)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1)
+	e2:SetCost(c75646404.rmcost)
+	e2:SetTarget(c75646404.rmtg)
+	e2:SetOperation(c75646404.rmop)
+	c:RegisterEffect(e2)
+end
+function c75646404.vfilter(c)
+	return c:IsSetCard(0x32c4)
+end
+function c75646404.atkval(e,c)
+	return Duel.GetMatchingGroupCount(c75646404.vfilter,c:GetControler(),LOCATION_GRAVE+LOCATION_ONFIELD,0,nil)*200
+end
+function c75646404.rmcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=Duel.GetDecktopGroup(tp,1)
+	if chk==0 then return g:FilterCount(Card.IsAbleToGraveAsCost,nil)==1 end
+	if g:GetFirst():IsSetCard(0x32c4) then e:SetLabel(1) else e:SetLabel(0) end
+	Duel.DisableShuffleCheck()
+	Duel.SendtoGrave(g,REASON_COST)
+end
+function c75646404.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,nil) end
+	local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,LOCATION_GRAVE,LOCATION_GRAVE,nil)
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
+end
+function c75646404.rmop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
+	end
+	if e:GetLabel()==1 and Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(75646404,1)) then
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
+	end
+end
+end
\ No newline at end of file

expansions/script/c75646405.lua

+--Stella-ruim 鹿乃
+function c75646405.initial_effect(c)
+	c:EnableReviveLimit()
+	--atk up
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
+	e1:SetCost(c75646405.cost)
+	e1:SetTarget(c75646405.target)
+	e1:SetOperation(c75646405.operation)
+	c:RegisterEffect(e1)
+	--top
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_QUICK_O)
+	e4:SetCode(EVENT_FREE_CHAIN)
+	e4:SetRange(LOCATION_MZONE+LOCATION_HAND)
+	e4:SetCountLimit(1,75646405)
+	e4:SetCost(c75646405.topcost)
+	e4:SetTarget(c75646405.tg)
+	e4:SetOperation(c75646405.op)
+	c:RegisterEffect(e4)
+end
+function c75646405.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=Duel.GetDecktopGroup(tp,1)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToGraveAsCost,tp,LOCATION_HAND,0,1,nil) and g:FilterCount(Card.IsAbleToGraveAsCost,nil)==1 and Duel.IsExistingMatchingCard(c75646405.filter,tp,LOCATION_DECK,0,1,g:GetFirst(),e,tp)end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g1=Duel.SelectMatchingCard(tp,Card.IsAbleToGraveAsCost,tp,LOCATION_HAND,0,1,1,nil)
+	if (g:GetFirst():IsSetCard(0x32c4) or g1:GetFirst():IsSetCard(0x32c4))then e:SetLabel(1) else e:SetLabel(0) end
+	g:Merge(g1)
+	Duel.DisableShuffleCheck()
+	Duel.SendtoGrave(g,REASON_COST)
+end
+function c75646405.filter(c,e,tp)
+	return  c:IsSetCard(0x32c4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c75646405.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c75646405.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
+end
+function c75646405.operation(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,c75646405.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
+	if g:GetCount()>0 then
+		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+	end
+	if e:GetLabel()==1 then
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetReset(RESET_EVENT+0xff0000)
+		e1:SetValue(500)
+		e:GetHandler():RegisterEffect(e1)
+	end
+end
+function c75646405.topcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
+	Duel.SendtoGrave(e:GetHandler(),REASON_COST)
+end
+function c75646405.tg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsSetCard,tp,LOCATION_GRAVE,0,1,e:GetHandler(),0x32c4) end
+end
+function c75646405.op(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(75646402,0))
+	local g=Duel.SelectMatchingCard(tp,Card.IsSetCard,tp,LOCATION_GRAVE,0,1,1,e:GetHandler(),0x32c4)
+	local tc=g:GetFirst()
+	if tc then
+		Duel.SendtoDeck(tc,nil,0,REASON_EFFECT)
+		local g1=Duel.GetOperatedGroup()
+		if g1:IsExists(Card.IsLocation,1,nil,LOCATION_DECK) then Duel.ConfirmDecktop(tp,1) end
+	end
+end
\ No newline at end of file

expansions/script/c75646406.lua

+--寻星的少女 鹿乃
+function c75646406.initial_effect(c)
+	aux.AddRitualProcGreaterCode(c,75646405)
+	--spsummon
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(75646406,1))
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
+	e2:SetCode(EVENT_TO_GRAVE)
+	e2:SetCountLimit(1,75646406)
+	e2:SetCondition(c75646406.spcon)
+	e2:SetTarget(c75646406.sptg)
+	e2:SetOperation(c75646406.spop)
+	c:RegisterEffect(e2)
+end
+function c75646406.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsReason(REASON_COST) and re:IsHasType(0x7f0)
+		and re:GetHandler():IsSetCard(0x32c4)
+end
+function c75646406.spfilter(c,e,tp)
+	return c:IsSetCard(0x32c4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c75646406.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and c75646406.spfilter(chkc,e,tp) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingTarget(c75646406.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectTarget(tp,c75646406.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
+end
+function c75646406.spop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc and tc:IsRelateToEffect(e) then
+		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
\ No newline at end of file

expansions/script/c75646407.lua

+--极北星辰 鹿乃
+function c75646407.initial_effect(c)
+	c:EnableReviveLimit()
+	aux.AddFusionProcFunRep(c,c75646407.spfilter,3,false)	
+	aux.AddContactFusionProcedure(c,Card.IsAbleToRemoveAsCost,LOCATION_HAND+LOCATION_GRAVE,0,Duel.Remove,POS_FACEUP,REASON_COST)
+	--spsummon condition
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(c75646407.splimit)
+	c:RegisterEffect(e1)
+	--special summon rule
+	--local e2=Effect.CreateEffect(c)
+	--e2:SetType(EFFECT_TYPE_FIELD)
+	--e2:SetCode(EFFECT_SPSUMMON_PROC)
+	--e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
+	--e2:SetRange(LOCATION_EXTRA)
+	--e2:SetCondition(c75646407.sprcon)
+	--e2:SetOperation(c75646407.sprop)
+	--c:RegisterEffect(e2)
+	--lv change
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e3:SetCountLimit(1,5646407)
+	e3:SetCost(c75646407.cost)
+	e3:SetTarget(c75646407.tg)
+	e3:SetOperation(c75646407.op)
+	c:RegisterEffect(e3)
+	--tohand (self)
+	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_FIELD)
+	e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_PLAYER_TARGET)
+	e5:SetCode(EFFECT_ACTIVATE_COST)
+	e5:SetTargetRange(1,0)
+	e5:SetRange(LOCATION_GRAVE)
+	e5:SetOperation(aux.chainreg)
+	c:RegisterEffect(e5)
+	local e4=Effect.CreateEffect(c) 
+	e4:SetDescription(aux.Stringid(75646407,1))
+	e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e4:SetProperty(EFFECT_FLAG_DELAY)
+	e4:SetRange(LOCATION_GRAVE)
+	e4:SetCode(EVENT_TO_GRAVE)
+	e4:SetCountLimit(1,75646407)
+	e4:SetCondition(c75646407.con)
+	e4:SetTarget(c75646407.tg1)
+	e4:SetOperation(c75646407.op1)
+	c:RegisterEffect(e4)
+end
+function c75646407.splimit(e,se,sp,st)
+	return not e:GetHandler():IsLocation(LOCATION_EXTRA)
+end
+function c75646407.spfilter(c)
+	return c:IsFusionSetCard(0x32c4) and c:IsCanBeFusionMaterial() and c:IsAbleToRemoveAsCost()
+end
+function c75646407.sprcon(e,c)
+	if c==nil then return true end
+	local tp=c:GetControler()
+	return Duel.IsExistingMatchingCard(c75646407.spfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,3,nil) and Duel.GetLocationCountFromEx(tp)>0
+end
+function c75646407.sprop(e,tp,eg,ep,ev,re,r,rp,c)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g=Duel.SelectMatchingCard(tp,c75646407.spfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,3,3,nil)
+	c:SetMaterial(g)
+	Duel.Remove(g,POS_FACEUP,REASON_COST)
+end
+function c75646407.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=Duel.GetDecktopGroup(tp,1)
+	if chk==0 then return g:FilterCount(Card.IsAbleToGraveAsCost,nil)==1 end
+	if g:GetFirst():IsSetCard(0x32c4) then e:SetValue(1) else e:SetValue(0) end
+	Duel.DisableShuffleCheck()
+	Duel.SendtoGrave(g,REASON_COST)
+end
+function c75646407.filter(c)
+	return c:IsSetCard(0x32c4) and c:IsAbleToDeck()
+end
+function c75646407.tg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	local t={}
+	local i=1
+	local p=1
+	local lv=e:GetHandler():GetLevel()
+	for i=4,9 do 
+		if lv~=i then t[p]=i p=p+1 end
+	end
+	t[p]=nil
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(26082117,1))
+	e:SetLabel(Duel.AnnounceNumber(tp,table.unpack(t)))
+	if e:GetValue()==1
+		and Duel.IsExistingMatchingCard(c75646407.filter,tp,LOCATION_GRAVE,0,1,nil) then
+		e:SetCategory(CATEGORY_TOHAND)
+		Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
+	end
+end
+function c75646407.op(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsFaceup() and c:IsRelateToEffect(e) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_CHANGE_LEVEL)
+		e1:SetValue(e:GetLabel())
+		e1:SetReset(RESET_EVENT+0x1ff0000)
+		c:RegisterEffect(e1)
+	end
+	if e:GetValue()==1 and Duel.IsExistingMatchingCard(c75646407.filter,tp,LOCATION_GRAVE,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(75646407,0)) then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+		local g=Duel.SelectMatchingCard(tp,c75646407.filter,tp,LOCATION_GRAVE,0,1,1,nil)
+		if g:GetCount()>0 then
+		Duel.BreakEffect()
+		Duel.SendtoHand(g,tp,REASON_EFFECT)
+		end
+	end
+end
+function c75646407.cfilter(c)
+	return c:IsReason(REASON_COST)
+end
+function c75646407.con(e,tp,eg,ep,ev,re,r,rp)
+	return re and re:IsHasType(0x7f0) and eg:IsExists(c75646407.cfilter,1,nil) and re:GetHandler():IsSetCard(0x32c4) and e:GetHandler():GetFlagEffect(1)>0
+end
+function c75646407.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function c75646407.op1(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) then
+		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
\ No newline at end of file

expansions/script/c75646408.lua

+--Hello／How are you 鹿乃
+function c75646408.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetTarget(c75646408.target)
+	e1:SetOperation(c75646408.activate)
+	c:RegisterEffect(e1)	
+	--
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetCode(EVENT_TO_GRAVE)
+	e2:SetCondition(c75646408.con)
+	e2:SetTarget(c75646408.tg)
+	e2:SetOperation(c75646408.op)
+	c:RegisterEffect(e2)
+end
+function c75646408.filter(c)
+	return c:IsSetCard(0x32c4) and c:IsAbleToHand()
+end
+function c75646408.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c75646408.filter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c75646408.activate(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c75646408.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 c75646408.con(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEUP)
+end
+function c75646408.tg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+end
+function c75646408.op(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoDeck(g,nil,0,REASON_EFFECT)
+	end
+end
\ No newline at end of file

expansions/script/c75646409.lua

+--暧昧小鹿 鹿乃
+function c75646409.initial_effect(c)
+	--xyz summon
+	aux.AddXyzProcedure(c,nil,9,2,c75646409.ovfilter,aux.Stringid(75646409,0),2,c75646409.xyzop)
+	c:EnableReviveLimit()
+	--atk
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_UPDATE_ATTACK)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetValue(c75646409.atkval)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EFFECT_UPDATE_DEFENSE)
+	e2:SetValue(c75646409.defval)
+	c:RegisterEffect(e2)
+	--top
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(75646409,1))
+	e3:SetType(EFFECT_TYPE_QUICK_O)
+	e3:SetCode(EVENT_FREE_CHAIN)
+	e3:SetCountLimit(1,75646409)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCost(c75646409.cost)
+	e3:SetTarget(c75646409.target)
+	e3:SetOperation(c75646409.operation)
+	c:RegisterEffect(e3)
+	--indes
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_SINGLE)
+	e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e4:SetRange(LOCATION_MZONE)
+	e4:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
+	e4:SetValue(1)
+	c:RegisterEffect(e4)
+	--
+	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e5:SetCode(EVENT_TO_GRAVE)
+	e5:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e5:SetRange(LOCATION_MZONE)
+	e5:SetCountLimit(1)
+	e5:SetTarget(c75646409.tg)
+	e5:SetOperation(c75646409.op)
+	c:RegisterEffect(e5)
+end
+function c75646409.ovfilter(c)
+	return c:IsFaceup() and c:IsSetCard(0x32c4) and c:IsType(TYPE_SYNCHRO+TYPE_FUSION+TYPE_RITUAL)
+end
+function c75646409.xyzop(e,tp,chk)
+	if chk==0 then return Duel.GetFlagEffect(tp,75646409)==0 end
+	Duel.RegisterFlagEffect(tp,75646409,RESET_PHASE+PHASE_END,0,1)
+end
+function c75646409.atkfilter(c)
+	return c:IsSetCard(0x32c4) and c:GetAttack()>=0
+end
+function c75646409.atkval(e,c)
+	local g=e:GetHandler():GetOverlayGroup():Filter(c75646409.atkfilter,nil)
+	return g:GetSum(Card.GetAttack)
+end
+function c75646409.deffilter(c)
+	return c:IsSetCard(0x32c4) and c:GetDefense()>=0
+end
+function c75646409.defval(e,c)
+	local g=e:GetHandler():GetOverlayGroup():Filter(c75646409.deffilter,nil)
+	return g:GetSum(Card.GetDefense)
+end
+function c75646409.cost(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 c75646409.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsSetCard,tp,LOCATION_DECK,0,1,nil,0x32c4)
+		and Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>1 end
+end
+function c75646409.operation(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(75646402,0))
+	local g=Duel.SelectMatchingCard(tp,Card.IsSetCard,tp,LOCATION_DECK,0,1,1,nil,0x32c4)
+	local tc=g:GetFirst()
+	if tc then
+		Duel.ShuffleDeck(tp)
+		Duel.MoveSequence(tc,0)
+		Duel.ConfirmDecktop(tp,1)
+	end
+end
+function c75646409.filter(c,e,tp)
+	return c:IsSetCard(0x32c4) and c:GetPreviousControler()==tp
+		and c:IsLocation(LOCATION_GRAVE) and c:IsReason(REASON_COST) and c:IsCanBeEffectTarget(e) and not c:IsForbidden()
+end
+function c75646409.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return eg:IsContains(chkc) and c75646409.filter(chkc,e,tp) end
+	if chk==0 then return re and re:GetHandler()~=e:GetHandler() and re:IsHasType(0x7f0) and eg:IsExists(c75646409.filter,1,nil,e,tp) end
+	local g=eg:Filter(c75646409.filter,nil,e,tp)
+	local tc=nil
+	if g:GetCount()>1 then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+		tc=g:Select(tp,1,1,nil):GetFirst()
+	else
+		tc=g:GetFirst()
+	end
+	Duel.SetTargetCard(tc)
+	Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,tc,1,0,0)
+end
+function c75646409.op(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) and not tc:IsImmuneToEffect(e) then
+		local og=tc:GetOverlayGroup()
+		if og:GetCount()>0 then
+			Duel.SendtoGrave(og,REASON_RULE)
+		end
+		Duel.Overlay(c,Group.FromCards(tc))
+	end
+end
\ No newline at end of file

expansions/script/c75646410.lua

+--Walk This Way!鹿乃
+function c75646410.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DRAW)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCountLimit(1,75646410)
+	e1:SetCost(c75646410.cost)
+	e1:SetTarget(c75646410.target)
+	e1:SetOperation(c75646410.activate)
+	c:RegisterEffect(e1)
+	--special
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetCountLimit(1,5646410)
+	e2:SetCost(c75646410.spcost)
+	e2:SetTarget(c75646410.sptg)
+	e2:SetOperation(c75646410.spop)
+	c:RegisterEffect(e2)
+end
+function c75646410.filter(c)
+	return  c:IsSetCard(0x32c4) and c:IsAbleToGraveAsCost()
+end
+function c75646410.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=Duel.GetDecktopGroup(tp,1)
+	if chk==0 then return Duel.IsExistingMatchingCard(c75646410.filter,tp,LOCATION_HAND,0,1,e:GetHandler()) and g:FilterCount(Card.IsAbleToGraveAsCost,nil)==1 and Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=3 end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g1=Duel.SelectMatchingCard(tp,c75646410.filter,tp,LOCATION_HAND,0,1,1,e:GetHandler())
+	if g:GetFirst():IsSetCard(0x32c4) then e:SetLabel(1) else e:SetLabel(0) end
+	g:Merge(g1)
+	Duel.DisableShuffleCheck()
+	Duel.SendtoGrave(g,REASON_COST)
+end
+function c75646410.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,2) end
+	Duel.SetTargetPlayer(tp)
+	Duel.SetTargetParam(2)
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,2)
+end
+function c75646410.activate(e,tp,eg,ep,ev,re,r,rp)
+	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
+	if Duel.Draw(p,d,REASON_EFFECT)<1 then return end
+	if e:GetLabel()==1 and Duel.IsExistingMatchingCard(Card.IsSetCard,tp,LOCATION_DECK,0,1,nil,0x32c4) and Duel.SelectYesNo(tp,aux.Stringid(75646410,0)) then
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(75646402,0))
+	local g=Duel.SelectMatchingCard(tp,Card.IsSetCard,tp,LOCATION_DECK,0,1,1,nil,0x32c4)
+		local tc=g:GetFirst()
+		if tc then
+		Duel.BreakEffect()
+		Duel.ShuffleDeck(tp)
+		Duel.MoveSequence(tc,0)
+		Duel.ConfirmDecktop(tp,1)
+		end
+	end
+end
+function c75646410.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)
+end
+function c75646410.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsPlayerCanSpecialSummonMonster(tp,75646411,0x32c4,0x4011,0,2300,5,RACE_PSYCHO,ATTRIBUTE_LIGHT) end
+	Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
+end
+function c75646410.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
+	if not Duel.IsPlayerCanSpecialSummonMonster(tp,75646411,0x32c4,0x4011,0,2300,5,RACE_PSYCHO,ATTRIBUTE_LIGHT) then return end
+	local token=Duel.CreateToken(tp,75646411)
+	Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
+end
\ No newline at end of file

expansions/script/c75646412.lua

+--Love 鹿乃
+function c75646412.initial_effect(c)
+	--activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_TODECK)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCountLimit(1,75646412+EFFECT_COUNT_CODE_OATH)
+	e1:SetCost(c75646412.cost)
+	e1:SetTarget(c75646412.target)
+	e1:SetOperation(c75646412.activate)
+	c:RegisterEffect(e1)
+	--draw
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_DRAW)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_DELAY)
+	e2:SetCode(EVENT_TO_GRAVE)
+	e2:SetCountLimit(1,5646412)
+	e2:SetCondition(c75646412.con)
+	e2:SetTarget(c75646412.tg)
+	e2:SetOperation(c75646412.op)
+	c:RegisterEffect(e2)
+end
+function c75646412.con(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsReason(REASON_COST) and re:IsHasType(0x7f0)
+		and re:GetHandler():IsSetCard(0x32c4)
+end
+function c75646412.tg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
+	Duel.SetTargetPlayer(tp)
+	Duel.SetTargetParam(1)
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
+end
+function c75646412.op(e,tp,eg,ep,ev,re,r,rp)
+	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
+	Duel.Draw(p,d,REASON_EFFECT)
+end
+function c75646412.filter(c)
+	return (c:IsSetCard(0x32c4) or c:IsLocation(LOCATION_HAND)) and c:IsAbleToDeckAsCost()
+end
+function c75646412.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c75646412.filter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectMatchingCard(tp,c75646412.filter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil)
+	Duel.SendtoDeck(g,nil,0,REASON_COST)
+end
+function c75646412.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	local c=e:GetHandler()
+	if chkc then return chkc:IsOnField() and chkc:IsAbleToDeck() end
+	if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToDeck,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectTarget(tp,Card.IsAbleToDeck,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
+end
+function c75646412.activate(e)
+	local tc=Duel.GetFirstTarget()
+	if tc and tc:IsRelateToEffect(e) then
+		Duel.SendtoDeck(tc,nil,0,REASON_EFFECT)
+	end
+end
\ No newline at end of file

expansions/script/c75646413.lua

+--Good Hello 鹿乃
+function c75646413.initial_effect(c)
+	--
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_TODECK+CATEGORY_TOGRAVE)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,75646413)
+	e1:SetCost(c75646413.cost)
+	e1:SetTarget(c75646413.tg)
+	e1:SetOperation(c75646413.op)
+	c:RegisterEffect(e1)
+	--spsummon
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetRange(LOCATION_HAND+LOCATION_GRAVE)
+	e2:SetCost(c75646413.spcost)
+	e2:SetTarget(c75646413.sptg)
+	e2:SetOperation(c75646413.spop)
+	c:RegisterEffect(e2)
+end
+function c75646413.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local loc=LOCATION_ONFIELD 
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then loc=LOCATION_MZONE end
+	if chk==0 then return e:GetHandler():GetFlagEffect(75646413)==0 and Duel.IsExistingMatchingCard(c75646413.cfilter,tp,loc,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectMatchingCard(tp,c75646413.cfilter,tp,loc,0,1,1,nil)
+	Duel.SendtoDeck(g,nil,0,REASON_COST)
+	e:GetHandler():RegisterFlagEffect(75646413,RESET_CHAIN,0,1)   
+end
+function c75646413.cfilter(c)
+	return c:IsFaceup() and c:IsSetCard(0x32c4) 
+		and c:IsAbleToDeckOrExtraAsCost()
+end
+function c75646413.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	local c=e:GetHandler()
+	if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+end
+function c75646413.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 and Duel.GetLocationCount(tp,LOCATION_MZONE)<=0
+		and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsLocation(LOCATION_HAND) then
+		Duel.SendtoGrave(c,REASON_RULE)
+		return
+	end
+end
+function c75646413.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=Duel.GetDecktopGroup(tp,1)
+	if chk==0 then return g:FilterCount(Card.IsAbleToGraveAsCost,nil)==1 end
+	if g:GetFirst():IsSetCard(0x32c4) then e:SetLabel(1) else e:SetLabel(0) end
+	Duel.DisableShuffleCheck()
+	Duel.SendtoGrave(g,REASON_COST)
+end
+function c75646413.filter(c)
+	return c:IsSetCard(0x32c4) and (c:IsLocation(LOCATION_GRAVE) and c:IsAbleToDeck() or c:IsFaceup())
+end
+function c75646413.filter2(c)
+	return c:IsLocation(LOCATION_GRAVE) and c:IsAbleToDeck() or c:IsFaceup()
+end
+function c75646413.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and chkc:IsControler(tp) and c75646413.filter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c75646413.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+	local g1=Duel.SelectTarget(tp,c75646413.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+	local g2=Duel.SelectTarget(tp,c75646413.filter2,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,0,2,g1:GetFirst())
+	g1:Merge(g2)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g1,g1:GetCount(),0,0)
+	if e:GetLabel()==1 and Duel.IsPlayerCanDraw(tp,2) then
+		e:SetCategory(CATEGORY_DRAW)
+		Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,2)
+	end
+end
+function c75646413.op(e,tp,eg,ep,ev,re,r,rp)
+	local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
+	if not tg then return end
+	if tg:Filter(Card.IsLocation,nil,LOCATION_GRAVE):GetCount()>0	  then
+		Duel.SendtoDeck(tg:Filter(Card.IsLocation,nil,LOCATION_GRAVE),nil,2,REASON_EFFECT)
+		local g=Duel.GetOperatedGroup()
+		if g:IsExists(Card.IsLocation,1,nil,LOCATION_DECK) then Duel.ShuffleDeck(tp) 
+		end
+	end
+	if tg:Filter(Card.IsLocation,nil,LOCATION_REMOVED):GetCount()>0 then
+		Duel.SendtoGrave(tg:Filter(Card.IsLocation,nil,LOCATION_REMOVED),REASON_EFFECT+REASON_RETURN)
+	end
+	if e:GetLabel()==1 and Duel.IsPlayerCanDraw(tp,2) and Duel.SelectYesNo(tp,aux.Stringid(75646413,0)) then
+		Duel.BreakEffect()
+		Duel.Draw(tp,2,REASON_EFFECT)
+	end
+end
\ No newline at end of file

expansions/script/c75646414.lua

+--Sweet Ice Cream 鹿乃
+function c75646414.initial_effect(c)
+	--synchro summon
+	aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsSetCard,0x32c4),2)
+	c:EnableReviveLimit()
+	--spsummon
+	local e0=Effect.CreateEffect(c)
+	e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e0:SetType(EFFECT_TYPE_SINGLE)
+	e0:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e0:SetValue(aux.synlimit)
+	c:RegisterEffect(e0)
+	--negate
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(75646414,0))
+	e1:SetCategory(CATEGORY_DISABLE)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetHintTiming(0,0x1c0)
+	e1:SetCountLimit(1) 
+	e1:SetCost(c75646414.cost)
+	e1:SetTarget(c75646414.target)
+	e1:SetOperation(c75646414.operation)
+	c:RegisterEffect(e1)
+	--todeck
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_TODECK+CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
+	e3:SetCost(c75646414.spcost)
+	e3:SetTarget(c75646414.sptg)
+	e3:SetOperation(c75646414.spop)
+	c:RegisterEffect(e3)
+end
+function c75646414.filter(c)
+	return (c:IsSetCard(0x32c4) or c:IsLocation(LOCATION_HAND)) and c:IsAbleToDeckAsCost()
+end
+function c75646414.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c75646414.filter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectMatchingCard(tp,c75646414.filter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil)
+	Duel.SendtoDeck(g,nil,0,REASON_COST)
+end
+function c75646414.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsControler(1-tp) and chkc:IsOnField() and aux.disfilter1(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(aux.disfilter1,tp,0,LOCATION_ONFIELD,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+	local g=Duel.SelectTarget(tp,aux.disfilter1,tp,0,LOCATION_ONFIELD,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,1,0,0)
+end
+function c75646414.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if ((tc:IsFaceup() and not tc:IsDisabled()) or tc:IsType(TYPE_TRAPMONSTER)) and tc:IsRelateToEffect(e) then
+		Duel.NegateRelatedChain(tc,RESET_TURN_SET)
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e1:SetCode(EFFECT_DISABLE)
+		e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e1)
+		local e2=Effect.CreateEffect(c)
+		e2:SetType(EFFECT_TYPE_SINGLE)
+		e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e2:SetCode(EFFECT_DISABLE_EFFECT)
+		e2:SetValue(RESET_TURN_SET)
+		e2:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e2)
+		if tc:IsType(TYPE_TRAPMONSTER) then
+			local e3=Effect.CreateEffect(c)
+			e3:SetType(EFFECT_TYPE_SINGLE)
+			e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+			e3:SetCode(EFFECT_DISABLE_TRAPMONSTER)
+			e3:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+			tc:RegisterEffect(e3)
+		end
+	end
+end
+function c75646414.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=Duel.GetDecktopGroup(tp,1)
+	if chk==0 then return g:FilterCount(Card.IsAbleToGraveAsCost,nil)==1 end
+	if g:GetFirst():IsSetCard(0x32c4) then e:SetLabel(1) else e:SetLabel(0) end
+	Duel.DisableShuffleCheck()
+	Duel.SendtoGrave(g,REASON_COST)
+end
+function c75646414.spfilter(c,e,tp)
+	return c:IsSetCard(0x32c4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c75646414.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c75646414.spfilter(chkc,e,tp) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingTarget(c75646414.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectTarget(tp,c75646414.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
+	if e:GetLabel()==1
+		and e:GetHandler():IsAbleToExtra() then
+		e:SetCategory(CATEGORY_TODECK)
+		Duel.SetOperationInfo(0,CATEGORY_TODECK,e:GetHandler(),1,0,0)
+	end
+end
+function c75646414.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
+	end
+	if e:GetLabel()==1 and c:IsRelateToEffect(e) then
+		Duel.BreakEffect()
+		Duel.SendtoDeck(c,nil,2,REASON_EFFECT)
+	end
+end
\ No newline at end of file

expansions/script/c75646415.lua

+--Merry 鹿乃
+function c75646415.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,75646415)
+	e1:SetTarget(c75646415.target)
+	e1:SetOperation(c75646415.activate)
+	c:RegisterEffect(e1)
+	--tohand
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOHAND)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
+	e2:SetCode(EVENT_TO_GRAVE)
+	e2:SetCountLimit(1,5646415)
+	e2:SetCondition(c75646415.con)
+	e2:SetTarget(c75646415.tg)
+	e2:SetOperation(c75646415.op)
+	c:RegisterEffect(e2)
+end
+function c75646415.con(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsReason(REASON_COST) and re:IsHasType(0x7f0)
+		and re:GetHandler():IsSetCard(0x32c4)
+end
+function c75646415.filter1(c)
+	return c:IsSetCard(0x32c4) and bit.band(c:GetType(),0x81)==0x81 and c:IsAbleToHand()
+end
+function c75646415.tg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c75646415.filter1,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c75646415.op(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c75646415.filter1,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 c75646415.filter(c,e,tp,m1,m2,ft)
+	if not c:IsSetCard(0x32c4) or bit.band(c:GetType(),0x81)~=0x81
+		or not c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,false,true) then return false end
+	local mg=m1:Filter(Card.IsCanBeRitualMaterial,c,c)
+	mg:Merge(m2)
+	if c.mat_filter then
+		mg=mg:Filter(c.mat_filter,nil)
+	end
+	if ft>0 then
+		return mg:CheckWithSumEqual(Card.GetRitualLevel,c:GetLevel(),1,99,c)
+	else
+		return ft>-1 and mg:IsExists(c75646415.mfilterf,1,nil,tp,mg,c)
+	end
+end
+function c75646415.mfilterf(c,tp,mg,rc)
+	if c:IsControler(tp) and c:IsLocation(LOCATION_MZONE) then
+		Duel.SetSelectedCard(c)
+		return mg:CheckWithSumEqual(Card.GetRitualLevel,rc:GetLevel(),0,99,rc)
+	else return false end
+end
+function c75646415.mfilter(c)
+	return c:GetLevel()>0 and c:IsSetCard(0x32c4) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemove()
+end
+function c75646415.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then
+		local mg1=Duel.GetRitualMaterial(tp)
+		local mg2=Duel.GetMatchingGroup(c75646415.mfilter,tp,LOCATION_GRAVE,0,nil)
+		local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
+		return Duel.IsExistingMatchingCard(c75646415.filter,tp,LOCATION_HAND,0,1,nil,e,tp,mg1,mg2,ft)
+	end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
+end
+function c75646415.activate(e,tp,eg,ep,ev,re,r,rp)
+	local mg1=Duel.GetRitualMaterial(tp)
+	local mg2=Duel.GetMatchingGroup(c75646415.mfilter,tp,LOCATION_GRAVE,0,nil)
+	local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local tg=Duel.SelectMatchingCard(tp,c75646415.filter,tp,LOCATION_HAND,0,1,1,nil,e,tp,mg1,mg2,ft)
+	local tc=tg: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,nil)
+		end
+		local mat=nil
+		if ft>0 then
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
+			mat=mg:SelectWithSumEqual(tp,Card.GetRitualLevel,tc:GetLevel(),1,99,tc)
+		else
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
+			mat=mg:FilterSelect(tp,c75646415.mfilterf,1,1,nil,tp,mg,tc)
+			Duel.SetSelectedCard(mat)
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
+			local mat2=mg:SelectWithSumEqual(tp,Card.GetRitualLevel,tc:GetLevel(),0,99,tc)
+				mat:Merge(mat2)
+		end
+		tc:SetMaterial(mat)
+		Duel.ReleaseRitualMaterial(mat)
+	Duel.BreakEffect()
+	Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP)
+	tc:CompleteProcedure()
+	end
+end
\ No newline at end of file

expansions/script/c75646416.lua

+--某条街的白日梦 鹿乃
+function c75646416.initial_effect(c)
+	c:EnableReviveLimit()
+	--cannot special summon
+	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)
+	--disable
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e2:SetCode(EVENT_CHAIN_ACTIVATING)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetOperation(c75646416.disop)
+	c:RegisterEffect(e2)
+	--TOGRAVE
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_ATKCHANGE)
+	e3:SetType(EFFECT_TYPE_IGNITION)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCountLimit(1)
+	e3:SetCost(c75646416.cost)
+	e3:SetTarget(c75646416.target)
+	e3:SetOperation(c75646416.operation)
+	c:RegisterEffect(e3)
+end
+function c75646416.disop(e,tp,eg,ep,ev,re,r,rp)
+	if ep==tp then return end
+	local loc=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION)
+	if loc==LOCATION_GRAVE or loc==LOCATION_EXTRA then
+		Duel.NegateEffect(ev)
+	end
+end
+function c75646416.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=Duel.GetDecktopGroup(tp,1)
+	if chk==0 then return g:FilterCount(Card.IsAbleToGraveAsCost,nil)==1 end
+	if g:GetFirst():IsSetCard(0x32c4) then e:SetLabel(1) else e:SetLabel(0) end
+	Duel.DisableShuffleCheck()
+	Duel.SendtoGrave(g,REASON_COST)
+end
+function c75646416.filter(c)
+	return c:IsFaceup() and c:GetAttack()>0
+end
+function c75646416.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_MZONE) and c75646416.filter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c75646416.filter,tp,0,LOCATION_MZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+	local g=Duel.SelectTarget(tp,c75646416.filter,tp,0,LOCATION_MZONE,1,1,nil)
+	if e:GetLabel()==1 then
+		e:SetCategory(CATEGORY_DESTROY)
+		Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
+	end
+end
+function c75646416.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and tc:IsFaceup() and c:IsRelateToEffect(e) and c:IsFaceup() then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetValue(tc:GetAttack())
+		e1:SetReset(RESET_EVENT+0x1ff0000)
+		c:RegisterEffect(e1)
+	end
+	if e:GetLabel()==1 and tc:IsRelateToEffect(e) then
+		Duel.BreakEffect()
+		Duel.Destroy(tc,REASON_EFFECT)
+	end
+end
\ No newline at end of file

expansions/script/c75646417.lua

+--Kano 鹿乃
+function c75646417.initial_effect(c)
+	--spsummon condition
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	c:RegisterEffect(e1)
+	--special summon rule
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_SPSUMMON_PROC)
+	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e2:SetRange(LOCATION_EXTRA)
+	e2:SetCondition(c75646417.sprcon)
+	e2:SetOperation(c75646417.sprop)
+	c:RegisterEffect(e2)
+	--atkup
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetCode(EFFECT_UPDATE_ATTACK)
+	e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_CANNOT_DISABLE)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetValue(c75646417.atkval)
+	c:RegisterEffect(e3)
+	--Draw
+	local e4=Effect.CreateEffect(c)
+	e4:SetDescription(aux.Stringid(75646417,1))
+	e4:SetCategory(CATEGORY_DRAW)
+	e4:SetType(EFFECT_TYPE_QUICK_O)
+	e4:SetCode(EVENT_CHAINING)
+	e4:SetCountLimit(2,EFFECT_COUNT_CODE_SINGLE)
+	e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
+	e4:SetRange(LOCATION_MZONE)
+	e4:SetCondition(c75646417.con1)
+	e4:SetCost(c75646417.cost)
+	e4:SetTarget(c75646417.tg)
+	e4:SetOperation(c75646417.op)
+	c:RegisterEffect(e4)
+	--
+	local e6=Effect.CreateEffect(c)
+	e6:SetDescription(aux.Stringid(75646417,0))
+	e6:SetCategory(CATEGORY_TODECK)
+	e6:SetType(EFFECT_TYPE_QUICK_O)
+	e6:SetCode(EVENT_CHAINING)
+	e6:SetCountLimit(2,EFFECT_COUNT_CODE_SINGLE)
+	e6:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
+	e6:SetRange(LOCATION_MZONE)
+	e6:SetCondition(c75646417.con)
+	e6:SetTarget(c75646417.tg1)
+	e6:SetOperation(c75646417.op1)
+	c:RegisterEffect(e6)
+	--
+	local e7=Effect.CreateEffect(c)
+	e7:SetCategory(CATEGORY_TODECK)
+	e7:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e7:SetCode(EVENT_TO_GRAVE)
+	e7:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e7:SetRange(LOCATION_MZONE)
+	e7:SetCountLimit(1)
+	e7:SetTarget(c75646417.tg2)
+	e7:SetOperation(c75646417.op2)
+	c:RegisterEffect(e7)
+end
+function c75646417.con(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local rc=re:GetHandler()
+	return rc~=c and not c:IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev)
+end
+function c75646417.con1(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local rc=re:GetHandler()
+	return rc~=c and not c:IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev)
+end
+function c75646417.sprfilter(c,type)
+	return c:IsFusionSetCard(0x32c4) and c:IsFusionType(type) and c:IsAbleToGraveAsCost()
+end
+function c75646417.sprcon(e,c)
+	if c==nil then return true end
+	local tp=c:GetControler()
+	return Duel.GetLocationCount(tp,LOCATION_MZONE)>-4
+		and Duel.IsExistingMatchingCard(c75646417.sprfilter,tp,LOCATION_ONFIELD,0,1,nil,TYPE_FUSION)
+		and Duel.IsExistingMatchingCard(c75646417.sprfilter,tp,LOCATION_ONFIELD,0,1,nil,TYPE_SYNCHRO)
+		and Duel.IsExistingMatchingCard(c75646417.sprfilter,tp,LOCATION_ONFIELD,0,1,nil,TYPE_XYZ)
+		and Duel.IsExistingMatchingCard(c75646417.sprfilter,tp,LOCATION_ONFIELD,0,1,nil,TYPE_RITUAL)
+end
+function c75646417.sprop(e,tp,eg,ep,ev,re,r,rp,c)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g1=Duel.SelectMatchingCard(tp,c75646417.sprfilter,tp,LOCATION_ONFIELD,0,1,1,nil,TYPE_FUSION)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g2=Duel.SelectMatchingCard(tp,c75646417.sprfilter,tp,LOCATION_ONFIELD,0,1,1,nil,TYPE_SYNCHRO)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g3=Duel.SelectMatchingCard(tp,c75646417.sprfilter,tp,LOCATION_ONFIELD,0,1,1,nil,TYPE_XYZ)
+	local g4=Duel.SelectMatchingCard(tp,c75646417.sprfilter,tp,LOCATION_ONFIELD,0,1,1,nil,TYPE_RITUAL)
+	g1:Merge(g2)
+	g1:Merge(g3)
+	g1:Merge(g4)
+	c:SetMaterial(g1)
+	Duel.SendtoGrave(g1,REASON_COST)
+end
+function c75646417.vfilter(c)
+	return c:IsSetCard(0x32c4) and (c:IsLocation(LOCATION_GRAVE+LOCATION_ONFIELD) or c:IsFaceup())
+end
+function c75646417.atkval(e,c)
+	return Duel.GetMatchingGroupCount(c75646417.vfilter,c:GetControler(),LOCATION_GRAVE+LOCATION_ONFIELD+LOCATION_REMOVED,0,nil)*400
+end
+function c75646417.efilter(e,re)
+	local loc=Duel.GetChainInfo(re,CHAININFO_TRIGGERING_LOCATION)
+	return re:GetOwner()~=e:GetHandler() and re:IsActivated() and loc==LOCATION_MZONE or loc==LOCATION_SZONE 
+end
+function c75646417.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=Duel.GetDecktopGroup(tp,1)
+	if chk==0 then return g:FilterCount(Card.IsAbleToGraveAsCost,nil)==1 and Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=2 end
+	if g:GetFirst():IsSetCard(0x32c4) then e:SetLabel(1) else e:SetLabel(0) end
+	Duel.DisableShuffleCheck()
+	Duel.SendtoGrave(g,REASON_COST)
+end
+function c75646417.tg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
+	Duel.SetTargetPlayer(tp)
+	Duel.SetTargetParam(1)
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
+	if e:GetLabel()==1 then
+		e:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
+		Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
+		if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
+		Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
+		end
+	end
+end
+function c75646417.op(e,tp,eg,ep,ev,re,r,rp)
+	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
+	Duel.Draw(p,d,REASON_EFFECT)
+	if e:GetLabel()==1 then
+		if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
+		Duel.Destroy(eg,REASON_EFFECT)
+		end
+	end
+end
+function c75646417.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
+	local tp=e:GetHandler():GetControler()
+	if chk==0 then return Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)>0 end
+end
+function c75646417.op1(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoDeck(g,nil,0,REASON_EFFECT)
+	end
+end
+function c75646417.filter(c,e,tp)
+	return c:IsSetCard(0x32c4) and c:GetPreviousControler()==tp
+		and c:IsLocation(LOCATION_GRAVE) and c:IsReason(REASON_COST) and c:IsCanBeEffectTarget(e) and not c:IsForbidden()
+end
+function c75646417.tg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return eg:IsContains(chkc) and c75646417.filter(chkc,e,tp) end
+	if chk==0 then return re and re:GetHandler()~=e:GetHandler() and re:IsHasType(0x7f0) and eg:IsExists(c75646417.filter,1,nil,e,tp) end
+	local g=eg:Filter(c75646417.filter,nil,e,tp)
+	local tc=nil
+	if g:GetCount()>1 then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+		tc=g:Select(tp,1,1,nil):GetFirst()
+	else
+		tc=g:GetFirst()
+	end
+	Duel.SetTargetCard(tc)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,tc,1,0,0)
+end
+function c75646417.op2(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc and tc:IsRelateToEffect(e) then
+		Duel.SendtoDeck(tc,nil,0,REASON_EFFECT)
+	end
+end
\ No newline at end of file

expansions/script/c75646418.lua

+--Day by Day 鹿乃
+function c75646418.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:SetDescription(aux.Stringid(75646418,1))
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetRange(LOCATION_FZONE)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCountLimit(1)
+	e2:SetCondition(c75646418.condition)
+	e2:SetCost(c75646418.cost)
+	e2:SetTarget(c75646418.target)
+	e2:SetOperation(c75646418.operation)
+	c:RegisterEffect(e2)
+	--tohand
+	local e5=Effect.CreateEffect(c)
+	e5:SetDescription(aux.Stringid(75646418,2))
+	e5:SetCategory(CATEGORY_TOHAND)
+	e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e5:SetCode(EVENT_TO_GRAVE)
+	e5:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e5:SetRange(LOCATION_FZONE)
+	e5:SetCountLimit(1,75646418)
+	e5:SetCost(c75646418.cost1)
+	e5:SetTarget(c75646418.tg)
+	e5:SetOperation(c75646418.op)
+	c:RegisterEffect(e5)
+end
+function c75646418.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
+end
+function c75646418.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=Duel.GetDecktopGroup(tp,1)
+	if chk==0 then return g:FilterCount(Card.IsAbleToGraveAsCost,nil)==1 end
+	if g:GetFirst():IsSetCard(0x32c4) then e:SetLabel(1) else e:SetLabel(0) end
+	Duel.DisableShuffleCheck()
+	Duel.SendtoGrave(g,REASON_COST)
+end
+function c75646418.filter(c)
+	return c:IsFaceup() and c:IsSetCard(0x32c4)
+end
+function c75646418.spfilter(c,e,tp)
+	return c:IsSetCard(0x32c4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c75646418.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_ONFIELD) and chkc:IsControler(tp) and c75646418.filter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c75646418.filter,tp,LOCATION_ONFIELD,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+	Duel.SelectTarget(tp,c75646418.filter,tp,LOCATION_ONFIELD,0,1,1,nil)
+	if e:GetLabel()==1 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c75646418.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) then
+		e:SetCategory(CATEGORY_SPECIAL_SUMMON)
+		Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
+	end
+end
+function c75646418.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if not c:IsRelateToEffect(e) then return end
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and tc:IsFaceup() and tc:IsControler(tp) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+		e1:SetRange(LOCATION_ONFIELD)
+		e1:SetCode(EFFECT_IMMUNE_EFFECT)
+		if Duel.GetCurrentPhase()==PHASE_MAIN1 then
+			e1:SetReset(RESET_PHASE+PHASE_MAIN1)
+		else
+			e1:SetReset(RESET_PHASE+PHASE_MAIN2)
+		end
+		e1:SetValue(c75646418.efilter)
+		e1:SetOwnerPlayer(tp)
+		tc:RegisterEffect(e1)
+	end
+	if e:GetLabel()==1 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c75646418.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(75646418,0)) then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local g=Duel.SelectMatchingCard(tp,c75646418.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
+		if g:GetCount()>0 then
+			Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+		end
+	end
+end
+function c75646418.efilter(e,re)
+	return e:GetOwnerPlayer()~=re:GetOwnerPlayer() and re:IsActivated()
+end
+
+function c75646418.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToDeckAsCost,tp,LOCATION_HAND,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectMatchingCard(tp,Card.IsAbleToDeckAsCost,tp,LOCATION_HAND,0,1,1,nil)
+	Duel.SendtoDeck(g,nil,0,REASON_COST)
+end
+function c75646418.filter1(c,e,tp)
+	return c:IsSetCard(0x32c4) and c:GetPreviousControler()==tp
+		and c:IsLocation(LOCATION_GRAVE) and c:IsReason(REASON_COST) and c:IsCanBeEffectTarget(e) and not c:IsForbidden()
+end
+function c75646418.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return eg:IsContains(chkc) and c75646418.filter1(chkc,e,tp) end
+	if chk==0 then return re and re:GetHandler()~=e:GetHandler() and re:IsHasType(0x7f0) and eg:IsExists(c75646418.filter1,1,nil,e,tp) end
+	local g=eg:Filter(c75646418.filter1,nil,e,tp)
+	local tc=nil
+	if g:GetCount()>1 then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+		tc=g:Select(tp,1,1,nil):GetFirst()
+	else
+		tc=g:GetFirst()
+	end
+	Duel.SetTargetCard(tc)
+	Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,tc,1,0,0)
+end
+function c75646418.op(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) then
+		Duel.SendtoHand(tc,nil,REASON_EFFECT)
+	end
+end
\ No newline at end of file

expansions/script/c75646419.lua

+--Alstroemeria 鹿乃
+function c75646419.initial_effect(c)
+	--link summon
+	aux.AddLinkProcedure(c,nil,2,2,c75646419.lcheck)
+	c:EnableReviveLimit()
+	--
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(75646419,1))
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,5646419)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCost(c75646419.cost)
+	e1:SetTarget(c75646419.cptg)
+	e1:SetOperation(c75646419.cpop)
+	c:RegisterEffect(e1)
+	--SpecialSummon
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TODECK)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetCountLimit(1,75646419)
+	e2:SetCondition(c75646419.tdcon)
+	e2:SetTarget(c75646419.tdtg)
+	e2:SetCost(c75646419.tdcost)
+	e2:SetOperation(c75646419.tdop)
+	c:RegisterEffect(e2)   
+	local e3=e2:Clone()
+	e3:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e3)
+end
+function c75646419.lcheck(g,lc)
+	return g:IsExists(Card.IsSetCard,1,nil,0x32c4)
+end
+function c75646419.thcfilter(c)
+	return c:IsSetCard(0x32c4) and c:IsAbleToGraveAsCost()
+end
+function c75646419.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c75646419.thcfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g=Duel.SelectMatchingCard(tp,c75646419.thcfilter,tp,LOCATION_DECK,0,1,1,nil)
+	Duel.SendtoGrave(g,REASON_COST)
+end
+function c75646419.cpfilter(c)
+	return c:IsSetCard(0x32c4) and c:IsType(TYPE_MONSTER)
+end
+function c75646419.cptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsType(TYPE_MONSTER) end
+	if chk==0 then return Duel.IsExistingTarget(c75646419.cpfilter,tp,LOCATION_GRAVE,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+	Duel.SelectTarget(tp,c75646419.cpfilter,tp,LOCATION_GRAVE,0,1,1,nil)
+end
+function c75646419.cpop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if c:IsRelateToEffect(e) and c:IsFaceup() and tc:IsRelateToEffect(e) and (not tc:IsLocation(LOCATION_MZONE) or tc:IsFaceup()) then
+		local code=tc:GetCode()
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e1:SetReset(RESET_EVENT+0x1ff0000+RESET_PHASE+PHASE_END,2)
+		e1:SetCode(EFFECT_CHANGE_CODE)
+		e1:SetValue(code)
+		c:RegisterEffect(e1)
+		c:CopyEffect(code,RESET_EVENT+0x1ff0000+RESET_PHASE+PHASE_END,2)
+	end
+end
+function c75646419.cfilter2(c,g)
+	return c:IsFaceup() and g:IsContains(c) and c:IsSetCard(0x32c4)
+end
+function c75646419.tdcon(e,tp,eg,ep,ev,re,r,rp)
+	local lg=e:GetHandler():GetLinkedGroup()
+	return lg and eg:IsExists(c75646419.cfilter2,1,nil,lg)
+end
+function c75646419.tdcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=Duel.GetDecktopGroup(tp,1)
+	if chk==0 then return g:FilterCount(Card.IsAbleToGraveAsCost,nil)==1 end
+	if g:GetFirst():IsSetCard(0x32c4) then e:SetLabel(1) else e:SetLabel(0) end
+	Duel.DisableShuffleCheck()
+	Duel.SendtoGrave(g,REASON_COST)
+end
+function c75646419.setfilter(c)
+	return c:IsSetCard(0x32c4) and c:IsAbleToDeck()
+end
+function c75646419.filter(c,e,tp)
+	return c:IsSetCard(0x32c4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c75646419.tdtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c75646419.setfilter,tp,LOCATION_GRAVE,0,1,nil) end
+	if e:GetLabel()==1 and Duel.IsExistingMatchingCard(c75646419.filter,tp,LOCATION_DECK,0,1,nil,e,tp) then
+		e:SetCategory(CATEGORY_SPECIAL_SUMMON)
+		Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
+	end
+end
+function c75646419.tdop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectMatchingCard(tp,c75646419.setfilter,tp,LOCATION_GRAVE,0,1,1,nil)
+	if g:GetCount()>0 then
+		if Duel.SendtoDeck(g,nil,2,REASON_EFFECT)~=0 then
+		Duel.ShuffleDeck(tp)
+		end
+	end
+	if e:GetLabel()==1 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c75646419.filter,tp,LOCATION_DECK,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(75646419,0)) then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local g=Duel.SelectMatchingCard(tp,c75646419.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
+		if g:GetCount()>0 then
+			Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+		end
+	end
+end
\ No newline at end of file

expansions/script/c75646421.lua

+--坠落之春 鹿乃
+function c75646421.initial_effect(c)
+	--link summon
+	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0x32c4),3)
+	c:EnableReviveLimit()
+	--todeck
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_TODECK)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1)
+	e1:SetCost(c75646421.cost)
+	e1:SetTarget(c75646421.tg)
+	e1:SetOperation(c75646421.op)
+	c:RegisterEffect(e1)
+	--
+	local e4=Effect.CreateEffect(c)
+	e4:SetCategory(CATEGORY_DECKDES)
+	e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e4:SetCode(EVENT_PHASE+PHASE_END)
+	e4:SetRange(LOCATION_MZONE)
+	e4:SetCountLimit(1)
+	e4:SetCondition(c75646421.tgcon)
+	e4:SetTarget(c75646421.tgtg)
+	e4:SetOperation(c75646421.tgop)
+	c:RegisterEffect(e4)
+end
+function c75646421.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=Duel.GetDecktopGroup(tp,2)
+	if chk==0 then return g:FilterCount(Card.IsAbleToGraveAsCost,nil)==2 end
+	e:SetLabel(g:FilterCount(Card.IsSetCard,nil,0x32c4))
+	Duel.DisableShuffleCheck()
+	Duel.SendtoGrave(g,REASON_COST)
+end
+function c75646421.filter(c)
+	return (c:IsLocation(LOCATION_GRAVE) or c:IsFaceup()) and c:IsSetCard(0x32c4) and c:IsAbleToDeck()
+end
+function c75646421.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and c75646421.filter(chkc) end
+	if chk==0 then return true end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectTarget(tp,c75646421.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,5,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
+	if e:GetLabel()==0 then
+		e:SetCategory(CATEGORY_REMOVE)
+		Duel.SetOperationInfo(0,CATEGORY_REMOVE,e:GetHandler(),1,0,0)
+	elseif e:GetLabel()==1 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c75646421.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) then
+		e:SetCategory(CATEGORY_SPECIAL_SUMMON)
+		Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
+	end
+end
+
+function c75646421.spfilter(c,e,tp)
+	return c:IsSetCard(0x32c4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
+end
+function c75646421.op(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
+	local sg=g:Filter(Card.IsRelateToEffect,nil,e)
+	Duel.SendtoDeck(sg,nil,2,REASON_EFFECT)
+	local g=Duel.GetOperatedGroup()
+	if g:IsExists(Card.IsLocation,1,nil,LOCATION_DECK) then Duel.ShuffleDeck(tp) end
+	if e:GetLabel()==0 and e:GetHandler():IsAbleToRemove() then
+	   Duel.BreakEffect()
+	   Duel.Remove(e:GetHandler(),POS_FACEDOWN,REASON_EFFECT)
+	elseif e:GetLabel()==1 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c75646421.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(75646421,0)) then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local g=Duel.SelectMatchingCard(tp,c75646421.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
+		if g:GetCount()>0 then
+			Duel.BreakEffect()
+			Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP_DEFENSE)
+		end
+	elseif e:GetLabel()==2 and Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)>0 then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+		local g=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,1,nil)
+		if g:GetCount()>0 then
+			Duel.BreakEffect()
+			Duel.DisableShuffleCheck()
+			Duel.SendtoDeck(g,nil,0,REASON_EFFECT)
+		end
+	end
+end
+function c75646421.tgcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFieldGroupCount(tp,0,LOCATION_DECK)>Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)
+end
+function c75646421.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local ct=Duel.GetFieldGroupCount(tp,0,LOCATION_DECK)-Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)
+	if chk==0 then return ct>0 and Duel.IsPlayerCanDiscardDeck(1-tp,ct) end
+	Duel.SetOperationInfo(0,CATEGORY_DECKDES,nil,0,1-tp,ct)
+end
+function c75646421.tgop(e,tp,eg,ep,ev,re,r,rp)
+	local ct=Duel.GetFieldGroupCount(tp,0,LOCATION_DECK)-Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)
+	if ct>0 then
+		Duel.DiscardDeck(1-tp,ct,REASON_EFFECT)
+	end
+end
\ No newline at end of file

expansions/script/c75646423.lua

+--Hope 鹿乃
+function c75646423.initial_effect(c)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(93085839,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
+	e1:SetCountLimit(1,75646423)
+	e1:SetCost(c75646423.spcost)
+	e1:SetTarget(c75646423.sptg)
+	e1:SetOperation(c75646423.spop)
+	c:RegisterEffect(e1)
+	--TOGRAVE
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOGRAVE)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetCode(EVENT_TO_GRAVE)
+	e2:SetCountLimit(1,5646423)
+	e2:SetCondition(c75646423.con)
+	e2:SetTarget(c75646423.tg)
+	e2:SetOperation(c75646423.op)
+	c:RegisterEffect(e2)
+end
+function c75646423.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=Duel.GetDecktopGroup(tp,1)
+	if chk==0 then return g:FilterCount(Card.IsAbleToGraveAsCost,nil)==1 end
+	if g:GetFirst():IsSetCard(0x32c4) then e:SetLabel(1) else e:SetLabel(0) end
+	Duel.DisableShuffleCheck()
+	Duel.SendtoGrave(g,REASON_COST)
+end
+function c75646423.filter(c)
+	return c:IsSetCard(0x32c4) and c:IsAbleToHand() and c:IsFaceup()
+end
+function c75646423.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+	if e:GetLabel()==1
+		and Duel.IsExistingMatchingCard(c75646423.filter,tp,LOCATION_ONFIELD,0,1,e:GetHandler()) then
+		e:SetCategory(CATEGORY_TOHAND)
+		Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_ONFIELD)
+	end
+end
+function c75646423.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)==1 then
+		if e:GetLabel()==1 and Duel.IsExistingMatchingCard(c75646423.filter,tp,LOCATION_ONFIELD,0,1,c) and Duel.SelectYesNo(tp,aux.Stringid(75646407,0)) then
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
+			local g=Duel.SelectMatchingCard(tp,c75646423.filter,tp,LOCATION_ONFIELD,0,1,1,c)
+			if g:GetCount()>0 then
+			Duel.BreakEffect()
+			Duel.SendtoHand(g,nil,REASON_EFFECT)
+			end
+		end
+		if e:GetLabel()==0 then 
+			local e1=Effect.CreateEffect(c)
+			e1:SetType(EFFECT_TYPE_FIELD)
+			e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+			e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+			e1:SetTargetRange(1,0)
+			e1:SetTarget(c75646423.splimit)
+			e1:SetReset(RESET_PHASE+PHASE_END)
+			Duel.RegisterEffect(e1,tp)
+		end			
+	end
+end
+function c75646423.splimit(e,c)
+	return not c:IsSetCard(0x32c4) and c:IsLocation(LOCATION_EXTRA)
+end
+function c75646423.con(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsReason(REASON_COST) and re:IsHasType(0x7f0)
+		and re:GetHandler():IsSetCard(0x32c4)
+end
+function c75646423.filter1(c)
+	return c:IsSetCard(0x32c4) and c:IsAbleToGrave()
+end
+function c75646423.tg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c75646423.filter1,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
+end
+function c75646423.op(e,tp,eg,ep,ev,re,r,rp)
+	if not e:GetHandler():IsRelateToEffect(e) then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g=Duel.SelectMatchingCard(tp,c75646423.filter1,tp,LOCATION_DECK,0,1,2,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoGrave(g,REASON_EFFECT)
+	end
+end
\ No newline at end of file

expansions/strings.conf

@@ -1240,6 +1240,9 @@
 !setname 0x30ea 放光水晶机巧|非「机巧」	クリストロン
 !setname 0x5590 迷影策士
 
+天生 756460095 756 0x2c0-0x2cf
+!setname 0x32c4 鹿乃
+
 #渔人 888 0xc00-0xc0f
 !setname 0xc00 战钢
 !setname 0xc01 黄巾