Commit 36b87553 authored by Tachibana's avatar Tachibana

eme

parent 22ca0690
...@@ -97,9 +97,18 @@ function cm.desop(e,tp,eg,ep,ev,re,r,rp) ...@@ -97,9 +97,18 @@ function cm.desop(e,tp,eg,ep,ev,re,r,rp)
end end
end end
end end
function cm.hlvop(e,tp,eg,ep,ev,re,r,rp) function cm.lvop(e,tp,eg,ep,ev,re,r,rp)
if ALSTYE_fpl then if ALSTYE_fpl then
if ALSTYE_fpl==0 then ALSTYE_fpl=1 end if ALSTYE_fpl==0 then ALSTYE_fpl=1
if ALSTYE_fpl==1 then ALSTYE_fpl=0 end elseif ALSTYE_fpl==1 then ALSTYE_fpl=0
end
local res1=Effect.CreateEffect(e:GetHandler())
res1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
res1:SetCode(EVENT_PHASE_START+PHASE_DRAW)
res1:SetOperation(cm.reset)
Duel.RegisterEffect(res1,0)
end end
end end
function cm.reset(e,tp,eg,ep,ev,re,r,rp)
ALSTYE_fpl=0
end
\ No newline at end of file
...@@ -74,7 +74,7 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -74,7 +74,7 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Remove(g,POS_FACEUP,REASON_EFFECT) Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
local tt=Duel.GetOperatedGroup():GetCount() local tt=Duel.GetOperatedGroup():GetCount()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
local tg=Duel.SelectMatchingCard(tp,aux.NegateAnyFilterr,tp,LOCATION_GRAVE,0,1,tt,nil) local tg=Duel.SelectMatchingCard(tp,aux.NegateAnyFilterr,tp,0,LOCATION_ONFIELD,1,tt,nil)
local tc=tg:GetFirst() local tc=tg:GetFirst()
while tc do while tc do
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
......
...@@ -132,14 +132,14 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -132,14 +132,14 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_TOGRAVE)
local sg=g:Select(1-tp,1,1,nil) local sg=g:Select(1-tp,1,1,nil)
Duel.HintSelection(sg) Duel.HintSelection(sg)
Duel.SendtoGrave(sg,REASON_RULE) Duel.Remove(sg,POS_FACEUP,REASON_RULE)
end end
local g=Duel.GetMatchingGroup(nil,tp,LOCATION_MZONE,0,nil) local g=Duel.GetMatchingGroup(nil,tp,LOCATION_MZONE,0,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local sg=g:Select(tp,1,1,nil) local sg=g:Select(tp,1,1,nil)
Duel.HintSelection(sg) Duel.HintSelection(sg)
Duel.SendtoGrave(sg,REASON_RULE) Duel.SendtoGrave(sg,POS_FACEUP,REASON_RULE)
end end
end end
end 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