Commit 470c1a80 authored by POLYMER's avatar POLYMER

fix

parent c1c41ade
--鲜花卡通女男爵
-- 鲜花卡通女男爵
function c21050101.initial_effect(c)
aux.EnablePendulumAttribute(c)
--splimit
-- 0
local e0=Effect.CreateEffect(c)
e0:SetDescription(aux.Stringid(21050101,0))
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e0:SetCode(EFFECT_SPSUMMON_CONDITION)
e0:SetValue(c21050101.splimit1)
c:RegisterEffect(e0)
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)
-- p1
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(21050101,0))
e1:SetDescription(aux.Stringid(21050101,1))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
......@@ -53,60 +19,87 @@ function c21050101.initial_effect(c)
e1:SetTarget(c21050101.sptg)
e1:SetOperation(c21050101.spop)
c:RegisterEffect(e1)
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetCode(EFFECT_DIRECT_ATTACK)
e5:SetCondition(c21050101.dircon1)
c:RegisterEffect(e5)
-- p2
aux.EnableChangeCode(c,15259703,LOCATION_PZONE)
-- 1
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(21050101,2))
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
-- 0
function c21050101.splimit1(e,se,sp,st)
return se:IsHasType(EFFECT_TYPE_ACTIONS)
end
--1
function c21050101.filter(c)
return c:IsType(TYPE_TOON) and c:IsAbleToDeck()
-- p1
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
-- 1
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)
end
function c21050101.operation(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)
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)
and Duel.GetMZoneCount(tp)>0 and tc:IsCanBeSpecialSummoned(e,0,tp,true,false)
and Duel.SelectYesNo(tp,aux.Stringid(21050101,1)) then
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
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
-- 2
function c21050101.discon(e,tp,eg,ep,ev,re,r,rp)
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev)
end
function c21050101.distg(e,tp,eg,ep,ev,re,r,rp,chk)
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)
if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
......@@ -117,28 +110,7 @@ function c21050101.disop(e,tp,eg,ep,ev,re,r,rp)
Duel.Destroy(eg,REASON_EFFECT)
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
-- 3
function c21050101.cfilter1(c)
return c:IsFaceup() and c:IsCode(15259703)
end
......
--涅梅西斯~对价之赐~
--妄执的巫女 无明
local s,id,o=GetID()
function s.initial_effect(c)
--summon with 7 tribute
......@@ -79,7 +79,7 @@ function s.drop(e,tp,eg,ep,ev,re,r,rp,c)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
c:RegisterEffect(e1)
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.Summon(tp,c,true,se)
else
......@@ -89,14 +89,14 @@ function s.drop(e,tp,eg,ep,ev,re,r,rp,c)
end
end
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
function s.atkop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,nil)
if g:GetCount()>2 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,nil)
if #g>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local sg=g:Select(tp,3,3,nil)
Duel.HintSelection(sg)
Duel.Remove(sg,POS_FACEUP,REASON_EFFECT)
Duel.SendtoDeck(sg,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
end
end
\ No newline at end of file
......@@ -307,9 +307,9 @@
!setname 0x9f1c 反抗黎骑
!setname 0xaf1c 朱斯贝克
!setname 0xcf1c 破天黎骑
!setname 0x3f1d 封龙
!setname 0x3f1d 龙族骑士
!setname 0x4f1d 时隙淑女
!setname 0x5f1d 机械加工
!setname 0x5f1d 共心龙
!setname 0x6f1d 连波
!setname 0xaf1d 阿尔弗雷德
!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