append0418

README.md

@@ -9,8 +9,9 @@ Featuring:
 - Additional supports of Anifriends in HASS
 - Cards from new card packs: SBRT, ALAW and HTUD
 - More cards from HTUD
+- Cards from FUIP and NCNL packs
 
-523 cards in total as of 190515
+651 cards in total as of 210418
 
 Credits to scripters:
-人形, AlphaKretin, Nanahira, Lyris, real_scl, justfish and more
+人形, AlphaKretin, Nanahira, Lyris, real_scl, justfish, RAIKAI, T and more

expansions/script/c33700650.lua

+local m=33700650
+local cm=_G["c"..m]
+
+sr_ptsh=sr_ptsh or {}
+sr_ptsh.loaded_metatable_list={}
+
+function sr_ptsh.load_metatable(code)
+	local m1=_G["c"..code]
+	if m1 then return m1 end
+	local m2=sr_ptsh.loaded_metatable_list[code]
+	if m2 then return m2 end
+	_G["c"..code]={}
+	if pcall(function() dofile("expansions/script/c"..code..".lua") end) or pcall(function() dofile("script/c"..code..".lua") end) then
+		local mt=_G["c"..code]
+		_G["c"..code]=nil
+		if mt then
+			sr_ptsh.loaded_metatable_list[code]=mt
+			return mt
+		end
+	else
+		_G["c"..code]=nil
+	end
+end
+
+function sr_ptsh.check_set(c,setcode,v,f,...) 
+	local codet=nil
+	if type(c)=="number" then
+		codet={c}
+	elseif type(c)=="table" then
+		codet=c
+	elseif type(c)=="userdata" then
+		local f=f or Card.GetCode
+		codet={f(c)}
+	end
+	local ncodet={...}
+	for i,code in pairs(codet) do
+		for i,ncode in pairs(ncodet) do
+			if code==ncode then return true end
+		end
+		local mt=sr_ptsh.load_metatable(code)
+		if mt and mt["named_with_"..setcode] and (not v or mt["named_with_"..setcode]==v) then return true end
+	end
+	return false
+end
+function sr_ptsh.check_set_ptsh(c)  --破天神狐
+	return sr_ptsh.check_set(c,"ptsh")
+end
+--
+function sr_ptsh.Cmeffect(c,code)
+	--special summon proc
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_CANNOT_MSET)
+	e1:SetRange(0x3ff)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetTargetRange(1,1)
+	e1:SetTarget(aux.TargetBoolFunction(sr_ptsh.limitfilter,code))
+	c:RegisterEffect(e1)
+	
+	local e11=Effect.CreateEffect(c)
+	e11:SetType(EFFECT_TYPE_SINGLE)
+	e11:SetCode(EFFECT_MONSTER_SSET)
+	e11:SetValue(TYPE_SPELL)
+	c:RegisterEffect(e11)
+	return e1 and e11
+end
+function sr_ptsh.limitfilter(c,code)  --破天神狐
+	return c:IsCode(code)
+end
+function sr_ptsh.efeffect(c,cod,cate,code,pro)
+	--Negate
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(cod,0))
+	e2:SetCategory(cate)
+	e2:SetType(EFFECT_TYPE_QUICK_O+EFFECT_TYPE_ACTIVATE)
+	e2:SetCode(code)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+	if pro then
+	e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE+pro)
+	end
+	e2:SetCost(sr_ptsh.cost)
+	if c.condition then
+		e2:SetCondition(c.condition)
+	end
+	e2:SetTarget(c.target)
+	e2:SetOperation(c.operation)
+	c:RegisterEffect(e2)
+	return e2
+end
+function sr_ptsh.opeffect(c,code,cate)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(code,1))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_QUICK_O+EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetRange(LOCATION_SZONE)
+	e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+	e1:SetCost(sr_ptsh.cost)
+	e1:SetCondition(sr_ptsh.opcon)
+	e1:SetTarget(sr_ptsh.optg)
+	e1:SetOperation(sr_ptsh.opop)
+	c:RegisterEffect(e1)
+	--Negate
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(code,2))
+	e2:SetCategory(cate)
+	e2:SetType(EFFECT_TYPE_QUICK_O+EFFECT_TYPE_ACTIVATE)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE+EFFECT_FLAG_CANNOT_DISABLE)
+	e2:SetCost(sr_ptsh.cost)
+	e2:SetCondition(sr_ptsh.opcon1)
+	e2:SetTarget(sr_ptsh.optg1)
+	e2:SetOperation(sr_ptsh.opop1)
+	c:RegisterEffect(e2)
+	return e1 and e2
+end
+function sr_ptsh.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return c:GetFlagEffect(m)==0 and aux.exccon(e) end
+	Duel.ChangePosition(e:GetHandler(),POS_FACEUP_DEFENSE)
+	c:CreateEffectRelation(e)
+	c:CancelToGrave(false)
+	c:RegisterFlagEffect(m,RESET_EVENT+EVENT_CHAIN_END,0,1)
+end
+function sr_ptsh.opcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetTurnPlayer()==tp 
+end
+function sr_ptsh.optg(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,false,false) end
+	local c=e:GetHandler()
+	c:CancelToGrave(true)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function sr_ptsh.opop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) then
+	Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
+function sr_ptsh.opcon1(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetTurnPlayer()==tp 
+end
+function sr_ptsh.opop1(e,tp,eg,ep,ev,re,r,rp)
+	e:GetHandler():CancelToGrave(true)
+end
+function sr_ptsh.optg1(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	local c=e:GetHandler()
+--  Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetCode(EFFECT_CHANGE_TYPE)
+	e1:SetValue(TYPE_TRAP+TYPE_CONTINUOUS)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EFFECT_REMOVE_TYPE)
+	e2:SetValue(TYPE_MONSTER+TYPE_EFFECT)
+	c:RegisterEffect(e2)
+	--remain field
+	if c.geteffect then 
+	   c.geteffect(e,tp,eg,ep,ev,re,r,rp)
+	end
+end
+if not cm then return end
+cm.named_with_ptsh=true
+--破天神狐 捌〇〇·六五七三七五七九
+function cm.initial_effect(c)
+	local e1=sr_ptsh.Cmeffect(c,m)
+	
+	local e2=sr_ptsh.efeffect(c,m,CATEGORY_SPECIAL_SUMMON+CATEGORY_HANDES,EVENT_TO_HAND)
+
+	local e3=sr_ptsh.opeffect(c,m)
+
+end
+function cm.cfilter(c,tp)
+	return c:IsControler(tp) and c:IsPreviousLocation(LOCATION_DECK)
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	if not ep or not eg then return false end
+	return  eg:IsExists(cm.cfilter,1,nil,1-tp) and r==REASON_EFFECT and Duel.GetTurnPlayer()==1-tp
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return eg and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and  e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	local cc=eg:GetCount()
+	Duel.SetOperationInfo(0,CATEGORY_HANDES,nil,0,1-tp,cc)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+end
+function cm.ffilter(c,e,tp)
+	return c:IsControler(tp) and c:IsLocation(LOCATION_HAND)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+   local c=e:GetHandler()
+   local sg=eg:Filter(cm.ffilter,nil,e,1-tp)
+	if sg:GetCount()==0 then
+	else
+	   local c=e:GetHandler()
+	   if Duel.SendtoGrave(sg,REASON_EFFECT+REASON_DISCARD)~=0 and c:IsRelateToEffect(e) then
+		   Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
+	   end
+	end
+end
+function cm.geteffect(e,tp,eg,ep,ev,re,r,rp)
+   local c=e:GetHandler()
+   --tohand
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(m,3))
+	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TEMP_REMOVE-RESET_TURN_SET)
+	e2:SetCountLimit(1)
+	e2:SetTarget(cm.thtg)
+	e2:SetOperation(cm.thop)
+	c:RegisterEffect(e2)
+end
+function cm.filter(c)
+	return sr_ptsh.check_set_ptsh(c) and c:IsAbleToHand()
+end
+function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function cm.thop(e,tp,eg,ep,ev,re,r,rp)
+	if not e:GetHandler():IsRelateToEffect(e) then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+	end
+end
\ No newline at end of file

