the divide

expansions/script/c113652145.lua

@@ -60,13 +60,27 @@ end
 function c113652145.spfilter(c)
     return c:IsSetCard(0x99) and not c:IsCode(113652145) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
 end
+function c113652145.spfilter2(c,tp)
+    return c:IsHasEffect(48829461,tp) and c:IsAbleToRemoveAsCost() and Duel.GetMZoneCount(tp,c)>0
+end
 function c113652145.spcon(e,c)
     if c==nil then return true end
-    return (not c:IsLocation(LOCATION_EXTRA) and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0 or c:IsLocation(LOCATION_EXTRA) and Duel.GetLocationCountFromEx(e:GetHandlerPlayer())>0) and Duel.IsExistingMatchingCard(c113652145.spfilter,c:GetControler(),LOCATION_DECK+LOCATION_EXTRA,0,1,e:GetHandler())
+    local tp=c:GetControler()
+    local b1=Duel.IsExistingMatchingCard(c113652145.spfilter,tp,LOCATION_DECK+LOCATION_EXTRA,0,1,nil)
+    local b2=Duel.IsExistingMatchingCard(c113652145.spfilter2,tp,LOCATION_MZONE+LOCATION_GRAVE,0,1,nil,tp)
+    return c:IsLocation(LOCATION_HAND) and (Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and b1 or b2) or c:IsLocation(LOCATION_EXTRA) and Duel.GetLocationCountFromEx(tp)>0 and b1
 end
 function c113652145.spop(e,tp,eg,ep,ev,re,r,rp,c)
-    local tg=Duel.SelectMatchingCard(tp,c113652145.spfilter,tp,LOCATION_DECK+LOCATION_EXTRA,0,1,1,e:GetHandler())
-    if tg:GetCount()>0 then
+    local b1=Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(c113652145.spfilter,tp,LOCATION_DECK+LOCATION_EXTRA,0,1,nil)
+    local b2=Duel.IsExistingMatchingCard(c113652145.spfilter2,tp,LOCATION_MZONE+LOCATION_GRAVE,0,1,nil,tp)
+    if c:IsLocation(LOCATION_HAND) and b2 and (not b1 or Duel.SelectYesNo(tp,aux.Stringid(48829461,0))) then
+        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+        local tg=Duel.SelectMatchingCard(tp,c113652145.spfilter2,tp,LOCATION_MZONE+LOCATION_GRAVE,0,1,1,nil,tp)
+        local te=tg:GetFirst():IsHasEffect(48829461,tp)
+        te:UseCountLimit(tp)
+        Duel.Remove(tg,POS_FACEUP,REASON_COST)
+    else
+        local tg=Duel.SelectMatchingCard(tp,c113652145.spfilter,tp,LOCATION_DECK+LOCATION_EXTRA,0,1,1,nil)
         Duel.Remove(tg:GetFirst(),POS_FACEUP,REASON_COST)
     end
 end

expansions/script/c115072031.lua

@@ -7,7 +7,6 @@ function cm.initial_effect(c)
     e1:SetType(EFFECT_TYPE_QUICK_O)
     e1:SetRange(LOCATION_HAND)
     e1:SetCode(EVENT_FREE_CHAIN)
-    e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
     e1:SetHintTiming(0,TIMING_END_PHASE)
     e1:SetCountLimit(1,m)
     e1:SetCost(cm.spcost)
@@ -17,7 +16,7 @@ function cm.initial_effect(c)
     --revive 
     local e2=Effect.CreateEffect(c)
     e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
-    e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
+    e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
     e2:SetType(EFFECT_TYPE_QUICK_O)
     e2:SetRange(LOCATION_GRAVE)
     e2:SetCode(EVENT_FREE_CHAIN)

expansions/script/c116511113.lua

@@ -77,8 +77,8 @@ function c116511113.xyzcon1(e,tp,eg,ep,ev,re,r,rp)
 end
 function c116511113.xyzop1(e,tp,eg,ep,ev,re,r,rp)
     local c=e:GetHandler()
-    if not c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false) then return end
-    if Duel.SelectYesNo(tp,aux.Stringid(116511113,0)) then
+    if Duel.GetFlagEffect(tp,116511113)==0 and Duel.SelectYesNo(tp,aux.Stringid(116511113,0)) then
+        Duel.RegisterFlagEffect(tp,116511113,RESET_CHAIN,0,1)
         local mg=Group.CreateGroup()
         local rc=re:GetHandler()
         if rc:IsDisabled() then return end
