Skip to content

Y
ygopro-222DIY-cards
Commit 683b5c1b authored by 花桃白音's avatar 花桃白音
Browse files
Options

fix #116s,128,172,187s,317s,714,791s,819s

parent 65547dcd
Pipeline #32942 passed with stages
      in 45 minutes and 17 seconds
      Hide whitespace changes
      Inline Side-by-side
      Showing with 64 additions and 45 deletions
      expansions/script/c11600560.lua
      View file @ 683b5c1b
      ...@@ -14,7 +14,7 @@ function c11600560.initial_effect(c) ...@@ -14,7 +14,7 @@ function c11600560.initial_effect(c)
      c:RegisterEffect(e1) c:RegisterEffect(e1)
      --recover --recover
      local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_RECOVER) e2:SetCategory(CATEGORY_RECOVER+CATEGORY_TOHAND)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e2:SetCode(EVENT_BATTLE_DESTROYING) e2:SetCode(EVENT_BATTLE_DESTROYING)
      ...@@ -74,14 +74,23 @@ end ...@@ -74,14 +74,23 @@ end
      function c11600560.rectg(e,tp,eg,ep,ev,re,r,rp,chk) function c11600560.rectg(e,tp,eg,ep,ev,re,r,rp,chk)
      local tc=e:GetHandler():GetBattleTarget() local tc=e:GetHandler():GetBattleTarget()
      local atk=tc:GetBaseAttack() local atk=tc:GetBaseAttack()
      if chk==0 then return atk>0 end local g=Duel.GetMatchingGroup(Card.IsAbleToHand,tp,LOCATION_ONFIELD,0,nil)
      if chk==0 then return atk>0 and #g>0 end
      Duel.SetTargetPlayer(tp) Duel.SetTargetPlayer(tp)
      Duel.SetTargetParam(atk) Duel.SetTargetParam(atk)
      Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,atk) Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,atk)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,tp,LOCATION_ONFIELD)
      end end
      function c11600560.recop(e,tp,eg,ep,ev,re,r,rp) function c11600560.recop(e,tp,eg,ep,ev,re,r,rp)
      local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM) local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
      Duel.Recover(p,d,REASON_EFFECT) if Duel.Recover(p,d,REASON_EFFECT)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
      local g=Duel.SelectMatchingCard(tp,Card.IsAbleToHand,tp,LOCATION_ONFIELD,0,1,1,nil)
      if #g>0 then
      Duel.BreakEffect()
      Duel.SendtoHand(g,nil,0x40)
      end
      end
      end end
      function c11600560.condition(e,tp,eg,ep,ev,re,r,rp) function c11600560.condition(e,tp,eg,ep,ev,re,r,rp)
      return re:GetHandler():IsRelateToEffect(re) and rp==1-tp return re:GetHandler():IsRelateToEffect(re) and rp==1-tp
      ......
      expansions/script/c11601240.lua
      View file @ 683b5c1b
      ...@@ -3,9 +3,9 @@ function c11601240.initial_effect(c) ...@@ -3,9 +3,9 @@ function c11601240.initial_effect(c)
      --link summon --link summon
      aux.AddLinkProcedure(c,c11601240.lfilter,2,2,c11601240.lcheck) aux.AddLinkProcedure(c,c11601240.lfilter,2,2,c11601240.lcheck)
      c:EnableReviveLimit() c:EnableReviveLimit()
      --remove --tohand
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_REMOVE) e1:SetCategory(CATEGORY_TOHAND)
      e1:SetType(EFFECT_TYPE_IGNITION) e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_MZONE) e1:SetRange(LOCATION_MZONE)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      ...@@ -74,9 +74,9 @@ function c11601240.thcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -74,9 +74,9 @@ function c11601240.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
      end end
      function c11601240.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c11601240.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(1-tp) and chkc:IsAbleToRemove() end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(1-tp) and chkc:IsAbleToRemove() end
      if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToRemove,tp,0,LOCATION_GRAVE,1,nil) end if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToHand,tp,0,LOCATION_GRAVE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,0,LOCATION_GRAVE,1,1,nil) local g=Duel.SelectTarget(tp,Card.IsAbleToHand,tp,0,LOCATION_GRAVE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,nil,LOCATION_GRAVE) Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,nil,LOCATION_GRAVE)
      end end
      function c11601240.thop(e,tp,eg,ep,ev,re,r,rp) function c11601240.thop(e,tp,eg,ep,ev,re,r,rp)
      ......
      expansions/script/c12847015.lua
      View file @ 683b5c1b
      ...@@ -39,6 +39,7 @@ function c12847015.initial_effect(c) ...@@ -39,6 +39,7 @@ function c12847015.initial_effect(c)
      e21:SetCode(EVENT_ATTACK_ANNOUNCE) e21:SetCode(EVENT_ATTACK_ANNOUNCE)
      e21:SetRange(LOCATION_MZONE) e21:SetRange(LOCATION_MZONE)
      e21:SetCondition(c12847015.negcon1) e21:SetCondition(c12847015.negcon1)
      e21:SetTarget(c12847015.negtg2)
      e21:SetOperation(c12847015.negop1) e21:SetOperation(c12847015.negop1)
      c:RegisterEffect(e21) c:RegisterEffect(e21)
      --counter --counter
      ...@@ -112,9 +113,10 @@ function c12847015.negcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -112,9 +113,10 @@ function c12847015.negcon(e,tp,eg,ep,ev,re,r,rp)
      return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) and e:GetHandler():GetFlagEffect(12847015)>0 and rp==1-tp return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) and e:GetHandler():GetFlagEffect(12847015)>0 and rp==1-tp
      end end
      function c12847015.negtg(e,tp,eg,ep,ev,re,r,rp,chk) function c12847015.negtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return e:GetHandler():IsAbleToDeck() end if chk==0 then return e:GetHandler():IsAbleToDeck() and Duel.GetFlagEffect(tp,12847015)==0 end
      Duel.SetOperationInfo(0,CATEGORY_TODECK,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_TODECK,e:GetHandler(),1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0) Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
      Duel.RegisterFlagEffect(tp,12847015,RESET_PHASE+PHASE_END,0,1)
      if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
      end end
      ...@@ -130,6 +132,10 @@ end ...@@ -130,6 +132,10 @@ end
      function c12847015.negcon1(e,tp,eg,ep,ev,re,r,rp) function c12847015.negcon1(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetAttacker():GetControler()~=tp and e:GetHandler():GetFlagEffect(12847015)>0 and e:GetHandler():IsAbleToDeck() return Duel.GetAttacker():GetControler()~=tp and e:GetHandler():GetFlagEffect(12847015)>0 and e:GetHandler():IsAbleToDeck()
      end end
      function c12847015.negtg2(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetFlagEffect(tp,12847015)==0 end
      Duel.RegisterFlagEffect(tp,12847015,RESET_PHASE+PHASE_END,0,1)
      end
      function c12847015.negop1(e,tp,eg,ep,ev,re,r,rp) function c12847015.negop1(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler() local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoDeck(c,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)>0 and c:IsLocation(LOCATION_DECK) then if c:IsRelateToEffect(e) and Duel.SendtoDeck(c,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)>0 and c:IsLocation(LOCATION_DECK) then
      ......
      expansions/script/c18700080.lua
      View file @ 683b5c1b
      ...@@ -54,11 +54,9 @@ function cm.tdop(e,tp,eg,ep,ev,re,r,rp) ...@@ -54,11 +54,9 @@ function cm.tdop(e,tp,eg,ep,ev,re,r,rp)
      Duel.MoveSequence(tc,nseq) Duel.MoveSequence(tc,nseq)
      end end
      end end
      function cm.spfilter(c,e,tp)
      return c:IsSetCard(0x823) and c:IsAbleToDeck()
      end
      function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end if chk==0 then return Duel.IsExistingMatchingCard(cm.spfilter2,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
      end end
      function cm.spfilter2(c,e,tp) function cm.spfilter2(c,e,tp)
      ......
      expansions/script/c18700128.lua
      View file @ 683b5c1b
      ...@@ -15,7 +15,7 @@ function cm.initial_effect(c) ...@@ -15,7 +15,7 @@ function cm.initial_effect(c)
      local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(m,1)) e3:SetDescription(aux.Stringid(m,1))
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_QUICK_O) e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetProperty(EFFECT_FLAG_CARD_TARGET) e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e3:SetRange(LOCATION_GRAVE) e3:SetRange(LOCATION_GRAVE)
      e3:SetCode(EVENT_FREE_CHAIN) e3:SetCode(EVENT_FREE_CHAIN)
      ......
      expansions/script/c18700188.lua
      View file @ 683b5c1b
      ...@@ -17,6 +17,7 @@ function cm.initial_effect(c) ...@@ -17,6 +17,7 @@ function cm.initial_effect(c)
      e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_SUMMON_SUCCESS) e2:SetCode(EVENT_SUMMON_SUCCESS)
      e2:SetProperty(EFFECT_FLAG_DELAY)
      e2:SetCountLimit(1,m+1) e2:SetCountLimit(1,m+1)
      e2:SetTarget(cm.thtg) e2:SetTarget(cm.thtg)
      e2:SetOperation(cm.thop) e2:SetOperation(cm.thop)
      ......
      expansions/script/c18700290.lua
      View file @ 683b5c1b
      ...@@ -90,13 +90,13 @@ function cm.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -90,13 +90,13 @@ function cm.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      end end
      function cm.eqop(e,tp,eg,ep,ev,re,r,rp) function cm.eqop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler() local c=e:GetHandler()
      local tc=Duel.GetFirstTarget()
      local b1=Duel.IsExistingMatchingCard(nil,tp,0,LOCATION_HAND,1,nil) local b1=Duel.IsExistingMatchingCard(nil,tp,0,LOCATION_HAND,1,nil)
      local zt=tc:GetControler() local zt=tc:GetControler()
      local op=aux.SelectFromOptions(zt, local op=aux.SelectFromOptions(zt,
      {true,aux.Stringid(m,2)}, {true,aux.Stringid(m,2)},
      {b1,aux.Stringid(m,3)}) {b1,aux.Stringid(m,3)})
      if op==1 then if op==1 then
      local tc=Duel.GetFirstTarget()
      local zt=tc:GetControler() local zt=tc:GetControler()
      if Duel.MoveToField(tc,zt,zt,LOCATION_SZONE,POS_FACEDOWN,true) then if Duel.MoveToField(tc,zt,zt,LOCATION_SZONE,POS_FACEDOWN,true) then
      local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
      ...@@ -145,7 +145,7 @@ end ...@@ -145,7 +145,7 @@ end
      function cm.eqtg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function cm.eqtg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) end if chkc then return chkc:IsLocation(LOCATION_MZONE) end
      if chk==0 then return Duel.IsExistingTarget(Card.IsCanChangePosition,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(Card.IsCanChangePosition,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE)
      local g=Duel.SelectTarget(tp,Card.IsCanChangePosition,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil) local g=Duel.SelectTarget(tp,Card.IsCanChangePosition,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_POSITION,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_POSITION,g,1,0,0)
      end end
      ......
      expansions/script/c31710011.lua
      View file @ 683b5c1b
      ...@@ -5,7 +5,7 @@ function s.initial_effect(c) ...@@ -5,7 +5,7 @@ function s.initial_effect(c)
      e0:SetDescription(aux.Stringid(id,0)) e0:SetDescription(aux.Stringid(id,0))
      e0:SetCategory(CATEGORY_SPECIAL_SUMMON) e0:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e0:SetProperty(EFFECT_FLAG_DELAY) e0:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
      e0:SetCode(EVENT_SUMMON_SUCCESS) e0:SetCode(EVENT_SUMMON_SUCCESS)
      e0:SetCountLimit(1,id) e0:SetCountLimit(1,id)
      e0:SetTarget(s.sumtg) e0:SetTarget(s.sumtg)
      ......
      expansions/script/c31710022.lua
      View file @ 683b5c1b
      ...@@ -54,8 +54,8 @@ function s.spfilter(c) ...@@ -54,8 +54,8 @@ function s.spfilter(c)
      end end
      function s.spcon(e,c) function s.spcon(e,c)
      if c==nil then return true end if c==nil then return true end
      return Duel.GetLocationCountFromEx(c:GetControler())>0 return Duel.GetLocationCountFromEx(e:GetHandlerPlayer())>0
      and Duel.IsExistingMatchingCard(s.spfilter,c:GetControler(),LOCATION_HAND+LOCATION_GRAVE+LOCATION_MZONE,0,1,c) and c:IsCanBeSpecialSummoned(e,0,tp,true,false) and Duel.IsExistingMatchingCard(s.spfilter,e:GetHandlerPlayer(),LOCATION_HAND+LOCATION_GRAVE+LOCATION_MZONE,0,1,c) and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
      end end
      function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,c) function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,c)
      local g=Duel.GetMatchingGroup(s.spfilter,tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_MZONE,0,c) local g=Duel.GetMatchingGroup(s.spfilter,tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_MZONE,0,c)
      ...@@ -98,7 +98,7 @@ function s.spetg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -98,7 +98,7 @@ function s.spetg(e,tp,eg,ep,ev,re,r,rp,chk)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_HAND) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_HAND)
      end end
      function s.sfilter(c,e,tp) function s.sfilter(c,e,tp)
      return c:IsSetCard(0x690) and c:IsType(TYPE_MONSTER) and c:IsRace(RACE_WARRIOR) return c:IsSetCard(0x690) and c:IsType(TYPE_MONSTER) and c:IsRace(RACE_WARRIOR) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end end
      function s.speop(e,tp,eg,ep,ev,re,r,rp) function s.speop(e,tp,eg,ep,ev,re,r,rp)
      --local zone=e:GetHandler():GetLinkedZone(tp) --local zone=e:GetHandler():GetLinkedZone(tp)
      ......
      expansions/script/c31710035.lua
      View file @ 683b5c1b
      ...@@ -27,15 +27,7 @@ function s.initial_effect(c) ...@@ -27,15 +27,7 @@ function s.initial_effect(c)
      e5:SetCost(s.descost) e5:SetCost(s.descost)
      e5:SetOperation(s.thop) e5:SetOperation(s.thop)
      c:RegisterEffect(e5) c:RegisterEffect(e5)
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e2:SetCode(EFFECT_CANNOT_REMOVE)
      --e2:SetTargetRange(1,0)
      e2:SetTarget(s.efilter)
      --e2:SetReset(RESET_PHASE+PHASE_END)
      --c:RegisterEffect(e2)
      --c:RegisterEffect(e2)
      local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(id,2)) e3:SetDescription(aux.Stringid(id,2))
      e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
      ...@@ -98,12 +90,11 @@ function s.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -98,12 +90,11 @@ function s.operation(e,tp,eg,ep,ev,re,r,rp)
      --Duel.RegisterEffect(e1,tp) --Duel.RegisterEffect(e1,tp)
      end end
      end end
      function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chkc then return chkc:IsLocation(LOCATION_REMOVED) and chkc:IsControler(tp) and s.thfilter(chkc) and not Duel.IsPlayerAffectedByEffect(tp,59822133) end if chk==0 then return Duel.IsExistingMatchingCard(s.remfilter2,tp,LOCATION_REMOVED,0,1,e:GetHandler(),e,tp) and Duel.GetFieldGroupCount(e:GetHandlerPlayer(),0,LOCATION_MZONE)>0 and not Duel.IsPlayerAffectedByEffect(tp,59822133) end
      if chk==0 then return Duel.IsExistingTarget(s.remfilter,tp,LOCATION_REMOVED,0,1,e:GetHandler()) and Duel.GetFieldGroupCount(e:GetHandlerPlayer(),0,LOCATION_MZONE)>0 end
      --Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) --Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      --local g=Duel.SelectTarget(tp,s.thfilter,tp,LOCATION_GRAVE,0,1,1,e:GetHandler()) --local g=Duel.SelectTarget(tp,s.thfilter,tp,LOCATION_GRAVE,0,1,1,e:GetHandler())
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,nil,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,nil,0,0)
      Duel.SetOperationInfo(0,CATEGORY_TODECK,e:GetHandler(),nil,0,0) Duel.SetOperationInfo(0,CATEGORY_TODECK,e:GetHandler(),nil,0,0)
      end end
      function s.thop(e,tp,eg,ep,ev,re,r,rp) function s.thop(e,tp,eg,ep,ev,re,r,rp)
      ...@@ -112,7 +103,7 @@ function s.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -112,7 +103,7 @@ function s.thop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local c=e:GetHandler() local c=e:GetHandler()
      local fid=c:GetFieldID() local fid=c:GetFieldID()
      local g=Duel.SelectMatchingCard(tp,s.remfilter,tp,LOCATION_REMOVED,0,1,Duel.GetFieldGroupCount(e:GetHandlerPlayer(),0,LOCATION_MZONE),nil) local g=Duel.SelectMatchingCard(tp,s.remfilter2,tp,LOCATION_REMOVED,0,1,Duel.GetFieldGroupCount(e:GetHandlerPlayer(),0,LOCATION_MZONE),nil,e,tp)
      if not #g then return end if not #g then return end
      local tc=g:GetFirst() local tc=g:GetFirst()
      while tc do while tc do
      ...@@ -169,6 +160,9 @@ end ...@@ -169,6 +160,9 @@ end
      function s.remfilter(c) function s.remfilter(c)
      return c:IsSetCard(0x690) and c:IsType(TYPE_MONSTER) and c:IsRace(RACE_WARRIOR) return c:IsSetCard(0x690) and c:IsType(TYPE_MONSTER) and c:IsRace(RACE_WARRIOR)
      end end
      function s.remfilter2(c,e,tp)
      return c:IsSetCard(0x690) and c:IsType(TYPE_MONSTER) and c:IsRace(RACE_WARRIOR) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function s.tdfilter(c) function s.tdfilter(c)
      return (not c:IsRace(RACE_WARRIOR)) and c:IsAbleToDeck() return (not c:IsRace(RACE_WARRIOR)) and c:IsAbleToDeck()
      end end
      ......
      expansions/script/c71402004.lua
      View file @ 683b5c1b
      --风来之国的旅者 约翰与珊 --风来之国的旅者 约翰与珊
      function c71402004.initial_effect(c) function c71402004.initial_effect(c)
      --link summon --link summon
      c:EnableReviveLimit()
      aux.AddLinkProcedure(c,nil,2,2,c71402004.lcheck) aux.AddLinkProcedure(c,nil,2,2,c71402004.lcheck)
      --atk --atk
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      ......
      expansions/script/c79100610.lua
      View file @ 683b5c1b
      ...@@ -75,7 +75,7 @@ function s.efop(e,tp,eg,ep,ev,re,r,rp) ...@@ -75,7 +75,7 @@ function s.efop(e,tp,eg,ep,ev,re,r,rp)
      local e1=Effect.CreateEffect(rc) local e1=Effect.CreateEffect(rc)
      e1:SetDescription(aux.Stringid(id,2)) e1:SetDescription(aux.Stringid(id,2))
      e1:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW) e1:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetProperty(EFFECT_FLAG_CLIENT_HINT+EFFECT_FLAG_CARD_TARGET)
      e1:SetType(EFFECT_TYPE_IGNITION) e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_MZONE) e1:SetRange(LOCATION_MZONE)
      e1:SetCountLimit(1) e1:SetCountLimit(1)
      ......
      expansions/script/c79100620.lua
      View file @ 683b5c1b
      ...@@ -104,6 +104,7 @@ function s.efop(e,tp,eg,ep,ev,re,r,rp) ...@@ -104,6 +104,7 @@ function s.efop(e,tp,eg,ep,ev,re,r,rp)
      e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetType(EFFECT_TYPE_QUICK_O)
      e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetRange(LOCATION_MZONE) e1:SetRange(LOCATION_MZONE)
      e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
      e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END) e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
      e1:SetCountLimit(1) e1:SetCountLimit(1)
      e1:SetCost(s.descost) e1:SetCost(s.descost)
      ......
      expansions/script/c81902042.lua
      View file @ 683b5c1b
      ...@@ -4,7 +4,6 @@ local cm=_G["c"..m] ...@@ -4,7 +4,6 @@ local cm=_G["c"..m]
      Duel.LoadScript("yakumonue.lua") Duel.LoadScript("yakumonue.lua")
      cm.TC_number=41 cm.TC_number=41
      function cm.initial_effect(c) function cm.initial_effect(c)
      aux.AddCodeList(c,81902000)
      --xyz summon --xyz summon
      aux.AddXyzProcedure(c,nil,8,2) aux.AddXyzProcedure(c,nil,8,2)
      c:EnableReviveLimit() c:EnableReviveLimit()
      ......
      expansions/script/c81902043.lua
      View file @ 683b5c1b
      ...@@ -14,7 +14,6 @@ function cm.initial_effect(c) ...@@ -14,7 +14,6 @@ function cm.initial_effect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_GRAVE_SPSUMMON) e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_GRAVE_SPSUMMON)
      e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetType(EFFECT_TYPE_QUICK_O)
      e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
      --e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetRange(LOCATION_MZONE) e1:SetRange(LOCATION_MZONE)
      e1:SetCountLimit(1,m) e1:SetCountLimit(1,m)
      e1:SetTarget(cm.sptg) e1:SetTarget(cm.sptg)
      ...@@ -29,7 +28,7 @@ function cm.initial_effect(c) ...@@ -29,7 +28,7 @@ function cm.initial_effect(c)
      e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL) e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
      e2:SetCode(EVENT_CHAINING) e2:SetCode(EVENT_CHAINING)
      e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
      e2:SetCountLimit(1) e2:SetCountLimit(1,m+100)
      e2:SetCondition(cm.discon) e2:SetCondition(cm.discon)
      e2:SetTarget(cm.distg) e2:SetTarget(cm.distg)
      e2:SetOperation(cm.disop) e2:SetOperation(cm.disop)
      ......
      expansions/script/c81902104.lua
      View file @ 683b5c1b
      ...@@ -15,7 +15,7 @@ function cm.initial_effect(c) ...@@ -15,7 +15,7 @@ function cm.initial_effect(c)
      e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_SPSUM_PARAM) e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_SPSUM_PARAM)
      e0:SetTargetRange(POS_FACEUP,1) e0:SetTargetRange(POS_FACEUP,1)
      e0:SetRange(LOCATION_EXTRA) e0:SetRange(LOCATION_EXTRA)
      e0:SetCountLimit(1) e0:SetCountLimit(1,m+EFFECT_FLAG_OATH)
      e0:SetCondition(cm.con) e0:SetCondition(cm.con)
      e0:SetTarget(cm.tg) e0:SetTarget(cm.tg)
      e0:SetOperation(cm.op) e0:SetOperation(cm.op)
      ...@@ -28,7 +28,7 @@ function cm.initial_effect(c) ...@@ -28,7 +28,7 @@ function cm.initial_effect(c)
      e00:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_SPSUM_PARAM) e00:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_SPSUM_PARAM)
      e00:SetTargetRange(POS_FACEUP,0) e00:SetTargetRange(POS_FACEUP,0)
      e00:SetRange(LOCATION_EXTRA) e00:SetRange(LOCATION_EXTRA)
      e00:SetCountLimit(1) e00:SetCountLimit(1,m+EFFECT_FLAG_OATH)
      e00:SetCondition(cm.con2) e00:SetCondition(cm.con2)
      e00:SetTarget(cm.tg2) e00:SetTarget(cm.tg2)
      e00:SetOperation(cm.op2) e00:SetOperation(cm.op2)
      ...@@ -48,7 +48,7 @@ function cm.initial_effect(c) ...@@ -48,7 +48,7 @@ function cm.initial_effect(c)
      end end
      --spsummon --spsummon
      function cm.xyzfilter(c,e,tp) function cm.xyzfilter(c,e,tp)
      return c:IsCanBeXyzMaterial(e:GetHandler()) and (Duel.GetLocationCountFromEx(tp)>0 or Duel.GetLocationCountFromEx(1-tp)>0) and c:GetOverlayCount()>0 and c:IsType(TYPE_XYZ) return c:IsCanBeXyzMaterial(e:GetHandler()) and (Duel.GetLocationCountFromEx(tp)>0 or Duel.GetLocationCountFromEx(1-tp)>0) and c:GetOverlayCount()>0 and c:IsType(TYPE_XYZ) and c:IsFaceup()
      end end
      function cm.con(e,c) function cm.con(e,c)
      return Duel.IsExistingMatchingCard(cm.xyzfilter,e:GetHandlerPlayer(),0,LOCATION_MZONE,1,nil,e,e:GetHandlerPlayer()) and Duel.GetFlagEffect(e:GetHandlerPlayer(),m)==0 return Duel.IsExistingMatchingCard(cm.xyzfilter,e:GetHandlerPlayer(),0,LOCATION_MZONE,1,nil,e,e:GetHandlerPlayer()) and Duel.GetFlagEffect(e:GetHandlerPlayer(),m)==0
      ...@@ -144,6 +144,15 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -144,6 +144,15 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Overlay(tc,c) Duel.Overlay(tc,c)
      end end
      tc:RegisterFlagEffect(m+100,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,3)) tc:RegisterFlagEffect(m+100,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,3))
      local e0=Effect.CreateEffect(c)
      e0:SetType(EFFECT_TYPE_FIELD)
      e0:SetCode(EFFECT_CANNOT_ATTACK_ANNOUNCE)
      e0:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
      e0:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
      e0:SetTarget(cm.ftarget)
      e0:SetLabel(tc:GetFieldID())
      e0:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e0,tp)
      end end
      end end
      function cm.tdcon(e,tp,eg,ep,ev,re,r,rp) function cm.tdcon(e,tp,eg,ep,ev,re,r,rp)
      ...@@ -158,7 +167,9 @@ function cm.tdop(e,tp,eg,ep,ev,re,r,rp) ...@@ -158,7 +167,9 @@ function cm.tdop(e,tp,eg,ep,ev,re,r,rp)
      end end
      Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT) Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
      end end
      function cm.ftarget(e,c)
      return e:GetLabel()~=c:GetFieldID()
      end
      ......
      expansions/script/c81902105.lua
      View file @ 683b5c1b
      ...@@ -15,7 +15,7 @@ function cm.initial_effect(c) ...@@ -15,7 +15,7 @@ function cm.initial_effect(c)
      e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_SPSUM_PARAM) e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_SPSUM_PARAM)
      e0:SetTargetRange(POS_FACEUP,1) e0:SetTargetRange(POS_FACEUP,1)
      e0:SetRange(LOCATION_EXTRA) e0:SetRange(LOCATION_EXTRA)
      e0:SetCountLimit(1) e0:SetCountLimit(1,m+EFFECT_FLAG_OATH)
      e0:SetCondition(cm.con) e0:SetCondition(cm.con)
      e0:SetTarget(cm.tg) e0:SetTarget(cm.tg)
      e0:SetOperation(cm.op) e0:SetOperation(cm.op)
      ...@@ -28,7 +28,7 @@ function cm.initial_effect(c) ...@@ -28,7 +28,7 @@ function cm.initial_effect(c)
      e00:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_SPSUM_PARAM) e00:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_SPSUM_PARAM)
      e00:SetTargetRange(POS_FACEUP,0) e00:SetTargetRange(POS_FACEUP,0)
      e00:SetRange(LOCATION_EXTRA) e00:SetRange(LOCATION_EXTRA)
      e00:SetCountLimit(1) e00:SetCountLimit(1,m+EFFECT_FLAG_OATH)
      e00:SetCondition(cm.con2) e00:SetCondition(cm.con2)
      e00:SetTarget(cm.tg2) e00:SetTarget(cm.tg2)
      e00:SetOperation(cm.op2) e00:SetOperation(cm.op2)
      ...@@ -48,7 +48,7 @@ function cm.initial_effect(c) ...@@ -48,7 +48,7 @@ function cm.initial_effect(c)
      end end
      --spsummon --spsummon
      function cm.xyzfilter(c,e,tp) function cm.xyzfilter(c,e,tp)
      return c:IsCanBeXyzMaterial(e:GetHandler()) and (Duel.GetLocationCountFromEx(tp)>0 or Duel.GetLocationCountFromEx(1-tp)>0) and c:GetOverlayCount()>0 and c:IsType(TYPE_XYZ) return c:IsCanBeXyzMaterial(e:GetHandler()) and (Duel.GetLocationCountFromEx(tp)>0 or Duel.GetLocationCountFromEx(1-tp)>0) and c:GetOverlayCount()>0 and c:IsType(TYPE_XYZ) and c:IsFaceup()
      end end
      function cm.con(e,c) function cm.con(e,c)
      return Duel.IsExistingMatchingCard(cm.xyzfilter,e:GetHandlerPlayer(),0,LOCATION_MZONE,1,nil,e,e:GetHandlerPlayer()) and Duel.GetFlagEffect(e:GetHandlerPlayer(),m)==0 return Duel.IsExistingMatchingCard(cm.xyzfilter,e:GetHandlerPlayer(),0,LOCATION_MZONE,1,nil,e,e:GetHandlerPlayer()) and Duel.GetFlagEffect(e:GetHandlerPlayer(),m)==0
      ......
      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