byd

expansions/script/c12825602.lua

@@ -7,7 +7,55 @@ function s.initial_effect(c)
 	c:EnableReviveLimit()
 	chiki.c4a71Limit(c)
 	s.c4a71tohand(c)
-	chiki.c4a71kang(c,s.discon,s.distg,s.disop,CATEGORY_NEGATE,12825602,1131,12825607)
+	s.c4a71kang(c,s.discon,s.distg,s.disop,CATEGORY_NEGATE,12825602,1131,12825607)
+end
+
+function s.c4a71kang(c,con,tg,op,category,cardcode,message,excode)
+	local con=con 
+	if not con then con=Chikichikibanban.c4a71kangdiscon end
+	local tg=tg 
+	if not tg then tg=Chikichikibanban.c4a71tohandthtg end
+	local op=op 
+	if not op then op=Chikichikibanban.c4a71tohandthop end
+	local cardcode=cardcode 
+	local excode=excode
+	local category=category 
+	if not category then category=CATEGORY_TOHAND+CATEGORY_SEARCH end
+	--negate
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(message)
+	e1:SetCategory(CATEGORY_NEGATE)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_CHAINING)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,cardcode)
+	e1:SetCondition(con)
+	e1:SetTarget(tg)
+	e1:SetOperation(op)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCountLimit(1)
+	e2:SetCost(s.c4a71kangcost)
+	e2:SetCondition(s.c4a71kangdiscon2)
+	c:RegisterEffect(e2)
+	--summon success
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e3:SetOperation(Chikichikibanban.sumsuc)
+	c:RegisterEffect(e3)
+end
+function s.c4a71kangdiscon2(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:GetOverlayGroup():IsExists(Card.IsCode,1,nil,12825607)
+		and c:GetFlagEffect(0)~=0 and s.discon(e,tp,eg,ep,ev,re,r,rp)
+end
+function s.c4a71kangcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) 
+		and Duel.GetFlagEffect(tp,12825602)==0 end
+	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
+	Duel.RegisterFlagEffect(tp,12825602,RESET_PHASE+PHASE_END,0,1)
 end
 function s.discon(e,tp,eg,ep,ev,re,r,rp)
 	return rp==1-tp and e:GetHandler():GetFlagEffect(12825612)>0 
@@ -18,7 +66,11 @@ function s.distg(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
 end
 function s.disop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
 	Duel.NegateActivation(ev)
+	if c:GetFlagEffect(0)==0 then
+		c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,65)
+	end
 end
 function s.c4a71tohand(c,tg,op,category)
 	local tg=tg 
@@ -37,4 +89,4 @@ function s.c4a71tohand(c,tg,op,category)
 	e1:SetTarget(tg)
 	e1:SetOperation(op)
 	c:RegisterEffect(e1)
-end
\ No newline at end of file
+end

expansions/script/c12825603.lua

 --铳影-唐莹
 Duel.LoadScript("c17035101.lua")
-function c12825603.initial_effect(c)
+local s,id,o=GetID()
+function s.initial_effect(c)
 	--xyz summon
 	aux.AddXyzProcedure(c,nil,6,3)
 	c:EnableReviveLimit()
 	chiki.c4a71Limit(c)
 	chiki.c4a71tohand(c)
-	chiki.c4a71kang(c,nil,c12825603.rmtg,c12825603.rmop,CATEGORY_REMOVE,12825603,1102,12825608)
+	s.c4a71kang(c)
 end
-function c12825603.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
+function s.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	local rc=re:GetHandler()
 	if chk==0 then return rc:IsRelateToEffect(re) and rc:IsAbleToRemove() and not rc:IsLocation(LOCATION_REMOVED) end
 	Duel.SetOperationInfo(0,CATEGORY_REMOVE,rc,1,0,0)
 end
-function c12825603.rmop(e,tp,eg,ep,ev,re,r,rp)
+function s.rmop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
 	local rc=re:GetHandler()
 	if rc:IsRelateToEffect(re) then
 		Duel.Remove(rc,POS_FACEUP,REASON_EFFECT)
 	end
