cctv

expansions/script/c16100002.lua

@@ -32,7 +32,6 @@ function c16100002.initial_effect(c)
 	e1:SetCountLimit(1)
 	e1:SetCondition(c16100002.chcon)
 	e1:SetCost(c16100002.cost)
-	e1:SetTarget(c16100002.chtg)
 	e1:SetOperation(c16100002.chop)
 	c:RegisterEffect(e1)
 	--im
@@ -62,19 +61,15 @@ function c16100002.tg(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 --
 function c16100002.op(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c16100002.tgf,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil)
-	if g:GetCount()>0 then
+	if Duel.IsExistingMatchingCard(c16100002.tgf,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+		local g=Duel.SelectMatchingCard(tp,c16100002.tgf,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil)
 		Duel.SendtoHand(g,nil,REASON_EFFECT)
 	end
 end
 --
 function c16100002.chcon(e,tp,eg,ep,ev,re,r,rp)
-	return rp==1-tp and not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED)
-end
---
-function c16100002.chtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
+	return ep==1-tp and Duel.IsExistingMatchingCard(aux.TRUE,tp,LOCATION_DECK+LOCATION_HAND,0,1,nil)
 end
 --
 function c16100002.cost(e,tp,eg,ep,ev,re,r,rp,chk)

expansions/script/c16100006.lua

@@ -13,12 +13,12 @@ function c16100006.initial_effect(c)
 	c:RegisterEffect(e1)
 	--He is angry
 	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(16100002,1))
+	e2:SetDescription(aux.Stringid(16100006,1))
 	e2:SetCategory(CATEGORY_SEARCH)
 	e2:SetType(EFFECT_TYPE_IGNITION)
 	e2:SetCode(EVENT_FREE_CHAIN)
 	e2:SetRange(LOCATION_GRAVE)
-	e1:SetCountLimit(1,16100006+10000)
+	e1:SetCountLimit(1,16100006+100)
 	e2:SetCost(c16100006.cost)
 	e2:SetTarget(c16100006.tg)
 	e2:SetOperation(c16100006.op)
@@ -44,12 +44,20 @@ function c16100006.activate(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON+EFFECT_CANNOT_SUMMON)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
 	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
 	e1:SetTargetRange(1,0)
 	e1:SetTarget(c16100006.splimit)
 	e1:SetReset(RESET_PHASE+PHASE_END)
 	Duel.RegisterEffect(e1,tp)
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_CANNOT_SUMMON)
+	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e2:SetTargetRange(1,0)
+	e2:SetTarget(c16100006.splimit)
+	e2:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e2,tp)
 end
 function c16100006.splimit(e,c,sump,sumtype,sumpos,targetp,se)
 	return not c:IsSetCard(0xcc0)

expansions/script/c16100009.lua

@@ -18,7 +18,7 @@ function c16100009.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_TO_GRAVE)
 	e2:SetProperty(EFFECT_FLAG_DELAY)
-	e2:SetCountLimit(1,16100009+10000+EFFECT_COUNT_CODE_DUEL)
+	e2:SetCountLimit(1,EFFECT_COUNT_CODE_DUEL)
 	e2:SetOperation(c16100009.operation)
 	c:RegisterEffect(e2)
 end
@@ -36,18 +36,16 @@ function c16100009.filter1(c)
 end
 --
 function c16100009.op(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.GetFieldGroup(e:GetHandlerPlayer(),LOCATION_MZONE+LOCATION_HAND,0)
-	if not g:IsExists(c16100009.filter,1,nil) then
+	if not Duel.IsExistingMatchingCard(c16100013.filter,tp,LOCATION_MZONE+LOCATION_HAND,0,1,nil) then
 		local e1=Effect.CreateEffect(e:GetHandler())
 		e1:SetType(EFFECT_TYPE_FIELD)
 		e1:SetCode(EFFECT_CANNOT_ACTIVATE)
 		e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-		e1:SetReset(RESET_PHASE+PHASE_END,2)
+		e1:SetReset(RESET_PHASE+PHASE_END)
 		e1:SetTargetRange(1,0)
 		e1:SetValue(c16100009.disop)
 		Duel.RegisterEffect(e1,tp)
-	end
-	if g:IsExists(c16100009.filter,1,nil) then
+	else
 		Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)
 	end
 end

