fix

expansions/script/c11602000.lua

+--星穹列车的领航员 姬子
+function c11602000.initial_effect(c)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
+	e1:SetCountLimit(1,11602000)
+	e1:SetCost(c11602000.spcon)
+	e1:SetTarget(c11602000.sptg)
+	e1:SetOperation(c11602000.spop)
+	c:RegisterEffect(e1)
+	if not c11602000.global_check then
+		c11602000.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_DESTROYED)
+		ge1:SetOperation(c11602000.checkop)
+		Duel.RegisterEffect(ge1,0)
+	end
+	--self Destroy
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_DESTROY+CATEGORY_ATKCHANGE)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCode(EVENT_BATTLE_DESTROYED)
+	e2:SetCountLimit(1,11602000+1)
+	e2:SetCondition(c11602000.descon)
+	e2:SetTarget(c11602000.destg)
+	e2:SetOperation(c11602000.desop)
+	c:RegisterEffect(e2)
+	--atk
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_FIELD)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCode(EFFECT_UPDATE_ATTACK)
+	e3:SetTargetRange(LOCATION_MZONE,0)
+	e3:SetValue(700)
+	c:RegisterEffect(e3)
+end
+function c11602000.cfilter(c,tp)
+	return c:IsPreviousControler(tp)
+end
+function c11602000.descon(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(c11602000.cfilter,1,nil,tp)
+end
+function c11602000.destg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_MZONE,0,1,c) end
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,c,1,0,0)
+end
+function c11602000.desop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and Duel.Destroy(c,REASON_EFFECT)>0 then
+		local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,0,nil)
+		if g:GetCount()==0 then return end
+		Duel.BreakEffect()
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+		local tc=g:Select(tp,1,1,nil):GetFirst()
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_SET_ATTACK_FINAL)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		e1:SetValue(tc:GetAttack()*2)
+		tc:RegisterEffect(e1)
+	end
+end
+function c11602000.checkop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.RegisterFlagEffect(tp,11602000,RESET_PHASE+PHASE_END,0,1)
+	Duel.RegisterFlagEffect(1-tp,11602000,RESET_PHASE+PHASE_END,0,1)
+end
+function c11602000.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFlagEffect(tp,11602000)>=3
+end
+function c11602000.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
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,0,LOCATION_ONFIELD)
+end
+function c11602000.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and aux.NecroValleyFilter()(c) then
+		if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
+			local g=Duel.GetMatchingGroup(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,e:GetHandler())
+			if g:GetCount()==0 then return end
+			Duel.BreakEffect()
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+			local sg=g:Select(tp,1,1,nil)
+			Duel.Destroy(sg,REASON_EFFECT)
+		end
+	end
+end
\ No newline at end of file

expansions/script/c11602005.lua

+--迷失天外的六相冰 三月七
+function c11602005.initial_effect(c)
+	--attack target
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCountLimit(1,11602005)
+	e1:SetTarget(c11602005.tgtg)
+	e1:SetOperation(c11602005.tgop)
+	c:RegisterEffect(e1)
+	--to hand
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetCountLimit(1,11602005+1)
+	e2:SetTarget(c11602005.thtg)
+	e2:SetOperation(c11602005.thop)
+	c:RegisterEffect(e2)
+end
+function c11602005.thfilter(c)
+	return c:IsSetCard(0xa548) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand()
+end
+function c11602005.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c11602005.thfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c11602005.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c11602005.thfilter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+	end
+end
+function c11602005.tgtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c11602005.tgfilter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(nil,tp,LOCATION_MZONE,0,1,nil)
+		and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+	Duel.SelectTarget(tp,nil,tp,LOCATION_MZONE,0,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function c11602005.tgop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and aux.NecroValleyFilter()(c) then
+		if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
+			local tc=Duel.GetFirstTarget()
+			if tc:IsRelateToEffect(e) then
+				--atk limit
+				local e1=Effect.CreateEffect(c)
+				e1:SetType(EFFECT_TYPE_FIELD)
+				e1:SetRange(LOCATION_MZONE)
+				e1:SetTargetRange(0,LOCATION_MZONE)
+				e1:SetCode(EFFECT_CANNOT_SELECT_BATTLE_TARGET)
+				e1:SetValue(c11602005.atlimit)
+				e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+				tc:RegisterEffect(e1)
+			end
+		end
+	end
+end
+function c11602005.atlimit(e,c)
+	return c~=e:GetHandler()
+end
\ No newline at end of file

expansions/script/c11602015.lua

+--黑塔空间站的防卫科队长 阿兰
+function c11602015.initial_effect(c)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCountLimit(1,EFFECT_COUNT_CODE_CHAIN)
+	e1:SetHintTiming(0,TIMING_END_PHASE)
+	e1:SetTarget(c11602015.sptg)
+	e1:SetOperation(c11602015.spop)
+	c:RegisterEffect(e1)
+	--special summon
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_REMOVE+CATEGORY_LEAVE_GRAVE)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_ATTACK_ANNOUNCE)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetCountLimit(1,11602015)
+	e2:SetCondition(c11602015.rmcon)
+	e2:SetTarget(c11602015.rmtg)
+	e2:SetOperation(c11602015.rmop)
+	c:RegisterEffect(e2)
+end
+function c11602015.rmcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetAttacker():GetControler()~=tp
+end
+function c11602015.setfilter(c)
+	return (c:IsSetCard(0xc548) or aux.IsCodeListed(c,60158001))
+		and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable()
+end
+function c11602015.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return c:IsAbleToRemove()
+		and Duel.IsExistingMatchingCard(c11602015.setfilter,tp,LOCATION_GRAVE,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,c,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,nil,1,tp,LOCATION_GRAVE)
+end
+function c11602015.rmop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and Duel.Remove(c,POS_FACEUP,0x40)>0 and c:IsLocation(0x20) then
+		if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
+		local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c11602015.setfilter),tp,LOCATION_GRAVE,0,1,1,nil)
+		local tc=g:GetFirst()
+		if tc then
+			Duel.SSet(tp,tc)
+		end
+	end
+end
+function c11602015.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
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function c11602015.cfilter(c)
+	return c:IsFaceup() and c:IsSetCard(0xc548)
+end
+function c11602015.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetValue(1000)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		c:RegisterEffect(e1)
+		if Duel.IsExistingMatchingCard(c11602015.cfilter,tp,LOCATION_MZONE,0,1,c)
+			and Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_ONFIELD,1,nil)
+			and Duel.SelectYesNo(tp,aux.Stringid(11602015,0)) then
+			Duel.BreakEffect()
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+			local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,0,LOCATION_ONFIELD,1,1,nil)
+			Duel.HintSelection(g)
+			Duel.Destroy(g,REASON_EFFECT)
+		end
+	end
+end
\ No newline at end of file

expansions/script/c11602020.lua

+--黑塔空间站的站长 艾丝妲
+function c11602020.initial_effect(c)
+	--search
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCountLimit(1,11602020)
+	e1:SetCost(c11602020.thcost)
+	e1:SetTarget(c11602020.thtg)
+	e1:SetOperation(c11602020.thop)
+	c:RegisterEffect(e1)
+	--
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_TOGRAVE)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCountLimit(1,11602020+1)
+	e2:SetTarget(c11602020.tgtg)
+	e2:SetOperation(c11602020.tgop)
+	c:RegisterEffect(e2)
+end
+function c11602020.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return c:IsDiscardable() end
+	Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
+end
+function c11602020.thfilter(c)
+	return c:IsSetCard(0xc548) and not c:IsCode(11602020) and c:IsAbleToHand()
+		or c:IsSSetable() and c:IsCode(11602050)
+end
+function c11602020.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chk==0 then return Duel.IsExistingMatchingCard(c11602020.thfilter,tp,LOCATION_DECK,0,1,nil) end
+end
+function c11602020.thop(e,tp,eg,ep,ev,re,r,rp)
+	local tg=Duel.GetMatchingGroup(c11602020.thfilter,tp,LOCATION_DECK,0,nil)
+	if #tg>0 then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
+		local tc=tg:Select(tp,1,1,nil):GetFirst()
+		if tc:IsSetCard(0xc548) then
+			Duel.SendtoHand(tc,nil,REASON_EFFECT)
+			Duel.ConfirmCards(1-tp,tc)
+		elseif tc:IsCode(11602050) then
+			Duel.SSet(tp,tc)
+		end
+	end
+end
+function c11602020.tgfilter(c,tp)
+	return c:IsFaceupEx() and c:IsAbleToGrave() and (c:IsSetCard(0xc548) or aux.IsCodeListed(c,60158001))
+end
+function c11602020.tgtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	local c=e:GetHandler()
+	if chkc then return chkc:IsLocation(LOCATION_REMOVED) and chkc:IsControler(tp) and c11602020.tgfilter(chkc,tp) end
+	if chk==0 then return c:IsAbleToHand()
+		and Duel.IsExistingTarget(c11602020.tgfilter,tp,LOCATION_REMOVED,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g=Duel.SelectTarget(tp,c11602020.tgfilter,tp,LOCATION_REMOVED,0,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,c,1,0,0)
+end
+function c11602020.tgop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and Duel.SendtoGrave(tc,REASON_EFFECT+REASON_RETURN)~=0 and tc:IsLocation(LOCATION_GRAVE) then
+		local c=e:GetHandler()
+		if c:IsRelateToEffect(e) then
+			Duel.SendtoHand(c,nil,0x40)
+		end
+	end
+end
\ No newline at end of file

expansions/script/c11602025.lua

@@ -44,25 +44,15 @@ function c11602025.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
 	Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,1-tp,LOCATION_ONFIELD)
 end
