Commit 0a5ae749 authored by Tachibana's avatar Tachibana

nmbd

parent ffb4fac4
...@@ -69,11 +69,11 @@ function c1009017.spcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -69,11 +69,11 @@ function c1009017.spcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()~=tp return Duel.GetTurnPlayer()~=tp
end end
function c1009017.filter(c) function c1009017.filter(c)
return c:IsAbleToHand() return c:IsAbleToHand() and c:IsType(TYPE_SPELL+TYPE_TRAP)
end end
function c1009017.target(e,tp,eg,ep,ev,re,r,rp,chk) function c1009017.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c1009017.filter,tp,0,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c1009017.filter,tp,0,LOCATION_MZONE,1,nil) end
local sg=Duel.GetMatchingGroup(c1009017.filter,tp,0,LOCATION_MZONE,nil) local sg=Duel.GetMatchingGroup(c1009017.filter,tp,0,LOCATION_ONFIELD,nil)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,sg,sg:GetCount(),0,0) Duel.SetOperationInfo(0,CATEGORY_TOHAND,sg,sg:GetCount(),0,0)
Duel.SetChainLimit(c1009017.chlimit) Duel.SetChainLimit(c1009017.chlimit)
end end
......
...@@ -154,8 +154,8 @@ end ...@@ -154,8 +154,8 @@ end
-- Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) -- Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
-- local g=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,2,nil,c) -- local g=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,2,nil,c)
-- if g:GetCount()>0 then -- if g:GetCount()>0 then
-- Duel.HintSelection(g) -- Duel.HintSelection(g)
-- Duel.SendtoDeck(g,nil,2,REASON_EFFECT) -- Duel.SendtoDeck(g,nil,2,REASON_EFFECT)
-- end -- end
--end --end
--e2 --e2
...@@ -182,7 +182,7 @@ function cm.atkop(e,tp,eg,ep,ev,re,r,rp) ...@@ -182,7 +182,7 @@ function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
end end
--e7 --e7
function cm.discon7(e,tp,eg,ep,ev,re,r,rp) function cm.discon7(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(cm.filter9,e:GetHandlerPlayer(),LOCATION_GRAVE,0,nil,e,tp) local g=Duel.GetMatchingGroup(cm.filter,e:GetHandlerPlayer(),LOCATION_GRAVE,0,nil,e,tp)
local ct=g:GetClassCount(Card.GetCode) local ct=g:GetClassCount(Card.GetCode)
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and ct>=7 and ep==1-tp and re:IsHasType(EFFECT_TYPE_ACTIVATE) and Duel.IsChainNegatable(ev) return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and ct>=7 and ep==1-tp and re:IsHasType(EFFECT_TYPE_ACTIVATE) and Duel.IsChainNegatable(ev)
end end
......
...@@ -53,8 +53,8 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -53,8 +53,8 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
if not aux.MustMaterialCheck(tc,tp,EFFECT_MUST_BE_XMATERIAL) then return end if not aux.MustMaterialCheck(tc,tp,EFFECT_MUST_BE_XMATERIAL) then return end
if tc:IsFacedown() or not tc:IsRelateToEffect(e) or tc:IsControler(1-tp) or tc:IsImmuneToEffect(e) then return end if tc:IsFacedown() or not tc:IsRelateToEffect(e) or tc:IsControler(1-tp) or tc:IsImmuneToEffect(e) then return end
local r4=Duel.GetMatchingGroup(cm.r4filter,tp,LOCATION_EXTRA,0,nil,e,tp,tc,4) local r4=Duel.GetMatchingGroup(cm.r4filter,tp,LOCATION_EXTRA,0,nil,e,tp,tc,4)
if c:IsType(TYPE_XYZ) then if tc:IsType(TYPE_XYZ) then
local rk=c:GetRank() local rk=tc:GetRank()
local ra=Duel.GetMatchingGroup(cm.rafilter,tp,LOCATION_EXTRA,0,nil,e,tp,tc,rk+1) local ra=Duel.GetMatchingGroup(cm.rafilter,tp,LOCATION_EXTRA,0,nil,e,tp,tc,rk+1)
r4:Merge(ra) r4:Merge(ra)
end end
......
...@@ -38,7 +38,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -38,7 +38,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetTargetRange(LOCATION_MZONE,0) e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(cm.ffilter) e1:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x3b26))
e1:SetValue(500) e1:SetValue(500)
e1:SetReset(RESET_PHASE+PHASE_END) e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
...@@ -46,7 +46,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -46,7 +46,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_UPDATE_DEFENSE) e3:SetCode(EFFECT_UPDATE_DEFENSE)
e3:SetTargetRange(LOCATION_MZONE,0) e3:SetTargetRange(LOCATION_MZONE,0)
e3:SetTarget(cm.ffilter) e3:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x3b26))
e3:SetValue(500) e3:SetValue(500)
e3:SetReset(RESET_PHASE+PHASE_END) e3:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e3,tp) Duel.RegisterEffect(e3,tp)
...@@ -54,7 +54,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -54,7 +54,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_INDESTRUCTABLE_BATTLE) e2:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
e2:SetTargetRange(LOCATION_MZONE,0) e2:SetTargetRange(LOCATION_MZONE,0)
e2:SetTarget(cm.ffilter) e2:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x3b26))
e2:SetValue(1) e2:SetValue(1)
e2:SetReset(RESET_PHASE+PHASE_END) e2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2,tp) Duel.RegisterEffect(e2,tp)
......
...@@ -39,7 +39,7 @@ function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -39,7 +39,7 @@ function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end end
function cm.thfilter(c,code) function cm.thfilter(c,code)
return not c:IsCode(code) and c:IsAbleToHand() return not c:IsCode(code) and c:IsAbleToHand() and c:IsSetCard(0x3b26)
end end
function cm.desop(e,tp,eg,ep,ev,re,r,rp) function cm.desop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment