fix

expansions/script/c13254031.lua

 --元始飞球·绿
 local m=13254031
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13254032.lua

 --元始飞球·金
 local m=13254032
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13254033.lua

 --元始飞球·蓝
 local m=13254033
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13254034.lua

 --元始飞球·红
 local m=13254034
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13254035.lua

 --元始飞球·白
 local m=13254035
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13254036.lua

 --元始飞球·黑
 local m=13254036
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13254037.lua

 --元始飞球之殇
 local m=13254037
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--fusion material
 	c:EnableReviveLimit()

expansions/script/c13254038.lua

 --元素飞球之雨
 local m=13254038
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)

expansions/script/c13254039.lua

 --元始飞球秘术·乱流
 local m=13254039
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
@@ -94,7 +94,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	end
 	if obj and tama.tamas_isAllElementsNotAbove({{TAMA_ELEMENT_ORDER,2}},obj) then
 		Duel.SelectOption(tp,aux.Stringid(m,4))
-		e:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
+		e:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
 	end
 	if obj and tama.tamas_isAllElementsNotAbove({{TAMA_ELEMENT_CHAOS,2}},obj) then
 		Duel.SelectOption(tp,aux.Stringid(m,5))

expansions/script/c13254040.lua

 --元始飞球秘术·爆震
 local m=13254040
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
@@ -90,7 +90,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	end
 	if obj and tama.tamas_isAllElementsNotAbove({{TAMA_ELEMENT_ORDER,2}},obj) then
 		Duel.SelectOption(tp,aux.Stringid(m,4))
-		e:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
+		e:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
 	end
 	if obj and tama.tamas_isAllElementsNotAbove({{TAMA_ELEMENT_CHAOS,2}},obj) then
 		Duel.SelectOption(tp,aux.Stringid(m,5))

expansions/script/c13254041.lua

 --元始飞球秘术·飓风
 local m=13254041
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
@@ -90,7 +90,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	end
 	if obj and tama.tamas_isAllElementsNotAbove({{TAMA_ELEMENT_ORDER,2}},obj) then
 		Duel.SelectOption(tp,aux.Stringid(m,4))
-		e:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
+		e:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
 	end
 	if obj and tama.tamas_isAllElementsNotAbove({{TAMA_ELEMENT_CHAOS,2}},obj) then
 		Duel.SelectOption(tp,aux.Stringid(m,5))

expansions/script/c13254042.lua

 --元始飞球秘术·崩炎
 local m=13254042
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
@@ -89,7 +89,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	end
 	if obj and tama.tamas_isAllElementsNotAbove({{TAMA_ELEMENT_ORDER,2}},obj) then
 		Duel.SelectOption(tp,aux.Stringid(m,4))
-		e:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
+		e:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
 	end
 	if obj and tama.tamas_isAllElementsNotAbove({{TAMA_ELEMENT_CHAOS,2}},obj) then
 		Duel.SelectOption(tp,aux.Stringid(m,5))

expansions/script/c13254043.lua

 --元始飞球秘术·耀光
 local m=13254043
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13254044.lua

 --元始飞球秘术·帷幕
 local m=13254044
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
@@ -67,7 +67,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	end
 	if obj and tama.tamas_isAllElementsNotAbove({{TAMA_ELEMENT_ORDER,2}},obj) then
 		Duel.SelectOption(tp,aux.Stringid(m,3))
-		e:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
+		e:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
 	end
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)

expansions/script/c13254045.lua

 --元始飞球秘术·元始
 local m=13254045
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13254046.lua

 --飞球之天界
 local m=13254046
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)

expansions/script/c13254047.lua

 --纯净魔能
 local m=13254047
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
 function cm.initial_effect(c)
 	--recover
 	local e1=Effect.CreateEffect(c)

expansions/script/c13254048.lua

 --魔能飞球
 local m=13254048
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--cannot special summon
 	local e11=Effect.CreateEffect(c)

expansions/script/c13254049.lua

 --不存于世的能量
 local m=13254049
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13254050.lua

 --飞球之魔能弹
 local m=13254050
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13254051.lua

 --魔能阵·纯净魔力召唤术
 local m=13254051
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)

expansions/script/c13254052.lua

 --飞球造物·能量
 local m=13254052
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--special summon
 	local e1=Effect.CreateEffect(c)
@@ -19,7 +19,7 @@ function cm.initial_effect(c)
 	e2:SetCode(EVENT_FREE_CHAIN)
 	e2:SetRange(LOCATION_MZONE)
 	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e2:SetCountLimit(1)
+	e2:SetCountLimit(1,m)
 	e2:SetTarget(cm.target)
 	e2:SetOperation(cm.activate)
 	c:RegisterEffect(e2)
