Skip to content

Y
ygopro-scripts
Commit edc8387e authored by DailyShana's avatar DailyShana
Browse files
Options

update

parent 65c76062
Hide whitespace changes
Inline Side-by-side
Showing with 13 additions and 96 deletions
c10000090.lua
View file @ edc8387e
......@@ -13,12 +13,10 @@ function c10000090.initial_effect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
e2:SetCode(EVENT_TO_GRAVE)
e2:SetProperty(EFFECT_FLAG_CVAL_CHECK)
e2:SetRange(LOCATION_GRAVE)
e2:SetCondition(c10000090.spcon1)
e2:SetTarget(c10000090.sptg1)
e2:SetOperation(c10000090.spop1)
e2:SetValue(c10000090.valcheck)
c:RegisterEffect(e2)
--immune
local e3=Effect.CreateEffect(c)
......@@ -67,9 +65,6 @@ function c10000090.spop1(e,tp,eg,ep,ev,re,r,rp)
c:CompleteProcedure()
end
end
function c10000090.valcheck(e)
Duel.SetChainLimit(aux.FALSE)
end
function c10000090.efilter(e,te)
return te:GetOwner()~=e:GetOwner()
end
......
c18426196.lua
View file @ edc8387e
......@@ -10,14 +10,13 @@ function c18426196.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(18426196,0))
e1:SetCategory(CATEGORY_TOHAND)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CVAL_CHECK)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_TO_GRAVE)
e1:SetCondition(aux.dogcon)
e1:SetCost(c18426196.thcost)
e1:SetTarget(c18426196.thtg)
e1:SetOperation(c18426196.thop)
e1:SetValue(c18426196.valcheck)
c:RegisterEffect(e1)
end
function c18426196.condtion(e)
......@@ -26,14 +25,7 @@ function c18426196.condtion(e)
and Duel.GetAttacker()==e:GetHandler()
end
function c18426196.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
if Duel.GetFlagEffect(tp,18426196)==0 then
Duel.RegisterFlagEffect(tp,18426196,RESET_CHAIN,0,1)
c18426196[0]=Duel.GetMatchingGroupCount(Card.IsAbleToGraveAsCost,tp,LOCATION_HAND,0,nil)
c18426196[1]=0
end
return c18426196[0]-c18426196[1]>=1
end
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToGraveAsCost,tp,LOCATION_HAND,0,1,nil) end
Duel.DiscardHand(tp,Card.IsAbleToGraveAsCost,1,1,REASON_COST)
end
function c18426196.filter(c)
......@@ -53,6 +45,3 @@ function c18426196.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.ConfirmCards(1-tp,tc)
end
end
function c18426196.valcheck(e)
c18426196[1]=c18426196[1]+1
end
c30042158.lua
View file @ edc8387e
......@@ -4,24 +4,16 @@ function c30042158.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(30042158,0))
e1:SetCategory(CATEGORY_DRAW)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CVAL_CHECK)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_DAMAGE_STEP)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_REMOVE)
e1:SetCost(c30042158.cost)
e1:SetTarget(c30042158.target)
e1:SetOperation(c30042158.operation)
e1:SetValue(c30042158.valcheck)
c:RegisterEffect(e1)
end
function c30042158.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
if Duel.GetFlagEffect(tp,30042158)==0 then
Duel.RegisterFlagEffect(tp,30042158,RESET_CHAIN,0,1)
c30042158[0]=Duel.GetMatchingGroupCount(Card.IsAbleToGraveAsCost,tp,LOCATION_HAND,0,nil)
c30042158[1]=0
end
return c30042158[0]-c30042158[1]>=1
end
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToGraveAsCost,tp,LOCATION_HAND,0,1,nil) end
Duel.DiscardHand(tp,Card.IsAbleToGraveAsCost,1,1,REASON_COST)
end
function c30042158.target(e,tp,eg,ep,ev,re,r,rp,chk)
......@@ -34,6 +26,3 @@ function c30042158.operation(e,tp,eg,ep,ev,re,r,rp)
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Draw(p,d,REASON_EFFECT)
end
function c30042158.valcheck(e)
c30042158[1]=c30042158[1]+1
end
c40619825.lua
View file @ edc8387e
......@@ -26,14 +26,12 @@ function c40619825.initial_effect(c)
local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(40619825,0))
e4:SetCategory(CATEGORY_TODECK)
e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CVAL_CHECK)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e4:SetCode(EVENT_TO_GRAVE)
e4:SetCondition(c40619825.tdcon)
e4:SetCost(c40619825.tdcost)
e4:SetTarget(c40619825.tdtg)
e4:SetOperation(c40619825.tdop)
e4:SetValue(c40619825.valcheck)
c:RegisterEffect(e4)
end
function c40619825.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
......@@ -53,14 +51,7 @@ function c40619825.tdcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)
end
function c40619825.tdcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
if Duel.GetFlagEffect(tp,40619825)==0 then
Duel.RegisterFlagEffect(tp,40619825,RESET_CHAIN,0,1)
c40619825[0]=Duel.GetReleaseGroupCount(tp)
c40619825[1]=0
end
return c40619825[0]-c40619825[1]>=1
end
if chk==0 then return Duel.CheckReleaseGroup(tp,nil,1,nil) end
local g=Duel.SelectReleaseGroup(tp,nil,1,1,nil)
Duel.Release(g,REASON_COST)
end
......@@ -73,6 +64,3 @@ function c40619825.tdop(e,tp,eg,ep,ev,re,r,rp)
Duel.SendtoDeck(e:GetHandler(),nil,0,REASON_EFFECT)
end
end
function c40619825.valcheck(e)
c40619825[1]=c40619825[1]+1
end
c47754278.lua
View file @ edc8387e
......@@ -15,13 +15,12 @@ function c47754278.initial_effect(c)
e2:SetDescription(aux.Stringid(47754278,1))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CVAL_CHECK)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e2:SetCode(EVENT_TO_GRAVE)
e2:SetCondition(c47754278.spcon)
e2:SetCost(c47754278.spcost)
e2:SetTarget(c47754278.sptg)
e2:SetOperation(c47754278.spop)
e2:SetValue(c47754278.valcheck)
c:RegisterEffect(e2)
end
function c47754278.descon(e,tp,eg,ep,ev,re,r,rp)
......@@ -38,14 +37,7 @@ function c47754278.spcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsReason(REASON_DESTROY) and e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)
end
function c47754278.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
if Duel.GetFlagEffect(tp,47754278)==0 then
Duel.RegisterFlagEffect(tp,47754278,RESET_CHAIN,0,1)
c47754278[0]=Duel.GetReleaseGroupCount(tp)
c47754278[1]=0
end
return c47754278[0]-c47754278[1]>=1
end
if chk==0 then return Duel.CheckReleaseGroup(tp,nil,1,nil) end
local g=Duel.SelectReleaseGroup(tp,nil,1,1,nil)
Duel.Release(g,REASON_COST)
end
......@@ -59,6 +51,3 @@ function c47754278.spop(e,tp,eg,ep,ev,re,r,rp)
Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)
end
end
function c47754278.valcheck(e)
c47754278[1]=c47754278[1]+1
end
c71341529.lua
View file @ edc8387e
......@@ -4,7 +4,6 @@ function c71341529.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(71341529,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CVAL_CHECK)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_TO_GRAVE)
e1:SetCondition(c71341529.spcon)
......@@ -19,14 +18,7 @@ function c71341529.spcon(e,tp,eg,ep,ev,re,r,rp)
return c:IsReason(REASON_DESTROY) and bit.band(c:GetPreviousLocation(),LOCATION_ONFIELD)~=0
end
function c71341529.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
if Duel.GetFlagEffect(tp,71341529)==0 then
Duel.RegisterFlagEffect(tp,71341529,RESET_CHAIN,0,1)
c71341529[0]=Duel.GetMatchingGroupCount(Card.IsDiscardable,tp,LOCATION_HAND,0,e:GetHandler())
c71341529[1]=0
end
return c71341529[0]-c71341529[1]>=2
end
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,2,e:GetHandler()) end
Duel.DiscardHand(tp,Card.IsDiscardable,2,2,REASON_COST+REASON_DISCARD)
end
function c71341529.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
......@@ -39,6 +31,3 @@ function c71341529.spop(e,tp,eg,ep,ev,re,r,rp)
Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)
end
end
function c71341529.valcheck(e)
c71341529[1]=c71341529[1]+2
end
c77799846.lua
View file @ edc8387e
......@@ -18,13 +18,12 @@ function c77799846.initial_effect(c)
e2:SetDescription(aux.Stringid(77799846,1))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CVAL_CHECK)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e2:SetCode(EVENT_TO_GRAVE)
e2:SetCondition(c77799846.spcon)
e2:SetCost(c77799846.spcost)
e2:SetTarget(c77799846.sptg)
e2:SetOperation(c77799846.spop)
e2:SetValue(c77799846.valcheck)
c:RegisterEffect(e2)
end
function c77799846.cost(e,tp,eg,ep,ev,re,r,rp,chk)
......@@ -50,14 +49,7 @@ function c77799846.rfilter(c)
return c:IsSetCard(0x85) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
end
function c77799846.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
if Duel.GetFlagEffect(tp,77799846)==0 then
Duel.RegisterFlagEffect(tp,77799846,RESET_CHAIN,0,1)
c77799846[0]=Duel.GetMatchingGroupCount(c77799846.rfilter,tp,LOCATION_GRAVE,0,nil)
c77799846[1]=0
end
return c77799846[0]-c77799846[1]>=1
end
if chk==0 then return Duel.IsExistingMatchingCard(c77799846.rfilter,tp,LOCATION_GRAVE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectMatchingCard(tp,c77799846.rfilter,tp,LOCATION_GRAVE,0,1,1,nil)
Duel.Remove(g,POS_FACEUP,REASON_COST)
......@@ -82,6 +74,3 @@ function c77799846.spop(e,tp,eg,ep,ev,re,r,rp)
end
end
end
function c77799846.valcheck(e)
c77799846[1]=c77799846[1]+1
end
c96381979.lua
View file @ edc8387e
......@@ -28,13 +28,12 @@ function c96381979.initial_effect(c)
e3:SetDescription(aux.Stringid(96381979,2))
e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CVAL_CHECK)
e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e3:SetCode(EVENT_TO_GRAVE)
e3:SetCondition(c96381979.spcon)
e3:SetCost(c96381979.spcost)
e3:SetTarget(c96381979.sptg)
e3:SetOperation(c96381979.spop)
e3:SetValue(c96381979.valcheck)
c:RegisterEffect(e3)
end
function c96381979.setcon(e,tp,eg,ep,ev,re,r,rp)
......@@ -90,14 +89,7 @@ function c96381979.cfilter(c)
return c:IsFaceup() and c:IsSetCard(0x7c) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToGraveAsCost()
end
function c96381979.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
if Duel.GetFlagEffect(tp,96381979)==0 then
Duel.RegisterFlagEffect(tp,96381979,RESET_CHAIN,0,1)
c96381979[0]=Duel.GetMatchingGroupCount(c96381979.cfilter,tp,LOCATION_ONFIELD,0,nil)
c96381979[1]=0
end
return c96381979[0]-c96381979[1]>=3
end
if chk==0 then return Duel.IsExistingMatchingCard(c96381979.cfilter,tp,LOCATION_ONFIELD,0,3,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c96381979.cfilter,tp,LOCATION_ONFIELD,0,3,3,nil)
Duel.SendtoGrave(g,REASON_COST)
......@@ -134,6 +126,3 @@ function c96381979.spop(e,tp,eg,ep,ev,re,r,rp)
Duel.SpecialSummonComplete()
end
end
function c96381979.valcheck(e)
c96381979[1]=c96381979[1]+3
end
constant.lua
View file @ edc8387e
......@@ -285,7 +285,7 @@ EFFECT_FLAG_CLIENT_HINT =0x4000000 --客户端提示
EFFECT_FLAG_CHAIN_UNIQUE =0x8000000 --同一组连锁只能发动一次
EFFECT_FLAG_NAGA =0x10000000 --N/A
EFFECT_FLAG_COF =0x20000000 --N/A
EFFECT_FLAG_CVAL_CHECK =0x40000000 --以卡为COST的诱发效果需要使用
EFFECT_FLAG_CVAL_CHECK =0x40000000 --N/A
EFFECT_FLAG_IMMEDIATELY_APPLY =0x80000000 --卡在发动时效果就立即适用（卡通王國）
EFFECT_FLAG2_NAGA =0x0001 --特殊情况时发动不会被无效（神卡纳迦的特殊处理）
......
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