Commit c1a55c53 authored by POLYMER's avatar POLYMER

fix

parent 3d3d1977
...@@ -95,17 +95,18 @@ function cm.imop(e,tp,eg,ep,ev,re,r,rp) ...@@ -95,17 +95,18 @@ function cm.imop(e,tp,eg,ep,ev,re,r,rp)
e1:SetLabel(1) e1:SetLabel(1)
end end
Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
local e2=Effect.CreateEffect(e:GetHandler()) --[[local e2=Effect.CreateEffect(e:GetHandler())
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(0x20000000+m+1) e2:SetCode(0x20000000+m+1)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetRange(LOCATION_GRAVE) e2:SetRange(LOCATION_GRAVE)
e2:SetTargetRange(1,0) e2:SetTargetRange(1,0)
e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
e:GetHandler():RegisterEffect(e2) e:GetHandler():RegisterEffect(e2)--]]
e:GetHandler():RegisterFlagEffect(m+1,RESET_EVENT+RESETS_STANDARD,0,1)
end end
function cm.flcon(e) function cm.flcon(e)
return Duel.GetFlagEffect(e:GetHandlerPlayer(),m+1)~=0 return e:GetHandler():GetFlagEffect(m+1)>0
end end
function cm.thop(e,tp,eg,ep,ev,re,r,rp) function cm.thop(e,tp,eg,ep,ev,re,r,rp)
if rp==1-tp and e:GetLabel()==1 then return end if rp==1-tp and e:GetLabel()==1 then return end
......
--唤士的幼龙-嘉儿 --唤士的幼龙-嘉儿
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
pcall(require_list[str])
return require_list[str]
end
return require_list[str]
end
end
if not pcall(function() require("expansions/script/c130001000") end) then require("script/c130001000") end if not pcall(function() require("expansions/script/c130001000") end) then require("script/c130001000") end
local m,cm=rscf.DefineCard(130005101,"DragonCaller") local m,cm=rscf.DefineCard(130005101,"DragonCaller")
if rsdc then return end if rsdc then return end
......
--唤士的观测者-尤拉 --唤士的观测者-尤拉
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
pcall(require_list[str])
return require_list[str]
end
return require_list[str]
end
end
if not pcall(function() require("expansions/script/c130005101") end) then require("script/c130005101") end if not pcall(function() require("expansions/script/c130005101") end) then require("script/c130005101") end
local m,cm=rscf.DefineCard(130005102,"DragonCaller") local m,cm=rscf.DefineCard(130005102,"DragonCaller")
function cm.initial_effect(c) function cm.initial_effect(c)
......
--龙唤士 罗莎 --龙唤士 罗莎
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
pcall(require_list[str])
return require_list[str]
end
return require_list[str]
end
end
if not pcall(function() require("expansions/script/c130005101") end) then require("script/c130005101") end if not pcall(function() require("expansions/script/c130005101") end) then require("script/c130005101") end
local m,cm=rscf.DefineCard(130005107,"DragonCaller") local m,cm=rscf.DefineCard(130005107,"DragonCaller")
function cm.initial_effect(c) function cm.initial_effect(c)
......
...@@ -338,8 +338,8 @@ function cm.checkopn(e,tp,c,mf) ...@@ -338,8 +338,8 @@ function cm.checkopn(e,tp,c,mf)
c:SetEntityCode(g:GetOriginalCode(),true) c:SetEntityCode(g:GetOriginalCode(),true)
local te,ceg,cep,cev,cre,cr,crp=g:CheckActivateEffect(false,true,true) local te,ceg,cep,cev,cre,cr,crp=g:CheckActivateEffect(false,true,true)
-- --
if c:IsLocation(LOCATION_HAND) and-- (e:GetLabelObject():IsHasType(EFFECT_TYPE_QUICK_O) or e:GetLabelObject():IsHasType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)) and -- if c:IsLocation(LOCATION_HAND) then-- (e:GetLabelObject():IsHasType(EFFECT_TYPE_QUICK_O) or e:GetLabelObject():IsHasType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)) and --
not e:GetLabelObject():IsHasType(EFFECT_TYPE_ACTIVATE) then --not e:GetLabelObject():IsHasType(EFFECT_TYPE_ACTIVATE) then
if not c:IsType(TYPE_FIELD) then if not c:IsType(TYPE_FIELD) then
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
else else
...@@ -360,7 +360,7 @@ function cm.checkopn(e,tp,c,mf) ...@@ -360,7 +360,7 @@ function cm.checkopn(e,tp,c,mf)
e1:SetReset(RESET_EVENT+0x1fc0000) e1:SetReset(RESET_EVENT+0x1fc0000)
c:RegisterEffect(e1,true) c:RegisterEffect(e1,true)
end end
if mf~=1 then e:GetLabelObject():SetType(EFFECT_TYPE_ACTIVATE) end --if mf~=1 then e:GetLabelObject():SetType(EFFECT_TYPE_ACTIVATE) end
if not c:IsType(TYPE_CONTINUOUS) and not c:IsType(TYPE_FIELD) then c:CancelToGrave(false) end if not c:IsType(TYPE_CONTINUOUS) and not c:IsType(TYPE_FIELD) then c:CancelToGrave(false) end
end end
if te~=nil and te:GetProperty()~=nil then--and bit.band(te:GetProperty(),EFFECT_FLAG_CARD_TARGET)~=0 then if te~=nil and te:GetProperty()~=nil then--and bit.band(te:GetProperty(),EFFECT_FLAG_CARD_TARGET)~=0 then
...@@ -687,7 +687,7 @@ function cm.cost1(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -687,7 +687,7 @@ function cm.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
end end
--相同cost --相同cost
function cm.costn(e,tp,c) function cm.costn(e,tp,c)
e:SetType(EFFECT_TYPE_ACTIVATE) --e:SetType(EFFECT_TYPE_ACTIVATE)
-- --
local c2=cm.gx local c2=cm.gx
if c2~=nil then if c2~=nil then
......
...@@ -29,7 +29,7 @@ function c9910212.checkop1(e,tp,eg,ep,ev,re,r,rp) ...@@ -29,7 +29,7 @@ function c9910212.checkop1(e,tp,eg,ep,ev,re,r,rp)
local tg=eg:Filter(Card.IsLocation,nil,LOCATION_MZONE) local tg=eg:Filter(Card.IsLocation,nil,LOCATION_MZONE)
if #tg>0 then if #tg>0 then
for tc in aux.Next(tg) do for tc in aux.Next(tg) do
tc:RegisterFlagEffect(9910212,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(9910212,0)) tc:RegisterFlagEffect(9910212,RESET_EVENT+0x1fc0000,EFFECT_FLAG_SET_AVAILABLE+EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(9910212,0))
end end
end end
end end
...@@ -37,7 +37,7 @@ function c9910212.checkop2(e,tp,eg,ep,ev,re,r,rp) ...@@ -37,7 +37,7 @@ function c9910212.checkop2(e,tp,eg,ep,ev,re,r,rp)
local tg=Duel.GetMatchingGroup(c9910212.ctgfilter,0,LOCATION_MZONE,LOCATION_MZONE,nil) local tg=Duel.GetMatchingGroup(c9910212.ctgfilter,0,LOCATION_MZONE,LOCATION_MZONE,nil)
if #tg>0 then if #tg>0 then
for tc in aux.Next(tg) do for tc in aux.Next(tg) do
tc:RegisterFlagEffect(9910212,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(9910212,0)) tc:RegisterFlagEffect(9910212,RESET_EVENT+0x1fc0000,EFFECT_FLAG_SET_AVAILABLE+EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(9910212,0))
end end
end end
end end
......
...@@ -43,7 +43,7 @@ function c9910365.checkop1(e,tp,eg,ep,ev,re,r,rp) ...@@ -43,7 +43,7 @@ function c9910365.checkop1(e,tp,eg,ep,ev,re,r,rp)
local tg=eg:Filter(Card.IsOnField,nil) local tg=eg:Filter(Card.IsOnField,nil)
if #tg>0 then if #tg>0 then
for tc in aux.Next(tg) do for tc in aux.Next(tg) do
tc:RegisterFlagEffect(9910365,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(9910365,1)) tc:RegisterFlagEffect(9910365,RESET_EVENT+0x1fc0000+RESET_PHASE+PHASE_END,EFFECT_FLAG_SET_AVAILABLE+EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(9910365,1))
end end
end end
end end
...@@ -51,7 +51,7 @@ function c9910365.checkop2(e,tp,eg,ep,ev,re,r,rp) ...@@ -51,7 +51,7 @@ function c9910365.checkop2(e,tp,eg,ep,ev,re,r,rp)
local tg=Duel.GetMatchingGroup(c9910365.ctgfilter,0,LOCATION_ONFIELD,LOCATION_ONFIELD,nil) local tg=Duel.GetMatchingGroup(c9910365.ctgfilter,0,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
if #tg>0 then if #tg>0 then
for tc in aux.Next(tg) do for tc in aux.Next(tg) do
tc:RegisterFlagEffect(9910365,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(9910365,1)) tc:RegisterFlagEffect(9910365,RESET_EVENT+0x1fc0000+RESET_PHASE+PHASE_END,EFFECT_FLAG_SET_AVAILABLE+EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(9910365,1))
end end
end end
end end
......
...@@ -48,7 +48,7 @@ function c9911370.checkop1(e,tp,eg,ep,ev,re,r,rp) ...@@ -48,7 +48,7 @@ function c9911370.checkop1(e,tp,eg,ep,ev,re,r,rp)
local tg=eg:Filter(Card.IsOnField,nil) local tg=eg:Filter(Card.IsOnField,nil)
if #tg>0 then if #tg>0 then
for tc in aux.Next(tg) do for tc in aux.Next(tg) do
tc:RegisterFlagEffect(9911370,RESET_EVENT+RESETS_STANDARD,0,1) tc:RegisterFlagEffect(9911370,RESET_EVENT+0x1fc0000,EFFECT_FLAG_SET_AVAILABLE,1)
end end
end end
end end
...@@ -56,7 +56,7 @@ function c9911370.checkop2(e,tp,eg,ep,ev,re,r,rp) ...@@ -56,7 +56,7 @@ function c9911370.checkop2(e,tp,eg,ep,ev,re,r,rp)
local tg=Duel.GetMatchingGroup(c9911370.ctgfilter,0,LOCATION_ONFIELD,LOCATION_ONFIELD,nil) local tg=Duel.GetMatchingGroup(c9911370.ctgfilter,0,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
if #tg>0 then if #tg>0 then
for tc in aux.Next(tg) do for tc in aux.Next(tg) do
tc:RegisterFlagEffect(9911370,RESET_EVENT+RESETS_STANDARD,0,1) tc:RegisterFlagEffect(9911370,RESET_EVENT+0x1fc0000,EFFECT_FLAG_SET_AVAILABLE,1)
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