54188

expansions/script/c11901310.lua

@@ -20,8 +20,7 @@ function s.initial_effect(c)
     e2:SetDescription(aux.Stringid(id,1))
 	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetCode(EVENT_CHAINING)   
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCode(EVENT_CHAINING)
 	e2:SetRange(LOCATION_SZONE)
 	e2:SetCountLimit(1,id)
 	e2:SetCondition(s.cicon)

expansions/script/c11901320.lua

@@ -20,8 +20,7 @@ function s.initial_effect(c)
     e2:SetDescription(aux.Stringid(id,1))
 	e2:SetCategory(CATEGORY_DRAW+CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetCode(EVENT_CHAINING)   
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCode(EVENT_CHAINING)
 	e2:SetRange(LOCATION_SZONE)
 	e2:SetCountLimit(1,id)
 	e2:SetCondition(s.cicon)
@@ -59,11 +58,11 @@ end
 function s.cicon(e,tp,eg,ep,ev,re,r,rp)
 	if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET)
         or not re:GetHandler():IsSetCard(0x409) then return false end
-	local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS)
+	local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToChain,e:GetHandler(),ev)
 	return g and #g>0 and e:GetHandler():GetType()==TYPE_TRAP+TYPE_CONTINUOUS
 end
 function s.citg(e,tp,eg,ep,ev,re,r,rp,chk)
-    local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS)
+    local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToChain,e:GetHandler(),ev)
 	if chk==0 then return e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false)
         and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
         and Duel.IsPlayerCanDraw(tp,#g) end

expansions/script/c11901330.lua

@@ -2,7 +2,8 @@
 local s,id,o=GetID()
 function s.initial_effect(c)
 	--SpSummon To SZone
-	local e1=Effect.CreateEffect(c) 
+	local e1=Effect.CreateEffect(c)
+    e1:SetDescription(aux.Stringid(id,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON) 
 	e1:SetType(EFFECT_TYPE_IGNITION) 
 	e1:SetRange(LOCATION_HAND)  
@@ -16,8 +17,7 @@ function s.initial_effect(c)
     e2:SetDescription(aux.Stringid(id,1))
 	e2:SetCategory(CATEGORY_NEGATE+CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetCode(EVENT_CHAINING)   
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCode(EVENT_CHAINING)
 	e2:SetRange(LOCATION_SZONE)
 	e2:SetCountLimit(1,id+1)
 	e2:SetCondition(s.cicon)
@@ -46,7 +46,8 @@ function s.htgop(e,tp,eg,ep,ev,re,r,rp)
 		e1:SetValue(TYPE_TRAP+TYPE_CONTINUOUS)
 		c:RegisterEffect(e1)
         local g=Duel.GetMatchingGroup(s.Spfi1ter,tp,0x08,0,c,e,tp)
-        if #g>0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then
+        local zone=Duel.GetLocationCount(tp,0x04)
+        if #g>0 and zone>0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then
             Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
             local sg=g:Select(tp,1,1,nil)
             Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
@@ -56,6 +57,9 @@ end
 function s.fi1ter(c)
 	return aux.NegateAnyFilter(c) and c:IsLocation(0x0c)
 end
+function s.fi2ter(c,e)
+	return c:IsRelateToEffect(e) and s.fi1ter(c)
+end
 function s.cicon(e,tp,eg,ep,ev,re,r,rp)
 	if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET)
         or not re:GetHandler():IsSetCard(0x409) then return false end
@@ -80,7 +84,7 @@ function s.ciop(e,tp,eg,ep,ev,re,r,rp)
     if Duel.GetLocationCount(tp,LOCATION_MZONE)==0 then return end
 	local c=e:GetHandler() 
     local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS)
-	local tg=g:Filter(Card.IsRelateToEffect,c,e)
+	local tg=g:Filter(s.fi2ter,c,e)
 	if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and #tg>0 then 
 		local tc=tg:GetFirst()
         while tc do

expansions/script/c11901340.lua

@@ -2,7 +2,8 @@
 local s,id,o=GetID()
 function s.initial_effect(c)
     --SearchCard
-	local e1=Effect.CreateEffect(c) 
+	local e1=Effect.CreateEffect(c)
+    e1:SetDescription(aux.Stringid(id,0))
 	e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND) 
 	e1:SetType(EFFECT_TYPE_IGNITION) 
 	e1:SetRange(LOCATION_HAND)  