-function c11602025.ctfilter(c)
-	return c:IsFaceup() and c:IsSetCard(0xc548,0xa548)
-end
 function c11602025.spop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
 		Duel.RegisterFlagEffect(tp,11602025,0,0,0)
-		local ct=Duel.GetMatchingGroup(c11602025.ctfilter,tp,0xc,0,nil)
-		if ct<1 then return end
-		local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
-		local tc=g:GetFirst()
-		while tc do
-			local e1=Effect.CreateEffect(e:GetHandler())
-			e1:SetType(EFFECT_TYPE_SINGLE)
-			e1:SetCode(EFFECT_UPDATE_ATTACK)
-			e1:SetValue(-ct*400)
-			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-			tc:RegisterEffect(e1)
-			tc=g:GetNext()
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+		local g=Duel.SelectMatchingCard(tp,nil,tp,0,0xc,1,1,nil)
+		if #g>0 then
+			Duel.BreakEffect()
+			Duel.Destroy(g,0x40)
 		end
 	end
 end

expansions/script/c11602030.lua

+--来自未知的无名客 瓦尔特
+function c11602030.initial_effect(c)
+	--
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetRange(LOCATION_GRAVE+LOCATION_HAND)
+	e1:SetHintTiming(TIMING_BATTLE_END)
+	e1:SetCountLimit(1,11602030)
+	e1:SetCondition(c11602030.spcon)
+	e1:SetTarget(c11602030.sptg)
+	e1:SetOperation(c11602030.spop)
+	c:RegisterEffect(e1)
+	if not c11602030.global_check then
+		c11602030.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_ATTACK_ANNOUNCE)
+		ge1:SetOperation(c11602030.checkop)
+		Duel.RegisterEffect(ge1,0)
+	end
+	--draw
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_TOGRAVE)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetCountLimit(1,11602030+1)
+	e2:SetTarget(c11602030.tgtg)
+	e2:SetOperation(c11602030.tgop)
+	c:RegisterEffect(e2)
+	--attack cost
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_FIELD)
+	e3:SetCode(EFFECT_ATTACK_COST)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e3:SetTargetRange(0,1)
+	e3:SetCost(c11602030.atcost)
+	e3:SetOperation(c11602030.atop)
+	c:RegisterEffect(e3)
+	--accumulate
+	local e33=Effect.CreateEffect(c)
+	e33:SetType(EFFECT_TYPE_FIELD)
+	e33:SetCode(EFFECT_FLAG_EFFECT+11602030)
+	e33:SetRange(LOCATION_MZONE)
+	e33:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e33:SetTargetRange(0,1)
+	c:RegisterEffect(e33)
+end
+function c11602030.atcost(e,c,tp)
+	local ct=Duel.GetFlagEffect(tp,11602030)
+	return Duel.IsExistingMatchingCard(Card.IsAbleToGraveAsCost,tp,LOCATION_HAND+LOCATION_ONFIELD,0,ct,nil)
+end
+function c11602030.atop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g=Duel.SelectMatchingCard(tp,Card.IsAbleToGraveAsCost,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,1,nil)
+	Duel.SendtoGrave(g,REASON_COST)
+end
+function c11602030.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
+	if chk==0 then return #g>=3 end
+end
+function c11602030.tgop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
+	if #g<3 then return end
+	local sg=g:RandomSelect(tp,3)
+	local dg=Group.CreateGroup()
+	local tc=sg:GetFirst()
+	while tc do
+		local preatk=tc:GetAttack()
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetValue(-700)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		tc:RegisterEffect(e1)
+		if preatk~=0 and tc:IsAttack(0) then dg:AddCard(tc) end
+		tc=sg:GetNext()
+	end
+	Duel.SendtoGrave(dg,REASON_EFFECT)
+end
+function c11602030.checkop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.RegisterFlagEffect(tp,11602030,RESET_PHASE+PHASE_END,0,1)
+	Duel.RegisterFlagEffect(1-tp,11602030,RESET_PHASE+PHASE_END,0,1)
+end
+function c11602030.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFlagEffect(tp,11602030)>=3
+end
+function c11602030.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
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function c11602030.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
+		Duel.BreakEffect()
+		local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
+		local tc=g:GetFirst()
+		while tc do
+			local e1=Effect.CreateEffect(c)
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetCode(EFFECT_UPDATE_ATTACK)
+			e1:SetValue(-1000)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+			tc:RegisterEffect(e1)
+			tc=g:GetNext()
+		end
+	end
+end
\ No newline at end of file

expansions/script/c11602035.lua

+--空间站的人偶 黑塔
+function c11602035.initial_effect(c)
+	--set s/t
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCountLimit(1,11602035)
+	e1:SetTarget(c11602035.settg)
+	e1:SetOperation(c11602035.setop)
+	c:RegisterEffect(e1)
+	local e11=e1:Clone()
+	e11:SetCode(EVENT_SPSUMMON_SUCCESS)
+	c:RegisterEffect(e11)
+	--search
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_GRAVE)
+	--e2:SetCountLimit(1,11602035+1)
+	e2:SetCost(aux.bfgcost)
+	e2:SetTarget(c11602035.tg)
+	e2:SetOperation(c11602035.op)
+	c:RegisterEffect(e2)
+end
+function c11602035.tg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetFlagEffect(tp,11602035)<1
+		or Duel.GetFlagEffect(tp,11602035+1)<1
+		or Duel.GetFlagEffect(tp,11602035+2)<1 end
+end
+function c11602035.op(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local values = {1,2,3}
+	local is_available = {Duel.GetFlagEffect(tp,11602035)<1,Duel.GetFlagEffect(tp,11602035+1)<1,Duel.GetFlagEffect(tp,11602035+2)<1}
+	local available = {}
+	for i = 1, #values do
+		if is_available[i] then
+			table.insert(available,values[i])
+		end
+	end
+	if #available<1 then return end
+	local randomIndex = math.random(1, #available)
+	local op = available[randomIndex]
+	Debug.Message(op)
+	if op==1 then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_FIELD)
+		e1:SetCode(EFFECT_DRAW_COUNT)
+		e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+		e1:SetTargetRange(1,0)
+		e1:SetValue(c11602035.drval)
+		Duel.RegisterEffect(e1,tp)
+		Duel.RegisterFlagEffect(tp,11602035,0,0,0)
+	elseif op==2 then
+		local e2=Effect.CreateEffect(c)
+		e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		e2:SetCode(EVENT_PHASE+PHASE_END)
+		e2:SetCountLimit(1,11602035+2)
+		e2:SetOperation(c11602035.op2)
+		Duel.RegisterEffect(e2,tp)
+		Duel.RegisterFlagEffect(tp,11602035+1,0,0,0)
+	elseif op==3 then
+		local e3=Effect.CreateEffect(c)
+		e3:SetType(EFFECT_TYPE_FIELD)
+		e3:SetCode(EFFECT_UPDATE_ATTACK)
+		e3:SetTargetRange(0,LOCATION_MZONE)
+		e3:SetValue(c11602035.val3)
+		Duel.RegisterEffect(e3,tp)
+		Duel.RegisterFlagEffect(tp,11602035+2,0,0,0)
+	end
+end
+function c11602035.drval(e)
+	local ct=Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)
+	return math.max(1,math.floor(ct/2))
+end
+function c11602035.op2(e,tp,eg,ep,ev,re,r,rp)
+	if not Duel.IsTurnPlayer(tp) then return end
+	Duel.Hint(HINT_CARD,0,11602035)
+	local ct=Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)
+	local tct=math.floor(ct/3)
+	local g=Duel.GetFieldGroup(tp,LOCATION_HAND+LOCATION_ONFIELD,0)
+	if tct>0 and #g>0 then
+		local sct=math.min(tct,#g)
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+		local tg=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_HAND+LOCATION_ONFIELD,0,sct,sct,nil)
+		Duel.SendtoGrave(tg,REASON_RULE)
+	end
+end
+function c11602035.val3(e,c)
+	return math.ceil(-c:GetBaseAttack()/2)
+end
+function c11602035.filter(c)
+	return aux.IsCodeListed(c,60158001) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable()
+end
+function c11602035.settg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c11602035.filter,tp,LOCATION_DECK,0,1,nil) end
+end
+function c11602035.setop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
+	local dc=Duel.SelectMatchingCard(tp,c11602035.filter,tp,LOCATION_DECK,0,1,1,nil):GetFirst()
+	if dc and Duel.SSet(tp,dc) then
+		if dc:IsType(TYPE_QUICKPLAY) then
+			local e1=Effect.CreateEffect(c)
+			e1:SetDescription(aux.Stringid(11602035,0))
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+			e1:SetCode(EFFECT_QP_ACT_IN_SET_TURN)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+			dc:RegisterEffect(e1)
+		end
+		if dc:IsType(TYPE_TRAP) then
+			local e1=Effect.CreateEffect(c)
+			e1:SetDescription(aux.Stringid(11602035,0))
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetCode(EFFECT_TRAP_ACT_IN_SET_TURN)
+			e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+			dc:RegisterEffect(e1)
+		end
+	end
+end
\ No newline at end of file

