count limit

ocgcore/effect.cpp

@@ -114,9 +114,7 @@ int32 effect::is_available() {
 		status &= ~EFFECT_STATUS_AVAILABLE;
 	return res;
 }
-int32 effect::is_activateable(uint8 playerid, const tevent& e, int32 neglect_cond, int32 neglect_cost, int32 neglect_target) {
-	if(!(type & EFFECT_TYPE_ACTIONS))
-		return FALSE;
+int32 effect::check_count_limit(uint8 playerid) {
 	if((flag & EFFECT_FLAG_COUNT_LIMIT)) {
 		if(count_code == 0) {
 			if((reset_count & 0xf00) == 0)
@@ -126,13 +124,20 @@ int32 effect::is_activateable(uint8 playerid, const tevent& e, int32 neglect_con
 			uint32 count = (reset_count >> 12) & 0xf;
 			if(code == 1) {
 				if(pduel->game_field->get_effect_code((count_code & 0x80000000) | handler->fieldid, PLAYER_NONE) >= count)
-					return false;
+					return FALSE;
 			} else {
 				if(pduel->game_field->get_effect_code(count_code, playerid) >= count)
-					return false;
+					return FALSE;
 			}
 		}
 	}
+	return TRUE;
+}
+int32 effect::is_activateable(uint8 playerid, const tevent& e, int32 neglect_cond, int32 neglect_cost, int32 neglect_target) {
+	if(!(type & EFFECT_TYPE_ACTIONS))
+		return FALSE;
+	if(!check_count_limit(playerid))
+		return FALSE;
 	if (!(flag & EFFECT_FLAG_FIELD_ONLY)) {
 		if (type & EFFECT_TYPE_ACTIVATE) {
 			if(handler->current.controler != playerid)

ocgcore/effect.h

@@ -63,6 +63,7 @@ public:
 
 	int32 is_disable_related();
 	int32 is_available();
+	int32 check_count_limit(uint8 playerid);
 	int32 is_activateable(uint8 playerid, const tevent& e, int32 neglect_cond = FALSE, int32 neglect_cost = FALSE, int32 neglect_target = FALSE);
 	int32 is_action_check(uint8 playerid);
 	int32 is_activate_ready(uint8 playerid, const tevent& e, int32 neglect_cond = FALSE, int32 neglect_cost = FALSE, int32 neglect_target = FALSE);

ocgcore/processor.cpp

@@ -1930,7 +1930,8 @@ int32 field::process_quick_effect(int16 step, int32 special, uint8 priority) {
 		bool act = true;
 		for(auto ifit = core.quick_f_chain.begin(); ifit != core.quick_f_chain.end(); ++ifit) {
 			peffect = ifit->first;
-			if(peffect->is_chainable(ifit->second.triggering_player) && peffect->handler->is_has_relation(peffect)) {
+			if(peffect->is_chainable(ifit->second.triggering_player) && peffect->check_count_limit(ifit->second.triggering_player)
+					&& peffect->handler->is_has_relation(peffect)) {
 				if (ifit->second.triggering_player == infos.turn_player){
 					act = true;
 					if (peffect->flag & EFFECT_FLAG_CHAIN_UNIQUE) {

script/c10406322.lua

@@ -19,8 +19,9 @@ function c10406322.initial_effect(c)
 	e2:SetCategory(CATEGORY_TODECK)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_TO_GRAVE)
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
 	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,10406322)
 	e2:SetCondition(c10406322.tdcon)
 	e2:SetCost(c10406322.tdcost)
 	e2:SetTarget(c10406322.tdtg)
@@ -54,9 +55,8 @@ function c10406322.tdcon(e,tp,eg,ep,ev,re,r,rp)
 	return eg:IsExists(c10406322.cfilter,1,nil,tp)
 end
 function c10406322.tdcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,10406322)==0 and e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
 	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
-	Duel.RegisterFlagEffect(tp,10406322,RESET_PHASE+PHASE_END,0,1)
 end
 function c10406322.tdtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsOnField() and chkc:IsAbleToDeck() end

script/c10753491.lua

@@ -14,10 +14,10 @@ function c10753491.initial_effect(c)
 	e2:SetDescription(aux.Stringid(10753491,2))
 	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e2:SetCode(EVENT_TO_GRAVE)
+	e2:SetCountLimit(1,10753491)
 	e2:SetCondition(c10753491.spcon)
-	e2:SetCost(c10753491.spcost)
 	e2:SetTarget(c10753491.sptg)
 	e2:SetOperation(c10753491.spop)
 	c:RegisterEffect(e2)
@@ -54,10 +54,6 @@ function c10753491.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return c:IsPreviousLocation(LOCATION_DECK) and
 		(c:IsReason(REASON_REVEAL) or c:GetPreviousPosition()==POS_FACEUP_DEFENCE or Duel.IsPlayerAffectedByEffect(tp,EFFECT_REVERSE_DECK))
 end
-function c10753491.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,10753491)==0 end
-	Duel.RegisterFlagEffect(tp,10753491,RESET_PHASE+PHASE_END,0,1)
-end
 function c10753491.filter(c,e,tp)
 	return c:GetLevel()==1 and c:IsRace(RACE_PLANT) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end

script/c12697630.lua

@@ -22,9 +22,8 @@ function c12697630.initial_effect(c)
 	e3:SetCategory(CATEGORY_DESTROY)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e3:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
+	e3:SetCountLimit(1,12697630)
 	e3:SetCondition(c12697630.descon)
-	e3:SetCost(c12697630.descost)
 	e3:SetTarget(c12697630.destg)
 	e3:SetOperation(c12697630.desop)
 	c:RegisterEffect(e3)
@@ -46,10 +45,6 @@ end
 function c12697630.descon(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.GetTurnPlayer()~=tp
 end
-function c12697630.descost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,12697630)==0 end
-	Duel.RegisterFlagEffect(tp,12697630,RESET_PHASE+PHASE_END,0,1)
-end
 function c12697630.filter(c)
 	return c:IsFacedown() and c:IsDestructable()
 end

script/c14745409.lua

@@ -36,11 +36,11 @@ function c14745409.initial_effect(c)
 	local e5=Effect.CreateEffect(c)
 	e5:SetDescription(aux.Stringid(14745409,0))
 	e5:SetCategory(CATEGORY_EQUIP)
-	e5:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e5:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e5:SetCode(EVENT_TO_GRAVE)
+	e5:SetCountLimit(1,14745409)
 	e5:SetCondition(c14745409.eqcon)
-	e5:SetCost(c14745409.eqcost)
 	e5:SetTarget(c14745409.eqtg)
 	e5:SetOperation(c14745409.operation)
 	c:RegisterEffect(e5)
@@ -91,10 +91,6 @@ function c14745409.eqcon(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEUP) and c:IsReason(REASON_DESTROY) and c:CheckUniqueOnField(tp)
 end
-function c14745409.eqcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,14745409)==0 end
-	Duel.RegisterFlagEffect(tp,14745409,RESET_PHASE+PHASE_END,0,1)
-end
 function c14745409.eqfilter2(c)
 	return c:IsFaceup() and c:IsSetCard(0x107a) and c:IsRace(RACE_WARRIOR)
 end

script/c16259549.lua

@@ -38,7 +38,8 @@ function c16259549.initial_effect(c)
 	e4:SetCategory(CATEGORY_TODECK)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
 	e4:SetCode(EVENT_TO_GRAVE)
-	e4:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
+	e4:SetCountLimit(1,16259549)
+	e4:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e4:SetCondition(c16259549.tdcon)
 	e4:SetTarget(c16259549.tdtg)
 	e4:SetOperation(c16259549.tdop)

script/c19667590.lua

@@ -6,7 +6,8 @@ function c19667590.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetRange(LOCATION_GRAVE)
-	e1:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE+EFFECT_FLAG_DELAY)
+	e1:SetCountLimit(1,19667590)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e1:SetCondition(c19667590.spcon)
 	e1:SetCost(c19667590.spcost)
@@ -32,7 +33,7 @@ function c19667590.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return eg:IsExists(c19667590.cfilter,1,nil,tp)
 end
 function c19667590.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,19667590)==0 end
+	if chk==0 then return true end
 	local e1=Effect.CreateEffect(e:GetHandler())
 	e1:SetType(EFFECT_TYPE_FIELD)
 	e1:SetCode(EFFECT_CANNOT_BP)
@@ -40,7 +41,6 @@ function c19667590.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	e1:SetTargetRange(1,0)
 	e1:SetReset(RESET_PHASE+PHASE_END)
 	Duel.RegisterEffect(e1,tp)
-	Duel.RegisterFlagEffect(tp,19667590,RESET_PHASE+PHASE_END,0,1)
 end
 function c19667590.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0

script/c21977828.lua

@@ -21,8 +21,9 @@ function c21977828.initial_effect(c)
 	e3:SetDescription(aux.Stringid(21977828,1))
 	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
 	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetCountLimit(1,21977828)
 	e3:SetCondition(c21977828.spcon)
 	e3:SetTarget(c21977828.sptg)
 	e3:SetOperation(c21977828.spop)
@@ -66,12 +67,11 @@ function c21977828.spfilter(c,e,tp)
 end
 function c21977828.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c21977828.spfilter(chkc,e,tp) end
-	if chk==0 then return Duel.GetFlagEffect(tp,21977828)==0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		and Duel.IsExistingTarget(c21977828.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 	local g=Duel.SelectTarget(tp,c21977828.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
-	Duel.RegisterFlagEffect(tp,21977828,RESET_PHASE+PHASE_END,0,1)
 end
 function c21977828.spop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()

script/c22076135.lua

@@ -5,8 +5,9 @@ function c22076135.initial_effect(c)
 	e1:SetDescription(aux.Stringid(22076135,0))
 	e1:SetCategory(CATEGORY_TOHAND)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
 	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetCountLimit(1,22076135)
 	e1:SetCost(c22076135.thcost)
 	e1:SetTarget(c22076135.thtg)
 	e1:SetOperation(c22076135.thop)
@@ -19,10 +20,8 @@ function c22076135.cfilter(c)
 	return c:IsAttribute(ATTRIBUTE_WATER) and c:IsDiscardable() and c:IsAbleToGraveAsCost()
 end
 function c22076135.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,22076135)==0
-		and Duel.IsExistingMatchingCard(c22076135.cfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
+	if chk==0 then return Duel.IsExistingMatchingCard(c22076135.cfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
 	Duel.DiscardHand(tp,c22076135.cfilter,1,1,REASON_COST+REASON_DISCARD)
-	Duel.RegisterFlagEffect(tp,22076135,RESET_PHASE+PHASE_END,EFFECT_FLAG_OATH,1)
 end
 function c22076135.filter(c)
 	return c:IsLevelBelow(3) and c:IsAttribute(ATTRIBUTE_WATER) and c:IsAbleToHand()

script/c23562407.lua

@@ -37,11 +37,11 @@ function c23562407.initial_effect(c)
 	local e5=Effect.CreateEffect(c)
 	e5:SetDescription(aux.Stringid(23562407,1))
 	e5:SetCategory(CATEGORY_EQUIP)
-	e5:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e5:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e5:SetCode(EVENT_TO_GRAVE)
+	e5:SetCountLimit(1,23562407)
 	e5:SetCondition(c23562407.eqcon)
-	e5:SetCost(c23562407.eqcost)
 	e5:SetTarget(c23562407.eqtg)
 	e5:SetOperation(c23562407.operation)
 	c:RegisterEffect(e5)
@@ -81,10 +81,6 @@ function c23562407.eqcon(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEUP) and c:IsReason(REASON_DESTROY) and c:CheckUniqueOnField(tp)
 end
-function c23562407.eqcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,23562407)==0 end
-	Duel.RegisterFlagEffect(tp,23562407,RESET_PHASE+PHASE_END,0,1)
-end
 function c23562407.eqfilter2(c)
 	return c:IsFaceup() and c:IsSetCard(0x107a) and c:IsRace(RACE_WARRIOR)
 end

script/c23899727.lua

@@ -5,10 +5,10 @@ function c23899727.initial_effect(c)
 	e1:SetDescription(aux.Stringid(23899727,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e1:SetCode(EVENT_TO_GRAVE)
+	e1:SetCountLimit(1,23899727)
 	e1:SetCondition(c23899727.condition)
-	e1:SetCost(c23899727.cost)
 	e1:SetTarget(c23899727.target)
 	e1:SetOperation(c23899727.operation)
 	c:RegisterEffect(e1)
@@ -16,10 +16,6 @@ end
 function c23899727.condition(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsReason(REASON_DESTROY) and e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)
 end
-function c23899727.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,23899727)==0 end
-	Duel.RegisterFlagEffect(tp,23899727,RESET_PHASE+PHASE_END,0,1)
-end
 function c23899727.filter(c,e,tp)
 	return c:IsSetCard(0x74) and c:GetCode()~=23899727 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end

script/c24384095.lua

@@ -5,10 +5,10 @@ function c24384095.initial_effect(c)
 	e1:SetDescription(aux.Stringid(24384095,0))
 	e1:SetCategory(CATEGORY_TOHAND)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e1:SetCode(EVENT_TO_GRAVE)
+	e1:SetCountLimit(1,24384095)
 	e1:SetCondition(c24384095.thcon)
-	e1:SetCost(c24384095.thcost)
 	e1:SetTarget(c24384095.thtg)
 	e1:SetOperation(c24384095.thop)
 	c:RegisterEffect(e1)
@@ -16,10 +16,6 @@ end
 function c24384095.thcon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD) and e:GetHandler():IsReason(REASON_RELEASE)
 end
-function c24384095.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,24384095)==0 end
-	Duel.RegisterFlagEffect(tp,24384095,RESET_PHASE+PHASE_END,0,1)
-end
 function c24384095.filter(c)
 	return c:IsLevelBelow(4) and c:IsAttribute(ATTRIBUTE_WIND) and c:GetCode()~=24384095
 		and not c:IsHasEffect(EFFECT_NECRO_VALLEY) and c:IsAbleToHand()

script/c2521011.lua

@@ -14,9 +14,8 @@ function c2521011.initial_effect(c)
 	e2:SetDescription(aux.Stringid(2521011,0))
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_SUMMON_SUCCESS)
-	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CHAIN_UNIQUE)
-	e2:SetCountLimit(1)
-	e2:SetCost(c2521011.setcost)
+	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
+	e2:SetCountLimit(1,2521011)
 	e2:SetTarget(c2521011.settg)
 	e2:SetOperation(c2521011.setop)
 	c:RegisterEffect(e2)
@@ -46,10 +45,6 @@ function c2521011.spop(e,tp,eg,ep,ev,re,r,rp,c)
 	local g=Duel.SelectMatchingCard(tp,c2521011.spfilter,tp,LOCATION_ONFIELD,0,3,3,nil)
 	Duel.SendtoGrave(g,REASON_COST)
 end
-function c2521011.setcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,2521011)==0 end
-	Duel.RegisterFlagEffect(tp,2521011,RESET_PHASE+PHASE_END,0,1)
-end
 function c2521011.filter(c)
 	return c:IsSetCard(0x7c) and c:IsType(TYPE_TRAP) and c:IsSSetable()
 end

script/c26400609.lua

@@ -6,6 +6,7 @@ function c26400609.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_IGNITION)
 	e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
+	e1:SetCountLimit(1,26400609)
 	e1:SetCost(c26400609.hspcost)
 	e1:SetTarget(c26400609.hsptg)
 	e1:SetOperation(c26400609.hspop)
@@ -16,10 +17,10 @@ function c26400609.initial_effect(c)
 	e2:SetCategory(CATEGORY_TOHAND)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
 	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,26400609)
 	e2:SetProperty(EFFECT_FLAG_REPEAT)
 	e2:SetCode(EVENT_PHASE+PHASE_END)
 	e2:SetCondition(c26400609.retcon)