expansions/script/c33700651.lua

+if not pcall(function() require("expansions/script/c33700650") end) then require("script/c33700650") end
+--破天神狐 壹贰〇〇·六九七七七七六五
+local m=33700651
+local cm=_G["c"..m]
+cm.named_with_ptsh=true
+function cm.initial_effect(c)
+	local e1=sr_ptsh.Cmeffect(c,m)
+	
+	local e2=sr_ptsh.efeffect(c,m,CATEGORY_SPECIAL_SUMMON+CATEGORY_RECOVER,EVENT_DAMAGE,EFFECT_FLAG_DELAY)
+	local e4=sr_ptsh.efeffect(c,m,CATEGORY_SPECIAL_SUMMON+CATEGORY_RECOVER,EVENT_BATTLE_DAMAGE,EFFECT_FLAG_DELAY)
+
+	local e3=sr_ptsh.opeffect(c,m)
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return ep==tp and Duel.GetTurnPlayer()==1-tp
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then
+		return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+	end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,ev*2)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if Duel.Recover(tp,ev*2,REASON_EFFECT)>0  and c:IsRelateToEffect(e) then
+		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
+function cm.geteffect(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	--tohand
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_FIELD)
+	e3:SetCode(EFFECT_CHANGE_DAMAGE)
+	e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e3:SetTargetRange(1,0)
+	e3:SetRange(LOCATION_SZONE)
+	e3:SetValue(cm.val)
+	e3:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TEMP_REMOVE-RESET_TURN_SET)
+	c:RegisterEffect(e3)
+end
+function cm.val(e,re,dam,r,rp,rc)
+	return dam/2
+end
\ No newline at end of file