@@ -29,7 +29,7 @@ function cm.initial_effect(c)
 	e3:SetType(EFFECT_TYPE_IGNITION)
 	e3:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
 	e3:SetRange(LOCATION_MZONE)
-	e3:SetCountLimit(1,m)
+	e3:SetCountLimit(1)
 	e3:SetCost(cm.thcost1)
 	e3:SetTarget(cm.thtg1)
 	e3:SetOperation(cm.thop1)

expansions/script/c13254053.lua

 --魔能（飞球）反应炉
 local m=13254053
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetCategory(CATEGORY_HANDES+CATEGORY_DRAW)

expansions/script/c13254054.lua

 --元始飞球造物·生命
 local m=13254054
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--special summon
 	local e1=Effect.CreateEffect(c)

expansions/script/c13254055.lua

 --飞球造物·隐飞球
 local m=13254055
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13254056.lua

 --飞球造物·影蝶球
 local m=13254056
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13254057.lua

 --飞球造物·奇术球
 local m=13254057
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13254058.lua

 --飞球造物·吸血球
 local m=13254058
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--splimit
 	local e0=Effect.CreateEffect(c)

expansions/script/c13254059.lua

 --元始飞球之神格
 local m=13254059
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)

expansions/script/c13254060.lua

 --飞球的灵气世界
 local m=13254060
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)
@@ -14,7 +14,7 @@ function cm.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
 	e2:SetCode(EVENT_FREE_CHAIN)
 	e2:SetRange(LOCATION_FZONE)
-	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
 	e2:SetCountLimit(1,TAMA_THEME_CODE+EFFECT_COUNT_CODE_DUEL)
 	e2:SetCondition(cm.recon)
 	e2:SetOperation(cm.reop)

expansions/script/c13254061.lua

 --飞球造物·拳石球
 local m=13254061
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--special summon
 	local e1=Effect.CreateEffect(c)

expansions/script/c13254062.lua

 --飞球造物·智飞球
 local m=13254062
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--spsummon
 	local e1=Effect.CreateEffect(c)

expansions/script/c13254063.lua

 --飞球造物·拟态球
 local m=13254063
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetCategory(CATEGORY_TOGRAVE)

expansions/script/c13254064.lua

 --飞球造物·钢屑球
 local m=13254064
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13254065.lua

 --元素飞球之暴雨
 local m=13254065
 local cm=_G["c"..m]
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13254066.lua

 --飞球的延续
 local m=13254066
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13254067.lua

 --粉红飞球
 local m=13254067
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13254068.lua

 --元始飞球造物·光兔
 local m=13254068
 local cm=_G["c"..m]
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--fusion summon
 	c:EnableReviveLimit()

expansions/script/c13254069.lua

 --飞球造物融合
 local m=13254069
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)

expansions/script/c13254070.lua

