Add files via upload

VgFuncLib.lua

@@ -513,39 +513,47 @@ end
 function VgF.SearchCard(loc,f)
     if not loc then return end
     return function (e,tp,eg,ep,ev,re,r,rp)
-        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-        local g=Duel.SelectMatchingCard(tp,function (c)
-            if VgF.GetValueType(f)=="function" and not f(c) then return false end
-            return c:IsAbleToHand()
-        end,tp,loc,0,1,1,nil)
-        if g:GetCount()>0 then
-            Duel.SendtoHand(g,nil,REASON_EFFECT)
-            Duel.ConfirmCards(1-tp,g)
-        end
+        VgF.SearchCardOP(loc,f,e,tp,eg,ep,ev,re,r,rp)
         local sg=Duel.GetOperatedGroup()
         return sg:GetCount()
     end
 end
----用于效果的Operation。执行“从loc中选取1张满足f的卡，Call到R上。”。
+function VgF.SearchCardOP(loc,f,e,tp,eg,ep,ev,re,r,rp)
+    if not loc then return end
+    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+    local g=Duel.SelectMatchingCard(tp,function (c)
+        if VgF.GetValueType(f)=="function" and not f(c) then return false end
+        return c:IsAbleToHand()
+    end,tp,loc,0,1,1,nil)
+    if g:GetCount()>0 then
+        Duel.SendtoHand(g,nil,REASON_EFFECT)
+        Duel.ConfirmCards(1-tp,g)
+    end
+end
+    ---用于效果的Operation。执行“从loc中选取1张满足f的卡，Call到R上。”。
 ---@param loc integer 要选取的区域。不填则返回nil，而不是效果的Operation函数。
 ---@param f function 卡片过滤的条件
 ---@return function|nil 效果的Operation函数
 function VgF.SearchCardSpecialSummon(loc,f)
     if not loc then return end
     return function (e,tp,eg,ep,ev,re,r,rp)
-        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-        local g=Duel.SelectMatchingCard(tp,function (c)
-            if VgF.GetValueType(f)=="function" and not f(c) then return false end
-            return c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_ATTACK)
-        end,tp,loc,0,1,1,nil)
-        if g:GetCount()>0 then
-            if loc&LOCATION_DECK+LOCATION_HAND+LOCATION_EXTRA==0 then Duel.HintSelection(g) end
-            VgF.Call(g,0,tp)
-        end
+        VgF.SearchCardSpecialSummonOP(loc,f,e,tp,eg,ep,ev,re,r,rp)
         local sg=Duel.GetOperatedGroup()
         return sg:GetCount()
     end
 end
+function VgF.SearchCardSpecialSummonOP(loc,f,e,tp,eg,ep,ev,re,r,rp)
+    if not loc then return end
+    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+    local g=Duel.SelectMatchingCard(tp,function (c)
+        if VgF.GetValueType(f)=="function" and not f(c) then return false end
+        return c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_ATTACK)
+    end,tp,loc,0,1,1,nil)
+    if g:GetCount()>0 then
+        if loc&LOCATION_DECK+LOCATION_HAND+LOCATION_EXTRA==0 then Duel.HintSelection(g) end
+        VgF.Call(g,0,tp)
+    end
+end
 function Group.CheckSubGroup(g,f,min,max,...)
 	min = min or 1
 	max = max or #g
@@ -621,4 +629,4 @@ function VgF.CheckPrison(p)
 	local og=Duel.GetFieldGroup(p,LOCATION_ORDER,0)
 	local oc=og:Filter(VgF.PrisonFilter,nil,og:GetCount()):GetFirst()
 	return oc:IsSetCard(0x3040)
-end
+end
\ No newline at end of file

c10101015.lua

@@ -10,7 +10,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_MZONE,0,1,1,nil)
 	Duel.HintSelection(g)
 	VgF.AtkUp(c,g,5000,nil)
-	vgf.SearchCard(LOCATION_DROP,cm.filter)
+	vgf.SearchCardOP(LOCATION_DROP,cm.filter,e,tp,eg,ep,ev,re,r,rp)
 end
 function cm.filter(c)
 	return c:IsCode(10101006)

c20104001.lua

@@ -9,7 +9,7 @@ function cm.initial_effect(c)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	vgf.SearchCard(LOCATION_DECK,cm.fliter)
+	vgf.SearchCardOP(LOCATION_DECK,cm.fliter,e,tp,eg,ep,ev,re,r,rp)
 	vgf.AtkUp(c,c,10000,nil)
 end
 function cm.fliter(c)
@@ -22,10 +22,9 @@ function cm.condition(e,tp,eg,ep,ev,re,r,rp)
 end
 function cm.operation2(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	vgf.SearchCardSpecialSummon(LOCATION_DROP,cm.fliter2)
+	vgf.SearchCardSpecialSummonOP(LOCATION_DROP,cm.fliter2,e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetOperatedGroup()
 	vgf.AtkUp(c,g,10000)
-
 end
 function cm.fliter2(c)
 	return vgf.IsLevel(c,1,2,3)