Refresh on 2024-09-02 07:11:45

lflist.conf

@@ -2,6 +2,7 @@
 
 !LV5
 #forbidden
+63436931 0 --红龙
 23434538 0 --增殖的G
 27381364 0 --えるふ
 03040496 0 --混沌魔龍 カオス・ルーラー
@@ -101,7 +102,6 @@
 32909498 1 --狼
 71832012 1 --六世壊＝パライゾス
 19613556 1 --大嵐
-27174286 1 --異次元からの帰還
 35316708 1 --刻の封印
 61292243 1 --E紧急
 76145933 1 --スプライト・ブルー
@@ -155,12 +155,12 @@
 36890111 2 --傀儡场地
 91810826 2 --中龙
 66730191 2 --开门
+36521307 2 --圆武
 25801745 2 --祈祷理
 85106525 2 --篝火
 32731036 2 --深淵の獣ルベリオン
 60242223 2 --深淵の獣サロニール
 67723438 2 --緊急テレポート
-84941194 2 --荣光
 21347668 2 --睡觉
 91800273 2 --ディメンション・アトラクター
 17330916 2 --EMモンキーボード

script/c10105645.lua

 function c10105645.initial_effect(c)
-aux.AddCodeList(c,13171876)
+	aux.AddCodeList(c,13171876)
 	 --Activate
 	local e1=Effect.CreateEffect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
@@ -37,11 +37,11 @@ aux.AddCodeList(c,13171876)
 	e4:SetTarget(c10105645.eqtg)
 	e4:SetOperation(c10105645.eqop)
 	c:RegisterEffect(e4)
-    end
+end
 function c10105645.spfilter(c,e,tp)
 	return c:IsCode(13171876) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end
