eme

expansions/script/c81001014.lua

---八宫一月·念
-local m=81001014
-local cm=_G["c"..m]
-xpcall(function()require("expansions/script/c81000000") end,function()require("script/c81000000") end)
-function cm.initial_effect(c)
-	--synchro summon
-	aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
-	c:EnableReviveLimit()
-	--special summon
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_DELAY)
-	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e1:SetCondition(cm.spcon)
-	e1:SetCost(cm.spcost)
-	e1:SetTarget(cm.sptg)
-	e1:SetOperation(cm.spop)
-	c:RegisterEffect(e1)
-	--
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e2:SetCode(EVENT_BE_MATERIAL)
-	e2:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
-	e2:SetCondition(cm.immcon)
-	e2:SetOperation(cm.immop)
-	c:RegisterEffect(e2)
-	Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
-	Duel.AddCustomActivityCounter(m,ACTIVITY_CHAIN,cm.chainfilter)
-end
-function cm.counterfilter(c)
-	return c:IsRace(RACE_FAIRY)
-end
-function cm.chainfilter(re,tp,cid)
-	local race=Duel.GetChainInfo(cid,CHAININFO_TRIGGERING_RACE)
-	return not (re:IsActiveType(TYPE_MONSTER) and race&RACE_FAIRY==0)
-end
-function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
-	return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
-end
-function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 and Duel.GetCustomActivityCount(m,tp,ACTIVITY_CHAIN)==0 end
-	local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
-	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
-	e1:SetReset(RESET_PHASE+PHASE_END)
-	e1:SetTargetRange(1,0)
-	e1:SetTarget(cm.splimit)
-	Duel.RegisterEffect(e1,tp)
-	local e2=Effect.CreateEffect(e:GetHandler())
-	e2:SetType(EFFECT_TYPE_FIELD)
-	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
-	e2:SetCode(EFFECT_CANNOT_ACTIVATE)
-	e2:SetTargetRange(1,0)
-	e2:SetValue(cm.aclimit)
-	e2:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e2,tp)
-end
-function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
-	return not c:IsRace(RACE_FAIRY)
-end
-function cm.aclimit(e,re,tp)
-	return re:IsActiveType(TYPE_MONSTER) and not re:GetHandler():IsRace(RACE_FAIRY)
-end
-function cm.spfilter(c,e,tp)
-	return c:IsSetCard(0x81e) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
-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.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
-end
-function cm.spop(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	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)
-	end
-end
-function cm.immcon(e,tp,eg,ep,ev,re,r,rp)
-	return r==REASON_SYNCHRO and e:GetHandler():GetReasonCard():IsRace(RACE_FAIRY)
-end
-function cm.immop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local rc=c:GetReasonCard()
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(m,2))
-	e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
-	e1:SetType(EFFECT_TYPE_SINGLE)
-	e1:SetCode(EFFECT_IMMUNE_EFFECT)
-	e1:SetValue(cm.efilter)
-	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-	rc:RegisterEffect(e1,true)
-end
-function cm.efilter(e,te)
-	return te:IsActiveType(TYPE_SPELL+TYPE_TRAP)
-end

expansions/script/c81022007.lua

