Replace c18017216.lua

expansions/script/c18017216.lua

 --黄金炼成 亚当
 local s,id,o=GetID()
 function s.initial_effect(c)
-	aux.AddSynchroProcedure(c,nil,nil,1)
+	aux.AddSynchroProcedure(c,aux.Tuner(nil),aux.TRUE,1)
 	c:EnableReviveLimit()
 	aux.EnablePendulumAttribute(c)
 	local e1=Effect.CreateEffect(c)
@@ -48,22 +48,6 @@ function s.initial_effect(c)
 	e6:SetCode(EVENT_LEAVE_FIELD)
 	e6:SetCondition(s.pencon)
 	c:RegisterEffect(e6)
-	local ee=Effect.CreateEffect(c)
-	ee:SetType(EFFECT_TYPE_SINGLE)
-	ee:SetCode(EFFECT_MATERIAL_CHECK)
-	ee:SetValue(s.valcheck)
-	c:RegisterEffect(ee)
-end
-function s.valcheck(e,c)
-	local g=c:GetMaterial()
-	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-		e1:SetCode(21142671)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
-		c:RegisterEffect(e1)
-	end
 end
 function s.costfilter(c)
 	return c:IsType(TYPE_PENDULUM) and c:IsAbleToGraveAsCost()