ybb

expansions/script/c10090065.lua

@@ -117,22 +117,23 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 --Destroy 
-function cm.indfilter(c)
-	return c:IsType(TYPE_MONSTER)
-end
 function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	local c=e:GetHandler()  
 	if chkc then return c:IsAbleToExtra() and chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_MZONE) and cm.indfilter(chkc) end
-	if chk==0 then return Duel.IsExistingTarget(cm.indfilter,tp,0,LOCATION_MZONE,1,nil) and Duel.IsPlayerCanDiscardDeck(tp,4) and
+	if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,0,LOCATION_MZONE,1,nil) and Duel.IsPlayerCanDiscardDeck(tp,4) and
 	   Duel.GetDecktopGroup(tp,4):FilterCount(Card.IsAbleToHand,nil)>0 end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
-	Duel.SelectTarget(tp,cm.indfilter,tp,0,LOCATION_MZONE,1,1,nil)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+	local g=Duel.SelectTarget(tp,aux.TRUE,tp,0,LOCATION_MZONE,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,0,LOCATION_DECK)
 end
 function cm.desop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	local tc=Duel.GetFirstTarget()
-	if tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)~=0 and Duel.IsPlayerCanDiscardDeck(tp,4) then
+	if tc:IsRelateToEffect(e) then
+		Duel.Destroy(tc,REASON_EFFECT)
+	end
+	if Duel.IsPlayerCanDiscardDeck(tp,4) then
 		Duel.ConfirmDecktop(tp,4)
 		local g=Duel.GetDecktopGroup(tp,4)
 		if g:GetCount()>0 then

expansions/script/c33503107.lua

@@ -90,6 +90,8 @@ function cm.op3(e,tp,eg,ep,ev,re,r,rp)
 		e2:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
 		e2:SetRange(LOCATION_FZONE)
 		e2:SetTargetRange(LOCATION_ONFIELD,0)
+		e2:SetValue(1)
+		e2:SetReset(RESET_EVENT+RESETS_STANDARD)
 		tc:RegisterEffect(e2)
 	end
 	tc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,1))

expansions/script/c53702500.lua

@@ -4,7 +4,7 @@ local cm=SNNM
 function cm.AllGlobalCheck(c)
 	if not cm.global_check then
 		cm.global_check=true
-		local x=c:GetOriginalCode()
+		local x=c:GetOriginalCodeRule()
 		if x>=53707000 and x<=53707099 then
 			local alle1=Effect.CreateEffect(c)
 			alle1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
@@ -31,6 +31,11 @@ function cm.AllGlobalCheck(c)
 				Duel.DisableShuffleCheck()
 				Duel.SendtoGrave(g,reason)
 			end
+			--cm[2]=Card.ReverseInDeck
+			--Card.ReverseInDeck=function(card)
+				--card:RegisterFlagEffect(53707050,RESET_EVENT+0x53c0000,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(53702500,2))
+				--return cm[2](card)
+			--end
 		end
 		if x>=53713000 and x<=53713099 then
 			local alle3=Effect.CreateEffect(c)
@@ -48,16 +53,54 @@ function cm.AllGlobalCheck(c)
 		end
 	end
 end
+function cm.UpRegi(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetFlagEffect(tp,53707080)>0 then return end
+	Duel.RegisterFlagEffect(tp,53707080,0,0,0)
+	if not Duel.SelectYesNo(tp,aux.Stringid(53702500,6)) then return end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetOperation(cm.UpCheck)
+	Duel.RegisterEffect(e1,tp)
+end
+function cm.UpCheck(e,tp,eg,ep,ev,re,r,rp)
+	local tp=e:GetHandlerPlayer()
+	local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_DECK,0,nil)
+	if #g>0 then Duel.ConfirmCards(tp,g) else Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(53702500,7)) end
+end
+function cm.UpConfirm()
+	local UCg=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_DECK,0,nil)
+	if #UCg>0 then Duel.Hint(HINT_OPSELECTED,tp,aux.Stringid(53702500,2)) end
+	if #UCg==1 then UCg:Select(tp,1,1,nil) elseif #UCg>1 then Duel.ConfirmCards(tp,UCg) end
+end
 function cm.Peacecho(c)
 	Duel.EnableGlobalFlag(GLOBALFLAG_DECK_REVERSE_CHECK)
