2025/2/8 返回手卡卡组额外的抗性调整

script/RDAction.lua

@@ -172,7 +172,7 @@ function RushDuel.SelectAndToHandOrSpecialSummon(hint, filter, tp, s_range, o_ra
             if break_effect then
                 Duel.BreakEffect()
             end
-            return RushDuel.SendToHandAndExists(tc, 1 - tp)
+            return RushDuel.SendToHandAndExists(tc, e, tp, REASON_EFFECT)
         else
             return RushDuel._special_summon(tc, e, tp, pos, break_effect, target_player)
         end
@@ -187,7 +187,7 @@ function RushDuel.CanSelectAndToHandOrSpecialSummon(desc, hint, filter, tp, s_ra
             if break_effect then
                 Duel.BreakEffect()
             end
-            return RushDuel.SendToHandAndExists(tc, 1 - tp)
+            return RushDuel.SendToHandAndExists(tc, e, tp, REASON_EFFECT)
         else
             return RushDuel._special_summon(tc, e, tp, pos, break_effect, target_player)
         end
@@ -260,22 +260,42 @@ function RushDuel.ChangePosition(target, effect, player, reason, pos)
     end
 end
 
--- 操作: 加入/返回手卡, 并给对方确认
-function RushDuel.SendToHandAndExists(target, confirm_player, filter, count, expect)
-    local g = RushDuel.ToMaximunGroup(target):Filter(Card.IsAbleToHand, nil)
+-- 过滤可以加入手卡的卡
+function RushDuel.FilterToHandTarget(card, effect, player, reason, hints)
+    local effects = {card:IsHasEffect(EFFECT_CANNOT_TO_HAND_EFFECT)}
+    for i, e in ipairs(effects) do
+        local value = e:GetValue()
+        if value == 1 then
+            hints:AddCard(e:GetHandler())
+            return false
+        elseif type(value) == "function" and value(e, effect, reason, player) then
+            hints:AddCard(e:GetHandler())
+            return false
+        end
+    end
+    return true
+end
+-- 操作: 加入/返回手卡, 并给对方确认加入自己手卡的卡
+function RushDuel.SendToHandAndExists(target, effect, player, reason, filter, count, expect)
+    local hints = Group.CreateGroup()
+    local group = RushDuel.ToGroup(target):Filter(RushDuel.FilterToHandTarget, nil, effect, player, reason, hints)
+    local g = RushDuel.ToMaximunGroup(group)
+    local tc = hints:GetFirst()
+    if tc then
+        Duel.Hint(HINT_CARD, 0, tc:GetOriginalCode())
+    end
+    if g:GetCount() == 0 then
+        return false
+    end
     if Duel.SendtoHand(g, nil, REASON_EFFECT) == 0 then
         return false
     end
-    if confirm_player ~= nil then
-        Duel.ConfirmCards(confirm_player, g)
+    local cg = g:Filter(Card.IsControler, nil, player)
+    if cg:GetCount() > 0 then
+        Duel.ConfirmCards(1 - player, cg)
     end
     return RushDuel.IsOperatedGroupExists(filter, count, expect)
 end
--- 操作: 返回对方手卡, 不能确认那些卡
-function RushDuel.SendToOpponentHand(target)
-    local g = RushDuel.ToMaximunGroup(target):Filter(Card.IsAbleToHand, nil)
-    return Duel.SendtoHand(g, nil, REASON_EFFECT)
-end
 
 -- 操作: 送去墓地
 function RushDuel.SendToGraveAndExists(target, filter, count, expect)
@@ -320,61 +340,72 @@ function RushDuel.SendOpponentHandToGrave(tp, desc, min, max)
     return 0
 end
 
+-- 过滤可以加入卡组的卡
+function RushDuel.FilterToDeckTarget(card, effect, player, reason, hints)
+    local effects = {card:IsHasEffect(EFFECT_CANNOT_TO_DECK_EFFECT)}
+    for i, e in ipairs(effects) do
+        local value = e:GetValue()
+        if value == 1 then
+            hints:AddCard(e:GetHandler())
+            return false
+        elseif type(value) == "function" and value(e, effect, reason, player) then
+            hints:AddCard(e:GetHandler())
+            return false
+        end
+    end
+    return true
+end
 -- 操作: 返回卡组
-function RushDuel.SendToDeckAndExists(target, filter, count, expect)
-    local g = RushDuel.ToMaximunGroup(target):Filter(Card.IsAbleToDeck, nil)
+function RushDuel.SendToDeckAndExists(target, effect, player, reason, filter, count, expect)
+    local hints = Group.CreateGroup()
+    local group = RushDuel.ToGroup(target):Filter(RushDuel.FilterToHandTarget, nil, effect, player, reason, hints)
+    local g = RushDuel.ToMaximunGroup(group)
+    local tc = hints:GetFirst()
+    if tc then
+        Duel.Hint(HINT_CARD, 0, tc:GetOriginalCode())
+    end
+    if g:GetCount() == 0 then
+        return false
+    end
     return Duel.SendtoDeck(g, nil, SEQ_DECKSHUFFLE, REASON_EFFECT) ~= 0 and RushDuel.IsOperatedGroupExists(filter, count, expect)
 end
 -- 操作: 返回卡组上面 (排序)
-function RushDuel.SendToDeckTop(target, sort_player)
-    local g = RushDuel.ToMaximunGroup(target):Filter(Card.IsAbleToDeck, nil)
-    if sort_player ~= nil then
-        local og, ct = RushDuel.SendToDeckSort(g, SEQ_DECKTOP, REASON_EFFECT, sort_player)
-        return ct
-    else
-        return Duel.SendtoDeck(g, nil, SEQ_DECKTOP, REASON_EFFECT)
+function RushDuel.SendToDeckTop(target, effect, player, reason)
+    local hints = Group.CreateGroup()
+    local group = RushDuel.ToGroup(target):Filter(RushDuel.FilterToHandTarget, nil, effect, player, reason, hints)
+    local g = RushDuel.ToMaximunGroup(group)
+    local tc = hints:GetFirst()
+    if tc then
+        Duel.Hint(HINT_CARD, 0, tc:GetOriginalCode())
     end
-end
--- 操作: 返回卡组下面 (排序)
-function RushDuel.SendToDeckBottom(target, sort_player)
-    local g = RushDuel.ToMaximunGroup(target):Filter(Card.IsAbleToDeck, nil)
-    if sort_player ~= nil then
-        local og, ct = RushDuel.SendToDeckSort(g, SEQ_DECKBOTTOM, REASON_EFFECT, sort_player)
-        return ct
-    else
-        return Duel.SendtoDeck(g, nil, SEQ_DECKBOTTOM, REASON_EFFECT)
+    if g:GetCount() == 0 then
+        return 0
     end
-end
--- 操作: 返回卡组上面或下面 (排序)
-function RushDuel.SendToDeckTopOrBottom(target, sort_player, top_desc, bottom_desc)
-    local g = RushDuel.ToMaximunGroup(target):Filter(Card.IsAbleToDeck, nil)
-    local sequence = Duel.SelectOption(sort_player, top_desc, bottom_desc)
-    local og, ct = RushDuel.SendToDeckSort(g, sequence, REASON_EFFECT, sort_player)
+    local og, ct = RushDuel.SendToDeckSort(g, SEQ_DECKTOP, REASON_EFFECT, player)
     return ct
 end
--- 操作: 返回对方卡组上面 (排序)
-function RushDuel.SendToOpponentDeck(target)
-    local g = RushDuel.ToMaximunGroup(target):Filter(Card.IsAbleToDeck, nil)
-    return Duel.SendtoDeck(g, nil, SEQ_DECKSHUFFLE, REASON_EFFECT)
-end
--- 操作: 返回对方卡组上面 (排序)
-function RushDuel.SendToOpponentDeckTop(target, player)
-    local g = RushDuel.ToMaximunGroup(target):Filter(Card.IsAbleToDeck, nil)
-    if g:GetCount() == 1 then
-        return Duel.SendtoDeck(g, nil, SEQ_DECKTOP, REASON_EFFECT)
-    else
-        local og, ct = RushDuel.SendToDeckSort(g, SEQ_DECKTOP, REASON_EFFECT, player)
-        return ct
+-- 操作: 返回卡组下面 (排序)
+function RushDuel.SendToDeckBottom(target, effect, player, reason)
+    local hints = Group.CreateGroup()
+    local group = RushDuel.ToGroup(target):Filter(RushDuel.FilterToHandTarget, nil, effect, player, reason, hints)
+    local g = RushDuel.ToMaximunGroup(group)
+    local tc = hints:GetFirst()
+    if tc then
+        Duel.Hint(HINT_CARD, 0, tc:GetOriginalCode())
     end
+    if g:GetCount() == 0 then
+        return 0
+    end
+    local og, ct = RushDuel.SendToDeckSort(g, SEQ_DECKBOTTOM, REASON_EFFECT, player)
+    return ct
 end
--- 操作: 返回对方卡组下面 (排序)
-function RushDuel.SendToOpponentDeckBottom(target, player)
-    local g = RushDuel.ToMaximunGroup(target):Filter(Card.IsAbleToDeck, nil)
-    if g:GetCount() == 1 then
-        return Duel.SendtoDeck(g, nil, SEQ_DECKBOTTOM, REASON_EFFECT)
+-- 操作: 返回卡组上面或下面 (排序)
+function RushDuel.SendToDeckTopOrBottom(target, effect, player, reason, top_desc, bottom_desc)
+    local sequence = Duel.SelectOption(player, top_desc, bottom_desc)
+    if sequence == 0 then
+        return RushDuel.SendToDeckTop(target, effect, player, reason)
     else
-        local og, ct = RushDuel.SendToDeckSort(g, SEQ_DECKBOTTOM, REASON_EFFECT, player)
-        return ct
+        return RushDuel.SendToDeckBottom(target, effect, player, reason)
     end
 end
 

script/RDFunction.lua

@@ -115,11 +115,6 @@ end
 -- 返回卡组并排序
 function RushDuel.SendToDeckSort(target, sequence, reason, sort_player)
     local g = RushDuel.ToMaximunGroup(target)
-    if reason & REASON_COST ~= 0 then
-        g = g:Filter(Card.IsAbleToDeckOrExtraAsCost, nil)
-    else
-        g = g:Filter(Card.IsAbleToDeck, nil)
-    end
     local ct = 0
     if sequence == SEQ_DECKTOP then
         ct = Auxiliary.PlaceCardsOnDeckTop(sort_player, g, reason)

script/RDRule.lua

@@ -91,20 +91,4 @@ function RushDuel.OverrideFunction()
     -- "那之后" 不打断时点
     Duel.BreakEffect = function()
     end
-    -- 不会被效果回到手卡
-    local IsAbleToHand = Card.IsAbleToHand
-    Card.IsAbleToHand = function(c)
-        if c:IsHasEffect(EFFECT_CANNOT_TO_HAND_EFFECT) then
-            return false
-        end
-        return IsAbleToHand(c)
-    end
-    -- 不会被效果回到卡组·额外卡组
-    local IsAbleToDeck = Card.IsAbleToDeck
-    Card.IsAbleToDeck = function(c)
-        if c:IsHasEffect(EFFECT_CANNOT_TO_DECK_EFFECT) then
-            return false
-        end
-        return IsAbleToDeck(c)
-    end
 end

script/c120102003.lua

@@ -33,7 +33,7 @@ end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	if RD.SendDeckTopToGraveAndExists(tp,3,cm.exfilter,1,nil) then
 		RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-			RD.SendToHandAndExists(g,1-tp)
+			RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120108003.lua

@@ -30,7 +30,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 			local lv=g:GetFirst():GetLevel()
 			RD.AttachAtkDef(e,tc,lv*-100,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
 			Duel.BreakEffect()
-			RD.SendToDeckAndExists(g)
+			RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120109017.lua

@@ -28,6 +28,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectGroupAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.thfilter),cm.tdcheck,tp,0,LOCATION_GRAVE,2,2,nil,function(g)
-		RD.SendToDeckAndExists(g)
+		RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120109019.lua

@@ -26,6 +26,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120109023.lua

@@ -28,7 +28,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	if RD.SelectAndSpecialSummon(cm.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,POS_FACEUP_DEFENSE,false,1-tp)~=0 then
 		RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_RTOHAND,cm.thfilter,tp,0,LOCATION_MZONE,1,1,nil,function(g)
 			Duel.BreakEffect()
-			RD.SendToOpponentHand(g)
+			RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120109025.lua

@@ -28,7 +28,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		if RD.SendToHandAndExists(g,1-tp) then
+		if RD.SendToHandAndExists(g,e,tp,REASON_EFFECT) then
 			local c=e:GetHandler()
 			if c:IsFaceup() and c:IsRelateToEffect(e) then
 				Duel.BreakEffect()

script/c120109029.lua

@@ -31,7 +31,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	if RD.SendDeckTopToGraveAndExists(1-tp,2) and Duel.IsExistingMatchingCard(cm.exfilter,tp,0,LOCATION_GRAVE,5,nil) then
 		RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
 			Duel.BreakEffect()
-			RD.SendToHandAndExists(g,1-tp)
+			RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120109030.lua

@@ -42,7 +42,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	if RD.Draw()~=0
 		and RD.CanSelectAndSpecialSummon(aux.Stringid(m,1),aux.NecroValleyFilter(cm.spfilter),tp,LOCATION_GRAVE,0,1,1,nil,e,POS_FACEUP,true)~=0 then
 		RD.CanSelectAndDoAction(aux.Stringid(m,2),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(sg)
-			RD.SendToHandAndExists(sg,1-tp)
+			RD.SendToHandAndExists(sg,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120109031.lua

@@ -44,7 +44,7 @@ function cm.target2(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation2(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),tp,LOCATION_GRAVE,0,1,3,nil,function(g)
-		if RD.SendToDeckAndExists(g) then
+		if RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT) then
 			local ct=Duel.GetOperatedGroup():FilterCount(cm.exfilter,nil)
 			if ct==0 then return end
 			RD.CanSelectAndDoAction(aux.Stringid(m,4),HINTMSG_DESTROY,cm.desfilter,tp,0,LOCATION_ONFIELD,1,ct,nil,function(sg)

script/c120109033.lua

@@ -31,7 +31,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 	if Duel.GetFlagEffect(tp,m)~=0 then return end
 	RD.CreateHintEffect(e,aux.Stringid(m,1),tp,1,0,RESET_PHASE+PHASE_END)

script/c120109035.lua

@@ -28,7 +28,7 @@ end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),tp,LOCATION_GRAVE,0,2,2,nil,function(g)
 		local c=e:GetHandler()
-		if RD.SendToDeckAndExists(g) and c:IsFaceup() and c:IsRelateToEffect(e) then
+		if RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT) and c:IsFaceup() and c:IsRelateToEffect(e) then
 			RD.AttachAtkDef(e,c,500,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
 		end
 	end)

script/c120109038.lua

@@ -30,7 +30,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	local sg,g=RD.RevealDeckTopAndCanSelect(tp,4,aux.Stringid(m,1),HINTMSG_ATOHAND,cm.thfilter,1,1)
 	if sg:GetCount()>0 then
 		Duel.DisableShuffleCheck()
-		RD.SendToHandAndExists(sg,1-tp)
+		RD.SendToHandAndExists(sg,e,tp,REASON_EFFECT)
 		Duel.ShuffleHand(tp)
 	end
 	local ct=g:GetCount()

script/c120109048.lua

@@ -39,7 +39,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_RTOHAND,cm.filter,tp,0,LOCATION_ONFIELD,1,2,nil,function(g)
-		if RD.SendToOpponentHand(g)~=0 and e:GetLabel()==2 and Duel.GetFlagEffect(tp,m)==0 then
+		if RD.SendToHandAndExists(g,e,tp,REASON_EFFECT) and e:GetLabel()==2 and Duel.GetFlagEffect(tp,m)==0 then
 			RD.CreateCannotActivateEffect(e,aux.Stringid(m,1),cm.aclimit,tp,1,1,RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
 			Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END+RESET_OPPO_TURN,0,1)
 		end

script/c120110009.lua

@@ -24,6 +24,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120120017.lua

@@ -30,6 +30,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120120018.lua

@@ -25,6 +25,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),tp,0,LOCATION_GRAVE,1,2,nil,function(g)
-		RD.SendToDeckAndExists(g)
+		RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120130022.lua

@@ -38,6 +38,6 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	if ct==0 then return end
 	RD.SelectAndDoAction(HINTMSG_TODECK,Card.IsAbleToDeck,p,LOCATION_HAND,0,ct,ct,nil,function(g)
 		Duel.BreakEffect()
-		RD.SendToDeckTopOrBottom(g,p,aux.Stringid(m,1),aux.Stringid(m,2))
+		RD.SendToDeckTopOrBottom(g,e,p,REASON_EFFECT,aux.Stringid(m,1),aux.Stringid(m,2))
 	end)
 end
\ No newline at end of file

script/c120130023.lua

@@ -32,7 +32,7 @@ end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	if RD.SendDeckTopToGraveAndExists(tp,3,cm.exfilter,1,nil) then
 		RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-			RD.SendToHandAndExists(g,1-tp)
+			RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120130030.lua

@@ -32,7 +32,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 			and Duel.Damage(1-tp,1000,REASON_EFFECT)~=0
 			and c:IsFaceup() and c:IsRelateToEffect(e) then
 			Duel.BreakEffect()
-			RD.SendToHandAndExists(c,1-tp)
+			RD.SendToHandAndExists(c,e,tp,REASON_EFFECT)
 		end
 	end)
 end
\ No newline at end of file

script/c120130034.lua

@@ -30,7 +30,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 			local tc=g:GetFirst()
 			RD.AttachAtkDef(e,c,tc:GetLevel()*100,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
 			Duel.BreakEffect()
-			RD.SendToDeckAndExists(g)
+			RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120140013.lua

@@ -33,7 +33,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_RTOHAND,Card.IsAbleToHand,tp,LOCATION_MZONE,0,1,1,nil,function(g)
-		if RD.SendToHandAndExists(g,1-tp) then
+		if RD.SendToHandAndExists(g,e,tp,REASON_EFFECT) then
 			local filter=RD.Filter(cm.posfilter,e,tp)
 			local sg=Duel.GetMatchingGroup(filter,tp,LOCATION_MZONE,0,nil)
 			if sg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then

script/c120140017.lua

@@ -26,7 +26,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 	if Duel.GetFlagEffect(tp,m)~=0 then return end
 	RD.CreateHintEffect(e,aux.Stringid(m,1),tp,1,0,RESET_PHASE+PHASE_END)

script/c120140025.lua

@@ -29,6 +29,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_RTOHAND,cm.filter,tp,0,LOCATION_ONFIELD,1,1,nil,function(g)
-		RD.SendToOpponentHand(g)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120140037.lua

@@ -31,6 +31,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,cm.filter,tp,0,LOCATION_ONFIELD,1,1,nil,function(g)
-		RD.SendToOpponentDeckTop(g,tp)
+		RD.SendToDeckTop(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120145022.lua

@@ -28,6 +28,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),tp,0,LOCATION_GRAVE,1,2,nil,function(g)
-		RD.SendToDeckAndExists(g)
+		RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120145024.lua

@@ -27,7 +27,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	if c:IsFaceup() and c:IsRelateToEffect(e) then
 		RD.AttachAtkDef(e,c,600,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
 		RD.CanSelectGroupAndDoAction(aux.Stringid(m,1),HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),aux.dncheck,tp,LOCATION_GRAVE,0,2,2,nil,function(g)
-			if RD.SendToDeckAndExists(g) then
+			if RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT) then
 				RD.CanSelectAndDoAction(aux.Stringid(m,2),HINTMSG_DESTROY,cm.desfilter,tp,0,LOCATION_MZONE,1,1,nil,function(sg)
 					Duel.Destroy(sg,REASON_EFFECT)
 				end)

script/c120145028.lua

@@ -26,6 +26,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120145029.lua

@@ -24,6 +24,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120145034.lua

@@ -31,6 +31,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120145035.lua

@@ -27,6 +27,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120150004.lua

@@ -30,6 +30,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120150006.lua

@@ -36,7 +36,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 		Duel.ConfirmCards(tp,g)
 		if g:GetFirst():IsType(TYPE_TRAP) then
 			RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(sg)
-				if RD.SendToDeckBottom(sg)~=0 then
+				if RD.SendToDeckBottom(sg,e,tp,REASON_EFFECT)~=0 then
 					Duel.Draw(tp,1,REASON_EFFECT)
 				end
 			end)

script/c120150009.lua

@@ -40,6 +40,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.filter),tp,LOCATION_GRAVE,LOCATION_GRAVE,1,5,nil,function(g)
-		RD.SendToDeckAndExists(g)
+		RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120150016.lua

