Commit 7f207fe7 authored by 未闻皂名's avatar 未闻皂名

2025/2/17 新增:5TH1新卡

parent 96699392
Pipeline #33270 passed with stages
in 8 minutes and 55 seconds
No preview for this file type
local m=120283002
local list={120130000,120170000}
local cm=_G["c"..m]
cm.name="超魔导剑士-黑魔导剑士"
function cm.initial_effect(c)
RD.AddCodeList(c,list)
--Fusion Material
RD.AddFusionProcedure(c,list[1],list[2])
RD.SetFusionLegendMaterial(c,{list[1],list[2]},{aux.Stringid(m,1),aux.Stringid(m,2)})
--Atk Up
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(cm.atkval)
c:RegisterEffect(e1)
--Indes
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetRange(LOCATION_MZONE)
e2:SetCondition(cm.condition)
e2:SetValue(cm.indval)
c:RegisterEffect(e2)
--Cannot Activate
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_CANNOT_ACTIVATE)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e3:SetRange(LOCATION_MZONE)
e3:SetTargetRange(0,1)
e3:SetCondition(cm.condition)
e3:SetValue(cm.limit)
c:RegisterEffect(e3)
--Continuous Effect
RD.AddContinuousEffect(c,e1,e2,e3)
end
--Atk Up
function cm.filter(c)
return (c:IsFaceup() or c:IsLocation(LOCATION_GRAVE)) and c:IsRace(RACE_DRAGON)
end
function cm.atkval(e,c)
return Duel.GetMatchingGroupCount(cm.filter,0,LOCATION_GRAVE+LOCATION_MZONE,LOCATION_GRAVE+LOCATION_MZONE,nil)*500
end
--Indes
function cm.condition(e)
return Duel.GetFieldGroupCount(e:GetHandlerPlayer(),LOCATION_HAND,0)>0
end
cm.indval=RD.ValueEffectIndesType(0,TYPE_SPELL)
--Cannot Activate
function cm.limit(e,re,tp)
local tc=re:GetHandler()
return tc:GetType()==TYPE_SPELL and RD.IsLegendCard(tc)
and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL)
end
\ No newline at end of file
RD.SameCard(120283005,120244054)
\ No newline at end of file
RD.SameCard(120283008,120257051)
\ No newline at end of file
RD.SameCard(120283009,120261058)
\ No newline at end of file
RD.SameCard(120283023,120130030)
\ No newline at end of file
RD.SameCard(120283024,120235063)
\ 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