Skip to content

Y
ygopro-rush-duel
You need to sign in or sign up before continuing.
Commit f4112b84 authored by 未闻皂名's avatar 未闻皂名
Browse files
Options

2021/12/8 GRP(Golden Rush Package)补齐

parent d349a1df
Pipeline #7669 passed with stages
      in 5 minutes and 3 seconds
      Hide whitespace changes
      Inline Side-by-side
      Showing with 106 additions and 21 deletions
      RD Patch.cdb
      View file @ f4112b84
      No preview for this file type
      script/c120125002.lua
      View file @ f4112b84
      local m=120125002 local m=120125002
      local list={120125001} local list={120125001,120203016}
      local cm=_G["c"..m] local cm=_G["c"..m]
      cm.name="黑龙之雏" cm.name="黑龙之雏"
      function cm.initial_effect(c) function cm.initial_effect(c)
      aux.AddCodeList(c,list[1]) aux.AddCodeList(c,list[1],list[2])
      --Special Summon --Special Summon
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,0)) e1:SetDescription(aux.Stringid(m,0))
      ...@@ -17,7 +17,7 @@ function cm.initial_effect(c) ...@@ -17,7 +17,7 @@ function cm.initial_effect(c)
      end end
      --Special Summon --Special Summon
      function cm.spfilter(c,e,tp) function cm.spfilter(c,e,tp)
      return RushDuel.IsLegendCode(c,list[1]) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return RushDuel.IsLegendCode(c,list[1],list[2]) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end end
      function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk) function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
      ......
      script/c120125003.lua
      View file @ f4112b84
      local m=120125003 local m=120125003
      local list={120125001} local list={120125001,120203016}
      local cm=_G["c"..m] local cm=_G["c"..m]
      cm.name="黑炎弹" cm.name="黑炎弹"
      function cm.initial_effect(c) function cm.initial_effect(c)
      aux.AddCodeList(c,list[1]) aux.AddCodeList(c,list[1],list[2])
      --Activate --Activate
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DAMAGE) e1:SetCategory(CATEGORY_DAMAGE)
      ...@@ -17,7 +17,7 @@ function cm.initial_effect(c) ...@@ -17,7 +17,7 @@ function cm.initial_effect(c)
      end end
      --Activate --Activate
      function cm.confilter(c) function cm.confilter(c)
      return c:IsFaceup() and RushDuel.IsLegendCode(c,list[1]) return c:IsFaceup() and RushDuel.IsLegendCode(c,list[1],list[2])
      end end
      function cm.condition(e,tp,eg,ep,ev,re,r,rp) function cm.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(cm.confilter,tp,LOCATION_MZONE,0,1,nil) return Duel.IsExistingMatchingCard(cm.confilter,tp,LOCATION_MZONE,0,1,nil)
      ...@@ -51,5 +51,5 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -51,5 +51,5 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
      Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1) Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
      end end
      function cm.atktg(e,c) function cm.atktg(e,c)
      return RushDuel.IsLegendCode(c,list[1]) return RushDuel.IsLegendCode(c,list[1],list[2])
      end end
      \ No newline at end of file
      script/c120130040.lua
      View file @ f4112b84
      local m=120130040 local m=120130040
      local list={120130000} local list={120130000,120203015}
      local cm=_G["c"..m] local cm=_G["c"..m]
      cm.name="千把刀" cm.name="千把刀"
      function cm.initial_effect(c) function cm.initial_effect(c)
      aux.AddCodeList(c,list[1]) aux.AddCodeList(c,list[1],list[2])
      --Activate --Activate
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DESTROY) e1:SetCategory(CATEGORY_DESTROY)
      ...@@ -16,7 +16,7 @@ function cm.initial_effect(c) ...@@ -16,7 +16,7 @@ function cm.initial_effect(c)
      end end
      --Activate --Activate
      function cm.confilter(c) function cm.confilter(c)
      return c:IsFaceup() and RushDuel.IsLegendCode(c,list[1]) return c:IsFaceup() and RushDuel.IsLegendCode(c,list[1],list[2])
      end end
      function cm.condition(e,tp,eg,ep,ev,re,r,rp) function cm.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(cm.confilter,tp,LOCATION_MZONE,0,1,nil) return Duel.IsExistingMatchingCard(cm.confilter,tp,LOCATION_MZONE,0,1,nil)
      ......
      script/c120130041.lua
      View file @ f4112b84
      local m=120130041 local m=120130041
      local list={120130000} local list={120130000,120203015}
      local cm=_G["c"..m] local cm=_G["c"..m]
      cm.name="黑·魔·导" cm.name="黑·魔·导"
      function cm.initial_effect(c) function cm.initial_effect(c)
      aux.AddCodeList(c,list[1]) aux.AddCodeList(c,list[1],list[2])
      --Activate --Activate
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DESTROY) e1:SetCategory(CATEGORY_DESTROY)
      ...@@ -16,7 +16,7 @@ function cm.initial_effect(c) ...@@ -16,7 +16,7 @@ function cm.initial_effect(c)
      end end
      --Activate --Activate
      function cm.confilter(c) function cm.confilter(c)
      return c:IsFaceup() and RushDuel.IsLegendCode(c,list[1]) return c:IsFaceup() and RushDuel.IsLegendCode(c,list[1],list[2])
      end end
      function cm.desfilter(c) function cm.desfilter(c)
      return c:IsType(TYPE_SPELL+TYPE_TRAP) return c:IsType(TYPE_SPELL+TYPE_TRAP)
      ......
      script/c120181002.lua
      View file @ f4112b84
      local m=120181002 local m=120181002
      local list={120130000} local list={120130000,120203015}
      local cm=_G["c"..m] local cm=_G["c"..m]
      cm.name="黑魔术少女" cm.name="黑魔术少女"
      function cm.initial_effect(c) function cm.initial_effect(c)
      aux.AddCodeList(c,list[1]) aux.AddCodeList(c,list[1],list[2])
      --Atk Up --Atk Up
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
      ...@@ -15,7 +15,7 @@ function cm.initial_effect(c) ...@@ -15,7 +15,7 @@ function cm.initial_effect(c)
      end end
      --Atk Up --Atk Up
      function cm.filter(c) function cm.filter(c)
      return RushDuel.IsLegendCode(c,list[1]) return RushDuel.IsLegendCode(c,list[1],list[2])
      end end
      function cm.atkval(e,c) function cm.atkval(e,c)
      return Duel.GetMatchingGroupCount(cm.filter,c:GetControler(),LOCATION_GRAVE,LOCATION_GRAVE,nil)*500 return Duel.GetMatchingGroupCount(cm.filter,c:GetControler(),LOCATION_GRAVE,LOCATION_GRAVE,nil)*500
      ......
      script/c120203017.lua 0 → 100644
      View file @ f4112b84
      local m=120203017
      local cm=_G["c"..m]
      cm.name="魔法石采掘"
      function cm.initial_effect(c)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DESTROY)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetTarget(cm.target)
      e1:SetOperation(cm.activate)
      c:RegisterEffect(e1)
      end
      --Activate
      function cm.filter(c)
      return c:IsFaceup() and RushDuel.IsHasDefense(c)
      end
      function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,0,LOCATION_MZONE,1,nil) end
      local g=Duel.GetMatchingGroup(cm.filter,tp,0,LOCATION_MZONE,nil)
      local dg=g:GetMaxGroup(Card.GetDefense)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,dg,1,0,0)
      end
      function cm.activate(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetMatchingGroup(cm.filter,tp,0,LOCATION_MZONE,nil)
      if g:GetCount()>0 then
      local dg=g:GetMaxGroup(Card.GetDefense)
      if dg:GetCount()>1 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local sg=dg:Select(tp,1,1,nil)
      Duel.HintSelection(sg)
      Duel.Destroy(sg,REASON_EFFECT)
      else
      Duel.Destroy(dg,REASON_EFFECT)
      end
      end
      end
      \ No newline at end of file
      script/c120203027.lua 0 → 100644
      View file @ f4112b84
      local m=120203027
      local list={120130000,120203015,120181002}
      local cm=_G["c"..m]
      cm.name="黑·魔·导·响·弹"
      function cm.initial_effect(c)
      aux.AddCodeList(c,list[1],list[2],list[3])
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_ATKCHANGE)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetTarget(cm.target)
      e1:SetOperation(cm.activate)
      c:RegisterEffect(e1)
      end
      --Activate
      function cm.filter(c)
      return c:IsFaceup() and c:IsLevelAbove(6) and c:IsAttribute(ATTRIBUTE_DARK) and c:IsRace(RACE_SPELLCASTER)
      end
      function cm.exfilter(c)
      return c:IsFaceup() and (RushDuel.IsLegendCode(c,list[1],list[2]) or c:IsCode(list[3]))
      end
      function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_MZONE,0,1,nil) end
      end
      function cm.activate(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,1))
      local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_MZONE,0,1,1,nil)
      if g:GetCount()>0 then
      Duel.HintSelection(g)
      local tc=g:GetFirst()
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetValue(1000)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      tc:RegisterEffect(e1)
      if Duel.IsExistingMatchingCard(cm.exfilter,tp,LOCATION_MZONE,0,1,nil) then
      local e2=e1:Clone()
      tc:RegisterEffect(e2)
      end
      end
      end
      \ No newline at end of file
      script/c120203028.lua
      View file @ f4112b84
      ...@@ -16,7 +16,7 @@ function cm.initial_effect(c) ...@@ -16,7 +16,7 @@ function cm.initial_effect(c)
      end end
      --Activate --Activate
      function cm.confilter(c) function cm.confilter(c)
      return c:IsFaceup() and (RushDuel.IsLegendCode(c,list[1]) or RushDuel.IsLegendCode(c,list[2])) return c:IsFaceup() and (RushDuel.IsLegendCode(c,list[1],list[2]))
      end end
      function cm.condition(e,tp,eg,ep,ev,re,r,rp) function cm.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(cm.confilter,tp,LOCATION_MZONE,0,1,nil) return Duel.IsExistingMatchingCard(cm.confilter,tp,LOCATION_MZONE,0,1,nil)
      ...@@ -49,5 +49,5 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -49,5 +49,5 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
      Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1) Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
      end end
      function cm.atktg(e,c) function cm.atktg(e,c)
      return RushDuel.IsLegendCode(c,list[1]) or RushDuel.IsLegendCode(c,list[2]) return RushDuel.IsLegendCode(c,list[1],list[2])
      end end
      \ No newline at end of file
      script/c120203040.lua
      View file @ f4112b84
      ...@@ -17,7 +17,7 @@ function cm.initial_effect(c) ...@@ -17,7 +17,7 @@ function cm.initial_effect(c)
      end end
      --Special Summon --Special Summon
      function cm.spfilter(c,e,tp) function cm.spfilter(c,e,tp)
      return (RushDuel.IsLegendCode(c,list[1]) or RushDuel.IsLegendCode(c,list[2])) return (RushDuel.IsLegendCode(c,list[1],list[2]))
      and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end end
      function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk) function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      ......
      script/special.lua
      View file @ f4112b84
      ...@@ -132,8 +132,13 @@ function RushDuel.ActivateCount(e,tp,eg,ep,ev,re,r,rp) ...@@ -132,8 +132,13 @@ function RushDuel.ActivateCount(e,tp,eg,ep,ev,re,r,rp)
      te:GetHandler():RegisterFlagEffect(code,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) te:GetHandler():RegisterFlagEffect(code,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
      end end
      --Legend --Legend
      function RushDuel.IsLegendCode(c,code) function RushDuel.IsLegendCode(c,...)
      return (c:GetOriginalCode()==code and c:IsCode(120000000)) or c:IsCode(code) for _,code in ipairs{...} do
      if (c:GetOriginalCode()==code and c:IsCode(120000000)) or c:IsCode(code) then
      return true
      end
      end
      return false
      end end
      --Maximum Summon --Maximum Summon
      function RushDuel.AddMaximumProcedure(c,max_atk,left_code,right_code) function RushDuel.AddMaximumProcedure(c,max_atk,left_code,right_code)
      ......
      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