Skip to content

Y
ygopro-222DIY-cards
Commit fa3382a1 authored by TanakaKotoha's avatar TanakaKotoha
Browse files
Options

daniaozhuanzhuanzhuan

parent fdc0d47c
Pipeline #2486 passed with stages
      in 45 minutes and 46 seconds
      Hide whitespace changes
      Inline Side-by-side
      Showing with 243 additions and 239 deletions
      expansions/script/c10174059.lua
      View file @ fa3382a1
      ...@@ -20,7 +20,7 @@ function cm.desop(e,tp) ...@@ -20,7 +20,7 @@ function cm.desop(e,tp)
      if op==1 then if op==1 then
      Duel.Damage(1-tp,1000,REASON_EFFECT) Duel.Damage(1-tp,1000,REASON_EFFECT)
      elseif op==2 then elseif op==2 then
      g:SelectDestroy(tp,nil,1,1,nil) g:SelectDestroy(tp,aux.TRUE,1,1,nil,{})
      elseif op==3 then elseif op==3 then
      if c:GetFlagEffect(m)<=0 then if c:GetFlagEffect(m)<=0 then
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      ......
      expansions/script/c60150810.lua
      View file @ fa3382a1
      ...@@ -29,7 +29,7 @@ function c60150810.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -29,7 +29,7 @@ function c60150810.activate(e,tp,eg,ep,ev,re,r,rp)
      Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g) Duel.ConfirmCards(1-tp,g)
      local tc=Duel.GetFieldCard(tp,LOCATION_DECK,0) local tc=Duel.GetFieldCard(tp,LOCATION_DECK,0)
      local tc2=Duel.GetFieldCard(tp,0,LOCATION_DECK) local tc2=Duel.GetFieldCard(1-tp,LOCATION_DECK,0)
      if (tc:IsAbleToRemove() and tc2:IsAbleToRemove()) and Duel.SelectYesNo(tp,aux.Stringid(60150810,0)) then if (tc:IsAbleToRemove() and tc2:IsAbleToRemove()) and Duel.SelectYesNo(tp,aux.Stringid(60150810,0)) then
      if Duel.SelectYesNo(tp,aux.Stringid(60150810,1)) then if Duel.SelectYesNo(tp,aux.Stringid(60150810,1)) then
      Duel.BreakEffect() Duel.BreakEffect()
      ......
      expansions/script/c60150811.lua
      View file @ fa3382a1
      ...@@ -61,7 +61,7 @@ function c60150811.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -61,7 +61,7 @@ function c60150811.spop(e,tp,eg,ep,ev,re,r,rp)
      e2:SetReset(RESET_PHASE+PHASE_END+RESET_SELF_TURN,2) e2:SetReset(RESET_PHASE+PHASE_END+RESET_SELF_TURN,2)
      Duel.RegisterEffect(e2,tp) Duel.RegisterEffect(e2,tp)
      local tc3=Duel.GetFieldCard(tp,LOCATION_DECK,0) local tc3=Duel.GetFieldCard(tp,LOCATION_DECK,0)
      local tc2=Duel.GetFieldCard(tp,0,LOCATION_DECK) local tc2=Duel.GetFieldCard(1-tp,LOCATION_DECK,0)
      if (tc3:IsAbleToRemove() and tc2:IsAbleToRemove()) and Duel.SelectYesNo(tp,aux.Stringid(60150810,0)) then if (tc3:IsAbleToRemove() and tc2:IsAbleToRemove()) and Duel.SelectYesNo(tp,aux.Stringid(60150810,0)) then
      if Duel.SelectYesNo(tp,aux.Stringid(60150810,1)) then if Duel.SelectYesNo(tp,aux.Stringid(60150810,1)) then
      Duel.BreakEffect() Duel.BreakEffect()
      ......
      expansions/script/c60150812.lua
      View file @ fa3382a1
      ...@@ -54,7 +54,7 @@ function c60150812.activate2(e,tp,eg,ep,ev,re,r,rp) ...@@ -54,7 +54,7 @@ function c60150812.activate2(e,tp,eg,ep,ev,re,r,rp)
      Duel.Remove(tc,POS_FACEDOWN,REASON_EFFECT) Duel.Remove(tc,POS_FACEDOWN,REASON_EFFECT)
      end end
      local tc3=Duel.GetFieldCard(tp,LOCATION_DECK,0) local tc3=Duel.GetFieldCard(tp,LOCATION_DECK,0)
      local tc2=Duel.GetFieldCard(tp,0,LOCATION_DECK) local tc2=Duel.GetFieldCard(1-tp,LOCATION_DECK,0)
      if (tc3:IsAbleToRemove() and tc2:IsAbleToRemove()) and Duel.SelectYesNo(tp,aux.Stringid(60150810,0)) then if (tc3:IsAbleToRemove() and tc2:IsAbleToRemove()) and Duel.SelectYesNo(tp,aux.Stringid(60150810,0)) then
      if Duel.SelectYesNo(tp,aux.Stringid(60150810,1)) then if Duel.SelectYesNo(tp,aux.Stringid(60150810,1)) then
      Duel.BreakEffect() Duel.BreakEffect()
      ......
      expansions/script/c60150817.lua
      View file @ fa3382a1
      ...@@ -57,7 +57,7 @@ function c60150817.spop2(e,tp,eg,ep,ev,re,r,rp) ...@@ -57,7 +57,7 @@ function c60150817.spop2(e,tp,eg,ep,ev,re,r,rp)
      if g:GetCount()>0 then if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      local tc=Duel.GetFieldCard(tp,LOCATION_DECK,0) local tc=Duel.GetFieldCard(tp,LOCATION_DECK,0)
      local tc2=Duel.GetFieldCard(tp,0,LOCATION_DECK) local tc2=Duel.GetFieldCard(1-tp,LOCATION_DECK,0)
      if (tc:IsAbleToRemove() and tc2:IsAbleToRemove()) and Duel.SelectYesNo(tp,aux.Stringid(60150810,0)) then if (tc:IsAbleToRemove() and tc2:IsAbleToRemove()) and Duel.SelectYesNo(tp,aux.Stringid(60150810,0)) then
      if Duel.SelectYesNo(tp,aux.Stringid(60150810,1)) then if Duel.SelectYesNo(tp,aux.Stringid(60150810,1)) then
      Duel.BreakEffect() Duel.BreakEffect()
      ......
      expansions/script/c60150819.lua
      View file @ fa3382a1
      ...@@ -39,7 +39,7 @@ function c60150819.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -39,7 +39,7 @@ function c60150819.activate(e,tp,eg,ep,ev,re,r,rp)
      Duel.SendtoHand(tc,nil,REASON_EFFECT) Duel.SendtoHand(tc,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,tc) Duel.ConfirmCards(1-tp,tc)
      local tc=Duel.GetFieldCard(tp,LOCATION_DECK,0) local tc=Duel.GetFieldCard(tp,LOCATION_DECK,0)
      local tc2=Duel.GetFieldCard(tp,0,LOCATION_DECK) local tc2=Duel.GetFieldCard(1-tp,LOCATION_DECK,0)
      if (tc:IsAbleToRemove() and tc2:IsAbleToRemove()) and Duel.SelectYesNo(tp,aux.Stringid(60150810,0)) then if (tc:IsAbleToRemove() and tc2:IsAbleToRemove()) and Duel.SelectYesNo(tp,aux.Stringid(60150810,0)) then
      if Duel.SelectYesNo(tp,aux.Stringid(60150810,1)) then if Duel.SelectYesNo(tp,aux.Stringid(60150810,1)) then
      Duel.BreakEffect() Duel.BreakEffect()
      ......
      expansions/script/c60159902.lua
      View file @ fa3382a1
      --白虎的化身 哈克 --白虎的化身 哈克
      function c60159902.initial_effect(c) function c60159902.initial_effect(c)
      --spsummon --spsummon
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK) e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK)
      e1:SetType(EFFECT_TYPE_IGNITION) e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_HAND+LOCATION_GRAVE) e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
      e1:SetCountLimit(1,60159902) e1:SetCountLimit(1,60159902)
      e1:SetTarget(c60159902.target) e1:SetTarget(c60159902.target)
      e1:SetOperation(c60159902.operation) e1:SetOperation(c60159902.operation)
      c:RegisterEffect(e1) c:RegisterEffect(e1)
      --tohand --tohand
      local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(60159901,0)) e2:SetDescription(aux.Stringid(60159901,0))
      e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_SPSUMMON_SUCCESS) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY) e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
      e2:SetTarget(c60159902.target2) e2:SetTarget(c60159902.target2)
      e2:SetOperation(c60159902.operation2) e2:SetOperation(c60159902.operation2)
      c:RegisterEffect(e2) c:RegisterEffect(e2)
      --Activate --Activate
      local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_DESTROY) e3:SetCategory(CATEGORY_DESTROY)
      e3:SetType(EFFECT_TYPE_IGNITION) e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
      e3:SetCost(c60159902.descost) e3:SetCountLimit(1)
      e3:SetTarget(c60159902.target3)
      e3:SetOperation(c60159902.activate) e3:SetCost(c60159902.descost)
      c:RegisterEffect(e3) e3:SetTarget(c60159902.target3)
      e3:SetOperation(c60159902.activate)
      c:RegisterEffect(e3)
      end end
      function c60159902.sfilter(c,e,tp) function c60159902.sfilter(c,e,tp)
      return c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end end
      function c60159902.target(e,tp,eg,ep,ev,re,r,rp,chk) function c60159902.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsPlayerCanSpecialSummon(tp) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsPlayerCanSpecialSummon(tp)
      and Duel.IsExistingMatchingCard(c60159902.sfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c60159902.sfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,LOCATION_DECK)
      end end
      function c60159902.operation(e,tp,eg,ep,ev,re,r,rp) function c60159902.operation(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler() local c=e:GetHandler()
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 or Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)==0 then return end if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 or Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)==0 then return end
      Duel.ConfirmDecktop(tp,1) Duel.ConfirmDecktop(tp,1)
      local g=Duel.GetDecktopGroup(tp,1) local g=Duel.GetDecktopGroup(tp,1)
      local tc=g:GetFirst() local tc=g:GetFirst()
      if (tc:IsAttribute(ATTRIBUTE_WIND) or tc:IsAttribute(ATTRIBUTE_FIRE) or tc:IsAttribute(ATTRIBUTE_EARTH)) if (tc:IsAttribute(ATTRIBUTE_WIND) or tc:IsAttribute(ATTRIBUTE_FIRE) or tc:IsAttribute(ATTRIBUTE_EARTH))
      and tc:IsCanBeSpecialSummoned(e,0,tp,false,false) then and tc:IsCanBeSpecialSummoned(e,0,tp,false,false) then
      if Duel.SelectYesNo(tp,aux.Stringid(60159901,1)) then if Duel.SelectYesNo(tp,aux.Stringid(60159901,1)) then
      Duel.DisableShuffleCheck() Duel.DisableShuffleCheck()
      Duel.SendtoDeck(c,nil,2,REASON_EFFECT) Duel.SendtoDeck(c,nil,2,REASON_EFFECT)
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      Duel.SpecialSummonComplete() Duel.SpecialSummonComplete()
      Duel.ShuffleDeck(tp) Duel.ShuffleDeck(tp)
      else else
      Duel.ShuffleDeck(tp) Duel.ShuffleDeck(tp)
      end end
      else else
      Duel.ShuffleDeck(tp) Duel.ShuffleDeck(tp)
      end end
      end end
      function c60159902.filter(c) function c60159902.filter(c)
      return ((c:IsAttribute(ATTRIBUTE_EARTH) and c:IsRace(RACE_AQUA)) return ((c:IsAttribute(ATTRIBUTE_EARTH) and c:IsRace(RACE_AQUA))
      or (c:IsAttribute(ATTRIBUTE_FIRE) and c:IsRace(RACE_WINDBEAST)) or (c:IsAttribute(ATTRIBUTE_FIRE) and c:IsRace(RACE_WINDBEAST))
      or (c:IsAttribute(ATTRIBUTE_WIND) and c:IsRace(RACE_DRAGON))) or (c:IsAttribute(ATTRIBUTE_WIND) and c:IsRace(RACE_DRAGON)))
      and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
      end end
      function c60159902.target2(e,tp,eg,ep,ev,re,r,rp,chk) function c60159902.target2(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c60159902.filter,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c60159902.filter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end end
      function c60159902.operation2(e,tp,eg,ep,ev,re,r,rp) function c60159902.operation2(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c60159902.filter,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c60159902.filter,tp,LOCATION_DECK,0,1,1,nil)
      if g:GetCount()>0 then if g:GetCount()>0 then
      Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g) Duel.ConfirmCards(1-tp,g)
      end end
      end end
      function c60159902.cfilter(c) function c60159902.cfilter(c)
      return c:IsAttribute(ATTRIBUTE_WATER) and c:IsRace(RACE_BEAST) and c:IsAbleToRemoveAsCost() return c:IsAttribute(ATTRIBUTE_WATER) and c:IsRace(RACE_BEAST) and c:IsAbleToRemoveAsCost()
      end end
      function c60159902.descost(e,tp,eg,ep,ev,re,r,rp,chk) function c60159902.descost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c60159902.cfilter,tp,LOCATION_GRAVE,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c60159902.cfilter,tp,LOCATION_GRAVE,0,1,nil) end
      local g=Duel.SelectMatchingCard(tp,c60159902.cfilter,tp,LOCATION_GRAVE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c60159902.cfilter,tp,LOCATION_GRAVE,0,1,1,nil)
      Duel.Remove(g,POS_FACEUP,REASON_COST) Duel.Remove(g,POS_FACEUP,REASON_COST)
      end end
      function c60159902.dfilter(c) function c60159902.dfilter(c)
      return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable() return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable()
      end end
      function c60159902.target3(e,tp,eg,ep,ev,re,r,rp,chk) function c60159902.target3(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler() local c=e:GetHandler()
      if chk==0 then return Duel.IsExistingMatchingCard(c60159902.dfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,c) end if chk==0 then return Duel.IsExistingMatchingCard(c60159902.dfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,c) end
      local sg=Duel.GetMatchingGroup(c60159902.dfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,c) local sg=Duel.GetMatchingGroup(c60159902.dfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,c)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,sg,sg:GetCount(),0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,sg,sg:GetCount(),0,0)
      end end
      function c60159902.activate(e,tp,eg,ep,ev,re,r,rp) function c60159902.activate(e,tp,eg,ep,ev,re,r,rp)
      local sg=Duel.GetMatchingGroup(c60159902.dfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,e:GetHandler()) local sg=Duel.GetMatchingGroup(c60159902.dfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,e:GetHandler())
      Duel.Destroy(sg,REASON_EFFECT) Duel.Destroy(sg,REASON_EFFECT)
      end end
      \ No newline at end of file
      expansions/script/c60159903.lua
      View file @ fa3382a1
      --青龙的化身 木莉 --青龙的化身 木莉
      function c60159903.initial_effect(c) function c60159903.initial_effect(c)
      --spsummon --spsummon
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK) e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK)
      e1:SetType(EFFECT_TYPE_IGNITION) e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_HAND+LOCATION_GRAVE) e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
      e1:SetCountLimit(1,60159903) e1:SetCountLimit(1,60159903)
      e1:SetTarget(c60159903.target) e1:SetTarget(c60159903.target)
      e1:SetOperation(c60159903.operation) e1:SetOperation(c60159903.operation)
      c:RegisterEffect(e1) c:RegisterEffect(e1)
      --tohand --tohand
      local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(60159901,0)) e2:SetDescription(aux.Stringid(60159901,0))
      e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_SPSUMMON_SUCCESS) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY) e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
      e2:SetTarget(c60159903.target2) e2:SetTarget(c60159903.target2)
      e2:SetOperation(c60159903.operation2) e2:SetOperation(c60159903.operation2)
      c:RegisterEffect(e2) c:RegisterEffect(e2)
      --multiatk --multiatk
      local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(60159903,2)) e3:SetDescription(aux.Stringid(60159903,2))
      e3:SetType(EFFECT_TYPE_IGNITION) e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
      e3:SetCondition(c60159903.atkcon) e3:SetCountLimit(1)
      e3:SetCost(c60159903.atkcost) e3:SetCondition(c60159903.atkcon)
      e3:SetTarget(c60159903.atktg) e3:SetCost(c60159903.atkcost)
      e3:SetOperation(c60159903.atkop) e3:SetTarget(c60159903.atktg)
      c:RegisterEffect(e3) e3:SetOperation(c60159903.atkop)
      c:RegisterEffect(e3)
      end end
      function c60159903.sfilter(c,e,tp) function c60159903.sfilter(c,e,tp)
      return c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end end
      function c60159903.target(e,tp,eg,ep,ev,re,r,rp,chk) function c60159903.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsPlayerCanSpecialSummon(tp) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsPlayerCanSpecialSummon(tp)
      and Duel.IsExistingMatchingCard(c60159903.sfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c60159903.sfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,LOCATION_DECK)
      end end
      function c60159903.operation(e,tp,eg,ep,ev,re,r,rp) function c60159903.operation(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler() local c=e:GetHandler()
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 or Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)==0 then return end if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 or Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)==0 then return end
      Duel.ConfirmDecktop(tp,1) Duel.ConfirmDecktop(tp,1)
      local g=Duel.GetDecktopGroup(tp,1) local g=Duel.GetDecktopGroup(tp,1)
      local tc=g:GetFirst() local tc=g:GetFirst()
      if (tc:IsAttribute(ATTRIBUTE_EARTH) or tc:IsAttribute(ATTRIBUTE_FIRE) or tc:IsAttribute(ATTRIBUTE_WATER)) if (tc:IsAttribute(ATTRIBUTE_EARTH) or tc:IsAttribute(ATTRIBUTE_FIRE) or tc:IsAttribute(ATTRIBUTE_WATER))
      and tc:IsCanBeSpecialSummoned(e,0,tp,false,false) then and tc:IsCanBeSpecialSummoned(e,0,tp,false,false) then
      if Duel.SelectYesNo(tp,aux.Stringid(60159901,1)) then if Duel.SelectYesNo(tp,aux.Stringid(60159901,1)) then
      Duel.DisableShuffleCheck() Duel.DisableShuffleCheck()
      Duel.SendtoDeck(c,nil,2,REASON_EFFECT) Duel.SendtoDeck(c,nil,2,REASON_EFFECT)
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      Duel.SpecialSummonComplete() Duel.SpecialSummonComplete()
      Duel.ShuffleDeck(tp) Duel.ShuffleDeck(tp)
      else else
      Duel.ShuffleDeck(tp) Duel.ShuffleDeck(tp)
      end end
      else else
      Duel.ShuffleDeck(tp) Duel.ShuffleDeck(tp)
      end end
      end end
      function c60159903.filter(c) function c60159903.filter(c)
      return ((c:IsAttribute(ATTRIBUTE_EARTH) and c:IsRace(RACE_AQUA)) return ((c:IsAttribute(ATTRIBUTE_EARTH) and c:IsRace(RACE_AQUA))
      or (c:IsAttribute(ATTRIBUTE_FIRE) and c:IsRace(RACE_WINDBEAST)) or (c:IsAttribute(ATTRIBUTE_FIRE) and c:IsRace(RACE_WINDBEAST))
      or (c:IsAttribute(ATTRIBUTE_WATER) and c:IsRace(RACE_BEAST))) or (c:IsAttribute(ATTRIBUTE_WATER) and c:IsRace(RACE_BEAST)))
      and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
      end end
      function c60159903.target2(e,tp,eg,ep,ev,re,r,rp,chk) function c60159903.target2(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c60159903.filter,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c60159903.filter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end end
      function c60159903.operation2(e,tp,eg,ep,ev,re,r,rp) function c60159903.operation2(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c60159903.filter,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c60159903.filter,tp,LOCATION_DECK,0,1,1,nil)
      if g:GetCount()>0 then if g:GetCount()>0 then
      Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g) Duel.ConfirmCards(1-tp,g)
      end end
      end end
      function c60159903.atkcon(e,tp,eg,ep,ev,re,r,rp) function c60159903.atkcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsAbleToEnterBP() return Duel.IsAbleToEnterBP()
      end end
      function c60159903.cfilter(c) function c60159903.cfilter(c)
      return c:IsAttribute(ATTRIBUTE_WIND) and c:IsRace(RACE_DRAGON) and c:IsAbleToRemoveAsCost() return c:IsAttribute(ATTRIBUTE_WIND) and c:IsRace(RACE_DRAGON) and c:IsAbleToRemoveAsCost()
      end end
      function c60159903.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) function c60159903.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c60159903.cfilter,tp,LOCATION_GRAVE,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c60159903.cfilter,tp,LOCATION_GRAVE,0,1,nil) end
      local g=Duel.SelectMatchingCard(tp,c60159903.cfilter,tp,LOCATION_GRAVE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c60159903.cfilter,tp,LOCATION_GRAVE,0,1,1,nil)
      Duel.Remove(g,POS_FACEUP,REASON_COST) Duel.Remove(g,POS_FACEUP,REASON_COST)
      end end
      function c60159903.atktg(e,tp,eg,ep,ev,re,r,rp,chk) function c60159903.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return e:GetHandler():GetEffectCount(EFFECT_EXTRA_ATTACK)==0 end if chk==0 then return e:GetHandler():GetEffectCount(EFFECT_EXTRA_ATTACK)==0 end
      end end
      function c60159903.atkop(e,tp,eg,ep,ev,re,r,rp) function c60159903.atkop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler() local c=e:GetHandler()
      if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e1:SetCode(EFFECT_EXTRA_ATTACK) e1:SetCode(EFFECT_EXTRA_ATTACK)
      e1:SetValue(1) e1:SetValue(1)
      e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END) e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
      c:RegisterEffect(e1) c:RegisterEffect(e1)
      end end
      end end
      \ No newline at end of file
      expansions/script/c60159904.lua
      View file @ fa3382a1
      --玄武的化身 芽殃 --玄武的化身 芽殃
      function c60159904.initial_effect(c) function c60159904.initial_effect(c)
      --spsummon --spsummon
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK) e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK)
      e1:SetType(EFFECT_TYPE_IGNITION) e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_HAND+LOCATION_GRAVE) e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
      e1:SetCountLimit(1,60159904) e1:SetCountLimit(1,60159904)
      e1:SetTarget(c60159904.target) e1:SetTarget(c60159904.target)
      e1:SetOperation(c60159904.operation) e1:SetOperation(c60159904.operation)
      c:RegisterEffect(e1) c:RegisterEffect(e1)
      --tohand --tohand
      local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(60159901,0)) e2:SetDescription(aux.Stringid(60159901,0))
      e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_SPSUMMON_SUCCESS) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY) e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
      e2:SetTarget(c60159904.target2) e2:SetTarget(c60159904.target2)
      e2:SetOperation(c60159904.operation2) e2:SetOperation(c60159904.operation2)
      c:RegisterEffect(e2) c:RegisterEffect(e2)
      --Activate --Activate
      local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_DRAW) e3:SetCategory(CATEGORY_DRAW)
      e3:SetType(EFFECT_TYPE_IGNITION) e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
      e3:SetCost(c60159904.atkcost) e3:SetCountLimit(1)
      e3:SetTarget(c60159904.ctarget) e3:SetCost(c60159904.atkcost)
      e3:SetOperation(c60159904.cactivate) e3:SetTarget(c60159904.ctarget)
      c:RegisterEffect(e3) e3:SetOperation(c60159904.cactivate)
      c:RegisterEffect(e3)
      end end
      function c60159904.sfilter(c,e,tp) function c60159904.sfilter(c,e,tp)
      return c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end end
      function c60159904.target(e,tp,eg,ep,ev,re,r,rp,chk) function c60159904.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsPlayerCanSpecialSummon(tp) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsPlayerCanSpecialSummon(tp)
      and Duel.IsExistingMatchingCard(c60159904.sfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c60159904.sfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,LOCATION_DECK)
      end end
      function c60159904.operation(e,tp,eg,ep,ev,re,r,rp) function c60159904.operation(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler() local c=e:GetHandler()
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 or Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)==0 then return end if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 or Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)==0 then return end
      Duel.ConfirmDecktop(tp,1) Duel.ConfirmDecktop(tp,1)
      local g=Duel.GetDecktopGroup(tp,1) local g=Duel.GetDecktopGroup(tp,1)
      local tc=g:GetFirst() local tc=g:GetFirst()
      if (tc:IsAttribute(ATTRIBUTE_WIND) or tc:IsAttribute(ATTRIBUTE_FIRE) or tc:IsAttribute(ATTRIBUTE_WATER)) if (tc:IsAttribute(ATTRIBUTE_WIND) or tc:IsAttribute(ATTRIBUTE_FIRE) or tc:IsAttribute(ATTRIBUTE_WATER))
      and tc:IsCanBeSpecialSummoned(e,0,tp,false,false) then and tc:IsCanBeSpecialSummoned(e,0,tp,false,false) then
      if Duel.SelectYesNo(tp,aux.Stringid(60159901,1)) then if Duel.SelectYesNo(tp,aux.Stringid(60159901,1)) then
      Duel.DisableShuffleCheck() Duel.DisableShuffleCheck()
      Duel.SendtoDeck(c,nil,2,REASON_EFFECT) Duel.SendtoDeck(c,nil,2,REASON_EFFECT)
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      Duel.SpecialSummonComplete() Duel.SpecialSummonComplete()
      Duel.ShuffleDeck(tp) Duel.ShuffleDeck(tp)
      else else
      Duel.ShuffleDeck(tp) Duel.ShuffleDeck(tp)
      end end
      else else
      Duel.ShuffleDeck(tp) Duel.ShuffleDeck(tp)
      end end
      end end
      function c60159904.filter(c) function c60159904.filter(c)
      return ((c:IsAttribute(ATTRIBUTE_WIND) and c:IsRace(RACE_DRAGON)) return ((c:IsAttribute(ATTRIBUTE_WIND) and c:IsRace(RACE_DRAGON))
      or (c:IsAttribute(ATTRIBUTE_FIRE) and c:IsRace(RACE_WINDBEAST)) or (c:IsAttribute(ATTRIBUTE_FIRE) and c:IsRace(RACE_WINDBEAST))
      or (c:IsAttribute(ATTRIBUTE_WATER) and c:IsRace(RACE_BEAST))) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() or (c:IsAttribute(ATTRIBUTE_WATER) and c:IsRace(RACE_BEAST))) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
      end end
      function c60159904.target2(e,tp,eg,ep,ev,re,r,rp,chk) function c60159904.target2(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c60159904.filter,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c60159904.filter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end end
      function c60159904.operation2(e,tp,eg,ep,ev,re,r,rp) function c60159904.operation2(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c60159904.filter,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c60159904.filter,tp,LOCATION_DECK,0,1,1,nil)
      if g:GetCount()>0 then if g:GetCount()>0 then
      Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g) Duel.ConfirmCards(1-tp,g)
      end end
      end end
      function c60159904.cfilter(c) function c60159904.cfilter(c)
      return c:IsAttribute(ATTRIBUTE_WIND) and c:IsRace(RACE_DRAGON) and c:IsAbleToRemoveAsCost() return c:IsAttribute(ATTRIBUTE_EARTH) and c:IsRace(RACE_AQUA) and c:IsAbleToRemoveAsCost()
      end end
      function c60159904.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) function c60159904.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c60159904.cfilter,tp,LOCATION_GRAVE,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c60159904.cfilter,tp,LOCATION_GRAVE,0,1,nil) end
      local g=Duel.SelectMatchingCard(tp,c60159904.cfilter,tp,LOCATION_GRAVE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c60159904.cfilter,tp,LOCATION_GRAVE,0,1,1,nil)
      Duel.Remove(g,POS_FACEUP,REASON_COST) Duel.Remove(g,POS_FACEUP,REASON_COST)
      end end
      function c60159904.ctarget(e,tp,eg,ep,ev,re,r,rp,chk) function c60159904.ctarget(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsPlayerCanDraw(tp,2) end if chk==0 then return Duel.IsPlayerCanDraw(tp,2) end
      Duel.SetTargetPlayer(tp) Duel.SetTargetPlayer(tp)
      Duel.SetTargetParam(2) Duel.SetTargetParam(2)
      Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,2) Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,2)
      end end
      function c60159904.cactivate(e,tp,eg,ep,ev,re,r,rp) function c60159904.cactivate(e,tp,eg,ep,ev,re,r,rp)
      local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM) local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
      if Duel.Draw(p,d,REASON_EFFECT) then if Duel.Draw(p,d,REASON_EFFECT) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local g1=Duel.SelectMatchingCard(tp,Card.IsAbleToGrave,tp,LOCATION_HAND,0,1,1,nil) local g1=Duel.SelectMatchingCard(tp,Card.IsAbleToGrave,tp,LOCATION_HAND,0,1,1,nil)
      if g1:GetCount()>0 then if g1:GetCount()>0 then
      Duel.SendtoGrave(g1,REASON_EFFECT) Duel.SendtoGrave(g1,REASON_EFFECT)
      end end
      end end
      end end
      \ No newline at end of file
      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