Skip to content

Y
ygopro-scripts
Commit f0ff033b authored by nekrozar's avatar nekrozar Committed by mercury233
Browse files
Options

fix&update (#918)

parent a080c9f8
Hide whitespace changes
Inline Side-by-side
Showing with 43 additions and 28 deletions
c42160203.lua
View file @ f0ff033b
...@@ -74,7 +74,7 @@ function c42160203.spfilter(c,e,tp) ...@@ -74,7 +74,7 @@ function c42160203.spfilter(c,e,tp)
and c:IsType(TYPE_PENDULUM) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) and c:IsType(TYPE_PENDULUM) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
end end
function c42160203.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c42160203.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return (Duel.GetLocationCountFromEx(tp)>0 or e:GetHandler():CheckMZoneFromEx(tp)) if chk==0 then return Duel.GetLocationCountFromEx(tp,tp,e:GetHandler())>0
and Duel.IsExistingMatchingCard(c42160203.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c42160203.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end end
......
c43387895.lua
View file @ f0ff033b
...@@ -40,34 +40,28 @@ end ...@@ -40,34 +40,28 @@ end
function c43387895.spfilter(c,fc) function c43387895.spfilter(c,fc)
return c43387895.ffilter(c) and c:IsCanBeFusionMaterial(fc) return c43387895.ffilter(c) and c:IsCanBeFusionMaterial(fc)
end end
function c43387895.spfilter1(c,tp,g)
return g:IsExists(c43387895.spfilter2,1,c,tp,c)
end
function c43387895.spfilter2(c,tp,mc)
return Duel.GetLocationCountFromEx(tp,tp,Group.FromCards(c,mc))>0
end
function c43387895.spcon(e,c) function c43387895.spcon(e,c)
if c==nil then return true end if c==nil then return true end
local tp=c:GetControler() local tp=c:GetControler()
local ft=Duel.GetLocationCountFromEx(tp,PLAYER_NONE)
local ct=-ft+1
local g=Duel.GetReleaseGroup(tp):Filter(c43387895.spfilter,nil,c) local g=Duel.GetReleaseGroup(tp):Filter(c43387895.spfilter,nil,c)
return g:GetCount()>1 and (Duel.GetLocationCountFromEx(tp)>0 or g:IsExists(Card.CheckMZoneFromEx,ct,nil,tp)) return g:IsExists(c43387895.spfilter1,1,nil,tp,g)
end end
function c43387895.spop(e,tp,eg,ep,ev,re,r,rp,c) function c43387895.spop(e,tp,eg,ep,ev,re,r,rp,c)
local ft=Duel.GetLocationCountFromEx(tp,PLAYER_NONE)
local ct=-ft+1
local g=Duel.GetReleaseGroup(tp):Filter(c43387895.spfilter,nil,c) local g=Duel.GetReleaseGroup(tp):Filter(c43387895.spfilter,nil,c)
local sg=nil Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
if Duel.GetLocationCountFromEx(tp)<=0 then local g1=g:FilterSelect(tp,c43387895.spfilter1,1,1,nil,tp,g)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE) local mc=g1:GetFirst()
sg=g:FilterSelect(tp,Card.CheckMZoneFromEx,ct,ct,nil,tp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
if ct<2 then local g2=g:FilterSelect(tp,c43387895.spfilter2,1,1,mc,tp,mc)
g:Sub(sg) g1:Merge(g2)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE) c:SetMaterial(g1)
local g1=g:Select(tp,2-ct,2-ct,nil) Duel.Release(g1,REASON_COST+REASON_FUSION+REASON_MATERIAL)
sg:Merge(g1)
end
else
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
sg=g:Select(tp,2,2,nil)
end
c:SetMaterial(sg)
Duel.Release(sg,REASON_COST+REASON_FUSION+REASON_MATERIAL)
end end
function c43387895.copycost(e,tp,eg,ep,ev,re,r,rp,chk) function c43387895.copycost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():GetFlagEffect(41209827)==0 end if chk==0 then return e:GetHandler():GetFlagEffect(41209827)==0 end
......
c96733134.lua
View file @ f0ff033b
...@@ -66,15 +66,36 @@ function c96733134.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -66,15 +66,36 @@ function c96733134.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.ConfirmCards(1-tp,g) Duel.ConfirmCards(1-tp,g)
end end
end end
function c96733134.rfilter(c,tp)
return c:IsSetCard(0x20f8) and (c:IsControler(tp) or c:IsFaceup())
end
function c96733134.mzfilter(c,tp)
return c:IsControler(tp) and c:GetSequence()<5
end
function c96733134.hspcost(e,tp,eg,ep,ev,re,r,rp,chk) function c96733134.hspcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckReleaseGroup(tp,Card.IsSetCard,2,nil,0x20f8) end local rg=Duel.GetReleaseGroup(tp):Filter(c96733134.rfilter,nil,tp)
local sg=Duel.SelectReleaseGroup(tp,Card.IsSetCard,2,2,nil,0x20f8) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
Duel.Release(sg,REASON_COST) local ct=-ft+1
if chk==0 then return ft>-2 and rg:GetCount()>1 and (ft>0 or rg:IsExists(c96733134.mzfilter,ct,nil,tp)) end
local g=nil
if ft>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
g=rg:Select(tp,2,2,nil)
elseif ft==0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
g=rg:FilterSelect(tp,c96733134.mzfilter,1,1,nil,tp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
local g2=rg:Select(tp,1,1,g:GetFirst())
g:Merge(g2)
else
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
g=rg:FilterSelect(tp,c96733134.mzfilter,2,2,nil,tp)
end
Duel.Release(g,REASON_COST)
end end
function c96733134.hsptg(e,tp,eg,ep,ev,re,r,rp,chk) function c96733134.hsptg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>-1 if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
end end
function c96733134.hspop(e,tp,eg,ep,ev,re,r,rp) function c96733134.hspop(e,tp,eg,ep,ev,re,r,rp)
...@@ -104,7 +125,7 @@ function c96733134.spfilter(c,e,tp) ...@@ -104,7 +125,7 @@ function c96733134.spfilter(c,e,tp)
and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
end end
function c96733134.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c96733134.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return (Duel.GetLocationCountFromEx(tp)>0 or e:GetHandler():CheckMZoneFromEx(tp)) if chk==0 then return Duel.GetLocationCountFromEx(tp,tp,e:GetHandler())>0
and Duel.IsExistingMatchingCard(c96733134.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c96733134.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
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