Skip to content

no81cards
no81cards
Commit 0f0541f5 authored by POLYMER's avatar POLYMER
Browse files
Options

fix

parent 6b46e865
Hide whitespace changes
Inline Side-by-side
Showing with 119 additions and 7 deletions
expansions/script/c11451524.lua
View file @ 0f0541f5
...@@ -220,13 +220,44 @@ function cm.matfilter(c) ...@@ -220,13 +220,44 @@ function cm.matfilter(c)
end end
function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
local mg=Duel.GetMatchingGroup(cm.matfilter,tp,LOCATION_ONFIELD,0,nil) local mg=Duel.GetMatchingGroup(cm.matfilter,tp,LOCATION_ONFIELD,0,nil)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsLinkSummonable,tp,LOCATION_EXTRA,0,1,nil,mg) end if chk==0 then return Duel.IsExistingMatchingCard(cm.slfilter,tp,LOCATION_EXTRA,0,1,nil,mg) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
end end
function cm.slfilter(c,mg)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_EXTRA_LINK_MATERIAL)
e1:SetRange(LOCATION_EXTRA)
e1:SetTargetRange(LOCATION_ONFIELD,0)
e1:SetTarget(aux.TargetBoolFunction(cm.matfilter))
e1:SetValue(cm.matval)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
c:RegisterEffect(e1,true)
local res=c:IsLinkSummonable(mg)
e1:Reset()
return res
end
function cm.matval(e,lc,mg,c,tp)
if lc~=e:GetHandler() then return false,nil end
return true,true
end
function cm.spop(e,tp,eg,ep,ev,re,r,rp) function cm.spop(e,tp,eg,ep,ev,re,r,rp)
local mg=Duel.GetMatchingGroup(cm.matfilter,tp,LOCATION_ONFIELD,0,nil) local mg=Duel.GetMatchingGroup(cm.matfilter,tp,LOCATION_ONFIELD,0,nil)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,Card.IsLinkSummonable,tp,LOCATION_EXTRA,0,1,1,nil,mg) local g=Duel.SelectMatchingCard(tp,cm.slfilter,tp,LOCATION_EXTRA,0,1,1,nil,mg)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then Duel.LinkSummon(tp,tc,mg) end if tc then
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_EXTRA_LINK_MATERIAL)
e1:SetRange(LOCATION_EXTRA)
e1:SetTargetRange(LOCATION_ONFIELD,0)
e1:SetTarget(aux.TargetBoolFunction(cm.matfilter))
e1:SetValue(cm.matval)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1,true)
Duel.LinkSummon(tp,tc,mg)
end
end end
\ No newline at end of file
expansions/script/c11451545.lua
View file @ 0f0541f5
...@@ -83,14 +83,45 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -83,14 +83,45 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end --Duel.IsExistingMatchingCard(Card.IsLinkSummonable,tp,LOCATION_EXTRA,0,1,nil,mg) end if chk==0 then return true end --Duel.IsExistingMatchingCard(Card.IsLinkSummonable,tp,LOCATION_EXTRA,0,1,nil,mg) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
end end
function cm.slfilter(c,mg,e,tp)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_EXTRA_LINK_MATERIAL)
e1:SetRange(LOCATION_EXTRA)
e1:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
e1:SetTarget(aux.TargetBoolFunction(cm.matfilter,e,tp))
e1:SetValue(cm.matval)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
c:RegisterEffect(e1,true)
local res=c:IsLinkSummonable(mg)
e1:Reset()
return res
end
function cm.matval(e,lc,mg,c,tp)
if lc~=e:GetHandler() then return false,nil end
return true,true
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()
if not c:IsRelateToEffect(e) then return end if not c:IsRelateToEffect(e) then return end
local mg=Duel.GetMatchingGroup(cm.matfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil,e,tp) local mg=Duel.GetMatchingGroup(cm.matfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil,e,tp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,Card.IsLinkSummonable,tp,LOCATION_EXTRA,0,1,1,nil,mg) local g=Duel.SelectMatchingCard(tp,cm.slfilter,tp,LOCATION_EXTRA,0,1,1,nil,mg,e,tp)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc then Duel.LinkSummon(tp,tc,mg) end if tc then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_EXTRA_LINK_MATERIAL)
e1:SetRange(LOCATION_EXTRA)
e1:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
e1:SetTarget(aux.TargetBoolFunction(cm.matfilter,e,tp))
e1:SetValue(cm.matval)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1,true)
Duel.LinkSummon(tp,tc,mg)
end
end end
function cm.costfilter(c,tp) function cm.costfilter(c,tp)
return c:IsSetCard(0x129) and c:IsAbleToGraveAsCost() and not Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,c:GetCode()) return c:IsSetCard(0x129) and c:IsAbleToGraveAsCost() and not Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,c:GetCode())
......
expansions/script/c11451608.lua
View file @ 0f0541f5
...@@ -56,7 +56,25 @@ function cm.filter1(c) ...@@ -56,7 +56,25 @@ function cm.filter1(c)
return c:IsSetCard(0x10) and c:IsType(TYPE_MONSTER) and c:IsAbleToDeck() return c:IsSetCard(0x10) and c:IsType(TYPE_MONSTER) and c:IsAbleToDeck()
end end
function cm.filter2(c,mg) function cm.filter2(c,mg)
return (c:IsSynchroSummonable(nil,mg) or c:IsLinkSummonable(mg)) --and Duel.GetLocationCountFromEx(tp,tp,mg,c)>0 local e1=Effect.CreateEffect(c)
if c:IsType(TYPE_LINK) then
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_EXTRA_LINK_MATERIAL)
e1:SetRange(LOCATION_EXTRA)
e1:SetTargetRange(LOCATION_HAND,0)
e1:SetTarget(aux.TRUE)
e1:SetValue(cm.matval)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
c:RegisterEffect(e1,true)
end
local res=c:IsSynchroSummonable(nil,mg) or c:IsLinkSummonable(mg)
e1:Reset()
return res
end
function cm.matval(e,lc,mg,c,tp)
if lc~=e:GetHandler() then return false,nil end
return true,true
end end
function cm.filter3(c) function cm.filter3(c)
return c:IsType(TYPE_MONSTER) and (c:IsLocation(LOCATION_HAND) or c:IsFaceup()) return c:IsType(TYPE_MONSTER) and (c:IsLocation(LOCATION_HAND) or c:IsFaceup())
...@@ -101,6 +119,16 @@ function cm.slop(e,tp,eg,ep,ev,re,r,rp) ...@@ -101,6 +119,16 @@ function cm.slop(e,tp,eg,ep,ev,re,r,rp)
if tc:IsSynchroSummonable(nil,mg) then if tc:IsSynchroSummonable(nil,mg) then
Duel.SynchroSummon(tp,tc,nil,mg) Duel.SynchroSummon(tp,tc,nil,mg)
else else
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_EXTRA_LINK_MATERIAL)
e1:SetRange(LOCATION_EXTRA)
e1:SetTargetRange(LOCATION_HAND,0)
e1:SetTarget(aux.TRUE)
e1:SetValue(cm.matval)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1,true)
Duel.LinkSummon(tp,tc,mg) Duel.LinkSummon(tp,tc,mg)
end end
end end
......
expansions/script/c11451681.lua
View file @ 0f0541f5
...@@ -55,7 +55,19 @@ function cm.tgfilter(c,tp) ...@@ -55,7 +55,19 @@ function cm.tgfilter(c,tp)
return c:IsFaceup() and c:IsDestructable() and Duel.IsExistingMatchingCard(cm.lfilter,tp,LOCATION_EXTRA,0,1,nil,mg,c) return c:IsFaceup() and c:IsDestructable() and Duel.IsExistingMatchingCard(cm.lfilter,tp,LOCATION_EXTRA,0,1,nil,mg,c)
end end
function cm.lfilter(c,mg,tc) function cm.lfilter(c,mg,tc)
return c:IsRace(RACE_BEASTWARRIOR) and c:IsLinkSummonable(mg,tc) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_EXTRA_LINK_MATERIAL)
e1:SetRange(LOCATION_EXTRA)
e1:SetTargetRange(0,LOCATION_MZONE)
e1:SetTarget(function(e,c) return c==tc end)
e1:SetValue(function(e,lc) if lc~=e:GetHandler() then return false,nil end return true,true end)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
c:RegisterEffect(e1,true)
local res=c:IsRace(RACE_BEASTWARRIOR) and c:IsLinkSummonable(mg,tc)
e1:Reset()
return res
end end
function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler() local c=e:GetHandler()
...@@ -75,6 +87,16 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -75,6 +87,16 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,cm.lfilter,tp,LOCATION_EXTRA,0,1,1,nil,mg,tc) local g=Duel.SelectMatchingCard(tp,cm.lfilter,tp,LOCATION_EXTRA,0,1,1,nil,mg,tc)
local lc=g:GetFirst() local lc=g:GetFirst()
if lc then if lc then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_EXTRA_LINK_MATERIAL)
e1:SetRange(LOCATION_EXTRA)
e1:SetTargetRange(0,LOCATION_MZONE)
e1:SetTarget(function(e,c) return c==tc end)
e1:SetValue(function(e,lc) if lc~=e:GetHandler() then return false,nil end return true,true end)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
lc:RegisterEffect(e1,true)
local _SendToGrave=Duel.SendtoGrave local _SendToGrave=Duel.SendtoGrave
Duel.SendtoGrave=function(tg,r) Duel.SendtoGrave=function(tg,r)
if r&(REASON_MATERIAL+REASON_LINK)==REASON_MATERIAL+REASON_LINK then if r&(REASON_MATERIAL+REASON_LINK)==REASON_MATERIAL+REASON_LINK then
......
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