@@ -34,7 +34,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	if c:IsRelateToEffect(e) and c:IsControler(tp) and Duel.SendtoGrave(c,REASON_EFFECT)~=0 and Duel.Draw(tp,2,REASON_EFFECT)~=0 then
 		RD.SelectAndDoAction(HINTMSG_TODECK,Card.IsAbleToDeck,tp,LOCATION_HAND,0,2,2,nil,function(g)
 			Duel.BreakEffect()
-			RD.SendToDeckBottom(g,tp)
+			RD.SendToDeckBottom(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120150020.lua

@@ -29,7 +29,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.Draw(p,d,REASON_EFFECT)==d then
 		RD.SelectAndDoAction(HINTMSG_TODECK,Card.IsAbleToDeck,p,LOCATION_HAND,0,2,2,nil,function(g)
 			Duel.BreakEffect()
-			RD.SendToDeckBottom(g,p)
+			RD.SendToDeckBottom(g,e,p,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120150021.lua

@@ -32,7 +32,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.filter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		if RD.SendToDeckTop(g)~=0 then
+		if RD.SendToDeckTop(g,e,tp,REASON_EFFECT)~=0 then
 			Duel.ConfirmDecktop(tp,1)
 		end
 	end)

script/c120150023.lua

@@ -34,7 +34,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.filter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		if RD.SendToDeckAndExists(g) then
+		if RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT) then
 			Duel.ShuffleDeck(tp)
 			Duel.BreakEffect()
 			Duel.Draw(tp,1,REASON_EFFECT)

script/c120150025.lua

@@ -32,6 +32,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120150047.lua

@@ -36,7 +36,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 		local lv=g:GetFirst():GetLevel()
 		if Duel.Recover(tp,lv*200,REASON_EFFECT)~=0 then
 			Duel.BreakEffect()
-			RD.SendToHandAndExists(g)
+			RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 		end
 	end)
 end
\ No newline at end of file

script/c120151001.lua

@@ -35,7 +35,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 		if Duel.Damage(1-tp,tc:GetLevel()*100,REASON_EFFECT)~=0
 			and tc:IsAbleToHand()
 			and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
-			RD.SendToHandAndExists(tc,1-tp)
+			RD.SendToHandAndExists(tc,e,tp,REASON_EFFECT)
 		end
 	end)
 end