---Starry ~the way to the SIRIUS~
-local m=81022007
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	--Activate
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetCountLimit(1,m)
-	e1:SetTarget(cm.target)
-	e1:SetOperation(cm.activate)
-	c:RegisterEffect(e1)
-	--atk
-	local e3=Effect.CreateEffect(c)
-	e3:SetCategory(CATEGORY_ATKCHANGE)
-	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e3:SetCode(EVENT_ATTACK_ANNOUNCE)
-	e3:SetRange(LOCATION_GRAVE)
-	e3:SetCountLimit(1,m+900)
-	e3:SetCondition(cm.atkcon)
-	e3:SetCost(aux.bfgcost)
-	e3:SetOperation(cm.atkop)
-	c:RegisterEffect(e3)
-end
-function cm.filter(c,e,tp,m1,ft)
-	if not c:IsType(TYPE_PENDULUM) or bit.band(c:GetType(),0x81)~=0x81
-		or not c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,false,true) then return false end
-	local mg=m1:Filter(Card.IsCanBeRitualMaterial,c,c)
-	if c.mat_filter then
-		mg=mg:Filter(c.mat_filter,nil)
-	end
-	if ft>0 then
-		return mg:CheckWithSumEqual(Card.GetRitualLevel,c:GetLevel(),1,99,c)
-	else
-		return ft>-1 and mg:IsExists(cm.mfilterf,1,nil,tp,mg,c)
-	end
-end
-function cm.mfilterf(c,tp,mg,rc)
-	if c:IsControler(tp) and c:IsLocation(LOCATION_MZONE) and c:GetSequence()<5 then
-		Duel.SetSelectedCard(c)
-		return mg:CheckWithSumEqual(Card.GetRitualLevel,rc:GetLevel(),1,99,rc)
-	else return false end
-end
-function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then
-		local mg1=Duel.GetRitualMaterial(tp)
-		local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
-		return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_HAND,0,1,nil,e,tp,mg1,ft)
-	end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
-end
-function cm.mfilter(c)
-	return c:IsLocation(LOCATION_MZONE) and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:IsRace(RACE_PYRO)
-end
-function cm.activate(e,tp,eg,ep,ev,re,r,rp)
-	local mg1=Duel.GetRitualMaterial(tp)
-	local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local tg=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_HAND,0,1,1,nil,e,tp,mg1,ft)
-	local tc=tg:GetFirst()
-	if tc then
-		local mg=mg1:Filter(Card.IsCanBeRitualMaterial,tc,tc)
-			if tc.mat_filter then
-				mg=mg:Filter(tc.mat_filter,nil)
-			end
-			local mat=nil
-			if ft>0 then
-				Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
-				mat=mg:SelectWithSumEqual(tp,Card.GetRitualLevel,tc:GetLevel(),1,99,tc)
-			else
-				Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
-				mat=mg:FilterSelect(tp,cm.mfilterf,1,1,nil,tp,mg,tc)
-				Duel.SetSelectedCard(mat)
-				Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
-				local mat2=mg:SelectWithSumEqual(tp,Card.GetRitualLevel,tc:GetLevel(),1,99,tc)
-				mat:Merge(mat2)
-			end
-			tc:SetMaterial(mat)
-			local lab=0
-			if mat:FilterCount(cm.mfilter,nil)==mat:GetCount() then lab=1 end
-			Duel.ReleaseRitualMaterial(mat)
-		Duel.BreakEffect()
-		if Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP)~=0 then
-			tc:CompleteProcedure()
-			if lab==1 and Duel.IsPlayerCanDraw(tp,2) and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
-				Duel.Draw(tp,2,REASON_EFFECT)
-			end
-		end
-	end
-end
-function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
-	local ac=Duel.GetAttacker()
-	local tc=Duel.GetAttackTarget()
-	if not ac:IsControler(tp) then ac,tc=tc,ac end
-	return ac and ac:IsControler(tp) and ac:IsFaceup() and ac:IsRace(RACE_PYRO) and tc and tc:IsControler(1-tp) and tc:IsFaceup()
-end
-function cm.atkfilter(c)
-	return c:IsFaceup() and c:IsRelateToBattle()
-end
-function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
-	local ac=Duel.GetAttacker()
-	local tc=Duel.GetAttackTarget()
-	local g=Group.FromCards(ac,tc):Filter(cm.atkfilter,nil)
-	local gc=g:GetFirst()
-	while gc do
-		local e1=Effect.CreateEffect(e:GetHandler())
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_SET_ATTACK_FINAL)
-		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e1:SetValue(1550)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-		gc:RegisterEffect(e1)
-		local e2=Effect.CreateEffect(e:GetHandler())
-		e2:SetType(EFFECT_TYPE_SINGLE)
-		e2:SetCode(EFFECT_SET_DEFENSE_FINAL)
-		e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e2:SetValue(1050)
-		e2:SetReset(RESET_EVENT+RESETS_STANDARD)
-		gc:RegisterEffect(e2)
-		gc=g:GetNext()
-	end
-end

expansions/script/c81057000.lua

@@ -7,14 +7,6 @@ function cm.initial_effect(c)
 	--link summon
 	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsSummonType,SUMMON_TYPE_ADVANCE),1,1)
 	Tenka.PyroLink(c)
-	--spsummon bgm
-	local e0=Effect.CreateEffect(c)
-	e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
-	e0:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e0:SetCondition(cm.sumcon)
-	e0:SetOperation(cm.sumsuc)
-	c:RegisterEffect(e0)
 	--search
 	local e2=Effect.CreateEffect(c)
 	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
@@ -27,12 +19,6 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.thop)
 	c:RegisterEffect(e2)
 end