@@ -16,8 +17,7 @@ function s.initial_effect(c)
     e2:SetDescription(aux.Stringid(id,1))
 	e2:SetCategory(CATEGORY_TODECK+CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetCode(EVENT_CHAINING)   
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCode(EVENT_CHAINING)
 	e2:SetRange(LOCATION_SZONE)
 	e2:SetCountLimit(1,id+1)
 	e2:SetCondition(s.cicon)

expansions/script/c11901350.lua

@@ -17,8 +17,7 @@ function s.initial_effect(c)
     e2:SetDescription(aux.Stringid(id,1))
 	e2:SetCategory(CATEGORY_DAMAGE+CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetCode(EVENT_CHAINING)   
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCode(EVENT_CHAINING)
 	e2:SetRange(LOCATION_SZONE)
 	e2:SetCountLimit(1,id+1)
 	e2:SetCondition(s.cicon)
@@ -55,11 +54,11 @@ end
 function s.cicon(e,tp,eg,ep,ev,re,r,rp)
 	if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET)
         or not re:GetHandler():IsSetCard(0x409) then return false end
-	local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS)
+	local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToChain,e:GetHandler(),ev)
 	return g and #g>0 and e:GetHandler():GetType()==TYPE_TRAP+TYPE_CONTINUOUS
 end
 function s.citg(e,tp,eg,ep,ev,re,r,rp,chk)
-    local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS)
+    local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToChain,e:GetHandler(),ev)
 	if chk==0 then return e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false)
         and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
     Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())

expansions/script/c11901360.lua

@@ -17,7 +17,7 @@ function s.initial_effect(c)
     --SynSum
     local e2=Effect.CreateEffect(c)
     e2:SetDescription(aux.Stringid(id,1))
-	e2:SetCategory(CATEGORY_DESTROY)
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e2:SetProperty(EFFECT_FLAG_DELAY)

expansions/script/c11901370.lua

@@ -17,7 +17,7 @@ function s.initial_effect(c)
     --SynSum
     local e2=Effect.CreateEffect(c)
     e2:SetDescription(aux.Stringid(id,1))
-	e2:SetCategory(CATEGORY_DESTROY)
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e2:SetProperty(EFFECT_FLAG_DELAY)

expansions/script/c11901380.lua

@@ -17,7 +17,7 @@ function s.initial_effect(c)
     --SynSum
     local e2=Effect.CreateEffect(c)
     e2:SetDescription(aux.Stringid(id,1))
-	e2:SetCategory(CATEGORY_DESTROY)
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e2:SetProperty(EFFECT_FLAG_DELAY)

expansions/script/c11901450.lua

@@ -20,8 +20,7 @@ function s.initial_effect(c)
     e2:SetDescription(aux.Stringid(id,1))
 	e2:SetCategory(CATEGORY_RECOVER+CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetCode(EVENT_CHAINING)   
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCode(EVENT_CHAINING)
 	e2:SetRange(LOCATION_SZONE)
 	e2:SetCountLimit(1,id)
 	e2:SetCondition(s.cicon)
@@ -57,11 +56,11 @@ end
 function s.cicon(e,tp,eg,ep,ev,re,r,rp)
 	if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET)
         or not re:GetHandler():IsSetCard(0x409) then return false end
-	local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS)
+	local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToChain,e:GetHandler(),ev)
 	return g and #g>0 and e:GetHandler():GetType()==TYPE_TRAP+TYPE_CONTINUOUS
 end
 function s.citg(e,tp,eg,ep,ev,re,r,rp,chk)
-    local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS)
+    local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToChain,e:GetHandler(),ev)
 	if chk==0 then return e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false)
         and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
     Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())

expansions/script/c11901470.lua