\ No newline at end of file

script/c120151004.lua

@@ -29,7 +29,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_RTOHAND,cm.filter,tp,LOCATION_MZONE,0,1,1,nil,function(g)
-		if RD.SendToHandAndExists(g,1-tp,cm.exfilter,1,nil) then
+		if RD.SendToHandAndExists(g,e,tp,REASON_EFFECT,cm.exfilter,1,nil) then
 			Duel.NegateAttack()
 		end
 	end)

script/c120151011.lua

@@ -25,7 +25,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 		local sg=g:RandomSelect(tp,1)
 		if sg:GetCount()>0 then
 			Duel.BreakEffect()
-			RD.SendToOpponentDeckBottom(sg,tp)
+			RD.SendToDeckBottom(sg,e,tp,REASON_EFFECT)
 		end
 	end
 end
\ No newline at end of file

script/c120151021.lua

@@ -32,7 +32,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 		local ct=Duel.GetMatchingGroupCount(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
 		if ct>0 then
 			RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,ct,nil,function(g)
-				RD.SendToHandAndExists(g,1-tp)
+				RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 			end)
 		end
 	end

script/c120151025.lua

@@ -31,7 +31,7 @@ end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	if RD.SendDeckTopToGraveAndExists(tp,2,cm.exfilter,1,nil) then
 		RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-			if RD.SendToHandAndExists(g,1-tp) then
