fix

expansions/lflist.conf

@@ -1034,7 +1034,18 @@
 98600002 0 --欧忒耳佩
 #996
 99600001 0 --时空魔女 艾米尔
-#BUGs
+#待下架内容
+01156606 0 --色彩艳丽的门番
+50218134 0 --炎之数码兽LV9 凤凰兽
+50218135 0 --地之数码兽LV9 蔷薇兽
+50218136 0 --风之数码兽LV9 力神比多兽
+50218137 0 --暗之数码兽LV9 圣龙兽
+50218138 0 --光之数码兽LV9 炽天使兽
+50218144 0
+50218145 0
+50218146 0
+50218147 0
+50218148 0
 
 #forbidden
 91869203 0 --アマゾネスの射手

expansions/script/c10199992.lua

 --Record Author
 local am=10199992
 local Version_Number=20200323
-#Scl
+--Scl
 local rsdka =   Dakyria
 local rsdio =   Diablo
 local rsnr  =   Night_Raven 
@@ -10,12 +10,12 @@ local rsem  =   Eridiument
 local rsxb  =   XB
 local rsos  =   Oracle_Smith
 local rssp  =   Stellar_Pearl
-//local rsgd	=   Ghostdom_Dragon
+--local rsgd	=   Ghostdom_Dragon
 local rsed  =   Epic_Dragon
 local rsdh  =   Devil_Hunter
 local rsds  =   Dark_Souls
 
-#Scl - Special Mode
+--Scl - Special Mode
 local rssm  =   Special_Mode
 local rssmb =   Special_Mode_Change_Base_Function
 local rssmt =   Special_Mode_Turbo_Duel
@@ -26,18 +26,18 @@ local rssmf =   Special_Mode_Fast_Duel
 local rssmm =   Special_Mode_Multiple_Duel
 local rssmu =   Special_Mode_Universal_Duel
 
-#Gale 1472676207
+--Gale 1472676207
 local rsve  =   Voison
 local rsneov=   Neons
 local tfrsv =   T.Fairies
 local rsss  =   Star_Spirit
 
-#ChiJiang 626386490
+--ChiJiang 626386490
 local rsnm  =   Nightmare
 local rslf  =   Little_Fox 
 local rccv  =   Thermonuclear
 
-#XiaoMi 643865567
+--XiaoMi 643865567
 local rssg  =   Sex_Gun
 local rsps  =   Pseudo_Soul
 local rsdcc =   Dragon_Chess_Corps
@@ -51,45 +51,45 @@ local rsvw  =   Virus_Wrom
 local rsia  =   Indolent_Angel
 local rsso  =   Simulated_Organism
 
-#NianBao 583322404
+--NianBao 583322404
 local rslap =   Lapin
 local rskh  =   Karehana
 
-#XiaoDaoHeng 1614895649
+--XiaoDaoHeng 1614895649
 local rslrd =   Life_DeathRound_Dance
 
-#Huang 1184387005
+--Huang 1184387005
 local rsts  =   Trinity_Sword
 
-#Luoxing 1151483512
+--Luoxing 1151483512
 local rsdt  =   Dark_Tale
 local rsod  =   Order
 
-#YunZeZhun 1587361112
+--YunZeZhun 1587361112
 local rsphh =   Phantom_Thieves_Of_Hearts
 local rsgc  =   Guard_City
 
-#ZhenDong 
+--ZhenDong 
 local rsfv  =   Fgo/Assassin
 
-#JingJing 1772438857
+--JingJing 1772438857
 local rsba  =   BlueAngel
 
-#Akashic 3204027606
+--Akashic 3204027606
 local rszg  =   Zogu
 local rsgs  =   Gran_Sphere
 local rsoc  =   Oligocene_Civilization
 local rsgol =   Giant_of_Light
 local rssb  =   Space_Beasts
 
-#HeiBai 1172777968
+--HeiBai 1172777968
 local rstm  =   Toaru_Majutsu_no_Index
 
-#2558566212
+--2558566212
 local rsgod =   God
 
 --Set Code
-#Scl
+--Scl
 --local   =   0x1330
 local Alchement_Bio  =   0x3330
 local Chaos_Alchemy  =   0x5330

expansions/script/c1156015.lua

@@ -48,7 +48,7 @@ function c1156015.initial_effect(c)
 end
 --
 function c1156015.cknfilter(c)
-    return c:GetOriginalCode()==77765004 and not c:IsDisabled()
+	return c:GetOriginalCode()==77765004 and not c:IsDisabled()
 end
 function c1156015.lkfilter(c,lc,tp)
 	local flag=c:IsFaceup() and c:IsCanBeLinkMaterial(lc)