expansions/script/c11602045.lua

+--开拓!再此启航
+function c11602045.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,11602045)
+	e1:SetCost(c11602045.cost)
+	e1:SetTarget(c11602045.target)
+	e1:SetOperation(c11602045.activate)
+	c:RegisterEffect(e1)
+	--Destroy replace
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e2:SetCode(EFFECT_DESTROY_REPLACE)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetCountLimit(1,11602045+1)
+	e2:SetTarget(c11602045.reptg)
+	e2:SetValue(c11602045.repval)
+	c:RegisterEffect(e2)
+end
+function c11602045.repfilter(c,tp)
+	return c:IsLocation(LOCATION_ONFIELD) and c:IsControler(tp) and c:GetReasonPlayer()==1-tp
+		and c:IsReason(REASON_EFFECT) and not c:IsReason(REASON_REPLACE)
+end
+function c11602045.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToRemove() and eg:IsExists(c11602045.repfilter,1,nil,tp) end
+	if Duel.SelectEffectYesNo(tp,e:GetHandler(),96) then
+		Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT)
+		return true
+	else return false end
+end
+function c11602045.repval(e,c)
+	return c11602045.repfilter(c,e:GetHandlerPlayer())
+end
+function c11602045.cfilter(c)
+	return c:IsSetCard(0xa548)
+end
+function c11602045.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c11602045.cfilter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,e:GetHandler()) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
+	local g=Duel.SelectMatchingCard(tp,c11602045.cfilter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,1,e:GetHandler())
+	local sc=g:GetFirst()
+	if sc:IsLocation(LOCATION_HAND) or sc:IsFacedown() then
+		Duel.ConfirmCards(1-tp,sc)
+	end
+end
+function c11602045.filter(c,e,tp)
+	return c:IsSetCard(0xa548) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsFaceupEx()
+end
+function c11602045.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c11602045.filter,tp,0x21,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0x21)
+end
+function c11602045.activate(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
+	local c=e:GetHandler()
+	local fid=c:GetFieldID()
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,c11602045.filter,tp,0x21,0,1,1,nil,e,tp)
+	local tc=g:GetFirst()
+	if tc then
+		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
\ No newline at end of file

expansions/script/c16170024.lua

@@ -36,7 +36,7 @@ function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.ResetFlagEffect(tp,16170067)
 end
 function cm.check(c,tp)
-	return c:IsFaceup() and c:IsSetCard(0x3cc7) and c:IsControler(tp)
+	return c:IsFaceup() and c:IsLocation(LOCATION_MZONE) and c:IsSetCard(0x3cc7) and c:IsControler(tp)
 end
 function cm.descheck(c,tp)
 	local xg=c:GetColumnGroup()
@@ -56,7 +56,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp,chk)
 			local sg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(Card.IsAbleToDeck),tp,LOCATION_GRAVE+LOCATION_REMOVED,LOCATION_GRAVE+LOCATION_REMOVED,1,5,nil)
 			Duel.SendtoDeck(sg,nil,2,REASON_EFFECT)
 		end
-	end	
+	end 
 end
 function cm.spcheck(c,tp)
 	if not c:IsSetCard(0x3cc7) or not c:IsType(TYPE_MONSTER) then return false end

expansions/script/c16170028.lua

@@ -48,8 +48,9 @@ function cm.rlcheck(c,tp)
 end
 function cm.tdcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(cm.rlcheck,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,e:GetHandler(),tp) and Duel.GetMatchingGroupCount(Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD,nil)>0 end
+	local ct=Duel.GetMatchingGroupCount(Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD,nil)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
-	local g=Duel.SelectMatchingCard(tp,cm.rlcheck,tp,LOCATION_ONFIELD+LOCATION_HAND,0,1,1,e:GetHandler(),tp)
+	local g=Duel.SelectMatchingCard(tp,cm.rlcheck,tp,LOCATION_ONFIELD+LOCATION_HAND,0,1,ct,e:GetHandler(),tp)
 	Duel.Release(g,REASON_COST)
 	e:SetLabel(g:GetCount())
 end

expansions/script/c16170050.lua

@@ -111,7 +111,7 @@ function cm.cpfilter(c,e,tp,eg,ep,ev,re,r,rp)
 	for _,te in ipairs(tab) do
 		local con=te:GetCondition() or aux.TRUE
 		local tg=te:GetTarget() or aux.TRUE
-		if te:GetOperation() and con(e,tp,eg,ep,ev,re,r,rp) and tg(e,tp,eg,ep,ev,re,r,rp,0) and ((te:IsHasType(EFFECT_TYPE_ACTIVATE) and (te:GetCode()==EVENT_CHAINING or te:GetCode()==EVENT_FREE_CHAIN)) or not te:IsHasType(EFFECT_TYPE_ACTIVATE)) then
+		if te:GetOperation() and ((te:IsHasType(EFFECT_TYPE_ACTIVATE) and (te:GetCode()==EVENT_CHAINING or te:GetCode()==EVENT_FREE_CHAIN)) or not te:IsHasType(EFFECT_TYPE_ACTIVATE)) and con(e,tp,eg,ep,ev,re,r,rp) and tg(e,tp,eg,ep,ev,re,r,rp,0) then
 			return true
 		end
 	end
@@ -134,7 +134,7 @@ function cm.cptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	for _,te in ipairs(tab) do
 		local con=te:GetCondition() or aux.TRUE
 		local tg=te:GetTarget() or aux.TRUE
-		if te:GetOperation() and con(e,tp,eg,ep,ev,re,r,rp) and tg(e,tp,eg,ep,ev,re,r,rp,0) and ((te:IsHasType(EFFECT_TYPE_ACTIVATE) and (te:GetCode()==EVENT_CHAINING or te:GetCode()==EVENT_FREE_CHAIN)) or not te:IsHasType(EFFECT_TYPE_ACTIVATE)) then
+		if te:GetOperation() and ((te:IsHasType(EFFECT_TYPE_ACTIVATE) and (te:GetCode()==EVENT_CHAINING or te:GetCode()==EVENT_FREE_CHAIN)) or not te:IsHasType(EFFECT_TYPE_ACTIVATE)) and con(e,tp,eg,ep,ev,re,r,rp) and tg(e,tp,eg,ep,ev,re,r,rp,0)  then
 			table.insert(res_tab,te)
 			table.insert(desc_tab,te:GetDescription())
 		end

expansions/script/c16170061.lua

@@ -138,7 +138,7 @@ function cm.cpfilter(c,e,tp,eg,ep,ev,re,r,rp)
 	for _,te in ipairs(tab) do
 		local con=te:GetCondition() or aux.TRUE
 		local tg=te:GetTarget() or aux.TRUE
-		if te:GetOperation() and con(e,tp,eg,ep,ev,re,r,rp) and tg(e,tp,eg,ep,ev,re,r,rp,0) and (Duel.CheckEvent(te:GetCode()) or not te:IsHasType(EFFECT_TYPE_ACTIVATE) or (te:GetCode()==EVENT_FREE_CHAIN and e:GetCode()==EVENT_FREE_CHAIN)) then
+		if te:GetOperation() and (Duel.CheckEvent(te:GetCode()) or not te:IsHasType(EFFECT_TYPE_ACTIVATE) or (te:GetCode()==EVENT_FREE_CHAIN and e:GetCode()==EVENT_FREE_CHAIN)) and con(e,tp,eg,ep,ev,re,r,rp) and tg(e,tp,eg,ep,ev,re,r,rp,0) then
 			return true
 		end
 	end
