Skip to content

E
Entertainment Server
Commit 14337bf9 authored by root's avatar root
Browse files
Options

Refresh on 2025-05-20 07:47:13

parent 1feb482b
Hide whitespace changes
Inline Side-by-side
Showing with 67 additions and 55 deletions
script/c114514219.lua
View file @ 14337bf9
......@@ -22,7 +22,7 @@ function s.filter(c,e,tp,flag)
return c:IsFaceup() and c:IsSetCard(0x195) and c:IsAbleToHand() and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp,c:GetCode(),flag)
end
function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local e=e:GetHandler()
local c=e:GetHandler()
local flag=not c:IsStatus(STATUS_ACT_FROM_HAND) and c:IsLocation(LOCATION_SZONE)
if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_MZONE) and s.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(s.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,e,tp,flag) end
......
script/c114514669.lua
View file @ 14337bf9
......@@ -19,6 +19,7 @@ function s.initial_effect(c)
e2:SetOperation(s.eqop)
c:RegisterEffect(e2)
end
s.has_text_type=TYPE_UNION
function s.tgfilter(c,code)
return c:IsType(TYPE_UNION) and aux.IsCodeListed(c,code) and c:IsAbleToGrave()
end
......
script/c114514688.lua
View file @ 14337bf9
......@@ -38,7 +38,7 @@ end
function s.spcon1(e,c)
if c==nil then return true end
local tp=c:GetControler()
return Duel.GetLocationCount(1-tp,LOCATION_MZONE)>0
return Duel.GetLocationCount(1-tp,LOCATION_MZONE)>0 and Duel.GetFieldGroupCount(tp,0,LOCATION_MZONE)>0
end
function s.spcon2(e,c)
if c==nil then return true end
......
script/c114514709.lua
View file @ 14337bf9
......@@ -85,33 +85,35 @@ function s.eqop(e,tp,eg,ep,ev,re,r,rp)
e3:SetValue(s.repval)
ec:RegisterEffect(e3)
end
Duel.EquipComplete()
end
end
function s.repval(e,re,r,rp)
return bit.band(r,REASON_BATTLE+REASON_EFFECT)~=0
end
function s.cfilter1(c,tp)
return c:IsSetCard(0xf) and c:IsType(TYPE_MONSTER) and c:IsAbleToGraveAsCost()
end
function s.spfilter(c,e,tp,tc)
return c:IsType(TYPE_FUSION) and c:IsRace(RACE_WARRIOR+RACE_MACHINE+RACE_BEAST) and c:IsCanBeSpecialSummoned(e,0,tp,true,false) and c:IsLevelBelow(10)
end
function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(s.cfilter1,tp,LOCATION_DECK,0,1,nil,tp) end
local g=Duel.GetMatchingGroup(s.cfilter1,tp,LOCATION_DECK,0,nil)
if g:GetCount()>=3 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local sg=g:Select(tp,3,3,nil)
Duel.SendtoGrave(sg,REASON_COST)
end
end
function s.confilter(c)
return c:GetBaseAttack()==0
end
function s.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(s.confilter,tp,LOCATION_MZONE,0,1,nil)
end
function s.eqlimit(e,c)
return c==e:GetLabelObject()
end
-- function s.cfilter1(c,tp)
-- return c:IsSetCard(0xf) and c:IsType(TYPE_MONSTER) and c:IsAbleToGraveAsCost()
-- end
-- function s.spfilter(c,e,tp,tc)
-- return c:IsType(TYPE_FUSION) and c:IsRace(RACE_WARRIOR+RACE_MACHINE+RACE_BEAST) and c:IsCanBeSpecialSummoned(e,0,tp,true,false) and c:IsLevelBelow(10)
-- end
-- function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-- if chk==0 then return Duel.IsExistingMatchingCard(s.cfilter1,tp,LOCATION_DECK,0,1,nil,tp) end
-- local g=Duel.GetMatchingGroup(s.cfilter1,tp,LOCATION_DECK,0,nil)
-- if g:GetCount()>=3 then
-- Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
-- local sg=g:Select(tp,3,3,nil)
-- Duel.SendtoGrave(sg,REASON_COST)
-- end
-- end
-- function s.confilter(c)
-- return c:GetBaseAttack()==0
-- end
-- function s.condition(e,tp,eg,ep,ev,re,r,rp)
-- return Duel.IsExistingMatchingCard(s.confilter,tp,LOCATION_MZONE,0,1,nil)
-- end
function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,c) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
......
script/c114514710.lua
View file @ 14337bf9
......@@ -22,6 +22,7 @@ function cm.initial_effect(c)
e2:SetOperation(cm.op)
c:RegisterEffect(e2)
end
cm.has_text_type=TYPE_UNION
function cm.costfilter(c)
return ((c:IsSetCard(0xf) and not c:IsCode(m)) or c:IsType(TYPE_UNION)) and c:IsDiscardable()
end
......
script/c114514714.lua
View file @ 14337bf9
......@@ -28,7 +28,7 @@ function cm.initial_effect(c)
e3:SetOperation(cm.op1)
c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c)
e4:SetCategory(CATEGORY_REMOVE)
e4:SetCategory(CATEGORY_DESTROY)
e4:SetDescription(aux.Stringid(m,1))
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e4:SetCode(EVENT_REMOVE)
......@@ -68,15 +68,15 @@ function cm.op1(e,tp,eg,ep,ev,re,r,rp)
end
end
function cm.tg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_ONFIELD) and chkc:IsAbleToRemove() end
if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
if chkc then return chkc:IsLocation(LOCATION_ONFIELD) end
if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_ONFIELD)
Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,tp,LOCATION_ONFIELD)
end
function cm.op2(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and tc:IsAbleToRemove() then
Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
if tc:IsRelateToEffect(e) then
Duel.Destroy(tc,REASON_EFFECT)
end
end
\ No newline at end of file
script/c114514994.lua
View file @ 14337bf9
......@@ -37,7 +37,7 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
end
function s.activate(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc and Duel.SpecialSummon(tc,0,tp,tp,true,false,POS_FACEUP) then
if tc and tc:IsRelateToEffect(e) and Duel.SpecialSummon(tc,0,tp,tp,true,false,POS_FACEUP) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
local sc=Duel.SelectMatchingCard(tp,s.nfilter,tp,LOCATION_DECK,0,1,1,nil,tc:GetCode()):GetFirst()
if not Duel.Equip(tp,sc,tc) then return end
......
script/c114515003.lua
View file @ 14337bf9
......@@ -22,13 +22,12 @@ function s.initial_effect(c)
local e7=Effect.CreateEffect(c)
e7:SetDescription(aux.Stringid(id,1))
e7:SetCategory(CATEGORY_SPECIAL_SUMMON)
e7:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e7:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e7:SetCode(EVENT_TO_GRAVE)
e7:SetProperty(EFFECT_FLAG_DELAY)
e7:SetCountLimit(1,id)
e7:SetTarget(s.sptg)
e7:SetOperation(s.spop)
e7:SetOperation(s.operation)
c:RegisterEffect(e7)
end
......@@ -181,10 +180,14 @@ end
function s.filter(c,e,tp)
return (c:IsSetCard(0xb03) or c:IsCode(100240201)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
function s.operation(e,tp,eg,ep,ev,re,r,rp)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetCountLimit(1)
e1:SetOperation(s.spop)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
function s.spop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
......
script/c114515004.lua
View file @ 14337bf9
......@@ -22,13 +22,12 @@ function s.initial_effect(c)
local e7=Effect.CreateEffect(c)
e7:SetDescription(aux.Stringid(id,1))
e7:SetCategory(CATEGORY_SPECIAL_SUMMON)
e7:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
e7:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e7:SetCode(EVENT_TO_GRAVE)
e7:SetProperty(EFFECT_FLAG_DELAY)
e7:SetCountLimit(1,id)
e7:SetTarget(s.sptg)
e7:SetOperation(s.spop)
e7:SetOperation(s.operation)
c:RegisterEffect(e7)
end
......@@ -181,10 +180,14 @@ end
function s.filter(c,e,tp)
return (c:IsSetCard(0xb02) or c:IsCode(100240201)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
function s.operation(e,tp,eg,ep,ev,re,r,rp)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetCountLimit(1)
e1:SetOperation(s.spop)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
function s.spop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
......
script/c114515007.lua
View file @ 14337bf9
......@@ -27,8 +27,8 @@ function s.initial_effect(c)
e7:SetCode(EVENT_TO_GRAVE)
e7:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
e7:SetCountLimit(1,id)
e7:SetTarget(s.eqtg)
e7:SetOperation(s.eqop)
e7:SetTarget(s.tg)
e7:SetOperation(s.activate)
c:RegisterEffect(e7)
end
......
script/c114515008.lua
View file @ 14337bf9
......@@ -27,8 +27,8 @@ function s.initial_effect(c)
e7:SetCode(EVENT_TO_GRAVE)
e7:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
e7:SetCountLimit(1,id)
e7:SetTarget(s.eqtg)
e7:SetOperation(s.eqop)
e7:SetTarget(s.tg)
e7:SetOperation(s.activate)
c:RegisterEffect(e7)
end
......
script/c191981158.lua
View file @ 14337bf9
......@@ -23,6 +23,7 @@ function s.initial_effect(c)
e3:SetCode(EVENT_FREE_CHAIN)
e3:SetRange(LOCATION_GRAVE)
e3:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
e3:SetCountLimit(1,id)
e3:SetCost(aux.bfgcost)
e3:SetTarget(s.dmgtg)
e3:SetOperation(s.dmgop)
......
script/c191981305.lua
View file @ 14337bf9
......@@ -87,7 +87,7 @@ function s.spcon(e,c)
if c==nil then return true end
local tp=c:GetControler()
local fg=Duel.GetMatchingGroup(s.ffilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,nil)
return fg:CheckSubGroup(s.fselect,2,2) and Duel.GetMatchingGroupCount(s.ffilter2,p,LOCATION_GRAVE,0,nil)
return fg:CheckSubGroup(s.fselect,2,2) and Duel.GetMatchingGroupCount(s.ffilter2,tp,LOCATION_GRAVE,0,nil)>0
end
function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,c)
local cp=c:GetControler()
......
texts/balanced.txt
View file @ 14337bf9
......@@ -5216,7 +5216,7 @@ Take Your Heart(114514326) 通常陷阱 (Custom)
坚毅的磁石战士(114514351) 地 4星 岩石 1600 1700 (Custom)
系列：0x2066
①：自己场上有「光之黄金柜」的场合，把手卡·场上的这张卡送去墓地才能发动。选自己1张手卡送去墓地，从卡组把1只这个卡名以外的「磁石战士」怪兽或者有「光之黄金柜」的卡名记述的怪兽特殊召唤。这个效果特殊召唤的怪兽的等级上升4。
①：自己场上有「光之黄金柜」的场合，把手卡·场上的这张卡送去墓地才能发动。选自己1张手卡送去墓地，从卡组把1只这个卡名以外的「磁石战士」怪兽。自己场上有「光之黄金柜」的场合，也能作为代替把1只有「光之黄金柜」的卡名记述的怪兽特殊召唤，那只怪兽的等级上升4星。
②：1回合1次，自己场上有「光之黄金柜」的场合，对方场上的怪兽的效果发动时才能发动。自己场上的有「光之黄金柜」的卡名记述的怪兽直到连锁结束时不受对方发动的怪兽效果的影响。那之后，把对方场上最多有自己场上有「光之黄金柜」的卡名记述的怪兽数量的怪兽送去墓地。
磁石放电(114514352) 通常魔法 (Custom)
......@@ -7658,7 +7658,7 @@ D-爆裂(114514687) 通常魔法 (Custom)
扰乱闪电(114514688) 光 2星 兽 1000 0 (Custom)
系列：0xF
这个卡名的①的方式的特殊召唤1回合只能有1次，③的效果1回合只能使用1次。
①：这张卡可以在自己或者对方场上攻击表示特殊召唤。
①：这张卡可以在自己场上攻击表示特殊召唤，对方场上有怪兽的场合也可以在对方场上攻击表示特殊召唤。
②：「扰乱闪电」在双方场上只能有1张表侧表示存在。
③：这张卡召唤·特殊召唤的场合发动。这张卡的原本持有者从自身卡组把1只「扰乱」通常怪兽加入手卡，1张「扰乱」卡加入手卡，再把1张手卡送去墓地。
提示文本：对方场上特殊召唤、自己场上特殊召唤
......@@ -10037,14 +10037,14 @@ Y.H.V.H.(114514997) 光 12星 天使 4000 4000 (Custom)
这个卡名的③的效果1回合只能使用1次。
①：双方回合，以场上1只其他怪兽为对象才能发动。从自己的手卡·场上把这只怪兽当作装备卡使用给那只怪兽装备。
②：有这张卡装备的怪兽与「+」岩石族怪兽或者装备有「+」岩石族怪兽卡的怪兽进行战斗的伤害步骤开始时，那次战斗无效。「-」岩石族怪兽召唤·特殊召唤·反转的场合，有这张卡装备的怪兽当作装备卡使用给那只怪兽装备。
③：这张卡送去墓地的回合的结束阶段才能发动。从卡组把1只「-」岩石族怪兽加入手卡。
③：这张卡送去墓地的场合才能发动。从卡组把1只「-」岩石族怪兽加入手卡。
磁石战士 Σ-(114515002) 地 4星 岩石 1500 1800 (Custom)
系列：0x2066、0xB03
这个卡名的③的效果1回合只能使用1次。
①：双方回合，以场上1只其他怪兽为对象才能发动。从自己的手卡·场上把这只怪兽当作装备卡使用给那只怪兽装备。
②：有这张卡装备的怪兽与「-」岩石族怪兽或者装备有「-」岩石族怪兽卡的怪兽进行战斗的伤害步骤开始时，那次战斗无效。「+」岩石族怪兽召唤·特殊召唤·反转的场合，有这张卡装备的怪兽当作装备卡使用给那只怪兽装备。
③：这张卡送去墓地的回合的结束阶段才能发动。从卡组把1只「+」岩石族怪兽加入手卡。
③：这张卡送去墓地的场合才能发动。从卡组把1只「+」岩石族怪兽加入手卡。
磁石战士 Ω+(114515003) 地 4星 岩石 1900 1400 (Custom)
系列：0x2066、0xB02
......@@ -12537,6 +12537,7 @@ lua by 魊影透明鱼
②：从卡组把1张场地魔法送去墓地才能发动。这张卡从手卡特殊召唤。直到回合结束时，自己不是炎族怪兽不能从额外卡组特殊召唤。
③：这张卡召唤·特殊召唤的场合才能发动。从卡组把1张「灰灭」魔法·陷阱卡在自己场上盖放。
④：双方回合，场上有表侧表示的场地魔法·永续魔法·永续陷阱的场合，把手卡·场上的这张卡解放才能发动。从卡组·手卡把1只「灭亡龙 威多释」加入手卡或在对方场上特殊召唤。
提示文本：特殊召唤、解放真身
灰灭的传承者(191981305) 暗 10星 炎/融合 3300 2900 (Custom)
系列：0x1AD
......
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