expansions/script/c16100010.lua

@@ -60,16 +60,18 @@ end
 --
 function c16100010.activate(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
-		Duel.Remove(eg,POS_FACEUP,REASON_EFFECT)
+		Duel.Remove(re:GetHandler(),POS_FACEUP,REASON_EFFECT)
 	end
-	if Duel.SelectYesNo(tp,aux.Stringid(16100010,1)) then
-		local g=Duel.SelectMatchingCard(tp,c16100010.filter0,tp,LOCATION_DECK,0,1,1,nil)
-		if g:GetCount()>0 then
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
-			sg=g:Select(tp,1,1,nil)
-			Duel.SendtoHand(sg,1-tp,REASON_EFFECT)
+	if Duel.IsExistingMatchingCard(c16100010.filter0,tp,LOCATION_DECK,0,1,nil) then 
+		if Duel.SelectYesNo(tp,aux.Stringid(16100010,1)) then
+			local g=Duel.SelectMatchingCard(tp,c16100010.filter0,tp,LOCATION_DECK,0,1,1,nil)
+			if g:GetCount()>0 then
+				Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
+				sg=g:Select(tp,1,1,nil)
+				Duel.SendtoHand(sg,1-tp,REASON_EFFECT)
 			end
 	end
+	end
 end
 --
 function c16100010.ctop(e,tp,eg,ep,ev,re,r,rp)

expansions/script/c16100013.lua

@@ -17,7 +17,7 @@ function c16100013.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_TO_GRAVE)
 	e2:SetProperty(EFFECT_FLAG_DELAY)
-	e2:SetCountLimit(1,16100013+10000+EFFECT_COUNT_CODE_DUEL)
+	e2:SetCountLimit(1,EFFECT_COUNT_CODE_DUEL)
 	e2:SetOperation(c16100013.operation)
 	c:RegisterEffect(e2)
 end
@@ -35,8 +35,7 @@ function c16100013.filter1(c)
 end
 --
 function c16100013.op(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.GetFieldGroup(e:GetHandlerPlayer(),LOCATION_MZONE+LOCATION_HAND,0)
-	if not g:IsExists(c16100013.filter,1,nil) then
+	if not Duel.IsExistingMatchingCard(c16100013.filter,tp,LOCATION_MZONE+LOCATION_HAND,0,1,nil) then
 		local e1=Effect.CreateEffect(e:GetHandler())
 		e1:SetType(EFFECT_TYPE_FIELD)
 		e1:SetCode(EFFECT_CANNOT_REMOVE)
@@ -44,10 +43,9 @@ function c16100013.op(e,tp,eg,ep,ev,re,r,rp)
 		e1:SetReset(RESET_PHASE+PHASE_END,2)
 		e1:SetTargetRange(1,0)
 		Duel.RegisterEffect(e1,tp)
-	end
-	if g:IsExists(c16100013.filter,1,nil) then
+   else
 		Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)
-	end
+   end
 end
 --
 function c16100013.discon(e,tp,eg,ep,ev,re,r,rp)

expansions/script/c16100014.lua

@@ -95,7 +95,6 @@ function c16100014.op1(e,tp,eg,ep,ev,re,r,rp)
 	local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
 	if not tg or tg:FilterCount(Card.IsRelateToEffect,nil,e)~=3 then return end
 	Duel.SendtoDeck(tg,nil,0,REASON_EFFECT)
-	Duel.ShuffleDeck(tp)
 	local g=Duel.GetOperatedGroup()
 	local ct0=g:FilterCount(Card.IsLocation,nil,LOCATION_DECK+LOCATION_EXTRA)
 	if ct0==3 then
