Commit 4bec2fc5 authored by Tachibana's avatar Tachibana

ybb

parent 07f05e84
Pipeline #10201 passed with stages
in 26 minutes and 19 seconds
No preview for this file type
...@@ -31,19 +31,6 @@ function cm.initial_effect(c) ...@@ -31,19 +31,6 @@ function cm.initial_effect(c)
e2:SetTarget(cm.sptg) e2:SetTarget(cm.sptg)
e2:SetOperation(cm.spop) e2:SetOperation(cm.spop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--spsummon bgm
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(cm.sumcon)
e3:SetOperation(cm.sumsuc)
c:RegisterEffect(e3)
end
function cm.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
end
function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(28315001,2))
end end
function cm.drcost(e,tp,eg,ep,ev,re,r,rp,chk) function cm.drcost(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
......
...@@ -5,13 +5,6 @@ function cm.initial_effect(c) ...@@ -5,13 +5,6 @@ function cm.initial_effect(c)
--xyz summon --xyz summon
aux.AddXyzProcedure(c,nil,4,2,nil,nil,99) aux.AddXyzProcedure(c,nil,4,2,nil,nil,99)
c:EnableReviveLimit() c:EnableReviveLimit()
--spsummon bgm
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e0:SetCode(EVENT_SPSUMMON_SUCCESS)
e0:SetCondition(cm.sumcon)
e0:SetOperation(cm.sumsuc)
c:RegisterEffect(e0)
--destroy --destroy
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0)) e1:SetDescription(aux.Stringid(m,0))
...@@ -36,12 +29,6 @@ function cm.initial_effect(c) ...@@ -36,12 +29,6 @@ function cm.initial_effect(c)
e2:SetOperation(cm.lvop) e2:SetOperation(cm.lvop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function cm.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
end
function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,2))
end
function cm.descost(e,tp,eg,ep,ev,re,r,rp,chk) function cm.descost(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
e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST) e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
......
...@@ -38,14 +38,6 @@ function cm.initial_effect(c) ...@@ -38,14 +38,6 @@ function cm.initial_effect(c)
e4:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e4:SetTargetRange(LOCATION_GRAVE,LOCATION_GRAVE) e4:SetTargetRange(LOCATION_GRAVE,LOCATION_GRAVE)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--spsummon bgm
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e5:SetCode(EVENT_SPSUMMON_SUCCESS)
e5:SetCondition(cm.sumcon)
e5:SetOperation(cm.sumsuc)
c:RegisterEffect(e5)
end end
function cm.disop(e,tp,eg,ep,ev,re,r,rp) function cm.disop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION)==LOCATION_REMOVED then if Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION)==LOCATION_REMOVED then
...@@ -84,9 +76,3 @@ function cm.rmop(e,tp,eg,ep,ev,re,r,rp) ...@@ -84,9 +76,3 @@ function cm.rmop(e,tp,eg,ep,ev,re,r,rp)
Duel.Remove(g,POS_FACEUP,REASON_EFFECT) Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
end end
end end
function cm.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
end
function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,0))
end
...@@ -34,6 +34,14 @@ function cm.initial_effect(c) ...@@ -34,6 +34,14 @@ function cm.initial_effect(c)
local e5=e4:Clone() local e5=e4:Clone()
e5:SetCode(EFFECT_UPDATE_DEFENSE) e5:SetCode(EFFECT_UPDATE_DEFENSE)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--spsummon bgm
local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e6:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e6:SetCode(EVENT_SPSUMMON_SUCCESS)
e6:SetCondition(cm.sumcon)
e6:SetOperation(cm.sumsuc)
c:RegisterEffect(e6)
end end
function cm.spfilter(c,xyzc) function cm.spfilter(c,xyzc)
if c:IsHasEffect(EFFECT_CANNOT_BE_XYZ_MATERIAL) then if c:IsHasEffect(EFFECT_CANNOT_BE_XYZ_MATERIAL) then
...@@ -97,3 +105,9 @@ end ...@@ -97,3 +105,9 @@ end
function cm.atkval(e,c) function cm.atkval(e,c)
return c:GetOverlayCount()*1000 return c:GetOverlayCount()*1000
end end
function cm.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
end
function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,0))
end
...@@ -5,13 +5,6 @@ function cm.initial_effect(c) ...@@ -5,13 +5,6 @@ function cm.initial_effect(c)
--xyz summon --xyz summon
aux.AddXyzProcedure(c,nil,6,2) aux.AddXyzProcedure(c,nil,6,2)
c:EnableReviveLimit() c:EnableReviveLimit()
--spsummon bgm
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCondition(cm.sumcon)
e1:SetOperation(cm.sumsuc)
c:RegisterEffect(e1)
--destroy replace --destroy replace
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
...@@ -30,12 +23,6 @@ function cm.initial_effect(c) ...@@ -30,12 +23,6 @@ function cm.initial_effect(c)
e3:SetOperation(cm.setop) e3:SetOperation(cm.setop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function cm.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
end
function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,1))
end
function cm.repfilter(c,tp) function cm.repfilter(c,tp)
return c:IsControler(tp) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsReason(REASON_EFFECT) and not c:IsReason(REASON_REPLACE) return c:IsControler(tp) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsReason(REASON_EFFECT) and not c:IsReason(REASON_REPLACE)
end end
......
...@@ -11,7 +11,6 @@ function cm.initial_effect(c) ...@@ -11,7 +11,6 @@ function cm.initial_effect(c)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e1:SetRange(LOCATION_HAND) e1:SetRange(LOCATION_HAND)
e1:SetCondition(cm.spcon) e1:SetCondition(cm.spcon)
e1:SetOperation(cm.spop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--indes --indes
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
...@@ -42,9 +41,6 @@ function cm.spcon(e,c) ...@@ -42,9 +41,6 @@ function cm.spcon(e,c)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return false end if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return false end
return not Tenka.ReikaCon(e) return not Tenka.ReikaCon(e)
end end
function cm.spop(e,tp,eg,ep,ev,re,r,rp,c)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,0))
end
function cm.target(e,c) function cm.target(e,c)
return c:IsType(TYPE_SPELL+TYPE_TRAP) return c:IsType(TYPE_SPELL+TYPE_TRAP)
end end
......
...@@ -20,14 +20,6 @@ function cm.initial_effect(c) ...@@ -20,14 +20,6 @@ function cm.initial_effect(c)
e1:SetTarget(cm.atktg) e1:SetTarget(cm.atktg)
e1:SetOperation(cm.atkop) e1:SetOperation(cm.atkop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--spsummon bgm
local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e8:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e8:SetCode(EVENT_SPSUMMON_SUCCESS)
e8:SetCondition(cm.sumcon)
e8:SetOperation(cm.sumsuc)
c:RegisterEffect(e8)
end end
function cm.ovfilter(c) function cm.ovfilter(c)
return c:IsFaceup() and c:IsCode(28323000) return c:IsFaceup() and c:IsCode(28323000)
...@@ -59,9 +51,3 @@ function cm.atkop(e,tp,eg,ep,ev,re,r,rp) ...@@ -59,9 +51,3 @@ function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
tc:RegisterEffect(e1) tc:RegisterEffect(e1)
end end
end end
function cm.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
end
function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,2))
end
...@@ -6,7 +6,6 @@ function cm.initial_effect(c) ...@@ -6,7 +6,6 @@ function cm.initial_effect(c)
aux.AddMaterialCodeList(c,37564765) aux.AddMaterialCodeList(c,37564765)
Senya.Nanahira(c) Senya.Nanahira(c)
aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsCode,37564765),aux.NonTuner(Card.IsRace,RACE_FAIRY),1) aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsCode,37564765),aux.NonTuner(Card.IsRace,RACE_FAIRY),1)
Senya.AddSummonMusic(c,m*16+2,SUMMON_TYPE_SYNCHRO)
c:EnableReviveLimit() c:EnableReviveLimit()
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(m*16+1) e1:SetDescription(m*16+1)
......
...@@ -43,21 +43,8 @@ function cm.initial_effect(c) ...@@ -43,21 +43,8 @@ function cm.initial_effect(c)
e2:SetTarget(cm.distg) e2:SetTarget(cm.distg)
e2:SetOperation(cm.disop) e2:SetOperation(cm.disop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--spsummon bgm
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCondition(cm.sumcon)
e3:SetOperation(cm.sumsuc)
c:RegisterEffect(e3)
end end
cm.pendulum_level=3 cm.pendulum_level=3
function cm.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_RITUAL)
end
function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,2))
end
function cm.thfilter(c) function cm.thfilter(c)
return (c:IsFaceup() or c:IsLocation(LOCATION_GRAVE)) and c:IsCode(33334568) and c:IsAbleToHand() return (c:IsFaceup() or c:IsLocation(LOCATION_GRAVE)) and c:IsCode(33334568) and c:IsAbleToHand()
end end
......
...@@ -35,7 +35,6 @@ function cm.filter(c,e,tp) ...@@ -35,7 +35,6 @@ function cm.filter(c,e,tp)
return c:IsAttack(1550) and c:IsDefense(1050) and c:IsType(TYPE_PENDULUM) return c:IsAttack(1550) and c:IsDefense(1050) and c:IsType(TYPE_PENDULUM)
end end
function cm.activate(e,tp,eg,ep,ev,re,r,rp) function cm.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,0))
local mg=Duel.GetRitualMaterial(tp) local mg=Duel.GetRitualMaterial(tp)
local g=Duel.GetMatchingGroup(aux.RitualUltimateFilter,tp,LOCATION_HAND,0,nil,cm.filter,e,tp,mg,nil,Card.GetLevel,"Greater") local g=Duel.GetMatchingGroup(aux.RitualUltimateFilter,tp,LOCATION_HAND,0,nil,cm.filter,e,tp,mg,nil,Card.GetLevel,"Greater")
if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
......
...@@ -61,7 +61,7 @@ function cm.rsop(e,tp,eg,ep,ev,re,r,rp) ...@@ -61,7 +61,7 @@ function cm.rsop(e,tp,eg,ep,ev,re,r,rp)
Duel.ReleaseRitualMaterial(mat) Duel.ReleaseRitualMaterial(mat)
Duel.BreakEffect() Duel.BreakEffect()
Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP) Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,math.random(0,2))) Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,0))
tc:CompleteProcedure() tc:CompleteProcedure()
end end
end end
......
...@@ -62,7 +62,6 @@ function cm.rsop(e,tp,eg,ep,ev,re,r,rp) ...@@ -62,7 +62,6 @@ function cm.rsop(e,tp,eg,ep,ev,re,r,rp)
Duel.ReleaseRitualMaterial(mat) Duel.ReleaseRitualMaterial(mat)
Duel.BreakEffect() Duel.BreakEffect()
Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP) Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,math.random(0,2)))
tc:CompleteProcedure() tc:CompleteProcedure()
end end
end end
......
...@@ -71,7 +71,6 @@ function cm.rsop(e,tp,eg,ep,ev,re,r,rp) ...@@ -71,7 +71,6 @@ function cm.rsop(e,tp,eg,ep,ev,re,r,rp)
Duel.ReleaseRitualMaterial(mat) Duel.ReleaseRitualMaterial(mat)
Duel.BreakEffect() Duel.BreakEffect()
Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP) Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,0))
tc:CompleteProcedure() tc:CompleteProcedure()
end end
end end
......
...@@ -6,14 +6,6 @@ function cm.initial_effect(c) ...@@ -6,14 +6,6 @@ function cm.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--spsummon bgm
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e0:SetCode(EVENT_SPSUMMON_SUCCESS)
e0:SetCondition(cm.sumcon)
e0:SetOperation(cm.sumsuc)
c:RegisterEffect(e0)
--pendulum set --pendulum set
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DESTROY) e1:SetCategory(CATEGORY_DESTROY)
...@@ -45,12 +37,6 @@ function cm.initial_effect(c) ...@@ -45,12 +37,6 @@ function cm.initial_effect(c)
e4:SetOperation(cm.disop) e4:SetOperation(cm.disop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function cm.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_RITUAL) or e:GetHandler():IsSummonType(SUMMON_TYPE_PENDULUM)
end
function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,0))
end
function cm.penfilter(c) function cm.penfilter(c)
return c:IsType(TYPE_RITUAL) and not c:IsCode(m) and not c:IsForbidden() return c:IsType(TYPE_RITUAL) and not c:IsCode(m) and not c:IsForbidden()
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