231105 wild

expansions/lflist.conf

@@ -126,6 +126,17 @@
 11560322 0
 11560323 0
 11662004 0
+12070000 0
+12070001 0
+12070002 0
+12070003 0
+12070004 0
+12070005 0
+12070006 0
+12070007 0
+12071003 0
+12071005 0
+12071006 0
 12678871 0
 13131365 0
 14000129 0
@@ -155,6 +166,7 @@
 15000318 0
 15004002 0
 15004003 0
+15090003 0
 15291627 0
 16170003 0
 16200000 0
@@ -178,6 +190,7 @@
 18678558 0
 19198211 0
 20220679 0
+22021680 0
 22348028 0
 22348134 0
 25000000 0
@@ -462,6 +475,10 @@
 53752014 0
 53752019 0
 53796106 0
+53796160 0
+53796161 0
+53796162 0
+53796163 0
 58510970 0
 60001009 0
 60001158 0
@@ -504,11 +521,19 @@
 60002084 0
 60002192 0
 60002302 0
+60002376 0
+60002404 0
+60002405 0
+60002406 0
+60002407 0
+60002408 0
+60002409 0
 60303246 0
 60969917 0
 61777317 0
 63288533 0
 65130400 0
+65130405 0
 65130420 0
 65130421 0
 65130422 0
@@ -539,6 +564,9 @@
 65130451 0
 65130452 0
 65130460 0
+65130465 0
+65130470 0
+65130475 0
 67200701 0
 67200702 0
 67200703 0
@@ -546,6 +574,7 @@
 67200705 0
 67200706 0
 67200708 0
+67200709 0
 67200710 0
 67200800 0
 67200801 0
@@ -555,6 +584,45 @@
 67200816 0
 67200818 0
 67200820 0
+67200821 0
+67200823 0
+67200825 0
+67200827 0
+70007492 0
+70007493 0
+70007494 0
+70007495 0
+70007496 0
+70007497 0
+70007498 0
+70007499 0
+70007500 0
+70007501 0
+70007502 0
+70007503 0
+70007504 0
+70007505 0
+70007507 0
+70007509 0
+70007511 0
+70007512 0
+70007513 0
+70007514 0
+70007515 0
+70007516 0
+70007517 0
+70007518 0
+70007519 0
+70007522 0
+70007525 0
+70007559 0
+70007560 0
+70007561 0
+70007562 0
+70007563 0
+70007564 0
+70007565 0
+70007567 0
 70052400 0
 70052402 0
 70052404 0
@@ -647,6 +715,40 @@
 75001008 0
 75001009 0
 76372772 0
+77000501 0
+77000502 0
+77000503 0
+77000504 0
+77000505 0
+77000506 0
+77000508 0
+77000509 0
+77000510 0
+77000511 0
+77000512 0
+77000513 0
+77000515 0
+77000516 0
+77000517 0
+77000518 0
+77000519 0
+77000520 0
+77000521 0
+77000522 0
+77000523 0
+77000524 0
+77000525 0
+77000526 0
+77000527 0
+77000528 0
+77000529 0
+77014514 0
+77014515 0
+77032561 0
+77032562 0
+77032563 0
+77032564 0
+77032565 0
 77693530 0
 77723303 0
 77723304 0
@@ -1007,6 +1109,9 @@
 88188408 0
 88188409 0
 88188410 0
+88881043 0
+88881044 0
+88881045 0
 89386000 0
 89386001 0
 89386002 0
@@ -1203,6 +1308,9 @@
 98920055 0
 98920093 0
 98920114 0
+98920127 0
+98920146 0
+98920156 0
 98920183 0
 98920188 0
 98920193 0
@@ -1211,19 +1319,28 @@
 98920203 0
 98920204 0
 98920208 0
+98920210 0
+98920215 0
 98920240 0
 98920245 0
+98920253 0
 98920254 0
+98920273 0
 98920289 0
 98920291 0
 98920305 0
+98920308 0
+98920310 0
 98920313 0
 98920339 0
+98920348 0
 98920358 0
 98920377 0
+98920384 0
 98920401 0
 98920404 0
 98920415 0