-function c10105645.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+function c10105645.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		and Duel.IsExistingMatchingCard(c10105645.spfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e,tp) end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK+LOCATION_GRAVE)
@@ -49,7 +49,7 @@ function c10105645.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 end
 function c10105645.operation(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	if Duel.GetLocationCountFromEx(tp)<=0 then return end
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
 	local g=Duel.SelectMatchingCard(tp,c10105645.spfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,e,tp)
 	local tc=g:GetFirst()
 	if c:IsRelateToEffect(e) and g:GetCount()>0 then

script/c10105646.lua

@@ -36,7 +36,7 @@ function c10105646.initial_effect(c)
 	e4:SetTarget(c10105646.atktg)
 	e4:SetOperation(c10105646.atkop)
 	c:RegisterEffect(e4)
-	end
+end
 function c10105646.spfilter(c)
 	return c:IsCode(13171876) and c:GetEquipGroup():IsExists(Card.IsType,1,nil,TYPE_EQUIP)
 end

script/c10105648.lua

@@ -17,7 +17,7 @@ function c10105648.initial_effect(c)
 	e3:SetTarget(c10105648.target)
 	e3:SetOperation(c10105648.operation)
 	c:RegisterEffect(e3)
-    end
+end
 function c10105648.mfilter(c)
 	return c:IsCode(13171876)
 end

script/c10105649.lua

@@ -29,7 +29,7 @@ function c10105649.initial_effect(c)
 	e3:SetTarget(c10105649.distg)
 	e3:SetOperation(c10105649.disop)
 	c:RegisterEffect(e3)
-    end
+end
 function c10105649.xyzcheck(g)
 	return g:GetClassCount(Card.GetRank)==1
 end

script/c10111114.lua

+function c10111114.initial_effect(c)
+	--xyz summon
+	aux.AddXyzProcedure(c,c10111114.mfilter,5,3,c10111114.ovfilter,aux.Stringid(10111114,0),3,c10111114.xyzop)
+	c:EnableReviveLimit()
+	--destroy replace  
+	local e1=Effect.CreateEffect(c)  
+	e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)  
+	e1:SetCode(EFFECT_DESTROY_REPLACE)  
+	e1:SetRange(LOCATION_MZONE)  
+	e1:SetTarget(c10111114.reptg)  
+	e1:SetValue(c10111114.repval)  
+    e1:SetOperation(c10111114.operation)
+	c:RegisterEffect(e1)
+	--attack up
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(10111114,1))
+	e2:SetCategory(CATEGORY_ATKCHANGE)
+	e2:SetType(EFFECT_TYPE_TRIGGER_F+EFFECT_TYPE_SINGLE)
+	e2:SetCode(EVENT_DETACH_MATERIAL)
+	e2:SetTarget(c10111114.atktg)
+	e2:SetOperation(c10111114.atkop)
+	c:RegisterEffect(e2)
+    	--destroy
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(10111114,0))
+	e3:SetCategory(CATEGORY_DESTROY)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e3:SetCode(EVENT_BATTLE_DAMAGE)
+	e3:SetCondition(c10111114.descon)
+	e3:SetTarget(c10111114.destg1)
+	e3:SetOperation(c10111114.desop1)
+	c:RegisterEffect(e3)
+end
+function c10111114.mfilter(c)
+	return c:IsRace(RACE_WARRIOR) and c:IsAttribute(ATTRIBUTE_FIRE)
+end
+function c10111114.ovfilter(c)
+	return c:IsFaceup() and c:IsCode(23232295)
+end
+function c10111114.repfilter(c,tp)  
+	return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_MZONE) and c:IsSetCard(0x1084) and c:IsReason(REASON_BATTLE+REASON_EFFECT) and not c:IsReason(REASON_REPLACE)  
+end  
+function c10111114.reptg(e,tp,eg,ep,ev,re,r,rp,chk)  
+	if chk==0 then return eg:IsExists(c10111114.repfilter,1,nil,tp)  
+		and e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_EFFECT) end  
+	if Duel.SelectEffectYesNo(tp,e:GetHandler(),96) then  
+		e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_EFFECT)  
+		return true  
+	end  
+	return false  
+end 
+function c10111114.repval(e,c)  
+	return c10111114.repfilter(c,e:GetHandlerPlayer())  
+end
+function c10111114.operation(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Damage(1-tp,800,REASON_EFFECT,true)
+	Duel.Recover(tp,800,REASON_EFFECT,true)
+	Duel.RDComplete()
+end
+function c10111114.atkfilter(c)
+	return c:IsFaceup() and c:IsSetCard(0x1084)
+end
+function c10111114.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsRelateToEffect(e) end
+end
+function c10111114.atkop(e,tp,eg,ep,ev,re,r,rp)
+	local tg=Duel.GetMatchingGroup(c10111114.atkfilter,tp,LOCATION_MZONE,0,nil)
+	if tg:GetCount()>0 then
+		local sc=tg:GetFirst()
+		while sc do
+			local e1=Effect.CreateEffect(e:GetHandler())
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetCode(EFFECT_UPDATE_ATTACK)
+			e1:SetValue(800)
+			sc:RegisterEffect(e1)
+			local e2=e1:Clone()
+			e2:SetCode(EFFECT_UPDATE_DEFENSE)
+			sc:RegisterEffect(e2)
+			sc=tg:GetNext()
+		end
+	end
+end
+function c10111114.descon(e,tp,eg,ep,ev,re,r,rp)
+	return ep~=tp
+end
+function c10111114.destg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_MZONE) end
+	if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,0,LOCATION_ONFIELD,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+	local g=Duel.SelectTarget(tp,aux.TRUE,tp,0,LOCATION_ONFIELD,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
+end
+function c10111114.desop1(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		Duel.Destroy(tc,REASON_EFFECT)
+	end
+end
\ No newline at end of file

script/c10111115.lua

+function c10111115.initial_effect(c)
+	--xyz summon
+	aux.AddXyzProcedure(c,c10111115.mfilter,5,3,c10111115.ovfilter,aux.Stringid(10111115,0),3,c10111115.xyzop)
+	c:EnableReviveLimit()
+  --immune
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetCode(EFFECT_IMMUNE_EFFECT)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetValue(c10111115.efilter1)
+	c:RegisterEffect(e1)
+    	--attack up
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_ATKCHANGE)
+	e2:SetDescription(aux.Stringid(10111115,0))
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetCountLimit(1)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCost(c10111115.cost)
+	e2:SetOperation(c10111115.operation)
+	c:RegisterEffect(e2)
+end
+function c10111115.mfilter(c)
+	return c:IsRace(RACE_WARRIOR) 
+end
+function c10111115.ovfilter(c)
+	return c:IsFaceup() and c:IsCode(60645181)
+end
+function c10111115.efilter1(e,te)
+	return te:GetOwnerPlayer()~=e:GetHandlerPlayer() and te:IsActiveType(TYPE_MONSTER)
+end
+function c10111115.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,3,REASON_COST) end
+	e:GetHandler():RemoveOverlayCard(tp,3,3,REASON_COST)
+end
+function c10111115.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and c:IsFaceup() then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_SET_ATTACK_FINAL)
+		e1:SetValue(c:GetBaseAttack()*2)
+		c:RegisterEffect(e1)
+	end
+end
\ No newline at end of file

