王宮の弾圧: Fix activation while Set (#3084)

* use id

* can activate oppression when facedown

* revert

* revert

c93016201.lua

 --王宮の弾圧
-function c93016201.initial_effect(c)
+local s,id,o=GetID()
+function s.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
 	c:RegisterEffect(e1)
+	--Activate(timing)
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(id,0))
+	e2:SetType(EFFECT_TYPE_ACTIVATE)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetCode(EVENT_SPSUMMON)
+	e2:SetCondition(s.con2)
+	e2:SetCost(s.cost2)
+	e2:SetTarget(s.target2)
+	e2:SetOperation(s.activate2)
+	c:RegisterEffect(e2)
 	--instant
 	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(93016201,0))
+	e3:SetDescription(aux.Stringid(id,0))
 	e3:SetType(EFFECT_TYPE_QUICK_O)
 	e3:SetRange(LOCATION_SZONE)
 	e3:SetProperty(EFFECT_FLAG_BOTH_SIDE)
 	e3:SetCode(EVENT_SPSUMMON)
-	e3:SetCondition(aux.NegateSummonCondition)
-	e3:SetCost(c93016201.cost2)
-	e3:SetTarget(c93016201.target2)
-	e3:SetOperation(c93016201.activate2)
+	e3:SetCondition(s.con2)
+	e3:SetCost(s.cost2)
+	e3:SetTarget(s.target2)
+	e3:SetOperation(s.activate2)
 	c:RegisterEffect(e3)
 	--instant(chain)
 	local e4=Effect.CreateEffect(c)
-	e4:SetDescription(aux.Stringid(93016201,0))
+	e4:SetDescription(aux.Stringid(id,0))
 	e4:SetType(EFFECT_TYPE_QUICK_O)
 	e4:SetRange(LOCATION_SZONE)
 	e4:SetProperty(EFFECT_FLAG_BOTH_SIDE)
 	e4:SetCode(EVENT_CHAINING)
-	e4:SetCondition(c93016201.condition3)
-	e4:SetCost(c93016201.cost3)
-	e4:SetTarget(c93016201.target3)
-	e4:SetOperation(c93016201.activate3)
+	e4:SetCondition(s.condition3)
+	e4:SetCost(s.cost3)
+	e4:SetTarget(s.target3)
+	e4:SetOperation(s.activate3)
 	c:RegisterEffect(e4)
 end
-function c93016201.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
+function s.con2(e,tp,eg,ep,ev,re,r,rp)
+	return aux.NegateSummonCondition()
+end
+function s.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.CheckLPCost(tp,800) end
 	Duel.PayLPCost(tp,800)
 end
-function c93016201.target2(e,tp,eg,ep,ev,re,r,rp,chk)
+function s.target2(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_DESTROY,eg,eg:GetCount(),0,0)
 end
-function c93016201.activate2(e,tp,eg,ep,ev,re,r,rp)
+function s.activate2(e,tp,eg,ep,ev,re,r,rp)
 	Duel.NegateSummon(eg)
 	Duel.Destroy(eg,REASON_EFFECT)
 end
-function c93016201.condition3(e,tp,eg,ep,ev,re,r,rp)
+function s.condition3(e,tp,eg,ep,ev,re,r,rp)
 	return re:IsHasCategory(CATEGORY_SPECIAL_SUMMON) and Duel.IsChainDisablable(ev)
 end
-function c93016201.cost3(e,tp,eg,ep,ev,re,r,rp,chk)
+function s.cost3(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.CheckLPCost(tp,800) end
 	Duel.PayLPCost(tp,800)
 end
-function c93016201.target3(e,tp,eg,ep,ev,re,r,rp,chk)
+function s.target3(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	Duel.SetOperationInfo(0,CATEGORY_DISABLE,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 c93016201.activate3(e,tp,eg,ep,ev,re,r,rp)
+function s.activate3(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.NegateEffect(ev) and re:GetHandler():IsRelateToEffect(re) then
 		Duel.Destroy(eg,REASON_EFFECT)
 	end