+			if RD.SendToHandAndExists(g,e,tp,REASON_EFFECT) then
 				Duel.Recover(1-tp,g:GetFirst():GetAttack(),REASON_EFFECT)
 			end
 		end)

script/c120151035.lua

@@ -30,7 +30,7 @@ end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	if RD.SendDeckTopToGraveAndExists(tp,1,cm.exfilter,1,nil) then
 		RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-			RD.SendToHandAndExists(g,1-tp)
+			RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120151041.lua

@@ -22,7 +22,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,2,nil,function(g)
-		if RD.SendToHandAndExists(g,1-tp) and Duel.GetFlagEffect(tp,m)==0 then
+		if RD.SendToHandAndExists(g,e,tp,REASON_EFFECT) and Duel.GetFlagEffect(tp,m)==0 then
 			RD.CreateCannotSummonEffect(e,aux.Stringid(m,1),cm.sumlimit,tp,1,0,RESET_PHASE+PHASE_END)
 			RD.CreateCannotSetMonsterEffect(e,aux.Stringid(m,2),cm.sumlimit,tp,1,0,RESET_PHASE+PHASE_END)
 			RD.CreateCannotSpecialSummonEffect(e,aux.Stringid(m,3),cm.sumlimit,tp,1,0,RESET_PHASE+PHASE_END)

