Commit ced74863 authored by salix5's avatar salix5
parent 0e07545e
......@@ -21,7 +21,7 @@ function c16404809.initial_effect(c)
c:RegisterEffect(e2)
end
function c16404809.sumsuc(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():RegisterFlagEffect(16404809,RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END,0,1)
e:GetHandler():RegisterFlagEffect(16404809,RESET_EVENT+0x1ec0000+RESET_PHASE+PHASE_END,0,1)
end
function c16404809.condition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetFlagEffect(16404809)~=0
......@@ -31,13 +31,13 @@ function c16404809.cost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.Release(e:GetHandler(),REASON_COST)
end
function c16404809.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=5 end
if chk==0 then return Duel.IsPlayerCanDiscardDeck(tp,5) end
end
function c16404809.filter(c)
return c:IsAbleToHand() and c:IsType(TYPE_SPELL+TYPE_TRAP)
end
function c16404809.operation(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)<5 then return end
if not Duel.IsPlayerCanDiscardDeck(tp,5) then return end
Duel.ConfirmDecktop(tp,5)
local g=Duel.GetDecktopGroup(tp,5)
if g:GetCount()>0 then
......@@ -52,4 +52,4 @@ function c16404809.operation(e,tp,eg,ep,ev,re,r,rp)
end
Duel.SendtoGrave(g,REASON_EFFECT+REASON_REVEAL)
end
end
\ No newline at end of file
end
......@@ -82,7 +82,7 @@ function c25244515.regop(e,tp,eg,ep,ev,re,r,rp)
e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetTarget(c25244515.rettg)
e1:SetOperation(c25244515.retop)
e1:SetReset(RESET_EVENT+0x1ee0000+RESET_PHASE+PHASE_END)
e1:SetReset(RESET_EVENT+0x1ec0000+RESET_PHASE+PHASE_END)
c:RegisterEffect(e1)
end
function c25244515.rettg(e,tp,eg,ep,ev,re,r,rp,chk)
......
......@@ -73,7 +73,7 @@ function c28630501.regop(e,tp,eg,ep,ev,re,r,rp)
e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetTarget(c28630501.rettg)
e1:SetOperation(c28630501.retop)
e1:SetReset(RESET_EVENT+0x1ee0000+RESET_PHASE+PHASE_END)
e1:SetReset(RESET_EVENT+0x1ec0000+RESET_PHASE+PHASE_END)
c:RegisterEffect(e1)
end
function c28630501.rettg(e,tp,eg,ep,ev,re,r,rp,chk)
......
......@@ -4,15 +4,11 @@ function c43040603.initial_effect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCondition(c43040603.condition)
e1:SetCost(c43040603.cost)
e1:SetTarget(c43040603.target)
e1:SetOperation(c43040603.operation)
c:RegisterEffect(e1)
end
function c43040603.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsPlayerCanSpecialSummon(tp)
end
function c43040603.filter(c,e,tp)
return c:IsSummonableCard() and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
......@@ -23,11 +19,11 @@ function c43040603.cost(e,tp,eg,ep,ev,re,r,rp,chk)
end
function c43040603.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>-1
and Duel.IsExistingMatchingCard(c43040603.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end
and Duel.IsExistingMatchingCard(c43040603.filter,tp,LOCATION_DECK,0,1,nil,e,tp) and Duel.IsPlayerCanDiscardDeck(tp,1) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,LOCATION_DECK)
end
function c43040603.operation(e,tp,eg,ep,ev,re,r,rp)
if not Duel.IsPlayerCanSpecialSummon(tp) then return end
if not Duel.IsPlayerCanSpecialSummon(tp) or not Duel.IsPlayerCanDiscardDeck(tp,1) then return end
local g=Duel.GetMatchingGroup(Card.IsSummonableCard,tp,LOCATION_DECK,0,nil)
local dcount=Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)
local seq=-1
......
......@@ -31,7 +31,7 @@ function c46565218.spop(e,tp,eg,ep,ev,re,r,rp,c)
e1:SetCountLimit(1)
e1:SetTarget(c46565218.drtg)
e1:SetOperation(c46565218.drop)
e1:SetReset(RESET_EVENT+0xfe0000+RESET_PHASE+PHASE_END)
e1:SetReset(RESET_EVENT+0xec0000+RESET_PHASE+PHASE_END)
c:RegisterEffect(e1)
end
function c46565218.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
......
......@@ -25,7 +25,7 @@ end
function c53251824.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
while tc do
tc:RegisterFlagEffect(53251824,RESET_EVENT+0x1fc0000+RESET_PHASE+PHASE_END,0,1)
tc:RegisterFlagEffect(53251824,RESET_EVENT+0x1ec0000+RESET_PHASE+PHASE_END,0,1)
tc=eg:GetNext()
end
end
......
......@@ -4,24 +4,20 @@ function c58577036.initial_effect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCondition(c58577036.condition)
e1:SetTarget(c58577036.target)
e1:SetOperation(c58577036.operation)
c:RegisterEffect(e1)
end
function c58577036.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsPlayerCanSpecialSummon(tp)
end
function c58577036.filter(c,e,tp)
return c:IsSummonableCard() and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c58577036.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c58577036.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end
and Duel.IsExistingMatchingCard(c58577036.filter,tp,LOCATION_DECK,0,1,nil,e,tp) and Duel.IsPlayerCanDiscardDeck(tp,1) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,LOCATION_DECK)
end
function c58577036.operation(e,tp,eg,ep,ev,re,r,rp)
if not Duel.IsPlayerCanSpecialSummon(tp) then return end
if not Duel.IsPlayerCanSpecialSummon(tp) or not Duel.IsPlayerCanDiscardDeck(tp,1) then return end
Duel.Hint(HINT_SELECTMSG,1-tp,567)
local lv=Duel.AnnounceNumber(1-tp,1,2,3,4,5,6,7,8,9,10,11,12)
local g=Duel.GetMatchingGroup(Card.IsSummonableCard,tp,LOCATION_DECK,0,nil)
......
......@@ -76,7 +76,7 @@ function c65247798.regop(e,tp,eg,ep,ev,re,r,rp)
e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetTarget(c65247798.rettg)
e1:SetOperation(c65247798.retop)
e1:SetReset(RESET_EVENT+0x1ee0000+RESET_PHASE+PHASE_END)
e1:SetReset(RESET_EVENT+0x1ec0000+RESET_PHASE+PHASE_END)
c:RegisterEffect(e1)
end
function c65247798.rettg(e,tp,eg,ep,ev,re,r,rp,chk)
......
......@@ -62,7 +62,7 @@ function c92246806.regop(e,tp,eg,ep,ev,re,r,rp)
e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetTarget(c92246806.rettg)
e1:SetOperation(c92246806.retop)
e1:SetReset(RESET_EVENT+0x1ee0000+RESET_PHASE+PHASE_END)
e1:SetReset(RESET_EVENT+0x1ec0000+RESET_PHASE+PHASE_END)
c:RegisterEffect(e1)
end
function c92246806.rettg(e,tp,eg,ep,ev,re,r,rp,chk)
......
......@@ -131,7 +131,7 @@ STATUS_ATTACKED =0x0080 --攻击过
STATUS_FORM_CHANGED =0x0100 --改变过表示形式
STATUS_SUMMONING =0x0200 --召唤中
STATUS_EFFECT_ENABLED =0x0400 --效果有效
STATUS_SUMMON_TURN =0x0800 --在本回合召唤
STATUS_SUMMON_TURN =0x0800 --在本回合進場
STATUS_DESTROY_CONFIRMED =0x1000 --破坏确定
STATUS_LEAVE_CONFIRMED =0x2000 --离开确定
STATUS_BATTLE_DESTROYED =0x4000 --战斗破坏确定
......
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