-	e2:SetCost(c26400609.retcost)
 	e2:SetTarget(c26400609.rettg)
 	e2:SetOperation(c26400609.retop)
 	c:RegisterEffect(e2)
@@ -29,6 +30,7 @@ function c26400609.initial_effect(c)
 	e3:SetCategory(CATEGORY_TOGRAVE)
 	e3:SetType(EFFECT_TYPE_IGNITION)
 	e3:SetRange(LOCATION_HAND)
+	e3:SetCountLimit(1,26400609)
 	e3:SetCost(c26400609.tgcost)
 	e3:SetTarget(c26400609.tgtg)
 	e3:SetOperation(c26400609.tgop)
@@ -39,8 +41,8 @@ function c26400609.initial_effect(c)
 	e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e4:SetCode(EVENT_REMOVE)
-	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
-	e4:SetCost(c26400609.thcost)
+	e4:SetCountLimit(1,26400609)
+	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e4:SetTarget(c26400609.thtg)
 	e4:SetOperation(c26400609.thop)
 	c:RegisterEffect(e4)
@@ -49,12 +51,10 @@ function c26400609.rfilter(c)
 	return (c:IsRace(RACE_DRAGON) or c:IsAttribute(ATTRIBUTE_WATER)) and c:IsAbleToRemoveAsCost()
 end
 function c26400609.hspcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,26400609)==0
-		and Duel.IsExistingMatchingCard(c26400609.rfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,2,e:GetHandler()) end
+	if chk==0 then return Duel.IsExistingMatchingCard(c26400609.rfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,2,e:GetHandler()) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local g=Duel.SelectMatchingCard(tp,c26400609.rfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,2,2,e:GetHandler())
 	Duel.Remove(g,POS_FACEUP,REASON_COST)
-	Duel.RegisterFlagEffect(tp,26400609,RESET_PHASE+PHASE_END,0,1)
 end
 function c26400609.hsptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
@@ -71,10 +71,6 @@ function c26400609.retcon(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.GetTurnPlayer()~=tp
 		and bit.band(e:GetHandler():GetSummonType(),SUMMON_TYPE_SPECIAL)==SUMMON_TYPE_SPECIAL
 end
-function c26400609.retcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,26400609)==0 end
-	Duel.RegisterFlagEffect(tp,26400609,RESET_PHASE+PHASE_END,0,1)
-end
 function c26400609.rettg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0)
@@ -89,14 +85,12 @@ function c26400609.dfilter(c)
 	return c:IsAttribute(ATTRIBUTE_WATER) and c:IsDiscardable() and c:IsAbleToGraveAsCost()
 end
 function c26400609.tgcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,26400609)==0
-		and e:GetHandler():IsDiscardable() and e:GetHandler():IsAbleToGraveAsCost()
+	if chk==0 then return e:GetHandler():IsDiscardable() and e:GetHandler():IsAbleToGraveAsCost()
 		and Duel.IsExistingMatchingCard(c26400609.dfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISCARD)
 	local g=Duel.SelectMatchingCard(tp,c26400609.dfilter,tp,LOCATION_HAND,0,1,1,e:GetHandler())
 	g:AddCard(e:GetHandler())
 	Duel.SendtoGrave(g,REASON_COST+REASON_DISCARD)
-	Duel.RegisterFlagEffect(tp,26400609,RESET_PHASE+PHASE_END,0,1)
 end
 function c26400609.tgfilter(c)
 	return c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
@@ -112,10 +106,6 @@ function c26400609.tgop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.SendtoGrave(g,REASON_EFFECT)
 	end
 end
-function c26400609.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,26400609)==0 end
-	Duel.RegisterFlagEffect(tp,26400609,RESET_PHASE+PHASE_END,0,1)
-end
 function c26400609.thfilter(c)
 	return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_WATER) and c:IsAbleToHand()
 end

script/c27632240.lua

@@ -5,11 +5,10 @@ function c27632240.initial_effect(c)
 	e1:SetDescription(aux.Stringid(27632240,0))
 	e1:SetCategory(CATEGORY_TOGRAVE)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
-	e1:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
 	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,27632240)
 	e1:SetCode(EVENT_TO_HAND)
 	e1:SetCondition(c27632240.tgcon1)
-	e1:SetCost(c27632240.tgcost)
 	e1:SetTarget(c27632240.tgtg)
 	e1:SetOperation(c27632240.tgop)
 	c:RegisterEffect(e1)
@@ -30,10 +29,6 @@ end
 function c27632240.tgcon2(e,tp,eg,ep,ev,re,r,rp)
 	return eg:IsExists(c27632240.cfilter2,1,nil)
 end
-function c27632240.tgcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,27632240)==0 end
-	Duel.RegisterFlagEffect(tp,27632240,RESET_PHASE+PHASE_END,0,1)
-end
 function c27632240.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)

script/c27971137.lua

@@ -11,10 +11,10 @@ function c27971137.initial_effect(c)
 	e2:SetDescription(aux.Stringid(27971137,1))
 	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e2:SetCode(EVENT_TO_GRAVE)
+	e1:SetCountLimit(1,27971137)
 	e2:SetCondition(c27971137.spcon)
-	e2:SetCost(c27971137.spcost)
 	e2:SetTarget(c27971137.sptg)
 	e2:SetOperation(c27971137.spop)
 	c:RegisterEffect(e2)
@@ -31,10 +31,6 @@ end
 function c27971137.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD) and e:GetHandler():IsReason(REASON_DESTROY)
 end
-function c27971137.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,27971137)==0 end
-	Duel.RegisterFlagEffect(tp,27971137,RESET_PHASE+PHASE_END,0,1)
-end
 function c27971137.filter(c,e,tp)
 	return c:GetLevel()==1 and (c:GetAttack()==0 and c:GetDefence()==0) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end

script/c28194325.lua

@@ -5,10 +5,9 @@ function c28194325.initial_effect(c)
 	e1:SetDescription(aux.Stringid(28194325,0))
 	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCountLimit(1,28194325)
 	e1:SetCondition(c28194325.condition)
-	e1:SetCost(c28194325.cost)
 	e1:SetTarget(c28194325.target)
 	e1:SetOperation(c28194325.operation)
 	c:RegisterEffect(e1)
@@ -16,10 +15,6 @@ end
 function c28194325.condition(e,tp,eg,ep,ev,re,r,rp)
 	return re and re:GetHandler():IsSetCard(0x106f)
 end
-function c28194325.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,28194325)==0 end
-	Duel.RegisterFlagEffect(tp,28194325,RESET_PHASE+PHASE_END,0,1)
-end
 function c28194325.filter(c)
 	return c:IsSetCard(0x106f) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
 end

script/c2830693.lua

@@ -8,7 +8,7 @@ function c2830693.initial_effect(c)
 	e1:SetCode(EVENT_ATTACK_ANNOUNCE)
 	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e1:SetRange(LOCATION_HAND)
-	e1:SetCost(c2830693.eqcost)
+	e1:SetCountLimit(1,2830693)
 	e1:SetTarget(c2830693.eqtg)
 	e1:SetOperation(c2830693.eqop)
 	c:RegisterEffect(e1)
@@ -19,17 +19,12 @@ function c2830693.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_ATTACK_ANNOUNCE)
 	e2:SetRange(LOCATION_GRAVE)
-	e2:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
+	e2:SetCountLimit(1,2830694)
 	e2:SetCondition(c2830693.spcon)
-	e2:SetCost(c2830693.spcost)
 	e2:SetTarget(c2830693.sptg)
 	e2:SetOperation(c2830693.spop)
 	c:RegisterEffect(e2)
 end
-function c2830693.eqcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,2830693)==0 end
-	Duel.RegisterFlagEffect(tp,2830693,RESET_PHASE+PHASE_END,0,1)
-end
 function c2830693.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	local at=Duel.GetAttacker()
 	if chkc then return chkc==at end
