Commit 6339a591 authored by Tachibana's avatar Tachibana

12

parent 367409a1
Pipeline #3782 passed with stages
in 40 minutes and 10 seconds
...@@ -22,7 +22,7 @@ function cm.initial_effect(c) ...@@ -22,7 +22,7 @@ function cm.initial_effect(c)
e22:SetType(EFFECT_TYPE_SINGLE) e22:SetType(EFFECT_TYPE_SINGLE)
e22:SetCode(EFFECT_MATERIAL_CHECK) e22:SetCode(EFFECT_MATERIAL_CHECK)
e22:SetValue(cm.valcheck) e22:SetValue(cm.valcheck)
c:RegisterEffect(e2) c:RegisterEffect(e22)
--negate --negate
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,1)) e2:SetDescription(aux.Stringid(m,1))
......
...@@ -59,9 +59,8 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -59,9 +59,8 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
end end
function cm.spop(e,tp,eg,ep,ev,re,r,rp) function cm.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local tid=Duel.GetTurnCount()
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and tc:IsCanBeSpecialSummoned(e,0,tp,false,false,tid) if c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and tc:IsCanBeSpecialSummoned(e,0,tp,false,false)
and not Duel.IsPlayerAffectedByEffect(tp,59822133) and Duel.GetLocationCount(tp,LOCATION_MZONE)>1 then and not Duel.IsPlayerAffectedByEffect(tp,59822133) and Duel.GetLocationCount(tp,LOCATION_MZONE)>1 then
local g=Group.FromCards(c,tc) local g=Group.FromCards(c,tc)
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
......
...@@ -19,7 +19,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -19,7 +19,6 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
and Duel.IsExistingTarget(aux.TRUE,tp,0,LOCATION_MZONE,1,nil) end and Duel.IsExistingTarget(aux.TRUE,tp,0,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g1=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_MZONE,0,1,1,nil) local g1=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_MZONE,0,1,1,nil)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g2=Duel.SelectTarget(tp,aux.TRUE,tp,0,LOCATION_MZONE,1,1,nil) local g2=Duel.SelectTarget(tp,aux.TRUE,tp,0,LOCATION_MZONE,1,1,nil)
g1:Merge(g2) g1:Merge(g2)
...@@ -32,10 +31,10 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -32,10 +31,10 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
local tg=g:Filter(Card.IsRelateToEffect,nil,e) local tg=g:Filter(Card.IsRelateToEffect,nil,e)
if tg:GetCount()>0 then if tg:GetCount()>0 then
if Duel.Destroy(tg,REASON_EFFECT)~=0 then if Duel.Destroy(tg,REASON_EFFECT)~=0 then
if Duel.GetLocationCount(p,LOCATION_MZONE,tp)>0 and Duel.IsPlayerCanSpecialSummonMonster(tp,69696949,0,TYPES_TOKEN_MONSTER,500,500,2,RACE_PLANT,ATTRIBUTE_DARK,POS_FACEUP) then if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsPlayerCanSpecialSummonMonster(tp,69696949,0,TYPES_TOKEN_MONSTER,500,500,2,RACE_PLANT,ATTRIBUTE_DARK,POS_FACEUP) then
Duel.BreakEffect() Duel.BreakEffect()
local token=Duel.CreateToken(tp,69696949) local token=Duel.CreateToken(tp,69696949)
Duel.SpecialSummon(token,0,tp,p,false,false,POS_FACEUP) Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
end end
end end
end end
......
...@@ -18,8 +18,8 @@ function cm.initial_effect(c) ...@@ -18,8 +18,8 @@ function cm.initial_effect(c)
e2:SetType(EFFECT_TYPE_QUICK_O) e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_PRE_DAMAGE_CALCULATE) e2:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
e2:SetRange(LOCATION_GRAVE) e2:SetRange(LOCATION_GRAVE)
e2:SetCost(aux.bfgcost)
e2:SetCondition(cm.atkcon) e2:SetCondition(cm.atkcon)
e2:SetCost(cm.atkcost)
e2:SetOperation(cm.atkop) e2:SetOperation(cm.atkop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
...@@ -44,11 +44,7 @@ function cm.atkcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -44,11 +44,7 @@ function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
if not tc then return false end if not tc then return false end
if tc:IsControler(1-tp) then tc=Duel.GetAttacker() end if tc:IsControler(1-tp) then tc=Duel.GetAttacker() end
e:SetLabelObject(tc) e:SetLabelObject(tc)
return tc and tc:IsRelateToBattle() and tc:IsAttack(1550) and c:IsDefense(1050) and tc:IsType(TYPE_SYNCHRO) return tc and tc:IsRelateToBattle() and tc:IsAttack(1550) and tc:IsDefense(1050) and tc:IsType(TYPE_SYNCHRO)
end
function cm.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end end
function cm.atkop(e,tp,eg,ep,ev,re,r,rp) function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject() local tc=e:GetLabelObject()
......
...@@ -17,7 +17,7 @@ function c9330008.initial_effect(c) ...@@ -17,7 +17,7 @@ function c9330008.initial_effect(c)
e2:SetRange(LOCATION_FZONE) e2:SetRange(LOCATION_FZONE)
e2:SetTargetRange(LOCATION_SZONE,0) e2:SetTargetRange(LOCATION_SZONE,0)
e2:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0xaf93)) e2:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0xaf93))
e2:SetCountLimit(1,9331008) e2:SetCountLimit(1,9330008)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--inactivatable --inactivatable
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
......
...@@ -46,7 +46,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -46,7 +46,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
local c=e:GetHandler() local c=e:GetHandler()
if not c:IsRelateToEffect(e) or not Duel.IsPlayerCanSpecialSummonMonster(tp,m,0,TYPES_EFFECT_TRAP_MONSTER+TYPE_TUNER,800,2000,6,RACE_PLANT,ATTRIBUTE_WIND) then return end if not c:IsRelateToEffect(e) or not Duel.IsPlayerCanSpecialSummonMonster(tp,m,0,TYPES_EFFECT_TRAP_MONSTER+TYPE_TUNER,800,2000,6,RACE_PLANT,ATTRIBUTE_WIND) then return end
c:AddMonsterAttribute(TYPE_EFFECT+TYPE_TRAP) c:AddMonsterAttribute(TYPE_EFFECT+TYPE_TUNER+TYPE_TRAP)
Duel.SpecialSummon(c,SUMMON_VALUE_SELF,tp,tp,true,false,POS_FACEUP) Duel.SpecialSummon(c,SUMMON_VALUE_SELF,tp,tp,true,false,POS_FACEUP)
end end
end end
......
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