Skip to content

no81cards
no81cards
Commit df3693ad authored by POLYMER's avatar POLYMER
Browse files
Options

fix

parent fb6bcc1f
Hide whitespace changes
Inline Side-by-side
Showing with 183 additions and 183 deletions
expansions/script/c28316050.lua
View file @ df3693ad
...@@ -62,7 +62,7 @@ function c28316050.thfilter(c) ...@@ -62,7 +62,7 @@ function c28316050.thfilter(c)
return c:IsSetCard(0x286,0x289) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() return c:IsSetCard(0x286,0x289) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
end end
function c28316050.dctg(e,tp,eg,ep,ev,re,r,rp,chk) function c28316050.dctg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil) and Duel.IsExistingMatchingCard(c28316050.thfilter,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToGrave,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,nil) and Duel.IsExistingMatchingCard(c28316050.thfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_DICE,nil,0,tp,1) Duel.SetOperationInfo(0,CATEGORY_DICE,nil,0,tp,1)
end end
function c28316050.dcop(e,tp,eg,ep,ev,re,r,rp) function c28316050.dcop(e,tp,eg,ep,ev,re,r,rp)
......
expansions/script/c28323723.lua
View file @ df3693ad
...@@ -66,10 +66,11 @@ function c28323723.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -66,10 +66,11 @@ function c28323723.thop(e,tp,eg,ep,ev,re,r,rp)
if Duel.SendtoHand(tg,nil,REASON_EFFECT)==0 then return end if Duel.SendtoHand(tg,nil,REASON_EFFECT)==0 then return end
Duel.ConfirmCards(1-tp,tg) Duel.ConfirmCards(1-tp,tg)
if tc:IsRelateToEffect(e) then Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT) end if tc:IsRelateToEffect(e) then Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT) end
local b1=Duel.IsExistingMatchingCard(c28323723.stfilter,tp,LOCATION_HAND,0,2,nil) and Duel.IsExistingMatchingCard(c28323723.ctfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,c) local b1,b2,b3,b4=false
local b2=Duel.IsExistingMatchingCard(c28323723.nofilter,tp,LOCATION_HAND,0,2,nil) and Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,nil) and Duel.IsExistingMatchingCard(c28323723.sefilter,tp,LOCATION_DECK,0,1,nil) if Duel.IsExistingMatchingCard(c28323723.stfilter,tp,LOCATION_HAND,0,2,nil) and Duel.IsExistingMatchingCard(c28323723.ctfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,c) then b1=true end
local b3=Duel.IsExistingMatchingCard(c28323723.shfilter,tp,LOCATION_HAND,0,2,nil) and Duel.IsExistingMatchingCard(c28323723.exfilter,tp,LOCATION_EXTRA,0,1,nil) if Duel.IsExistingMatchingCard(c28323723.nofilter,tp,LOCATION_HAND,0,2,nil) and Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,nil) and Duel.IsExistingMatchingCard(c28323723.sefilter,tp,LOCATION_DECK,0,1,nil) then b2=true end
local b4=Duel.IsExistingMatchingCard(c28323723.cofilter,tp,LOCATION_HAND,0,2,nil) and Duel.IsExistingMatchingCard(c28323723.rmfilter,tp,LOCATION_GRAVE,0,1,nil) if Duel.IsExistingMatchingCard(c28323723.shfilter,tp,LOCATION_HAND,0,2,nil) and Duel.IsExistingMatchingCard(c28323723.exfilter,tp,LOCATION_EXTRA,0,1,nil) then b3=true end
if Duel.IsExistingMatchingCard(c28323723.cofilter,tp,LOCATION_HAND,0,2,nil) and Duel.IsExistingMatchingCard(c28323723.rmfilter,tp,LOCATION_GRAVE,0,1,nil) then b4=true end
if not (b1 or b2 or b3 or b4) then return end if not (b1 or b2 or b3 or b4) then return end
local off=1 local off=1
local ops,opval={},{} local ops,opval={},{}
......
expansions/script/c28381214.lua
View file @ df3693ad
...@@ -59,10 +59,11 @@ function c28381214.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -59,10 +59,11 @@ function c28381214.thop(e,tp,eg,ep,ev,re,r,rp)
if Duel.SendtoHand(tg,nil,REASON_EFFECT)==0 then return end if Duel.SendtoHand(tg,nil,REASON_EFFECT)==0 then return end
Duel.ConfirmCards(1-tp,tg) Duel.ConfirmCards(1-tp,tg)
if tc:IsRelateToEffect(e) then Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT) end if tc:IsRelateToEffect(e) then Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT) end
local b1=Duel.IsExistingMatchingCard(c28381214.ilfilter,tp,LOCATION_HAND,0,2,nil) and Duel.IsExistingMatchingCard(c28381214.tgfilter,tp,LOCATION_DECK,0,1,nil) local b1,b2,b3,b4=false
local b2=Duel.IsExistingMatchingCard(c28381214.anfilter,tp,LOCATION_HAND,0,2,nil) if Duel.IsExistingMatchingCard(c28381214.ilfilter,tp,LOCATION_HAND,0,2,nil) and Duel.IsExistingMatchingCard(c28381214.tgfilter,tp,LOCATION_DECK,0,1,nil) then b1=true end
local b3=Duel.IsExistingMatchingCard(c28381214.hkfilter,tp,LOCATION_HAND,0,2,nil) and Duel.IsExistingMatchingCard(c28381214.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if Duel.IsExistingMatchingCard(c28381214.anfilter,tp,LOCATION_HAND,0,2,nil) then b2=true end
local b4=Duel.IsExistingMatchingCard(c28381214.alfilter,tp,LOCATION_HAND,0,2,nil) if Duel.IsExistingMatchingCard(c28381214.hkfilter,tp,LOCATION_HAND,0,2,nil) and Duel.IsExistingMatchingCard(c28381214.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then b3=true end
if Duel.IsExistingMatchingCard(c28381214.alfilter,tp,LOCATION_HAND,0,2,nil) then b4=true end
if not (b1 or b2 or b3 or b4) then return end if not (b1 or b2 or b3 or b4) then return end
local off=1 local off=1
local ops,opval={},{} local ops,opval={},{}
......
expansions/script/c53767011.lua
View file @ df3693ad
...@@ -63,7 +63,7 @@ function s.repcon(e) ...@@ -63,7 +63,7 @@ function s.repcon(e)
return e:GetHandler():GetFlagEffect(id)>0 return e:GetHandler():GetFlagEffect(id)>0
end end
function s.repfilter(c,tp,re) function s.repfilter(c,tp,re)
return c:IsLocation(LOCATION_MZONE) and c:IsControler(tp) and c:IsReason(REASON_COST) and re and re:IsActivated() and c==re:GetHandler() and not c:IsReason(REASON_REPLACE) return c:IsLocation(LOCATION_MZONE) and c:IsControler(tp) and c:IsReason(REASON_RELEASE) and re and re:IsActivated() and c==re:GetHandler() and not c:IsReason(REASON_REPLACE)
end end
function s.reptg(e,tp,eg,ep,ev,re,r,rp,chk) function s.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return eg:IsExists(s.repfilter,1,nil,tp,re) end if chk==0 then return eg:IsExists(s.repfilter,1,nil,tp,re) end
......
expansions/script/c60151903.lua
View file @ df3693ad
--线膛燧发枪 黎明之翼 --线膛燧发枪 黎明之翼
local m=60151903
local cm=_G["c"..m]
function cm.initial_effect(c) function cm.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--self destroy --self destroy
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
e1:SetRange(LOCATION_PZONE) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_SELF_DESTROY) e1:SetCode(EFFECT_SELF_DESTROY)
e1:SetCondition(c60151903.e1con) e1:SetCondition(c60151903.e1con)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --splimit
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE) e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetTargetRange(1,0) e2:SetTargetRange(1,0)
e2:SetTarget(c60151903.e2splimit) e2:SetTarget(c60151903.e2splimit)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--atk up --atk up
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetType(EFFECT_TYPE_FIELD)
e3:SetRange(LOCATION_PZONE) e3:SetRange(LOCATION_PZONE)
e3:SetCode(EFFECT_UPDATE_ATTACK) e3:SetCode(EFFECT_UPDATE_ATTACK)
e3:SetTargetRange(LOCATION_MZONE,0) e3:SetTargetRange(LOCATION_MZONE,0)
e3:SetTarget(aux.TargetBoolFunction(Card.IsCode,60151902)) e3:SetTarget(aux.TargetBoolFunction(Card.IsCode,60151902))
e3:SetValue(1000) e3:SetValue(1000)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--destroy --destroy
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e4:SetCode(EVENT_BATTLED) e4:SetCode(EVENT_BATTLED)
e4:SetRange(LOCATION_PZONE) e4:SetRange(LOCATION_PZONE)
e4:SetOperation(c60151903.e4op) e4:SetOperation(c60151903.e4op)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--to hand --to hand
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetDescription(aux.Stringid(60151903,0)) e5:SetDescription(aux.Stringid(60151903,0))
e5:SetCategory(CATEGORY_TOGRAVE+CATEGORY_RECOVER) e5:SetCategory(CATEGORY_TOGRAVE+CATEGORY_RECOVER)
e5:SetProperty(EFFECT_FLAG_NO_TURN_RESET) e5:SetProperty(EFFECT_FLAG_NO_TURN_RESET)
e5:SetType(EFFECT_TYPE_QUICK_O) e5:SetType(EFFECT_TYPE_QUICK_O)
e5:SetRange(LOCATION_PZONE) e5:SetRange(LOCATION_PZONE)
e5:SetCountLimit(1) e5:SetCountLimit(1)
e5:SetCode(EVENT_FREE_CHAIN) e5:SetCode(EVENT_FREE_CHAIN)
e5:SetTarget(c60151903.e5tg) e5:SetTarget(c60151903.e5tg)
e5:SetOperation(c60151903.e5op) e5:SetOperation(c60151903.e5op)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
function c60151903.e1confilter(c) function c60151903.e1confilter(c)
return c:IsCode(60151902) return c:IsCode(60151902)
end end
function c60151903.e1con(e) function c60151903.e1con(e)
return not Duel.IsExistingMatchingCard(c60151903.e1confilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil) return not Duel.IsExistingMatchingCard(c60151903.e1confilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
or e:GetHandler():GetLeftScale()==0 or e:GetHandler():GetLeftScale()==0
end end
function c60151903.e2splimit(e,c,tp,sumtp,sumpos) function c60151903.e2splimit(e,c,tp,sumtp,sumpos)
return bit.band(sumtp,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM return bit.band(sumtp,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM
end end
function c60151903.e4opcheck(c,tp) function c60151903.e4opcheck(c,tp)
return c and c:IsControler(tp) and c:IsCode(60151902) return c and c:IsControler(tp) and c:IsCode(60151902)
end end
function c60151903.e4op(e,tp,eg,ep,ev,re,r,rp) function c60151903.e4op(e,tp,eg,ep,ev,re,r,rp)
local tp=e:GetHandlerPlayer() local tp=e:GetHandlerPlayer()
if (c60151903.e4opcheck(Duel.GetAttacker(),tp) or c60151903.e4opcheck(Duel.GetAttackTarget(),tp)) then if (c60151903.e4opcheck(Duel.GetAttacker(),tp) or c60151903.e4opcheck(Duel.GetAttackTarget(),tp)) then
local c=e:GetHandler() local c=e:GetHandler()
if c:GetLeftScale()==0 then return end if c:GetLeftScale()==0 then return end
local scl=1 local scl=1
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_LSCALE) e1:SetCode(EFFECT_UPDATE_LSCALE)
e1:SetValue(-scl) e1:SetValue(-scl)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
local e2=e1:Clone() local e2=e1:Clone()
e2:SetCode(EFFECT_UPDATE_RSCALE) e2:SetCode(EFFECT_UPDATE_RSCALE)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
end end
function c60151903.e5tgfilter(c) function c60151903.e5tgfilter(c)
return c:IsFaceup() and c:IsAbleToGrave() return c:IsFaceup() and c:IsAbleToGrave()
end end
function c60151903.e5tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c60151903.e5tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return Duel.IsExistingMatchingCard(c60151903.e5tgfilter,tp,0,LOCATION_ONFIELD,1,nil) if chk==0 then return Duel.IsExistingMatchingCard(c60151903.e5tgfilter,tp,0,LOCATION_ONFIELD,1,nil)
and e:GetHandler():GetFlagEffect(60151901)~=0 end and e:GetHandler():GetFlagEffect(60151901)~=0 end
local g=Duel.GetMatchingGroup(c60151903.e5tgfilter,tp,0,LOCATION_ONFIELD,nil) local g=Duel.GetMatchingGroup(c60151903.e5tgfilter,tp,0,LOCATION_ONFIELD,nil)
Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,1000) Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,1000)
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,1,0,0)
e:GetHandler():RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(5043010,2)) e:GetHandler():RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(5043010,2))
end end
function c60151903.e5op(e,tp,eg,ep,ev,re,r,rp) function c60151903.e5op(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
if Duel.Recover(tp,1000,REASON_EFFECT) then if Duel.Recover(tp,1000,REASON_EFFECT) then
Duel.BreakEffect() Duel.BreakEffect()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c60151903.e5tgfilter,tp,0,LOCATION_ONFIELD,1,1,nil) local g=Duel.SelectMatchingCard(tp,c60151903.e5tgfilter,tp,0,LOCATION_ONFIELD,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.HintSelection(g) Duel.HintSelection(g)
Duel.SendtoGrave(g,REASON_EFFECT) Duel.SendtoGrave(g,REASON_EFFECT)
end end
end end
end end
\ No newline at end of file
expansions/script/c60151904.lua
View file @ df3693ad
...@@ -2,107 +2,107 @@ ...@@ -2,107 +2,107 @@
local m=60151904 local m=60151904
local cm=_G["c"..m] local cm=_G["c"..m]
function cm.initial_effect(c) function cm.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--self destroy --self destroy
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
e1:SetRange(LOCATION_PZONE) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_SELF_DESTROY) e1:SetCode(EFFECT_SELF_DESTROY)
e1:SetCondition(c60151904.e1con) e1:SetCondition(c60151904.e1con)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --splimit
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE) e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetTargetRange(1,0) e2:SetTargetRange(1,0)
e2:SetTarget(c60151904.e2splimit) e2:SetTarget(c60151904.e2splimit)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--atk up --atk up
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetType(EFFECT_TYPE_FIELD)
e3:SetRange(LOCATION_PZONE) e3:SetRange(LOCATION_PZONE)
e3:SetCode(EFFECT_UPDATE_ATTACK) e3:SetCode(EFFECT_UPDATE_ATTACK)
e3:SetTargetRange(LOCATION_MZONE,0) e3:SetTargetRange(LOCATION_MZONE,0)
e3:SetTarget(aux.TargetBoolFunction(Card.IsCode,60151902)) e3:SetTarget(aux.TargetBoolFunction(Card.IsCode,60151902))
e3:SetValue(1000) e3:SetValue(1000)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--destroy --destroy
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e4:SetCode(EVENT_BATTLED) e4:SetCode(EVENT_BATTLED)
e4:SetRange(LOCATION_PZONE) e4:SetRange(LOCATION_PZONE)
e4:SetOperation(c60151904.e4op) e4:SetOperation(c60151904.e4op)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--to hand --to hand
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetDescription(aux.Stringid(60151904,0)) e5:SetDescription(aux.Stringid(60151904,0))
e5:SetCategory(CATEGORY_TODECK+CATEGORY_RECOVER) e5:SetCategory(CATEGORY_TODECK+CATEGORY_RECOVER)
e5:SetProperty(EFFECT_FLAG_NO_TURN_RESET) e5:SetProperty(EFFECT_FLAG_NO_TURN_RESET)
e5:SetType(EFFECT_TYPE_QUICK_O) e5:SetType(EFFECT_TYPE_QUICK_O)
e5:SetRange(LOCATION_PZONE) e5:SetRange(LOCATION_PZONE)
e5:SetCountLimit(1) e5:SetCountLimit(1)
e5:SetCode(EVENT_FREE_CHAIN) e5:SetCode(EVENT_FREE_CHAIN)
e5:SetTarget(c60151904.e5tg) e5:SetTarget(c60151904.e5tg)
e5:SetOperation(c60151904.e5op) e5:SetOperation(c60151904.e5op)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
function c60151904.e1confilter(c) function c60151904.e1confilter(c)
return c:IsCode(60151902) return c:IsCode(60151902)
end end
function c60151904.e1con(e) function c60151904.e1con(e)
return not Duel.IsExistingMatchingCard(c60151904.e1confilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil) return not Duel.IsExistingMatchingCard(c60151904.e1confilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
or e:GetHandler():GetLeftScale()==0 or e:GetHandler():GetLeftScale()==0
end end
function c60151904.e2splimit(e,c,tp,sumtp,sumpos) function c60151904.e2splimit(e,c,tp,sumtp,sumpos)
return bit.band(sumtp,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM return bit.band(sumtp,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM
end end
function c60151904.e4opcheck(c,tp) function c60151904.e4opcheck(c,tp)
return c and c:IsControler(tp) and c:IsCode(60151902) return c and c:IsControler(tp) and c:IsCode(60151902)
end end
function c60151904.e4op(e,tp,eg,ep,ev,re,r,rp) function c60151904.e4op(e,tp,eg,ep,ev,re,r,rp)
local tp=e:GetHandlerPlayer() local tp=e:GetHandlerPlayer()
if (c60151904.e4opcheck(Duel.GetAttacker(),tp) or c60151904.e4opcheck(Duel.GetAttackTarget(),tp)) then if (c60151904.e4opcheck(Duel.GetAttacker(),tp) or c60151904.e4opcheck(Duel.GetAttackTarget(),tp)) then
local c=e:GetHandler() local c=e:GetHandler()
if c:GetLeftScale()==0 then return end if c:GetLeftScale()==0 then return end
local scl=1 local scl=1
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_LSCALE) e1:SetCode(EFFECT_UPDATE_LSCALE)
e1:SetValue(-scl) e1:SetValue(-scl)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
local e2=e1:Clone() local e2=e1:Clone()
e2:SetCode(EFFECT_UPDATE_RSCALE) e2:SetCode(EFFECT_UPDATE_RSCALE)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
end end
function c60151904.e5tgfilter(c) function c60151904.e5tgfilter(c)
return c:IsFacedown() and c:IsAbleToDeck() return c:IsFacedown() and c:IsAbleToDeck()
end end
function c60151904.e5tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c60151904.e5tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return Duel.IsExistingMatchingCard(c60151904.e5tgfilter,tp,0,LOCATION_ONFIELD,1,nil) if chk==0 then return Duel.IsExistingMatchingCard(c60151904.e5tgfilter,tp,0,LOCATION_ONFIELD,1,nil)
and e:GetHandler():GetFlagEffect(60151901)~=0 end and e:GetHandler():GetFlagEffect(60151901)~=0 end
local g=Duel.GetMatchingGroup(c60151904.e5tgfilter,tp,0,LOCATION_ONFIELD,nil) local g=Duel.GetMatchingGroup(c60151904.e5tgfilter,tp,0,LOCATION_ONFIELD,nil)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
e:GetHandler():RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(5043010,2)) e:GetHandler():RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(5043010,2))
end end
function c60151904.e5op(e,tp,eg,ep,ev,re,r,rp) function c60151904.e5op(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
local lp1=Duel.GetLP(1-tp) local lp1=Duel.GetLP(1-tp)
if lp1>=1000 then if lp1>=1000 then
Duel.SetLP(1-tp,lp1-1000) Duel.SetLP(1-tp,lp1-1000)
Duel.BreakEffect() Duel.BreakEffect()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local g=Duel.SelectMatchingCard(tp,c60151904.e5tgfilter,tp,0,LOCATION_ONFIELD,1,1,nil) local g=Duel.SelectMatchingCard(tp,c60151904.e5tgfilter,tp,0,LOCATION_ONFIELD,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.HintSelection(g) Duel.HintSelection(g)
Duel.SendtoDeck(g,nil,2,REASON_EFFECT) Duel.SendtoDeck(g,nil,2,REASON_EFFECT)
end end
else else
Duel.SetLP(1-tp,0) Duel.SetLP(1-tp,0)
end 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