@@ -148,20 +148,20 @@ function c116511113.cost(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 c116511113.sumfilter(c)
-    return c:IsSetCard(0x108a) and c:IsSummonable(true,nil)
+function c116511113.sumfilter(c,e)
+    return c:IsSetCard(0x108a) and c:IsSummonable(true,e)
 end
 function c116511113.sumtg(e,tp,eg,ep,ev,re,r,rp,chk)
     if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-        and Duel.IsExistingMatchingCard(c116511113.sumfilter,tp,LOCATION_DECK,0,1,nil) end
+        and Duel.IsExistingMatchingCard(c116511113.sumfilter,tp,LOCATION_DECK,0,1,nil,e) end
     Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
 end
 function c116511113.sumop(e,tp,eg,ep,ev,re,r,rp)
     if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
     Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
-    local g=Duel.SelectMatchingCard(tp,c116511113.sumfilter,tp,LOCATION_DECK,0,1,1,nil)
+    local g=Duel.SelectMatchingCard(tp,c116511113.sumfilter,tp,LOCATION_DECK,0,1,1,nil,e)
     if g:GetCount()>0 then
-        Duel.Summon(tp,g:GetFirst(),true,nil)
+        Duel.Summon(tp,g:GetFirst(),true,e)
     end
 end
 function c116511113.spfilter(c,e,tp)

expansions/script/c117837139.lua

@@ -137,9 +137,9 @@ function c117837139.condition(e)
     return Duel.GetTurnPlayer()~=e:GetHandler():GetControler()
 end
 function c117837139.operation(e,tp,eg,ep,ev,re,r,rp)
-    if Duel.IsExistingMatchingCard(c117837139.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) then return false end
-    local g1=Duel.GetMatchingGroup(c117837139.filter2,tp,LOCATION_MZONE,0,nil,e)
-    local g2=Duel.GetMatchingGroup(c117837139.filter2,tp,0,LOCATION_MZONE,nil,e)
+    if Duel.IsExistingMatchingCard(c117837139.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,e) then return false end
+    local g1=Duel.GetMatchingGroup(c117837139.filter2,tp,LOCATION_MZONE,0,nil)
+    local g2=Duel.GetMatchingGroup(c117837139.filter2,tp,0,LOCATION_MZONE,nil)
     Duel.Hint(HINT_CARD,0,117837139)
     Duel.ChangePosition(g1,POS_FACEUP_ATTACK)
     Duel.ChangePosition(g2,POS_FACEUP_ATTACK)

expansions/script/c117960683.lua

@@ -190,14 +190,13 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
     local g=Duel.SelectTarget(tp,cm.spfilter,tp,LOCATION_GRAVE,0,2,2,e:GetHandler(),e,tp)
     Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,2,tp,LOCATION_GRAVE)
 end
-function cm.sxfilter(c,mg)
-    return c:IsSynchroSummonable(nil,mg) or c:IsXyzSummonable(mg,2,2)
+function cm.sxfilter(c,tp,mg)
+    return (c:IsSynchroSummonable(nil,mg) or c:IsXyzSummonable(mg)) and Duel.GetLocationCountFromEx(tp,tp,mg,c)>0
 end
 function cm.spop(e,tp,eg,ep,ev,re,r,rp)
     local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
     if Duel.GetLocationCount(tp,LOCATION_MZONE)<2 or g:GetCount()<2 or Duel.IsPlayerAffectedByEffect(tp,59822133) then return end
-    local tc=g:GetFirst()
-    while tc do
+    for tc in aux.Next(g) do
         Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP_DEFENSE)
         local e1=Effect.CreateEffect(e:GetHandler())
         e1:SetType(EFFECT_TYPE_SINGLE)
@@ -209,11 +208,10 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
         e2:SetCode(EFFECT_DISABLE_EFFECT)
         e2:SetReset(RESET_EVENT+RESETS_STANDARD)
         tc:RegisterEffect(e2,true)
-        tc=g:GetNext()
     end
     Duel.SpecialSummonComplete()
-    local sxg=Duel.GetMatchingGroup(cm.sxfilter,tp,LOCATION_EXTRA,0,nil,g)
-    if Duel.GetLocationCountFromEx(tp,tp,g,e:GetHandler())>0 and sxg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
+    local sxg=Duel.GetMatchingGroup(cm.sxfilter,tp,LOCATION_EXTRA,0,nil,tp,g)
+    if sxg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
         Duel.BreakEffect()
         Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
         local sxc=sxg:Select(tp,1,1,nil):GetFirst()

expansions/script/c118817732.lua

