Skip to content

Y
ygopro-THC-cards
Commit 70949c82 authored by wyykak's avatar wyykak
Browse files
Options

fix c23162.lua

parent 343c27d3
Pipeline #8559 passed with stage
    in 36 seconds
    Hide whitespace changes
    Inline Side-by-side
    Showing with 85 additions and 85 deletions
    script/c23162.lua
    View file @ 70949c82
    --两栖类的神明✿洩矢诹访子
    function c23162.initial_effect(c)
    --fusion material
    c:EnableReviveLimit()
    Fus.AddFusionProcFun2(c,aux.FilterBoolFunction(Card.IsFusionSetCard,0x497),aux.FilterBoolFunction(c23162.fusfilter),true)
    --atk
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCode(EFFECT_SET_BASE_ATTACK)
    e1:SetValue(c23162.val)
    c:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EFFECT_SET_BASE_DEFENSE)
    c:RegisterEffect(e2)
    --atkup
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e3:SetRange(LOCATION_MZONE)
    e3:SetCode(EFFECT_UPDATE_ATTACK)
    e3:SetValue(c23162.atkup)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_UPDATE_DEFENSE)
    c:RegisterEffect(e4)
    local e5=Effect.CreateEffect(c)
    e5:SetDescription(aux.Stringid(23162,0))
    e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e5:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
    e5:SetCode(EVENT_TO_GRAVE)
    --e5:SetCondition(c23162.condition)
    e5:SetTarget(c23162.target)
    e5:SetOperation(c23162.operation)
    c:RegisterEffect(e5)
    end
    c23162.material_setcode=0x497
    function c23162.fusfilter(c)
    return c:GetCounter(0x128a)>0
    end
    function c23162.val(e,c)
    return Duel.GetCounter(0,LOCATION_ONFIELD,LOCATION_ONFIELD,0x128a)*300
    end
    function c23162.atkfilter(c)
    return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_EARTH)
    end
    function c23162.atkup(e,c)
    return Duel.GetMatchingGroupCount(c23162.atkfilter,0,LOCATION_MZONE,LOCATION_MZONE,nil)*500
    end
    function c23162.condition(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)
    end
    function c23162.filter(c)
    return c:IsAbleToDeck()
    end
    function c23162.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chk==0 then return Duel.IsExistingMatchingCard(c23162.filter,tp,LOCATION_GRAVE,0,2,nil) end
    end
    function c23162.operation(e,tp,eg,ep,ev,re,r,rp)
    if not Duel.IsExistingMatchingCard(c23162.filter,tp,LOCATION_GRAVE,0,2,nil) then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local g=Duel.SelectMatchingCard(tp,c23162.filter,tp,LOCATION_GRAVE,0,2,2,nil)
    Duel.ConfirmCards(1-tp,g)
    Duel.SendtoDeck(g,nil,1,REASON_COST)
    Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(23162,5))
    local se1=Duel.SelectOption(tp,aux.Stringid(23162,1),aux.Stringid(23162,2))+1
    Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(23162,6))
    local se2=Duel.SelectOption(tp,aux.Stringid(23162,3),aux.Stringid(23162,4))+1
    local code=0
    local fp=0
    if se1==1 then
    code=23178
    else
    code=23179
    end
    if se2==1 then
    fp=tp
    else
    fp=1-tp
    end
    local field=Duel.CreateToken(tp,code)
    Duel.MoveToField(field,tp,fp,LOCATION_SZONE,POS_FACEUP,true)
    Duel.RaiseEvent(field,EVENT_CHAIN_SOLVED,field:GetActivateEffect(),0,tp,tp,Duel.GetCurrentChain())
    end
    --两栖类的神明✿洩矢诹访子
    function c23162.initial_effect(c)
    --fusion material
    c:EnableReviveLimit()
    Fus.AddFusionProcFun2(c,aux.FilterBoolFunction(Card.IsFusionSetCard,0x497),aux.FilterBoolFunction(c23162.fusfilter),true)
    --atk
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCode(EFFECT_SET_BASE_ATTACK)
    e1:SetValue(c23162.val)
    c:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EFFECT_SET_BASE_DEFENSE)
    c:RegisterEffect(e2)
    --atkup
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e3:SetRange(LOCATION_MZONE)
    e3:SetCode(EFFECT_UPDATE_ATTACK)
    e3:SetValue(c23162.atkup)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_UPDATE_DEFENSE)
    c:RegisterEffect(e4)
    local e5=Effect.CreateEffect(c)
    e5:SetDescription(aux.Stringid(23162,0))
    e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e5:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
    e5:SetCode(EVENT_TO_GRAVE)
    --e5:SetCondition(c23162.condition)
    e5:SetTarget(c23162.target)
    e5:SetOperation(c23162.operation)
    c:RegisterEffect(e5)
    end
    c23162.material_setcode=0x497
    function c23162.fusfilter(c)
    return c:GetCounter(0x128a)>0
    end
    function c23162.val(e,c)
    return Duel.GetCounter(0,LOCATION_ONFIELD,LOCATION_ONFIELD,0x128a)*300
    end
    function c23162.atkfilter(c)
    return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_EARTH)
    end
    function c23162.atkup(e,c)
    return Duel.GetMatchingGroupCount(c23162.atkfilter,0,LOCATION_MZONE,LOCATION_MZONE,nil)*500
    end
    function c23162.condition(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)
    end
    function c23162.filter(c)
    return c:IsAbleToDeck()
    end
    function c23162.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chk==0 then return Duel.IsExistingMatchingCard(c23162.filter,tp,LOCATION_GRAVE,0,2,nil) end
    end
    function c23162.operation(e,tp,eg,ep,ev,re,r,rp)
    if not Duel.IsExistingMatchingCard(c23162.filter,tp,LOCATION_GRAVE,0,2,nil) then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local g=Duel.SelectMatchingCard(tp,c23162.filter,tp,LOCATION_GRAVE,0,2,2,nil)
    Duel.ConfirmCards(1-tp,g)
    Duel.SendtoDeck(g,nil,1,REASON_COST)
    Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(23162,5))
    local se1=Duel.SelectOption(tp,aux.Stringid(23162,1),aux.Stringid(23162,2))+1
    Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(23162,6))
    local se2=Duel.SelectOption(tp,aux.Stringid(23162,3),aux.Stringid(23162,4))+1
    local code=0
    local fp=0
    if se1==1 then
    code=23178
    else
    code=23179
    end
    if se2==1 then
    fp=tp
    else
    fp=1-tp
    end
    local field=Duel.CreateToken(tp,code)
    Duel.MoveToField(field,tp,fp,LOCATION_FZONE,POS_FACEUP,true)
    Duel.RaiseEvent(field,EVENT_CHAIN_SOLVED,field:GetActivateEffect(),0,tp,tp,Duel.GetCurrentChain())
    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