Replace c22134505.lua

expansions/script/c22134505.lua

 --荒芜之地·粉碎奇迹
 local s,id,o=GetID()
+local e22134505
 function s.initial_effect(c)
 	-- 让这张卡就算被无效也能放指示物
 	-- 以后定义哪张卡可以放指示物要在这里输入0x760
@@ -37,7 +38,7 @@ function s.initial_effect(c)
 		c:RegisterEffect(ec1)
 		-- 检测指示物是否属于自主减少
 		local ec0=Effect.CreateEffect(c)
-		ec0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
+		ec0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
 		ec0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
 		ec0:SetRange(LOCATION_MZONE+LOCATION_PZONE)
 		ec0:SetCode(EVENT_REMOVE_COUNTER+0x760)
@@ -186,6 +187,7 @@ 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,e22134505,REASON_EFFECT,tp,tp,count)
 		local ct=Duel.GetMatchingGroupCount(s.tgfilter,tp,LOCATION_DECK,0,nil)
 		if ct==0 or (not Duel.SelectYesNo(tp,aux.Stringid(id,2))) then return end
 		Duel.BreakEffect()
@@ -290,12 +292,12 @@ function s.tdop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.SendtoHand(g,nil,REASON_EFFECT)
 	elseif wh==LOCATION_GRAVE then
 		if not (b3 and bb) then return end
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
 		local g=Duel.SelectMatchingCard(tp,s.tdfilter2,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,1,c)
 		Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
 	elseif wh==LOCATION_REMOVED then
 		if not (b4 and bb) then return end
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
 		local g=Duel.SelectMatchingCard(tp,s.tdfilter2,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,1,c)
 		Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
 	end
@@ -322,8 +324,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 e22134505 then
+		e22134505:SetLabel(e:GetHandler():GetCounter(0x760))
 	end
 end
 function s.htccop(e,tp,eg,ep,ev,re,r,rp)