Add files via upload

VgD.Lua

@@ -317,6 +317,7 @@ function VgD.MonsterBattle(c)
     c:RegisterEffect(e9)
     --防御
     local e7=Effect.CreateEffect(c)
+    e7:SetCategory(CATEGORY_DEFENDER)
     e7:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
     e7:SetCode(EVENT_BATTLE_START)
     e7:SetRange(LOCATION_MZONE)

VgDefinition.Lua

@@ -94,6 +94,8 @@ TRRIGGER_DRAW			=0x4		--抽牌触发
 TRRIGGER_HEAL			=0x8		--治愈触发
 TRRIGGER_ADVANCE		=0x10		--前列触发
 TRRIGGER_SUPER		    =0x20		--超限触发
+--Category	效果分类
+CATEGORY_DEFENDER       =0x1		--守护者
 --Reason 卡片到当前位置的原因
 REASON_DESTROY		=0x1		--破坏
 REASON_RELEASE		=0x2		--解放
@@ -872,8 +874,6 @@ ImprisonFlag            =VgID+7 --被收容
 AFFECT_CODE_MIX         =VgID   --魔合成
 AFFECT_CODE_MIX_DIFFERENT_NAME  =VgID+1     --魔合成(卡名不同)
 AFFECT_CODE_SENDTOG     =VgID+2 --需要两张卡才能防御
-AFFECT_CODE_SENDTOG_MZONE       =VgID+3     --不能截击
-AFFECT_CODE_SENDTOG_HAND        =VgID+4     --不能交盾
 
 
 POS_FACEUP_DEFENCE=POS_FACEUP_DEFENSE

VgFuncLib.lua

@@ -508,9 +508,9 @@ end
 function VgF.IsAbleToGZone(c,loc)
     local tp=c:GetControler()
     if loc==LOCATION_HAND then
-        return c:IsType(TYPE_MONSTER) and not Duel.IsPlayerAffectedByEffect(tp,AFFECT_CODE_SENDTOG_HAND)
+        return c:IsType(TYPE_MONSTER)
     elseif loc==LOCATION_MZONE then
-        return c:IsAttribute(SKILL_BLOCK) and VgF.IsSequence(c,0,4) and not Duel.IsPlayerAffectedByEffect(tp,AFFECT_CODE_SENDTOG_MZONE) and c:IsLocation(LOCATION_MZONE) and c:IsFaceup()
+        return c:IsAttribute(SKILL_BLOCK) and VgF.IsSequence(c,0,4) and c:IsLocation(LOCATION_MZONE) and c:IsFaceup()
     end
 end
 ---用于效果的Cost。它返回一个执行“【费用】[将手牌中的num张卡舍弃]”的函数。

c10501003.lua

@@ -24,11 +24,16 @@ function cm.op2(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_ORDER,0,1,1,nil)
 	Duel.HintSelection(g)
 	Duel.RaiseEvent(g,EVENT_CUSTOM+EVENT_SING,e,0,tp,tp,0)
-	local e1=Effect.CreateEffect(c)
+    local e1=Effect.CreateEffect(c)
     e1:SetType(EFFECT_TYPE_FIELD)
+    e1:SetCode(EFFECT_CANNOT_ACTIVATE)
     e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-    e1:SetCode(AFFECT_CODE_SENDTOG_HAND)
     e1:SetTargetRange(0,1)
+    e1:SetValue(cm.actlimit)
     Duel.RegisterEffect(e1,tp)
 	vgf.EffectReset(c,e1,EVENT_BATTLED)
+end
+function cm.actlimit(e,te,tp)
+	local tc=te:GetHandler()
+    return te:IsHasCategory(CATEGORY_DEFENDER) and tc:IsType(TYPE_MONSTER) and tc:GetBaseDefense()==0 and tc:IsLocation(LOCATION_HAND)
 end
\ No newline at end of file