得得得得得

expansions/script/c4210024.lua

@@ -5,7 +5,7 @@ function c4210024.initial_effect(c)
 	e1:SetCategory(CATEGORY_EQUIP)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CONTINUOUS_TARGET)
 	e1:SetTarget(c4210024.target)
 	e1:SetOperation(c4210024.operation)
 	c:RegisterEffect(e1)
@@ -27,7 +27,7 @@ function c4210024.initial_effect(c)
 	e3:SetRange(LOCATION_HAND)
 	--e3:SetCost(c4210024.hdcost)
 	e3:SetCondition(c4210024.hdcon)
-	--e3:SetTarget(c4210024.hdtg)	
+	--e3:SetTarget(c4210024.hdtg)   
 	e3:SetOperation(c4210024.hdop)
 	c:RegisterEffect(e3)
 	--equip limit
@@ -77,7 +77,7 @@ end
 function c4210024.rtop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
 	local sel=1
-	if Duel.IsChainDisablable(0) then		
+	if Duel.IsChainDisablable(0) then	   
 		sel=Duel.SelectOption(tc:GetControler(),aux.Stringid(4210024,2),aux.Stringid(4210024,3))
 		if sel==0 then
 			Duel.PayLPCost(tc:GetControler(),500)

expansions/script/c4212319.lua

@@ -5,21 +5,21 @@ function c4212319.initial_effect(c)
 	e1:SetCategory(CATEGORY_EQUIP)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CONTINUOUS_TARGET)
 	e1:SetTarget(c4212319.target)
 	e1:SetOperation(c4212319.operation)
 	c:RegisterEffect(e1)
 	--Activate(effect)
-    local e3=Effect.CreateEffect(c)
-    e3:SetDescription(aux.Stringid(4212317,2))
-    e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
-    e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-    e3:SetProperty(EFFECT_FLAG_DELAY)
-    e3:SetCode(EVENT_TO_GRAVE)
-    e3:SetCondition(c4212319.con)
-    e3:SetTarget(c4212319.target)
-    e3:SetOperation(c4212319.operation)
-    c:RegisterEffect(e3)
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(4212317,2))
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetCondition(c4212319.con)
+	e3:SetTarget(c4212319.target)
+	e3:SetOperation(c4212319.operation)
+	c:RegisterEffect(e3)
 	--equip limit
 	local e4=Effect.CreateEffect(c)
 	e4:SetType(EFFECT_TYPE_SINGLE)
@@ -55,21 +55,21 @@ function c4212319.operation(e,tp,eg,ep,ev,re,r,rp)
 			e2:SetTarget(c4212319.atktg)
 			e2:SetOperation(c4212319.atkop)
 			tc:RegisterEffect(e2)
-		end		
+		end	 
 	end
 end
 function c4212319.atkcon(e,tp,eg,ep,ev,re,r,rp)
-    local ph=Duel.GetCurrentPhase()
+	local ph=Duel.GetCurrentPhase()
 	return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED)
 end
 function c4212319.sfilter(c)
 	return c:GetType()==TYPE_SPELL+TYPE_CONTINUOUS
 end
-function c4212319.atktg(e,tp,eg,ep,ev,re,r,rp,chk)	
+function c4212319.atktg(e,tp,eg,ep,ev,re,r,rp,chk)  
 	if chk==0 then return Duel.GetAttacker()==e:GetHandler() 
 	and Duel.IsExistingMatchingCard(c4212319.sfilter,tp,LOCATION_ONFIELD,0,1,nil) 
 	and Duel.GetFlagEffect(tp,4212319)==0 end
-	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_ONFIELD)	
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_ONFIELD) 
 	Duel.RegisterFlagEffect(tp,4212319,RESET_CHAIN,0,1)
 end
 function c4212319.atkop(e,tp,eg,ep,ev,re,r,rp)
@@ -89,5 +89,5 @@ function c4212319.atkop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function c4212319.con(e,tp,eg,ep,ev,re,r,rp)
-    return e:GetHandler():IsPreviousLocation(LOCATION_DECK)
+	return e:GetHandler():IsPreviousLocation(LOCATION_DECK)
 end
\ No newline at end of file

expansions/script/c4231006.lua

