Commit 0ac704d3 authored by nanahira's avatar nanahira

fixes

parent d46a0759
...@@ -184,15 +184,15 @@ function c11200004.tdop(e,tp,eg,ep,ev,re,r,rp) ...@@ -184,15 +184,15 @@ function c11200004.tdop(e,tp,eg,ep,ev,re,r,rp)
local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS) local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
local sg=tg:Filter(Card.IsRelateToEffect,nil,e) local sg=tg:Filter(Card.IsRelateToEffect,nil,e)
if sg:GetCount()==tg:GetCount() and e:GetHandler():IsRelateToEffect(e) then if sg:GetCount()==tg:GetCount() and e:GetHandler():IsRelateToEffect(e) then
sg:AddCard(e:GetHandler())
Duel.SendtoDeck(sg,nil,2,REASON_EFFECT+REASON_RETURN) Duel.SendtoDeck(sg,nil,2,REASON_EFFECT+REASON_RETURN)
end end
end end
function c11200004.retg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c11200004.retg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_REMOVED+LOCATION_GRAVE) end if chkc then return chkc:IsLocation(LOCATION_REMOVED) end
if chk==0 then return Duel.IsExistingTarget(nil,tp,LOCATION_REMOVED+LOCATION_GRAVE ,LOCATION_REMOVED+LOCATION_GRAVE,1,e:GetHandler()) if chk==0 then return Duel.IsExistingTarget(nil,tp,LOCATION_REMOVED ,LOCATION_REMOVED,1,e:GetHandler())
and e:GetHandler():IsAbleToRemove() end and e:GetHandler():IsAbleToRemove() end
local g=Duel.SelectTarget(tp,nil,tp,LOCATION_REMOVED+LOCATION_GRAVE ,LOCATION_REMOVED+LOCATION_GRAVE,1,3,e:GetHandler()) local g=Duel.SelectTarget(tp,nil,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,3,e:GetHandler())
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,g:GetCount(),0,0)
Duel.SetOperationInfo(0,CATEGORY_REMOVE,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_REMOVE,e:GetHandler(),1,0,0)
end end
function c11200004.reop(e,tp,eg,ep,ev,re,r,rp) function c11200004.reop(e,tp,eg,ep,ev,re,r,rp)
......
...@@ -7,7 +7,7 @@ function c11200103.initial_effect(c) ...@@ -7,7 +7,7 @@ function c11200103.initial_effect(c)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_REMOVE+CATEGORY_DRAW) e1:SetCategory(CATEGORY_REMOVE+CATEGORY_DRAW)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP) e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e1:SetCode(EVENT_SPSUMMON_SUCCESS) e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCountLimit(1,11200103) e1:SetCountLimit(1,11200103)
e1:SetCondition(c11200103.con) e1:SetCondition(c11200103.con)
......
...@@ -3,7 +3,7 @@ if not pcall(function() require("expansions/script/c33310023") end) then require ...@@ -3,7 +3,7 @@ if not pcall(function() require("expansions/script/c33310023") end) then require
local m=33310008 local m=33310008
local cm=_G["c"..m] local cm=_G["c"..m]
function cm.initial_effect(c) function cm.initial_effect(c)
c:EnableUnsummonable() --c:EnableUnsummonable()
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c,true) aux.EnablePendulumAttribute(c,true)
--to hand --to hand
......
...@@ -66,7 +66,7 @@ function c65020025.detg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -66,7 +66,7 @@ function c65020025.detg(e,tp,eg,ep,ev,re,r,rp,chk)
end end
end end
function c65020025.delimit(e,ep,tp) function c65020025.delimit(e,ep,tp)
return ep==tp and not e:IsHasType(EFFECT_TYPE_ACTIVATE) return ep==tp
end end
function c65020025.deop(e,tp,eg,ep,ev,re,r,rp) function c65020025.deop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,Card.IsFacedown,tp,0,LOCATION_SZONE,1,1,nil) local g=Duel.SelectMatchingCard(tp,Card.IsFacedown,tp,0,LOCATION_SZONE,1,1,nil)
...@@ -83,7 +83,7 @@ function c65020025.wintg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -83,7 +83,7 @@ function c65020025.wintg(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function c65020025.winop(e,tp,eg,ep,ev,re,r,rp) function c65020025.winop(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
local num=e:GetHandler():GetCounter(0x11da)>0 local num=e:GetHandler():GetCounter(0x11da)
local lp=Duel.GetLP(1-tp) local lp=Duel.GetLP(1-tp)
e:GetHandler():RemoveCounter(tp,0x11da,num,REASON_EFFECT) e:GetHandler():RemoveCounter(tp,0x11da,num,REASON_EFFECT)
Duel.SetLP(1-tp,lp-num*1000) Duel.SetLP(1-tp,lp-num*1000)
......
...@@ -57,8 +57,8 @@ function c81041006.costfilter(c) ...@@ -57,8 +57,8 @@ function c81041006.costfilter(c)
return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()>c:GetOriginalLevel() return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()>c:GetOriginalLevel()
end end
function c81041006.discost(e,tp,eg,ep,ev,re,r,rp,chk) function c81041006.discost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckReleaseGroup(tp,c4931121.costfilter,1,nil) end if chk==0 then return Duel.CheckReleaseGroup(tp,c81041006.costfilter,1,nil) end
local g=Duel.SelectReleaseGroup(tp,c4931121.costfilter,1,1,nil) local g=Duel.SelectReleaseGroup(tp,c81041006.costfilter,1,1,nil)
Duel.Release(g,REASON_COST) Duel.Release(g,REASON_COST)
end end
function c81041006.distg(e,tp,eg,ep,ev,re,r,rp,chk) function c81041006.distg(e,tp,eg,ep,ev,re,r,rp,chk)
......
...@@ -75,7 +75,8 @@ function c9980193.atkop(e,tp,eg,ep,ev,re,r,rp) ...@@ -75,7 +75,8 @@ function c9980193.atkop(e,tp,eg,ep,ev,re,r,rp)
e2:SetValue(def/2) e2:SetValue(def/2)
e2:SetReset(RESET_EVENT+RESETS_STANDARD) e2:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e2) tc:RegisterEffect(e2)
local e3=Effect.CreateEffect(e:GetHandler()) end
l local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_CANNOT_ACTIVATE) e3:SetCode(EFFECT_CANNOT_ACTIVATE)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
...@@ -83,8 +84,6 @@ function c9980193.atkop(e,tp,eg,ep,ev,re,r,rp) ...@@ -83,8 +84,6 @@ function c9980193.atkop(e,tp,eg,ep,ev,re,r,rp)
e3:SetValue(c9980193.aclimit) e3:SetValue(c9980193.aclimit)
e3:SetReset(RESET_PHASE+PHASE_END) e3:SetReset(RESET_PHASE+PHASE_END)
tc:RegisterEffect(e3) tc:RegisterEffect(e3)
tc=tg:GetNext()
end
end end
function c9980193.aclimit(e,re,tp) function c9980193.aclimit(e,re,tp)
return re:GetHandler():IsOnField() or re:IsHasType(EFFECT_TYPE_ACTIVATE) return re:GetHandler():IsOnField() or re:IsHasType(EFFECT_TYPE_ACTIVATE)
......
...@@ -79,7 +79,7 @@ function c9980573.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -79,7 +79,7 @@ function c9980573.operation(e,tp,eg,ep,ev,re,r,rp)
end end
end end
if Duel.GetFlagEffect(tp,9980573)~=0 then return end if Duel.GetFlagEffect(tp,9980573)~=0 then return end
--extra summon --extra summon
local e2=Effect.CreateEffect(e:GetHandler()) local e2=Effect.CreateEffect(e:GetHandler())
e2:SetDescription(aux.Stringid(9980573,0)) e2:SetDescription(aux.Stringid(9980573,0))
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
...@@ -87,7 +87,7 @@ function c9980573.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -87,7 +87,7 @@ function c9980573.operation(e,tp,eg,ep,ev,re,r,rp)
e2:SetTargetRange(LOCATION_HAND+LOCATION_MZONE,0) e2:SetTargetRange(LOCATION_HAND+LOCATION_MZONE,0)
e2:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0xcbca)) e2:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0xcbca))
e2:SetReset(RESET_PHASE+PHASE_END) e2:SetReset(RESET_PHASE+PHASE_END)
c:RegisterEffect(e2,tp) tc:RegisterEffect(e2)
Duel.RegisterFlagEffect(tp,9980573,RESET_PHASE+PHASE_END,0,1) Duel.RegisterFlagEffect(tp,9980573,RESET_PHASE+PHASE_END,0,1)
end end
function c9980573.filter1(c,e,tp) function c9980573.filter1(c,e,tp)
......
...@@ -24,7 +24,7 @@ function c9980590.initial_effect(c) ...@@ -24,7 +24,7 @@ function c9980590.initial_effect(c)
e3:SetTarget(c9980590.tg) e3:SetTarget(c9980590.tg)
e3:SetOperation(c9980590.op) e3:SetOperation(c9980590.op)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--to hand --to hand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(9980590,0)) e2:SetDescription(aux.Stringid(9980590,0))
e2:SetCategory(CATEGORY_TODECK) e2:SetCategory(CATEGORY_TODECK)
...@@ -79,7 +79,6 @@ function c9980590.op(e,tp,eg,ep,ev,re,r,rp) ...@@ -79,7 +79,6 @@ function c9980590.op(e,tp,eg,ep,ev,re,r,rp)
local e2=e1:Clone() local e2=e1:Clone()
e2:SetCode(EFFECT_UPDATE_DEFENSE) e2:SetCode(EFFECT_UPDATE_DEFENSE)
Duel.RegisterEffect(e2,tp) Duel.RegisterEffect(e2,tp)
Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
end end
function c9980590.filter1(e,c) function c9980590.filter1(e,c)
return c:IsSetCard(0x6bca) return c:IsSetCard(0x6bca)
......
...@@ -100,6 +100,7 @@ function c9980599.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -100,6 +100,7 @@ function c9980599.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,nil,1,tp,LOCATION_GRAVE) Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,nil,1,tp,LOCATION_GRAVE)
end end
function c9980599.operation(e,tp,eg,ep,ev,re,r,rp) function c9980599.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
......
...@@ -64,7 +64,7 @@ function c9980614.atkfilter(c) ...@@ -64,7 +64,7 @@ function c9980614.atkfilter(c)
return c:IsSetCard(0x6bcb) and c:IsType(TYPE_MONSTER) return c:IsSetCard(0x6bcb) and c:IsType(TYPE_MONSTER)
end end
function c9980614.atkup(e,c) function c9980614.atkup(e,c)
local g=Duel.GetMatchingGroup(c9980614.atkfilter,e:GetHandlerPlayer(),LOCATION_GRAVE+LOCATION_MZONE,0,nil) local g=Duel.GetMatchingGroup(c9980614.atkfilter,tp,LOCATION_GRAVE+LOCATION_MZONE,0,nil)
return g:GetClassCount(Card.GetCode)*100 return g:GetClassCount(Card.GetCode)*100
end end
function c9980614.eqfilter(c) function c9980614.eqfilter(c)
......
--丁玲丁玲 --丁玲丁玲
function c9980717.initial_effect(c) function c9980717.initial_effect(c)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e3:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e3:SetCode(EVENT_FREE_CHAIN)
e1:SetOperation(c9980717.sumsuc) e3:SetOperation(c9980717.sumsuc)
c:RegisterEffect(e1) c:RegisterEffect(e3)
-- --
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetType(EFFECT_TYPE_FIELD)
...@@ -14,6 +14,14 @@ function c9980717.initial_effect(c) ...@@ -14,6 +14,14 @@ function c9980717.initial_effect(c)
e3:SetTargetRange(LOCATION_MZONE,0) e3:SetTargetRange(LOCATION_MZONE,0)
e3:SetValue(500) e3:SetValue(500)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--chain
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EVENT_CHAINING)
e1:SetRange(LOCATION_FZONE)
e1:SetOperation(c9980717.chop)
c:RegisterEffect(e1)
--draw --draw
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(9980717,0)) e2:SetDescription(aux.Stringid(9980717,0))
...@@ -52,6 +60,16 @@ function c9980717.chop(e,tp,eg,ep,ev,re,r,rp) ...@@ -52,6 +60,16 @@ function c9980717.chop(e,tp,eg,ep,ev,re,r,rp)
e:SetLabel(1) e:SetLabel(1)
end end
end end
function c9980717.chop(e,tp,eg,ep,ev,re,r,rp)
local ct=Duel.GetCurrentChain()
if ct==1 then
e:SetLabel(0)
elseif not Duel.CheckChainUniqueness() then
e:SetLabel(2)
elseif ct>=3 and e:GetLabel()~=2 then
e:SetLabel(1)
end
end
function c9980717.drcon(e,tp,eg,ep,ev,re,r,rp) function c9980717.drcon(e,tp,eg,ep,ev,re,r,rp)
local res=e:GetLabelObject():GetLabel() local res=e:GetLabelObject():GetLabel()
e:GetLabelObject():SetLabel(0) e:GetLabelObject():SetLabel(0)
......
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