Commit 5c8ec083 authored by POLYMER's avatar POLYMER

fix

parent 129b9ead
...@@ -66,10 +66,10 @@ function cm.atkop(e,tp,eg,ep,ev,re,r,rp) ...@@ -66,10 +66,10 @@ function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function cm.stgfilter(c) function cm.stgfilter(c)
return c:IsSetCard(0xa450) and c:IsAbleToRemove() return c:IsSetCard(0xa450) and c:IsAbleToRemoveAsCost()
end end
function cm.stgcost(e,tp,eg,ep,ev,re,r,rp,chk) function cm.stgcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToRemove() if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost()
and Duel.IsExistingMatchingCard(cm.stgfilter,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,1,e:GetHandler()) end and Duel.IsExistingMatchingCard(cm.stgfilter,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,1,e:GetHandler()) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectMatchingCard(tp,cm.stgfilter,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,1,1,e:GetHandler()) local g=Duel.SelectMatchingCard(tp,cm.stgfilter,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,1,1,e:GetHandler())
...@@ -77,7 +77,7 @@ function cm.stgcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -77,7 +77,7 @@ function cm.stgcost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.Remove(g,POS_FACEUP,REASON_COST) Duel.Remove(g,POS_FACEUP,REASON_COST)
end end
function cm.stgfilter2(c) function cm.stgfilter2(c)
return c:IsSetCard(0xa450) and c:IsType(TYPE_EXTRA) and (c:IsAbleToGrave() or c:IsAbleToRemove()) return c:IsSetCard(0xa450) and (c:IsAbleToGrave() or c:IsAbleToRemove())
end end
function cm.stgtg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.stgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.stgfilter2,tp,LOCATION_EXTRA,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(cm.stgfilter2,tp,LOCATION_EXTRA,0,1,nil) end
......
...@@ -50,31 +50,33 @@ function cm.negop(e,tp,eg,ep,ev,re,r,rp) ...@@ -50,31 +50,33 @@ function cm.negop(e,tp,eg,ep,ev,re,r,rp)
e1:SetLabel(rc:GetOriginalCodeRule()) e1:SetLabel(rc:GetOriginalCodeRule())
e1:SetReset(RESET_PHASE+PHASE_END,2) e1:SetReset(RESET_PHASE+PHASE_END,2)
Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
for tc in aux.Next(g) do
local e2=Effect.CreateEffect(e:GetHandler()) local e2=Effect.CreateEffect(e:GetHandler())
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_UPDATE_ATTACK) e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetTargetRange(0,LOCATION_MZONE)
e2:SetValue(3000) e2:SetValue(3000)
e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e2:SetReset(RESET_PHASE+PHASE_END)
tc:RegisterEffect(e2) Duel.RegisterEffect(e2,tp)
local e3=Effect.CreateEffect(e:GetHandler()) local e3=Effect.CreateEffect(e:GetHandler())
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_SET_DEFENSE) e3:SetCode(EFFECT_SET_DEFENSE_FINAL)
e3:SetTargetRange(0,LOCATION_MZONE)
e3:SetValue(0) e3:SetValue(0)
e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e3:SetReset(RESET_PHASE+PHASE_END)
tc:RegisterEffect(e3) Duel.RegisterEffect(e3,tp)
end
end end
end end
function cm.actlimit(e,re,tp) function cm.actlimit(e,re,tp)
return re:GetHandler():GetOriginalCodeRule()==e:GetLabel() return re:GetHandler():GetOriginalCodeRule()==e:GetLabel()
end end
function cm.fit1(c)
return c:IsSetCard(0xa450) and c:IsAbleToRemoveAsCost()
end
function cm.protcost(e,tp,eg,ep,ev,re,r,rp,chk) function cm.protcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToRemove() if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost()
and Duel.IsExistingMatchingCard(Card.IsSetCard,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,1,e:GetHandler(),0xa450) end and Duel.IsExistingMatchingCard(cm.fit1,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,1,e:GetHandler()) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectMatchingCard(tp,Card.IsSetCard,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,1,1,e:GetHandler(),0xa450) local g=Duel.SelectMatchingCard(tp,cm.fit1,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,1,1,e:GetHandler())
g:AddCard(e:GetHandler()) g:AddCard(e:GetHandler())
Duel.Remove(g,POS_FACEUP,REASON_COST) Duel.Remove(g,POS_FACEUP,REASON_COST)
end end
......
...@@ -27,7 +27,6 @@ function cm.initial_effect(c) ...@@ -27,7 +27,6 @@ function cm.initial_effect(c)
e6:SetRange(LOCATION_GRAVE) e6:SetRange(LOCATION_GRAVE)
e6:SetCountLimit(1,m) e6:SetCountLimit(1,m)
e6:SetCost(cm.dacost) e6:SetCost(cm.dacost)
e6:SetTarget(cm.datg)
e6:SetOperation(cm.daop) e6:SetOperation(cm.daop)
c:RegisterEffect(e6) c:RegisterEffect(e6)
local e10=Effect.CreateEffect(c) local e10=Effect.CreateEffect(c)
...@@ -56,7 +55,7 @@ function cm.initial_effect(c) ...@@ -56,7 +55,7 @@ function cm.initial_effect(c)
e3:SetCategory(CATEGORY_ATKCHANGE) e3:SetCategory(CATEGORY_ATKCHANGE)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_PRE_DAMAGE_CALCULATE) e3:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
e3:SetCountLimit(1,m+100) e3:SetCountLimit(1,m+1)
e3:SetCondition(cm.atkcon) e3:SetCondition(cm.atkcon)
e3:SetOperation(cm.atkop) e3:SetOperation(cm.atkop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
...@@ -133,17 +132,17 @@ function cm.dacost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -133,17 +132,17 @@ function cm.dacost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost() end if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost() end
Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_COST) Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_COST)
end end
function cm.datg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.datg(e,c)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsSetCard,tp,LOCATION_MZONE,0,1,nil,0xa450) end c:IsSetCard(0xa450)
end end
function cm.daop(e,tp,eg,ep,ev,re,r,rp) function cm.daop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(Card.IsSetCard,tp,LOCATION_MZONE,0,nil,0xa450)
for tc in aux.Next(g) do
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_DIRECT_ATTACK) e1:SetCode(EFFECT_DIRECT_ATTACK)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e1:SetTarget(cm.datg)
tc:RegisterEffect(e1) e1:SetTargetRange(LOCATION_MZONE,0)
end e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end end
...@@ -19,7 +19,8 @@ function s.initial_effect(c) ...@@ -19,7 +19,8 @@ function s.initial_effect(c)
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(id,1)) e2:SetDescription(aux.Stringid(id,1))
e2:SetCategory(CATEGORY_TOHAND) e2:SetCategory(CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_GRAVE) e2:SetRange(LOCATION_GRAVE)
e2:SetCountLimit(1,id) e2:SetCountLimit(1,id)
e2:SetCost(s.thcost) e2:SetCost(s.thcost)
......
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