+--飞球造物·蟑螂球
+local m=13254070
+local cm=_G["c"..m]
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
+function cm.initial_effect(c)
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_DECKDES)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER)
+	e1:SetRange(LOCATION_HAND+LOCATION_MZONE)
+	e1:SetCountLimit(1,m)
+	e1:SetCost(cm.cost)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+	elements={{"tama_elements",{{TAMA_ELEMENT_EARTH,1},{TAMA_ELEMENT_LIFE,1}}}}
+	cm[c]=elements
+	
+end
+function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
+	Duel.SendtoGrave(e:GetHandler(),REASON_COST)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCondition(cm.drcon1)
+	e1:SetOperation(cm.drop1)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+	local e2=e1:Clone()
+	e2:SetCode(EVENT_SUMMON_SUCCESS)
+	Duel.RegisterEffect(e2,tp)
+	--sp_summon effect
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e3:SetCondition(cm.regcon)
+	e3:SetOperation(cm.regop)
+	e3:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e3,tp)
+	local e4=e3:Clone()
+	e4:SetCode(EVENT_SUMMON_SUCCESS)
+	Duel.RegisterEffect(e4,tp)
+	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+	e5:SetCode(EVENT_CHAIN_SOLVED)
+	e5:SetCondition(cm.drcon2)
+	e5:SetOperation(cm.drop2)
+	e5:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e5,tp)
+	local e6=Effect.CreateEffect(c)
+	e6:SetType(EFFECT_TYPE_FIELD)
+	e6:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e6:SetCode(EFFECT_CANNOT_ACTIVATE)
+	e6:SetTargetRange(1,0)
+	e6:SetValue(cm.aclimit)
+	e6:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e6,tp)
+end
+function cm.filter(c,sp)
+	return c:IsSummonPlayer(sp)
+end
+function cm.drcon1(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(cm.filter,1,nil,1-tp)
+		and (not re or (not re:IsHasType(EFFECT_TYPE_ACTIONS) or re:IsHasType(EFFECT_TYPE_CONTINUOUS)))
+end
+function cm.drop1(e,tp,eg,ep,ev,re,r,rp)
+	Duel.DiscardDeck(tp,1,REASON_EFFECT)
+end
+function cm.regcon(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(cm.filter,1,nil,1-tp)
+		and re and re:IsHasType(EFFECT_TYPE_ACTIONS) and not re:IsHasType(EFFECT_TYPE_CONTINUOUS)
+end
+function cm.regop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.RegisterFlagEffect(tp,m,RESET_CHAIN,0,1)
+end
+function cm.drcon2(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFlagEffect(tp,m)>0
+end
+function cm.drop2(e,tp,eg,ep,ev,re,r,rp)
+	local n=Duel.GetFlagEffect(tp,m)
+	Duel.ResetFlagEffect(tp,m)
+	Duel.DiscardDeck(tp,n,REASON_EFFECT)
+end
+function cm.aclimit(e,re,tp)
+	return bit.band(re:GetActivateLocation(),LOCATION_GRAVE+LOCATION_HAND)>0
+end

expansions/script/c13254072.lua

 --飞球造物·胸寄生球
 local m=13254072
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e2=Effect.CreateEffect(c)
 	local e1=Effect.CreateEffect(c)

expansions/script/c13254073.lua

 --飞球梦工厂
 local m=13254073
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:SetUniqueOnField(1,0,m)
 	local e1=Effect.CreateEffect(c)
@@ -14,6 +14,7 @@ function cm.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_PHASE+PHASE_STANDBY)
 	e2:SetRange(LOCATION_HAND)
+	e2:SetCondition(cm.condition)
 	e2:SetCost(cm.cost)
 	e2:SetTarget(cm.target)
 	e2:SetOperation(cm.operation)
@@ -62,6 +63,9 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e9)
 	
 end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetTurnCount()==1
+end
 function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
 	Duel.SendtoGrave(e:GetHandler(),REASON_COST)

expansions/script/c13254074.lua

 --元始飞球造物·魔鬼·球体形
 local m=13254074
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--fusion summon
 	c:EnableReviveLimit()

expansions/script/c13254077.lua

+--无名的炼金术师
+local m=13254077
+local cm=_G["c"..m]
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
+function cm.initial_effect(c)
+	--summon with no tribute
+	local e0=Effect.CreateEffect(c)
+	e0:SetDescription(aux.Stringid(m,0))
+	e0:SetProperty(EFFECT_FLAG_UNCOPYABLE)
+	e0:SetType(EFFECT_TYPE_SINGLE)
+	e0:SetCode(EFFECT_SUMMON_PROC)
+	e0:SetCondition(cm.ntcon)
+	c:RegisterEffect(e0)
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,1))
+	e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND+CATEGORY_SUMMON)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetTarget(s.smtg)
+	e1:SetOperation(s.smop)
+	c:RegisterEffect(e1)
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
+	e2:SetCode(EVENT_TO_GRAVE)
+	e2:SetCountLimit(1,m)
+	e2:SetCondition(cm.thcon)
+	e2:SetTarget(cm.thtg)
+	e2:SetOperation(cm.thop)
+	c:RegisterEffect(e2)
+	if not s.global_check then
+		s.global_check=true
+		s[0]=0
+		s[1]=0
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_SUMMON)
+		ge1:SetOperation(s.regop)
+		Duel.RegisterEffect(ge1,0)
+	end
+	
+end
+function s.regop(e,tp,eg,ep,ev,re,r,rp)
+	local c=eg:GetFirst()
+	if s[ep]==0 and c:IsCode(m) then s[ep]=1 end
+end
+function cm.ntcon(e,c,minc)
+	if c==nil then return true end
+	return minc==0 and c:IsLevelAbove(5) and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
+		and s[c:GetControler()]==0
+end
+function cm.thfilter(c)
+	return c:IsSetCard(0x3356) and c:IsAbleToHand()
+end
+function cm.smtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function cm.smop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local sg1=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_DECK,0,1,1,nil)
+	local tc=sg1:GetFirst()
+	if Duel.SendtoHand(sg1,tp,REASON_EFFECT)>0 and tc:IsSummonable(true,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
+		Duel.BreakEffect()
+		Duel.Summon(tp,tc,true,nil)
+	end
+end
+function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)
+end
+function cm.tdfilter1(c)
+	return c:IsSetCard(0x3356) and c:IsAbleToDeck()
+end
+function cm.thfilter1(c)
+	return c:IsSetCard(0x356) and c:IsAbleToHand()
+end
+function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	local g=Duel.GetMatchingGroup(cm.tdfilter1,tp,LOCATION_MZONE,0,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
+end
+function cm.thop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(cm.tdfilter1,tp,LOCATION_MZONE,0,nil)
+	if g:GetCount()>0 then
+		local ct=Duel.SendtoDeck(dg,tp,2,REASON_EFFECT)
+		if ct>0 then
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+			local g1=Duel.SelectMatchingCard(tp,cm.thfilter1,tp,LOCATION_DECK,0,1,ct,nil)
+			if g1:GetCount()>0 then
+				Duel.SendtoHand(g,nil,REASON_EFFECT)
+				Duel.ConfirmCards(1-tp,g1)
+			end
+		end
+	end
+end
+

expansions/script/c13255408.lua

 --预设剧本
 local m=13255408
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)

