fixed cards that make the opponent Set a Spell/Trap

Author: Yoshi80

rush/c160013014.lua

@@ -22,11 +22,11 @@ end
 function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_GRAVE,0,2,nil) end
 end
-function s.setfilter(c)
-	return c:IsSpell() and c:IsSSetable()
+function s.setfilter(c,tp)
+	return c:IsSpell() and c:IsSSetable(false, 1-tp)
 end
 function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(s.setfilter,tp,0,LOCATION_GRAVE,1,nil) end
+	if chk==0 then return Duel.IsExistingMatchingCard(s.setfilter,tp,0,LOCATION_GRAVE,1,nil,tp) end
 	Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,nil,1,1-tp,LOCATION_GRAVE)
 	Duel.SetPossibleOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
 end
@@ -41,7 +41,7 @@ function s.operation(e,tp,eg,ep,ev,re,r,rp)
 	if not Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_COST) then return end
 	--Effect
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
-	local g=Duel.SelectMatchingCard(1-tp,s.setfilter,tp,0,LOCATION_GRAVE,1,1,nil)
+	local g=Duel.SelectMatchingCard(1-tp,s.setfilter,tp,0,LOCATION_GRAVE,1,1,nil,tp)
 	if #g>0 then
 		Duel.SSet(1-tp,g)
 		if Duel.IsExistingMatchingCard(aux.NecroValleyFilter(s.thfilter),tp,LOCATION_GRAVE,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(id,1)) then

rush/c160428085.lua

@@ -21,8 +21,8 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	Duel.SetPossibleOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,0)
 end
-function s.cfilter(c)
-	return c:IsSpellTrap() and c:IsSSetable()
+function s.cfilter(c,tp)
+	return c:IsSpellTrap() and c:IsSSetable(false, 1-tp)
 end
 function s.rescon(ft)
 	return function(sg,e,tp,mg)
@@ -36,7 +36,7 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
 	if #hg>0 then
 		Duel.ConfirmCards(tp,hg)
 		local ft=Duel.GetLocationCount(1-tp,LOCATION_SZONE)
-		local g=hg:Filter(s.cfilter,nil)
+		local g=hg:Filter(s.cfilter,nil,tp)
 		local ct=math.min(#g,ft+1,3)
 		local sg=aux.SelectUnselectGroup(g,e,tp,1,ct,s.rescon(ft),1,tp,HINTMSG_SET)
 		if #sg>0 then

rush/c160434002.lua

@@ -15,19 +15,19 @@ function s.initial_effect(c)
 	e1:SetOperation(s.operation)
 	c:RegisterEffect(e1)
 end
-function s.setfilter(c)
-	return c:IsSpellTrap() and c:IsSSetable()
+function s.setfilter(c,tp)
+	return c:IsSpellTrap() and c:IsSSetable(false, 1-tp)
 end
 function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(s.setfilter,tp,0,LOCATION_GRAVE,1,nil) end
+	if chk==0 then return Duel.IsExistingMatchingCard(s.setfilter,tp,0,LOCATION_GRAVE,1,nil,tp) end
 end
 function s.thfilter(c)
 	return c:IsMonster() and c:IsRace(RACE_MACHINE) and c:IsAttribute(ATTRIBUTE_EARTH) and c:IsLevelAbove(7) and c:IsAbleToHand()
 end
 function s.operation(e,tp,eg,ep,ev,re,r,rp)
 	--Effect
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
-	local g=Duel.SelectMatchingCard(tp,s.setfilter,tp,0,LOCATION_GRAVE,1,1,nil)
+	local g=Duel.SelectMatchingCard(tp,s.setfilter,tp,0,LOCATION_GRAVE,1,1,nil,tp)
 	if #g>0 then
 		Duel.SSet(1-tp,g)
 		if Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_GRAVE,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(id,1)) then