Skip to content

Y
ygopro
Commit 15c3735f authored by argon's avatar argon
Browse files
Options

scripts

parent 5807d770
Hide whitespace changes
Inline Side-by-side
Showing with 399 additions and 212 deletions
script/c11501629.lua
View file @ 15c3735f
--Kickfire
--キックファイア
function c11501629.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
......
script/c12275533.lua
View file @ 15c3735f
--Trifortressops
--機動要犀 トリケライナー
function c12275533.initial_effect(c)
--summon
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(12275533,0))
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetProperty(EFFECT_FLAG_CHAIN_UNIQUE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(0,TIMING_ATTACK+0x1c0)
e1:SetHintTiming(0,0x1e0)
e1:SetRange(LOCATION_HAND)
e1:SetCondition(c12275533.condition)
e1:SetTarget(c12275533.target)
e1:SetOperation(c12275533.operation)
c:RegisterEffect(e1)
--sum limit
--count
if not c12275533.global_check then
c12275533.global_check=true
c12275533[0]=0
c12275533[1]=0
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c12275533.checkop1)
ge1:SetOperation(c12275533.checkop)
Duel.RegisterEffect(ge1,0)
local ge2=ge1:Clone()
ge2:SetCode(EVENT_SUMMON_SUCCESS)
......@@ -29,68 +25,50 @@ function c12275533.initial_effect(c)
local ge3=ge1:Clone()
ge3:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
Duel.RegisterEffect(ge3,0)
local ge4=Effect.CreateEffect(c)
ge4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge4:SetCode(EVENT_PHASE_START+PHASE_DRAW)
ge4:SetOperation(c12275533.clear)
Duel.RegisterEffect(ge4,0)
end
end
function c12275533.checkop1(e,tp,eg,ep,ev,re,r,rp)
function c12275533.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
while tc do
c12275533[tc:GetSummonPlayer()]= c12275533[tc:GetSummonPlayer()] + 1
tc=eg:GetNext()
Duel.RegisterFlagEffect(tc:GetSummonPlayer(),12275533,RESET_PHASE+PHASE_END,0,1)
tc=eg:GetNext()
end
end
function c12275533.clear(e,tp,eg,ep,ev,re,r,rp)
c12275533[0]=0
c12275533[1]=0
end
function c12275533.condition(e,tp,eg,ep,ev,re,r,rp)
return c12275533[1-tp]>=3
return Duel.GetFlagEffect(1-tp,12275533)>=3
end
function c12275533.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,12275533)==0 and
Duel.GetLocationCount(tp,LOCATION_MZONE)>0
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and e:GetHandler():IsCanBeSpecialSummoned(e,tp,0,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
Duel.RegisterFlagEffect(tp,12275533,RESET_CHAIN,0,0)
end
function c12275533.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if e:GetHandler():IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EFFECT_IMMUNE_EFFECT)
e1:SetReset(RESET_EVENT+0x1fe0000)
e1:SetValue(1)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1)
e2:SetCode(EVENT_PHASE+PHASE_STANDBY)
e2:SetReset(RESET_EVENT+0x1fe0000)
e2:SetOperation(c12275533.adjustop)
c:RegisterEffect(e2)
end
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EFFECT_IMMUNE_EFFECT)
e1:SetReset(RESET_EVENT+0x1fe0000)
e1:SetValue(1)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1)
e2:SetCode(EVENT_PHASE+PHASE_STANDBY)
e2:SetReset(RESET_EVENT+0x1fe0000)
e2:SetOperation(c12275533.adjustop)
c:RegisterEffect(e2)
end
function c12275533.adjustop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_COPY_INHERIT)
e1:SetProperty(EFFECT_FLAG_COPY_INHERIT+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(RESET_EVENT+0x1ff0000)
e1:SetCode(EFFECT_UPDATE_DEFENCE)
e1:SetValue(-500)
......
script/c13391185.lua 0 → 100644
View file @ 15c3735f
--聖騎士ガラハド
function c13391185.initial_effect(c)
--Normal monster
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_TYPE)
e1:SetRange(LOCATION_MZONE)
e1:SetCondition(c13391185.eqcon1)
e1:SetValue(TYPE_NORMAL+TYPE_MONSTER)
c:RegisterEffect(e1)
--spsummon
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(13391185,0))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetRange(LOCATION_MZONE)
e2:SetCondition(c13391185.thcon)
e2:SetCost(c13391185.thcost)
e2:SetTarget(c13391185.thtg)
e2:SetOperation(c13391185.thop)
c:RegisterEffect(e2)
end
function c13391185.eqcon1(e)
local eg=e:GetHandler():GetEquipGroup()
return not eg or not eg:IsExists(Card.IsSetCard,1,nil,0x207a)
end
function c13391185.eqcon2(e)
local eg=e:GetHandler():GetEquipGroup()
return eg and eg:IsExists(Card.IsSetCard,1,nil,0x207a)
end
function c13391185.thcon(e,tp,eg,ep,ev,re,r,rp)
return c13391185.eqcon2(e) and Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==1
end
function c13391185.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,13391185)==0 end
Duel.RegisterFlagEffect(tp,13391185,RESET_PHASE+PHASE_END,0,1)
end
function c13391185.thfilter(c)
return c:IsSetCard(0x107a) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
end
function c13391185.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c13391185.thfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c13391185.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
local g=Duel.SelectTarget(tp,c13391185.thfilter,tp,LOCATION_GRAVE,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
end
function c13391185.desfilter(c)
return c:IsFaceup() and c:IsSetCard(0x207a) and c:IsType(TYPE_EQUIP)
end
function c13391185.thop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.SendtoHand(tc,nil,REASON_EFFECT)>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local dg=Duel.SelectMatchingCard(tp,c13391185.desfilter,tp,LOCATION_SZONE,0,1,1,nil)
Duel.BreakEffect()
Duel.Destroy(dg,REASON_EFFECT)
end
end
script/c13629812.lua
View file @ 15c3735f
--Ninjitsu Art of Shadow Sealing
--忍法 影縫いの術
function c13629812.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
......@@ -13,8 +13,10 @@ function c13629812.initial_effect(c)
c:RegisterEffect(e1)
--Destroy
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
e2:SetDescription(aux.Stringid(13629812,0))
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e2:SetCode(EVENT_LEAVE_FIELD)
e2:SetCondition(c13629812.retcon)
e2:SetOperation(c13629812.retop)
c:RegisterEffect(e2)
end
......@@ -58,9 +60,9 @@ end
function c13629812.disop(e,tp)
return bit.lshift(0x1,e:GetLabel())
end
function c13629812.retcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetFirstCardTarget()~=nil
end
function c13629812.retop(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetHandler():GetFirstCardTarget()
if tc then
Duel.ReturnToField(tc)
end
Duel.ReturnToField(e:GetHandler():GetFirstCardTarget())
end
script/c14568951.lua
View file @ 15c3735f
--Blue Dragon Ninja
--青竜の忍者
function c14568951.initial_effect(c)
--negate
local e1=Effect.CreateEffect(c)
......
script/c14745409.lua
View file @ 15c3735f
--Noble Arms - Gallatin
--聖剣ガラティーン
function c14745409.initial_effect(c)
c:SetUniqueOnField(1,0,14745409)
--Activate
......
script/c19680539.lua
View file @ 15c3735f
--Noble Knight Gawayn
--聖騎士ガウェイン
function c19680539.initial_effect(c)
--special summon
local e1=Effect.CreateEffect(c)
......
script/c20822520.lua
View file @ 15c3735f
--Spellbook Library of the Heliosphere
--魔導書庫ソレイン
function c20822520.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
......@@ -13,29 +13,18 @@ function c20822520.initial_effect(c)
c:RegisterEffect(e1)
if not c20822520.global_check then
c20822520.global_check=true
c20822520[0]=true
c20822520[1]=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_CHAINING)
ge1:SetOperation(c20822520.checkop)
Duel.RegisterEffect(ge1,0)
local ge2=Effect.CreateEffect(c)
ge2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge2:SetCode(EVENT_PHASE_START+PHASE_DRAW)
ge2:SetOperation(c20822520.clear)
Duel.RegisterEffect(ge2,0)
end
end
function c20822520.checkop(e,tp,eg,ep,ev,re,r,rp)
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and not re:GetHandler():IsSetCard(0x106e) then
c20822520[rp]=false
Duel.RegisterFlagEffect(rp,20822521,RESET_PHASE+PHASE_END,0,1)
end
end
function c20822520.clear(e,tp,eg,ep,ev,re,r,rp)
c20822520[0]=true
c20822520[1]=true
end
function c20822520.cfilter(c)
return c:IsType(TYPE_SPELL) and c:IsSetCard(0x106e)
end
......@@ -43,7 +32,7 @@ function c20822520.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c20822520.cfilter,tp,LOCATION_GRAVE,0,5,nil)
end
function c20822520.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,20822520)==0 and c20822520[tp] end
if chk==0 then return Duel.GetFlagEffect(tp,20822520)==0 and Duel.GetFlagEffect(tp,20822521)==0 end
--oath effects
Duel.RegisterFlagEffect(tp,20822520,RESET_PHASE+PHASE_END,EFFECT_FLAG_OATH,1)
local e1=Effect.CreateEffect(e:GetHandler())
......
script/c21044178.lua
View file @ 15c3735f
--Abyss Dweller
--深淵に潜む者
function c21044178.initial_effect(c)
--xyz summon
aux.AddXyzProcedure(c,aux.XyzFilterFunction(c,4),2)
......
script/c21223277.lua
View file @ 15c3735f
--Artorigus, King of the Noble Knights
--聖騎士王アルトリウス
function c21223277.initial_effect(c)
--xyz summon
aux.AddXyzProcedure(c,aux.XyzFilterFunctionF(c,aux.FilterBoolFunction(Card.IsSetCard,0x107a),4),2)
......
script/c21767650.lua
View file @ 15c3735f
--Mermail Abyssmander
--水精鱗－アビスマンダー
function c21767650.initial_effect(c)
--lvup
local e1=Effect.CreateEffect(c)
......
script/c22446869.lua
View file @ 15c3735f
--Mermail Abyssteus
--水精鱗－ディニクアビス
function c22446869.initial_effect(c)
--special summon
local e1=Effect.CreateEffect(c)
......
script/c23562407.lua
View file @ 15c3735f
--Noble Arms - Caliburn
--聖剣カリバーン
function c23562407.initial_effect(c)
c:SetUniqueOnField(1,0,23562407)
--Activate
......
script/c26285788.lua
View file @ 15c3735f
--Trial and Tribulation
--招来の対価
function c26285788.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
......@@ -7,31 +7,20 @@ function c26285788.initial_effect(c)
e1:SetCost(c26285788.cost)
e1:SetOperation(c26285788.activate)
c:RegisterEffect(e1)
if c26285788.counter==nil then
c26285788.counter=true
c26285788[0]=0
c26285788[1]=0
if c26285788.global_effect==nil then
c26285788.global_effect=true
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_PHASE_START+PHASE_DRAW)
e1:SetOperation(c26285788.resetcount)
e1:SetCode(EVENT_RELEASE)
e1:SetOperation(c26285788.addcount)
Duel.RegisterEffect(e1,0)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e2:SetCode(EVENT_RELEASE)
e2:SetOperation(c26285788.addcount)
Duel.RegisterEffect(e2,0)
end
end
function c26285788.resetcount(e,tp,eg,ep,ev,re,r,rp)
c26285788[0]=0
c26285788[1]=0
end
function c26285788.addcount(e,tp,eg,ep,ev,re,r,rp)
local c=eg:GetFirst()
while c~=nil do
local p=c:GetPreviousControler()
c26285788[p]=c26285788[p]+1
Duel.RegisterFlagEffect(p,26285789,RESET_PHASE+PHASE_END,0,1)
c=eg:GetNext()
end
end
......@@ -51,7 +40,7 @@ function c26285788.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.RegisterEffect(e1,tp)
end
function c26285788.effectcon(e,tp,eg,ep,ev,re,r,rp)
return c26285788[tp]>0
return Duel.GetFlagEffect(26285789)>0
end
function c26285788.filter1(c)
return c:IsType(TYPE_MONSTER) and c:IsAbleToHand() and not c:IsHasEffect(EFFECT_NECRO_VALLEY)
......@@ -60,9 +49,11 @@ function c26285788.filter2(c)
return c:IsFaceup() and c:IsDestructable()
end
function c26285788.effectop(e,tp,eg,ep,ev,re,r,rp)
if c26285788[tp]==1 then
Duel.Hint(HINT_CARD,0,26285789)
local ct=Duel.GetFlagEffect(26285789)
if ct==1 then
Duel.Draw(tp,1,REASON_EFFECT)
elseif c26285788[tp]==2 then
elseif ct==2 then
local g=Duel.GetMatchingGroup(c26285788.filter1,tp,LOCATION_GRAVE,0,nil)
if g:GetCount()>1 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
......
script/c27407330.lua
View file @ 15c3735f
--Lightray Grepher
--ライトレイ グレファー
function c27407330.initial_effect(c)
--special summon
local e1=Effect.CreateEffect(c)
......
script/c28423537.lua
View file @ 15c3735f
......@@ -51,14 +51,10 @@ function c28423537.ntop(e,tp,eg,ep,ev,re,r,rp,c)
c:RegisterEffect(e2)
--
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(28423537,2))
e3:SetCategory(CATEGORY_DESTROY)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetRange(LOCATION_MZONE)
e3:SetProperty(EFFECT_FLAG_REPEAT)
e3:SetCountLimit(1)
e3:SetCode(EVENT_PHASE+PHASE_END)
e3:SetTarget(c28423537.tgtg)
e3:SetOperation(c28423537.tgop)
e3:SetReset(RESET_EVENT+0xc6e0000)
c:RegisterEffect(e3)
......@@ -66,10 +62,6 @@ end
function c28423537.splimit(e,c,tp,sumtp,sumpos)
return not c:IsRace(RACE_FIEND)
end
function c28423537.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_DESTROY,e:GetHandler(),1,0,0)
end
function c28423537.tgop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and c:IsFaceup() then
......
script/c38520918.lua
View file @ 15c3735f
--Ancient Dragon
--エンシェント・ドラゴン
function c38520918.initial_effect(c)
-- atk/lv up
local e1=Effect.CreateEffect(c)
......
script/c40230018.lua
View file @ 15c3735f
--Spellbook Library of the Crescent
--魔導書庫クレッセン
function c40230018.initial_effect(c)
--search
local e1=Effect.CreateEffect(c)
......
script/c41952656.lua
View file @ 15c3735f
--Imairuka
--イマイルカ
function c41952656.initial_effect(c)
--draw
local e1=Effect.CreateEffect(c)
......
script/c43841694.lua
View file @ 15c3735f
--エクシーズ·リボーン
--魔導書の奇跡
function c43841694.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
......@@ -22,7 +22,7 @@ function c43841694.filter2(c)
return c:IsSetCard(0x106e) and c:IsType(TYPE_SPELL)
end
function c43841694.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and c43841694.filter(chkc,e,tp) end
if chkc then return false end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(c43841694.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp)
and Duel.IsExistingTarget(c43841694.filter2,tp,LOCATION_REMOVED,0,1,nil) end
......@@ -36,8 +36,9 @@ function c43841694.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
end
function c43841694.activate(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
local sg=g:Filter(Card.IsType,nil,TYPE_SPELL):Filter(Card.IsRelateToEffect,nil,e)
local sg=g:Filter(Card.IsRelateToEffect,nil,e)
local tc=e:GetLabelObject()
sg:RemoveCard(tc)
if tc:IsRelateToEffect(e) and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)>0 then
Duel.BreakEffect()
if sg:GetCount()>0 then
......
script/c44663232.lua
View file @ 15c3735f
--異怪の妖精 エルフォビア
function c44663232.initial_effect(c)
--xyz limit
--activate limit
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(44663232,0))
e2:SetType(EFFECT_TYPE_IGNITION)
......@@ -32,7 +32,6 @@ function c44663232.operation(e,tp,eg,ep,ev,re,r,rp)
e1:SetValue(c44663232.val)
Duel.RegisterEffect(e1,tp)
end
function c44663232.val(e,re,tp)
return re:IsActiveType(TYPE_MONSTER) and re:GetHandler():GetLevel()>e:GetLabel()
end
\ No newline at end of file
return re:IsActiveType(TYPE_MONSTER) and re:GetHandler():IsLevelAbove(e:GetLabel())
end
script/c49785720.lua 0 → 100644
View file @ 15c3735f
--機炎星－ゴヨウテ
function c49785720.initial_effect(c)
--special summon
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_SPSUMMON_PROC)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e1:SetRange(LOCATION_HAND)
e1:SetCondition(c49785720.spcon)
c:RegisterEffect(e1)
end
function c49785720.filter(c)
return c:IsSetCard(0x7c) and c:IsType(TYPE_SPELL+TYPE_TRAP)
end
function c49785720.spcon(e,c)
if c==nil then return true end
local tp=c:GetControler()
return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0,nil)==0
and Duel.IsExistingMatchingCard(c49785720.filter,tp,LOCATION_SZONE,0,1,nil)
end
script/c53670497.lua
View file @ 15c3735f
--Hieratic Seal From the Ashes
--復活の聖刻印
function c53670497.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
......
script/c56174248.lua
View file @ 15c3735f
--Prophecy Destroyer
--魔導鬼士 ディアール
function c56174248.initial_effect(c)
--special summon
local e1=Effect.CreateEffect(c)
......
script/c56321639.lua
View file @ 15c3735f
--Spellbook Star Hall
--魔導書廊エトワール
function c56321639.initial_effect(c)
c:EnableCounterPermit(0x3001)
--Activate
......
script/c57043117.lua
View file @ 15c3735f
--Giant Soldier of Steel
--鋼鉄の巨兵
function c57043117.initial_effect(c)
--xyz summon
aux.AddXyzProcedure(c,aux.XyzFilterFunctionF(c,aux.FilterBoolFunction(Card.IsRace,RACE_ROCK),3),2)
......
script/c58165765.lua
View file @ 15c3735f
--Red Dragon Ninja
--赤竜の忍者
function c58165765.initial_effect(c)
--todeck
local e1=Effect.CreateEffect(c)
......
script/c58712976.lua
View file @ 15c3735f
--Infernal Flame Vixen
--ヘルフレイムゴースト
function c58712976.initial_effect(c)
--xyz summon
aux.AddXyzProcedure(c,aux.XyzFilterFunctionF(c,aux.FilterBoolFunction(Card.IsRace,RACE_PYRO),4),2)
......
script/c59057152.lua
View file @ 15c3735f
--Noble Knight Medraut
--聖騎士モルドレッド
function c59057152.initial_effect(c)
--Attribute Dark
local e1=Effect.CreateEffect(c)
......
script/c59834564.lua
View file @ 15c3735f
--Bonfire Colossus
--嚇灼の魔神
function c59834564.initial_effect(c)
--special summon
local e1=Effect.CreateEffect(c)
......
script/c64514622.lua
View file @ 15c3735f
--Hieratic Seal of the Dragon King
--龍王の聖刻印
function c64514622.initial_effect(c)
aux.EnableDualAttribute(c)
--special summon
......
script/c64892035.lua
View file @ 15c3735f
--Tardy Orc
--遅すぎたオーク
function c64892035.initial_effect(c)
--cannot attack
local e1=Effect.CreateEffect(c)
......
script/c65367484.lua
View file @ 15c3735f
--サイバー·ドラゴン
--フォトン·スラッシャー
function c65367484.initial_effect(c)
c:EnableReviveLimit()
--special summon
......
script/c70946699.lua
View file @ 15c3735f
-- 炎虎梁山爆 function c70946699.initial_effect(c) --recover local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_RECOVER) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e1:SetCode(EVENT_FREE_CHAIN) e1:SetTarget(c70946699.target) e1:SetOperation(c70946699.operation) c:RegisterEffect(e1) --damage local e2=Effect.CreateEffect(c) e2:SetCategory(CATEGORY_DAMAGE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F) e2:SetCode(EVENT_TO_GRAVE) e2:SetCondition(c70946699.damcon) e2:SetTarget(c70946699.damtg) e2:SetOperation(c70946699.damop) c:RegisterEffect(e2) end function c70946699.target(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.IsExistingMatchingCard(c70946699.filter,tp,LOCATION_SZONE,0,1,nil) end Duel.SetTargetPlayer(tp) local rec=Duel.GetMatchingGroupCount(c70946699.filter,tp,LOCATION_SZONE,0,nil)*500 Duel.SetTargetParam(rec) Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,rec) end function c70946699.filter(c) return c:IsType(TYPE_CONTINUOUS) and c:IsFaceup() end function c70946699.operation(e,tp,eg,ep,ev,re,r,rp) local rec=Duel.GetMatchingGroupCount(c70946699.filter,tp,LOCATION_MZONE,0,nil)*500 local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM) Duel.Recover(p,d,REASON_EFFECT) end function c70946699.damcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsPreviousLocation(LOCATION_SZONE) and e:GetHandler():IsPreviousPosition(POS_FACEUP) and e:GetHandler():GetReasonPlayer()~=tp and e:GetHandler():GetPreviousControler()==tp end function c70946699.damtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetTargetPlayer(rp) local rec=Duel.GetMatchingGroupCount(c70946699.filter,tp,LOCATION_GRAVE,0,nil)*500 Duel.SetTargetParam(rec) Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,rp,500) end function c70946699.damop(e,tp,eg,ep,ev,re,r,rp) local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM) Duel.Damage(p,d,REASON_EFFECT) end
\ No newline at end of file
--炎虎梁山爆 function c70946699.initial_effect(c) --recover local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_RECOVER) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e1:SetCode(EVENT_FREE_CHAIN) e1:SetTarget(c70946699.target) e1:SetOperation(c70946699.operation) c:RegisterEffect(e1) --damage local e2=Effect.CreateEffect(c) e2:SetDescription(aux.Stringid(70946699,0)) e2:SetCategory(CATEGORY_DAMAGE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F) e2:SetCode(EVENT_TO_GRAVE) e2:SetCondition(c70946699.damcon) e2:SetTarget(c70946699.damtg) e2:SetOperation(c70946699.damop) c:RegisterEffect(e2) end function c70946699.target(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetTargetPlayer(tp) local rec=Duel.GetMatchingGroupCount(c70946699.filter,tp,LOCATION_ONFIELD,0,nil)*500 Duel.SetTargetParam(rec) Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,rec) end function c70946699.filter(c) return c:IsType(TYPE_CONTINUOUS) and c:IsFaceup() end function c70946699.operation(e,tp,eg,ep,ev,re,r,rp) if not e:GetHandler():IsRelateToEffect(e) then return end local rec=Duel.GetMatchingGroupCount(c70946699.filter,tp,LOCATION_ONFIELD,0,nil)*500 local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER) Duel.Recover(p,rec,REASON_EFFECT) end function c70946699.damcon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEUP) and c:IsReason(REASON_EFFECT) and c:GetReasonPlayer()~=tp and c:GetPreviousControler()==tp end function c70946699.damtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetTargetPlayer(1-tp) local dam=Duel.GetMatchingGroupCount(c70946699.filter,tp,LOCATION_GRAVE,0,nil)*500 Duel.SetTargetParam(dam) Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,500) end function c70946699.damop(e,tp,eg,ep,ev,re,r,rp) local dam=Duel.GetMatchingGroupCount(c70946699.filter,tp,LOCATION_GRAVE,0,nil)*500 local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER) Duel.Damage(p,dam,REASON_EFFECT) end
\ No newline at end of file
......
script/c71068247.lua
View file @ 15c3735f
......@@ -11,12 +11,12 @@ function c71068247.initial_effect(c)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EVENT_CHAINING)
e1:SetCondition(c71068247.condition1)
e1:SetCost(c71068247.cost1)
e1:SetTarget(c71068247.target1)
e1:SetOperation(c71068247.operation1)
e1:SetCondition(c71068247.condition)
e1:SetCost(c71068247.cost)
e1:SetTarget(c71068247.target)
e1:SetOperation(c71068247.operation)
c:RegisterEffect(e1)
--loose attack
--atkdown
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
......@@ -26,28 +26,26 @@ function c71068247.initial_effect(c)
e2:SetValue(-300)
c:RegisterEffect(e2)
end
function c71068247.condition1(e,tp,eg,ep,ev,re,r,rp,chk)
function c71068247.condition(e,tp,eg,ep,ev,re,r,rp,chk)
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED)
and re:IsHasType(EFFECT_TYPE_ACTIVATE) and Duel.IsChainNegatable(ev)
end
function c71068247.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
function c71068247.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,2,REASON_COST) end
e:GetHandler():RemoveOverlayCard(tp,2,2,REASON_COST)
end
function c71068247.target1(e,tp,eg,ep,ev,re,r,rp,chk)
function c71068247.target(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)
if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
end
end
function c71068247.operation1(e,tp,eg,ep,ev,re,r,rp)
function c71068247.operation(e,tp,eg,ep,ev,re,r,rp)
if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
Duel.Destroy(eg,REASON_EFFECT)
end
end
function c71068247.adcon(e)
return e:GetHandler():GetOverlayCount()==0
end
\ No newline at end of file
end
script/c7452945.lua
View file @ 15c3735f
--天命の聖剣
function c7452945‎.initial_effect(c)
c:SetUniqueOnField(1,0,7452945‎)
function c7452945.initial_effect(c)
c:SetUniqueOnField(1,0,7452945)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_EQUIP)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetTarget(c7452945‎.target)
e1:SetOperation(c7452945‎.operation)
e1:SetTarget(c7452945.target)
e1:SetOperation(c7452945.operation)
c:RegisterEffect(e1)
--cannot be destroyed
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_EQUIP)
e2:SetCode(EFFECT_DESTROY_REPLACE)
e2:SetTarget(c7452945‎.reptg)
e2:SetType(EFFECT_TYPE_EQUIP)
e2:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
e2:SetValue(c7452945.valcon)
e2:SetCountLimit(1)
c:RegisterEffect(e2)
--Equip limit
......@@ -22,84 +22,61 @@ function c7452945‎.initial_effect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_EQUIP_LIMIT)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e3:SetValue(c7452945‎.eqlimit)
e3:SetValue(c7452945.eqlimit)
c:RegisterEffect(e3)
--equip
local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(7452945,0))
e4:SetCategory(CATEGORY_EQUIP)
e4:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CHAIN_UNIQUE)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e4:SetCode(EVENT_TO_GRAVE)
e4:SetCondition(c7452945‎.eqcon)
e4:SetCost(c7452945‎.eqcost)
e4:SetTarget(c7452945‎.eqtg)
e4:SetOperation(c7452945‎.operation)
e4:SetCondition(c7452945.eqcon)
e4:SetCost(c7452945.eqcost)
e4:SetTarget(c7452945.eqtg)
e4:SetOperation(c7452945.operation)
c:RegisterEffect(e4)
end
function c7452945‎.eqlimit(e,c)
function c7452945.eqlimit(e,c)
return c:IsRace(RACE_WARRIOR)
end
function c7452945‎.eqfilter1(c)
function c7452945.eqfilter1(c)
return c:IsFaceup() and c:IsRace(RACE_WARRIOR)
end
function c7452945‎.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and c7452945‎.eqfilter1(chkc) end
if chk==0 then return Duel.IsExistingTarget(c7452945‎.eqfilter1,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
function c7452945.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and c7452945.eqfilter1(chkc) end
if chk==0 then return Duel.IsExistingTarget(c7452945.eqfilter1,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
Duel.SelectTarget(tp,c7452945‎.eqfilter1,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
Duel.SelectTarget(tp,c7452945.eqfilter1,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)
end
function c7452945‎.operation(e,tp,eg,ep,ev,re,r,rp)
function c7452945.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) and tc:IsFaceup() and c:CheckUniqueOnField(tp) then
Duel.Equip(tp,c,tc)
end
end
function c7452945‎.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
return true
end
function c7452945‎.atkcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c7452945‎.atkop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:GetFlagEffect(c7452945‎)==0 then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_EQUIP)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetValue(-200)
e1:SetReset(RESET_EVENT+0x1fe0000)
c:RegisterEffect(e1)
c:RegisterFlagEffect(c7452945‎,RESET_EVENT+0x1fe0000,0,0)
e:SetLabelObject(e1)
e:SetLabel(2)
else
local pe=e:GetLabelObject()
local ct=e:GetLabel()
e:SetLabel(ct+1)
pe:SetValue(ct*-200)
end
function c7452945.valcon(e,re,r,rp)
return bit.band(r,REASON_BATTLE+REASON_EFFECT)~=0
end
function c7452945‎.eqcon(e,tp,eg,ep,ev,re,r,rp)
function c7452945.eqcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEUP) and c:IsReason(REASON_DESTROY) and c:CheckUniqueOnField(tp)
end
function c7452945‎.eqcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,c7452945‎)==0 end
Duel.RegisterFlagEffect(tp,c7452945‎,RESET_PHASE+PHASE_END,0,1)
function c7452945.eqcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,c7452945)==0 end
Duel.RegisterFlagEffect(tp,c7452945,RESET_PHASE+PHASE_END,0,1)
end
function c7452945‎.eqfilter2(c)
function c7452945.eqfilter2(c)
return c:IsFaceup() and c:IsSetCard(0x107a) and c:IsRace(RACE_WARRIOR)
end
function c7452945‎.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c7452945‎.eqfilter2(chkc) end
function c7452945.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c7452945.eqfilter2(chkc) end
if chk==0 then return e:GetHandler():IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0
and Duel.IsExistingTarget(c7452945‎.eqfilter2,tp,LOCATION_MZONE,0,1,nil) end
and Duel.IsExistingTarget(c7452945.eqfilter2,tp,LOCATION_MZONE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
Duel.SelectTarget(tp,c7452945‎.eqfilter2,tp,LOCATION_MZONE,0,1,1,nil)
Duel.SelectTarget(tp,c7452945.eqfilter2,tp,LOCATION_MZONE,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)
end
script/c75180828.lua 0 → 100644
View file @ 15c3735f
--水精鱗－サルフアビス
function c75180828.initial_effect(c)
--special summon
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(75180828,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_HAND)
e1:SetCost(c75180828.spcost)
e1:SetTarget(c75180828.sptg)
e1:SetOperation(c75180828.spop)
c:RegisterEffect(e1)
--atkup & destroy
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(75180828,1))
e2:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetCondition(c75180828.descon)
e2:SetTarget(c75180828.destg)
e2:SetOperation(c75180828.desop)
c:RegisterEffect(e2)
--destroy
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(75180828,2))
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetCondition(c75180828.atkcon)
e3:SetCost(c75180828.atkcost)
e3:SetTarget(c75180828.atktg)
e3:SetOperation(c75180828.atkop)
c:RegisterEffect(e3)
end
function c75180828.cfilter(c)
return c:IsSetCard(0x74) and c:IsDiscardable() and c:IsAbleToGraveAsCost()
end
function c75180828.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c75180828.cfilter,tp,LOCATION_HAND,0,4,e:GetHandler()) end
Duel.DiscardHand(tp,c75180828.cfilter,4,4,REASON_COST+REASON_DISCARD,e:GetHandler())
end
function c75180828.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function c75180828.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
if c:IsRelateToEffect(e) then
Duel.SpecialSummon(c,1,tp,tp,false,false,POS_FACEUP)
end
end
function c75180828.descon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+1
end
function c75180828.descount(c)
return c:IsSetCard(0x74) and c:IsType(TYPE_MONSTER)
end
function c75180828.desfilter(c)
return c:IsDestructable()
end
function c75180828.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chkc then return chkc:IsControler(1-tp) and chkc:IsOnField() and c75180828.desfilter(chkc) end
if chk==0 then return true end
local ct=Duel.GetMatchingGroupCount(c75180828.descount,tp,LOCATION_GRAVE,0,nil)
if ct>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,c75180828.desfilter,tp,0,LOCATION_ONFIELD,1,ct,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
end
end
function c75180828.desop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsFaceup() and c:IsRelateToEffect(e) then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetValue(500)
e1:SetReset(RESET_EVENT+0x1ff0000)
c:RegisterEffect(e1)
end
local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
Duel.Destroy(g,REASON_EFFECT)
end
function c75180828.atkcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetCurrentPhase()==PHASE_MAIN1
end
function c75180828.rfilter(c)
return c:IsPosition(POS_FACEUP_ATTACK) and c:IsSetCard(0x74)
end
function c75180828.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckReleaseGroup(tp,c75180828.rfilter,1,e:GetHandler()) end
local g=Duel.SelectReleaseGroup(tp,c75180828.rfilter,1,1,e:GetHandler())
Duel.Release(g,REASON_COST)
end
function c75180828.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():GetFlagEffect(75180828)==0 end
end
function c75180828.atkop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and c:IsFaceup() then
--destroy
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(75180828,3))
e1:SetCategory(CATEGORY_DESTROY)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e1:SetCode(EVENT_BATTLE_START)
e1:SetTarget(c75180828.destg2)
e1:SetOperation(c75180828.desop2)
e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END,1)
c:RegisterEffect(e1)
c:RegisterFlagEffect(75180828,RESET_PHASE+PHASE_END,0,1)
end
end
function c75180828.destg2(e,tp,eg,ep,ev,re,r,rp,chk)
local d=Duel.GetAttackTarget()
if chk ==0 then return Duel.GetAttacker()==e:GetHandler() and d~=nil and d:IsDefencePos() end
Duel.SetOperationInfo(0,CATEGORY_DESTROY,d,1,0,0)
end
function c75180828.desop2(e,tp,eg,ep,ev,re,r,rp)
local d=Duel.GetAttackTarget()
if d~=nil and d:IsRelateToBattle() and d:IsDefencePos() then
Duel.Destroy(d,REASON_EFFECT)
end
end
script/c76224717.lua
View file @ 15c3735f
--Advance Zone
--アドバンス・ゾーン
function c76224717.initial_effect(c)
--activate
local e1=Effect.CreateEffect(c)
......
script/c76902476.lua 0 → 100644
View file @ 15c3735f
--幻獣機タートレーサー
function c76902476.initial_effect(c)
--level
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetRange(LOCATION_MZONE)
e1:SetCode(EFFECT_UPDATE_LEVEL)
e1:SetValue(c76902476.lvval)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetRange(LOCATION_MZONE)
e2:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
e2:SetCondition(c76902476.indcon)
e2:SetValue(1)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
c:RegisterEffect(e3)
--
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
e4:SetRange(LOCATION_MZONE)
e4:SetTargetRange(LOCATION_MZONE,0)
e4:SetTarget(c76902476.indtg)
e4:SetCountLimit(1)
e4:SetValue(c76902476.valcon)
c:RegisterEffect(e4)
end
function c76902476.lvval(e,c)
local tp=c:GetControler()
local lv=0
for i=0,4 do
local tc=Duel.GetFieldCard(tp,LOCATION_MZONE,i)
if tc and tc:IsCode(31533705) then lv=lv+tc:GetLevel() end
end
return lv
end
function c76902476.indcon(e)
return Duel.IsExistingMatchingCard(Card.IsType,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil,TYPE_TOKEN)
end
function c76902476.indtg(e,c)
return c:IsCode(31533705)
end
function c76902476.valcon(e,re,r,rp)
return bit.band(r,REASON_BATTLE)~=0
end
script/c82579942.lua
View file @ 15c3735f
--Lightray Madoor
--ライトレイ マドール
function c82579942.initial_effect(c)
--special summon
local e1=Effect.CreateEffect(c)
......
script/c83438826.lua
View file @ 15c3735f
--Noble Arms - Arfeudutyr
--聖剣アロンダイト
function c83438826.initial_effect(c)
c:SetUniqueOnField(1,0,83438826)
--Activate
......
script/c83715234.lua
View file @ 15c3735f
--Attack the Moon!
--ムーン・スクレイパー
function c83715234.initial_effect(c)
--activate
local e1=Effect.CreateEffect(c)
......@@ -11,7 +11,7 @@ function c83715234.initial_effect(c)
e2:SetCategory(CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_CHANGE_POS)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CHAIN_UNIQUE)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
e2:SetRange(LOCATION_SZONE)
e2:SetCountLimit(1)
e2:SetCondition(c83715234.descon)
......
script/c84117021.lua
View file @ 15c3735f
--Spell Wall
--魔力隔壁
function c84117021.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
......
script/c84650463.lua
View file @ 15c3735f
--Slushy
--フラッピィ
function c84650463.initial_effect(c)
--send to grave
local e1=Effect.CreateEffect(c)
......
script/c85239662.lua
View file @ 15c3735f
--Mystical Fairy Elfuria
--神秘の妖精 エルフィリア
function c85239662.initial_effect(c)
--xyz limit
local e2=Effect.CreateEffect(c)
......
script/c87347365.lua
View file @ 15c3735f
--Revival Golem
--リバイバルゴーレム
function c87347365.initial_effect(c)
--special summon
local e1=Effect.CreateEffect(c)
......
script/c90887783.lua
View file @ 15c3735f
--Draconnection
--竜の交感
function c90887783.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
......
script/c91903221.lua
View file @ 15c3735f
--Evoltile Elginero
--エヴォルド・エルギネル
function c91903221.initial_effect(c)
--draw & search
local e1=Effect.CreateEffect(c)
......
script/c95772051.lua
View file @ 15c3735f
--Ignoble Knight of Black Laundsallyn
--魔聖騎士ランスロット
function c95772051.initial_effect(c)
c:SetUniqueOnField(1,0,95772051)
--special summon
......
script/c96051150.lua
View file @ 15c3735f
--Hazy Flame Mantikor
--陽炎獣 メコレオス
function c96051150.initial_effect(c)
--cannot be target
local e1=Effect.CreateEffect(c)
......
script/c99064191.lua
View file @ 15c3735f
--Xyz Wrath
--エクシーズ・パニッシュ
function c99064191.initial_effect(c)
--Activate
local e1=Effect.CreateEffect(c)
......@@ -13,6 +13,7 @@ function c99064191.initial_effect(c)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetRange(LOCATION_SZONE)
e2:SetCode(EVENT_CHAINING)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
e2:SetCondition(c99064191.condition2)
e2:SetCost(c99064191.cost2)
e2:SetTarget(c99064191.target2)
......
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