Replace c22134510.lua

expansions/script/c22134510.lua

 --东星极·右方之岩
 local s,id,o=GetID()
+local e22134510
 function s.initial_effect(c)
 	-- 让这张卡就算被无效也能放指示物
 	-- 以后定义哪张卡可以放指示物要在这里输入0x760
@@ -186,10 +187,11 @@ function s.spop(e,tp,eg,ep,ev,re,r,rp)
 	if not Card.IsCanBeSpecialSummoned(c,e,0,tp,false,false) and Duel.IsCanRemoveCounter(tp,1,0,0x760,5,REASON_EFFECT) then return end
 	if 	not Duel.RemoveCounter(tp,1,0,0x760,5,REASON_EFFECT)then return end
 	if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0  then
+		Duel.RaiseEvent(e:GetHandler(),EVENT_REMOVE_COUNTER+0x760,e22134510,REASON_EFFECT,tp,tp,count)
 		local ct=Duel.GetMatchingGroupCount(aux.NecroValleyFilter(s.thgfilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,nil)
 		if ct==0 or (not Duel.SelectYesNo(tp,aux.Stringid(id,2))) then return end
 		Duel.BreakEffect()
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
 		local thg = Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.thgfilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
 		if thg:GetCount()>0 then
 			Duel.SendtoHand(thg,nil,REASON_EFFECT)
@@ -278,8 +280,8 @@ function s.chkcop(e,tp,eg,ep,ev,re,r,rp)
 	e:SetLabel(cnt)
 end
 function s.chkncop(e,tp,eg,ep,ev,re,r,rp)
-	if e:GetHandler():GetFlagEffect(22134501)==0 then
-		e:GetHandler():RegisterFlagEffect(22134501,RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET+RESET_CHAIN,0,1)
+	if e:GetHandler():GetFlagEffect(22134501)==0 and e22134510 then
+		e22134510:SetLabel(e:GetHandler():GetCounter(0x760))
 	end
 end
 function s.htccop(e,tp,eg,ep,ev,re,r,rp)