Skip to content

no81cards
no81cards
Commit ac4884ed authored by POLYMER's avatar POLYMER
Browse files
Options

fix

parent 34fd8483
Hide whitespace changes
Inline Side-by-side
Showing with 141 additions and 141 deletions
expansions/script/c117179181.lua
View file @ ac4884ed
--魔弾の奏者マリア --魔弾の奏者マリア
function c117179181.initial_effect(c) function c117179181.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--pendulum effect --pendulum effect
--link summon --link summon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(117179181,0)) e1:SetDescription(aux.Stringid(117179181,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetRange(LOCATION_PZONE) e1:SetRange(LOCATION_PZONE)
e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END) e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
e1:SetCountLimit(1,117179181) e1:SetCountLimit(1,117179181)
e1:SetCost(c117179181.actcost) e1:SetCost(c117179181.actcost)
e1:SetTarget(c117179181.lktg) e1:SetTarget(c117179181.lktg)
e1:SetOperation(c117179181.lkop) e1:SetOperation(c117179181.lkop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--spsummon --spsummon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_CHAINING) e2:SetCode(EVENT_CHAINING)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetOperation(aux.chainreg) e2:SetOperation(aux.chainreg)
c:RegisterEffect(e2) c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(117179181,1)) e3:SetDescription(aux.Stringid(117179181,1))
e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_CHAIN_SOLVING) e3:SetCode(EVENT_CHAIN_SOLVING)
e3:SetProperty(EFFECT_FLAG_NO_TURN_RESET+EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY) e3:SetProperty(EFFECT_FLAG_NO_TURN_RESET+EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
e3:SetRange(LOCATION_PZONE) e3:SetRange(LOCATION_PZONE)
e3:SetCountLimit(1,117179182) e3:SetCountLimit(1,117179182)
e3:SetCondition(c117179181.spcon) e3:SetCondition(c117179181.spcon)
e3:SetCost(c117179181.actcost) e3:SetCost(c117179181.actcost)
e3:SetTarget(c117179181.sptg) e3:SetTarget(c117179181.sptg)
e3:SetOperation(c117179181.spop) e3:SetOperation(c117179181.spop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--monster effect --monster effect
--activate from hand --activate from hand
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(117179181,4)) e4:SetDescription(aux.Stringid(117179181,4))
e4:SetType(EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_QP_ACT_IN_NTPHAND) e4:SetCode(EFFECT_QP_ACT_IN_NTPHAND)
e4:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e4:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x108)) e4:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x108))
e4:SetTargetRange(LOCATION_HAND,0) e4:SetTargetRange(LOCATION_HAND,0)
c:RegisterEffect(e4) c:RegisterEffect(e4)
local e5=e4:Clone() local e5=e4:Clone()
e5:SetCode(EFFECT_TRAP_ACT_IN_HAND) e5:SetCode(EFFECT_TRAP_ACT_IN_HAND)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--spsummon & pset --spsummon & pset
local e6=Effect.CreateEffect(c) local e6=Effect.CreateEffect(c)
e6:SetDescription(aux.Stringid(117179181,2)) e6:SetDescription(aux.Stringid(117179181,2))
e6:SetCategory(CATEGORY_SPECIAL_SUMMON) e6:SetCategory(CATEGORY_SPECIAL_SUMMON)
e6:SetType(EFFECT_TYPE_QUICK_O) e6:SetType(EFFECT_TYPE_QUICK_O)
e6:SetCode(EVENT_FREE_CHAIN) e6:SetCode(EVENT_FREE_CHAIN)
e6:SetRange(LOCATION_MZONE+LOCATION_HAND) e6:SetRange(LOCATION_MZONE+LOCATION_HAND)
e6:SetCountLimit(1,117179183) e6:SetCountLimit(1,117179183)
e6:SetCondition(c117179181.sscon) e6:SetCondition(c117179181.sscon)
e6:SetCost(c117179181.actcost) e6:SetCost(c117179181.actcost)
e6:SetTarget(c117179181.sstg) e6:SetTarget(c117179181.sstg)
e6:SetOperation(c117179181.ssop) e6:SetOperation(c117179181.ssop)
c:RegisterEffect(e6) c:RegisterEffect(e6)
--atk gain --atk gain
local e7=Effect.CreateEffect(c) local e7=Effect.CreateEffect(c)
e7:SetDescription(aux.Stringid(117179181,3)) e7:SetDescription(aux.Stringid(117179181,3))
e7:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE) e7:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE)
e7:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e7:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e7:SetProperty(EFFECT_FLAG_DELAY) e7:SetProperty(EFFECT_FLAG_DELAY)
e7:SetCode(EVENT_CHAIN_SOLVING) e7:SetCode(EVENT_CHAIN_SOLVING)
e7:SetRange(LOCATION_MZONE) e7:SetRange(LOCATION_MZONE)
e7:SetCountLimit(1,117179184) e7:SetCountLimit(1,117179184)
e7:SetCondition(c117179181.atkcon) e7:SetCondition(c117179181.atkcon)
e7:SetCost(c117179181.actcost) e7:SetCost(c117179181.actcost)
e7:SetTarget(c117179181.atktg) e7:SetTarget(c117179181.atktg)
e7:SetOperation(c117179181.atkop) e7:SetOperation(c117179181.atkop)
c:RegisterEffect(e7) c:RegisterEffect(e7)
Duel.AddCustomActivityCounter(117179181,ACTIVITY_CHAIN,aux.FALSE) Duel.AddCustomActivityCounter(117179181,ACTIVITY_CHAIN,aux.FALSE)
end end
--description --description
function c117179181.actcost(e,tp,eg,ep,ev,re,r,rp,chk) function c117179181.actcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription()) Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
end end
--link summon --link summon
function c117179181.matfilter(c) function c117179181.matfilter(c)
return c:IsFaceup() and c:IsSetCard(0x108) return c:IsFaceup() and c:IsSetCard(0x108)
end end
function c117179181.lkfilter(c,mg) function c117179181.lkfilter(c,mg)
return c:IsLinkSummonable(mg) return c:IsLinkSummonable(mg)
end end
function c117179181.lktg(e,tp,eg,ep,ev,re,r,rp,chk) function c117179181.lktg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then if chk==0 then
local mg=Duel.GetMatchingGroup(c117179181.matfilter,tp,LOCATION_MZONE,0,nil) local mg=Duel.GetMatchingGroup(c117179181.matfilter,tp,LOCATION_MZONE,0,nil)
return Duel.IsExistingMatchingCard(c117179181.lkfilter,tp,LOCATION_EXTRA,0,1,nil,mg) return Duel.IsExistingMatchingCard(c117179181.lkfilter,tp,LOCATION_EXTRA,0,1,nil,mg)
end end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end end
function c117179181.lkop(e,tp,eg,ep,ev,re,r,rp) function c117179181.lkop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end if not c:IsRelateToEffect(e) then return end
local mg=Duel.GetMatchingGroup(c117179181.matfilter,tp,LOCATION_MZONE,0,nil) local mg=Duel.GetMatchingGroup(c117179181.matfilter,tp,LOCATION_MZONE,0,nil)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tg=Duel.SelectMatchingCard(tp,c117179181.lkfilter,tp,LOCATION_EXTRA,0,1,1,nil,mg) local tg=Duel.SelectMatchingCard(tp,c117179181.lkfilter,tp,LOCATION_EXTRA,0,1,1,nil,mg)
local tc=tg:GetFirst() local tc=tg:GetFirst()
if tc then if tc then
Duel.LinkSummon(tp,tc,mg) Duel.LinkSummon(tp,tc,mg)
end end
end end
--spsummon --spsummon
function c117179181.spcon(e,tp,eg,ep,ev,re,r,rp) function c117179181.spcon(e,tp,eg,ep,ev,re,r,rp)
return re:IsActiveType(TYPE_SPELL+TYPE_TRAP) and re:IsHasType(EFFECT_TYPE_ACTIVATE) return re:IsActiveType(TYPE_SPELL+TYPE_TRAP) and re:IsHasType(EFFECT_TYPE_ACTIVATE)
end end
function c117179181.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c117179181.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end end
function c117179181.spop(e,tp,eg,ep,ev,re,r,rp) function c117179181.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
end end
end end
--spsummon & pset --spsummon & pset
function c117179181.sscon(e,tp,eg,ep,ev,re,r,rp) function c117179181.sscon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetFieldGroupCount(tp,LOCATION_ONFIELD,0)==0 or Duel.GetCustomActivityCount(117179181,1-tp,ACTIVITY_CHAIN)>0 return Duel.GetFieldGroupCount(tp,LOCATION_ONFIELD,0)==0 or Duel.GetCustomActivityCount(117179181,1-tp,ACTIVITY_CHAIN)>0
end end
function c117179181.ssfilter(c,e,tp) function c117179181.ssfilter(c,e,tp)
return c:IsSetCard(0x108) and not c:IsCode(117179181) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x108) and not c:IsCode(117179181) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c117179181.sstg(e,tp,eg,ep,ev,re,r,rp,chk) function c117179181.sstg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c117179181.ssfilter,tp,LOCATION_DECK,0,1,nil,e,tp) and Duel.IsExistingMatchingCard(c117179181.ssfilter,tp,LOCATION_DECK,0,1,nil,e,tp)
and (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1)) and (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1))
and not e:GetHandler():IsForbidden() end and not e:GetHandler():IsForbidden() end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
end end
function c117179181.ssop(e,tp,eg,ep,ev,re,r,rp) function c117179181.ssop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if Duel.GetLocationCount(tp,LOCATION_MZONE)==0 then return end if Duel.GetLocationCount(tp,LOCATION_MZONE)==0 or not (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1)) then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tc=Duel.SelectMatchingCard(tp,c117179181.ssfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp):GetFirst() local tc=Duel.SelectMatchingCard(tp,c117179181.ssfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp):GetFirst()
if tc and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)~=0 and c:IsRelateToEffect(e) then if tc and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)~=0 and c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
--atk gain --atk gain
function c117179181.atkcon(e,tp,eg,ep,ev,re,r,rp) function c117179181.atkcon(e,tp,eg,ep,ev,re,r,rp)
return re:IsHasType(EFFECT_TYPE_ACTIVATE) and e:GetHandler():GetColumnGroup():IsContains(re:GetHandler()) return re:IsHasType(EFFECT_TYPE_ACTIVATE) and e:GetHandler():GetColumnGroup():IsContains(re:GetHandler())
end end
function c117179181.atkfilter(c) function c117179181.atkfilter(c)
return c:IsFaceup() and c:IsSetCard(0x108) and (c:GetAttack()>0 or c:GetDefense()>0) return c:IsFaceup() and c:IsSetCard(0x108) and (c:GetAttack()>0 or c:GetDefense()>0)
end end
function c117179181.atktg(e,tp,eg,ep,ev,re,r,rp,chk) function c117179181.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c117179181.atkfilter,tp,LOCATION_MZONE,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c117179181.atkfilter,tp,LOCATION_MZONE,0,1,nil) end
end end
function c117179181.atkop(e,tp,eg,ep,ev,re,r,rp) function c117179181.atkop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end if not c:IsRelateToEffect(e) then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local g=Duel.SelectMatchingCard(tp,c117179181.atkfilter,tp,LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c117179181.atkfilter,tp,LOCATION_MZONE,0,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.HintSelection(g) Duel.HintSelection(g)
local tc=g:GetFirst() local tc=g:GetFirst()
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetValue(tc:GetAttack()) e1:SetValue(tc:GetAttack())
e1:SetReset(RESET_EVENT+0x1fe0000) e1:SetReset(RESET_EVENT+0x1fe0000)
c:RegisterEffect(e1) c:RegisterEffect(e1)
local e2=e1:Clone() local e2=e1:Clone()
e2:SetCode(EFFECT_UPDATE_DEFENSE) e2:SetCode(EFFECT_UPDATE_DEFENSE)
e2:SetValue(tc:GetDefense()) e2:SetValue(tc:GetDefense())
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
end end
expansions/script/c89390110.lua
View file @ ac4884ed
...@@ -74,7 +74,7 @@ function s.drop(e,tp,eg,ep,ev,re,r,rp) ...@@ -74,7 +74,7 @@ function s.drop(e,tp,eg,ep,ev,re,r,rp)
local rc=g:GetFirst() local rc=g:GetFirst()
if rc and Duel.Remove(rc,POS_FACEUP,REASON_EFFECT)~=0 and rc:IsLocation(LOCATION_REMOVED) then if rc and Duel.Remove(rc,POS_FACEUP,REASON_EFFECT)~=0 and rc:IsLocation(LOCATION_REMOVED) then
Duel.BreakEffect() Duel.BreakEffect()
if Duel.Draw(tp,2,REASON_EFFECT)==2 and Duel.IsExistingMatchingCard(s.movefilter,tp,0,LOCATION_MZONE,1,nil,1-tp) and Duel.SelectYesNo(tp,aux.Stringid(id,0)) then if Duel.Draw(tp,2,REASON_EFFECT)==2 and Duel.IsExistingMatchingCard(s.movefilter,tp,0,LOCATION_MZONE,1,nil,1-tp) then
local mg=Duel.SelectMatchingCard(tp,s.movefilter,tp,0,LOCATION_MZONE,1,1,nil,1-tp) local mg=Duel.SelectMatchingCard(tp,s.movefilter,tp,0,LOCATION_MZONE,1,1,nil,1-tp)
local seq=mg:GetFirst():GetSequence() local seq=mg:GetFirst():GetSequence()
local flag=0 local flag=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