-function cm.sumcon(e,tp,eg,ep,ev,re,r,rp)
-	return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
-end
-function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,0))
-end
 function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsReason(REASON_SUMMON)
 end

expansions/script/c960001.lua

@@ -28,18 +28,6 @@ function c960001.initial_effect(c)
 	e2:SetOperation(c960001.desop)
 	c:RegisterEffect(e2)
 	e1:SetLabelObject(e2)
-	--spsummon bgm
-	local e8=Effect.CreateEffect(c)
-	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e8:SetOperation(c960001.sumsuc)
-	c:RegisterEffect(e8)
-	local e9=e8:Clone()
-	e9:SetCode(EVENT_SUMMON_SUCCESS)
-	c:RegisterEffect(e9)
-end
-function c960001.sumsuc(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_MUSIC,0,aux.Stringid(960001,0)) 
 end
 function c960001.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) end

expansions/script/c960002.lua

@@ -7,7 +7,6 @@ function c960002.initial_effect(c)
 	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetOperation(c960002.activate)
 	c:RegisterEffect(e1)
 	 --damage reduce
 	local e1=Effect.CreateEffect(c)
@@ -77,9 +76,6 @@ function c960002.initial_effect(c)
 	e5:SetValue(c960002.effectfilter)
 	c:RegisterEffect(e5)
 end
-function c960002.activate(e,tp,eg,ep,ev,re,r,rp)
-   Duel.Hint(HINT_MUSIC,0,aux.Stringid(960002,0)) 
-end
 function c960002.damval(e,re,val,r,rp,rc)
 	if bit.band(r,REASON_EFFECT)~=0 then
 		e:GetHandler():AddCounter(0x50,1)

expansions/script/c960003.lua

@@ -33,18 +33,6 @@ function c960003.initial_effect(c)
 	e4:SetTarget(c960003.sptg)
 	e4:SetOperation(c960003.spop)
 	c:RegisterEffect(e4)
-	--spsummon bgm
-	local e8=Effect.CreateEffect(c)
-	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e8:SetOperation(c960003.sumsuc)
-	c:RegisterEffect(e8)
-	local e9=e8:Clone()
-	e9:SetCode(EVENT_SUMMON_SUCCESS)
-	c:RegisterEffect(e9)
-end
-function c960003.sumsuc(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_MUSIC,0,aux.Stringid(960003,0)) 
 end
 function c960003.spcon(e,c)
 	if c==nil then return true end
