Commit 50215530 authored by Tachibana's avatar Tachibana

得得得得得

parent 721bd158
No preview for this file type
expansions/pics/17032440.jpg

36.1 KB | W: | H:

expansions/pics/17032440.jpg

63.6 KB | W: | H:

expansions/pics/17032440.jpg
expansions/pics/17032440.jpg
expansions/pics/17032440.jpg
expansions/pics/17032440.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/17032450.jpg

41.4 KB | W: | H:

expansions/pics/17032450.jpg

69.4 KB | W: | H:

expansions/pics/17032450.jpg
expansions/pics/17032450.jpg
expansions/pics/17032450.jpg
expansions/pics/17032450.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/17032460.jpg

43.2 KB | W: | H:

expansions/pics/17032460.jpg

72 KB | W: | H:

expansions/pics/17032460.jpg
expansions/pics/17032460.jpg
expansions/pics/17032460.jpg
expansions/pics/17032460.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/17032470.jpg

42.5 KB | W: | H:

expansions/pics/17032470.jpg

71.3 KB | W: | H:

expansions/pics/17032470.jpg
expansions/pics/17032470.jpg
expansions/pics/17032470.jpg
expansions/pics/17032470.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/17032480.jpg

43 KB | W: | H:

expansions/pics/17032480.jpg

69.4 KB | W: | H:

expansions/pics/17032480.jpg
expansions/pics/17032480.jpg
expansions/pics/17032480.jpg
expansions/pics/17032480.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/17032490.jpg

18.5 KB | W: | H:

expansions/pics/17032490.jpg

68.7 KB | W: | H:

expansions/pics/17032490.jpg
expansions/pics/17032490.jpg
expansions/pics/17032490.jpg
expansions/pics/17032490.jpg
  • 2-up
  • Swipe
  • Onion skin