@@ -66,10 +61,6 @@ end
 function c2830693.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.GetAttacker():IsControler(1-tp) and Duel.GetAttackTarget()==nil
 end
-function c2830693.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,2830694)==0 end
-	Duel.RegisterFlagEffect(tp,2830694,RESET_PHASE+PHASE_END,0,1)
-end
 function c2830693.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end

script/c29143726.lua

@@ -9,7 +9,7 @@ function c29143726.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_TO_GRAVE)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e1:SetCountLimit(1,29143726)
 	e1:SetCondition(c29143726.spcon1)
 	e1:SetTarget(c29143726.sptg)

script/c3072808.lua

@@ -6,8 +6,9 @@ function c3072808.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
 	e1:SetCode(EVENT_BATTLE_DAMAGE)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e1:SetRange(LOCATION_GRAVE)
+	e1:SetCountLimit(1,3072808)
 	e1:SetCondition(c3072808.condition)
 	e1:SetTarget(c3072808.target)
 	e1:SetOperation(c3072808.operation)

script/c30929786.lua

@@ -5,10 +5,10 @@ function c30929786.initial_effect(c)
 	e1:SetDescription(aux.Stringid(30929786,0))
 	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e1:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
-	e1:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE+EFFECT_FLAG_DAMAGE_STEP)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCountLimit(1,30929786)
 	e1:SetCondition(c30929786.thcon)
-	e1:SetCost(c30929786.thcost)
 	e1:SetTarget(c30929786.thtg)
 	e1:SetOperation(c30929786.thop)
 	c:RegisterEffect(e1)
@@ -26,10 +26,6 @@ end
 function c30929786.thcon(e,tp,eg,ep,ev,re,r,rp)
 	return re:GetHandler():IsSetCard(0x79) and re:GetHandler():IsType(TYPE_MONSTER)
 end
-function c30929786.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,30929786)==0 end
-	Duel.RegisterFlagEffect(tp,30929786,RESET_PHASE+PHASE_END,0,1)
-end
 function c30929786.thfilter(c)
 	return c:IsSetCard(0x79) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
 end

script/c31533704.lua

@@ -26,10 +26,9 @@ function c31533704.initial_effect(c)
 	e4:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
 	e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
 	e4:SetRange(LOCATION_MZONE)
-	e4:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
 	e4:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e4:SetCountLimit(1,31533704)
 	e4:SetCondition(c31533704.spcon)
-	e4:SetCost(c31533704.spcost)
 	e4:SetTarget(c31533704.sptg)
 	e4:SetOperation(c31533704.spop)
 	c:RegisterEffect(e4)
@@ -63,10 +62,6 @@ end
 function c31533704.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return eg:IsExists(c31533704.spfilter,1,nil,tp)
 end
-function c31533704.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,31533704)==0 end
-	Duel.RegisterFlagEffect(tp,31533704,RESET_PHASE+PHASE_END,0,1)
-end
 function c31533704.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)

script/c32623004.lua

@@ -6,10 +6,10 @@ function c32623004.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_QUICK_F)
 	e1:SetCode(EVENT_CHAINING)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
 	e1:SetRange(LOCATION_GRAVE)
+	e1:SetCountLimit(1,32623004)
 	e1:SetCondition(c32623004.spcon)
-	e1:SetCost(c32623004.spcost)
 	e1:SetTarget(c32623004.sptg)
 	e1:SetOperation(c32623004.spop)
 	c:RegisterEffect(e1)
@@ -27,10 +27,6 @@ end
 function c32623004.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return re:GetHandler():IsSetCard(0x5a)
 end
-function c32623004.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,32623004)==0 end
-	Duel.RegisterFlagEffect(tp,32623004,RESET_PHASE+PHASE_END,0,1)
-end
 function c32623004.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)

script/c33698022.lua

@@ -8,7 +8,7 @@ function c33698022.initial_effect(c)
 	e1:SetDescription(aux.Stringid(33698022,0))
 	e1:SetCategory(CATEGORY_TOHAND)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e1:SetCountLimit(1,33698022)
 	e1:SetTarget(c33698022.thtg)
@@ -19,7 +19,7 @@ function c33698022.initial_effect(c)
 	e2:SetCategory(CATEGORY_TOHAND)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e2:SetRange(LOCATION_MZONE)
 	e2:SetCountLimit(1,33698022)
 	e2:SetCondition(c33698022.thcon)

script/c34620088.lua

@@ -13,9 +13,8 @@ function c34620088.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e2:SetRange(LOCATION_GRAVE)
 	e2:SetCode(EVENT_BATTLE_DAMAGE)
-	e2:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
+	e2:SetCountLimit(1,34620088)
 	e2:SetCondition(c34620088.spcon)
-	e2:SetCost(c34620088.spcost)
 	e2:SetTarget(c34620088.sptg)
 	e2:SetOperation(c34620088.spop)
 	c:RegisterEffect(e2)
@@ -33,10 +32,6 @@ end
 function c34620088.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return ep==tp and eg:GetFirst():IsControler(1-tp) and Duel.GetAttackTarget()==nil
 end
-function c34620088.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,34620088)==0 end
-	Duel.RegisterFlagEffect(tp,34620088,RESET_PHASE+PHASE_END,0,1)
-end
 function c34620088.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end

script/c35307484.lua

@@ -4,12 +4,12 @@ function c35307484.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(35307484,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,35307484)
 	e1:SetCode(EVENT_SUMMON_SUCCESS)
 	e1:SetCondition(c35307484.condition)
-	e1:SetCost(c35307484.cost)
 	e1:SetTarget(c35307484.target)
 	e1:SetOperation(c35307484.operation)
 	c:RegisterEffect(e1)
@@ -23,10 +23,6 @@ end
 function c35307484.condition(e,tp,eg,ep,ev,re,r,rp)
 	return not eg:IsContains(e:GetHandler()) and eg:IsExists(c35307484.cfilter,1,nil,tp)
 end
-function c35307484.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,35307484)==0 end
-	Duel.RegisterFlagEffect(tp,35307484,RESET_PHASE+PHASE_END,0,1)
-end
 function c35307484.spfilter(c,e,tp)
 	return c:GetLevel()==2 and c:IsRace(RACE_FIEND) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end

script/c35629124.lua

@@ -5,8 +5,9 @@ function c35629124.initial_effect(c)
 	e1:SetDescription(aux.Stringid(35629124,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e1:SetCode(EVENT_TO_GRAVE)
+	e1:SetCountLimit(1,35629124)
 	e1:SetCondition(c35629124.spcon)
 	e1:SetCost(c35629124.spcost)
 	e1:SetTarget(c35629124.sptg)
@@ -38,8 +39,7 @@ function c35629124.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return not e:GetHandler():IsReason(REASON_RETURN)
 end
 function c35629124.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,35629124)==0
-		and not (Duel.GetTurnPlayer()==tp and Duel.GetCurrentPhase()>PHASE_MAIN1 and Duel.GetCurrentPhase()<PHASE_END) end
+	if chk==0 then return not (Duel.GetTurnPlayer()==tp and Duel.GetCurrentPhase()>PHASE_MAIN1 and Duel.GetCurrentPhase()<PHASE_END) end
 	local e1=Effect.CreateEffect(e:GetHandler())
 	e1:SetType(EFFECT_TYPE_FIELD)
 	e1:SetCode(EFFECT_CANNOT_BP)
@@ -55,7 +55,6 @@ function c35629124.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	e2:SetTargetRange(1,0)
 	e2:SetTarget(c35629124.sumlimit)
 	Duel.RegisterEffect(e2,tp)
-	Duel.RegisterFlagEffect(tp,35629124,RESET_PHASE+PHASE_END,0,1)
 end
 function c35629124.sumlimit(e,c)
 	return not c:IsRace(RACE_DRAGON)

script/c35842855.lua

@@ -21,8 +21,8 @@ function c35842855.initial_effect(c)
 	e3:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
-	e3:SetCost(c35842855.descost)
+	e3:SetCountLimit(1,35842855)
+	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e3:SetTarget(c35842855.destg)
 	e3:SetOperation(c35842855.desop)
 	c:RegisterEffect(e3)
@@ -38,10 +38,6 @@ function c35842855.spcon(e,c)
 	return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0 and
 		Duel.GetMatchingGroupCount(Card.IsAttribute,c:GetControler(),LOCATION_GRAVE,0,nil,ATTRIBUTE_FIRE)==5
 end
-function c35842855.descost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,35842855)==0 end
-	Duel.RegisterFlagEffect(tp,35842855,RESET_PHASE+PHASE_END,0,1)
-end
 function c35842855.filter(c)
 	return c:IsDestructable()
 end

script/c36405256.lua

@@ -5,21 +5,17 @@ function c36405256.initial_effect(c)
 	e1:SetDescription(aux.Stringid(36405256,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e1:SetCode(EVENT_SUMMON_SUCCESS)
-	e1:SetCost(c36405256.spcost)
+	e1:SetCountLimit(1,36405256)
 	e1:SetTarget(c36405256.sptg)
 	e1:SetOperation(c36405256.spop)
 	c:RegisterEffect(e1)
 	local e2=e1:Clone()
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CHAIN_UNIQUE)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e2)
 end
-function c36405256.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,36405256)==0 end
-	Duel.RegisterFlagEffect(tp,36405256,RESET_PHASE+PHASE_END,0,1)
-end
 function c36405256.filter(c,e,tp)
 	return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end

script/c36569343.lua

@@ -5,11 +5,10 @@ function c36569343.initial_effect(c)
 	e1:SetDescription(aux.Stringid(36569343,0))
 	e1:SetCategory(CATEGORY_TOGRAVE)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
-	e1:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
 	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,36569343)
 	e1:SetCode(EVENT_TO_GRAVE)
 	e1:SetCondition(c36569343.tgcon1)
-	e1:SetCost(c36569343.tgcost)
 	e1:SetTarget(c36569343.tgtg)
 	e1:SetOperation(c36569343.tgop1)
 	c:RegisterEffect(e1)
@@ -17,10 +16,9 @@ function c36569343.initial_effect(c)
 	e2:SetDescription(aux.Stringid(36569343,0))
 	e2:SetCategory(CATEGORY_TOGRAVE)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e2:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
+	e2:SetCountLimit(1,36569343)
 	e2:SetCode(EVENT_TO_GRAVE)
 	e2:SetCondition(c36569343.tgcon2)
-	e2:SetCost(c36569343.tgcost)
 	e2:SetTarget(c36569343.tgtg)
 	e2:SetOperation(c36569343.tgop2)
 	c:RegisterEffect(e2)
@@ -31,10 +29,6 @@ end
 function c36569343.tgcon1(e,tp,eg,ep,ev,re,r,rp)
 	return eg:IsExists(c36569343.cfilter,1,nil,tp)
 end
-function c36569343.tgcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,36569343)==0 end
-	Duel.RegisterFlagEffect(tp,36569343,RESET_PHASE+PHASE_END,0,1)
-end
 function c36569343.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)

script/c40607210.lua

@@ -6,8 +6,8 @@ function c40607210.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetRange(LOCATION_GRAVE)
-	e1:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCountLimit(1,40607210)
 	e1:SetCondition(c40607210.condition)
 	e1:SetCost(c40607210.cost)
 	e1:SetTarget(c40607210.target)
@@ -33,9 +33,8 @@ function c40607210.condition(e,tp,eg,ep,ev,re,r,rp)
 		and (re:GetCode()~=EFFECT_SPSUMMON_PROC or not rc:IsStatus(STATUS_REVIVE_LIMIT))
 end
 function c40607210.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,40607210)==0 and Duel.CheckLPCost(tp,2000) end
+	if chk==0 then return Duel.CheckLPCost(tp,2000) end
 	Duel.PayLPCost(tp,2000)
-	Duel.RegisterFlagEffect(tp,40607210,RESET_PHASE+PHASE_END,0,1)
 end
 function c40607210.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0

script/c4179255.lua

