Commit ade74b99 authored by POLYMER's avatar POLYMER

fix

parent d78010b1
...@@ -23,6 +23,7 @@ function cm.initial_effect(c) ...@@ -23,6 +23,7 @@ function cm.initial_effect(c)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,11561053) e2:SetCountLimit(1,11561053)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCost(c11561053.tkcost) e2:SetCost(c11561053.tkcost)
e2:SetTarget(c11561053.tktg) e2:SetTarget(c11561053.tktg)
e2:SetOperation(c11561053.tkop) e2:SetOperation(c11561053.tkop)
...@@ -33,6 +34,7 @@ function cm.initial_effect(c) ...@@ -33,6 +34,7 @@ function cm.initial_effect(c)
e3:SetCategory(CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON) e3:SetCategory(CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_IGNITION) e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetCountLimit(1,11561053) e3:SetCountLimit(1,11561053)
e3:SetCost(c11561053.tkcost) e3:SetCost(c11561053.tkcost)
e3:SetTarget(c11561053.dsptg) e3:SetTarget(c11561053.dsptg)
......
...@@ -4,6 +4,13 @@ function s.initial_effect(c) ...@@ -4,6 +4,13 @@ function s.initial_effect(c)
--Fusion Material --Fusion Material
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddFusionProcFunRep(c,s.ffilter,5,true) aux.AddFusionProcFunRep(c,s.ffilter,5,true)
--spsummon condition
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e0:SetCode(EFFECT_SPSUMMON_CONDITION)
e0:SetValue(aux.fuslimit)
c:RegisterEffect(e0)
--Special Summon --Special Summon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(id,0)) e1:SetDescription(aux.Stringid(id,0))
......
...@@ -86,7 +86,7 @@ function s.pop(e,tp,eg,ep,ev,re,r,rp) ...@@ -86,7 +86,7 @@ function s.pop(e,tp,eg,ep,ev,re,r,rp)
if c:IsRelateToChain() and Duel.SendtoExtraP(c,nil,REASON_EFFECT)>0 then if c:IsRelateToChain() and Duel.SendtoExtraP(c,nil,REASON_EFFECT)>0 then
local flag_idx=e:GetLabel() local flag_idx=e:GetLabel()
if flag_idx==-1 then return end if flag_idx==-1 then return end
Duel.RegisterFlagEffect(tp,id+flag_idx,RESET_PHASE+PHASE_END,0,1) Duel.RegisterFlagEffect(tp,id+flag_idx,RESET_PHASE+PHASE_END,0,1)
Duel.BreakEffect() Duel.BreakEffect()
if flag_idx==0 then if flag_idx==0 then
if rc:IsRelateToEffect(re) then if rc:IsRelateToEffect(re) then
...@@ -157,7 +157,7 @@ end ...@@ -157,7 +157,7 @@ end
function s.m2tg(e,tp,eg,ep,ev,re,r,rp,chk) function s.m2tg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
local b1=Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) local b1=Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1)
local b2=Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) local b2=Duel.GetLocationCountFromEx(tp)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
if chk==0 then return b1 or b2 end if chk==0 then return b1 or b2 end
local op=aux.SelectFromOptions(tp, local op=aux.SelectFromOptions(tp,
{b1,aux.Stringid(id,3)}, {b1,aux.Stringid(id,3)},
......
...@@ -44,10 +44,9 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -44,10 +44,9 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
b[1]=Duel.GetLocationCount(tp,LOCATION_MZONE)>1 and Duel.IsPlayerCanSpecialSummonMonster(tp,65133153,0x838,TYPES_TOKEN,2500,500,6,RACE_MACHINE,ATTRIBUTE_LIGHT) b[1]=Duel.GetLocationCount(tp,LOCATION_MZONE)>1 and Duel.IsPlayerCanSpecialSummonMonster(tp,65133153,0x838,TYPES_TOKEN,2500,500,6,RACE_MACHINE,ATTRIBUTE_LIGHT)
b[2]=Duel.IsExistingMatchingCard(s.thfilter1,tp,LOCATION_DECK+LOCATION_REMOVED,0,1,nil) b[2]=Duel.IsExistingMatchingCard(s.thfilter1,tp,LOCATION_DECK+LOCATION_REMOVED,0,1,nil)
b[3]=true b[3]=true
b[4]=Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) b[4]=Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
b[5]=true b[5]=true
if chk==0 then return true end if chk==0 then return true end
local ct=1 local ct=1
if Duel.IsExistingMatchingCard(s.cfilter2,tp,LOCATION_MZONE,0,1,nil) then if Duel.IsExistingMatchingCard(s.cfilter2,tp,LOCATION_MZONE,0,1,nil) then
ct=3 ct=3
...@@ -73,20 +72,20 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -73,20 +72,20 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
end end
end end
if not (b[1] or b[2] or b[3] or b[4] or b[5]) or not Duel.SelectYesNo(tp,aux.Stringid(id,7)) or num==ct then if not (b[1] or b[2] or b[3] or b[4] or b[5]) or num==ct or not Duel.SelectYesNo(tp,aux.Stringid(id,7)) then
break break
end end
end end
e:SetLabel(optable) e:SetLabel(optable)
end end
function s.thfilter1(c) function s.thfilter1(c)
return c:IsCode(65133150) and c:IsAbleToHand() and Duel.IsExistingMatchingCard(s.thfilter2,c:GetControler(),LOCATION_DECK+LOCATION_REMOVED,0,1,c) return c:IsCode(65133150) and c:IsAbleToHand() and Duel.IsExistingMatchingCard(s.thfilter2,c:GetControler(),LOCATION_DECK+LOCATION_REMOVED,0,1,c) and c:IsFaceupEx()
end end
function s.thfilter2(c) function s.thfilter2(c)
return c:IsSetCard(0x838) and c:IsAbleToHand() return c:IsSetCard(0x838) and c:IsAbleToHand() and c:IsFaceupEx()
end end
function s.spfilter(c,e,tp) function s.spfilter(c,e,tp)
return c:IsSetCard(0x838) and c:IsCanBeSpecialSummoned(e,0,tp,true,false) return c:IsSetCard(0x838) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
end end
function s.activate(e,tp,eg,ep,ev,re,r,rp) function s.activate(e,tp,eg,ep,ev,re,r,rp)
local optable=e:GetLabel() local optable=e:GetLabel()
......
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