expansions/script/c13255410.lua

+--Alfred & Nemoma
+local m=13255410
+local cm=_G["c"..m]
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
+function cm.initial_effect(c)
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCountLimit(1,m)
+	e1:SetCondition(cm.sumcon)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.sumtg)
+	e1:SetOperation(cm.sumop)
+	c:RegisterEffect(e1)
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(m,2))
+	e2:SetCategory(CATEGORY_TOHAND)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e2:SetCode(EVENT_DISCARD)
+	e2:SetCountLimit(1,m+10000000)
+	e2:SetCondition(cm.thcon)
+	e2:SetTarget(cm.thtg)
+	e2:SetOperation(cm.thop)
+	c:RegisterEffect(e2)
+	elements={{"tama_elements",{{TAMA_ELEMENT_WIND,1},{TAMA_ELEMENT_ENERGY,1},{TAMA_ELEMENT_LIFE,1}}}}
+	cm[c]=elements
+	
+end
+function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return not e:GetHandler():IsPublic() end
+	Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
+end
+function cm.sumcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFlagEffect(tp,m)==0
+end
+function cm.sumtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>0 and Duel.IsPlayerCanSummon(tp) and Duel.IsPlayerCanAdditionalSummon(tp) end
+end
+function cm.sumop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,2))
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_EXTRA_SUMMON_COUNT)
+	e1:SetTargetRange(LOCATION_HAND+LOCATION_MZONE,0)
+	e1:SetTarget(aux.TargetBoolFunction(Card.IsLevelBelow,4))
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+	Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
+
+	if c:IsRelateToEffect(e) and Duel.GetFieldGroupCount(tp,0,LOCATION_DECK)>0 then
+		Duel.ConfirmDecktop(tp,1)
+		local g=Duel.GetDecktopGroup(tp,1)
+		local tc=g:GetFirst()
+
+		local tc1=g:GetMinGroup(Card.GetSequence):GetFirst()
+		Duel.MoveSequence(tc1,0)
+		Duel.ConfirmDecktop(tp,1)
+		Duel.MoveSequence(tc1,opt)
+		if tc:IsCode(tc1:GetCode()) or tc1:IsCode(tc:GetCode()) then
+			Duel.SendtoGrave(c,REASON_EFFECT)
+			local e2=Effect.CreateEffect(c)
+			e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+			e2:SetCode(EVENT_PHASE+PHASE_END)
+			e2:SetReset(RESET_PHASE+PHASE_END)
+			e2:SetCountLimit(1)
+			e2:SetOperation(cm.desop)
+			Duel.RegisterEffect(e2,tp)
+		end
+	end
+end
+function cm.desop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(Card.IsAbleToHand,tp,LOCATION_MZONE,0,nil)
+	Duel.SendtoHand(g,nil,REASON_EFFECT)
+end
+function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
+	e:SetLabel(e:GetHandler():GetPreviousControler())
+	return e:GetHandler():IsPreviousLocation(LOCATION_HAND) and e:GetHandler():IsReason(REASON_EFFECT) 
+	--bit.band(r,REASON_EFFECT)==REASON_EFFECT
+end
+function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToHand() end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,e:GetHandler(),1,0,0)
+end
+function cm.thop(e,tp,eg,ep,ev,re,r,rp)
+	if e:GetHandler():IsRelateToEffect(e) then
+		Duel.SendtoHand(e:GetHandler(),nil,REASON_EFFECT)
+	end
+end

expansions/script/c13255411.lua

