Skip to content

Y
ygopro-222DIY-cards
Commit ea7864f5 authored by Tachibana's avatar Tachibana
Browse files
Options

ybb

parent d2060e3e
Pipeline #10177 passed with stage
    in 25 minutes and 13 seconds
    Hide whitespace changes
    Inline Side-by-side
    Showing with 3 additions and 143 deletions
    expansions/222DIY.cdb
    View file @ ea7864f5
    No preview for this file type
    expansions/lflist.conf
    View file @ ea7864f5
    #[2022.2 DIY] #[2022.3 DIY]
    !2022.2 DIY !2022.3 DIY
    #1 #1
    00113217 1 --小红花 00113217 1 --小红花
    ......
    expansions/script/c111000.lua deleted 100644 → 0
    View file @ d2060e3e
    --替身-天堂制造
    local m=111000
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetCategory(CATEGORY_DRAW+CATEGORY_DICE+CATEGORY_DAMAGE+CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE+CATEGORY_RECOVER+CATEGORY_REMOVE)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetHintTiming(0,TIMING_STANDBY_PHASE)
    e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
    e1:SetTarget(cm.target)
    e1:SetOperation(cm.activate)
    c:RegisterEffect(e1)
    end
    cm.toss_dice=true
    function cm.filter(c)
    return c:IsType(TYPE_SPELL+TYPE_TRAP)
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chk==0 then return Duel.GetFlagEffect(tp,m)==0 end
    Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,1000)
    Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,3)
    Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,0,tp,3)
    local tc=Duel.GetTurnCount()
    if Duel.GetTurnPlayer()==tp then tc=tc+5
    else tc=tc+6
    end
    Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,tc*800)
    local g1=Duel.GetFieldGroup(tp,0,LOCATION_ONFIELD)
    local g2=Duel.GetFieldGroup(tp,LOCATION_ONFIELD,0)
    Duel.SetOperationInfo(0,CATEGORY_REMOVE,g1,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_REMOVE,g2,1,0,0)
    Duel.RegisterFlagEffect(tp,m,RESET_CHAIN,0,1)
    end
    function cm.activate(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local j=0
    local p
    local dc=Duel.TossDice(tp,1)
    if dc==1 and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_DECK,0,1,nil,m) and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
    local g=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK,0,1,1,nil,m)
    local tc=g:GetFirst()
    Duel.SSet(tp,tc)
    end
    if dc==2 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
    Duel.Damage(1-tp,1000,REASON_EFFECT)
    end
    if dc==3 then
    if Duel.IsPlayerCanDraw(tp,3) and Duel.SelectYesNo(tp,aux.Stringid(m,2)) and Duel.Draw(tp,3,REASON_EFFECT)==3 then
    Duel.ShuffleHand(tp)
    Duel.BreakEffect()
    local tg=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_HAND,0,nil)
    if tg:GetCount()<3 then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local dg=tg:Select(tp,3,3,nil)
    Duel.SendtoDeck(dg,nil,2,REASON_EFFECT)
    end
    end
    if dc==4 and Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,3)) then
    local sg=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,0,nil)
    local c=e:GetHandler()
    local tc=sg:GetFirst()
    while tc do
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_UPDATE_ATTACK)
    e1:SetValue(1000)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e1)
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_UPDATE_DEFENSE)
    e2:SetValue(1000)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e2)
    tc=sg:GetNext()
    end
    end
    if dc==5 then
    local tc=Duel.GetTurnCount()
    if Duel.GetTurnPlayer()==tp then tc=tc+5
    else tc=tc+6
    end
    Duel.Recover(tp,tc*800,REASON_EFFECT)
    end
    if dc==6 and ((Duel.IsPlayerCanRemove(1-tp) and Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD,1,nil)) or (Duel.IsPlayerCanRemove(tp) and Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,LOCATION_ONFIELD,0,1,nil))) and Duel.SelectYesNo(tp,aux.Stringid(m,4)) then
    local g1=Duel.GetFieldGroup(tp,0,LOCATION_ONFIELD)
    local g2=Duel.GetFieldGroup(1-tp,0,LOCATION_ONFIELD)
    if g2:GetCount()>0 then
    Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_REMOVE)
    local sg2=Duel.SelectMatchingCard(1-tp,Card.IsAbleToRemove,1-tp,LOCATION_ONFIELD,0,1,1,nil,1-tp,POS_FACEDOWN,REASON_RULE)
    Duel.Remove(sg2,POS_FACEDOWN,REASON_RULE)
    end
    if g1:GetCount()>0 then
    Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_REMOVE)
    local sg1=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_ONFIELD,0,1,1,nil,tp,POS_FACEDOWN,REASON_RULE)
    Duel.Remove(sg1,POS_FACEDOWN,REASON_RULE)
    end
    end
    if Duel.GetTurnPlayer()==tp then
    Duel.SkipPhase(tp,PHASE_DRAW,RESET_PHASE+PHASE_END,1)
    Duel.SkipPhase(tp,PHASE_STANDBY,RESET_PHASE+PHASE_END,1)
    Duel.SkipPhase(tp,PHASE_MAIN1,RESET_PHASE+PHASE_END,1)
    Duel.SkipPhase(tp,PHASE_BATTLE,RESET_PHASE+PHASE_END,1)
    Duel.SkipPhase(tp,PHASE_MAIN2,RESET_PHASE+PHASE_END,1)
    Duel.SkipPhase(tp,PHASE_END,RESET_PHASE+PHASE_END,1)
    end
    if dc>1 then
    if dc>3 then dc=3 end
    if Duel.GetTurnPlayer()==tp then
    dc=dc-1
    Duel.SkipPhase(1-tp,PHASE_DRAW,RESET_PHASE+PHASE_END,dc)
    Duel.SkipPhase(1-tp,PHASE_STANDBY,RESET_PHASE+PHASE_END,dc)
    Duel.SkipPhase(1-tp,PHASE_MAIN1,RESET_PHASE+PHASE_END,dc)
    Duel.SkipPhase(1-tp,PHASE_BATTLE,RESET_PHASE+PHASE_END,dc)
    Duel.SkipPhase(1-tp,PHASE_MAIN2,RESET_PHASE+PHASE_END,dc)
    Duel.SkipPhase(1-tp,PHASE_END,RESET_PHASE+PHASE_END,dc)
    Duel.SkipPhase(tp,PHASE_DRAW,RESET_PHASE+PHASE_END,dc+1)
    Duel.SkipPhase(tp,PHASE_STANDBY,RESET_PHASE+PHASE_END,dc+1)
    Duel.SkipPhase(tp,PHASE_MAIN1,RESET_PHASE+PHASE_END,dc+1)
    Duel.SkipPhase(tp,PHASE_BATTLE,RESET_PHASE+PHASE_END,dc+1)
    Duel.SkipPhase(tp,PHASE_MAIN2,RESET_PHASE+PHASE_END,dc+1)
    Duel.SkipPhase(tp,PHASE_END,RESET_PHASE+PHASE_END,dc+1)
    else
    Duel.SkipPhase(1-tp,PHASE_DRAW,RESET_PHASE+PHASE_END,dc)
    Duel.SkipPhase(1-tp,PHASE_STANDBY,RESET_PHASE+PHASE_END,dc)
    Duel.SkipPhase(1-tp,PHASE_MAIN1,RESET_PHASE+PHASE_END,dc)
    Duel.SkipPhase(1-tp,PHASE_BATTLE,RESET_PHASE+PHASE_END,dc)
    Duel.SkipPhase(1-tp,PHASE_MAIN2,RESET_PHASE+PHASE_END,dc)
    Duel.SkipPhase(1-tp,PHASE_END,RESET_PHASE+PHASE_END,dc)
    Duel.SkipPhase(tp,PHASE_DRAW,RESET_PHASE+PHASE_END,dc)
    Duel.SkipPhase(tp,PHASE_STANDBY,RESET_PHASE+PHASE_END,dc)
    Duel.SkipPhase(tp,PHASE_MAIN1,RESET_PHASE+PHASE_END,dc)
    Duel.SkipPhase(tp,PHASE_BATTLE,RESET_PHASE+PHASE_END,dc)
    Duel.SkipPhase(tp,PHASE_MAIN2,RESET_PHASE+PHASE_END,dc)
    Duel.SkipPhase(tp,PHASE_END,RESET_PHASE+PHASE_END,dc)
    end
    end
    end
    expansions/strings.conf
    View file @ ea7864f5
    ...@@ -531,6 +531,7 @@ ...@@ -531,6 +531,7 @@
    #空鸽 1058604496 170 0x7f0-0x7ff #空鸽 1058604496 170 0x7f0-0x7ff
    !setname 0x7f0 Million !setname 0x7f0 Million
    !setname 0x37f0 Million Arthur !setname 0x37f0 Million Arthur
    !setname 0x37f1 地球界线
    !setname 0x27f2 雷维翁 !setname 0x27f2 雷维翁
    !setname 0x47f2 冰狱冥河 !setname 0x47f2 冰狱冥河
    !setname 0x37f3 灾杰/Omen !setname 0x37f3 灾杰/Omen
    ......
    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