lua fix

expansions/script/c12031011.lua

@@ -2,7 +2,7 @@
 function c12031011.initial_effect(c)
 	c:SetSPSummonOnce(12031011)
 	--xyz summon
-	aux.AddXyzProcedure(c,nil,8,2,c12031011.ovfilter,aux.Stringid(12031011,0))
+	aux.AddXyzProcedure(c,c12031011.ovfilter1,4,4,c12031011.ovfilter,aux.Stringid(12031011,0))
 	c:EnableReviveLimit()
 	--effect
 	local e1=Effect.CreateEffect(c)
@@ -47,6 +47,9 @@ end
 function c12031011.ovfilter(c)
 	return c:IsFaceup() and c:IsCode(12031000)
 end
+function c12031011.ovfilter1(c)
+	return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_DARK)
+end
 function c12031011.discon(e,tp,eg,ep,ev,re,r,rp)
 	return ep~=tp
 end

expansions/script/c65071106.lua

@@ -32,9 +32,9 @@ function c65071106.initial_effect(c)
 	local e5=Effect.CreateEffect(c)
 	e5:SetCategory(CATEGORY_COUNTER)
 	e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+	e5:SetRange(LOCATION_SZONE)
 	e5:SetCountLimit(1)
 	e5:SetCode(EVENT_PHASE+PHASE_END)
-	e5:SetTarget(c65071106.contg)
 	e5:SetOperation(c65071106.conop)
 	c:RegisterEffect(e5)
 	--tograve
@@ -64,21 +64,18 @@ function c65071106.eqop(e,tp,eg,ep,ev,re,r,rp)
 end
 
 function c65071106.confil(c,e)
-	return c:GetCounter(0x1da0)==0
-end
-
-function c65071106.contg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c65071106.confil,tp,LOCATION_ONFIELD,0,1,e:GetHandler(),e) and Duel.IsExistingMatchingCard(c65071106.confil,tp,0,LOCATION_ONFIELD,1,nil,e) end
+	return c:GetCounter(0x1da0)==0 and c:IsFaceup()
 end
 
 function c65071106.conop(e,tp,eg,ep,ev,re,r,rp)
 	if not (Duel.IsExistingMatchingCard(c65071106.confil,tp,LOCATION_ONFIELD,0,1,e:GetHandler(),e) and Duel.IsExistingMatchingCard(c65071106.confil,tp,0,LOCATION_ONFIELD,1,nil,e)) then return end
+	if not e:GetHandler():IsRelateToEffect(e) then return end
 	local g1=Duel.SelectMatchingCard(tp,c65071106.confil,tp,LOCATION_ONFIELD,0,1,1,e:GetHandler(),e)
 	Duel.HintSelection(g1)
-	local g2=Duel.SelectMatchingCard(c65071106.confil,tp,0,LOCATION_ONFIELD,1,1,nil,e)
+	local g2=Duel.SelectMatchingCard(tp,c65071106.confil,tp,0,LOCATION_ONFIELD,1,1,nil,e)
 	Duel.HintSelection(g2)
 	local tc1=g1:GetFirst()
-	local tc2=g1:GetFirst()
+	local tc2=g2:GetFirst()
 	tc1:AddCounter(0x1da0,1)
 	tc2:AddCounter(0x1da0,1)
 end

expansions/script/c77702002.lua

@@ -83,16 +83,16 @@ function scard.initial_effect(c)
 		Duel.RegisterEffect(e7,tp)
 	end)
 	c:RegisterEffect(e6)
-	local e8=Effect.CreateEffect(c)
-	e8:SetDescription(m*16+4)
-	e8:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e8:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
-	e8:SetRange(LOCATION_FZONE)
-	e8:SetCountLimit(1)
-	e8:SetCode(EVENT_PHASE+PHASE_END)
-	e8:SetCondition(cm.descon)
-	e8:SetOperation(cm.desop)
-	c:RegisterEffect(e8)
+	--local e8=Effect.CreateEffect(c)
+	--e8:SetDescription(m*16+4)
+	--e8:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	--e8:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+	--e8:SetRange(LOCATION_FZONE)
+	--e8:SetCountLimit(1)
+	--e8:SetCode(EVENT_PHASE+PHASE_END)
+	--e8:SetCondition(cm.descon)
+	--e8:SetOperation(cm.desop)
+	--c:RegisterEffect(e8)
 	if scard.counter==nil then
 		scard.counter=true
 		scard[0]=0
@@ -165,20 +165,26 @@ function scard.gyop(e,tp,eg,ep,ev,re,r,rp)
 	local ct=c:GetTurnCounter()
 	ct=ct+1
 	c:SetTurnCounter(ct)
-	if ct==3then
+	if ct==3 then
 		Duel.SendtoGrave(c,REASON_RULE)
-	end
-end
-function cm.descon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetTurnPlayer()==tp
-end
-function cm.desop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	Duel.HintSelection(Group.FromCards(c))
-	if Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,e:GetHandler()) and Duel.SelectYesNo(tp,aux.Stringid(m,5)) then
+	else if Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,e:GetHandler()) and Duel.SelectYesNo(tp,aux.Stringid(m,5)) then
 		Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD,e:GetHandler())
-	else Duel.SendtoGrave(c,REASON_COST) end
+		else
+			Duel.SendtoGrave(c,REASON_COST)
+		end
+	end
 end
+--function cm.descon(e,tp,eg,ep,ev,re,r,rp)
+	--local c=e:GetHandler()
+	--return Duel.GetTurnPlayer()==tp and 
+--end
+--function cm.desop(e,tp,eg,ep,ev,re,r,rp)
+	--local c=e:GetHandler()
+	--Duel.HintSelection(Group.FromCards(c))
+	--if Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,e:GetHandler()) and Duel.SelectYesNo(tp,aux.Stringid(m,5)) then
+		--Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD,e:GetHandler())
+	--else Duel.SendtoGrave(c,REASON_COST) end
+--end
 function cm.setlimit(e,c,tp)
 	return c:IsType(TYPE_FIELD)
 end