+--Tama & Amarillo
+local m=13255411
+local cm=_G["c"..m]
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
+function cm.initial_effect(c)
+	--cannot special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(aux.FALSE)
+	c:RegisterEffect(e1)
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(m,0))
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_HAND)
+	e2:SetCost(cm.spcost)
+	e2:SetTarget(cm.sptg)
+	e2:SetOperation(cm.spop)
+	c:RegisterEffect(e2)
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(m,1))
+	e3:SetCategory(CATEGORY_ATKCHANGE)
+	e3:SetType(EFFECT_TYPE_IGNITION)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCountLimit(1)
+	e3:SetCost(cm.cost)
+	e3:SetOperation(cm.operation)
+	c:RegisterEffect(e3)
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_SINGLE)
+	e4:SetCode(EFFECT_CHANGE_BATTLE_DAMAGE)
+	e4:SetCondition(cm.damcon)
+	e4:SetValue(aux.ChangeBattleDamage(1,DOUBLE_DAMAGE))
+	c:RegisterEffect(e4)
+	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_SINGLE)
+	e5:SetCode(EFFECT_PIERCE)
+	c:RegisterEffect(e5)
+	elements={{"tama_elements",{{TAMA_ELEMENT_WIND,1},{TAMA_ELEMENT_ENERGY,1},{TAMA_ELEMENT_LIFE,1}}}}
+	cm[c]=elements
+	
+end
+function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	local ct=math.floor(Duel.GetLP(tp)/2)
+	Duel.PayLPCost(tp,ct)
+	e:SetLabel(ct)
+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 e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,true,false) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 or not c:IsRelateToEffect(e) then return end
+	if Duel.SpecialSummon(c,0,tp,tp,true,false,POS_FACEUP)~=0 then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+		e1:SetRange(LOCATION_MZONE)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetValue(e:GetLabel())
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
+		c:RegisterEffect(e1)
+		c:CompleteProcedure()
+	end
+end
+function cm.rfilter(c)
+	return c:IsAbleToGraveAsCost() and c:IsType(TYPE_MONSTER)
+end
+function cm.rfilter1(c,code)
+	return code==0 or c:IsCode(code)
+end
+function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.rfilter,tp,LOCATION_DECK+LOCATION_HAND+LOCATION_MZONE,0,1,nil) end
+	local code=0
+	local g1=Duel.GetMatchingGroup(cm.rfilter,tp,LOCATION_MZONE,0,e:GetHandler())
+	local g2=Duel.GetMatchingGroup(cm.rfilter,tp,LOCATION_HAND,0,nil)
+	local g3=Duel.GetMatchingGroup(cm.rfilter,tp,LOCATION_DECK,0,nil)
+	local sg=Group.CreateGroup()
+	if g1:GetCount()>0 and g1:IsExists(cm.rfilter1,1,nil,code) and ((g2:GetCount()==0 and g3:GetCount()==0) or Duel.SelectYesNo(tp,aux.Stringid(m,2))) then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+		local sg1=g1:FilterSelect(tp,cm.rfilter1,1,1,nil,code)
+		if code==0 then code=sg1:GetFirst():GetCode() end
+		Duel.HintSelection(sg1)
+		sg:Merge(sg1)
+	end
+	if g2:GetCount()>0 and g2:IsExists(cm.rfilter1,1,nil,code) and ((sg:GetCount()==0 and g3:GetCount()==0) or Duel.SelectYesNo(tp,aux.Stringid(m,3))) then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+		local sg2=g2:FilterSelect(tp,cm.rfilter1,1,1,nil,code)
+		if code==0 then code=sg1:GetFirst():GetCode() end
+		Duel.HintSelection(sg2)
+		sg:Merge(sg2)
+	end
+	if g3:GetCount()>0 and g3:IsExists(cm.rfilter1,1,nil,code) and (sg:GetCount()==0 or Duel.SelectYesNo(tp,aux.Stringid(m,4))) then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+		local sg3=g3:FilterSelect(tp,cm.rfilter1,1,1,nil,code)
+		Duel.HintSelection(sg3)
+		sg:Merge(sg3)
+	end
+	local ct=Duel.SendtoGrave(sg,REASON_COST)
+	local atk=0
+	local def=0
+	if ct>0 then
+		atk=sg:GetFirst():GetTextAttack()
+		def=sg:GetFirst():GetTextDefense()
+	end
+	e:SetLabel(ct,atk,def)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
+	local ct,atk,def=e:GetLabel()
+	if g:GetCount()==0 then return end
+	local sc=g:GetFirst()
+	while sc do
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		e1:SetValue(-atk)
+		sc:RegisterEffect(e1)
+		local e2=Effect.CreateEffect(c)
+		e2:SetType(EFFECT_TYPE_SINGLE)
+		e2:SetCode(EFFECT_UPDATE_DEFENSE)
+		e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		e2:SetValue(-def)
+		sc:RegisterEffect(e2)
+		sc=g:GetNext()
+	end
+	if c:IsRelateToEffect(e) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_EXTRA_ATTACK)
+		e1:SetValue(ct)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
+end
+function cm.damcon(e)
+	return e:GetHandler():GetBattleTarget()~=nil
+end

expansions/script/c13257201.lua

 --宇宙战争机器 巨核
 local m=13257201
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--summon with no tribute
 	local e11=Effect.CreateEffect(c)
@@ -35,7 +35,7 @@ function cm.initial_effect(c)
 	e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e5:SetType(EFFECT_TYPE_IGNITION)
 	e5:SetRange(LOCATION_MZONE)
-	e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
 	e5:SetCondition(cm.spcon)
 	e5:SetCost(cm.spcost)
 	e5:SetTarget(cm.sptg)