script/c120151045.lua

@@ -29,6 +29,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,cm.filter,tp,0,LOCATION_ONFIELD,1,1,nil,function(g)
-		RD.SendToOpponentDeckBottom(g,tp)
+		RD.SendToDeckBottom(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120151050.lua

@@ -26,6 +26,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_RTOHAND,cm.filter,tp,0,LOCATION_MZONE,1,1,nil,function(g)
-		RD.SendToOpponentHand(g)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120155015.lua

@@ -30,7 +30,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 			local atk=g:GetSum(Card.GetLevel)*100
 			RD.AttachAtkDef(e,c,atk,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
 			Duel.BreakEffect()
-			if RD.SendToDeckAndExists(g) and Duel.GetOperatedGroup():GetCount()==1 then
+			if RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT) and Duel.GetOperatedGroup():GetCount()==1 then
 				RD.AttachPierce(e,c,aux.Stringid(m,1),RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
 			end
 		end)

script/c120155017.lua

@@ -27,7 +27,7 @@ end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	if RD.Recover()~=0 then
 		RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,99,nil,function(g)
-			RD.SendToHandAndExists(g,1-tp)
+			RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120155019.lua

@@ -23,6 +23,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_RTOHAND,cm.thfilter,tp,LOCATION_MZONE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120155034.lua

@@ -32,6 +32,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120155038.lua

@@ -36,6 +36,6 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	local ct=Duel.GetMatchingGroupCount(cm.ctfilter,tp,0,LOCATION_ONFIELD,nil)
 	if ct==0 then return end
 	RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),tp,0,LOCATION_GRAVE,1,ct,nil,function(g)
