Commit 470c1a80 authored by POLYMER's avatar POLYMER

fix

parent c1c41ade
--鲜花卡通女男爵 -- 鲜花卡通女男爵
function c21050101.initial_effect(c) function c21050101.initial_effect(c)
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--splimit -- 0
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetDescription(aux.Stringid(21050101,0))
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_SPSUMMON_CONDITION) e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e0:SetValue(c21050101.splimit1) e0:SetCode(EFFECT_SPSUMMON_CONDITION)
c:RegisterEffect(e0) e0:SetValue(c21050101.splimit1)
c:RegisterEffect(e0)
aux.EnableChangeCode(c,15259703,LOCATION_PZONE) -- p1
local e1=Effect.CreateEffect(c)
local e3=Effect.CreateEffect(c) e1:SetDescription(aux.Stringid(21050101,1))
e3:SetDescription(aux.Stringid(21050101,5)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetCategory(CATEGORY_TODECK+CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_IGNITION)
e3:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_PZONE)
e3:SetRange(LOCATION_MZONE) e1:SetCost(c21050101.spcost)
e3:SetCountLimit(1,EFFECT_COUNT_CODE_SINGLE) e1:SetTarget(c21050101.sptg)
e3:SetTarget(c21050101.target) e1:SetOperation(c21050101.spop)
e3:SetOperation(c21050101.operation) c:RegisterEffect(e1)
c:RegisterEffect(e3) -- p2
local e31=Effect.CreateEffect(c) aux.EnableChangeCode(c,15259703,LOCATION_PZONE)
e31:SetDescription(aux.Stringid(21050101,6)) -- 1
e31:SetCategory(CATEGORY_TODECK) local e2=Effect.CreateEffect(c)
e31:SetType(EFFECT_TYPE_IGNITION) e2:SetDescription(aux.Stringid(21050101,2))
e31:SetRange(LOCATION_MZONE) e2:SetCategory(CATEGORY_TODECK+CATEGORY_SPECIAL_SUMMON)
e31:SetCountLimit(1,EFFECT_COUNT_CODE_SINGLE) e2:SetType(EFFECT_TYPE_IGNITION)
e31:SetTarget(c21050101.target1) e2:SetRange(LOCATION_MZONE)
e31:SetOperation(c21050101.operation1) e2:SetCountLimit(1)
c:RegisterEffect(e31) e2:SetTarget(c21050101.target)
e2:SetOperation(c21050101.operation)
local e4=Effect.CreateEffect(c) c:RegisterEffect(e2)
e4:SetDescription(aux.Stringid(21050101,0)) -- 2
e4:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY) local e3=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_QUICK_O) e3:SetDescription(aux.Stringid(21050101,3))
e4:SetCode(EVENT_CHAINING) e3:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL+EFFECT_FLAG_NO_TURN_RESET) e3:SetType(EFFECT_TYPE_QUICK_O)
e4:SetRange(LOCATION_MZONE) e3:SetCode(EVENT_CHAINING)
e4:SetCountLimit(1,21050101) e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL+EFFECT_FLAG_NO_TURN_RESET)
e4:SetCondition(c21050101.discon) e3:SetRange(LOCATION_MZONE)
e4:SetTarget(c21050101.distg) e3:SetCountLimit(1,21050101)
e4:SetOperation(c21050101.disop) e3:SetCondition(c21050101.discon)
c:RegisterEffect(e4) e3:SetTarget(c21050101.distg)
e3:SetOperation(c21050101.disop)
c:RegisterEffect(e3)
local e1=Effect.CreateEffect(c) -- 3
e1:SetDescription(aux.Stringid(21050101,0)) local e4=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e4:SetDescription(aux.Stringid(21050101,4))
e1:SetType(EFFECT_TYPE_IGNITION) e4:SetType(EFFECT_TYPE_SINGLE)
e1:SetRange(LOCATION_PZONE) e4:SetCode(EFFECT_DIRECT_ATTACK)
e1:SetCost(c21050101.spcost) e4:SetCondition(c21050101.dircon1)
e1:SetTarget(c21050101.sptg) c:RegisterEffect(e4)
e1:SetOperation(c21050101.spop) end
c:RegisterEffect(e1) -- 0
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetCode(EFFECT_DIRECT_ATTACK)
e5:SetCondition(c21050101.dircon1)
c:RegisterEffect(e5)
end
function c21050101.splimit1(e,se,sp,st) function c21050101.splimit1(e,se,sp,st)
return se:IsHasType(EFFECT_TYPE_ACTIONS) return se:IsHasType(EFFECT_TYPE_ACTIONS)
end
--1
function c21050101.filter(c)
return c:IsType(TYPE_TOON) and c:IsAbleToDeck()
end end
function c21050101.target(e,tp,eg,ep,ev,re,r,rp,chk) -- p1
if chk==0 then return Duel.IsExistingMatchingCard(c21050101.filter,tp,LOCATION_GRAVE,0,1,nil) end function c21050101.cfilter(c)
Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE) return c:IsSetCard(0x62) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
end end
function c21050101.operation(e,tp,eg,ep,ev,re,r,rp) function c21050101.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) if chk==0 then return Duel.IsExistingMatchingCard(c21050101.cfilter,tp,LOCATION_MZONE,0,2,nil) end
local g=Duel.SelectMatchingCard(tp,c21050101.filter,tp,LOCATION_GRAVE,0,1,1,nil) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local tc=g:GetFirst() local g=Duel.SelectMatchingCard(tp,c21050101.cfilter,tp,LOCATION_MZONE,0,2,2,nil)
if tc and Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)~=0 and tc:IsLocation(LOCATION_DECK) Duel.Remove(g,POS_FACEUP,REASON_COST)
and Duel.GetMZoneCount(tp)>0 and tc:IsCanBeSpecialSummoned(e,0,tp,true,false)
and Duel.SelectYesNo(tp,aux.Stringid(21050101,1)) then
Duel.BreakEffect()
Duel.SpecialSummon(tc,0,tp,tp,true,false,POS_FACEUP)
end
end end
function c21050101.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
function c21050101.filter1(c) and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
return not c:IsType(TYPE_TOON) and c:IsAbleToDeck() and c:IsType(TYPE_MONSTER) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end end
function c21050101.target1(e,tp,eg,ep,ev,re,r,rp,chk) function c21050101.spop(e,tp,eg,ep,ev,re,r,rp)
if chk==0 then return Duel.IsExistingMatchingCard(c21050101.filter1,tp,LOCATION_GRAVE,0,1,nil) end local c=e:GetHandler()
Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE) if not c:IsRelateToEffect(e) then return end
Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
end end
function c21050101.operation1(e,tp,eg,ep,ev,re,r,rp) -- 1
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) function c21050101.target(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.SelectMatchingCard(tp,c21050101.filter,tp,LOCATION_GRAVE,0,1,1,nil) if chk==0 then return Duel.IsExistingMatchingCard(function(c) return c:IsAbleToDeck()end,tp,LOCATION_GRAVE,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE)
end end
function c21050101.operation(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local g=Duel.SelectMatchingCard(tp,function(c) return c:IsAbleToDeck()end,tp,LOCATION_GRAVE,0,1,1,nil)
local tc=g:GetFirst()
if tc and Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)~=0 and tc:IsLocation(LOCATION_DECK) then
if tc:IsType(TYPE_TOON) and Duel.GetMZoneCount(tp)>0 and tc:IsCanBeSpecialSummoned(e,0,tp,true,false)
and Duel.SelectYesNo(tp,aux.Stringid(21050101,5)) then
Duel.BreakEffect()
Duel.SpecialSummon(tc,0,tp,tp,true,false,POS_FACEUP)
end
end
end
-- 2
function c21050101.discon(e,tp,eg,ep,ev,re,r,rp) function c21050101.discon(e,tp,eg,ep,ev,re,r,rp)
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev)
end end
function c21050101.distg(e,tp,eg,ep,ev,re,r,rp,chk) function c21050101.distg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
e:GetHandler():RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(21050101,3)) e:GetHandler():RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(21050101,6))
Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0) Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
end end
end end
function c21050101.disop(e,tp,eg,ep,ev,re,r,rp) function c21050101.disop(e,tp,eg,ep,ev,re,r,rp)
if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
Duel.Destroy(eg,REASON_EFFECT) Duel.Destroy(eg,REASON_EFFECT)
end end
end
function c21050101.cfilter(c)
return c:IsSetCard(0x62) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
end
function c21050101.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c21050101.cfilter,tp,LOCATION_MZONE,0,2,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectMatchingCard(tp,c21050101.cfilter,tp,LOCATION_MZONE,0,2,2,nil)
Duel.Remove(g,POS_FACEUP,REASON_COST)
end
function c21050101.sptg(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 c21050101.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
end end
-- 3
function c21050101.cfilter1(c) function c21050101.cfilter1(c)
return c:IsFaceup() and c:IsCode(15259703) return c:IsFaceup() and c:IsCode(15259703)
end end
function c21050101.cfilter2(c) function c21050101.cfilter2(c)
return c:IsFaceup() and c:IsType(TYPE_TOON) return c:IsFaceup() and c:IsType(TYPE_TOON)
end end
function c21050101.dircon1(e) function c21050101.dircon1(e)
local tp=e:GetHandlerPlayer() local tp=e:GetHandlerPlayer()
return Duel.IsExistingMatchingCard(c21050101.cfilter1,tp,LOCATION_ONFIELD,0,1,nil) return Duel.IsExistingMatchingCard(c21050101.cfilter1,tp,LOCATION_ONFIELD,0,1,nil)
and not Duel.IsExistingMatchingCard(c21050101.cfilter2,tp,0,LOCATION_MZONE,1,nil) and not Duel.IsExistingMatchingCard(c21050101.cfilter2,tp,0,LOCATION_MZONE,1,nil)
end end
\ No newline at end of file
--涅梅西斯~对价之赐~ --妄执的巫女 无明
local s,id,o=GetID() local s,id,o=GetID()
function s.initial_effect(c) function s.initial_effect(c)
--summon with 7 tribute --summon with 7 tribute
...@@ -79,7 +79,7 @@ function s.drop(e,tp,eg,ep,ev,re,r,rp,c) ...@@ -79,7 +79,7 @@ function s.drop(e,tp,eg,ep,ev,re,r,rp,c)
e1:SetReset(RESET_EVENT+RESETS_STANDARD) e1:SetReset(RESET_EVENT+RESETS_STANDARD)
c:RegisterEffect(e1) c:RegisterEffect(e1)
if c:IsSummonable(true,se) if c:IsSummonable(true,se)
and (not c:IsAbleToGrave() or Duel.SelectOption(tp,1151,1153,1191)==0) then and (not c:IsAbleToGrave() or Duel.SelectOption(tp,1151,1191)==0) then
Duel.BreakEffect() Duel.BreakEffect()
Duel.Summon(tp,c,true,se) Duel.Summon(tp,c,true,se)
else else
...@@ -89,14 +89,14 @@ function s.drop(e,tp,eg,ep,ev,re,r,rp,c) ...@@ -89,14 +89,14 @@ function s.drop(e,tp,eg,ep,ev,re,r,rp,c)
end end
end end
function s.atkcon(e,tp,eg,ep,ev,re,r,rp) function s.atkcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetSummonType()==SUMMON_TYPE_TRIBUTE return e:GetHandler():IsSummonType(SUMMON_TYPE_ADVANCE)
end end
function s.atkop(e,tp,eg,ep,ev,re,r,rp) function s.atkop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,nil) local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,nil)
if g:GetCount()>2 then if #g>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local sg=g:Select(tp,3,3,nil) local sg=g:Select(tp,3,3,nil)
Duel.HintSelection(sg) Duel.HintSelection(sg)
Duel.Remove(sg,POS_FACEUP,REASON_EFFECT) Duel.SendtoDeck(sg,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
end end
end end
\ No newline at end of file
...@@ -307,9 +307,9 @@ ...@@ -307,9 +307,9 @@
!setname 0x9f1c 反抗黎骑 !setname 0x9f1c 反抗黎骑
!setname 0xaf1c 朱斯贝克 !setname 0xaf1c 朱斯贝克
!setname 0xcf1c 破天黎骑 !setname 0xcf1c 破天黎骑
!setname 0x3f1d 封龙 !setname 0x3f1d 龙族骑士
!setname 0x4f1d 时隙淑女 !setname 0x4f1d 时隙淑女
!setname 0x5f1d 机械加工 !setname 0x5f1d 共心龙
!setname 0x6f1d 连波 !setname 0x6f1d 连波
!setname 0xaf1d 阿尔弗雷德 !setname 0xaf1d 阿尔弗雷德
!setname 0xbf1d 狂风 !setname 0xbf1d 狂风
......
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