@@ -65,7 +53,6 @@ function c960003.spop(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
 	if Duel.IsPlayerCanSpecialSummonMonster(tp,960000,0xbb1,0x4011,100,100,1,RACE_SPELLCASTER,ATTRIBUTE_DARK) then
 		local token=Duel.CreateToken(tp,960000)
-		Duel.Hint(HINT_MUSIC,0,aux.Stringid(960003,1))
 		Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
 	end
 end
\ No newline at end of file

expansions/script/c960004.lua

@@ -35,18 +35,6 @@ function c960004.initial_effect(c)
 	e4:SetCost(c960004.atcost)
 	e4:SetOperation(c960004.atop)
 	c:RegisterEffect(e4)
-	--spsummon bgm
-	local e8=Effect.CreateEffect(c)
-	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e8:SetOperation(c960004.sumsuc)
-	c:RegisterEffect(e8)
-	local e9=e8:Clone()
-	e9:SetCode(EVENT_SUMMON_SUCCESS)
-	c:RegisterEffect(e9)
-end
-function c960004.sumsuc(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_MUSIC,0,aux.Stringid(960004,0)) 
 end
 function c960004.filter(c)
 	return c:IsFaceup() and c:IsSetCard(0xbb1)

expansions/script/c960005.lua

@@ -5,7 +5,6 @@ function c960005.initial_effect(c)
 	e1:SetCategory(CATEGORY_SEARCH)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetOperation(c960005.activate)
 	c:RegisterEffect(e1)
 	--disable
 	local e2=Effect.CreateEffect(c)

expansions/script/c960006.lua

@@ -56,7 +56,6 @@ function c960006.activate(e,tp,eg,ep,ev,re,r,rp)
 			sc:RegisterEffect(e3)
 			sc=g:GetNext()
 		end
-		Duel.Hint(HINT_MUSIC,0,aux.Stringid(960006,0)) 
 	end
 end
 function c960006.tdtg(e,tp,eg,ep,ev,re,r,rp,chk)

expansions/script/c960008.lua

@@ -52,7 +52,6 @@ function c960008.activate(e,tp,eg,ep,ev,re,r,rp)
 	e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
 	e2:SetValue(1)
 	tc:RegisterEffect(e2)
-	Duel.Hint(HINT_MUSIC,0,aux.Stringid(960008,0)) 
 end
 function c960008.damval(e,re,val,r,rp,rc)
 	if bit.band(r,REASON_BATTLE)~=0 then return 0 end

expansions/script/c960009.lua

@@ -35,8 +35,6 @@ function c960009.activate(e,tp,eg,ep,ev,re,r,rp)
 	e1:SetValue(1)
 	e1:SetReset(RESET_PHASE+PHASE_END)
 	Duel.RegisterEffect(e1,tp)
-
-
 	local e1=Effect.CreateEffect(e:GetHandler())
 	e1:SetType(EFFECT_TYPE_FIELD)
 	e1:SetCode(EFFECT_IMMUNE_EFFECT)
@@ -45,9 +43,6 @@ function c960009.activate(e,tp,eg,ep,ev,re,r,rp)
 	e1:SetValue(c960009.efilter)
 	e1:SetReset(RESET_PHASE+PHASE_END)
 	Duel.RegisterEffect(e1,tp)
-
-
-	Duel.Hint(HINT_MUSIC,0,aux.Stringid(960009,0)) 
 end
 function c960009.thfilter(c)
 	return c:IsSetCard(0xbb1) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()

expansions/script/c960012.lua

@@ -26,17 +26,8 @@ function c960012.initial_effect(c)
 	e1:SetCondition(c960012.condition)
 	e1:SetOperation(c960012.operation)
 	c:RegisterEffect(e1)
-	--spsummon bgm
-	local e8=Effect.CreateEffect(c)
-	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e8:SetOperation(c960012.sumsuc)
-	c:RegisterEffect(e8)
 end
 c960012.toss_dice=true
-function c960012.sumsuc(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_MUSIC,0,aux.Stringid(960012,0)) 
-end
 function c960012.matfilter(c)
 	return c:IsLinkType(TYPE_EFFECT) and c:IsLinkSetCard(0xbb1)
 end
@@ -75,5 +66,4 @@ function c960012.operation(e,tp,eg,ep,ev,re,r,rp)
 	e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
 	e1:SetValue(d*500)
 	tc:RegisterEffect(e1)
-	Duel.Hint(HINT_MUSIC,0,aux.Stringid(960012,1)) 
 end

expansions/script/c960013.lua

@@ -29,15 +29,6 @@ function c960013.initial_effect(c)
 	e3:SetTarget(c960013.destg)
 	e3:SetOperation(c960013.desop)
 	c:RegisterEffect(e3)
-	--spsummon bgm
-	local e8=Effect.CreateEffect(c)
-	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e8:SetOperation(c960013.sumsuc)
-	c:RegisterEffect(e8)
-end
-function c960013.sumsuc(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_MUSIC,0,aux.Stringid(960013,0)) 
 end
 function c960013.matfilter(c)
 	return c:IsLinkType(TYPE_EFFECT) and c:IsLinkSetCard(0xbb1)
@@ -65,7 +56,6 @@ function c960013.desop(e,tp,eg,ep,ev,re,r,rp)
 	local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
 	local g=tg:Filter(Card.IsRelateToEffect,nil,e)
 	if g:GetCount()>0 then
-		Duel.Hint(HINT_MUSIC,0,aux.Stringid(960013,1))
 		Duel.Destroy(g,REASON_EFFECT)
 	end
 end

expansions/script/c960016.lua

@@ -40,15 +40,6 @@ function c960016.initial_effect(c)
 	e1:SetTarget(c960016.target)
 	e1:SetOperation(c960016.operation)
 	c:RegisterEffect(e1)
-	--spsummon bgm
-	local e8=Effect.CreateEffect(c)
-	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e8:SetOperation(c960016.sumsuc)
-	c:RegisterEffect(e8)
-end
-function c960016.sumsuc(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_MUSIC,0,aux.Stringid(960016,0)) 
 end
 function c960016.immval(e,te)
 	return te:GetOwner()~=e:GetHandler() and te:IsActiveType(TYPE_MONSTER) and te:GetOwnerPlayer()~=e:GetHandlerPlayer()