-	local e4=Effect.CreateEffect(c)
-	e4:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DRAW)
-	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
-	e4:SetCode(EVENT_DRAW)
-	e4:SetTarget(cm.PeacechoDrawTarget)
-	e4:SetOperation(cm.PeacechoDrawOperation)
-	c:RegisterEffect(e4)
+	if c:GetOriginalType()&TYPE_MONSTER~=0 then
+		local e4=Effect.CreateEffect(c)
+		e4:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DRAW)
+		e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+		e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
+		e4:SetCode(EVENT_DRAW)
+		e4:SetTarget(cm.PeacechoDrawTarget)
+		e4:SetOperation(cm.PeacechoDrawOperation)
+		c:RegisterEffect(e4)
+	end
+	if c:GetOriginalType()&0x20004~=0 then
+		local e5=Effect.CreateEffect(c)
+		e5:SetCategory(CATEGORY_DRAW)
+		e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+		e5:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
+		e5:SetCode(EVENT_DRAW)
+		e5:SetTarget(cm.PeacechoDrawTarget2)
+		e5:SetOperation(cm.PeacechoDrawOperation2)
+		c:RegisterEffect(e5)
+	end
+	local e9=Effect.CreateEffect(c)
+	e9:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e9:SetCode(EVENT_PHASE_START+PHASE_DRAW)
+	e9:SetRange(LOCATION_HAND+LOCATION_DECK)
+	e9:SetOperation(cm.UpRegi)
+	c:RegisterEffect(e9)
 end
 function cm.PeacechoRepFilter(c)
 	return c:GetDestination()==LOCATION_GRAVE and c:IsOriginalSetCard(0x3537) and not c:IsHasEffect(EFFECT_TO_GRAVE_REDIRECT) and c:GetOriginalType()&TYPE_PENDULUM==0
@@ -106,7 +149,6 @@ function cm.PeacechoToDeckTarget2(e,tp,eg,ep,ev,re,r,rp,chk)
 		tc:RegisterFlagEffect(53707099,RESET_CHAIN,0,1)
 		Duel.MoveSequence(tc,1)
 		tc:ReverseInDeck()
-		tc:RegisterFlagEffect(53707050,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(53702500,2))
 	end
 	Duel.ResetFlagEffect(p,53707000)
 	return true
@@ -121,7 +163,6 @@ function cm.PeacechoTDOperation(e,tp,eg,ep,ev,re,r,rp)
 	local g=eg:Filter(cm.PeacechoTDFilter,nil)
 	for tc in aux.Next(g) do
 		tc:ReverseInDeck()
-		tc:RegisterFlagEffect(53707050,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(53702500,2))
 		tc:ResetFlagEffect(53707000)
 	end
 	e:Reset()