script/c10111116.lua

+function c10111116.initial_effect(c)
+	--xyz summon
+	aux.AddXyzProcedure(c,c10111116.mfilter,5,3,c10111116.ovfilter,aux.Stringid(10111116,0),3,c10111116.xyzop)
+	c:EnableReviveLimit()
+      --immune
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetCode(EFFECT_IMMUNE_EFFECT)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetValue(c10111116.efilter1)
+	c:RegisterEffect(e1)
+    	--negate
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(10111116,1))
+	e2:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY+CATEGORY_ATKCHANGE)
+	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCode(EVENT_CHAINING)
+	e2:SetCondition(c10111116.negcon)
+	e2:SetCost(c10111116.negcost)
+	e2:SetTarget(c10111116.negtg)
+	e2:SetOperation(c10111116.negop)
+	c:RegisterEffect(e2)
+end
+function c10111116.mfilter(c)
+	return c:IsRace(RACE_WARRIOR) 
+end
+function c10111116.ovfilter(c)
+	return c:IsFaceup() and c:IsCode(74593218)
+end
+function c10111116.efilter1(e,te)
+	return te:GetOwnerPlayer()~=e:GetHandlerPlayer() and te:IsActiveType(TYPE_TRAP)
+end
+function c10111116.negcon(e,tp,eg,ep,ev,re,r,rp)
+	return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED)
+		and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and Duel.IsChainNegatable(ev)
+end
+function c10111116.negcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,2,REASON_COST) end
+	e:GetHandler():RemoveOverlayCard(tp,2,2,REASON_COST)
+end
+function c10111116.negtg(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 c10111116.negop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) and Duel.Destroy(eg,REASON_EFFECT)>0 then
+		Duel.BreakEffect()
+		if c:IsRelateToEffect(e) and c:IsFaceup() then
+			local e1=Effect.CreateEffect(c)
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetProperty(EFFECT_FLAG_COPY_INHERIT)
+			e1:SetCode(EFFECT_UPDATE_ATTACK)
+			e1:SetValue(1000)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
+			c:RegisterEffect(e1)
+            local e2=e1:Clone()
+			e2:SetCode(EFFECT_UPDATE_DEFENSE)
+			c:RegisterEffect(e2)
+		end
+	end
+end
\ No newline at end of file

script/c10111117.lua