@@ -20,8 +20,7 @@ function s.initial_effect(c)
     e2:SetDescription(aux.Stringid(id,1))
 	e2:SetCategory(CATEGORY_REMOVE+CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetCode(EVENT_CHAINING)   
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCode(EVENT_CHAINING)
 	e2:SetRange(LOCATION_SZONE)
 	e2:SetCountLimit(1,id)
 	e2:SetCondition(s.cicon)
@@ -34,7 +33,7 @@ function s.thfilter(c)
         and not (c:IsLocation(0x20) and c:IsFacedown())
 end
 function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
+	if chk==0 then return Duel.GetLocationCount(tp,0x08)>0
 		and Duel.IsExistingMatchingCard(s.thfilter,tp,0x30,0,1,nil) end
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,0x30)
 end
@@ -43,8 +42,12 @@ function s.thop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 	local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.thfilter),tp,0x30,0,1,1,nil)
 	if g:GetCount()>0 and Duel.SendtoHand(g,nil,REASON_EFFECT)>0 then
-        Duel.ConfirmCards(1-tp,g)
-        if Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and c:IsRelateToEffect(e) then
+        local val=0
+        if g:GetFirst():IsLocation(0x02) then
+            Duel.ConfirmCards(1-tp,g)
+            val=1
+        end
+        if val==1 and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and c:IsRelateToEffect(e) then
             Duel.BreakEffect()
             Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
 		    local e1=Effect.CreateEffect(c)

expansions/script/c11901480.lua

@@ -17,8 +17,7 @@ function s.initial_effect(c)
     e2:SetDescription(aux.Stringid(id,1))
 	e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetCode(EVENT_CHAINING)   
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCode(EVENT_CHAINING)
 	e2:SetRange(LOCATION_SZONE)
 	e2:SetCountLimit(1,id+1)
 	e2:SetCondition(s.cicon)

expansions/script/c12877030.lua

@@ -22,8 +22,14 @@ end
 function c12877030.thfilter(c)
 	return c:IsSetCard(0x9a7b) and c:IsType(TYPE_PENDULUM) and c:IsAbleToHand()
 end
+function c12877030.rlfilter(c,tp)
+	local re=Duel.IsPlayerAffectedByEffect(tp,EFFECT_CANNOT_RELEASE)
+	local val=nil
+	if re then val=re:GetValue() end
+	return c:IsReleasableByEffect() or (c:IsType(TYPE_SPELL+TYPE_TRAP) and (val==nil or val(re,c)~=true))
+end
 function c12877030.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c12877030.thfilter,tp,LOCATION_DECK,0,1,nil) and Duel.IsExistingMatchingCard(Card.IsReleasableByEffect,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,e:GetHandler()) end
+	if chk==0 then return Duel.IsExistingMatchingCard(c12877030.thfilter,tp,LOCATION_DECK,0,1,nil) and Duel.IsExistingMatchingCard(c12877030.rlfilter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,e:GetHandler(),tp) end
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
 	Duel.SetOperationInfo(0,CATEGORY_RELEASE,nil,1,tp,LOCATION_HAND+LOCATION_ONFIELD)
 end
@@ -32,7 +38,7 @@ function c12877030.pfilter(c,atk)
 end
 function c12877030.activate(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
-	local g=Duel.SelectMatchingCard(tp,Card.IsReleasableByEffect,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,1,e:GetHandler())
+	local g=Duel.SelectMatchingCard(tp,c12877030.rlfilter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,1,e:GetHandler(),tp)
 	if Duel.Release(g,REASON_EFFECT)==0 then return end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 	local tc=Duel.SelectMatchingCard(tp,c12877030.thfilter,tp,LOCATION_DECK,0,1,1,nil):GetFirst()

expansions/script/c64800194.lua

@@ -4,7 +4,6 @@ function s.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(id,0))
-	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
 	e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH)
@@ -21,7 +20,6 @@ end
 function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		and Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_HAND,0,1,nil,e,tp)  end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
 end
 function s.actcfilter(c)
 	return c:IsSetCard(0x412) and c:IsFaceup() and c:IsType(TYPE_XYZ)