Commit b0862343 authored by POLYMER's avatar POLYMER

fix

parent 205b8cfe
......@@ -127,8 +127,8 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
local sg=g:Filter(Card.IsRelateToEffect,nil,e)
local fid=c:GetFieldID()
for tc in aux.Next(sg) do
local fid=c:GetFieldID()
local ge2=Effect.CreateEffect(c)
ge2:SetDescription(aux.Stringid(m,10))
ge2:SetType(EFFECT_TYPE_SINGLE)
......@@ -139,19 +139,19 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
ge2:SetValue(cm.chkval)
ge2:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
tc:RegisterEffect(ge2,true)
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e5:SetCode(EVENT_ADJUST)
e5:SetLabel(fid)
e5:SetCondition(function() return not pnfl_adjusting end)
e5:SetOperation(cm.acop)
Duel.RegisterEffect(e5,tp)
local e6=e5:Clone()
e6:SetCode(EVENT_CHAIN_SOLVED)
e6:SetCondition(aux.TRUE)
e6:SetOperation(cm.acop2)
Duel.RegisterEffect(e6,tp)
end
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e5:SetCode(EVENT_ADJUST)
e5:SetLabel(fid)
e5:SetCondition(function() return not pnfl_adjusting end)
e5:SetOperation(cm.acop)
Duel.RegisterEffect(e5,tp)
local e6=e5:Clone()
e6:SetCode(EVENT_CHAIN_SOLVED)
e6:SetCondition(aux.TRUE)
e6:SetOperation(cm.acop2)
Duel.RegisterEffect(e6,tp)
end
function cm.chkval(e,te)
if te and te:GetHandler() and not te:IsHasProperty(EFFECT_FLAG_UNCOPYABLE) and (te:GetCode()<0x10000 or te:IsHasType(EFFECT_TYPE_ACTIONS)) then
......
......@@ -150,7 +150,7 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
e3:SetTarget(cm.thtg2)
e3:SetOperation(cm.thop2)
e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e3)
tc:RegisterEffect(e3,true)
end
local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
......
......@@ -69,7 +69,7 @@ end
function c9910951.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c9910951.thfilter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 and Duel.SendtoHand(g,nil,REASON_EFFECT)>0 then
if #g>0 and Duel.SendtoHand(g,nil,REASON_EFFECT)>0 and g:GetFirst():IsLocation(LOCATION_HAND) then
Duel.ConfirmCards(1-tp,g)
Duel.ShuffleHand(tp)
local b1=Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil)
......
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