byd

expansions/script/c31300052.lua

@@ -15,9 +15,39 @@ function s.tohand(c)
 	e1:SetRange(LOCATION_GRAVE)
 	e1:SetCountLimit(1,id+114)
 	e1:SetCost(s.thcost)
+	e1:SetCondition(s.condition)
 	e1:SetTarget(s.thtg)
 	e1:SetOperation(s.thop)
 	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetHintTiming(0,TIMING_END_PHASE)
+	e2:SetCondition(s.condition2)
+	c:RegisterEffect(e2)
+	if not s.global_check then
+		s.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_DESTROYED)
+		ge1:SetOperation(s.checkop)
+		Duel.RegisterEffect(ge1,0)
+	end
+end
+function s.checkop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetFlagEffect(0,id)~=0 or Duel.GetFlagEffect(1,id)~=0 then return end
+	for tc in aux.Next(eg) do
+		if tc:IsRace(RACE_ROCK) and not tc:IsReason(REASON_RULE) then
+			Duel.RegisterFlagEffect(0,id,RESET_PHASE+PHASE_END,0,1)
+			Duel.RegisterFlagEffect(1,id,RESET_PHASE+PHASE_END,0,1)
+		end
+	end
+end
+function s.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFlagEffect(tp,id)==0
+end
+function s.condition2(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFlagEffect(tp,id)~=0
 end
 function s.thfilter(c)
 	return c:IsRace(RACE_ROCK) and c:IsLevel(1) and c:IsAbleToDeck()