@@ -161,7 +161,7 @@ function cm.cptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	for _,te in ipairs(tab) do
 		local con=te:GetCondition() or aux.TRUE
 		local tg=te:GetTarget() or aux.TRUE
-		if te:GetOperation() and con(e,tp,eg,ep,ev,re,r,rp) and tg(e,tp,eg,ep,ev,re,r,rp,0) and (Duel.CheckEvent(te:GetCode()) or not te:IsHasType(EFFECT_TYPE_ACTIVATE) or (te:GetCode()==EVENT_FREE_CHAIN and e:GetCode()==EVENT_FREE_CHAIN)) then
+		if te:GetOperation() and (Duel.CheckEvent(te:GetCode()) or not te:IsHasType(EFFECT_TYPE_ACTIVATE) or (te:GetCode()==EVENT_FREE_CHAIN and e:GetCode()==EVENT_FREE_CHAIN)) and con(e,tp,eg,ep,ev,re,r,rp) and tg(e,tp,eg,ep,ev,re,r,rp,0) then
 			table.insert(res_tab,te)
 			table.insert(desc_tab,te:GetDescription())
 		end

expansions/script/c16170062.lua

@@ -130,7 +130,7 @@ function cm.cpfilter(c,e,tp,eg,ep,ev,re,r,rp)
 	for _,te in ipairs(tab) do
 		local con=te:GetCondition() or aux.TRUE
 		local tg=te:GetTarget() or aux.TRUE
-		if te:GetOperation() and con(e,tp,eg,ep,ev,re,r,rp) and tg(e,tp,eg,ep,ev,re,r,rp,0) and (Duel.CheckEvent(te:GetCode()) or not te:IsHasType(EFFECT_TYPE_ACTIVATE) or (te:GetCode()==EVENT_FREE_CHAIN and e:GetCode()==EVENT_FREE_CHAIN)) then
+		if te:GetOperation() and (Duel.CheckEvent(te:GetCode()) or not te:IsHasType(EFFECT_TYPE_ACTIVATE) or (te:GetCode()==EVENT_FREE_CHAIN and e:GetCode()==EVENT_FREE_CHAIN)) and con(e,tp,eg,ep,ev,re,r,rp) and tg(e,tp,eg,ep,ev,re,r,rp,0) then
 			return true
 		end
 	end
@@ -153,7 +153,7 @@ function cm.cptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	for _,te in ipairs(tab) do
 		local con=te:GetCondition() or aux.TRUE
 		local tg=te:GetTarget() or aux.TRUE
-		if te:GetOperation() and con(e,tp,eg,ep,ev,re,r,rp) and tg(e,tp,eg,ep,ev,re,r,rp,0) and (Duel.CheckEvent(te:GetCode()) or not te:IsHasType(EFFECT_TYPE_ACTIVATE) or (te:GetCode()==EVENT_FREE_CHAIN and e:GetCode()==EVENT_FREE_CHAIN)) then
+		if te:GetOperation() and (Duel.CheckEvent(te:GetCode()) or not te:IsHasType(EFFECT_TYPE_ACTIVATE) or (te:GetCode()==EVENT_FREE_CHAIN and e:GetCode()==EVENT_FREE_CHAIN)) and con(e,tp,eg,ep,ev,re,r,rp) and tg(e,tp,eg,ep,ev,re,r,rp,0) then
 			table.insert(res_tab,te)
 			table.insert(desc_tab,te:GetDescription())
 		end

expansions/script/c16170065.lua

@@ -119,6 +119,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	ge:SetProperty(EFFECT_FLAG_DELAY)
 	ge:SetCondition(cm.recon)
 	ge:SetOperation(cm.reop)
+	ge:SetReset(RESET_PHASE+PHASE_END,1)
 	Duel.RegisterEffect(ge,tp)
 end
 function cm.cpfilter(c)

expansions/script/c16170069.lua

@@ -69,6 +69,7 @@ function cm.tg(e,tp,eg,ep,ev,re,r,rp,chk)
 			end
 		end
 		Duel.SetTargetParam(lab)
+		Duel.SetChainLimit(aux.FALSE)
 	else
 		local res1=Duel.IsChainNegatable(ev)
 		local res2=Duel.GetMatchingGroupCount(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,e:GetHandler())

expansions/script/c16170072.lua

@@ -53,14 +53,14 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetMatchingGroup(cm.rlcheck,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
 	Duel.Release(g,REASON_EFFECT)
 	local og=Duel.GetOperatedGroup()
-	for tc in aux.Next(g) do
+	for gc in aux.Next(g) do
 		local e1_1=Effect.CreateEffect(c)
 		e1_1:SetType(EFFECT_TYPE_SINGLE)
 		e1_1:SetCode(EFFECT_CANNOT_TRIGGER)
 		e1_1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
 		e1_1:SetReset(RESET_EVENT+RESETS_STANDARD)
 		gc:RegisterEffect(e1_1)
-	end	 
+	end  
 end
 function cm.rsdtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end

expansions/script/c40010756.lua

@@ -36,7 +36,6 @@ function cm.initial_effect(c)
 	e5:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e5:SetRange(LOCATION_MZONE)
 	e5:SetHintTiming(0,TIMINGS_CHECK_MONSTER)
-	e5:SetCondition(cm.descon)
 	e5:SetTarget(cm.target)
 	e5:SetOperation(cm.operation)
 	c:RegisterEffect(e5)
@@ -68,36 +67,32 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp)
 		c:RegisterFlagEffect(0,RESET_EVENT+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,0))
 	end
 end
+
 function cm.dfilter(c)
 	return c:IsFaceup() and c:IsCode(40010230)
 end
-function cm.descon(e,tp,eg,ep,ev,re,r,rp)
-	--if Duel.GetFlagEffect(tp,m)>0 then return e:GetHandler():GetFlagEffect(m+1)<2
-	--else return e:GetHandler():GetFlagEffect(m+1)<1 end
-	return Duel.GetFlagEffect(tp,40009560)>0 or Duel.IsExistingMatchingCard(cm.dfilter,tp,LOCATION_MZONE,0,1,nil)
-end
+
 function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	local c=e:GetHandler()
 	if chkc then return chkc:IsControler(1-tp) and chkc:IsOnField() and aux.NegateAnyFilter(chkc) end
 	if chk==0 then
-		local b
-		if Duel.GetFlagEffect(tp,m)>0 then
-			b=c:GetFlagEffect(m+1)<2
-		else
-			b=c:GetFlagEffect(m+1)<1
-		end
-		return b and Duel.IsExistingTarget(aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,1,nil)
-	end
-	c:RegisterFlagEffect(m+1,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
+		local count = Duel.GetFlagEffect(tp, m+1)
+		if count >= 2 then return false end
 
+		if Duel.GetFlagEffect(tp, 40009560) <= 0 or Duel.IsExistingMatchingCard(cm.dfilter, tp, LOCATION_MZONE, 0, 1, nil) then return false end
 
+		if count == 1 and Duel.GetFlagEffect(tp, m) <= 0 then return false end
 
-	--if chk==0 then return Duel.IsExistingTarget(aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,1,nil) end
+		return Duel.IsExistingTarget(aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,1,nil)
+	end
+	
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
 	local g=Duel.SelectTarget(tp,aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,1,1,nil)
 	Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,1,0,0)
 end
+
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	Duel.RegisterFlagEffect(tp, m+1, RESET_PHASE+PHASE_END, 0, 1)
+
 	local c=e:GetHandler()
 	local tc=Duel.GetFirstTarget()
 	if ((tc:IsFaceup() and not tc:IsDisabled()) or tc:IsType(TYPE_TRAPMONSTER)) and tc:IsRelateToEffect(e) then
@@ -124,8 +119,4 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 			tc:RegisterEffect(e3)
 		end
 	end
-	e:GetHandler():RegisterFlagEffect(m+1,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
-end
+end
\ No newline at end of file
-
-
-

expansions/script/c52798100.lua

@@ -127,7 +127,7 @@ function s.rop(e,tp,eg,ep,ev,re,r,rp)
 		e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END)
 		e2:SetValue(500)
 		c:RegisterEffect(e2)
-	elseif op==1 and Duel.IsExistingMatchingCard(s.thfilter,tp,0,LOCATION_SZONE,nil) and Duel.SelectYesNo(tp,aux.Stringid(id,3)) then
+	elseif op==1 and Duel.IsExistingMatchingCard(s.thfilter,tp,0,LOCATION_SZONE,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(id,3)) then
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
 		local g=Duel.GetMatchingGroup(s.thfilter,tp,0,LOCATION_SZONE,nil)
 		if #g>0 then

expansions/script/c52798115.lua

@@ -53,7 +53,7 @@ function s.thop1(e,tp,eg,ep,ev,re,r,rp)
 end
 function s.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil) end
