Commit 7a00c2f8 authored by Huangnan's avatar Huangnan

fix

parent f865138a
Pipeline #41940 failed with stages
in 5 minutes and 39 seconds
No preview for this file type
......@@ -28,7 +28,7 @@ function c16400540.initial_effect(c)
c:RegisterEffect(e3)
end
function c16400540.thfilter(c)
return c:IsCode(16400510,16400525) and c:IsAbleToHand()
return c:IsCode(16400510,16400515,16400520,16400525,16400530,16400535,16400545,16400560,16400565,16400570,16400575,16400590,16400595,16400600,16400610,16400615,16400620,16400625,16400630,16400655,16400660,16400665,16400670,16400675,16400680,16400685,16401135,16401140,16401145,16401150,16401155,16401165,16401405,16401410,16401415,16401420,16401425,16401430,16401535,16401585,16401590,16401595,16401600,16401605,16401610,16401615,16401630,16401635,16401825,16401830,16401835,16401840,16401845,16402075,16402076,16402110,16402115,16402120,16402125,16402130) and c:IsAbleToHand()
end
function c16400540.activate(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c16400540.thfilter,tp,LOCATION_DECK,0,nil)
......@@ -43,7 +43,7 @@ function c16400540.tgfilter(c,tp)
return c:IsFaceup() and c:IsCode(16400510) and Duel.GetMZoneCount(tp,c,tp)>0 and c:IsAbleToGrave()
end
function c16400540.spfilter(c,e,tp)
return c:IsCode(16400515,16400520) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
return c:IsCode(16400510,16400515,16400520,16400525,16400530,16400535,16400545,16400560,16400565,16400570,16400575,16400590,16400595,16400600,16400610,16400615,16400620,16400625,16400630,16400655,16400660,16400665,16400670,16400675,16400680,16400685,16401135,16401140,16401145,16401150,16401155,16401165,16401405,16401410,16401415,16401420,16401425,16401430,16401535,16401585,16401590,16401595,16401600,16401605,16401610,16401615,16401630,16401635,16401825,16401830,16401835,16401840,16401845,16402075,16402076,16402110,16402115,16402120,16402125,16402130) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c16400540.tgtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler()
......
......@@ -45,7 +45,7 @@ function c16400550.cfilter(c)
return c:IsCode(16400510) and c:IsAbleToDeck() and not c:IsPublic()
end
function c16400550.thfilter(c)
return c:IsCode(16400525) and c:IsAbleToHand()
return c:IsCode(16400510,16400515,16400520,16400525,16400530,16400535,16400545,16400560,16400565,16400570,16400575,16400590,16400595,16400600,16400610,16400615,16400620,16400625,16400630,16400655,16400660,16400665,16400670,16400675,16400680,16400685,16401135,16401140,16401145,16401150,16401155,16401165,16401405,16401410,16401415,16401420,16401425,16401430,16401535,16401585,16401590,16401595,16401600,16401605,16401610,16401615,16401630,16401635,16401825,16401830,16401835,16401840,16401845,16402075,16402076,16402110,16402115,16402120,16402125,16402130) and c:IsAbleToHand()
end
function c16400550.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c16400550.cfilter,tp,LOCATION_HAND,0,1,nil)
......@@ -87,7 +87,7 @@ function c16400550.spop(e,tp,eg,ep,ev,re,r,rp)
end
end
function c16400550.tdfilter(c)
return c:IsCode(16400525) and c:IsAbleToDeck()
return c:IsCode(16400510,16400515,16400520,16400525,16400530,16400535,16400545,16400560,16400575,16400590,16400595,16400660,16400665,16400670,16400675,16400680,16400685,16401135,16401140,16401145,16401150,16401155,16401165,16401405,16401410,16401415,16401420,16401425,16401430,16401535,16401590,16401595,16401600,16401605,16401610,16401615,16401630,16401635,16401825,16402120,16402125,16402130) and c:IsAbleToDeck()
end
function c16400550.tdtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c16400550.tdfilter(chkc) end
......
--冒险的骑士 菜月昴
function c16400565.initial_effect(c)
aux.AddCodeList(c,16400530,16401405,16401410,16401415,16401420,16401425,16401430,16400515,16400520,16400525,16400595,16400590,16400685,16400670,16400675,16400680,16401135,16401140,16400560,16400545,16400575,16400660,16400665,16401165,16401590,16401615,16401610,16401605,16401600,16401595,16401630,16401635)
--xyz summon
c:EnableReviveLimit()
aux.AddXyzProcedureLevelFree(c,c16400565.mfilter,nil,2,2)
......@@ -51,7 +50,7 @@ function c16400565.spcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetOverlayCount()==0 and eg:IsExists(c16400565.cfilter,1,nil,tp)
end
function c16400565.spfilter(c,e,tp)
return c:IsCode (16401405,16401410,16401415,16401420,16401425,16401430,16400515,16400520,16400525,16400595,16400590,16400685,16400670,16400675,16400680,16401135,16401140,16400560,16400545,16400575,16400660,16400665,16401165,16401590,16401615,16401610,16401605,16401600,16401595,16401630,16401635) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
return c:IsCode (16400510,16400515,16400520,16400525,16400530,16400535,16400545,16400560,16400565,16400570,16400575,16400590,16400595,16400600,16400610,16400615,16400620,16400625,16400630,16400655,16400660,16400665,16400670,16400675,16400680,16400685,16401135,16401140,16401145,16401150,16401155,16401165,16401405,16401410,16401415,16401420,16401425,16401430,16401535,16401585,16401590,16401595,16401600,16401605,16401610,16401615,16401630,16401635,16401825,16401830,16401835,16401840,16401845,16402075,16402076,16402110,16402115,16402120,16402125,16402130) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c16400565.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
......
......@@ -3,26 +3,28 @@ function c16400655.initial_effect(c)
--link summon
aux.AddLinkProcedure(c,c16400655.mfilter,1)
c:EnableReviveLimit()
--tohand
--set
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOGRAVE)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetDescription(aux.Stringid(16400655,0))
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1,16400655)
e1:SetTarget(c16400655.target)
e1:SetOperation(c16400655.operation)
e1:SetTarget(c16400655.settg)
e1:SetOperation(c16400655.setop)
c:RegisterEffect(e1)
--change name
aux.EnableChangeCode(c,16400595,LOCATION_MZONE+LOCATION_GRAVE)
--cannot be target
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetCode(EFFECT_CANNOT_BE_BATTLE_TARGET)
e2:SetRange(LOCATION_MZONE)
e2:SetCondition(c16400655.tgcon)
e2:SetValue(aux.imval1)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
e3:SetRange(LOCATION_MZONE)
e3:SetTargetRange(LOCATION_MZONE,0)
e3:SetTarget(c16400655.ecfilter)
e3:SetValue(aux.tgoval)
c:RegisterEffect(e3)
end
......@@ -32,27 +34,19 @@ end
function c16400655.mfilter(c)
return c:IsLinkCode(16400595) and c:GetAttack()~=c:GetBaseAttack()
end
function c16400655.pfilter(c,tp)
return c:IsCode(16401160) and not c:IsForbidden() and c:CheckUniqueOnField(tp)
function c16400655.setfilter(c)
return c:IsCode(16400550,16401160,16400540,16400580,16400605,16401625,16401850,16402080,16402085,16402090,16402095,16402100,16402105) and c:IsSSetable()
end
function c16400655.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
and Duel.IsExistingMatchingCard(c16400655.pfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,tp) end
function c16400655.settg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c16400655.setfilter,tp,LOCATION_DECK,0,1,nil) end
end
function c16400655.tgfilter(c)
return c:IsCode(16401165) and c:IsAbleToGrave()
end
function c16400655.operation(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
local tc=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c16400655.pfilter),tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,tp):GetFirst()
if tc and Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) then
local g=Duel.GetMatchingGroup(c16400655.tgfilter,tp,LOCATION_DECK,0,nil)
if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(16400655,0)) then
Duel.BreakEffect()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local sg=g:Select(tp,1,1,nil)
Duel.SendtoGrave(sg,REASON_EFFECT)
end
function c16400655.setop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
local g=Duel.SelectMatchingCard(tp,c16400655.setfilter,tp,LOCATION_DECK,0,1,1,nil)
if #g>0 then
Duel.SSet(tp,g)
end
end
\ No newline at end of file
end
function c16400655.tgcon(e)
return e:GetHandler():GetLinkedGroupCount()>0
end
--神龙的觐见
function c16401160.initial_effect(c)
aux.AddCodeList(c,16400530,16401405,16401410,16401415,16401420,16401425,16401430,16400515,16400520,16400525,16400595,16400590,16400685,16400670,16400675,16400680,16401135,16401140,16400560,16400545,16400575,16400660,16400665,16401165,16401590,16401615,16401610,16401605,16401600,16401595,16401630,16401635)
--Activate
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -34,8 +33,7 @@ function c16401160.initial_effect(c)
c:RegisterEffect(e5)
end
function c16401160.spfilter(c,e,tp)
return c:IsCode(16400530,16401405,16401410,16401415,16401420,16401425,16401430,16400515,16400520,16400525,16400595,16400590,16400685,16400670,16400675,16400680,16401135,16401140,16400560,16400545,16400575,16400660,16400665,16401165,16401590,16401615,16401610,16401605,16401600,16401595,16401630,16401635)
and (c:IsAbleToHand() or (Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,true,false)))
return c:IsCode(16400510,16400515,16400520,16400525,16400530,16400535,16400545,16400560,16400565,16400570,16400575,16400590,16400595,16400600,16400610,16400615,16400620,16400625,16400630,16400655,16400660,16400665,16400670,16400675,16400680,16400685,16401135,16401140,16401145,16401150,16401155,16401165,16401405,16401410,16401415,16401420,16401425,16401430,16401535,16401585,16401590,16401595,16401600,16401605,16401610,16401615,16401630,16401635,16401825,16401830,16401835,16401840,16401845,16402075,16402076,16402110,16402115,16402120,16402125,16402130) and (c:IsAbleToHand() or (Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,true,false)))
end
function c16401160.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil) end
......
......@@ -83,8 +83,7 @@ function s.spcon2(e,tp,eg,ep,ev,re,r,rp)
return eg:IsContains(e:GetHandler())
end
function s.spfilter(c,e,tp)
return (c:IsCode(16400595) or c:IsLevel(8) and c:IsRace(RACE_SPELLCASTER) and c:IsAttribute(ATTRIBUTE_DARK))
and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
return c:IsCode(16400510,16400515,16400520,16400525,16400530,16400535,16400545,16400560,16400575,16400590,16400595,16400660,16400665,16400670,16400675,16400680,16400685,16401135,16401140,16401145,16401150,16401155,16401165,16401405,16401410,16401415,16401420,16401425,16401430,16401535,16401590,16401595,16401600,16401605,16401610,16401615,16401630,16401635,16401825,16402120,16402125,16402130) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function s.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
......
--让我们再一次开始吧!
function c16401625.initial_effect(c)
aux.AddCodeList(c,16400530,16401405,16401410,16401415,16401420,16401425,16401430,16400515,16400520,16400525,16400595,16400590,16400685,16400670,16400675,16400680,16401135,16401140,16400560,16400545,16400575,16400660,16400665,16401165,16401590,16401615,16401610,16401605,16401600,16401595,16401630,16401635)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
......@@ -11,7 +10,7 @@ function c16401625.initial_effect(c)
c:RegisterEffect(e1)
end
function c16401625.filter(c)
return c:IsCode(16400530,16401405,16401410,16401415,16401420,16401425,16401430,16400515,16400520,16400525,16400595,16400590,16400685,16400670,16400675,16400680,16401135,16401140,16400560,16400545,16400575,16400660,16400665,16401165,16401590,16401615,16401610,16401605,16401600,16401595,16401630,16401635) and c:IsAbleToHand()
return c:IsCode(16400510,16400515,16400520,16400525,16400530,16400535,16400545,16400560,16400565,16400570,16400575,16400590,16400595,16400600,16400610,16400615,16400620,16400625,16400630,16400655,16400660,16400665,16400670,16400675,16400680,16400685,16401135,16401140,16401145,16401150,16401155,16401165,16401405,16401410,16401415,16401420,16401425,16401430,16401535,16401585,16401590,16401595,16401600,16401605,16401610,16401615,16401630,16401635,16401825,16401830,16401835,16401840,16401845,16402075,16402076,16402110,16402115,16402120,16402125,16402130) and c:IsAbleToHand()
end
function c16401625.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c16401625.filter,tp,LOCATION_DECK,0,1,nil) end
......
......@@ -52,7 +52,7 @@ function c16401635.spcon1(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(aux.AND(Card.IsCode,Card.IsFaceup),tp,LOCATION_MZONE,0,1,nil,16400510)
end
function c16401635.spfilter1(c,e,tp)
return c:IsCode(16401405,16401410,16401415,16401420,16401425,16401430,16400515,16400520,16400525,16400595,16400590,16400685,16400670,16400675,16400680,16401135,16401140,16400560,16400545,16400575,16400660,16400665,16401165,16401590,16401615,16401610,16401605,16401600,16401595) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
return c:IsCode(16400510,16400515,16400520,16400525,16400530,16400535,16400545,16400560,16400565,16400570,16400575,16400590,16400595,16400600,16400610,16400615,16400620,16400625,16400630,16400655,16400660,16400665,16400670,16400675,16400680,16400685,16401135,16401140,16401145,16401150,16401155,16401165,16401405,16401410,16401415,16401420,16401425,16401430,16401535,16401585,16401590,16401595,16401600,16401605,16401610,16401615,16401630,16401635,16401825,16401830,16401835,16401840,16401845,16402075,16402076,16402110,16402115,16402120,16402125,16402130) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c16401635.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
......
......@@ -194,24 +194,24 @@ function cm.rcop(e,tp,eg,ep,ev,re,r,rp)
end
end
function cm.costfilter(c)
return c:IsReleasable() and c:IsType(TYPE_MONSTER)
function cm.costfilter(c,tp)
return c:IsReleasable() and c:IsType(TYPE_MONSTER) and Duel.GetMZoneCount(tp,c)>0
end
function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.costfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil) end
local g=Duel.SelectMatchingCard(tp,cm.costfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil)
if chk==0 then return Duel.IsExistingMatchingCard(cm.costfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil,tp) end
local g=Duel.SelectMatchingCard(tp,cm.costfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil,tp)
Duel.Release(g,REASON_COST)
end
function cm.condition(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return Duel.GetMatchingGroupCount(aux.NecroValleyFilter(cm.filter3),tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_REMOVED,0,nil,e,tp)>=8
return Duel.GetMatchingGroupCount(cm.filter3,tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_REMOVED,0,nil,e,tp)>=8
end
function cm.filter3(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:GetRace()==e:GetHandler():GetRace() and not (c:IsRace(RACE_CREATORGOD) or c:IsRace(RACE_DIVINE))
end
function cm.sumtg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(aux.NecroValleyFilter(cm.filter3),tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp) end
if chk==0 then return e:IsCostChecked() and Duel.IsExistingMatchingCard(cm.filter3,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
end
function cm.sumop(e,tp,eg,ep,ev,re,r,rp)
......@@ -220,7 +220,6 @@ function cm.sumop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.filter3),tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp)
Duel.SpecialSummon(g:GetFirst(),0,tp,tp,false,false,POS_FACEUP)
end
function cm.filter4(c,e,tp)
return c:IsAbleToHand() and c:GetRace()==e:GetHandler():GetRace() and not (c:IsRace(RACE_CREATORGOD) or c:IsRace(RACE_DIVINE))
end
......
--米诺陶诺斯
function c63924105.initial_effect(c)
function c36701000.initial_effect(c)
--[[special summon rule
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_FIELD)
e0:SetCode(EFFECT_SPSUMMON_PROC)
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e0:SetRange(LOCATION_HAND+LOCATION_GRAVE)
e0:SetCondition(c63924105.hspcon)
e0:SetTarget(c63924105.hsptg)
e0:SetOperation(c63924105.hspop)
e0:SetCondition(c36701000.hspcon)
e0:SetTarget(c36701000.hsptg)
e0:SetOperation(c36701000.hspop)
c:RegisterEffect(e0)]]
--negate
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(63924105,0))
e1:SetDescription(aux.Stringid(36701000,0))
e1:SetCategory(CATEGORY_NEGATE)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_CHAINING)
e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1,63924105)
e1:SetCondition(c63924105.discon)
e1:SetTarget(c63924105.distg)
e1:SetOperation(c63924105.disop)
e1:SetCountLimit(1,36701000)
e1:SetCondition(c36701000.discon)
e1:SetTarget(c36701000.distg)
e1:SetOperation(c36701000.disop)
c:RegisterEffect(e1)
--release
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(63924105,1))
e2:SetDescription(aux.Stringid(36701000,1))
e2:SetCategory(CATEGORY_RELEASE)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1)
e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
e2:SetTarget(c63924105.target)
e2:SetOperation(c63924105.operation)
e2:SetTarget(c36701000.target)
e2:SetOperation(c36701000.operation)
c:RegisterEffect(e2)
--aclimit
local e3=Effect.CreateEffect(c)
......@@ -42,36 +42,36 @@ function c63924105.initial_effect(c)
e3:SetCode(EFFECT_CANNOT_ACTIVATE)
e3:SetRange(LOCATION_MZONE)
e3:SetTargetRange(1,0)
e3:SetValue(c63924105.aclimit)
e3:SetValue(c36701000.aclimit)
c:RegisterEffect(e3)
end
function c63924105.hspfilter(c)
function c36701000.hspfilter(c)
return c:IsLevelAbove(1) and c:IsRace(RACE_BEAST+RACE_BEASTWARRIOR) and c:IsType(TYPE_MONSTER)
and c:IsAbleToRemoveAsCost()
end
function c63924105.hspcheck(g)
function c36701000.hspcheck(g)
Duel.SetSelectedCard(g)
return g:CheckWithSumGreater(Card.GetLevel,10) and Duel.GetMZoneCount(tp,g)>0
end
function c63924105.hspgcheck(g)
function c36701000.hspgcheck(g)
if g:GetSum(Card.GetLevel)<=10 then return true end
Duel.SetSelectedCard(g)
return g:CheckWithSumGreater(Card.GetLevel,10) and Duel.GetMZoneCount(g:GetFirst():GetControler(),g)>0
end
function c63924105.hspcon(e,c)
function c36701000.hspcon(e,c)
if c==nil then return true end
local tp=c:GetControler()
local g=Duel.GetMatchingGroup(c63924105.hspfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,c)
aux.GCheckAdditional=c63924105.hspgcheck
local res=g:CheckSubGroup(c63924105.hspcheck,1,#g,tp)
local g=Duel.GetMatchingGroup(c36701000.hspfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,c)
aux.GCheckAdditional=c36701000.hspgcheck
local res=g:CheckSubGroup(c36701000.hspcheck,1,#g,tp)
aux.GCheckAdditional=nil
return res
end
function c63924105.hsptg(e,tp,eg,ep,ev,re,r,rp,chk,c)
local g=Duel.GetMatchingGroup(c63924105.hspfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,c)
function c36701000.hsptg(e,tp,eg,ep,ev,re,r,rp,chk,c)
local g=Duel.GetMatchingGroup(c36701000.hspfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,c)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
aux.GCheckAdditional=c63924105.hspgcheck
local sg=g:SelectSubGroup(tp,c63924105.hspcheck,true,1,#g)
aux.GCheckAdditional=c36701000.hspgcheck
local sg=g:SelectSubGroup(tp,c36701000.hspcheck,true,1,#g)
aux.GCheckAdditional=nil
if sg then
sg:KeepAlive()
......@@ -79,22 +79,22 @@ function c63924105.hsptg(e,tp,eg,ep,ev,re,r,rp,chk,c)
return true
else return false end
end
function c63924105.hspop(e,tp,eg,ep,ev,re,r,rp,c)
function c36701000.hspop(e,tp,eg,ep,ev,re,r,rp,c)
local sg=e:GetLabelObject()
Duel.Remove(sg,POS_FACEUP,REASON_SPSUMMON)
sg:DeleteGroup()
end
function c63924105.discon(e,tp,eg,ep,ev,re,r,rp)
function c36701000.discon(e,tp,eg,ep,ev,re,r,rp)
return rp==1-tp and not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev)
end
function c63924105.distg(e,tp,eg,ep,ev,re,r,rp,chk)
function c36701000.distg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
end
function c63924105.disop(e,tp,eg,ep,ev,re,r,rp)
function c36701000.disop(e,tp,eg,ep,ev,re,r,rp)
Duel.NegateActivation(ev)
end
function c63924105.target(e,tp,eg,ep,ev,re,r,rp,chk)
function c36701000.target(e,tp,eg,ep,ev,re,r,rp,chk)
local mc=Duel.GetFieldGroupCount(tp,0,LOCATION_ONFIELD)
local g=Duel.GetFieldGroup(tp,0,LOCATION_HAND)
if chk==0 then return mc>0 or #g>0 end
......@@ -103,7 +103,7 @@ function c63924105.target(e,tp,eg,ep,ev,re,r,rp,chk)
e:SetLabel(op)
Duel.SetOperationInfo(0,CATEGORY_RELEASE,nil,1,1-tp,LOCATION_HAND+LOCATION_ONFIELD)
end
function c63924105.operation(e,tp,eg,ep,ev,re,r,rp)
function c36701000.operation(e,tp,eg,ep,ev,re,r,rp)
local op=e:GetLabel()
local type=TYPE_MONSTER
if op==1 then type=TYPE_SPELL end
......@@ -116,7 +116,7 @@ function c63924105.operation(e,tp,eg,ep,ev,re,r,rp)
Duel.Release(sg,REASON_RULE,1-tp)
end
end
function c63924105.aclimit(e,re,tp)
function c36701000.aclimit(e,re,tp)
return (re:GetActivateLocation()==LOCATION_GRAVE or re:GetActivateLocation()==LOCATION_HAND)
and re:IsActiveType(TYPE_MONSTER) and not re:GetHandler():IsSetCard(0x860)
end
\ No newline at end of file
--米诺陶诺斯-无法走出的迷宫
function c63924110.initial_effect(c)
function c36701001.initial_effect(c)
--Activate
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -11,7 +11,7 @@ function c63924110.initial_effect(c)
e1:SetCode(EFFECT_CANNOT_ATTACK)
e1:SetRange(LOCATION_FZONE)
e1:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
e1:SetTarget(c63924110.target)
e1:SetTarget(c36701001.target)
c:RegisterEffect(e1)
--immune
local e11=Effect.CreateEffect(c)
......@@ -25,9 +25,9 @@ function c63924110.initial_effect(c)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_FZONE)
e2:SetCountLimit(1,63924110)
e2:SetTarget(c63924110.sttg)
e2:SetOperation(c63924110.stop)
e2:SetCountLimit(1,36701001)
e2:SetTarget(c36701001.sttg)
e2:SetOperation(c36701001.stop)
c:RegisterEffect(e2)
--spsummon
local e3=Effect.CreateEffect(c)
......@@ -35,31 +35,31 @@ function c63924110.initial_effect(c)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetRange(LOCATION_FZONE)
e3:SetCountLimit(1,63924110+1)
e3:SetCountLimit(1,36701001+1)
e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
--e3:SetCondition(c63924110.spcon)
e3:SetTarget(c63924110.sptg)
e3:SetOperation(c63924110.spop)
--e3:SetCondition(c36701001.spcon)
e3:SetTarget(c36701001.sptg)
e3:SetOperation(c36701001.spop)
c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e4)
end
function c63924110.target(e,c)
function c36701001.target(e,c)
return c:IsStatus(STATUS_SPSUMMON_TURN) and c:IsLevelAbove(0) and c:GetOriginalLevel()<10 and not c:IsSetCard(0x860)
end
function c63924110.filter(c)
function c36701001.filter(c)
return c:IsSetCard(0x860) and c:IsType(TYPE_MONSTER) and not c:IsForbidden()
end
function c63924110.sttg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c63924110.filter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil)
function c36701001.sttg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c36701001.filter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil)
and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 end
end
function c63924110.stop(e,tp,eg,ep,ev,re,r,rp)
function c36701001.stop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if Duel.GetLocationCount(tp,LOCATION_SZONE)>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c63924110.filter),tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c36701001.filter),tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
local tc=g:GetFirst()
if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
......@@ -77,29 +77,29 @@ function c63924110.stop(e,tp,eg,ep,ev,re,r,rp)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetTargetRange(1,0)
e2:SetTarget(c63924110.limit)
e2:SetTarget(c36701001.limit)
e2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2,tp)
end
function c63924110.limit(e,c)
function c36701001.limit(e,c)
return c:IsLocation(LOCATION_EXTRA) and not c:IsSetCard(0x860)
end
function c63924110.spcon(e,tp,eg,ep,ev,re,r,rp)
function c36701001.spcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(Card.IsSummonPlayer,1,nil,1-tp)
end
function c63924110.sfilter(c,e,tp)
function c36701001.sfilter(c,e,tp)
return c:GetOriginalType()&TYPE_MONSTER>0 and c:GetType()&TYPE_CONTINUOUS+TYPE_TRAP==TYPE_CONTINUOUS+TYPE_TRAP
and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x860)
end
function c63924110.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and c63924110.sfilter(chkc,e,tp) end
function c36701001.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and c36701001.sfilter(chkc,e,tp) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(c63924110.sfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil,e,tp) end
and Duel.IsExistingTarget(c36701001.sfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,c63924110.sfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,e,tp)
local g=Duel.SelectTarget(tp,c36701001.sfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
end
function c63924110.spop(e,tp,eg,ep,ev,re,r,rp)
function c36701001.spop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then
Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
......@@ -109,7 +109,7 @@ function c63924110.spop(e,tp,eg,ep,ev,re,r,rp)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetTarget(c63924110.limit)
e1:SetTarget(c36701001.limit)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
\ No newline at end of file
--米诺陶诺斯-葬于迷宫之声
function c63924115.initial_effect(c)
function c36701002.initial_effect(c)
--activate
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -7,12 +7,12 @@ function c63924115.initial_effect(c)
c:RegisterEffect(e0)
--set
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(63924115,0))
e1:SetDescription(aux.Stringid(36701002,0))
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_SZONE)
e1:SetCountLimit(1,63924115)
e1:SetTarget(c63924115.settg)
e1:SetOperation(c63924115.setop)
e1:SetCountLimit(1,36701002)
e1:SetTarget(c36701002.settg)
e1:SetOperation(c36701002.setop)
c:RegisterEffect(e1)
--must attack
local e2=Effect.CreateEffect(c)
......@@ -20,60 +20,60 @@ function c63924115.initial_effect(c)
e2:SetCode(EFFECT_MUST_ATTACK)
e2:SetRange(LOCATION_SZONE)
e2:SetTargetRange(0,LOCATION_MZONE)
e2:SetCondition(c63924115.atkcon)
e2:SetCondition(c36701002.atkcon)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EFFECT_MUST_ATTACK_MONSTER)
e3:SetValue(c63924115.atklimit)
e3:SetValue(c36701002.atklimit)
c:RegisterEffect(e3)
--multi attack
local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(63924115,1))
e4:SetDescription(aux.Stringid(36701002,1))
e4:SetType(EFFECT_TYPE_IGNITION)
e4:SetRange(LOCATION_SZONE)
e4:SetProperty(EFFECT_FLAG_CARD_TARGET)
e4:SetCountLimit(1,63924115+1)
e4:SetCondition(c63924115.con)
e4:SetTarget(c63924115.tg)
e4:SetOperation(c63924115.op)
e4:SetCountLimit(1,36701002+1)
e4:SetCondition(c36701002.con)
e4:SetTarget(c36701002.tg)
e4:SetOperation(c36701002.op)
c:RegisterEffect(e4)
end
function c63924115.setfilter(c)
function c36701002.setfilter(c)
return c:IsSetCard(0x860) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable()
end
function c63924115.settg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c63924115.setfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end
function c36701002.settg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c36701002.setfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end
end
function c63924115.setop(e,tp,eg,ep,ev,re,r,rp)
function c36701002.setop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c63924115.setfilter),tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c36701002.setfilter),tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil)
if #g>0 then
Duel.SSet(tp,g)
end
end
function c63924115.atkfilter(c)
function c36701002.atkfilter(c)
return c:IsSetCard(0x860) and c:IsFaceup()
end
function c63924115.atkcon(e)
return Duel.IsExistingMatchingCard(c63924115.atkfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
function c36701002.atkcon(e)
return Duel.IsExistingMatchingCard(c36701002.atkfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
end
function c63924115.atklimit(e,c)
function c36701002.atklimit(e,c)
return c:IsSetCard(0x860) and c:IsFaceup()
end
function c63924115.con(e,tp,eg,ep,ev,re,r,rp)
function c36701002.con(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsAbleToEnterBP()
end
function c63924115.cfilter(c)
function c36701002.cfilter(c)
return c:IsCode(63924105) and c:IsFaceup()
end
function c63924115.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
function c36701002.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and chkc:IsCode(63924105) and chkc:IsFaceup() end
if chk==0 then return Duel.IsExistingTarget(c63924115.cfilter,tp,LOCATION_MZONE,0,1,nil) end
if chk==0 then return Duel.IsExistingTarget(c36701002.cfilter,tp,LOCATION_MZONE,0,1,nil) end
Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
Duel.SelectTarget(tp,c63924115.cfilter,tp,LOCATION_MZONE,0,1,1,nil)
Duel.SelectTarget(tp,c36701002.cfilter,tp,LOCATION_MZONE,0,1,1,nil)
end
function c63924115.op(e,tp,eg,ep,ev,re,r,rp)
function c36701002.op(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then
local e1=Effect.CreateEffect(e:GetHandler())
......
--天降的波塞冬之宝礼
function c63924120.initial_effect(c)
function c36701003.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,63924120)
e1:SetTarget(c63924120.target)
e1:SetOperation(c63924120.activate)
e1:SetCountLimit(1,36701003)
e1:SetTarget(c36701003.target)
e1:SetOperation(c36701003.activate)
c:RegisterEffect(e1)
--copy effect
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_GRAVE)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCountLimit(1,63924120+1)
e2:SetCountLimit(1,36701003+1)
e2:SetCost(aux.bfgcost)
e2:SetTarget(c63924120.cptg)
e2:SetOperation(c63924120.cpop)
e2:SetTarget(c36701003.cptg)
e2:SetOperation(c36701003.cpop)
c:RegisterEffect(e2)
end
function c63924120.filter(c)
function c36701003.filter(c)
return c:IsSetCard(0x860) and c:IsType(TYPE_MONSTER) and not c:IsForbidden()
end
function c63924120.setfilter(c,e)
function c36701003.setfilter(c,e)
local tc=e:GetHandler()
local tp=tc:GetControler()
return c:IsSetCard(0x860) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable()
and (c:IsType(TYPE_FIELD) or tc:IsLocation(LOCATION_SZONE) or Duel.GetLocationCount(tp,LOCATION_SZONE)>1)
end
function c63924120.target(e,tp,eg,ep,ev,re,r,rp,chk)
function c36701003.target(e,tp,eg,ep,ev,re,r,rp,chk)
local ft=0
if e:GetHandler():IsLocation(LOCATION_HAND) then ft=1 end
if chk==0 then return (Duel.GetLocationCount(tp,LOCATION_SZONE)>ft
and Duel.IsExistingMatchingCard(c63924120.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil))
or Duel.IsExistingMatchingCard(c63924120.setfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e)
and Duel.IsExistingMatchingCard(c36701003.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil))
or Duel.IsExistingMatchingCard(c36701003.setfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e)
end
end
function c63924120.activate(e,tp,eg,ep,ev,re,r,rp)
function c36701003.activate(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local op=0
local b1=(Duel.IsExistingMatchingCard(c63924120.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil)
local b1=(Duel.IsExistingMatchingCard(c36701003.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil)
and Duel.GetLocationCount(tp,LOCATION_SZONE)>0)
local b2=Duel.IsExistingMatchingCard(c63924120.setfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e)
local b2=Duel.IsExistingMatchingCard(c36701003.setfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e)
Duel.Hint(HINT_SELECTMSG,tp,0)
if b1 and b2 then op=Duel.SelectOption(tp,aux.Stringid(63924120,0),aux.Stringid(63924120,1))
elseif b1 then op=Duel.SelectOption(tp,aux.Stringid(63924120,0))
elseif b2 then Duel.SelectOption(tp,aux.Stringid(63924120,1)) op=1
if b1 and b2 then op=Duel.SelectOption(tp,aux.Stringid(36701003,0),aux.Stringid(36701003,1))
elseif b1 then op=Duel.SelectOption(tp,aux.Stringid(36701003,0))
elseif b2 then Duel.SelectOption(tp,aux.Stringid(36701003,1)) op=1
else return end
if op==0 then
if Duel.GetLocationCount(tp,LOCATION_SZONE)>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
local g=Duel.SelectMatchingCard(tp,c63924120.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil)
local g=Duel.SelectMatchingCard(tp,c36701003.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil)
local tc=g:GetFirst()
if tc then
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
......@@ -65,26 +65,26 @@ function c63924120.activate(e,tp,eg,ep,ev,re,r,rp)
end
else
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c63924120.setfilter),tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,e)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c36701003.setfilter),tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,e)
if #g>0 then
Duel.SSet(tp,g)
end
end
end
function c63924120.cpfilter(c)
function c36701003.cpfilter(c)
return c:IsSetCard(0x860) and c:CheckActivateEffect(false,true,false)~=nil
and (c:GetType()==TYPE_SPELL or c:GetType()==TYPE_TRAP)
end
function c63924120.cptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
function c36701003.cptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler()
if chkc then
local te=e:GetLabelObject()
local tg=te:GetTarget()
return tg and tg(e,tp,eg,ep,ev,re,r,rp,0,chkc)
end
if chk==0 then return Duel.IsExistingTarget(c63924120.cpfilter,tp,LOCATION_GRAVE,0,1,c) end
if chk==0 then return Duel.IsExistingTarget(c36701003.cpfilter,tp,LOCATION_GRAVE,0,1,c) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
local g=Duel.SelectTarget(tp,c63924120.cpfilter,tp,LOCATION_GRAVE,0,1,1,c)
local g=Duel.SelectTarget(tp,c36701003.cpfilter,tp,LOCATION_GRAVE,0,1,1,c)
local te,ceg,cep,cev,cre,cr,crp=g:GetFirst():CheckActivateEffect(false,true,true)
Duel.ClearTargetCard()
g:GetFirst():CreateEffectRelation(e)
......@@ -94,7 +94,7 @@ function c63924120.cptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
e:SetLabelObject(te)
Duel.ClearOperationInfo(0)
end
function c63924120.cpop(e,tp,eg,ep,ev,re,r,rp)
function c36701003.cpop(e,tp,eg,ep,ev,re,r,rp)
local te=e:GetLabelObject()
if not te then return end
if not te:GetHandler():IsRelateToEffect(e) then return end
......
--米诺陶诺斯-噬于纪始之时
function c63924125.initial_effect(c)
function c36701004.initial_effect(c)
--act in set turn
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
......@@ -10,9 +10,9 @@ function c63924125.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,63924125)
e1:SetTarget(c63924125.target)
e1:SetOperation(c63924125.activate)
e1:SetCountLimit(1,36701004)
e1:SetTarget(c36701004.target)
e1:SetOperation(c36701004.activate)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
......@@ -21,52 +21,52 @@ function c63924125.initial_effect(c)
e2:SetRange(LOCATION_GRAVE)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetCondition(c63924125.atkcon)
e2:SetCondition(c36701004.atkcon)
e2:SetCost(aux.bfgcost)
e2:SetTarget(c63924125.atktg)
e2:SetOperation(c63924125.atkop)
e2:SetTarget(c36701004.atktg)
e2:SetOperation(c36701004.atkop)
c:RegisterEffect(e2)
end
function c63924125.setfilter(c,e)
function c36701004.setfilter(c,e)
return c:IsCode(63924110) and c:IsSSetable()
end
function c63924125.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c63924125.setfilter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil)
function c36701004.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c36701004.setfilter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil)
end
end
function c63924125.activate(e,tp,eg,ep,ev,re,r,rp)
function c36701004.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c63924125.setfilter),tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c36701004.setfilter),tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
if #g>0 then
Duel.SSet(tp,g)
end
end
function c63924125.atkcon(e,tp,eg,ep,ev,re,r,rp)
function c36701004.atkcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()~=tp and Duel.GetCurrentPhase()==PHASE_BATTLE_STEP
end
function c63924125.atkfilter(c)
function c36701004.atkfilter(c)
return c:IsCode(63924105) and c:IsFaceup()
end
function c63924125.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c63924125.atkfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c63924125.atkfilter,tp,LOCATION_MZONE,0,1,nil)
function c36701004.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c36701004.atkfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c36701004.atkfilter,tp,LOCATION_MZONE,0,1,nil)
and Duel.GetLocationCount(1-tp,LOCATION_MZONE)>0
and Duel.IsPlayerCanSpecialSummonMonster(tp,63924135,0x860,TYPES_TOKEN_MONSTER,0,0,2,RACE_WARRIOR,ATTRIBUTE_DARK,POS_FACEUP_ATTACK) end
and Duel.IsPlayerCanSpecialSummonMonster(tp,36701006,0x860,TYPES_TOKEN_MONSTER,0,0,2,RACE_WARRIOR,ATTRIBUTE_DARK,POS_FACEUP_ATTACK) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
Duel.SelectTarget(tp,c63924125.atkfilter,tp,LOCATION_MZONE,0,1,1,nil)
Duel.SelectTarget(tp,c36701004.atkfilter,tp,LOCATION_MZONE,0,1,1,nil)
local ft=Duel.GetLocationCount(1-tp,LOCATION_MZONE)
if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,ft,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,ft,0,0)
end
function c63924125.atkop(e,tp,eg,ep,ev,re,r,rp)
function c36701004.atkop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local ft=Duel.GetLocationCount(1-tp,LOCATION_MZONE)
if ft<=0 or not Duel.IsPlayerCanSpecialSummonMonster(tp,63924135,0x860,TYPES_TOKEN_MONSTER,0,0,2,RACE_WARRIOR,ATTRIBUTE_DARK,POS_FACEUP_ATTACK) then return end
if ft<=0 or not Duel.IsPlayerCanSpecialSummonMonster(tp,36701006,0x860,TYPES_TOKEN_MONSTER,0,0,2,RACE_WARRIOR,ATTRIBUTE_DARK,POS_FACEUP_ATTACK) then return end
if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end
local g=Group.CreateGroup()
for i=1,ft do
local token=Duel.CreateToken(tp,63924135)
local token=Duel.CreateToken(tp,36701006)
Duel.SpecialSummonStep(token,0,tp,1-tp,false,false,POS_FACEUP_ATTACK)
end
Duel.SpecialSummonComplete()
......@@ -77,19 +77,19 @@ function c63924125.atkop(e,tp,eg,ep,ev,re,r,rp)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_MUST_ATTACK)
e2:SetRange(LOCATION_MZONE)
e2:SetCondition(c63924125.bpcon)
e2:SetCondition(c36701004.bpcon)
e2:SetTargetRange(0,LOCATION_MZONE)
e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE)
tc:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EFFECT_MUST_ATTACK_MONSTER)
e3:SetValue(c63924125.atklimit)
e3:SetValue(c36701004.atklimit)
tc:RegisterEffect(e3)
end
end
function c63924125.bpcon(e)
function c36701004.bpcon(e)
return Duel.IsTurnPlayer(1-e:GetHandlerPlayer()) and Duel.IsBattlePhase()
end
function c63924125.atklimit(e,c)
function c36701004.atklimit(e,c)
return c==e:GetHandler()
end
\ No newline at end of file
--不诚乱欲之罚
function c63924130.initial_effect(c)
function c36701005.initial_effect(c)
--control
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_CONTROL)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCountLimit(1,63924130)
e1:SetTarget(c63924130.tg)
e1:SetOperation(c63924130.op)
e1:SetCountLimit(1,36701005)
e1:SetTarget(c36701005.tg)
e1:SetOperation(c36701005.op)
c:RegisterEffect(e1)
--disable
local e2=Effect.CreateEffect(c)
......@@ -17,26 +17,26 @@ function c63924130.initial_effect(c)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER)
e2:SetCountLimit(1,63924130)
e2:SetCondition(c63924130.condition)
e2:SetCountLimit(1,36701005)
e2:SetCondition(c36701005.condition)
e2:SetCost(aux.bfgcost)
e2:SetTarget(c63924130.target)
e2:SetOperation(c63924130.activate)
e2:SetTarget(c36701005.target)
e2:SetOperation(c36701005.activate)
c:RegisterEffect(e2)
end
function c63924130.filter(c,e,tp)
function c36701005.filter(c,e,tp)
return c:IsSummonPlayer(1-tp) and c:IsLocation(LOCATION_MZONE) and c:IsControlerCanBeChanged()
and (not e or c:IsRelateToEffect(e))
end
function c63924130.tg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return eg:IsExists(c63924130.filter,1,nil,nil,tp) end
local g=eg:Filter(c63924130.filter,nil,nil,tp)
function c36701005.tg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return eg:IsExists(c36701005.filter,1,nil,nil,tp) end
local g=eg:Filter(c36701005.filter,nil,nil,tp)
Duel.SetTargetCard(g)
Duel.SetOperationInfo(0,CATEGORY_CONTROL,g,1,0,0)
end
function c63924130.op(e,tp,eg,ep,ev,re,r,rp)
function c36701005.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=eg:Filter(c63924130.filter,nil,e,tp)
local g=eg:Filter(c36701005.filter,nil,e,tp)
local tc=g:GetFirst()
if not tc then return end
if g:GetCount()>1 then
......@@ -51,22 +51,22 @@ function c63924130.op(e,tp,eg,ep,ev,re,r,rp)
tc:RegisterEffect(e1)
end
end
function c63924130.cfilter(c)
function c36701005.cfilter(c)
return c:IsSetCard(0x860) and c:IsFaceup()
end
function c63924130.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c63924130.cfilter,tp,LOCATION_MZONE,0,1,nil)
function c36701005.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c36701005.cfilter,tp,LOCATION_MZONE,0,1,nil)
end
function c63924130.disfilter(c)
function c36701005.disfilter(c)
return c:IsType(TYPE_MONSTER) and aux.NegateMonsterFilter(c)
end
function c63924130.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and c63924130.disfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c63924130.disfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
function c36701005.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and c36701005.disfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c36701005.disfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
Duel.SelectTarget(tp,c63924130.disfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
Duel.SelectTarget(tp,c36701005.disfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
end
function c63924130.activate(e,tp,eg,ep,ev,re,r,rp)
function c36701005.activate(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and tc:IsFaceup() then
......
......@@ -2,7 +2,7 @@
local s,id,o=GetID()
function s.initial_effect(c)
--xyz summon
aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_INSECT),4,2,nil,nil,99)
aux.AddXyzProcedure(c,nil,4,2,nil,nil,99)
c:EnableReviveLimit()
--to hand
local e1=Effect.CreateEffect(c)
......
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