@@ -69,11 +69,21 @@ end
 function c118817732.xyzcondition(e,c,og,min,max)
     if c==nil then return true end
     local tp=c:GetControler()
-    local mg=Duel.GetMatchingGroup(c118817732.xyzfilter,tp,LOCATION_HAND,0,nil)
-    return mg:IsExists(aux.TRUE,2,nil)
+    local mg
+    if og then
+        mg=og
+    else
+        mg=Duel.GetFieldGroup(tp,LOCATION_HAND,0)
+    end
+    return mg:IsExists(c118817732.xyzfilter,2,nil)
 end
 function c118817732.xyztarget(e,tp,eg,ep,ev,re,r,rp,chk,c,og,min,max)
-    local mg=Duel.GetMatchingGroup(c118817732.xyzfilter,tp,LOCATION_HAND,0,nil)
+    local mg=nil
+    if og then
+        mg=og
+    else
+        mg=Duel.GetMatchingGroup(c118817732.xyzfilter,tp,LOCATION_HAND,0,nil)
+    end
     local g=mg:Select(tp,2,2,nil)
     if g then
         g:KeepAlive()

expansions/script/c33403503.lua

@@ -36,10 +36,10 @@ function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
 	return not se:GetHandler():IsSetCard(0x5349)and  not c:IsCode(33403500)
 end
 function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	local b1=Duel.GetFieldGroupCount(tp,0,LOCATION_REMOVED+LOCATION_GRAVE+LOCATION_ONFIELD)
+	local b1=Duel.IsExistingMatchingCard(aux.disfilter1,tp,0,LOCATION_REMOVED+LOCATION_GRAVE+LOCATION_ONFIELD,1,nil)
 	local b2=Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_MZONE,0,1,nil,33403500)
 	if chkc then return true end
-	if chk==0 then return b1>0 or b2>0 end
+	if chk==0 then return b1 or b2 end
 	if e:GetLabel()==1 then 
 	local c=e:GetHandler()
 	local e2=Effect.CreateEffect(c)
@@ -83,7 +83,7 @@ function cm.regop2(e,tp,eg,ep,ev,re,r,rp)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	local b1=Duel.GetFieldGroupCount(tp,0,LOCATION_REMOVED+LOCATION_GRAVE+LOCATION_ONFIELD)
+	local b1=Duel.IsExistingMatchingCard(aux.disfilter1,tp,0,LOCATION_REMOVED+LOCATION_GRAVE+LOCATION_ONFIELD,1,nil)
 	local b2=Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_MZONE,0,1,nil,33403500)
 	if not (b1 or b2) then return end 
 	local op
@@ -95,7 +95,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
    if op==0 then 
 	local ct=Duel.GetFlagEffect(tp,33403501)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPPO)
-	local tg=Duel.SelectMatchingCard(tp,nil,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED,1,ct,nil)  
+	local tg=Duel.SelectMatchingCard(tp,aux.disfilter1,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED,1,ct,nil)  
 	local tc=tg:GetFirst()  
 		while tc do
 		Duel.NegateRelatedChain(tc,RESET_TURN_SET)
@@ -103,21 +103,21 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 			e1:SetType(EFFECT_TYPE_SINGLE)
 			e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
 			e1:SetCode(EFFECT_DISABLE)
-			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
 			tc:RegisterEffect(e1)
 			local e2=Effect.CreateEffect(c)
 			e2:SetType(EFFECT_TYPE_SINGLE)
 			e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
 			e2:SetCode(EFFECT_DISABLE_EFFECT)
 			e2:SetValue(RESET_TURN_SET)
-			e2:SetReset(RESET_EVENT+RESETS_STANDARD)
+			e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
 			tc:RegisterEffect(e2)
 			if tc:IsType(TYPE_TRAPMONSTER) then
 				local e3=Effect.CreateEffect(c)
 				e3:SetType(EFFECT_TYPE_SINGLE)
 				e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
 				e3:SetCode(EFFECT_DISABLE_TRAPMONSTER)
-				e3:SetReset(RESET_EVENT+RESETS_STANDARD)
+				e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
 				tc:RegisterEffect(e3)
 			end
 		tc=tg:GetNext()

expansions/script/c33403506.lua

@@ -123,7 +123,9 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 	e6:SetValue(n)
 	token:RegisterEffect(e6,true)
 	local e7=e1:Clone()
-	e7:SetCode(EFFECT_ADD_CODE)
+	e7:SetType(EFFECT_TYPE_SINGLE)
+	e7:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e7:SetCode(EFFECT_CHANGE_CODE)
 	e7:SetValue(tc:GetCode())
 	token:RegisterEffect(e7,true)
 	token:CopyEffect(tc:GetCode(),RESET_EVENT+0xfe0000,1)