@@ -92,11 +92,11 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
 	if g:GetCount()>0 then
 		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
-		Duel.Hint(11,0,aux.Stringid(g:GetFirst():GetCode(),4))
+		Duel.Hint(HINT_MUSIC,0,aux.Stringid(g:GetFirst():GetCode(),4))
 	end
 end
 function cm.bgmop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(11,0,aux.Stringid(m,4))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 end
 
 

expansions/script/c13257202.lua

 --宇宙战争兵器 外壳 镭射
 local m=13257202
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
 	--equip limit

expansions/script/c13257203.lua

 --宇宙战争机器 巨核Mk-2
 local m=13257203
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:EnableCounterPermit(0x353)
 	local e11=Effect.CreateEffect(c)
@@ -143,5 +143,5 @@ function cm.eqop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function cm.bgmop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(11,0,aux.Stringid(m,4))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 end

expansions/script/c13257204.lua

 --宇宙战争兵器 巨炮 解离镭射
 local m=13257204
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
 	--equip limit

expansions/script/c13257205.lua

 --宇宙战争兵器 外壳 波纹镭射
 local m=13257205
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
 	--equip limit

expansions/script/c13257206.lua

 --宇宙战争兵器 外壳 折反镭射
 local m=13257206
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
 	--equip limit

expansions/script/c13257207.lua

 --巨舰护罩充能
 local m=13257207
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:SetUniqueOnField(1,0,m)
 	--Activate

expansions/script/c13257208.lua

 --宇宙战争机器 巨核Mk-3
 local m=13257208
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:EnableCounterPermit(0x354)
 	local e11=Effect.CreateEffect(c)
@@ -100,7 +100,7 @@ function cm.eqop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function cm.bgmop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(11,0,aux.Stringid(m,4))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 end
 
 

expansions/script/c13257209.lua

 --宇宙惑星要塞 泽洛斯
 local m=13257209
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)
@@ -29,7 +29,7 @@ function cm.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
 	e2:SetCode(EVENT_FREE_CHAIN)
 	e2:SetRange(LOCATION_FZONE)
-	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
 	e2:SetCountLimit(1,TAMA_THEME_CODE+EFFECT_COUNT_CODE_DUEL)
 	e2:SetCondition(cm.recon)
 	e2:SetOperation(cm.reop)
@@ -54,7 +54,7 @@ function cm.thfilter(c)
 end
 function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 	if not e:GetHandler():IsRelateToEffect(e) then return end
-	Duel.Hint(11,0,aux.Stringid(m,4))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 	local g=Duel.GetMatchingGroup(cm.thfilter,tp,LOCATION_DECK,0,nil)
 	if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)

expansions/script/c13257210.lua

 --宇宙军阀首领 沙罗曼蛇&泽洛斯
 local m=13257210
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--search
 	local e1=Effect.CreateEffect(c)

expansions/script/c13257211.lua

 --零之力 泽洛斯
 local m=13257211
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--summon with no tribute
 	local e11=Effect.CreateEffect(c)
@@ -171,5 +171,5 @@ function cm.acop(e,tp,eg,ep,ev,re,r,rp)
 	tc:RegisterEffect(e1,true)
 end
 function cm.bgmop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(11,0,aux.Stringid(m,4))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 end

expansions/script/c13257212.lua

 --宇宙战争机器 巨核Mk-4
 local m=13257212
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
@@ -79,5 +79,5 @@ function cm.eqop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function cm.bgmop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(11,0,aux.Stringid(m,4))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 end

expansions/script/c13257213.lua

 --战争机器集结
 local m=13257213
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+xpcall(function() require("expansions/script/tama") end,function() require("script/tama") end)
 function cm.initial_effect(c)
 	c:SetUniqueOnField(1,0,m)
 	--activate

expansions/script/c13257214.lua

 --宇宙战争机器 晶核
 local m=13257214
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
@@ -81,5 +81,5 @@ function cm.eqop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function cm.bgmop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(11,0,aux.Stringid(m,4))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 end

expansions/script/c13257215.lua

 --前线阵地 水晶惑星
 local m=13257215
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)
@@ -44,7 +44,7 @@ function cm.initial_effect(c)
 	
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(11,0,aux.Stringid(m,4))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 end
 function cm.etarget(e,c)
 	return c:IsAttribute(ATTRIBUTE_EARTH)
@@ -94,6 +94,6 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 	local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
 	if Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)~=0 then
-		Duel.Hint(11,0,aux.Stringid(m,5))
+		Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,5))
 	end
 end

expansions/script/c13257216.lua

 --宇宙战争兵器 小炮 电荷炮
 local m=13257216
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
 	--equip limit

expansions/script/c13257217.lua

 --前线阵地 火山惑星
 local m=13257217
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)
@@ -102,6 +102,6 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 	local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
 	if Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)~=0 then
