fix

expansions/script/c13254058.lua

 --飞球造物·吸血球
 local m=c13254058
 local cm=_G["c"..m]
+xpcall(function() require("expansions/script/tama") end,function() require("script/tama") end)
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)

expansions/script/c13257213.lua

@@ -85,6 +85,11 @@ end
 function cm.filter(c,e,tp)
 	return c:IsSetCard(0x353) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end
+function cm.canActivate(c,PCe,eg,ep,ev,re,r,rp)
+	local tep=c:GetControler()
+	local target=PCe:GetTarget()
+	return not target or target(PCe,tep,eg,ep,ev,re,r,rp,0)
+end
 function cm.sptg(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_DECK,0,1,nil,e,tp) end

expansions/script/c13257222.lua

@@ -9,7 +9,7 @@ function cm.initial_effect(c)
 	e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
 	e0:SetCode(EFFECT_ADD_EXTRA_TRIBUTE)
 	e0:SetTargetRange(LOCATION_HAND,0)
-	e0:SetTarget(aux.TargetBoolFunction(cm.limit))
+	e0:SetTarget(function(e,c) return c~=e:GetHandler() end)
 	e0:SetValue(POS_FACEUP_ATTACK)
 	c:RegisterEffect(e0)
 	--double tribute
@@ -48,11 +48,6 @@ function cm.initial_effect(c)
 	e12:SetOperation(cm.bgmop)
 	c:RegisterEffect(e12)
 end
-function cm.limit(c)
-	return  function (e,c)
-				return e:GetHandler()~=c
-			end
-end
 function cm.condition(e,c)
 	return c:IsRace(RACE_MACHINE)
 end

expansions/script/c13257225.lua

@@ -139,13 +139,9 @@ function cm.tkop(e,tp,eg,ep,ev,re,r,rp)
 	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
 	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
 	e1:SetTargetRange(1,0)
-	e1:SetTarget(cm.splimit)
 	e1:SetReset(RESET_PHASE+PHASE_END)
 	Duel.RegisterEffect(e1,tp)
 end
-function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
-	return c:IsLocation(LOCATION_EXTRA)
-end
 function cm.bgmop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(11,0,aux.Stringid(m,4))
 end

expansions/script/c13257228.lua

@@ -39,7 +39,7 @@ function cm.initial_effect(c)
 	e5:SetDescription(aux.Stringid(m,2))
 	e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
 	e5:SetCode(EVENT_CHAIN_SOLVING)
-	e5:SetRange(LOCATION_GRAVE)
+	e5:SetRange(LOCATION_MZONE)
 	e5:SetCondition(cm.condition)
 	e5:SetOperation(cm.operation)
 	c:RegisterEffect(e5)