@@ -121,7 +120,7 @@ function c16100014.op1(e,tp,eg,ep,ev,re,r,rp)
 				if Duel.Draw(tp,1,REASON_EFFECT)==0 then return end
 					local dg=Duel.GetOperatedGroup()
 					local dc=dg:GetFirst()
-				if Duel.GetMZoneCount(tp)>0 and dc:IsCanBeSpecialSummoned(e,0,tp,false,false)
+				if Duel.GetMZoneCount(tp)>0 and dc:IsCanBeSpecialSummoned(e,0,tp,false,false) and dc:IsSetCard(0xcc0)
 					and Duel.SelectYesNo(tp,aux.Stringid(16100014,4)) then
 					local lp=Duel.GetLP(tp)   
 							Duel.SetLP(tp,lp-2000) 
@@ -140,7 +139,7 @@ function c16100014.op1(e,tp,eg,ep,ev,re,r,rp)
 				if Duel.Draw(tp,1,REASON_EFFECT)==0 then return end
 					local dg=Duel.GetOperatedGroup()
 					local dc=dg:GetFirst()
-				if Duel.GetMZoneCount(tp)>0 and dc:IsCanBeSpecialSummoned(e,0,tp,false,false)
+				if Duel.GetMZoneCount(tp)>0 and dc:IsCanBeSpecialSummoned(e,0,tp,false,false) and dc:IsSetCard(0xcc0)
 					and Duel.SelectYesNo(tp,aux.Stringid(16100014,4)) then
 					local lp=Duel.GetLP(tp)   
 							Duel.SetLP(tp,lp-2000) 

expansions/script/c17060804.lua

@@ -83,7 +83,7 @@ function cm.cfilter(c)
 	return c:IsFacedown() or not c:IsSetCard(0x7f0)
 end
 function cm.descon(e)
-	return not Duel.IsExistingMatchingCard(cm.cfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
+	return not Duel.IsExistingMatchingCard(cm.cfilter,e:GetHandlerPlayer(),LOCATION_ONFIELD,0,1,nil)
 end
 function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end

expansions/script/c17061153.lua

@@ -118,6 +118,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp,c)
 end
 function cm.ctop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SOUND,0,aux.Stringid(17061153,4))
+	Duel.Hint(HINT_CARD,0,17061153)
 	Duel.SetLP(tp,1)
 	e:GetHandler():AddCounter(0x7f3,3)
 end

expansions/script/c17061156.lua

@@ -12,7 +12,7 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e3)
 	--recover
 	local e5=Effect.CreateEffect(c)
-	e5:SetDescription(aux.Stringid(m,1))
+	e5:SetDescription(aux.Stringid(17061156,1))
 	e5:SetCategory(CATEGORY_DRAW+CATEGORY_RECOVER)
 	e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
 	e5:SetCode(EVENT_PHASE+PHASE_END)
@@ -38,6 +38,7 @@ function cm.rectg(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,5000)
 end
 function cm.recop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_CARD,0,17061156)
 	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
 	local ct=5-Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)
 	if ct>0 then

expansions/script/c33403503.lua

@@ -36,10 +36,10 @@ function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
 	return not se:GetHandler():IsSetCard(0x5349)and  not c:IsCode(33403500)
 end
 function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	local b1=Duel.GetFieldGroupCount(tp,0,LOCATION_REMOVED+LOCATION_GRAVE+LOCATION_ONFIELD)
+	local b1=Duel.IsExistingMatchingCard(aux.disfilter1,tp,0,LOCATION_REMOVED+LOCATION_GRAVE+LOCATION_ONFIELD,1,nil)
 	local b2=Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_MZONE,0,1,nil,33403500)
 	if chkc then return true end
-	if chk==0 then return b1>0 or b2>0 end
+	if chk==0 then return b1 or b2 end
 	if e:GetLabel()==1 then 
 	local c=e:GetHandler()
 	local e2=Effect.CreateEffect(c)
