Skip to content

no81cards
no81cards
Commit 2fe260fd authored by Nemo Ma's avatar Nemo Ma
Browse files
Options

0813 wd

parent e65e8990
Expand all Hide whitespace changes
Inline Side-by-side
Showing with 1057 additions and 103 deletions
expansions/lflist.conf
View file @ 2fe260fd
......@@ -75,6 +75,12 @@
10736541 0
11163044 0
11450000 0
11450900 0
11450901 0
11450902 0
11450903 0
11450904 0
11450905 0
11450998 0
11450999 0
11451000 0
......@@ -84,6 +90,7 @@
11451014 0
11451015 0
11451016 0
11451017 0
11451767 0
11513043 0
11513044 0
......@@ -493,6 +500,7 @@
60002083 0
60002084 0
60002192 0
60002302 0
60303246 0
60969917 0
61777317 0
......@@ -1161,6 +1169,7 @@
98920305 0
98920313 0
98920339 0
98920358 0
98920377 0
98920401 0
98920404 0
......@@ -1168,6 +1177,7 @@
98920488 0
98920489 0
98920490 0
98920594 0
98940000 0
98940001 0
98940004 0
......@@ -1183,6 +1193,7 @@
98940018 0
98940019 0
98940020 0
98940026 0
98940028 0
98940039 0
98940044 0
......@@ -1494,7 +1505,7 @@
30015045 0
30015080 0
30015100 0
#「深土」系列
#「深土」系列 - 沃亚森斯奥克斯 & 魔方
9310011 0
30013000 0
30013005 0
......@@ -1507,7 +1518,7 @@
30013040 0
30013045 0
30013080 0
#「荒神仪」系列
#「荒神仪」系列 - Justfish
14000240 0
14000241 0
14000242 0
......@@ -1527,7 +1538,7 @@
14000256 0
14000257 0
14000257 0
#「苍辉」系列
#「苍辉」系列 - ???
4877515 0
4877517 0
4877519 0
......@@ -1542,7 +1553,7 @@
4877545 0
4877549 0
4877553 0
#「异神」系列
#「异神」系列 - 沃亚森斯奥克斯
30005003 0
30005005 0
30005007 0
......@@ -1551,7 +1562,7 @@
30005040 0
30005045 0
30005000 0
#「乱色狂歌」系列
#「乱色狂歌」系列 - 竹子
60001129 0
60001130 0
60001131 0
......@@ -1568,7 +1579,7 @@
60001142 0
60001143 0
60001143 0
#「天花乱漫」系列
#「天花乱漫」系列 - Justfish
14001201 0
14001202 0
14001203 0
......@@ -1589,13 +1600,6 @@
14001218 0
14001219 0
14001220 0
#「真神」系列 - Derren
#91020010 0
#91020011 0
#91020012 0
#91020013 0
#91020014 0
#91020015 0
#「祭礼」系列 - 煌武院悠阳
3050 0
3051 0
......@@ -1711,6 +1715,21 @@
75147501 0
75147502 0
75147503 0
#「终诞」 - 廷达的信徒
15004450 0
15004453 0
15004456 0
15004459 0
15004461 0
15004463 0
15004466 0
15004469 0
15004471 0
15004472 0
15004476 0
15004479 0
15004491 0
15004493 0
#Tears are now in Japari Park Again!
572850 1
4928565 0
......@@ -1727,6 +1746,14 @@
60362066 0
74920585 0
77103950 1
#230813
10105560 0
14010001 0
33701402 0
67200787 0
79083105 0
67200561 1
82221058 1
#230806
9300018 0
10105555 0
......@@ -1754,7 +1781,6 @@
82209088 0
82209090 0
82209146 0
88880012 0
91010023 0
9911075 1
11799915 1
......@@ -2834,7 +2860,6 @@
99988029 0
99988038 0
15000108 1
14010001 2
#220605
10888915 0
10888918 0
......@@ -3607,7 +3632,6 @@
79029055 2
#210815
9330003 0
33701402 1
#210808
12524008 0
12524010 0
......
expansions/no42.cdb
View file @ 2fe260fd
No preview for this file type
expansions/pics/98920193.jpg
View replaced file @ e65e8990 View file @ 2fe260fd
expansions/pics/98920193.jpg

44.8 KB | W: | H:

expansions/pics/98920193.jpg

86.3 KB | W: | H:

