Skip to content

Y
ygopro-rush-duel
Commit a8abdc82 authored by 未闻皂名's avatar 未闻皂名
Browse files
Options

2023/10/23 新增：真红眼新卡

parent e1ed3b33
Pipeline #23820 passed with stages
      in 7 minutes and 18 seconds
      Hide whitespace changes
      Inline Side-by-side
      Showing with 498 additions and 0 deletions
      RD Patch.cdb
      View file @ a8abdc82
      No preview for this file type
      script/c120109033.lua 0 → 100644
      View file @ a8abdc82
      local m=120109033
      local cm=_G["c"..m]
      cm.name="日食角魔龙"
      function cm.initial_effect(c)
      --To Hand
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,0))
      e1:SetCategory(CATEGORY_TOHAND+CATEGORY_GRAVE_ACTION)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCondition(cm.condition)
      e1:SetTarget(cm.target)
      e1:SetOperation(cm.operation)
      c:RegisterEffect(e1)
      end
      --To Hand
      function cm.confilter(c)
      return c:IsFaceup() and c:IsLevelAbove(1)
      end
      function cm.thfilter(c)
      return c:IsAttribute(ATTRIBUTE_DARK) and c:IsRace(RACE_DRAGON+RACE_FIEND) and RD.IsDefense(c,1200) and c:IsAbleToHand()
      end
      function cm.condition(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local g=Duel.GetMatchingGroup(cm.confilter,tp,0,LOCATION_MZONE,nil)
      return g:GetSum(Card.GetLevel)>=10 and (RD.IsSummonTurn(c) or RD.IsSpecialSummonTurn(c))
      end
      function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
      end
      function cm.operation(e,tp,eg,ep,ev,re,r,rp)
      RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
      RD.SendToHandAndExists(g,1-tp)
      end)
      if Duel.GetFlagEffect(tp,m)~=0 then return end
      RD.CreateHintEffect(e,aux.Stringid(m,1),tp,1,0,RESET_PHASE+PHASE_END)
      RD.CreateAttackLimitEffect(e,cm.atktg,tp,LOCATION_MZONE,0,RESET_PHASE+PHASE_END)
      Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
      end
      function cm.atktg(e,c)
      return c:IsType(TYPE_EFFECT) and c:IsLevelBelow(6)
      end
      \ No newline at end of file
      script/c120218008.lua 0 → 100644
      View file @ a8abdc82
      local m=120218008
      local list={120244012}
      local cm=_G["c"..m]
      cm.name="名蔷薇魔女"
      function cm.initial_effect(c)
      RD.AddCodeList(c,list)
      --Special Summon
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_GRAVE_SPSUMMON)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCondition(cm.condition)
      e1:SetCost(cm.cost)
      e1:SetTarget(cm.target)
      e1:SetOperation(cm.operation)
      c:RegisterEffect(e1)
      end
      --Special Summon
      function cm.confilter(c)
      return c:IsCode(list[1])
      end
      function cm.costfilter(c)
      return ((c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_SPELLCASTER)) or c:IsType(TYPE_SPELL))
      and c:IsAbleToGraveAsCost()
      end
      function cm.spfilter(c,e,tp)
      return (c:IsCode(list[1]) or (c:IsLevelBelow(9) and c:IsRace(RACE_SPELLCASTER) and c:IsType(TYPE_FUSION)))
      and RD.IsCanBeSpecialSummoned(c,e,tp,POS_FACEUP)
      end
      function cm.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(cm.confilter,tp,LOCATION_GRAVE,0,1,nil)
      end
      cm.cost=RD.CostSendHandToGrave(cm.costfilter,1,1)
      function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetMZoneCount(tp)>0
      and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
      end
      function cm.operation(e,tp,eg,ep,ev,re,r,rp)
      RD.SelectAndSpecialSummon(aux.NecroValleyFilter(cm.spfilter),tp,LOCATION_GRAVE,0,1,1,nil,e,POS_FACEUP)
      end
      \ No newline at end of file
      script/c120253010.lua 0 → 100644
      View file @ a8abdc82
      local m=120253010
      local cm=_G["c"..m]
      cm.name="暗冥格斗龙兽"
      function cm.initial_effect(c)
      --Position
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,0))
      e1:SetCategory(CATEGORY_POSITION)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCost(cm.cost)
      e1:SetTarget(cm.target)
      e1:SetOperation(cm.operation)
      c:RegisterEffect(e1)
      end
      --Position
      function cm.costfilter(c)
      return c:IsRace(RACE_WYRM) and c:IsAbleToDeckOrExtraAsCost()
      end
      function cm.posfilter(c)
      return c:IsFaceup() and c:IsLevelBelow(9) and RD.IsCanChangePosition(c) and c:IsCanTurnSet()
      end
      cm.cost=RD.CostSendGraveToDeck(cm.costfilter,2,2)
      function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.posfilter,tp,0,LOCATION_MZONE,1,nil) end
      local g=Duel.GetMatchingGroup(cm.posfilter,tp,0,LOCATION_MZONE,nil)
      Duel.SetOperationInfo(0,CATEGORY_POSITION,g,1,0,0)
      end
      function cm.operation(e,tp,eg,ep,ev,re,r,rp)
      RD.SelectAndDoAction(HINTMSG_SET,cm.posfilter,tp,0,LOCATION_MZONE,1,1,nil,function(g)
      if RD.ChangePosition(g,POS_FACEDOWN_DEFENSE)~=0 then
      Duel.BreakEffect()
      Duel.ConfirmDecktop(1-tp,3)
      Duel.SortDecktop(1-tp,1-tp,3)
      end
      end)
      end
      \ No newline at end of file
      script/c120253025.lua 0 → 100644
      View file @ a8abdc82
      local m=120253025
      local list={120125001}
      local cm=_G["c"..m]
      cm.name="真红眼月龙"
      function cm.initial_effect(c)
      RD.AddCodeList(c,list)
      --Change Code
      RD.EnableChangeCode(c,list[1],LOCATION_HAND)
      --Fusion Code
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_ADD_FUSION_CODE)
      e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e1:SetRange(LOCATION_MZONE)
      e1:SetValue(list[1])
      c:RegisterEffect(e1)
      --Continuous Effect
      RushDuel.AddContinuousEffect(c,e1)
      end
      \ No newline at end of file
      script/c120253026.lua 0 → 100644
      View file @ a8abdc82
      local m=120253026
      local list={120203035}
      local cm=_G["c"..m]
      cm.name="翼龙黑骑士"
      function cm.initial_effect(c)
      RD.AddCodeList(c,list)
      --Position
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,0))
      e1:SetCategory(CATEGORY_POSITION)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCondition(cm.condition)
      e1:SetTarget(cm.target)
      e1:SetOperation(cm.operation)
      c:RegisterEffect(e1)
      end
      --Position
      function cm.confilter(c)
      return c:IsCode(list[1]) or (c:IsAttribute(ATTRIBUTE_DARK) and RD.IsDefense(c,1200))
      end
      function cm.posfilter(c)
      return c:IsFaceup() and c:IsLevelBelow(8) and RD.IsCanChangePosition(c) and c:IsCanTurnSet()
      end
      function cm.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(cm.confilter,tp,LOCATION_GRAVE,0,1,nil)
      end
      function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.posfilter,tp,0,LOCATION_MZONE,1,nil) end
      local g=Duel.GetMatchingGroup(cm.posfilter,tp,0,LOCATION_MZONE,nil)
      Duel.SetOperationInfo(0,CATEGORY_POSITION,g,1,0,0)
      end
      function cm.operation(e,tp,eg,ep,ev,re,r,rp)
      RD.SelectAndDoAction(HINTMSG_SET,cm.posfilter,tp,0,LOCATION_MZONE,1,1,nil,function(g)
      RD.ChangePosition(g,POS_FACEDOWN_DEFENSE)
      end)
      end
      \ No newline at end of file
      script/c120253027.lua 0 → 100644
      View file @ a8abdc82
      local m=120253027
      local list={120238029,120253057}
      local cm=_G["c"..m]
      cm.name="火箭卫星兵"
      function cm.initial_effect(c)
      RD.AddCodeList(c,list)
      --To Hand
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,0))
      e1:SetCategory(CATEGORY_TOHAND+CATEGORY_GRAVE_ACTION)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCost(cm.cost)
      e1:SetTarget(cm.target)
      e1:SetOperation(cm.operation)
      c:RegisterEffect(e1)
      end
      --To Hand
      function cm.thfilter(c)
      return c:IsCode(list[1],list[2]) and c:IsAbleToHand()
      end
      cm.cost=RD.CostSendHandToDeckBottom(Card.IsAbleToDeckAsCost,1,1,false)
      function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
      end
      function cm.operation(e,tp,eg,ep,ev,re,r,rp)
      RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
      RD.SendToHandAndExists(g,1-tp)
      end)
      end
      \ No newline at end of file
      script/c120253028.lua 0 → 100644
      View file @ a8abdc82
      local m=120253028
      local list={120238029,120253057}
      local cm=_G["c"..m]
      cm.name="流星之龙兽"
      function cm.initial_effect(c)
      RD.AddCodeList(c,list)
      --Special Summon Procedure
      RD.AddHandSpecialSummonProcedure(c,aux.Stringid(m,0),cm.spcon)
      --To Hand
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,0))
      e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_MZONE)
      e1:SetTarget(cm.target)
      e1:SetOperation(cm.operation)
      c:RegisterEffect(e1)
      end
      --Special Summon Procedure
      function cm.spcon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      return Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==0
      and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      end
      --To Hand
      function cm.thfilter(c)
      return c:IsCode(list[1],list[2]) and c:IsAbleToHand()
      end
      function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>3 end
      end
      function cm.operation(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)<4 then return end
      local sg,g=RD.RevealDeckTopAndCanSelect(tp,5,aux.Stringid(m,1),HINTMSG_ATOHAND,cm.thfilter,1,1)
      if sg:GetCount()>0 then
      Duel.DisableShuffleCheck()
      RD.SendToHandAndExists(sg,1-tp)
      Duel.ShuffleHand(tp)
      end
      local ct=g:GetCount()
      if ct>0 then
      Duel.SortDecktop(tp,tp,ct)
      RD.SendDeckTopToBottom(tp,ct)
      end
      end
      \ No newline at end of file
      script/c120253040.lua 0 → 100644
      View file @ a8abdc82
      local m=120253040
      local list={120247040,120253010}
      local cm=_G["c"..m]
      cm.name="幻坏溶龙 暗冥爆破龙王"
      function cm.initial_effect(c)
      RD.AddCodeList(c,list)
      --Fusion Material
      RD.AddFusionProcedure(c,list[1],list[2])
      --Discard Deck
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,0))
      e1:SetCategory(CATEGORY_DECKDES+CATEGORY_DESTROY+CATEGORY_DAMAGE)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_MZONE)
      e1:SetTarget(cm.target)
      e1:SetOperation(cm.operation)
      c:RegisterEffect(e1)
      end
      --Discard Deck
      function cm.exfilter(c)
      return c:IsType(TYPE_MONSTER) and c:IsLocation(LOCATION_GRAVE)
      end
      function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsPlayerCanDiscardDeck(1-tp,3) end
      Duel.SetOperationInfo(0,CATEGORY_DECKDES,nil,0,1-tp,3)
      end
      function cm.operation(e,tp,eg,ep,ev,re,r,rp)
      if RD.SendDeckTopToGraveAndExists(1-tp,3) then
      local ct=Duel.GetOperatedGroup():FilterCount(cm.exfilter,nil)
      if ct==0 then return end
      RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_DESTROY,Card.IsFacedown,tp,0,LOCATION_ONFIELD,1,ct,nil,function(g)
      local des=Duel.Destroy(g,REASON_EFFECT)
      if des~=0 then
      Duel.BreakEffect()
      Duel.Damage(1-tp,des*500,REASON_EFFECT)
      end
      end)
      end
      end
      \ No newline at end of file
      script/c120253046.lua 0 → 100644
      View file @ a8abdc82
      local m=120253046
      local list={120238029,120253028}
      local cm=_G["c"..m]
      cm.name="流星群之龙"
      function cm.initial_effect(c)
      RD.AddCodeList(c,list)
      --Fusion Material
      RD.AddFusionProcedure(c,list[1],list[2])
      --Special Summon
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_GRAVE_SPSUMMON)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_MZONE)
      e1:SetTarget(cm.target)
      e1:SetOperation(cm.operation)
      c:RegisterEffect(e1)
      end
      --Special Summon
      function cm.spfilter(c,e,tp)
      return c:IsAttribute(ATTRIBUTE_EARTH) and c:IsRace(RACE_DRAGON) and c:IsAttack(1800) and RD.IsCanBeSpecialSummoned(c,e,tp,POS_FACEUP_DEFENSE)
      end
      function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetMZoneCount(tp)>0
      and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
      end
      function cm.operation(e,tp,eg,ep,ev,re,r,rp)
      RD.SelectAndSpecialSummon(aux.NecroValleyFilter(cm.spfilter),tp,LOCATION_GRAVE,0,1,1,nil,e,POS_FACEUP_DEFENCE)
      end
      \ No newline at end of file
      script/c120253047.lua 0 → 100644
      View file @ a8abdc82
      local m=120253047
      local list={120125001,120253028,120253057}
      local cm=_G["c"..m]
      cm.name="流星黑龙兽"
      function cm.initial_effect(c)
      RD.AddCodeList(c,list)
      --Fusion Material
      RD.AddFusionProcedure(c,list[1],list[2])
      --Indes
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,0))
      e1:SetCategory(CATEGORY_DAMAGE)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCondition(cm.condition)
      e1:SetCost(cm.cost)
      e1:SetOperation(cm.operation)
      c:RegisterEffect(e1)
      end
      --Indes
      cm.indval=RD.ValueEffectIndesType(0,TYPE_MONSTER+TYPE_SPELL+TYPE_TRAP)
      function cm.confilter(c)
      return c:IsCode(list[3])
      end
      function cm.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(cm.confilter,tp,LOCATION_GRAVE,0,1,nil)
      end
      cm.cost=RD.CostSendDeckTopToGrave(1)
      function cm.operation(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsFaceup() and c:IsRelateToEffect(e) then
      RD.AttachEffectIndes(e,c,cm.indval,aux.Stringid(m,1),RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
      if Duel.IsExistingMatchingCard(cm.confilter,tp,LOCATION_GRAVE,0,2,nil) then
      Duel.Damage(1-tp,500,REASON_EFFECT)
      end
      end
      end
      \ No newline at end of file
      script/c120253048.lua 0 → 100644
      View file @ a8abdc82
      local m=120253048
      local list={120125001,120238029}
      local cm=_G["c"..m]
      cm.name="流星黑火星龙"
      function cm.initial_effect(c)
      RD.AddCodeList(c,list)
      --Fusion Material
      RD.AddFusionProcedure(c,list[1],list[2])
      --Atk Up
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,0))
      e1:SetCategory(CATEGORY_ATKCHANGE)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCondition(cm.condition)
      e1:SetCost(cm.cost)
      e1:SetTarget(cm.target)
      e1:SetOperation(cm.operation)
      c:RegisterEffect(e1)
      end
      --Atk Up
      function cm.confilter(c)
      return c:IsCode(list[2])
      end
      function cm.filter(c)
      return c:IsType(TYPE_MONSTER)
      end
      function cm.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(cm.confilter,tp,LOCATION_GRAVE,0,1,nil)
      end
      cm.cost=RD.CostSendDeckTopToGrave(1)
      function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_GRAVE,0,1,nil) end
      end
      function cm.operation(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsFaceup() and c:IsRelateToEffect(e) then
      local ct=Duel.GetMatchingGroupCount(cm.filter,tp,LOCATION_GRAVE,0,nil)
      RD.AttachAtkDef(e,c,ct*200,0,RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END)
      RD.AttachPierce(e,c,aux.Stringid(m,1),RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END)
      end
      end
      \ No newline at end of file
      script/c120253057.lua 0 → 100644
      View file @ a8abdc82
      local m=120253057
      local list={120125001,120145000,120238029}
      local cm=_G["c"..m]
      cm.name="流星炎融合"
      function cm.initial_effect(c)
      RD.AddCodeList(c,list)
      --Activate
      local e1=RD.CreateFusionEffect(c,nil,nil,nil,0,0,cm.matcheck,RD.FusionToGrave,nil,cm.operation)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON+CATEGORY_DESTROY)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      c:RegisterEffect(e1)
      end
      --Activate
      function cm.matfilter(c)
      return c:IsLinkCode(list[1]) or c:IsLinkCode(list[2]) or c:IsCode(list[3])
      end
      function cm.matcheck(tp,sg,fc)
      return sg:IsExists(cm.matfilter,1,nil) and sg:GetCount()==2
      end
      function cm.operation(e,tp,eg,ep,ev,re,r,rp,mat,fc)
      if not fc:IsType(TYPE_EFFECT) then
      RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_DESTROY,nil,tp,0,LOCATION_ONFIELD,1,1,nil,function(g)
      Duel.Destroy(g,REASON_EFFECT)
      end)
      end
      end
      \ No newline at end of file
      script/c120253058.lua 0 → 100644
      View file @ a8abdc82
      local m=120253058
      local cm=_G["c"..m]
      cm.name="陨石龙之爪"
      function cm.initial_effect(c)
      --Activate
      RD.RegisterEquipEffect(c,nil,nil,cm.target)
      --Atk Up
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_EQUIP)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetValue(300)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCondition(cm.excon)
      e2:SetValue(700)
      c:RegisterEffect(e2)
      --Indes
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_EQUIP)
      e3:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
      e3:SetCondition(cm.excon)
      e3:SetValue(cm.indval)
      c:RegisterEffect(e3)
      end
      --Activate
      function cm.target(c,e,tp)
      return c:IsControler(tp) and c:IsFaceup() and c:IsAttribute(ATTRIBUTE_EARTH+ATTRIBUTE_FIRE+ATTRIBUTE_DARK) and c:IsRace(RACE_DRAGON)
      end
      --Atk Up
      function cm.excon(e)
      local tc=e:GetHandler():GetEquipTarget()
      return not tc:IsType(TYPE_EFFECT) and tc:IsType(TYPE_FUSION)
      end
      --Indes
      cm.indval=RD.ValueEffectIndesType(0,TYPE_MONSTER+TYPE_SPELL+TYPE_TRAP,true)
      \ No newline at end of file
      script/c120253063.lua 0 → 100644
      View file @ a8abdc82
      local m=120253063
      local list={120253057}
      local cm=_G["c"..m]
      cm.name="流星光之力"
      function cm.initial_effect(c)
      RD.AddCodeList(c,list)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_ATKCHANGE)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_ATTACK_ANNOUNCE)
      e1:SetCondition(cm.condition)
      e1:SetOperation(cm.activate)
      c:RegisterEffect(e1)
      end
      --Activate
      function cm.confilter(c)
      return c:IsRace(RACE_DRAGON)
      end
      function cm.setfilter(c)
      return c:IsCode(list[1]) and c:IsSSetable()
      end
      function cm.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetAttacker():IsControler(1-tp)
      and Duel.IsExistingMatchingCard(cm.confilter,tp,LOCATION_GRAVE,0,3,nil)
      end
      function cm.activate(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetAttacker()
      if tc and tc:IsFaceup() and tc:IsRelateToBattle() then
      RD.AttachAtkDef(e,tc,-1000,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      RD.CanSelectAndSet(aux.Stringid(m,1),aux.NecroValleyFilter(cm.setfilter),tp,LOCATION_GRAVE,0,1,1,nil,e,true)
      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