@@ -131,14 +172,19 @@ function cm.PeacechoDrawTarget(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()
 	if chk==0 then return c:IsPreviousPosition(POS_FACEUP) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.IsPlayerCanDraw(tp,1) end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
 end
 function cm.PeacechoDrawOperation(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) then
-		if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
-			Duel.Draw(tp,1,REASON_EFFECT)
-		end
-	end
+	if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then Duel.Draw(tp,1,REASON_EFFECT) end
+end
+function cm.PeacechoDrawTarget2(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsPreviousPosition(POS_FACEUP) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.IsPlayerCanDraw(tp,1) end
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
+end
+function cm.PeacechoDrawOperation2(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and c:IsLocation(LOCATION_HAND) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true)~=0 then Duel.Draw(tp,1,REASON_EFFECT) end
 end
 --
 function cm.Faceupdeckcheck(g,tp)
@@ -897,7 +943,7 @@ function cm.OSCheck(e,tp,eg,ep,ev,re,r,rp)
 		local rac=Duel.GetFlagEffectLabel(p,53703000)
 		Duel.ResetFlagEffect(p,53703000)
 		local race=nil
-		if rac==nil then race=tc:GetRace() else race=rac+tc:GetRace() end
+		if rac==nil then race=tc:GetRace() else race=rac|tc:GetRace() end
 		Duel.RegisterFlagEffect(p,53703000,RESET_PHASE+PHASE_END,0,1,race)
 	end
 end
@@ -1011,16 +1057,16 @@ end
 function cm.OSDiskActivate2(e,tp,eg,ep,ev,re,r,rp)
 	local ct={}
 	for i=3,1,-1 do
-		if Duel.IsPlayerCanDiscardDeckAsCost(1-tp,i) then
+		if Duel.IsPlayerCanDiscardDeck(1-tp,i) then
 			table.insert(ct,i)
 		end
 	end
 	if #ct==1 then
-		Duel.DiscardDeck(1-tp,ct[1],REASON_COST)
+		Duel.DiscardDeck(1-tp,ct[1],REASON_EFFECT)
 	else
 		Duel.Hint(HINT_SELECTMSG,1-tp,aux.Stringid(e:GetHandler():GetOriginalCode(),4))
 		local ac=Duel.AnnounceNumber(1-tp,table.unpack(ct))
-		Duel.DiscardDeck(1-tp,ac,REASON_COST)
+		Duel.DiscardDeck(1-tp,ac,REASON_EFFECT)
 	end
 end
 function cm.OSKaijuCondition2(e,tp,eg,ep,ev,re,r,rp)
@@ -1334,6 +1380,17 @@ function cm.SetPublic(c,lab,rst,rstct)
 	e1:SetReset(rst,rstct)
 	c:RegisterEffect(e1)
 end
+function cm.SetPublicGroup(c,g,rst,rstct)
+	for pubc in aux.Next(g) do
+		local e1=Effect.CreateEffect(c)
+		e1:SetDescription(aux.Stringid(53702500,3))
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_PUBLIC)
+		e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
+		e1:SetReset(rst,rstct)
+		pubc:RegisterEffect(e1)
+	end
+end
 function cm.AnouguryLink(c)
 	c:EnableReviveLimit()
 	local e1=Effect.CreateEffect(c)
@@ -1569,3 +1626,17 @@ function cm.Stagesop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(24,0,aux.Stringid(e:GetHandler():GetOriginalCode(),14))
 	Duel.Hint(24,0,aux.Stringid(e:GetHandler():GetOriginalCode(),15))
 end
+function cm.SetDirectlyf(c)
+	return c:IsFaceup() and ((c:IsLocation(LOCATION_MZONE) and ((bit.band(c:GetOriginalType(),TYPE_SPELL+TYPE_TRAP)~=0 and (not c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsCanTurnSet()) or (c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable() and c:IsCanTurnSet())) or (bit.band(c:GetOriginalType(),TYPE_SPELL+TYPE_TRAP)==0 and c:IsCanTurnSet()))) or (c:IsLocation(LOCATION_SZONE) and c:IsSSetable(true))) and not (c:IsType(TYPE_PENDULUM) and c:IsLocation(LOCATION_PZONE))
+end
+function cm.SetDirectly(g,e,p)
+	for tc in aux.Next(g) do
+		tc:CancelToGrave()
+		Duel.ChangePosition(tc,POS_FACEDOWN)
+		local loc=0
+		if tc:IsType(TYPE_FIELD) then loc=LOCATION_FZONE
+		elseif tc:IsType(TYPE_SPELL+TYPE_TRAP) then loc=LOCATION_SZONE end
+		if tc:GetOriginalType()&TYPE_MONSTER==0 and tc:IsLocation(LOCATION_MZONE) then Duel.MoveToField(tc,p,p,loc,POS_FACEDOWN,false) end
+		if tc:IsType(TYPE_SPELL+TYPE_TRAP) then Duel.RaiseEvent(tc,EVENT_SSET,e,REASON_EFFECT,p,p,0) end
+	end
+end

expansions/script/c53703008.lua

@@ -86,8 +86,8 @@ function cm.ntrfilter(c)
 	return c:IsFaceup() and c:GetCounter(0x153a)>2 and c:IsControlerCanBeChanged()
 end
 function cm.ntrtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
 	local g=Duel.GetMatchingGroup(cm.ntrfilter,tp,0,LOCATION_MZONE,nil)
+	if chk==0 then return #g>0 end
 	Duel.SetOperationInfo(0,CATEGORY_CONTROL,g,1,0,0)
 	Duel.SetOperationInfo(0,CATEGORY_DESTROY,e:GetHandler(),1,0,0)
 end

expansions/script/c53707001.lua

@@ -57,6 +57,7 @@ function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 		e:SetLabel(0)
 		return #g>0 and count>math.min(3,#g) and Duel.GetDecktopGroup(tp,math.min(3,count)):IsExists(Card.IsAbleToHand,1,nil) and Duel.GetDecktopGroup(tp,math.min(3,count)):IsExists(Card.IsAbleToRemove,1,nil,POS_FACEDOWN)
 	end
+	SNNM.UpConfirm()
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local rg=g:SelectSubGroup(tp,cm.fselect,false,1,math.min(3,#g),count,tp)
 	Duel.ConfirmCards(1-tp,rg)
@@ -74,6 +75,7 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetDecktopGroup(p,d)
 	if g:GetCount()>0 then
 		if g:IsExists(cm.thfilter,1,nil) then
+			SNNM.UpConfirm()
 			Duel.DisableShuffleCheck()
 			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 			local sg=g:FilterSelect(tp,cm.thfilter,1,1,nil)

expansions/script/c53707002.lua

@@ -56,6 +56,7 @@ function cm.dcfilter(c)
 end
 function cm.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(cm.dcfilter,tp,LOCATION_DECK,0,1,nil) end
+	SNNM.UpConfirm()
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local g=Duel.SelectMatchingCard(tp,cm.dcfilter,tp,LOCATION_DECK,0,1,1,nil)
 	Duel.ConfirmCards(1-tp,g)

expansions/script/c53707003.lua

@@ -35,7 +35,7 @@ function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	e:SetLabel(100)
 	if chk==0 then return true end
 end
---妈 的 ，我 脑 抽 忘 了 嵌 套 过 滤 器 了
+--妈 的 ，脑 抽 忘 了 嵌 套 过 滤 器 了
 function cm.rmfilter(c)
 	return c:IsRace(RACE_PLANT) and c:IsAbleToRemoveAsCost(POS_FACEDOWN)
 end
@@ -61,6 +61,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 		return #tg>0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 	end
 	local tempg,ct=tg:GetMaxGroup(Card.GetLevel)
+	SNNM.UpConfirm()
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local rg=g:SelectSubGroup(tp,cm.fselect,false,1,ct,e,tp,tg)
 	Duel.ConfirmCards(1-tp,rg)

expansions/script/c53707004.lua

@@ -44,6 +44,7 @@ function cm.rmfilter(c)
 end
 function cm.tttg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(cm.rmfilter,tp,LOCATION_DECK,0,1,nil) end
+	SNNM.UpConfirm()
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local rg=Duel.SelectMatchingCard(tp,cm.rmfilter,tp,LOCATION_DECK,0,1,1,nil)
 	Duel.ConfirmCards(1-tp,rg)

expansions/script/c53707007.lua

@@ -33,6 +33,7 @@ function cm.spcfilter(c)
 end
 function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(cm.spcfilter,tp,LOCATION_DECK,0,1,nil) end
+	SNNM.UpConfirm()
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local g=Duel.SelectMatchingCard(tp,cm.spcfilter,tp,LOCATION_DECK,0,1,1,nil)
 	Duel.ConfirmCards(1-tp,g)

expansions/script/c53707008.lua

@@ -57,6 +57,7 @@ function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	end
 end
 function cm.thop(e,tp,eg,ep,ev,re,r,rp)
+	SNNM.UpConfirm()
 	if e:GetLabel()==0 then
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 		local g1=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_DECK,0,1,1,nil)

expansions/script/c53707010.lua

@@ -65,6 +65,7 @@ function cm.cfilter(c)
 end
 function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_DECK,0,1,nil) end
+	SNNM.UpConfirm()
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_DECK,0,1,1,nil)
 	Duel.Remove(g,POS_FACEDOWN,REASON_COST)

