7

expansions/script/c12061021.lua

@@ -26,7 +26,6 @@ function cm.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_RECOVER)
 	e2:SetRange(LOCATION_SZONE)
-	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
 	e2:SetCountLimit(1)
 	e2:SetCondition(cm.drcon)
 	e2:SetTarget(cm.drtg)
@@ -55,9 +54,10 @@ function cm.tdtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 end
 function cm.tdop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
+	local c=e:GetHandler()
 	if not tc:IsRelateToEffect(e) and not e:GetHandler():IsRelateToEffect(e) then return end
 	Duel.SendtoDeck(tc,nil,2,REASON_EFFECT)
-	if tc:IsSetCard(0xafac) and c:IsAbleToHandAsCost() then
+	if ( tc:IsSetCard(0xafac) or tc:IsRace(RACE_PLANT) ) and tc:IsAbleToHandAsCost() then
 	Duel.Recover(tp,500,REASON_EFFECT)
 	end
 end
@@ -70,12 +70,11 @@ end
 function cm.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		and Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
-	
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
 end
 function cm.drop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectTarget(tp,cm.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
+	local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
 	if g:GetCount()>0 then
 	   Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
 	end

expansions/script/c33400953.lua

@@ -58,7 +58,7 @@ function cm.ctfilter(c)
 end
 function cm.cttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	 if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and cm.ctfilter(chkc) end
-	if chk==0 then return true end
+	if chk==0 then return Duel.IsExistingTarget(cm.ctfilter,tp,0,LOCATION_MZONE,1,nil) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
 	local g=Duel.SelectTarget(tp,cm.ctfilter,tp,0,LOCATION_MZONE,1,1,nil)
 	Duel.SetOperationInfo(0,CATEGORY_CONTROL,g,g:GetCount(),0,0)

expansions/script/c33400954.lua

@@ -115,13 +115,13 @@ function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
 			e1:SetType(EFFECT_TYPE_SINGLE)
 			e1:SetCode(EFFECT_SET_ATTACK_FINAL)
 			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-			e1:SetValue(sc:GetAttack()/2)
+			e1:SetValue(tc:GetAttack()/2)
 			tc:RegisterEffect(e1)
 			local e2=Effect.CreateEffect(e:GetHandler())
 			e2:SetType(EFFECT_TYPE_SINGLE)
 			e2:SetCode(EFFECT_SET_DEFENSE_FINAL)
 			e2:SetReset(RESET_EVENT+RESETS_STANDARD)
-			e2:SetValue(sc:GetDefense()/2)
+			e2:SetValue(tc:GetDefense()/2)
 			tc:RegisterEffect(e2)   
 			local e3=Effect.CreateEffect(e:GetHandler())
 			e3:SetType(EFFECT_TYPE_SINGLE)

expansions/script/c33500933.lua

@@ -35,7 +35,6 @@ function cm.initial_effect(c)
 	local e3=Effect.CreateEffect(c)
 	e3:SetType(EFFECT_TYPE_FIELD)
 	e3:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
-	e3:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
 	e3:SetRange(LOCATION_MZONE)
 	e3:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
 	e3:SetTarget(cm.indtg)
@@ -48,7 +47,6 @@ function cm.initial_effect(c)
 	local e5=Effect.CreateEffect(c)
 	e5:SetType(EFFECT_TYPE_FIELD)
 	e5:SetRange(LOCATION_MZONE)
-	e5:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
 	e5:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
 	e5:SetCode(EFFECT_DISABLE)
 	e5:SetTarget(cm.indtg2)
@@ -67,6 +65,12 @@ function cm.initial_effect(c)
 	e7:SetCost(cm.cost)
 	e7:SetOperation(cm.op)
 	c:RegisterEffect(e7)
+	local e7_1=Effect.CreateEffect(c)
+	e7_1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+	e7_1:SetCode(EVENT_CHAINING)
+	e7_1:SetRange(0x70)
+	e7_1:SetOperation(cm.counterop)
+	c:RegisterEffect(e7_1)
  --Equip Okatana
 	local e9=Effect.CreateEffect(c)
 	e9:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
@@ -144,7 +148,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 		   e2:SetCode(EVENT_PHASE+PHASE_END)
 		   e2:SetCountLimit(1)
 		   e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
-		   e2:SetLabelObject(g)
+		   e2:SetLabelObject(sc)
 		   e2:SetCondition(cm.descon)
 		   e2:SetOperation(cm.desop)
 		   Duel.RegisterEffect(e2,tp)
@@ -169,11 +173,11 @@ function cm.atkval(e,c)
 end
 --e3
 function cm.indtg(e,c)
-	return (c:IsAttribute(ATTRIBUTE_WATER) or (e:GetHandler()==c and e:GetHandler():IsAttribute(ATTRIBUTE_WATER) ) )and c:GetCounter(0x1015)>0 
+	return c:IsAttribute(ATTRIBUTE_WATER) and c:GetCounter(0x1015)>0
 end
 --e5
 function cm.indtg2(e,c)
-	return (c:GetAttribute()~=ATTRIBUTE_WATER or (e:GetHandler()==c and e:GetHandler():GetAttribute()~=ATTRIBUTE_WATER) ) and c:GetCounter(0x1015)>0 
+	return c:GetAttribute()~=ATTRIBUTE_WATER and c:GetCounter(0x1015)>0
 end
 --e7
 function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
@@ -187,44 +191,31 @@ end
 function cm.op(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	--activate limit
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
-	e3:SetCode(EVENT_CHAINING)
-	e3:SetOperation(cm.counterop)
-	e3:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e3,tp)
 	local e4=Effect.CreateEffect(c)
 	e4:SetType(EFFECT_TYPE_FIELD)
 	e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
 	e4:SetCode(EFFECT_CANNOT_ACTIVATE)
 	e4:SetTargetRange(1,0)
-	e4:SetCondition(cm.econ)
-	e4:SetValue(1)
-	e4:SetLabel(0)
+	e4:SetValue(cm.limittg)
 	e4:SetReset(RESET_PHASE+PHASE_END)
 	Duel.RegisterEffect(e4,tp)
-	local e6=e4:Clone()
-	e6:SetTargetRange(0,1)
-	e6:SetLabel(1)
-	e6:SetCondition(cm.econ2)
-	e6:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e6,tp)
+	local e4_1=Effect.CreateEffect(c)
+	e4_1:SetType(EFFECT_TYPE_FIELD)
+	e4_1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e4_1:SetCode(EFFECT_CANNOT_ACTIVATE)
+	e4_1:SetTargetRange(0,1)
+	e4_1:SetValue(cm.limittg)
+	e4_1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e4_1,tp)
 end
 function cm.counterop(e,tp,eg,ep,ev,re,r,rp)
