Commit 6d744f0e authored by POLYMER's avatar POLYMER

fix

parent 2b206e0e
......@@ -17,8 +17,10 @@ function cm.initial_effect(c)
end
function c22348317.effcon(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():IsOnField() and re:GetHandler():IsRelateToEffect(re) and (re:IsActiveType(TYPE_MONSTER)
or (re:IsActiveType(TYPE_SPELL+TYPE_TRAP) and not re:IsHasType(EFFECT_TYPE_ACTIVATE)))
return (re:IsActiveType(TYPE_MONSTER) and re:GetActivateLocation()==LOCATION_MZONE
or ((re:GetActivateLocation()==LOCATION_FZONE or re:GetActivateLocation()==LOCATION_SZONE) and re:IsActiveType(TYPE_SPELL+TYPE_TRAP) and not re:IsHasType(EFFECT_TYPE_ACTIVATE)))
end
function c22348317.drfilter(c)
return c:IsRace(RACE_SPELLCASTER) and c:IsDiscardable()
......
......@@ -26,10 +26,11 @@ function cm.initial_effect(c)
c:RegisterEffect(e2)
end
function cm.spcon(e,c)
local tp=c:GetControler()
local num=Duel.GetMatchingGroupCount(aux.TRUE,tp,LOCATION_GRAVE,0,nil)
if c==nil then return true end
return num>=20
and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
end
function cm.thfilter(c)
return c:IsCode(60002250)
......
......@@ -13,18 +13,22 @@ function cm.initial_effect(c)
c:RegisterEffect(e1)
end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) end
if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,0,LOCATION_MZONE,3,nil) end
if chkc then return chkc:IsLocation(LOCATION_ONFIELD) and chkc:IsControler(1-tp) end
if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,0,LOCATION_ONFIELD,3,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
local ag=Duel.SelectTarget(tp,aux.TRUE,tp,0,LOCATION_MZONE,3,3,nil)
local ag=Duel.SelectTarget(tp,aux.TRUE,tp,0,LOCATION_ONFIELD,3,3,nil)
Duel.SetTargetCard(ag)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,ag,1,0,0)
end
function cm.activate(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
local rc=tg:GetFirst()
local cd=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_ONFIELD,nil)
cd:RemoveCard(tc)
while rc do
cd:RemoveCard(rc)
rc=tg:GetNext()
end
if Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_MZONE,0,1,nil,60002252) and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
local og=nil
local gm=nil
......
--救世神龙 传承琉迩
function c75000003.initial_effect(c)
--fusion material
c:EnableReviveLimit()
aux.AddFusionProcMix(c,true,true,c75000003.fusfilter1,c75000003.fusfilter2,c75000003.fusfilter3)
aux.AddFusionProcCode2FunRep(c,21159309,75000001,aux.FilterBoolFunction(Card.IsFusionSetCard,0x751),1,1,true,true)
--cannot disable spsummon
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
......@@ -53,16 +54,7 @@ function c75000003.initial_effect(c)
e5:SetOperation(c75000003.fuop)
c:RegisterEffect(e5)
end
c75000003.material_setcode=75000001
function c75000003.fusfilter1(c)
return c:IsFusionCode(21159309)
end
function c75000003.fusfilter2(c)
return c:IsFusionCode(75000001)
end
function c75000003.fusfilter3(c)
return c:IsFusionSetCard(0x751)
end
c75000003.material_setcode=75000001
function c75000003.tddcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(function(c) return c:IsSetCard(0x751) and c:IsType(TYPE_MONSTER) and c:IsAbleToGraveAsCost() end,tp,LOCATION_DECK+LOCATION_EXTRA,0,1,nil) end
local g=Duel.SelectMatchingCard(tp,function(c) return c:IsSetCard(0x751) and c:IsType(TYPE_MONSTER) and c:IsAbleToGraveAsCost() end,tp,LOCATION_DECK+LOCATION_EXTRA,0,1,1,nil)
......
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