expansions/script/c33403508.lua

@@ -84,6 +84,7 @@ function cm.regop2(e,tp,eg,ep,ev,re,r,rp)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 local c=e:GetHandler()
+if not Duel.IsExistingMatchingCard(Card.IsControlerCanBeChanged,tp,0,LOCATION_MZONE,1,nil) then return end 
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
 	local g1=Duel.SelectMatchingCard(tp,Card.IsAbleToChangeControler,tp,0,LOCATION_MZONE,1,1,nil)
 	local tc1=g1:GetFirst()

expansions/script/c460524290.lua

@@ -49,7 +49,7 @@ function c460524290.activate(e,tp,eg,ep,ev,re,r,rp)
     Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
     local mat=mg:SelectWithSumEqual(tp,Card.GetRitualLevel,tg:GetLevel(),1,99,tg)
     tg:SetMaterial(mat)
-	Duel.SendtoGrave(mat,REASON_EFFECT+REASON_RELEASE)
+    Duel.SendtoGrave(mat,REASON_EFFECT+REASON_RELEASE+REASON_RITUAL)
     Duel.Remove(tg,POS_FACEUP,REASON_EFFECT)
     if not e:IsHasType(EFFECT_TYPE_ACTIVATE) then return end
     local e1=Effect.CreateEffect(e:GetHandler())
@@ -57,7 +57,7 @@ function c460524290.activate(e,tp,eg,ep,ev,re,r,rp)
     e1:SetRange(LOCATION_REMOVED)
     e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
     e1:SetCountLimit(1)
-	e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN)
+    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN)
     e1:SetCondition(c460524290.spcon)
     e1:SetOperation(c460524290.spop)
     tg:RegisterEffect(e1)

expansions/script/c84610009.lua

@@ -71,32 +71,27 @@ function c84610009.cost(e,tp,eg,ep,ev,re,r,rp,chk)
     Duel.DiscardHand(tp,c84610009.cfilter,1,1,REASON_DISCARD+REASON_COST,nil)
 end
 function c84610009.scfilter(c,e,tp)
-    return c:IsSetCard(0x8) and c:IsType(TYPE_FUSION) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,true,false)
+    return c:IsSetCard(0x8) and c:IsType(TYPE_FUSION) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,true,false) and Duel.GetMatchingGroup(c84610009.filter1,tp,LOCATION_MZONE,0,nil,tp,c):GetClassCount(Card.GetCode)>2
 end
-function c84610009.filter1(c)
-    return c:IsSetCard(0x8) and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
+function c84610009.filter1(c,tp,tc)
+    return c:IsSetCard(0x8) and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave() and Duel.GetLocationCountFromEx(tp,tp,c,tc)>0
 end
 function c84610009.target1(e,tp,eg,ep,ev,re,r,rp,chk)
-    if chk==0 then
-        local g=Duel.GetMatchingGroup(c84610009.filter1,tp,LOCATION_MZONE,0,nil)
-        return g:GetClassCount(Card.GetCode)>2
-            and Duel.GetLocationCountFromEx(tp)>0
-            and Duel.IsExistingMatchingCard(c84610009.scfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp)
-    end
+    if chk==0 then return Duel.IsExistingMatchingCard(c84610009.scfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
     Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,3,tp,LOCATION_MZONE)
     Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
 end
 function c84610009.activate1(e,tp,eg,ep,ev,re,r,rp)
-    local g=Duel.GetMatchingGroup(c84610009.filter1,tp,LOCATION_MZONE,0,nil)
+    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+    local g=Duel.SelectMatchingCard(tp,c84610009.scfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
+    local tc=g:GetFirst()
+    if tc then
+        local g=Duel.GetMatchingGroup(c84610009.filter1,tp,LOCATION_MZONE,0,nil,tp,tc)
         if g:GetClassCount(Card.GetCode)<3 then return end
         Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
         local tg=g:Select(tp,3,3,nil)
         g:Remove(Card.IsCode,nil,tg:GetFirst():GetCode())
         if Duel.SendtoGrave(tg,REASON_EFFECT)~=0 and tg:IsExists(Card.IsLocation,3,nil,LOCATION_GRAVE) then
-        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-        local g=Duel.SelectMatchingCard(tp,c84610009.scfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
-        local tc=g:GetFirst()
-        if tc then
             Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,true,false,POS_FACEUP)
             tc:CompleteProcedure()
         end