-	Duel.DiscardHand(Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)
+	Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)
 end
 function s.thfilter2(c)
 	return c:IsCode(52798070,52798075) and c:IsAbleToHand()

expansions/script/c61200000.lua

@@ -18,7 +18,7 @@ function c61200000.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetProperty(EFFECT_FLAG_DELAY)
 	e2:SetCode(EVENT_REMOVE)
-	e2:SetCountLimit(1,id+o)
+	e2:SetCountLimit(1,61200099)
 	e2:SetTarget(s.tg2)
 	e2:SetOperation(s.op2)
 	c:RegisterEffect(e2)

expansions/script/c61200002.lua

@@ -38,7 +38,7 @@ function s.initial_effect(c)
 	e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_COUNT_LIMIT)
 	e4:SetType(EFFECT_TYPE_IGNITION)
 	e4:SetRange(LOCATION_SZONE)
-	e4:SetCountLimit(1,id+o+EFFECT_COUNT_CODE_OATH)
+	e4:SetCountLimit(1,61200098+EFFECT_COUNT_CODE_OATH)
 	e4:SetCost(s.cost4)
 	e4:SetTarget(s.target4)
 	e4:SetOperation(s.operation4)

expansions/script/c61200003.lua

@@ -36,7 +36,7 @@ function s.initial_effect(c)
 	e4:SetCode(EVENT_CHAINING)
 	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL+EFFECT_FLAG_COUNT_LIMIT)
 	e4:SetRange(LOCATION_GRAVE)
-	e4:SetCountLimit(1,id+o+EFFECT_COUNT_CODE_OATH)
+	e4:SetCountLimit(1,61200097+EFFECT_COUNT_CODE_OATH)
 	e4:SetCondition(s.con4)
 	e4:SetCost(s.cost4)
 	e4:SetTarget(s.tg4)

expansions/script/c61200004.lua

@@ -19,7 +19,7 @@ function c61200004.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_COUNT_LIMIT)
 	e2:SetCode(EVENT_REMOVE)
-	e2:SetCountLimit(1,id+o+EFFECT_COUNT_CODE_OATH)
+	e2:SetCountLimit(1,61200096+EFFECT_COUNT_CODE_OATH)
 	e2:SetTarget(s.tg2)
 	e2:SetOperation(s.op2)
 	c:RegisterEffect(e2)

expansions/script/c61200005.lua

@@ -14,7 +14,7 @@ function c61200005.initial_effect(c)
 	c:RegisterEffect(e1)
 	--本家启动
 	local e2=Effect.CreateEffect(c)
-	e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_REMOVE+CATEGORY_TODECK)
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetProperty(EFFECT_FLAG_COUNT_LIMIT)
 	e2:SetCode(EVENT_FREE_CHAIN)
@@ -55,20 +55,21 @@ function s.op2(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 	local g=Duel.SelectMatchingCard(tp,s.f1,tp,LOCATION_DECK+LOCATION_HAND,0,1,1,nil,e,tp)
-	local ag=g:GetFirst()
 	local c=e:GetHandler()
-	if ag and Duel.SpecialSummon(ag,0,tp,tp,false,false,POS_FACEUP)>0 then
+	if Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)>0 then
 		local g2=Duel.GetMatchingGroup(s.f2,tp,LOCATION_ONFIELD,0,c)
 		if g2:GetCount()>0 then
+			Duel.BreakEffect()
 			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 			local ag2=g2:Select(tp,1,1,nil)
-			Duel.Remove(ag2,POS_FACEUP,REASON_EFFECT)
-			local g3=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_REMOVED,0,nil)
-			if g3:GetCount()>0 then
-				Duel.BreakEffect()
-				Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
-				local ag3=g3:Select(tp,1,1,nil)
-				Duel.SendtoDeck(ag3,tp,2,REASON_EFFECT)
+			if Duel.Remove(ag2,POS_FACEUP,REASON_EFFECT)>0 then
+			    local g3=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_REMOVED,0,nil)
+			    if g3:GetCount()>0 then
+				    Duel.BreakEffect()
+				    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+				    local ag3=g3:Select(tp,1,1,nil)
+				    Duel.SendtoDeck(ag3,tp,2,REASON_EFFECT)
+				end
 			end
 		end
 	end

expansions/script/c61200006.lua

@@ -52,7 +52,7 @@ function c61200006.initial_effect(c)
 	e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e6:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_COUNT_LIMIT)
 	e6:SetCode(EVENT_REMOVE)
-	e6:SetCountLimit(1,id+o+EFFECT_COUNT_CODE_OATH)
+	e6:SetCountLimit(1,61200095+EFFECT_COUNT_CODE_OATH)
 	e6:SetTarget(s.tg6)
 	e6:SetOperation(s.op6)
 	c:RegisterEffect(e6)

expansions/script/c61200007.lua

@@ -41,7 +41,7 @@ function c61200007.initial_effect(c)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e3:SetProperty(EFFECT_FLAG_DELAY)
 	e3:SetCode(EVENT_REMOVE)
-	e3:SetCountLimit(1,id+o)
+	e3:SetCountLimit(1,61200094)
 	e3:SetTarget(s.tg3)
 	e3:SetOperation(s.op3)
 	c:RegisterEffect(e3)

expansions/script/c61200009.lua

@@ -20,7 +20,7 @@ function c61200009.initial_effect(c)
 	e2:SetCode(EVENT_CHAINING)
 	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
 	e2:SetRange(LOCATION_SZONE)
-	e2:SetCountLimit(1,id+o)
+	e2:SetCountLimit(1,61200093)
 	e2:SetCondition(s.con2)
     e2:SetCost(s.cost2)
 	e2:SetTarget(s.tg2)
@@ -32,7 +32,7 @@ function c61200009.initial_effect(c)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e3:SetProperty(EFFECT_FLAG_DELAY)
 	e3:SetCode(EVENT_REMOVE)
-	e3:SetCountLimit(1,id+o*2)
+	e3:SetCountLimit(1,61200092)
 	e3:SetTarget(s.tg3)
 	e3:SetOperation(s.op3)
 	c:RegisterEffect(e3)

expansions/script/c61200010.lua

@@ -25,7 +25,7 @@ function c61200010.initial_effect(c)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e3:SetProperty(EFFECT_FLAG_DELAY)
 	e3:SetCode(EVENT_REMOVE)
-	e3:SetCountLimit(1,id+o)
+	e3:SetCountLimit(1,61200091)
 	e3:SetTarget(s.tg3)
 	e3:SetOperation(s.op3)
 	c:RegisterEffect(e3)

expansions/script/c61200011.lua

@@ -24,7 +24,7 @@ function c61200011.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_IGNITION)
 	e2:SetCode(EVENT_FREE_CHAIN)
 	e2:SetRange(LOCATION_MZONE)
-	e2:SetCountLimit(1,id+o)
+	e2:SetCountLimit(1,61200090)
 	e2:SetTarget(s.tg2)
 	e2:SetOperation(s.op2)
 	c:RegisterEffect(e2)

expansions/script/c61200012.lua

@@ -16,7 +16,7 @@ function c61200012.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e2:SetProperty(EFFECT_FLAG_DELAY)
-    e2:SetCountLimit(1,id+o)
+    e2:SetCountLimit(1,61200089)
 	e2:SetTarget(s.tg2)
 	e2:SetOperation(s.op2)
 	c:RegisterEffect(e2)
@@ -29,7 +29,7 @@ function c61200012.initial_effect(c)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e4:SetProperty(EFFECT_FLAG_DELAY)
 	e4:SetCode(EVENT_REMOVE)
-	e4:SetCountLimit(1,id+o)
+	e4:SetCountLimit(1,61200088)
 	e4:SetTarget(s.tg4)
 	e4:SetOperation(s.op4)
 	c:RegisterEffect(e4)

expansions/script/c61200101.lua

@@ -26,7 +26,7 @@ function s.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e1:SetCountLimit(1,id+o)
+	e1:SetCountLimit(1,61200087)
 	e1:SetTarget(s.tg1)
 	e1:SetOperation(s.op1)
 	c:RegisterEffect(e1)

expansions/script/c61200102.lua

@@ -17,7 +17,7 @@ function c61200102.initial_effect(c)
 	e2:SetCategory(CATEGORY_REMOVE)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_SUMMON_SUCCESS)
-	e2:SetCountLimit(1,id+o+EFFECT_COUNT_CODE_OATH)
+	e2:SetCountLimit(1,61200086+EFFECT_COUNT_CODE_OATH)
 	e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_COUNT_LIMIT)
 	e2:SetTarget(s.tg2)
 	e2:SetOperation(s.op2)
@@ -32,7 +32,7 @@ function c61200102.initial_effect(c)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_COUNT_LIMIT)
 	e3:SetCode(EVENT_REMOVE)
