update Altergeist Haunted Rock

https://github.com/Fluorohydride/ygopro-core/commit/f95d908449a428691301ff6ae29ab9920eb492c0

c2547033.lua

---オルターガイスト・ホーンテッドロック
+--オルターガイスト・ホーンデッドロック
 function c2547033.initial_effect(c)
 	--activate
 	local e1=Effect.CreateEffect(c)
@@ -28,6 +28,22 @@ function c2547033.initial_effect(c)
 	e3:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
 	e3:SetCondition(c2547033.actcon)
 	c:RegisterEffect(e3)
+	if not c2547033.global_check then
+		c2547033.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_SSET)
+		ge1:SetOperation(c2547033.checkop)
+		Duel.RegisterEffect(ge1,0)
+	end
+end
+function c2547033.checkop(e,tp,eg,ep,ev,re,r,rp)
+	if not re or not re:GetHandler():IsSetCard(0x103) then return end
+	local tc=eg:GetFirst()
+	while tc do
+		tc:RegisterFlagEffect(2547033,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
+		tc=eg:GetNext()
+	end
 end
 function c2547033.tgfilter(c)
 	return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x103) and c:IsAbleToGrave()

c53143898.lua

@@ -31,7 +31,6 @@ function c53143898.setop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.SelectMatchingCard(tp,c53143898.setfilter,tp,LOCATION_DECK,0,1,1,nil)
 	if g:GetCount()>0 then
 		Duel.SSet(tp,g:GetFirst())
-		g:GetFirst():RegisterFlagEffect(2547033,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
 		Duel.ConfirmCards(1-tp,g)
 	end
 end