+	if c:GetFlagEffect(0)==0 then
+		c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,65)
+	end
+end
+
+function s.c4a71kang(c)
+	--negate
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(1102)
+	e1:SetCategory(CATEGORY_REMOVE)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_CHAINING)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,id)
+	e1:SetCondition(s.discon)
+	e1:SetTarget(s.rmtg)
+	e1:SetOperation(s.rmop)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCountLimit(1)
+	e2:SetCost(s.c4a71kangcost)
+	e2:SetCondition(s.c4a71kangdiscon2)
+	c:RegisterEffect(e2)
+	--summon success
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e3:SetOperation(s.sumsuc)
+	c:RegisterEffect(e3)
+end
+function s.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if e:GetHandler():GetFlagEffect(12825612)~=0 then return end
+	c:RegisterFlagEffect(12825612,RESET_PHASE+PHASE_END,0,1)
+end
+function s.discon(e,tp,eg,ep,ev,re,r,rp)
+	return rp==1-tp and e:GetHandler():GetFlagEffect(12825612)>0 
+		and not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED)
+end
+function s.c4a71kangdiscon2(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:GetOverlayGroup():IsExists(Card.IsCode,1,nil,12825608)
+		and c:GetFlagEffect(0)~=0 and s.discon(e,tp,eg,ep,ev,re,r,rp)
+end
+function s.c4a71kangcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
+	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
 end
\ No newline at end of file

expansions/script/c12825607.lua

 --铳影-行动代号一
 Duel.LoadScript("c17035101.lua")
-function c12825607.initial_effect(c)
+local s,id,o=GetID()
+function s.initial_effect(c)
 	aux.AddCodeList(c,12825602)
-	chiki.c4a71rankup(c,c12825607.filter1,c12825607.filter2,12825607)
-	chiki.chikiav(c,EFFECT_FLAG_CARD_TARGET,nil,c12825607.effcon,c12825607.target,c12825607.operation,CATEGORY_DISABLE,12825607,1131)
+	chiki.c4a71rankup(c,s.filter1,s.filter2,12825607)
+	chiki.chikiav(c,EFFECT_FLAG_CARD_TARGET,nil,s.effcon,s.target,s.operation,CATEGORY_DISABLE,12825607,1131)
 end
-function c12825607.filter1(c)
-	return c:GetOverlayCount()>1 and c:IsSetCard(0x4a76) and not c:IsCode(12825602)
+function s.filter1(c)
+	return c:IsFaceup() and c:GetOverlayCount()>1 and c:IsSetCard(0x4a76) and not c:IsCode(12825602)
 end
-function c12825607.filter2(c)
+function s.filter2(c)
 	return c:IsCode(12825602)
 end
-function c12825607.cfilter(c)
+function s.cfilter(c)
 	return c:IsFaceup() and c:IsCode(12825602)
 end
-function c12825607.effcon(e,tp,eg,ep,ev,re,r,rp,chk)
-	return Duel.IsExistingMatchingCard(c12825607.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,e:GetHandler())
+function s.effcon(e,tp,eg,ep,ev,re,r,rp,chk)
+	return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,e:GetHandler())
 end
-function c12825607.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsControler(1-tp) and chkc:IsOnField() and aux.NegateAnyFilter(chkc) end
 	if chk==0 then 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 c12825607.operation(e,tp,eg,ep,ev,re,r,rp)
+function s.operation(e,tp,eg,ep,ev,re,r,rp)
 	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

expansions/script/c12825608.lua

 --铳影-行动代号二
 Duel.LoadScript("c17035101.lua")
-function c12825608.initial_effect(c)
+local s,id,o=GetID()
+function s.initial_effect(c)
 	aux.AddCodeList(c,12825603)
-	chiki.c4a71rankup(c,c12825608.filter1,c12825608.filter2,12825608)
-	chiki.chikiav(c,EFFECT_FLAG_CARD_TARGET,nil,c12825608.effcon,c12825608.target,c12825608.operation,CATEGORY_REMOVE,12825608,1102)
+	chiki.c4a71rankup(c,s.filter1,s.filter2,12825608)
+	chiki.chikiav(c,EFFECT_FLAG_CARD_TARGET,nil,s.effcon,s.target,s.operation,CATEGORY_REMOVE,12825608,1102)
 end
-function c12825608.filter1(c)
-	return c:IsSetCard(0x4a76) and not c:IsCode(12825603)
+function s.filter1(c)
+	return c:IsFaceup() and c:IsSetCard(0x4a76) and not c:IsCode(12825603)
 end
-function c12825608.filter2(c)
+function s.filter2(c)
 	return c:IsCode(12825603)
 end
-function c12825608.cfilter(c)
+function s.cfilter(c)
 	return c:IsFaceup() and c:IsCode(12825603)
 end