-	e3:SetCountLimit(1,id+o*2+EFFECT_COUNT_CODE_OATH)
+	e3:SetCountLimit(1,61200085+EFFECT_COUNT_CODE_OATH)
 	e3:SetTarget(s.tg3)
 	e3:SetOperation(s.op3)
 	c:RegisterEffect(e3)

expansions/script/c61200103.lua

@@ -21,7 +21,7 @@ function c61200103.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_COUNT_LIMIT)
 	e2:SetCode(EVENT_REMOVE)
-	e2:SetCountLimit(1,id+o+EFFECT_COUNT_CODE_OATH)
+	e2:SetCountLimit(1,61200084+EFFECT_COUNT_CODE_OATH)
 	e2:SetTarget(s.tg2)
 	e2:SetOperation(s.op2)
 	c:RegisterEffect(e2)
@@ -30,7 +30,7 @@ function c61200103.initial_effect(c)
 	e3:SetType(EFFECT_TYPE_IGNITION)
 	e3:SetRange(LOCATION_REMOVED)
 	e3:SetProperty(EFFECT_FLAG_COUNT_LIMIT)
-	e3:SetCountLimit(1,id+o*2+EFFECT_COUNT_CODE_OATH)
+	e3:SetCountLimit(1,61200083+EFFECT_COUNT_CODE_OATH)
     e3:SetCost(s.cost3)
 	e3:SetTarget(s.tg3)
 	e3:SetOperation(s.op3)

expansions/script/c61200104.lua

@@ -22,7 +22,7 @@ function c61200104.initial_effect(c)
 	e2:SetCode(EVENT_FREE_CHAIN)
 	e2:SetRange(LOCATION_MZONE)
 	e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
-	e2:SetCountLimit(1,id+o)
+	e2:SetCountLimit(1,61200082)
 	e2:SetCondition(s.con2)
 	e2:SetTarget(s.tg2)
 	e2:SetOperation(s.op2)
@@ -34,7 +34,7 @@ function c61200104.initial_effect(c)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e3:SetCode(EVENT_REMOVE)
 	e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_COUNT_LIMIT)
-    e3:SetCountLimit(1,id+o*2+EFFECT_COUNT_CODE_OATH)
+    e3:SetCountLimit(1,61200081+EFFECT_COUNT_CODE_OATH)
 	e3:SetTarget(s.tg3)
 	e3:SetOperation(s.op3)
 	c:RegisterEffect(e3)

expansions/script/c61200105.lua

@@ -36,7 +36,7 @@ function s.initial_effect(c)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e4:SetProperty(EFFECT_FLAG_DELAY)
 	e4:SetCode(EVENT_REMOVE)
-	e4:SetCountLimit(1,id+o)
+	e4:SetCountLimit(1,61200080)
 	e4:SetTarget(s.tg4)
 	e4:SetOperation(s.op4)
 	c:RegisterEffect(e4)

expansions/script/c61200106.lua

@@ -37,7 +37,7 @@ function c61200106.initial_effect(c)
 	e3:SetCode(EVENT_FREE_CHAIN)
 	e3:SetRange(LOCATION_ONFIELD)
 	e3:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
-    e3:SetCountLimit(1,id+o)
+    e3:SetCountLimit(1,61200079)
 	e3:SetCondition(s.con3)
 	e3:SetTarget(s.tg3)
 	e3:SetOperation(s.op3)

expansions/script/c61200109.lua

@@ -22,7 +22,7 @@ function c61200109.initial_effect(c)
 	e3:SetCode(EVENT_FREE_CHAIN)
 	e3:SetRange(LOCATION_MZONE)
 	e3:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
-	e3:SetCountLimit(1,id+o)
+	e3:SetCountLimit(1,61200078)
 	e3:SetCondition(s.con3)
     e3:SetCost(s.cost3)
 	e3:SetTarget(s.tg3)
@@ -34,7 +34,7 @@ function c61200109.initial_effect(c)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e4:SetProperty(EFFECT_FLAG_DELAY)
 	e4:SetCode(EVENT_REMOVE)
-	e4:SetCountLimit(1,id+o*2)
+	e4:SetCountLimit(1,61200077)
 	e4:SetTarget(s.tg4)
 	e4:SetOperation(s.op4)
 	c:RegisterEffect(e4)

expansions/script/c61200110.lua

@@ -19,7 +19,7 @@ function c61200110.initial_effect(c)
 	e2:SetCode(EVENT_SUMMON_SUCCESS)
 	e2:SetRange(LOCATION_REMOVED)
 	e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_ACTIVATE_CONDITION+EFFECT_FLAG_COUNT_LIMIT)
-	e2:SetCountLimit(1,id+o+EFFECT_COUNT_CODE_OATH)
+	e2:SetCountLimit(1,61200076+EFFECT_COUNT_CODE_OATH)
 	e2:SetCondition(s.con2)
 	e2:SetCost(s.cost2)
 	e2:SetTarget(s.tg2)

expansions/script/c61200202.lua

@@ -26,19 +26,19 @@ function c61200202.initial_effect(c)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e3:SetProperty(EFFECT_FLAG_DELAY)
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e3:SetCountLimit(1,id+o)
+	e3:SetCountLimit(1,61200075)
 	e3:SetTarget(s.tg3)
 	e3:SetOperation(s.op3)
 	c:RegisterEffect(e3)
-	--弹卡
+	--破坏
 	local e4=Effect.CreateEffect(c)
 	e4:SetDescription(aux.Stringid(id,2))
-	e4:SetCategory(CATEGORY_TODECK)
+	e4:SetCategory(CATEGORY_DESTROY)
 	e4:SetType(EFFECT_TYPE_QUICK_O)
 	e4:SetCode(EVENT_FREE_CHAIN)
 	e4:SetRange(LOCATION_MZONE)
 	e4:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
-	e4:SetCountLimit(1,id+o*2)
+	e4:SetCountLimit(1,61200074)
 	e4:SetCost(s.cost4)
 	e4:SetTarget(s.tg4)
 	e4:SetOperation(s.op4)

expansions/script/c61200203.lua

@@ -23,7 +23,7 @@ function c61200203.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_COUNT_LIMIT)
 	e2:SetCode(EVENT_REMOVE)
-	e2:SetCountLimit(1,id+o+EFFECT_COUNT_CODE_OATH)
+	e2:SetCountLimit(1,61200073+EFFECT_COUNT_CODE_OATH)
 	e2:SetTarget(s.tg2)
 	e2:SetOperation(s.op2)
 	c:RegisterEffect(e2)

expansions/script/c61200204.lua

@@ -15,8 +15,8 @@ function c61200204.initial_effect(c)
     local e2=Effect.CreateEffect(c)
 	e2:SetDescription(aux.Stringid(id,0))
 	e2:SetCategory(CATEGORY_TODECK)
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_DELAY)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
 	e2:SetCode(EVENT_TO_GRAVE)
 	e2:SetTarget(s.tg2)
 	e2:SetOperation(s.op2)
@@ -47,7 +47,7 @@ function c61200204.initial_effect(c)
 	e5:SetCode(EVENT_FREE_CHAIN)
 	e5:SetRange(LOCATION_SZONE)
 	e5:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
-	e5:SetCountLimit(1,id+o*1)
+	e5:SetCountLimit(1,61200072)
 	e5:SetTarget(s.tg5)
 	e5:SetOperation(s.op5)
 	c:RegisterEffect(e5)

expansions/script/c61200205.lua

@@ -36,7 +36,7 @@ function c61200205.initial_effect(c)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e4:SetProperty(EFFECT_FLAG_DELAY)
 	e4:SetCode(EVENT_REMOVE)
-	e4:SetCountLimit(1,id+o)
+	e4:SetCountLimit(1,61200071)
 	e4:SetTarget(s.tg4)
 	e4:SetOperation(s.op4)
 	c:RegisterEffect(e4)
@@ -47,7 +47,7 @@ function s.f1(c)
 end
 
 function s.f2(c)
-    return c:IsType(TYPE_MONSTER) and c:IsFaceup() and c:IsDestructable()
+    return c:IsType(TYPE_MONSTER) and c:IsFaceup()
 end
 
 function s.f3(c)
