Commit ae63a2d4 authored by TanakaKotoha's avatar TanakaKotoha

Nowhere

parent abe3317e
No preview for this file type
...@@ -32,6 +32,19 @@ function c81005001.initial_effect(c) ...@@ -32,6 +32,19 @@ function c81005001.initial_effect(c)
e2:SetTarget(c81005001.target) e2:SetTarget(c81005001.target)
e2:SetOperation(c81005001.operation) e2:SetOperation(c81005001.operation)
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(c81005001.sumcon)
e3:SetOperation(c81005001.sumsuc)
c:RegisterEffect(e3)
end
function c81005001.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION)
end
function c81005001.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(81005001,2))
end end
function c81005001.ffilter(c,fc,sub,mg,sg) function c81005001.ffilter(c,fc,sub,mg,sg)
return (not c:IsType(TYPE_TOKEN)) and (not sg or sg:FilterCount(aux.TRUE,c)==0 or sg:IsExists(Card.IsFusionCode,1,c,c:GetFusionCode())) return (not c:IsType(TYPE_TOKEN)) and (not sg or sg:FilterCount(aux.TRUE,c)==0 or sg:IsExists(Card.IsFusionCode,1,c,c:GetFusionCode()))
......
--小小的狐狸·白上吹雪 --小小的狐狸·白上吹雪
function c81006023.initial_effect(c) function c81006023.initial_effect(c)
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(c81006023.sumcon)
e0:SetOperation(c81006023.sumsuc)
c:RegisterEffect(e0)
--spsummon --spsummon
local e3=aux.AddRitualProcEqual2(c,c81006023.ritfilter) local e3=aux.AddRitualProcEqual2(c,c81006023.ritfilter)
e3:SetCountLimit(1,81006023) e3:SetCountLimit(1,81006023)
...@@ -26,12 +19,6 @@ function c81006023.initial_effect(c) ...@@ -26,12 +19,6 @@ function c81006023.initial_effect(c)
e2:SetOperation(c81006023.tgop) e2:SetOperation(c81006023.tgop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c81006023.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_RITUAL)
end
function c81006023.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(81006023,0))
end
function c81006023.ritfilter(c) function c81006023.ritfilter(c)
return c:IsType(TYPE_RITUAL) and c:IsSetCard(0x81c) return c:IsType(TYPE_RITUAL) and c:IsSetCard(0x81c)
end end
......
--踏浪·白上吹雪 --踏浪·白上吹雪
function c81006032.initial_effect(c) function c81006032.initial_effect(c)
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(c81006032.sumcon)
e0:SetOperation(c81006032.sumsuc)
c:RegisterEffect(e0)
--spsummon --spsummon
local e1=aux.AddRitualProcEqual2(c,c81006032.ritfilter,LOCATION_REMOVED) local e1=aux.AddRitualProcEqual2(c,c81006032.ritfilter,LOCATION_REMOVED)
e1:SetCountLimit(1,81006032) e1:SetCountLimit(1,81006032)
...@@ -26,12 +19,6 @@ function c81006032.initial_effect(c) ...@@ -26,12 +19,6 @@ function c81006032.initial_effect(c)
e2:SetOperation(c81006032.tkop) e2:SetOperation(c81006032.tkop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c81006032.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_RITUAL)
end
function c81006032.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(81006032,0))
end
function c81006032.ritfilter(c) function c81006032.ritfilter(c)
return c:IsType(TYPE_RITUAL) and c:IsSetCard(0x81c) return c:IsType(TYPE_RITUAL) and c:IsSetCard(0x81c)
end end
......
...@@ -23,16 +23,6 @@ function c81006033.initial_effect(c) ...@@ -23,16 +23,6 @@ function c81006033.initial_effect(c)
e1:SetTarget(c81006033.regtg) e1:SetTarget(c81006033.regtg)
e1:SetOperation(c81006033.regop) e1:SetOperation(c81006033.regop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--spsummon bgm
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetCondition(c81006033.indcon)
e2:SetOperation(c81006033.sumsuc)
c:RegisterEffect(e2)
end
function c81006033.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(81006033,0))
end end
function c81006033.indcon(e,tp,eg,ep,ev,re,r,rp) function c81006033.indcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
......
...@@ -28,13 +28,6 @@ function c81008007.initial_effect(c) ...@@ -28,13 +28,6 @@ function c81008007.initial_effect(c)
e2:SetTarget(c81008007.sptg) e2:SetTarget(c81008007.sptg)
e2:SetOperation(c81008007.spop) e2:SetOperation(c81008007.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(c81008007.sumcon)
e3:SetOperation(c81008007.sumsuc)
c:RegisterEffect(e3)
end end
function c81008007.synlimit(e,c) function c81008007.synlimit(e,c)
return bit.band(c:GetType(),0x81)==0x81 return bit.band(c:GetType(),0x81)==0x81
...@@ -62,9 +55,3 @@ function c81008007.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -62,9 +55,3 @@ function c81008007.spop(e,tp,eg,ep,ev,re,r,rp)
local ct=Duel.GetMatchingGroupCount(c81008007.damfilter,tp,LOCATION_ONFIELD,0,nil) local ct=Duel.GetMatchingGroupCount(c81008007.damfilter,tp,LOCATION_ONFIELD,0,nil)
Duel.Damage(p,ct*300,REASON_EFFECT) Duel.Damage(p,ct*300,REASON_EFFECT)
end end
function c81008007.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_RITUAL)
end
function c81008007.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(81008007,0))
end
...@@ -3,6 +3,13 @@ function c81011002.initial_effect(c) ...@@ -3,6 +3,13 @@ function c81011002.initial_effect(c)
--xyz summon --xyz summon
aux.AddXyzProcedure(c,nil,10,2) aux.AddXyzProcedure(c,nil,10,2)
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(c81011002.sumcon)
e0:SetOperation(c81011002.sumsuc)
c:RegisterEffect(e0)
--spsummon --spsummon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
...@@ -25,6 +32,12 @@ function c81011002.initial_effect(c) ...@@ -25,6 +32,12 @@ function c81011002.initial_effect(c)
e2:SetOperation(c81011002.spop2) e2:SetOperation(c81011002.spop2)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c81011002.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
end
function c81011002.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(81011002,0))
end
function c81011002.spcost(e,tp,eg,ep,ev,re,r,rp,chk) function c81011002.spcost(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)
......
...@@ -3,6 +3,14 @@ function c81011003.initial_effect(c) ...@@ -3,6 +3,14 @@ function c81011003.initial_effect(c)
--link summon --link summon
aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_EFFECT),2) aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_EFFECT),2)
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(c81011003.sumcon)
e0:SetOperation(c81011003.sumsuc)
c:RegisterEffect(e0)
--
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_IMMUNE_EFFECT) e1:SetCode(EFFECT_IMMUNE_EFFECT)
...@@ -34,6 +42,12 @@ function c81011003.initial_effect(c) ...@@ -34,6 +42,12 @@ function c81011003.initial_effect(c)
e3:SetOperation(c81011003.ceop) e3:SetOperation(c81011003.ceop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c81011003.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
end
function c81011003.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(81011003,0))
end
function c81011003.tgfilter(c) function c81011003.tgfilter(c)
return c:IsType(TYPE_MONSTER) return c:IsType(TYPE_MONSTER)
end end
......
...@@ -2,6 +2,13 @@ ...@@ -2,6 +2,13 @@
function c81011006.initial_effect(c) function c81011006.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddFusionProcFunRep(c,c81011006.ffilter,2,true) aux.AddFusionProcFunRep(c,c81011006.ffilter,2,true)
--spsummon bgm
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e0:SetCode(EVENT_SPSUMMON_SUCCESS)
e0:SetCondition(c81011006.sumcon)
e0:SetOperation(c81011006.sumsuc)
c:RegisterEffect(e0)
--remove --remove
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(81011006,0)) e1:SetDescription(aux.Stringid(81011006,0))
...@@ -30,6 +37,12 @@ function c81011006.initial_effect(c) ...@@ -30,6 +37,12 @@ function c81011006.initial_effect(c)
e2:SetOperation(c81011006.tgop) e2:SetOperation(c81011006.tgop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c81011006.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION)
end
function c81011006.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(81011006,2))
end
function c81011006.ffilter(c,fc,sub,mg,sg) function c81011006.ffilter(c,fc,sub,mg,sg)
return (not c:IsType(TYPE_TOKEN)) and (not sg or sg:FilterCount(aux.TRUE,c)==0 or sg:IsExists(Card.IsFusionCode,1,c,c:GetFusionCode())) return (not c:IsType(TYPE_TOKEN)) and (not sg or sg:FilterCount(aux.TRUE,c)==0 or sg:IsExists(Card.IsFusionCode,1,c,c:GetFusionCode()))
end end
......
...@@ -5,6 +5,13 @@ function cm.initial_effect(c) ...@@ -5,6 +5,13 @@ function cm.initial_effect(c)
--xyz summon --xyz summon
aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_SPELLCASTER),4,2) aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_SPELLCASTER),4,2)
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))
...@@ -29,6 +36,12 @@ function cm.initial_effect(c) ...@@ -29,6 +36,12 @@ 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)
......
--黑崎智秋 --黑崎智秋
function c81011011.initial_effect(c) function c81011011.initial_effect(c)
c:SetSPSummonOnce(81011011) c:SetSPSummonOnce(81011011)
--spsummon bgm
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e0:SetCode(EVENT_SPSUMMON_SUCCESS)
e0:SetCondition(c81011011.sumcon)
e0:SetOperation(c81011011.sumsuc)
c:RegisterEffect(e0)
--special summon --special summon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
...@@ -33,6 +40,12 @@ function c81011011.initial_effect(c) ...@@ -33,6 +40,12 @@ function c81011011.initial_effect(c)
e3:SetOperation(c81011011.reaop) e3:SetOperation(c81011011.reaop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c81011011.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsPreviousLocation(LOCATION_HAND)
end
function c81011011.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(81011011,0))
end
function c81011011.spcon(e,c) function c81011011.spcon(e,c)
if c==nil then return true end if c==nil then return true end
local tp=c:GetControler() local tp=c:GetControler()
......
--砂冢明音 --砂冢明音
function c81011027.initial_effect(c) function c81011027.initial_effect(c)
--spsummon bgm
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e0:SetCode(EVENT_SPSUMMON_SUCCESS)
e0:SetCondition(c81011027.sumcon)
e0:SetOperation(c81011027.sumsuc)
c:RegisterEffect(e0)
--spsummon --spsummon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
...@@ -20,6 +27,12 @@ function c81011027.initial_effect(c) ...@@ -20,6 +27,12 @@ function c81011027.initial_effect(c)
e2:SetOperation(c81011027.setop) e2:SetOperation(c81011027.setop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c81011027.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsPreviousLocation(LOCATION_HAND)
end
function c81011027.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(81011027,0))
end
function c81011027.spfilter(c) function c81011027.spfilter(c)
return (bit.band(c:GetOriginalType(),TYPE_SPELL)~=0 or bit.band(c:GetOriginalType(),TYPE_TRAP)~=0) and c:IsAbleToGraveAsCost() return (bit.band(c:GetOriginalType(),TYPE_SPELL)~=0 or bit.band(c:GetOriginalType(),TYPE_TRAP)~=0) and c:IsAbleToGraveAsCost()
end end
......
...@@ -6,13 +6,6 @@ cm.Senya_desc_with_nanahira=true ...@@ -6,13 +6,6 @@ cm.Senya_desc_with_nanahira=true
function cm.initial_effect(c) function cm.initial_effect(c)
Senya.NanahiraPendulum(c) Senya.NanahiraPendulum(c)
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)
--pierce --pierce
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
...@@ -40,12 +33,6 @@ function cm.initial_effect(c) ...@@ -40,12 +33,6 @@ function cm.initial_effect(c)
e3:SetValue(81011001) e3:SetValue(81011001)
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_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(81011028,0))
end
function cm.thfilter(c) function cm.thfilter(c)
return (c:IsLocation(LOCATION_GRAVE) or c:IsFaceup()) and (c.Senya_desc_with_nanahira or c:IsCode(37564765)) and c:IsAbleToHand() return (c:IsLocation(LOCATION_GRAVE) or c:IsFaceup()) and (c.Senya_desc_with_nanahira or c:IsCode(37564765)) and c:IsAbleToHand()
end end
......
...@@ -29,13 +29,6 @@ function c81011036.initial_effect(c) ...@@ -29,13 +29,6 @@ function c81011036.initial_effect(c)
e3:SetCondition(c81011036.pencon) e3:SetCondition(c81011036.pencon)
e3:SetOperation(c81011036.penop) e3:SetOperation(c81011036.penop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--spsummon bgm
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e4:SetCode(EVENT_SPSUMMON_SUCCESS)
e4:SetCondition(c81011036.sumcon)
e4:SetOperation(c81011036.sumsuc)
c:RegisterEffect(e4)
end end
function c81011036.cfilter(c) function c81011036.cfilter(c)
return c:IsType(TYPE_SPELL) and c:IsDiscardable() return c:IsType(TYPE_SPELL) and c:IsDiscardable()
...@@ -85,9 +78,3 @@ end ...@@ -85,9 +78,3 @@ end
function c81011036.adval(e,c) function c81011036.adval(e,c)
return Duel.GetMatchingGroupCount(c81011036.filter,c:GetControler(),LOCATION_MZONE,0,c)*800 return Duel.GetMatchingGroupCount(c81011036.filter,c:GetControler(),LOCATION_MZONE,0,c)*800
end end
function c81011036.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 c81011036.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(81011036,1))
end
...@@ -21,6 +21,19 @@ function cm.initial_effect(c) ...@@ -21,6 +21,19 @@ function cm.initial_effect(c)
e1:SetCost(cm.cost) e1:SetCost(cm.cost)
e1:SetOperation(cm.operation) e1:SetOperation(cm.operation)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--spsummon bgm
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetCondition(cm.sumcon)
e2:SetOperation(cm.sumsuc)
c:RegisterEffect(e2)
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 end
function cm.ctval(e,c) function cm.ctval(e,c)
local oc=e:GetHandler():GetOverlayCount() local oc=e:GetHandler():GetOverlayCount()
......
...@@ -5,13 +5,6 @@ function c81011100.initial_effect(c) ...@@ -5,13 +5,6 @@ function c81011100.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:SetCode(EVENT_SPSUMMON_SUCCESS)
e0:SetCondition(c81011100.sumcon)
e0:SetOperation(c81011100.sumsuc)
c:RegisterEffect(e0)
--draw --draw
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DRAW) e1:SetCategory(CATEGORY_DRAW)
...@@ -57,12 +50,6 @@ function c81011100.initial_effect(c) ...@@ -57,12 +50,6 @@ function c81011100.initial_effect(c)
e6:SetOperation(c81011100.penop) e6:SetOperation(c81011100.penop)
c:RegisterEffect(e6) c:RegisterEffect(e6)
end end
function c81011100.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 c81011100.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(81011100,0))
end
function c81011100.drcon(e,tp,eg,ep,ev,re,r,rp) function c81011100.drcon(e,tp,eg,ep,ev,re,r,rp)
local a=Duel.GetAttacker() local a=Duel.GetAttacker()
local d=Duel.GetAttackTarget() local d=Duel.GetAttackTarget()
......
...@@ -34,6 +34,19 @@ function c81013001.initial_effect(c) ...@@ -34,6 +34,19 @@ function c81013001.initial_effect(c)
e2:SetTarget(c81013001.sptg) e2:SetTarget(c81013001.sptg)
e2:SetOperation(c81013001.spop) e2:SetOperation(c81013001.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(c81013001.sumcon)
e3:SetOperation(c81013001.sumsuc)
c:RegisterEffect(e3)
end
function c81013001.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION)
end
function c81013001.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(81013001,2))
end end
function c81013001.ffiltera(c) function c81013001.ffiltera(c)
return c:IsFusionType(TYPE_FUSION) and c:IsRace(RACE_PLANT) and c:IsFusionAttribute(ATTRIBUTE_EARTH) and c:IsLevelBelow(9) return c:IsFusionType(TYPE_FUSION) and c:IsRace(RACE_PLANT) and c:IsFusionAttribute(ATTRIBUTE_EARTH) and c:IsLevelBelow(9)
......
...@@ -16,7 +16,7 @@ function c81013003.initial_effect(c) ...@@ -16,7 +16,7 @@ function c81013003.initial_effect(c)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_CODE) e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetRange(LOCATION_MZONE+LOCATION_GRAVE) e1:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e1:SetValue(81011027) e1:SetValue(81013003)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--tohand --tohand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
...@@ -29,6 +29,19 @@ function c81013003.initial_effect(c) ...@@ -29,6 +29,19 @@ function c81013003.initial_effect(c)
e2:SetTarget(c81013003.thtg) e2:SetTarget(c81013003.thtg)
e2:SetOperation(c81013003.thop) e2:SetOperation(c81013003.thop)
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(c81013003.sumcon)
e3:SetOperation(c81013003.sumsuc)
c:RegisterEffect(e3)
end
function c81013003.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsPreviousLocation(LOCATION_HAND)
end
function c81013003.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(81011027,0))
end end
function c81013003.spfilter(c) function c81013003.spfilter(c)
return (bit.band(c:GetOriginalType(),TYPE_SPELL)~=0 or bit.band(c:GetOriginalType(),TYPE_TRAP)~=0) and c:IsAbleToGraveAsCost() return (bit.band(c:GetOriginalType(),TYPE_SPELL)~=0 or bit.band(c:GetOriginalType(),TYPE_TRAP)~=0) and c:IsAbleToGraveAsCost()
......
--梦前菜菜·睡衣 --梦前菜菜·睡衣
local m=81013012 local m=81013012
local cm=_G["c"..m] local cm=_G["c"..m]
Duel.LoadScript("c37564765.lua")
function cm.initial_effect(c) function cm.initial_effect(c)
--synchro summon --synchro summon
aux.AddSynchroProcedure(c,nil,aux.FilterBoolFunction(Card.IsLevel,2),1,1) aux.AddSynchroProcedure(c,nil,aux.FilterBoolFunction(Card.IsLevel,2),1,1)
c:EnableReviveLimit() c:EnableReviveLimit()
Senya.AddSummonMusic(c,m*16,SUMMON_TYPE_SYNCHRO)
--double tuner check --double tuner check
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
......
--生日快乐·白上吹雪 --生日快乐·白上吹雪
function c81019007.initial_effect(c) function c81019007.initial_effect(c)
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(c81019007.sumcon)
e0:SetOperation(c81019007.sumsuc)
c:RegisterEffect(e0)
--spsummon --spsummon
local e1=aux.AddRitualProcEqual2(c,c81019007.ritfilter,LOCATION_GRAVE) local e1=aux.AddRitualProcEqual2(c,c81019007.ritfilter,LOCATION_GRAVE)
e1:SetCountLimit(1,81019007) e1:SetCountLimit(1,81019007)
...@@ -25,12 +18,6 @@ function c81019007.initial_effect(c) ...@@ -25,12 +18,6 @@ function c81019007.initial_effect(c)
e2:SetOperation(c81019007.op) e2:SetOperation(c81019007.op)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c81019007.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_RITUAL)
end
function c81019007.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(81019007,0))
end
function c81019007.ritfilter(c) function c81019007.ritfilter(c)
return c:IsType(TYPE_RITUAL) and c:IsSetCard(0x81c) return c:IsType(TYPE_RITUAL) and c:IsSetCard(0x81c)
end end
......
--天真烂漫·白上吹雪 --天真烂漫·白上吹雪
function c81040036.initial_effect(c) function c81040036.initial_effect(c)
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(c81040036.sumcon)
e0:SetOperation(c81040036.sumsuc)
c:RegisterEffect(e0)
--search --search
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DESTROY) e1:SetCategory(CATEGORY_DESTROY)
...@@ -28,12 +21,6 @@ function c81040036.initial_effect(c) ...@@ -28,12 +21,6 @@ function c81040036.initial_effect(c)
e3:SetOperation(c81040036.actop) e3:SetOperation(c81040036.actop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c81040036.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_RITUAL)
end
function c81040036.sumsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(81040036,0))
end
function c81040036.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c81040036.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() end if chkc then return chkc:IsOnField() end
if chk==0 then return Duel.IsExistingTarget(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end if chk==0 then return Duel.IsExistingTarget(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) 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