-function c12825608.effcon(e,tp,eg,ep,ev,re,r,rp,chk)
-	return Duel.IsExistingMatchingCard(c12825608.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,e:GetHandler())
+function s.effcon(e,tp,eg,ep,ev,re,r,rp,chk)
+	return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,e:GetHandler())
 end
-function c12825608.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(1-tp) and chkc:IsAbleToRemove() end
 	if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,1,nil) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,1,1,nil)
 	Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,1-tp,LOCATION_GRAVE)
 end
-function c12825608.operation(e,tp,eg,ep,ev,re,r,rp)
+function s.operation(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
 	if tc:IsRelateToEffect(e) then
 		Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)

expansions/script/c12825609.lua

 --铳影-行动代号三
 Duel.LoadScript("c17035101.lua")
-function c12825609.initial_effect(c)
+local s,id,o=GetID()
+function s.initial_effect(c)
 	aux.AddCodeList(c,12825604)
-	chiki.c4a71rankup(c,c12825609.filter1,c12825609.filter2,12825609)
-	chiki.chikiav(c,nil,nil,c12825609.effcon,c12825609.target,c12825609.operation,nil,12825609,1102)
+	chiki.c4a71rankup(c,s.filter1,s.filter2,12825609)
+	chiki.chikiav(c,nil,nil,s.effcon,s.target,s.operation,nil,12825609,1102)
 end
-function c12825609.filter1(c)
-	return c:IsSetCard(0x4a76) and not c:IsCode(12825604)
+function s.filter1(c)
+	return c:IsFaceup() and c:IsSetCard(0x4a76) and not c:IsCode(12825604)
 end
-function c12825609.filter2(c)
+function s.filter2(c)
 	return c:IsCode(12825604)
 end
-function c12825609.cfilter(c)
+function s.cfilter(c)
 	return c:IsFaceup() and c:IsCode(12825604)
 end
-function c12825609.effcon(e,tp,eg,ep,ev,re,r,rp,chk)
-	return Duel.IsExistingMatchingCard(c12825609.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,e:GetHandler())
+function s.effcon(e,tp,eg,ep,ev,re,r,rp,chk)
+	return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,e:GetHandler())
 end
-function c12825609.setfilter(c)
+function s.setfilter(c)
 	return c:IsSetCard(0x4a76) and c:IsType(TYPE_QUICKPLAY) and c:IsSSetable()
 end
-function c12825609.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c12825609.setfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end
+function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(s.setfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end
 end
-function c12825609.operation(e,tp,eg,ep,ev,re,r,rp)
+function s.operation(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
-	local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c12825609.setfilter),tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil)
+	local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.setfilter),tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil)
 	if g:GetCount()>0 then
 		Duel.SSet(tp,g:GetFirst())
 	end

expansions/script/c12825610.lua

 --铳影-行动代号四
 Duel.LoadScript("c17035101.lua")
-function c12825610.initial_effect(c)
+local s,id,o=GetID()
+function s.initial_effect(c)
 	aux.AddCodeList(c,12825605)
-	chiki.c4a71rankup(c,c12825610.filter1,c12825610.filter2,12825610)
-	chiki.chikiav(c,nil,nil,c12825610.effcon,c12825610.target,c12825610.operation,CATEGORY_DESTROY,12825610,1101)
+	chiki.c4a71rankup(c,s.filter1,s.filter2,12825610)
+	chiki.chikiav(c,nil,nil,s.effcon,s.target,s.operation,CATEGORY_DESTROY,12825610,1101)
 end
-function c12825610.filter1(c)
-	return c:GetOverlayCount()>3 and c:IsSetCard(0x4a76) and not c:IsCode(12825605)
+function s.filter1(c)
+	return c:GetOverlayCount()>3 and c:IsSetCard(0x4a76) and not c:IsCode(12825605) and c:IsFaceup()
 end
-function c12825610.filter2(c)
+function s.filter2(c)
 	return c:IsCode(12825605)
 end
-function c12825610.cfilter(c)
+function s.cfilter(c)
 	return c:IsFaceup() and c:IsCode(12825605)
 end
-function c12825610.effcon(e,tp,eg,ep,ev,re,r,rp,chk)
-	return Duel.IsExistingMatchingCard(c12825610.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,e:GetHandler())
+function s.effcon(e,tp,eg,ep,ev,re,r,rp,chk)
+	return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,e:GetHandler())
 end