-		RD.SendToDeckAndExists(g)
+		RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120155044.lua

@@ -29,6 +29,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,cm.filter,tp,0,LOCATION_ONFIELD,1,1,nil,function(g)
-		RD.SendToOpponentDeckBottom(g,tp)
+		RD.SendToDeckBottom(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120155049.lua

@@ -26,7 +26,7 @@ end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	if RD.SelectAndSpecialSummon(cm.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,POS_FACEUP)~=0 then
 		RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),tp,0,LOCATION_GRAVE,1,5,nil,function(g)
-			RD.SendToDeckAndExists(g)
+			RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120155051.lua

@@ -35,7 +35,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectGroupAndDoAction(HINTMSG_TODECK,cm.filter,cm.check,tp,LOCATION_GRAVE,0,3,3,nil,function(g)
-		if RD.SendToDeckAndExists(g) and not Duel.IsExistingMatchingCard(Card.IsAttackPos,tp,LOCATION_MZONE,0,1,nil) then
+		if RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT) and not Duel.IsExistingMatchingCard(Card.IsAttackPos,tp,LOCATION_MZONE,0,1,nil) then
 			RD.CanSelectAndSpecialSummon(aux.Stringid(m,1),aux.NecroValleyFilter(cm.spfilter),tp,LOCATION_GRAVE,0,1,1,nil,e,POS_FACEUP)
 		end
 	end)

script/c120155052.lua

@@ -32,7 +32,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 		RD.SwapBaseAtkDef(e,bc,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
 		RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
 			Duel.BreakEffect()
-			RD.SendToHandAndExists(g,1-tp)
+			RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120160003.lua

@@ -27,7 +27,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		if RD.SendToDeckBottom(g)~=0 then
+		if RD.SendToDeckBottom(g,e,tp,REASON_EFFECT)~=0 then
 			Duel.Draw(tp,2,REASON_EFFECT)
 		end
 	end)

script/c120170013.lua

@@ -32,7 +32,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_RTOHAND,cm.thfilter,tp,0,LOCATION_ONFIELD,1,1,nil,function(g)
-		if RD.SendToOpponentHand(g)~=0 then
+		if RD.SendToHandAndExists(g,e,tp,REASON_EFFECT) then
 			RD.CanSelectAndDoAction(aux.Stringid(m,1),aux.Stringid(m,2),Card.IsFaceup,tp,0,LOCATION_MZONE,1,1,nil,function(g)
 				Duel.BreakEffect()
 				RD.AttachAtkDef(e,g:GetFirst(),-600,-600,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)

script/c120170019.lua

@@ -23,7 +23,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_RTOHAND,cm.thfilter,tp,LOCATION_MZONE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 		local c=e:GetHandler()
 		if c:IsFaceup() and c:IsRelateToEffect(e) then
 			local e1=Effect.CreateEffect(c)

script/c120170028.lua

@@ -28,6 +28,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120170029.lua

@@ -41,5 +41,5 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 end
 function cm.tdop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_CARD,0,m)
-	RD.SendToDeckBottom(e:GetLabelObject())
+	RD.SendToDeckBottom(e:GetLabelObject(),e,tp,REASON_EFFECT)
 end
\ No newline at end of file

script/c120170031.lua

@@ -34,5 +34,5 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 end
 function cm.tdop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_CARD,0,m)
-	RD.SendToDeckBottom(e:GetLabelObject())
+	RD.SendToDeckBottom(e:GetLabelObject(),e,tp,REASON_EFFECT)
 end
\ No newline at end of file

script/c120170035.lua

@@ -36,7 +36,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_SET,filter,tp,0,LOCATION_MZONE,1,1,nil,function(g)
 		if RD.ChangePosition(g,e,tp,REASON_EFFECT,POS_FACEDOWN_DEFENSE)~=0 then
 			RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(sg)
-				RD.SendToHandAndExists(sg,1-tp)
+				RD.SendToHandAndExists(sg,e,tp,REASON_EFFECT)
 			end)
 		end
 	end)

script/c120170040.lua

@@ -34,7 +34,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.filter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		if RD.SendToHandAndExists(g,1-tp,cm.exfilter,1,nil) then
+		if RD.SendToHandAndExists(g,e,tp,REASON_EFFECT,cm.exfilter,1,nil) then
 			Duel.Recover(tp,1000,REASON_EFFECT)
 		end
 	end)