---o 󥷥
+--妖精竜 エンシェント
 function c4179255.initial_effect(c)
 	--synchro summon
 	aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
@@ -7,12 +7,12 @@ function c4179255.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetCategory(CATEGORY_DRAW)
 	e1:SetDescription(aux.Stringid(4179255,0))
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
 	e1:SetCode(EVENT_CHAIN_SOLVED)
 	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,4179255)
 	e1:SetCondition(c4179255.drcon)
-	e1:SetCost(c4179255.drcost)
 	e1:SetTarget(c4179255.drtg)
 	e1:SetOperation(c4179255.drop)
 	c:RegisterEffect(e1)
@@ -32,10 +32,6 @@ end
 function c4179255.drcon(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.GetTurnPlayer()==tp and re and re:IsActiveType(TYPE_FIELD) and re:IsHasType(EFFECT_TYPE_ACTIVATE)
 end
-function c4179255.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,4179255)==0 end
-	Duel.RegisterFlagEffect(tp,4179255,RESET_PHASE+PHASE_END,0,1)
-end
 function c4179255.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return e:GetHandler():IsRelateToEffect(e) and e:GetHandler():IsFaceup() end
 	Duel.SetTargetPlayer(tp)

script/c42082363.lua

@@ -6,7 +6,8 @@ function c42082363.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_TO_GRAVE)
-	e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
+	e1:SetCountLimit(1,42082363)
 	e1:SetCondition(c42082363.condition)
 	e1:SetTarget(c42082363.target)
 	e1:SetOperation(c42082363.operation)
@@ -19,10 +20,9 @@ function c42082363.filter(c,e,tp)
 	return c:IsSetCard(0x10) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end
 function c42082363.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.GetFlagEffect(tp,42082364)==0
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		and Duel.IsExistingMatchingCard(c42082363.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
-	Duel.RegisterFlagEffect(tp,42082364,RESET_PHASE+PHASE_END,0,1)
 end
 function c42082363.operation(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end

script/c45286019.lua

@@ -6,7 +6,7 @@ function c45286019.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e1:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetCountLimit(1,45286019)
 	e1:SetCondition(c45286019.spcon)
 	e1:SetCost(c45286019.spcost)
 	e1:SetTarget(c45286019.sptg)
@@ -38,16 +38,15 @@ function c45286019.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return re:GetHandler():IsSetCard(0x72)
 end
 function c45286019.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,45286019)==0 end
+	if chk==0 then return true end
 	local e1=Effect.CreateEffect(e:GetHandler())
 	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
 	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
 	e1:SetReset(RESET_PHASE+PHASE_END)
 	e1:SetTargetRange(1,0)
 	e1:SetTarget(c45286019.splimit)
 	Duel.RegisterEffect(e1,tp)
-	Duel.RegisterFlagEffect(tp,45286019,RESET_PHASE+PHASE_END,0,1)
 end
 function c45286019.splimit(e,c,sump,sumtype,sumpos,targetp,se)
 	return not c:IsSetCard(0x72)

script/c46659709.lua

@@ -16,8 +16,7 @@ function c46659709.initial_effect(c)
 	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e2:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
-	e2:SetCost(c46659709.cost)
+	e2:SetCountLimit(1,46659709)
 	e2:SetTarget(c46659709.target)
 	e2:SetOperation(c46659709.operation)
 	c:RegisterEffect(e2)
@@ -39,10 +38,6 @@ function c46659709.spop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP_DEFENCE)
 	end
 end
-function c46659709.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,46659709)==0 end
-	Duel.RegisterFlagEffect(tp,46659709,RESET_PHASE+PHASE_END,0,1)
-end
 function c46659709.filter(c)
 	return c:IsSetCard(0x7b) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
 end

script/c51196805.lua

@@ -20,9 +20,8 @@ function c51196805.initial_effect(c)
 	e3:SetDescription(aux.Stringid(51196805,1))
 	e3:SetCategory(CATEGORY_REMOVE)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e3:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
+	e3:SetCountLimit(1,51196805)
 	e3:SetCode(EVENT_FLIP)
-	e3:SetCost(c51196805.rmcost)
 	e3:SetTarget(c51196805.rmtg)
 	e3:SetOperation(c51196805.rmop)
 	c:RegisterEffect(e3)
@@ -45,10 +44,6 @@ function c51196805.posop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.ChangePosition(c,POS_FACEDOWN_DEFENCE)
 	end
 end
-function c51196805.rmcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,51196805)==0 end
-	Duel.RegisterFlagEffect(tp,51196805,RESET_PHASE+PHASE_END,0,1)
-end
 function c51196805.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,1-tp,LOCATION_DECK)

script/c51865604.lua

@@ -17,8 +17,9 @@ function c51865604.initial_effect(c)
 	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e2:SetRange(LOCATION_MZONE)
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
 	e2:SetCode(EVENT_REMOVE)
+	e2:SetCountLimit(1,51865604)
 	e2:SetCondition(c51865604.spcon)
 	e2:SetCost(c51865604.spcost)
 	e2:SetTarget(c51865604.sptg)
@@ -53,9 +54,8 @@ function c51865604.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.GetCurrentPhase()==PHASE_BATTLE and eg:IsExists(c51865604.spfilter,1,nil,e,tp)
 end
 function c51865604.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,51865604)==0 and e:GetHandler():IsAbleToRemoveAsCost() end
+	if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost() end
 	Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_COST)
-	Duel.RegisterFlagEffect(tp,51865604,RESET_PHASE+PHASE_END,0,1)
 end
 function c51865604.rmfilter(c)
 	return c:IsAttackBelow(3000) and c:IsAbleToRemove()

script/c53550467.lua

@@ -25,10 +25,10 @@ function c53550467.initial_effect(c)
 	e3:SetDescription(aux.Stringid(53550467,0))
 	e3:SetCategory(CATEGORY_DESTROY)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
+	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e3:SetCode(EVENT_EQUIP)
+	e3:SetCountLimit(1,53550467)
 	e3:SetCondition(c53550467.descon)
-	e3:SetCost(c53550467.descost)
 	e3:SetTarget(c53550467.destg)
 	e3:SetOperation(c53550467.desop)
 	c:RegisterEffect(e3)
@@ -48,10 +48,6 @@ end
 function c53550467.descon(e,tp,eg,ep,ev,re,r,rp)
 	return eg:IsExists(Card.IsSetCard,1,nil,0x207a)
 end
-function c53550467.descost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,53550467)==0 end
-	Duel.RegisterFlagEffect(tp,53550467,RESET_PHASE+PHASE_END,0,1)
-end
 function c53550467.desfilter(c)
 	return c:IsFaceup() and c:IsDestructable()
 end

script/c53804307.lua

@@ -6,6 +6,7 @@ function c53804307.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_IGNITION)
 	e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
+	e1:SetCountLimit(1,53804307)
 	e1:SetCost(c53804307.hspcost)
 	e1:SetTarget(c53804307.hsptg)
 	e1:SetOperation(c53804307.hspop)
@@ -16,6 +17,7 @@ function c53804307.initial_effect(c)
 	e2:SetCategory(CATEGORY_TOHAND)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
 	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,53804307)
 	e2:SetProperty(EFFECT_FLAG_REPEAT)
 	e2:SetCode(EVENT_PHASE+PHASE_END)
 	e2:SetCondition(c53804307.retcon)
@@ -30,6 +32,7 @@ function c53804307.initial_effect(c)
 	e3:SetType(EFFECT_TYPE_IGNITION)
 	e3:SetRange(LOCATION_HAND)
 	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e3:SetCountLimit(1,53804307)
 	e3:SetCost(c53804307.descost)
 	e3:SetTarget(c53804307.destg)
 	e3:SetOperation(c53804307.desop)
@@ -40,8 +43,8 @@ function c53804307.initial_effect(c)
 	e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e4:SetCode(EVENT_REMOVE)
-	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
-	e4:SetCost(c53804307.thcost)
+	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e4:SetCountLimit(1,53804307)
 	e4:SetTarget(c53804307.thtg)
 	e4:SetOperation(c53804307.thop)
 	c:RegisterEffect(e4)
@@ -50,12 +53,10 @@ function c53804307.rfilter(c)
 	return (c:IsRace(RACE_DRAGON) or c:IsAttribute(ATTRIBUTE_FIRE)) and c:IsAbleToRemoveAsCost()
 end
 function c53804307.hspcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,53804307)==0
-		and Duel.IsExistingMatchingCard(c53804307.rfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,2,e:GetHandler()) end
+	if chk==0 then return Duel.IsExistingMatchingCard(c53804307.rfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,2,e:GetHandler()) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local g=Duel.SelectMatchingCard(tp,c53804307.rfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,2,2,e:GetHandler())
 	Duel.Remove(g,POS_FACEUP,REASON_COST)
-	Duel.RegisterFlagEffect(tp,53804307,RESET_PHASE+PHASE_END,0,1)
 end
 function c53804307.hsptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
@@ -72,10 +73,6 @@ function c53804307.retcon(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.GetTurnPlayer()~=tp
 		and bit.band(e:GetHandler():GetSummonType(),SUMMON_TYPE_SPECIAL)==SUMMON_TYPE_SPECIAL
 end
-function c53804307.retcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,53804307)==0 end
-	Duel.RegisterFlagEffect(tp,53804307,RESET_PHASE+PHASE_END,0,1)
-end
 function c53804307.rettg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0)
@@ -90,14 +87,12 @@ function c53804307.dfilter(c)
 	return c:IsAttribute(ATTRIBUTE_FIRE) and c:IsDiscardable() and c:IsAbleToGraveAsCost()
 end
 function c53804307.descost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,53804307)==0
-		and e:GetHandler():IsDiscardable() and e:GetHandler():IsAbleToGraveAsCost()
+	if chk==0 then return e:GetHandler():IsDiscardable() and e:GetHandler():IsAbleToGraveAsCost()
 		and Duel.IsExistingMatchingCard(c53804307.dfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISCARD)
 	local g=Duel.SelectMatchingCard(tp,c53804307.dfilter,tp,LOCATION_HAND,0,1,1,e:GetHandler())
 	g:AddCard(e:GetHandler())
 	Duel.SendtoGrave(g,REASON_COST+REASON_DISCARD)
-	Duel.RegisterFlagEffect(tp,53804307,RESET_PHASE+PHASE_END,0,1)
 end
 function c53804307.desfilter(c)
 	return c:IsDestructable()
@@ -115,10 +110,6 @@ function c53804307.desop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.Destroy(tc,REASON_EFFECT)
 	end
 end
-function c53804307.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,53804307)==0 end
-	Duel.RegisterFlagEffect(tp,53804307,RESET_PHASE+PHASE_END,0,1)
-end
 function c53804307.thfilter(c)
 	return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_FIRE) and c:IsAbleToHand()
 end

script/c56105047.lua

@@ -6,16 +6,12 @@ function c56105047.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE+EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
-	e1:SetCost(c56105047.spcost)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
+	e1:SetCountLimit(1,56105047)
 	e1:SetTarget(c56105047.sptg)
 	e1:SetOperation(c56105047.spop)
 	c:RegisterEffect(e1)
 end
-function c56105047.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,56105047)==0 end
-	Duel.RegisterFlagEffect(tp,56105047,RESET_PHASE+PHASE_END,0,1)
-end
 function c56105047.filter(c,e,tp)
 	return c:GetCode()==62476815 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end

script/c56804361.lua

@@ -6,7 +6,7 @@ function c56804361.initial_effect(c)
 	e1:SetCategory(CATEGORY_TOHAND)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e1:SetCountLimit(1,56804361)
 	e1:SetCondition(c56804361.condition)
 	e1:SetTarget(c56804361.target)

script/c58165765.lua

@@ -5,8 +5,9 @@ function c58165765.initial_effect(c)
 	e1:SetDescription(aux.Stringid(58165765,0))
 	e1:SetCategory(CATEGORY_TODECK)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
 	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetCountLimit(1,58165765)
 	e1:SetCost(c58165765.cost)
 	e1:SetTarget(c58165765.target)
 	e1:SetOperation(c58165765.operation)