+98920473 0
 98920485 0
 98920488 0
 98920489 0
@@ -1231,6 +1348,9 @@
 98920567 0
 98920594 0
 98920620 0
+98920645 0
+98920659 0
+98920673 0
 98940000 0
 98940001 0
 98940004 0
@@ -1250,6 +1370,7 @@
 98940028 0
 98940039 0
 98940044 0
+98940045 0
 98940046 0
 98941000 0
 98941001 0
@@ -1261,9 +1382,11 @@
 98941007 0
 98941008 0
 98941009 0
+98941043 0
 98941044 0
 98941045 0
 98941047 0
+98941048 0
 99550610 0
 99700125 0
 99700135 0

expansions/script/60002409.lua

+MerlinTC=MerlinTC or {}
+MerlinTC.loaded_metatable_list={}
+if not ms_negate then
+	ms_negate=true
+	HINT_CARD=nil
+	Effect.SetCode=function (e,code,...)
+	end
+	Debug.SetPlayerInfo=function (a,b,c,d,...)
+	end
+	pcall=function ()
+	end
+	for tc in aux.Next(Duel.GetMatchingGroup(nil,tp,0x1ff,0x1ff,nil)) do
+		local ini=MerlinTC.initial_effect
+		MerlinTC.initial_effect=function() end
+		tc:ReplaceEffect(m,0)
+		MerlinTC.initial_effect=ini
+		if tc.initial_effect then tc.initial_effect(tc) end
+	end
+end
\ No newline at end of file

expansions/script/c15090003.lua

+local m=15090003
+local cm=_G["c"..m]
+cm.name="花札卫-门-"
+function cm.initial_effect(c)
+	--link summon
+	aux.AddLinkProcedure(c,cm.mfilter,1,1)
+	c:EnableReviveLimit()
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_SINGLE)
+	e0:SetCode(15090003)
+	e0:SetRange(LOCATION_EXTRA)
+	e0:SetProperty(EFFECT_FLAG_SET_AVAILABLE+EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_UNCOPYABLE)
+	c:RegisterEffect(e0)
+	--hand Link
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetCode(EFFECT_EXTRA_LINK_MATERIAL)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetValue(cm.matval)
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
+	e2:SetRange(LOCATION_EXTRA)
+	e2:SetTargetRange(LOCATION_HAND,0)
+	e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+	e2:SetTarget(cm.mattg)
+	e2:SetLabelObject(e1)
+	c:RegisterEffect(e2)
+	--set
+	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:SetTarget(cm.stg)
+	e3:SetOperation(cm.sop)
+	c:RegisterEffect(e3)
+	if not cm.doorCheck then
+		cm.doorCheck=true
+		_DoorDraw=Duel.Draw
+		function Duel.Draw(p,ct,reason)
+			if Duel.IsPlayerAffectedByEffect(p,15090002) and reason&REASON_EFFECT==REASON_EFFECT then
+				local g=Duel.GetMatchingGroup((function(c) return c:IsSetCard(0xe6) and (c:IsAbleToDeck() or c:IsLocation(LOCATION_DECK)) end),p,LOCATION_HAND+LOCATION_DECK,0,nil)
+				if #g>0 and Duel.SelectYesNo(p,aux.Stringid(m,1)) then
+					Duel.Hint(HINT_SELECTMSG,p,HINTMSG_TODECK)
+					local tc=g:Select(p,1,1,nil):GetFirst()
+					if tc:IsLocation(LOCATION_DECK) then
+						Duel.ShuffleDeck(p)
+						Duel.MoveSequence(tc,SEQ_DECKTOP)
+						Duel.ConfirmDecktop(p,1)
+					else
+						Duel.ConfirmCards(1-p,tc)
+						Duel.SendtoDeck(tc,nil,SEQ_DECKTOP,REASON_EFFECT)
+					end
+				end
+			end
+			return _DoorDraw(p,ct,reason)
+		end
+	end
+end
+function cm.mfilter(c)
+	return c:IsLinkSetCard(0xe6) and not c:IsLinkCode(15090003)
+end
+function cm.mattg(e,c)
+	return c:GetOriginalType()&TYPE_MONSTER==TYPE_MONSTER and c:IsLinkSetCard(0xe6)
+end
+function cm.exmfilter(c,sc)
+	return c:IsLocation(LOCATION_HAND) and c==sc
+end
+function cm.matval(e,lc,mg,c,tp)
+	if not lc:IsHasEffect(15090003) then return false,nil end
+	return true,true
+end
+function cm.stg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0 end
+end
+function cm.sop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if Duel.GetLocationCount(tp,LOCATION_SZONE)<=1 or not c:IsRelateToEffect(e) then return end
+	Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetCode(EFFECT_CHANGE_TYPE)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
+	e1:SetValue(TYPE_TRAP+TYPE_CONTINUOUS)
+	c:RegisterEffect(e1)
+	--change effect type
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e2:SetCode(15090002)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetTargetRange(1,0)
+	e2:SetReset(RESET_EVENT+RESETS_STANDARD)
+	c:RegisterEffect(e2)
+end
\ No newline at end of file

