Commit 53b70412 authored by POLYMER's avatar POLYMER

fix

parent 636a66d1
...@@ -35,7 +35,10 @@ function c11560708.initial_effect(c) ...@@ -35,7 +35,10 @@ function c11560708.initial_effect(c)
e3:SetType(EFFECT_TYPE_QUICK_O) e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCode(EVENT_PRE_DAMAGE_CALCULATE) e3:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1,21560708) e3:SetCountLimit(1,21560708)
e3:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c==Duel.GetAttacker() or c==Duel.GetAttackTarget() end)
e3:SetCost(c11560708.bdiscost) e3:SetCost(c11560708.bdiscost)
e3:SetTarget(c11560708.bdistg) e3:SetTarget(c11560708.bdistg)
e3:SetOperation(c11560708.bdisop) e3:SetOperation(c11560708.bdisop)
......
...@@ -2,6 +2,21 @@ ...@@ -2,6 +2,21 @@
local m=14001042 local m=14001042
local cm=_G["c"..m] local cm=_G["c"..m]
cm.named_with_Goned=1 cm.named_with_Goned=1
if not require and loadfile then
function require(str)
require_list=require_list or {}
if not require_list[str] then
if string.find(str,"%.") then
require_list[str]=loadfile(str)
else
require_list[str]=loadfile(str..".lua")
end
require_list[str]()
return require_list[str]
end
return require_list[str]
end
end
xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end) xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end)
function cm.initial_effect(c) function cm.initial_effect(c)
--goeffects --goeffects
......
...@@ -2,6 +2,21 @@ ...@@ -2,6 +2,21 @@
local m=14001043 local m=14001043
local cm=_G["c"..m] local cm=_G["c"..m]
cm.named_with_Goned=1 cm.named_with_Goned=1
if not require and loadfile then
function require(str)
require_list=require_list or {}
if not require_list[str] then
if string.find(str,"%.") then
require_list[str]=loadfile(str)
else
require_list[str]=loadfile(str..".lua")
end
require_list[str]()
return require_list[str]
end
return require_list[str]
end
end
xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end) xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end)
function cm.initial_effect(c) function cm.initial_effect(c)
--goeffects --goeffects
......
...@@ -2,6 +2,21 @@ ...@@ -2,6 +2,21 @@
local m=14001044 local m=14001044
local cm=_G["c"..m] local cm=_G["c"..m]
cm.named_with_Goned=1 cm.named_with_Goned=1
if not require and loadfile then
function require(str)
require_list=require_list or {}
if not require_list[str] then
if string.find(str,"%.") then
require_list[str]=loadfile(str)
else
require_list[str]=loadfile(str..".lua")
end
require_list[str]()
return require_list[str]
end
return require_list[str]
end
end
xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end) xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end)
function cm.initial_effect(c) function cm.initial_effect(c)
--goeffects --goeffects
......
...@@ -2,6 +2,21 @@ ...@@ -2,6 +2,21 @@
local m=14001045 local m=14001045
local cm=_G["c"..m] local cm=_G["c"..m]
cm.named_with_Goned=1 cm.named_with_Goned=1
if not require and loadfile then
function require(str)
require_list=require_list or {}
if not require_list[str] then
if string.find(str,"%.") then
require_list[str]=loadfile(str)
else
require_list[str]=loadfile(str..".lua")
end
require_list[str]()
return require_list[str]
end
return require_list[str]
end
end
xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end) xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end)
function cm.initial_effect(c) function cm.initial_effect(c)
--goeffects --goeffects
......
...@@ -2,6 +2,21 @@ ...@@ -2,6 +2,21 @@
local m=14001046 local m=14001046
local cm=_G["c"..m] local cm=_G["c"..m]
cm.named_with_Goned=1 cm.named_with_Goned=1
if not require and loadfile then
function require(str)
require_list=require_list or {}
if not require_list[str] then
if string.find(str,"%.") then
require_list[str]=loadfile(str)
else
require_list[str]=loadfile(str..".lua")
end
require_list[str]()
return require_list[str]
end
return require_list[str]
end
end
xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end) xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end)
function cm.initial_effect(c) function cm.initial_effect(c)
--goeffects --goeffects
......
...@@ -2,6 +2,21 @@ ...@@ -2,6 +2,21 @@
local m=14001047 local m=14001047
local cm=_G["c"..m] local cm=_G["c"..m]
cm.named_with_Goned=1 cm.named_with_Goned=1
if not require and loadfile then
function require(str)
require_list=require_list or {}
if not require_list[str] then
if string.find(str,"%.") then
require_list[str]=loadfile(str)
else
require_list[str]=loadfile(str..".lua")
end
require_list[str]()
return require_list[str]
end
return require_list[str]
end
end
xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end) xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end)
function cm.initial_effect(c) function cm.initial_effect(c)
--goeffects --goeffects
......
...@@ -2,6 +2,21 @@ ...@@ -2,6 +2,21 @@
local m=14001048 local m=14001048
local cm=_G["c"..m] local cm=_G["c"..m]
cm.named_with_Goned=1 cm.named_with_Goned=1
if not require and loadfile then
function require(str)
require_list=require_list or {}
if not require_list[str] then
if string.find(str,"%.") then
require_list[str]=loadfile(str)
else
require_list[str]=loadfile(str..".lua")
end
require_list[str]()
return require_list[str]
end
return require_list[str]
end
end
xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end) xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end)
function cm.initial_effect(c) function cm.initial_effect(c)
--goeffects --goeffects
......
...@@ -2,6 +2,21 @@ ...@@ -2,6 +2,21 @@
local m=14001049 local m=14001049
local cm=_G["c"..m] local cm=_G["c"..m]
cm.named_with_Goned=1 cm.named_with_Goned=1
if not require and loadfile then
function require(str)
require_list=require_list or {}
if not require_list[str] then
if string.find(str,"%.") then
require_list[str]=loadfile(str)
else
require_list[str]=loadfile(str..".lua")
end
require_list[str]()
return require_list[str]
end
return require_list[str]
end
end
xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end) xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end)
function cm.initial_effect(c) function cm.initial_effect(c)
--goeffects --goeffects
......
...@@ -2,6 +2,21 @@ ...@@ -2,6 +2,21 @@
local m=14001050 local m=14001050
local cm=_G["c"..m] local cm=_G["c"..m]
cm.named_with_Goned=1 cm.named_with_Goned=1
if not require and loadfile then
function require(str)
require_list=require_list or {}
if not require_list[str] then
if string.find(str,"%.") then
require_list[str]=loadfile(str)
else
require_list[str]=loadfile(str..".lua")
end
require_list[str]()
return require_list[str]
end
return require_list[str]
end
end
xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end) xpcall(function() require("expansions/script/c14001041") end,function() require("script/c14001041") end)
function cm.initial_effect(c) function cm.initial_effect(c)
--goeffects --goeffects
......
...@@ -3103,7 +3103,6 @@ function cm.ReturnLock(e,tp,eg,ep,ev,re,r,rp) ...@@ -3103,7 +3103,6 @@ function cm.ReturnLock(e,tp,eg,ep,ev,re,r,rp)
end end
local eval=0 local eval=0
if e:GetValue()==0 then eval=val(te) else eval=val end if e:GetValue()==0 then eval=val(te) else eval=val end
--Debug.Message(res)
if zone~=eval or res then if zone~=eval or res then
te:SetValue(val) te:SetValue(val)
e:Reset() e:Reset()
...@@ -4572,7 +4571,7 @@ function cm.ActivatedAsSpellorTrap(c,otyp,loc) ...@@ -4572,7 +4571,7 @@ function cm.ActivatedAsSpellorTrap(c,otyp,loc)
if otyp&TYPE_SPELL~=0 then e1:SetType(EFFECT_TYPE_IGNITION) elseif otyp&TYPE_TRAP~=0 then if otyp&TYPE_SPELL~=0 then e1:SetType(EFFECT_TYPE_IGNITION) elseif otyp&TYPE_TRAP~=0 then
e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE) e1:SetHintTiming(0,TIMING_DRAW_PHASE+TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
end end
e1:SetRange(loc) e1:SetRange(loc)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
...@@ -5017,7 +5016,7 @@ function cm.HTAmvop(e,tp,eg,ep,ev,re,r,rp) ...@@ -5017,7 +5016,7 @@ function cm.HTAmvop(e,tp,eg,ep,ev,re,r,rp)
local ale=nil local ale=nil
local rse={c:IsHasEffect(53765097)} local rse={c:IsHasEffect(53765097)}
for k,v in pairs(rse) do for k,v in pairs(rse) do
if te==v:GetLabelObject() then if te==v:GetLabelObject() and k<#rse then
ale=rse[k+1] ale=rse[k+1]
ale=ale:GetLabelObject() ale=ale:GetLabelObject()
break break
...@@ -5036,16 +5035,16 @@ function cm.HTAmvop(e,tp,eg,ep,ev,re,r,rp) ...@@ -5036,16 +5035,16 @@ function cm.HTAmvop(e,tp,eg,ep,ev,re,r,rp)
if tetg~=aletg then ale:SetTarget(tetg) end if tetg~=aletg then ale:SetTarget(tetg) end
if te:GetOperation()~=ale:GetOperation() then ale:SetOperation(te:GetOperation()) end if te:GetOperation()~=ale:GetOperation() then ale:SetOperation(te:GetOperation()) end
if te:GetLabel()~=ale:GetLabel() then ale:SetLabel(te:GetLabel()) end if te:GetLabel()~=ale:GetLabel() then ale:SetLabel(te:GetLabel()) end
if te:GetValue()~=ale:GetValue() then ale:SetLabel(te:GetLabel()) end if te:GetValue()~=ale:GetValue() then ale:SetValue(te:GetValue()) end
elseif te:GetRange()&0x2~=0 then elseif te:GetRange()&0x2~=0 then
local e1=te:Clone() local e1=te:Clone()
e1:SetDescription(aux.Stringid(53765000,14)) e1:SetDescription(aux.Stringid(53765000,14))
if te:GetCode()==EVENT_FREE_CHAIN then if te:GetCode()==EVENT_FREE_CHAIN then
if te:IsActiveType(TYPE_TRAP+TYPE_QUICKPLAY) then e1:SetType(EFFECT_TYPE_QUICK_O) else e1:SetType(EFFECT_TYPE_IGNITION) end if te:IsActiveType(TYPE_TRAP+TYPE_QUICKPLAY) then e1:SetType(EFFECT_TYPE_QUICK_O) else e1:SetType(EFFECT_TYPE_IGNITION) end
elseif te:GetCode()==EVENT_CHAINING and te:GetProperty()&EFFECT_FLAG_DELAY==0 then elseif te:GetCode()==EVENT_CHAINING and te:GetProperty()&EFFECT_FLAG_DELAY==0 then
if te:GetType()&EFFECT_TYPE_QUICK_F~=0 then e1:SetType(EFFECT_TYPE_QUICK_O) end if te:GetType()&EFFECT_TYPE_QUICK_F~=0 then e1:SetType(EFFECT_TYPE_QUICK_F) else e1:SetType(EFFECT_TYPE_QUICK_O) end
elseif te:GetCode()~=0 then elseif te:GetCode()~=0 then
if te:GetType()&EFFECT_TYPE_TRIGGER_F~=0 then e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) end if te:GetType()&EFFECT_TYPE_TRIGGER_F~=0 then e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) else e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) end
else e1:SetType(EFFECT_TYPE_IGNITION) end else e1:SetType(EFFECT_TYPE_IGNITION) end
e1:SetRange(LOCATION_HAND) e1:SetRange(LOCATION_HAND)
local pro,pro2=te:GetProperty() local pro,pro2=te:GetProperty()
...@@ -5156,14 +5155,14 @@ function cm.HTAfaccost(_cost,fe,zone) ...@@ -5156,14 +5155,14 @@ function cm.HTAfaccost(_cost,fe,zone)
if (not fcost or fcost(fe,tp,nil,0,0,nil,0,0,0)) and (not ftg or ftg(fe,tp,nil,0,0,nil,0,0,0)) then check=true end if (not fcost or fcost(fe,tp,nil,0,0,nil,0,0,0)) and (not ftg or ftg(fe,tp,nil,0,0,nil,0,0,0)) then check=true end
else else
local cres,teg,tep,tev,tre,tr,trp=Duel.CheckEvent(code,true) local cres,teg,tep,tev,tre,tr,trp=Duel.CheckEvent(code,true)
if cres and (not fcost or fcost(fe,tp,teg,tep,tev,tre,tr,trp,0)) and (not ftg or ftg(fe,tp,teg,tep,tev,tre,tr,trp,0)) then check=true end if (not fcost or fcost(fe,tp,teg,tep,tev,tre,tr,trp,0)) and (not ftg or ftg(fe,tp,teg,tep,tev,tre,tr,trp,0)) then check=true end
end end
local pe={Duel.IsPlayerAffectedByEffect(tp,EFFECT_CANNOT_ACTIVATE)} local pe={Duel.IsPlayerAffectedByEffect(tp,EFFECT_CANNOT_ACTIVATE)}
for _,v in pairs(pe) do for _,v in pairs(pe) do
local val=v:GetValue() local val=v:GetValue()
if aux.GetValueType(val)=="number" or val(v,fe,tp) then check=false end if aux.GetValueType(val)=="number" or val(v,fe,tp) then check=false end
end end
if not fe:IsActivatable(tp) and not check then if not check then
ad_ht_zc=nil ad_ht_zc=nil
return false return false
end end
......
...@@ -15,7 +15,7 @@ function cm.initial_effect(c) ...@@ -15,7 +15,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function cm.spfilter(c,e,tp) function cm.spfilter(c,e,tp)
return c:IsSetCard(0x3531) and c:IsCanBeSpecialSummoned(e,0,tp,true,false) return c:IsSetCard(0x3531) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
end end
function cm.spcon(e,tp,eg,ep,ev,re,r,rp) function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsPreviousLocation(LOCATION_HAND) return e:GetHandler():IsPreviousLocation(LOCATION_HAND)
......
...@@ -56,8 +56,7 @@ function c9911303.spfilter(c,e,tp,pc) ...@@ -56,8 +56,7 @@ function c9911303.spfilter(c,e,tp,pc)
and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c9911303.discost(e,tp,eg,ep,ev,re,r,rp,chk) function c9911303.discost(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.IsExistingMatchingCard(c9911303.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end
and Duel.IsExistingMatchingCard(c9911303.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
local sc=Duel.SelectMatchingCard(tp,c9911303.filter,tp,LOCATION_HAND,0,1,1,nil,e,tp):GetFirst() local sc=Duel.SelectMatchingCard(tp,c9911303.filter,tp,LOCATION_HAND,0,1,1,nil,e,tp):GetFirst()
Duel.ConfirmCards(1-tp,sc) Duel.ConfirmCards(1-tp,sc)
......
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