@@ -22,12 +23,10 @@ function c58165765.cfilter(c)
 	return (c:IsSetCard(0x2b) or c:IsSetCard(0x61)) and c:IsAbleToRemoveAsCost()
 end
 function c58165765.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,58165765)==0
-		and Duel.IsExistingMatchingCard(c58165765.cfilter,tp,LOCATION_GRAVE,0,1,nil) end
+	if chk==0 then return Duel.IsExistingMatchingCard(c58165765.cfilter,tp,LOCATION_GRAVE,0,1,nil) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local g=Duel.SelectMatchingCard(tp,c58165765.cfilter,tp,LOCATION_GRAVE,0,1,1,nil)
 	Duel.Remove(g,POS_FACEUP,REASON_COST)
-	Duel.RegisterFlagEffect(tp,58165765,RESET_PHASE+PHASE_END,0,1)
 end
 function c58165765.filter(c)
 	return c:IsFacedown() and c:IsAbleToDeck()

script/c58471134.lua

@@ -5,8 +5,9 @@ function c58471134.initial_effect(c)
 	e1:SetDescription(aux.Stringid(58471134,0))
 	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
 	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetCountLimit(1,58471134)
 	e1:SetCost(c58471134.thcost)
 	e1:SetTarget(c58471134.thtg)
 	e1:SetOperation(c58471134.thop)
@@ -19,10 +20,8 @@ function c58471134.cfilter(c)
 	return c:IsAttribute(ATTRIBUTE_WATER) and c:IsDiscardable() and c:IsAbleToGraveAsCost()
 end
 function c58471134.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,58471134)==0
-		and Duel.IsExistingMatchingCard(c58471134.cfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
+	if chk==0 then return Duel.IsExistingMatchingCard(c58471134.cfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
 	Duel.DiscardHand(tp,c58471134.cfilter,1,1,REASON_COST+REASON_DISCARD)
-	Duel.RegisterFlagEffect(tp,58471134,RESET_PHASE+PHASE_END,EFFECT_FLAG_OATH,1)
 end
 function c58471134.filter(c)
 	return c:GetLevel()==3 and c:IsAttribute(ATTRIBUTE_WATER) and c:IsAbleToHand()

script/c60470713.lua

@@ -10,8 +10,8 @@ function c60470713.initial_effect(c)
 	e2:SetDescription(aux.Stringid(60470713,0))
 	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
-	e2:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
 	e2:SetRange(LOCATION_SZONE)
+	e2:SetCountLimit(1,60470713)
 	e2:SetCode(EVENT_TO_DECK)
 	e2:SetCondition(c60470713.condition)
 	e2:SetTarget(c60470713.target)
@@ -30,8 +30,7 @@ function c60470713.condition(e,tp,eg,ep,ev,re,r,rp)
 	return bit.band(r,REASON_EFFECT)~=0 and eg:IsExists(c60470713.cfilter,1,nil,tp)
 end
 function c60470713.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,60470713)==0 and e:GetHandler():IsRelateToEffect(e) end
-	Duel.RegisterFlagEffect(tp,60470713,RESET_PHASE+PHASE_END,EFFECT_FLAG_OATH,1)
+	if chk==0 then return e:GetHandler():IsRelateToEffect(e) end
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
 end
 function c60470713.mfilter(c)

script/c60953949.lua

@@ -5,10 +5,10 @@ function c60953949.initial_effect(c)
 	e1:SetDescription(aux.Stringid(60953949,0))
 	e1:SetCategory(CATEGORY_TOHAND)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
 	e1:SetCode(EVENT_TO_HAND)
+	e1:SetCountLimit(1,60953949)
 	e1:SetCondition(c60953949.thcon)
-	e1:SetCost(c60953949.thcost)
 	e1:SetTarget(c60953949.thtg)
 	e1:SetOperation(c60953949.thop)
 	c:RegisterEffect(e1)
@@ -17,10 +17,6 @@ function c60953949.thcon(e,tp,eg,ep,ev,re,r,rp)
 	return not e:GetHandler():IsReason(REASON_DRAW)
 		and e:GetHandler():IsPreviousLocation(LOCATION_DECK+LOCATION_GRAVE)
 end
-function c60953949.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,60953949)==0 end
-	Duel.RegisterFlagEffect(tp,60953949,RESET_PHASE+PHASE_END,0,1)
-end
 function c60953949.filter(c)
 	return (c:GetAttack()==500 or c:GetDefence()==500) and c:GetCode()~=60953949
 		and c:IsRace(RACE_MACHINE) and c:IsAttribute(ATTRIBUTE_EARTH) and c:IsAbleToHand()

script/c61466310.lua

@@ -19,11 +19,10 @@ function c61466310.initial_effect(c)
 	e3:SetDescription(aux.Stringid(61466310,0))
 	e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e3:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
 	e3:SetRange(LOCATION_SZONE)
+	e3:SetCountLimit(1,61466310)
 	e3:SetCode(EVENT_SUMMON_SUCCESS)
 	e3:SetCondition(c61466310.thcon)
-	e3:SetCost(c61466310.thcost)
 	e3:SetTarget(c61466310.thtg)
 	e3:SetOperation(c61466310.thop)
 	c:RegisterEffect(e3)
@@ -34,10 +33,6 @@ end
 function c61466310.thcon(e,tp,eg,ep,ev,re,r,rp)
 	return ep==tp and bit.band(eg:GetFirst():GetSummonType(),SUMMON_TYPE_ADVANCE)==SUMMON_TYPE_ADVANCE
 end
-function c61466310.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,61466310)==0 end
-	Duel.RegisterFlagEffect(tp,61466310,RESET_PHASE+PHASE_END,0,1)
-end
 function c61466310.filter(c,code)
 	return (c:GetAttack()==2400 or c:GetAttack()==2800) and c:GetDefence()==1000 and c:GetCode()~=code and c:IsAbleToHand()
 end

script/c63257623.lua

@@ -17,10 +17,10 @@ function c63257623.initial_effect(c)
 	e3:SetDescription(aux.Stringid(63257623,1))
 	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
 	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetCountLimit(1,63257623)
 	e3:SetCondition(c63257623.spcon)
-	e3:SetCost(c63257623.spcost)
 	e3:SetTarget(c63257623.sptg)
 	e3:SetOperation(c63257623.spop)
 	c:RegisterEffect(e3)
@@ -45,10 +45,6 @@ function c63257623.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return c:IsPreviousLocation(LOCATION_DECK) and
 		(c:IsReason(REASON_REVEAL) or c:GetPreviousPosition()==POS_FACEUP_DEFENCE or Duel.IsPlayerAffectedByEffect(tp,EFFECT_REVERSE_DECK))
 end
-function c63257623.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,63257623)==0 end
-	Duel.RegisterFlagEffect(tp,63257623,RESET_PHASE+PHASE_END,0,1)
-end
 function c63257623.filter(c,e,tp)
 	return c:IsLevelBelow(4) and c:IsRace(RACE_PLANT) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end

script/c6351548.lua

@@ -6,9 +6,9 @@ function c6351548.initial_effect(c)
 	e1:SetCategory(CATEGORY_TOGRAVE)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_TO_GRAVE)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e1:SetCountLimit(1,6351548)
 	e1:SetCondition(c6351548.condition)
-	e1:SetCost(c6351548.cost)
 	e1:SetTarget(c6351548.target)
 	e1:SetOperation(c6351548.operation)
 	c:RegisterEffect(e1)
@@ -18,9 +18,9 @@ function c6351548.initial_effect(c)
 	e2:SetCategory(CATEGORY_TODECK)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
 	e2:SetCode(EVENT_TO_GRAVE)
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCountLimit(1,6351548)
 	e2:SetCondition(c6351548.tdcon)
-	e2:SetCost(c6351548.cost)
 	e2:SetTarget(c6351548.tdtg)
 	e2:SetOperation(c6351548.tdop)
 	c:RegisterEffect(e2)
@@ -28,10 +28,6 @@ end
 function c6351548.condition(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)
 end
-function c6351548.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,6351548)==0 end
-	Duel.RegisterFlagEffect(tp,6351548,RESET_PHASE+PHASE_END,0,1)
-end
 function c6351548.tgfilter(c)
 	return c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsAbleToGrave()
 end

script/c65961085.lua

@@ -5,10 +5,10 @@ function c65961085.initial_effect(c)
 	e1:SetDescription(aux.Stringid(65961085,0))
 	e1:SetCategory(CATEGORY_TODECK)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCountLimit(1,65961085)
 	e1:SetCondition(c65961085.retcon)
-	e1:SetCost(c65961085.retcost)
 	e1:SetTarget(c65961085.rettg)
 	e1:SetOperation(c65961085.retop)
 	c:RegisterEffect(e1)
@@ -16,10 +16,6 @@ end
 function c65961085.retcon(e,tp,eg,ep,ev,re,r,rp)
 	return re and re:GetHandler():IsRace(RACE_SPELLCASTER)
 end
-function c65961085.retcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,65961085)==0 end
-	Duel.RegisterFlagEffect(tp,65961085,RESET_PHASE+PHASE_END,0,1)
-end
 function c65961085.filter(c)
 	return c:IsFaceup() and c:IsSetCard(0x106e) and c:IsType(TYPE_SPELL) and c:IsAbleToDeck()
 end

script/c6625096.lua

@@ -5,8 +5,9 @@ function c6625096.initial_effect(c)
 	e1:SetDescription(aux.Stringid(6625096,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
 	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetCountLimit(1,6625096)
 	e1:SetCost(c6625096.spcost)
 	e1:SetTarget(c6625096.sptg)
 	e1:SetOperation(c6625096.spop)
@@ -16,9 +17,8 @@ function c6625096.initial_effect(c)
 	c:RegisterEffect(e2)
 end
 function c6625096.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,6625096)==0 and e:GetHandler():IsAbleToRemoveAsCost() end
+	if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost() end
 	Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_COST)
-	Duel.RegisterFlagEffect(tp,6625096,RESET_PHASE+PHASE_END,0,1)
 end
 function c6625096.filter(c,e,tp)
 	return c:IsLevelBelow(4) and c:IsRace(RACE_FISH) and not c:IsCode(6625096) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)

script/c66413481.lua

@@ -17,10 +17,10 @@ function c66413481.initial_effect(c)
 	e2:SetDescription(aux.Stringid(66413481,1))
 	e2:SetCategory(CATEGORY_DESTROY)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e2:SetCode(EVENT_TO_GRAVE)
+	e2:SetCountLimit(1,66413481)
 	e2:SetCondition(c66413481.descon)
-	e2:SetCost(c66413481.descost)
 	e2:SetTarget(c66413481.destg)
 	e2:SetOperation(c66413481.desop)
 	c:RegisterEffect(e2)
@@ -47,10 +47,6 @@ end
 function c66413481.descon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsReason(REASON_DESTROY)
 end
-function c66413481.descost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,66413481)==0 end
-	Duel.RegisterFlagEffect(tp,66413481,RESET_PHASE+PHASE_END,0,1)
-end
 function c66413481.destg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDestructable,tp,LOCATION_ONFIELD+LOCATION_HAND,0,1,nil) end
 	local g=Duel.GetMatchingGroup(Card.IsDestructable,tp,LOCATION_ONFIELD+LOCATION_HAND,0,nil)

script/c66540884.lua

@@ -4,11 +4,11 @@ function c66540884.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(66540884,0))
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
 	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e1:SetCode(EVENT_TO_GRAVE)
+	e1:SetCountLimit(1,66540884)
 	e1:SetCondition(c66540884.thcon)
-	e1:SetCost(c66540884.thcost)
 	e1:SetTarget(c66540884.thtg)
 	e1:SetOperation(c66540884.thop)
 	c:RegisterEffect(e1)
