ybb

expansions/script/c53702500.lua

@@ -1376,6 +1376,12 @@ function cm.AnouguryReptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	e3:SetLabelObject(e2)
 	e3:SetOperation(cm.AnouguryRstop2)
 	Duel.RegisterEffect(e3,tp)
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e4:SetCode(EVENT_CUSTOM+53728000)
+	e4:SetLabelObject(e3)
+	e4:SetOperation(cm.AnouguryRstop3)
+	Duel.RegisterEffect(e4,tp)
 	return true
 end
 function cm.AnouguryRstop(e,tp,eg,ep,ev,re,r,rp)
@@ -1386,6 +1392,7 @@ function cm.AnouguryRstop(e,tp,eg,ep,ev,re,r,rp)
 		ec:ResetEffect(EFFECT_INDESTRUCTABLE,RESET_CODE)
 	end
 	Duel.Destroy(g,REASON_RULE)
+	Duel.RaiseEvent(e:GetHandler(),EVENT_CUSTOM+53728000,re,r,rp,ep,ev)
 	e:Reset()
 end
 function cm.AnouguryRstop2(e,tp,eg,ep,ev,re,r,rp)
@@ -1403,6 +1410,10 @@ function cm.AnouguryRstop2(e,tp,eg,ep,ev,re,r,rp)
 	e:GetLabelObject():Reset()
 	e:Reset()
 end
+function cm.AnouguryRstop3(e,tp,eg,ep,ev,re,r,rp)
+	e:GetLabelObject():Reset()
+	e:Reset()
+end
 function cm.MRSYakuSP(c,num,typ)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(c:GetOriginalCode(),0))
@@ -1528,3 +1539,33 @@ function cm.IsInTable(value, tbl)
 	end
 	return false
 end
+function cm.OnStageText(c,typ)
+	if typ==act then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
+		e1:SetCode(EVENT_CHAINING)
+		e1:SetOperation(cm.Stageactop)
+		c:RegisterEffect(e1)
+	elseif typ==nors then
+		local e2=Effect.CreateEffect(c)
+		e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
+		e2:SetCode(EVENT_SUMMON_SUCCESS)
+		e2:SetOperation(cm.Stagesop)
+		c:RegisterEffect(e2)
+	elseif typ==spes then
+		local e3=Effect.CreateEffect(c)
+		e3:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
+		e3:SetCode(EVENT_SPSUMMON_SUCCESS)
+		e3:SetOperation(cm.Stagesop)
+		c:RegisterEffect(e3)
+	end
+end
+function cm.Stageactop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(24,0,aux.Stringid(e:GetHandler():GetOriginalCode(),11))
+	Duel.Hint(24,0,aux.Stringid(e:GetHandler():GetOriginalCode(),12))
+end
+function cm.Stagesop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(24,0,aux.Stringid(e:GetHandler():GetOriginalCode(),13))
+	Duel.Hint(24,0,aux.Stringid(e:GetHandler():GetOriginalCode(),14))
+	Duel.Hint(24,0,aux.Stringid(e:GetHandler():GetOriginalCode(),15))
+end