Skip to content

Y
ygopro-2pick
Commit c09b4b74 authored by Momobako's avatar Momobako
Browse files
Options

Push by Appveyor

parent 21d0f0a3
Show whitespace changes
Inline Side-by-side
Showing with 389 additions and 346 deletions
expansions/script/c10901003.lua
View file @ c09b4b74
...@@ -41,6 +41,7 @@ function cm.initial_effect(c) ...@@ -41,6 +41,7 @@ function cm.initial_effect(c)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY) e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e2:SetCode(EVENT_SUMMON_SUCCESS) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetRange(LOCATION_SZONE) e2:SetRange(LOCATION_SZONE)
e2:SetCondition(cm.searcon)
e2:SetCountLimit(1,m) e2:SetCountLimit(1,m)
e2:SetTarget(cm.target) e2:SetTarget(cm.target)
e2:SetOperation(cm.operation) e2:SetOperation(cm.operation)
...@@ -88,6 +89,12 @@ function cm.indct(e,re,r,rp) ...@@ -88,6 +89,12 @@ function cm.indct(e,re,r,rp)
return 1 return 1
else return 0 end else return 0 end
end end
function cm.srfilter(c,tp)
return c:IsFaceup() and c:IsSetCard(0x234)
end
function cm.searcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(cm.srfilter,1,nil)
end
function cm.filter(c) function cm.filter(c)
return c:IsSetCard(0x234) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() return c:IsSetCard(0x234) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
end end
......
expansions/script/c10901008.lua
View file @ c09b4b74
...@@ -52,6 +52,7 @@ function cm.initial_effect(c) ...@@ -52,6 +52,7 @@ function cm.initial_effect(c)
e2:SetCode(EVENT_SUMMON_SUCCESS) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetRange(LOCATION_SZONE) e2:SetRange(LOCATION_SZONE)
e2:SetCountLimit(1) e2:SetCountLimit(1)
e2:SetCondition(cm.searcon)
e2:SetTarget(cm.target) e2:SetTarget(cm.target)
e2:SetOperation(cm.operation) e2:SetOperation(cm.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
...@@ -111,6 +112,12 @@ function cm.desop(e,tp,eg,ep,ev,re,r,rp) ...@@ -111,6 +112,12 @@ function cm.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.SendtoGrave(sg,REASON_EFFECT) Duel.SendtoGrave(sg,REASON_EFFECT)
end end
end end
function cm.srfilter(c,tp)
return c:IsFaceup() and c:IsSetCard(0x234)
end
function cm.searcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(cm.srfilter,1,nil)
end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return false end if chkc then return false end
if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_ONFIELD,0,1,nil) if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_ONFIELD,0,1,nil)
......
expansions/script/c10901013.lua
View file @ c09b4b74
...@@ -24,7 +24,7 @@ function cm.disable(e,c) ...@@ -24,7 +24,7 @@ function cm.disable(e,c)
return c==e:GetHandler() return c==e:GetHandler()
end end
function cm.sumcon(e) function cm.sumcon(e)
return Duel.GetTurnCount()<9 return Duel.GetTurnCount()<10
end end
function cm.drfilter(c) function cm.drfilter(c)
return c:IsFaceup() and c:IsCode(10901003) return c:IsFaceup() and c:IsCode(10901003)
......
expansions/script/c10919000.lua
View file @ c09b4b74
...@@ -12,7 +12,7 @@ function c10919000.initial_effect(c) ...@@ -12,7 +12,7 @@ function c10919000.initial_effect(c)
c:RegisterEffect(e0) c:RegisterEffect(e0)
local e4=e0:Clone() local e4=e0:Clone()
e4:SetRange(LOCATION_HAND) e4:SetRange(LOCATION_HAND)
e:SetCondition(c10919000.spcon2) e4:SetCondition(c10919000.spcon2)
c:RegisterEffect(e4) c:RegisterEffect(e4)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(10919000,0)) e1:SetDescription(aux.Stringid(10919000,0))
......
expansions/script/c12003003.lua
View file @ c09b4b74
...@@ -23,6 +23,9 @@ function c12003003.initial_effect(c) ...@@ -23,6 +23,9 @@ function c12003003.initial_effect(c)
e2:SetCode(EVENT_SPSUMMON_SUCCESS) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c12003003.matfilter(c)
return c:IsRace(RACE_SEASERPENT)
end
function c12003003.cfilter(c,g) function c12003003.cfilter(c,g)
return c:IsRace(RACE_SEASERPENT) and g:IsContains(c) return c:IsRace(RACE_SEASERPENT) and g:IsContains(c)
end end
...@@ -40,7 +43,7 @@ end ...@@ -40,7 +43,7 @@ end
function c12003003.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c12003003.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c12003003.filter,tp,LOCATION_HAND,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c12003003.filter,tp,LOCATION_HAND,0,1,nil) end
local tg=Duel.SelectTarget(tp,c12003003.filter,tp,LOCATION_HAND,0,1,1,nil) local tg=Duel.SelectTarget(tp,c12003003.filter,tp,LOCATION_HAND,0,1,1,nil)
Duel.SendtoGrave(tg,REASON_EFFECT) Duel.SendtoGrave(tg,REASON_COST)
end end
function c12003003.tgfilter(c) function c12003003.tgfilter(c)
return c:IsRace(RACE_SEASERPENT) and c:IsAbleToHand() return c:IsRace(RACE_SEASERPENT) and c:IsAbleToHand()
......
expansions/script/c22250006.lua
View file @ c09b4b74
...@@ -37,13 +37,13 @@ function c22250006.spcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -37,13 +37,13 @@ function c22250006.spcon(e,tp,eg,ep,ev,re,r,rp)
end end
function c22250006.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c22250006.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,true) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end end
function c22250006.spop(e,tp,eg,ep,ev,re,r,rp) function c22250006.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end if not c:IsRelateToEffect(e) then return end
Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(c,0,tp,tp,false,true,POS_FACEUP)
if c:IsPreviousLocation(LOCATION_GRAVE) then if c:IsPreviousLocation(LOCATION_GRAVE) then
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
...@@ -52,6 +52,7 @@ function c22250006.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -52,6 +52,7 @@ function c22250006.spop(e,tp,eg,ep,ev,re,r,rp)
e1:SetReset(RESET_EVENT+0x1fe0000) e1:SetReset(RESET_EVENT+0x1fe0000)
e1:SetValue(LOCATION_REMOVED) e1:SetValue(LOCATION_REMOVED)
c:RegisterEffect(e1) c:RegisterEffect(e1)
c:CompleteProcedure()
end end
end end
function c22250006.efcon(e,tp,eg,ep,ev,re,r,rp) function c22250006.efcon(e,tp,eg,ep,ev,re,r,rp)
......
expansions/script/c60151601.lua
View file @ c09b4b74
...@@ -40,7 +40,7 @@ function c60151601.initial_effect(c) ...@@ -40,7 +40,7 @@ function c60151601.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c60151601.spcondition(e,tp,eg,ep,ev,re,r,rp) function c60151601.spcondition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_PENDULUM) return e:GetHandler():GetSummonType()==SUMMON_TYPE_PENDULUM
end end
function c60151601.filter(c) function c60151601.filter(c)
return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER) return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER)
...@@ -68,8 +68,13 @@ function c60151601.condition(e,tp,eg,ep,ev,re,r,rp) ...@@ -68,8 +68,13 @@ function c60151601.condition(e,tp,eg,ep,ev,re,r,rp)
return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25) return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25)
end end
function c60151601.target(e,tp,eg,ep,ev,re,r,rp,chk) function c60151601.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetMZoneCount(tp)>0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end if e:GetHandler():IsLocation(LOCATION_EXTRA) then
if chk==0 then return Duel.GetLocationCountFromEx(tp)>0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
else
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
end end
function c60151601.operation(e,tp,eg,ep,ev,re,r,rp) function c60151601.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
......
expansions/script/c60151602.lua
View file @ c09b4b74
...@@ -40,7 +40,7 @@ function c60151602.initial_effect(c) ...@@ -40,7 +40,7 @@ function c60151602.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c60151602.spcondition(e,tp,eg,ep,ev,re,r,rp) function c60151602.spcondition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_PENDULUM) return e:GetHandler():GetSummonType()==SUMMON_TYPE_PENDULUM
end end
function c60151602.filter(c) function c60151602.filter(c)
return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER) return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER)
...@@ -68,9 +68,13 @@ function c60151602.condition(e,tp,eg,ep,ev,re,r,rp) ...@@ -68,9 +68,13 @@ function c60151602.condition(e,tp,eg,ep,ev,re,r,rp)
return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25) return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25)
end end
function c60151602.target(e,tp,eg,ep,ev,re,r,rp,chk) function c60151602.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetMZoneCount(tp)>0 if e:GetHandler():IsLocation(LOCATION_EXTRA) then
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end if chk==0 then return Duel.GetLocationCountFromEx(tp)>0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
else
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
end end
function c60151602.operation(e,tp,eg,ep,ev,re,r,rp) function c60151602.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
......
expansions/script/c60151603.lua
View file @ c09b4b74
...@@ -40,7 +40,7 @@ function c60151603.initial_effect(c) ...@@ -40,7 +40,7 @@ function c60151603.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c60151603.spcondition(e,tp,eg,ep,ev,re,r,rp) function c60151603.spcondition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_PENDULUM) return e:GetHandler():GetSummonType()==SUMMON_TYPE_PENDULUM
end end
function c60151603.filter(c) function c60151603.filter(c)
return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER) return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER)
...@@ -68,9 +68,13 @@ function c60151603.condition(e,tp,eg,ep,ev,re,r,rp) ...@@ -68,9 +68,13 @@ function c60151603.condition(e,tp,eg,ep,ev,re,r,rp)
return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25) return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25)
end end
function c60151603.target(e,tp,eg,ep,ev,re,r,rp,chk) function c60151603.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetMZoneCount(tp)>0 if e:GetHandler():IsLocation(LOCATION_EXTRA) then
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end if chk==0 then return Duel.GetLocationCountFromEx(tp)>0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
else
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
end end
function c60151603.operation(e,tp,eg,ep,ev,re,r,rp) function c60151603.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
...@@ -88,10 +92,10 @@ function c60151603.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -88,10 +92,10 @@ function c60151603.operation(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c60151603.filter3(c,e,tp) function c60151603.filter3(c,e,tp)
return c:IsSetCard(0xcb25) and (c:IsLocation(LOCATION_PZONE)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0xcb25) and (c:GetSequence()==6 or c:GetSequence()==7) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c60151603.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c60151603.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetMZoneCount(tp)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c60151603.filter3,tp,LOCATION_ONFIELD,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c60151603.filter3,tp,LOCATION_ONFIELD,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_ONFIELD) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_ONFIELD)
end end
......
expansions/script/c60151604.lua
View file @ c09b4b74
...@@ -40,7 +40,7 @@ function c60151604.initial_effect(c) ...@@ -40,7 +40,7 @@ function c60151604.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c60151604.spcondition(e,tp,eg,ep,ev,re,r,rp) function c60151604.spcondition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_PENDULUM) return e:GetHandler():GetSummonType()==SUMMON_TYPE_PENDULUM
end end
function c60151604.filter(c) function c60151604.filter(c)
return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER) return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER)
...@@ -68,9 +68,13 @@ function c60151604.condition(e,tp,eg,ep,ev,re,r,rp) ...@@ -68,9 +68,13 @@ function c60151604.condition(e,tp,eg,ep,ev,re,r,rp)
return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25) return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25)
end end
function c60151604.target(e,tp,eg,ep,ev,re,r,rp,chk) function c60151604.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetMZoneCount(tp)>0 if e:GetHandler():IsLocation(LOCATION_EXTRA) then
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end if chk==0 then return Duel.GetLocationCountFromEx(tp)>0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
else
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
end end
function c60151604.operation(e,tp,eg,ep,ev,re,r,rp) function c60151604.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
...@@ -91,12 +95,12 @@ function c60151604.filter3(c,e,tp) ...@@ -91,12 +95,12 @@ function c60151604.filter3(c,e,tp)
return c:IsSetCard(0xcb25) and c:IsType(TYPE_PENDULUM) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0xcb25) and c:IsType(TYPE_PENDULUM) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c60151604.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c60151604.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetMZoneCount(tp)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c60151604.filter3,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c60151604.filter3,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
end end
function c60151604.spop(e,tp,eg,ep,ev,re,r,rp) function c60151604.spop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetMZoneCount(tp)<=0 then return end if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c60151604.filter3),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c60151604.filter3),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp)
if g:GetCount()>0 then if g:GetCount()>0 then
......
expansions/script/c60151605.lua
View file @ c09b4b74
...@@ -40,7 +40,7 @@ function c60151605.initial_effect(c) ...@@ -40,7 +40,7 @@ function c60151605.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c60151605.spcondition(e,tp,eg,ep,ev,re,r,rp) function c60151605.spcondition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_PENDULUM) return e:GetHandler():GetSummonType()==SUMMON_TYPE_PENDULUM
end end
function c60151605.filter(c) function c60151605.filter(c)
return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER) return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER)
...@@ -68,9 +68,13 @@ function c60151605.condition(e,tp,eg,ep,ev,re,r,rp) ...@@ -68,9 +68,13 @@ function c60151605.condition(e,tp,eg,ep,ev,re,r,rp)
return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25) return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25)
end end
function c60151605.target(e,tp,eg,ep,ev,re,r,rp,chk) function c60151605.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetMZoneCount(tp)>0 if e:GetHandler():IsLocation(LOCATION_EXTRA) then
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end if chk==0 then return Duel.GetLocationCountFromEx(tp)>0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
else
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
end end
function c60151605.operation(e,tp,eg,ep,ev,re,r,rp) function c60151605.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
...@@ -91,7 +95,7 @@ function c60151605.filter3(c) ...@@ -91,7 +95,7 @@ function c60151605.filter3(c)
return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable() return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable()
end end
function c60151605.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c60151605.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetMZoneCount(tp)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c60151605.filter3,tp,0,LOCATION_ONFIELD,1,nil) end and Duel.IsExistingMatchingCard(c60151605.filter3,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,tp,LOCATION_ONFIELD) Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,tp,LOCATION_ONFIELD)
end end
......
expansions/script/c60151606.lua
View file @ c09b4b74
...@@ -40,7 +40,7 @@ function c60151606.initial_effect(c) ...@@ -40,7 +40,7 @@ function c60151606.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c60151606.spcondition(e,tp,eg,ep,ev,re,r,rp) function c60151606.spcondition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_PENDULUM) return e:GetHandler():GetSummonType()==SUMMON_TYPE_PENDULUM
end end
function c60151606.filter(c) function c60151606.filter(c)
return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER) return c:IsFaceup() and c:IsSetCard(0xcb25) and c:IsType(TYPE_MONSTER)
...@@ -68,9 +68,13 @@ function c60151606.condition(e,tp,eg,ep,ev,re,r,rp) ...@@ -68,9 +68,13 @@ function c60151606.condition(e,tp,eg,ep,ev,re,r,rp)
return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25) return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25)
end end
function c60151606.target(e,tp,eg,ep,ev,re,r,rp,chk) function c60151606.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetMZoneCount(tp)>0 if e:GetHandler():IsLocation(LOCATION_EXTRA) then
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end if chk==0 then return Duel.GetLocationCountFromEx(tp)>0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
else
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
end end
function c60151606.operation(e,tp,eg,ep,ev,re,r,rp) function c60151606.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
...@@ -91,7 +95,7 @@ function c60151606.filter3(c) ...@@ -91,7 +95,7 @@ function c60151606.filter3(c)
return c:IsType(TYPE_MONSTER) and c:IsAbleToRemove() return c:IsType(TYPE_MONSTER) and c:IsAbleToRemove()
end end
function c60151606.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c60151606.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetMZoneCount(tp)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c60151606.filter3,tp,0,LOCATION_ONFIELD,1,nil) end and Duel.IsExistingMatchingCard(c60151606.filter3,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_ONFIELD) Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_ONFIELD)
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