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)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetRange(LOCATION_SZONE)
e2:SetCondition(cm.searcon)
e2:SetCountLimit(1,m)
e2:SetTarget(cm.target)
e2:SetOperation(cm.operation)
......@@ -88,6 +89,12 @@ function cm.indct(e,re,r,rp)
return 1
else return 0 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)
return c:IsSetCard(0x234) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
end
......
expansions/script/c10901008.lua
View file @ c09b4b74
......@@ -52,6 +52,7 @@ function cm.initial_effect(c)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetRange(LOCATION_SZONE)
e2:SetCountLimit(1)
e2:SetCondition(cm.searcon)
e2:SetTarget(cm.target)
e2:SetOperation(cm.operation)
c:RegisterEffect(e2)
......@@ -111,6 +112,12 @@ function cm.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.SendtoGrave(sg,REASON_EFFECT)
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)
if chkc then return false end
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)
return c==e:GetHandler()
end
function cm.sumcon(e)
return Duel.GetTurnCount()<9
return Duel.GetTurnCount()<10
end
function cm.drfilter(c)
return c:IsFaceup() and c:IsCode(10901003)
......
expansions/script/c10919000.lua
View file @ c09b4b74
......@@ -12,7 +12,7 @@ function c10919000.initial_effect(c)
c:RegisterEffect(e0)
local e4=e0:Clone()
e4:SetRange(LOCATION_HAND)
e:SetCondition(c10919000.spcon2)
e4:SetCondition(c10919000.spcon2)
c:RegisterEffect(e4)
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(10919000,0))
......
expansions/script/c12003003.lua
View file @ c09b4b74
......@@ -23,6 +23,9 @@ function c12003003.initial_effect(c)
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e2)
end
function c12003003.matfilter(c)
return c:IsRace(RACE_SEASERPENT)
end
function c12003003.cfilter(c,g)
return c:IsRace(RACE_SEASERPENT) and g:IsContains(c)
end
......@@ -40,7 +43,7 @@ end
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
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
function c12003003.tgfilter(c)
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)
end
function c22250006.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,true) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function c22250006.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
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
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
......@@ -52,6 +52,7 @@ function c22250006.spop(e,tp,eg,ep,ev,re,r,rp)
e1:SetReset(RESET_EVENT+0x1fe0000)
e1:SetValue(LOCATION_REMOVED)
c:RegisterEffect(e1)
c:CompleteProcedure()
end
end
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)
c:RegisterEffect(e4)
end
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
function c60151601.filter(c)
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)
return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25)
end
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)
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
function c60151601.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
......
expansions/script/c60151602.lua
View file @ c09b4b74
......@@ -40,7 +40,7 @@ function c60151602.initial_effect(c)
c:RegisterEffect(e4)
end
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
function c60151602.filter(c)
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)
return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25)
end
function c60151602.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)
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
function c60151602.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
......
expansions/script/c60151603.lua
View file @ c09b4b74
......@@ -40,7 +40,7 @@ function c60151603.initial_effect(c)
c:RegisterEffect(e4)
end
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
function c60151603.filter(c)
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)
return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25)
end
function c60151603.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)
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
function c60151603.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
......@@ -88,10 +92,10 @@ function c60151603.operation(e,tp,eg,ep,ev,re,r,rp)
end
end
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
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
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_ONFIELD)
end
......
expansions/script/c60151604.lua
View file @ c09b4b74
......@@ -40,7 +40,7 @@ function c60151604.initial_effect(c)
c:RegisterEffect(e4)
end
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
function c60151604.filter(c)
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)
return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25)
end
function c60151604.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)
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
function c60151604.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
......@@ -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)
end
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
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
end
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)
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
......
expansions/script/c60151605.lua
View file @ c09b4b74
......@@ -40,7 +40,7 @@ function c60151605.initial_effect(c)
c:RegisterEffect(e4)
end
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
function c60151605.filter(c)
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)
return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25)
end
function c60151605.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)
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
function c60151605.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
......@@ -91,7 +95,7 @@ function c60151605.filter3(c)
return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable()
end
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
Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,tp,LOCATION_ONFIELD)
end
......
expansions/script/c60151606.lua
View file @ c09b4b74
......@@ -40,7 +40,7 @@ function c60151606.initial_effect(c)
c:RegisterEffect(e4)
end
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
function c60151606.filter(c)
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)
return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and rc:IsSetCard(0xcb25)
end
function c60151606.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)
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
function c60151606.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
......@@ -91,7 +95,7 @@ function c60151606.filter3(c)
return c:IsType(TYPE_MONSTER) and c:IsAbleToRemove()
end
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
Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_ONFIELD)
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