Commit c76ff857 authored by Nemo Ma's avatar Nemo Ma

f

parent 3e03a04c
...@@ -56,6 +56,7 @@ function cm.initial_effect(c) ...@@ -56,6 +56,7 @@ function cm.initial_effect(c)
if tc then if tc then
Duel.Hint(HINT_CARD,0,m) Duel.Hint(HINT_CARD,0,m)
Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1) Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
Duel.ConfirmCards(1-tp,c)
_RegisterEffect(tc,e,bool) _RegisterEffect(tc,e,bool)
Duel.Draw(tp,1,REASON_EFFECT) Duel.Draw(tp,1,REASON_EFFECT)
return return
......
...@@ -28,7 +28,7 @@ function cm.spfilter(c,e,tp) ...@@ -28,7 +28,7 @@ function cm.spfilter(c,e,tp)
return c:IsSetCard(0x18b) and ((c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEDOWN_DEFENSE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0) or c:IsSSetable()) return c:IsSetCard(0x18b) and ((c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEDOWN_DEFENSE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0) or c:IsSSetable())
end end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk) function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) and Duel.IsExistingMatchingCard(cm.rfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) and Duel.IsExistingMatchingCard(cm.rfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,e:GetHandler()) end
local rg=Duel.GetMatchingGroup(cm.rfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,nil) local rg=Duel.GetMatchingGroup(cm.rfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,nil)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
Duel.SetOperationInfo(0,CATEGORY_REMOVE,rg,1,tp,LOCATION_HAND+LOCATION_GRAVE) Duel.SetOperationInfo(0,CATEGORY_REMOVE,rg,1,tp,LOCATION_HAND+LOCATION_GRAVE)
......
...@@ -119,7 +119,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -119,7 +119,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetRange(LOCATION_MZONE) e1:SetRange(LOCATION_MZONE)
e1:SetCode(EFFECT_IMMUNE_EFFECT) e1:SetCode(EFFECT_IMMUNE_EFFECT)
e1:SetLabelObject(token) --e1:SetLabelObject(token)
e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD) e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD)
e1:SetValue(cm.efilter) e1:SetValue(cm.efilter)
token:RegisterEffect(e1,true) token:RegisterEffect(e1,true)
...@@ -153,7 +153,6 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -153,7 +153,6 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function cm.efilter(e,te) function cm.efilter(e,re)
local seq=e:GetHandler():GetSequence() return re:IsActiveType(TYPE_MONSTER) and e:GetHandler():GetColumnGroup():IsContains(re:GetHandler())
return te:IsActiveType(TYPE_MONSTER) and seq==e:GetHandler():GetSequence()
end end
...@@ -62,8 +62,7 @@ end ...@@ -62,8 +62,7 @@ end
function c12825613.drop(e,tp,eg,ep,ev,re,r,rp) function c12825613.drop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM) local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Draw(p,d,REASON_EFFECT) if Duel.Draw(p,d,REASON_EFFECT)>0 and c:GetOwner()~=e:GetHandlerPlayer() then
if c:GetOwner()~=e:GetHandlerPlayer() then
if Duel.GetLocationCount(1-tp,LOCATION_MZONE)>0 then if Duel.GetLocationCount(1-tp,LOCATION_MZONE)>0 then
Duel.GetControl(c,1-tp) Duel.GetControl(c,1-tp)
else else
......
...@@ -282,6 +282,7 @@ function cm.rsop(e,tp,eg,ep,ev,re,r,rp) ...@@ -282,6 +282,7 @@ function cm.rsop(e,tp,eg,ep,ev,re,r,rp)
end end
function cm.immval(e,te) function cm.immval(e,te)
local c=e:GetHandler() local c=e:GetHandler()
if not c:IsLocation(LOCATION_FZONE) then return false end
local tp=c:GetControler() local tp=c:GetControler()
local eset={c:IsHasEffect(m+50)} local eset={c:IsHasEffect(m+50)}
local res=te:GetOwner()~=e:GetOwner() and Duel.CheckReleaseGroup(tp,nil,1,nil) local res=te:GetOwner()~=e:GetOwner() and Duel.CheckReleaseGroup(tp,nil,1,nil)
......
local m=53757001 local m=53757001
local cm=_G["c"..m] local cm=_G["c"..m]
cm.name="次元秽界 赤" cm.name="次元秽界 赤"
if not pcall(function() require("expansions/script/c53702500") end) then require("script/c53702500") end
function cm.initial_effect(c) function cm.initial_effect(c)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -68,6 +69,7 @@ function cm.initial_effect(c) ...@@ -68,6 +69,7 @@ function cm.initial_effect(c)
e6_1:SetTarget(cm.actarget3) e6_1:SetTarget(cm.actarget3)
e6_1:SetOperation(cm.repoperation) e6_1:SetOperation(cm.repoperation)
Duel.RegisterEffect(e6_1,0) Duel.RegisterEffect(e6_1,0)
SNNM.Global_in_Initial_Reset(c,{e3,e4,e5,e6,e6_1})
--[[local e4=Effect.CreateEffect(c) --[[local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_ACTIVATE_COST) e4:SetCode(EFFECT_ACTIVATE_COST)
......
local m=53757003 local m=53757003
local cm=_G["c"..m] local cm=_G["c"..m]
cm.name="次元秽界 金" cm.name="次元秽界 金"
if not pcall(function() require("expansions/script/c53702500") end) then require("script/c53702500") end
function cm.initial_effect(c) function cm.initial_effect(c)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -65,6 +66,7 @@ function cm.initial_effect(c) ...@@ -65,6 +66,7 @@ function cm.initial_effect(c)
e6_1:SetTarget(cm.actarget3) e6_1:SetTarget(cm.actarget3)
e6_1:SetOperation(cm.repoperation) e6_1:SetOperation(cm.repoperation)
Duel.RegisterEffect(e6_1,0) Duel.RegisterEffect(e6_1,0)
SNNM.Global_in_Initial_Reset(c,{e3,e4,e5,e6,e6_1})
local e7=Effect.CreateEffect(c) local e7=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_SINGLE) e7:SetType(EFFECT_TYPE_SINGLE)
e7:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e7:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
......
local m=53757005 local m=53757005
local cm=_G["c"..m] local cm=_G["c"..m]
cm.name="次元秽界 律" cm.name="次元秽界 律"
if not pcall(function() require("expansions/script/c53702500") end) then require("script/c53702500") end
function cm.initial_effect(c) function cm.initial_effect(c)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -65,6 +66,7 @@ function cm.initial_effect(c) ...@@ -65,6 +66,7 @@ function cm.initial_effect(c)
e6_1:SetTarget(cm.actarget3) e6_1:SetTarget(cm.actarget3)
e6_1:SetOperation(cm.repoperation) e6_1:SetOperation(cm.repoperation)
Duel.RegisterEffect(e6_1,0) Duel.RegisterEffect(e6_1,0)
SNNM.Global_in_Initial_Reset(c,{e3,e4,e5,e6,e6_1})
local e7=Effect.CreateEffect(c) local e7=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_SINGLE) e7:SetType(EFFECT_TYPE_SINGLE)
e7:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e7:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
......
local m=53757007 local m=53757007
local cm=_G["c"..m] local cm=_G["c"..m]
cm.name="次元秽界 铜" cm.name="次元秽界 铜"
if not pcall(function() require("expansions/script/c53702500") end) then require("script/c53702500") end
function cm.initial_effect(c) function cm.initial_effect(c)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -65,6 +66,7 @@ function cm.initial_effect(c) ...@@ -65,6 +66,7 @@ function cm.initial_effect(c)
e6_1:SetTarget(cm.actarget3) e6_1:SetTarget(cm.actarget3)
e6_1:SetOperation(cm.repoperation) e6_1:SetOperation(cm.repoperation)
Duel.RegisterEffect(e6_1,0) Duel.RegisterEffect(e6_1,0)
SNNM.Global_in_Initial_Reset(c,{e3,e4,e5,e6,e6_1})
local e7=Effect.CreateEffect(c) local e7=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_SINGLE) e7:SetType(EFFECT_TYPE_SINGLE)
e7:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e7:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
......
local m=53757009 local m=53757009
local cm=_G["c"..m] local cm=_G["c"..m]
cm.name="次元秽界 冽" cm.name="次元秽界 冽"
if not pcall(function() require("expansions/script/c53702500") end) then require("script/c53702500") end
function cm.initial_effect(c) function cm.initial_effect(c)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -65,6 +66,7 @@ function cm.initial_effect(c) ...@@ -65,6 +66,7 @@ function cm.initial_effect(c)
e6_1:SetTarget(cm.actarget3) e6_1:SetTarget(cm.actarget3)
e6_1:SetOperation(cm.repoperation) e6_1:SetOperation(cm.repoperation)
Duel.RegisterEffect(e6_1,0) Duel.RegisterEffect(e6_1,0)
SNNM.Global_in_Initial_Reset(c,{e3,e4,e5,e6,e6_1})
local e7=Effect.CreateEffect(c) local e7=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_SINGLE) e7:SetType(EFFECT_TYPE_SINGLE)
e7:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e7:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
......
...@@ -12,9 +12,8 @@ function cm.initial_effect(c) ...@@ -12,9 +12,8 @@ function cm.initial_effect(c)
e1:SetOperation(cm.activate) e1:SetOperation(cm.activate)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function cm.cfilter1(c) function cm.cfilter1(c)
return c:IsFaceup() and c:IsSetCard(0x412) return c:IsFaceup() and c:IsSetCard(0x412) and c:IsType(TYPE_XYZ)
end end
function cm.cfilter2(c) function cm.cfilter2(c)
return c:IsFaceup() and c:IsLevel(10) return c:IsFaceup() and c:IsLevel(10)
...@@ -32,14 +31,17 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -32,14 +31,17 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
end end
end end
function cm.actcfilter(c,e)
return c:IsFaceup() and c:IsSetCard(0x412) and c:IsType(TYPE_XYZ) and not c:IsImmuneToEffect(e)
end
function cm.activate(e,tp,eg,ep,ev,re,r,rp) function cm.activate(e,tp,eg,ep,ev,re,r,rp)
if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then local c=e:GetHandler()
Duel.Destroy(eg,REASON_EFFECT) if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) and Duel.Destroy(eg,REASON_EFFECT)>0
end and Duel.IsExistingMatchingCard(cm.actcfilter,tp,LOCATION_MZONE,0,1,nil,e) and c:IsLocation(LOCATION_ONFIELD)
if Duel.IsExistingMatchingCard(cm.actcfilter,tp,LOCATION_MZONE,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,0)) and c:IsRelateToEffect(e) then and c:IsRelateToEffect(e) and c:IsCanOverlay() and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
local g2=Duel.SelectMatchingCard(tp,cm.actcfilter,tp,LOCATION_MZONE,0,1,1,nil) local g2=Duel.SelectMatchingCard(tp,cm.actcfilter,tp,LOCATION_MZONE,0,1,1,nil,e)
local sc=g2:GetFirst() local sc=g2:GetFirst()
c:CancelToGrave() c:CancelToGrave()
Duel.Overlay(sc,Group.FromCards(c)) Duel.Overlay(sc,Group.FromCards(c))
end end
end end
\ No newline at end of file
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