Skip to content

no81cards
no81cards
Commit 23c438e0 authored by Nemo Ma's avatar Nemo Ma
Browse files
Options

upd

parent 376cd637
Hide whitespace changes
Inline Side-by-side
Showing with 80 additions and 307 deletions
expansions/lflist.conf
View file @ 23c438e0
......@@ -1213,7 +1213,6 @@
130006024 0
151194046 0
192746535 0
#Semi-Wild 1003
31409200 0
31409201 0
......@@ -1404,6 +1403,56 @@
14001218 0
14001219 0
14001220 0
#「真神」系列 - Derren
91020010 0
91020011 0
91020012 0
91020013 0
91020014 0
91020015 0
#「祭礼」系列 - 煌武院悠阳
3050 0
3051 0
3052 0
3053 0
3057 0
3060 0
3063 0
3066 0
3067 0
3068 0
3069 0
3071 0
3072 0
3073 0
3074 0
3075 0
3076 0
3077 0
3078 0
#230423
9990226 0
11560703 0
11560717 0
22070340 0
30005016 0
31400015 0
40008453 0
40008465 0
40009582 0
42620054 0
89990016 0
91010013 0
91010021 0
40008455 1
40008475 1
25800105 1
29083691 1
79029065 1
82224073 1
82204209 1
82204224 1
99990002 1
#230416
53797001 0
98920195 0
......@@ -1442,7 +1491,6 @@
82204201 1
9910186 2
9990219 2
9990226 2
22348004 2
31000011 2
31000013 2
......@@ -1473,7 +1521,6 @@
22348079 0
40010639 0
57630550 0
60000008 0
60000090 0
83000087 0
98920042 0
......@@ -2174,7 +2221,6 @@
22348230 0
25000089 0
33701394 0
82224073 0
20000454 1
40008670 1
#220904
......@@ -2954,7 +3000,6 @@
55100001 0
60150616 0
60150624 0
82204209 0
82221049 0
82221064 0
88990241 0
......@@ -3383,7 +3428,6 @@
30000075 0
30000430 0
30000470 0
40009199 0
65010583 0
79029127 0
79029423 0
......@@ -3397,7 +3441,6 @@
130006011 0
#14010035 1
30000510 1
40009190 1
130006010 1
#210131
14010116 0
......@@ -5236,7 +5279,6 @@
9981587 0
9981596 0
9981637 0
65010046 0
65010102 0
65010328 0
9951073 0
......@@ -5612,6 +5654,8 @@
67200710 0
44910027 0
60009999 0
14000706 0
53587967 0
!THE WILDEST LIST
#forbidden
44910027 0
......
expansions/no42.cdb
View file @ 23c438e0
No preview for this file type
expansions/no81.cdb
View file @ 23c438e0
No preview for this file type
expansions/script/c11560715.lua deleted 100644 → 0
View file @ 376cd637
--星海航线 逐界苍星
function c11560715.initial_effect(c)
--xyz summon
c:EnableReviveLimit()
aux.AddXyzProcedureLevelFree(c,c11560715.mfilter,c11560715.xyzcheck,2,2)
--ov
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_CHAINING)
e1:SetProperty(EFFECT_FLAG_NO_TURN_RESET)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1,11560715)
e1:SetCondition(c11560715.ovcon)
e1:SetTarget(c11560715.ovtg)
e1:SetOperation(c11560715.ovop)
c:RegisterEffect(e1)
--xx
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,21560715)
e2:SetTarget(c11560715.xxtg)
e2:SetOperation(c11560715.xxop)
c:RegisterEffect(e2)
--
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
e3:SetRange(LOCATION_MZONE)
e3:SetValue(1)
e3:SetCondition(function(e)
return e:GetHandler():GetOverlayCount()>0 end)
c:RegisterEffect(e3)
end
c11560715.SetCard_SR_Saier=true
function c11560715.mfilter(c,xyzc)
return c:IsXyzType(TYPE_XYZ)
end
function c11560715.xyzcheck(g)
return g:GetClassCount(Card.GetRank)==1
end
function c11560715.ovcon(e,tp,eg,ep,ev,re,r,rp)
return rp==1-tp
end
function c11560715.ovtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return re:GetHandler():IsCanOverlay() end
end
function c11560715.ovop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local rc=re:GetHandler()
if c:IsRelateToEffect(e) and rc:IsRelateToEffect(re) then
rc:CancelToGrave()
Duel.Overlay(c,rc)
c:SetHint(CHINT_CARD,rc:GetOriginalCodeRule())
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_CANNOT_ACTIVATE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetRange(LOCATION_MZONE)
e2:SetTargetRange(0,1)
e2:SetLabelObject(rc)
e2:SetValue(function(e,re,tp)
local rc=e:GetLabelObject()
return rc and re:GetHandler():IsOriginalCodeRule(rc:GetCode()) end)
c:RegisterEffect(e2)
end
end
function c11560715.xxtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_EFFECT) end
end
function c11560715.xxop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and c:CheckRemoveOverlayCard(tp,1,REASON_EFFECT) then
local og=c:GetOverlayGroup()
local tc=og:Select(tp,1,1,nil):GetFirst()
Duel.SendtoGrave(tc,REASON_EFFECT)
if tc:IsType(TYPE_MONSTER) then
local code=tc:GetOriginalCodeRule()
local cid=0
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetValue(code)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
c:RegisterEffect(e1)
if not tc:IsType(TYPE_TRAPMONSTER) then
cid=c:CopyEffect(code,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,1)
end
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(tc:GetBaseAttack()/2)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END)
c:RegisterEffect(e1)
elseif tc:IsType(TYPE_SPELL+TYPE_TRAP) then
local te,ceg,cep,cev,cre,cr,crp=tc:CheckActivateEffect(false,true,true)
if te then
local tg=te:GetTarget()
if tg then tg(e,tp,ceg,cep,cev,cre,cr,crp,1) end
local op=te:GetOperation()
if op then op(e,tp,eg,ep,ev,re,r,rp) end
if Duel.IsExistingMatchingCard(Card.IsCanOverlay,tp,LOCATION_MZONE,LOCATION_MZONE,1,c) and c:IsRelateToEffect(e) and Duel.SelectYesNo(tp,aux.Stringid(11560715,0)) then
local oc=Duel.SelectMatchingCard(tp,Card.IsCanOverlay,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,c):GetFirst()
Duel.Overlay(c,oc)
end
end
end
end
end
expansions/script/c25000065.lua
View file @ 23c438e0
......@@ -28,7 +28,7 @@ function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
end
function cm.costfilter(c,e,tp)
return c:IsAttack(2400) and c:IsDefense(1000) and (c:IsControler(tp) or c:IsFaceup()) and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp,c:GetCode())
return c:IsAttack(2400) and c:IsDefense(1000) and c:IsControler(tp) and c:IsLocation(LOCATION_HAND) and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp,c:GetCode())
end
function cm.spfilter(c,e,tp,code)
return c:IsAttack(2400) and c:IsDefense(1000) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and not c:IsCode(code)
......
expansions/script/c29051251.lua
View file @ 23c438e0
......@@ -16,13 +16,16 @@ function cm.initial_effect(c)
e2:SetRange(LOCATION_MZONE)
e2:SetTargetRange(0,LOCATION_MZONE)
e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetTarget(aux.TargetBoolFunction(Card.IsDefenseAbove,2000))
e2:SetTarget(c29051251.tgtg)
e2:SetValue(-500)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EFFECT_UPDATE_DEFENSE)
c:RegisterEffect(e3)
end
function c29051251.tgtg(e,c)
return e:GetHandler():GetLinkedGroup():IsContains(c)
end
--e0
function cm.linkf(c)
return (c:IsLinkSetCard(0x87af) or (c:IsSetCard(0x87af) or (_G["c"..c:GetCode()] and _G["c"..c:GetCode()].named_with_Arknight))) and c:IsLinkAttribute(ATTRIBUTE_LIGHT) and not c:IsLinkType(TYPE_LINK)
......@@ -32,9 +35,15 @@ function cm.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>4 end
end
function cm.op1(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)<=4 then return end
local ct=5
Duel.ConfirmDecktop(tp,5)
local opt=Duel.SelectOption(tp,aux.Stringid(57261568,1),aux.Stringid(57261568,2))
Duel.SortDecktop(tp,tp,5)
end
--e2
function cm.tg2(e,c)
e:GetHandler():GetLinkedGroup():IsContains(c)
if opt==1 then
for i=1,ct do
local mg=Duel.GetDecktopGroup(tp,1)
Duel.MoveSequence(mg:GetFirst(),SEQ_DECKBOTTOM)
end
end
end
\ No newline at end of file
expansions/script/c29081673.lua
View file @ 23c438e0
......@@ -52,6 +52,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
mg1:Merge(mg2)
if Duel.IsExistingMatchingCard(cm.RitualUltimateFilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,cm.filter,e,tp,mg1,nil,Card.GetLevel,"Greater") and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
Duel.BreakEffect()
Duel.DisableShuffleCheck()
::cancel::
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.RitualUltimateFilter),tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,cm.filter,e,tp,mg1,nil,Card.GetLevel,"Greater")
......
expansions/script/c42620054.lua
View file @ 23c438e0
......@@ -67,34 +67,34 @@ function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsLocation(0x08)
end
function cm.tgsfilter(c,e,tp,tc)
return c:IsSetCard(0x12b) and Duel.GetLocationCount(tp,0x04)>0 and c:IsType(0x01) and (cm.tgsfilter1(c,e,tp) or cm.tgsfilter2(c,e,tp,tc))
function cm.tgsfilter(c,e,tp)
return c:IsSetCard(0x12b) and Duel.GetLocationCount(tp,0x04)>0 and c:IsType(0x01) and (cm.tgsfilter1(c,e,tp) or cm.tgsfilter2(c,tp))
end
function cm.tgsfilter1(c,e,tp)
return not c:IsType(TYPE_LINK) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function cm.tgsfilter2(c,e,tp,tc)
function cm.tgsfilter2(c,tp)
return Duel.IsPlayerCanSpecialSummonMonster(tp,m,0x12b,TYPES_EFFECT_TRAP_MONSTER,0,0,4,RACE_CYBERSE,ATTRIBUTE_WATER) and c:IsAbleToHand()
end
function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler()
if chkc then return chkc:IsLocation(0x10) and chkc:IsControler(tp) and cm.tgsfilter(chkc,e,tp,c) end
if chk==0 then return Duel.IsExistingTarget(cm.tgsfilter,tp,0x10,0,1,nil,e,tp,c) end
if chkc then return chkc:IsLocation(0x10) and chkc:IsControler(tp) and cm.tgsfilter(chkc,e,tp) end
if chk==0 then return Duel.IsExistingTarget(cm.tgsfilter,tp,0x10,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
local g=Duel.SelectTarget(tp,cm.tgsfilter,tp,0x10,0,1,1,nil,e,tp,c)
local g=Duel.SelectTarget(tp,cm.tgsfilter,tp,0x10,0,1,1,nil,e,tp)
local tc=g:GetFirst()
if cm.tgsfilter1(tc,e,tp) and cm.tgsfilter2(tc,e,tp,c) then
g:Merge(c)
if cm.tgsfilter1(tc,e,tp) and cm.tgsfilter2(tc,tp) then
g:AddCard(c)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,nil,nil)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,tc,1,nil,nil)
Duel.SetOperationInfo(0,CATEGORY_EQUIP,nil,1,tp,0x16)
elseif cm.tgsfilter1(tc,e,tp) then
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,tc,1,nil,nil)
Duel.SetOperationInfo(0,CATEGORY_EQUIP,nil,1,tp,0x16)
elseif cm.tgsfilter2(tc,e,tp,c) then
elseif cm.tgsfilter2(tc,tp) then
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,nil,nil)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,tc,1,nil,nil)
end
......@@ -113,7 +113,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
local c=e:GetHandler()
if tc:IsRelateToEffect(e) and c:IsRelateToEffect(e) then
if cm.tgsfilter1(tc,e,tp) and ((not (c:IsFaceup() and cm.tgsfilter2(tc,e,tp,c))) or Duel.SelectOption(tp,aux.Stringid(m,0),aux.Stringid(m,1))==0) and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP) then
if cm.tgsfilter1(tc,e,tp) and ((not (c:IsFaceup() and cm.tgsfilter2(tc,tp))) or Duel.SelectOption(tp,aux.Stringid(m,0),aux.Stringid(m,1))==0) and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP) then
Duel.BreakEffect()
local g=Duel.GetMatchingGroup(cm.opstgfilter,tp,0x04,0,nil)
local qg=Duel.GetMatchingGroup(cm.opseqfilter,tp,0x16,0,nil)
......@@ -132,7 +132,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
qc:RegisterEffect(e1)
end
elseif c:IsFaceup() and cm.tgsfilter2(tc,e,tp,c) then
elseif c:IsFaceup() and cm.tgsfilter2(tc,tp) then
c:AddMonsterAttribute(TYPE_EFFECT)
if Duel.SpecialSummon(c,0,tp,tp,true,false,POS_FACEUP) and Duel.SendtoHand(tc,nil,REASON_EFFECT) and tc:IsLocation(0x02) then
Duel.ConfirmCards(1-tp,tc)
......
expansions/script/c53799172.lua deleted 100644 → 0
View file @ 376cd637
local m=53799172
local cm=_G["c"..m]
cm.name="雷刻之都 维蓝夫德"
function cm.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,0))
e2:SetCategory(CATEGORY_TOGRAVE)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_FZONE)
e2:SetCountLimit(1,m)
e2:SetCost(cm.tgcost)
e2:SetTarget(cm.tgtg)
e2:SetOperation(cm.tgop)
c:RegisterEffect(e2)
Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,1))
e3:SetCategory(CATEGORY_TOHAND)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetRange(LOCATION_FZONE)
e3:SetCountLimit(1,m+500)
e3:SetCondition(cm.thcon)
e3:SetTarget(cm.thtg)
e3:SetOperation(cm.thop)
c:RegisterEffect(e3)
end
function cm.counterfilter(c)
return c:IsAttribute(ATTRIBUTE_WATER)
end
function cm.cfilter(c)
return c:IsAttribute(ATTRIBUTE_WATER) and c:IsAbleToGraveAsCost()
end
function cm.tgcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_HAND,0,1,nil) and Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
Duel.DiscardHand(tp,cm.cfilter,1,1,REASON_COST)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetTarget(cm.splimit)
e1:SetTargetRange(1,0)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
return not c:IsAttribute(ATTRIBUTE_WATER)
end
function cm.tgfilter(c,tp)
return c:IsAttribute(ATTRIBUTE_WATER) and not Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,c:GetCode()) and c:IsAbleToGrave()
end
function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.tgfilter,tp,LOCATION_DECK,0,1,nil,tp) end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
end
function cm.tgop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,cm.tgfilter,tp,LOCATION_DECK,0,1,1,nil,tp)
if g:GetCount()>0 then
Duel.SendtoGrave(g,REASON_EFFECT)
end
end
function cm.cfilter2(c,tp)
return c:IsLink(2) and c:IsAttribute(ATTRIBUTE_WATER) and c:IsControler(tp)
end
function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(cm.cfilter2,1,nil,tp)
end
function cm.thfilter(c)
return c:IsType(TYPE_MONSTER) and c:IsAttribute(ATTRIBUTE_WATER) and c:IsAbleToHand()
end
function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and cm.thfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(cm.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectTarget(tp,cm.thfilter,tp,LOCATION_GRAVE,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
end
function cm.thop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then
Duel.SendtoHand(tc,nil,REASON_EFFECT)
end
end
expansions/script/c98920148.lua
View file @ 23c438e0
......@@ -28,7 +28,7 @@ function c98920148.initial_effect(c)
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e4:SetCode(EVENT_PHASE+PHASE_END)
e4:SetRange(LOCATION_HAND)
e4:SetCountLimit(1,20003028)
e4:SetCountLimit(1,98930148)
e4:SetCondition(c98920148.spcon)
e4:SetTarget(c98920148.sptg)
e4:SetOperation(c98920148.spop)
......
expansions/script/c99990004.lua deleted 100644 → 0
View file @ 376cd637
--肆世坏的归刃
function c99990004.initial_effect(c)
aux.AddCodeList(c,56099748)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_NEGATE+CATEGORY_REMOVE)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_CHAINING)
e1:SetCountLimit(1,99990004)
e1:SetCondition(c99990004.condition)
e1:SetTarget(aux.nbtg)
e1:SetOperation(c99990004.activate)
c:RegisterEffect(e1)
--to grave
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(99990004,0))
e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_TOHAND+CATEGORY_GRAVE_ACTION)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_GRAVE)
e2:SetCountLimit(1,99990004)
e2:SetHintTiming(0,TIMING_END_PHASE)
e2:SetCost(aux.bfgcost)
e2:SetTarget(c99990004.tgtg)
e2:SetOperation(c99990004.tgop)
c:RegisterEffect(e2)
--act in hand
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_TRAP_ACT_IN_HAND)
e3:SetCondition(c99990004.handcon)
c:RegisterEffect(e3)
end
function c99990004.hcfilter(c)
return c:IsCode(56099748) and c:IsFaceup()
end
function c99990004.handcon(e)
return Duel.IsExistingMatchingCard(c99990004.hcfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
end
function c99990004.cfilter(c)
return c:IsFaceup() and c:IsSetCard(0x17a) and c:IsType(TYPE_LINK)
end
function c99990004.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c99990004.cfilter,tp,LOCATION_MZONE,0,1,nil)
and Duel.IsChainNegatable(ev) and (re:IsActiveType(TYPE_MONSTER) or re:IsHasType(EFFECT_TYPE_ACTIVATE))
end
function c99990004.activate(e,tp,eg,ep,ev,re,r,rp)
if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
Duel.Remove(eg,POS_FACEUP,REASON_EFFECT)
end
end
function c99990004.tgfilter(c)
return c:IsSetCard(0x17a) and c:IsType(TYPE_MONSTER+TYPE_SPELL+TYPE_TRAP) and c:IsAbleToGrave()
end
function c99990004.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c99990004.tgfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
end
function c99990004.thfilter(c)
return c:IsSetCard(0x17a) and c:IsType(TYPE_MONSTER+TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand()
end
function c99990004.tgop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c99990004.tgfilter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 and Duel.SendtoGrave(g,REASON_EFFECT)~=0 and g:GetFirst():IsLocation(LOCATION_GRAVE) then
local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(c99990004.thfilter),tp,LOCATION_GRAVE,0,nil)
if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(99990004,1)) then
Duel.BreakEffect()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local sg=g:Select(tp,1,1,nil)
Duel.SendtoHand(sg,nil,REASON_EFFECT)
end
end
end
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