expansions/script/c33700652.lua

+if not pcall(function() require("expansions/script/c33700650") end) then require("script/c33700650") end
+--破天神狐 壹柒〇〇·七六八九七八六九
+local m=33700652
+local cm=_G["c"..m]
+cm.named_with_ptsh=true
+function cm.initial_effect(c)
+	local e1=sr_ptsh.Cmeffect(c,m)
+	
+	local e2=sr_ptsh.efeffect(c,m,CATEGORY_SPECIAL_SUMMON+CATEGORY_NEGATE,EVENT_CHAINING,EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL+EFFECT_FLAG_DELAY)
+
+	local e3=sr_ptsh.opeffect(c,m)
+end
+function cm.tfilter(c,tp)
+	return c:IsFacedown() and c:IsControler(tp)
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	if rp==tp or e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) then return false end
+	if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end
+	local tg=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS)
+	return tg and tg:IsExists(cm.tfilter,1,nil,tp) and Duel.IsChainNegatable(ev)
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+	if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
+		Duel.SetOperationInfo(0,CATEGORY_TOHAND,eg,1,0,0)
+	end
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
+		Card.CancelToGrave(re:GetHandler())
+		Duel.SendtoHand(re:GetHandler(),nil,REASON_EFFECT)
+		if c:IsRelateToEffect(e) then
+			Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
+		end
+	end
+end
+function cm.geteffect(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	--damage
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e2:SetCode(EVENT_CHAINING)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e2:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TEMP_REMOVE-RESET_TURN_SET)
+	e2:SetOperation(cm.regop)
+	c:RegisterEffect(e2)
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e3:SetCode(EVENT_CHAIN_SOLVED)
+	e3:SetRange(LOCATION_SZONE)
+	e3:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TEMP_REMOVE-RESET_TURN_SET)
+	e3:SetCondition(cm.damcon)
+	e3:SetOperation(cm.damop)
+	c:RegisterEffect(e3)
+	--
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DESTROY)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_BE_BATTLE_TARGET)
+	e1:SetRange(LOCATION_SZONE)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TEMP_REMOVE-RESET_TURN_SET)
+	e1:SetCondition(cm.damcon1)
+	e1:SetOperation(cm.damop)
+	c:RegisterEffect(e1)
+end
+function cm.regop(e,tp,eg,ep,ev,re,r,rp)
+	if rp==tp or not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return end
+	e:GetHandler():RegisterFlagEffect(m+100,RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET+RESET_CHAIN,0,1)
+end
+function cm.damcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return ep~=tp and c:GetFlagEffect(m+100)~=0 and re:IsHasType(EFFECT_TYPE_ACTIVATE)
+end
+function cm.damop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_CARD,0,m)
+	local lp=Duel.GetLP(1-tp)
+	Duel.SetLP(1-tp,math.max(0,lp-5000))
+end
+function cm.damcon1(e,tp,eg,ep,ev,re,r,rp)
+	local tc=eg:GetFirst()
+	return tc:IsControler(tp) and tc:IsFaceup()
+end
\ No newline at end of file