-	if ep==tp then
-		Duel.RegisterFlagEffect(tp,m,RESET_EVENT+0x3ff0000+RESET_PHASE+PHASE_END,0,1)
-	else
-		Duel.RegisterFlagEffect(1-tp,m,RESET_EVENT+0x3ff0000+RESET_PHASE+PHASE_END,0,1)
+	if ep then
+		Duel.RegisterFlagEffect(ep,m,RESET_PHASE+PHASE_END,0,1)
 	end
 end
-function cm.cfilter(c,type)
-	return c:IsFaceup() and c:IsType(type)
-end
-function cm.econ(e)
-	return Duel.GetCustomActivityCount(m,tp,ACTIVITY_CHAIN)>=3
-end
-function cm.econ2(e)
-	return Duel.GetCustomActivityCount(m,1-tp,ACTIVITY_CHAIN)>=3
+function cm.limittg(e,re)
+	local t1=Duel.GetFlagEffect(re:GetHandlerPlayer(),m)
+	return t1>=3
 end
 --e9
 function cm.Eqop1(e,tp,eg,ep,ev,re,r,rp)
@@ -269,7 +260,7 @@ function cm.TojiEquip(ec,e,tp,eg,ep,ev,re,r,rp)
 			local e2=Effect.CreateEffect(ec)
 			e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 			e2:SetCategory(CATEGORY_COUNTER)
