Commit ebf3013b authored by Tachibana's avatar Tachibana

得得得得得

parent 7ffbe7ca
Pipeline #13183 passed with stages
in 34 minutes and 24 seconds
No preview for this file type
......@@ -30,8 +30,8 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
table.insert(pack2,v)
end
end
Duel.Hint(HINT_SELECTMSG,1-tp,HINGMSG_NUMBER)
local num=Duel.AnnounceNumber(1-tp,table.unpack(pack2))
Duel.Hint(HINT_SELECTMSG,tp,HINGMSG_NUMBER)
local num=Duel.AnnounceNumber(tp,table.unpack(pack2))
e:SetLabel(0)
Duel.SetTargetParam(num)
Duel.SetTargetPlayer(1-tp)
......
......@@ -10,6 +10,7 @@ function h_star.effect1(c,id)
e1:SetDescription(aux.Stringid(35810201,1))
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCountLimit(1)
e1:SetRange(LOCATION_MZONE)
e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(h_star.thfilter,tp,LOCATION_DECK,0,1,nil) end
......@@ -30,6 +31,7 @@ function h_star.effect1(c,id)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1)
e2:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() end
if chk==0 then return Duel.IsExistingTarget(Card.IsOnField,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
......@@ -49,6 +51,7 @@ function h_star.effect1(c,id)
e3:SetCategory(CATEGORY_DAMAGE+CATEGORY_RECOVER)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1)
e3:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.SetTargetPlayer(1-tp)
......@@ -67,6 +70,7 @@ function h_star.effect1(c,id)
e4:SetType(EFFECT_TYPE_IGNITION)
e4:SetProperty(EFFECT_FLAG_CARD_TARGET)
e4:SetRange(LOCATION_MZONE)
e4:SetCountLimit(1)
e4:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsAbleToRemove() end
if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToRemove,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
......@@ -86,6 +90,7 @@ function h_star.effect1(c,id)
e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
e5:SetType(EFFECT_TYPE_IGNITION)
e5:SetRange(LOCATION_MZONE)
e5:SetCountLimit(1)
e5:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(h_star.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) 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