Skip to content

Y
ygopro-222DIY-cards
Commit 2fd9e2d3 authored by TanakaKotoha's avatar TanakaKotoha
Browse files
Options

fix

parent 771088d4
Pipeline #485 passed with stages
      in 43 minutes and 9 seconds
      Expand all Show whitespace changes
      Inline Side-by-side
      Showing with 1607 additions and 2881 deletions
      expansions/222DIY.cdb
      View file @ 2fd9e2d3
      No preview for this file type
      expansions/script/c11200034.lua
      View file @ 2fd9e2d3
      --赤口的土著神 --赤口的土著神
      local m=11200030 local m=11200034
      local cm=_G["c"..m] local cm=_G["c"..m]
      function cm.initial_effect(c) function cm.initial_effect(c)
      aux.AddCodeList(c,11200029) aux.AddCodeList(c,11200029)
      ......
      expansions/script/c16104200.lua
      View file @ 2fd9e2d3
      --教团的普通骑士 --教团的普通骑士.
      local m=16104200 if not pcall(function() require("expansions/script/c16199990") end) then require("script/c16199990") end
      local cm=_G["c"..m] local m,cm=rscf.DefineCard(16104200,"CHURCH_KNIGHT")
      c16104200.rksetcode="CHURCH_KNIGHT" if rsch then return end
      function cm.initial_effect(c) rsch=cm
      --double tribute rscf.DefineSet(rsch,"CHURCH",1)
      rscf.DefineSet(rsch,"CHURCH_KNIGHT",2)
      function rsch.GainEffect(c,code)
      local e1=rsef.STO(c,EVENT_BATTLE_DESTROYING,{m,1},1,nil,EFFECT_FLAG_NO_TURN_RESET,cm.gecon,nil,nil,cm.geop)
      e1:SetLabel(code)
      return e1
      end
      function cm.gecon(e,tp,eg)
      local c=e:GetHandler()
      local bc=c:GetBattleTarget()
      return bc:GetPreviousRaceOnField() & RACE_WARRIOR == 0
      end
      function cm.geop(e,tp)
      local c=rscf.GetFaceUpSelf(e)
      if not c then return end
      c:RegisterFlagEffect(e:GetLabel(),rsreset.est,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,1))
      end
      function rsch.gaincon(code)
      return function(e)
      return e:GetHandler():GetFlagEffect(code)>0 or e:GetHandler():GetFlagEffect(code+100)>0
      end
      end
      function rsch.SummonEffect(c,code,op)
      local e1=rsef.SC(c,EVENT_SUMMON_SUCCESS)
      e1:RegisterSolve(cm.secon,nil,nil,cm.seop(code,op))
      return e1
      end
      function cm.secfilter(c)
      return c:IsRace(RACE_WARRIOR) or c:IsType(TYPE_SPELL+TYPE_TRAP)
      end
      function cm.secon(e,tp)
      local c=e:GetHandler()
      local mat=c:GetMaterial()
      local b1=c:IsSummonType(SUMMON_TYPE_ADVANCE) and mat:IsExists(cm.secfilter,1,nil)
      local b2=not mat or #mat==0
      return b1 or b2
      end
      function cm.seop(code,op)
      return function(e,...)
      rshint.Card(code)
      op(e,...)
      end
      end
      function rsch.SummonEffect2(c,code,cate,flag,tg,op)
      local e1=rsef.STO(c,EVENT_SUMMON_SUCCESS,{code,0},nil,cate,flag,cm.secon,nil,tg,op)
      return e1
      end
      function rsch.LimitFun(c,code)
      Duel.AddCustomActivityCounter(code,ACTIVITY_SPSUMMON,cm.lfct1)
      Duel.AddCustomActivityCounter(code,ACTIVITY_SUMMON,cm.lfct2)
      end
      function rsch.limitcost(code,cost2)
      return function(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetCustomActivityCount(code,tp,ACTIVITY_SPSUMMON)==0 and Duel.GetCustomActivityCount(code,tp,ACTIVITY_SUMMON)==0 and (not cost2 or cost2(e,tp,eg,ep,ev,re,r,rp,0)) end
      e1,e2=rsef.FV_LIMIT_PLAYER({e:GetHandler(),tp},"sum,sp",nil,cm.sltg,{1,0},nil,rsreset.pend)
      if cost2 then
      cost2(e,tp,eg,ep,ev,re,r,rp,1)
      end
      end
      end
      function cm.lfct1(c)
      return c:IsRace(RACE_WARRIOR)
      end
      function cm.lfct2(c)
      return c:GetSummonLocation()~=LOCATION_EXTRA
      end
      function cm.sltg(e,c)
      if c:IsLocation(LOCATION_EXTRA) then return true end
      return not c:IsRace(RACE_WARRIOR)
      end
      function rsch.BetrayFun(c,code,code_sum)
      aux.AddCodeList(c,code_sum)
      c:SetUniqueOnField(1,1,code)
      local e1=rscf.SetSummonCondition(c,false,aux.FALSE)
      local e2=rscf.SetSpecialSummonProduce(c,LOCATION_HAND,cm.bfcon,cm.bfop)
      e2:SetLabel(code_sum)
      return e1,e2
      end
      function cm.bfcon(e,c,tp)
      return Duel.CheckReleaseGroup(tp,cm.bfcfilter,1,nil,tp,e:GetLabel())
      end
      function cm.bfcfilter(c,tp,code)
      return c:IsCode(code) and Duel.GetMZoneCount(tp,c,tp)>0
      end
      function cm.bfop(e,tp)
      local rg=Duel.SelectReleaseGroup(tp,cm.bfcfilter,1,1,nil,tp,e:GetLabel())
      Duel.Release(rg,REASON_COST)
      end
      function rsch.DoubleTriFun(c,tc,reset,filter)
      tc = tc or c
      local tg = aux.TargetBoolFunction(rsch.IsSet1)
      if filter then tg = aux.TargetBoolFunction(filter) end
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_DOUBLE_TRIBUTE) e1:SetCode(EFFECT_DOUBLE_TRIBUTE)
      e1:SetValue(cm.condition) if reset then
      c:RegisterEffect(e1) e1:SetReset(reset)
      --to hand end
      local e2=Effect.CreateEffect(c) e1:SetValue(tg)
      e2:SetDescription(aux.Stringid(m,0)) tc:RegisterEffect(e1)
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON) return e1
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_SUMMON_SUCCESS)
      e2:SetProperty(EFFECT_FLAG_DELAY)
      e2:SetCountLimit(1,m)
      e2:SetTarget(cm.sptg)
      e2:SetOperation(cm.spop)
      c:RegisterEffect(e2)
      local e3=e2:Clone()
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e3)
      end end
      function cm.spfilter(c,e,tp) --------------------------------------
      return c:GetAttack()<=900 and c:GetLevel()<=3 and c:IsRace(RACE_WARRIOR) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP) function cm.initial_effect(c)
      local e1=rsef.STO(c,EVENT_SPSUMMON_SUCCESS,{m,0},{1,m},"sp","de,dsp",nil,nil,rsop.target(cm.spfilter,"sp",LOCATION_DECK),cm.spop)
      local e3=rsef.RegisterClone(c,e1,"code",EVENT_SUMMON_SUCCESS)
      local e4=rsch.DoubleTriFun(c)
      end end
      function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.spfilter(c,e,tp)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 return c:IsRace(RACE_WARRIOR) and c:IsAttackBelow(899) and c:IsLevelBelow(3) and rscf.spfilter2()(c,e,tp)
      and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
      end end
      function cm.spop(e,tp) function cm.spop(e,tp)
      local c=e:GetHandler() local c=e:GetHandler()
      if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then rsop.SelectSpecialSummon(tp,cm.spfilter,tp,LOCATION_DECK,0,1,1,nil,{},e,tp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) local e1,e2=rsef.FV_LIMIT_PLAYER({c,tp},"sum,sp",nil,cm.tg,{1,0},nil,rsreset.pend)
      local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) end
      if g:GetCount()>0 then function cm.tg(e,c)
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) if c:IsCode(16104222) then return false end
      end if c:IsLocation(LOCATION_EXTRA) then return true end
      end return not (rsch.IsSet1(c) or c:IsSetCard(0xccb))
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      e1:SetReset(RESET_PHASE+PHASE_END)
      e1:SetTargetRange(1,0)
      e1:SetTarget(cm.splimit)
      Duel.RegisterEffect(e1,tp)
      local e2=Effect.CreateEffect(e:GetHandler())
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e2:SetCode(EFFECT_CANNOT_SUMMON)
      e2:SetReset(RESET_PHASE+PHASE_END)
      e2:SetTargetRange(1,0)
      e2:SetTarget(cm.splimit)
      Duel.RegisterEffect(e1,tp)
      end
      function cm.condition(e,c)
      return (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH")
      end
      function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
      return c:IsLocation(LOCATION_EXTRA) or not (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH" or c:IsSetCard(0xccb) or c:IsCode(16104222))
      end end
      \ No newline at end of file
      expansions/script/c16104202.lua
      View file @ 2fd9e2d3
      This diff is collapsed.
      expansions/script/c16104204.lua
      View file @ 2fd9e2d3
      --教团的银骑士 莱特哈尔 --教团的银骑士 莱特哈尔
      local m=16104204 if not pcall(function() require("expansions/script/c16104200") end) then require("script/c16104200") end
      local cm=_G["c"..m] local m,cm=rscf.DefineCard(16104204,"CHURCH_KNIGHT")
      c16104204.rksetcode="CHURCH_KNIGHT"
      function cm.initial_effect(c) function cm.initial_effect(c)
      c:SetUniqueOnField(1,1,m) c:SetUniqueOnField(1,1,m)
      --summon success local e1=rsch.SummonEffect(c,m,cm.op)
      local e1=Effect.CreateEffect(c) local e2=rsch.GainEffect(c,m)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) local e3=rsef.SC(c,EVENT_BATTLE_START)
      e1:SetCode(EVENT_SUMMON_SUCCESS) e3:RegisterSolve(rsch.gaincon(m),nil,nil,cm.desop)
      e1:SetOperation(cm.sumsuc)
      c:RegisterEffect(e1)
      local e1_1=Effect.CreateEffect(c)
      e1_1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e1_1:SetCode(EVENT_SPSUMMON_SUCCESS)
      e1_1:SetOperation(cm.sumsuc1)
      c:RegisterEffect(e1_1)
      --a d A
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(m,2))
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_BATTLE_DESTROYED)
      e2:SetProperty(EFFECT_FLAG_NO_TURN_RESET)
      e2:SetCountLimit(1)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCondition(cm.gacon)
      e2:SetTarget(cm.gatg)
      e2:SetOperation(cm.gaop)
      c:RegisterEffect(e2)
      --summon with 1 tribute
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(m,3))
      e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e4:SetType(EFFECT_TYPE_SINGLE)
      e4:SetCode(EFFECT_SUMMON_PROC)
      e4:SetCondition(cm.otcon)
      e4:SetOperation(cm.otop)
      e4:SetValue(SUMMON_TYPE_ADVANCE)
      c:RegisterEffect(e4)
      local e5=e4:Clone()
      e5:SetCode(EFFECT_SET_PROC)
      c:RegisterEffect(e5)
      --summon with s/t
      local e6=Effect.CreateEffect(c)
      e6:SetType(EFFECT_TYPE_SINGLE)
      e6:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e6:SetCode(EFFECT_ADD_EXTRA_TRIBUTE)
      e6:SetTargetRange(LOCATION_SZONE,0)
      e6:SetCondition(cm.otcon1)
      e6:SetTarget(cm.reltarget)
      e6:SetValue(POS_FACEUP_ATTACK)
      c:RegisterEffect(e6)
      end end
      function cm.otcon1(e) function cm.op(e,tp)
      return Duel.IsEnvironment(16104206,e:GetOwnerPlayer(),LOCATION_FZONE)
      end
      function cm.reltarget(e,c)
      return c:IsFaceup() and (c:IsType(TYPE_CONTINUOUS) or c:IsType(TYPE_EQUIP))
      end
      function cm.otfilter(c)
      return c:IsSummonType(SUMMON_TYPE_ADVANCE)
      end
      function cm.otcon(e,c,minc)
      if c==nil then return Duel.IsExistingMatchingCard(cm.otfilter,0,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      local mg=Duel.GetMatchingGroup(cm.otfilter,0,LOCATION_MZONE,LOCATION_MZONE,nil)
      return c:IsLevelAbove(7) and minc<=1 and Duel.CheckTribute(c,1,1,mg) and Duel.IsEnvironment(16104206,e:GetOwnerPlayer(),LOCATION_FZONE)
      end
      function cm.otop(e,tp,eg,ep,ev,re,r,rp,c)
      local sg=Duel.SelectMatchingCard(tp,cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      c:SetMaterial(sg)
      Duel.Release(sg,REASON_SUMMON+REASON_MATERIAL)
      end
      function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler() local c=e:GetHandler()
      if c:GetMaterial():IsExists(cm.adfilter,1,nil) or not c:IsSummonType(SUMMON_TYPE_ADVANCE) then rsef.SV_IMMUNE_EFFECT(c,cm.imval,nil,rsreset.est_pend)
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_SINGLE)
      e4:SetCode(EFFECT_IMMUNE_EFFECT)
      e4:SetValue(cm.val)
      e4:SetOwnerPlayer(tp)
      e4:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      c:RegisterEffect(e4)
      end
      if e:GetHandler():GetFlagEffect(16104206)~=0 then
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,2))
      e1:SetCategory(CATEGORY_DESTROY)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_BATTLE_START)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      e1:SetTarget(cm.destg)
      e1:SetOperation(cm.desop)
      c:RegisterEffect(e1)
      end
      end end
      function cm.sumsuc1(e,tp,eg,ep,ev,re,r,rp) function cm.imval(e,re)
      local c=e:GetHandler()
      if e:GetHandler():GetFlagEffect(16104220)~=0 then
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,2))
      e1:SetCategory(CATEGORY_DESTROY)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_BATTLE_START)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      e1:SetTarget(cm.destg)
      e1:SetOperation(cm.desop)
      c:RegisterEffect(e1)
      end
      end
      function cm.adfilter(c)
      return c:IsRace(RACE_WARRIOR) or c:IsType(TYPE_SPELL) or c:IsType(TYPE_TRAP)
      end
      function cm.val(e,re,tp)
      return not re:GetHandler():IsRace(RACE_WARRIOR) return not re:GetHandler():IsRace(RACE_WARRIOR)
      end end
      function cm.gacon(e,tp,eg,ep,ev,re,r,rp) function cm.desop(e,tp)
      local des=eg:GetFirst()
      local rc=des:GetReasonCard()
      return (not des:IsRace(RACE_WARRIOR)) and rc:IsRelateToBattle() and rc==e:GetHandler()
      end
      function cm.gatg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      end
      function cm.gaop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler() local c=e:GetHandler()
      if c:IsRelateToEffect(e) then local bc=c:GetBattleTarget()
      local e1=Effect.CreateEffect(c) if bc:IsFacedown() or not bc:IsRace(RACE_WARRIOR) then
      e1:SetDescription(aux.Stringid(m,2)) rshint.Card(m)
      e1:SetCategory(CATEGORY_DESTROY) if Duel.Destroy(bc,REASON_EFFECT)>0 then
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) local atk = bc:GetBaseAttack()
      e1:SetCode(EVENT_BATTLE_START) if atk > 0 then
      e1:SetReset(RESET_EVENT+RESETS_STANDARD) Duel.Damage(1-tp,atk,REASON_EFFECT)
      e1:SetTarget(cm.destg)
      e1:SetOperation(cm.desop)
      c:RegisterEffect(e1)
      local e3=Effect.CreateEffect(e:GetHandler())
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetDescription(aux.Stringid(m,1))
      e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CLIENT_HINT)
      e3:SetRange(LOCATION_MZONE)
      e3:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e3,true)
      end end
      end
      function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      local tc=Duel.GetAttacker()
      if tc==c then tc=Duel.GetAttackTarget() end
      if chk==0 then return tc and tc:IsFaceup() and not tc:IsRace(RACE_WARRIOR) end
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,tc,1,0,0)
      if e:IsHasType(EFFECT_TYPE_TRIGGER_O) then
      Duel.SetChainLimit(aux.FALSE)
      end end
      end
      function cm.desop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tc=Duel.GetAttacker()
      if tc==c then tc=Duel.GetAttackTarget() end
      if tc:IsRelateToBattle() then if Duel.Destroy(tc,REASON_EFFECT)~=0 then
      local LP1=Duel.GetLP(1-tp)
      if tc:GetTextAttack()>LP1 then Duel.SetLP(1-tp,0) end
      Duel.SetLP(1-tp,LP1-tc:GetTextAttack()) end
      end end
      end end
      \ No newline at end of file
      expansions/script/c16104206.lua
      View file @ 2fd9e2d3
      --不灭的圣光教团国 --不灭的圣光教团国
      local m=16104206 if not pcall(function() require("expansions/script/c16104200") end) then require("script/c16104200") end
      local cm=_G["c"..m] local m,cm=rscf.DefineCard(16104206,"CHURCH")
      c16104206.rksetcode="CHURCH"
      function cm.initial_effect(c) function cm.initial_effect(c)
      --Activate local e1=rsef.ACT(c)
      local e0=Effect.CreateEffect(c) local e2,e3,e4=rsef.FV_CANNOT_DISABLE(c,"sum,sp,fp",nil,aux.TargetBoolFunction(rsch.IsSet1),{LOCATION_MZONE,0})
      e0:SetType(EFFECT_TYPE_ACTIVATE) local e11=rsef.QO(c,nil,{m,1},1,"sum",nil,LOCATION_FZONE,nil,nil,rsop.target(cm.sumfilter,"sum",LOCATION_HAND),cm.sumop)
      e0:SetCode(EVENT_FREE_CHAIN) local e5=Effect.CreateEffect(c)
      c:RegisterEffect(e0) e5:SetDescription(aux.Stringid(m,0))
      --cannot Disable Sum e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      local e3=Effect.CreateEffect(c) e5:SetType(EFFECT_TYPE_SINGLE)
      e3:SetType(EFFECT_TYPE_FIELD) e5:SetCode(EFFECT_SUMMON_PROC)
      e3:SetCode(EFFECT_CANNOT_DISABLE_SUMMON) e5:SetCondition(cm.advcon)
      e3:SetRange(LOCATION_FZONE) e5:SetOperation(cm.advop)
      e3:SetProperty(EFFECT_FLAG_IGNORE_RANGE+EFFECT_FLAG_SET_AVAILABLE) e5:SetValue(SUMMON_TYPE_ADVANCE)
      e3:SetTarget(aux.TargetBoolFunction(Card.ischurch)) local e6=Effect.CreateEffect(c)
      c:RegisterEffect(e3) e6:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
      local e2=Effect.CreateEffect(c) e6:SetRange(LOCATION_FZONE)
      e2:SetType(EFFECT_TYPE_FIELD) e6:SetTargetRange(LOCATION_HAND,0)
      e2:SetCode(EFFECT_CANNOT_DISABLE_SPSUMMON) e6:SetTarget(cm.advtg)
      e2:SetRange(LOCATION_FZONE) e6:SetLabelObject(e5)
      e2:SetProperty(EFFECT_FLAG_IGNORE_RANGE+EFFECT_FLAG_SET_AVAILABLE) c:RegisterEffect(e6)
      e2:SetTarget(aux.TargetBoolFunction(Card.ischurch)) local e7=Effect.CreateEffect(c)
      c:RegisterEffect(e2) e7:SetDescription(aux.Stringid(m,0))
      local e1=Effect.CreateEffect(c) e7:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetType(EFFECT_TYPE_FIELD) e7:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_CANNOT_DISABLE_FLIP_SUMMON) e7:SetCode(EFFECT_SET_PROC)
      e1:SetRange(LOCATION_FZONE) e7:SetCondition(cm.advcon)
      e1:SetProperty(EFFECT_FLAG_IGNORE_RANGE+EFFECT_FLAG_SET_AVAILABLE) e7:SetOperation(cm.advop)
      e1:SetTarget(aux.TargetBoolFunction(Card.ischurch)) e7:SetValue(SUMMON_TYPE_ADVANCE)
      c:RegisterEffect(e1) local e8=Effect.CreateEffect(c)
      --Summon e8:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
      local e4=Effect.CreateEffect(c) e8:SetRange(LOCATION_FZONE)
      e4:SetDescription(aux.Stringid(m,2)) e8:SetTargetRange(LOCATION_HAND,0)
      e4:SetCategory(CATEGORY_SUMMON) e8:SetTarget(cm.advtg)
      e4:SetType(EFFECT_TYPE_QUICK_O) e8:SetLabelObject(e7)
      e4:SetCode(EVENT_FREE_CHAIN) c:RegisterEffect(e8)
      e4:SetRange(LOCATION_FZONE) local e9=Effect.CreateEffect(c)
      e4:SetCountLimit(1) e9:SetType(EFFECT_TYPE_SINGLE)
      e4:SetTarget(cm.sumtg) e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e4:SetOperation(cm.sumop) e9:SetCode(EFFECT_ADD_EXTRA_TRIBUTE)
      c:RegisterEffect(e4) e9:SetTargetRange(LOCATION_SZONE,0)
      Duel.RegisterFlagEffect(tp,m,RESET_EVENT+RESETS_STANDARD,0,0) e9:SetTarget(aux.TargetBoolFunction(Card.IsType,TYPE_CONTINUOUS+TYPE_EQUIP))
      e9:SetValue(POS_FACEUP_ATTACK)
      e9:SetCondition(cm.excon)
      local e10=Effect.CreateEffect(c)
      e10:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
      e10:SetRange(LOCATION_FZONE)
      e10:SetTargetRange(LOCATION_HAND,0)
      e10:SetTarget(cm.advtg)
      e10:SetLabelObject(e9)
      c:RegisterEffect(e10)
      end end
      function cm.filter(c) function cm.excon(e)
      return (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH") and c:IsSummonable(true,nil) return not cm.check_s
      end end
      function Card.ischurch(c) function cm.advtg(e,c)
      return (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH") return rsch.IsSet2(c) and c:IsLevelAbove(7)
      end end
      function cm.sumtg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.otfilter(c)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_HAND,0,1,nil) end return c:IsSummonType(SUMMON_TYPE_ADVANCE)
      Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
      end end
      function cm.sumop(e,tp,eg,ep,ev,re,r,rp) function cm.advcon(e,c,minc)
      if c==nil then return true end
      local tp=c:GetControler()
      local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,0,nil)
      cm.check_s = true
      local res = c:IsLevelAbove(7) and minc<=1 and Duel.CheckTribute(c,1,1,mg)
      cm.check_s = false
      return res
      end
      function cm.advop(e,tp,eg,ep,ev,re,r,rp,c)
      cm.check_s = true
      local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,0,nil)
      local sg=Duel.SelectTribute(tp,c,1,1,mg)
      c:SetMaterial(sg)
      Duel.Release(sg,REASON_SUMMON+REASON_MATERIAL)
      cm.check_s = false
      end
      function cm.sumfilter(c,e,tp)
      return rsch.IsSet1(c) and c:IsSummonable(true,nil)
      end
      function cm.sumop(e,tp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
      local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_HAND,0,1,1,nil) local tc=Duel.SelectMatchingCard(tp,cm.sumfilter,tp,LOCATION_HAND,0,1,1,nil):GetFirst()
      if g:GetCount()<=0 then return end if tc then
      local sc=g:GetFirst() local code = tc:GetOriginalCodeRule()
      if sc.rksetcode=="CHURCH_KNIGHT" and sc:GetOriginalLevel()>=6 then tc:RegisterFlagEffect(code + 100,rsreset.est-RESET_TOFIELD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(16104200,2))
      sc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END,0,1)
      local e3=Effect.CreateEffect(e:GetHandler()) Duel.Summon(tp,tc,true,nil)
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetDescription(aux.Stringid(m,1))
      e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CLIENT_HINT)
      e3:SetRange(LOCATION_MZONE)
      e3:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD)
      sc:RegisterEffect(e3,true)
      end end
      Duel.Summon(tp,sc,true,nil)
      end end
      \ No newline at end of file
      expansions/script/c16104208.lua
      View file @ 2fd9e2d3
      --教团的苍骑士 IO --教团的苍骑士 IO
      local m=16104208 if not pcall(function() require("expansions/script/c16104200") end) then require("script/c16104200") end
      local cm=_G["c"..m] local m,cm=rscf.DefineCard(16104208,"CHURCH_KNIGHT")
      c16104208.rksetcode="CHURCH_KNIGHT"
      function cm.initial_effect(c) function cm.initial_effect(c)
      c:SetUniqueOnField(1,1,m) c:SetUniqueOnField(1,1,m)
      --summon success local e1=rsch.SummonEffect2(c,m,"tg",nil,rsop.target(cm.tgfilter,"tg",LOCATION_MZONE,LOCATION_MZONE,true),cm.op)
      local e1=Effect.CreateEffect(c) local e2=rsch.GainEffect(c,m)
      e1:SetDescription(aux.Stringid(m,0)) local e3=rsef.QO(c,nil,{m,1},1,"des","tg",LOCATION_MZONE,rsch.gaincon(m),nil,rstg.target2(cm.fun,cm.cfilter,nil,LOCATION_MZONE,LOCATION_MZONE),cm.desop)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetCondition(cm.sucon)
      e1:SetOperation(cm.sumsuc)
      c:RegisterEffect(e1)
      local e1_1=Effect.CreateEffect(c)
      e1_1:SetDescription(aux.Stringid(m,0))
      e1_1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e1_1:SetCode(EVENT_SPSUMMON_SUCCESS)
      e1_1:SetOperation(cm.sumsuc1)
      c:RegisterEffect(e1_1)
      --a d A
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(m,2))
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_BATTLE_DESTROYED)
      e2:SetProperty(EFFECT_FLAG_NO_TURN_RESET)
      e2:SetCountLimit(1)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCondition(cm.gacon)
      e2:SetTarget(cm.gatg)
      e2:SetOperation(cm.gaop)
      c:RegisterEffect(e2)
      --summon with 1 tribute
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(m,4))
      e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e4:SetType(EFFECT_TYPE_SINGLE)
      e4:SetCode(EFFECT_SUMMON_PROC)
      e4:SetCondition(cm.otcon)
      e4:SetOperation(cm.otop)
      e4:SetValue(SUMMON_TYPE_ADVANCE)
      c:RegisterEffect(e4)
      local e5=e4:Clone()
      e5:SetCode(EFFECT_SET_PROC)
      c:RegisterEffect(e5)
      --summon with s/t
      local e6=Effect.CreateEffect(c)
      e6:SetType(EFFECT_TYPE_SINGLE)
      e6:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e6:SetCode(EFFECT_ADD_EXTRA_TRIBUTE)
      e6:SetTargetRange(LOCATION_SZONE,0)
      e6:SetCondition(cm.otcon1)
      e6:SetTarget(cm.reltarget)
      e6:SetValue(POS_FACEUP_ATTACK)
      c:RegisterEffect(e6)
      end end
      function cm.otcon1(e) function cm.tgfilter(c)
      return Duel.IsEnvironment(16104206,e:GetOwnerPlayer(),LOCATION_FZONE) return c:IsAbleToGrave() and (c:IsFacedown() or not c:IsRace(RACE_WARRIOR))
      end end
      function cm.reltarget(e,c) function cm.op(e,tp)
      return c:IsFaceup() and (c:IsType(TYPE_CONTINUOUS) or c:IsType(TYPE_EQUIP)) local g=Duel.GetMatchingGroup(cm.tgfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
      Duel.SendtoGrave(g,REASON_EFFECT)
      end end
      function cm.otfilter(c) function cm.fun(g,e,tp)
      return c:IsSummonType(SUMMON_TYPE_ADVANCE) local tg=g:GetFirst():GetColumnGroup()
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,tg,#tg,0,0)
      end end
      function cm.otcon(e,c,minc) function cm.cfilter(c)
      if c==nil then return Duel.IsExistingMatchingCard(cm.otfilter,0,LOCATION_MZONE,LOCATION_MZONE,1,nil) end return c:IsFaceup() and c:IsRace(RACE_WARRIOR) and c:GetColumnGroupCount()>0
      local mg=Duel.GetMatchingGroup(cm.otfilter,0,LOCATION_MZONE,LOCATION_MZONE,nil)
      return c:IsLevelAbove(7) and minc<=1 and Duel.CheckTribute(c,1,1,mg) and Duel.IsEnvironment(16104206,e:GetOwnerPlayer(),LOCATION_FZONE)
      end end
      function cm.otop(e,tp,eg,ep,ev,re,r,rp,c) function cm.desop(e,tp)
      local sg=Duel.SelectMatchingCard(tp,cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil) local tc=rscf.GetTargetCard()
      c:SetMaterial(sg) if not tc then return end
      Duel.Release(sg,REASON_SUMMON+REASON_MATERIAL) local dg=tc:GetColumnGroup()
      end Duel.Destroy(dg,REASON_EFFECT)
      function cm.des(c)
      return not c:IsRace(RACE_WARRIOR)
      end
      function cm.sucon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():GetMaterial():IsExists(cm.adfilter,1,nil) or not e:GetHandler():GetMaterial():IsSummonType(SUMMON_TYPE_ADVANCE)
      end
      function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local g=Duel.GetMatchingGroup(cm.des,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
      Duel.Destroy(g,REASON_EFFECT)
      if e:GetHandler():GetFlagEffect(16104206)~=0 then
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,2))
      e1:SetType(EFFECT_TYPE_QUICK_O)
      e1:SetCategory(CATEGORY_DESTROY)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
      e1:SetTarget(cm.dstg)
      e1:SetOperation(cm.dsop)
      e1:SetCountLimit(1)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e1)
      end
      end
      function cm.sumsuc1(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if e:GetHandler():GetFlagEffect(16104220)~=0 then
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,2))
      e1:SetType(EFFECT_TYPE_QUICK_O)
      e1:SetCategory(CATEGORY_DESTROY)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
      e1:SetTarget(cm.dstg)
      e1:SetOperation(cm.dsop)
      e1:SetCountLimit(1)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e1)
      end
      end
      function cm.adfilter(c)
      return c:IsRace(RACE_WARRIOR) or c:IsType(TYPE_SPELL) or c:IsType(TYPE_TRAP)
      end
      function cm.gacon(e,tp,eg,ep,ev,re,r,rp)
      local des=eg:GetFirst()
      local rc=des:GetReasonCard()
      return (not des:IsRace(RACE_WARRIOR)) and rc:IsRelateToBattle() and rc==e:GetHandler()
      end
      function cm.gatg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      end
      function cm.gaop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) then
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,2))
      e1:SetType(EFFECT_TYPE_QUICK_O)
      e1:SetCategory(CATEGORY_DESTROY)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
      e1:SetTarget(cm.dstg)
      e1:SetOperation(cm.dsop)
      e1:SetCountLimit(1)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e1)
      local e3=Effect.CreateEffect(e:GetHandler())
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetDescription(aux.Stringid(m,1))
      e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CLIENT_HINT)
      e3:SetRange(LOCATION_MZONE)
      e3:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e3,true)
      end
      end
      function cm.filter1(c)
      return c:IsType(TYPE_MONSTER) and c:IsFaceup() and c:IsRace(RACE_WARRIOR)
      end
      function cm.desfilter(c,g)
      return g:IsContains(c)
      end
      function cm.dstg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and cm.filter1(chkc) end
      if chk==0 then return Duel.IsExistingTarget(cm.filter1,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELECT)
      Duel.SelectTarget(tp,cm.filter1,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,tp,LOCATION_MZONE)
      end
      function cm.dsop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local sc=Duel.GetFirstTarget()
      local cg=sc:GetColumnGroup()
      local g=Duel.GetMatchingGroup(cm.desfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,sc,cg)
      if sc:IsRelateToEffect(e) then
      Duel.Destroy(g,REASON_EFFECT)
      end
      end end
      \ No newline at end of file
      expansions/script/c16104210.lua
      View file @ 2fd9e2d3
      --教团的翼骑士 韦因 --教团的翼骑士 韦因
      local m=16104210 if not pcall(function() require("expansions/script/c16104200") end) then require("script/c16104200") end
      local cm=_G["c"..m] local m,cm=rscf.DefineCard(16104210,"CHURCH_KNIGHT")
      c16104210.rksetcode="CHURCH_KNIGHT"
      function cm.initial_effect(c) function cm.initial_effect(c)
      c:SetUniqueOnField(1,1,m) c:SetUniqueOnField(1,1,m)
      --hand rsch.LimitFun(c,m)
      local e1=Effect.CreateEffect(c) local e1=rsch.GainEffect(c,m)
      e1:SetDescription(aux.Stringid(m,3)) local e2=rsef.QO(c,nil,{m,0},nil,nil,nil,LOCATION_HAND,nil,rsch.limitcost(m,rscost.cost(Card.IsDiscardable,"dish")),rsop.target(cm.cfilter,nil,LOCATION_HAND,0,1,1,c),cm.sumop)
      e1:SetType(EFFECT_TYPE_QUICK_O) local e3=rsef.QO(c,nil,{m,1},nil,"dr,tg",nil,LOCATION_HAND,nil,rsch.limitcost(m,rscost.cost(0,"dish")),rsop.target(1,"dr"),cm.drop)
      e1:SetCode(EVENT_FREE_CHAIN) local e4=rsef.QO(c,nil,{m,2},1,"rm",nil,LOCATION_MZONE,rsch.gaincon(m),nil,rsop.target(Card.IsAbleToRemove,"rm",LOCATION_ONFIELD,LOCATION_ONFIELD),cm.rmop)
      e1:SetRange(LOCATION_HAND)
      e1:SetCost(cm.sprcost)
      e1:SetTarget(cm.sprtg)
      e1:SetOperation(cm.sprop)
      c:RegisterEffect(e1)
      --hand
      local e4=Effect.CreateEffect(c)
      e4:SetCategory(CATEGORY_DRAW)
      e4:SetDescription(aux.Stringid(m,5))
      e4:SetType(EFFECT_TYPE_IGNITION)
      e4:SetCode(EVENT_FREE_CHAIN)
      e4:SetRange(LOCATION_HAND)
      e4:SetCost(cm.sprcost)
      e4:SetTarget(cm.sprtg1)
      e4:SetOperation(cm.sprop1)
      c:RegisterEffect(e4)
      --a d A
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(m,2))
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_BATTLE_DESTROYED)
      e2:SetProperty(EFFECT_FLAG_NO_TURN_RESET)
      e2:SetCountLimit(1)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCondition(cm.gacon)
      e2:SetTarget(cm.gatg)
      e2:SetOperation(cm.gaop)
      c:RegisterEffect(e2)
      --summon success
      local e0=Effect.CreateEffect(c)
      e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e0:SetCode(EVENT_SUMMON_SUCCESS)
      e0:SetOperation(cm.sumsuc)
      c:RegisterEffect(e0)
      local e0_1=Effect.CreateEffect(c)
      e0_1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e0_1:SetCode(EVENT_SPSUMMON_SUCCESS)
      e0_1:SetOperation(cm.sumsuc1)
      c:RegisterEffect(e0_1)
      Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter1)
      Duel.AddCustomActivityCounter(m,ACTIVITY_SUMMON,cm.counterfilter)
      end end
      function cm.counterfilter(c) function cm.cfilter(c)
      return c:IsRace(RACE_WARRIOR) return rsch.IsSet1(c) and c:IsLevelAbove(5) and not c:IsPublic()
      end end
      function cm.counterfilter1(c) function cm.sumop(e,tp)
      return c:GetSummonLocation()~=LOCATION_EXTRA and c:IsRace(RACE_WARRIOR) rsop.SelectSolve(HINTMSG_SELF,tp,cm.cfilter,tp,LOCATION_HAND,0,1,1,nil,cm.solvefun,e,tp)
      end end
      function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp) function cm.solvefun(g,e,tp)
      local c=e:GetHandler() Duel.HintSelection(g)
      if e:GetHandler():GetFlagEffect(16104206)~=0 then local tc=g:GetFirst()
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,2))
      e1:SetType(EFFECT_TYPE_QUICK_O)
      e1:SetCategory(CATEGORY_REMOVE)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
      e1:SetTarget(cm.eqtg)
      e1:SetOperation(cm.eqop)
      e1:SetCountLimit(1)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e1)
      end
      end
      function cm.sumsuc1(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler() local c=e:GetHandler()
      if e:GetHandler():GetFlagEffect(16104220)~=0 then
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,2))
      e1:SetType(EFFECT_TYPE_QUICK_O)
      e1:SetCategory(CATEGORY_REMOVE)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
      e1:SetTarget(cm.eqtg)
      e1:SetOperation(cm.eqop)
      e1:SetCountLimit(1)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e1)
      end
      end
      function cm.filter(c)
      return (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH") and c:GetLevel()>=5
      end
      function cm.filter1(c)
      return c:IsAbleToGrave()
      end
      function cm.sprcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsDiscardable() and Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 and Duel.GetCustomActivityCount(m,tp,ACTIVITY_SUMMON)==0 end
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
      e1:SetTargetRange(1,0)
      e1:SetTarget(cm.splimit)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      local e2=e1:Clone()
      e2:SetCode(EFFECT_CANNOT_SUMMON)
      Duel.RegisterEffect(e2,tp)
      Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
      end
      function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
      return c:IsLocation(LOCATION_EXTRA) or not c:IsRace(RACE_WARRIOR)
      end
      function cm.sprtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then
      return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_HAND,0,1,e:GetHandler())
      end
      end
      function cm.sprop(e,tp,eg,ep,ev,re,r,rp)
      if not Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_HAND,0,1,e:GetHandler()) then return end
      Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,4))
      local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_HAND,0,1,1,nil)
      local tc=g:GetFirst()
      if tc then
      Duel.ConfirmCards(1-tp,tc)
      Duel.ShuffleHand(tp)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetDescription(aux.Stringid(m,0))
      e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SUMMON_PROC) e1:SetCode(EFFECT_PUBLIC)
      e1:SetCondition(cm.ntcon) e1:SetReset(rsreset.pend)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      tc:RegisterEffect(e1) tc:RegisterEffect(e1)
      end local e2=Effect.CreateEffect(c)
      end e2:SetDescription(aux.Stringid(m,0))
      function cm.sprtg1(e,tp,eg,ep,ev,re,r,rp,chk) e2:SetType(EFFECT_TYPE_SINGLE)
      if chk==0 then e2:SetCode(EFFECT_SUMMON_PROC)
      return Duel.IsPlayerCanDraw(tp,2) e2:SetReset(rsreset.pend)
      end e2:SetCondition(cm.ntcon)
      Duel.SetTargetPlayer(tp) tc:RegisterEffect(e2)
      Duel.SetTargetParam(2) return true
      Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,2)
      end
      function cm.filter2(c)
      return c:IsAbleToGrave() and (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH")
      end
      function cm.filter3(c)
      return (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH")
      end
      function cm.sprop1(e,tp,eg,ep,ev,re,r,rp)
      local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
      if Duel.Draw(p,d,REASON_EFFECT)==2 then
      if Duel.IsExistingMatchingCard(cm.filter3,tp,LOCATION_HAND,0,1,nil) then
      local g=Duel.SelectMatchingCard(tp,cm.filter2,tp,LOCATION_HAND,0,1,1,nil)
      Duel.SendtoGrave(g,REASON_EFFECT)
      else
      local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_HAND,0,nil)
      Duel.SendtoDeck(g,nil,2,REASON_EFFECT)
      end
      end
      end end
      function cm.ntcon(e,c,minc) function cm.ntcon(e,c,minc)
      if c==nil then return true end if c==nil then return true end
      return minc==0 and c:IsLevelAbove(5) and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0 return minc==0 and c:IsLevelAbove(5) and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
      end end
      function cm.gacon(e,tp,eg,ep,ev,re,r,rp) function cm.drop(e,tp)
      local des=eg:GetFirst() if Duel.Draw(tp,2,REASON_EFFECT)>0 then
      local rc=des:GetReasonCard() rsop.SelectToGrave(tp,Card.IsAbleToGrave,tp,LOCATION_HAND,0,1,1,nil,{})
      return (not des:IsRace(RACE_WARRIOR)) and rc:IsRelateToBattle() and rc==e:GetHandler()
      end end
      function cm.gatg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      end end
      function cm.gaop(e,tp,eg,ep,ev,re,r,rp) function cm.rmop(e,tp)
      local c=e:GetHandler() local ct,og,tc=rsop.SelectRemove(tp,Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,{})
      if c:IsRelateToEffect(e) then if tc and tc:IsLocation(LOCATION_REMOVED) then
      local e1=Effect.CreateEffect(c) rsef.SV_LIMIT({e:GetHandler(),tc},"tri",nil,nil,rsreset.est)
      e1:SetDescription(aux.Stringid(m,2))
      e1:SetType(EFFECT_TYPE_QUICK_O)
      e1:SetCategory(CATEGORY_REMOVE)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
      e1:SetTarget(cm.eqtg)
      e1:SetOperation(cm.eqop)
      e1:SetCountLimit(1)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e1)
      local e3=Effect.CreateEffect(e:GetHandler())
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetDescription(aux.Stringid(m,1))
      e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CLIENT_HINT)
      e3:SetRange(LOCATION_MZONE)
      e3:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e3,true)
      end
      end
      function cm.filter1(c)
      return c:IsAbleToRemove()
      end
      function cm.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chk==0 then return Duel.IsExistingTarget(cm.filter1,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_ONFIELD)
      end
      function cm.eqop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tc=Duel.SelectMatchingCard(tp,cm.filter1,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil):GetFirst()
      if tc and Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)~=0 then
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_CANNOT_TRIGGER)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CLIENT_HINT)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_REMOVE)
      tc:RegisterEffect(e1)
      end end
      end end
      \ No newline at end of file
      expansions/script/c16104212.lua
      View file @ 2fd9e2d3
      --教团的圣旗手 迪萨贝尔 --教团的圣旗手 迪萨贝尔
      local m=16104212 if not pcall(function() require("expansions/script/c16104200") end) then require("script/c16104200") end
      local cm=_G["c"..m] local m,cm=rscf.DefineCard(16104212,"CHURCH")
      c16104212.rksetcode="CHURCH"
      function cm.initial_effect(c) function cm.initial_effect(c)
      c:SetUniqueOnField(1,1,m) c:SetUniqueOnField(1,1,m)
      --summon success rsch.LimitFun(c,m)
      local e1=Effect.CreateEffect(c) local e1=rsef.STO(c,EVENT_SUMMON_SUCCESS,{m,0},nil,"se,th","de,dsp",nil,rsch.limitcost(m),rsop.target(cm.thfilter,"th",LOCATION_DECK),cm.thop)
      e1:SetDescription(aux.Stringid(m,0)) local e2=rsef.RegisterClone(c,e1,"code",EVENT_SPSUMMON_SUCCESS)
      e1:SetCategory(CATEGORY_TOHAND) local e3=rsch.DoubleTriFun(c,nil,nil,rsch.IsSet2)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1)
      e1:SetTarget(cm.thtg)
      e1:SetOperation(cm.thop)
      c:RegisterEffect(e1)
      local e3=e1:Clone()
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e3)
      --double tribute
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_DOUBLE_TRIBUTE)
      e2:SetValue(cm.condition)
      c:RegisterEffect(e2)
      Duel.AddCustomActivityCounter(m,ACTIVITY_SUMMON,cm.counterfilter)
      Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter1)
      end
      function cm.counterfilter(c)
      return c:IsRace(RACE_WARRIOR)
      end
      function cm.counterfilter1(c)
      return c:GetSummonLocation()~=LOCATION_EXTRA and c:IsRace(RACE_WARRIOR)
      end
      function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
      e1:SetTargetRange(1,0)
      e1:SetTarget(cm.splimit)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      local e2=e1:Clone()
      e2:SetCode(EFFECT_CANNOT_SUMMON)
      Duel.RegisterEffect(e2,tp)
      end
      function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
      return c:IsLocation(LOCATION_EXTRA) or not c:IsRace(RACE_WARRIOR)
      end end
      function cm.thfilter(c) function cm.thfilter(c)
      return (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH") and c:IsAbleToHand() return rsch.IsSet1(c) and c:IsAbleToHand()
      end
      function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function cm.thop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,cm.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 end
      function cm.condition(e,c) function cm.thop(e,tp)
      return (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH") rsop.SelectToHand(tp,cm.thfilter,tp,LOCATION_DECK,0,1,1,nil,{})
      end end
      \ No newline at end of file
      expansions/script/c16104214.lua
      View file @ 2fd9e2d3
      --叛教的掠夺骑士 IO --叛教的掠夺骑士 IO
      local m=16104214 if not pcall(function() require("expansions/script/c16104200") end) then require("script/c16104200") end
      local cm=_G["c"..m] local m,cm=rscf.DefineCard(16104214,"CHURCH_KNIGHT")
      c16104214.rksetcode="CHURCH_KNIGHT"
      function cm.initial_effect(c) function cm.initial_effect(c)
      aux.AddCodeList(c,16104208) local e1,e2=rsch.BetrayFun(c,m,16104208)
      c:SetUniqueOnField(1,1,m) local e3=rsef.SV_CANNOT_BE_TARGET(c,"effect",aux.tgoval)
      --spsummon condition local e4=rsef.QO(c,nil,{m,0},1,"atk,def,dis","tg",LOCATION_MZONE,nil,nil,rstg.target(Card.IsFaceup,nil,0,LOCATION_MZONE),cm.op)
      local e0=Effect.CreateEffect(c)
      e0:SetType(EFFECT_TYPE_SINGLE)
      e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e0:SetCode(EFFECT_SPSUMMON_CONDITION)
      e0:SetValue(cm.splimit)
      c:RegisterEffect(e0)
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_FIELD)
      e4:SetCode(EFFECT_SPSUMMON_PROC)
      e4:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
      e4:SetRange(LOCATION_HAND)
      e4:SetCondition(cm.sprcon)
      e4:SetOperation(cm.sprop)
      c:RegisterEffect(e4)
      --indes
      --local e1=Effect.CreateEffect(c)
      --e1:SetType(EFFECT_TYPE_SINGLE)
      --e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      --e1:SetRange(LOCATION_MZONE)
      --e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
      --e1:SetValue(1)
      --c:RegisterEffect(e1)
      --cannot target
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
      e2:SetValue(aux.tgoval)
      c:RegisterEffect(e2)
      --disef and gain
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(m,0))
      e3:SetCategory(CATEGORY_DISABLE+CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE)
      e3:SetType(EFFECT_TYPE_QUICK_O)
      e3:SetCode(EVENT_FREE_CHAIN)
      e3:SetRange(LOCATION_MZONE)
      e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e3:SetCountLimit(1)
      e3:SetTarget(cm.distg)
      e3:SetOperation(cm.disop)
      c:RegisterEffect(e3)
      end
      function cm.splimit(e,se,sp,st)
      return se:GetHandler():IsCode(16104226)
      end
      function cm.spzfilter(c,tp)
      return c:IsFaceup() and c:IsCode(16104208) and c:IsReleasable() and (ft>0 or c:GetSequence()<5)
      end
      function cm.sprcon(e,c,tp)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.IsExistingMatchingCard(cm.spzfilter,tp,LOCATION_MZONE,0,1,nil,ft)
      end end
      function cm.sprop(e,tp) function cm.op(e,tp)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
      local g=Duel.SelectMatchingCard(tp,cm.spzfilter,tp,LOCATION_MZONE,0,1,1,nil,ft)
      Duel.Release(g,REASON_COST)
      end
      function cm.filter1(c)
      return c:IsFaceup() and not (c:IsDisabled() and c:GetAttack()==0 and c:GetDefense()==0)
      end
      function cm.distg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and cm.filter1(chkc) end
      if chk==0 then return Duel.IsExistingTarget(cm.filter1,tp,0,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELECT)
      Duel.SelectTarget(tp,cm.filter1,tp,0,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_DISABLE,nil,1,tp,LOCATION_MZONE)
      end
      function cm.disop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler() local c=e:GetHandler()
      local tc=Duel.GetFirstTarget() local tc=rscf.GetTargetCard(Card.IsFaceup)
      if tc:IsRelateToEffect(e) then if not tc then return end
      Duel.NegateRelatedChain(tc,RESET_TURN_SET) local b1 = true
      local op=Duel.SelectOption(tp,aux.Stringid(m,2),aux.Stringid(m,3)) local b2 = rscf.GetFaceUpSelf(e) and not tc:IsType(TYPE_TOKEN)
      if op==0 then local b3 = b2 and tc:IsType(TYPE_EFFECT)
      local e5=Effect.CreateEffect(c) local op=rsop.SelectOption(tp,b1,{m,1},b2,{m,2},b3,{m,3})
      e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e5:SetType(EFFECT_TYPE_SINGLE)
      e5:SetCode(EFFECT_SET_ATTACK)
      e5:SetReset(RESET_EVENT+RESETS_STANDARD)
      e5:SetValue(0)
      tc:RegisterEffect(e5)
      local e4=Effect.CreateEffect(c)
      e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e4:SetType(EFFECT_TYPE_SINGLE)
      e4:SetCode(EFFECT_SET_DEFENSE)
      e4:SetReset(RESET_EVENT+RESETS_STANDARD)
      e4:SetValue(0)
      tc:RegisterEffect(e4)
      local e6=Effect.CreateEffect(c)
      e6:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e6:SetType(EFFECT_TYPE_SINGLE)
      e6:SetCode(EFFECT_CANNOT_ATTACK)
      e6:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e6)
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetRange(LOCATION_MZONE)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
      e1:SetValue(tc:GetTextAttack())
      c:RegisterEffect(e1)
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e3:SetCode(EFFECT_UPDATE_DEFENSE)
      e3:SetRange(LOCATION_MZONE)
      e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
      e3:SetValue(tc:GetTextDefense())
      c:RegisterEffect(e3)
      local e2=Effect.CreateEffect(e:GetHandler())
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetDescription(aux.Stringid(m,4))
      e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CLIENT_HINT)
      e2:SetRange(LOCATION_MZONE)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
      c:RegisterEffect(e2,true)
      end
      if op==1 then if op==1 then
      local e1,e2=rscf.QuickBuff({c,tc},"atkf,deff",0,"atk~")
      if rscf.GetFaceUpSelf(e) then
      local e3,e4=rscf.QuickBuff(c,"atk+,def+",{tc:GetBaseAttack(),tc:GetBaseDefense()})
      end
      else
      local code=tc:GetOriginalCodeRule() local code=tc:GetOriginalCodeRule()
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e1:SetCode(EFFECT_ADD_CODE) e1:SetCode(EFFECT_CHANGE_CODE)
      e1:SetValue(code) e1:SetValue(code)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END,2) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,2)
      c:RegisterEffect(e1) c:RegisterEffect(e1)
      local e2=Effect.CreateEffect(e:GetHandler())
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetDescription(aux.Stringid(m,5))
      e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CLIENT_HINT)
      e2:SetRange(LOCATION_MZONE)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END,2)
      c:RegisterEffect(e2,true)
      if not tc:IsType(TYPE_TRAPMONSTER) then if not tc:IsType(TYPE_TRAPMONSTER) then
      local cid=c:CopyEffect(code,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,2) local cid=c:CopyEffect(code,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,2)
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(m,4))
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e3:SetCode(EVENT_PHASE+PHASE_END)
      e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e3:SetCountLimit(1)
      e3:SetRange(LOCATION_MZONE)
      e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,2)
      e3:SetLabelObject(e1)
      e3:SetLabel(cid)
      e3:SetOperation(cm.rstop)
      c:RegisterEffect(e3)
      end end
      if (not (tc:IsDisabled() or tc:IsType(TYPE_NORMAL))) and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then if op==3 then
      local e1=Effect.CreateEffect(c) local e1=rscf.QuickBuff({c,tc},"dis,dise,tri~")
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e1:SetCode(EFFECT_DISABLE)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e1)
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e2:SetCode(EFFECT_DISABLE_EFFECT)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e2)
      local e5=Effect.CreateEffect(e:GetHandler())
      e5:SetType(EFFECT_TYPE_SINGLE)
      e5:SetCode(EFFECT_CANNOT_TRIGGER)
      e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e5:SetRange(LOCATION_MZONE)
      e5:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e5)
      end
      end end
      end end
      end end
      function cm.rstop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local cid=e:GetLabel()
      if cid~=0 then c:ResetEffect(cid,RESET_COPY) end
      local e1=e:GetLabelObject()
      e1:Reset()
      Duel.HintSelection(Group.FromCards(c))
      Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
      end
      \ No newline at end of file
      expansions/script/c16104216.lua
      View file @ 2fd9e2d3
      --叛教的异骑士 迪萨贝尔 --叛教的异骑士 迪萨贝尔
      local m=16104216 if not pcall(function() require("expansions/script/c16104200") end) then require("script/c16104200") end
      local cm=_G["c"..m] local m,cm=rscf.DefineCard(16104216,"CHURCH_KNIGHT")
      c16104216.rksetcode="CHURCH_KNIGHT"
      function cm.initial_effect(c) function cm.initial_effect(c)
      aux.AddCodeList(c,16104212) local e1,e2=rsch.BetrayFun(c,m,16104212)
      c:SetUniqueOnField(1,1,m) local e3=rsef.SV_INDESTRUCTABLE(c,"effect")
      --spsummon condition local e4=rsef.SV_CANNOT_BE_TARGET(c,"battle")
      local e0=Effect.CreateEffect(c) local e5=rsef.QO(c,EVENT_CHAINING,{m,0},1,"neg","dsp,dcal",LOCATION_MZONE,rscon.negcon(0),nil,cm.negtg,cm.negop)
      e0:SetType(EFFECT_TYPE_SINGLE)
      e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e0:SetCode(EFFECT_SPSUMMON_CONDITION)
      e0:SetValue(cm.splimit)
      c:RegisterEffect(e0)
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_FIELD)
      e4:SetCode(EFFECT_SPSUMMON_PROC)
      e4:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
      e4:SetRange(LOCATION_HAND)
      e4:SetCondition(cm.sprcon)
      e4:SetOperation(cm.sprop)
      c:RegisterEffect(e4)
      --indes
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
      e1:SetValue(1)
      c:RegisterEffect(e1)
      --cannot target
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCode(EFFECT_CANNOT_BE_BATTLE_TARGET)
      e2:SetValue(1)
      c:RegisterEffect(e2)
      --disef and gain
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(m,0))
      e3:SetCategory(CATEGORY_DISABLE+CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_QUICK_O)
      e3:SetCode(EVENT_CHAINING)
      e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1)
      e3:SetCondition(cm.discon)
      e3:SetTarget(cm.distg)
      e3:SetOperation(cm.disop)
      c:RegisterEffect(e3)
      end end
      function cm.splimit(e,se,sp,st) function cm.negtg(e,tp,eg,ep,ev,re,r,rp,chk)
      return se:GetHandler():IsCode(16104226)
      end
      function cm.spzfilter(c,ft)
      return c:IsFaceup() and c:IsCode(16104212) and c:IsReleasable() and (ft>0 or c:GetSequence()<5)
      end
      function cm.sprcon(e,c,tp)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.IsExistingMatchingCard(cm.spzfilter,tp,LOCATION_MZONE,0,1,nil,ft)
      end
      function cm.sprop(e,tp)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
      local g=Duel.SelectMatchingCard(tp,cm.spzfilter,tp,LOCATION_MZONE,0,1,1,nil,ft)
      Duel.Release(g,REASON_COST)
      end
      function cm.filter1(c)
      return c:IsFaceup() and not c:IsDisabled()
      end
      function cm.discon(e,tp,eg,ep,ev,re,r,rp)
      return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED)
      and Duel.IsChainNegatable(ev)
      end
      function cm.distg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end if chk==0 then return true end
      e:SetCategory(CATEGORY_NEGATE)
      Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0) Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
      if re:GetHandler():IsRelateToEffect(re) e:SetCategory(CATEGORY_NEGATE)
      and not re:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and re:GetHandler():IsDestructable() and re:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) then if re:IsActiveType(TYPE_MONSTER) and re:GetHandler():IsRelateToEffect(re) then
      e:SetCategory(CATEGORY_SPECIAL_SUMMON) Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,eg,1,0,0) if re:GetHandler():IsDestructable() then
      e:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON)
      end
      end end
      end end
      function cm.disop(e,tp,eg,ep,ev,re,r,rp) function cm.negop(e,tp,eg,ep,ev,re,r,rp)
      local rc=re:GetHandler() local rc=re:GetHandler()
      if Duel.NegateActivation(ev) and rc:IsRelateToEffect(re) and rc:IsType(TYPE_MONSTER) and Duel.Destroy(eg,REASON_EFFECT)~=0 if not Duel.NegateActivation(ev) then return end
      and not rc:IsRelateToEffect(e) and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then if rc:IsRelateToEffect(re) and re:IsActiveType(TYPE_MONSTER) and Duel.Destroy(eg,REASON_EFFECT)~=0 and not rc:IsLocation(LOCATION_HAND+LOCATION_DECK) and not rc:IsHasEffect(EFFECT_NECRO_VALLEY) and rscf.spfilter2()(rc,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
      Duel.SpecialSummon(re:GetHandler(),0,tp,tp,false,false,POS_FACEUP) Duel.BreakEffect()
      Duel.SpecialSummonComplete() Duel.SpecialSummon(rc,0,tp,tp,false,false,POS_FACEUP)
      end end
      end end
      \ No newline at end of file
      expansions/script/c16104218.lua
      View file @ 2fd9e2d3
      --骑士的行军 --骑士的行军
      local m=16104218 if not pcall(function() require("expansions/script/c16104200") end) then require("script/c16104200") end
      local cm=_G["c"..m] local m,cm=rscf.DefineCard(16104218,"CHURCH_KNIGHT")
      c16104218.rksetcode="CHURCH_KNIGHT"
      function cm.initial_effect(c) function cm.initial_effect(c)
      --Activate rsch.LimitFun(c,m)
      local e0=Effect.CreateEffect(c) local e1=rsef.ACT(c)
      e0:SetType(EFFECT_TYPE_ACTIVATE) local e2=rsef.I(c,{m,0},{1,m},"se,th",nil,LOCATION_SZONE,nil,rsch.limitcost(m),rsop.target(cm.thfilter,"th",LOCATION_DECK),cm.thop)
      e0:SetCode(EVENT_FREE_CHAIN) local e3=rsef.I(c,{m,1},{1,m+100},"sum",nil,LOCATION_GRAVE,nil,aux.bfgcost,rsop.target(cm.sumfilter,"sum",LOCATION_HAND),cm.sumop)
      c:RegisterEffect(e0)
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,0))
      e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_SZONE)
      e1:SetCountLimit(1,m)
      e1:SetCost(cm.cost)
      e1:SetTarget(cm.target)
      e1:SetOperation(cm.activate)
      c:RegisterEffect(e1)
      --Grave
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(m,1))
      e2:SetCategory(CATEGORY_SUMMON)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCountLimit(1,m+1)
      e2:SetCost(aux.bfgcost)
      e2:SetTarget(cm.target1)
      e2:SetOperation(cm.activate1)
      c:RegisterEffect(e2)
      Duel.AddCustomActivityCounter(m,ACTIVITY_SUMMON,cm.counterfilter)
      Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter1)
      end end
      function cm.counterfilter(c) function cm.thfilter(c)
      return c:IsRace(RACE_WARRIOR) return rsch.IsSetM2(c) and c:IsAbleToHand()
      end end
      function cm.counterfilter1(c) function cm.thop(e,tp)
      return c:GetSummonLocation()~=LOCATION_EXTRA and c:IsRace(RACE_WARRIOR) if rscf.GetSelf(e) then
      end rsop.SelectToHand(tp,cm.thfilter,tp,LOCATION_DECK,0,1,1,nil,{})
      function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
      e1:SetTargetRange(1,0)
      e1:SetTarget(cm.splimit)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      local e2=e1:Clone()
      e2:SetCode(EFFECT_CANNOT_SUMMON)
      Duel.RegisterEffect(e2,tp)
      end
      function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
      return (not c:IsRace(RACE_WARRIOR)) or c:IsLocation(LOCATION_EXTRA)
      end
      function cm.filter(c)
      return c.rksetcode=="CHURCH_KNIGHT" and c:IsAbleToHand() and c:IsType(TYPE_MONSTER)
      end
      function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function cm.activate(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,cm.filter,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
      end end
      function cm.filter1(c) function cm.sumfilter(c)
      return (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH") and c:IsSummonable(true,nil) and c:IsType(TYPE_MONSTER) return rsch.IsSet1(c) and c:IsSummonable(true,nil)
      end
      function cm.target1(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.filter1,tp,LOCATION_HAND,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,tp,LOCATION_HAND)
      end end
      function cm.activate1(e,tp,eg,ep,ev,re,r,rp) function cm.sumop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
      local g=Duel.SelectMatchingCard(tp,cm.filter1,tp,LOCATION_HAND,0,1,1,nil) local tc=Duel.SelectMatchingCard(tp,cm.sumfilter,tp,LOCATION_HAND,0,1,1,nil):GetFirst()
      if g:GetCount()>0 then if tc then
      Duel.ConfirmCards(1-tp,g) Duel.Summon(tp,tc,true,nil)
      Duel.Summon(tp,g:GetFirst(),true,nil)
      end end
      end end
      \ No newline at end of file
      expansions/script/c16104220.lua
      View file @ 2fd9e2d3
      --直到最后一刻 --直到最后一刻
      local m=16104220 if not pcall(function() require("expansions/script/c16104200") end) then require("script/c16104200") end
      local cm=_G["c"..m] local m,cm=rscf.DefineCard(16104220,"CHURCH_KNIGHT")
      c16104220.rksetcode="CHURCH_KNIGHT"
      function cm.initial_effect(c) function cm.initial_effect(c)
      c:SetUniqueOnField(1,0,m) c:SetUniqueOnField(1,0,m)
      --Activate local e1=rsef.ACT(c)
      local e0=Effect.CreateEffect(c) local e2=rsef.FV_LIMIT(c,"cp",nil,cm.tg,{ LOCATION_MZONE,LOCATION_MZONE })
      e0:SetType(EFFECT_TYPE_ACTIVATE) local e3,e4=rsef.FV_LIMIT_PLAYER(c,"sum,sp",nil,cm.tg2,{1,0})
      e0:SetCode(EVENT_FREE_CHAIN) local e5=rsef.QO(c,nil,{m,0},{1,m},"rm,sp,tk,sum,ga","tg",LOCATION_SZONE,nil,nil,rstg.target(cm.filter,nil,LOCATION_GRAVE),cm.op)
      c:RegisterEffect(e0)
      --SpecialSummon
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(m,1))
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetRange(LOCATION_SZONE)
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e2:SetCountLimit(1,m)
      e2:SetTarget(cm.sptg)
      e2:SetOperation(cm.spop)
      c:RegisterEffect(e2)
      local e5=Effect.CreateEffect(c)
      e5:SetDescription(aux.Stringid(m,2))
      e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e5:SetType(EFFECT_TYPE_QUICK_O)
      e5:SetCode(EVENT_FREE_CHAIN)
      e5:SetRange(LOCATION_SZONE)
      e5:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e5:SetCountLimit(1,m)
      e5:SetTarget(cm.sptg2)
      e5:SetOperation(cm.spop2)
      c:RegisterEffect(e5)
      --SpecialSummon Limit
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_FIELD)
      e3:SetRange(LOCATION_SZONE)
      e3:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e3:SetTargetRange(1,0)
      e3:SetTarget(cm.sumlimit)
      c:RegisterEffect(e3)
      local e4=e3:Clone()
      e4:SetCode(EFFECT_CANNOT_SUMMON)
      c:RegisterEffect(e4)
      end end
      function cm.sumlimit(e,c,sump,sumtype,sumpos,targetp) function cm.tg(e,c)
      return not c:IsRace(RACE_WARRIOR) return c:IsAttackPos() and rsch.IsSet1(c)
      end
      function cm.spfilter(c)
      return (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH") and c:IsAbleToRemove() and c:IsType(TYPE_MONSTER)
      end
      function cm.spfilter1(c,e,tp)
      return (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH") and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP) and c:IsType(TYPE_MONSTER)
      end end
      function cm.smfilter(c) function cm.tg2(e,c)
      return (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH") and c:IsSummonable(true,nil) return not c:IsRace(RACE_WARRIOR)
      end
      function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsPlayerCanSpecialSummonMonster(tp,16104222,nil,0x21,0,0,1,RACE_WARRIOR,ATTRIBUTE_LIGHT) and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_GRAVE,0,1,nil) end
      local g=Duel.SelectTarget(tp,cm.spfilter,tp,LOCATION_GRAVE,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,0)
      end end
      function cm.spop(e,tp,eg,ep,ev,re,r,rp) function cm.filter(c,e,tp)
      local c=e:GetHandler() if not rsch.IsSetM1(c) then return end
      local tc=Duel.GetFirstTarget() local b1 = c:IsAbleToRemove() and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      local atk,def,code=0,0,0 and Duel.IsPlayerCanSpecialSummonMonster(tp,16104222,0,0x4011,0,0,1,RACE_WARRIOR,ATTRIBUTE_LIGHT)
      if tc then local b2 = rscf.spfilter2()(c,e,tp)
      atk=tc:GetAttack() return b1 or b2
      def=tc:GetDefense() end
      end function cm.op(e,tp)
      if not (tc:IsRelateToEffect(e) and c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0) then return end local c=rscf.GetSelf(e)
      if Duel.IsPlayerCanSpecialSummonMonster(tp,16104222,nil,0x21,atk,def,1,RACE_WARRIOR,ATTRIBUTE_LIGHT) then local tc=rscf.GetTargetCard()
      if Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)~=0 then if not c or not tc then return end
      local b1 = tc:IsAbleToRemove() and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsPlayerCanSpecialSummonMonster(tp,16104222,0,0x4011,0,0,1,RACE_WARRIOR,ATTRIBUTE_LIGHT)
      local b2 = rscf.spfilter2()(tc,e,tp)
      if not b1 and not b2 then return end
      local op=rsop.SelectOption(tp,b1,{m,1},b2,{m,2})
      if op==1 then
      if Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)>0 and tc:IsLocation(LOCATION_REMOVED) then
      local token=Duel.CreateToken(tp,16104222) local token=Duel.CreateToken(tp,16104222)
      Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP) if Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)>0 then
      local e1=Effect.CreateEffect(e:GetHandler()) local e1,e2=rscf.QuickBuff({c,token,true},"atkf,deff",{tc:GetBaseAttack(),tc:GetBaseDefense()})
      e1:SetType(EFFECT_TYPE_SINGLE) local e3=rsch.DoubleTriFun(c,token,rsreset.est)
      e1:SetCode(EFFECT_SET_ATTACK) rsop.SelectOC({m,3},true)
      e1:SetValue(atk) rsop.SelectSolve(HINTMSG_SUMMON,tp,cm.sumfilter,tp,LOCATION_HAND,0,1,1,nil,cm.sumfun,tp)
      token:RegisterEffect(e1,true)
      local e2=Effect.CreateEffect(e:GetHandler())
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_SET_DEFENSE)
      e2:SetValue(def)
      token:RegisterEffect(e2,true)
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetCode(EFFECT_DOUBLE_TRIBUTE)
      e3:SetValue(cm.condition)
      token:RegisterEffect(e3,true)
      if Duel.IsExistingMatchingCard(cm.smfilter,tp,LOCATION_HAND,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,3)) then
      local g=Duel.SelectMatchingCard(tp,cm.smfilter,tp,LOCATION_HAND,0,1,1,nil):GetFirst()
      Duel.Summon(tp,g,true,nil)
      end end
      end end
      else
      if rssf.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP,nil,nil,"th")>0 then
      local code = tc:GetOriginalCodeRule()
      tc:RegisterFlagEffect(code + 100,rsreset.est,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(16104200,2))
      end end
      end
      function cm.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingTarget(cm.spfilter1,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
      local g=Duel.SelectTarget(tp,cm.spfilter1,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,0)
      end
      function cm.spop2(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tc=Duel.GetFirstTarget()
      if not (tc:IsRelateToEffect(e) and c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and tc:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)) then return end
      if tc.rksetcode=="CHURCH_KNIGHT" then
      tc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END,0,1)
      local e1_2=Effect.CreateEffect(c)
      e1_2:SetType(EFFECT_TYPE_SINGLE)
      e1_2:SetDescription(aux.Stringid(m,5))
      e1_2:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CLIENT_HINT)
      e1_2:SetRange(LOCATION_MZONE)
      e1_2:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD)
      tc:RegisterEffect(e1_2,true)
      end end
      Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
      local fid=e:GetHandler():GetFieldID()
      tc:RegisterFlagEffect(m+1,RESET_EVENT+RESETS_STANDARD,0,1,fid)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e1:SetCode(EVENT_PHASE+PHASE_END)
      e1:SetCountLimit(1)
      e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
      e1:SetLabel(fid)
      e1:SetLabelObject(tc)
      e1:SetCondition(cm.thacon)
      e1:SetOperation(cm.thaop)
      Duel.RegisterEffect(e1,tp)
      end end
      function cm.thacon(e,tp,eg,ep,ev,re,r,rp) function cm.sumfilter(c)
      local tc=e:GetLabelObject() return rsch.IsSet2(c) and c:IsSummonable(true,nil)
      if tc:GetFlagEffectLabel(m+1)~=e:GetLabel() then
      e:Reset()
      return false
      else return true end
      end end
      function cm.thaop(e,tp,eg,ep,ev,re,r,rp) function cm.sumfun(g,tp)
      Duel.SendtoHand(e:GetLabelObject(),nil,REASON_EFFECT) local tc=g:GetFirst()
      end if tc then
      function cm.condition(e,c) Duel.Summon(tp,tc,true,nil)
      return (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH") end
      return true
      end end
      \ No newline at end of file
      expansions/script/c16104224.lua
      View file @ 2fd9e2d3
      --异端剿灭 --异端剿灭
      local m=16104224 if not pcall(function() require("expansions/script/c16104200") end) then require("script/c16104200") end
      local cm=_G["c"..m] local m,cm=rscf.DefineCard(16104224,"CHURCH_KNIGHT")
      c16104224.rksetcode="CHURCH_KNIGHT"
      function cm.initial_effect(c) function cm.initial_effect(c)
      --ACT local e1=rsef.ACT(c,nil,nil,{1,m,1},"des",nil,cm.con,nil,rsop.target(cm.desfilter,"des",0,LOCATION_ONFIELD,true),cm.act)
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DESTROY+CATEGORY_CONTROL)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,m)
      e1:SetCondition(cm.descon)
      e1:SetTarget(cm.destg)
      e1:SetOperation(cm.desop)
      c:RegisterEffect(e1)
      end end
      function cm.descon(e,tp,eg,ep,ev,re,r,rp) function cm.cfilter1(c)
      return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_MZONE,0,1,nil) return c:IsLevelAbove(5) and rsch.IsSet2(c) and c:IsFaceup()
      end end
      function cm.desfilter(c) function cm.cfilter2(c)
      return not (c:IsRace(RACE_WARRIOR) and c:IsLocation(LOCATION_MZONE) and c:IsFaceup()) return c:IsFaceup() and not c:IsRace(RACE_WARRIOR)
      end
      function cm.desfilter1(c)
      return (not c:IsRace(RACE_WARRIOR)) and c:IsFaceup()
      end end
      --function cm.ntrfilter(c) function cm.con(e,tp)
      --return c:IsRace(RACE_WARRIOR) and c:IsControlerCanBeChanged() and c:IsFaceup() return Duel.IsExistingMatchingCard(cm.cfilter1,tp,LOCATION_MZONE,0,1,nil) and Duel.IsExistingMatchingCard(cm.cfilter2,tp,0,LOCATION_MZONE,1,nil)
      --end
      function cm.filter(c)
      return c.rksetcode=="CHURCH_KNIGHT" and c:IsFaceup() and c:IsType(TYPE_MONSTER) and c:GetLevel()>=5
      end end
      function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.desfilter(c)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.desfilter1,tp,0,LOCATION_MZONE,1,nil) end return c:IsFacedown() or not c:IsRace(RACE_WARRIOR)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,1-tp,LOCATION_ONFIELD)
      end end
      function cm.desop(e,tp,eg,ep,ev,re,r,rp) function cm.act(e,tp)
      local g=Duel.GetMatchingGroup(cm.desfilter,tp,0,LOCATION_ONFIELD,nil) local g=Duel.GetMatchingGroup(cm.desfilter,tp,0,LOCATION_ONFIELD,nil)
      local num=g:GetCount()
      if num<=0 then return end
      Duel.Destroy(g,REASON_EFFECT) Duel.Destroy(g,REASON_EFFECT)
      --if Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_MZONE,0,1,nil,16104228) and Duel.IsExistingMatchingCard(cm.ntrfilter,tp,0,LOCATION_MZONE,1,nil) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
      --local tc=Duel.SelectMatchingCard(tp,cm.ntrfilter,tp,0,LOCATION_MZONE,1,1,nil)
      --Duel.GetControl(tc,tp)
      --end
      end end
      \ No newline at end of file
      expansions/script/c16104226.lua
      View file @ 2fd9e2d3
      --前路的抉择 --前路的抉择
      local m=16104226 if not pcall(function() require("expansions/script/c16104200") end) then require("script/c16104200") end
      local cm=_G["c"..m] local m,cm=rscf.DefineCard(16104226,"CHURCH")
      c16104226.rksetcode="CHURCH"
      function cm.initial_effect(c) function cm.initial_effect(c)
      --Activate local e1=rsef.ACT(c,nil,nil,{1,m,1},"tg,sp",nil,nil,nil,rsop.target2(cm.fun,cm.tgfilter,"tg",LOCATION_MZONE),cm.act)
      local e0=Effect.CreateEffect(c) end
      e0:SetDescription(aux.Stringid(m,0)) function cm.fun(g,e,tp)
      e0:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOGRAVE) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,rsloc.hd)
      e0:SetType(EFFECT_TYPE_ACTIVATE) end
      e0:SetCode(EVENT_FREE_CHAIN) function cm.spfilter1(c,e,tp,mc)
      e0:SetCountLimit(1,m) return c:IsSetCard(0xcc4) and aux.IsCodeListed(c,mc:GetOriginalCodeRule()) and Duel.GetMZoneCount(tp,mc,tp)>0 and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
      e0:SetTarget(cm.sptg) end
      e0:SetOperation(cm.spop) function cm.spfilter2(c,e,tp,mc)
      c:RegisterEffect(e0) return rsch.IsSet1(c) and aux.IsCodeListed(mc,c:GetOriginalCodeRule()) and Duel.GetMZoneCount(tp,mc,tp)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      --Activate end
      local e1=Effect.CreateEffect(c) function cm.tgfilter(c,e,tp)
      e1:SetDescription(aux.Stringid(m,1)) if c:IsFacedown() or not c:IsAbleToGrave() then return false end
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOGRAVE) local b1 = rsch.IsSet1(c) and Duel.IsExistingMatchingCard(cm.spfilter1,tp,rsloc.hd,0,1,nil,e,tp,c)
      e1:SetType(EFFECT_TYPE_ACTIVATE) local b2 = c:IsSetCard(0xcc4) and Duel.IsExistingMatchingCard(cm.spfilter2,tp,rsloc.hd,0,1,nil,e,tp,c)
      e1:SetCode(EVENT_FREE_CHAIN) return b1 or b2
      e1:SetCountLimit(1,m) end
      e1:SetTarget(cm.sptg1) function cm.act(e,tp)
      e1:SetOperation(cm.spop1) local ct,og,tc=rsop.SelectToGrave(tp,cm.tgfilter,tp,LOCATION_MZONE,0,1,1,nil,{},e,tp)
      c:RegisterEffect(e1) if not tc then return end
      end if not tc:IsSetCard(0xcc4) then
      function cm.filter(c,e,tp) rsop.SelectSpecialSummon(tp,cm.spfilter1,tp,rsloc.hd,0,1,1,nil,{0,tp,tp,true,false,POS_FACEUP,nil,{"cp"}},e,tp,tc)
      return c:IsFaceup() and (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH") else
      and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_DECK+LOCATION_HAND,0,1,nil,c:GetCode(),e,tp) local ct,og,sc=rsop.SelectSpecialSummon(tp,cm.spfilter2,tp,rsloc.hd,0,1,1,nil,{},e,tp,tc)
      end if sc then
      function cm.spfilter(c,code,e,tp) local code = sc:GetOriginalCodeRule()
      return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and aux.IsCodeListed(c,code) and c:IsSetCard(0xcc4) sc:RegisterFlagEffect(code + 100,rsreset.est,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(16104200,1))
      end
      function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chk==0 then return Duel.IsExistingTarget(cm.filter,tp,LOCATION_MZONE,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_MZONE)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK+LOCATION_HAND)
      end
      function cm.spop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local tc=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_MZONE,0,1,1,nil,e,tp):GetFirst()
      local code=tc:GetCode()
      if Duel.SendtoGrave(tc,REASON_EFFECT)==0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_DECK+LOCATION_HAND,0,1,1,nil,code,e,tp)
      if sg:GetCount()>0 then
      Duel.BreakEffect()
      Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
      sg:GetFirst():CompleteProcedure()
      end
      end
      function cm.filter1(c,e,tp)
      return c:IsFaceup() and c:IsSetCard(0xcc4)
      and Duel.IsExistingMatchingCard(cm.spfilter1,tp,LOCATION_DECK+LOCATION_HAND,0,1,nil,c,e,tp)
      end
      function cm.spfilter1(c,cad,e,tp)
      return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and aux.IsCodeListed(cad,c:GetCode()) and (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH") and not c:IsSetCard(0xcc4)
      end
      function cm.sptg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chk==0 then return Duel.IsExistingTarget(cm.filter1,tp,LOCATION_MZONE,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_MZONE)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK+LOCATION_HAND)
      end
      function cm.spop1(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local tc=Duel.SelectMatchingCard(tp,cm.filter1,tp,LOCATION_MZONE,0,1,1,nil,e,tp):GetFirst()
      if Duel.SendtoGrave(tc,REASON_EFFECT)==0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=Duel.SelectMatchingCard(tp,cm.spfilter1,tp,LOCATION_DECK+LOCATION_HAND,0,1,1,nil,tc,e,tp)
      if sg:GetCount()>0 then
      Duel.BreakEffect()
      local sc=sg:GetFirst()
      if sc.rksetcode=="CHURCH_KNIGHT" then
      if sc:GetActivateEffect() and e:GetOperation() then
      local e=sc:GetActivateEffect()
      local op=e:GetOperation()
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetDescription(aux.Stringid(m,2))
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
      e1:SetCode(EVENT_SPSUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
      e1:SetOperation(op)
      sc:RegisterEffect(e1)
      local e3=Effect.CreateEffect(e:GetHandler())
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetDescription(aux.Stringid(m,1))
      e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CLIENT_HINT)
      e3:SetRange(LOCATION_MZONE)
      e3:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD)
      sc:RegisterEffect(e3,true)
      end
      end end
      Duel.SpecialSummon(sc,0,tp,tp,false,false,POS_FACEUP)
      Duel.SpecialSummonComplete()
      end end
      end end
      expansions/script/c16104228.lua
      View file @ 2fd9e2d3
      --教团的异骑士 燎煌 --教团的异骑士 燎煌
      local m=16104228 if not pcall(function() require("expansions/script/c16104200") end) then require("script/c16104200") end
      local cm=_G["c"..m] local m,cm=rscf.DefineCard(16104228,"CHURCH_KNIGHT")
      c16104228.rksetcode="CHURCH_KNIGHT"
      function cm.initial_effect(c) function cm.initial_effect(c)
      c:SetUniqueOnField(1,1,m) c:SetUniqueOnField(1,1,m)
      --summon success local e1=rsch.SummonEffect(c,m,cm.op)
      local e1=Effect.CreateEffect(c) local e2=rsch.GainEffect(c,m)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) local e3=rsef.QO(c,nil,{m,0},1,"des,dam",nil,LOCATION_MZONE,rsch.gaincon(m),nil,rsop.target(aux.TRUE,"des",0,LOCATION_ONFIELD),cm.desop)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetOperation(cm.sumsuc)
      c:RegisterEffect(e1)
      local e1_1=Effect.CreateEffect(c)
      e1_1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e1_1:SetCode(EVENT_SPSUMMON_SUCCESS)
      e1_1:SetOperation(cm.sumsuc1)
      c:RegisterEffect(e1_1)
      --a d A
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(m,0))
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_BATTLE_DESTROYED)
      e2:SetProperty(EFFECT_FLAG_NO_TURN_RESET)
      e2:SetCountLimit(1)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCondition(cm.gacon)
      e2:SetTarget(cm.gatg)
      e2:SetOperation(cm.gaop)
      c:RegisterEffect(e2)
      --summon with 1 tribute
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(m,2))
      e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e4:SetType(EFFECT_TYPE_SINGLE)
      e4:SetCode(EFFECT_SUMMON_PROC)
      e4:SetCondition(cm.otcon)
      e4:SetOperation(cm.otop)
      e4:SetValue(SUMMON_TYPE_ADVANCE)
      c:RegisterEffect(e4)
      local e5=e4:Clone()
      e5:SetCode(EFFECT_SET_PROC)
      c:RegisterEffect(e5)
      --summon with s/t
      local e6=Effect.CreateEffect(c)
      e6:SetType(EFFECT_TYPE_SINGLE)
      e6:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e6:SetCode(EFFECT_ADD_EXTRA_TRIBUTE)
      e6:SetTargetRange(LOCATION_SZONE,0)
      e6:SetCondition(cm.otcon1)
      e6:SetTarget(cm.reltarget)
      e6:SetValue(POS_FACEUP_ATTACK)
      c:RegisterEffect(e6)
      end end
      function cm.otcon1(e) function cm.op(e,tp)
      return Duel.IsEnvironment(16104206,e:GetOwnerPlayer(),LOCATION_FZONE)
      end
      function cm.reltarget(e,c)
      return c:IsFaceup() and (c:IsType(TYPE_CONTINUOUS) or c:IsType(TYPE_EQUIP))
      end
      function cm.otfilter(c)
      return c:IsSummonType(SUMMON_TYPE_ADVANCE)
      end
      function cm.otcon(e,c,minc)
      if c==nil then return Duel.IsExistingMatchingCard(cm.otfilter,0,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      local mg=Duel.GetMatchingGroup(cm.otfilter,0,LOCATION_MZONE,LOCATION_MZONE,nil)
      return c:IsLevelAbove(7) and minc<=1 and Duel.CheckTribute(c,1,1,mg) and Duel.IsEnvironment(16104206,e:GetOwnerPlayer(),LOCATION_FZONE)
      end
      function cm.otop(e,tp,eg,ep,ev,re,r,rp,c)
      local sg=Duel.SelectMatchingCard(tp,cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      c:SetMaterial(sg)
      Duel.Release(sg,REASON_SUMMON+REASON_MATERIAL)
      end
      function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if (c:IsSummonType(SUMMON_TYPE_ADVANCE) and c:GetMaterial():IsExists(cm.adfilter,1,nil)) or not c:IsSummonType(SUMMON_TYPE_ADVANCE) then
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_CANNOT_ACTIVATE)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e1:SetTargetRange(0,1)
      e1:SetValue(cm.aclimit)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_DISABLE)
      e2:SetTargetRange(0,LOCATION_MZONE)
      e2:SetTarget(cm.disable)
      e2:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e2,tp)
      end
      if e:GetHandler():GetFlagEffect(16104206)~=0 then
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(m,0))
      e3:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE)
      e3:SetType(EFFECT_TYPE_QUICK_O)
      e3:SetCode(EVENT_FREE_CHAIN)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1)
      e3:SetTarget(cm.destg)
      e3:SetOperation(cm.desop)
      e3:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e3)
      end
      end
      function cm.sumsuc1(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if e:GetHandler():GetFlagEffect(16104220)~=0 then
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(m,0))
      e3:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE)
      e3:SetType(EFFECT_TYPE_QUICK_O)
      e3:SetCode(EVENT_FREE_CHAIN)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1)
      e3:SetTarget(cm.destg)
      e3:SetOperation(cm.desop)
      e3:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e3)
      end
      end
      function cm.adfilter(c)
      return c:IsRace(RACE_WARRIOR) or c:IsType(TYPE_SPELL) or c:IsType(TYPE_TRAP)
      end
      function cm.aclimit(e,re,tp)
      return re:GetHandler():IsOnField() and re:GetHandler():IsType(TYPE_MONSTER)
      end
      function cm.disable(e,c)
      return c:IsType(TYPE_MONSTER)
      end
      function cm.gacon(e,tp,eg,ep,ev,re,r,rp)
      local des=eg:GetFirst()
      local rc=des:GetReasonCard()
      return (not des:IsRace(RACE_WARRIOR)) and rc:IsRelateToBattle() and rc==e:GetHandler()
      end
      function cm.gatg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      end
      function cm.gaop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler() local c=e:GetHandler()
      if c:IsRelateToEffect(e) then local e1=rsef.FV_LIMIT({c,tp},"dis",nil,nil,{0,LOCATION_MZONE },nil,rsreset.pend)
      local e2=Effect.CreateEffect(c) local e2=rsef.FV_LIMIT_PLAYER({c,tp},"act",cm.val,nil,{1,1},nil,rsreset.pend)
      e2:SetDescription(aux.Stringid(m,0))
      e2:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCountLimit(1)
      e2:SetTarget(cm.destg)
      e2:SetOperation(cm.desop)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e2)
      local e3=Effect.CreateEffect(e:GetHandler())
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetDescription(aux.Stringid(m,1))
      e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CLIENT_HINT)
      e3:SetRange(LOCATION_MZONE)
      e3:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e3,true)
      end
      end end
      function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.val(e,re)
      local c=e:GetHandler() local rc = re:GetHandler()
      if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_ONFIELD,1,nil) return rc:IsType(TYPE_MONSTER) and rc:IsOnField() and rc:IsControler(1-e:GetHandlerPlayer())
      end
      local g=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_ONFIELD,nil)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,0)
      end end
      function cm.desop(e,tp,eg,ep,ev,re,r,rp) function cm.desop(e,tp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) local ct,og,tc=rsop.SelectDestroy(tp,aux.TRUE,tp,0,LOCATION_ONFIELD,1,1,nil,{})
      local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,0,LOCATION_ONFIELD,1,1,nil) if tc and tc:IsType(TYPE_MONSTER) and tc:GetBaseAttack()>0 then
      if g:GetCount()>0 then Duel.Damage(1-tp,tc:GetBaseAttack(),REASON_EFFECT)
      if g:GetFirst():IsType(TYPE_MONSTER) then
      local atk=g:GetFirst():GetTextAttack()
      if atk<0 then atk=0 end
      if Duel.Destroy(g,REASON_EFFECT)~=0 then
      Duel.Damage(1-tp,atk,REASON_EFFECT)
      end
      else
      Duel.Destroy(g,REASON_EFFECT)
      end
      end end
      end end
      \ No newline at end of file
      expansions/script/c16104230.lua
      View file @ 2fd9e2d3
      --终末之歌 --终末之歌
      local m=16104230 if not pcall(function() require("expansions/script/c16104200") end) then require("script/c16104200") end
      local cm=_G["c"..m] local m,cm=rscf.DefineCard(16104230,"CHURCH_KNIGHT")
      c16104230.rksetcode="CHURCH_KNIGHT"
      function cm.initial_effect(c) function cm.initial_effect(c)
      --Activate local e1=rsef.ACT(c,nil,nil,{1,m,1},"tg",nil,nil,nil,rsop.target(cm.tgfilter,"tg",LOCATION_MZONE,0,true),cm.act)
      local e1=Effect.CreateEffect(c) local e2=rsef.I(c,{m,0},{1,m+100},"td,dr",nil,LOCATION_GRAVE,nil,nil,rsop.target({Card.IsAbleToDeck,"td"},{cm.tdfilter,"td",LOCATION_GRAVE+LOCATION_REMOVED }),cm.drop)
      e1:SetDescription(aux.Stringid(m,0)) end
      e1:SetCategory(CATEGORY_TOGRAVE) function cm.tgfilter(c)
      e1:SetType(EFFECT_TYPE_ACTIVATE) return c:IsAbleToGrave() and c:IsFaceup() and rsch.IsSet1(c)
      e1:SetCode(EVENT_FREE_CHAIN) end
      e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH) function cm.act(e,tp)
      e1:SetTarget(cm.target) local g=Duel.GetMatchingGroup(cm.tgfilter,tp,LOCATION_MZONE,0,nil)
      e1:SetOperation(cm.activate) if #g>0 and Duel.SendtoGrave(g,REASON_EFFECT)>0 then
      c:RegisterEffect(e1) local atk=Duel.GetOperatedGroup():GetSum(Card.GetBaseAttack)
      --Activate for p=0,1 do
      local e2=Effect.CreateEffect(c) Duel.SetLP(p,math.max(0,Duel.GetLP(p)-atk))
      e2:SetDescription(aux.Stringid(m,1))
      e2:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCountLimit(1,m+1)
      e2:SetTarget(cm.target1)
      e2:SetOperation(cm.activate1)
      c:RegisterEffect(e2)
      end
      function cm.filter(c)
      return c.rksetcode=="CHURCH_KNIGHT" and c:IsType(TYPE_MONSTER)
      and c:IsAbleToGrave() and c:IsFaceup()
      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
      local sg=Duel.GetMatchingGroup(cm.filter,tp,LOCATION_MZONE,0,nil)
      if sg:GetCount()>0 then
      local atk=sg:GetSum(Card.GetAttack)
      end end
      Duel.SetOperationInfo(0,CATEGORY_RELEASE,sg,sg:GetCount(),0,0)
      end
      function cm.filter2(c)
      if c:IsPreviousPosition(POS_FACEUP) then
      return c:GetPreviousAttackOnField()
      else return 0 end
      end
      function cm.activate(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetMatchingGroup(cm.filter,tp,LOCATION_MZONE,0,nil)
      if g:GetCount()>0 and Duel.SendtoGrave(g,REASON_EFFECT)~=0 then
      local og=Duel.GetOperatedGroup()
      local atk=og:GetSum(cm.filter2)
      local LP1=Duel.GetLP(tp)
      local LP2=Duel.GetLP(1-tp)
      if LP1-atk<0 then Duel.SetLP(tp,0) end
      if LP2-atk<0 then Duel.SetLP(1-tp,0) end
      if LP1-atk>=0 then Duel.SetLP(tp,LP1-atk) end
      if LP2-atk>=0 then Duel.SetLP(1-tp,LP2-atk) end
      end end
      end end
      function cm.filter1(c) function cm.tdfilter(c)
      return (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH") and c:IsAbleToDeck() return rsch.IsSet1(c) and c:IsAbleToDeck()
      end end
      function cm.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function cm.drop(e,tp)
      if chkc then return chkc:IsLocation(LOCATION_REMOVED+LOCATION_GRAVE) and chkc:IsControler(tp) and cm.filter1(chkc) end local c=rscf.GetSelf(e)
      if chk==0 then return Duel.IsExistingTarget(cm.filter1,tp,LOCATION_REMOVED+LOCATION_GRAVE,0,1,e:GetHandler()) and Duel.IsPlayerCanDraw(tp,1) end if not c then return end
      Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,2,0,0) rsop.SelectSolve(HINTMSG_TODECK,tp,aux.NecroValleyFilter(cm.tdfilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,2,c,cm.solvefun,c)
      Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
      end end
      function cm.activate1(e,tp,eg,ep,ev,re,r,rp) function cm.solvefun(g,c)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) g:AddCard(c)
      local tg=Duel.SelectMatchingCard(tp,cm.filter1,tp,LOCATION_REMOVED+LOCATION_GRAVE,0,1,2,e:GetHandler()) if Duel.SendtoDeck(g,nil,2,REASON_EFFECT)>0 and Duel.GetOperatedGroup():IsExists(Card.IsLocation,1,nil,rsloc.de) then
      if Duel.SendtoDeck(tg+e:GetHandler(),nil,2,REASON_EFFECT)~=0 then if Duel.GetOperatedGroup():IsExists(Card.IsLocation,1,nil,LOCATION_DECK) then
      Duel.BreakEffect() Duel.ShuffleDeck(tp)
      end
      Duel.Draw(tp,1,REASON_EFFECT) Duel.Draw(tp,1,REASON_EFFECT)
      end end
      return true
      end end
      \ No newline at end of file
      expansions/script/c16104232.lua
      View file @ 2fd9e2d3
      --教团的圣女 让·达克 --教团的圣女 让·达克
      local m=16104232 if not pcall(function() require("expansions/script/c16104200") end) then require("script/c16104200") end
      local cm=_G["c"..m] local m,cm=rscf.DefineCard(16104232,"CHURCH")
      c16104232.rksetcode="CHURCH"
      function cm.initial_effect(c) function cm.initial_effect(c)
      c:SetUniqueOnField(1,1,m) c:SetUniqueOnField(1,1,m)
      --Sumeffect local e1=rsef.STO(c,EVENT_SUMMON_SUCCESS,{m,0},{1,m},"disd","de,dsp",nil,nil,rsop.target(cm.setfilter,nil,LOCATION_DECK,0,3),cm.setop)
      local e1=Effect.CreateEffect(c) local e2=rsef.RegisterClone(c,e1,"code",EVENT_SPSUMMON_SUCCESS)
      e1:SetDescription(aux.Stringid(m,0)) local e3=rsef.STO(c,EVENT_RELEASE,{m,1},{1,m+1},"th","de,dsp",cm.thcon,nil,rsop.target(cm.thfilter,"th",LOCATION_GRAVE),cm.thop)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) local e4=rsch.DoubleTriFun(c)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,m)
      e1:SetCost(cm.cost)
      e1:SetTarget(cm.target)
      e1:SetOperation(cm.operation)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --to hand
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(m,1))
      e3:SetCategory(CATEGORY_TOHAND)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e3:SetCode(EVENT_TO_GRAVE)
      e3:SetCountLimit(1,m+1)
      e3:SetCondition(cm.thcon)
      e3:SetTarget(cm.thtg)
      e3:SetOperation(cm.thop)
      c:RegisterEffect(e3)
      --double tribute
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_SINGLE)
      e4:SetCode(EFFECT_DOUBLE_TRIBUTE)
      e4:SetValue(cm.condition)
      c:RegisterEffect(e4)
      Duel.AddCustomActivityCounter(m,ACTIVITY_SUMMON,cm.counterfilter)
      Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter1)
      end
      function cm.counterfilter(c)
      return c:IsRace(RACE_WARRIOR)
      end
      function cm.counterfilter1(c)
      return c:GetSummonLocation()~=LOCATION_EXTRA and c:IsRace(RACE_WARRIOR)
      end
      function cm.condition(e,c)
      return (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH")
      end
      function cm.filter(c)
      return c:IsFaceup() and c:IsAbleToDeck()
      end end
      function cm.setfilter(c) function cm.setfilter(c)
      return c:IsType(TYPE_SPELL) and c:IsSSetable() and (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH") return rsch.IsSetS1(c) and c:IsSSetable()
      end end
      function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk) function cm.setop(e,tp)
      if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 and Duel.GetCustomActivityCount(m,tp,ACTIVITY_SUMMON)==0 end if Duel.IsPlayerCanSummon(tp) and Duel.IsPlayerCanAdditionalSummon(tp) and Duel.GetFlagEffect(tp,m)==0 then
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
      e1:SetTargetRange(1,0)
      e1:SetTarget(cm.splimit)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      local e2=e1:Clone()
      e2:SetCode(EFFECT_CANNOT_SUMMON)
      Duel.RegisterEffect(e2,tp)
      end
      function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
      return (not c:IsRace(RACE_WARRIOR)) or c:IsLocation(LOCATION_EXTRA)
      end
      function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.setfilter,tp,LOCATION_DECK,0,3,nil) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 end
      end
      function cm.operation(e,tp,eg,ep,ev,re,r,rp)
      if not (Duel.IsExistingMatchingCard(cm.setfilter,tp,LOCATION_DECK,0,3,nil) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0) then return end
      local g=Duel.GetMatchingGroup(cm.setfilter,tp,LOCATION_DECK,0,nil)
      if g:GetCount()>=3 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
      local sg=g:Select(tp,3,3,nil)
      Duel.ConfirmCards(1-tp,sg)
      Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_SET)
      local tg=sg:Select(1-tp,1,1,nil)
      Duel.SSet(tp,tg)
      Duel.ConfirmCards(1-tp,tg)
      Duel.SendtoGrave(sg-tg,REASON_EFFECT)
      end
      local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetDescription(aux.Stringid(m,3)) e1:SetDescription(aux.Stringid(m,3))
      e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
      ...@@ -99,28 +25,45 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -99,28 +25,45 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
      e2:SetCode(EFFECT_EXTRA_SET_COUNT) e2:SetCode(EFFECT_EXTRA_SET_COUNT)
      Duel.RegisterEffect(e2,tp) Duel.RegisterEffect(e2,tp)
      Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1) Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
      end
      local g=Duel.GetMatchingGroup(cm.setfilter,tp,LOCATION_DECK,0,nil)
      if #g<3 then return end
      rshint.Select(tp,HINTMSG_SELF)
      local sg=g:Select(tp,3,3,nil)
      Duel.ConfirmCards(1-tp,sg)
      rshint.Select(1-tp,HINTMSG_SET)
      local tg=sg:Select(1-tp,1,1,nil)
      Duel.HintSelection(tg)
      Duel.SSet(tp,tg:GetFirst())
      sg:Sub(tg)
      Duel.SendtoGrave(sg,REASON_EFFECT)
      end end
      function cm.thfilter(c) function cm.thcon(e,tp)
      return (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH") and c:IsAbleToHand() local c=e:GetHandler()
      return c:IsComplexReason(REASON_SUMMON+REASON_MATERIAL)
      end end
      function cm.thcon(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function cm.thfilter(c)
      return e:GetHandler():GetReason()==26 if not rsch.IsSet2(c) then return false end
      local b1 = c:IsAbleToHand()
      local b2 = c:IsComplexType(TYPE_SPELL+TYPE_CONTINUOUS) and c:GetActivateEffect():IsActivatable(tp,true)
      return b1 or b2
      end end
      function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function cm.thop(e,tp)
      if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and cm.thfilter(chkc) end rsop.SelectSolve(HINTMSG_SELF,tp,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,cm.solvefun,tp)
      if chk==0 then return Duel.IsExistingTarget(cm.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectTarget(tp,cm.thfilter,tp,LOCATION_GRAVE,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,g,1,0,0)
      end end
      function cm.thop(e,tp,eg,ep,ev,re,r,rp) function cm.solvefun(g,tp)
      local tc=Duel.GetFirstTarget() local tc=g:GetFirst()
      if tc:IsRelateToEffect(e) then local b1 = tc:IsAbleToHand()
      if tc:IsType(TYPE_CONTINUOUS) and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then local b2 = tc:IsComplexType(TYPE_SPELL+TYPE_CONTINUOUS) and tc:GetActivateEffect():IsActivatable(tp,true)
      Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) local op = rsop.SelectOption(tp,b1,{m,1},b2,{m,2})
      else if op == 1 then
      Duel.SendtoHand(tc,nil,REASON_EFFECT) Duel.SendtoHand(tc,nil,REASON_EFFECT)
      else
      Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
      local te=tc:GetActivateEffect()
      local tep=tc:GetControler()
      local cost=te:GetCost()
      if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
      end end
      end return true
      end end
      \ No newline at end of file
      expansions/script/c16104234.lua
      View file @ 2fd9e2d3
      --于圣殿前起誓 --于圣殿前起誓
      local m=16104234 if not pcall(function() require("expansions/script/c16104200") end) then require("script/c16104200") end
      local cm=_G["c"..m] local m,cm=rscf.DefineCard(16104234,"CHURCH")
      c16104234.rksetcode="CHURCH"
      function cm.initial_effect(c) function cm.initial_effect(c)
      --Activate local e1=rsef.ACT(c)
      local e0=Effect.CreateEffect(c) local e2=rsef.FV_CANNOT_BE_TARGET(c,"effect",aux.tgoval,aux.TargetBoolFunction(rsch.IsSet1),{LOCATION_ONFIELD,0})
      e0:SetType(EFFECT_TYPE_ACTIVATE) local e3=rsef.FV_INDESTRUCTABLE(c,"effect",1,aux.TargetBoolFunction(rsch.IsSet1),{LOCATION_ONFIELD,0})
      e0:SetCode(EVENT_FREE_CHAIN) local e4=rsef.FV_LIMIT_PLAYER(c,"act",cm.limitval,nil,{1,1})
      c:RegisterEffect(e0) local e5,e6=rsef.FV_LIMIT_PLAYER(c,"sp,sum",nil,cm.sptg,{1,0})
      --intg local e7=rsef.QO(c,nil,{m,0},1,"td",nil,LOCATION_GRAVE,nil,nil,rsop.target(cm.tdfilter,"td",rsloc.gr,0,1,1,c),cm.actop)
      local e1=Effect.CreateEffect(c) end
      e1:SetType(EFFECT_TYPE_FIELD) function cm.limitval(e,re)
      e1:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET) local rc=re:GetHandler()
      e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE) if rc:IsRace(RACE_WARRIOR) then return false end
      e1:SetRange(LOCATION_SZONE) return rc:IsStatus(STATUS_BATTLE_DESTROYED) or rc:IsComplexReason(REASON_DESTROY,true,REASON_EFFECT,REASON_BATTLE)
      e1:SetTargetRange(LOCATION_ONFIELD,0) end
      e1:SetTarget(cm.ntgtg) function cm.sptg(e,c)
      e1:SetValue(aux.tgoval) if c:IsCode(16104222) then return false end
      c:RegisterEffect(e1) return not rsch.IsSet1(c)
      --indes end
      local e1_1=Effect.CreateEffect(c) function cm.tdfilter(c,e,tp)
      e1_1:SetType(EFFECT_TYPE_FIELD) return rsch.IsSet1(c) and c:IsAbleToDeck() and e:GetHandler():GetActivateEffect():IsActivatable(tp,true,true)
      e1_1:SetCode(EFFECT_INDESTRUCTABLE) end
      e1_1:SetRange(LOCATION_SZONE) function cm.actop(e,tp)
      e1_1:SetTargetRange(LOCATION_ONFIELD,0) local c=rscf.GetSelf(e)
      e1_1:SetTarget(aux.TargetBoolFunction(Card.ischurch)) if c and rsop.SelectToDeck(tp,cm.tdfilter,tp,rsloc.gr,0,1,3,c,{},e,tp)>0 then
      e1_1:SetValue(cm.indesval) Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
      c:RegisterEffect(e1_1) local te=c:GetActivateEffect()
      --EFFECT_LIMIT te:UseCountLimit(tp,1,true)
      local e1_2=Effect.CreateEffect(c) local tep=c:GetControler()
      e1_2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) local cost=te:GetCost()
      e1_2:SetCode(EVENT_DESTROYED) if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
      e1_2:SetRange(LOCATION_SZONE)
      e1_2:SetOperation(cm.operation)
      c:RegisterEffect(e1_2)
      --SpecialSummon
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(m,1))
      e2:SetCategory(CATEGORY_LEAVE_GRAVE)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCountLimit(1)
      e2:SetTarget(cm.sptg)
      e2:SetOperation(cm.spop)
      c:RegisterEffect(e2)
      --SpecialSummon Limit
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_FIELD)
      e3:SetRange(LOCATION_SZONE)
      e3:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e3:SetTargetRange(1,0)
      e3:SetTarget(cm.sumlimit)
      c:RegisterEffect(e3)
      local e4=e3:Clone()
      e4:SetCode(EFFECT_CANNOT_SUMMON)
      c:RegisterEffect(e4)
      end
      function Card.ischurch(c)
      return (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH")
      end
      function cm.disfilter(c)
      return (not c:IsRace(RACE_WARRIOR)) and c:IsType(TYPE_MONSTER)
      end
      function cm.operation(e,tp,eg,ep,ev,re,r,rp)
      local d=eg:Filter(cm.disfilter,nil)
      if d==nil then return end
      local tc=d:GetFirst()
      while tc do
      if not tc then return end
      if tc:IsReason(REASON_DESTROY) and tc:IsReason(REASON_BATTLE+REASON_EFFECT)
      then
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_CANNOT_TRIGGER)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CLIENT_HINT)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e1)
      tc=d:GetNext()
      end
      end
      end
      function cm.indesval(e,re,r,rp)
      return bit.band(r,REASON_RULE+REASON_BATTLE)==0
      end
      function cm.ntgtg(e,c)
      return c:IsFaceup() and (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH")
      end
      function cm.sumlimit(e,c,sump,sumtype,sumpos,targetp)
      return not ((c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH") or c:IsCode(16104222))
      end
      function cm.tffilter(c)
      return (c.rksetcode=="CHURCH_KNIGHT" or c.rksetcode=="CHURCH") and c:IsAbleToDeck()
      end
      function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.IsExistingMatchingCard(cm.tffilter,tp,LOCATION_GRAVE,0,1,e:GetHandler()) end
      Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE)
      Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
      end
      function cm.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.IsExistingMatchingCard(cm.tffilter,tp,LOCATION_GRAVE,0,1,e:GetHandler()) and e:GetHandler():IsRelateToEffect(e) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELECT)
      local tg=Duel.SelectMatchingCard(tp,cm.tffilter,tp,LOCATION_GRAVE,0,1,3,e:GetHandler())
      if Duel.SendtoDeck(tg,nil,2,REASON_EFFECT)~=0 then
      Duel.MoveToField(e:GetHandler(),tp,tp,LOCATION_SZONE,POS_FACEUP,true)
      end
      end end
      end end
      \ No newline at end of file
      expansions/script/c16199990.lua
      View file @ 2fd9e2d3
      This diff is collapsed.
      expansions/script/c16199991.lua
      View file @ 2fd9e2d3
      --Real Scl Version - Variable --Real Scl Version - Variable
      local Version_Number=20200430 local Version_Number=20200807
      local m=16199990 local m=16199990
      local vm=16199991 local vm=16199991
      rsv={} --"Base Function" rsv={} --"Base Function"
      ...@@ -21,14 +21,18 @@ rsreset={} --"Reset Function" ...@@ -21,14 +21,18 @@ rsreset={} --"Reset Function"
      rshint={} --"Hint Function" rshint={} --"Hint Function"
      rsloc={} --"Location Function" rsloc={} --"Location Function"
      rsdv="Divide_Variable"
      --Info Variable --Info Variable
      rsef.valinfo ={} --"Value for inside series, inside type etc." rsval.valinfo ={} --"Value for inside series, inside type etc."
      rscost.costinfo ={} --"Cost information, for record cost value" rscost.costinfo ={} --"Cost information, for record cost value"
      rsef.targetlist ={} --"Target group list, for rstg.GetTargetAttribute" rsop.opinfo={} --"Operation information, for record something"
      rsef.relationinfo={} --"Field,Pendulum,Continous leave field"
      rstg.targetlist ={} --"Target group list, for rstg.GetTargetAttribute"
      rsef.attacheffect ={} --"Effect information for attach effects" rsef.attacheffect ={} --"Effect information for attach effects"
      rsef.attacheffectf ={} rsef.attacheffectf ={}
      rsef.solveeffect ={} rsef.solveeffect ={}
      rsef.baseop={} rsop.baseop={}
      rscf.synchro_material_action={} --"Custom syn material's action" rscf.synchro_material_action={} --"Custom syn material's action"
      rscf.xyz_material_action={} --"Custom xyz material's action" rscf.xyz_material_action={} --"Custom xyz material's action"
      ...@@ -55,26 +59,29 @@ rsreset.ered = RESET_EVENT+RESETS_REDIRECT ...@@ -55,26 +59,29 @@ rsreset.ered = RESET_EVENT+RESETS_REDIRECT
      --Code Variable --Code Variable
      rscode.Extra_Effect_Activate = m+100 --"Attach Effect" rscode.Extra_Effect_Activate = m+100 --"Attach Effect"
      rscode.Extra_Effect_BSolve = m+200 rscode.Extra_Effect_BSolve = m+101
      rscode.Extra_Effect_ASolve = m+800 rscode.Extra_Effect_ASolve = m+102
      rscode.Phase_Leave_Flag = m+200 --"Summon Flag for SummonBuff"
      rscode.Extra_Synchro_Material= m+300 --"Extra Synchro Material"
      rscode.Extra_Xyz_Material = m+301 --"Extra Xyz Material"
      rscode.Utility_Xyz_Material = m+400 --"Utility Xyz Material"
      rscode.Previous_Set_Code = m+500 --"Previous Set Code"
      rscode.Synchro_Material = m+600 --"Record synchro proceudre target"
      rscode.Pre_Complete_Proc = m+700 --"Previous c:CompleteProcedure"
      rscode.Phase_Leave_Flag = m+300 --"Summon Flag for SummonBuff" rscode.Set = m+800 --"EVENT_SET"
      rscode.Extra_Synchro_Material= m+400 --"Extra Synchro Material"
      rscode.Extra_Xyz_Material = m+401 --"Extra Xyz Material"
      rscode.Utility_Xyz_Material = m+500 --"Utility Xyz Material"
      rscode.Previous_Set_Code = m+600 --"Previous Set Code"
      rscode.Synchro_Material = m+700 --"Record synchro proceudre target"
      --Hint Message Variable --Hint Message Variable
      rshint.act=aux.Stringid(m,0) --"activate spell/trap" rshint.act=aux.Stringid(m,0) --"activate spell/trap"
      rshint.dis=aux.Stringid(m,1) --"cards will be disable effects " rshint.dis=aux.Stringid(38265153,3) --"cards will be disable effects "
      rshint.ad=aux.Stringid(m,2) --"cards will be change Atk/Def" rshint.ad=aux.Stringid(m,2) --"cards will be change Atk/Def"
      rshint.rtg=aux.Stringid(48976825,0) --"return to grave" rshint.rtg=aux.Stringid(48976825,0) --"return to grave"
      rshint.spproc=aux.Stringid(m,4) --"SS by self produce" rshint.spproc=aux.Stringid(m,4) --"SS by self produce"
      rshint.negeffect=aux.Stringid(19502505,1) --"negate activation" rshint.negeffect=aux.Stringid(19502505,1) --"negate activation"
      rshint.eq=aux.Stringid(68184115,0) --"cards will equip" rshint.eq=aux.Stringid(68184115,0) --"cards will equip"
      rshint.te=aux.Stringid(24094258,3) --"add to extra deck" rshint.te=aux.Stringid(24094258,3) --"add to extra deck"
      rshint.xyz=HINTMSG_XMATERIAL --"cards will be overlay cards" rshint.xyz=HINTMSG_XMATERIAL --"cards will become overlay cards"
      rshint.diseffect=aux.Stringid(39185163,1) --"negate effect" rshint.diseffect=aux.Stringid(39185163,1) --"negate effect"
      rshint.negsum=aux.Stringid(m+1,1) --"negate summon" rshint.negsum=aux.Stringid(m+1,1) --"negate summon"
      rshint.negsp=aux.Stringid(74892653,0) --"negate special summon" rshint.negsp=aux.Stringid(74892653,0) --"negate special summon"
      ...@@ -83,12 +90,29 @@ rshint.darksynchro=aux.Stringid(m,15) --"treat as dark synchro" ...@@ -83,12 +90,29 @@ rshint.darksynchro=aux.Stringid(m,15) --"treat as dark synchro"
      rshint.choose=aux.Stringid(23912837,1) --"choose 1 effect" rshint.choose=aux.Stringid(23912837,1) --"choose 1 effect"
      rshint.epleave=aux.Stringid(m,3) --"end phase leave field" rshint.epleave=aux.Stringid(m,3) --"end phase leave field"
      rshint.finshcopy=aux.Stringid(43387895,1) --"reset copy effect" rshint.finshcopy=aux.Stringid(43387895,1) --"reset copy effect"
      rshint.act2=aux.Stringid(m,1) --"select card to activate"
      rshint.tgct=aux.Stringid(83531441,2) --"select send to the GY number"
      rshint.drct=aux.Stringid(m,5) --"select draw number"
      --[[
      rshint.isss=aux.Stringid(17535764,1) --"would you SS a monster?"
      rshint.istg=aux.Stringid(62834295,2) --"would you send to GY?"
      rshint.isdes=aux.Stringid(20590515,2) --"would you destroy?"
      rshint.istd=aux.Stringid(m,1) --"would you send to Deck?"
      rshint.isrm=aux.Stringid(93191801,2) --"would you reomve?"
      rshint.isset=aux.Stringid(m,5) --"would you set?"
      rshint.istf=aux.Stringid(m,6) --"would you place to field?"
      rshint.isth=aux.Stringid(26118970,1) --"would you send to hand?"
      rshint.isrh=aux.Stringid(31102447,2) --"would you return to hand"
      rshint.isdr=aux.Stringid(3679218,1) --"would you draw?"
      --]]
      --Property Variable --Property Variable
      rsflag.flaglist = { EFFECT_FLAG_CARD_TARGET,EFFECT_FLAG_PLAYER_TARGET,EFFECT_FLAG_DELAY,EFFECT_FLAG_DAMAGE_STEP,EFFECT_FLAG_DAMAGE_CAL, rsflag.flaglist = { EFFECT_FLAG_CARD_TARGET,EFFECT_FLAG_PLAYER_TARGET,EFFECT_FLAG_DELAY,EFFECT_FLAG_DAMAGE_STEP,EFFECT_FLAG_DAMAGE_CAL,
      EFFECT_FLAG_IGNORE_IMMUNE,EFFECT_FLAG_SET_AVAILABLE,EFFECT_FLAG_IGNORE_RANGE,EFFECT_FLAG_SINGLE_RANGE,EFFECT_FLAG_BOTH_SIDE, EFFECT_FLAG_IGNORE_IMMUNE,EFFECT_FLAG_SET_AVAILABLE,EFFECT_FLAG_IGNORE_RANGE,EFFECT_FLAG_SINGLE_RANGE,EFFECT_FLAG_BOTH_SIDE,
      EFFECT_FLAG_UNCOPYABLE,EFFECT_FLAG_CANNOT_DISABLE,EFFECT_FLAG_CANNOT_NEGATE,EFFECT_FLAG_CLIENT_HINT,EFFECT_FLAG_LIMIT_ZONE, EFFECT_FLAG_UNCOPYABLE,EFFECT_FLAG_CANNOT_DISABLE,EFFECT_FLAG_CANNOT_NEGATE,EFFECT_FLAG_CLIENT_HINT,EFFECT_FLAG_LIMIT_ZONE,
      EFFECT_FLAG_ABSOLUTE_TARGET,EFFECT_FLAG_SPSUM_PARAM } EFFECT_FLAG_ABSOLUTE_TARGET,EFFECT_FLAG_SPSUM_PARAM,
      EFFECT_FLAG_EVENT_PLAYER }
      rsflag.tg_d = EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY rsflag.tg_d = EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY
      rsflag.dsp_d = EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY rsflag.dsp_d = EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY
      rsflag.dsp_tg = EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CARD_TARGET rsflag.dsp_tg = EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CARD_TARGET
      ...@@ -110,16 +134,22 @@ rscate.neg_des = CATEGORY_NEGATE+CATEGORY_DESTROY ...@@ -110,16 +134,22 @@ rscate.neg_des = CATEGORY_NEGATE+CATEGORY_DESTROY
      rscf.typelist = { TYPE_MONSTER,TYPE_NORMAL,TYPE_EFFECT,TYPE_DUAL,TYPE_UNION,TYPE_TOON,TYPE_TUNER,TYPE_RITUAL,TYPE_FUSION,TYPE_SYNCHRO,TYPE_XYZ,TYPE_LINK,TYPE_TOKEN,TYPE_PENDULUM,TYPE_SPSUMMON,TYPE_FLIP,TYPE_SPIRIT, rscf.typelist = { TYPE_MONSTER,TYPE_NORMAL,TYPE_EFFECT,TYPE_DUAL,TYPE_UNION,TYPE_TOON,TYPE_TUNER,TYPE_RITUAL,TYPE_FUSION,TYPE_SYNCHRO,TYPE_XYZ,TYPE_LINK,TYPE_TOKEN,TYPE_PENDULUM,TYPE_SPSUMMON,TYPE_FLIP,TYPE_SPIRIT,
      TYPE_SPELL,TYPE_EQUIP,TYPE_FIELD,TYPE_CONTINUOUS,TYPE_QUICKPLAY, TYPE_SPELL,TYPE_EQUIP,TYPE_FIELD,TYPE_CONTINUOUS,TYPE_QUICKPLAY,
      TYPE_TRAP,TYPE_COUNTER,TYPE_TRAPMONSTER } TYPE_TRAP,TYPE_COUNTER,TYPE_TRAPMONSTER }
      rscf.extype = TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ+TYPE_PENDULUM+TYPE_LINK rscf.extype = TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ+TYPE_LINK
      rscf.extype_r = rscf.extype + TYPE_RITUAL rscf.extype_r = rscf.extype + TYPE_RITUAL
      rscf.extype_np = rscf.extype - TYPE_PENDULUM rscf.extype_p = rscf.extype + TYPE_PENDULUM
      rscf.extype_rp = rscf.extype + TYPE_RITUAL + TYPE_PENDULUM
      rscf.exlist = { TYPE_FUSION,TYPE_SYNCHRO,TYPE_XYZ,TYPE_LINK } rscf.exlist = { TYPE_FUSION,TYPE_SYNCHRO,TYPE_XYZ,TYPE_LINK }
      rscf.exlist_r = { TYPE_FUSION,TYPE_SYNCHRO,TYPE_XYZ,TYPE_LINK,TYPE_RITUAL }
      rscf.exlist_p = { TYPE_FUSION,TYPE_SYNCHRO,TYPE_XYZ,TYPE_LINK,TYPE_PENDULUM }
      rscf.exlist_rp = { TYPE_FUSION,TYPE_SYNCHRO,TYPE_XYZ,TYPE_LINK,TYPE_PENDULUM,TYPE_RITUAL }
      --Location Variable --Location Variable
      rsloc.hd=LOCATION_HAND+LOCATION_DECK rsloc.hd=LOCATION_HAND+LOCATION_DECK
      rsloc.ho=LOCATION_HAND+LOCATION_ONFIELD
      rsloc.hg=LOCATION_HAND+LOCATION_GRAVE rsloc.hg=LOCATION_HAND+LOCATION_GRAVE
      rsloc.dg=LOCATION_DECK+LOCATION_GRAVE rsloc.dg=LOCATION_DECK+LOCATION_GRAVE
      rsloc.gr=LOCATION_GRAVE+LOCATION_REMOVED rsloc.gr=LOCATION_GRAVE+LOCATION_REMOVED
      rsloc.dgr=LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED
      rsloc.hdg=LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE rsloc.hdg=LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE
      rsloc.de=LOCATION_DECK+LOCATION_EXTRA rsloc.de=LOCATION_DECK+LOCATION_EXTRA
      rsloc.mg=LOCATION_MZONE+LOCATION_GRAVE rsloc.mg=LOCATION_MZONE+LOCATION_GRAVE
      ...@@ -131,6 +161,7 @@ rsloc.all=0xff ...@@ -131,6 +161,7 @@ rsloc.all=0xff
      --Escape Old Functions --Escape Old Functions
      function rsof.Escape_Old_Functions() function rsof.Escape_Old_Functions()
      rsof.DefineCard = rscf.DefineCard rsof.DefineCard = rscf.DefineCard
      rscf.FilterFaceUp = rscf.fufilter
      rsof.SendtoHand = rsop.SendtoHand rsof.SendtoHand = rsop.SendtoHand
      rsof.SendtoDeck = rsop.SendtoDeck rsof.SendtoDeck = rsop.SendtoDeck
      rsof.SendtoGrave = rsop.SendtoGrave rsof.SendtoGrave = rsop.SendtoGrave
      ...@@ -142,6 +173,7 @@ function rsof.Escape_Old_Functions() ...@@ -142,6 +173,7 @@ function rsof.Escape_Old_Functions()
      rsof.SelectNumber= rsop.AnnounceNumber rsof.SelectNumber= rsop.AnnounceNumber
      rsof.SelectNumber_List= rsop.AnnounceNumber_List rsof.SelectNumber_List= rsop.AnnounceNumber_List
      rsof.IsSet = rscf.DefineSet rsof.IsSet = rscf.DefineSet
      rscf.GetRelationThisCard = rscf.GetFaceUpSelf
      --some card use old SummonBuff's phase leave field parterment, must fix them in their luas --some card use old SummonBuff's phase leave field parterment, must fix them in their luas
      rssf.SummonBuff=function(attlist,isdis,isdistig,selfleave,phaseleave) rssf.SummonBuff=function(attlist,isdis,isdistig,selfleave,phaseleave)
      local bufflist={} local bufflist={}
      ...@@ -170,6 +202,7 @@ function rsof.Escape_Old_Functions() ...@@ -170,6 +202,7 @@ function rsof.Escape_Old_Functions()
      end end
      return bufflist return bufflist
      end end
      rsop.eqop = rsop.Equip
      end end
      expansions/script/c16199992.lua
      View file @ 2fd9e2d3
      --Record Author --Record Author
      local am=16199992 local am=16199992
      local Version_Number=20200430 local Version_Number=20200807
      --Scl #Scl
      local rsdka = Dakyria local rsdka = Dakyria
      local rsdio = Diablo local rsdio = Diablo
      local rsnr = Night_Raven local rsnr = Night_Raven
      ...@@ -10,12 +10,13 @@ local rsem = Eridiument ...@@ -10,12 +10,13 @@ local rsem = Eridiument
      local rsxb = XB local rsxb = XB
      local rsos = Oracle_Smith local rsos = Oracle_Smith
      local rssp = Stellar_Pearl local rssp = Stellar_Pearl
      --local rsgd = Ghostdom_Dragon //local rsgd = Ghostdom_Dragon
      local rsed = Epic_Dragon local rsed = Epic_Dragon
      local rsdh = Devil_Hunter local rsdh = Devil_Hunter
      local rsds = Dark_Souls local rsds = Dark_Souls
      local rsca = Corona
      --Scl - Special Mode #Scl - Special Mode
      local rssm = Special_Mode local rssm = Special_Mode
      local rssmb = Special_Mode_Change_Base_Function local rssmb = Special_Mode_Change_Base_Function
      local rssmt = Special_Mode_Turbo_Duel local rssmt = Special_Mode_Turbo_Duel
      ...@@ -26,18 +27,18 @@ local rssmf = Special_Mode_Fast_Duel ...@@ -26,18 +27,18 @@ local rssmf = Special_Mode_Fast_Duel
      local rssmm = Special_Mode_Multiple_Duel local rssmm = Special_Mode_Multiple_Duel
      local rssmu = Special_Mode_Universal_Duel local rssmu = Special_Mode_Universal_Duel
      --Gale 1472676207 #Gale 1472676207
      local rsve = Voison local rsve = Voison
      local rsneov= Neons local rsneov= Neons
      local tfrsv = T.Fairies local tfrsv = T.Fairies
      local rsss = Star_Spirit local rsss = Star_Spirit
      --ChiJiang 626386490 #ChiJiang 626386490
      local rsnm = Nightmare local rsnm = Nightmare
      local rslf = Little_Fox local rslf = Little_Fox
      local rccv = Thermonuclear local rccv = Thermonuclear
      --XiaoMi 643865567 #XiaoMi 643865567
      local rssg = Sex_Gun local rssg = Sex_Gun
      local rsps = Pseudo_Soul local rsps = Pseudo_Soul
      local rsdcc = Dragon_Chess_Corps local rsdcc = Dragon_Chess_Corps
      ...@@ -50,48 +51,58 @@ local rsik = Infernal_Knight ...@@ -50,48 +51,58 @@ local rsik = Infernal_Knight
      local rsvw = Virus_Wrom local rsvw = Virus_Wrom
      local rsia = Indolent_Angel local rsia = Indolent_Angel
      local rsso = Simulated_Organism local rsso = Simulated_Organism
      local rstr = True_Ritual
      --NianBao 583322404 #NianBao 583322404
      local rslap = Lapin local rslap = Lapin
      local rskh = Karehana local rskh = Karehana
      --XiaoDaoHeng 1614895649 #XiaoDaoHeng 1614895649
      local rslrd = Life_DeathRound_Dance local rslrd = Life_DeathRound_Dance
      --Huang 1184387005 #Huang 1184387005
      local rsts = Trinity_Sword local rsts = Trinity_Sword
      --Luoxing 1151483512 #Luoxing 1151483512
      local rsdt = Dark_Tale local rsdt = Dark_Tale
      local rsod = Order local rsod = Order
      --YunZeZhun 1587361112 #YunZeZhun 1587361112
      local rsphh = Phantom_Thieves_Of_Hearts local rsphh = Phantom_Thieves_Of_Hearts
      local rsgc = Guard_City local rsgc = Guard_City
      --ZhenDong #ZhenDong
      local rsfv = Fgo/Assassin local rsfv = Fgo/Assassin
      --JingJing 1772438857 #JingJing 1772438857
      local rsba = BlueAngel local rsba = BlueAngel
      --Akashic 3204027606 #Akashic 3204027606
      local rszg = Zogu local rszg = Zogu
      local rsgs = Gran_Sphere local rsgs = Gran_Sphere
      local rsoc = Oligocene_Civilization local rsoc = Oligocene_Civilization
      local rsgol = Giant_of_Light
      local rssb = Space_Beasts
      --HeiBai 1172777968 #HeiBai 1172777968
      local rstm = Toaru_Majutsu_no_Index local rstm = Toaru_Majutsu_no_Index
      --2558566212 #2558566212
      local rsgod = God local rsgod = God
      #02 1164477469
      local rsva = VR_Aqua
      #REIKAI 2404873791
      local rsch = Churck
      --Set Code --Set Code
      --Scl #Scl
      --local = 0x1330 --local = 0x1330
      local Alchement_Bio = 0x3330 local Alchement_Bio = 0x3330
      local Chaos_Alchemy = 0x5330 local Chaos_Alchemy = 0x5330
      local Azure_Wing_Mercenary = 0x6330 local Azure-Wing_Mercenary = 0x6330
      local Oracleoath = 0x9330 local Oracleoath = 0x9330
      local Zrouf_Mantra = 0xa330 local Zrouf_Mantra = 0xa330
      local Autumntale = 0xc330 local Autumntale = 0xc330
      ......
      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