Skip to content

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

gugu pack 

Signed-off-by: wyykak's avatarwyykak <wyy_1414@126.com>
parent c0e32b5a
Pipeline #29190 passed with stage
    in 12 seconds
    Show whitespace changes
    Inline Side-by-side
    Showing with 141 additions and 128 deletions
    script/c29053.lua
    View file @ c95bbaad
    ......@@ -43,19 +43,19 @@ c29053.DescSetName=0x826
    --效果条件：其它卡的效果将这张卡加入手卡
    function c29053.condition1(e,tp,eg,ep,ev,re,r,rp)
    return not e:GetHandler():IsReason(REASON_DRAW)
    return not e:GetHandler():IsReason(REASON_DRAW) and re:GetHandler()~=e:GetHandler()
    end
    --效果对象：这张卡
    function c29053.target1(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return true end
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
    end
    --发动操作：特殊召唤这张卡
    function c29053.operation1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) then
    if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
    Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
    end
    end
    ......
    script/c29056.lua
    View file @ c95bbaad
    ......@@ -19,7 +19,7 @@ function c29056.initial_effect(c)
    e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
    e2:SetCode(EVENT_TO_GRAVE)
    e2:SetCountLimit(1,29054)
    e2:SetCountLimit(1,29057)
    e2:SetCondition(c29056.condition2)
    e2:SetTarget(c29056.target2)
    e2:SetOperation(c29056.operation2)
    ......@@ -44,19 +44,19 @@ c29056.DescSetName=0x826
    --效果条件：其它卡的效果将这张卡加入手卡
    function c29056.condition1(e,tp,eg,ep,ev,re,r,rp)
    return not e:GetHandler():IsReason(REASON_DRAW)
    return not e:GetHandler():IsReason(REASON_DRAW) and re:GetHandler()~=e:GetHandler()
    end
    --效果对象：这张卡
    function c29056.target1(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return true end
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
    end
    --发动操作：特殊召唤这张卡
    function c29056.operation1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) then
    if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
    Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
    end
    end
    ......
    script/c29059.lua
    View file @ c95bbaad
    ......@@ -19,15 +19,20 @@ function c29059.initial_effect(c)
    --Effect Negate
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
    e2:SetProperty(EFFECT_FLAG_DELAY)
    e2:SetCode(EVENT_DRAW)
    e2:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
    e2:SetCondition(c29059.condition2)
    e2:SetOperation(c29059.operation2)
    c:RegisterEffect(e2)
    end
    function c29059.sfilter(c)
    end
    --
    c29059.DescSetName=0x826
    --
    function c29059.sfilter(c)
    return c:GetAttack()<=1000 and c:IsSetCard(0x208)
    end
    end
    --Effect 1
    ......@@ -66,7 +71,7 @@ end
    --效果条件：这张卡在怪兽区域或墓地存在
    function c29059.condition2(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetCurrentPhase()~=PHASE_DRAW
    return Duel.GetCurrentPhase()~=PHASE_DRAW and ep~=tp
    end
    --发动操作：对方不能从手卡发动效果
    ......
    script/c31081.lua
    View file @ c95bbaad
    ......@@ -21,33 +21,36 @@ function c31081.initial_effect(c)
    e2:SetCost(c31081.cost2)
    e2:SetOperation(c31081.operation2)
    c:RegisterEffect(e2)
    end
    function c31081.counterfilter(c)
    end
    c31081.DescSetName=0x258
    function c31081.counterfilter(c)
    return c:IsRace(RACE_BEAST)
    end
    end
    --Monster Effect 1
    function c31081.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    --Monster Effect 1
    function c31081.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(31081,tp,ACTIVITY_SPSUMMON)==0
    and e:GetHandler():IsAbleToHandAsCost() end
    Duel.SendtoHand(e:GetHandler(), nil, REASON_COST)
    end
    function c31081.splimit(e,c,sump,sumtype,sumpos,targetp,se)
    end
    function c31081.splimit(e,c,sump,sumtype,sumpos,targetp,se)
    return c:IsRace(RACE_BEAST)
    end
    --效果条件：自己墓地的兽族怪兽或者「0x258」怪兽
    function c31081.filter1b(c,e,tp)
    end
    --效果条件：自己墓地的兽族怪兽或者「0x258」怪兽
    function c31081.filter1b(c,e,tp)
    return (c:IsRace(RACE_BEAST) or c:IsSetCard(0x258)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function c31081.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    end
    function c31081.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c31081.filter1b(chkc,e,tp) end
    if chk==0 then return Duel.IsExistingTarget(c31081.filter1b,tp,LOCATION_GRAVE,0,1,nil,e,tp)
    and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectTarget(tp,c31081.filter1b,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
    end
    function c31081.operation1(e,tp,eg,ep,ev,re,r,rp)
    end
    function c31081.operation1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local tc=Duel.GetFirstTarget()
    if tc and tc:IsRelateToEffect(e) then
    ......@@ -61,13 +64,13 @@ function c31081.initial_effect(c)
    e1:SetTarget(c31081.splimit)
    e1:SetReset(RESET_PHASE+PHASE_END)
    Duel.RegisterEffect(e1,tp)
    end
    --Monster Effect 2
    function c31081.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
    end
    --Monster Effect 2
    function c31081.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return c:IsAbleToDeckAsCost() end
    Duel.SendtoDeck(c,nil,0,REASON_COST)
    end
    end
    function c31081.operation2(e,tp,eg,ep,ev,re,r,rp)
    local token=Duel.CreateToken(tp,200112)
    Duel.MoveToField(token,tp,tp,LOCATION_FZONE,POS_FACEUP,true)
    ......
    script/c31084.lua
    View file @ c95bbaad
    ......@@ -21,33 +21,34 @@ function c31084.initial_effect(c)
    e2:SetCost(c31084.cost2)
    e2:SetOperation(c31084.operation2)
    c:RegisterEffect(e2)
    end
    function c31084.counterfilter(c)
    end
    c31084.DescSetName=0x258
    function c31084.counterfilter(c)
    return c:GetAttribute()==ATTRIBUTE_EARTH
    end
    end
    --Monster Effect 1
    function c31084.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    --Monster Effect 1
    function c31084.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(31084,tp,ACTIVITY_SPSUMMON)==0
    and e:GetHandler():IsAbleToHandAsCost() end
    Duel.SendtoHand(e:GetHandler(), nil, REASON_COST)
    end
    function c31084.splimit(e,c,sump,sumtype,sumpos,targetp,se)
    return c:GetAttribute()==ATTRIBUTE_EARTH
    end
    --效果条件：自己墓地的地属性怪兽或者「0x258」怪兽
    function c31084.filter1b(c,e,tp)
    end
    function c31084.splimit(e,c,sump,sumtype,sumpos,targetp,se)
    return c:GetAttribute()~=ATTRIBUTE_EARTH
    end
    --效果条件：自己墓地的地属性怪兽或者「0x258」怪兽
    function c31084.filter1b(c,e,tp)
    return (c:IsAttribute(ATTRIBUTE_EARTH) or c:IsSetCard(0x258)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function c31084.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    end
    function c31084.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c31084.filter1b(chkc,e,tp) end
    if chk==0 then return Duel.IsExistingTarget(c31084.filter1b,tp,LOCATION_GRAVE,0,1,nil,e,tp)
    and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
    and Duel.GetMZoneCount(tp,e:GetHandler())>0 end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectTarget(tp,c31084.filter1b,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
    end
    function c31084.operation1(e,tp,eg,ep,ev,re,r,rp)
    end
    function c31084.operation1(e,tp,eg,ep,ev,re,r,rp)
    local tc=Duel.GetFirstTarget()
    if tc and tc:IsRelateToEffect(e) then
    Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
    ......@@ -60,17 +61,17 @@ function c31084.initial_effect(c)
    e1:SetTarget(c31084.splimit)
    e1:SetReset(RESET_PHASE+PHASE_END)
    Duel.RegisterEffect(e1,tp)
    end
    --Monster Effect 2
    end
    --Monster Effect 2
    --效果条件：游戏中除外的这张卡
    function c31084.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
    --效果条件：游戏中除外的这张卡
    function c31084.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return c:IsAbleToDeckAsCost() end
    Duel.SendtoDeck(c,nil,0,REASON_COST)
    end
    end
    --发动操作：自己回复1000基本分。
    --发动操作：自己回复1000基本分。
    function c31084.operation2(e,tp,eg,ep,ev,re,r,rp)
    Duel.Recover(tp,1000,REASON_EFFECT)
    end
    script/c31093.lua
    View file @ c95bbaad
    ......@@ -13,6 +13,7 @@ function s.initial_effect(c)
    c:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
    e2:SetTarget(aux.TRUE)
    e2:SetValue(100)
    c:RegisterEffect(e2)
    --②
    ......@@ -31,8 +32,11 @@ function s.initial_effect(c)
    --③
    local e4=Effect.CreateEffect(c)
    e4:SetDescription(aux.Stringid(id,1))
    e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
    e4:SetCode(EVENT_BATTLE_DESTROYED)
    e4:SetRange(LOCATION_HAND)
    e4:SetCondition(s.spcon)
    e4:SetTarget(s.sptg)
    e4:SetOperation(s.spop)
    ......@@ -40,7 +44,7 @@ function s.initial_effect(c)
    end
    function s.thfilter(c)
    return c:IsSetCard(0x275) and c:IsAbleToHand()
    return c:IsSetCard(0x275) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
    end
    function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
    ......@@ -56,21 +60,21 @@ function s.thop(e,tp,eg,ep,ev,re,r,rp)
    Duel.ConfirmCards(1-tp,g)
    end
    end
    function s.spfilter(c,tp)
    return c:IsPreviousControler(tp)
    end
    function s.spcon(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local bc=c:GetBattleTarget()
    return c:IsLocation(LOCATION_HAND) and bc and bc:IsType(TYPE_MONSTER)
    return not eg:IsContains(e:GetHandler()) and eg:IsExists(s.spfilter,1,nil,tp)
    end
    function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return true end
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
    end
    function s.spop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) then
    if c:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
    Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
    end
    end
    script/c4114226.lua
    View file @ c95bbaad
    ......@@ -103,7 +103,7 @@ function c4114226.tg3(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    and Duel.IsExistingMatchingCard(c4114226.filter3,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
    end
    function c4114226.spop(e,tp,eg,ep,ev,re,r,rp)
    function c4114226.op3(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,c4114226.filter3,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp)
    ......
    script/c431404.lua
    View file @ c95bbaad
    ......@@ -30,7 +30,7 @@ function c431404.shtg(e,tp,eg,ep,ev,re,r,rp,chk)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
    end
    function c431404.shop(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_MZONE)>1
    if Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsPlayerCanSpecialSummonMonster(tp,91400,0,0x4011,0,0,2,RACE_BEAST,ATTRIBUTE_EARTH) then
    local token=Duel.CreateToken(tp,91400)
    Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
    ......
    script/c50252.lua
    View file @ c95bbaad
    ......@@ -22,14 +22,14 @@ function c50252.bcost(e,tp,eg,ep,ev,re,r,rp,chk)
    e:GetHandler():RemoveOverlayCard(tp,3,3,REASON_COST)
    end
    function c50252.btg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE) >= 0
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsPlayerCanSpecialSummonMonster(tp,50652,0x250,0x4011,0,1600,1,RACE_PLANT,ATTRIBUTE_WIND) end
    Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
    end
    function c50252.bop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if Duel.GetMZoneCount(tp)<0 or not Duel.IsPlayerCanSpecialSummonMonster(tp,50652,0x250,0x4011,0,1600,1,RACE_PLANT,ATTRIBUTE_WIND) then return end
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 or not Duel.IsPlayerCanSpecialSummonMonster(tp,50652,0x250,0x4011,0,1600,1,RACE_PLANT,ATTRIBUTE_WIND) then return end
    local token = Duel.CreateToken(tp,50652)
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    ......
    script/c74561061.lua
    View file @ c95bbaad
    ......@@ -32,8 +32,8 @@ function cCardno.rfilter(c)
    return c:IsLevel(2) and c:IsSetCard(0x208)
    end
    function cCardno.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.CheckReleaseGroupEx(tp,cCardno.rfilter,1,nil) end
    local g=Duel.SelectReleaseGroupEx(tp,cCardno.rfilter,1,1,nil)
    if chk==0 then return Duel.CheckReleaseGroupEx(tp,cCardno.rfilter,1,REASON_COST,true,nil) end
    local g=Duel.SelectReleaseGroupEx(tp,cCardno.rfilter,1,1,REASON_COST,true,nil)
    local rc=g:GetFirst()
    Duel.SetTargetCard(rc)
    Duel.Release(rc,REASON_COST)
    ......
    script/c74563034.lua
    View file @ c95bbaad
    ......@@ -31,7 +31,7 @@ function c74563034.initial_effect(c)
    --syn
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetCode(EFFECT_SYNCHRO_MATERIAL)
    e2:SetCode(EFFECT_EXTRA_SYNCHRO_MATERIAL)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_IGNORE_IMMUNE)
    e2:SetRange(LOCATION_FZONE)
    e2:SetTargetRange(0,LOCATION_MZONE)
    ......@@ -72,7 +72,7 @@ function c74563034.slevel(e,c)
    end
    function c74563034.mtval(e,c)
    if not c then return false end
    return c:IsRace(RACE_FAIRY) and c:IsAttribute(ATTRIBUTE_LIGHT)
    return c:IsRace(RACE_FAIRY) and c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsControler(e:GetOwnerPlayer())
    end
    function c74563034.adjustop(e,tp,eg,ep,ev,re,r,rp)
    local c=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