-			e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
+			e2:SetProperty(EFFECT_FLAG_DELAY)
 			e2:SetCode(EVENT_DESTROYED)
 			e2:SetRange(LOCATION_SZONE)
 			e2:SetCountLimit(2,m+1)

expansions/script/c81012087.lua

@@ -3,7 +3,7 @@ local m=81012087
 local cm=_G["c"..m]
 function cm.initial_effect(c)
 	--link summon
-	aux.AddLinkProcedure(c,cm.mfilter,2)
+	aux.AddLinkProcedure(c,cm.mfilter,1,1)
 	c:EnableReviveLimit()
 	--
 	local e0=Effect.CreateEffect(c)

expansions/script/c81041013.lua

@@ -19,7 +19,7 @@ function c81041013.initial_effect(c)
 	local e2=Effect.CreateEffect(c)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
 	e2:SetProperty(EFFECT_FLAG_DELAY)
-	e2:SetRange(LOCATION_SZONE)
+	e2:SetRange(LOCATION_MZONE)
 	e2:SetCode(EVENT_DESTROYED)
 	e2:SetCondition(c81041013.ctcon)
 	e2:SetOperation(c81041013.ctop)
@@ -61,11 +61,11 @@ function c81041013.lvop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function c81041013.ctfilter(c,tp)
-	return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEUP) and c:GetPreviousControler()==tp
+	return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEUP)
 		and bit.band(c:GetPreviousTypeOnField(),TYPE_PENDULUM)~=0
 end
 function c81041013.ctcon(e,tp,eg,ep,ev,re,r,rp)
-	return eg:IsExists(c81041013.ctfilter,1,nil,tp)
+	return eg:IsExists(c81041013.ctfilter,1,nil)
 end
 function c81041013.ctop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()

expansions/script/c81041044.lua

@@ -35,7 +35,7 @@ function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return c:GetSequence()>4 and c:GetLinkedGroupCount()==0
 end
 function cm.spfilter(c,e,tp)
-	return c:IsAttack(1550) and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM)
+	return c:IsAttack(1550) and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:IsDefense(1050)
 		and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 		and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
 end

expansions/script/c81041050.lua

@@ -4,7 +4,7 @@ local cm=_G["c"..m]
 Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	--pendulum summon
-	aux.EnablePendulumAttribute(c)
+	aux.EnablePendulumAttribute(c,false)
 	c:EnableReviveLimit()
 	Tenka.KoikakeRitual(c)
 	--Activate

expansions/script/c81041051.lua

@@ -4,7 +4,7 @@ local cm=_G["c"..m]
 Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	--pendulum summon
-	aux.EnablePendulumAttribute(c)
+	aux.EnablePendulumAttribute(c,false)
 	c:EnableReviveLimit()
 	Tenka.KoikakeRitual(c)
 	--Activate

expansions/script/c81041052.lua

@@ -4,7 +4,7 @@ local cm=_G["c"..m]
 Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	--pendulum summon
-	aux.EnablePendulumAttribute(c)
+	aux.EnablePendulumAttribute(c,false)
 	c:EnableReviveLimit()
 	Tenka.KoikakeRitual(c)
 	--Activate

expansions/script/c81041053.lua

@@ -4,7 +4,7 @@ local cm=_G["c"..m]
 Duel.LoadScript("c81000000.lua")
 function cm.initial_effect(c)
 	--pendulum summon
-	aux.EnablePendulumAttribute(c)
+	aux.EnablePendulumAttribute(c,false)
 	c:EnableReviveLimit()
 	Tenka.KoikakeRitual(c)
 	--Activate