+function c10111117.initial_effect(c)
+	--xyz summon
+	aux.AddXyzProcedure(c,c10111117.mfilter,5,3,c10111117.ovfilter,aux.Stringid(10111117,0),3,c10111117.xyzop)
+	c:EnableReviveLimit()
+  --immune
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetCode(EFFECT_IMMUNE_EFFECT)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetValue(c10111117.efilter1)
+	c:RegisterEffect(e1)
+--disable special summon
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(10111117,0))
+	e2:SetCategory(CATEGORY_DISABLE_SUMMON+CATEGORY_REMOVE)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_SPSUMMON)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1)
+	e2:SetCondition(c10111117.discon)
+	e2:SetCost(c10111117.discost)
+	e2:SetTarget(c10111117.distg)
+	e2:SetOperation(c10111117.disop)
+	c:RegisterEffect(e2)
+end
+function c10111117.mfilter(c)
+	return c:IsRace(RACE_WARRIOR) 
+end
+function c10111117.ovfilter(c)
+	return c:IsFaceup() and c:IsCode(48009503)
+end
+function c10111117.efilter1(e,te)
+	return te:GetOwnerPlayer()~=e:GetHandlerPlayer() and te:IsActiveType(TYPE_SPELL)
+end
+function c10111117.discon(e,tp,eg,ep,ev,re,r,rp)
+	return tp~=ep and Duel.GetCurrentChain()==0
+end
+function c10111117.costfilter(c)
+	return c:IsType(TYPE_MONSTER)
+end
+function c10111117.discost(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 c10111117.distg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_DISABLE_SUMMON,eg,eg:GetCount(),0,0)
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,eg,eg:GetCount(),0,0)
+end
+function c10111117.disop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.NegateSummon(eg)
+	Duel.Remove(eg,POS_FACEUP,REASON_EFFECT)
+end
\ No newline at end of file

script/c114514022.lua

+local s,id,o=GetID()
+function s.initial_effect(c)
+    --synchro summon
+	aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSynchroType,TYPE_SYNCHRO),aux.NonTuner(nil),1)
+    aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsSynchroType,TYPE_SYNCHRO),1)
+    Auxiliary.AddCodeList(c,63436931)
+	c:EnableReviveLimit()
+    local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_SINGLE)
+	e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e0:SetCode(EFFECT_CHANGE_CODE)
+	e0:SetRange(LOCATION_EXTRA+LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_OVERLAY)
+	e0:SetValue(63436931)
+	c:RegisterEffect(e0)
+	--search
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(id,0))
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e1:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCountLimit(1,id)
+	e1:SetTarget(s.thtg)
+	e1:SetOperation(s.thop)
+	c:RegisterEffect(e1)
+	--special summon
+    local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(id,2))
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,id+o)
+	e2:SetTarget(s.sptg1)
+	e2:SetOperation(s.spop1)
+	c:RegisterEffect(e2)
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(id,1))
+	e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_QUICK_O)
+	e3:SetCode(EVENT_FREE_CHAIN)
+	e3:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCountLimit(1,id+o)
+	e3:SetTarget(s.sptg)
+	e3:SetOperation(s.spop)
+	c:RegisterEffect(e3)
+end
+function s.thfilter(c)
+	return aux.IsCodeListed(c,63436931) and c:IsType(TYPE_SPELL+TYPE_TRAP) 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:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+	end
+end
+function s.spfilter1(c,e,tp)
+	return (c:IsSetCard(0xc2) or (c:IsLevel(7,8) and c:IsRace(RACE_DRAGON)))
+		and c:IsType(TYPE_SYNCHRO) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
+end
+function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(s.spfilter1,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
+end
+function s.spop1(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,s.spfilter1,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
+	if g:GetCount()>0 then
+		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
+function s.cfilter(c,e,tp)
+	return c:IsFaceup() and c:IsLevelAbove(7) and c:IsType(TYPE_SYNCHRO) and not c:IsCode(id) and (c:IsRace(RACE_DRAGON) or c:IsSetCard(0xc2)) and c:IsAbleToGrave()
+		and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,c:GetLevel(),e:GetHandler())
+end
+function s.spfilter(c,e,tp,lv,ec)
+	return c:IsLevelAbove(lv+1) and c:IsType(TYPE_SYNCHRO) and (c:IsRace(RACE_DRAGON) or c:IsSetCard(0xc2))
+		and Duel.GetLocationCountFromEx(tp,tp,ec,nil)>0 and Duel.IsExistingMatchingCard(s.tfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,1,nil,c:GetAttribute())
+		and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false)
+end
+function s.tfilter(c,attr)
+    return c:IsType(TYPE_TUNER+TYPE_SYNCHRO) and c:IsFaceupEx() and c:IsAttribute(attr) and c:IsLevelBelow(11)
+end
+function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and s.cfilter(chkc,e,tp) end
+	if chk==0 then return aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL)
+		and Duel.IsExistingTarget(s.cfilter,tp,LOCATION_MZONE,0,1,nil,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local tg=Duel.SelectTarget(tp,s.cfilter,tp,LOCATION_MZONE,0,1,1,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,tg,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
+end
+function s.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and Duel.SendtoGrave(tc,REASON_EFFECT)>0 and tc:IsLocation(LOCATION_GRAVE) then
+		if not aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL) then return end
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local sc=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,tc:GetLevel(),nil):GetFirst()
+		if sc then
+			sc:SetMaterial(nil)
+			if Duel.SpecialSummon(sc,SUMMON_TYPE_SYNCHRO,tp,tp,false,false,POS_FACEUP)>0 then
+				sc:CompleteProcedure()
+			end
+		end
+	end
+end
\ No newline at end of file