expansions/script/c53707011.lua

@@ -54,6 +54,7 @@ function cm.cfilter(c)
 end
 function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_DECK,0,3,nil) end
+	SNNM.UpConfirm()
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_DECK,0,3,3,nil)
 	Duel.Remove(g,POS_FACEDOWN,REASON_COST)

expansions/script/c53707020.lua

 local m=53707020
 local cm=_G["c"..m]
 cm.name="幽林清响"
-if not pcall(function() require("expansions/script/c53702500") end) then require("script/c53702500") end
 function cm.initial_effect(c)
+	SNNM.Peacecho(c)
 	SNNM.AllGlobalCheck(c)
-	Duel.EnableGlobalFlag(GLOBALFLAG_DECK_REVERSE_CHECK)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
@@ -26,14 +25,6 @@ function cm.initial_effect(c)
 	e3:SetTarget(cm.rectg)
 	e3:SetOperation(cm.recop)
 	c:RegisterEffect(e3)
-	local e4=Effect.CreateEffect(c)
-	e4:SetDescription(aux.Stringid(m,1))
-	e4:SetCategory(CATEGORY_DRAW)
-	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e4:SetCode(EVENT_DRAW)
-	e4:SetTarget(cm.rvdtg)
-	e4:SetOperation(cm.rvdop)
-	c:RegisterEffect(e4)
 end
 function cm.efilter(e,ct)
 	local p=e:GetHandlerPlayer()
@@ -54,13 +45,3 @@ function cm.recop(e,tp,eg,ep,ev,re,r,rp)
 	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
 	Duel.Recover(p,d,REASON_EFFECT)
 end
-function cm.rvdtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsPreviousPosition(POS_FACEUP) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.IsPlayerCanDraw(tp,1) end
-	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
-end
-function cm.rvdop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) and c:IsLocation(LOCATION_HAND) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true)~=0 then
-		Duel.Draw(tp,1,REASON_EFFECT)
-	end
-end