Commit d4801e99 authored by POLYMER's avatar POLYMER

fix

parent 957e2340
...@@ -53,9 +53,8 @@ function cm.setfilter(c,tp) ...@@ -53,9 +53,8 @@ function cm.setfilter(c,tp)
end end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk) function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then if chk==0 then
local h1=Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)
local h2=Duel.GetFieldGroupCount(1-tp,LOCATION_HAND,0) return Duel.IsExistingMatchingCard(cm.setfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,LOCATION_ONFIELD+LOCATION_GRAVE,1,nil,tp) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0
return (h1>0 and h2>0) and Duel.IsExistingMatchingCard(cm.setfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,LOCATION_ONFIELD+LOCATION_GRAVE,1,nil,tp) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0
end end
end end
function cm.f2(c) function cm.f2(c)
......
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
local m=60000047 local m=60000047
local cm=_G["c"..m] local cm=_G["c"..m]
function cm.initial_effect(c) function cm.initial_effect(c)
aux.AddCodeList(c,60000043) aux.AddCodeList(c,60000043)
c:EnableReviveLimit() c:EnableReviveLimit()
--spsummon limit --spsummon limit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
...@@ -98,6 +98,7 @@ function cm.hspcon(e,c) ...@@ -98,6 +98,7 @@ function cm.hspcon(e,c)
return res return res
end end
function cm.hsptg(e,tp,eg,ep,ev,re,r,rp,chk,c) function cm.hsptg(e,tp,eg,ep,ev,re,r,rp,chk,c)
local tp=c:GetControler()
local g=Duel.GetMatchingGroup(cm.hspfilter,tp,LOCATION_ONFIELD,0,c) local g=Duel.GetMatchingGroup(cm.hspfilter,tp,LOCATION_ONFIELD,0,c)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
aux.GCheckAdditional=cm.hspgcheck aux.GCheckAdditional=cm.hspgcheck
...@@ -110,6 +111,7 @@ function cm.hsptg(e,tp,eg,ep,ev,re,r,rp,chk,c) ...@@ -110,6 +111,7 @@ function cm.hsptg(e,tp,eg,ep,ev,re,r,rp,chk,c)
else return false end else return false end
end end
function cm.hspop(e,tp,eg,ep,ev,re,r,rp,c) function cm.hspop(e,tp,eg,ep,ev,re,r,rp,c)
local tp=c:GetControler()
local sg=e:GetLabelObject() local sg=e:GetLabelObject()
Duel.Remove(sg,POS_FACEUP,REASON_COST) Duel.Remove(sg,POS_FACEUP,REASON_COST)
sg:DeleteGroup() sg:DeleteGroup()
......
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
local m=60000048 local m=60000048
local cm=_G["c"..m] local cm=_G["c"..m]
function cm.initial_effect(c) function cm.initial_effect(c)
aux.AddCodeList(c,60000043) aux.AddCodeList(c,60000043)
c:EnableReviveLimit() c:EnableReviveLimit()
--spsummon limit --spsummon limit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
...@@ -98,6 +98,7 @@ function cm.hspcon(e,c) ...@@ -98,6 +98,7 @@ function cm.hspcon(e,c)
return res return res
end end
function cm.hsptg(e,tp,eg,ep,ev,re,r,rp,chk,c) function cm.hsptg(e,tp,eg,ep,ev,re,r,rp,chk,c)
local tp=c:GetControler()
local g=Duel.GetMatchingGroup(cm.hspfilter,tp,LOCATION_ONFIELD,0,c) local g=Duel.GetMatchingGroup(cm.hspfilter,tp,LOCATION_ONFIELD,0,c)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
aux.GCheckAdditional=cm.hspgcheck aux.GCheckAdditional=cm.hspgcheck
...@@ -110,6 +111,7 @@ function cm.hsptg(e,tp,eg,ep,ev,re,r,rp,chk,c) ...@@ -110,6 +111,7 @@ function cm.hsptg(e,tp,eg,ep,ev,re,r,rp,chk,c)
else return false end else return false end
end end
function cm.hspop(e,tp,eg,ep,ev,re,r,rp,c) function cm.hspop(e,tp,eg,ep,ev,re,r,rp,c)
local tp=c:GetControler()
local sg=e:GetLabelObject() local sg=e:GetLabelObject()
Duel.Remove(sg,POS_FACEUP,REASON_COST) Duel.Remove(sg,POS_FACEUP,REASON_COST)
sg:DeleteGroup() sg:DeleteGroup()
...@@ -153,7 +155,7 @@ function cm.disop(e,tp,eg,ep,ev,re,r,rp) ...@@ -153,7 +155,7 @@ function cm.disop(e,tp,eg,ep,ev,re,r,rp)
tc:RegisterEffect(e3) tc:RegisterEffect(e3)
end end
Duel.BreakEffect() Duel.BreakEffect()
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if e:GetLabel()==1 and tc:IsSetCard(0x628) and Duel.SelectYesNo(tp,aux.Stringid(m,4)) then if e:GetLabel()==1 and tc:IsSetCard(0x628) and Duel.SelectYesNo(tp,aux.Stringid(m,4)) then
Duel.Draw(tp,1,REASON_EFFECT) Duel.Draw(tp,1,REASON_EFFECT)
end end
......
...@@ -75,6 +75,7 @@ function cm.sprcon(e,c) ...@@ -75,6 +75,7 @@ function cm.sprcon(e,c)
and Duel.IsExistingMatchingCard(cm.sprfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,3,nil) and Duel.IsExistingMatchingCard(cm.sprfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,3,nil)
end end
function cm.sprop(e,tp,eg,ep,ev,re,r,rp,c) function cm.sprop(e,tp,eg,ep,ev,re,r,rp,c)
local tp=c:GetControler()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectMatchingCard(tp,cm.sprfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,3,3,nil) local g=Duel.SelectMatchingCard(tp,cm.sprfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,3,3,nil)
Duel.Remove(g,POS_FACEUP,REASON_COST) Duel.Remove(g,POS_FACEUP,REASON_COST)
......
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
local m=60000054 local m=60000054
local cm=_G["c"..m] local cm=_G["c"..m]
function cm.initial_effect(c) function cm.initial_effect(c)
aux.AddCodeList(c,60000043) aux.AddCodeList(c,60000043)
--Activate set --Activate set
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
...@@ -30,10 +30,6 @@ function cm.initial_effect(c) ...@@ -30,10 +30,6 @@ function cm.initial_effect(c)
e3:SetTarget(cm.antg) e3:SetTarget(cm.antg)
e3:SetOperation(cm.anop) e3:SetOperation(cm.anop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
if cm.Anounce_Check_for_Hai~=true then
cm.Anounce_Check_for_Hai=true
Anounce_Tab_for_Hai={0,0}
end
end end
--Activate set --Activate set
function cm.setfilter(c) function cm.setfilter(c)
...@@ -78,9 +74,9 @@ end ...@@ -78,9 +74,9 @@ end
function cm.anop(e,tp,eg,ep,ev,re,r,rp) function cm.anop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MESSAGE,1-tp,aux.Stringid(m,0)) Duel.Hint(HINT_MESSAGE,1-tp,aux.Stringid(m,0))
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(m,0)) Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(m,0))
Anounce_Tab_for_Hai[tp]=Anounce_Tab_for_Hai[tp]+1 if not haiiA then haiiA=0 end
Debug.Message(Anounce_Tab_for_Hai[tp]) Debug.Message(haiiA)
if Anounce_Tab_for_Hai[tp]>127 then if haiiA>127 then
local lp=Duel.GetLP(1-tp) local lp=Duel.GetLP(1-tp)
if lp>8000 then if lp>8000 then
Duel.SetLP(1-tp,lp-8000) Duel.SetLP(1-tp,lp-8000)
......
...@@ -74,12 +74,14 @@ function cm.getfusionfilter(c,tp,tc) ...@@ -74,12 +74,14 @@ function cm.getfusionfilter(c,tp,tc)
end end
function cm.sprcon(e,c) function cm.sprcon(e,c)
local tp=e:GetHandlerPlayer()
if c==nil then return true end if c==nil then return true end
local g=Duel.GetMatchingGroup(cm.getfusionfilter,tp,LOCATION_ONFIELD,0,nil,tp,c) local g=Duel.GetMatchingGroup(cm.getfusionfilter,tp,LOCATION_ONFIELD,0,nil,tp,c)
return g:GetCount()>0 return g:GetCount()>0
end end
function cm.sprop(e,tp,eg,ep,ev,re,r,rp,c) function cm.sprop(e,tp,eg,ep,ev,re,r,rp,c)
local tp=e:GetHandlerPlayer()
local g=Duel.GetMatchingGroup(cm.getfusionfilter,tp,LOCATION_ONFIELD,0,nil) local g=Duel.GetMatchingGroup(cm.getfusionfilter,tp,LOCATION_ONFIELD,0,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
...@@ -120,7 +122,7 @@ function cm.costcfilter(c) ...@@ -120,7 +122,7 @@ function cm.costcfilter(c)
end end
function cm.cacost(e,tp,eg,ep,ev,re,r,rp,chk) function cm.cacost(e,tp,eg,ep,ev,re,r,rp,chk)
Debug.Message(Duel.IsExistingMatchingCard(cm.costcfilter,tp,LOCATION_ONFIELD,0,1,nil)) --Debug.Message(Duel.IsExistingMatchingCard(cm.costcfilter,tp,LOCATION_ONFIELD,0,1,nil))
if chk==0 then return Duel.IsExistingMatchingCard(cm.costcfilter,tp,LOCATION_ONFIELD,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(cm.costcfilter,tp,LOCATION_ONFIELD,0,1,nil) end
local g=Duel.GetMatchingGroup(cm.costcfilter,tp,LOCATION_ONFIELD,0,nil,m) local g=Duel.GetMatchingGroup(cm.costcfilter,tp,LOCATION_ONFIELD,0,nil,m)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
...@@ -134,7 +136,7 @@ function cm.tgcfilter(c) ...@@ -134,7 +136,7 @@ function cm.tgcfilter(c)
end end
function cm.catg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.catg(e,tp,eg,ep,ev,re,r,rp,chk)
Debug.Message(Duel.IsExistingMatchingCard(cm.tgcfilter,tp,LOCATION_EXTRA,0,1,nil)) --Debug.Message(Duel.IsExistingMatchingCard(cm.tgcfilter,tp,LOCATION_EXTRA,0,1,nil))
if chk==0 then return Duel.IsExistingMatchingCard(cm.tgcfilter,tp,LOCATION_EXTRA,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(cm.tgcfilter,tp,LOCATION_EXTRA,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_EXTRA)
end end
......
--化学结合-T2O --化学结合-T2O
function c98920219.initial_effect(c) function c98920219.initial_effect(c)
aux.AddCodeList(c,85066822,6022371,98920218,58071123,98920217)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
......
...@@ -68,7 +68,7 @@ function c98920430.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -68,7 +68,7 @@ function c98920430.target(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function c98920430.operation(e,tp,eg,ep,ev,re,r,rp) function c98920430.operation(e,tp,eg,ep,ev,re,r,rp)
local cc=e:GetLabelObject() local cc=e:GetLabelObject()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c98920430.filter2,tp,LOCATION_DECK+LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,cc,e,tp) local g=Duel.SelectMatchingCard(tp,c98920430.filter2,tp,LOCATION_DECK+LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,cc,e,tp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SpecialSummon(g:GetFirst(),0,tp,tp,true,false,POS_FACEUP) Duel.SpecialSummon(g:GetFirst(),0,tp,tp,true,false,POS_FACEUP)
......
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