Skip to content

Y
ygopro-222DIY-cards
Commit 3bab20f8 authored by nanahira's avatar nanahira
Browse files
Options

Merge branch 'master' of github.com:purerosefallen/ygopro-222DIY-cards

parents 40c6c3b9 7813431a
Expand all Hide whitespace changes
Inline Side-by-side
Showing with 492 additions and 481 deletions
expansions/script/c1110112.lua
View file @ 3bab20f8
This diff is collapsed.
expansions/script/c1110114.lua
View file @ 3bab20f8
This diff is collapsed.
expansions/script/c1111223.lua
View file @ 3bab20f8
--灵曲·年华静谧之月 --灵曲·年华静谧之月
local m=1111223 local m=1111223
local cm=_G["c"..m] local cm=_G["c"..m]
xpcall(function() require("expansions/script/c1110198") end,function() require("script/c1110198") end) xpcall(function() require("expansions/script/c1110198") end,function() require("script/c1110198") end)
cm.named_with_Soul=true cm.named_with_Soul=true
-- --
function c1111223.initial_effect(c) function c1111223.initial_effect(c)
-- --
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EFFECT_DESTROY_REPLACE) e1:SetCode(EFFECT_DESTROY_REPLACE)
e1:SetRange(LOCATION_SZONE) e1:SetRange(LOCATION_SZONE)
e1:SetTarget(c1111223.tg1) e1:SetTarget(c1111223.tg1)
c:RegisterEffect(e1) e1:SetValue(c1111223.val1)
-- e1:SetOperation(c1111223.op1)
local e2=Effect.CreateEffect(c) c:RegisterEffect(e1)
e2:SetDescription(aux.Stringid(1111223,0)) --
e2:SetType(EFFECT_TYPE_IGNITION) local e2=Effect.CreateEffect(c)
e2:SetRange(LOCATION_SZONE) e2:SetDescription(aux.Stringid(1111223,0))
e2:SetCountLimit(1) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetCost(c1111223.cost2) e2:SetRange(LOCATION_SZONE)
e2:SetOperation(c1111223.op2) e2:SetCountLimit(1)
c:RegisterEffect(e2) e2:SetCost(c1111223.cost2)
-- e2:SetOperation(c1111223.op2)
local e3=Effect.CreateEffect(c) c:RegisterEffect(e2)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) --
e3:SetCode(EVENT_SPSUMMON_SUCCESS) local e3=Effect.CreateEffect(c)
e3:SetRange(LOCATION_SZONE) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetOperation(c1111223.op3) e3:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e3) e3:SetRange(LOCATION_SZONE)
-- e3:SetOperation(c1111223.op3)
local e4=Effect.CreateEffect(c) c:RegisterEffect(e3)
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) --
e4:SetCode(EVENT_CHAINING) local e4=Effect.CreateEffect(c)
e4:SetRange(LOCATION_SZONE) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e4:SetOperation(c1111223.op4) e4:SetCode(EVENT_CHAINING)
c:RegisterEffect(e4) e4:SetRange(LOCATION_SZONE)
-- e4:SetOperation(c1111223.op4)
if not c1111223.global_check then c:RegisterEffect(e4)
c1111223.global_check=true --
local e5=Effect.GlobalEffect() if not c1111223.global_check then
e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) c1111223.global_check=true
e5:SetCode(EVENT_CHAINING) local e5=Effect.GlobalEffect()
e5:SetCondition(c1111223.con5) e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e5:SetOperation(c1111223.op5) e5:SetCode(EVENT_CHAINING)
Duel.RegisterEffect(e5,0) e5:SetCondition(c1111223.con5)
end e5:SetOperation(c1111223.op5)
-- Duel.RegisterEffect(e5,0)
local e6=Effect.CreateEffect(c) end
e6:SetType(EFFECT_TYPE_FIELD) --
e6:SetCode(EFFECT_CANNOT_ATTACK_ANNOUNCE) local e6=Effect.CreateEffect(c)
e6:SetRange(LOCATION_SZONE) e6:SetType(EFFECT_TYPE_FIELD)
e6:SetTargetRange(0,LOCATION_MZONE) e6:SetCode(EFFECT_CANNOT_ATTACK_ANNOUNCE)
e6:SetTarget(c1111223.tg6) e6:SetRange(LOCATION_SZONE)
c:RegisterEffect(e6) e6:SetTargetRange(0,LOCATION_MZONE)
-- e6:SetTarget(c1111223.tg6)
end c:RegisterEffect(e6)
-- --
function c1111223.tfilter1(c,tp) end
return c:IsReason(REASON_EFFECT) and not c:IsReason(REASON_REPLACE) --
end function c1111223.tfilter1(c,e,tp)
function c1111223.tg1(e,tp,eg,ep,ev,re,r,rp,chk) return c:IsLocation(LOCATION_ONFIELD) and c:IsReason(REASON_EFFECT) and not c:IsReason(REASON_REPLACE) and c~=e:GetHandler()
local c=e:GetHandler() end
if chk==0 then return Duel.IsCanRemoveCounter(tp,LOCATION_ONFIELD,LOCATION_ONFIELD,0x1111,1,REASON_EFFECT) and eg:IsExists(c1111223.tfilter1,1,c,tp) end function c1111223.tg1(e,tp,eg,ep,ev,re,r,rp,chk)
if Duel.SelectEffectYesNo(tp,c,96) then local c=e:GetHandler()
return true if chk==0 then return Duel.IsCanRemoveCounter(tp,LOCATION_ONFIELD,LOCATION_ONFIELD,0x1111,1,REASON_EFFECT) and eg:IsExists(c1111223.tfilter1,1,c,e,tp) end
else return false end return Duel.SelectEffectYesNo(tp,e:GetHandler(),96)
end end
-- --
function c1111223.op1(e,tp,eg,ep,ev,re,r,rp) function c1111223.val1(e,c)
Duel.RemoveCounter(tp,LOCATION_ONFIELD,LOCATION_ONFIELD,0x1111,1,REASON_EFFECT) return c1111223.tfilter1(c,e,e:GetHandlerPlayer())
end end
-- --
function c1111223.cost2(e,tp,eg,ep,ev,re,r,rp,chk) function c1111223.op1(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() Duel.RemoveCounter(tp,LOCATION_ONFIELD,LOCATION_ONFIELD,0x1111,1,REASON_EFFECT)
local num=Duel.GetMatchingGroupCount(aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,nil) end
if chk==0 then return num>0 and c:IsCanAddCounter(0x1111,num) end --
c:AddCounter(0x1111,num) function c1111223.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
end local c=e:GetHandler()
-- local num=Duel.GetMatchingGroupCount(aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
function c1111223.op2(e,tp,eg,ep,ev,re,r,rp) if chk==0 then return num>0 and c:IsCanAddCounter(0x1111,num) end
local c=e:GetHandler() c:AddCounter(0x1111,num)
local b1=true end
local b2=true --
local off=1 function c1111223.op2(e,tp,eg,ep,ev,re,r,rp)
local ops={} local c=e:GetHandler()
local opval={} local b1=true
if b1 then local b2=true
ops[off]=aux.Stringid(1111223,1) local off=1
opval[off-1]=1 local ops={}
off=off+1 local opval={}
end if b1 then
if b2 then ops[off]=aux.Stringid(1111223,1)
ops[off]=aux.Stringid(1111223,2) opval[off-1]=1
opval[off-1]=2 off=off+1
off=off+1 end
end if b2 then
local op=Duel.SelectOption(tp,table.unpack(ops)) ops[off]=aux.Stringid(1111223,2)
local sel=opval[op] opval[off-1]=2
if sel==1 then off=off+1
c:ResetFlagEffect(1111223) end
c:ResetFlagEffect(1111224) local op=Duel.SelectOption(tp,table.unpack(ops))
c:RegisterFlagEffect(1111223,RESET_EVENT+0x1fe0000,EFFECT_FLAG_CLIENT_HINT,0,0,aux.Stringid(1111223,1)) local sel=opval[op]
else if sel==1 then
c:ResetFlagEffect(1111223) c:ResetFlagEffect(1111223)
c:ResetFlagEffect(1111224) c:ResetFlagEffect(1111224)
c:RegisterFlagEffect(1111224,RESET_EVENT+0x1fe0000,EFFECT_FLAG_CLIENT_HINT,0,0,aux.Stringid(1111223,2)) c:RegisterFlagEffect(1111223,RESET_EVENT+0x1fe0000,EFFECT_FLAG_CLIENT_HINT,0,0,aux.Stringid(1111223,1))
c:RegisterFlagEffect(1111224,RESET_EVENT+0x1fe0000,EFFECT_FLAG_CLIENT_HINT,0,0,aux.Stringid(1111223,3)) else
end c:ResetFlagEffect(1111223)
end c:ResetFlagEffect(1111224)
-- c:RegisterFlagEffect(1111224,RESET_EVENT+0x1fe0000,EFFECT_FLAG_CLIENT_HINT,0,0,aux.Stringid(1111223,2))
function c1111223.op3(e,tp,eg,ep,ev,re,r,rp) c:RegisterFlagEffect(1111224,RESET_EVENT+0x1fe0000,EFFECT_FLAG_CLIENT_HINT,0,0,aux.Stringid(1111223,3))
local c=e:GetHandler() end
if c:GetFlagEffect(1111223)<1 then return false end end
Duel.SetChainLimitTillChainEnd(aux.FALSE) --
end function c1111223.op3(e,tp,eg,ep,ev,re,r,rp)
-- local c=e:GetHandler()
function c1111223.op4(e,tp,eg,ep,ev,re,r,rp) if c:GetFlagEffect(1111223)<1 then return end
local c=e:GetHandler() Duel.SetChainLimitTillChainEnd(aux.FALSE)
if c:GetFlagEffect(1111224)<1 then return false end end
Duel.SetChainLimit(aux.FALSE) --
end function c1111223.op4(e,tp,eg,ep,ev,re,r,rp)
-- local c=e:GetHandler()
function c1111223.con5(e,tp,eg,ep,ev,re,r,rp) if c:GetFlagEffect(1111224)<1 then return end
return re:IsActiveType(TYPE_MONSTER) Duel.SetChainLimit(aux.FALSE)
end end
-- --
function c1111223.op5(e,tp,eg,ep,ev,re,r,rp) function c1111223.con5(e,tp,eg,ep,ev,re,r,rp)
local c=re:GetHandler() return re:IsActiveType(TYPE_MONSTER)
if not c:IsLocation(LOCATION_MZONE) then return end end
c:RegisterFlagEffect(1111225,RESET_EVENT+0x1fe0000,0,0) --
end function c1111223.op5(e,tp,eg,ep,ev,re,r,rp)
-- local c=re:GetHandler()
function c1111223.tg6(e,c) if not c:IsLocation(LOCATION_MZONE) then return end
return c:GetFlagEffect(1111225)>0 c:RegisterFlagEffect(1111225,RESET_EVENT+0x1fe0000,0,0)
end end
-- --
function c1111223.tg6(e,c)
return c:GetFlagEffect(1111225)>0
end
--
expansions/script/c81006014.lua
View file @ 3bab20f8
...@@ -15,7 +15,7 @@ function c81006014.initial_effect(c) ...@@ -15,7 +15,7 @@ function c81006014.initial_effect(c)
e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetRange(LOCATION_HAND) e1:SetRange(LOCATION_HAND)
e1:SetHintTiming(0,TIMING_MAIN_END) e1:SetHintTiming(0,TIMING_MAIN_END+TIMINGS_CHECK_MONSTER)
e1:SetCondition(c81006014.spcon) e1:SetCondition(c81006014.spcon)
e1:SetCost(c81006014.spcost) e1:SetCost(c81006014.spcost)
e1:SetTarget(c81006014.sptg) e1:SetTarget(c81006014.sptg)
...@@ -23,7 +23,7 @@ function c81006014.initial_effect(c) ...@@ -23,7 +23,7 @@ function c81006014.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c81006014.rellimit(e,c,tp,sumtp) function c81006014.rellimit(e,c,tp,sumtp)
return c:IsControler(tp) and c:IsType(TYPE_MONSTER) return c:GetOwner()==e:GetHandler():GetOwner() and c:IsType(TYPE_MONSTER)
end end
function c81006014.spcon(e,tp,eg,ep,ev,re,r,rp) function c81006014.spcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2 return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
......
expansions/script/c960009.lua
View file @ 3bab20f8
...@@ -4,7 +4,7 @@ function c960009.initial_effect(c) ...@@ -4,7 +4,7 @@ function c960009.initial_effect(c)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(0,TIMING_END_PHASE) e1:SetHintTiming(0,TIMING_ATTACK+TIMING_BATTLE_START+TIMINGS_CHECK_MONSTER)
e1:SetCountLimit(1,960009) e1:SetCountLimit(1,960009)
e1:SetCost(c960009.cost) e1:SetCost(c960009.cost)
e1:SetOperation(c960009.activate) e1:SetOperation(c960009.activate)
...@@ -26,23 +26,27 @@ function c960009.cost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -26,23 +26,27 @@ function c960009.cost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.PayLPCost(tp,500) Duel.PayLPCost(tp,500)
end end
function c960009.activate(e,tp,eg,ep,ev,re,r,rp) function c960009.activate(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() --local c=e:GetHandler()
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_AVOID_BATTLE_DAMAGE) e1:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0) e1:SetTargetRange(1,1)
e1:SetValue(1) e1:SetValue(1)
e1:SetReset(RESET_PHASE+PHASE_END) e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE) local e1=Effect.CreateEffect(e:GetHandler())
e3:SetRange(LOCATION_MZONE) e1:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_IMMUNE_EFFECT) e1:SetCode(EFFECT_IMMUNE_EFFECT)
e3:SetValue(c960009.efilter) e1:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
e3:SetReset(RESET_EVENT+RESETS_STANDARD) e1:SetTarget(c960009.etarget)
Duel.RegisterEffect(e3,tp) e1:SetValue(c960009.efilter)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(960009,0)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(960009,0))
end end
function c960009.thfilter(c) function c960009.thfilter(c)
...@@ -61,5 +65,9 @@ function c960009.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -61,5 +65,9 @@ function c960009.thop(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c960009.efilter(e,te) function c960009.efilter(e,te)
return te:GetOwner()~=e:GetOwner() return te:GetHandler()~=e:GetHandler()
end end
\ No newline at end of file
function c960009.etarget(e,c)
return true
end
expansions/script/c9980445.lua
View file @ 3bab20f8
...@@ -93,7 +93,7 @@ function c9980445.spcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -93,7 +93,7 @@ function c9980445.spcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c9980445.cfilter,tp,LOCATION_MZONE,0,1,nil) return Duel.IsExistingMatchingCard(c9980445.cfilter,tp,LOCATION_MZONE,0,1,nil)
end end
function c9980445.spfilter(c,e,tp) function c9980445.spfilter(c,e,tp)
return c:IsSetCard(0x1bca) and c:IsLevelBelow(2) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x2bcb) and c:IsLevelBelow(2) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c9980445.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c9980445.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c9980445.spfilter(chkc,e,tp) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c9980445.spfilter(chkc,e,tp) 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