expansions/pics/98920193.jpg
expansions/pics/98920193.jpg
expansions/pics/98920193.jpg
expansions/pics/98920193.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/script/c11450900.lua 0 → 100644
View file @ 2fe260fd
This diff is collapsed.
expansions/script/c11450998.lua
View file @ 2fe260fd
......@@ -88,24 +88,12 @@ function cm.imop(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_CHAIN_SOLVING)
e1:SetCondition(cm.flcon)
e1:SetOperation(cm.thop)
e1:SetReset(RESET_PHASE+PHASE_END)
if not Duel.SelectYesNo(1-tp,aux.Stringid(m,2)) then
e1:SetLabel(1)
end
Duel.RegisterEffect(e1,tp)
local e2=Effect.CreateEffect(e:GetHandler())
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(0x10000000+m)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetRange(LOCATION_GRAVE)
e2:SetTargetRange(1,0)
e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
e:GetHandler():RegisterEffect(e2)
end
function cm.flcon(e)
return Duel.GetFlagEffect(e:GetHandlerPlayer(),m)~=0
end
function cm.thop(e,tp,eg,ep,ev,re,r,rp)
if rp==1-tp and e:GetLabel()==1 then return end
......
expansions/script/c11451015.lua
View file @ 2fe260fd
......@@ -3,7 +3,7 @@ local cm,m=GetID()
function cm.initial_effect(c)
--link summon
c:EnableReviveLimit()
aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_PENDULUM),2,2)
aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_PENDULUM),1,2)
--psuedo Activate
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -17,7 +17,7 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_DESTROYED)
e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
--e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
e1:SetCondition(cm.condition)
e1:SetCost(cm.cost)
e1:SetTarget(cm.target)
......@@ -112,11 +112,11 @@ function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.DisableActionCheck(false)
dc:SetCardData(CARDDATA_TYPE,TYPE_TRAP)
res=dc:GetActivateEffect():IsActivatable(tp,true)
dc:SetCardData(CARDDATA_TYPE,TYPE_MONSTER+TYPE_PENDULUM+TYPE_EFFECT)
dc:SetCardData(CARDDATA_TYPE,TYPE_MONSTER+TYPE_LINK+TYPE_EFFECT)
else
res=(c:CheckActivateEffect(false,false,false)~=nil)
end
return res and Duel.CheckReleaseGroup(tp,cm.rfilter,2,nil) and Duel.CheckReleaseGroup(tp,cm.rfilter2,1,nil,tp,c)
return res and Duel.CheckReleaseGroup(tp,cm.rfilter,1,nil) and Duel.CheckReleaseGroup(tp,cm.rfilter2,1,nil,tp,c)
end
end
function cm.rfilter(c)
......@@ -129,7 +129,7 @@ function cm.fselect(g,tp,sc)
return g:IsExists(cm.rfilter2,1,nil,tp,sc)
end
function cm.thfilter(c)
return c:IsSetCard(0x5977) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
return c:IsType(TYPE_PENDULUM) and c:IsAbleToHand()
end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) end
......@@ -152,7 +152,7 @@ function cm.costop(e,tp,eg,ep,ev,re,r,rp)
local te=e:GetLabelObject()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
local g=Duel.GetReleaseGroup(tp):Filter(cm.rfilter,nil)
local sg=g:SelectSubGroup(tp,cm.fselect,false,2,2,tp,c)
local sg=g:SelectSubGroup(tp,cm.fselect,false,1,#g,tp,c)
Duel.Release(sg,REASON_COST)
Duel.BreakEffect()
Duel.MoveToField(c,tp,tp,LOCATION_MZONE,POS_FACEUP,false)
......
expansions/script/c11451017.lua 0 → 100644
View file @ 2fe260fd
--梦色魔女·星宵
local cm,m=GetID()
function cm.initial_effect(c)
--psuedo Activate
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_ACTIVATE)
e0:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e0)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOHAND)
e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(TIMINGS_CHECK_MONSTER)
--e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
e1:SetCost(cm.cost)
e1:SetTarget(cm.target)
e1:SetOperation(cm.activate)
c:RegisterEffect(e1)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_ACTIVATE_COST)
e3:SetRange(LOCATION_HAND+LOCATION_GRAVE)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e3:SetLabelObject(e1)
e3:SetTargetRange(1,0)
e3:SetTarget(cm.actarget)
e3:SetOperation(cm.costop)
c:RegisterEffect(e3)
--search
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_CHAINING)
e2:SetRange(LOCATION_MZONE)
e2:SetCondition(cm.spcon)
e2:SetCost(cm.spcost)
e2:SetTarget(cm.sptg)
e2:SetOperation(cm.spop)
c:RegisterEffect(e2)
if not cm.global_check then
cm.global_check=true
local _IsActiveType=Effect.IsActiveType
local _GetActiveType=Effect.GetActiveType
function Effect.GetActiveType(e)
local cost=e:GetCost()
if cost and cost==cm.cost then
return TYPE_TRAP
end
return _GetActiveType(e)
end
function Effect.IsActiveType(e,typ)
local typ2=e:GetActiveType()
return typ&typ2~=0
end
end
end
local KOISHI_CHECK=false
if Card.SetCardData then KOISHI_CHECK=true end
function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then
local res=true
if KOISHI_CHECK then
Duel.DisableActionCheck(true)
local dc=Duel.CreateToken(tp,m)
Duel.DisableActionCheck(false)
dc:SetCardData(CARDDATA_TYPE,TYPE_TRAP)
res=dc:GetActivateEffect():IsActivatable(tp,true)
dc:SetCardData(CARDDATA_TYPE,TYPE_MONSTER+TYPE_EFFECT)
else
res=(c:CheckActivateEffect(false,false,false)~=nil)
end
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
return res and ft>0
end
end
function cm.tdfilter(c)
return c:GetPreviousLocation()==LOCATION_EXTRA and c:IsAbleToHand()
end
function cm.spfilter(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetMZoneCount(tp)>0
end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(cm.tdfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) and c:GetFlagEffect(m)==0 end
local fid=c:GetFieldID()
c:RegisterFlagEffect(m,RESET_EVENT+0xc7a0000+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,fid,aux.Stringid(m,2))
local g=Duel.GetMatchingGroup(cm.tdfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local g2=Duel.GetMatchingGroup(cm.spfilter,tp,LOCATION_GRAVE,LOCATION_GRAVE,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g2,1,PLAYER_ALL,LOCATION_GRAVE)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,PLAYER_ALL,LOCATION_MZONE)
end
function cm.activate(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
local g=Duel.SelectMatchingCard(tp,cm.tdfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
local tc=g:GetFirst()
if tc and Duel.SendtoHand(tc,nil,REASON_EFFECT)>0 then
local g2=Duel.GetMatchingGroup(cm.spfilter,tp,LOCATION_GRAVE,LOCATION_GRAVE,nil,e,tp)
if #g2>0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
Duel.BreakEffect()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g2:Select(tp,1,1,nil)
Duel.SpecialSummon(sg:GetFirst(),0,tp,tp,false,false,POS_FACEUP)
end
end
end
function cm.actarget(e,te,tp)
return te:GetHandler()==e:GetHandler() and te==e:GetLabelObject()
end
function cm.costop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local te=e:GetLabelObject()
Duel.MoveToField(c,tp,tp,LOCATION_MZONE,POS_FACEUP,false)
c:CreateEffectRelation(te)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_ADD_TYPE)
e0:SetValue(TYPE_TRAP)
e0:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
c:RegisterEffect(e0,true)
local te2=te:Clone()
e:SetLabelObject(te2)
te:SetType(26)
c:RegisterEffect(te2,true)
local ev0=Duel.GetCurrentChain()+1
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetCode(EVENT_CHAIN_SOLVED)
e1:SetCountLimit(1)
e1:SetCondition(function(e,tp,eg,ep,ev,re,r,rp) return ev==ev0 end)
e1:SetOperation(cm.rsop)
e1:SetReset(RESET_CHAIN)
Duel.RegisterEffect(e1,tp)
local e2=e1:Clone()
e2:SetCode(EVENT_CHAIN_NEGATED)
Duel.RegisterEffect(e2,tp)
end
function cm.rsop(e,tp,eg,ep,ev,re,r,rp)
local rc=re:GetHandler()
if e:GetCode()==EVENT_CHAIN_SOLVED and rc:IsRelateToEffect(re) then
rc:SetStatus(STATUS_EFFECT_ENABLED,true)
rc:SetStatus(STATUS_LEAVE_CONFIRMED,false)
end
if e:GetCode()==EVENT_CHAIN_NEGATED and rc:IsRelateToEffect(re) and not (rc:IsOnField() and rc:IsFacedown()) then
rc:SetStatus(STATUS_ACTIVATE_DISABLED,true)
end
re:Reset()
end
function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
Debug.Message(re:IsActiveType(TYPE_TRAP) and re:IsHasType(EFFECT_TYPE_ACTIVATE))
return re:IsActiveType(TYPE_TRAP) and re:IsHasType(EFFECT_TYPE_ACTIVATE)
end
function cm.mvfilter(c,tp)
return c:IsControler(tp) or c:IsControlerCanBeChanged()
end
function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(cm.mvfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,tp) and Duel.GetLocationCount(tp,LOCATION_MZONE,PLAYER_NONE,0)>0 end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
local tc=Duel.SelectMatchingCard(tp,cm.mvfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil,tp):GetFirst()
if tc and tc:IsControler(tp) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOZONE)
local s=Duel.SelectDisableField(tp,1,LOCATION_MZONE,0,0)
local nseq=math.log(s,2)
Duel.MoveSequence(tc,nseq)
elseif tc then
Duel.GetControl(tc,tp)
end
end
function cm.d2hmatchfilter(c,cd)
return c:IsFaceup() and c:IsCode(cd)
end
function cm.thfilter2(c)
return c:IsFaceup() and c:IsType(TYPE_MONSTER)
end
function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter2,tp,LOCATION_EXTRA,0,1,nil) end
end
function cm.spop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(cm.thfilter2,tp,LOCATION_EXTRA,0,nil)
if #g>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local sg=g:Select(tp,1,1,nil)
if #sg>0 then
Duel.SendtoHand(sg,1-tp,REASON_EFFECT)
Duel.ShuffleHand(1-tp)
end
end
end
\ No newline at end of file
expansions/script/c11560317.lua
View file @ 2fe260fd
--焦热龙翼·德莱克
function c11560317.initial_effect(c)
--xyz summon
aux.AddXyzProcedure(c,c11560317.mfilter,8,2)
aux.AddXyzProcedure(c,nil,8,3)
aux.AddXyzProcedureLevelFree(c,c11560317.mfilter,nil,3,3)
c:EnableReviveLimit()
--redirect
......@@ -39,7 +39,17 @@ function c11560317.initial_effect(c)
e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST) end)
e3:SetTarget(c11560317.destg)
e3:SetOperation(c11560317.desop)
c:RegisterEffect(e3)
c:RegisterEffect(e3)
--nc
local e4=Effect.CreateEffect(c)
e4:SetCategory(CATEGORY_TOEXTRA)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e4:SetCode(EVENT_REMOVE)
e4:SetProperty(EFFECT_FLAG_DELAY)
e4:SetCost(c11560317.nccost)
e4:SetTarget(c11560317.nctg)
e4:SetOperation(c11560317.ncop)
c:RegisterEffect(e4)
if not c11560317.global_check then
c11560317.global_check=true
local ge1=Effect.CreateEffect(c)
......@@ -69,8 +79,8 @@ function c11560317.adestg(e,tp,eg,ep,ev,re,r,rp,chk)
local flag=Duel.GetFlagEffectLabel(tp,11560317)
if chk==0 then return flag and flag>=10 end
end
function c11560317.desfil(c)
return c:IsFaceup() and c:IsDefenseBelow(2400)
function c11560317.desfil(c,def)
return c:IsFaceup() and c:IsAttackBelow(def)
end
function c11560317.adesop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
......@@ -84,24 +94,16 @@ function c11560317.adesop(e,tp,eg,ep,ev,re,r,rp)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EFFECT_UPDATE_DEFENSE)
e2:SetValue(2400)
e2:SetValue(1600)
c:RegisterEffect(e2)
if Duel.IsExistingMatchingCard(c11560317.desfil,tp,0,LOCATION_MZONE,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(11560317,0)) then
local dc=Duel.SelectMatchingCard(tp,c11560317.desfil,tp,0,LOCATION_MZONE,1,1,nil):GetFirst()
if Duel.Destroy(dc,REASON_EFFECT)~=0 and c:IsRelateToEffect(e) then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_DEFENSE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(dc:GetDefense())
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
c:RegisterEffect(e1)
end
if Duel.IsExistingMatchingCard(c11560317.desfil,tp,0,LOCATION_MZONE,1,nil,c:GetDefense()) and Duel.SelectYesNo(tp,aux.Stringid(11560317,1)) then
local dc=Duel.SelectMatchingCard(tp,c11560317.desfil,tp,0,LOCATION_MZONE,1,1,nil,c:GetDefense()):GetFirst()
Duel.Destroy(dc,REASON_EFFECT)
end
end
end
function c11560317.xdesfil(c,def)
return c:IsFaceup() and c:IsDefenseBelow(def)
return c:IsFaceup() and c:IsAttackBelow(def)
end
function c11560317.destg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
......@@ -114,14 +116,51 @@ function c11560317.desop(e,tp,eg,ep,ev,re,r,rp)
local def=e:GetHandler():GetDefense()
local g=Duel.GetMatchingGroup(c11560317.xdesfil,tp,0,LOCATION_MZONE,nil,def)
if g:GetCount()>0 then
Duel.Destroy(g,REASON_EFFECT)
local flag=Duel.GetFlagEffectLabel(tp,11560317)
if flag and flag>=10 then
Duel.Damage(1-tp,2000,REASON_EFFECT)
end
Duel.Destroy(g,REASON_EFFECT)
--local flag=Duel.GetFlagEffectLabel(tp,11560317)
--if flag and flag>=10 then
-- Duel.Damage(1-tp,2000,REASON_EFFECT)
--end
end
end
function c11560317.nccost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToRemoveAsCost,tp,LOCATION_HAND,0,1,nil) end
local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemoveAsCost,tp,LOCATION_HAND,0,1,1,nil)
Duel.Remove(g,POS_FACEUP,REASON_COST)
end
function c11560317.nctg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToExtra() end
Duel.SetOperationInfo(0,CATEGORY_TOEXTRA,e:GetHandler(),1,0,0)
end
function c11560317.ncop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.SendtoDeck(c,nil,2,REASON_EFFECT)~=0 then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_UPDATE_DEFENSE)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(function(e,c)
return c:IsRace(RACE_DRAGON) end)
e1:SetValue(800)
Duel.RegisterEffect(e1,tp)
local g=Duel.GetMatchingGroup(function(c) return c:IsFaceup() and c:GetAttack()>0 end,tp,0,LOCATION_MZONE,nil)
if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(11560317,0)) then
Duel.BreakEffect()
local tc=g:RandomSelect(tp,1):GetFirst()
local pratk=tc:GetAttack()
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(-2400)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1)
if pratk~=0 and tc:GetAttack()==0 then
Duel.Destroy(tc,REASON_EFFECT)
end
end
end
end
......
expansions/script/c30000085.lua
View file @ 2fe260fd
--终焉邪魂 堕天的使徒 萨利丝
if not pcall(function() require("expansions/script/c30000100") end) then require("script/c30000100") end
local m,cm=rscf.DefineCard(30000085)
local m=30000085
local cm=_G["c"..m]
function cm.initial_effect(c)
local e1=rsef.I(c,{m,0},{1,m},"dr","ptg",LOCATION_HAND,nil,cm.drcost,cm.drtg,cm.drop)
local e2=rsef.STO(c,EVENT_REMOVE,{m,1},nil,"lv","de,dsp",nil,nil,rsop.target(cm.lvfilter,nil,LOCATION_MZONE),cm.lvop)
--Effect 1
local e02=Effect.CreateEffect(c)
e02:SetCategory(CATEGORY_DRAW)
e02:SetType(EFFECT_TYPE_IGNITION)
e02:SetRange(LOCATION_HAND)
e02:SetCountLimit(1,m)
e02:SetCost(cm.cost)
e02:SetTarget(cm.tg)
e02:SetOperation(cm.op)
c:RegisterEffect(e02)
--Effect 2
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetCode(EVENT_REMOVE)
e3:SetTarget(cm.lvtg)
e3:SetOperation(cm.lvop)
c:RegisterEffect(e3)
end
function cm.lvfilter(c)
return c:IsLevelAbove(1) and c:IsFaceup()
--Effect 1
function cm.cf(c)
return c:IsAbleToRemove() and c:IsAttribute(ATTRIBUTE_DARK)
end
function cm.lvop(e,tp)
rsop.SelectSolve(HINTMSG_SELF,tp,cm.lvfilter,tp,LOCATION_MZONE,0,1,1,nil,cm.lvfun,e)
function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local ec=e:GetHandler()
if chk==0 then return ec:IsAbleToRemove() and Duel.IsExistingMatchingCard(cm.cf,tp,LOCATION_HAND,0,1,ec) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectMatchingCard(tp,cm.cf,tp,LOCATION_HAND,0,1,1,ec)
g:AddCard(ec)
Duel.Remove(g,POS_FACEUP,REASON_COST)
end
function cm.lvfun(g,e)
local tp=e:GetHandlerPlayer()
local c,tc=e:GetHandler(),g:GetFirst()
rshint.Select(tp,HINGMSG_LVRANK)
local lv=Duel.AnnounceLevel(tp,1,8)
local clv=tc:GetLevel()
local op=rsop.SelectOption(tp,true,{m,2},clv>lv,{m,3})
local lv2=op==1 and lv or -lv
rscf.QuickBuff({c,tc},"lv+",lv2)
return true
end
function cm.cfilter(c,e)
return c:IsAbleToRemoveAsCost() and c:IsAttribute(ATTRIBUTE_DARK)
end
function cm.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsAbleToRemoveAsCost() and Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_HAND,0,1,c) end
rshint.Select(tp,"rm")
local rg=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_HAND,0,1,1,c)
rg:AddCard(c)
Duel.Remove(rg,POS_FACEUP,REASON_COST)
end
function cm.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
local ct=Duel.GetFieldGroupCount(tp,LOCATION_GRAVE,0)
local dct=ct==0 and 3 or 1
if chk==0 then return Duel.IsPlayerCanDraw(tp,dct) end
Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(1)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,dct)
if ct==0 then
e:SetLabel(100)
function cm.tg(e,tp,eg,ep,ev,re,r,rp,chk)
local ckg=Duel.GetMatchingGroup(nil,tp,LOCATION_GRAVE,0,nil)
if #ckg>0 then
if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(1)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
else
e:SetLabel(0)
end
if chk==0 then return Duel.IsPlayerCanDraw(tp,3) end
Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(3)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,3)
end
end
function cm.drop(e,tp)
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
if Duel.Draw(p,d,REASON_EFFECT)>0 and e:GetLabel()==100 then
function cm.op(e,tp,eg,ep,ev,re,r,rp)
local pc,ct=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Draw(pc,1,REASON_EFFECT)
if ct==3 then
Duel.BreakEffect()
Duel.Draw(p,2,REASON_EFFECT)
Duel.Draw(pc,2,REASON_EFFECT)
Duel.ShuffleHand(pc)
end
end
--Effect 2
function cm.lf(c)
return c:IsFaceup() and c:IsLevelAbove(1)
end
function cm.lvtg(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetMatchingGroup(cm.lf,tp,LOCATION_MZONE,0,nil)
if chk==0 then return #g>0 end
end
function cm.lvop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetMatchingGroup(cm.lf,tp,LOCATION_MZONE,0,nil)
if #g==0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
local tag=g:Select(tp,1,1,nil)
if #tag==0 then return end
Duel.HintSelection(tag)
local tc=tag:GetFirst()
local lv=tc:GetLevel()
Duel.Hint(HINT_SELECTMSG,tp,HINGMSG_LVRANK)
local cct=Duel.AnnounceLevel(tp,1,8)
local ct=cct
local opt=0
if cct>=lv then
opt=Duel.SelectOption(tp,aux.Stringid(m,1))
else
opt=Duel.SelectOption(tp,aux.Stringid(m,1),aux.Stringid(m,2))
end
if opt==1 then
ct=-cct
end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_LEVEL)
e1:SetValue(ct)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1)
end
\ No newline at end of file
expansions/script/c60002302.lua 0 → 100644
View file @ 2fe260fd
--辉神谕令
local m=60002302
local cm=_G["c"..m]
function cm.initial_effect(c)
--negate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_CHAINING)
e1:SetRange(LOCATION_DECK)
e1:SetCountLimit(1,m)
e1:SetCondition(cm.con)
e1:SetCost(cm.cost)
e1:SetOperation(cm.op0)
c:RegisterEffect(e1)
--negate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_SPSUMMON)
e1:SetRange(LOCATION_DECK)
e1:SetCountLimit(1,m)
e1:SetCondition(cm.con)
e1:SetCost(cm.cost)
e1:SetOperation(cm.op0)
c:RegisterEffect(e1)
--negate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_SUMMON)
e1:SetRange(LOCATION_DECK)
e1:SetCountLimit(1,m)
e1:SetCondition(cm.con)
e1:SetCost(cm.cost)
e1:SetOperation(cm.op0)
c:RegisterEffect(e1)
end
function cm.cpfilter(c)
return (c:IsType(TYPE_TRAP) or c:IsType(TYPE_SPELL))
and c:CheckActivateEffect(false,false,false)~=nil
end
function cm.con(e,c)
if c==nil then return true end
return Duel.IsExistingMatchingCard(cm.cpfilter,tp,LOCATION_DECK,0,1,nil)
end
function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
Duel.SendtoGrave(c,REASON_COST)
end
function cm.op0(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if Duel.GetFlagEffect(tp,m)==0 then
Duel.SendtoGrave(c,REASON_COST)
local g1=Duel.GetMatchingGroup(cm.cpfilter,tp,LOCATION_DECK,0,nil)
local gm1=g1:Select(tp,1,1,nil)
local e11=gm1:GetFirst():GetActivateEffect()
Duel.Activate(e11)
end
if Duel.GetFlagEffect(tp,m)~=0 then
Duel.Win(1-tp,WIN_REASON_DRAW_OF_FATE)
else
Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
end
end
expansions/script/c98920193.lua
View file @ 2fe260fd
......@@ -14,6 +14,9 @@ function c98920193.initial_effect(c)
local e3=e1:Clone()
e3:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
c:RegisterEffect(e3)
local e7=e1:Clone()
e7:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e7)
--atk/def
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
......@@ -63,7 +66,7 @@ function c98920193.tfop(e,tp,eg,ep,ev,re,r,rp)
e1:SetCondition(c98920193.rmcon)
e1:SetOperation(c98920193.rmop)
Duel.RegisterEffect(e1,tp)
end
end
end
function c98920193.rmcon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
......
expansions/script/c98920358.lua 0 → 100644
View file @ 2fe260fd
--还零龙 入魔乌洛波洛斯
local s,id,o=GetID()
function c98920358.initial_effect(c)
--xyz summon
aux.AddXyzProcedure(c,nil,5,2,c98920358.ovfilter,aux.Stringid(98920358,0))
c:EnableReviveLimit()
--spsummon success
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(id,0))
e1:SetCategory(CATEGORY_DISABLE+CATEGORY_ATKCHANGE)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCountLimit(1,id)
e1:SetCondition(s.descon)
e1:SetTarget(s.target)
e1:SetOperation(s.operation)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_MATERIAL_CHECK)
e2:SetValue(s.valcheck)
e2:SetLabelObject(e1)
c:RegisterEffect(e2)
--remove
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(98920358,0))
e3:SetCategory(CATEGORY_REMOVE)
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCode(EVENT_FREE_CHAIN)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1)
e3:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
e3:SetCost(c98920358.rmcost)
e3:SetTarget(c98920358.rmtg)
e3:SetOperation(c98920358.rmop)
c:RegisterEffect(e3)
end
function c98920358.ovfilter(c)
return c:IsFaceup() and c:IsSetCard(0xa) and c:IsType(TYPE_XYZ) and not c:IsCode(98920358)
end
function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,1,nil) end
local g=Duel.GetMatchingGroup(aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,nil)
Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,g:GetCount(),0,0)
end
function s.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsFacedown() or not c:IsRelateToEffect(e) or c:IsImmuneToEffect(e) or c:IsAttack(3350) then return end
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SET_ATTACK_FINAL)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
e1:SetValue(3350)
c:RegisterEffect(e1)
local g=Duel.GetMatchingGroup(aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,nil)
if #g==0 then return end
for tc in aux.Next(g) do
Duel.NegateRelatedChain(tc,RESET_TURN_SET)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_DISABLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EFFECT_DISABLE_EFFECT)
e2:SetValue(RESET_TURN_SET)
tc:RegisterEffect(e2)
end
Duel.AdjustInstantly(c)
end
function s.descon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ) and e:GetLabel()==1
end
function s.valcheck(e,c)
local g=c:GetMaterial()
if g:IsExists(Card.IsSetCard,1,nil,0xa) then
e:GetLabelObject():SetLabel(1)
else
e:GetLabelObject():SetLabel(0)
end
end
function c98920358.rmcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
end
function c98920358.rmfilter(c)
return c:IsType(TYPE_MONSTER) and c:IsAbleToRemove()
end
function c98920358.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_MZONE+LOCATION_GRAVE) and c98920358.rmfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c98920358.rmfilter,tp,0,LOCATION_MZONE+LOCATION_GRAVE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectTarget(tp,c98920358.rmfilter,tp,0,LOCATION_MZONE+LOCATION_GRAVE,1,1,nil)
if g:GetFirst():IsLocation(LOCATION_GRAVE) then
Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,1-tp,LOCATION_GRAVE)
else
Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
end
end
function c98920358.rmop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then
Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
end
end
\ No newline at end of file
expansions/script/c98920594.lua 0 → 100644
View file @ 2fe260fd
--抒情歌鸲-欢悦音乐鸫
function c98920594.initial_effect(c)
c:EnableReviveLimit()
aux.AddXyzProcedure(c,nil,1,2,nil,nil,99)
--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(c98920594.atkval)
c:RegisterEffect(e1)
--negate activate
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(98920594,0))
e2:SetCategory(CATEGORY_DISABLE+CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetRange(LOCATION_MZONE)
e2:SetCode(EVENT_CHAINING)
e2:SetCondition(c98920594.negcon)
e2:SetCost(c98920594.negcost)
e2:SetTarget(c98920594.negtg)
e2:SetOperation(c98920594.negop)
c:RegisterEffect(e2)
--material
local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(98920594,1))
e4:SetType(EFFECT_TYPE_IGNITION)
e4:SetRange(LOCATION_MZONE)
e4:SetCountLimit(1)
e4:SetCost(c98920594.cost)
e4:SetTarget(c98920594.mttg)
e4:SetOperation(c98920594.mtop)
c:RegisterEffect(e4)
end
function c98920594.atkval(e,c)
return c:GetOverlayCount()*500
end
function c98920594.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
end
function c98920594.mtfilter(c,e)
return c:IsRace(RACE_WINDBEAST) and c:IsCanOverlay()
end
function c98920594.mttg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsType(TYPE_XYZ)
and Duel.IsExistingMatchingCard(c98920594.mtfilter,tp,LOCATION_DECK,0,2,nil) end
end
function c98920594.mtop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) or c:IsFacedown() then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
local g=Duel.SelectMatchingCard(tp,c98920594.mtfilter,tp,LOCATION_DECK,0,2,2,nil,e)
if g:GetCount()>0 then
Duel.Overlay(c,g)
end
end
function c98920594.negcon(e,tp,eg,ep,ev,re,r,rp)
return ep~=tp
and re:IsActiveType(TYPE_TRAP+TYPE_SPELL) and Duel.IsChainDisablable(ev) and e:GetHandler():GetOverlayGroup():IsExists(Card.IsSetCard,1,nil,0xf7)
end
function c98920594.negcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
end
function c98920594.negtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_DISABLE,eg,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,re:GetHandler(),1,0,0)
end
function c98920594.negop(e,tp,eg,ep,ev,re,r,rp)
if Duel.NegateEffect(ev) and re:GetHandler():IsRelateToEffect(re) then
Duel.Destroy(eg,REASON_EFFECT)
end
end
\ No newline at end of file
expansions/script/c98940026.lua 0 → 100644
View file @ 2fe260fd
--珠泪哀歌族·罗蕾莱人鱼
function c98940026.initial_effect(c)
--link summon
c:EnableReviveLimit()
aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkRace,RACE_AQUA),2,2)
--tograve
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(98940026,0))
e1:SetCategory(CATEGORY_TOGRAVE)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCountLimit(1,98940026)
e1:SetTarget(c98940026.tgtg)
e1:SetOperation(c98940026.tgop)
c:RegisterEffect(e1)
--disable
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetRange(LOCATION_MZONE)
e2:SetCode(EFFECT_DISABLE)
e2:SetTargetRange(0,LOCATION_MZONE)
e2:SetTarget(c98940026.distg)
c:RegisterEffect(e2)
--discard deck
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(98940026,2))
e3:SetCategory(CATEGORY_DECKDES)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_TO_GRAVE)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetCountLimit(1,98941026)
e3:SetCondition(c98940026.discon)
e3:SetTarget(c98940026.distg1)
e3:SetOperation(c98940026.disop)
c:RegisterEffect(e3)
end
function c98940026.tgfilter(c)
return c:IsSetCard(0x181) and c:IsAbleToGrave()
end
function c98940026.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c98940026.tgfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
end
function c98940026.tgop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c98940026.tgfilter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoGrave(g,REASON_EFFECT)
end
end
function c98940026.distg(e,c)
local g=e:GetHandler():GetLinkedGroup():Filter(c98940026.ffilter,nil)
local atk=g:GetSum(Card.GetBaseAttack)
return c:IsAttackBelow(atk) and c:IsFaceup()
end
function c98940026.ffilter(c)
return c:IsType(TYPE_FUSION) and c:IsFaceup()
end
function c98940026.discon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsReason(REASON_EFFECT)
end
function c98940026.distg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDiscardDeck(tp,3) end
Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(3)
Duel.SetOperationInfo(0,CATEGORY_DECKDES,nil,0,tp,3)
end
function c98940026.disop(e,tp,eg,ep,ev,re,r,rp)
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.DiscardDeck(p,d,REASON_EFFECT)
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