nmbd

expansions/script/c16107106.lua

@@ -22,10 +22,10 @@ function cm.initial_effect(c)
 	e3:SetDescription(aux.Stringid(m,1))
 	e3:SetCategory(CATEGORY_DESTROY)
 	e3:SetType(EFFECT_TYPE_IGNITION)
-	e3:SetCountLimit(1)
+	e3:SetCountLimit(1,EFFECT_COUNT_CODE_SINGLE)
 	e3:SetRange(LOCATION_MZONE)
 	e3:SetCost(cm.cost)
-	--e3:SetCondition(cm.spcon1)
+	e3:SetCondition(cm.spcon1)
 	e3:SetTarget(cm.remtg)
 	e3:SetOperation(cm.remop)
 	c:RegisterEffect(e3)
@@ -43,7 +43,6 @@ function cm.aclimit(e,re,tp)
 end
 --e3
 function cm.spcon1(e,tp,eg,ep,ev,re,r,rp)
-	Debug.Message(Duel.GetFlagEffect(tp,16107112)==0)
 	return Duel.GetFlagEffect(tp,16107112)==0
 end
 function cm.spcon2(e,tp,eg,ep,ev,re,r,rp)
@@ -52,8 +51,7 @@ end
 function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()
 	Debug.Message(tp)
-	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) and c:GetFlagEffect(m)==0 end
-	c:RegisterFlagEffect(m,RESET_PHASE+PHASE_END+RESET_EVENT+RESETS_STANDARD,0,1)
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
 	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
 end
 function cm.remtg(e,tp,eg,ep,ev,re,r,rp,chk)

expansions/script/c16107107.lua

@@ -13,7 +13,7 @@ function cm.initial_effect(c)
 	e3:SetDescription(aux.Stringid(m,1))
 	e3:SetCategory(CATEGORY_REMOVE)
 	e3:SetType(EFFECT_TYPE_IGNITION)
-	e3:SetCountLimit(1)
+	e3:SetCountLimit(1,EFFECT_COUNT_CODE_SINGLE)
 	e3:SetRange(LOCATION_MZONE)
 	e3:SetCost(cm.cost)
 	e3:SetCondition(cm.spcon1)
@@ -24,6 +24,7 @@ function cm.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_QUICK_O)
 	e2:SetCode(EVENT_FREE_CHAIN)
 	e2:SetHintTiming(0,TIMING_END_PHASE)
+	e2:SetCountLimit(1,EFFECT_COUNT_CODE_SINGLE)
 	e2:SetCondition(cm.spcon2)
 	c:RegisterEffect(e2)
 	--indes
@@ -51,8 +52,7 @@ function cm.spcon2(e,tp,eg,ep,ev,re,r,rp)
 end
 function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()
-	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) and c:GetFlagEffect(m)==0 end
-	c:RegisterFlagEffect(m,RESET_PHASE+PHASE_END+RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_OATH,1)
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
 	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
 end
 function cm.remtg(e,tp,eg,ep,ev,re,r,rp,chk)
@@ -77,7 +77,6 @@ function cm.remop(e,tp,eg,ep,ev,re,r,rp)
 		e1:SetType(EFFECT_TYPE_SINGLE)
 		e1:SetCode(EFFECT_EQUIP_LIMIT)
 		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-		e1:SetLabelObject(c)
 		e1:SetValue(cm.eqlimit)
 		tc:RegisterEffect(e1)
 			local e2=Effect.CreateEffect(c)
@@ -91,7 +90,7 @@ function cm.remop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function cm.eqlimit(e,c)
-	return c==e:GetLabelObject()
+	return c==e:GetOwner()
 end
 function cm.eqfilter(c,tp)
 	return c:IsRace(RACE_MACHINE) and c:CheckUniqueOnField(tp) and not c:IsForbidden() and c:IsType(TYPE_MONSTER)

expansions/script/c16107119.lua

@@ -25,6 +25,7 @@ function cm.initial_effect(c)
 	--copy effect
 	local e2=Effect.CreateEffect(c)
 	e2:SetDescription(aux.Stringid(m,0))
+	e2:SetCategory(CATEGORY_COUNTER)
 	e2:SetType(EFFECT_TYPE_IGNITION)
 	e2:SetRange(LOCATION_MZONE)
 	e2:SetCountLimit(1,m)
@@ -32,14 +33,6 @@ function cm.initial_effect(c)
 	e2:SetTarget(cm.copytg)
 	e2:SetOperation(cm.copyop)
 	c:RegisterEffect(e2)
-	--add counter
-	local e2_1=Effect.CreateEffect(c)
-	e2_1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
-	e2_1:SetCode(EVENT_CUSTOM+m)
-	e2_1:SetRange(LOCATION_MZONE)
-	e2_1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_NEGATE)
-	e2_1:SetOperation(cm.counter)
-	c:RegisterEffect(e2_1)
 	--negate
 	local e3=Effect.CreateEffect(c)
 	e3:SetDescription(aux.Stringid(m,1))
@@ -87,6 +80,7 @@ function cm.copyop(e,tp,eg,ep,ev,re,r,rp)
 	local cg=c:GetOverlayGroup()
 	local num=Duel.GetTurnCount()
 	local sg=cg:Filter(cm.copyfilter,nil)
+	local  ct=0
 	if sg:GetCount()>0 and c:IsRelateToEffect(e) and c:IsFaceup() then
 		for tc in aux.Next(sg) do
 			local code=tc:GetOriginalCodeRule()
@@ -99,8 +93,9 @@ function cm.copyop(e,tp,eg,ep,ev,re,r,rp)
 			e1:SetValue(code)
 			e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,2)
 			c:RegisterEffect(e1)
+			local cid=0
 			if not tc:IsType(TYPE_TRAPMONSTER) then
-				local cid=c:CopyEffect(code,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,2)
+				cid=c:CopyEffect(code,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,2)
 			end
 			local e3=Effect.CreateEffect(c)
 			e3:SetDescription(aux.Stringid(m,2))
@@ -117,7 +112,7 @@ function cm.copyop(e,tp,eg,ep,ev,re,r,rp)
 			e3:SetOperation(cm.rstop)
 			c:RegisterEffect(e3)
 		end
-		Duel.RaiseSingleEvent(c,EVENT_CUSTOM+m,e,sg:GetCount(),tp,tp,0)
+		c:AddCounter(nova,sg:GetCount())
 	end
 end
 function cm.rscon(e,tp,eg,ep,ev,re,r,rp)
@@ -128,7 +123,7 @@ function cm.rstop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	local cid=e:GetLabel()
 	if cid~=0 then
-		c:ResetEffect(cid,RESET_COPY)
+		c:ResetEffect(cid)
 		c:ResetEffect(RESET_DISABLE,RESET_EVENT)
 	end
 	local e1=e:GetLabelObject()