-function c12825610.target(e,tp,eg,ep,ev,re,r,rp,chk)
+function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_MZONE,1,nil) end
 	local sg=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_MZONE,nil)
 	Duel.SetOperationInfo(0,CATEGORY_DESTROY,sg,sg:GetCount(),0,0)
 end
-function c12825610.operation(e,tp,eg,ep,ev,re,r,rp)
+function s.operation(e,tp,eg,ep,ev,re,r,rp)
 	local sg=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_MZONE,nil)
 	Duel.Destroy(sg,REASON_EFFECT)
 end

expansions/script/c12825611.lua

 --铳影-行动代号五
 Duel.LoadScript("c17035101.lua")
-function c12825611.initial_effect(c)
+local s,id,o=GetID()
+function s.initial_effect(c)
 	aux.AddCodeList(c,12825606)
-	chiki.c4a71rankup(c,c12825611.filter1,c12825611.filter2,12825611)
-	chiki.chikiav(c,LOCATION_GRAVE,nil,c12825611.effcon,c12825611.target,c12825611.operation,CATEGORY_DESTROY,12825611,1100)
+	chiki.c4a71rankup(c,s.filter1,s.filter2,12825611)
+	chiki.chikiav(c,LOCATION_GRAVE,nil,s.effcon,s.target,s.operation,CATEGORY_DESTROY,12825611,1100)
 end
-function c12825611.filter1(c)
-	return c:GetOverlayCount()>1 and c:IsSetCard(0x4a76) and not c:IsCode(12825606)
+function s.filter1(c)
+	return c:GetOverlayCount()>1 and c:IsSetCard(0x4a76) and not c:IsCode(12825606) and c:IsFaceup()
 end
-function c12825611.filter2(c)
+function s.filter2(c)
 	return c:IsCode(12825606)
 end
-function c12825611.cfilter(c)
+function s.cfilter(c)
 	return c:IsFaceup() and c:IsCode(12825606)
 end
-function c12825611.effcon(e,tp,eg,ep,ev,re,r,rp,chk)
-	return Duel.IsExistingMatchingCard(c12825611.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,e:GetHandler())
+function s.effcon(e,tp,eg,ep,ev,re,r,rp,chk)
+	return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,e:GetHandler())
 end
-function c12825611.desfilter(c)
+function s.desfilter(c)
 	return c:IsType(TYPE_SPELL+TYPE_TRAP)
 end
-function c12825611.target(e,tp,eg,ep,ev,re,r,rp,chk)
+function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()
-	if chk==0 then return Duel.IsExistingMatchingCard(c12825611.desfilter,tp,0,LOCATION_ONFIELD,1,c) end
-	local sg=Duel.GetMatchingGroup(c12825611.desfilter,tp,0,LOCATION_ONFIELD,c)
+	if chk==0 then return Duel.IsExistingMatchingCard(s.desfilter,tp,0,LOCATION_ONFIELD,1,c) end
+	local sg=Duel.GetMatchingGroup(s.desfilter,tp,0,LOCATION_ONFIELD,c)
 	Duel.SetOperationInfo(0,CATEGORY_DESTROY,sg,sg:GetCount(),0,0)
 end
-function c12825611.operation(e,tp,eg,ep,ev,re,r,rp)
-	local sg=Duel.GetMatchingGroup(c12825611.desfilter,tp,0,LOCATION_ONFIELD,aux.ExceptThisCard(e))
+function s.operation(e,tp,eg,ep,ev,re,r,rp)
+	local sg=Duel.GetMatchingGroup(s.desfilter,tp,0,LOCATION_ONFIELD,aux.ExceptThisCard(e))
 	Duel.Destroy(sg,REASON_EFFECT)
 end

expansions/script/c16362051.lua

@@ -27,6 +27,9 @@ function c16362051.initial_effect(c)
 	e3:SetTargetRange(0,LOCATION_MZONE)
 	e3:SetValue(c16362051.atkval)
 	c:RegisterEffect(e3)
+	local e33=e3:Clone()
+	e33:SetCode(EFFECT_UPDATE_DEFENSE)
+	c:RegisterEffect(e33)
 	--pos
 	local e4=Effect.CreateEffect(c)
 	e4:SetType(EFFECT_TYPE_FIELD)

expansions/script/c33201452.lua

