Skip to content

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

Add double tuner check

parent a90ebf76
Pipeline #40399 passed with stages
          in 2 minutes and 53 seconds
          Hide whitespace changes
          Inline Side-by-side
          Showing with 504 additions and 0 deletions
          script-fix.cdb
          View file @ 30815ad0
          No preview for this file type
          script/c72309040.lua 0 → 100644
          View file @ 30815ad0
          --最果てのゴーティス
          local s,id,o=GetID()
          function s.initial_effect(c)
          c:EnableReviveLimit()
          --material
          aux.AddSynchroMixProcedure(c,aux.Tuner(Card.IsRace,RACE_FISH),aux.NonTuner(nil),nil,s.mfilter,0,99)
          --atk
          local e0=Effect.CreateEffect(c)
          e0:SetType(EFFECT_TYPE_SINGLE)
          e0:SetCode(EFFECT_SET_BASE_ATTACK)
          e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
          e0:SetRange(LOCATION_MZONE)
          e0:SetValue(s.atkval)
          c:RegisterEffect(e0)
          --remove
          local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(id,0))
          e1:SetCategory(CATEGORY_REMOVE)
          e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
          e1:SetCode(EVENT_SPSUMMON_SUCCESS)
          e1:SetProperty(EFFECT_FLAG_DELAY)
          e1:SetCondition(s.rmcon)
          e1:SetTarget(s.rmtg)
          e1:SetOperation(s.rmop)
          c:RegisterEffect(e1)
          --spsummon
          local e2=Effect.CreateEffect(c)
          e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
          e2:SetCode(EVENT_REMOVE)
          e2:SetOperation(s.spreg)
          c:RegisterEffect(e2)
          local e3=Effect.CreateEffect(c)
          e3:SetDescription(aux.Stringid(id,1))
          e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
          e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
          e3:SetRange(LOCATION_REMOVED)
          e3:SetCode(EVENT_PHASE+PHASE_STANDBY)
          e3:SetCondition(s.spcon)
          e3:SetTarget(s.sptg)
          e3:SetOperation(s.spop)
          e3:SetLabelObject(e2)
          c:RegisterEffect(e3)
          --double tuner check
          local e4=Effect.CreateEffect(c)
          e4:SetType(EFFECT_TYPE_SINGLE)
          e4:SetCode(EFFECT_MATERIAL_CHECK)
          e4:SetValue(s.valcheck)
          c:RegisterEffect(e4)
          end
          function s.mfilter(c,syncard)
          return (c:IsRace(RACE_FISH) and c:IsTuner(syncard)) or c:IsNotTuner(syncard)
          end
          function s.filter(c)
          return c:IsFaceup() and c:IsType(TYPE_MONSTER)
          end
          function s.atkval(e,c)
          return Duel.GetMatchingGroupCount(s.filter,0,LOCATION_REMOVED,LOCATION_REMOVED,nil)*500
          end
          function s.rmcon(e)
          local c=e:GetHandler()
          return c:IsSummonType(SUMMON_TYPE_SYNCHRO) and Duel.GetTurnPlayer()~=c:GetSummonPlayer()
          end
          function s.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
          local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
          if chk==0 then return #g>0 end
          Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,#g,0,0)
          end
          function s.rmop(e,tp,eg,ep,ev,re,r,rp)
          local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
          Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
          end
          function s.spreg(e,tp,eg,ep,ev,re,r,rp)
          local ct=Duel.GetTurnCount()
          e:SetLabel(ct)
          e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,2)
          end
          function s.spcon(e,tp,eg,ep,ev,re,r,rp)
          local c=e:GetHandler()
          return e:GetLabelObject():GetLabel()~=Duel.GetTurnCount() and c:GetFlagEffect(id)>0
          and c:IsPreviousLocation(LOCATION_MZONE)
          end
          function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
          local c=e:GetHandler()
          if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
          and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
          end
          function s.spop(e,tp,eg,ep,ev,re,r,rp)
          local c=e:GetHandler()
          if not c:IsRelateToEffect(e) then return end
          Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
          end
          function s.valcheck(e,c)
          local g=c:GetMaterial()
          if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
          local e1=Effect.CreateEffect(c)
          e1:SetType(EFFECT_TYPE_SINGLE)
          e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
          e1:SetCode(21142671)
          e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
          c:RegisterEffect(e1)
          end
          end
          script/c821049.lua 0 → 100644
          View file @ 30815ad0
          --ヴィサス＝アムリターラ
          local s,id,o=GetID()
          function s.initial_effect(c)
          aux.EnableChangeCode(c,56099748)
          --synchro summon
          aux.AddSynchroMixProcedure(c,aux.FilterBoolFunction(Card.IsAttribute,ATTRIBUTE_LIGHT),nil,nil,aux.Tuner(nil),1,99)
          c:EnableReviveLimit()
          --double tuner check
          local e0=Effect.CreateEffect(c)
          e0:SetType(EFFECT_TYPE_SINGLE)
          e0:SetCode(EFFECT_MATERIAL_CHECK)
          e0:SetValue(s.valcheck)
          c:RegisterEffect(e0)
          local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(id,0))
          e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
          e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
          e1:SetProperty(EFFECT_FLAG_DELAY)
          e1:SetCode(EVENT_SPSUMMON_SUCCESS)
          e1:SetCountLimit(1,id)
          e1:SetCondition(s.thcon)
          e1:SetTarget(s.thtg)
          e1:SetOperation(s.thop)
          c:RegisterEffect(e1)
          --destroy & atkup
          local e2=Effect.CreateEffect(c)
          e2:SetDescription(aux.Stringid(id,1))
          e2:SetCategory(CATEGORY_DESTROY)
          e2:SetType(EFFECT_TYPE_IGNITION)
          e2:SetRange(LOCATION_MZONE)
          e2:SetCountLimit(1,id+o)
          e2:SetTarget(s.destg)
          e2:SetOperation(s.desop)
          c:RegisterEffect(e2)
          end
          function s.valcheck(e,c)
          local g=c:GetMaterial()
          if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
          local e1=Effect.CreateEffect(c)
          e1:SetType(EFFECT_TYPE_SINGLE)
          e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
          e1:SetCode(21142671)
          e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
          c:RegisterEffect(e1)
          end
          end
          function s.thcon(e,tp,eg,ep,ev,re,r,rp)
          return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
          end
          function s.thfilter(c)
          return aux.IsCodeListed(c,56099748) and c:IsAbleToHand() and c:IsType(TYPE_SPELL+TYPE_TRAP)
          end
          function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK,0,1,nil) end
          Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
          end
          function s.thop(e,tp,eg,ep,ev,re,r,rp)
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
          local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil)
          if g:GetCount()>0 then
          Duel.SendtoHand(g,nil,REASON_EFFECT)
          Duel.ConfirmCards(1-tp,g)
          end
          end
          function s.destg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return true end
          local g=Duel.GetMatchingGroup(nil,tp,LOCATION_MZONE,0,nil)
          Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
          end
          function s.desop(e,tp,eg,ep,ev,re,r,rp)
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
          local g=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_MZONE,0,1,1,nil)
          if #g>0 then
          Duel.HintSelection(g)
          Duel.Destroy(g,REASON_EFFECT)
          end
          local e1=Effect.CreateEffect(e:GetHandler())
          e1:SetType(EFFECT_TYPE_FIELD)
          e1:SetCode(EFFECT_UPDATE_ATTACK)
          e1:SetTargetRange(LOCATION_MZONE,0)
          e1:SetTarget(s.atktg)
          e1:SetValue(800)
          e1:SetReset(RESET_PHASE+PHASE_END)
          Duel.RegisterEffect(e1,tp)
          end
          function s.atktg(e,c)
          return c:IsType(TYPE_SYNCHRO)
          end
          script/c84343351.lua 0 → 100644
          View file @ 30815ad0
          --クリスタルクリアウィング・オーバー・シンクロ・ドラゴン
          local s,id,o=GetID()
          function s.initial_effect(c)
          c:EnableReviveLimit()
          --material
          aux.AddSynchroMixProcedure(c,aux.FilterBoolFunction(Card.IsCode,82044279),nil,nil,aux.Tuner(nil),1,99,s.syncheck)
          --double tuner check
          local e0=Effect.CreateEffect(c)
          e0:SetType(EFFECT_TYPE_SINGLE)
          e0:SetCode(EFFECT_MATERIAL_CHECK)
          e0:SetValue(s.valcheck)
          c:RegisterEffect(e0)
          --cannot special summon
          local e1=Effect.CreateEffect(c)
          e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
          e1:SetType(EFFECT_TYPE_SINGLE)
          e1:SetCode(EFFECT_SPSUMMON_CONDITION)
          e1:SetValue(aux.synlimit)
          c:RegisterEffect(e1)
          --negate
          local e2=Effect.CreateEffect(c)
          e2:SetDescription(aux.Stringid(id,0))
          e2:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
          e2:SetType(EFFECT_TYPE_QUICK_O)
          e2:SetCode(EVENT_CHAINING)
          e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
          e2:SetRange(LOCATION_MZONE)
          e2:SetCountLimit(1)
          e2:SetCondition(s.negcon)
          e2:SetTarget(s.negtg)
          e2:SetOperation(s.negop)
          c:RegisterEffect(e2)
          --special summon
          local e3=Effect.CreateEffect(c)
          e3:SetDescription(aux.Stringid(id,1))
          e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
          e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
          e3:SetCode(EVENT_LEAVE_FIELD)
          e3:SetProperty(EFFECT_FLAG_DELAY)
          e3:SetCondition(s.spcon)
          e3:SetTarget(s.sptg)
          e3:SetOperation(s.spop)
          c:RegisterEffect(e3)
          end
          function s.valcheck(e,c)
          local g=c:GetMaterial()
          if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
          local e1=Effect.CreateEffect(c)
          e1:SetType(EFFECT_TYPE_SINGLE)
          e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
          e1:SetCode(21142671)
          e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
          c:RegisterEffect(e1)
          end
          end
          function s.mgcheck(c,mg)
          local rg=mg-c
          if c:IsCode(82044279) then
          return (rg:IsExists(Card.IsType,1,nil,TYPE_SYNCHRO) or #rg>=2) and not rg:IsExists(s.chkfilter,1,nil)
          else
          return false
          end
          end
          function s.chkfilter(c)
          return not c:IsTuner(c)
          end
          function s.syncheck(g)
          return g:IsExists(s.mgcheck,1,nil,g)
          end
          function s.negcon(e,tp,eg,ep,ev,re,r,rp)
          return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev)
          end
          function s.negtg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return true end
          Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
          if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
          Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
          end
          end
          function s.negop(e,tp,eg,ep,ev,re,r,rp)
          local c=e:GetHandler()
          local rc=re:GetHandler()
          if Duel.NegateActivation(ev) and rc:IsRelateToEffect(re) and Duel.Destroy(rc,REASON_EFFECT)~=0 and rc:GetBaseAttack()>=0
          and not rc:IsPreviousLocation(LOCATION_SZONE) and (rc:IsPreviousLocation(LOCATION_MZONE) or rc:GetOriginalType()&TYPE_MONSTER~=0)
          and c:IsRelateToEffect(e) and c:IsFaceup() then
          local e1=Effect.CreateEffect(c)
          e1:SetType(EFFECT_TYPE_SINGLE)
          e1:SetCode(EFFECT_UPDATE_ATTACK)
          e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END)
          e1:SetValue(rc:GetBaseAttack())
          c:RegisterEffect(e1)
          end
          end
          function s.spcon(e,tp,eg,ep,ev,re,r,rp)
          local c=e:GetHandler()
          return c:IsSummonType(SUMMON_TYPE_SYNCHRO) and c:IsPreviousLocation(LOCATION_MZONE)
          and c:IsPreviousPosition(POS_FACEUP) and c:IsPreviousControler(tp) and c:GetReasonPlayer()==1-tp
          end
          function s.spfilter(c,e,tp)
          return c:IsSetCard(0xff) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
          and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
          end
          function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
          end
          function s.spop(e,tp,eg,ep,ev,re,r,rp)
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
          local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
          if #g>0 then
          Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
          end
          end
          script/c89604813.lua 0 → 100644
          View file @ 30815ad0
          --青眼の究極霊竜
          local s,id,o=GetID()
          function s.initial_effect(c)
          --synchro summon
          aux.AddSynchroMixProcedure(c,aux.NonTuner(Card.IsSetCard,0xdd),nil,nil,aux.Tuner(nil),2,99)
          c:EnableReviveLimit()
          --cannot remove
          local e1=Effect.CreateEffect(c)
          e1:SetType(EFFECT_TYPE_FIELD)
          e1:SetCode(EFFECT_CANNOT_REMOVE)
          e1:SetRange(LOCATION_MZONE)
          e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
          e1:SetTargetRange(1,1)
          e1:SetTarget(s.rmlimit)
          c:RegisterEffect(e1)
          --negate & atk up
          local e2=Effect.CreateEffect(c)
          e2:SetDescription(aux.Stringid(id,1))
          e2:SetCategory(CATEGORY_NEGATE+CATEGORY_ATKCHANGE)
          e2:SetType(EFFECT_TYPE_QUICK_O)
          e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
          e2:SetCode(EVENT_CHAINING)
          e2:SetCountLimit(1,id)
          e2:SetRange(LOCATION_MZONE)
          e2:SetCondition(s.negcon)
          e2:SetTarget(s.negtg)
          e2:SetOperation(s.negop)
          c:RegisterEffect(e2)
          --Special Summon
          local e3=Effect.CreateEffect(c)
          e3:SetDescription(aux.Stringid(id,2))
          e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
          e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
          e3:SetProperty(EFFECT_FLAG_DELAY)
          e3:SetCode(EVENT_DESTROYED)
          e3:SetCountLimit(1,id+o)
          e3:SetCondition(s.spcon)
          e3:SetTarget(s.sptg)
          e3:SetOperation(s.spop)
          c:RegisterEffect(e3)
          --double tuner
          local e4=Effect.CreateEffect(c)
          e4:SetType(EFFECT_TYPE_SINGLE)
          e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
          e4:SetCode(21142671)
          c:RegisterEffect(e4)
          end
          function s.rmlimit(e,c,rp,r,re)
          local tp=e:GetHandlerPlayer()
          return c:IsControler(tp) and c:IsLocation(LOCATION_GRAVE) and re:GetOwnerPlayer()~=tp
          end
          function s.negcon(e,tp,eg,ep,ev,re,r,rp)
          local loc=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION)
          return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED)
          and loc&LOCATION_ONFIELD~=0
          and Duel.IsChainNegatable(ev)
          end
          function s.negtg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return true end
          Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
          end
          function s.negop(e,tp,eg,ep,ev,re,r,rp)
          local c=e:GetHandler()
          if Duel.NegateActivation(ev) and c:IsRelateToEffect(e) and c:IsFaceup() then
          local e1=Effect.CreateEffect(c)
          e1:SetType(EFFECT_TYPE_SINGLE)
          e1:SetCode(EFFECT_UPDATE_ATTACK)
          e1:SetValue(1000)
          e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
          e1:SetRange(LOCATION_MZONE)
          e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END)
          c:RegisterEffect(e1)
          end
          end
          function s.spcon(e,tp,eg,ep,ev,re,r,rp)
          return bit.band(r,REASON_EFFECT+REASON_BATTLE)~=0
          end
          function s.spfilter(c,e,tp)
          return not c:IsCode(id) and c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_LIGHT)
          and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
          end
          function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
          and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
          end
          function s.spop(e,tp,eg,ep,ev,re,r,rp)
          if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
          local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.spfilter),tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
          if g:GetCount()>0 then
          Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
          end
          end
          script/c90465153.lua 0 → 100644
          View file @ 30815ad0
          --マナドゥム・プライムハート
          local s,id,o=GetID()
          function s.initial_effect(c)
          aux.AddCodeList(c,56099748)
          --synchro summon
          aux.AddSynchroMixProcedure(c,aux.FilterBoolFunction(Card.IsAttribute,ATTRIBUTE_LIGHT),nil,nil,aux.Tuner(nil),1,99)
          c:EnableReviveLimit()
          --mat check
          local e1=Effect.CreateEffect(c)
          e1:SetType(EFFECT_TYPE_SINGLE)
          e1:SetCode(EFFECT_MATERIAL_CHECK)
          e1:SetValue(s.matcheck)
          c:RegisterEffect(e1)
          --synchro summon success
          local e2=Effect.CreateEffect(c)
          e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
          e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
          e2:SetCode(EVENT_SPSUMMON_SUCCESS)
          e2:SetCondition(s.regcon)
          e2:SetOperation(s.regop)
          e2:SetLabelObject(e1)
          c:RegisterEffect(e2)
          --special summon
          local e3=Effect.CreateEffect(c)
          e3:SetDescription(aux.Stringid(id,1))
          e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
          e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
          e3:SetProperty(EFFECT_FLAG_DELAY)
          e3:SetCode(EVENT_LEAVE_FIELD)
          e3:SetCondition(s.spcon)
          e3:SetTarget(s.sptg)
          e3:SetOperation(s.spop)
          c:RegisterEffect(e3)
          end
          function s.matcheck(e,c)
          local c=e:GetHandler()
          local g=c:GetMaterial()
          local ct=g:FilterCount(Card.IsType,nil,TYPE_TUNER)
          local check=0
          if g:IsExists(s.filter,1,nil) then
          check=1
          end
          e:SetLabel(ct,check)
          if ct>1 then
          local e1=Effect.CreateEffect(c)
          e1:SetType(EFFECT_TYPE_SINGLE)
          e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
          e1:SetCode(21142671)
          e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
          c:RegisterEffect(e1)
          end
          end
          function s.filter(c)
          return c:IsType(TYPE_TUNER) and c:IsSetCard(0x190)
          end
          function s.regcon(e,tp,eg,ep,ev,re,r,rp)
          return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
          end
          function s.regop(e,tp,eg,ep,ev,re,r,rp)
          local c=e:GetHandler()
          local ct,check=e:GetLabelObject():GetLabel()
          if ct>1 then
          --multi attack
          local e1=Effect.CreateEffect(c)
          e1:SetType(EFFECT_TYPE_SINGLE)
          e1:SetCode(EFFECT_EXTRA_ATTACK)
          e1:SetReset(RESET_EVENT+RESETS_STANDARD)
          e1:SetValue(ct-1)
          c:RegisterEffect(e1)
          end
          if check>0 then
          --cannot target
          local e2=Effect.CreateEffect(c)
          e2:SetDescription(aux.Stringid(id,0))
          e2:SetType(EFFECT_TYPE_SINGLE)
          e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CLIENT_HINT)
          e2:SetRange(LOCATION_MZONE)
          e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
          e2:SetReset(RESET_EVENT+RESETS_STANDARD)
          e2:SetValue(aux.tgoval)
          c:RegisterEffect(e2)
          end
          end
          function s.spcon(e,tp,eg,ep,ev,re,r,rp)
          local c=e:GetHandler()
          return c:IsPreviousPosition(POS_FACEUP) and c:IsSummonType(SUMMON_TYPE_SYNCHRO) and c:IsPreviousLocation(LOCATION_MZONE)
          and c:IsPreviousControler(tp) and c:GetReasonPlayer()==1-tp
          end
          function s.spfilter(c,e,tp)
          local b1=c:IsCode(56099748)
          local b2=c:IsAttack(1500) and c:IsDefense(2100)
          return c:IsFaceupEx() and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and (b1 or b2)
          end
          function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
          and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
          end
          function s.spop(e,tp,eg,ep,ev,re,r,rp)
          if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
          local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.spfilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp)
          if #g>0 then
          Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
          end
          end
          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