byd

expansions/script/c20000050.lua

---雾海寂渊·未沫逆潮溟雨鲸
-local m=20000050
-local cm=_G["c"..m]
-xpcall(function() require("expansions/script/1") end,function() require("script/1") end)
-function c20000050.initial_effect(c)
-	c:EnableReviveLimit()
-	aux.AddFusionProcFunFun(c,20000004,aux.FilterBoolFunction(Card.IsRace,RACE_AQUA),2,true,true)
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(m,0))
-	e1:SetCategory(CATEGORY_REMOVE)
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetCountLimit(1,20000050)
-	e1:SetTarget(c20000050.sptg1)
-	e1:SetOperation(c20000050.spop1)
-	c:RegisterEffect(e1)
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(m,1))
-	e2:SetCategory(CATEGORY_TODECK)
-	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
-	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetCode(EVENT_FREE_CHAIN)
-	e2:SetRange(LOCATION_MZONE)
-	e2:SetCountLimit(1,20000051)
-	e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_DAMAGE_STEP+TIMING_END_PHASE+TIMING_END_PHASE)
-	e2:SetCondition(c20000050.rmcon)
-	e2:SetCost(c20000050.rmcost)
-	e2:SetTarget(c20000050.rmtg)
-	e2:SetOperation(c20000050.rmop)
-	c:RegisterEffect(e2)
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(m,2))
-	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
-	e3:SetCode(EVENT_LEAVE_FIELD)
-	e3:SetCondition(c20000050.spcon)
-	e3:SetTarget(c20000050.sptg)
-	e3:SetOperation(c20000050.spop)
-	c:RegisterEffect(e3)
-end
-function c20000050.cfilter(c)
-	return c:IsSetCard(0x99a) and c:IsAbleToRemove()
-end
-function c20000050.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c20000050.cfilter,tp,LOCATION_DECK+LOCATION_EXTRA,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_DECK+LOCATION_EXTRA)
-end
-function c20000050.spop1(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-	local g=Duel.SelectMatchingCard(tp,c20000050.cfilter,tp,LOCATION_DECK+LOCATION_EXTRA,0,1,1,nil)
-	Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
-end
-function c20000050.rmcon(e,tp,eg,ep,ev,re,r,rp)
-	return e:GetHandler():GetFlagEffect(20000050)==0
-end
-function c20000050.costfilter(c)
-	return c:IsSetCard(0x99a) and c:IsAbleToDeckAsCost()
-end
-function c20000050.rmcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c20000050.costfilter,tp,LOCATION_REMOVED+LOCATION_GRAVE,nil,1,nil) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
-	local g=Duel.SelectMatchingCard(tp,c20000050.costfilter,tp,LOCATION_REMOVED+LOCATION_GRAVE,0,1,1,nil)
-	Duel.SendtoDeck(g,nil,nil,REASON_COST)
-end
-function c20000050.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,0,LOCATION_MZONE)
-end
-function c20000050.rmop(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
-	if g:GetCount()>0 then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
-		local sg=g:Select(tp,1,1,nil)
-		Duel.HintSelection(sg)
-		Duel.SendtoDeck(sg,nil,nil,REASON_EFFECT)
-	end
-end
-function c20000050.spcon(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	return c:IsPreviousLocation(LOCATION_ONFIELD)
-end
-function c20000050.spfilter(c,e,tp)
-	return c:IsType(TYPE_FUSION) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
-end
-function c20000050.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(c20000050.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
-end
-function c20000050.spop(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectMatchingCard(tp,c20000050.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp)
-	local tc=g:GetFirst()
-	if tc then
-		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
-	end
-end
\ No newline at end of file

expansions/script/c20000051.lua

---无亘皇帝之显现
-xpcall(function() dofile("expansions/script/c20000000.lua") end,function() dofile("script/c20000000.lua") end)
-local cm,m,o=GetID()
-function cm.initial_effect(c)
-	aux.AddCodeList(c,20000050)
-	_ = fuef.A(c) + "CAT:SP,TG:tg1,OP:op1"
-end
---e1
-cm.Rf1 = function(c) return c:IsCode(20000050) end
-function cm.Rmgf1(n,chk)
-	if chk then
-		return function(tp,g,c) return #fugf.Filter(g,"IsLoc","D")<=n end
-	else
-		return function(g) return #fugf.Filter(g,"IsLoc","D")<=n end
-	end
-end
-function cm.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then
-		local mg=Duel.GetRitualMaterial(tp)
-		local rg=fugf.GetFilter(tp,"D","IsSet+AbleTo+IsLv","3fd0,R,+1")
-		local n=Duel.GetFlagEffect(tp,m)==0 and 1 or 0
-		aux.RCheckAdditional=cm.Rmgf1(n,1)
-		aux.RGCheckAdditional=cm.Rmgf1(n)
-		n = fugf.GetFilter(tp,"HG","RitualUltimateFilter",{cm.Rf1,e,tp,mg,rg,Card.GetLevel,"Greater"},1)
-		aux.RCheckAdditional=nil
-		aux.RGCheckAdditional=nil
-		return n
-	end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE)
-	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,0,tp,LOCATION_DECK)
-end
-function cm.op1(e,tp,eg,ep,ev,re,r,rp)
-	local mg=Duel.GetRitualMaterial(tp)
-	local rg=fugf.GetFilter(tp,"D","IsSet+AbleTo+IsLv","3fd0,R,+1")
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local n=Duel.GetFlagEffect(tp,m)==0 and 1 or 0
-	aux.RCheckAdditional=cm.Rmgf1(n,1)
-	aux.RGCheckAdditional=cm.Rmgf1(n)
-	local tc=fugf.SelectFilter(tp,"HG","RitualUltimateFilter+GChk",{{cm.Rf1,e,tp,mg,rg,Card.GetLevel,"Greater"}}):GetFirst()
-	if not tc then return end
-	mg=mg:Filter(Card.IsCanBeRitualMaterial,tc,tc)
-	mg:Merge(rg)
-	mg=mg:Filter(tc.mat_filter or aux.TRUE,tc,tp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
-	aux.GCheckAdditional=aux.RitualCheckAdditional(tc,tc:GetLevel(),"Greater")
-	mg=mg:SelectSubGroup(tp,aux.RitualCheck,false,1,tc:GetLevel(),tp,tc,tc:GetLevel(),"Greater")
-	aux.GCheckAdditional=nil
-	if not mg or #mg==0 then
-		aux.RCheckAdditional=nil
-		aux.RGCheckAdditional=nil
-		return
-	end
-	tc:SetMaterial(mg)
-	rg=fugf.Filter(mg,"IsLoc","D")
-	if #rg>0 then
-		mg:Sub(rg)
-		Duel.Remove(rg,POS_FACEUP,REASON_EFFECT+REASON_MATERIAL+REASON_RITUAL)
-		Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
-	end
-	Duel.ReleaseRitualMaterial(mg)
-	Duel.BreakEffect()
-	Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP)
-	tc:CompleteProcedure()
-	aux.RCheckAdditional=nil
-	aux.RGCheckAdditional=nil
-end
\ No newline at end of file

expansions/script/c20000052.lua

---无亘龙 特里纳塔奇
-xpcall(function() dofile("expansions/script/c20000000.lua") end,function() dofile("script/c20000000.lua") end)
-fu_imm = fu_imm or {}
-function fu_imm.initial(cm,cat,typ,...)
-	cm.initial_effect = fu_imm.give(cm,cat,typ,...)
-	return cm
-end
-function fu_imm.give(cm,cat,typ,...)
-	local list = {...}
-	return function(c)
-		cm.lib = fu_imm
-		local E = fuef[typ](c,nil,table.unpack(list))
-		fuef.FG(c,c,"GR,M+0,give_con1,give_tg1,,",E.e)
-		fuef.STO(c,c,"BM,",cat,"DE",c:GetCode(),"give_con2,,tg2,op2")
-	end
-end
-fu_imm.give_con1 = function(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(20000052)>0 end
-fu_imm.give_tg1 = function(e,c) return fucf.Filter(c,"IsTyp+IsRac","RI+M,DR") end
-function fu_imm.give_con2(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if fucf.IsLoc(c,"GR") and r==REASON_RITUAL and fucf.IsRac(c:GetReasonCard(),"DR") then
-		c:RegisterFlagEffect(20000052,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(20000052,0))
-		return true
-	end
-	return false
-end
---------------------------------
-if not self_table then return false end
-local cm = fu_imm.initial(self_table,"SH","SC",EVENT_BATTLE_DAMAGE,",,M,1,con1,op1")
---e1
-cm.con1 = function(e,tp,eg,ep,ev,re,r,rp) return ep~=tp end
-cm.op1 = function(e,tp,eg,ep,ev,re,r,rp) Duel.Draw(tp,1,REASON_EFFECT) end
---e2
-function cm.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return fugf.GetFilter(tp,"D","IsTyp+AbleTo","RI+M,H",1) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-end
-function cm.op2(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=fugf.SelectFilter(tp,"D","IsTyp+AbleTo","RI+M,H")
-	if #g==0 then return end
-	Duel.SendtoHand(g,nil,REASON_EFFECT)
-	Duel.ConfirmCards(1-tp,g)
-end
\ No newline at end of file

expansions/script/c20000053.lua

---无亘龙 农兰
-xpcall(function() dofile("expansions/script/c20000052.lua") end,function() dofile("script/c20000052.lua") end)
-local cm = self_table
-function cm.initial_effect(c)
-	aux.AddCodeList(c,20000051)
-	fu_imm.give(cm,"SH","SC",EVENT_BATTLED,",,M,1,,op1")(c)
-end
---e1
-function cm.op1(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local d=Duel.GetAttackTarget()
-	if d==c then d=Duel.GetAttacker() end
-	if d and d:IsStatus(STATUS_BATTLE_DESTROYED) and d:IsType(TYPE_EFFECT) and not c:IsStatus(STATUS_BATTLE_DESTROYED) then
-		_ = fuef.S(c,d,EFFECT_DISABLE) + "RES:EV+STD"
-	end
-end
---e2
-function cm.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return fugf.GetFilter(tp,"D","IsTyp+AbleTo","RI+S,H",1) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-end
-function cm.op2tg1(e,c,sump,sumtype,sumpos,targetp,se)
-	return not c:IsRace(RACE_DRAGON) and sumtype==SUMMON_TYPE_RITUAL
-end
-function cm.op2(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local tc=fugf.SelectFilter(tp,"D","IsTyp+AbleTo","RI+S,H"):GetFirst()
-	if not tc then return end
-	Duel.SendtoHand(tc,nil,REASON_EFFECT)
-	Duel.ConfirmCards(1-tp,tc)
-	if not tc:IsSetCard(0x3fd0) then fuef.F(e,tp,EFFECT_CANNOT_SPECIAL_SUMMON,",PTG,,1+0,,,,op2tg1,,PH/ED") end
-end
\ No newline at end of file

expansions/script/c20000054.lua

---无亘龙 杜米利奥尼
-xpcall(function() dofile("expansions/script/c20000052.lua") end,function() dofile("script/c20000052.lua") end)
-local cm = fu_imm.initial(self_table,"SH","FC",EVENT_CHAIN_SOLVED,",,M,,con1,op1")
---e1
-cm.con1 = function(e,tp,eg,ep,ev,re,r,rp)return re and re:GetHandler()==e:GetHandler()end
-function cm.op1(e,tp,eg,ep,ev,re,r,rp)
-	for c in aux.Next(fugf.GetFilter(tp,"M","IsTyp+IsRac+IsPos","RI+M,DR,FU")) do
-		fuef.S(e,c,EFFECT_UPDATE_ATTACK,",,M,250,,,,EV+STD")
-	end
-end
---e2
-function cm.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
-	local c=e:GetHandler():GetReasonCard()
-	if chk==0 then return fugf.Filter(c:GetMaterial(),"IsRLv",{"+1",c},1) and fugf.GetFilter(tp,"D","IsSet+AbleTo","3fd0,H",1) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-end
-function cm.op2(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler():GetReasonCard()
-	local g=fugf.Filter(c:GetMaterial(),"IsRLv",{"+1",c})
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	g=fugf.SelectFilter(tp,"D","IsSet+AbleTo","3fd0,H",nil,1,#g)
-	if #g==0 then return end
-	Duel.SendtoHand(g,nil,REASON_EFFECT)
-	Duel.ConfirmCards(1-tp,g)
-end
\ No newline at end of file

expansions/script/c20000055.lua

---无亘龙 赞米利亚登
-xpcall(function() dofile("expansions/script/c20000052.lua") end,function() dofile("script/c20000052.lua") end)
-local cm = self_table
-function cm.initial_effect(c)
-	fu_imm.give(cm,"TH","F",EFFECT_CHANGE_DAMAGE,",PTG,M,+1,val1")(c)
-	if cm.glo then return end
-	cm.glo={0,0}
-	fuef.FC(c,0,EVENT_PHASE_START+PHASE_DRAW,",,,,,op3*1")(EVENT_BATTLE_DAMAGE,0,"OP:op3*")
-end
---e1
-function cm.val1(e,re,dam,r,rp,rc)
-	return r==REASON_BATTLE and cm.glo[2-rp]>dam and cm.glo[2-rp] or dam
-end
---e2
-function cm.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return #e:GetHandler():GetReasonCard():GetMaterial()>0 and fugf.GetFilter(tp,"GR","IsSet+AbleTo+IsPos","3fd0,H,FU",1) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-end
-function cm.op2(e,tp,eg,ep,ev,re,r,rp)
-	local g=e:GetHandler():GetReasonCard():GetMaterial()
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	g=fugf.SelectFilter(tp,"GR","IsSet+AbleTo+IsPos+GChk","3fd0,H,FU",nil,1,#g)
-	if #g==0 then return end
-	Duel.SendtoHand(g,nil,REASON_EFFECT)
-	Duel.ConfirmCards(1-tp,g)
-end
---e3
-function cm.op3(chk)
-	return function(e,tp,eg,ep,ev,re,r,rp)
-		if chk then cm.glo={0,0}
-		else cm.glo[ep+1]=ev>cm.glo[ep+1] and ev or cm.glo[ep+1] end
-	end
-end
\ No newline at end of file

expansions/script/c20000056.lua

---无亘龙 古戈尔普勒克斯
-xpcall(function() dofile("expansions/script/c20000052.lua") end,function() dofile("script/c20000052.lua") end)
-local cm = self_table
-function cm.initial_effect(c)
-	fu_imm.give(cm,"","SC",EVENT_BATTLE_DESTROYING,",,M,,bdocon,op1")(c)
-	_ = fuef.FC(c,c,EFFECT_DESTROY_REPLACE,",,G,m,,op3") + "TG:tg3,VAL:val3"
-end
---e1
-function cm.op1(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_DESTROY)
-	local g=fugf.SelectFilter(1-tp,"HMS")
-	if #g==0 then return end
-	Duel.Destroy(g,REASON_EFFECT)
-end
---e2
-cm.tg2 = aux.FALSE
---e3
-function cm.tg3(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsAbleToRemove() and fugf.Filter(eg,"IsTyp+IsRac+IsRea+IsPos+IsLoc+IsControler",{"RI+M,DR,EFF/BAT-REP,FU,M",tp},1) end
-	return Duel.SelectEffectYesNo(tp,e:GetHandler(),96)
-end
-function cm.val3(e,c)
-	return fucf.Filter(c,"IsTyp+IsRac+IsRea+IsPos+IsLoc+IsControler",{"RI+M,DR,EFF/BAT-REP,FU,M",e:GetHandlerPlayer()})
-end
-function cm.op3(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT)
-end
\ No newline at end of file

expansions/script/c20000057.lua

---梦幻暗物质
-xpcall(function() dofile("expansions/script/c20000000.lua") end,function() dofile("script/c20000000.lua") end)
-local cm,m,o=GetID()
-function cm.initial_effect(c)
-	aux.AddCodeList(c,20000050)
-	fuef.S(c,c,EFFECT_EQUIP_LIMIT,",CD,,val1")
-	fuef.B_A(c,c,",,EQ,TG+CTG,,,,tg2,op2")
-	fuef.F(c,c,EFFECT_TO_GRAVE_REDIRECT,",IG+AR+SET,S,A+A",LOCATION_REMOVED,",,tg3")
-	fuef.E(c,c,EFFECT_PIERCE,",1")(EFFECT_IMMUNE_EFFECT,c,"VAL:val5,CON:con5")
-end
---e1
-function cm.val1(e,c)
-	return c:IsCode(20000050)
-end
---e2
-function cm.tg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	local g=fugf.GetFilter(tp,"M","IsCod+TgChk+IsFaceup",{50,e})
-	if chkc then return g:IsContains(chkc) end
-	if chk==0 then return #g>0 end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
-	fugf.SelectTg(tp,"M","IsCod+TgChk+IsFaceup",{50,e})
-	Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)
-end
-function cm.op2(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 tc:IsFaceup() and c:CheckUniqueOnField(tp) then
-		Duel.Equip(tp,c,tc)
-	end
-end
---e3
-function cm.tg3(e,c)
-	return c:GetOwner()~=e:GetHandlerPlayer() and c:IsReason(REASON_DESTROY) and c:IsReason(REASON_BATTLE+REASON_EFFECT)
-end
---e4
-function cm.val5(e,te)
-	return te:GetOwnerPlayer()~=e:GetOwnerPlayer()
-end
-function cm.con5(e)
-	local ph=Duel.GetCurrentPhase()
-	return not (ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE)
-end

expansions/script/c20000058.lua

---幻梦龙 无限
-xpcall(function() dofile("expansions/script/c20000000.lua") end,function() dofile("script/c20000000.lua") end)
-local cm = self_table
-function cm.initial_effect(c)
-	aux.EnablePendulumAttribute(c)
-	aux.AddCodeList(c,20000059)
-	fuef.I(c,c,"SH,SH,,P,m,,cos2,tg2,op2")(nil,c,",,,E,,,bfgcost,tg1,op1")
-end
---e1
-function cm.tgf1(c)
-	return c:IsFaceup() and not c:IsAttack(c:GetBaseAttack())
-end
-function cm.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsFaceup() and fugf.GetFilter(tp,"M+M",cm.tgf1,nil,1) end
-end
-function cm.op1(e,tp,eg,ep,ev,re,r,rp)
-	local g = fugf.GetFilter(tp,"M+M",cm.tgf1)
-	for tc in aux.Next(fugf.GetFilter(tp,"M+M",cm.tgf1)) do
-		local atk = tc:GetAttack()
-		fuef.S(e,tc,EFFECT_SET_BASE_ATTACK,",,"..atk..",,,EV+STD")
-		atk = tc:GetBaseAttack()
-		fuef.S(e,tc,EFFECT_SET_ATTACK_FINAL,",,"..atk..",,,EV+STD")
-	end
-end
---e2
-function cm.cos2(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return fugf.GetFilter(tp,"H","IsDiscardable",nil,1) end
-	Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)
-end
-function cm.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return fugf.GetFilter(tp,"D","IsCod+AbleTo","59,H",1) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-end
-function cm.op2(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=fugf.SelectFilter(tp,"D","IsCod+AbleTo","59,H")
-	if #g==0 then return end
-	Duel.SendtoHand(g,nil,REASON_EFFECT)
-	Duel.ConfirmCards(1-tp,g)
-end
\ No newline at end of file

expansions/script/c20000059.lua

---幻梦龙 零
-xpcall(function() dofile("expansions/script/c20000000.lua") end,function() dofile("script/c20000000.lua") end)
-local cm = self_table
-function cm.initial_effect(c)
-	aux.EnablePendulumAttribute(c)
-	aux.AddCodeList(c,20000050)
-	fuef.I(c,c,",REC,PTG,E,,,bfgcost,tg1,op1")(nil,c,"SP,SP+DES,TG,P,m,,,tg2,op2")
-end
---e1
-function cm.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
-	local g,atk = fugf.GetFilter(tp,"M","IsFaceup"):GetMaxGroup(Card.GetBaseAttack)
-	if chk==0 then return e:GetHandler():IsFaceup() and g and #g>0 end
-	Duel.SetTargetPlayer(tp)
-	Duel.SetTargetParam(atk)
-	Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,atk)
-end
-function cm.op1(e,tp,eg,ep,ev,re,r,rp)
-	local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
-	local g,atk = fugf.GetFilter(p,"M+","IsFaceup"):GetMaxGroup(Card.GetBaseAttack)
-	if #g==0 then return end
-	Duel.Recover(p,atk,REASON_EFFECT)
-end
---e2
-function cm.tgf2(c,e,tp)
-	return fucf.Filter(c,"TgChk+IsOTyp+(IsLoc/IsPos)",e,"M,M,FU") and fugf.GetFilter(tp,"D","IsCod+CanSp",{50,{e,tp,0,1}},1) 
-		and Duel.GetMZoneCount(tp,c)>0 and c ~= e:GetHandler()
-end
-function cm.tg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	local g=fugf.GetFilter(tp,"MS",cm.tgf2,{e,tp})
-	if chkc then return chkc:IsControler(tp) and g:IsContains(chkc) end
-	if chk==0 then return #g>0 end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
-	local g = fugf.SelectTg(tp,"MS",cm.tgf2,{e,tp}) + e:GetHandler()
-	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,2,0,0)
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
-end
-function cm.op2(e,tp,eg,ep,ev,re,r,rp)
-	local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e) + e:GetHandler()
-	if #tg~=2 or Duel.Destroy(tg,REASON_EFFECT)~=2 or Duel.GetLocationCount(tp,LOCATION_MZONE)==0 then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local tc=fugf.SelectFilter(tp,"D","IsCod+CanSp",{50,{e,tp,0,1}},1):GetFirst()
-	if not tc then return end
-	Duel.SpecialSummon(tc,0,tp,tp,true,false,POS_FACEUP)
-end
\ No newline at end of file

expansions/script/c20000060.lua

---虚数转生
-xpcall(function() dofile("expansions/script/c20000000.lua") end,function() dofile("script/c20000000.lua") end)
-local cm,m,o=GetID()
-function cm.initial_effect(c)
-	fuef.A(c)
-	fuef.FTO(c,c,"m,TH,TH+GA,DE,S,m,,,tg1,op1")
-	if cm.glo then return end
-	cm.glo = fuef.FC(c,0,"SP,,,,,,op2")(EVENT_LEAVE_FIELD_P,0,"OP:op3")
-end
---e1
-function cm.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
-	local g,b = Group.CreateGroup()
-	for c in aux.Next(eg) do
-		b = true
-		for tc in aux.Next(c:GetMaterial()) do
-			if b then b = fucf.Filter(tc,"IsLoc+IsRea+AbleTo","GR,RI+MAT,H") and tc:GetReasonCard() == c end
-		end
-		if b and chk==0 then return 1 end
-	end
-	if chk==0 then return false end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
-end
-function cm.op1(e,tp,eg,ep,ev,re,r,rp)
-	local g,b = Group.CreateGroup()
-	for c in aux.Next(eg) do
-		b = true
-		for tc in aux.Next(c:GetMaterial()) do
-			if b then b = fucf.Filter(tc,"IsLoc+IsRea+AbleTo+GChk","GR,RI+MAT,H") and tc:GetReasonCard() == c end
-		end
-		if b then g = g + c end
-	end
-	if #g==0 then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
-	g = (#g==1 and g or g:Select(tp,1,1,nil)):GetFirst():GetMaterial()
-	Duel.HintSelection(g)
-	Duel.SendtoHand(g,nil,REASON_EFFECT)
-	Duel.ConfirmCards(1-tp,g)
-end
---e2
-function cm.op2(e,tp,eg,ep,ev,re,r,rp)
-	for c in aux.Next(fugf.Filter(eg,"IsSTyp","RI")) do
-		c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD,0,1)
-	end
-end
---e3
-function cm.op3(e,tp,eg,ep,ev,re,r,rp)
-	local g = Group.CreateGroup()
-	for c in aux.Next(eg) do
-		if c:GetFlagEffect(m)>0 then g = g + c end
-	end
-	if #g>0 then Duel.RaiseEvent(g,EVENT_CUSTOM+m,re,r,rp,ep,ev) end
-end
\ No newline at end of file

expansions/script/c20000061.lua

---无亘幻梦传说
-xpcall(function() dofile("expansions/script/c20000000.lua") end,function() dofile("script/c20000000.lua") end)
-local cm,m,o = GetID()
-function cm.initial_effect(c)
-	fuef.A(c)
-	fuef.F(c,c,EFFECT_DIRECT_ATTACK,",,F,M+M,,,,tg1")
-	fuef.FTO(c,c,EVENT_PHASE+PHASE_BATTLE,",,,F,1,con2,,,op2")
-	if cm.glo then return end
-	cm.op4()
-	fuef.FC(c,0,EVENT_BATTLE_DAMAGE,",,,,,op3")(EVENT_PHASE_START+PHASE_DRAW,0,"OP:op4")
-end
---e1
-function cm.tg1(e,c)
-	return c:IsAttackBelow(1000)
-end
---e2
-function cm.con2(e,tp,eg,ep,ev,re,r,rp)
-	return cm.glo[tp+1]>0
-end
-function cm.op2(e,tp,eg,ep,ev,re,r,rp)
-	local val = cm.glo[tp]
-	fuef.F(e,tp,EFFECT_CHANGE_DAMAGE,",PTG,,1+0,op2val1,,,,,PH/ED|2,"..val)
-end
-function cm.op2val1(e,re,dam,r,rp,rc)
-	local val = dam - e:GetLabel()
-	return val>0 and dam or 0
-end
---e3
-function cm.op3(e,tp,eg,ep,ev,re,r,rp)
-	cm.glo[rp+1] = cm.glo[rp+1] + (ev or 0)
-end
---e4
-function cm.op4(e,tp,eg,ep,ev,re,r,rp)
-	cm.glo = {0,0} 
-end
\ No newline at end of file

expansions/script/c20000062.lua

---无亘风暴
-xpcall(function() dofile("expansions/script/c20000000.lua") end,function() dofile("script/c20000000.lua") end)
-local cm,m,o=GetID()
-function cm.initial_effect(c)
-	fuef.B_A(c,c,",,TH,,,,,tg1,op1")
-end
---e1
-function cm.tgf1(g,atk)
-	return g:IsExists(Card.IsAttackBelow,1,nil,atk)
-end
-function cm.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
-	local atk = 0
-	for c in aux.Next(fugf.GetFilter(tp,"M","IsTyp+IsPos","RI+M,FU")) do
-		atk = atk + c:GetAttack()
-	end
-	local g = fugf.GetFilter(tp,"M","IsPos","FU")
-	if chk==0 then return g:CheckSubGroup(cm.tgf1,1,#g,atk) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
-end
-function cm.opf1(g,atk)
-	for c in aux.Next(g) do
-		atk = atk - c:GetAttack()
-	end
-	return atk>0
-end
-function cm.op1(e,tp,eg,ep,ev,re,r,rp)
-	local atk = 0
-	for c in aux.Next(fugf.GetFilter(tp,"M","IsTyp+IsPos","RI+M,FU")) do
-		atk = atk + c:GetAttack()
-	end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
-	local g = fugf.GetFilter(tp,"+M","IsPos","FU"):SelectSubGroup(tp,cm.opf1,false,1,99,atk)
-	if g:GetCount()>0 then
-		Duel.SendtoHand(g,nil,REASON_EFFECT)
-	end
-end

expansions/script/c20000063.lua

---幻梦无亘帝龙
-xpcall(function() dofile("expansions/script/c20000000.lua") end,function() dofile("script/c20000000.lua") end)
-local cm,m,o=GetID()
-function cm.initial_effect(c)
-	aux.AddCodeList(c,20000050,20000051)
-	aux.EnableChangeCode(c,20000050,LOCATION_HAND+LOCATION_MZONE+LOCATION_GRAVE)
-	fuef.QO(c,c,"CH,,NEGA+DES,DAM+CAL,M,1,con1,,tg1,op1")
-end
---e1
-function cm.con1(e,tp,eg,ep,ev,re,r,rp)
-	local c,rc=e:GetHandler(),re:GetHandler()
-	local g = fugf.Get(tp,"M+M"):GetMaxGroup(Card.GetBaseAttack)
-	return re:IsActiveType(TYPE_MONSTER) and rc:IsOnField() and not c:IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) and g and not g:IsContains(rc)
-end
-function cm.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
-	if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
-		Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
-	end
-end
-function cm.op1(e,tp,eg,ep,ev,re,r,rp)
-	local c,rc=e:GetHandler(),re:GetHandler()
-	if Duel.NegateActivation(ev) and rc:IsRelateToEffect(re) and Duel.Destroy(rc,REASON_EFFECT)~=0 and rc:GetBaseAttack()>=0
-		and c:IsRelateToEffect(e) and c:IsFaceup() then
-		local atk = c:GetBaseAttack() + rc:GetBaseAttack()
-		fuef.S(c,c,EFFECT_UPDATE_ATTACK,",,,"..(rc:GetBaseAttack())..",,,,EV+STD+PH/ED")
-	end
-end
\ No newline at end of file

expansions/script/c20000064.lua

---无亘皇帝之跃升
-xpcall(function() dofile("expansions/script/c20000000.lua") end,function() dofile("script/c20000000.lua") end)
-local cm,m,o=GetID()
-function cm.initial_effect(c)
-	aux.AddCodeList(c,20000050)
-	aux.AddRitualProcGreater2(c,aux.FilterBoolFunction(Card.IsCode,20000050),nil,aux.TRUE,nil,nil,cm.opr)
-	fuef.FTO(c,c,"SP,,TH+GA,,G,m,con1,,tg1,op1")
-end
---r
-function cm.opr(e,tp,eg,ep,ev,re,r,rp,tc,mat)
-	local atk = 0
-	for c in aux.Next(mat) do
-		atk = atk + c:GetBaseAttack()
-	end
-	atk = math.floor(atk/2) + tc:GetBaseAttack()
-	fuef.S(e,tc,EFFECT_SET_BASE_ATTACK,",IG,,"..(atk)..",,,,EV+STD")
-end
---e1
-function cm.con1(e,tp,eg,ep,ev,re,r,rp)
-	return fugf.Filter(eg,"IsSTyp","RI",1)
-end
-function cm.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return fugf.GetFilter(tp,"G","IsTyp+AbleTo+Not",{"RI+S,H",e},1) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
-
-	local c=e:GetHandler()
-	if chk==0 then return e:GetHandler():IsAbleToHand() end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,c,1,0,0)
-end
-function cm.op1(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) and Duel.SendtoHand(c,nil,REASON_EFFECT)>0 then
-		local g=fugf.GetFilter(tp,"G","IsTyp+AbleTo+GChk","RI+M,H")
-		if #g>0 and Duel.SelectYesNo(tp,1190) then
-			Duel.BreakEffect()
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-			g=g:Select(tp,1,1,nil)
-			Duel.SendtoHand(g,nil,REASON_EFFECT)
-			Duel.ConfirmCards(1-tp,g)
-		end
-	end
-end

expansions/strings.conf

@@ -247,6 +247,7 @@
 !setname 0xa77 业狱火
 !setname 0x3a78 转天魔具
 !setname 0xa79 陨星石
+!setname 0x6a70 寒霜华符
 !setname 0xa7a 璇击
 !setname 0x3a7a 封璇击
 !setname 0x3a7b 璇姬
@@ -449,6 +450,7 @@
 !setname 0x820 雾海寂渊
 !setname 0x821 血罪灵骸
 !setname 0x822 奇物
+!setname 0x823 戏世游寰
 !counter 0x1820 灵骸指示物
 
 #imun. 3545696124 190 0x7a0-0x7af
@@ -461,8 +463,9 @@
 !counter 0x1990 七色人形剧指示物
 
 #小壶 1701585682 200 0xfd0-0xfdf
-!setname 0x3fd0 无亘
 !setname 0x5fd1 圣沌
+!setname 0xbfd4 创导龙裔
+!setname 0x3fd4 创导龙
 
 #Cirn 282383134 201 0xc90-c9f
 !setname 0xc90 刀使
@@ -584,6 +587,10 @@
 
 #兔子 3136516985 313
 
+#fffd 3174054935 317 0x690-0x69f
+!setname 0x690 暴风雨
+!setname 0x691 作战指令
+
 #VHisc 916214730 332 0x320-0x32f
 !setname 0x321 锻溶
 !setname 0x322 铁战灵兽
@@ -917,6 +924,7 @@
 #AddCodeList(47390101) LCB=罪人 李箱卡名记述
 #AddCodeList(47390131) LCB=罪人 浮士德卡名记述
 #AddCodeList(47390161) LCB=罪人 唐吉诃德卡名记述
+#AddCodeList(47390191) LCB=罪人 良秀卡名记述
 #AddCodeList(47390251) LCB=罪人 鸿璐卡名记述
 #AddCodeList(47390281) LCB=罪人 希斯克利夫卡名记述
 #AddCodeList(47390311) LCB=罪人 以实玛利卡名记述
@@ -1026,13 +1034,35 @@
 
 #竹子 1252425371 600 0x620-0x62f
 !setname 0x3620 永夜抄
-!setname 0x621 灵代
+!setname 0x6620 灵代
+!setname 0xa620 时光酒桌
 !setname 0x626 黄昏
 !setname 0x3626 黄昏之骑士
 !setname 0x6629 伊兹尼亚
 !setname 0x9629 埃亚隆
 !setname 0xa629 那塔拉
 !setname 0xc629 玛那
+!setname 0x362a 干员
+!setname 0x562a 先锋干员
+!setname 0x662a 近卫干员
+!setname 0x962a 重装干员
+!setname 0xa62a 狙击干员
+!setname 0xc62a 术士干员
+!setname 0x362b 医疗干员
+!setname 0x562b 辅助干3员
+!setname 0x662b 特种干员
+!setname 0x962b 行动
+!setname 0xa62b 部署
+!setname 0xc62b 据点
+!setname 0x362c 罗德岛
+!setname 0x562c 维多利亚
+!setname 0x662c 卡西米尔
+!setname 0x962c 谢拉格
+!setname 0xa62c 企鹅物流
+!setname 0xc62c 炎国
+!setname 0x362d 乌萨斯
+!setname 0x562d 莱茵生命
+!setname 0x662d 黑钢国际
 !setname 0x62e 圣兽装骑
 !setname 0x362e 圣兽装骑·鲸
 !setname 0x562e 圣兽装骑·鲨
@@ -1041,6 +1071,7 @@
 #AddCodeList(60001179) 紫罗兰永恒花园卡名记述
 !counter 0x624 进化指示物
 !counter 0x625 吟唱指示物
+!counter 0x162a 源石指示物
 
 #LaiBill 529508379 601 0xb20-0xb2f
 !setname 0xab20 幻想曲
@@ -1080,8 +1111,12 @@
 #夕阳下的猫/枫不见 3751989547/1060111344 626 0x6d0-0x6df
 !setname 0x6d0 仙狸
 !setname 0x6d1 世界猫咪联盟
+!setname 0x6de 千古食魂录
 !setname 0x6df 猫箱反转
 !counter 0x16da 蝴蝶指示物
+!counter 0x6dd 触足指示物
+!counter 0x6dc 弦音指示物
+!counter 0x16de 像素化指示物
 !counter 0x16df 基因污染指示物
 
 #希尔薇 - 639 0x860-0x86f
@@ -1167,6 +1202,9 @@
 !setname 0x5dab 大械鬼
 !setname 0x6dab 晶生花
 !setname 0x9dab 拘灵警差
+!setname 0xadab 魔商人	
+!setname 0x3dac 祈言者	
+!setname 0x5dac 神言册	
 !setname 0x6dac 神魔
 !setname 0x9dac 仙石守护灵
 !setname 0x3dad 灾兽
@@ -1324,6 +1362,7 @@
 !setname 0xa10 绯红编年史
 
 #yee 1138772630 792 0x5c0-0x5cf
+!setname 0x5c0 星钢
 #cm.setcard="Abnormality" 异想体
 !counter 0x15c1 异想体指示物
 
@@ -1354,10 +1393,31 @@
 !setname 0x850 茶☆苦☆茶
 !setname 0x1850 無☆茶☆苦☆茶
 !setname 0x2850 滅☆茶☆苦☆茶
+!setname 0x851 TC.
+!setname 0x3851 M-TC.
+!setname 0x6851 S-TC.
+!setname 0xa851 F-TC.
+!setname 0xc851 C-TC.
 !setname 0x855 都市传说
+#AddCodeList(81902001) TC.记述
+#AddCodeList(81902003) 都市传说记述
 !counter 0x850 恋之埋火指示物
 !counter 0x1851 传染病指示物
 !counter 0x853 灾厄指示物
+!counter 0x1855 完美冻结指示物
+
+#屋屋赛高 - 820 0xf50-0xf5f
+!setname 0xf55 法属乏术型物
+!setname 0x3f55 屋屋
+!setname 0xf57 屋屋特制法属
+!setname 0x3f57 法属乏术空物
+!setname 0xaf57 作战指令
+!setname 0xf58 法属乏术
+!setname 0xf59 卡丘世界
+!setname 0x7f59 超弦体技能
+!setname 0xaf59 机电棋子
+!counter 0x1f59 毁灭点
+!counter 0x3f59 技能点
 
 #互联网流浪者-深渊 3565313751 842 0x840-0x84f
 !setname 0x840 天弃乱域
@@ -1435,6 +1495,9 @@
 #陀螺 3161407259 930 0xaf0-0xaff
 !setname 0xaf0 异魔神
 
+#希腊奶 2471008380 954 0xac0-acf
+!setname 0xace 无极海
+
 #水镜 457663161 960 0xef0-0xeff
 !setname 0xef1 侍神
 !setname 0x3ef1 森岭