Commit e7f0fbb4 authored by wind2009's avatar wind2009

Fix

parent d8a346f2
Pipeline #42617 canceled with stages
in 16 seconds
...@@ -98,4 +98,4 @@ function s.accost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -98,4 +98,4 @@ function s.accost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
local g=Duel.SelectMatchingCard(tp,s.costfilter,tp,LOCATION_EXTRA,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,s.costfilter,tp,LOCATION_EXTRA,0,1,1,nil)
Duel.ConfirmCards(1-tp,g) Duel.ConfirmCards(1-tp,g)
end end
\ No newline at end of file
...@@ -82,10 +82,14 @@ function s.eftg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -82,10 +82,14 @@ function s.eftg(e,tp,eg,ep,ev,re,r,rp,chk)
{b2,aux.Stringid(id,3)}) {b2,aux.Stringid(id,3)})
e:SetLabel(op) e:SetLabel(op)
if op==1 then if op==1 then
e:SetCategory(CATEGORY_TODECK) if e:IsCostChecked() then
e:SetCategory(CATEGORY_TODECK)
end
Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,1-tp,LOCATION_GRAVE) Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,1-tp,LOCATION_GRAVE)
elseif op==2 then elseif op==2 then
e:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) if e:IsCostChecked() then
e:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
end
end end
end end
function s.efop(e,tp,eg,ep,ev,re,r,rp) function s.efop(e,tp,eg,ep,ev,re,r,rp)
......
...@@ -27,6 +27,12 @@ function s.initial_effect(c) ...@@ -27,6 +27,12 @@ function s.initial_effect(c)
e2:SetTarget(s.sptg) e2:SetTarget(s.sptg)
e2:SetOperation(s.spop) e2:SetOperation(s.spop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--double tuner
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetCode(21142671)
c:RegisterEffect(e3)
end end
function s.atkcon(e,tp,eg,ep,ev,re,r,rp) function s.atkcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
......
...@@ -4,6 +4,11 @@ function s.initial_effect(c) ...@@ -4,6 +4,11 @@ function s.initial_effect(c)
--Synchro Summon --Synchro Summon
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsType,TYPE_SYNCHRO),1) aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsType,TYPE_SYNCHRO),1)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_MATERIAL_CHECK)
e0:SetValue(s.valcheck)
c:RegisterEffect(e0)
--Increase Level --Increase Level
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
...@@ -34,6 +39,17 @@ function s.initial_effect(c) ...@@ -34,6 +39,17 @@ function s.initial_effect(c)
e3:SetOperation(s.thop) e3:SetOperation(s.thop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function s.valcheck(e,c)
local g=c:GetMaterial()
if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(21142671)
e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
c:RegisterEffect(e1)
end
end
function s.atktg(e,c) function s.atktg(e,c)
return c:IsType(TYPE_TUNER) return c:IsType(TYPE_TUNER)
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