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:SetDescription(aux.Stringid(21050101,0))
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e0:SetCode(EFFECT_SPSUMMON_CONDITION) e0:SetCode(EFFECT_SPSUMMON_CONDITION)
e0:SetValue(c21050101.splimit1) e0:SetValue(c21050101.splimit1)
c:RegisterEffect(e0) c:RegisterEffect(e0)
-- p1
aux.EnableChangeCode(c,15259703,LOCATION_PZONE)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(21050101,5))
e3:SetCategory(CATEGORY_TODECK+CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1,EFFECT_COUNT_CODE_SINGLE)
e3:SetTarget(c21050101.target)
e3:SetOperation(c21050101.operation)
c:RegisterEffect(e3)
local e31=Effect.CreateEffect(c)
e31:SetDescription(aux.Stringid(21050101,6))
e31:SetCategory(CATEGORY_TODECK)
e31:SetType(EFFECT_TYPE_IGNITION)
e31:SetRange(LOCATION_MZONE)
e31:SetCountLimit(1,EFFECT_COUNT_CODE_SINGLE)
e31:SetTarget(c21050101.target1)
e31:SetOperation(c21050101.operation1)
c:RegisterEffect(e31)
local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(21050101,0))
e4:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
e4:SetType(EFFECT_TYPE_QUICK_O)
e4:SetCode(EVENT_CHAINING)
e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL+EFFECT_FLAG_NO_TURN_RESET)
e4:SetRange(LOCATION_MZONE)
e4:SetCountLimit(1,21050101)
e4:SetCondition(c21050101.discon)
e4:SetTarget(c21050101.distg)
e4:SetOperation(c21050101.disop)
c:RegisterEffect(e4)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(21050101,0)) e1:SetDescription(aux.Stringid(21050101,1))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_IGNITION) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE) e1:SetRange(LOCATION_PZONE)
...@@ -53,60 +19,87 @@ function c21050101.initial_effect(c) ...@@ -53,60 +19,87 @@ function c21050101.initial_effect(c)
e1:SetTarget(c21050101.sptg) e1:SetTarget(c21050101.sptg)
e1:SetOperation(c21050101.spop) e1:SetOperation(c21050101.spop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
-- p2
local e5=Effect.CreateEffect(c) aux.EnableChangeCode(c,15259703,LOCATION_PZONE)
e5:SetType(EFFECT_TYPE_SINGLE) -- 1
e5:SetCode(EFFECT_DIRECT_ATTACK) local e2=Effect.CreateEffect(c)
e5:SetCondition(c21050101.dircon1) e2:SetDescription(aux.Stringid(21050101,2))
c:RegisterEffect(e5) e2:SetCategory(CATEGORY_TODECK+CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1)
e2:SetTarget(c21050101.target)
e2:SetOperation(c21050101.operation)
c:RegisterEffect(e2)
-- 2
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(21050101,3))
e3:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCode(EVENT_CHAINING)
e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL+EFFECT_FLAG_NO_TURN_RESET)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1,21050101)
e3:SetCondition(c21050101.discon)
e3:SetTarget(c21050101.distg)
e3:SetOperation(c21050101.disop)
c:RegisterEffect(e3)
-- 3
local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(21050101,4))
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_DIRECT_ATTACK)
e4:SetCondition(c21050101.dircon1)
c:RegisterEffect(e4)
end end
-- 0
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 end
-- p1
--1 function c21050101.cfilter(c)
return c:IsSetCard(0x62) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
function c21050101.filter(c) end
return c:IsType(TYPE_TOON) and c:IsAbleToDeck() 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 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
-- 1
function c21050101.target(e,tp,eg,ep,ev,re,r,rp,chk) function c21050101.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c21050101.filter,tp,LOCATION_GRAVE,0,1,nil) end 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) Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE)
end end
function c21050101.operation(e,tp,eg,ep,ev,re,r,rp) function c21050101.operation(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local g=Duel.SelectMatchingCard(tp,c21050101.filter,tp,LOCATION_GRAVE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,function(c) return c:IsAbleToDeck()end,tp,LOCATION_GRAVE,0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc and Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)~=0 and tc:IsLocation(LOCATION_DECK) if tc and Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)~=0 and tc:IsLocation(LOCATION_DECK) then
and Duel.GetMZoneCount(tp)>0 and tc:IsCanBeSpecialSummoned(e,0,tp,true,false) 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,1)) then and Duel.SelectYesNo(tp,aux.Stringid(21050101,5)) then
Duel.BreakEffect() Duel.BreakEffect()
Duel.SpecialSummon(tc,0,tp,tp,true,false,POS_FACEUP) Duel.SpecialSummon(tc,0,tp,tp,true,false,POS_FACEUP)
end end
end
end end
-- 2
function c21050101.filter1(c)
return not c:IsType(TYPE_TOON) and c:IsAbleToDeck() and c:IsType(TYPE_MONSTER)
end
function c21050101.target1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c21050101.filter1,tp,LOCATION_GRAVE,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE)
end
function c21050101.operation1(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local g=Duel.SelectMatchingCard(tp,c21050101.filter,tp,LOCATION_GRAVE,0,1,1,nil)
end
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)
...@@ -117,28 +110,7 @@ function c21050101.disop(e,tp,eg,ep,ev,re,r,rp) ...@@ -117,28 +110,7 @@ function c21050101.disop(e,tp,eg,ep,ev,re,r,rp)
Duel.Destroy(eg,REASON_EFFECT) Duel.Destroy(eg,REASON_EFFECT)
end end
end end
-- 3
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
function c21050101.cfilter1(c) function c21050101.cfilter1(c)
return c:IsFaceup() and c:IsCode(15259703) return c:IsFaceup() and c:IsCode(15259703)
end end
......
--涅梅西斯~对价之赐~ --妄执的巫女 无明
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