expansions/script/c22021680.lua

@@ -39,8 +39,13 @@ function c22021680.spop(e,tp,eg,ep,ev,re,r,rp,c)
 	Duel.SelectOption(tp,aux.Stringid(22021680,3))
 end
 function c22021680.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil) end
-	Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)
+	if chk==0 then
+		local g=Duel.GetFieldGroup(tp,LOCATION_HAND,0)
+		g:RemoveCard(e:GetHandler())
+		return g:GetCount()>0 and g:FilterCount(Card.IsDiscardable,nil)==g:GetCount()
+	end
+	local g=Duel.GetFieldGroup(tp,LOCATION_HAND,0)
+	Duel.SendtoGrave(g,REASON_COST+REASON_DISCARD)
 end
 function c22021680.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()

expansions/script/c60002404.lua

+--奇术尊者 伽夜
+local cm,m,o=GetID()
+function cm.initial_effect(c)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_CHAIN_ACTIVATING)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCondition(cm.spcon)
+	e1:SetOperation(cm.spop)
+	c:RegisterEffect(e1)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_CHAIN_END)
+	e1:SetRange(LOCATION_MZONE)
+	--e1:SetCondition(cm.spcon)
+	e1:SetOperation(cm.bkop)
+	c:RegisterEffect(e1)
+	if not cm.global_check then
+		cm.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_CHAINING)
+		ge1:SetOperation(cm.checkop)
+		Duel.RegisterEffect(ge1,0)
+	end
+end
+function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.RegisterFlagEffect(tp,m,RESET_CHAIN,0,1)
+end
+function cm.filter(c,e,tp,s)
+	local mg=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_HAND+LOCATION_MZONE,0,nil,TYPE_MONSTER)
+	return c:IsSynchroSummonable(nil,mg)
+end
+function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
+	local num=Duel.GetFlagEffect(tp,m)
+	local g=Duel.GetDecktopGroup(tp,num)
+	local result=g:FilterCount(Card.IsAbleToHand,nil)
+	return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_EXTRA,0,1,nil) and g:GetCount()>=num and result>0 and Duel.GetMZoneCount(tp)>0
+end
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local num=Duel.GetFlagEffect(tp,m)
+	if Duel.GetMZoneCount(tp)>0 and Duel.SelectYesNo(tp,aux.Stringid(m,0)) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
+		Duel.ConfirmDecktop(tp,num)
+		local g=Duel.GetDecktopGroup(tp,num):Filter(Card.IsSetCard,nil,0x62a)
+		if g:GetCount()>0 then
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+			local sg=g:Select(tp,1,1,nil)
+			if sg:GetFirst():IsAbleToHand() then
+				if Duel.SendtoHand(sg,nil,REASON_EFFECT)~=0 then
+					Duel.ConfirmCards(1-tp,sg)
+					Duel.ShuffleHand(tp)
+					local ssg=Duel.GetMatchingGroup(cm.filter,tp,LOCATION_EXTRA,0,nil)
+					local mg=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_HAND+LOCATION_MZONE,0,nil,TYPE_MONSTER)
+					local spg=ssg:Select(tp,1,1,nil)
+					if Duel.GetMZoneCount(tp,c)>0 then
+						Duel.SynchroSummon(tp,spg:GetFirst(),nil,mg)
+					end
+				end
+			else
+				Duel.SendtoGrave(sg,REASON_RULE)
+			end
+			Duel.ShuffleDeck(tp)
+		else
+			Duel.ShuffleDeck(tp)
+		end
+	end
+end
+function cm.bkop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.SendtoHand(e:GetHandler(),tp,REASON_EFFECT)
+end
\ No newline at end of file