script/c114514259.lua

@@ -38,19 +38,19 @@ function s.dfilter(c)
 	return c:IsSetCard(0x6)
 end
 function s.acttg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(s.actfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,tp) and Duel.IsExistingMatchingCard(Card.IsAbleToGrave,tp,LOCATION_HAND,0,1,e:GetHandler()) and Duel.GetLocationCount(tp,LOCATION_MZONE)>1 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
-    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,2,tp,LOCATION_HAND)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>1 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
+    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
 end
 function s.actop(e,tp,eg,ep,ev,re,r,rp)
     local c=e:GetHandler()
     if not c:IsRelateToEffect(e) or not c:IsCanBeSpecialSummoned(e,0,tp,false,false) then return end
     if Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then return end
-    if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
+    if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 and Duel.GetFieldGroupCount(tp,0,LOCATION_MZONE)>0 and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 then
         Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
         local g=Duel.SelectMatchingCard(tp,s.actfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,tp)
         local tc=g:GetFirst()
-        if tc and Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)~=0 then
-			Duel.DiscardHand(tp,nil,1,1,REASON_EFFECT+REASON_DISCARD,nil)
+        if tc then
+			Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
         end
     end
 end

script/c191981040.lua

---邪心教典
-local s,id,o=GetID()
-function s.initial_effect(c)
-	--activate
-	local e0=Effect.CreateEffect(c)
-	e0:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
-	e0:SetType(EFFECT_TYPE_ACTIVATE)
-	e0:SetCode(EVENT_FREE_CHAIN)
-	e0:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH)
-	e0:SetTarget(s.thtg)
-	e0:SetOperation(s.activate)
-	c:RegisterEffect(e0)
-	--race
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(id,0))
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetRange(LOCATION_SZONE)
-	e1:SetCountLimit(1)
-	e1:SetTarget(s.ratg)
-	e1:SetOperation(s.raop)
-	c:RegisterEffect(e1)
-	--to grave
-	local e2=Effect.CreateEffect(c)
-	e2:SetCategory(CATEGORY_TOGRAVE)
-	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e2:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
-	e2:SetRange(LOCATION_SZONE)
-	e2:SetCountLimit(1)
-	e2:SetCondition(s.tgcon)
-	e2:SetTarget(s.tgtg)
-	e2:SetOperation(s.tgop)
-	c:RegisterEffect(e2)
-	--spsummon
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(id,1))
-	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e3:SetType(EFFECT_TYPE_IGNITION)
-	e3:SetRange(LOCATION_SZONE)
-	e3:SetCost(s.spcost)
-	e3:SetTarget(s.sptg)
-	e3:SetOperation(s.spop)
-	c:RegisterEffect(e3)
-	local e4=Effect.CreateEffect(c)
-	e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e4:SetCode(EVENT_PHASE+PHASE_STANDBY)
-	e4:SetRange(0xff)
-	e4:SetCountLimit(1)
-	e4:SetLabelObject(e3)
-	e4:SetCondition(s.spcon2)
-	e4:SetOperation(s.spop2)
-	c:RegisterEffect(e4)
-end
+--邪心教典
+local s,id,o=GetID()
+function s.initial_effect(c)
+	--activate
+	local e0=Effect.CreateEffect(c)
+	e0:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e0:SetType(EFFECT_TYPE_ACTIVATE)
+	e0:SetCode(EVENT_FREE_CHAIN)
+	e0:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH)
+	e0:SetTarget(s.thtg)
+	e0:SetOperation(s.activate)
+	c:RegisterEffect(e0)
+	--race
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(id,0))
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_SZONE)
+	e1:SetCountLimit(1)
+	e1:SetTarget(s.ratg)
+	e1:SetOperation(s.raop)
+	c:RegisterEffect(e1)
+	--to grave
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOGRAVE)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetCondition(s.tgcon)
+	e2:SetTarget(s.tgtg)
+	e2:SetOperation(s.tgop)
+	c:RegisterEffect(e2)
+	--spsummon
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(id,1))
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_IGNITION)
+	e3:SetRange(LOCATION_SZONE)
+	e3:SetCost(s.spcost)
+	e3:SetTarget(s.sptg)
+	e3:SetOperation(s.spop)
+	c:RegisterEffect(e3)
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e4:SetCode(EVENT_PHASE+PHASE_STANDBY)
+	e4:SetRange(0xff)
+	e4:SetCountLimit(1)
+	e4:SetLabelObject(e3)
+	e4:SetCondition(s.spcon2)
+	e4:SetOperation(s.spop2)
+	c:RegisterEffect(e4)
+end
 function s.thfilter(c,e,tp)
 	return (c:IsSetCard(0x6008) or c:IsSetCard(0x6)) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
 end