@@ -17,10 +17,6 @@ function c66540884.thcon(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	return (c:IsReason(REASON_EFFECT) and not c:IsReason(REASON_RETURN)) or c:IsReason(REASON_BATTLE)
 end
-function c66540884.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,66540884)==0 end
-	Duel.RegisterFlagEffect(tp,66540884,RESET_PHASE+PHASE_END,0,1)
-end
 function c66540884.thfilter(c)
 	return c:IsSetCard(0x45) and c:GetCode()~=66540884 and c:IsAbleToHand()
 end

script/c68084557.lua

---Cеo ѥ`?ĩ`
+--機械竜 パワー·ツール
 function c68084557.initial_effect(c)
 	--synchro summon
 	aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
@@ -7,11 +7,11 @@ function c68084557.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetCategory(CATEGORY_DRAW)
 	e1:SetDescription(aux.Stringid(68084557,0))
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_EQUIP)
+	e1:SetCountLimit(1,68084557)
 	e1:SetCondition(c68084557.drcon)
-	e1:SetCost(c68084557.drcost)
 	e1:SetTarget(c68084557.drtg)
 	e1:SetOperation(c68084557.drop)
 	c:RegisterEffect(e1)
@@ -30,10 +30,6 @@ end
 function c68084557.drcon(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.GetTurnPlayer()==tp
 end
-function c68084557.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,68084557)==0 end
-	Duel.RegisterFlagEffect(tp,68084557,RESET_PHASE+PHASE_END,0,1)
-end
 function c68084557.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
 	Duel.SetTargetPlayer(tp)

script/c69293721.lua

@@ -5,10 +5,10 @@ function c69293721.initial_effect(c)
 	e1:SetDescription(aux.Stringid(69293721,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e1:SetCode(EVENT_TO_GRAVE)
+	e1:SetCountLimit(1,69293721)
 	e1:SetCondition(c69293721.condition)
-	e1:SetCost(c69293721.cost)
 	e1:SetTarget(c69293721.target)
 	e1:SetOperation(c69293721.operation)
 	c:RegisterEffect(e1)
@@ -16,10 +16,6 @@ end
 function c69293721.condition(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsReason(REASON_DISCARD) and e:GetHandler():IsPreviousLocation(LOCATION_HAND)
 end
-function c69293721.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,69293721)==0 end
-	Duel.RegisterFlagEffect(tp,69293721,RESET_PHASE+PHASE_END,EFFECT_FLAG_OATH,1)
-end
 function c69293721.filter(c,e,tp)
 	return c:IsSetCard(0x74) and c:GetCode()~=69293721 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end

script/c70089580.lua

@@ -5,10 +5,9 @@ function c70089580.initial_effect(c)
 	e1:SetDescription(aux.Stringid(70089580,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
 	e1:SetCode(EVENT_BATTLE_DESTROYED)
+	e1:SetCountLimit(1,70089580)
 	e1:SetCondition(c70089580.condition)
-	e1:SetCost(c70089580.cost)
 	e1:SetTarget(c70089580.target)
 	e1:SetOperation(c70089580.operation)
 	c:RegisterEffect(e1)
@@ -16,10 +15,6 @@ end
 function c70089580.condition(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsLocation(LOCATION_GRAVE) and e:GetHandler():IsReason(REASON_BATTLE)
 end
-function c70089580.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,70089580)==0 end
-	Duel.RegisterFlagEffect(tp,70089580,RESET_PHASE+PHASE_END,0,1)
-end
 function c70089580.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end

script/c71175527.lua

@@ -6,7 +6,8 @@ function c71175527.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_SUMMON_SUCCESS)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CARD_TARGET)
+	e1:SetCountLimit(1,71175527)
 	e1:SetCost(c71175527.spcost)
 	e1:SetTarget(c71175527.sptg)
 	e1:SetOperation(c71175527.spop)
@@ -15,10 +16,6 @@ function c71175527.initial_effect(c)
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e2)
 end
-function c71175527.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,71175527)==0 end
-	Duel.RegisterFlagEffect(tp,71175527,RESET_PHASE+PHASE_END,0,1)
-end
 function c71175527.filter(c,e,tp)
 	return c:IsAttribute(ATTRIBUTE_WIND) and c:IsType(TYPE_TUNER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end

script/c72291078.lua

@@ -27,10 +27,10 @@ function c72291078.initial_effect(c)
 	e4:SetDescription(aux.Stringid(72291078,1))
 	e4:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e4:SetCode(EVENT_TO_GRAVE)
+	e4:SetCountLimit(1,72291078)
 	e4:SetCondition(c72291078.spcon)
-	e4:SetCost(c72291078.spcost)
 	e4:SetTarget(c72291078.sptg)
 	e4:SetOperation(c72291078.spop)
 	c:RegisterEffect(e4)
@@ -61,10 +61,6 @@ end
 function c72291078.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return not e:GetHandler():IsReason(REASON_RETURN)
 end
-function c72291078.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,72291078)==0 end
-	Duel.RegisterFlagEffect(tp,72291078,RESET_PHASE+PHASE_END,0,1)
-end
 function c72291078.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		and Duel.IsPlayerCanSpecialSummonMonster(tp,31533705,0x101b,0x4011,0,0,3,RACE_MACHINE,ATTRIBUTE_WIND) end

script/c72710085.lua

@@ -10,10 +10,10 @@ function c72710085.initial_effect(c)
 	e2:SetCategory(CATEGORY_TOGRAVE)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e2:SetRange(LOCATION_SZONE)
-	e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
 	e2:SetCode(EVENT_REMOVE)
+	e2:SetCountLimit(1,72710085)
 	e2:SetCondition(c72710085.tgcon)
-	e2:SetCost(c72710085.tgcost)
 	e2:SetTarget(c72710085.tgtg)
 	e2:SetOperation(c72710085.tgop)
 	c:RegisterEffect(e2)
@@ -22,10 +22,6 @@ function c72710085.tgcon(e,tp,eg,ep,ev,re,r,rp)
 	local tc=eg:GetFirst()
 	return eg:GetCount()==1 and tc:IsPreviousLocation(LOCATION_GRAVE) and tc:IsControler(tp) and tc:IsType(TYPE_MONSTER)
 end
-function c72710085.tgcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,72710085)==0 end
-	Duel.RegisterFlagEffect(tp,72710085,RESET_PHASE+PHASE_END,0,1)
-end
 function c72710085.filter(c,att)
 	return not c:IsAttribute(att) and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
 end

script/c72913666.lua

@@ -21,8 +21,7 @@ function c72913666.initial_effect(c)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
 	e3:SetCategory(CATEGORY_DAMAGE)
 	e3:SetCode(EVENT_FLIP)
-	e3:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
-	e3:SetCost(c72913666.damcost)
+	e3:SetCountLimit(1,72913666)
 	e3:SetTarget(c72913666.damtg)
 	e3:SetOperation(c72913666.damop)
 	c:RegisterEffect(e3)
@@ -45,10 +44,6 @@ function c72913666.posop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.ChangePosition(c,POS_FACEDOWN_DEFENCE)
 	end
 end
-function c72913666.damcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,72913666)==0 end
-	Duel.RegisterFlagEffect(tp,72913666,RESET_PHASE+PHASE_END,0,1)
-end
 function c72913666.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	local ct=Duel.GetMatchingGroupCount(Card.IsFacedown,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)

script/c74298287.lua

@@ -5,10 +5,10 @@ function c74298287.initial_effect(c)
 	e1:SetDescription(aux.Stringid(74298287,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE+EFFECT_FLAG_DELAY)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetCode(EVENT_TO_HAND)
+	e1:SetCountLimit(1,74298287)
 	e1:SetCondition(c74298287.spcon1)
-	e1:SetCost(c74298287.spcost)
 	e1:SetTarget(c74298287.sptg1)
 	e1:SetOperation(c74298287.spop1)
 	c:RegisterEffect(e1)
@@ -17,10 +17,10 @@ function c74298287.initial_effect(c)
 	e2:SetDescription(aux.Stringid(74298287,0))
 	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e2:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE+EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetCountLimit(1,74298287)
 	e2:SetCondition(c74298287.spcon2)
-	e2:SetCost(c74298287.spcost)
 	e2:SetTarget(c74298287.sptg2)
 	e2:SetOperation(c74298287.spop2)
 	c:RegisterEffect(e2)
@@ -32,10 +32,6 @@ function c74298287.spcon1(e,tp,eg,ep,ev,re,r,rp)
 	return bit.band(r,REASON_EFFECT)~=0 and e:GetHandler():IsPreviousLocation(LOCATION_DECK+LOCATION_GRAVE)
 		and Duel.IsExistingMatchingCard(c74298287.cfilter,tp,LOCATION_MZONE,0,1,nil)
 end
-function c74298287.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,74298287)==0 end
-	Duel.RegisterFlagEffect(tp,74298287,RESET_PHASE+PHASE_END,0,1)
-end
 function c74298287.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return e:GetHandler():IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end

script/c7452945.lua

@@ -28,11 +28,11 @@ function c7452945.initial_effect(c)
 	local e4=Effect.CreateEffect(c)
 	e4:SetDescription(aux.Stringid(7452945,0))
 	e4:SetCategory(CATEGORY_EQUIP)
-	e4:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e4:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e4:SetCode(EVENT_TO_GRAVE)
+	e4:SetCountLimit(1,7452945)
 	e4:SetCondition(c7452945.eqcon)
-	e4:SetCost(c7452945.eqcost)
 	e4:SetTarget(c7452945.eqtg)
 	e4:SetOperation(c7452945.operation)
 	c:RegisterEffect(e4)
@@ -64,10 +64,6 @@ function c7452945.eqcon(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEUP) and c:IsReason(REASON_DESTROY) and c:CheckUniqueOnField(tp)
 end
-function c7452945.eqcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,7452945)==0 end
-	Duel.RegisterFlagEffect(tp,7452945,RESET_PHASE+PHASE_END,0,1)
-end
 function c7452945.eqfilter2(c)
 	return c:IsFaceup() and c:IsSetCard(0x107a) and c:IsRace(RACE_WARRIOR)
 end

script/c75673220.lua

@@ -5,8 +5,8 @@ function c75673220.initial_effect(c)
 	e1:SetDescription(aux.Stringid(75673220,0))
 	e1:SetCategory(CATEGORY_REMOVE)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e1:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
 	e1:SetCode(EVENT_TO_GRAVE)
+	e1:SetCountLimit(1,75673220)
 	e1:SetCondition(c75673220.condition)
 	e1:SetTarget(c75673220.target)
 	e1:SetOperation(c75673220.operation)
@@ -16,8 +16,7 @@ function c75673220.condition(e,tp,eg,ep,ev,re,r,rp)
 	return not e:GetHandler():IsReason(REASON_RETURN)
 end
 function c75673220.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,75673220)==0 end
-	Duel.RegisterFlagEffect(tp,75673220,RESET_PHASE+PHASE_END,0,1)
+	if chk==0 then return true end
 	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,1-tp,LOCATION_HAND)
 end
 function c75673220.operation(e,tp,eg,ep,ev,re,r,rp)

script/c77428945.lua

@@ -5,17 +5,12 @@ function c77428945.initial_effect(c)
 	e1:SetDescription(aux.Stringid(77428945,0))
 	e1:SetCategory(CATEGORY_POSITION)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e1:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e1:SetCost(c77428945.cost)
+	e1:SetCountLimit(1,77428945)
 	e1:SetTarget(c77428945.target)
 	e1:SetOperation(c77428945.operation)
 	c:RegisterEffect(e1)
 end
-function c77428945.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,77428945)==0 end
-	Duel.RegisterFlagEffect(tp,77428945,RESET_PHASE+PHASE_END,0,1)
-end
 function c77428945.filter(c)
 	return c:IsFaceup() and bit.band(c:GetSummonType(),SUMMON_TYPE_SPECIAL)~=0
 end