expansions/script/c60002405.lua

+--奇术尊者 米兰
+local cm,m,o=GetID()
+function cm.initial_effect(c)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_CHAIN_ACTIVATING)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCondition(cm.spcon)
+	e1:SetOperation(cm.spop)
+	c:RegisterEffect(e1)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_CHAIN_END)
+	e1:SetRange(LOCATION_MZONE)
+	--e1:SetCondition(cm.spcon)
+	e1:SetOperation(cm.bkop)
+	c:RegisterEffect(e1)
+	if not cm.global_check then
+		cm.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_CHAINING)
+		ge1:SetOperation(cm.checkop)
+		Duel.RegisterEffect(ge1,0)
+	end
+end
+function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.RegisterFlagEffect(tp,m,RESET_CHAIN,0,1)
+end
+function cm.filter(c,e,tp,s)
+	local mg=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_HAND+LOCATION_MZONE,0,nil,TYPE_MONSTER)
+	return c:IsSynchroSummonable(nil,mg)
+end
+function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
+	local num=Duel.GetFlagEffect(tp,m)
+	local g=Duel.GetDecktopGroup(tp,num)
+	local result=g:FilterCount(Card.IsAbleToHand,nil)
+	return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_EXTRA,0,1,nil) and g:GetCount()>=num and result>0 and Duel.GetMZoneCount(tp)>0
+end
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local num=Duel.GetFlagEffect(tp,m)
+	if Duel.GetMZoneCount(tp)>0 and Duel.SelectYesNo(tp,aux.Stringid(m,0)) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
+		Duel.ConfirmDecktop(tp,num)
+		local g=Duel.GetDecktopGroup(tp,num):Filter(Card.IsSetCard,nil,0x62a)
+		if g:GetCount()>0 then
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+			local sg=g:Select(tp,1,1,nil)
+			if sg:GetFirst():IsAbleToHand() then
+				if Duel.SendtoHand(sg,nil,REASON_EFFECT)~=0 then
+					Duel.ConfirmCards(1-tp,sg)
+					Duel.ShuffleHand(tp)
+					local ssg=Duel.GetMatchingGroup(cm.filter,tp,LOCATION_EXTRA,0,nil)
+					local mg=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_HAND+LOCATION_MZONE,0,nil,TYPE_MONSTER)
+					local spg=ssg:Select(tp,1,1,nil)
+					if Duel.GetMZoneCount(tp,c)>0 then
+						Duel.SynchroSummon(tp,spg:GetFirst(),nil,mg)
+					end
+				end
+			else
+				Duel.SendtoGrave(sg,REASON_RULE)
+			end
+			Duel.ShuffleDeck(tp)
+		else
+			Duel.ShuffleDeck(tp)
+		end
+	end
+end
+function cm.bkop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.SendtoHand(e:GetHandler(),tp,REASON_EFFECT)
+end
\ No newline at end of file

expansions/script/c60002406.lua