@@ -87,11 +86,12 @@ function s.tgcon(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.GetAttackTarget()~=nil
 end
 function s.tgfilter(c)
-	return c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
+	return c:IsAbleToGrave()
 end
 function s.tgtg(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
+	if chk==0 then return Duel.IsExistingMatchingCard(s.tgfilter,tp,LOCATION_DECK,0,1,nil) and c:GetFlagEffect(id)==0 end
 	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
+	c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE_CAL,0,1)
 end
 function s.tgop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.SelectMatchingCard(tp,s.tgfilter,tp,LOCATION_DECK,0,1,1,nil)

script/c40412000.lua

 --炼金兽·铁之火蜥蜴
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012,40412006)
 	c:EnableReviveLimit()

script/c40412001.lua

 --炼金兽·汞之䲟鱼
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012,40412007)
 	c:EnableReviveLimit()

script/c40412002.lua

 --炼金兽·铜之衔尾蛇
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012,40412008)
 	c:EnableReviveLimit()

script/c40412003.lua

 --炼金兽·银之月颜
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012,40412009)
 	c:EnableReviveLimit()

script/c40412004.lua

 --炼金兽·铅之狮子
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012,40412010)
 	c:EnableReviveLimit()

script/c40412005.lua

 --炼金兽·锡之鹫
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012,40412011)
 	c:EnableReviveLimit()

script/c40412006.lua

 --铁之油灯
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012,40412000)
 	--Activate

script/c40412007.lua

 --汞之沙漏
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012,40412001)
 	--Activate

script/c40412008.lua

 --铜之天秤
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012,40412002)
 	--Activate

script/c40412009.lua

 --银之钥匙
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012,40412003)
 	--Activate

script/c40412010.lua

 --铅之罗盘
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012,40412004)
 	--Activate

script/c40412011.lua

 --锡之魔法阵
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012,40412005)
 	--Activate