@@ -83,7 +83,7 @@ function cm.regop2(e,tp,eg,ep,ev,re,r,rp)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	local b1=Duel.GetFieldGroupCount(tp,0,LOCATION_REMOVED+LOCATION_GRAVE+LOCATION_ONFIELD)
+	local b1=Duel.IsExistingMatchingCard(aux.disfilter1,tp,0,LOCATION_REMOVED+LOCATION_GRAVE+LOCATION_ONFIELD,1,nil)
 	local b2=Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_MZONE,0,1,nil,33403500)
 	if not (b1 or b2) then return end 
 	local op
@@ -95,7 +95,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
    if op==0 then 
 	local ct=Duel.GetFlagEffect(tp,33403501)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPPO)
-	local tg=Duel.SelectMatchingCard(tp,nil,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED,1,ct,nil)  
+	local tg=Duel.SelectMatchingCard(tp,aux.disfilter1,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED,1,ct,nil)  
 	local tc=tg:GetFirst()  
 		while tc do
 		Duel.NegateRelatedChain(tc,RESET_TURN_SET)

expansions/script/c53703004.lua

@@ -172,7 +172,7 @@ function c53703004.desop(e,tp,eg,ep,ev,re,r,rp)
 		local pg=Duel.SelectMatchingCard(tp,c53703004.pen2filter,tp,LOCATION_DECK,0,1,1,nil)
 		local tc=pg:GetFirst()
 		if tc then
-			Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+			Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
 		end
 	end
 end

expansions/script/c53703009.lua

@@ -95,14 +95,14 @@ function c53703009.spop(e,tp,eg,ep,ev,re,r,rp)
 		local g=Duel.SelectMatchingCard(tp,c53703009.penfilter,tp,LOCATION_HAND,0,1,1,nil)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+			Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
 		end
 	end
 	if Duel.GetTurnPlayer()==tp then
 		local g=Duel.SelectMatchingCard(tp,c53703009.penfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil)
 		local tc=g:GetFirst()
 		if tc then
-			Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+			Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
 		end
 	end
 end

expansions/script/c53703010.lua

@@ -85,7 +85,7 @@ function c53703010.penop2(e,tp,eg,ep,ev,re,r,rp)
 	local ct2=Duel.Remove(gg,POS_FACEUP,REASON_EFFECT)
 	if e:GetHandler():IsRelateToEffect(e) and ct1+ct2==3
 		and (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1)) then
-		Duel.MoveToField(e:GetHandler(),tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+		Duel.MoveToField(e:GetHandler(),tp,tp,LOCATION_PZONE,POS_FACEUP,true)
 	end
 end
 function c53703010.target(e,tp,eg,ep,ev,re,r,rp,chk)

expansions/script/c53703012.lua

@@ -90,7 +90,7 @@ end
 function c53703012.damop(e,tp,eg,ep,ev,re,r,rp)
 	if e:GetHandler():IsRelateToEffect(e)
 		and (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1)) then
