Commit 2619bac5 authored by POLYMER's avatar POLYMER

fix

parent e9a068e2
...@@ -22,7 +22,7 @@ function s.initial_effect(c) ...@@ -22,7 +22,7 @@ function s.initial_effect(c)
e3:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e3:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e3:SetCode(EVENT_TO_GRAVE) e3:SetCode(EVENT_TO_GRAVE)
e3:SetRange(LOCATION_GRAVE) e3:SetRange(LOCATION_GRAVE)
e3:SetTargetRange(0,1) --e3:SetTargetRange(0,1)
e3:SetCondition(s.lpcon) e3:SetCondition(s.lpcon)
e3:SetOperation(s.lpop) e3:SetOperation(s.lpop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
...@@ -62,6 +62,7 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -62,6 +62,7 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function s.handcon(e,tp,eg,ep,ev,re,r,rp) function s.handcon(e,tp,eg,ep,ev,re,r,rp)
local tp=e:GetHandlerPlayer()
return Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==0 return Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==0
or Duel.GetFieldGroupCount(tp,LOCATION_GRAVE,0)>=15 or Duel.GetFieldGroupCount(tp,LOCATION_GRAVE,0)>=15
end end
...@@ -75,7 +76,7 @@ function s.lpcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -75,7 +76,7 @@ function s.lpcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(s.cfilter,1,nil,tp) and Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,nil) return eg:IsExists(s.cfilter,1,nil,tp) and Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,nil)
end end
function s.lpop(e,tp,eg,ep,ev,re,r,rp) function s.lpop(e,tp,eg,ep,ev,re,r,rp)
local d1=eg:FilterCount(s.cfilter,tp,1,nil)*300 local d1=eg:FilterCount(s.cfilter,nil,tp)*300
Duel.Hint(HINT_CARD,0,id) Duel.Hint(HINT_CARD,0,id)
Duel.SetLP(1-tp,Duel.GetLP(1-tp)-d1) Duel.SetLP(1-tp,Duel.GetLP(1-tp)-d1)
end end
\ No newline at end of file
...@@ -25,6 +25,7 @@ function s.initial_effect(c) ...@@ -25,6 +25,7 @@ function s.initial_effect(c)
e2:SetCategory(CATEGORY_DECKDES) e2:SetCategory(CATEGORY_DECKDES)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
e2:SetCode(EVENT_TO_GRAVE)
e2:SetCountLimit(1,id+1) e2:SetCountLimit(1,id+1)
e2:SetProperty(EFFECT_FLAG_DELAY) e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCondition(s.tgcon1) e2:SetCondition(s.tgcon1)
...@@ -37,6 +38,7 @@ function s.initial_effect(c) ...@@ -37,6 +38,7 @@ function s.initial_effect(c)
e3:SetCategory(CATEGORY_TODECK) e3:SetCategory(CATEGORY_TODECK)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetCode(EVENT_TO_GRAVE)
e3:SetCountLimit(1,id+1) e3:SetCountLimit(1,id+1)
e3:SetProperty(EFFECT_FLAG_DELAY) e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetCondition(s.tgcon1) e3:SetCondition(s.tgcon1)
......
...@@ -101,13 +101,12 @@ end ...@@ -101,13 +101,12 @@ end
function cm.chop(e,tp,eg,ep,ev,re,r,rp) function cm.chop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.NegateActivation(ev) or Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)<3 then return end if not Duel.NegateActivation(ev) or Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)<3 then return end
Duel.BreakEffect() Duel.BreakEffect()
local lg=Duel.GetMatchingGroup(aux.dncheck,tp,LOCATION_DECK,0,nil) local lo=Duel.GetMatchingGroup(nil,tp,LOCATION_DECK,0,nil)
local lg=lo:Filter(aux.dncheck,nil)
if lg:GetCount()>2 and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then if lg:GetCount()>2 and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CODE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CODE)
getmetatable(e:GetHandler()).announce_filter={TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ+TYPE_LINK,OPCODE_ISTYPE,OPCODE_NOT} getmetatable(e:GetHandler()).announce_filter={TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ+TYPE_LINK,OPCODE_ISTYPE,OPCODE_NOT}
local ac=Duel.AnnounceCard(tp,table.unpack(getmetatable(e:GetHandler()).announce_filter)) local ac=Duel.AnnounceCard(tp,table.unpack(getmetatable(e:GetHandler()).announce_filter))
local g=lg:RandomSelect(tp,3) local g=lg:RandomSelect(tp,3)
Duel.ConfirmCards(tp,g) Duel.ConfirmCards(tp,g)
Duel.ConfirmCards(1-tp,g) Duel.ConfirmCards(1-tp,g)
......
...@@ -38,16 +38,16 @@ function cm.initial_effect(c) ...@@ -38,16 +38,16 @@ function cm.initial_effect(c)
e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e4:SetCode(EVENT_SSET) e4:SetCode(EVENT_SSET)
e4:SetOperation(cm.ssetcon) e4:SetOperation(cm.ssetcon)
Duel.RegisterEffect(e4,tp) Duel.RegisterEffect(e4,0)
local e5=e4:Clone() local e5=e4:Clone()
e5:SetCode(EVENT_MSET) e5:SetCode(EVENT_MSET)
Duel.RegisterEffect(e5,tp) Duel.RegisterEffect(e5,0)
local e6=e4:Clone() local e6=e4:Clone()
e6:SetCode(EVENT_CHANGE_POS) e6:SetCode(EVENT_CHANGE_POS)
Duel.RegisterEffect(e6,tp) Duel.RegisterEffect(e6,0)
local e7=e4:Clone() local e7=e4:Clone()
e7:SetCode(EVENT_SPSUMMON_SUCCESS) e7:SetCode(EVENT_SPSUMMON_SUCCESS)
Duel.RegisterEffect(e7,tp) Duel.RegisterEffect(e7,0)
end end
--tohand --tohand
local e8=Effect.CreateEffect(c) local e8=Effect.CreateEffect(c)
......
...@@ -39,16 +39,16 @@ function cm.initial_effect(c) ...@@ -39,16 +39,16 @@ function cm.initial_effect(c)
e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e4:SetCode(EVENT_SSET) e4:SetCode(EVENT_SSET)
e4:SetOperation(cm.ssetcon) e4:SetOperation(cm.ssetcon)
Duel.RegisterEffect(e4,tp) Duel.RegisterEffect(e4,0)
local e5=e4:Clone() local e5=e4:Clone()
e5:SetCode(EVENT_MSET) e5:SetCode(EVENT_MSET)
Duel.RegisterEffect(e5,tp) Duel.RegisterEffect(e5,0)
local e6=e4:Clone() local e6=e4:Clone()
e6:SetCode(EVENT_CHANGE_POS) e6:SetCode(EVENT_CHANGE_POS)
Duel.RegisterEffect(e6,tp) Duel.RegisterEffect(e6,0)
local e7=e4:Clone() local e7=e4:Clone()
e7:SetCode(EVENT_SPSUMMON_SUCCESS) e7:SetCode(EVENT_SPSUMMON_SUCCESS)
Duel.RegisterEffect(e7,tp) Duel.RegisterEffect(e7,0)
end end
--tohand --tohand
local e8=Effect.CreateEffect(c) local e8=Effect.CreateEffect(c)
......
...@@ -39,16 +39,16 @@ function cm.initial_effect(c) ...@@ -39,16 +39,16 @@ function cm.initial_effect(c)
e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e4:SetCode(EVENT_SSET) e4:SetCode(EVENT_SSET)
e4:SetOperation(cm.ssetcon) e4:SetOperation(cm.ssetcon)
Duel.RegisterEffect(e4,tp) Duel.RegisterEffect(e4,0)
local e5=e4:Clone() local e5=e4:Clone()
e5:SetCode(EVENT_MSET) e5:SetCode(EVENT_MSET)
Duel.RegisterEffect(e5,tp) Duel.RegisterEffect(e5,0)
local e6=e4:Clone() local e6=e4:Clone()
e6:SetCode(EVENT_CHANGE_POS) e6:SetCode(EVENT_CHANGE_POS)
Duel.RegisterEffect(e6,tp) Duel.RegisterEffect(e6,0)
local e7=e4:Clone() local e7=e4:Clone()
e7:SetCode(EVENT_SPSUMMON_SUCCESS) e7:SetCode(EVENT_SPSUMMON_SUCCESS)
Duel.RegisterEffect(e7,tp) Duel.RegisterEffect(e7,0)
end end
--tohand --tohand
local e8=Effect.CreateEffect(c) local e8=Effect.CreateEffect(c)
......
...@@ -39,16 +39,16 @@ function cm.initial_effect(c) ...@@ -39,16 +39,16 @@ function cm.initial_effect(c)
e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e4:SetCode(EVENT_SSET) e4:SetCode(EVENT_SSET)
e4:SetOperation(cm.ssetcon) e4:SetOperation(cm.ssetcon)
Duel.RegisterEffect(e4,tp) Duel.RegisterEffect(e4,0)
local e5=e4:Clone() local e5=e4:Clone()
e5:SetCode(EVENT_MSET) e5:SetCode(EVENT_MSET)
Duel.RegisterEffect(e5,tp) Duel.RegisterEffect(e5,0)
local e6=e4:Clone() local e6=e4:Clone()
e6:SetCode(EVENT_CHANGE_POS) e6:SetCode(EVENT_CHANGE_POS)
Duel.RegisterEffect(e6,tp) Duel.RegisterEffect(e6,0)
local e7=e4:Clone() local e7=e4:Clone()
e7:SetCode(EVENT_SPSUMMON_SUCCESS) e7:SetCode(EVENT_SPSUMMON_SUCCESS)
Duel.RegisterEffect(e7,tp) Duel.RegisterEffect(e7,0)
end end
--tohand --tohand
local e8=Effect.CreateEffect(c) local e8=Effect.CreateEffect(c)
......
...@@ -39,16 +39,16 @@ function cm.initial_effect(c) ...@@ -39,16 +39,16 @@ function cm.initial_effect(c)
e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e4:SetCode(EVENT_SSET) e4:SetCode(EVENT_SSET)
e4:SetOperation(cm.ssetcon) e4:SetOperation(cm.ssetcon)
Duel.RegisterEffect(e4,tp) Duel.RegisterEffect(e4,0)
local e5=e4:Clone() local e5=e4:Clone()
e5:SetCode(EVENT_MSET) e5:SetCode(EVENT_MSET)
Duel.RegisterEffect(e5,tp) Duel.RegisterEffect(e5,0)
local e6=e4:Clone() local e6=e4:Clone()
e6:SetCode(EVENT_CHANGE_POS) e6:SetCode(EVENT_CHANGE_POS)
Duel.RegisterEffect(e6,tp) Duel.RegisterEffect(e6,0)
local e7=e4:Clone() local e7=e4:Clone()
e7:SetCode(EVENT_SPSUMMON_SUCCESS) e7:SetCode(EVENT_SPSUMMON_SUCCESS)
Duel.RegisterEffect(e7,tp) Duel.RegisterEffect(e7,0)
end end
--tohand --tohand
local e8=Effect.CreateEffect(c) local e8=Effect.CreateEffect(c)
......
...@@ -38,16 +38,16 @@ function cm.initial_effect(c) ...@@ -38,16 +38,16 @@ function cm.initial_effect(c)
e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e4:SetCode(EVENT_SSET) e4:SetCode(EVENT_SSET)
e4:SetOperation(cm.ssetcon) e4:SetOperation(cm.ssetcon)
Duel.RegisterEffect(e4,tp) Duel.RegisterEffect(e4,0)
local e5=e4:Clone() local e5=e4:Clone()
e5:SetCode(EVENT_MSET) e5:SetCode(EVENT_MSET)
Duel.RegisterEffect(e5,tp) Duel.RegisterEffect(e5,0)
local e6=e4:Clone() local e6=e4:Clone()
e6:SetCode(EVENT_CHANGE_POS) e6:SetCode(EVENT_CHANGE_POS)
Duel.RegisterEffect(e6,tp) Duel.RegisterEffect(e6,0)
local e7=e4:Clone() local e7=e4:Clone()
e7:SetCode(EVENT_SPSUMMON_SUCCESS) e7:SetCode(EVENT_SPSUMMON_SUCCESS)
Duel.RegisterEffect(e7,tp) Duel.RegisterEffect(e7,0)
end end
--tohand --tohand
local e8=Effect.CreateEffect(c) local e8=Effect.CreateEffect(c)
......
...@@ -39,16 +39,16 @@ function cm.initial_effect(c) ...@@ -39,16 +39,16 @@ function cm.initial_effect(c)
e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e4:SetCode(EVENT_SSET) e4:SetCode(EVENT_SSET)
e4:SetOperation(cm.ssetcon) e4:SetOperation(cm.ssetcon)
Duel.RegisterEffect(e4,tp) Duel.RegisterEffect(e4,0)
local e5=e4:Clone() local e5=e4:Clone()
e5:SetCode(EVENT_MSET) e5:SetCode(EVENT_MSET)
Duel.RegisterEffect(e5,tp) Duel.RegisterEffect(e5,0)
local e6=e4:Clone() local e6=e4:Clone()
e6:SetCode(EVENT_CHANGE_POS) e6:SetCode(EVENT_CHANGE_POS)
Duel.RegisterEffect(e6,tp) Duel.RegisterEffect(e6,0)
local e7=e4:Clone() local e7=e4:Clone()
e7:SetCode(EVENT_SPSUMMON_SUCCESS) e7:SetCode(EVENT_SPSUMMON_SUCCESS)
Duel.RegisterEffect(e7,tp) Duel.RegisterEffect(e7,0)
end end
--tohand --tohand
local e8=Effect.CreateEffect(c) local e8=Effect.CreateEffect(c)
......
...@@ -39,16 +39,16 @@ function cm.initial_effect(c) ...@@ -39,16 +39,16 @@ function cm.initial_effect(c)
e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e4:SetCode(EVENT_SSET) e4:SetCode(EVENT_SSET)
e4:SetOperation(cm.ssetcon) e4:SetOperation(cm.ssetcon)
Duel.RegisterEffect(e4,tp) Duel.RegisterEffect(e4,0)
local e5=e4:Clone() local e5=e4:Clone()
e5:SetCode(EVENT_MSET) e5:SetCode(EVENT_MSET)
Duel.RegisterEffect(e5,tp) Duel.RegisterEffect(e5,0)
local e6=e4:Clone() local e6=e4:Clone()
e6:SetCode(EVENT_CHANGE_POS) e6:SetCode(EVENT_CHANGE_POS)
Duel.RegisterEffect(e6,tp) Duel.RegisterEffect(e6,0)
local e7=e4:Clone() local e7=e4:Clone()
e7:SetCode(EVENT_SPSUMMON_SUCCESS) e7:SetCode(EVENT_SPSUMMON_SUCCESS)
Duel.RegisterEffect(e7,tp) Duel.RegisterEffect(e7,0)
end end
--tohand --tohand
local e8=Effect.CreateEffect(c) local e8=Effect.CreateEffect(c)
......
...@@ -53,16 +53,16 @@ function cm.initial_effect(c) ...@@ -53,16 +53,16 @@ function cm.initial_effect(c)
e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e4:SetCode(EVENT_SSET) e4:SetCode(EVENT_SSET)
e4:SetOperation(cm.ssetcon) e4:SetOperation(cm.ssetcon)
Duel.RegisterEffect(e4,tp) Duel.RegisterEffect(e4,0)
local e5=e4:Clone() local e5=e4:Clone()
e5:SetCode(EVENT_MSET) e5:SetCode(EVENT_MSET)
Duel.RegisterEffect(e5,tp) Duel.RegisterEffect(e5,0)
local e6=e4:Clone() local e6=e4:Clone()
e6:SetCode(EVENT_CHANGE_POS) e6:SetCode(EVENT_CHANGE_POS)
Duel.RegisterEffect(e6,tp) Duel.RegisterEffect(e6,0)
local e7=e4:Clone() local e7=e4:Clone()
e7:SetCode(EVENT_SPSUMMON_SUCCESS) e7:SetCode(EVENT_SPSUMMON_SUCCESS)
Duel.RegisterEffect(e7,tp) Duel.RegisterEffect(e7,0)
end end
--tohand --tohand
local e8=Effect.CreateEffect(c) local e8=Effect.CreateEffect(c)
......
...@@ -53,16 +53,16 @@ function cm.initial_effect(c) ...@@ -53,16 +53,16 @@ function cm.initial_effect(c)
e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e4:SetCode(EVENT_SSET) e4:SetCode(EVENT_SSET)
e4:SetOperation(cm.ssetcon) e4:SetOperation(cm.ssetcon)
Duel.RegisterEffect(e4,tp) Duel.RegisterEffect(e4,0)
local e5=e4:Clone() local e5=e4:Clone()
e5:SetCode(EVENT_MSET) e5:SetCode(EVENT_MSET)
Duel.RegisterEffect(e5,tp) Duel.RegisterEffect(e5,0)
local e6=e4:Clone() local e6=e4:Clone()
e6:SetCode(EVENT_CHANGE_POS) e6:SetCode(EVENT_CHANGE_POS)
Duel.RegisterEffect(e6,tp) Duel.RegisterEffect(e6,0)
local e7=e4:Clone() local e7=e4:Clone()
e7:SetCode(EVENT_SPSUMMON_SUCCESS) e7:SetCode(EVENT_SPSUMMON_SUCCESS)
Duel.RegisterEffect(e7,tp) Duel.RegisterEffect(e7,0)
end end
--tohand --tohand
local e8=Effect.CreateEffect(c) local e8=Effect.CreateEffect(c)
......
...@@ -42,8 +42,8 @@ end ...@@ -42,8 +42,8 @@ end
function s.atkcon(e,tp,eg,ep,ev,re,r,rp) function s.atkcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsAbleToEnterBP() return Duel.IsAbleToEnterBP()
end end
function s.costfilter(c) function s.costfilter(c,g)
return c:IsLevel(10) return c:IsLevel(10) and g:IsContains(c)
end end
function s.cost(e,tp,eg,ep,ev,re,r,rp,chk) function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local lg=e:GetHandler():GetLinkedGroup() local lg=e:GetHandler():GetLinkedGroup()
......
...@@ -134,6 +134,9 @@ function c98920602.sprop(e,tp,eg,ep,ev,re,r,rp,c) ...@@ -134,6 +134,9 @@ function c98920602.sprop(e,tp,eg,ep,ev,re,r,rp,c)
Duel.SendtoGrave(g,REASON_COST) Duel.SendtoGrave(g,REASON_COST)
g:DeleteGroup() g:DeleteGroup()
end end
function c98920602.cfilter(c,tp)
return c:IsSummonPlayer(tp) and c:IsPreviousLocation(LOCATION_EXTRA)
end
function c98920602.target(e,tp,eg,ep,ev,re,r,rp,chk) function c98920602.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
local g=eg:Filter(c98920602.cfilter,nil,1-tp) local g=eg:Filter(c98920602.cfilter,nil,1-tp)
......
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