script/c40412012.lua

 --炼金釜-混沌提炼
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012)
 	--Activate

script/c40412013.lua

 --黑之过程-黑度
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012)
 	--Activate

script/c40412014.lua

 --白之过程-白纯
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012)
 	--Activate

script/c40412015.lua

 --黄之过程-黄炼
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012)
 	--Activate

script/c40412016.lua

 --赤色化-红成
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012)
 	--Activate

script/c40412017.lua

 --行星直列-九星连珠
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012)
 	--Activate

script/c40412018.lua

 --炼禁兽·火之伊夫利特
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012)
 	--fusion material

script/c40412019.lua

 --炼禁兽·水之温蒂妮
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	--synchro summon
 	c:EnableReviveLimit()

script/c40412020.lua

 --炼禁兽·风之希尔芙
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	c:SetUniqueOnField(1,0,id)
 	--xyz summon

script/c40412021.lua

 --炼禁兽·地之诺姆
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	c:SetUniqueOnField(1,0,id)
 	aux.AddCodeList(c,40412012)

script/c40412022.lua

 --三重伟大太阳 赫利俄斯
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012)
 	--splimit

script/c40412023.lua

 --黄金之混沌人工生命体
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012)
 	--

script/c40412024.lua

 --元素过滤器
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012)
 	--activate

script/c40412025.lua

 --贤者之石-万灵药
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	aux.AddCodeList(c,40412012)
 	--Activate

script/c40412026.lua

 --炼金术士 阿姆奈尔
 local s,id,o=GetID()
+local o=100
 function s.initial_effect(c)
 	--fusion material
 	c:EnableReviveLimit()

texts/balanced.txt

@@ -45,6 +45,16 @@
 -DoItYourself 黑莲
 提示文本：选择一张「核成兽的钢核」送去墓地、破坏「钢核成狂龙」、加入手卡、是否把卡破坏？、特殊召唤
 
+英豪挑战者 令旗兵(7448966) 地 4星 战士 300 1300 (Custom)
+系列：英豪挑战者
+这个卡名的①②的效果1回合各能使用1次。
+①：这张卡用抽卡以外的方法从卡组·墓地加入手卡的场合才能发动。从卡组把1只「英豪挑战者 令旗兵」以外的「英豪」怪兽加入手卡。
+②：把手卡的这张卡给对方观看才能发动。这张卡和1只「英豪」怪兽从手卡特殊召唤。这个效果的发动后，直到回合结束时自己不是「英豪」怪兽不能特殊召唤。
+
+-DoItYourself 黑莲
+效果分类：卡组检索、特殊召唤
+提示文本：加入手卡、特殊召唤
+
 空牙团的战士 艾玛(7450652) 地 3星 战士 1100 1000 (Custom)
 系列：空牙团
 这个卡名的①②的效果1回合各能使用1次。
@@ -4537,7 +4547,7 @@ DDD 识慧王 末日征服神(114514249) 暗 10星 恶魔/灵摆 3000 2000 (Cust
 暗黑界的阴影 刹斗(114514259) 暗 2星 恶魔 200 500 (Custom)
 系列：暗黑界
 这个卡名的②的效果1回合只能使用1次。
-①：对方因卡的效果从卡组把卡加入手卡的场合才能发动。手卡的这张卡特殊召唤，从卡组·墓地把1张「暗黑界」永续魔法·永续陷阱在自己场上发动，把1张手卡丢弃。
+①：对方因卡的效果从卡组把卡加入手卡的场合才能发动。手卡的这张卡特殊召唤，把1张手卡丢弃。对方场上有怪兽的场合，再从卡组·墓地把1张「暗黑界」永续魔法·永续陷阱在自己场上发动，
 ②：对方的效果把自己手卡丢弃的场合，把场上·墓地的这张卡除外，以场上1张卡为对象才能发动。那张卡回到手卡。
 分类：暗属性、恶魔族、主卡、融合、动漫-GX、OCG