-		Duel.Hint(11,0,aux.Stringid(13257201,4))
+		Duel.Hint(HINT_MUSIC,0,aux.Stringid(13257201,4))
 	end
 end

expansions/script/c13257218.lua

 --宇宙战争机器 强袭核心
 local m=13257218
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--special summon
 	local e1=Effect.CreateEffect(c)

expansions/script/c13257219.lua

 --宇宙战争兵器 护罩 破片罩
 local m=13257219
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
 	--equip limit

expansions/script/c13257220.lua

 --宇宙战争兵器 护罩 覆盖罩
 local m=13257220
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
 	--equip limit

expansions/script/c13257221.lua

 --宇宙战争兵器 主炮 电浆炮
 local m=13257221
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
 	--equip limit

expansions/script/c13257222.lua

 --宇宙军阀首领 邪神红水晶
 local m=13257222
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--summon with s/t
 	local e0=Effect.CreateEffect(c)
@@ -116,10 +116,10 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=e:GetLabelObject()
 	if tc and tc:IsLocation(LOCATION_GRAVE) then
 		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
-		Duel.Hint(11,0,aux.Stringid(m,4))
+		Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 		e:Reset()
 	end
 end
 function cm.bgmop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(11,0,aux.Stringid(m,6))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,6))
 end

expansions/script/c13257223.lua

 --宇宙战争兵器 主炮 超折反镭射
 local m=13257223
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
 	--equip limit

expansions/script/c13257224.lua

 --宇宙战争兵器 量产炮 自瞄镭射
 local m=13257224
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:EnableCounterPermit(TAMA_COSMIC_BATTLESHIP_COUNTER_CHARGE,LOCATION_SZONE)
 	c:SetCounterLimit(TAMA_COSMIC_BATTLESHIP_COUNTER_CHARGE,8)

expansions/script/c13257225.lua

 --宇宙战争机器 影舞者机甲
 local m=13257225
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--cannot special summon
 	local e1=Effect.CreateEffect(c)
@@ -142,5 +142,5 @@ function cm.tkop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.RegisterEffect(e1,tp)
 end
 function cm.bgmop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(11,0,aux.Stringid(m,4))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 end

expansions/script/c13257226.lua

 --二足炮台衍生物
 local m=13257226
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+xpcall(function() require("expansions/script/tama") end,function() require("script/tama") end)
 function cm.initial_effect(c)
 	
 end

expansions/script/c13257227.lua

 --宇宙战争机器 里香战车
 local m=13257227
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
 	--special summon condition

expansions/script/c13257228.lua

 --宇宙战争机器 泡核
 local m=13257228
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--special summon
 	local e1=Effect.CreateEffect(c)
@@ -91,7 +91,7 @@ function cm.spcop(e,tp,eg,ep,ev,re,r,rp)
 	local e3=e1:Clone()
 	e3:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
 	Duel.RegisterEffect(e3,tp)
-	Duel.Hint(11,0,aux.Stringid(m,4))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 end
 function cm.splimit(e,c)
 	return not c:IsSetCard(0x353)
@@ -134,5 +134,5 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function cm.bgmop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(11,0,aux.Stringid(m,4))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 end

expansions/script/c13257229.lua

 --宇宙军阀首领 产土神-黄辉块
 local m=13257229
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
@@ -76,7 +76,7 @@ end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
-		Duel.Hint(11,0,aux.Stringid(m,4))
+		Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 		local a=Duel.GetAttacker()
 		if a:IsAttackable() and not a:IsImmuneToEffect(e) then
 			Duel.CalculateDamage(a,c)
@@ -103,5 +103,5 @@ function cm.desop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function cm.bgmop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(11,0,aux.Stringid(m,4))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 end

expansions/script/c13257230.lua

 --宇宙战争机器 里香&邪眼西格玛
 local m=13257230
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
 	--special summon condition

expansions/script/c13257231.lua

 --宇宙战争机器 爆核
 local m=13257231
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e10=Effect.CreateEffect(c)
 	e10:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
@@ -169,5 +169,5 @@ function cm.splimit(e,c,tp,sumtp,sumpos)
 	return c:IsSummonLocation(LOCATION_EXTRA)
 end
 function cm.bgmop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(11,0,aux.Stringid(m,4))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 end

expansions/script/c13257232.lua

 --宇宙战争兵器 量产炮 烬灭炮
 local m=13257232
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+xpcall(function() require("expansions/script/tama") end,function() require("script/tama") end)
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
 	--equip limit

expansions/script/c13257233.lua

 --宇宙战争机器 信标
 local m=13257233
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--cannot special summon
 	local e11=Effect.CreateEffect(c)
@@ -138,5 +138,5 @@ function cm.eqop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function cm.bgmop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(11,0,aux.Stringid(m,4))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 end

