54188

expansions/script/c12835107.lua

@@ -183,7 +183,7 @@ function s.moveop(e,tp,eg,ep,ev,re,r,rp)
 		e1:SetCode(EFFECT_IMMUNE_EFFECT)
 		e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
 		e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_CHAIN)
 		e1:SetValue(s.efilter)
 		tc:RegisterEffect(e1,true)
 		Duel.AdjustAll()

expansions/script/c33300601.lua

@@ -12,15 +12,25 @@ function s.initial_effect(c)
 	c:RegisterEffect(e1)
 	local e2=Effect.CreateEffect(c)
 	e2:SetDescription(aux.Stringid(id,0))
-	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetCode(EVENT_FREE_CHAIN)
-	e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_PHASE+PHASE_END)
 	e2:SetRange(LOCATION_MZONE)
 	e2:SetCountLimit(1)
 	e2:SetTarget(s.mttg)
-	e2:SetCondition(s.mtcon)
 	e2:SetOperation(s.mtop)
 	c:RegisterEffect(e2)
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e3:SetOperation(s.zcop1)
+	c:RegisterEffect(e3)
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e4:SetCode(EVENT_DESTROYED)
+	e4:SetOperation(s.zcop2)
+	c:RegisterEffect(e4)
 end
 function s.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()
@@ -31,9 +41,6 @@ function s.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
 		return true
 	else return false end
 end
-function s.mtcon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
-end
 function s.mtfilter(c,e)
 	return c:IsCanOverlay() and not (e and c:IsImmuneToEffect(e))
 end
@@ -52,17 +59,21 @@ function s.mtop(e,tp,eg,ep,ev,re,r,rp)
 			and Duel.IsExistingMatchingCard(s.mtfilter,tp,LOCATION_GRAVE+LOCATION_ONFIELD,LOCATION_GRAVE+LOCATION_ONFIELD,1,c)
 			and Duel.SelectYesNo(tp,aux.Stringid(id,3)) then
 			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
-			local g2=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.mtfilter),tp,LOCATION_GRAVE+LOCATION_ONFIELD,LOCATION_GRAVE+LOCATION_ONFIELD,1,1,nil,e)
+			local g2=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.mtfilter),tp,LOCATION_GRAVE+LOCATION_ONFIELD,LOCATION_GRAVE+LOCATION_ONFIELD,1,1,c,e)
 			if g2:GetCount()>0 then
 				local mg2=g2:GetFirst():GetOverlayGroup()
 				if mg2:GetCount()>0 then
 					Duel.SendtoGrave(mg2,REASON_RULE)
 				end
-				if g2:GetFirst():IsStatus(STATUS_LEAVE_CONFIRMED) then
-					g2:GetFirst():CancelToGrave()
-				end
 				Duel.Overlay(c,g2)
 			end
 		end
 	end
 end
+function s.zcop1(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(id,0))
+	Duel.Hint(24,0,aux.Stringid(id,1))
+end
+function s.zcop2(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(24,0,aux.Stringid(id,2))
+end
\ No newline at end of file

expansions/script/c33300602.lua

@@ -100,8 +100,9 @@ function s.damcon2(e,tp,eg,ep,ev,re,r,rp)
 		and ct>0 and ep~=tp and re:IsActiveType(TYPE_MONSTER)
 end
 function s.damop(e,tp,eg,ep,ev,re,r,rp)
+	tp=e:GetHandlerPlayer()
 	local sg=Duel.GetMatchingGroup(s.cfilter,e:GetHandler():GetControler(),LOCATION_ONFIELD,0,nil)
-	local ct=Duel.GetCounter(0,1,0,0x0569)--sg:GetSum(s.iee)
+	local ct=Duel.GetCounter(tp,1,0,0x0569)--sg:GetSum(s.iee)
 	Duel.Hint(HINT_CARD,0,id)
 	Duel.Damage(1-tp,ct*300,REASON_EFFECT)
 end
\ No newline at end of file

expansions/script/c33300604.lua

@@ -93,8 +93,9 @@ function s.damcon2(e,tp,eg,ep,ev,re,r,rp)
 		and ct>0 and Duel.GetTurnPlayer()~=tp
 end
 function s.damop(e,tp,eg,ep,ev,re,r,rp)
+	tp=e:GetHandlerPlayer()
 	local sg=Duel.GetMatchingGroup(s.cfilter,e:GetHandler():GetControler(),LOCATION_ONFIELD,0,nil)
-	local ct=Duel.GetCounter(0,1,0,0x0569)--sg:GetSum(s.iee)
+	local ct=Duel.GetCounter(tp,1,0,0x0569)--sg:GetSum(s.iee)
 	Duel.Hint(HINT_CARD,0,id)
 	Duel.Damage(1-tp,ct*300,REASON_EFFECT)
 end
\ No newline at end of file

expansions/script/c33300605.lua

@@ -85,8 +85,9 @@ function s.damcon2(e,tp,eg,ep,ev,re,r,rp)
 		and ct>0 and ep~=tp and re:IsActiveType(TYPE_SPELL+TYPE_TRAP)
 end
 function s.damop(e,tp,eg,ep,ev,re,r,rp)
+	tp=e:GetHandlerPlayer()
 	local sg=Duel.GetMatchingGroup(s.cfilter,e:GetHandler():GetControler(),LOCATION_ONFIELD,0,nil)
-	local ct=Duel.GetCounter(0,1,0,0x0569)--sg:GetSum(s.iee)
+	local ct=Duel.GetCounter(tp,1,0,0x0569)--sg:GetSum(s.iee)
 	Duel.Hint(HINT_CARD,0,id)
 	Duel.Damage(1-tp,ct*300,REASON_EFFECT)
 end
\ No newline at end of file