Commit 467e4db9 authored by VanillaSalt's avatar VanillaSalt

fix

parent 056c85f2
...@@ -50,12 +50,12 @@ function c16825874.cop(e,tp,eg,ep,ev,re,r,rp) ...@@ -50,12 +50,12 @@ function c16825874.cop(e,tp,eg,ep,ev,re,r,rp)
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_CANNOT_TRIGGER) e2:SetCode(EFFECT_CANNOT_TRIGGER)
e2:SetReset(RESET_EVENT+0x1fc0000) e2:SetReset(RESET_EVENT+0x1fe0000)
c:GetReasonCard():RegisterEffect(e2) c:GetReasonCard():RegisterEffect(e2)
--disable --disable
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_DISABLE) e3:SetCode(EFFECT_DISABLE)
e3:SetReset(RESET_EVENT+0x1fc0000) e3:SetReset(RESET_EVENT+0x1fe0000)
c:GetReasonCard():RegisterEffect(e3) c:GetReasonCard():RegisterEffect(e3)
end end
...@@ -36,9 +36,10 @@ function c21768554.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -36,9 +36,10 @@ function c21768554.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(c21768554.filter,tp,0,LOCATION_MZONE,1,nil) end and Duel.IsExistingTarget(c21768554.filter,tp,0,LOCATION_MZONE,1,nil) end
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
if ft>3 then ft=3 end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
local g=Duel.SelectTarget(tp,c21768554.filter,tp,0,LOCATION_MZONE,1,ft,nil) local g=Duel.SelectTarget(tp,c21768554.filter,tp,0,LOCATION_MZONE,1,ft,nil)
Duel.SetOperationInfo(0,CATEGORY_CONTROL,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_CONTROL,g,g:GetCount(),0,0)
end end
function c21768554.operation(e,tp,eg,ep,ev,re,r,rp) function c21768554.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
......
...@@ -26,8 +26,7 @@ function c25774450.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -26,8 +26,7 @@ function c25774450.activate(e,tp,eg,ep,ev,re,r,rp)
local ex2,cg=Duel.GetOperationInfo(0,CATEGORY_CONTROL) local ex2,cg=Duel.GetOperationInfo(0,CATEGORY_CONTROL)
local dc=dg:GetFirst() local dc=dg:GetFirst()
local cc=cg:GetFirst() local cc=cg:GetFirst()
if dc:IsRelateToEffect(e) and cc:IsRelateToEffect(e) then if dc:IsRelateToEffect(e) and cc:IsRelateToEffect(e) and Duel.Destroy(dc,REASON_EFFECT)~=0 then
Duel.Destroy(dc,REASON_EFFECT)
if not Duel.GetControl(cc,1-tp,0,0) and not cc:IsImmuneToEffect(e) and cc:IsAbleToChangeControler() then if not Duel.GetControl(cc,1-tp,0,0) and not cc:IsImmuneToEffect(e) and cc:IsAbleToChangeControler() then
Duel.Destroy(cc,REASON_EFFECT) Duel.Destroy(cc,REASON_EFFECT)
end end
......
...@@ -31,24 +31,23 @@ function c30312361.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -31,24 +31,23 @@ function c30312361.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if c:IsRelateToEffect(e) and c:IsFaceup() and tc:IsRelateToEffect(e) then if c:IsRelateToEffect(e) and c:IsFaceup() and tc:IsRelateToEffect(e) then
if Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)~=1 then return end if Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)~=1 then return end
local code=tc:GetOriginalCode() local code=tc:GetOriginalCode()
local ba=tc:GetBaseAttack() local ba=tc:GetBaseAttack()
local reset_flag=RESET_EVENT+0x1fe0000+RESET_PHASE+RESET_END
c:CopyEffect(code, reset_flag, 1)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(reset_flag) e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+RESET_END)
e1:SetCode(EFFECT_CHANGE_CODE) e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetValue(code) e1:SetValue(code)
c:RegisterEffect(e1) c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e2:SetReset(reset_flag) e2:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+RESET_END)
e2:SetCode(EFFECT_SET_BASE_ATTACK) e2:SetCode(EFFECT_SET_BASE_ATTACK)
e2:SetValue(ba) e2:SetValue(ba)
c:RegisterEffect(e2) c:RegisterEffect(e2)
c:CopyEffect(code,RESET_EVENT+0x1fe0000+RESET_PHASE+RESET_END,1)
end end
end end
...@@ -7,6 +7,7 @@ function c36405256.initial_effect(c) ...@@ -7,6 +7,7 @@ function c36405256.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE) e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CHAIN_UNIQUE)
e1:SetCode(EVENT_SUMMON_SUCCESS) e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetCost(c36405256.spcost)
e1:SetTarget(c36405256.sptg) e1:SetTarget(c36405256.sptg)
e1:SetOperation(c36405256.spop) e1:SetOperation(c36405256.spop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
...@@ -15,16 +16,19 @@ function c36405256.initial_effect(c) ...@@ -15,16 +16,19 @@ function c36405256.initial_effect(c)
e2:SetCode(EVENT_SPSUMMON_SUCCESS) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c36405256.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,36405256)==0 end
Duel.RegisterFlagEffect(tp,36405256,RESET_PHASE+PHASE_END,0,1)
end
function c36405256.filter(c,e,tp) function c36405256.filter(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c36405256.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c36405256.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(1-tp) and c36405256.filter(chkc,e,tp) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(1-tp) and c36405256.filter(chkc,e,tp) end
if chk==0 then return Duel.GetFlagEffect(tp,36405256)==0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and e:GetHandler():IsLocation(LOCATION_MZONE) end if chk==0 then return e:GetHandler():IsRelateToEffect(e) and e:GetHandler():IsFaceup() end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,c36405256.filter,tp,0,LOCATION_GRAVE,1,1,nil,e,tp) local g=Duel.SelectTarget(tp,c36405256.filter,tp,0,LOCATION_GRAVE,1,1,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,g:GetCount(),0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,g:GetCount(),0,0)
Duel.RegisterFlagEffect(tp,36405256,RESET_PHASE+PHASE_END,0,1)
end end
function c36405256.spop(e,tp,eg,ep,ev,re,r,rp) function c36405256.spop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
......
...@@ -34,7 +34,7 @@ function c64605089.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -34,7 +34,7 @@ function c64605089.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local at=Duel.GetAttacker() local at=Duel.GetAttacker()
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0
and at:IsFaceup() and at:GetAttack()<c:GetDefence() then and at:IsFaceup() and at:IsRelateToBattle() and at:GetAttack()<c:GetDefence() then
Duel.BreakEffect() Duel.BreakEffect()
Duel.Destroy(at,REASON_EFFECT) Duel.Destroy(at,REASON_EFFECT)
end end
......
...@@ -8,7 +8,6 @@ function c67957315.initial_effect(c) ...@@ -8,7 +8,6 @@ function c67957315.initial_effect(c)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetRange(LOCATION_MZONE) e1:SetRange(LOCATION_MZONE)
e1:SetHintTiming(TIMING_BATTLE_PHASE) e1:SetHintTiming(TIMING_BATTLE_PHASE)
e1:SetCountLimit(1)
e1:SetCondition(c67957315.adcon) e1:SetCondition(c67957315.adcon)
e1:SetCost(c67957315.adcost) e1:SetCost(c67957315.adcost)
e1:SetOperation(c67957315.adop) e1:SetOperation(c67957315.adop)
...@@ -16,13 +15,14 @@ function c67957315.initial_effect(c) ...@@ -16,13 +15,14 @@ function c67957315.initial_effect(c)
end end
function c67957315.adcon(e,tp,eg,ep,ev,re,r,rp) function c67957315.adcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp and Duel.GetCurrentPhase()==PHASE_BATTLE and Duel.GetCurrentChain()==0 return Duel.GetTurnPlayer()==tp and Duel.GetCurrentPhase()==PHASE_BATTLE and Duel.GetCurrentChain()==0
and (e:GetHandler()==Duel.GetAttacker() or e:GetHandler()==Duel.GetAttackTarget())
end end
function c67957315.cfilter(c) function c67957315.cfilter(c)
return c:IsRace(RACE_DRAGON) and c:IsDiscardable() return c:IsRace(RACE_DRAGON) and c:IsDiscardable() and c:IsAbleToGraveAsCost()
end end
function c67957315.adcost(e,tp,eg,ep,ev,re,r,rp,chk) function c67957315.adcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c67957315.cfilter,tp,LOCATION_HAND,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c67957315.cfilter,tp,LOCATION_HAND,0,1,nil) end
e:SetLabel(Duel.DiscardHand(tp,c67957315.cfilter,1,99,REASON_COST+REASON_DISCARD)) Duel.DiscardHand(tp,c67957315.cfilter,1,1,REASON_COST+REASON_DISCARD)
end end
function c67957315.adop(e,tp,eg,ep,ev,re,r,rp) function c67957315.adop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
...@@ -30,8 +30,8 @@ function c67957315.adop(e,tp,eg,ep,ev,re,r,rp) ...@@ -30,8 +30,8 @@ function c67957315.adop(e,tp,eg,ep,ev,re,r,rp)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetValue(e:GetLabel()*1000) e1:SetValue(1000)
e1:SetReset(RESET_EVENT+0x1ff0000+RESET_PHASE+PHASE_END) e1:SetReset(RESET_EVENT+0x1ff0000+RESET_PHASE+PHASE_BATTLE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
local e2=e1:Clone() local e2=e1:Clone()
e2:SetCode(EFFECT_UPDATE_DEFENCE) e2:SetCode(EFFECT_UPDATE_DEFENCE)
......
...@@ -35,7 +35,7 @@ function c8198620.splimit(e,se,sp,st) ...@@ -35,7 +35,7 @@ function c8198620.splimit(e,se,sp,st)
end end
function c8198620.attg(e,tp,eg,ep,ev,re,r,rp,chk) function c8198620.attg(e,tp,eg,ep,ev,re,r,rp,chk)
local bc=e:GetHandler():GetBattleTarget() local bc=e:GetHandler():GetBattleTarget()
if chk==0 then return bc and bc:IsRelateToBattle() and bc:GetAttack()>0 end if chk==0 then return bc and bc:IsRelateToBattle() end
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
end end
......
...@@ -6,6 +6,7 @@ function c84298614.initial_effect(c) ...@@ -6,6 +6,7 @@ function c84298614.initial_effect(c)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
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:SetTarget(c84298614.target) e1:SetTarget(c84298614.target)
e1:SetOperation(c84298614.operation) e1:SetOperation(c84298614.operation)
c:RegisterEffect(e1) c:RegisterEffect(e1)
...@@ -32,13 +33,15 @@ end ...@@ -32,13 +33,15 @@ end
function c84298614.operation(e,tp,eg,ep,ev,re,r,rp) function c84298614.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)~=0 then if c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)~=0 then
c:SetCardTarget(tc) c:SetCardTarget(tc)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_OWNER_RELATE)
e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetValue(100) e1:SetValue(100)
e1:SetReset(RESET_EVENT+0x1fe0000) e1:SetReset(RESET_EVENT+0x1fe0000)
e1:SetCondition(c84298614.rcon)
tc:RegisterEffect(e1) tc:RegisterEffect(e1)
local e2=e1:Clone() local e2=e1:Clone()
e2:SetCode(EFFECT_UPDATE_DEFENCE) e2:SetCode(EFFECT_UPDATE_DEFENCE)
...@@ -49,6 +52,9 @@ function c84298614.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -49,6 +52,9 @@ function c84298614.operation(e,tp,eg,ep,ev,re,r,rp)
tc:RegisterEffect(e3) tc:RegisterEffect(e3)
end end
end end
function c84298614.rcon(e)
return e:GetOwner():IsHasCardTarget(e:GetHandler())
end
function c84298614.descon(e,tp,eg,ep,ev,re,r,rp) function c84298614.descon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetHandler():GetFirstCardTarget() local tc=e:GetHandler():GetFirstCardTarget()
return tc and eg:IsContains(tc) and tc:IsReason(REASON_DESTROY) return tc and eg:IsContains(tc) and tc:IsReason(REASON_DESTROY)
......
...@@ -9,7 +9,7 @@ function c9952083.initial_effect(c) ...@@ -9,7 +9,7 @@ function c9952083.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c9952083.condition(e,tp,eg,ep,ev,re,r,rp) function c9952083.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetCurrentChain()>1 and Duel.CheckChainUniqueness() return Duel.GetCurrentChain()>1 and Duel.CheckChainUniqueness() and Duel.GetTurnPlayer()==tp
end end
function c9952083.activate(e,tp,eg,ep,ev,re,r,rp) function c9952083.activate(e,tp,eg,ep,ev,re,r,rp)
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
......
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