Commit dad6478a authored by Tachibana's avatar Tachibana

ndyd

parent 18e42877
No preview for this file type
...@@ -39,18 +39,14 @@ function c1112203.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -39,18 +39,14 @@ function c1112203.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.ConfirmCards(1-tp,g) Duel.ConfirmCards(1-tp,g)
end end
end end
function c1112203.filter(c)
return c:IsLevel(3) and c:IsRace(RACE_SPELLCASTER) and c:IsAttribute(ATTRIBUTE_EARTH) and c:IsAbleToHand()
end
function c1112203.settg(e,tp,eg,ep,ev,re,r,rp,chk) function c1112203.settg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c1112203.filter,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return e:GetHandler():IsAbleToDeck() end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_TODECK,e:GetHandler(),1,0,0)
end end
function c1112203.setop(e,tp,eg,ep,ev,re,r,rp) function c1112203.setop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) local c=e:GetHandler()
local g=Duel.SelectMatchingCard(tp,c1112203.filter,tp,LOCATION_DECK,0,1,1,nil) if c:IsRelateToEffect(e) then
if g:GetCount()>0 then c:CancelToGrave()
Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.SendtoDeck(c,nil,0,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
end end
end end
\ No newline at end of file
...@@ -86,9 +86,12 @@ function c20000001.op3(e,tp,eg,ep,ev,re,r,rp) ...@@ -86,9 +86,12 @@ function c20000001.op3(e,tp,eg,ep,ev,re,r,rp)
e1:SetValue(c20000001.val3) e1:SetValue(c20000001.val3)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
c:RegisterEffect(e1) c:RegisterEffect(e1)
local e2=e1:Clone() local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_INDESTRUCTABLE_BATTLE) e2:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
c:RegisterEffect(e2,true) e2:SetValue(1)
e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
c:RegisterEffect(e2)
Duel.BreakEffect() Duel.BreakEffect()
if Duel.SelectYesNo(tp,aux.Stringid(20000001,2)) then if Duel.SelectYesNo(tp,aux.Stringid(20000001,2)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
...@@ -106,7 +109,7 @@ function c20000001.op3(e,tp,eg,ep,ev,re,r,rp) ...@@ -106,7 +109,7 @@ function c20000001.op3(e,tp,eg,ep,ev,re,r,rp)
end end
end end
end end
c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(20000001,0)) c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(20000001,3))
end end
function c20000001.val3(e,re) function c20000001.val3(e,re)
return not (re:GetOwner():IsSetCard(0x5fd1) or re:GetOwner()==e:GetOwner()) return not (re:GetOwner():IsSetCard(0x5fd1) or re:GetOwner()==e:GetOwner())
......
...@@ -55,7 +55,7 @@ function c20000013.xyzf(c) ...@@ -55,7 +55,7 @@ function c20000013.xyzf(c)
end end
--e2 --e2
function c20000013.conf2(c) function c20000013.conf2(c)
return c:IsSetCard(0x5fd1) and c:IsAbleToDeckOrExtraAsCost() and not c:IsCode(20000013) return ((c:IsSetCard(0x5fd1) and not c:IsCode(20000013) and c:IsFaceup()) or c:IsFacedown()) and c:IsAbleToDeckOrExtraAsCost()
end end
function c20000013.con2(e,c) function c20000013.con2(e,c)
if c==nil then return true end if c==nil then return true end
...@@ -63,8 +63,11 @@ function c20000013.con2(e,c) ...@@ -63,8 +63,11 @@ function c20000013.con2(e,c)
return Duel.IsExistingMatchingCard(c20000013.conf2,tp,LOCATION_ONFIELD,0,3,nil,c) return Duel.IsExistingMatchingCard(c20000013.conf2,tp,LOCATION_ONFIELD,0,3,nil,c)
end end
function c20000013.op2(e,tp,eg,ep,ev,re,r,rp,c) function c20000013.op2(e,tp,eg,ep,ev,re,r,rp,c)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local g1=Duel.SelectMatchingCard(tp,c20000013.conf2,tp,LOCATION_ONFIELD,0,3,3,nil,c) local g1=Duel.SelectMatchingCard(tp,c20000013.conf2,tp,LOCATION_ONFIELD,0,3,3,nil,c)
for tc in aux.Next(g) do
if tc:IsOnField() and tc:IsFacedown() then Duel.ConfirmCards(1-tp,tc) end
end
c:SetMaterial(g1) c:SetMaterial(g1)
Duel.SendtoDeck(g1,nil,2,REASON_COST) Duel.SendtoDeck(g1,nil,2,REASON_COST)
end end
...@@ -74,7 +77,7 @@ function c20000013.tgf3(c) ...@@ -74,7 +77,7 @@ function c20000013.tgf3(c)
end end
function c20000013.tg3(e,tp,eg,ep,ev,re,r,rp,chk) function c20000013.tg3(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c20000013.tgf3,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c20000013.tgf3,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
end end
function c20000013.op3(e,tp,eg,ep,ev,re,r,rp) function c20000013.op3(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
......
...@@ -74,7 +74,7 @@ function c47579900.rmfilter(c) ...@@ -74,7 +74,7 @@ function c47579900.rmfilter(c)
return c:IsType(TYPE_MONSTER) return c:IsType(TYPE_MONSTER)
end end
function c47579900.rmop(e,tp,eg,ep,ev,re,r,rp) function c47579900.rmop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c47579900.rmfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil,aux.ExceptThisCard(e)) local g=Duel.GetMatchingGroup(c47579900.rmfilter,tp,LOCATION_MZONE,LOCATION_MZONE,aux.ExceptThisCard(e))
local tg=g:GetMaxGroup(Card.GetAttack) local tg=g:GetMaxGroup(Card.GetAttack)
if tg:GetCount()>0 then if tg:GetCount()>0 then
Duel.Remove(tg,POS_FACEDOWN,REASON_RULE) Duel.Remove(tg,POS_FACEDOWN,REASON_RULE)
......
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