@@ -134,7 +134,7 @@ function c1156015.tg2(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 --
 function c1156015.con2_1(e,tp,eg,ep,ev,re,r,rp)
-    return not e:GetHandler():IsHasEffect(EFFECT_QP_ACT_IN_SET_TURN) 
+	return not e:GetHandler():IsHasEffect(EFFECT_QP_ACT_IN_SET_TURN) 
 end
 function c1156015.op2(e,tp,eg,ep,ev,re,r,rp)
 	if (re:GetHandler():IsType(TYPE_FIELD) or Duel.GetLocationCount(tp,LOCATION_SZONE)>0) and not re:GetHandler():IsImmuneToEffect(e) then
@@ -142,26 +142,26 @@ function c1156015.op2(e,tp,eg,ep,ev,re,r,rp)
 		if re:GetHandler():IsType(TYPE_FIELD) then
 			if Duel.MoveToField(re:GetHandler(),tp,tp,LOCATION_FZONE,POS_FACEDOWN,false) then
 				if re:GetHandler():IsType(TYPE_QUICKPLAY) then
-               				local e2_1=Effect.CreateEffect(e:GetHandler())
-                			e2_1:SetType(EFFECT_TYPE_SINGLE)
-                			e2_1:SetCode(EFFECT_CANNOT_TRIGGER)
-                			e2_1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
-                			e2_1:SetCondition(c1156015.con2_1)
-                			re:GetHandler():RegisterEffect(e2_1)
-            			end 
+							local e2_1=Effect.CreateEffect(e:GetHandler())
+							e2_1:SetType(EFFECT_TYPE_SINGLE)
+							e2_1:SetCode(EFFECT_CANNOT_TRIGGER)
+							e2_1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+							e2_1:SetCondition(c1156015.con2_1)
+							re:GetHandler():RegisterEffect(e2_1)
+						end 
 				Duel.ConfirmCards(1-tp,re:GetHandler())
 				Duel.RaiseEvent(re:GetHandler(),EVENT_SSET,e,REASON_EFFECT,tp,tp,0)
 			end
 		else
 			if Duel.MoveToField(re:GetHandler(),tp,tp,LOCATION_SZONE,POS_FACEDOWN,false) then
 				if re:GetHandler():IsType(TYPE_QUICKPLAY) then
-               				local e2_1=Effect.CreateEffect(e:GetHandler())
-                			e2_1:SetType(EFFECT_TYPE_SINGLE)
-                			e2_1:SetCode(EFFECT_CANNOT_TRIGGER)
-                			e2_1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
-                			e2_1:SetCondition(c1156015.con2_1)
-                			re:GetHandler():RegisterEffect(e2_1)
-            			end 
+							local e2_1=Effect.CreateEffect(e:GetHandler())
+							e2_1:SetType(EFFECT_TYPE_SINGLE)
+							e2_1:SetCode(EFFECT_CANNOT_TRIGGER)
+							e2_1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+							e2_1:SetCondition(c1156015.con2_1)
+							re:GetHandler():RegisterEffect(e2_1)
+						end 
 				Duel.ConfirmCards(1-tp,re:GetHandler())
 				Duel.RaiseEvent(re:GetHandler(),EVENT_SSET,e,REASON_EFFECT,tp,tp,0)
 			end

expansions/script/c16199992.lua

 --Record Author
 local am=16199992
 local Version_Number=20200430
-#Scl
+--Scl
 local rsdka =   Dakyria
 local rsdio =   Diablo
 local rsnr  =   Night_Raven 
@@ -10,12 +10,12 @@ local rsem  =   Eridiument
 local rsxb  =   XB
 local rsos  =   Oracle_Smith
 local rssp  =   Stellar_Pearl
-//local rsgd	=   Ghostdom_Dragon
+--local rsgd	=   Ghostdom_Dragon
 local rsed  =   Epic_Dragon
 local rsdh  =   Devil_Hunter
 local rsds  =   Dark_Souls
 
-#Scl - Special Mode
+--Scl - Special Mode
 local rssm  =   Special_Mode
 local rssmb =   Special_Mode_Change_Base_Function
 local rssmt =   Special_Mode_Turbo_Duel
@@ -26,18 +26,18 @@ local rssmf =   Special_Mode_Fast_Duel
 local rssmm =   Special_Mode_Multiple_Duel
 local rssmu =   Special_Mode_Universal_Duel
 
-#Gale 1472676207
+--Gale 1472676207
 local rsve  =   Voison
 local rsneov=   Neons
 local tfrsv =   T.Fairies
 local rsss  =   Star_Spirit
 
-#ChiJiang 626386490
+--ChiJiang 626386490
 local rsnm  =   Nightmare
 local rslf  =   Little_Fox 
 local rccv  =   Thermonuclear
 
-#XiaoMi 643865567
+--XiaoMi 643865567
 local rssg  =   Sex_Gun
 local rsps  =   Pseudo_Soul
 local rsdcc =   Dragon_Chess_Corps
@@ -51,43 +51,43 @@ local rsvw  =   Virus_Wrom
 local rsia  =   Indolent_Angel
 local rsso  =   Simulated_Organism
 
-#NianBao 583322404
+--NianBao 583322404
 local rslap =   Lapin
 local rskh  =   Karehana
 
-#XiaoDaoHeng 1614895649
+--XiaoDaoHeng 1614895649
 local rslrd =   Life_DeathRound_Dance
 
-#Huang 1184387005
+--Huang 1184387005
 local rsts  =   Trinity_Sword
 
-#Luoxing 1151483512
+--Luoxing 1151483512
 local rsdt  =   Dark_Tale
 local rsod  =   Order
 
-#YunZeZhun 1587361112
+--YunZeZhun 1587361112
 local rsphh =   Phantom_Thieves_Of_Hearts
 local rsgc  =   Guard_City
 
-#ZhenDong 
+--ZhenDong 
 local rsfv  =   Fgo/Assassin
 
-#JingJing 1772438857
+--JingJing 1772438857
 local rsba  =   BlueAngel
 
-#Akashic 3204027606
+--Akashic 3204027606
 local rszg  =   Zogu
 local rsgs  =   Gran_Sphere
 local rsoc  =   Oligocene_Civilization
 
-#HeiBai 1172777968
+--HeiBai 1172777968
 local rstm  =   Toaru_Majutsu_no_Index
 
-#2558566212
+--2558566212
 local rsgod =   God
 
 --Set Code
-#Scl
+--Scl
 --local   =   0x1330
 local Alchement_Bio  =   0x3330
 local Chaos_Alchemy  =   0x5330

expansions/script/c40006827.lua

 --睿智之蓝 LV3-改4
 function c40006827.initial_effect(c)
-	c:EnableReviveLimitPendulumSummonable()
+	c:EnableReviveLimit()
 	aux.EnablePendulumAttribute(c)
 	--spsummon from hand
 	local e1=Effect.CreateEffect(c)

expansions/script/c47510300.lua

+--星龙 迪斯卡特里波卡
+local m=47510300
+local cm=_G["c"..m]
+xpcall(function() require("expansions/script/c81000000") end,function() require("script/c81000000") end)
+function cm.initial_effect(c)
+	c:EnableReviveLimit()
+	--
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_FIELD)
+	e0:SetCode(EFFECT_SPSUMMON_PROC)
+	e0:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_IGNORE_IMMUNE)
+	e0:SetRange(LOCATION_EXTRA)
+	e0:SetCondition(cm.lkcon)
+	e0:SetOperation(cm.lkop)
+	e0:SetValue(SUMMON_TYPE_LINK)
+	c:RegisterEffect(e0)
+	--splimit
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(cm.splimit)
+	c:RegisterEffect(e1)
+	--to hand
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,m)
+	e2:SetTarget(cm.thtg)
+	e2:SetOperation(cm.thop)
+	c:RegisterEffect(e2)
+	--search
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_TOHAND)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_LEAVE_FIELD)
+	e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_PLAYER_TARGET)
+	e3:SetCondition(cm.tscon)
+	e3:SetTarget(cm.tstg)
+	e3:SetOperation(cm.tsop)
+	c:RegisterEffect(e3)
+end
+function cm.lkfilter(c,lc,tp)
+	local flag=c:IsFaceup() and c:IsCanBeLinkMaterial(lc)
+	if c:IsType(TYPE_MONSTER) then
+		return flag and c:IsRace(RACE_DRAGON)
+	else
+		return c:IsFaceup() and c:IsType(TYPE_PENDULUM) and c:IsLocation(LOCATION_PZONE)
+	end
+end
+function cm.lvfilter(c)
+	if c:IsType(TYPE_LINK) and c:GetLink()>1 then
+		return 1+0x10000*c:GetLink()
+	else 
+		return 1 
+	end
+end
+function cm.lcheck(tp,sg,lc,minc,ct)
+	return ct>=minc and sg:CheckWithSumEqual(cm.lvfilter,lc:GetLink(),ct,ct) and Duel.GetLocationCountFromEx(tp,tp,sg,lc)>0
+end
+function cm.lkchenk(c,tp,sg,mg,lc,ct,minc,maxc)
+	sg:AddCard(c)
+	ct=ct+1
+	local res=cm.lcheck(tp,sg,lc,minc,ct) or (ct<maxc and mg:IsExists(cm.lkchenk,1,sg,tp,sg,mg,lc,ct,minc,maxc))
+	sg:RemoveCard(c)
+	ct=ct-1
+	return res
+end
+function cm.lkcon(e,c)
+	if c==nil then return true end
+	local tp=c:GetControler()
+	local mg=Duel.GetMatchingGroup(cm.lkfilter,tp,LOCATION_ONFIELD,0,nil,c,tp)
+	local sg=Group.CreateGroup()
+	for i,pe in ipairs({Duel.IsPlayerAffectedByEffect(tp,EFFECT_MUST_BE_LMATERIAL)}) do
+		local pc=pe:GetHandler()
+		if not mg:IsContains(pc) then return false end
+		sg:AddCard(pc)
+	end
+	local ct=sg:GetCount()
+	local minc=3
+	local maxc=3
+	if ct>maxc then return false end
+	return cm.lcheck(tp,sg,c,minc,ct) or mg:IsExists(cm.lkchenk,1,nil,tp,sg,mg,c,ct,minc,maxc)
+end
+function cm.lkop(e,tp,eg,ep,ev,re,r,rp,c)
+	local mg=Duel.GetMatchingGroup(cm.lkfilter,tp,LOCATION_ONFIELD,0,nil,c,tp)
+	local sg=Group.CreateGroup()
+	for i,pe in ipairs({Duel.IsPlayerAffectedByEffect(tp,EFFECT_MUST_BE_LMATERIAL)}) do
+		sg:AddCard(pe:GetHandler())
+	end
+	local ct=sg:GetCount()
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_LMATERIAL)
+	sg:Select(tp,ct,ct,nil)
+	local minc=3
+	local maxc=3
+	for i=ct,maxc-1 do
+		local cg=mg:Filter(cm.lkchenk,sg,tp,sg,mg,c,i,minc,maxc)
+		if cg:GetCount()==0 then break end
+		local minct=1
+		if cm.lcheck(tp,sg,c,minc,i) then
+			if not Duel.SelectYesNo(tp,210) then break end
+			minct=0
+		end
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_LMATERIAL)
+		local g=cg:Select(tp,minct,1,nil)
+		if g:GetCount()==0 then break end
+		sg:Merge(g)
+	end
+	c:SetMaterial(sg)
+	Duel.SendtoGrave(sg,REASON_MATERIAL+REASON_LINK)
+end
+function cm.splimit(e,c,sump,sumtype,sumpos,targetp)
+	return bit.band(sumtype,SUMMON_TYPE_PENDULUM)~=SUMMON_TYPE_PENDULUM
+end
+function cm.filter(c)
+	return c:IsType(TYPE_PENDULUM) and c:IsAbleToHand()
+end
+function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) and Duel.IsPlayerCanSummon(tp) and Duel.IsPlayerCanAdditionalSummon(tp) and Duel.GetFlagEffect(tp,m)==0 end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function cm.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+		if Duel.GetFlagEffect(tp,m)~=0 then return end
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetDescription(aux.Stringid(m,0))
+		e1:SetType(EFFECT_TYPE_FIELD)
+		e1:SetTargetRange(LOCATION_HAND,0)
+		e1:SetCode(EFFECT_EXTRA_SUMMON_COUNT)
+		e1:SetTarget(aux.TargetBoolFunction(Card.IsType,TYPE_PENDULUM))
+		e1:SetReset(RESET_PHASE+PHASE_END)
+		Duel.RegisterEffect(e1,tp)
+		Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
+	end
+end
+function cm.tscon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return (c:IsReason(REASON_BATTLE) or (c:GetReasonPlayer()==1-tp and c:IsReason(REASON_EFFECT)))
+		and c:IsPreviousPosition(POS_FACEUP)
+end
+function cm.thfilter(c)
+	return c:IsType(TYPE_PENDULUM) and c:IsFaceup() and c:IsAbleToHand()
+end
+function cm.tstg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_EXTRA,0,1,nil) end
+	local g=Duel.GetMatchingGroup(cm.thfilter,tp,LOCATION_EXTRA,0,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,g:GetCount(),tp,LOCATION_EXTRA)
+end
+function cm.tsop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.GetMatchingGroup(cm.thfilter,tp,LOCATION_EXTRA,0,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+	end
+end