@@ -87,11 +87,11 @@ end
 
 function s.tg3(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
     local c=e:GetHandler()
-	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsDestructable() and chkc:IsFaceup() and chkc:IsControler(tp) end
-	if chk==0 then return Duel.IsExistingTarget(s.f2,tp,LOCATION_ONFIELD,0,1,nil) and c:IsDestructable() end
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() and chkc:IsControler(tp) end
+	if chk==0 then return true end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
 	local g=Duel.SelectTarget(tp,s.f2,tp,LOCATION_ONFIELD,0,1,1,nil)
-	Duel.SetOperationInfo(0,CATEGORY_DESTROY,0,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
 end
 
 function s.op3(e,tp,eg,ep,ev,re,r,rp)

expansions/script/c61200206.lua

@@ -38,7 +38,7 @@ function c61200206.initial_effect(c)
     e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
     e4:SetType(EFFECT_TYPE_IGNITION)
     e4:SetRange(LOCATION_SZONE)
-    e4:SetCountLimit(1,id+o)
+    e4:SetCountLimit(1,61200070)
     e4:SetCost(s.cost4)
     e4:SetTarget(s.tg4)
     e4:SetOperation(s.op4)
@@ -49,7 +49,7 @@ function c61200206.initial_effect(c)
 	e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e5:SetProperty(EFFECT_FLAG_DELAY)
 	e5:SetCode(EVENT_REMOVE)
-	e5:SetCountLimit(1,id+o*2)
+	e5:SetCountLimit(1,61200069)
 	e5:SetTarget(s.tg5)
 	e5:SetOperation(s.op5)
 	c:RegisterEffect(e5)

expansions/script/c61200207.lua

 --云轮秘造 殇
 local s,id,o=GetID()
 function c61200207.initial_effect(c)
-	aux.AddCodeList(c,61200201)
-	aux.AddCodeList(c,61200202)
-	aux.AddCodeList(c,61200203)
+	aux.AddCodeList(c,61200201,61200202,61200203)
 	--装备行为
 	local e1=Effect.CreateEffect(c)
 	e1:SetCategory(CATEGORY_EQUIP)
@@ -53,7 +51,7 @@ function c61200207.initial_effect(c)
 	e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e5:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_COUNT_LIMIT)
 	e5:SetCode(EVENT_REMOVE)
-	e5:SetCountLimit(1,id+o+EFFECT_COUNT_CODE_OATH)
+	e5:SetCountLimit(1,61200068+EFFECT_COUNT_CODE_OATH)
 	e5:SetTarget(s.tg5)
 	e5:SetOperation(s.op5)
 	c:RegisterEffect(e5)

expansions/script/c61200208.lua

@@ -35,7 +35,7 @@ function c61200208.initial_effect(c)
 	e4:SetCategory(CATEGORY_DISABLE_SUMMON+CATEGORY_DESTROY)
 	e4:SetType(EFFECT_TYPE_QUICK_O)
 	e4:SetCode(EVENT_SUMMON)
-	e4:SetCountLimit(1,id+o)
+	e4:SetCountLimit(1,61200067)
 	e4:SetCondition(s.con4)
 	e4:SetCost(s.cost4)
 	e4:SetTarget(s.tg4)
@@ -50,7 +50,7 @@ function c61200208.initial_effect(c)
 	e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e6:SetCode(EVENT_LEAVE_FIELD)
 	e6:SetProperty(EFFECT_FLAG_DELAY)
-	e6:SetCountLimit(1,id+o*2)
+	e6:SetCountLimit(1,61200066)
 	e6:SetCondition(s.con6)
 	e6:SetOperation(s.op6)
 	c:RegisterEffect(e6)

expansions/script/c61200209.lua

@@ -37,7 +37,7 @@ function c61200209.initial_effect(c)
     e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
     e4:SetType(EFFECT_TYPE_IGNITION)
     e4:SetRange(LOCATION_SZONE)
-    e4:SetCountLimit(1,id+o)
+    e4:SetCountLimit(1,61200065)
     e4:SetCost(s.cost4)
     e4:SetTarget(s.tg4)
     e4:SetOperation(s.op4)
@@ -48,7 +48,7 @@ function c61200209.initial_effect(c)
 	e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e5:SetProperty(EFFECT_FLAG_DELAY)
 	e5:SetCode(EVENT_REMOVE)
-	e5:SetCountLimit(1,id+o*2)
+	e5:SetCountLimit(1,61200064)
     e5:SetCost(s.cost5)
 	e5:SetTarget(s.tg5)
 	e5:SetOperation(s.op5)

expansions/script/c61200210.lua

@@ -36,7 +36,7 @@ function c61200210.initial_effect(c)
     e4:SetCategory(CATEGORY_REMOVE)
     e4:SetType(EFFECT_TYPE_IGNITION)
     e4:SetRange(LOCATION_SZONE)
-    e4:SetCountLimit(1,id+o)
+    e4:SetCountLimit(1,61200063)
     e4:SetTarget(s.tg4)
     e4:SetOperation(s.op4)
     c:RegisterEffect(e4)
@@ -48,7 +48,7 @@ function c61200210.initial_effect(c)
 	e5:SetCode(EVENT_FREE_CHAIN)
 	e5:SetRange(LOCATION_GRAVE+LOCATION_REMOVED)
 	e5:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
-	e5:SetCountLimit(1,id+o*1)
+	e5:SetCountLimit(1,61200062)
     e5:SetCondition(s.con5)
 	e5:SetTarget(s.tg5)
 	e5:SetOperation(s.op5)

expansions/script/c61200300.lua

@@ -21,7 +21,7 @@ function c61200300.initial_effect(c)
 	e3:SetCategory(CATEGORY_SEARCH)
 	e3:SetType(EFFECT_TYPE_IGNITION)
 	e3:SetRange(LOCATION_MZONE)
-	e3:SetCountLimit(1,id+o)
+	e3:SetCountLimit(1,61200061)
 	e3:SetTarget(s.tg3)
 	e3:SetOperation(s.op3)
 	c:RegisterEffect(e3)
@@ -31,7 +31,7 @@ function c61200300.initial_effect(c)
 	e4:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON+CATEGORY_GRAVE_ACTION)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e4:SetCode(EVENT_REMOVE)
-	e4:SetCountLimit(1,id+o*2)
+	e4:SetCountLimit(1,61200060)
 	e4:SetProperty(EFFECT_FLAG_DELAY)
 	e4:SetTarget(s.tg4)
 	e4:SetOperation(s.op4)

expansions/script/c61200301.lua

@@ -29,7 +29,7 @@ function c61200301.initial_effect(c)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e4:SetProperty(EFFECT_FLAG_DELAY)
 	e4:SetCode(EVENT_REMOVE)
-	e4:SetCountLimit(1,id+o)
+	e4:SetCountLimit(1,61200059)
 	e4:SetTarget(s.tg4)
 	e4:SetOperation(s.op4)
 	c:RegisterEffect(e4)
@@ -43,10 +43,6 @@ function s.f2(c)
     return c:IsCode(61200302) and c:IsAbleToRemove()
 end
 
-function s.f3(c)
-    return c:IsAbleToGrave()
-end
-
 function s.con1(e,c)
 	if c==nil then return true end
 	return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
@@ -72,7 +68,7 @@ function s.tg4(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 
 function s.op4(e,tp,eg,ep,ev,re,r,rp)
-    local g=Duel.GetMatchingGroup(s.f3,tp,LOCATION_REMOVED,LOCATION_REMOVED,nil)
+    local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_REMOVED,LOCATION_REMOVED,nil)
     if g:GetCount()>0 then
 	    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
         Duel.SendtoGrave(g:Select(tp,1,2,nil),REASON_EFFECT+REASON_RETURN)

expansions/script/c61200302.lua

@@ -39,7 +39,7 @@ function c61200302.initial_effect(c)
 	e5:SetCode(EVENT_FREE_CHAIN)
 	e5:SetRange(LOCATION_SZONE)
 	e5:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
-	e5:SetCountLimit(1,id+o)
+	e5:SetCountLimit(1,61200058)
 	e5:SetCondition(s.con5)
 	e5:SetCost(s.cost5)
 	e5:SetTarget(s.tg5)
@@ -50,8 +50,8 @@ function c61200302.initial_effect(c)
 	e6:SetCategory(CATEGORY_TOHAND)
 	e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e6:SetProperty(EFFECT_FLAG_DELAY)
-	e6:SetCode(EVENT_RETURN_TO_GRAVE)
-	e6:SetCountLimit(1,id+o*2)
+	e6:SetCode(EVENT_MOVE)
+	e6:SetCountLimit(1,61200057)
 	e6:SetCondition(s.con6)
 	e6:SetTarget(s.tg6)
 	e6:SetOperation(s.op6)