expansions/script/c33700653.lua

+if not pcall(function() require("expansions/script/c33700650") end) then require("script/c33700650") end
+--破天神狐 壹玖〇〇·七一七三七八六五
+local m=33700653
+local cm=_G["c"..m]
+cm.named_with_ptsh=true
+function cm.initial_effect(c)
+	local e1=sr_ptsh.Cmeffect(c,m)
+	
+	local e2=sr_ptsh.efeffect(c,m,CATEGORY_POSITION,EVENT_SPSUMMON_SUCCESS)
+
+	local e3=sr_ptsh.opeffect(c,m)
+end
+function cm.filter(c,tp)
+	return c:IsFaceup() and c:GetSummonPlayer()~=tp and c:IsCanTurnSet()
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return eg:IsExists(cm.filter,1,nil,tp) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)  end
+	local g=eg:Filter(cm.filter,nil,tp)
+	Duel.SetTargetCard(g)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
+	if Duel.ChangePosition(g,POS_FACEDOWN_DEFENSE)~=0 then
+		local og=Duel.GetOperatedGroup()
+		local tc=og:GetFirst()
+		while tc do
+			local e1=Effect.CreateEffect(e:GetHandler())
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetCode(EFFECT_CANNOT_CHANGE_POSITION)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+			tc:RegisterEffect(e1)
+			tc=og:GetNext()
+		end
+		if c:IsRelateToEffect(e) then
+			Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
+		end
+	end
+end
+function cm.geteffect(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	--tohand
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(m,3))
+	e2:SetCategory(CATEGORY_TOGRAVE)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TEMP_REMOVE-RESET_TURN_SET)
+	e2:SetCountLimit(1)
+	e2:SetTarget(cm.thtg)
+	e2:SetOperation(cm.thop)
+	c:RegisterEffect(e2)
+end
+function cm.thfilter(c)
+	return sr_ptsh.check_set_ptsh(c) and c:IsFaceup()
+end
+function cm.tgfilter(c)
+	return c:IsFacedown()
+end
+function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	local c=e:GetHandler()
+	local tt=Duel.GetMatchingGroup(cm.thfilter,tp,LOCATION_ONFIELD,0,nil)
+	if chkc then return chkc:IsLocation(LOCATION_ONFIELD) end
+	if chk==0 then return #tt>0 and Duel.IsExistingTarget(cm.tgfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+	local g=Duel.SelectTarget(tp,cm.tgfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,#tt,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,#tt,0,0) 
+end
+function cm.thop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
+	Duel.SendtoGrave(g,REASON_RULE)
+end
\ No newline at end of file