script/c120170048.lua

@@ -31,5 +31,5 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 end
 function cm.tdop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_CARD,0,m)
-	RD.SendToDeckBottom(e:GetLabelObject())
+	RD.SendToDeckBottom(e:GetLabelObject(),e,tp,REASON_EFFECT)
 end
\ No newline at end of file

script/c120170052.lua

@@ -25,9 +25,9 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.filter),tp,LOCATION_GRAVE,LOCATION_GRAVE,1,1,nil,function(g)
-		if RD.SendToDeckAndExists(g) and Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)==0 then
+		if RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT) and Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)==0 then
 			RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_RTOHAND,cm.thfilter,tp,0,LOCATION_MZONE,1,1,nil,function(sg)
-				RD.SendToOpponentHand(sg)
+				RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 			end)
 		end
 	end)

script/c120170053.lua

@@ -34,7 +34,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_DESTROY,cm.filter,tp,0,LOCATION_ONFIELD,1,1,nil,function(g)
 		if Duel.Destroy(g,REASON_EFFECT)~=0 then
 			RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(sg)
-				RD.SendToDeckTop(sg)
+				RD.SendToDeckTop(sg,e,tp,REASON_EFFECT)
 			end)
 		end
 	end)

script/c120170055.lua

@@ -36,9 +36,9 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.filter),tp,0,LOCATION_GRAVE,1,5,nil,function(g)
-		if RD.SendToDeckAndExists(g) and Duel.IsExistingMatchingCard(cm.exfilter,tp,0,LOCATION_MZONE,1,nil) then
+		if RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT) and Duel.IsExistingMatchingCard(cm.exfilter,tp,0,LOCATION_MZONE,1,nil) then
 			RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_TODECK,aux.NecroValleyFilter(cm.filter),tp,0,LOCATION_GRAVE,1,5,nil,function(sg)
-				RD.SendToDeckAndExists(sg)
+				RD.SendToDeckAndExists(sg,e,tp,REASON_EFFECT)
 			end)
 		end
 	end)

script/c120170063.lua

@@ -43,6 +43,6 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	local dam=g:GetCount()*100
 	if dam~=0 and Duel.Damage(tp,dam,REASON_EFFECT)~=0 then
 		Duel.BreakEffect()
-		RD.SendToDeckAndExists(g)
+		RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT)
 	end
 end
\ No newline at end of file

script/c120175001.lua

@@ -35,9 +35,9 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.filter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		if RD.SendToHandAndExists(g,1-tp,cm.exfilter,1,nil) then
+		if RD.SendToHandAndExists(g,e,tp,REASON_EFFECT,cm.exfilter,1,nil) then
 			RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(sg)
-				RD.SendToHandAndExists(sg,1-tp)
+				RD.SendToHandAndExists(sg,e,tp,REASON_EFFECT)
 			end)
 		end
 	end)

script/c120175003.lua

@@ -23,6 +23,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120183021.lua

@@ -28,7 +28,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 		RD.AttachAtkDef(e,c,1000,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
 		if (e:GetLabel()&(RACE_WARRIOR|RACE_WINDBEAST))~=0 then
 			RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-				RD.SendToHandAndExists(g,1-tp)
+				RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 			end)
 		end
 	end

script/c120183027.lua

@@ -30,7 +30,7 @@ end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	if RD.SendDeckTopToGraveAndExists(tp,3,cm.exfilter,1,nil) then
 		RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-			RD.SendToHandAndExists(g,1-tp)
+			RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120183037.lua

@@ -25,7 +25,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 		RD.AttachAtkDef(e,c,200,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
 		RD.CanSelectGroupAndDoAction(aux.Stringid(m,1),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),aux.dncheck,tp,LOCATION_GRAVE,0,1,2,nil,function(g)
 			Duel.BreakEffect()
-			RD.SendToHandAndExists(g,1-tp)
+			RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120183041.lua

@@ -34,10 +34,10 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,cm.filter,tp,0,LOCATION_MZONE,1,1,nil,function(g)
-		RD.SendToOpponentDeckTop(g,tp)
+		RD.SendToDeckTop(g,e,tp,REASON_EFFECT)
 		if e:GetLabel()==list[1] then
 			RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),tp,0,LOCATION_GRAVE,1,2,nil,function(g)
-				RD.SendToDeckAndExists(g)
+				RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT)
 			end)
 		end
 	end)

script/c120183055.lua

@@ -34,7 +34,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_DESTROY,cm.filter,tp,0,LOCATION_ONFIELD,1,1,nil,function(g)
 		if Duel.Destroy(g,REASON_EFFECT)~=0 then
 			RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(sg)
-				RD.SendToDeckAndExists(sg)
+				RD.SendToDeckAndExists(sg,e,tp,REASON_EFFECT)
 			end)
 		end
 	end)

script/c120183064.lua

@@ -30,6 +30,6 @@ end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	local tc=eg:GetFirst()
 	if tc:IsRelateToEffect(e) then
-		RD.SendToOpponentDeckBottom(tc,tp)
+		RD.SendToDeckBottom(tc,e,tp,REASON_EFFECT)
 	end
 end
\ No newline at end of file

script/c120186029.lua

@@ -31,6 +31,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_RTOHAND,Card.IsAbleToHand,tp,0,LOCATION_MZONE,1,1,nil,function(g)
-		RD.SendToOpponentHand(g)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120187023.lua