-		Duel.MoveToField(e:GetHandler(),tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+		Duel.MoveToField(e:GetHandler(),tp,tp,LOCATION_PZONE,POS_FACEUP,true)
 	end
 end
 function c53703012.spcost(e,c,tp)

expansions/script/c53703013.lua

@@ -75,7 +75,7 @@ function c53703013.penop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.SelectMatchingCard(tp,c53703013.penfilter,tp,LOCATION_DECK,0,1,1,nil)
 	local tc=g:GetFirst()
 	if tc then
-		Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+		Duel.MoveToField(tc,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
 	end
 	local c=e:GetHandler()
 	local e5=Effect.CreateEffect(c)

expansions/script/c65071158.lua

@@ -56,7 +56,7 @@ function c65071158.tgfil2(c,tp)
 	return c:IsAbleToGrave() and c:IsType(TYPE_SPELL+TYPE_TRAP)
 end
 function c65071158.tgfil3(c,tp)
-	return c:IsSSetable() and (Duel.GetLocationCount(tp,LOCATION_SZONE)>0 or c:IsType(TYPE_FIELD) and (c:IsType(TYPE_QUICKPLAY) or (c:IsType(TYPE_NORMAL) and c:IsType(TYPE_TRAP))) 
+	return c:IsSSetable() and (Duel.GetLocationCount(tp,LOCATION_SZONE)>0 or c:IsType(TYPE_FIELD)) and (c:IsType(TYPE_QUICKPLAY) or (c:IsType(TYPE_NORMAL) and c:IsType(TYPE_TRAP))) 
 end
 function c65071158.tg(e,tp,eg,ep,ev,re,r,rp,chk)
 	local b1=Duel.GetCounter(tp,LOCATION_ONFIELD,LOCATION_ONFIELD,0x1da0)>=6 and Duel.IsExistingMatchingCard(c65071158.tgfil1,tp,LOCATION_DECK,0,1,nil,tp)

expansions/script/c75646009.lua

@@ -56,7 +56,7 @@ function c75646009.immop(e,tp,eg,ep,ev,re,r,rp)
 	end
 	Duel.RegisterEffect(e1,tp)
 end
-function c75646009.effilter(c)
+function c75646009.effilter(e,c)
 	return c:IsSetCard(0x2c0) or c:IsSetCard(0xc2c1)
 end
 function c75646009.efilter(e,re)

expansions/script/c75646912.lua

@@ -38,7 +38,7 @@ end
 function cm.eqfilter(c)
 	return c:IsSetCard(0xc2c1) and c:IsType(TYPE_MONSTER)
 end
-function cm.cfilter(c)
+function cm.cfilter(c,tp)
 	if c:IsLocation(LOCATION_ONFIELD) then return c:IsSetCard(0xc2c1) and c:IsFaceup() and c:IsAbleToGraveAsCost() and Duel.IsExistingTarget(cm.eqfilter,tp,LOCATION_GRAVE,0,1,nil) end
 	return c:IsAbleToRemoveAsCost() and c:IsHasEffect(75646911) and Duel.IsExistingTarget(cm.eqfilter,tp,LOCATION_GRAVE,0,1,nil)
 end
@@ -48,10 +48,10 @@ function cm.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 		if e:GetLabel()~=100 then return false end
 		e:SetLabel(0)
 		return Duel.GetLocationCount(tp,LOCATION_SZONE)>0 
-			and Duel.IsExistingTarget(cm.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,e:GetHandler())
+			and Duel.IsExistingTarget(cm.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,e:GetHandler(),tp)
 	end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
-	local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,1,e:GetHandler())
+	local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,1,e:GetHandler(),tp)
 	local tc=g:GetFirst()
 	local te=tc:IsHasEffect(75646911,tp)
 	local tn=nil

expansions/script/c75646915.lua

@@ -48,7 +48,7 @@ function cm.tgcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	e:SetLabel(100)
 	if chk==0 then return true end
 end
-function cm.cfilter(c)
+function cm.cfilter(c,tp)
 	if c:IsLocation(LOCATION_ONFIELD) then return c:IsAbleToGraveAsCost() and Duel.IsExistingTarget(Card.IsAbleToGrave,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,c) end
 	return c:IsAbleToRemoveAsCost() and c:IsHasEffect(75646911) and Duel.IsExistingTarget(Card.IsAbleToGrave,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil)
 end
@@ -57,10 +57,10 @@ function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chk==0 then
 		if e:GetLabel()~=100 then return false end
 		e:SetLabel(0)
-		return Duel.IsExistingTarget(cm.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,nil)
+		return Duel.IsExistingTarget(cm.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,nil,tp)
 	end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
-	local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,1,nil)
+	local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,1,nil,tp)
 	local tc=g:GetFirst()
 	local te=tc:IsHasEffect(75646911)
 	if te then