expansions/script/c13257234.lua

 --宇宙惑星要塞-巴克特利安
 local m=13257234
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)
@@ -16,7 +16,7 @@ function cm.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
 	e2:SetCode(EVENT_FREE_CHAIN)
 	e2:SetRange(LOCATION_FZONE)
-	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
 	e2:SetCountLimit(1,TAMA_THEME_CODE+EFFECT_COUNT_CODE_DUEL)
 	e2:SetCondition(cm.recon)
 	e2:SetOperation(cm.reop)
@@ -80,7 +80,7 @@ function cm.thfilter(c)
 end
 function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 	if not e:GetHandler():IsRelateToEffect(e) then return end
-	Duel.Hint(11,0,aux.Stringid(m,3))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,3))
 	local g=Duel.GetMatchingGroup(cm.thfilter,tp,LOCATION_DECK,0,nil)
 	if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,6)) then
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)

expansions/script/c13257235.lua

 --宇宙军阀首领-巴克特利安
 local m=13257235
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--cannot special summon
 	local e11=Effect.CreateEffect(c)

expansions/script/c13257236.lua

 --宇宙惑星要塞-高弗母舰
 local m=13257236
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)
@@ -16,7 +16,7 @@ function cm.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
 	e2:SetCode(EVENT_FREE_CHAIN)
 	e2:SetRange(LOCATION_FZONE)
-	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
 	e2:SetCountLimit(1,TAMA_THEME_CODE+EFFECT_COUNT_CODE_DUEL)
 	e2:SetCondition(cm.recon)
 	e2:SetOperation(cm.reop)
@@ -80,7 +80,7 @@ function cm.thfilter(c)
 end
 function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 	if not e:GetHandler():IsRelateToEffect(e) then return end
-	Duel.Hint(11,0,aux.Stringid(m,4))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 	local g=Duel.GetMatchingGroup(cm.thfilter,tp,LOCATION_DECK,0,nil)
 	if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,6)) then
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)

expansions/script/c13257237.lua

 --宇宙军阀首领-野望之高弗
 local m=13257237
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--special summon
 	local e1=Effect.CreateEffect(c)
@@ -102,5 +102,5 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function cm.bgmop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(11,0,aux.Stringid(m,4))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 end

expansions/script/c13257238.lua

 --前线阵地-地球
 local m=13257238
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)

expansions/script/c13257239.lua

 --宇宙战争兵器 护罩-坚固装甲
 local m=13257239
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
 	--equip limit

expansions/script/c13257240.lua

 --宇宙战争兵器 巨炮 巡航导弹
 local m=13257240
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--equip limit
 	local e11=Effect.CreateEffect(c)

expansions/script/c13257241.lua

 --宇宙战争机器-盖核
 local m=13257241
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)

expansions/script/c13257242.lua

 --宇宙战争兵器 巨炮-阿巴顿波动炮
 local m=13257242
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--equip limit
 	local e11=Effect.CreateEffect(c)

expansions/script/c13257243.lua

 --宇宙战争机器-阿巴顿战舰
 local m=13257243
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e11=Effect.CreateEffect(c)
 	e11:SetDescription(aux.Stringid(m,1))
@@ -133,5 +133,5 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function cm.bgmop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(11,0,aux.Stringid(m,4))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,4))
 end

expansions/script/c13257244.lua

 --宇宙战争机器-光炮核
 local m=13257244
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)

expansions/script/c13257245.lua

 --巨舰核心闭锁
 local m=13257245
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13257246.lua

 --宇宙军阀首领-威诺姆
 local m=13257246
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--special summon
 	local e1=Effect.CreateEffect(c)

expansions/script/c13257248.lua

 --宇宙战争机器？-太空侵略者
 local m=13257248
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))

expansions/script/c13257249.lua

 --宇宙战争兵器 护罩-防护结界
 local m=13257249
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	c:EnableCounterPermit(TAMA_COSMIC_BATTLESHIP_COUNTER_CHARGE,LOCATION_SZONE)
 	c:SetCounterLimit(TAMA_COSMIC_BATTLESHIP_COUNTER_CHARGE,3)

expansions/script/c13257250.lua

 --巨舰登场
 local m=13257250
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)

expansions/script/c13257251.lua

 --伪宇宙战争机器-日珥龙
 local m=13257251
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD)

expansions/script/c13257252.lua

 --伪宇宙战争机器-胃酸龙
 local m=13257252
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD)

expansions/script/c13257253.lua

 --伪宇宙战争机器-不死之炎鸟
 local m=13257253
 local cm=_G["c"..m]
-Duel.LoadScript("tama.lua")
+if not tama then xpcall(function() dofile("expansions/script/tama.lua") end,function() dofile("script/tama.lua") end) end
 function cm.initial_effect(c)
 	--summon with no tribute
 	local e1=Effect.CreateEffect(c)