@@ -11,7 +11,7 @@ function cm.initial_effect(c)--red
 		.e("SetCategory",CATEGORY_EQUIP)
 		.e("SetType",EFFECT_TYPE_ACTIVATE)
 		.e("SetCode",EVENT_FREE_CHAIN)
-		.e("SetProperty",EFFECT_FLAG_CARD_TARGET)
+		.e("SetProperty",EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CONTINUOUS_TARGET)
 		.e("SetTarget",function(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 			if chkc then return chkc:IsLocation(LOCATION_MZONE) and cm.eqfilter(chkc) end
 			if chk==0 then return Duel.IsExistingTarget(cm.eqfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
@@ -82,7 +82,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 			if Duel.SelectYesNo(tp,aux.Stringid(m,0)) then 
 				local g = Duel.SelectMatchingCard(tp,Card.IsFaceup,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
 				Duel.Destroy(g,REASON_EFFECT)
-			end	 
+			end  
 		end
 	end
 end

expansions/script/c4231007.lua

@@ -11,7 +11,7 @@ function cm.initial_effect(c)--red
 		.e("SetCategory",CATEGORY_EQUIP)
 		.e("SetType",EFFECT_TYPE_ACTIVATE)
 		.e("SetCode",EVENT_FREE_CHAIN)
-		.e("SetProperty",EFFECT_FLAG_CARD_TARGET)
+		.e("SetProperty",EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CONTINUOUS_TARGET)
 		.e("SetTarget",function(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 			if chkc then return chkc:IsLocation(LOCATION_MZONE) and cm.eqfilter(chkc) end
 			if chk==0 then return Duel.IsExistingTarget(cm.eqfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
@@ -80,7 +80,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 			if Duel.SelectYesNo(tp,aux.Stringid(m,0)) then 
 				local g = Duel.SelectMatchingCard(tp,Card.IsFacedown,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
 				Duel.Destroy(g,REASON_EFFECT)
-			end	 
+			end  
 		end
 	end
 end

expansions/script/c4231008.lua

@@ -16,7 +16,7 @@ function cm.initial_effect(c)
 	.Return()).c("RegisterEffect",iFunc(c)
 		.e("SetType",EFFECT_TYPE_ACTIVATE)
 		.e("SetCode",EVENT_FREE_CHAIN)
-		.e("SetProperty",EFFECT_FLAG_CARD_TARGET)
+		.e("SetProperty",EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CONTINUOUS_TARGET)
 		.e("SetTarget",function(e,tp,eg,ep,ev,re,r,rp,chk)
 			if chkc then return chkc:IsLocation(LOCATION_MZONE) and cm.eqfilter(chkc) end
 			if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_DECK,0,1,nil) and Duel.IsExistingTarget(cm.eqfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
@@ -33,7 +33,7 @@ function cm.initial_effect(c)
 			end end)
 	.Return()).c("RegisterEffect",iFunc(c)
 		.e("SetCategory",CATEGORY_TOHAND)
-		.e("SetType",EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)	
+		.e("SetType",EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)   
 		.e("SetCode",EVENT_EQUIP)
 		.e("SetRange",0xff)
 		.e("SetProperty",EFFECT_FLAG_DELAY)

expansions/script/c4231021.lua

@@ -4,28 +4,26 @@ local cm=_G["c"..m]
 function cm.initial_effect(c)--red
 	iFunc(c).c("RegisterEffect",iFunc(c)
 		.e("SetType",EFFECT_TYPE_SINGLE)
-		.e("SetCode",EFFECT_EQUIP_LIMIT)--装 备 对 象 限 制
-		.e("SetProperty",EFFECT_FLAG_CANNOT_DISABLE)--不 能 被 无 效 化
+		.e("SetCode",EFFECT_EQUIP_LIMIT)
+		.e("SetProperty",EFFECT_FLAG_CANNOT_DISABLE)
 		.e("SetValue",function(e,c)return c:IsRace(RACE_SPELLCASTER) end)
 	.Return()).c("RegisterEffect",iFunc(c)
-		.e("SetCategory",CATEGORY_EQUIP)--装 备 效 果 分 类
-		.e("SetType",EFFECT_TYPE_ACTIVATE)--魔 法 陷 阱 发 动
-		.e("SetCode",EVENT_FREE_CHAIN)--自 由 时 点
-		.e("SetProperty",EFFECT_FLAG_CARD_TARGET)--取 对 象 效 果
+		.e("SetCategory",CATEGORY_EQUIP)
+		.e("SetType",EFFECT_TYPE_ACTIVATE)
+		.e("SetCode",EVENT_FREE_CHAIN)
+		.e("SetProperty",EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CONTINUOUS_TARGET)
 		.e("SetTarget",function(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-			if chkc then return chkc:IsLocation(LOCATION_MZONE) and cm.eqfilter(chkc) end --判 断 chkc 对 象 是 否 在 怪 兽 区 域 是 否 满 足 发 动 条 件
-			if chk==0 then return Duel.IsExistingTarget(cm.eqfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end--双 方 怪 兽 区 域 是 否 存 在 满 足 条 件 的 对 象
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)--提 示
-			Duel.SelectTarget(tp,cm.eqfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)--选 取 对 象
+			if chkc then return chkc:IsLocation(LOCATION_MZONE) and cm.eqfilter(chkc) end
+			if chk==0 then return Duel.IsExistingTarget(cm.eqfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
+			Duel.SelectTarget(tp,cm.eqfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
 			Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)
-			--设 置 效 果 分 类（装 备）
 			end)
 		.e("SetOperation",function(e,tp,eg,ep,ev,re,r,rp)
-			-- e 是 当 前 这 个 效 果
-			local c=e:GetHandler() --获 取 当 前 效 果 所 属 卡 片
-			local tc=Duel.GetFirstTarget()--获 取 当 前 对 象
-			if c:IsRelateToEffect(e) and tc and tc:IsRelateToEffect(e) and tc:IsFaceup() then Duel.Equip(tp,c,tc) --把 这 张 卡 c 装 备 给 怪 兽 tc
-			end --end 刚 被 注 释 掉 了，出 bug 了 QAQ
+			local c=e:GetHandler() 
+			local tc=Duel.GetFirstTarget()
+			if c:IsRelateToEffect(e) and tc and tc:IsRelateToEffect(e) and tc:IsFaceup() then Duel.Equip(tp,c,tc)
+			end
 		end)
 	.Return()).c("RegisterEffect",iFunc(c)
 		.e("SetDescription",aux.Stringid(m,0))
@@ -48,9 +46,9 @@ function cm.initial_effect(c)--red
 			Duel.Destroy(g2,REASON_EFFECT)
 		end)
 	.Return()).c("RegisterEffect",iFunc(c)
-		.e('SetType',EFFECT_TYPE_EQUIP)--装 备 时 生 效 的 效 果
-		.e('SetCode',EFFECT_UPDATE_ATTACK)--更 新 攻 击 力
-		.e('SetValue',function(e,c) return 500*Duel.GetMatchingGroupCount(function(c) return c:IsType(TYPE_EQUIP) and c:IsType(TYPE_SPELL) end,e:GetHandler():GetControler(),LOCATION_SZONE,0,nil) end)--正 数 为 增 加 ，负 数 为 减 少
+		.e('SetType',EFFECT_TYPE_EQUIP)
+		.e('SetCode',EFFECT_UPDATE_ATTACK)
+		.e('SetValue',function(e,c) return 500*Duel.GetMatchingGroupCount(function(c) return c:IsType(TYPE_EQUIP) and c:IsType(TYPE_SPELL) end,e:GetHandler():GetControler(),LOCATION_SZONE,0,nil) end)
 	.Return()).c("RegisterEffect",iFunc(c)
 		.e("SetDescription",aux.Stringid(m,0))
 		.e("SetCategory",CATEGORY_EQUIP+CATEGORY_TOHAND)

expansions/script/c4231022.lua

 --蓝宝石的情人节赠礼
 local m=4231022
 local cm=_G["c"..m]
-function cm.initial_effect(c)--red
+function cm.initial_effect(c)
 	iFunc(c).c("RegisterEffect",iFunc(c)
 		.e("SetType",EFFECT_TYPE_SINGLE)
-		.e("SetCode",EFFECT_EQUIP_LIMIT)--装 备 对 象 限 制
-		.e("SetProperty",EFFECT_FLAG_CANNOT_DISABLE)--不 能 被 无 效 化
+		.e("SetCode",EFFECT_EQUIP_LIMIT)
+		.e("SetProperty",EFFECT_FLAG_CANNOT_DISABLE)
 		.e("SetValue",function(e,c)return c:IsRace(RACE_SPELLCASTER) end)
 	.Return()).c("RegisterEffect",iFunc(c)
-		.e("SetCategory",CATEGORY_EQUIP)--装 备 效 果 分 类
-		.e("SetType",EFFECT_TYPE_ACTIVATE)--魔 法 陷 阱 发 动
-		.e("SetCode",EVENT_FREE_CHAIN)--自 由 时 点
-		.e("SetProperty",EFFECT_FLAG_CARD_TARGET)--取 对 象 效 果
+		.e("SetCategory",CATEGORY_EQUIP)
+		.e("SetType",EFFECT_TYPE_ACTIVATE)
+		.e("SetCode",EVENT_FREE_CHAIN)
+		.e("SetProperty",EFFECT_FLAG_CARD_TARGET)
 		.e("SetTarget",function(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-			if chkc then return chkc:IsLocation(LOCATION_MZONE) and cm.eqfilter(chkc) end --判 断 chkc 对 象 是 否 在 怪 兽 区 域 是 否 满 足 发 动 条 件
-			if chk==0 then return Duel.IsExistingTarget(cm.eqfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end--双 方 怪 兽 区 域 是 否 存 在 满 足 条 件 的 对 象
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)--提 示
-			Duel.SelectTarget(tp,cm.eqfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)--选 取 对 象
-			Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)
-			--设 置 效 果 分 类（装 备）
+			if chkc then return chkc:IsLocation(LOCATION_MZONE) and cm.eqfilter(chkc) end
+			if chk==0 then return Duel.IsExistingTarget(cm.eqfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
+			Duel.SelectTarget(tp,cm.eqfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
+			Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)		  
 			end)
 		.e("SetOperation",function(e,tp,eg,ep,ev,re,r,rp)
-			-- e 是 当 前 这 个 效 果
-			local c=e:GetHandler() --获 取 当 前 效 果 所 属 卡 片
-			local tc=Duel.GetFirstTarget()--获 取 当 前 对 象
-			if c:IsRelateToEffect(e) and tc and tc:IsRelateToEffect(e) and tc:IsFaceup() then Duel.Equip(tp,c,tc) --把 这 张 卡 c 装 备 给 怪 兽 tc
-			end --end 刚 被 注 释 掉 了，出 bug 了 QAQ
+			local c=e:GetHandler()
+			local tc=Duel.GetFirstTarget()
+			if c:IsRelateToEffect(e) and tc and tc:IsRelateToEffect(e) and tc:IsFaceup() then Duel.Equip(tp,c,tc)
+			end
 		end)
 	.Return()).c("RegisterEffect",iFunc(c)
 		.e("SetDescription",aux.Stringid(m,0))
@@ -72,11 +70,11 @@ function cm.initial_effect(c)--red
 			end
 		end)
 	.Return()).c("RegisterEffect",iFunc(c)
-		.e('SetType',EFFECT_TYPE_FIELD)--装 备 时 生 效 的 效 果
-		.e('SetCode',EFFECT_UPDATE_ATTACK)--更 新 攻 击 力
+		.e('SetType',EFFECT_TYPE_FIELD)
+		.e('SetCode',EFFECT_UPDATE_ATTACK)
 		.e("SetRange",LOCATION_SZONE)
 		.e("SetTargetRange",0,LOCATION_MZONE)
-		.e('SetValue',function(e,c) return -500*Duel.GetMatchingGroupCount(function(c) return c:IsType(TYPE_EQUIP) and c:IsType(TYPE_SPELL) end,e:GetHandler():GetControler(),LOCATION_SZONE,0,nil) end)--正 数 为 增 加 ，负 数 为 减 少
+		.e('SetValue',function(e,c) return -500*Duel.GetMatchingGroupCount(function(c) return c:IsType(TYPE_EQUIP) and c:IsType(TYPE_SPELL) end,e:GetHandler():GetControler(),LOCATION_SZONE,0,nil) end)
 	.Return()).c("RegisterEffect",iFunc(c)
 		.e("SetDescription",aux.Stringid(m,0))
 		.e("SetCategory",CATEGORY_EQUIP+CATEGORY_TOHAND)