@@ -34,7 +34,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 		and Duel.IsExistingMatchingCard(cm.exfilter,tp,LOCATION_MZONE,0,1,nil) then
 		RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
 			Duel.BreakEffect()
-			RD.SendToHandAndExists(g,1-tp)
+			RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120188027.lua

@@ -36,7 +36,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 		and Duel.GetMatchingGroupCount(Card.IsDefensePos,tp,LOCATION_MZONE,0,nil)==3 then
 			RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),tp,0,LOCATION_GRAVE,1,5,nil,function(sg)
 				Duel.BreakEffect()
-				RD.SendToDeckAndExists(sg)
+				RD.SendToDeckAndExists(sg,e,tp,REASON_EFFECT)
 			end)
 		end
 	end)

script/c120189012.lua

@@ -31,7 +31,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),tp,0,LOCATION_GRAVE,1,1,nil,function(g)
-		if RD.SendToDeckAndExists(g)
+		if RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT)
 			and Duel.IsExistingMatchingCard(cm.exfilter,tp,LOCATION_MZONE,0,1,nil)
 			and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
 			Duel.Recover(tp,500,REASON_EFFECT)

script/c120190026.lua

@@ -29,6 +29,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectGroupAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.filter),cm.check,tp,LOCATION_GRAVE,0,2,3,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120196003.lua

@@ -25,7 +25,7 @@ function cm.target1(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation1(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.filter1),tp,0,LOCATION_GRAVE,1,3,nil,function(g)
-		RD.SendToDeckAndExists(g)
+		RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
 --To Deck(Monstar)
@@ -40,6 +40,6 @@ function cm.target2(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation2(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,cm.filter2,tp,0,LOCATION_MZONE,1,2,nil,function(g)
-		RD.SendToDeckAndExists(g)
+		RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120196015.lua

@@ -41,7 +41,7 @@ function cm.target2(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation2(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		if RD.SendToDeckAndExists(g) then
+		if RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT) then
 			Duel.ShuffleDeck(tp)
 			RD.CanDraw(aux.Stringid(m,3),tp,1,true)
 		end

script/c120196016.lua

@@ -29,7 +29,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),tp,0,LOCATION_GRAVE,1,2,nil,function(g)
-		if RD.SendToDeckAndExists(g)
+		if RD.SendToDeckAndExists(g,e,tp,REASON_EFFECT)
 			and Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil)
 			and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
 			Duel.BreakEffect()

script/c120196018.lua

@@ -29,6 +29,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_RTOHAND,cm.thfilter,tp,0,LOCATION_MZONE,1,1,nil,function(g)
-		RD.SendToOpponentHand(g)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120196019.lua

@@ -30,6 +30,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120196020.lua

@@ -30,7 +30,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		if RD.SendToHandAndExists(g,1-tp)
+		if RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 			and RD.CanDraw(aux.Stringid(m,1),tp,1,true)~=0
 			and Duel.GetFlagEffect(tp,m)==0 then
 			RD.CreateHintEffect(e,aux.Stringid(m,2),tp,1,0,RESET_PHASE+PHASE_END)

script/c120196023.lua

@@ -40,6 +40,6 @@ function cm.target2(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.operation2(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file

script/c120196031.lua

@@ -32,7 +32,7 @@ end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	if RD.Recover()~=0 then
 		RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,99,nil,function(g)
-			RD.SendToHandAndExists(g,1-tp)
+			RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120196035.lua

@@ -33,7 +33,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	if RD.Draw()~=0 then
 		RD.SelectAndDoAction(HINTMSG_TODECK,Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,1,nil,function(g)
 			Duel.BreakEffect()
-			RD.SendToDeckBottom(g)
+			RD.SendToDeckBottom(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120196036.lua

@@ -35,7 +35,7 @@ end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	if RD.SendDeckTopToGraveAndExists(tp,3,cm.exfilter,1,nil) then
 		RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,2,nil,function(g)
-			RD.SendToHandAndExists(g,1-tp)
+			RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120196037.lua

@@ -33,7 +33,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 		RD.AttachAtkDef(e,c,700,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
 		if Duel.IsExistingMatchingCard(cm.exfilter,tp,LOCATION_GRAVE,0,1,nil) then
 			RD.CanSelectAndDoAction(aux.Stringid(m,3),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-				RD.SendToHandAndExists(g,1-tp)
+				RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 			end)
 		end
 	end

script/c120196038.lua

@@ -35,7 +35,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 		RD.AttachAtkDef(e,c,atk,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
 		RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
 			Duel.BreakEffect()
-			if RD.SendToDeckBottom(g)~=0 then
+			if RD.SendToDeckBottom(g,e,tp,REASON_EFFECT)~=0 then
 				RD.CanDraw(aux.Stringid(m,2),tp,1)
 			end
 		end)

script/c120196045.lua

@@ -31,7 +31,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	if RD.SelectAndSpecialSummon(aux.NecroValleyFilter(cm.spfilter),tp,LOCATION_GRAVE,0,1,1,nil,e,POS_FACEUP)~=0 then
 		RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
 			Duel.BreakEffect()
-			RD.SendToHandAndExists(g,1-tp)
+			RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 		end)
 	end
 end
\ No newline at end of file

script/c120196048.lua

@@ -21,6 +21,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.filter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
-		RD.SendToHandAndExists(g,1-tp)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
 	end)
 end
\ No newline at end of file