@@ -139,7 +139,7 @@ end
 
 function s.con6(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	return c:IsPreviousLocation(LOCATION_REMOVED) and c:IsPreviousPosition(POS_FACEUP)
+	return c:IsPreviousLocation(LOCATION_REMOVED) and c:IsPreviousPosition(POS_FACEUP) and c:IsReason(REASON_RETURN)
 end
 
 function s.tg6(e,tp,eg,ep,ev,re,r,rp,chk)

expansions/script/c61200303.lua

@@ -18,7 +18,7 @@ function s.initial_effect(c)
 	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e2:SetType(EFFECT_TYPE_IGNITION)
 	e2:SetRange(LOCATION_MZONE)
-	e2:SetCountLimit(1,id+o)
+	e2:SetCountLimit(1,61200056)
     e2:SetCondition(s.con2)
 	e2:SetTarget(s.tg2)
 	e2:SetOperation(s.op2)
@@ -31,7 +31,7 @@ function s.initial_effect(c)
 	e3:SetCode(EVENT_FREE_CHAIN)
 	e3:SetRange(LOCATION_MZONE)
 	e3:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
-	e3:SetCountLimit(1,id+o*2)
+	e3:SetCountLimit(1,61200055)
 	e3:SetTarget(s.tg3)
 	e3:SetOperation(s.op3)
 	c:RegisterEffect(e3)

expansions/script/c61200304.lua

@@ -34,7 +34,7 @@ function s.initial_effect(c)
     e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
     e4:SetType(EFFECT_TYPE_IGNITION)
     e4:SetRange(LOCATION_SZONE)
-    e4:SetCountLimit(1,id+o)
+    e4:SetCountLimit(1,61200054)
     e4:SetCost(s.cost4)
     e4:SetTarget(s.tg4)
     e4:SetOperation(s.op4)
@@ -45,7 +45,7 @@ function s.initial_effect(c)
 	e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e5:SetCode(EVENT_DRAW)
-	e5:SetCountLimit(1,id+o*2)
+	e5:SetCountLimit(1,61200053)
 	e5:SetRange(LOCATION_REMOVED)
 	e5:SetCondition(s.con5)
     e5:SetCost(s.cost5)

expansions/script/c61200305.lua

@@ -41,7 +41,7 @@ function c61200305.initial_effect(c)
 	e10:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e10:SetProperty(EFFECT_FLAG_DELAY)
 	e10:SetCode(EVENT_REMOVE)
-	e10:SetCountLimit(1,id+o)
+	e10:SetCountLimit(1,61200052)
 	e10:SetCost(s.cost10)
 	e10:SetTarget(s.tg10)
 	e10:SetOperation(s.op10)

expansions/script/c61200307.lua

@@ -24,7 +24,7 @@ function c61200307.initial_effect(c)
 	e3:SetRange(LOCATION_REMOVED)
 	e3:SetCode(EVENT_SUMMON_SUCCESS)
 	e3:SetProperty(EFFECT_FLAG_DELAY)
-	e3:SetCountLimit(1,id+o)
+	e3:SetCountLimit(1,61200051)
 	e3:SetCondition(s.con3)
 	e3:SetTarget(s.tg3)
 	e3:SetOperation(s.op3)
@@ -39,7 +39,7 @@ function c61200307.initial_effect(c)
 	e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e5:SetProperty(EFFECT_FLAG_DELAY)
 	e5:SetCode(EVENT_REMOVE)
-	e5:SetCountLimit(1,id+o*2)
+	e5:SetCountLimit(1,61200050)
 	e5:SetCondition(s.con5)
 	e5:SetTarget(s.tg5)
 	e5:SetOperation(s.op5)

expansions/script/c61200308.lua

@@ -22,7 +22,7 @@ function c61200308.initial_effect(c)
 	e3:SetCode(EVENT_FREE_CHAIN)
 	e3:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_BATTLE_START+TIMING_BATTLE_END+TIMING_END_PHASE)
 	e3:SetRange(LOCATION_MZONE)
-	e3:SetCountLimit(1,id+o)
+	e3:SetCountLimit(1,61200049)
 	e3:SetCondition(s.con3)
 	e3:SetTarget(s.tg3)
 	e3:SetOperation(s.op3)

expansions/script/c61200309.lua

@@ -18,7 +18,7 @@ function c61200309.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetProperty(EFFECT_FLAG_DELAY)
 	e2:SetCode(EVENT_REMOVE)
-	e2:SetCountLimit(1,id+o)
+	e2:SetCountLimit(1,61200048)
 	e2:SetTarget(s.tg2)
 	e2:SetOperation(s.op2)
 	c:RegisterEffect(e2)

expansions/script/c61200401.lua

@@ -39,7 +39,7 @@ function c61200401.initial_effect(c)
 	e4:SetRange(LOCATION_MZONE)
 	e4:SetProperty(EFFECT_FLAG_COUNT_LIMIT)
 	e4:SetCode(EVENT_BECOME_TARGET)
-	e4:SetCountLimit(1,id+o+EFFECT_COUNT_CODE_OATH)
+	e4:SetCountLimit(1,61200047+EFFECT_COUNT_CODE_OATH)
 	e4:SetCondition(s.con4)
 	e4:SetTarget(s.tg4)
 	e4:SetOperation(s.op4)
@@ -48,7 +48,7 @@ end
 
 function s.f1(c,mc)
 	local tp=mc:GetOwner()
-	return c:IsFusionType(TYPE_MONSTER) and (c:GetControler()==tp or c:GetOwner()==tp) and c:IsFaceup()
+	return c:IsFusionType(TYPE_MONSTER) and (c:GetControler()==tp or c:GetOwner()==tp)
 end
 
 function s.f2(c)

expansions/script/c61200403.lua

@@ -18,7 +18,7 @@ function c61200403.initial_effect(c)
 	e2:SetCode(EVENT_FREE_CHAIN)
 	e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
 	e2:SetRange(LOCATION_MZONE)
-	e2:SetCountLimit(1,id+o)
+	e2:SetCountLimit(1,61200046)
 	e2:SetCondition(s.con2)
 	e2:SetTarget(s.tg2)
 	e2:SetOperation(s.op2)
@@ -28,7 +28,7 @@ function c61200403.initial_effect(c)
 	e3:SetCategory(CATEGORY_TOHAND)
 	e3:SetType(EFFECT_TYPE_IGNITION)
 	e3:SetRange(LOCATION_GRAVE)
-	e3:SetCountLimit(1,id+o*2)
+	e3:SetCountLimit(1,61200045)
     e3:SetCondition(s.con3)
 	e3:SetCost(s.cost3)
 	e3:SetTarget(s.tg3)
@@ -41,7 +41,7 @@ function s.f1(c)
 end
 
 function s.f2(c)
-    return c:IsSetCard(0x3480) and c:IsType(TYPE_MONSTER) and c:IsType(TYPE_LINK)
+    return c:IsSetCard(0x3480) and c:IsType(TYPE_MONSTER) and c:IsType(TYPE_LINK) and c:IsFaceup()
 end
 
 function s.f3(c)
@@ -64,7 +64,7 @@ function s.con1(e,c)
 end
 
 function s.con2(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.IsExistingMatchingCard(s.f2,tp,LOCATION_ONFIELD,0,1,nil)
+	return Duel.IsExistingMatchingCard(s.f2,tp,LOCATION_ONFIELD+LOCATION_REMOVED,0,1,nil)
 end
 
 function s.tg2(e,tp,eg,ep,ev,re,r,rp,chk)

expansions/script/c61200501.lua

@@ -15,7 +15,7 @@ function c61200501.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CANNOT_DISABLE)
-    e2:SetCountLimit(1,id+o)
+    e2:SetCountLimit(1,61200042)
     e2:SetCondition(s.con2)
 	e2:SetTarget(s.tg2)
 	e2:SetOperation(s.op2)
@@ -29,7 +29,7 @@ function c61200501.initial_effect(c)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e4:SetProperty(EFFECT_FLAG_DELAY)
 	e4:SetCode(EVENT_REMOVE)
-	e4:SetCountLimit(1,id+o*2)
+	e4:SetCountLimit(1,61200041)
 	e4:SetTarget(s.tg4)
 	e4:SetOperation(s.op4)
 	c:RegisterEffect(e4)

expansions/script/c61200502.lua

@@ -19,7 +19,7 @@ function c61200502.initial_effect(c)
 	e2:SetDescription(aux.Stringid(id,1))
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e2:SetCountLimit(1,id+o)
+	e2:SetCountLimit(1,61200040)
 	e2:SetProperty(EFFECT_FLAG_DELAY)
 	e2:SetTarget(s.tg2)
 	e2:SetOperation(s.op2)
@@ -34,7 +34,7 @@ function c61200502.initial_effect(c)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e3:SetProperty(EFFECT_FLAG_DELAY)
 	e3:SetCode(EVENT_REMOVE)
-	e3:SetCountLimit(1,id+o*1)
+	e3:SetCountLimit(1,61200039)
 	e3:SetTarget(s.tg3)
 	e3:SetOperation(s.op3)
 	c:RegisterEffect(e3)

expansions/strings.conf

@@ -1850,7 +1850,7 @@
 !setname 0xc30 普利兹姆
 !setname 0xc31 幻灵
 
-#Ashle 861926067 761
+#Ashley 861926067 761
 
 #△雪花 598403759 777 0x9c0-0x9cf
 !setname 0xa9c0 大罪之器