7

expansions/script/c75600167.lua

@@ -16,21 +16,13 @@ function c75600167.initial_effect(c)
 	e3:SetRange(LOCATION_FZONE)
 	e3:SetOperation(c75600167.chainop)
 	c:RegisterEffect(e3)
-	if not c75600167.global_check then
-		c75600167.global_check=true
-		c75600167[0]=nil
-		local ge1=Effect.CreateEffect(c)
-		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-		ge1:SetCode(EVENT_PAY_LPCOST)
-		ge1:SetOperation(c75600167.checkop)
-		Duel.RegisterEffect(ge1,0)
-	end
-end
-function c75600167.checkop(e,tp,eg,ep,ev,re,r,rp)
-	local cid=Duel.GetCurrentChain()
-	if cid>0 then
-		c75600167[0]=Duel.GetChainInfo(cid,CHAININFO_CHAIN_ID)
-	end
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e0:SetCode(EVENT_PAY_LPCOST)
+	e0:SetRange(LOCATION_FZONE)
+	e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e0:SetOperation(c75600167.regop)
+	c:RegisterEffect(e0)
 end
 function c75600167.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
@@ -54,8 +46,15 @@ function c75600167.activate(e,tp,eg,ep,ev,re,r,rp)
 		Duel.ConfirmCards(1-tp,sg)
 	end
 end
+function c75600167.regop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if ep==tp and re:IsActivated() then
+		c:RegisterFlagEffect(75600167,RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET+RESET_CHAIN,0,1)
+	end
+end
+
 function c75600167.chainop(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.GetChainInfo(0,CHAININFO_CHAIN_ID)==c75600167[0] and ep==tp then
+	if ep==tp and e:GetHandler():GetFlagEffect(75600167)>0 then
 		if  Duel.SelectEffectYesNo(tp,e:GetHandler(),aux.Stringid(75600167,0)) and Duel.CheckLPCost(tp,500) then
 			Duel.PayLPCost(tp,500)
 			Duel.SetChainLimit(c75600167.chainlm)