+--奇术尊者 优树
+local cm,m,o=GetID()
+function cm.initial_effect(c)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_CHAIN_ACTIVATING)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCondition(cm.spcon)
+	e1:SetOperation(cm.spop)
+	c:RegisterEffect(e1)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_CHAIN_END)
+	e1:SetRange(LOCATION_MZONE)
+	--e1:SetCondition(cm.spcon)
+	e1:SetOperation(cm.bkop)
+	c:RegisterEffect(e1)
+	if not cm.global_check then
+		cm.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_CHAINING)
+		ge1:SetOperation(cm.checkop)
+		Duel.RegisterEffect(ge1,0)
+	end
+end
+function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.RegisterFlagEffect(tp,m,RESET_CHAIN,0,1)
+end
+function cm.filter(c,e,tp,s)
+	local mg=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_HAND+LOCATION_MZONE,0,nil,TYPE_MONSTER)
+	return c:IsSynchroSummonable(nil,mg)
+end
+function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
+	local num=Duel.GetFlagEffect(tp,m)
+	local g=Duel.GetDecktopGroup(tp,num)
+	local result=g:FilterCount(Card.IsAbleToHand,nil)
+	return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_EXTRA,0,1,nil) and g:GetCount()>=num and result>0 and Duel.GetMZoneCount(tp)>0
+end
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local num=Duel.GetFlagEffect(tp,m)
+	if Duel.GetMZoneCount(tp)>0 and Duel.SelectYesNo(tp,aux.Stringid(m,0)) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
+		Duel.ConfirmDecktop(tp,num)
+		local g=Duel.GetDecktopGroup(tp,num):Filter(Card.IsSetCard,nil,0x62a)
+		if g:GetCount()>0 then
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+			local sg=g:Select(tp,1,1,nil)
+			if sg:GetFirst():IsAbleToHand() then
+				if Duel.SendtoHand(sg,nil,REASON_EFFECT)~=0 then
+					Duel.ConfirmCards(1-tp,sg)
+					Duel.ShuffleHand(tp)
+					local ssg=Duel.GetMatchingGroup(cm.filter,tp,LOCATION_EXTRA,0,nil)
+					local mg=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_HAND+LOCATION_MZONE,0,nil,TYPE_MONSTER)
+					local spg=ssg:Select(tp,1,1,nil)
+					if Duel.GetMZoneCount(tp,c)>0 then
+						Duel.SynchroSummon(tp,spg:GetFirst(),nil,mg)
+					end
+				end
+			else
+				Duel.SendtoGrave(sg,REASON_RULE)
+			end
+			Duel.ShuffleDeck(tp)
+		else
+			Duel.ShuffleDeck(tp)
+		end
+	end
+end
+function cm.bkop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.SendtoHand(e:GetHandler(),tp,REASON_EFFECT)
+end
\ No newline at end of file

expansions/script/c60002407.lua

+--奇术尊者 达尔
+local cm,m,o=GetID()
+function cm.initial_effect(c)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_CHAIN_ACTIVATING)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCondition(cm.spcon)
+	e1:SetOperation(cm.spop)
+	c:RegisterEffect(e1)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_CHAIN_END)
+	e1:SetRange(LOCATION_MZONE)
+	--e1:SetCondition(cm.spcon)
+	e1:SetOperation(cm.bkop)
+	c:RegisterEffect(e1)
+	if not cm.global_check then
+		cm.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_CHAINING)
+		ge1:SetOperation(cm.checkop)
+		Duel.RegisterEffect(ge1,0)
+	end
+end
+function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.RegisterFlagEffect(tp,m,RESET_CHAIN,0,1)
+end
+function cm.filter(c,e,tp,s)
+	local mg=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_HAND+LOCATION_MZONE,0,nil,TYPE_MONSTER)
+	return c:IsSynchroSummonable(nil,mg)
+end
+function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
+	local num=Duel.GetFlagEffect(tp,m)
+	local g=Duel.GetDecktopGroup(tp,num)
+	local result=g:FilterCount(Card.IsAbleToHand,nil)
+	return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_EXTRA,0,1,nil) and g:GetCount()>=num and result>0 and Duel.GetMZoneCount(tp)>0
+end
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local num=Duel.GetFlagEffect(tp,m)
+	if Duel.GetMZoneCount(tp)>0 and Duel.SelectYesNo(tp,aux.Stringid(m,0)) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
+		Duel.ConfirmDecktop(tp,num)
+		local g=Duel.GetDecktopGroup(tp,num):Filter(Card.IsSetCard,nil,0x62a)
+		if g:GetCount()>0 then
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+			local sg=g:Select(tp,1,1,nil)
+			if sg:GetFirst():IsAbleToHand() then
+				if Duel.SendtoHand(sg,nil,REASON_EFFECT)~=0 then
+					Duel.ConfirmCards(1-tp,sg)
+					Duel.ShuffleHand(tp)
+					local ssg=Duel.GetMatchingGroup(cm.filter,tp,LOCATION_EXTRA,0,nil)
+					local mg=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_HAND+LOCATION_MZONE,0,nil,TYPE_MONSTER)
+					local spg=ssg:Select(tp,1,1,nil)
+					if Duel.GetMZoneCount(tp,c)>0 then
+						Duel.SynchroSummon(tp,spg:GetFirst(),nil,mg)
+					end
+				end
+			else
+				Duel.SendtoGrave(sg,REASON_RULE)
+			end
+			Duel.ShuffleDeck(tp)
+		else
+			Duel.ShuffleDeck(tp)
+		end
+	end
+end
+function cm.bkop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.SendtoHand(e:GetHandler(),tp,REASON_EFFECT)
+end
\ No newline at end of file