......@@ -51,8 +51,8 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.ConfirmCards(1-tp,g2)
end
end
if ct>=12 and Duel.IsExistingMatchingCard(cm.thfilter3,tp,LOCATION_REMOVED,0,2,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,3)) then
local g3=Duel.SelectMatchingCard(tp,cm.thfilter3,tp,LOCATION_REMOVED,0,2,2,nil)
if ct>=12 and Duel.IsExistingMatchingCard(cm.thfilter3,tp,LOCATION_REMOVED,0,2,nil,tp) and Duel.SelectYesNo(tp,aux.Stringid(m,3)) then
local g3=Duel.SelectMatchingCard(tp,cm.thfilter3,tp,LOCATION_REMOVED,0,2,2,nil,tp)
if #g3>0 then
Duel.SendtoHand(g3,nil,REASON_EFFECT)
end
......@@ -64,6 +64,6 @@ end
function cm.thfilter2(c)
return c:IsCode(code) and c:IsAbleToHand()
end
function cm.thfilter3(c)
return c:IsCanAddCounter(0x2cc) and c:IsAbleToHand()
function cm.thfilter3(c,tp)
return Duel.IsCanAddCounter(tp,0x2cc,1,c) and c:IsAbleToHand()
end
\ No newline at end of file
......@@ -50,7 +50,7 @@ function cm.fuscheck(c)
return c:IsRace(RACE_FIEND)
end
function cm.immunefilter(e,te)
return te:IsActiveType(TYPE_MONSTER) and te:GetOwner()~=e:GetOwner() and not te:GetHandler():IsType(TYPE_XYZ)
return te:IsActiveType(TYPE_MONSTER) and not te:GetHandler():IsRace(RACE_FIEND)
end
function cm.ctcheck(c)
return c:IsFaceup() and c:IsCanAddCounter(0x2cc,2)
......@@ -59,7 +59,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return cm.ctcheck(chkc) and chkc:IsLocation(LOCATION_ONFIELD) and chkc:IsControler(tp) end
if chk==0 then return Duel.IsExistingTarget(cm.ctcheck,tp,LOCATION_ONFIELD,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_COUNTER)
local g=Duel.SelectTarget(cm.ctcheck,tp,LOCATION_ONFIELD,0,1,1,nil)
local g=Duel.SelectTarget(tp,cm.ctcheck,tp,LOCATION_ONFIELD,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,tp,0x2cc)
end
function cm.operation(e,tp)
......@@ -82,10 +82,9 @@ function cm.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,tp,eg:GetSum(Card.GetAttack))
end
function cm.spop1(e,tp,eg,ep,ev,re,r,rp)
local dg=eg:Filter(cm.cfilter,nil)
local dg=eg:Filter(cm.cfilter,nil,tp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
local atk=dg:GetSum(Card.GetAttack)
local up=Duel.Damage(tp,atk,REASON_EFFECT)
if up>0 then
......@@ -95,6 +94,6 @@ function cm.spop1(e,tp,eg,ep,ev,re,r,rp)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetValue(up)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
c:RegisterEffect(e1)
c:RegisterEffect(e1,true)
end
end
\ No newline at end of file
......@@ -40,7 +40,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return false end
if chk==0 then return Duel.IsExistingTarget(cm.check2,tp,0,LOCATION_ONFIELD,2,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local sg=Duel.SelectTarget(cm.check2,tp,0,LOCATION_ONFIELD,2,2,nil)
local sg=Duel.SelectTarget(tp,cm.check2,tp,0,LOCATION_ONFIELD,2,2,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,sg,2,0,0)
end
function cm.activate(e,tp)
......
......@@ -12,16 +12,16 @@ function cm.initial_effect(c)
e1:SetOperation(cm.activate)
c:RegisterEffect(e1)
end
function cm.filter(c)
return c:IsCanAddCounter(0x2cc,1) and c:IsAbleToHand()
function cm.filter(c,tp)
return Duel.IsCanAddCounter(tp,0x2cc,1,c) and c:IsAbleToHand()
end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) end
if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil,tp) 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)
local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,1,1,nil,tp)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
......
......@@ -248,12 +248,23 @@ function rk.backop(e,tp,eg,ep,ev,re,r,rp)
if c:IsFacedown() then
Duel.ConfirmCards(1-tp,Group.FromCards(c))
end
local Reg=Card.RegisterEffect
function Card.RegisterEffect(card,effect,flag)
if effect:IsHasProperty(EFFECT_FLAG_UNCOPYABLE) then
local er=effect:Clone()
Reg(c,er,true)
Debug.Message(1)
end
return Reg(card,effect,flag)
end
c:ReplaceEffect(tcode,0,0)
Duel.CreateToken(tp,tcode)
Duel.Hint(HINT_CARD,0,tcode)
if c:IsLocation(LOCATION_HAND) then
local sp=c:GetControler()
Duel.ShuffleHand(sp)
end
Card.RegisterEffect=Reg
end
Duel.Readjust()
end
......
......@@ -56,13 +56,12 @@ function c17032510.catg(e,c)
local tc=g:GetMinGroup(Card.GetRank):GetFirst()
rk=tc:GetRank()
end
if rk==0 then return end
return c:GetRank()>rk
end
function c17032510.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetAttacker()
if tc:IsAttackable() then
tc:RegisterFlagEffect(17032510,RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END,0,1)
end
tc:RegisterFlagEffect(17032510,RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END,0,1)
end
function c17032510.atkcon(e,tp,eg,ep,ev,re,r,rp)
local a=Duel.GetAttacker()
......@@ -75,7 +74,7 @@ function c17032510.atkop(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
local a=Duel.GetAttacker()
local d=Duel.GetAttackTarget()
if a:GetRank()==d:GetRank() then return false end
if a:GetRank()==d:GetRank() then return end
local ac=nil
local ct=0
if a:GetRank()>d:GetRank() then ac=d ct=a:GetRank()-d:GetRank() else ac=a ct=d:GetRank()-a:GetRank() end
......
......@@ -53,7 +53,7 @@ function c17032520.initial_effect(c)
c:RegisterEffect(e5)
end
function c17032520.costfilter(c,mc)
return c:IsRace(RACE_DRAGON) and c:IsAbleToGraveAsCost() and mc:IsCanAddCounter(0x1,c:GetLevel())
return c:IsRace(RACE_REPTILE) and c:IsAbleToGraveAsCost() and mc:IsCanAddCounter(0x1,c:GetLevel())
end
function c17032520.ctcost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
......
......@@ -43,20 +43,32 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
if Duel.IsExistingMatchingCard(cm.sfilter,tp,LOCATION_HAND,0,1,nil) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
local sg=Duel.SelectMatchingCard(tp,cm.sfilter,tp,LOCATION_HAND,0,1,1,nil)
Duel.Summon(tp,sg:GetFirst(),true,nil)
Duel.BreakEffect()
if Duel.IsExistingMatchingCard(cm.setfilter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE)
local tc=Duel.SelectMatchingCard(tp,cm.setfilter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil):GetFirst()
if tc:IsFaceup() then
Duel.ChangePosition(tc,POS_FACEDOWN_DEFENSE)
end
local tc=sg:GetFirst()
if tc and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e0:SetCode(EVENT_SUMMON_SUCCESS)
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_OATH)
e0:SetReset(RESET_EVENT+0x7e0000)
e0:SetOperation(cm.doitdis)
tc:RegisterEffect(e0)
Duel.Summon(tp,sg:GetFirst(),true,nil)
Duel.BreakEffect()
end
end
end
function cm.setfilter2(c)
return c:IsFaceup() and c:IsCanTurnSet()
end
function cm.doitdis(e,tp)
if Duel.IsExistingMatchingCard(cm.setfilter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE)
local tc=Duel.SelectMatchingCard(tp,cm.setfilter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil):GetFirst()
if tc:IsFaceup() then
Duel.ChangePosition(tc,POS_FACEDOWN_DEFENSE)
end
end
end
function cm.tdfilter(c)
return c:IsAbleToDeck() and c:IsSetCard(0x3a87) and c:IsType(TYPE_MONSTER)
......
......@@ -102,7 +102,7 @@ end
function cm.spcon(e,c)
if c==nil then return true end
local f=Duel.GetFlagEffect(e:GetHandlerPlayer(),m)
return f and f>0 and Duel.GetFlagEffect(tp,m+1)==0 and Duel.IsExistingMatchingCard(Card.IsReleasable,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) and (Duel.GetLocationCount(tc:GetControler(),LOCATION_MZONE)>0 or Duel.IsExistingMatchingCard(Card.IsReleasable,tp,LOCATION_MZONE,0,1,nil))
return f and f>0 and Duel.GetFlagEffect(tp,m+1)==0 and Duel.IsExistingMatchingCard(Card.IsReleasable,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) and (Duel.GetLocationCount(e:GetHandler():GetControler(),LOCATION_MZONE)>0 or Duel.IsExistingMatchingCard(Card.IsReleasable,tp,LOCATION_MZONE,0,1,nil))
end
function cm.spop(e,tp,eg,ep,ev,re,r,rp)
Duel.RegisterFlagEffect(tp,m+1,RESET_PHASE+PHASE_END,EFFECT_FLAG_OATH,1)
......
......@@ -118,7 +118,7 @@ end
function cm.spcon(e,c)
if c==nil then return true end
local f=Duel.GetFlagEffect(e:GetHandlerPlayer(),m)
return f and f>0 and Duel.GetFlagEffect(tp,m+1)==0 and Duel.IsExistingMatchingCard(Card.IsReleasable,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) and (Duel.GetLocationCount(tc:GetControler(),LOCATION_MZONE)>0 or Duel.IsExistingMatchingCard(Card.IsReleasable,tp,LOCATION_MZONE,0,1,nil))
return f and f>0 and Duel.GetFlagEffect(tp,m+1)==0 and Duel.IsExistingMatchingCard(Card.IsReleasable,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) and (Duel.GetLocationCount(e:GetHandler():GetControler(),LOCATION_MZONE)>0 or Duel.IsExistingMatchingCard(Card.IsReleasable,tp,LOCATION_MZONE,0,1,nil))
end
function cm.spop(e,tp,eg,ep,ev,re,r,rp)
Duel.RegisterFlagEffect(tp,m+1,RESET_PHASE+PHASE_END,EFFECT_FLAG_OATH,1)
......
......@@ -125,7 +125,7 @@ end
function cm.spcon(e,c)
if c==nil then return true end
local f=Duel.GetFlagEffect(e:GetHandlerPlayer(),m)
return f and f>0 and Duel.GetFlagEffect(tp,m+1)==0 and Duel.IsExistingMatchingCard(Card.IsReleasable,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) and (Duel.GetLocationCount(tc:GetControler(),LOCATION_MZONE)>0 or Duel.IsExistingMatchingCard(Card.IsReleasable,tp,LOCATION_MZONE,0,1,nil))
return f and f>0 and Duel.GetFlagEffect(tp,m+1)==0 and Duel.IsExistingMatchingCard(Card.IsReleasable,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) and (Duel.GetLocationCount(e:GetHandler():GetControler(),LOCATION_MZONE)>0 or Duel.IsExistingMatchingCard(Card.IsReleasable,tp,LOCATION_MZONE,0,1,nil))
end
function cm.spop(e,tp,eg,ep,ev,re,r,rp)
Duel.RegisterFlagEffect(tp,m+1,RESET_PHASE+PHASE_END,EFFECT_FLAG_OATH,1)
......
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