vme50

expansions/script/c11800074.lua

 --天降曙光‧蕾德拉菲雅
 local s,id=GetID()
 function s.initial_effect(c)
-   c:EnableCounterPermit(0x31a)
+  c:EnableCounterPermit(0x31a,LOCATION_MZONE+LOCATION_PZONE)
+   --special counter permit
+	local e01=Effect.CreateEffect(c)
+	e01:SetType(EFFECT_TYPE_SINGLE)
+	e01:SetCode(EFFECT_COUNTER_PERMIT+0x31a)
+	e01:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e01:SetCondition(s.ctpermit)
+	c:RegisterEffect(e01)
 	 --Activate
 	local e0=Effect.CreateEffect(c)
 	e0:SetType(EFFECT_TYPE_ACTIVATE)
 	e0:SetCode(EVENT_FREE_CHAIN)
+	e0:SetRange(LOCATION_HAND)
 	e0:SetOperation(s.reg)
 	c:RegisterEffect(e0)
 --counter
@@ -77,7 +85,11 @@ function s.initial_effect(c)
 	e8:SetOperation(s.op2)
 	c:RegisterEffect(e8)
 end
-function s.reg(e,tp,eg,ep,ev,re,r,rp)
+function s.ctpermit(e)
+	local c=e:GetHandler()
+	return c:IsLocation(LOCATION_PZONE) and c:IsStatus(STATUS_CHAINING)
+end
+function s.reg(e,tp,eg,ep,ev,re,r,rp,chk)
 	e:GetHandler():AddCounter(0x31a,8)
 end
 

expansions/script/c16232010.lua

@@ -30,7 +30,7 @@ function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.RegisterEffect(e1,tp)
 end
 function cm.splimit(e,c)
-	return c:IsLocation(LOCATION_EXTRA) and not c:IsRace(RACE_REPTILE)
+	return not c:IsRace(RACE_REPTILE)
 end
 function cm.cfilter(c,e,tp)
 	return c:IsFaceup() and c:IsType(TYPE_SYNCHRO) and c:IsRace(RACE_REPTILE)

expansions/script/c5013507.lua

@@ -102,7 +102,8 @@ function s.setfilter(c,e,tp)
 	if te and te:GetCondition() then condition=te:GetCondition() end
 	local tg=nil
 	if te and te:GetTarget() then tg=te:GetTarget() end
-	local b2=c:CheckActivateEffect(true,true,false)~=nil and (not cost or cost(e,tp,eg,ep,ev,re,r,rp,0))
+	local b2=c:CheckActivateEffect(true,true,false)~=nil 
+		and (not cost or cost(e,tp,eg,ep,ev,re,r,rp,0)) and te:CheckCountLimit(tp)==true
 		and (not condition or condition(e,tp,eg,ep,ev,re,r,rp)) and (not tg or tg(e,tp,eg,ep,ev,re,r,rp,0))
 	return c:IsFaceupEx() and c:IsType(TYPE_TRAP) and (b1 or b2)
 end
@@ -135,7 +136,8 @@ function s.setop(e,tp,eg,ep,ev,re,r,rp)
 			if cte and cte:GetCondition() then condition=cte:GetCondition() end
 			local target=nil
 			if cte and cte:GetTarget() then target=cte:GetTarget() end
-			local b1=sc:CheckActivateEffect(true,true,false)~=nil and (not cost or cost(e,tp,eg,ep,ev,re,r,rp,0))
+			local b1=sc:CheckActivateEffect(true,true,false)~=nil 
+				and (not cost or cost(e,tp,eg,ep,ev,re,r,rp,0)) and te:CheckCountLimit(tp)==true
 				and (not condition or condition(e,tp,eg,ep,ev,re,r,rp)) and (not target or target(e,tp,eg,ep,ev,re,r,rp,0))
 			local b2=sc:IsSSetable()
 			local off=1
@@ -155,12 +157,13 @@ function s.setop(e,tp,eg,ep,ev,re,r,rp)
 			local sel=opval[op]
 			if sel==1 then
 				Duel.MoveToField(sc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+				local bc=Duel.GetOperatedGroup():GetFirst()
 				te:UseCountLimit(tp,1,true)
 				sc:CreateEffectRelation(te)
+				Duel.RaiseEvent(sc,EVENT_CHAINING,cte,0,tp,tp,Duel.GetCurrentChain())
 				local tep=sc:GetControler()
 				local cost=te:GetCost()
 				if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
-				Duel.RaiseEvent(sc,EVENT_CHAINING,te,0,tp,tp,Duel.GetCurrentChain())
 				local target=te:GetTarget()
 				if target then target(e,tp,eg,ep,ev,re,r,rp,1) end
 				local ag=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)

expansions/script/c75646629.lua

@@ -71,8 +71,8 @@ function cm.cfilter(c,g)
 end
 function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local lg=e:GetHandler():GetLinkedGroup()
-	if chk==0 then return Duel.CheckReleaseGroup(REASON_COST,tp,cm.cfilter,1,nil,lg) end
-	local g=Duel.SelectReleaseGroup(REASON_COST,tp,cm.cfilter,1,1,nil,lg)
+	if chk==0 then return Duel.CheckReleaseGroup(tp,cm.cfilter,1,nil,lg) end
+	local g=Duel.SelectReleaseGroup(tp,cm.cfilter,1,1,nil,lg)
 	Duel.Release(g,REASON_COST)
 end
 function cm.spfilter(c,e,tp)

expansions/script/c81000000.lua

@@ -112,16 +112,6 @@ end
 function Tenka.costfilter(c,tp)
 	return ((c:IsFaceup() and bit.band(c:GetOriginalType(),TYPE_TRAP)~=0 and bit.band(c:GetOriginalType(),TYPE_CONTINUOUS)~=0 and c:IsType(TYPE_MONSTER)) or c:IsHasEffect(81049012,tp)) and c:IsAbleToGraveAsCost() and (c:IsLocation(LOCATION_HAND) or c:IsFaceup())
 end
---FlowerKnightGirl
-function Tenka.FlowerKnightGirl(c)
-	local ea=Effect.CreateEffect(c)
-	ea:SetType(EFFECT_TYPE_SINGLE)
-	ea:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
-	ea:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-	ea:SetRange(LOCATION_MZONE)
-	ea:SetValue(aux.TRUE)
-	c:RegisterEffect(ea)
-end
 --Chiyuu
 function Tenka.Chiyuu(c,m)
 	c:SetSPSummonOnce(m)

expansions/script/c81040017.lua

@@ -3,6 +3,7 @@ local m=81040017
 local cm=_G["c"..m]
 Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
+	c:EnableReviveLimit()
 	--disable
 	local e1=Effect.CreateEffect(c)
 	e1:SetCategory(CATEGORY_DISABLE)