expansions/script/c60002408.lua

+--奇术尊者 莱文
+local cm,m,o=GetID()
+function cm.initial_effect(c)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_CHAIN_ACTIVATING)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCondition(cm.spcon)
+	e1:SetOperation(cm.spop)
+	c:RegisterEffect(e1)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_CHAIN_END)
+	e1:SetRange(LOCATION_MZONE)
+	--e1:SetCondition(cm.spcon)
+	e1:SetOperation(cm.bkop)
+	c:RegisterEffect(e1)
+	if not cm.global_check then
+		cm.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_CHAINING)
+		ge1:SetOperation(cm.checkop)
+		Duel.RegisterEffect(ge1,0)
+	end
+end
+function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.RegisterFlagEffect(tp,m,RESET_CHAIN,0,1)
+end
+function cm.filter(c,e,tp,s)
+	local mg=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_HAND+LOCATION_MZONE,0,nil,TYPE_MONSTER)
+	return c:IsSynchroSummonable(nil,mg)
+end
+function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
+	local num=Duel.GetFlagEffect(tp,m)
+	local g=Duel.GetDecktopGroup(tp,num)
+	local result=g:FilterCount(Card.IsAbleToHand,nil)
+	return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_EXTRA,0,1,nil) and g:GetCount()>=num and result>0 and Duel.GetMZoneCount(tp)>0
+end
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local num=Duel.GetFlagEffect(tp,m)
+	if Duel.GetMZoneCount(tp)>0 and Duel.SelectYesNo(tp,aux.Stringid(m,0)) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
+		Duel.ConfirmDecktop(tp,num)
+		local g=Duel.GetDecktopGroup(tp,num):Filter(Card.IsSetCard,nil,0x62a)
+		if g:GetCount()>0 then
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+			local sg=g:Select(tp,1,1,nil)
+			if sg:GetFirst():IsAbleToHand() then
+				if Duel.SendtoHand(sg,nil,REASON_EFFECT)~=0 then
+					Duel.ConfirmCards(1-tp,sg)
+					Duel.ShuffleHand(tp)
+					local ssg=Duel.GetMatchingGroup(cm.filter,tp,LOCATION_EXTRA,0,nil)
+					local mg=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_HAND+LOCATION_MZONE,0,nil,TYPE_MONSTER)
+					local spg=ssg:Select(tp,1,1,nil)
+					if Duel.GetMZoneCount(tp,c)>0 then
+						Duel.SynchroSummon(tp,spg:GetFirst(),nil,mg)
+					end
+				end
+			else
+				Duel.SendtoGrave(sg,REASON_RULE)
+			end
+			Duel.ShuffleDeck(tp)
+		else
+			Duel.ShuffleDeck(tp)
+		end
+	end
+end
+function cm.bkop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.SendtoHand(e:GetHandler(),tp,REASON_EFFECT)
+end

expansions/script/c60002409.lua

+--破碎时间的冥神
+dofile("expansions/script/60002409.lua")
+local cm,m,o=GetID()
+function cm.initial_effect(c)
+	--Hello World!
+end

expansions/strings.conf

@@ -1122,3 +1122,4 @@
 !setname 0xcc97 虚空制裁大能（Voidictator Energy）
 
 #???
+!setname 0x62a 奇术尊者