Commit 3b73e9cc authored by 未闻皂名's avatar 未闻皂名

2021/4/25 把KP05以及部分已发售的卡移至正式卡,新增:MAX2的新卡

parent a6779c67
No preview for this file type
No preview for this file type
local m=120180002
local m=120106002
local cm=_G["c"..m]
cm.name="监狱之神 迪安·凯特"
function cm.initial_effect(c)
......
local m=120170000
local cm=_G["c"..m]
cm.name="破坏剑士"
cm.name="破坏剑士"
function cm.initial_effect(c)
--Atk Up
local e1=Effect.CreateEffect(c)
......
local m=120170059
local cm=_G["c"..m]
cm.name="咕蛊鸽心碎"
cm.name="咕蛊鸽心碎"
function cm.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
......
local m=120185001
local m=120180001
local cm=_G["c"..m]
cm.name="零击龙 齿车戒零龙"
function cm.initial_effect(c)
......
local m=120195005
local cm=_G["c"..m]
cm.name="大恐龙驾 激情[L]"
function cm.initial_effect(c)
--Indes
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_XMATERIAL)
e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
e1:SetCondition(RushDuel.IsMaximumMode)
e1:SetValue(cm.indes)
c:RegisterEffect(e1)
end
--Indes
function cm.indes(e,c)
return c:IsLevelBelow(7)
end
\ No newline at end of file
local m=120195006
local list={120195005,120195007}
local cm=_G["c"..m]
cm.name="大恐龙驾 激情"
function cm.initial_effect(c)
aux.AddCodeList(c,list[1],list[2])
--Maximum Summon
RushDuel.AddMaximumProcedure(c,3400,list[1],list[2])
--Destroy
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetCategory(CATEGORY_DESTROY)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_MZONE)
e1:SetCondition(cm.condition)
e1:SetCost(cm.cost)
e1:SetTarget(cm.target)
e1:SetOperation(cm.operation)
c:RegisterEffect(e1)
end
--Destroy
function cm.confilter(c)
return c:IsFaceup() and c:IsLevelAbove(9)
end
function cm.costfilter(c)
return c:IsType(TYPE_MONSTER) and c:IsAbleToGraveAsCost()
end
function cm.condition(e,tp,eg,ep,ev,re,r,rp)
return RushDuel.IsMaximumMode(e)
and not Duel.IsExistingMatchingCard(cm.confilter,tp,0,LOCATION_MZONE,1,nil)
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,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,cm.costfilter,tp,LOCATION_HAND,0,1,1,nil)
Duel.SendtoGrave(g,REASON_COST)
end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(nil,tp,0,LOCATION_MZONE,1,nil) end
local g=Duel.GetMatchingGroup(nil,tp,0,LOCATION_MZONE,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
end
function cm.operation(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectMatchingCard(tp,nil,tp,0,LOCATION_MZONE,1,2,nil)
if g:GetCount()>0 then
Duel.HintSelection(g)
Duel.Destroy(g,REASON_EFFECT)
end
end
\ No newline at end of file
local m=120195007
local cm=_G["c"..m]
cm.name="大恐龙驾 激情[R]"
function cm.initial_effect(c)
--Indes
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_XMATERIAL)
e1:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetRange(LOCATION_MZONE)
e1:SetCondition(RushDuel.IsMaximumMode)
e1:SetValue(cm.efilter)
c:RegisterEffect(e1)
end
--Indes
function cm.efilter(e,re,rp)
return rp==1-e:GetHandlerPlayer() and re:IsActiveType(TYPE_TRAP)
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