Skip to content

Y
ygopro-THC-cards
Commit 5adda292 authored by GuGu's avatar GuGu
Browse files
Options

Update c19114514.lua 选怪优化

parent c3a16990
Pipeline #20076 canceled with stage
    in 3 minutes and 18 seconds
    Show whitespace changes
    Inline Side-by-side
    Showing with 54 additions and 56 deletions
    script/c19114514.lua
    View file @ 5adda292
    ...@@ -16,32 +16,16 @@ function cm.initial_effect(c) ...@@ -16,32 +16,16 @@ function cm.initial_effect(c)
    e1:SetOperation(cm.operation) e1:SetOperation(cm.operation)
    c:RegisterEffect(e1) c:RegisterEffect(e1)
    --tograve --tograve
    local e1=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,1)) e2:SetDescription(aux.Stringid(m,1))
    e1:SetCategory(CATEGORY_DESTROY) e2:SetCategory(CATEGORY_DESTROY)
    e1:SetType(EFFECT_TYPE_QUICK_O) e2:SetType(EFFECT_TYPE_QUICK_O)
    e1:SetCode(EVENT_FREE_CHAIN) e2:SetCode(EVENT_FREE_CHAIN)
    e1:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
    e1:SetCountLimit(2,m) e2:SetCountLimit(2,m)
    e1:SetTarget(cm.tg) e2:SetTarget(cm.tg)
    e1:SetOperation(cm.op) e2:SetOperation(cm.op)
    c:RegisterEffect(e1) c:RegisterEffect(e2)
    --atkup
    local e4=Effect.CreateEffect(c)
    e4:SetType(EFFECT_TYPE_SINGLE)
    e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e4:SetCode(EFFECT_UPDATE_ATTACK)
    e4:SetRange(LOCATION_MZONE)
    e4:SetValue(cm.atkval)
    c:RegisterEffect(e4)
    --dfsup
    local e4=Effect.CreateEffect(c)
    e4:SetType(EFFECT_TYPE_SINGLE)
    e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e4:SetCode(EFFECT_UPDATE_DEFENSE)
    e4:SetRange(LOCATION_MZONE)
    e4:SetValue(cm.dfsval)
    c:RegisterEffect(e4)
    --search --search
    local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
    e3:SetDescription(aux.Stringid(m,2)) e3:SetDescription(aux.Stringid(m,2))
    ...@@ -53,12 +37,23 @@ function cm.initial_effect(c) ...@@ -53,12 +37,23 @@ function cm.initial_effect(c)
    e3:SetTarget(cm.thtg) e3:SetTarget(cm.thtg)
    e3:SetOperation(cm.thop) e3:SetOperation(cm.thop)
    c:RegisterEffect(e3) c:RegisterEffect(e3)
    --atk/dfsup
    local e4=Effect.CreateEffect(c)
    e4:SetType(EFFECT_TYPE_SINGLE)
    e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e4:SetCode(EFFECT_UPDATE_ATTACK)
    e4:SetRange(LOCATION_MZONE)
    e4:SetValue(cm.atkval)
    c:RegisterEffect(e4)
    local e5=e4:Clone()
    e5:SetCode(EFFECT_UPDATE_DEFENSE)
    c:RegisterEffect(e5)
    end end
    --function cm.condition(e,tp,eg,ep,ev,re,r,rp) --function cm.condition(e,tp,eg,ep,ev,re,r,rp)
    -- return e:GetHandler():GetSummonType()==SUMMON_TYPE_SYNCHRO -- return e:GetHandler():GetSummonType()==SUMMON_TYPE_SYNCHRO
    --end --end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk) function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.IsExistingMatchingCard(cm.filter1,tp,LOCATION_DECK+LOCATION_GRAVE,0,3,nil) end if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.IsExistingMatchingCard(cm.filter1,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_EQUIP,nil,1,tp,LOCATION_DECK+LOCATION_GRAVE) Duel.SetOperationInfo(0,CATEGORY_EQUIP,nil,1,tp,LOCATION_DECK+LOCATION_GRAVE)
    end end
    function cm.filter1(c) function cm.filter1(c)
    ...@@ -66,14 +61,17 @@ function cm.filter1(c) ...@@ -66,14 +61,17 @@ function cm.filter1(c)
    end end
    function cm.operation(e,tp,eg,ep,ev,re,r,rp) function cm.operation(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler() local c=e:GetHandler()
    if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end local ft=Duel.GetLocationCount(tp,LOCATION_SZONE)
    local g=Duel.GetMatchingGroup(cm.filter1,tp,LOCATION_DECK+LOCATION_GRAVE,0,nil)
    if ft<=0 or g:GetCount()<=0 then return end
    ft=math.min(ft,g:GetCount())
    if ft>3 then ft=3 end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
    local g=Duel.SelectMatchingCard(tp,cm.filter1,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,3,nil)
    local sg=g:SelectSubGroup(tp,aux.dncheck,false,1,ft) local sg=g:SelectSubGroup(tp,aux.dncheck,false,1,ft)
    if sg and sg:GetCount()>0 then if sg and sg:GetCount()>0 then
    local sc=sg:GetFirst() local sc=sg:GetFirst()
    while sc do while sc do
    if not Duel.Equip(tp,sc,c,true,false)then return end if not Duel.Equip(tp,sc,c,true,false) then return end
    local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
    e1:SetProperty(EFFECT_FLAG_COPY_INHERIT+EFFECT_FLAG_OWNER_RELATE) e1:SetProperty(EFFECT_FLAG_COPY_INHERIT+EFFECT_FLAG_OWNER_RELATE)
    e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
    ......
    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