script/c80208323.lua

@@ -5,11 +5,10 @@ function c80208323.initial_effect(c)
 	e1:SetDescription(aux.Stringid(80208323,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
 	e1:SetRange(LOCATION_GRAVE)
 	e1:SetCode(EVENT_BATTLE_DESTROYED)
+	e1:SetCountLimit(1,80208323)
 	e1:SetCondition(c80208323.spcon)
-	e1:SetCost(c80208323.spcost)
 	e1:SetTarget(c80208323.sptg)
 	e1:SetOperation(c80208323.spop)
 	c:RegisterEffect(e1)
@@ -20,10 +19,6 @@ end
 function c80208323.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return not eg:IsContains(e:GetHandler()) and eg:IsExists(c80208323.spfilter,1,nil,tp)
 end
-function c80208323.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,80208323)==0 end
-	Duel.RegisterFlagEffect(tp,80208323,RESET_PHASE+PHASE_END,0,1)
-end
 function c80208323.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return e:GetHandler():IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end

script/c80885284.lua

@@ -20,9 +20,9 @@ function c80885284.initial_effect(c)
 	e3:SetDescription(aux.Stringid(80885284,1))
 	e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e3:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE+EFFECT_FLAG_DAMAGE_STEP)
+	e3:SetProperty(+FFECT_FLAG_DAMAGE_STEP)
 	e3:SetCode(EVENT_FLIP)
-	e3:SetCost(c80885284.thcost)
+	e3:SetCountLimit(1,80885284)
 	e3:SetTarget(c80885284.thtg)
 	e3:SetOperation(c80885284.thop)
 	c:RegisterEffect(e3)
@@ -45,10 +45,6 @@ function c80885284.posop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.ChangePosition(c,POS_FACEDOWN_DEFENCE)
 	end
 end
-function c80885284.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,80885284)==0 end
-	Duel.RegisterFlagEffect(tp,80885284,RESET_PHASE+PHASE_END,0,1)
-end
 function c80885284.thfilter(c,lv)
 	return c:IsLevelBelow(lv) and c:IsSetCard(0x8d) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
 end

script/c81587028.lua

@@ -5,10 +5,10 @@ function c81587028.initial_effect(c)
 	e1:SetDescription(aux.Stringid(81587028,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e1:SetCode(EVENT_TO_GRAVE)
+	e1:SetCountLimit(1,81587028)
 	e1:SetCondition(c81587028.spcon)
-	e1:SetCost(c81587028.spcost)
 	e1:SetTarget(c81587028.sptg)
 	e1:SetOperation(c81587028.spop)
 	c:RegisterEffect(e1)
@@ -16,10 +16,6 @@ end
 function c81587028.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsReason(REASON_DESTROY)
 end
-function c81587028.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,81587028)==0 end
-	Duel.RegisterFlagEffect(tp,81587028,RESET_PHASE+PHASE_END,0,1)
-end
 function c81587028.filter1(c,e,tp)
 	return c:IsType(TYPE_NORMAL) and (c:GetAttack()==0 or c:GetDefence()==0) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end

script/c8226374.lua

@@ -6,8 +6,8 @@ function c8226374.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetCode(EVENT_SUMMON_SUCCESS)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CHAIN_UNIQUE)
-	e1:SetCost(c8226374.spcost)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
+	e1:SetCountLimit(1,8226374)
 	e1:SetTarget(c8226374.sptg)
 	e1:SetOperation(c8226374.spop)
 	c:RegisterEffect(e1)
@@ -15,10 +15,6 @@ function c8226374.initial_effect(c)
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e2)
 end
-function c8226374.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,8226374)==0 end
-	Duel.RegisterFlagEffect(tp,8226374,RESET_PHASE+PHASE_END,0,1)
-end
 function c8226374.filter(c,e,tp)
 	return c:IsSetCard(0x83) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end

script/c82293134.lua

@@ -18,9 +18,8 @@ function c82293134.initial_effect(c)
 	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
 	e2:SetCode(EVENT_TO_GRAVE)
-	e2:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
+	e2:SetCountLimit(1,82293134)
 	e2:SetCondition(c82293134.thcon)
-	e2:SetCost(c82293134.thcost)
 	e2:SetTarget(c82293134.thtg)
 	e2:SetOperation(c82293134.thop)
 	c:RegisterEffect(e2)
@@ -42,10 +41,6 @@ end
 function c82293134.thcon(e,tp,eg,ep,ev,re,r,rp)
 	return not e:GetHandler():IsReason(REASON_RETURN)
 end
-function c82293134.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,82293134)==0 end
-	Duel.RegisterFlagEffect(tp,82293134,RESET_PHASE+PHASE_END,0,1)
-end
 function c82293134.filter(c)
 	return c:IsSetCard(0x76) and c:GetCode()~=82293134 and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
 end

script/c83438826.lua

@@ -32,11 +32,11 @@ function c83438826.initial_effect(c)
 	local e5=Effect.CreateEffect(c)
 	e5:SetDescription(aux.Stringid(83438826,1))
 	e5:SetCategory(CATEGORY_EQUIP)
-	e5:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e5:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e5:SetCode(EVENT_TO_GRAVE)
+	e5:SetCountLimit(1,83438826)
 	e5:SetCondition(c83438826.eqcon)
-	e5:SetCost(c83438826.eqcost)
 	e5:SetTarget(c83438826.eqtg)
 	e5:SetOperation(c83438826.operation)
 	c:RegisterEffect(e5)
@@ -92,10 +92,6 @@ function c83438826.eqcon(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEUP) and c:IsReason(REASON_DESTROY) and c:CheckUniqueOnField(tp)
 end
-function c83438826.eqcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,83438826)==0 end
-	Duel.RegisterFlagEffect(tp,83438826,RESET_PHASE+PHASE_END,0,1)
-end
 function c83438826.eqfilter2(c)
 	return c:IsFaceup() and c:IsSetCard(0x107a) and c:IsRace(RACE_WARRIOR)
 end

script/c87347365.lua

@@ -4,8 +4,8 @@ function c87347365.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(87347365,0))
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e1:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
 	e1:SetCode(EVENT_TO_GRAVE)
+	e1:SetCountLimit(1,87347365)
 	e1:SetCondition(c87347365.condtion)
 	e1:SetTarget(c87347365.target)
 	e1:SetOperation(c87347365.operation)
@@ -15,7 +15,7 @@ function c87347365.condtion(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsPreviousLocation(LOCATION_DECK)
 end
 function c87347365.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,87347365)==0 end
+	if chk==0 then return true end
 	local opt=0
 	local c=e:GetHandler()
 	local b1=Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
@@ -37,7 +37,6 @@ function c87347365.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	else
 		e:SetCategory(0)
 	end
-	Duel.RegisterFlagEffect(tp,87347365,RESET_PHASE+PHASE_END,0,1)
 end
 function c87347365.operation(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()

script/c89399912.lua

@@ -6,6 +6,7 @@ function c89399912.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_IGNITION)
 	e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
+	e1:SetCountLimit(1,89399912)
 	e1:SetCost(c89399912.hspcost)
 	e1:SetTarget(c89399912.hsptg)
 	e1:SetOperation(c89399912.hspop)
@@ -18,8 +19,8 @@ function c89399912.initial_effect(c)
 	e2:SetRange(LOCATION_MZONE)
 	e2:SetProperty(EFFECT_FLAG_REPEAT)
 	e2:SetCode(EVENT_PHASE+PHASE_END)
+	e2:SetCountLimit(1,89399912)
 	e2:SetCondition(c89399912.retcon)
-	e2:SetCost(c89399912.retcost)
 	e2:SetTarget(c89399912.rettg)
 	e2:SetOperation(c89399912.retop)
 	c:RegisterEffect(e2)
@@ -29,6 +30,7 @@ function c89399912.initial_effect(c)
 	e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e3:SetType(EFFECT_TYPE_IGNITION)
 	e3:SetRange(LOCATION_HAND)
+	e3:SetCountLimit(1,89399912)
 	e3:SetCost(c89399912.shcost)
 	e3:SetTarget(c89399912.shtg)
 	e3:SetOperation(c89399912.shop)
@@ -39,8 +41,8 @@ function c89399912.initial_effect(c)
 	e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e4:SetCode(EVENT_REMOVE)
-	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
-	e4:SetCost(c89399912.thcost)
+	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e4:SetCountLimit(1,89399912)
 	e4:SetTarget(c89399912.thtg)
 	e4:SetOperation(c89399912.thop)
 	c:RegisterEffect(e4)
@@ -49,12 +51,10 @@ function c89399912.rfilter(c)
 	return (c:IsRace(RACE_DRAGON) or c:IsAttribute(ATTRIBUTE_WIND)) and c:IsAbleToRemoveAsCost()
 end
 function c89399912.hspcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,89399912)==0
-		and Duel.IsExistingMatchingCard(c89399912.rfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,2,e:GetHandler()) end
+	if chk==0 then return Duel.IsExistingMatchingCard(c89399912.rfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,2,e:GetHandler()) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local g=Duel.SelectMatchingCard(tp,c89399912.rfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,2,2,e:GetHandler())
 	Duel.Remove(g,POS_FACEUP,REASON_COST)
-	Duel.RegisterFlagEffect(tp,89399912,RESET_PHASE+PHASE_END,0,1)
 end
 function c89399912.hsptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
@@ -71,10 +71,6 @@ function c89399912.retcon(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.GetTurnPlayer()~=tp
 		and bit.band(e:GetHandler():GetSummonType(),SUMMON_TYPE_SPECIAL)==SUMMON_TYPE_SPECIAL
 end
-function c89399912.retcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,89399912)==0 end
-	Duel.RegisterFlagEffect(tp,89399912,RESET_PHASE+PHASE_END,0,1)
-end
 function c89399912.rettg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0)
@@ -89,14 +85,12 @@ function c89399912.dfilter(c)
 	return c:IsAttribute(ATTRIBUTE_WIND) and c:IsDiscardable() and c:IsAbleToGraveAsCost()
 end
 function c89399912.shcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,89399912)==0
-		and e:GetHandler():IsDiscardable() and e:GetHandler():IsAbleToGraveAsCost()
+	if chk==0 then return e:GetHandler():IsDiscardable() and e:GetHandler():IsAbleToGraveAsCost()
 		and Duel.IsExistingMatchingCard(c89399912.dfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISCARD)
 	local g=Duel.SelectMatchingCard(tp,c89399912.dfilter,tp,LOCATION_HAND,0,1,1,e:GetHandler())
 	g:AddCard(e:GetHandler())
 	Duel.SendtoGrave(g,REASON_COST+REASON_DISCARD)
-	Duel.RegisterFlagEffect(tp,89399912,RESET_PHASE+PHASE_END,0,1)
 end
 function c89399912.shfilter(c)
 	return c:IsRace(RACE_DRAGON) and c:IsAbleToHand()
@@ -113,10 +107,6 @@ function c89399912.shop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.ConfirmCards(1-tp,g)
 	end
 end
-function c89399912.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,89399912)==0 end
-	Duel.RegisterFlagEffect(tp,89399912,RESET_PHASE+PHASE_END,0,1)
-end
 function c89399912.thfilter(c)
 	return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_WIND) and c:IsAbleToHand()
 end

script/c90411554.lua

@@ -6,6 +6,7 @@ function c90411554.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_IGNITION)
 	e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
+	e1:SetCountLimit(1,90411554)
 	e1:SetCost(c90411554.hspcost)
 	e1:SetTarget(c90411554.hsptg)
 	e1:SetOperation(c90411554.hspop)
@@ -18,8 +19,8 @@ function c90411554.initial_effect(c)
 	e2:SetRange(LOCATION_MZONE)
 	e2:SetProperty(EFFECT_FLAG_REPEAT)
 	e2:SetCode(EVENT_PHASE+PHASE_END)
