Skip to content

no81cards
no81cards
Commit 61c978a9 authored by Nemo Ma's avatar Nemo Ma
Browse files
Options

fix

parent 641240b7
Hide whitespace changes
Inline Side-by-side
Showing with 47 additions and 33 deletions
expansions/script/c11451532.lua
View file @ 61c978a9
...@@ -64,7 +64,7 @@ function cm.adop(e,tp,eg,ep,ev,re,r,rp) ...@@ -64,7 +64,7 @@ function cm.adop(e,tp,eg,ep,ev,re,r,rp)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,2) c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,2)
else else
e2:SetReset(RESET_PHASE+PHASE_BATTLE_START) e2:SetReset(RESET_PHASE+PHASE_BATTLE_START)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1) c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1,c:GetFieldID())
end end
Duel.RegisterEffect(e2,tp) Duel.RegisterEffect(e2,tp)
end end
......
expansions/script/c11451533.lua
View file @ 61c978a9
...@@ -73,7 +73,7 @@ function cm.adop(e,tp,eg,ep,ev,re,r,rp) ...@@ -73,7 +73,7 @@ function cm.adop(e,tp,eg,ep,ev,re,r,rp)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,2) c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,2)
else else
e2:SetReset(RESET_PHASE+PHASE_BATTLE_START) e2:SetReset(RESET_PHASE+PHASE_BATTLE_START)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1) c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1,c:GetFieldID())
end end
Duel.RegisterEffect(e2,tp) Duel.RegisterEffect(e2,tp)
end end
......
expansions/script/c11451534.lua
View file @ 61c978a9
...@@ -97,7 +97,7 @@ function cm.adop(e,tp,eg,ep,ev,re,r,rp) ...@@ -97,7 +97,7 @@ function cm.adop(e,tp,eg,ep,ev,re,r,rp)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,2) c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,2)
else else
e2:SetReset(RESET_PHASE+PHASE_BATTLE_START) e2:SetReset(RESET_PHASE+PHASE_BATTLE_START)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1) c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1,c:GetFieldID())
end end
Duel.RegisterEffect(e2,tp) Duel.RegisterEffect(e2,tp)
end end
......
expansions/script/c11451535.lua
View file @ 61c978a9
...@@ -59,7 +59,7 @@ function cm.adop(e,tp,eg,ep,ev,re,r,rp) ...@@ -59,7 +59,7 @@ function cm.adop(e,tp,eg,ep,ev,re,r,rp)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,2) c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,2)
else else
e2:SetReset(RESET_PHASE+PHASE_BATTLE_START) e2:SetReset(RESET_PHASE+PHASE_BATTLE_START)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1) c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1,c:GetFieldID())
end end
Duel.RegisterEffect(e2,tp) Duel.RegisterEffect(e2,tp)
end end
......
expansions/script/c11451536.lua
View file @ 61c978a9
...@@ -60,7 +60,7 @@ function cm.adop(e,tp,eg,ep,ev,re,r,rp) ...@@ -60,7 +60,7 @@ function cm.adop(e,tp,eg,ep,ev,re,r,rp)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,2) c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,2)
else else
e2:SetReset(RESET_PHASE+PHASE_BATTLE_START) e2:SetReset(RESET_PHASE+PHASE_BATTLE_START)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1) c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE_START,0,1,c:GetFieldID())
end end
Duel.RegisterEffect(e2,tp) Duel.RegisterEffect(e2,tp)
end end
......
expansions/script/c29056009.lua
View file @ 61c978a9
...@@ -85,7 +85,7 @@ function c29056009.checkfilter(c) ...@@ -85,7 +85,7 @@ function c29056009.checkfilter(c)
return c:IsFaceup() and c:IsCode(29065500) return c:IsFaceup() and c:IsCode(29065500)
end end
function c29056009.xthfilter(c) function c29056009.xthfilter(c)
return aux.IsCodeListed(c,29065500) and c:IsAbleToHand() and c:IsType(TYPE_MONSTER) return (c:IsCode(29065500) or aux.IsCodeListed(c,29065500)) and c:IsAbleToHand() and c:IsType(TYPE_MONSTER)
end end
function c29056009.xthfilter1(c) function c29056009.xthfilter1(c)
return (c:IsSetCard(0x87af) or (_G["c"..c:GetCode()] and _G["c"..c:GetCode()].named_with_Arknight)) and c:IsAbleToHand() and c:IsType(TYPE_MONSTER) return (c:IsSetCard(0x87af) or (_G["c"..c:GetCode()] and _G["c"..c:GetCode()].named_with_Arknight)) and c:IsAbleToHand() and c:IsType(TYPE_MONSTER)
......
expansions/script/c29071651.lua
View file @ 61c978a9
...@@ -41,7 +41,7 @@ function c29071651.checkfilter(c) ...@@ -41,7 +41,7 @@ function c29071651.checkfilter(c)
return c:IsFaceup() and c:IsCode(29065500) return c:IsFaceup() and c:IsCode(29065500)
end end
function c29071651.spfilter(c,e,tp) function c29071651.spfilter(c,e,tp)
return (c:IsSetCard(0x87af) or (_G["c"..c:GetCode()] and _G["c"..c:GetCode()].named_with_Arknight)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and (c:IsLocation(LOCATION_HAND) or (aux.IsCodeListed(c,29065500) and c:IsLocation(LOCATION_DECK) and Duel.IsExistingMatchingCard(c29071651.checkfilter,tp,LOCATION_ONFIELD,0,1,nil))) return ((c:IsSetCard(0x87af) or (_G["c"..c:GetCode()] and _G["c"..c:GetCode()].named_with_Arknight)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsLocation(LOCATION_HAND)) or ((c:IsCode(29065500) or aux.IsCodeListed(c,29065500)) and c:IsLocation(LOCATION_DECK) and Duel.IsExistingMatchingCard(c29071651.checkfilter,tp,LOCATION_ONFIELD,0,1,nil))
end end
function c29071651.sptg1(e,tp,eg,ep,ev,re,r,rp,chk) function c29071651.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
......
expansions/script/c53799085.lua
View file @ 61c978a9
...@@ -82,6 +82,7 @@ function cm.cfilter(c,seq2) ...@@ -82,6 +82,7 @@ function cm.cfilter(c,seq2)
end end
cm[0]=0 cm[0]=0
function cm.disop(e,tp,eg,ep,ev,re,r,rp) function cm.disop(e,tp,eg,ep,ev,re,r,rp)
if rp~=tp then return end
local loc,seq,id=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION,CHAININFO_TRIGGERING_SEQUENCE,CHAININFO_CHAIN_ID) local loc,seq,id=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION,CHAININFO_TRIGGERING_SEQUENCE,CHAININFO_CHAIN_ID)
seq=aux.MZoneSequence(seq) seq=aux.MZoneSequence(seq)
if id~=cm[0] and re:IsActiveType(TYPE_MONSTER) and loc==LOCATION_MZONE and not Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_SZONE,0,1,nil,seq) then if id~=cm[0] and re:IsActiveType(TYPE_MONSTER) and loc==LOCATION_MZONE and not Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_SZONE,0,1,nil,seq) then
......
expansions/script/c79029500.lua
View file @ 61c978a9
...@@ -36,15 +36,17 @@ function c79029500.thcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -36,15 +36,17 @@ function c79029500.thcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION) return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION)
end end
function c79029500.thtg(e,tp,eg,ep,ev,re,r,rp,chk) function c79029500.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToHand,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToHand,tp,LOCATION_DECK,0,1,nil) end
local g=Duel.SelectTarget(tp,Card.IsAbleToHand,tp,LOCATION_DECK,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,tp,LOCATION_DECK)
end end
function c79029500.thop(e,tp,eg,ep,ev,re,r,rp) function c79029500.thop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end local g=Duel.GetMatchingGroup(Card.IsAbleToHand,tp,LOCATION_DECK,0,nil)
local tc=Duel.GetFirstTarget() if g:GetCount()>0 then
Duel.SendtoHand(tc,tp,REASON_EFFECT) local tc=g:Select(tp,1,1,nil):GetFirst()
Duel.SendtoHand(tc,tp,REASON_EFFECT)
Duel.ConfirmCards(1-tp,tc)
end
end end
function c79029500.efilter(e,te) function c79029500.efilter(e,te)
......
expansions/script/c98920003.lua
View file @ 61c978a9
...@@ -23,6 +23,7 @@ function c98920003.initial_effect(c) ...@@ -23,6 +23,7 @@ function c98920003.initial_effect(c)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SPSUMMON_SUCCESS) e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetCountLimit(1,98920003) e3:SetCountLimit(1,98920003)
e3:SetTarget(c98920003.sptg) e3:SetTarget(c98920003.sptg)
e3:SetCondition(c98920003.spcon) e3:SetCondition(c98920003.spcon)
......
expansions/script/c98920007.lua
View file @ 61c978a9
...@@ -4,6 +4,7 @@ function c98920007.initial_effect(c) ...@@ -4,6 +4,7 @@ function c98920007.initial_effect(c)
e1:SetCategory(CATEGORY_TODECK+CATEGORY_SEARCH) e1:SetCategory(CATEGORY_TODECK+CATEGORY_SEARCH)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,98920007+EFFECT_COUNT_CODE_OATH)
e1:SetTarget(c98920007.target) e1:SetTarget(c98920007.target)
e1:SetOperation(c98920007.activate) e1:SetOperation(c98920007.activate)
c:RegisterEffect(e1) c:RegisterEffect(e1)
...@@ -32,31 +33,30 @@ end ...@@ -32,31 +33,30 @@ end
function c98920007.efilter(e,te) function c98920007.efilter(e,te)
return te:GetOwnerPlayer()~=e:GetHandlerPlayer() and te:IsActiveType(TYPE_MONSTER) return te:GetOwnerPlayer()~=e:GetHandlerPlayer() and te:IsActiveType(TYPE_MONSTER)
end end
function c98920007.filter(c,e,tp) function c98920007.filter(c)
return c:IsSetCard(0x71) and c:IsType(TYPE_MONSTER) and Duel.GetMatchingGroupCount(c98920007.filter2,tp,LOCATION_GRAVE,0,nil)>=c:GetLevel() return c:IsSetCard(0x71) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() and
end Duel.GetMatchingGroupCount(Card.IsAbleToDeck,tp,LOCATION_GRAVE,0,nil)>=c:GetLevel()
function c98920007.filter2(c)
return c:IsAbleToDeck()
end end
function c98920007.target(e,tp,eg,ep,ev,re,r,rp,chk) function c98920007.target(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() if chk==0 then return Duel.IsExistingMatchingCard(c98920007.filter,tp,LOCATION_DECK,0,1,nil) end
if chk==0 then return c:GetFlagEffect(98920007)==0 and Duel.IsExistingMatchingCard(c98920007.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE) Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,2,tp,LOCATION_GRAVE)
c:RegisterFlagEffect(98920007,RESET_CHAIN,0,1)
end end
function c98920007.activate(e,tp,eg,ep,ev,re,r,rp) function c98920007.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) local g=Duel.GetMatchingGroup(c98920007.filter,tp,LOCATION_DECK,0,nil)
local g=Duel.SelectMatchingCard(tp,c98920007.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp) if #g>0 then
if g:GetCount()>0 then local maxn=g:GetMaxGroup(Card.GetLevel):GetFirst():GetLevel()
local c=g:GetFirst() local minn=g:GetMinGroup(Card.GetLevel):GetFirst():GetLevel()
local n=c:GetLevel()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local tg=Duel.SelectMatchingCard(tp,c98920007.filter2,tp,LOCATION_GRAVE,0,n,n,nil) local tg=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_GRAVE,0,minn,maxn,nil)
if tg:GetCount()>0 then if tg:GetCount()>0 and Duel.SendtoDeck(tg,nil,nil,REASON_EFFECT) then
if Duel.SendtoDeck(tg,nil,nil,REASON_EFFECT)==n and Duel.SendtoHand(g,nil,REASON_EFFECT) and local ct=tg:FilterCount(Card.IsLocation,nil,LOCATION_DECK+LOCATION_HAND+LOCATION_EXTRA)
Duel.ConfirmCards(1-tp,g) then if g:IsExists(Card.IsLevel,1,nil,ct) then
c:CompleteProcedure() Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
g=g:FilterSelect(tp,Card.IsLevel,1,1,nil,ct)
if #g>0 and Duel.SendtoHand(g,nil,2,REASON_EFFECT) then
Duel.ConfirmCards(1-tp,g)
end
end end
end end
end end
......
expansions/script/c98920042.lua
View file @ 61c978a9
...@@ -5,7 +5,7 @@ function c98920042.initial_effect(c) ...@@ -5,7 +5,7 @@ function c98920042.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--to deck --to deck
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_TODECK) e2:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW+CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
...@@ -57,7 +57,17 @@ function c98920042.tdtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -57,7 +57,17 @@ function c98920042.tdtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local sg=g:SelectSubGroup(tp,aux.TRUE,false,1,#g) local sg=g:SelectSubGroup(tp,aux.TRUE,false,1,#g)
aux.GCheckAdditional=nil aux.GCheckAdditional=nil
Duel.SetTargetCard(sg) Duel.SetTargetCard(sg)
Duel.SetOperationInfo(0,CATEGORY_TODECK,sg,#sg,0,0) local ct=sg:GetCount()
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
if ct>1 then
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
end
if ct>3 then
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
end
if ct>5 then
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
end
end end
function c98920042.tdop(e,tp,eg,ep,ev,re,r,rp) function c98920042.tdop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e) local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
......
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