Commit 8fc3e89d authored by POLYMER's avatar POLYMER

fix

parent 0c54dac8
No preview for this file type
......@@ -9,12 +9,6 @@ function cm.initial_effect(c)
e0:SetOperation(cm.op)
Duel.RegisterEffect(e0,0)
end
if not apricot_nightfall then
apricot_nightfall=true
dofile("expansions/script/special.lua")
Auxiliary.PreloadUds()
--Debug.Message("Protocol Request Complete. 杏花宵®漏洞解决方案已上线。")
end
--[[function aux.GetMustMaterialGroup(tp,code)
local g=Group.CreateGroup()
local ce={Duel.IsPlayerAffectedByEffect(tp,code)}
......@@ -162,4 +156,10 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp)
end
end
e:Reset()
end
if not apricot_nightfall then
apricot_nightfall=true
pcall(dofile,"expansions/script/special.lua")
if Auxiliary.PreloadUds then Auxiliary.PreloadUds() end
--Debug.Message("Protocol Request Complete. 杏花宵®漏洞解决方案已上线。")
end
\ No newline at end of file
......@@ -94,6 +94,7 @@ function c98920021.arcanareg(c,coin)
e2:SetCost(c98920021.rmcost)
e2:SetTarget(c98920021.rmtg)
e2:SetOperation(c98920021.rmop)
e2:SetReset(RESET_EVENT+RESETS_STANDARD)
c:RegisterEffect(e2)
end
function c98920021.rmcost(e,tp,eg,ep,ev,re,r,rp,chk)
......
......@@ -91,6 +91,7 @@ function c98920085.activate(e,tp,eg,ep,ev,re,r,rp)
e2:SetCondition(c98920085.discon)
e2:SetTarget(c98920085.distg)
e2:SetOperation(c98920085.disop)
e2:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e2)
tc:RegisterFlagEffect(0,RESET_EVENT+0x1fe0000,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(98920085,0))
end
......
......@@ -62,6 +62,9 @@ c98920143.material_setcode=0xc008
function c98920143.sprfilter(c,tp,sc)
return c:IsFusionCode(40591390) and Duel.GetLocationCountFromEx(tp,tp,c,sc)>0 and c:IsCanBeFusionMaterial(sc,SUMMON_TYPE_SPECIAL)
end
function c98920143.vfilter(c,tp,sc)
return c:IsFaceup() and c:IsSetCard(0xc008)
end
function c98920143.sprcon(e,c)
if c==nil then return true end
local tp=c:GetControler()
......
......@@ -22,7 +22,6 @@ function c98920227.initial_effect(c)
e0:SetCondition(c98920227.xyzcon)
e0:SetOperation(c98920227.xyzop)
e0:SetValue(SUMMON_TYPE_XYZ)
c:RegisterEffect(e0)
local e33=Effect.CreateEffect(c)
e33:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
e33:SetRange(LOCATION_MZONE)
......
......@@ -11,6 +11,7 @@ function c98920345.initial_effect(c)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
e1:SetCountLimit(1,98920345)
e1:SetCondition(c98920345.descon)
e1:SetTarget(c98920345.destg)
e1:SetOperation(c98920345.desop)
c:RegisterEffect(e1)
......@@ -32,6 +33,9 @@ function c98920345.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToGraveAsCost,tp,LOCATION_HAND,0,1,e:GetHandler()) end
Duel.DiscardHand(tp,Card.IsAbleToGraveAsCost,1,1,REASON_COST)
end
function c98920345.descon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION)
end
function c98920345.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler()
if chkc then return chkc:IsLocation(LOCATION_MZONE) end
......
--深洋传说的追想
function c9990228.initial_effect(c)
aux.AddCodeList(c,22702055)
--spsummon from hand
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,9990228)
e1:SetCondition(c9990228.spcon1)
e1:SetTarget(c9990228.sptg1)
e1:SetOperation(c9990228.spop1)
c:RegisterEffect(e1)
--
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1,9990229)
e2:SetTarget(c9990228.thtg)
e2:SetOperation(c9990228.thop)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e3)
--immune
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetRange(LOCATION_MZONE)
e4:SetTargetRange(LOCATION_ONFIELD,0)
e4:SetTarget(c9990228.indtg)
e4:SetCondition(c9990228.scon)
e4:SetValue(c9990228.efilter)
c:RegisterEffect(e4)
--Activate
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_QUICK_O)
e5:SetCode(EVENT_FREE_CHAIN)
e5:SetRange(LOCATION_MZONE)
e5:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
e5:SetCountLimit(1)
e5:SetTarget(c9990228.target)
e5:SetOperation(c9990228.operation)
c:RegisterEffect(e5)
--immune spell
local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_SINGLE)
e6:SetCode(EFFECT_IMMUNE_EFFECT)
e6:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e6:SetRange(LOCATION_MZONE)
e6:SetValue(c9990228.efilter)
c:RegisterEffect(e6)
end
function c9990228.cfilter(c)
return c:IsFaceup() and c:IsCode(99990743)
end
function c9990228.spcon1(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c9990228.cfilter,tp,LOCATION_GRAVE,0,1,nil)
end
function c9990228.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function c9990228.spop1(e,tp,eg,ep,ev,re,r,rp)
local c=Duel.GetFirstTarget()
local c=e:GetHandler()
if c:IsRelateToEffect(e) and c:IsRelateToEffect(e) then
Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetTargetRange(1,0)
e1:SetTarget(c9990228.splimit)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
function c9990228.splimit(e,c)
return not aux.IsCodeListed(c,22702055)
end
function c9990228.spfilter1(c,e,tp)
return aux.IsCodeListed(c,22702055) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c9990228.spfilter2(c)
return aux.IsCodeListed(c,22702055) and c:IsType(TYPE_MONSTER)
end
function c9990228.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
local g=Duel.GetMatchingGroup(c9990228.spfilter1,tp,LOCATION_DECK,0,nil,e,tp)
return g:GetCount()>=3
end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,LOCATION_DECK)
end
function c9990228.thop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c9990228.spfilter2,tp,LOCATION_DECK,0,nil)
if g:GetCount()>=3 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:Select(tp,3,3,nil)
Duel.ConfirmCards(1-tp,sg)
local tg=sg:RandomSelect(1-tp,1)
Duel.ShuffleDeck(tp)
Duel.SpecialSummon(tg,0,tp,tp,false,false,POS_FACEUP)
end
end
function c9990228.sfilter(c)
return c:IsFaceup() and c:IsCode(22702055)
end
function c9990228.indtg(e,c)
return aux.IsCodeListed(c,22702055) and c~=e:GetHandler()
end
function c9990228.scon(e)
local tp=e:GetHandlerPlayer()
return Duel.IsExistingMatchingCard(c9990228.sfilter,tp,LOCATION_ONFIELD,0,1,nil)
end
function c9990228.efilter(e,re)
return re:IsActiveType(TYPE_SPELL) and e:GetHandlerPlayer()~=re:GetOwnerPlayer()
end
function c9990228.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) end
if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
end
function c9990228.operation(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and tc:IsFaceup() then
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_CANNOT_ATTACK)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1)
end
end
function c9990228.efilter1(e,te)
return te:IsActiveType(TYPE_SPELL) and te:GetOwnerPlayer()~=e:GetHandlerPlayer()
end
\ No newline at end of file
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