Commit c9f600d4 authored by POLYMER's avatar POLYMER

fix

parent 4ec614c7
No preview for this file type
--辉厄剑·天地之咒灵
function c46800200.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,46800200)
e1:SetCondition(c46800200.tdcon1)
e1:SetCost(c46800200.spcost)
e1:SetTarget(c46800200.sptg)
e1:SetOperation(c46800200.spop)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,46800201)
e2:SetTarget(c46800200.target)
e2:SetOperation(c46800200.operation)
c:RegisterEffect(e2)
local e3=e1:Clone()
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCode(EVENT_FREE_CHAIN)
e3:SetCondition(c46800200.tdcon2)
c:RegisterEffect(e3)
end
function c46800200.tdcon1(e,tp,eg,ep,ev,re,r,rp)
return not Duel.IsPlayerAffectedByEffect(tp,46800220)
end
function c46800200.tdcon2(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsPlayerAffectedByEffect(tp,46800220)
end
function c46800200.efilter(e,te)
return te:GetOwner()~=e:GetOwner()
end
function c46800200.filter(c,tp)
return c:IsAbleToGraveAsCost() and Duel.GetMZoneCount(1-tp,c,tp)>0
end
function c46800200.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
local loc=0
if Duel.IsPlayerAffectedByEffect(tp,46800215) then loc=LOCATION_ONFIELD end
if chk==0 then return Duel.IsExistingMatchingCard(c46800200.filter,tp,LOCATION_ONFIELD,loc,1,nil,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c46800200.filter,tp,LOCATION_ONFIELD,loc,1,1,nil,tp)
Duel.SendtoGrave(g,REASON_COST)
end
function c46800200.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,1-tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
end
function c46800200.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetMZoneCount(1-tp)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,1-tp) then
if Duel.SpecialSummonStep(c,0,tp,1-tp,false,false,POS_FACEUP) then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_IMMUNE_EFFECT)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetRange(LOCATION_MZONE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1:SetValue(c46800200.efilter)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetRange(LOCATION_MZONE)
e2:SetReset(RESET_EVENT+RESETS_STANDARD)
e2:SetValue(4000)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EFFECT_UPDATE_DEFENSE)
c:RegisterEffect(e3)
end
Duel.SpecialSummonComplete()
end
end
function c46800200.pfilter(c,tp)
return c:IsType(TYPE_CONTINUOUS) and c:IsSetCard(0xa12)
and not c:IsForbidden() and c:CheckUniqueOnField(tp)
end
function c46800200.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
and Duel.IsExistingMatchingCard(c46800200.pfilter,tp,LOCATION_DECK,0,1,nil,tp) end
end
function c46800200.operation(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
local tc=Duel.SelectMatchingCard(tp,c46800200.pfilter,tp,LOCATION_DECK,0,1,1,nil,tp):GetFirst()
if tc then Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) end
end
\ No newline at end of file
--辉厄剑·神星之咒灵
function c46800205.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,46800205)
e1:SetCondition(c46800205.tdcon1)
e1:SetCost(c46800205.spcost)
e1:SetTarget(c46800205.sptg)
e1:SetOperation(c46800205.spop)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,46800206)
e2:SetCost(c46800205.cost)
e2:SetTarget(c46800205.target)
e2:SetOperation(c46800205.op)
c:RegisterEffect(e2)
local e3=e1:Clone()
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCode(EVENT_FREE_CHAIN)
e3:SetCondition(c46800205.tdcon2)
c:RegisterEffect(e3)
end
function c46800205.tdcon1(e,tp,eg,ep,ev,re,r,rp)
return not Duel.IsPlayerAffectedByEffect(tp,46800220)
end
function c46800205.tdcon2(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsPlayerAffectedByEffect(tp,46800220)
end
function c46800205.efilter(e,te)
return te:GetOwner()~=e:GetOwner()
end
function c46800205.filter(c,tp)
return c:IsAbleToGraveAsCost() and Duel.GetMZoneCount(1-tp,c,tp)>0
end
function c46800205.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
local loc=0
if Duel.IsPlayerAffectedByEffect(tp,46800215) then loc=LOCATION_ONFIELD end
if chk==0 then return Duel.IsExistingMatchingCard(c46800205.filter,tp,LOCATION_ONFIELD,loc,1,nil,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c46800205.filter,tp,LOCATION_ONFIELD,loc,1,1,nil,tp)
Duel.SendtoGrave(g,REASON_COST)
end
function c46800205.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,1-tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
end
function c46800205.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetMZoneCount(1-tp)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,1-tp) then
if Duel.SpecialSummonStep(c,0,tp,1-tp,false,false,POS_FACEUP) then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_IMMUNE_EFFECT)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetRange(LOCATION_MZONE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1:SetValue(c46800205.efilter)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetRange(LOCATION_MZONE)
e2:SetReset(RESET_EVENT+RESETS_STANDARD)
e2:SetValue(4000)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EFFECT_UPDATE_DEFENSE)
c:RegisterEffect(e3)
end
Duel.SpecialSummonComplete()
end
end
function c46800205.filter2(c)
return c:IsSetCard(0xa12) and c:IsAbleToHand() and (c:IsType(TYPE_SPELL) or c:IsType(TYPE_TRAP))
end
function c46800205.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end
function c46800205.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c46800205.filter2,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end
function c46800205.op(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
local g=Duel.SelectMatchingCard(tp,c46800205.filter2,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()<=0 then return end
local tc=g:GetFirst()
Duel.SendtoHand(tc,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,tc)
end
\ No newline at end of file
--辉厄剑·空界之咒灵
function c46800210.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,46800210)
e1:SetCondition(c46800210.tdcon1)
e1:SetCost(c46800210.spcost)
e1:SetTarget(c46800210.sptg)
e1:SetOperation(c46800210.spop)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,46800211)
e2:SetCost(c46800210.cost)
e2:SetTarget(c46800210.target)
e2:SetOperation(c46800210.op)
c:RegisterEffect(e2)
local e3=e1:Clone()
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCode(EVENT_FREE_CHAIN)
e3:SetCondition(c46800210.tdcon2)
c:RegisterEffect(e3)
end
function c46800210.tdcon1(e,tp,eg,ep,ev,re,r,rp)
return not Duel.IsPlayerAffectedByEffect(tp,46800220)
end
function c46800210.tdcon2(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsPlayerAffectedByEffect(tp,46800220)
end
function c46800210.efilter(e,te)
return te:GetOwner()~=e:GetOwner()
end
function c46800210.filter(c,tp)
return c:IsAbleToGraveAsCost() and Duel.GetMZoneCount(1-tp,c,tp)>0
end
function c46800210.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
local loc=0
if Duel.IsPlayerAffectedByEffect(tp,46800215) then loc=LOCATION_ONFIELD end
if chk==0 then return Duel.IsExistingMatchingCard(c46800210.filter,tp,LOCATION_ONFIELD,loc,1,nil,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c46800210.filter,tp,LOCATION_ONFIELD,loc,1,1,nil,tp)
Duel.SendtoGrave(g,REASON_COST)
end
function c46800210.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,1-tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
end
function c46800210.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.GetMZoneCount(1-tp)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,1-tp) then
if Duel.SpecialSummonStep(c,0,tp,1-tp,false,false,POS_FACEUP) then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_IMMUNE_EFFECT)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetRange(LOCATION_MZONE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1:SetValue(c46800210.efilter)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetRange(LOCATION_MZONE)
e2:SetReset(RESET_EVENT+RESETS_STANDARD)
e2:SetValue(4000)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EFFECT_UPDATE_DEFENSE)
c:RegisterEffect(e3)
end
Duel.SpecialSummonComplete()
end
end
function c46800210.filter2(c)
return c:IsSetCard(0xa12) and c:IsAbleToHand() and c:IsType(TYPE_MONSTER)
end
function c46800210.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil) end
Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)
end
function c46800210.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c46800210.filter2,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end
function c46800210.op(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
local g=Duel.SelectMatchingCard(tp,c46800210.filter2,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()<=0 then return end
local tc=g:GetFirst()
Duel.SendtoHand(tc,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,tc)
end
\ No newline at end of file
--辉厄剑的蔽天阵
function c46800215.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(46800215)
e2:SetRange(LOCATION_SZONE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetTargetRange(1,0)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_SZONE)
e3:SetCountLimit(1,46800216)
e3:SetCost(c46800215.cost)
e3:SetTarget(c46800215.target)
e3:SetOperation(c46800215.op)
c:RegisterEffect(e3)
end
function c46800215.filter2(c)
return c:IsSetCard(0xa12) and c:IsAbleToHand()
end
function c46800215.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil) end
Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)
end
function c46800215.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c46800215.filter2,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end
function c46800215.op(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
local g=Duel.SelectMatchingCard(tp,c46800215.filter2,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()<=0 then return end
local tc=g:GetFirst()
Duel.SendtoHand(tc,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,tc)
end
\ No newline at end of file
--辉厄剑的诛杀阵
function c46800220.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(46800220)
e2:SetRange(LOCATION_SZONE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetTargetRange(1,0)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_DAMAGE)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
e3:SetRange(LOCATION_SZONE)
e3:SetCountLimit(1,46800221)
e3:SetCondition(c46800220.thcon)
e3:SetTarget(c46800220.thtg)
e3:SetOperation(c46800220.thop)
c:RegisterEffect(e3)
end
function c46800220.cfilter(c,tp)
return c:IsFaceup() and c:IsSetCard(0xa12)
end
function c46800220.thcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c46800220.cfilter,1,nil)
end
function c46800220.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local g=eg:Filter(c46800220.cfilter,nil)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and g:IsContains(chkc) end
if chk==0 then return #g>0 end
if g:GetCount()==1 then
Duel.SetTargetCard(g)
else
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
Duel.SelectTarget(tp,c46800220.tgfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
end
Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,math.floor(Duel.GetFirstTarget():GetAttack()*0.5))
end
function c46800220.thop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and tc:IsFaceup() then
Duel.Damage(1-tp,math.floor(tc:GetAttack()*0.5),REASON_EFFECT)
end
end
\ No newline at end of file
--辉厄剑的的原咒
function c46800225.initial_effect(c)
aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkSetCard,0xa12),1)
c:EnableReviveLimit()
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetCode(EFFECT_EXTRA_LINK_MATERIAL)
e1:SetRange(LOCATION_EXTRA)
e1:SetTargetRange(0,LOCATION_MZONE)
e1:SetValue(c46800225.matval)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetCountLimit(1,46800225)
e2:SetCondition(c46800225.descon)
e2:SetTarget(c46800225.destg)
e2:SetOperation(c46800225.desop)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_DAMAGE)
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetRange(LOCATION_MZONE)
e3:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
e3:SetCost(c46800225.atkcost)
e3:SetTarget(c46800225.target)
e3:SetOperation(c46800225.activate)
c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_CANNOT_ATTACK)
c:RegisterEffect(e4)
local e5=Effect.CreateEffect(c)
e5:SetCategory(CATEGORY_ATKCHANGE)
e5:SetType(EFFECT_TYPE_QUICK_O)
e5:SetRange(LOCATION_MZONE)
e5:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
e5:SetCondition(c46800225.atkcon)
e5:SetCost(c46800225.atkcost2)
e5:SetOperation(c46800225.atkop)
c:RegisterEffect(e5)
end
function c46800225.matval(e,lc,mg,c,tp)
if e:GetHandler()~=lc then return false,nil end
return true,not mg or not mg:IsExists(Card.IsControler,1,nil,1-tp)
end
function c46800225.descon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
end
function c46800225.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(1-tp) and chkc:IsOnField() and chkc:IsType(TYPE_SPELL+TYPE_TRAP) end
if chk==0 then return Duel.IsExistingTarget(nil,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,nil,tp,0,LOCATION_ONFIELD,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
end
function c46800225.desop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then
Duel.Destroy(tc,REASON_EFFECT)
end
end
function c46800225.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:GetFlagEffect(46800225)==0 end
c:RegisterFlagEffect(46800225,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE_CAL,0,1)
end
function c46800225.target(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
local bc=Duel.GetAttacker()
if chk==0 then return bc~=nil and bc:IsControler(1-tp) and bc:IsSetCard(0xa12) and bc:GetBattleTarget()~=c and bc:GetAttack()>0 end
Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,bc:GetAttack())
end
function c46800225.activate(e,tp,eg,ep,ev,re,r,rp)
local bc=Duel.GetAttacker()
if bc:IsRelateToBattle() and bc:IsFaceup() then
Duel.Damage(1-tp,bc:GetAttack(),REASON_EFFECT)
end
end
function c46800225.atkcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local bc=c:GetBattleTarget()
return bc and bc:IsSetCard(0xa12) and bc:GetAttack()>0
end
function c46800225.atkcost2(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:GetFlagEffect(46800225)==0 end
c:RegisterFlagEffect(46800225,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE_CAL,0,1)
end
function c46800225.atkop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local bc=c:GetBattleTarget()
if c:IsRelateToBattle() and c:IsFaceup() and bc:IsRelateToBattle() and bc:IsFaceup() then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE_CAL)
e1:SetValue(bc:GetAttack())
c:RegisterEffect(e1)
end
end
\ No newline at end of file
...@@ -72,7 +72,7 @@ function c75075608.desop(e,tp,eg,ep,ev,re,r,rp) ...@@ -72,7 +72,7 @@ function c75075608.desop(e,tp,eg,ep,ev,re,r,rp)
end end
-- --
function c75075608.fil1ter(c,seq) function c75075608.fil1ter(c,seq)
return c:GetPreviousSequence()<5 and math.abs(seq-c:GetPreviousSequence())==1 and :IsRace(RACE_BEAST+RACE_FAIRY) return c:GetPreviousSequence()<5 and math.abs(seq-c:GetPreviousSequence())==1 and c:IsRace(RACE_BEAST+RACE_FAIRY)
end end
function c75075608.fil2ter(c,seq) function c75075608.fil2ter(c,seq)
return c:GetPreviousSequence()<5 and math.abs(seq-c:GetPreviousSequence())==1 return c:GetPreviousSequence()<5 and math.abs(seq-c:GetPreviousSequence())==1
......
...@@ -74,10 +74,11 @@ function c75075610.desop(e,tp,eg,ep,ev,re,r,rp) ...@@ -74,10 +74,11 @@ function c75075610.desop(e,tp,eg,ep,ev,re,r,rp)
local tg=g:Filter(Card.IsRelateToEffect,nil,e) local tg=g:Filter(Card.IsRelateToEffect,nil,e)
if tg:GetCount()>0 then if tg:GetCount()>0 then
if Duel.SendtoHand(tg,nil,REASON_EFFECT)~=0 then if Duel.SendtoHand(tg,nil,REASON_EFFECT)~=0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c75075610.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,tc,e,tp) local g=Duel.SelectMatchingCard(tp,c75075610.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,tc,e,tp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end
end end
end end
end end
\ No newline at end of file
...@@ -84,11 +84,11 @@ function c75075612.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -84,11 +84,11 @@ function c75075612.activate(e,tp,eg,ep,ev,re,r,rp)
local gg=Duel.SelectMatchingCard(tp,Card.IsAbleToGrave,tp,LOCATION_MZONE,0,1,nil) local gg=Duel.SelectMatchingCard(tp,Card.IsAbleToGrave,tp,LOCATION_MZONE,0,1,nil)
if Duel.SendtoGrave(gg,REASON_EFFECT)~=0 then if Duel.SendtoGrave(gg,REASON_EFFECT)~=0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local ggg=Duel.SelectMatchingCard(tp,(c75075612.thfilter,tp,LOCATION_GRAVE,0,1,nil) local ggg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c75075612.thfilter),tp,LOCATION_GRAVE,0,1,nil)
Duel.SendtoHand(ggg,nil,REASON_EFFECT) Duel.SendtoHand(ggg,nil,REASON_EFFECT)
Duel.ConfirmCards(ggg,1-tp) Duel.ConfirmCards(ggg,1-tp)
end end
end end
end end
function c75075612.thcon(e,tp,eg,ep,ev,re,r,rp) function c75075612.thcon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject() local tc=e:GetLabelObject()
......
...@@ -612,8 +612,6 @@ ...@@ -612,8 +612,6 @@
!setname 0xca7 爱国者 !setname 0xca7 爱国者
!setname 0xca8 霜星 !setname 0xca8 霜星
!setname 0xca9 Hollow Knight !setname 0xca9 Hollow Knight
!setname 0xca12 鲨鱼
!counter 0xca13 鲨鱼指示物
!setname 0xcaa 永狱 !setname 0xcaa 永狱
!setname 0xcab 镜碎 !setname 0xcab 镜碎
!counter 0x10cb 镜碎指示物 !counter 0x10cb 镜碎指示物
...@@ -1250,7 +1248,6 @@ ...@@ -1250,7 +1248,6 @@
!setname 0xa0b 祸津榆 !setname 0xa0b 祸津榆
#梦宇 468 0xa10-0xa1f qq:3142105474 #梦宇 468 0xa10-0xa1f qq:3142105474
!setname 0xa12 辉厄剑
#L.R.Zhang & Gim J.Blocks 502 0xcb0-0xcbf #L.R.Zhang & Gim J.Blocks 502 0xcb0-0xcbf
!setname 0xcb1 数码兽 !setname 0xcb1 数码兽
......
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