Skip to content

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

Fix 帝王の極致

parent c6e36e45
Pipeline #33574 passed with stages
          in 1 minute and 36 seconds
          Hide whitespace changes
          Inline Side-by-side
          Showing with 36 additions and 4 deletions
          script/c101301017.lua
          View file @ 4b16fafa
          ...@@ -27,6 +27,7 @@ function s.initial_effect(c) ...@@ -27,6 +27,7 @@ function s.initial_effect(c)
          e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SPECIAL_SUMMON) e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SPECIAL_SUMMON)
          e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
          e4:SetCode(EVENT_SUMMON_SUCCESS) e4:SetCode(EVENT_SUMMON_SUCCESS)
          e4:SetProperty(EFFECT_FLAG_DELAY)
          e4:SetRange(LOCATION_GRAVE) e4:SetRange(LOCATION_GRAVE)
          e4:SetCountLimit(1,id+o*2) e4:SetCountLimit(1,id+o*2)
          e4:SetCondition(s.spcon) e4:SetCondition(s.spcon)
          ......
          script/c101301076.lua
          View file @ 4b16fafa
          ...@@ -8,16 +8,21 @@ function s.initial_effect(c) ...@@ -8,16 +8,21 @@ function s.initial_effect(c)
          c:RegisterEffect(e1) c:RegisterEffect(e1)
          --trigger --trigger
          local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
          e2:SetCategory(CATEGORY_DESTROY+CATEGORY_REMOVE+CATEGORY_TODECK+CATEGORY_HANDES) e2:SetDescription(aux.Stringid(id,0))
          e2:SetCategory(CATEGORY_DESTROY|CATEGORY_REMOVE|CATEGORY_TODECK|CATEGORY_HANDES)
          e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
          e2:SetCode(EVENT_SPSUMMON_SUCCESS)
          e2:SetRange(LOCATION_SZONE) e2:SetRange(LOCATION_SZONE)
          e2:SetCode(EVENT_SPSUMMON_SUCCESS)
          e2:SetProperty(EFFECT_FLAG_DELAY) e2:SetProperty(EFFECT_FLAG_DELAY)
          e2:SetCondition(s.condition)
          e2:SetCost(s.cost) e2:SetCost(s.cost)
          e2:SetTarget(s.target) e2:SetTarget(s.target)
          e2:SetOperation(s.operation) e2:SetOperation(s.operation)
          c:RegisterEffect(e2) c:RegisterEffect(e2)
          end end
          function s.condition(e,tp,eg,ep,ev,re,r,rp)
          return eg:IsExists(Card.IsSummonPlayer,1,e:GetHandler(),1-tp)
          end
          function s.cfilter(c) function s.cfilter(c)
          return c:IsSummonType(SUMMON_TYPE_ADVANCE) return c:IsSummonType(SUMMON_TYPE_ADVANCE)
          end end
          ...@@ -37,8 +42,10 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -37,8 +42,10 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
          local b4=Duel.GetFlagEffect(tp,id+4)==0 and Duel.IsExistingMatchingCard(Card.IsFacedown,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) local b4=Duel.GetFlagEffect(tp,id+4)==0 and Duel.IsExistingMatchingCard(Card.IsFacedown,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil)
          local b5=Duel.GetFlagEffect(tp,id+5)==0 and Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) local b5=Duel.GetFlagEffect(tp,id+5)==0 and Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil)
          local b6=Duel.GetFlagEffect(tp,id+6)==0 and Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) local b6=Duel.GetFlagEffect(tp,id+6)==0 and Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil)
          if chk==0 then return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_MZONE,0,1,nil) and if chk==0 then return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_MZONE,0,1,nil)
          (b1 or b2 or b3 or b4 or b5 or b6) end and e:GetHandler():GetFlagEffect(id)==0
          and (b1 or b2 or b3 or b4 or b5 or b6) end
          e:GetHandler():RegisterFlagEffect(id,RESET_CHAIN,0,1)
          local op=0 local op=0
          if b1 and b2 and b3 and b4 and b5 and b6 then if b1 and b2 and b3 and b4 and b5 and b6 then
          local page=0 local page=0
          ...@@ -72,6 +79,30 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -72,6 +79,30 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
          end end
          e:SetLabel(op) e:SetLabel(op)
          Duel.RegisterFlagEffect(tp,id+op,RESET_PHASE+PHASE_END,0,1) Duel.RegisterFlagEffect(tp,id+op,RESET_PHASE+PHASE_END,0,1)
          if op==1 then
          e:SetCategory(CATEGORY_DESTROY)
          local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
          Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
          elseif op==2 then
          e:SetCategory(CATEGORY_DESTROY)
          local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_SZONE,LOCATION_SZONE,nil)
          Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
          elseif op==3 then
          e:SetCategory(CATEGORY_HANDES)
          Duel.SetOperationInfo(0,CATEGORY_HANDES,nil,0,1-tp,1)
          elseif op==4 then
          e:SetCategory(CATEGORY_DESTROY)
          local g=Duel.GetMatchingGroup(Card.IsFacedown,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
          Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
          elseif op==5 then
          e:SetCategory(CATEGORY_TODECK)
          local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
          Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
          elseif op==6 then
          e:SetCategory(CATEGORY_REMOVE)
          local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
          Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
          end
          end end
          function s.operation(e,tp,eg,ep,ev,re,r,rp) function s.operation(e,tp,eg,ep,ev,re,r,rp)
          local opt=e:GetLabel() local opt=e:GetLabel()
          ......
          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