Skip to content

P
pre-release-database-cdb
Commit 1c9da492 authored by wind2009's avatar wind2009
Browse files
Options

Fix 大輪の魔導書

parent 2c7d44ff
Pipeline #41534 canceled with stages
          in 7 seconds
          Show whitespace changes
          Inline Side-by-side
          Showing with 11 additions and 7 deletions
          script/c100254202.lua
          View file @ 1c9da492
          ...@@ -4,7 +4,7 @@ function s.initial_effect(c) ...@@ -4,7 +4,7 @@ function s.initial_effect(c)
          --Activate --Activate
          local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(id,0)) e1:SetDescription(aux.Stringid(id,0))
          e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH+CATEGORY_TODECK)
          e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
          e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
          e1:SetCountLimit(1,id) e1:SetCountLimit(1,id)
          ...@@ -31,6 +31,7 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -31,6 +31,7 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
          local g=Duel.GetMatchingGroup(s.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,nil) local g=Duel.GetMatchingGroup(s.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,nil)
          if chk==0 then return g:GetClassCount(Card.GetAttribute)>=4 end if chk==0 then return g:GetClassCount(Card.GetAttribute)>=4 end
          Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,4,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,4,tp,LOCATION_DECK)
          Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,2,tp,LOCATION_HAND)
          end end
          function s.activate(e,tp,eg,ep,ev,re,r,rp) function s.activate(e,tp,eg,ep,ev,re,r,rp)
          local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(s.thfilter),tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,nil) local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(s.thfilter),tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,nil)
          ...@@ -39,10 +40,13 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -39,10 +40,13 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
          local sg=g:SelectSubGroup(tp,aux.dabcheck,false,4,4) local sg=g:SelectSubGroup(tp,aux.dabcheck,false,4,4)
          if Duel.SendtoHand(sg,nil,REASON_EFFECT)==4 then if Duel.SendtoHand(sg,nil,REASON_EFFECT)==4 then
          Duel.ConfirmCards(1-tp,sg) Duel.ConfirmCards(1-tp,sg)
          Duel.BreakEffect() if sg:IsExists(Card.IsLocation,1,nil,LOCATION_HAND) and Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)>1 then
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
          local dg=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_HAND,0,2,2,nil) local dg=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_HAND,0,2,2,nil)
          Duel.BreakEffect()
          Duel.SendtoDeck(dg,nil,SEQ_DECKSHUFFLE,REASON_EFFECT) Duel.SendtoDeck(dg,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
          end end
          end
          end end
          function s.filter0(c,e) function s.filter0(c,e)
          return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and not c:IsImmuneToEffect(e) and c:IsSetCard(0xbf,0xc0) return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and not c:IsImmuneToEffect(e) and c:IsSetCard(0xbf,0xc0)
          ...@@ -89,13 +93,13 @@ function s.fusop(e,tp,eg,ep,ev,re,r,rp) ...@@ -89,13 +93,13 @@ function s.fusop(e,tp,eg,ep,ev,re,r,rp)
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
          local tg=sg:Select(tp,1,1,nil) local tg=sg:Select(tp,1,1,nil)
          local tc=tg:GetFirst() local tc=tg:GetFirst()
          if sg1:IsContains(tc) and (sg2==nil or not sg2:IsContains(tc) or not Duel.SelectYesNo(tp,ce:GetDescription())) then if sg1:IsContains(tc) and (sg2==nil or not sg2:IsContains(tc) or ce and not Duel.SelectYesNo(tp,ce:GetDescription())) then
          local mat1=Duel.SelectFusionMaterial(tp,tc,mg1,nil,chkf) local mat1=Duel.SelectFusionMaterial(tp,tc,mg1,nil,chkf)
          tc:SetMaterial(mat1) tc:SetMaterial(mat1)
          Duel.SendtoGrave(mat1,REASON_EFFECT+REASON_MATERIAL+REASON_FUSION) Duel.SendtoGrave(mat1,REASON_EFFECT+REASON_MATERIAL+REASON_FUSION)
          Duel.BreakEffect() Duel.BreakEffect()
          Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
          else elseif ce then
          local mat2=Duel.SelectFusionMaterial(tp,tc,mg2,nil,chkf) local mat2=Duel.SelectFusionMaterial(tp,tc,mg2,nil,chkf)
          local fop=ce:GetOperation() local fop=ce:GetOperation()
          fop(ce,e,tp,tc,mat2) fop(ce,e,tp,tc,mat2)
          ......
          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