@@ -49,7 +49,7 @@ function s.posop(e,tp,eg,ep,ev,re,r,rp)
 			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 			local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,2,nil)
 			if g:GetCount()>0 then
-				Duel.SendtoHand(g,nil,REASON_EFFECT)
+				Duel.SendtoHand(g,tp,REASON_EFFECT)
 				Duel.ConfirmCards(1-tp,g)
 			end
 		end

expansions/script/c33201455.lua

@@ -11,7 +11,7 @@ function s.initial_effect(c)
 	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER)
 	e1:SetCountLimit(1,EFFECT_COUNT_CODE_CHAIN)
 	e1:SetRange(LOCATION_MZONE)
-	e1:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DISABLE+CATEGORY_SPECIAL_SUMMON)
+	e1:SetCategory(CATEGORY_DRAW)
 	e1:SetLabel(0)
 	e1:SetCountLimit(1)
 	e1:SetTarget(s.tg)

expansions/script/c33201459.lua

@@ -4,7 +4,7 @@ Duel.LoadScript("c33201450.lua")
 function s.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_TOHAND)
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
 	e1:SetHintTiming(0,TIMING_END_PHASE+TIMING_EQUIP)
@@ -43,10 +43,10 @@ end
 function s.activate(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
 	local c=e:GetHandler()
-	if tc:IsRelateToEffect(e) then
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 	local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil)
-		if g:GetCount()>0 and Duel.SendtoHand(g,nil,REASON_EFFECT) then
+	--fixing
+		if g:GetCount()>0 and Duel.SendtoHand(g,nil,REASON_EFFECT) and tc:IsRelateToEffect(e) then
 			Duel.ConfirmCards(1-tp,g)
 			local e5=Effect.CreateEffect(c)
 			e5:SetType(EFFECT_TYPE_SINGLE)
@@ -68,7 +68,7 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
 			tc:RegisterEffect(e8)
 			tc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,1))
 		end
-	end
+
 end
 function s.fuslimit(e,c,sumtype)
 	return sumtype==SUMMON_TYPE_FUSION

expansions/script/c5012604.lua

@@ -5,7 +5,7 @@ function s.initial_effect(c)
 
 	c:SetUniqueOnField(1,1,id)
 	--synchro summon
-	aux.AddSynchroProcedure(c,s.sfliter,aux.NonTuner(nil),1)
+	aux.AddSynchroProcedure(c,c5012604.sfliter,aux.NonTuner(nil),1)
 	c:EnableReviveLimit()
 	--cannot special summon
 	local e0=Effect.CreateEffect(c)
@@ -69,7 +69,7 @@ function s.initial_effect(c)
 	e5:SetValue(s.effectfilter)
 	c:RegisterEffect(e5)
 end
-function s.sfliter(c)
+function c5012604.sfliter(c)
 	return c.MoJin==true 
 end
 function s.cfilter(c,e)
@@ -161,7 +161,7 @@ function s.gspcon(e,tp,eg,ep,ev,re,r,rp)
 end
 function s.gspcon2(e,tp,eg,ep,ev,re,r,rp)
 	local d=Duel.GetAttackTarget()
-	return d:IsFaceup() and d.MoJin==true and d:IsControler(tp) 
+	return d:IsFaceup() and d.MoJin==true  and d:IsControler(tp) 
 		and Duel.GetMZoneCount(tp,d,tp)>0 and d:IsAbleToHand()
 end
 function s.gsptg(e,tp,eg,ep,ev,re,r,rp,chk)
@@ -169,6 +169,7 @@ function s.gsptg(e,tp,eg,ep,ev,re,r,rp,chk)
 		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
 	local tg=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS)
 	local sg=tg:Filter(s.gtfilter,nil,tp)
+	sg:KeepAlive()
 	Duel.SetTargetCard(sg)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
 end
@@ -186,8 +187,12 @@ function s.gspop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
 	local sg=tg:Filter(s.gstfilter,nil,e)
-	Duel.SendtoHand(sg,nil,REASON_EFFECT)
+	--Duel.SendtoHand(sg,nil,REASON_EFFECT)
+	--if c:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and c:IsFaceupEx() and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
+	
+	if Duel.SendtoHand(sg,nil,REASON_EFFECT)==0 then return end
 	if c:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and c:IsFaceupEx() and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
+	
 		local fid=c:GetFieldID()
 		c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD,0,1,fid)
 		local e1=Effect.CreateEffect(c)