+	e2:SetCountLimit(1,90411554)
 	e2:SetCondition(c90411554.retcon)
-	e2:SetCost(c90411554.retcost)
 	e2:SetTarget(c90411554.rettg)
 	e2:SetOperation(c90411554.retop)
 	c:RegisterEffect(e2)
@@ -30,6 +31,7 @@ function c90411554.initial_effect(c)
 	e3:SetType(EFFECT_TYPE_IGNITION)
 	e3:SetRange(LOCATION_HAND)
 	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e3:SetCountLimit(1,90411554)
 	e3:SetCost(c90411554.spcost)
 	e3:SetTarget(c90411554.sptg)
 	e3:SetOperation(c90411554.spop)
@@ -40,8 +42,8 @@ function c90411554.initial_effect(c)
 	e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e4:SetCode(EVENT_REMOVE)
-	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
-	e4:SetCost(c90411554.thcost)
+	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e4:SetCountLimit(1,90411554)
 	e4:SetTarget(c90411554.thtg)
 	e4:SetOperation(c90411554.thop)
 	c:RegisterEffect(e4)
@@ -50,12 +52,10 @@ function c90411554.rfilter(c)
 	return (c:IsRace(RACE_DRAGON) or c:IsAttribute(ATTRIBUTE_EARTH)) and c:IsAbleToRemoveAsCost()
 end
 function c90411554.hspcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,90411554)==0
-		and Duel.IsExistingMatchingCard(c90411554.rfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,2,e:GetHandler()) end
+	if chk==0 then return Duel.IsExistingMatchingCard(c90411554.rfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,2,e:GetHandler()) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local g=Duel.SelectMatchingCard(tp,c90411554.rfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,2,2,e:GetHandler())
 	Duel.Remove(g,POS_FACEUP,REASON_COST)
-	Duel.RegisterFlagEffect(tp,90411554,RESET_PHASE+PHASE_END,0,1)
 end
 function c90411554.hsptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
@@ -72,10 +72,6 @@ function c90411554.retcon(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.GetTurnPlayer()~=tp
 		and bit.band(e:GetHandler():GetSummonType(),SUMMON_TYPE_SPECIAL)==SUMMON_TYPE_SPECIAL
 end
-function c90411554.retcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,90411554)==0 end
-	Duel.RegisterFlagEffect(tp,90411554,RESET_PHASE+PHASE_END,0,1)
-end
 function c90411554.rettg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0)
@@ -90,14 +86,12 @@ function c90411554.dfilter(c)
 	return c:IsAttribute(ATTRIBUTE_EARTH) and c:IsDiscardable() and c:IsAbleToGraveAsCost()
 end
 function c90411554.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,90411554)==0
-		and e:GetHandler():IsDiscardable() and e:GetHandler():IsAbleToGraveAsCost()
+	if chk==0 then return e:GetHandler():IsDiscardable() and e:GetHandler():IsAbleToGraveAsCost()
 		and Duel.IsExistingMatchingCard(c90411554.dfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISCARD)
 	local g=Duel.SelectMatchingCard(tp,c90411554.dfilter,tp,LOCATION_HAND,0,1,1,e:GetHandler())
 	g:AddCard(e:GetHandler())
 	Duel.SendtoGrave(g,REASON_COST+REASON_DISCARD)
-	Duel.RegisterFlagEffect(tp,90411554,RESET_PHASE+PHASE_END,0,1)
 end
 function c90411554.spfilter(c,e,tp)
 	return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
@@ -116,10 +110,6 @@ function c90411554.spop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
 	end
 end
-function c90411554.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,90411554)==0 end
-	Duel.RegisterFlagEffect(tp,90411554,RESET_PHASE+PHASE_END,0,1)
-end
 function c90411554.thfilter(c)
 	return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_EARTH) and c:IsAbleToHand()
 end

script/c92821268.lua

@@ -6,8 +6,8 @@ function c92821268.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetRange(LOCATION_HAND)
-	e1:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
 	e1:SetCode(EVENT_BATTLE_DESTROYED)
+	e1:SetCountLimit(1,92821268)
 	e1:SetCost(c92821268.cost)
 	e1:SetTarget(c92821268.target)
 	e1:SetOperation(c92821268.operation)
@@ -18,10 +18,9 @@ function c92821268.cfilter(c,tp)
 		and c:GetPreviousControler()==tp and c:IsAbleToRemoveAsCost()
 end
 function c92821268.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,92821268)==0 and eg:IsExists(c92821268.cfilter,1,nil,tp) end
+	if chk==0 then return eg:IsExists(c92821268.cfilter,1,nil,tp) end
 	local g=eg:Filter(c92821268.cfilter,nil,tp)
 	Duel.Remove(g,POS_FACEUP,REASON_COST)
-	Duel.RegisterFlagEffect(tp,92821268,RESET_PHASE+PHASE_END,0,1)
 end
 function c92821268.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0

script/c93830681.lua

@@ -4,9 +4,10 @@ function c93830681.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(93830681,0))
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e1:SetCode(EVENT_BE_BATTLE_TARGET)
 	e1:SetRange(LOCATION_GRAVE)
+	e1:SetCountLimit(1,93830681)
 	e1:SetCondition(c93830681.condition)
 	e1:SetCost(c93830681.cost)
 	e1:SetTarget(c93830681.target)
@@ -16,7 +17,6 @@ end
 function c93830681.condition(e,tp,eg,ep,ev,re,r,rp)
 	local at=Duel.GetAttackTarget()
 	return at and at:IsControler(tp) and at:IsFaceup() and at:IsRace(RACE_FISH+RACE_SEASERPENT+RACE_AQUA)
-		and Duel.GetFlagEffect(tp,93830681)==0
 end
 function c93830681.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost() end
@@ -27,7 +27,6 @@ function c93830681.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc==tg end
 	if chk==0 then return tg:IsOnField() and tg:IsCanBeEffectTarget(e) end
 	Duel.SetTargetCard(tg)
-	Duel.RegisterFlagEffect(tp,93830681,RESET_PHASE+PHASE_END,0,1)
 end
 function c93830681.operation(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetAttacker()

script/c94220427.lua

@@ -15,8 +15,8 @@ function c94220427.initial_effect(c)
 	e2:SetCategory(CATEGORY_TOHAND)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e2:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
 	e2:SetRange(LOCATION_GRAVE)
+	e2:SetCountLimit(1,94220427)
 	e2:SetCondition(c94220427.thcon)
 	e2:SetCost(c94220427.thcost)
 	e2:SetTarget(c94220427.thtg)

script/c94573223.lua

@@ -21,8 +21,9 @@ function c94573223.initial_effect(c)
 	e3:SetDescription(aux.Stringid(94573223,1))
 	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
 	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetCountLimit(1,94573223)
 	e3:SetCondition(c94573223.spcon)
 	e3:SetTarget(c94573223.sptg)
 	e3:SetOperation(c94573223.spop)
@@ -66,12 +67,11 @@ function c94573223.spfilter(c,e,tp)
 end
 function c94573223.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c94573223.spfilter(chkc,e,tp) end
-	if chk==0 then return Duel.GetFlagEffect(tp,94573223)==0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		and Duel.IsExistingTarget(c94573223.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 	local g=Duel.SelectTarget(tp,c94573223.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
-	Duel.RegisterFlagEffect(tp,94573223,RESET_PHASE+PHASE_END,0,1)
 end
 function c94573223.spop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()

script/c9560338.lua

@@ -5,9 +5,8 @@ function c9560338.initial_effect(c)
 	e1:SetDescription(aux.Stringid(9560338,0))
 	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
 	e1:SetCode(EVENT_SUMMON_SUCCESS)
-	e1:SetCost(c9560338.effcost)
+	e1:SetCountLimit(1,9560338)
 	e1:SetTarget(c9560338.efftg)
 	e1:SetOperation(c9560338.effop)
 	c:RegisterEffect(e1)
@@ -18,10 +17,6 @@ end
 function c9560338.cfilter(c)
 	return c:IsSetCard(0x106e) and c:IsType(TYPE_SPELL)
 end
-function c9560338.effcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,9560338)==0 end
-	Duel.RegisterFlagEffect(tp,9560338,RESET_PHASE+PHASE_END,0,1)
-end
 function c9560338.filter1(c)
 	return c:IsSetCard(0x106e) and c:IsType(TYPE_SPELL) and c:IsAbleToHand()
 end

script/c96471335.lua

@@ -20,7 +20,7 @@ function c96471335.initial_effect(c)
 	e2:SetCategory(CATEGORY_REMOVE)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_ATTACK_ANNOUNCE)
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e2:SetRange(LOCATION_MZONE)
 	e2:SetCountLimit(1,96471335)
 	e2:SetCondition(c96471335.rmcon)

script/c96682430.lua

@@ -5,10 +5,10 @@ function c96682430.initial_effect(c)
 	e1:SetDescription(aux.Stringid(96682430,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e1:SetCode(EVENT_TO_GRAVE)
+	e1:SetCountLimit(1,96682430)
 	e1:SetCondition(c96682430.condition)
-	e1:SetCost(c96682430.cost)
 	e1:SetTarget(c96682430.target)
 	e1:SetOperation(c96682430.operation)
 	c:RegisterEffect(e1)
@@ -16,10 +16,6 @@ end
 function c96682430.condition(e,tp,eg,ep,ev,re,r,rp)
 	return not e:GetHandler():IsReason(REASON_RETURN)
 end
-function c96682430.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,96682430)==0 end
-	Duel.RegisterFlagEffect(tp,96682430,RESET_PHASE+PHASE_END,EFFECT_FLAG_OATH,1)
-end
 function c96682430.filter(c,e,tp)
 	return c:IsSetCard(0x74) and c:GetCode()~=96682430 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end

script/c97064649.lua

@@ -4,10 +4,10 @@ function c97064649.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(97064649,0))
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CARD_TARGET)
 	e1:SetCode(EVENT_TO_GRAVE)
+	e1:SetCountLimit(1,97064649)
 	e1:SetCondition(c97064649.setcon)
-	e1:SetCost(c97064649.setcost)
 	e1:SetTarget(c97064649.settg)
 	e1:SetOperation(c97064649.setop)
 	c:RegisterEffect(e1)
@@ -15,10 +15,6 @@ end
 function c97064649.setcon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)
 end
-function c97064649.setcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,97064649)==0 end
-	Duel.RegisterFlagEffect(tp,97064649,RESET_PHASE+PHASE_END,0,1)
-end
 function c97064649.filter(c)
 	return c:GetType()==TYPE_SPELL+TYPE_CONTINUOUS and c:IsSSetable()
 end

script/c98012938.lua

@@ -8,10 +8,10 @@ function c98012938.initial_effect(c)
 	e1:SetDescription(aux.Stringid(98012938,0))
 	e1:SetCategory(CATEGORY_TOHAND)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCountLimit(1,98012938)
 	e1:SetCondition(c98012938.condition)
-	e1:SetCost(c98012938.cost)
 	e1:SetTarget(c98012938.target)
 	e1:SetOperation(c98012938.operation)
 	c:RegisterEffect(e1)
@@ -19,10 +19,6 @@ end
 function c98012938.condition(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():GetSummonType()==SUMMON_TYPE_SYNCHRO
 end
-function c98012938.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,98012938)==0 end
-	Duel.RegisterFlagEffect(tp,98012938,RESET_PHASE+PHASE_END,0,1)
-end
 function c98012938.filter(c)
 	return c:IsFaceup() and c:IsAbleToHand()
 end

script/c9861795.lua

@@ -5,8 +5,9 @@ function c9861795.initial_effect(c)
 	e1:SetDescription(aux.Stringid(9861795,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CHAIN_UNIQUE)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
 	e1:SetCode(EVENT_TO_GRAVE)
+	e1:SetCountLimit(1,9861795)
 	e1:SetCondition(c9861795.condition)
 	e1:SetTarget(c9861795.target)
 	e1:SetOperation(c9861795.operation)