Skip to content

Y
ygopro-222DIY-cards
Commit 7f984893 authored by TanakaKotoha's avatar TanakaKotoha
Browse files
Options

remove useless bgm

parent a912762e
Hide whitespace changes
Inline Side-by-side
Showing with 145 additions and 311 deletions
expansions/222DIY.cdb
View file @ 7f984893
No preview for this file type
expansions/script/c1009011.lua
View file @ 7f984893
...@@ -31,18 +31,6 @@ function c1009011.initial_effect(c) ...@@ -31,18 +31,6 @@ function c1009011.initial_effect(c)
e1:SetTarget(c1009011.target) e1:SetTarget(c1009011.target)
e1:SetOperation(c1009011.operation) e1:SetOperation(c1009011.operation)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_SPSUMMON_SUCCESS)
e8:SetOperation(c1009011.sumsuc)
c:RegisterEffect(e8)
local e9=e8:Clone()
e9:SetCode(EVENT_SUMMON_SUCCESS)
c:RegisterEffect(e9)
end
function c1009011.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(1009011,0))
end end
function c1009011.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c1009011.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
......
expansions/script/c1009012.lua
View file @ 7f984893
...@@ -35,18 +35,6 @@ function c1009012.initial_effect(c) ...@@ -35,18 +35,6 @@ function c1009012.initial_effect(c)
e1:SetTarget(c1009012.distg) e1:SetTarget(c1009012.distg)
e1:SetOperation(c1009012.disop) e1:SetOperation(c1009012.disop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_SPSUMMON_SUCCESS)
e8:SetOperation(c1009012.sumsuc)
c:RegisterEffect(e8)
local e9=e8:Clone()
e9:SetCode(EVENT_SUMMON_SUCCESS)
c:RegisterEffect(e9)
end
function c1009012.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(1009012,0))
end end
function c1009012.thcost(e,tp,eg,ep,ev,re,r,rp,chk) function c1009012.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
......
expansions/script/c1009014.lua
View file @ 7f984893
...@@ -34,18 +34,6 @@ function c1009014.initial_effect(c) ...@@ -34,18 +34,6 @@ function c1009014.initial_effect(c)
e2:SetTarget(c1009014.target) e2:SetTarget(c1009014.target)
e2:SetOperation(c1009014.operation) e2:SetOperation(c1009014.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_SPSUMMON_SUCCESS)
e8:SetOperation(c1009014.sumsuc)
c:RegisterEffect(e8)
local e9=e8:Clone()
e9:SetCode(EVENT_SUMMON_SUCCESS)
c:RegisterEffect(e9)
end
function c1009014.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(1009014,0))
end end
function c1009014.efilter(e,te) function c1009014.efilter(e,te)
return te:GetOwner()~=e:GetOwner() return te:GetOwner()~=e:GetOwner()
......
expansions/script/c1009016.lua
View file @ 7f984893
...@@ -25,18 +25,6 @@ function c1009016.initial_effect(c) ...@@ -25,18 +25,6 @@ function c1009016.initial_effect(c)
e3:SetTarget(c1009016.target) e3:SetTarget(c1009016.target)
e3:SetOperation(c1009016.operation) e3:SetOperation(c1009016.operation)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_SPSUMMON_SUCCESS)
e8:SetOperation(c1009016.sumsuc)
c:RegisterEffect(e8)
local e9=e8:Clone()
e9:SetCode(EVENT_SUMMON_SUCCESS)
c:RegisterEffect(e9)
end
function c1009016.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(1009016,0))
end end
function c1009016.value(e,c) function c1009016.value(e,c)
return Duel.GetMatchingGroupCount(Card.IsAttribute,0,LOCATION_GRAVE,LOCATION_GRAVE,nil,ATTRIBUTE_DARK)*500 return Duel.GetMatchingGroupCount(Card.IsAttribute,0,LOCATION_GRAVE,LOCATION_GRAVE,nil,ATTRIBUTE_DARK)*500
......
expansions/script/c1009017.lua
View file @ 7f984893
...@@ -51,18 +51,6 @@ function c1009017.initial_effect(c) ...@@ -51,18 +51,6 @@ function c1009017.initial_effect(c)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e3:SetTargetRange(0,1) e3:SetTargetRange(0,1)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_SPSUMMON_SUCCESS)
e8:SetOperation(c1009017.sumsuc)
c:RegisterEffect(e8)
local e9=e8:Clone()
e9:SetCode(EVENT_SUMMON_SUCCESS)
c:RegisterEffect(e9)
end
function c1009017.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(1009017,0))
end end
function c1009017.lcheck(g,lc) function c1009017.lcheck(g,lc)
return g:IsExists(Card.IsAttackAbove,1,nil,2000) return g:IsExists(Card.IsAttackAbove,1,nil,2000)
......
expansions/script/c1009018.lua
View file @ 7f984893
...@@ -61,15 +61,6 @@ function c1009018.initial_effect(c) ...@@ -61,15 +61,6 @@ function c1009018.initial_effect(c)
e4:SetTarget(c1009018.destg) e4:SetTarget(c1009018.destg)
e4:SetOperation(c1009018.desop) e4:SetOperation(c1009018.desop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_SUMMON_SUCCESS)
e8:SetOperation(c1009018.sumsuc)
c:RegisterEffect(e8)
end
function c1009018.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(1009018,3))
end end
function c1009018.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c1009018.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,1009018)==0 end if chk==0 then return Duel.GetFlagEffect(tp,1009018)==0 end
......
expansions/script/c1009020.lua
View file @ 7f984893
...@@ -59,15 +59,6 @@ function c1009020.initial_effect(c) ...@@ -59,15 +59,6 @@ function c1009020.initial_effect(c)
e4:SetTarget(c1009020.destg) e4:SetTarget(c1009020.destg)
e4:SetOperation(c1009020.desop) e4:SetOperation(c1009020.desop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_SUMMON_SUCCESS)
e8:SetOperation(c1009020.sumsuc)
c:RegisterEffect(e8)
end
function c1009020.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(1009020,6))
end end
function c1009020.reg(e,tp,eg,ep,ev,re,r,rp,chk) function c1009020.reg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
......
expansions/script/c1009022.lua
View file @ 7f984893
...@@ -71,15 +71,6 @@ function c1009022.initial_effect(c) ...@@ -71,15 +71,6 @@ function c1009022.initial_effect(c)
e4:SetTarget(c1009022.destg) e4:SetTarget(c1009022.destg)
e4:SetOperation(c1009022.desop) e4:SetOperation(c1009022.desop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_SUMMON_SUCCESS)
e8:SetOperation(c1009022.sumsuc)
c:RegisterEffect(e8)
end
function c1009022.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(1009022,5))
end end
function c1009022.thcost(e,tp,eg,ep,ev,re,r,rp,chk) function c1009022.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
......
expansions/script/c1009023.lua
View file @ 7f984893
...@@ -63,15 +63,6 @@ function c1009023.initial_effect(c) ...@@ -63,15 +63,6 @@ function c1009023.initial_effect(c)
e4:SetTarget(c1009023.destg2) e4:SetTarget(c1009023.destg2)
e4:SetOperation(c1009023.desop2) e4:SetOperation(c1009023.desop2)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_SUMMON_SUCCESS)
e8:SetOperation(c1009023.sumsuc)
c:RegisterEffect(e8)
end
function c1009023.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(1009023,0))
end end
function c1009023.cfilter(c) function c1009023.cfilter(c)
return c:IsFaceup() and c:IsSetCard(0x520c) and c:IsType(TYPE_PENDULUM) and c:IsAbleToGraveAsCost() return c:IsFaceup() and c:IsSetCard(0x520c) and c:IsType(TYPE_PENDULUM) and c:IsAbleToGraveAsCost()
......
expansions/script/c1009024.lua
View file @ 7f984893
...@@ -26,15 +26,6 @@ function c1009024.initial_effect(c) ...@@ -26,15 +26,6 @@ function c1009024.initial_effect(c)
e3:SetTarget(c1009024.thtg2) e3:SetTarget(c1009024.thtg2)
e3:SetOperation(c1009024.thop2) e3:SetOperation(c1009024.thop2)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_SPSUMMON_SUCCESS)
e8:SetOperation(c1009024.sumsuc)
c:RegisterEffect(e8)
end
function c1009024.thcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
end end
function c1009024.thfilter(c) function c1009024.thfilter(c)
return c:IsSetCard(0x520c) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand() return c:IsSetCard(0x520c) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand()
......
expansions/script/c1009027.lua
View file @ 7f984893
...@@ -54,15 +54,6 @@ function c1009027.initial_effect(c) ...@@ -54,15 +54,6 @@ function c1009027.initial_effect(c)
e6:SetTarget(c1009027.pentg) e6:SetTarget(c1009027.pentg)
e6:SetOperation(c1009027.penop) e6:SetOperation(c1009027.penop)
c:RegisterEffect(e6) c:RegisterEffect(e6)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_SPSUMMON_SUCCESS)
e8:SetOperation(c1009027.sumsuc)
c:RegisterEffect(e8)
end
function c1009027.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(1009027,0))
end end
function c1009027.matfilter1(c) function c1009027.matfilter1(c)
return c:IsFusionType(TYPE_LINK) and c:IsFusionSetCard(0x520c) return c:IsFusionType(TYPE_LINK) and c:IsFusionSetCard(0x520c)
......
expansions/script/c1009028.lua
View file @ 7f984893
...@@ -62,15 +62,6 @@ function c1009028.initial_effect(c) ...@@ -62,15 +62,6 @@ function c1009028.initial_effect(c)
e6:SetTarget(c1009028.pentg) e6:SetTarget(c1009028.pentg)
e6:SetOperation(c1009028.penop) e6:SetOperation(c1009028.penop)
c:RegisterEffect(e6) c:RegisterEffect(e6)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_SPSUMMON_SUCCESS)
e8:SetOperation(c1009028.sumsuc)
c:RegisterEffect(e8)
end
function c1009028.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(1009028,4))
end end
function c1009028.ffilter(c) function c1009028.ffilter(c)
return c:IsSetCard(0x520c) return c:IsSetCard(0x520c)
......
expansions/script/c1009029.lua
View file @ 7f984893
...@@ -65,17 +65,8 @@ function c1009029.initial_effect(c) ...@@ -65,17 +65,8 @@ function c1009029.initial_effect(c)
e4:SetTarget(c1009029.pentg) e4:SetTarget(c1009029.pentg)
e4:SetOperation(c1009029.penop) e4:SetOperation(c1009029.penop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_SPSUMMON_SUCCESS)
e8:SetOperation(c1009029.sumsuc)
c:RegisterEffect(e8)
end end
c1009029.pendulum_level=7 c1009029.pendulum_level=7
function c1009029.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(1009029,2))
end
function c1009029.condition(e,tp,eg,ep,ev,re,r,rp) function c1009029.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()~=tp return Duel.GetTurnPlayer()~=tp
end end
......
expansions/script/c1009030.lua
View file @ 7f984893
...@@ -80,7 +80,6 @@ function c1009030.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -80,7 +80,6 @@ function c1009030.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.ShuffleHand(tp) Duel.ShuffleHand(tp)
end end
end end
Duel.Hint(HINT_MUSIC,0,aux.Stringid(1009030,1))
end end
function c1009030.spcfilter(c,tp,rp) function c1009030.spcfilter(c,tp,rp)
return c:IsPreviousPosition(POS_FACEUP) and c:GetPreviousControler()==tp and c:IsPreviousSetCard(0x520c) return c:IsPreviousPosition(POS_FACEUP) and c:GetPreviousControler()==tp and c:IsPreviousSetCard(0x520c)
...@@ -107,5 +106,4 @@ function c1009030.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -107,5 +106,4 @@ function c1009030.spop(e,tp,eg,ep,ev,re,r,rp)
if tc:IsRelateToEffect(e) then if tc:IsRelateToEffect(e) then
Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP_ATTACK) Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP_ATTACK)
end end
Duel.Hint(HINT_MUSIC,0,aux.Stringid(1009030,1))
end end
expansions/script/c1009033.lua
View file @ 7f984893
...@@ -30,7 +30,6 @@ function c1009033.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -30,7 +30,6 @@ function c1009033.activate(e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g) Duel.ConfirmCards(1-tp,g)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(1009033,0))
end end
end end
function c1009033.sumtg(e,tp,eg,ep,ev,re,r,rp,chk) function c1009033.sumtg(e,tp,eg,ep,ev,re,r,rp,chk)
...@@ -47,5 +46,4 @@ function c1009033.sumop(e,tp,eg,ep,ev,re,r,rp) ...@@ -47,5 +46,4 @@ function c1009033.sumop(e,tp,eg,ep,ev,re,r,rp)
e1:SetReset(RESET_PHASE+PHASE_END) e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
Duel.RegisterFlagEffect(tp,1009033,RESET_PHASE+PHASE_END,0,1) Duel.RegisterFlagEffect(tp,1009033,RESET_PHASE+PHASE_END,0,1)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(1009033,0))
end end
expansions/script/c17049001.lua
View file @ 7f984893
...@@ -70,12 +70,6 @@ function cm.initial_effect(c) ...@@ -70,12 +70,6 @@ function cm.initial_effect(c)
e6:SetTarget(cm.distg) e6:SetTarget(cm.distg)
e6:SetOperation(cm.disop) e6:SetOperation(cm.disop)
c:RegisterEffect(e6) c:RegisterEffect(e6)
--spsummon bgm
local e7=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e7:SetCode(EVENT_SPSUMMON_SUCCESS)
e7:SetOperation(cm.sumsuc)
c:RegisterEffect(e7)
end end
cm.spchecks=aux.CreateChecks(Card.IsAttribute,{ATTRIBUTE_WIND,ATTRIBUTE_WATER,ATTRIBUTE_FIRE,ATTRIBUTE_EARTH,ATTRIBUTE_LIGHT,ATTRIBUTE_DARK}) cm.spchecks=aux.CreateChecks(Card.IsAttribute,{ATTRIBUTE_WIND,ATTRIBUTE_WATER,ATTRIBUTE_FIRE,ATTRIBUTE_EARTH,ATTRIBUTE_LIGHT,ATTRIBUTE_DARK})
function cm.splimit(e,se,sp,st) function cm.splimit(e,se,sp,st)
...@@ -146,6 +140,3 @@ function cm.disop(e,tp,eg,ep,ev,re,r,rp) ...@@ -146,6 +140,3 @@ function cm.disop(e,tp,eg,ep,ev,re,r,rp)
Duel.Destroy(eg,REASON_EFFECT) Duel.Destroy(eg,REASON_EFFECT)
end end
end end
function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(17049001,3))
end
\ No newline at end of file
expansions/script/c33310100.lua
View file @ 7f984893
...@@ -3,12 +3,6 @@ if not pcall(function() require("expansions/script/c10199990") end) then require ...@@ -3,12 +3,6 @@ if not pcall(function() require("expansions/script/c10199990") end) then require
local m,cm=rsof.DefineCard(33310100,"Cochrot") local m,cm=rsof.DefineCard(33310100,"Cochrot")
function cm.initial_effect(c) function cm.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e0:SetCode(EVENT_SPSUMMON_SUCCESS)
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e0:SetOperation(cm.skipop)
c:RegisterEffect(e0)
local e1=rsef.SC(c,EVENT_SPSUMMON_SUCCESS,nil,nil,nil,rscon.sumtype("rit"),cm.atkop) local e1=rsef.SC(c,EVENT_SPSUMMON_SUCCESS,nil,nil,nil,rscon.sumtype("rit"),cm.atkop)
local e2,e3=rsef.SV_INDESTRUCTABLE(c,"battle,effect") local e2,e3=rsef.SV_INDESTRUCTABLE(c,"battle,effect")
local e4=rsef.RegisterClone(c,e3,"code",EFFECT_AVOID_BATTLE_DAMAGE) local e4=rsef.RegisterClone(c,e3,"code",EFFECT_AVOID_BATTLE_DAMAGE)
...@@ -20,9 +14,6 @@ local e0=Effect.CreateEffect(c) ...@@ -20,9 +14,6 @@ local e0=Effect.CreateEffect(c)
c:RegisterEffect(e5) c:RegisterEffect(e5)
local e6=rsef.STO(c,EVENT_REMOVE,{m,0},nil,nil,"de,dsp",nil,nil,rsop.target(cm.actfilter,nil,LOCATION_GRAVE+LOCATION_DECK),cm.actop) local e6=rsef.STO(c,EVENT_REMOVE,{m,0},nil,nil,"de,dsp",nil,nil,rsop.target(cm.actfilter,nil,LOCATION_GRAVE+LOCATION_DECK),cm.actop)
end end
function cm.skipop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(33310100,0))
end
function cm.atkop(e,tp) function cm.atkop(e,tp)
local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil) local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
if #g<=0 then return end if #g<=0 then return end
......
expansions/script/c37564501.lua
View file @ 7f984893
...@@ -7,7 +7,6 @@ function cm.initial_effect(c) ...@@ -7,7 +7,6 @@ function cm.initial_effect(c)
Senya.Nanahira(c) Senya.Nanahira(c)
aux.AddXyzProcedure(c,cm.mfilter,7,2) aux.AddXyzProcedure(c,cm.mfilter,7,2)
c:EnableReviveLimit() c:EnableReviveLimit()
Senya.AddSummonMusic(c,m*16+2,SUMMON_TYPE_XYZ)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
e1:SetCountLimit(1,m) e1:SetCountLimit(1,m)
......
expansions/script/c47590008.lua
View file @ 7f984893
--天司长 路西菲尔 --天司长 路西菲尔
function c47590008.initial_effect(c) function c47590008.initial_effect(c)
c:SetSPSummonOnce(47590008) c:SetSPSummonOnce(47590008)
c:SetUniqueOnField(1,0,47590008) c:SetUniqueOnField(1,0,47590008)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c,false) aux.EnablePendulumAttribute(c,false)
--synchro summon --synchro summon
aux.AddSynchroProcedure(c,aux.FilterBoolFunction(c47590008.synfilter),aux.NonTuner(c47590008.synfilter2),2) aux.AddSynchroProcedure(c,aux.FilterBoolFunction(c47590008.synfilter),aux.NonTuner(c47590008.synfilter2),2)
c:EnableReviveLimit() c:EnableReviveLimit()
--cannot special summon --cannot special summon
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_SPSUMMON_CONDITION) e0:SetCode(EFFECT_SPSUMMON_CONDITION)
e0:SetValue(aux.synlimit) e0:SetValue(aux.synlimit)
c:RegisterEffect(e0) c:RegisterEffect(e0)
--atk up --atk up
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_ATKCHANGE) e1:SetCategory(CATEGORY_ATKCHANGE)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetRange(LOCATION_PZONE) e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(LOCATION_MZONE,0) e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetTarget(aux.TargetBoolFunction(Card.IsRace,RACE_FAIRY)) e1:SetTarget(aux.TargetBoolFunction(Card.IsRace,RACE_FAIRY))
e1:SetValue(1500) e1:SetValue(1500)
c:RegisterEffect(e1) c:RegisterEffect(e1)
local e3=e1:Clone() local e3=e1:Clone()
e3:SetCode(EFFECT_UPDATE_DEFENSE) e3:SetCode(EFFECT_UPDATE_DEFENSE)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e1:Clone() local e4=e1:Clone()
e4:SetCode(EFFECT_CANNOT_DISABLE) e4:SetCode(EFFECT_CANNOT_DISABLE)
e4:SetValue(0) e4:SetValue(0)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--Immunity --Immunity
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
e2:SetCode(EFFECT_IMMUNE_EFFECT) e2:SetCode(EFFECT_IMMUNE_EFFECT)
e2:SetValue(c47590008.efilter2) e2:SetValue(c47590008.efilter2)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--lp --lp
local e6=Effect.CreateEffect(c) local e6=Effect.CreateEffect(c)
e6:SetCategory(CATEGORY_RECOVER) e6:SetCategory(CATEGORY_RECOVER)
e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e6:SetCode(EVENT_SPSUMMON_SUCCESS) e6:SetCode(EVENT_SPSUMMON_SUCCESS)
e6:SetCondition(c47590008.rccon) e6:SetCondition(c47590008.rccon)
e6:SetOperation(c47590008.rcop) e6:SetOperation(c47590008.rcop)
c:RegisterEffect(e6) c:RegisterEffect(e6)
--negate --negate
local e7=Effect.CreateEffect(c) local e7=Effect.CreateEffect(c)
e7:SetCategory(CATEGORY_NEGATE+CATEGORY_TODECK) e7:SetCategory(CATEGORY_NEGATE+CATEGORY_TODECK)
e7:SetType(EFFECT_TYPE_QUICK_O) e7:SetType(EFFECT_TYPE_QUICK_O)
e7:SetCode(EVENT_CHAINING) e7:SetCode(EVENT_CHAINING)
e7:SetCountLimit(1) e7:SetCountLimit(1)
e7:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL) e7:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
e7:SetRange(LOCATION_MZONE) e7:SetRange(LOCATION_MZONE)
e7:SetCondition(c47590008.ngco) e7:SetCondition(c47590008.ngco)
e7:SetTarget(c47590008.ngtg) e7:SetTarget(c47590008.ngtg)
e7:SetOperation(c47590008.ngop) e7:SetOperation(c47590008.ngop)
c:RegisterEffect(e7) c:RegisterEffect(e7)
--pendulum --pendulum
local e8=Effect.CreateEffect(c) local e8=Effect.CreateEffect(c)
e8:SetCategory(CATEGORY_SPECIAL_SUMMON) e8:SetCategory(CATEGORY_SPECIAL_SUMMON)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e8:SetCode(EVENT_LEAVE_FIELD) e8:SetCode(EVENT_LEAVE_FIELD)
e8:SetProperty(EFFECT_FLAG_DELAY) e8:SetProperty(EFFECT_FLAG_DELAY)
e8:SetCondition(c47590008.pencon) e8:SetCondition(c47590008.pencon)
e8:SetTarget(c47590008.pentg) e8:SetTarget(c47590008.pentg)
e8:SetOperation(c47590008.penop) e8:SetOperation(c47590008.penop)
c:RegisterEffect(e8) c:RegisterEffect(e8)
--spsummon bgm --cannot disable spsummon
local e9=Effect.CreateEffect(c) local e10=Effect.CreateEffect(c)
e9:SetDescription(aux.Stringid(47590008,0)) e10:SetType(EFFECT_TYPE_SINGLE)
e9:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e10:SetCode(EFFECT_CANNOT_DISABLE_SPSUMMON)
e9:SetCode(EVENT_SPSUMMON_SUCCESS) e10:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetOperation(c47590008.spsuc) e10:SetCondition(c47590008.effcon)
c:RegisterEffect(e9) c:RegisterEffect(e10)
--cannot disable spsummon
local e10=Effect.CreateEffect(c)
e10:SetType(EFFECT_TYPE_SINGLE)
e10:SetCode(EFFECT_CANNOT_DISABLE_SPSUMMON)
e10:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e10:SetCondition(c47590008.effcon)
c:RegisterEffect(e10)
end end
function c47590008.effcon(e) function c47590008.effcon(e)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
function c47590008.synfilter(c) function c47590008.synfilter(c)
return c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO) and c:IsType(TYPE_TUNER) return c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO) and c:IsType(TYPE_TUNER)
end end
function c47590008.synfilter2(c) function c47590008.synfilter2(c)
return c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO+TYPE_FUSION) return c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO+TYPE_FUSION)
end end
function c47590008.efilter2(e,re,rp) function c47590008.efilter2(e,re,rp)
if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return true end if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return true end
local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS) local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
return not g:IsContains(e:GetHandler()) return not g:IsContains(e:GetHandler())
end end
function c47590008.atkcon(e,tp,eg,ep,ev,re,r,rp) function c47590008.atkcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp return Duel.GetTurnPlayer()==tp
end end
function c47590008.atkfilter(c) function c47590008.atkfilter(c)
return c:IsFaceup() and c:IsRace(RACE_FAIRY) return c:IsFaceup() and c:IsRace(RACE_FAIRY)
end end
function c47590008.atktg(e,tp,eg,ep,ev,re,r,rp,chk) function c47590008.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c47590008.atkfilter,tp,LOCATION_MZONE,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c47590008.atkfilter,tp,LOCATION_MZONE,0,1,nil) end
end end
function c47590008.atkop(e,tp,eg,ep,ev,re,r,rp) function c47590008.atkop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c47590008.atkfilter,tp,LOCATION_MZONE,0,nil) local g=Duel.GetMatchingGroup(c47590008.atkfilter,tp,LOCATION_MZONE,0,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
while tc do while tc do
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetValue(1500) e1:SetValue(1500)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE)
tc:RegisterEffect(e1) tc:RegisterEffect(e1)
tc=g:GetNext() tc=g:GetNext()
end end
end end
function c47590008.spsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC_OGG,0,aux.Stringid(47590008,1))
end
function c47590008.rccon(e,tp,eg,ep,ev,re,r,rp) function c47590008.rccon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
function c47590008.rcop(e,tp,eg,ep,ev,re,r,rp) function c47590008.rcop(e,tp,eg,ep,ev,re,r,rp)
Duel.Recover(tp,3000,REASON_EFFECT) Duel.Recover(tp,3000,REASON_EFFECT)
Duel.Hint(HINT_SOUND,0,aux.Stringid(47590008,2)) Duel.Hint(HINT_SOUND,0,aux.Stringid(47590008,2))
end end
function c47590008.ngco(e,tp,eg,ep,ev,re,r,rp) function c47590008.ngco(e,tp,eg,ep,ev,re,r,rp)
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev)
end end
function c47590008.ngtg(e,tp,eg,ep,ev,re,r,rp,chk) function c47590008.ngtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
local ng=Group.CreateGroup() local ng=Group.CreateGroup()
local dg=Group.CreateGroup() local dg=Group.CreateGroup()
for i=1,ev do for i=1,ev do
local te,tgp=Duel.GetChainInfo(i,CHAININFO_TRIGGERING_EFFECT,CHAININFO_TRIGGERING_PLAYER) local te,tgp=Duel.GetChainInfo(i,CHAININFO_TRIGGERING_EFFECT,CHAININFO_TRIGGERING_PLAYER)
if Duel.IsChainNegatable(i) then if Duel.IsChainNegatable(i) then
local tc=te:GetHandler() local tc=te:GetHandler()
ng:AddCard(tc) ng:AddCard(tc)
if tc:IsRelateToEffect(te) and not tc:IsHasEffect(EFFECT_CANNOT_TO_DECK) and Duel.IsPlayerCanSendtoDeck(tp,tc) then if tc:IsRelateToEffect(te) and not tc:IsHasEffect(EFFECT_CANNOT_TO_DECK) and Duel.IsPlayerCanSendtoDeck(tp,tc) then
dg:AddCard(tc) dg:AddCard(tc)
end end
end end
end end
Duel.SetTargetCard(dg) Duel.SetTargetCard(dg)
Duel.SetOperationInfo(0,CATEGORY_NEGATE,ng,ng:GetCount(),0,0) Duel.SetOperationInfo(0,CATEGORY_NEGATE,ng,ng:GetCount(),0,0)
Duel.SetOperationInfo(0,CATEGORY_TODECK,dg,dg:GetCount(),0,0) Duel.SetOperationInfo(0,CATEGORY_TODECK,dg,dg:GetCount(),0,0)
end end
function c47590008.ngop(e,tp,eg,ep,ev,re,r,rp) function c47590008.ngop(e,tp,eg,ep,ev,re,r,rp)
local dg=Group.CreateGroup() local dg=Group.CreateGroup()
for i=1,ev do for i=1,ev do
local te,tgp=Duel.GetChainInfo(i,CHAININFO_TRIGGERING_EFFECT,CHAININFO_TRIGGERING_PLAYER) local te,tgp=Duel.GetChainInfo(i,CHAININFO_TRIGGERING_EFFECT,CHAININFO_TRIGGERING_PLAYER)
if Duel.NegateActivation(i) then if Duel.NegateActivation(i) then
local tc=te:GetHandler() local tc=te:GetHandler()
if tc:IsRelateToEffect(e) and tc:IsRelateToEffect(te) and not tc:IsHasEffect(EFFECT_CANNOT_TO_DECK) and Duel.IsPlayerCanSendtoDeck(tp,tc) then if tc:IsRelateToEffect(e) and tc:IsRelateToEffect(te) and not tc:IsHasEffect(EFFECT_CANNOT_TO_DECK) and Duel.IsPlayerCanSendtoDeck(tp,tc) then
tc:CancelToGrave() tc:CancelToGrave()
dg:AddCard(tc) dg:AddCard(tc)
end end
end end
end end
Duel.SendtoDeck(dg,nil,2,REASON_EFFECT) Duel.SendtoDeck(dg,nil,2,REASON_EFFECT)
end end
function c47590008.pencon(e,tp,eg,ep,ev,re,r,rp) function c47590008.pencon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
return c:IsFaceup() and c:IsSummonType(SUMMON_TYPE_SYNCHRO) return c:IsFaceup() and c:IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
function c47590008.filter(c,e,tp) function c47590008.filter(c,e,tp)
return c:IsCode(47578913) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsCode(47578913) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c47590008.pentg(e,tp,eg,ep,ev,re,r,rp,chk) function c47590008.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_SYNCHRO)>0 if chk==0 then return Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_SYNCHRO)>0
and Duel.IsExistingMatchingCard(c47590008.filter,tp,LOCATION_EXTRA,0,1,nil,e,tp) and Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) end and Duel.IsExistingMatchingCard(c47590008.filter,tp,LOCATION_EXTRA,0,1,nil,e,tp) and Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) 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
function c47590008.penop(e,tp,eg,ep,ev,re,r,rp) function c47590008.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true) then if c:IsRelateToEffect(e) and Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true) then
if Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_SYNCHRO)<=0 then return end if Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_SYNCHRO)<=0 then return end
local tg=Duel.GetFirstMatchingCard(c47590008.filter,tp,LOCATION_EXTRA,0,nil,e,tp) local tg=Duel.GetFirstMatchingCard(c47590008.filter,tp,LOCATION_EXTRA,0,nil,e,tp)
if tg then if tg then
Duel.SpecialSummon(tg,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(tg,0,tp,tp,false,false,POS_FACEUP)
end end
end end
end end
\ No newline at end of file
expansions/script/c65010315.lua
View file @ 7f984893
...@@ -96,7 +96,6 @@ function c65010315.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -96,7 +96,6 @@ function c65010315.operation(e,tp,eg,ep,ev,re,r,rp)
else else
c:CancelToGrave(false) c:CancelToGrave(false)
end end
Duel.Hint(HINT_MUSIC,0,aux.Stringid(65010315,0))
end end
function c65010315.aclimit(e,te) function c65010315.aclimit(e,te)
return Duel.GetAttacker()==e:GetHandler() or Duel.GetAttackTarget()==e:GetHandler() return Duel.GetAttacker()==e:GetHandler() or Duel.GetAttackTarget()==e:GetHandler()
......
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