Commit 27a28400 authored by 聖園ミカ's avatar 聖園ミカ 🐟

byd

parent bfef0fc7
......@@ -74,7 +74,7 @@ function cm.sprop(e,tp,eg,ep,ev,re,r,rp,c)
g:DeleteGroup()
end
function cm.check(c)
return not c:IsCode(m+1)
return not c:IsCode(m+1) and c:IsType(TYPE_MONSTER)
end
function cm.op(e,tp)
local c=e:GetHandler()
......
--谜神帝 伊兹莫
local m=16110000
local cm=_G["c"..m]
Duel.LoadScript("c16199990.lua")
local m,cm=rk.set(16110001)
function cm.initial_effect(c)
--summon with 1 tribute
local e1,e2=rkst.Tri(c)
--
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,1))
......@@ -32,87 +34,7 @@ function cm.initial_effect(c)
e5:SetTarget(cm.advtg)
e5:SetLabelObject(e4)
c:RegisterEffect(e5)
--summon with 1 tribute
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(16199990,14))
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SUMMON_PROC)
e1:SetCondition(cm.advcon)
e1:SetOperation(cm.advop)
e1:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(16199990,15))
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_SUMMON_PROC)
e3:SetCondition(cm.advcon2)
e3:SetOperation(cm.advop2)
e3:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e4)
end
function cm.otfilter(c)
return c:IsSummonType(SUMMON_TYPE_ADVANCE)
end
function cm.advcon(e,c,minc)
if c==nil then return true end
local tp=e:GetHandlerPlayer()
local res1=false
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
local tp=c:GetControler()
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
sinnte_check = true
local res = c:IsLevelAbove(7) and minc<=1 and Duel.CheckTribute(c,1,1,mg)
sinnte_check = false
return res or res1
end
function cm.advop(e,tp,eg,ep,ev,re,r,rp,c)
local tp=e:GetHandlerPlayer()
local res1=false
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local c=e:GetHandler()
local res = Duel.CheckTribute(c,1,1,mg)
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
if not res and res1 then
Duel.DiscardDeck(tp,1,REASON_COST)
return
end
if res1==true and Duel.SelectYesNo(tp,aux.Stringid(m,4)) then
Duel.DiscardDeck(tp,1,REASON_COST)
return
end
sinnte_check = true
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local sg=Duel.SelectTribute(tp,c,1,1,mg)
c:SetMaterial(sg)
Duel.Release(sg,REASON_SUMMON+REASON_MATERIAL)
sinnte_check = false
end
function cm.advcon2(e,c,minc)
if c==nil then return true end
local tp=c:GetControler()
local res1=false
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
return res1
end
function cm.advop2(e,tp,eg,ep,ev,re,r,rp,c)
local tp=e:GetHandlerPlayer()
Duel.DiscardDeck(tp,1,REASON_COST)
end
function cm.descon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_ADVANCE)
end
......
--魔神帝 优米
if not pcall(function() require("expansions/script/c16199990") end) then require("script/c16199990") end
Duel.LoadScript("c16199990.lua")
local m=16110003
local cm=_G["c"..m]
function cm.initial_effect(c)
--summon with 1 tribute
local e1,e2=rkst.Tri(c)
--
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,1))
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetCountLimit(2,m)
e3:SetCountLimit(1,m)
e3:SetCondition(cm.descon)
e3:SetTarget(cm.destg)
e3:SetOperation(cm.desop)
......@@ -23,85 +25,6 @@ function cm.initial_effect(c)
e4:SetCondition(cm.addcon)
e4:SetOperation(cm.eqop)
c:RegisterEffect(e4)
--summon with 1 tribute
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(16199990,14))
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SUMMON_PROC)
e1:SetCondition(cm.advcon)
e1:SetOperation(cm.advop)
e1:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(16199990,15))
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_SUMMON_PROC)
e3:SetCondition(cm.advcon2)
e3:SetOperation(cm.advop2)
e3:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e4)
end
function cm.otfilter(c)
return c:IsSummonType(SUMMON_TYPE_ADVANCE)
end
function cm.advcon(e,c,minc)
if c==nil then return true end
local tp=e:GetHandlerPlayer()
local res1=false
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
local tp=c:GetControler()
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
sinnte_check = true
local res = c:IsLevelAbove(7) and minc<=1 and Duel.CheckTribute(c,1,1,mg)
sinnte_check = false
return res or res1
end
function cm.advop(e,tp,eg,ep,ev,re,r,rp,c)
local tp=e:GetHandlerPlayer()
local res1=false
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local c=e:GetHandler()
local res = Duel.CheckTribute(c,1,1,mg)
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
if not res and res1 then
Duel.DiscardDeck(tp,1,REASON_COST)
return
end
if res1==true and Duel.SelectYesNo(tp,aux.Stringid(m,4)) then
Duel.DiscardDeck(tp,1,REASON_COST)
return
end
sinnte_check = true
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local sg=Duel.SelectTribute(tp,c,1,1,mg)
c:SetMaterial(sg)
Duel.Release(sg,REASON_SUMMON+REASON_MATERIAL)
sinnte_check = false
end
function cm.advcon2(e,c,minc)
if c==nil then return true end
local tp=c:GetControler()
local res1=false
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
return res1
end
function cm.advop2(e,tp,eg,ep,ev,re,r,rp,c)
local tp=e:GetHandlerPlayer()
Duel.DiscardDeck(tp,1,REASON_COST)
end
function cm.descon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_ADVANCE)
......
......@@ -53,8 +53,8 @@ function cm.efilter(e,re)
end
--draw
function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckReleaseGroup(REASON_COST,tp,nil,1,nil) end
local g=Duel.SelectReleaseGroup(REASON_COST,tp,nil,1,1,nil)
if chk==0 then return Duel.CheckReleaseGroup(tp,nil,1,nil) end
local g=Duel.SelectReleaseGroup(tp,nil,1,1,nil)
Duel.Release(g,REASON_COST)
if g:GetFirst():IsSetCard(0xcc5) then
e:SetLabel(1)
......
--神帝的坏世
if not pcall(function() require("expansions/script/c16199990") end) then require("script/c16199990") end
Duel.LoadScript("c16199990.lua")
local m=16110013
local cm=_G["c"..m]
function cm.initial_effect(c)
......
--圣灵帝 阿尔卡迪亚斯
if not pcall(function() require("expansions/script/c16199990") end) then require("script/c16199990") end
Duel.LoadScript("c16199990.lua")
local m,cm=rk.set(16110015,"alcadias")
function cm.initial_effect(c)
--summon with 1 tribute
local e1,e2=rkst.Tri(c)
--remove
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,0))
......@@ -23,85 +25,6 @@ function cm.initial_effect(c)
e4:SetTarget(cm.tgtg)
e4:SetOperation(cm.tgop)
c:RegisterEffect(e4)
--summon with 1 tribute
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(16199990,14))
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SUMMON_PROC)
e1:SetCondition(cm.advcon)
e1:SetOperation(cm.advop)
e1:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(16199990,15))
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_SUMMON_PROC)
e3:SetCondition(cm.advcon2)
e3:SetOperation(cm.advop2)
e3:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e4)
end
function cm.otfilter(c)
return c:IsSummonType(SUMMON_TYPE_ADVANCE)
end
function cm.advcon(e,c,minc)
if c==nil then return true end
local tp=e:GetHandlerPlayer()
local res1=false
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
local tp=c:GetControler()
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
sinnte_check = true
local res = c:IsLevelAbove(7) and minc<=1 and Duel.CheckTribute(c,1,1,mg)
sinnte_check = false
return res or res1
end
function cm.advop(e,tp,eg,ep,ev,re,r,rp,c)
local tp=e:GetHandlerPlayer()
local res1=false
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local c=e:GetHandler()
local res = Duel.CheckTribute(c,1,1,mg)
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
if not res and res1 then
Duel.DiscardDeck(tp,1,REASON_COST)
return
end
if res1==true and Duel.SelectYesNo(tp,aux.Stringid(m,4)) then
Duel.DiscardDeck(tp,1,REASON_COST)
return
end
sinnte_check = true
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local sg=Duel.SelectTribute(tp,c,1,1,mg)
c:SetMaterial(sg)
Duel.Release(sg,REASON_SUMMON+REASON_MATERIAL)
sinnte_check = false
end
function cm.advcon2(e,c,minc)
if c==nil then return true end
local tp=c:GetControler()
local res1=false
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
return res1
end
function cm.advop2(e,tp,eg,ep,ev,re,r,rp,c)
local tp=e:GetHandlerPlayer()
Duel.DiscardDeck(tp,1,REASON_COST)
end
--remove
function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
......
--狮神帝 莱欧涅耳
if not pcall(function() require("expansions/script/c16199990") end) then require("script/c16199990") end
Duel.LoadScript("c16199990.lua")
local m=16110016
local cm=_G["c"..m]
function cm.initial_effect(c)
--summon with 1 tribute
local e1,e2=rkst.Tri(c)
--
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,1))
......@@ -21,85 +23,6 @@ function cm.initial_effect(c)
e4:SetCode(EFFECT_DIRECT_ATTACK)
e4:SetCondition(cm.descon)
c:RegisterEffect(e4)
--summon with 1 tribute
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(16199990,14))
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SUMMON_PROC)
e1:SetCondition(cm.advcon)
e1:SetOperation(cm.advop)
e1:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(16199990,15))
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_SUMMON_PROC)
e3:SetCondition(cm.advcon2)
e3:SetOperation(cm.advop2)
e3:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e4)
end
function cm.otfilter(c)
return c:IsSummonType(SUMMON_TYPE_ADVANCE)
end
function cm.advcon(e,c,minc)
if c==nil then return true end
local tp=e:GetHandlerPlayer()
local res1=false
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
local tp=c:GetControler()
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
sinnte_check = true
local res = c:IsLevelAbove(7) and minc<=1 and Duel.CheckTribute(c,1,1,mg)
sinnte_check = false
return res or res1
end
function cm.advop(e,tp,eg,ep,ev,re,r,rp,c)
local tp=e:GetHandlerPlayer()
local res1=false
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local c=e:GetHandler()
local res = Duel.CheckTribute(c,1,1,mg)
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
if not res and res1 then
Duel.DiscardDeck(tp,1,REASON_COST)
return
end
if res1==true and Duel.SelectYesNo(tp,aux.Stringid(m,4)) then
Duel.DiscardDeck(tp,1,REASON_COST)
return
end
sinnte_check = true
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local sg=Duel.SelectTribute(tp,c,1,1,mg)
c:SetMaterial(sg)
Duel.Release(sg,REASON_SUMMON+REASON_MATERIAL)
sinnte_check = false
end
function cm.advcon2(e,c,minc)
if c==nil then return true end
local tp=c:GetControler()
local res1=false
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
return res1
end
function cm.advop2(e,tp,eg,ep,ev,re,r,rp,c)
local tp=e:GetHandlerPlayer()
Duel.DiscardDeck(tp,1,REASON_COST)
end
function cm.descon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_ADVANCE)
......
......@@ -6,7 +6,7 @@ function cm.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCondition(cm.condition)
e1:SetTarget(cm.target)
e1:SetOperation(cm.operation)
......
--罪神帝 Eva
if not pcall(function() require("expansions/script/c16199990") end) then require("script/c16199990") end
Duel.LoadScript("c16199990.lua")
local m=16110019
local cm=_G["c"..m]
function cm.initial_effect(c)
--summon with 1 tribute
local e1,e2=rkst.Tri(c)
--
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,1))
......@@ -39,85 +41,6 @@ function cm.initial_effect(c)
e6:SetCondition(cm.con)
e6:SetValue(cm.val)
c:RegisterEffect(e6)
--summon with 1 tribute
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(16199990,14))
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SUMMON_PROC)
e1:SetCondition(cm.advcon)
e1:SetOperation(cm.advop)
e1:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(16199990,15))
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_SUMMON_PROC)
e3:SetCondition(cm.advcon2)
e3:SetOperation(cm.advop2)
e3:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e4)
end
function cm.otfilter(c)
return c:IsSummonType(SUMMON_TYPE_ADVANCE)
end
function cm.advcon(e,c,minc)
if c==nil then return true end
local tp=e:GetHandlerPlayer()
local res1=false
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
local tp=c:GetControler()
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
sinnte_check = true
local res = c:IsLevelAbove(7) and minc<=1 and Duel.CheckTribute(c,1,1,mg)
sinnte_check = false
return res or res1
end
function cm.advop(e,tp,eg,ep,ev,re,r,rp,c)
local tp=e:GetHandlerPlayer()
local res1=false
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local c=e:GetHandler()
local res = Duel.CheckTribute(c,1,1,mg)
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
if not res and res1 then
Duel.DiscardDeck(tp,1,REASON_COST)
return
end
if res1==true and Duel.SelectYesNo(tp,aux.Stringid(m,4)) then
Duel.DiscardDeck(tp,1,REASON_COST)
return
end
sinnte_check = true
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local sg=Duel.SelectTribute(tp,c,1,1,mg)
c:SetMaterial(sg)
Duel.Release(sg,REASON_SUMMON+REASON_MATERIAL)
sinnte_check = false
end
function cm.advcon2(e,c,minc)
if c==nil then return true end
local tp=c:GetControler()
local res1=false
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
return res1
end
function cm.advop2(e,tp,eg,ep,ev,re,r,rp,c)
local tp=e:GetHandlerPlayer()
Duel.DiscardDeck(tp,1,REASON_COST)
end
function cm.con(e,tp,eg,ep,ev,re,r,rp)
local ph=Duel.GetCurrentPhase()
......
--业神帝 Mahnaph
if not pcall(function() require("expansions/script/c16199990") end) then require("script/c16199990") end
Duel.LoadScript("c16199990.lua")
local m=16110020
local cm=_G["c"..m]
function cm.initial_effect(c)
--summon with 1 tribute
local e1,e2=rkst.Tri(c)
--
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,1))
......@@ -49,85 +51,6 @@ function cm.initial_effect(c)
e7:SetTarget(cm.sptg)
e7:SetOperation(cm.spop)
c:RegisterEffect(e7)
--summon with 1 tribute
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(16199990,14))
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SUMMON_PROC)
e1:SetCondition(cm.advcon)
e1:SetOperation(cm.advop)
e1:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(16199990,15))
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_SUMMON_PROC)
e3:SetCondition(cm.advcon2)
e3:SetOperation(cm.advop2)
e3:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e4)
end
function cm.otfilter(c)
return c:IsSummonType(SUMMON_TYPE_ADVANCE)
end
function cm.advcon(e,c,minc)
if c==nil then return true end
local tp=e:GetHandlerPlayer()
local res1=false
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
local tp=c:GetControler()
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
sinnte_check = true
local res = c:IsLevelAbove(7) and minc<=1 and Duel.CheckTribute(c,1,1,mg)
sinnte_check = false
return res or res1
end
function cm.advop(e,tp,eg,ep,ev,re,r,rp,c)
local tp=e:GetHandlerPlayer()
local res1=false
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local c=e:GetHandler()
local res = Duel.CheckTribute(c,1,1,mg)
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
if not res and res1 then
Duel.DiscardDeck(tp,1,REASON_COST)
return
end
if res1==true and Duel.SelectYesNo(tp,aux.Stringid(m,4)) then
Duel.DiscardDeck(tp,1,REASON_COST)
return
end
sinnte_check = true
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local sg=Duel.SelectTribute(tp,c,1,1,mg)
c:SetMaterial(sg)
Duel.Release(sg,REASON_SUMMON+REASON_MATERIAL)
sinnte_check = false
end
function cm.advcon2(e,c,minc)
if c==nil then return true end
local tp=c:GetControler()
local res1=false
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
return res1
end
function cm.advop2(e,tp,eg,ep,ev,re,r,rp,c)
local tp=e:GetHandlerPlayer()
Duel.DiscardDeck(tp,1,REASON_COST)
end
function cm.efilter(e,te)
return te:GetOwner()~=e:GetOwner()
......
--枪神帝 修罗
if not pcall(function() require("expansions/script/c16199990") end) then require("script/c16199990") end
Duel.LoadScript("c16199990.lua")
local m=16110022
local cm=_G["c"..m]
function cm.initial_effect(c)
--summon with 1 tribute
local e1,e2=rkst.Tri(c)
--immune
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,0))
......@@ -22,85 +24,6 @@ function cm.initial_effect(c)
e1:SetTarget(cm.damtg)
e1:SetOperation(cm.spop)
c:RegisterEffect(e1)
--summon with 1 tribute
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(16199990,14))
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SUMMON_PROC)
e1:SetCondition(cm.advcon)
e1:SetOperation(cm.advop)
e1:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(16199990,15))
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_SUMMON_PROC)
e3:SetCondition(cm.advcon2)
e3:SetOperation(cm.advop2)
e3:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e4)
end
function cm.otfilter(c)
return c:IsSummonType(SUMMON_TYPE_ADVANCE)
end
function cm.advcon(e,c,minc)
if c==nil then return true end
local tp=e:GetHandlerPlayer()
local res1=false
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
local tp=c:GetControler()
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
sinnte_check = true
local res = c:IsLevelAbove(7) and minc<=1 and Duel.CheckTribute(c,1,1,mg)
sinnte_check = false
return res or res1
end
function cm.advop(e,tp,eg,ep,ev,re,r,rp,c)
local tp=e:GetHandlerPlayer()
local res1=false
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local c=e:GetHandler()
local res = Duel.CheckTribute(c,1,1,mg)
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
if not res and res1 then
Duel.DiscardDeck(tp,1,REASON_COST)
return
end
if res1==true and Duel.SelectYesNo(tp,aux.Stringid(m,4)) then
Duel.DiscardDeck(tp,1,REASON_COST)
return
end
sinnte_check = true
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local sg=Duel.SelectTribute(tp,c,1,1,mg)
c:SetMaterial(sg)
Duel.Release(sg,REASON_SUMMON+REASON_MATERIAL)
sinnte_check = false
end
function cm.advcon2(e,c,minc)
if c==nil then return true end
local tp=c:GetControler()
local res1=false
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
return res1
end
function cm.advop2(e,tp,eg,ep,ev,re,r,rp,c)
local tp=e:GetHandlerPlayer()
Duel.DiscardDeck(tp,1,REASON_COST)
end
--summon with 1 tribute
function cm.otfilter(c)
......
......@@ -55,7 +55,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
return res
end
if Duel.IsExistingMatchingCard(cm.cfilter,tp,0,LOCATION_MZONE,1,nil) then
e:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE)
end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end
......@@ -63,7 +63,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
local chkf=tp
local mg1=Duel.GetFusionMaterial(tp):Filter(cm.filter1,nil,e)
if Duel.IsExistingMatchingCard(cm.cfilter,tp,0,LOCATION_MZONE,1,nil) then
e:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e:SetProperty(EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CANNOT_DISABLE)
end
local sg1=Duel.GetMatchingGroup(cm.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf)
local mg3=nil
......
--龙世界龙大王
if not pcall(function() require("expansions/script/c16199990") end) then require("script/c16199990") end
Duel.LoadScript("c16199990.lua")
local m,cm=rk.set(16110037,"DAIOURYUU")
function cm.initial_effect(c)
--fusion material
......
--谜之神帝 伊斯摩德
local m=16110038
local cm=_G["c"..m]
Duel.LoadScript("c16199990.lua")
function cm.initial_effect(c)
--summon with s/t
local e0=Effect.CreateEffect(c)
......@@ -8,7 +9,7 @@ function cm.initial_effect(c)
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e0:SetCode(EFFECT_ADD_EXTRA_TRIBUTE)
e0:SetTargetRange(LOCATION_HAND,0)
e0:SetTarget(cm.matcheck)
e0:SetTarget(aux.TargetBoolFunction(Card.IsType,TYPE_SPELL+TYPE_TRAP+TYPE_MONSTER))
e0:SetValue(POS_FACEUP_ATTACK+POS_FACEDOWN_DEFENSE)
c:RegisterEffect(e0)
--remove
......@@ -22,9 +23,6 @@ function cm.initial_effect(c)
e3:SetOperation(cm.rmop)
c:RegisterEffect(e3)
end
function cm.matcheck(e,c)
return c:IsSetCard(0xcc5) and not c==e:GetHandler()
end
function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_ADVANCE)
end
......
--权神帝 Valid
if not pcall(function() require("expansions/script/c16199990") end) then require("script/c16199990") end
Duel.LoadScript("c16199990.lua")
local m=16110050
local cm=_G["c"..m]
function cm.initial_effect(c)
--summon with 1 tribute
local e1,e2=rkst.Tri(c)
--Effect 1
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,0))
......@@ -47,85 +49,6 @@ function cm.initial_effect(c)
e6:SetTarget(cm.sumtg)
e6:SetOperation(cm.sumop)
c:RegisterEffect(e6)
--summon with 1 tribute
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(16199990,14))
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SUMMON_PROC)
e1:SetCondition(cm.advcon)
e1:SetOperation(cm.advop)
e1:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(16199990,15))
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_SUMMON_PROC)
e3:SetCondition(cm.advcon2)
e3:SetOperation(cm.advop2)
e3:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e4)
end
function cm.otfilter(c)
return c:IsSummonType(SUMMON_TYPE_ADVANCE)
end
function cm.advcon(e,c,minc)
if c==nil then return true end
local tp=e:GetHandlerPlayer()
local res1=false
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
local tp=c:GetControler()
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
sinnte_check = true
local res = c:IsLevelAbove(7) and minc<=1 and Duel.CheckTribute(c,1,1,mg)
sinnte_check = false
return res or res1
end
function cm.advop(e,tp,eg,ep,ev,re,r,rp,c)
local tp=e:GetHandlerPlayer()
local res1=false
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local c=e:GetHandler()
local res = Duel.CheckTribute(c,1,1,mg)
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
if not res and res1 then
Duel.DiscardDeck(tp,1,REASON_COST)
return
end
if res1==true and Duel.SelectYesNo(tp,aux.Stringid(m,4)) then
Duel.DiscardDeck(tp,1,REASON_COST)
return
end
sinnte_check = true
local mg=Duel.GetMatchingGroup(cm.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local sg=Duel.SelectTribute(tp,c,1,1,mg)
c:SetMaterial(sg)
Duel.Release(sg,REASON_SUMMON+REASON_MATERIAL)
sinnte_check = false
end
function cm.advcon2(e,c,minc)
if c==nil then return true end
local tp=c:GetControler()
local res1=false
if Duel.IsPlayerAffectedByEffect(tp,16110026) then
res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
end
return res1
end
function cm.advop2(e,tp,eg,ep,ev,re,r,rp,c)
local tp=e:GetHandlerPlayer()
Duel.DiscardDeck(tp,1,REASON_COST)
end
--Effect 1
function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
......
......@@ -73,8 +73,8 @@ end
function s.opcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(s.spgfilter,1,nil)
end
function s.spfilter(c,e,tp)
return c:IsType(TYPE_TUNER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
function s.spfilter(c)
return aux.IsCodeListed(c,id) and (c:IsAbleToDeck() or c:IsLocation(LOCATION_DECK))
end
function s.xyzfilter(c)
return c:IsXyzSummonable(nil)
......@@ -130,7 +130,7 @@ function s.opop(e,tp,eg,ep,ev,re,r,rp)
end
end
local b4=Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_HAND,0,1,nil)
local b4=Duel.IsExistingMatchingCard(aux.NecroValleyFilter(s.spfilter),tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_HAND,0,1,nil)
local sel=aux.SelectFromOptions(tp,
{b1,aux.Stringid(id,1)},
{b2,aux.Stringid(id,2)},
......@@ -221,5 +221,8 @@ function s.spop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<fg:GetCount() then
return false
end
Duel.SpecialSummon(fg,0,tp,tp,false,false,POS_FACEUP)
Duel.SpecialSummon(fg,0,tp,tp,true,true,POS_FACEUP)
for tc in aux.Next(fg) do
tc:CompleteProcedure()
end
end
\ No newline at end of file
......@@ -2,6 +2,7 @@
local s,id,o=GetID()
function s.initial_effect(c)
aux.AddCodeList(c,16138001)
c:EnableReviveLimit()
--direct attack
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
......
......@@ -51,6 +51,7 @@ function s.imop(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then
e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
Duel.Destroy(tc,REASON_EFFECT)
Duel.NegateRelatedChain(tc,RESET_TURN_SET)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_DISABLE)
......
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