Skip to content

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

fix

parent a62c672b
Hide whitespace changes
Inline Side-by-side
Showing with 154 additions and 21 deletions
expansions/script/c111443942.lua
View file @ d761e3c8
......@@ -20,7 +20,7 @@ function cm.condition(e,tp,eg,ep,ev,re,r,rp)
end
function cm.activate(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetMatchingGroup(cm.actfilter,tp,0xff,0xff,nil)
local g=Duel.GetMatchingGroup(cm.actfilter,tp,0xff,0,nil)
for tc in aux.Next(g) do
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_FIELD)
......
expansions/script/c11451651.lua
View file @ d761e3c8
......@@ -142,9 +142,11 @@ function cm.condition(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(cm.cfilter,1,nil,tp) and not eg:IsContains(e:GetHandler())
end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
local g=eg:Filter(cm.cfilter,nil,tp)
local tg=g:Filter(Card.IsAbleToHand,nil)
if chk==0 then return e:GetHandler():IsAbleToDeck() and #tg>0 end
if chk==0 then return c:IsAbleToDeck() and #tg>0 and c:GetFlagEffect(m+1)==0 end
c:RegisterFlagEffect(m+1,RESET_EVENT+RESETS_STANDARD+RESET_CHAIN,0,1)
Duel.SetTargetCard(g)
Duel.SetOperationInfo(0,CATEGORY_TODECK,e:GetHandler(),1,0,0)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,tg,1,tp,LOCATION_GRAVE)
......
expansions/script/c11451682.lua
View file @ d761e3c8
--狂战的牛头人
local m=11451682
local cm=_G["c"..m]
local cm,m=GetID()
function cm.initial_effect(c)
--pendulum summon
c:EnableReviveLimit()
......@@ -43,18 +42,23 @@ function cm.initial_effect(c)
ge1:SetCode(EVENT_BE_BATTLE_TARGET)
ge1:SetOperation(cm.checkop)
Duel.RegisterEffect(ge1,0)
local ge2=Effect.CreateEffect(c)
ge2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge2:SetCode(EVENT_BECOME_TARGET)
ge2:SetOperation(cm.checkop2)
Duel.RegisterEffect(ge2,0)
local ge3=Effect.CreateEffect(c)
ge3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge3:SetCode(EVENT_BECOME_TARGET)
ge3:SetOperation(cm.checkop3)
Duel.RegisterEffect(ge3,0)
local ge6=Effect.CreateEffect(c)
ge6:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge6:SetCode(EVENT_ADJUST)
ge6:SetOperation(cm.checkop6)
Duel.RegisterEffect(ge6,0)
end
end
function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetAttackTarget()
tc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD,0,1)
end
function cm.checkop2(e,tp,eg,ep,ev,re,r,rp)
function cm.checkop3(e,tp,eg,ep,ev,re,r,rp)
local tg=eg:Filter(Card.IsOnField,nil)
if #tg>0 then
for tc in aux.Next(tg) do
......@@ -62,6 +66,17 @@ function cm.checkop2(e,tp,eg,ep,ev,re,r,rp)
end
end
end
function cm.checkop6(e,tp,eg,ep,ev,re,r,rp)
local tg=Duel.GetMatchingGroup(cm.ctgfilter,0,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
if #tg>0 then
for tc in aux.Next(tg) do
tc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD,0,1)
end
end
end
function cm.ctgfilter(c)
return c:GetOwnerTargetCount()>0 and c:GetFlagEffect(m)==0
end
function cm.GetLinkCount(c)
if c:GetFlagEffect(m)>0 then
return 1+0x10000*2
......
expansions/script/c11451683.lua
View file @ d761e3c8
--牛头人的饕宴
local m=11451683
local cm=_G["c"..m]
local cm,m=GetID()
function cm.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
......@@ -29,7 +28,25 @@ function cm.initial_effect(c)
local e3=e2:Clone()
e3:SetCode(EVENT_BECOME_TARGET)
e3:SetCondition(cm.con2)
e3:SetOperation(cm.desop1)
c:RegisterEffect(e3)
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e5:SetRange(LOCATION_SZONE)
e5:SetCode(EVENT_CHAIN_SOLVED)
e5:SetOperation(cm.desop2)
e5:SetLabelObject(e3)
c:RegisterEffect(e5)
local e7=e5:Clone()
e7:SetCode(EVENT_CHAIN_NEGATED)
c:RegisterEffect(e7)
local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e6:SetRange(LOCATION_SZONE)
e6:SetCode(EVENT_BATTLED)
e6:SetOperation(cm.desop3)
e6:SetLabelObject(e3)
c:RegisterEffect(e6)
--destroy sub
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
......@@ -48,9 +65,31 @@ function cm.initial_effect(c)
Duel.RegisterEffect(ge1,0)
local ge2=Effect.CreateEffect(c)
ge2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge2:SetCode(EVENT_BECOME_TARGET)
ge2:SetCode(EVENT_CHAINING)
ge2:SetOperation(cm.checkop2)
Duel.RegisterEffect(ge2,0)
--Duel.RegisterEffect(ge2,0)
local ge3=Effect.CreateEffect(c)
ge3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge3:SetCode(EVENT_BECOME_TARGET)
ge3:SetOperation(cm.checkop3)
--ge3:SetLabelObject(ge2)
Duel.RegisterEffect(ge3,0)
local ge4=Effect.CreateEffect(c)
ge4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge4:SetCode(EVENT_CHAIN_END)
ge4:SetOperation(cm.checkop4)
ge4:SetLabelObject(ge2)
--Duel.RegisterEffect(ge4,0)
local ge5=Effect.CreateEffect(c)
ge5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge5:SetCode(EVENT_CHAIN_NEGATED)
ge5:SetOperation(cm.checkop5)
--Duel.RegisterEffect(ge5,0)
local ge6=Effect.CreateEffect(c)
ge6:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge6:SetCode(EVENT_ADJUST)
ge6:SetOperation(cm.checkop6)
Duel.RegisterEffect(ge6,0)
end
end
function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
......@@ -58,6 +97,20 @@ function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
tc:RegisterFlagEffect(m-1,RESET_EVENT+RESETS_STANDARD,0,1)
end
function cm.checkop2(e,tp,eg,ep,ev,re,r,rp)
if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return end
local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS)
if not g or #g==0 then return end
e:SetLabel(ev)
local tg=g:Filter(Card.IsOnField,nil)
if #tg>0 then
for tc in aux.Next(tg) do
tc:RegisterFlagEffect(m-1,RESET_EVENT+RESETS_STANDARD,0,1)
end
end
end
function cm.checkop3(e,tp,eg,ep,ev,re,r,rp)
--local lab=e:GetLabelObject():GetLabel()
--if lab~=ev-1 then return end
local tg=eg:Filter(Card.IsOnField,nil)
if #tg>0 then
for tc in aux.Next(tg) do
......@@ -65,6 +118,32 @@ function cm.checkop2(e,tp,eg,ep,ev,re,r,rp)
end
end
end
function cm.checkop4(e,tp,eg,ep,ev,re,r,rp)
e:GetLabelObject():SetLabel(0)
end
function cm.checkop5(e,tp,eg,ep,ev,re,r,rp)
if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return end
local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS)
if not g or #g==0 then return end
e:SetLabel(ev)
local tg=g:Filter(Card.IsOnField,nil)
if #tg>0 then
for tc in aux.Next(tg) do
tc:ResetFlagEffect(m-1)
end
end
end
function cm.checkop6(e,tp,eg,ep,ev,re,r,rp)
local tg=Duel.GetMatchingGroup(cm.ctgfilter,0,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
if #tg>0 then
for tc in aux.Next(tg) do
tc:RegisterFlagEffect(m-1,RESET_EVENT+RESETS_STANDARD,0,1)
end
end
end
function cm.ctgfilter(c)
return c:GetOwnerTargetCount()>0 and c:GetFlagEffect(m-1)==0
end
function cm.tgfilter(c,e)
return c:IsCanBeEffectTarget(e) and c:GetFlagEffect(m-1)==0
end
......@@ -113,6 +192,34 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
Duel.SpecialSummon(tg,0,tp,tp,false,false,POS_FACEUP_ATTACK)
end
end
function cm.desop1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsLocation(LOCATION_SZONE) and c:IsFaceup() then
e:SetLabelObject(re)
e:SetLabel(0)
c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_CHAIN,0,1)
end
end
function cm.desop2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if re==e:GetLabelObject():GetLabelObject() and c:GetFlagEffect(m)>0 then
if Duel.GetCurrentPhase()==PHASE_DAMAGE and not Duel.IsDamageCalculated() then
e:GetLabelObject():SetLabel(1)
else
if c:IsHasEffect(EFFECT_DISABLE) then return end
if not c:IsDisabled() then cm.spop(e,tp,eg,ep,ev,re,r,rp) end
end
end
end
function cm.desop3(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local des=e:GetLabelObject():GetLabel()
e:GetLabelObject():SetLabel(0)
if c:IsHasEffect(EFFECT_DISABLE) then return end
if des==1 and not c:IsDisabled() then
cm.spop(e,tp,eg,ep,ev,re,r,rp)
end
end
function cm.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsReason(REASON_BATTLE+REASON_EFFECT) and not c:IsReason(REASON_REPLACE) and c:CheckRemoveOverlayCard(tp,1,REASON_EFFECT) end
......
expansions/script/c121082832.lua
View file @ d761e3c8
......@@ -10,6 +10,7 @@ function c121082832.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,121082832+EFFECT_COUNT_CODE_DUEL+EFFECT_COUNT_CODE_OATH)
e1:SetTarget(c121082832.target)
c:RegisterEffect(e1)
end
......
expansions/script/c22348143.lua
View file @ d761e3c8
......@@ -28,7 +28,7 @@ function cm.initial_effect(c)
--Remove
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(22348143,2))
e3:SetCategory(CATEGORY_REMOVE)
e3:SetCategory(CATEGORY_REMOVE+CATEGORY_DRAW)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetCode(EVENT_REMOVE)
......
expansions/script/c33201160.lua
View file @ d761e3c8
......@@ -83,6 +83,12 @@ function s.setop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
local g=Duel.SelectMatchingCard(tp,s.matfilter,tp,0,LOCATION_ONFIELD,1,1,e:GetHandler())
if g:GetCount()>0 then
for mc in aux.Next(g) do
local mg=mc:GetOverlayGroup()
if mg:GetCount()~=0 then
Duel.Overlay(e:GetHandler(),mg)
end
end
Duel.Overlay(e:GetHandler(),g)
end
end
......
expansions/script/c33310210.lua
View file @ d761e3c8
......@@ -29,7 +29,7 @@ function c33310210.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e5:SetCountLimit(1,33310210)
e1:SetCountLimit(1,33310210)
e1:SetTarget(c33310210.thtg)
e1:SetOperation(c33310210.thop)
c:RegisterEffect(e1)
......
expansions/script/c53796064.lua
View file @ d761e3c8
......@@ -32,15 +32,18 @@ end
function cm.rmcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end
function cm.rmfilter(c)
return (c:IsFaceup() or c:IsLocation(LOCATION_GRAVE)) and c:IsAttribute(ATTRIBUTE_WATER)
end
function cm.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAttribute,tp,LOCATION_MZONE+LOCATION_GRAVE,0,1,nil,ATTRIBUTE_WATER) and Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,1,nil) end
if chk==0 then return Duel.IsExistingMatchingCard(cm.rmfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,1,nil) and Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,0,LOCATION_ONFIELD+LOCATION_GRAVE)
end
function cm.atkfilter(c)
return c:IsAttribute(ATTRIBUTE_WATER) and c:IsFaceup()
end
function cm.rmop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(Card.IsAttribute,tp,LOCATION_MZONE+LOCATION_GRAVE,0,nil,ATTRIBUTE_WATER)
local g=Duel.GetMatchingGroup(cm.rmfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,nil)
local ct=g:GetClassCount(Card.GetRace)
if ct==0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
......
expansions/script/c53799164.lua
View file @ d761e3c8
......@@ -45,7 +45,7 @@ function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
e:SetLabel(g:GetFirst():GetLevel())
end
function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function cm.spop(e,tp,eg,ep,ev,re,r,rp)
......
expansions/script/c60000141.lua
View file @ d761e3c8
......@@ -12,7 +12,6 @@ function cm.initial_effect(c)
e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_GRAVE)
e2:SetCondition(cm.thcon)
e2:SetCost(cm.thcost)
e2:SetTarget(cm.thtg)
e2:SetOperation(cm.thop)
......
expansions/script/c60000145.lua
View file @ d761e3c8
......@@ -16,7 +16,6 @@ function cm.initial_effect(c)
e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_GRAVE)
e2:SetCondition(cm.thcon)
e2:SetCost(cm.thcost)
e2:SetTarget(cm.thtg)
e2:SetOperation(cm.thop)
......
expansions/script/c60001175.lua
View file @ d761e3c8
......@@ -27,6 +27,7 @@ function c60001175.initial_effect(c)
e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetRange(LOCATION_GRAVE)
e3:SetCode(EVENT_FREE_CHAIN)
e3:SetCountLimit(1,60001175)
e3:SetTarget(c60001175.hstg)
e3:SetOperation(c60001175.hsop)
......
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