Skip to content

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

fix

parent fac425cd
Hide whitespace changes
Inline Side-by-side
Showing with 160 additions and 118 deletions
expansions/script/c10202929.lua
View file @ d90a1c46
......@@ -44,9 +44,11 @@ function c10202929.nttg(e,c)
end
--2
function c10202929.chainop(e,tp,eg,ep,ev,re,r,rp)
if aux.IsCodeListed(re:GetHandler(),22702055) and c:IsType(TYPE_MONSTER) and ep==tp then
Duel.SetChainLimit(c10202929.chainlm)
end
if aux.IsCodeListed(re:GetHandler(),22702055)
and re:GetHandler():IsType(TYPE_MONSTER)
and ep==tp then
Duel.SetChainLimit(c10202929.chainlm)
end
end
function c10202929.chainlm(e,rp,tp)
return tp==rp
......
expansions/script/c121082833.lua
View file @ d90a1c46
--混沌(エラッタ前)
function c121082833.initial_effect(c)
--duel start
local e1=Effect.CreateEffect(c)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_TO_HAND)
e1:SetRange(LOCATION_DECK+LOCATION_HAND)
e1:SetCondition(c121082833.chcon)
e1:SetOperation(c121082833.chop)
c:RegisterEffect(e1)
--Activate
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_ACTIVATE)
e2:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e2)
--duel start
local e1=Effect.CreateEffect(c)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_TO_HAND)
e1:SetRange(LOCATION_DECK+LOCATION_HAND)
e1:SetCondition(c121082833.chcon)
e1:SetOperation(c121082833.chop)
c:RegisterEffect(e1)
--Activate
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_ACTIVATE)
e2:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e2)
if not c121082833.initcheck then
c121082833.initcheck=true
local st=Effect.SetTarget
Effect.SetTarget=function(e,tg)
if e:GetOwner():IsOriginalCodeRule(92746535) and e:GetCategory()==CATEGORY_TOHAND+CATEGORY_SEARCH then
return st(e,c121082833.thtg)
else
return st(e,tg)
end
end
local so=Effect.SetOperation
Effect.SetOperation=function(e,op)
if e:GetOwner():IsOriginalCodeRule(92746535) and e:GetCategory()==CATEGORY_TOHAND+CATEGORY_SEARCH then
return so(e,c121082833.thop)
else
return so(e,op)
end
end
local rg=Duel.GetMatchingGroup(Card.IsOriginalCodeRule,tp,0xff,0xff,nil,92746535)
for tc in aux.Next(rg) do
if tc.initial_effect then
local tinit=c121082833.initial_effect
c121082833.initial_effect=function() end
tc:ReplaceEffect(121082833,0)
c121082833.initial_effect=tinit
tc.initial_effect(tc)
end
end
end
end
function c121082833.chcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnCount()==0
return Duel.GetTurnCount()==0
end
function c121082833.chop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tp=c:GetOwner()
if not c:IsLocation(LOCATION_DECK+LOCATION_HAND) then return end
local g=Duel.GetFieldGroup(tp,LOCATION_HAND,LOCATION_HAND)
if g:GetCount()>0 then Duel.SendtoDeck(g,nil,2,REASON_RULE) end
local c=e:GetHandler()
local tp=c:GetOwner()
if not c:IsLocation(LOCATION_DECK+LOCATION_HAND) then return end
local g=Duel.GetFieldGroup(tp,LOCATION_HAND,LOCATION_HAND)
if g:GetCount()>0 then Duel.SendtoDeck(g,nil,2,REASON_RULE) end
-- Duel.ShuffleDeck(Duel.GetTurnPlayer())
if c:GetActivateEffect():IsActivatable(tp) then
Duel.MoveToField(c,tp,tp,LOCATION_FZONE,POS_FACEUP,true)
-- Duel.ShuffleDeck(tp)
--cannot set/activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SSET)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetRange(LOCATION_FZONE)
e1:SetTargetRange(1,0)
e1:SetTarget(c121082833.setlimit)
e1:SetReset(RESET_EVENT+0x1fe0000)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_CANNOT_ACTIVATE)
e2:SetRange(LOCATION_FZONE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetTargetRange(1,0)
e2:SetValue(c121082833.actlimit)
e2:SetReset(RESET_EVENT+0x1fe0000)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_CANNOT_ACTIVATE)
e:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e3:SetRange(LOCATION_FZONE)
e3:SetTargetRange(1,1)
e3:SetValue(c121082833.nofilter)
e3:SetReset(RESET_EVENT+0x1fe0000)
c:RegisterEffect(e3)
--indes
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetRange(LOCATION_FZONE)
e4:SetCode(EFFECT_INDESTRUCTABLE)
e4:SetValue(1)
e4:SetReset(RESET_EVENT+0x1fe0000)
c:RegisterEffect(e4)
local e5=e4:Clone()
e5:SetCode(EFFECT_CANNOT_REMOVE)
c:RegisterEffect(e5)
local e6=e4:Clone()
e6:SetCode(EFFECT_CANNOT_TO_DECK)
c:RegisterEffect(e6)
local e7=e4:Clone()
e7:SetCode(EFFECT_CANNOT_TO_HAND)
c:RegisterEffect(e7)
local e8=e4:Clone()
e8:SetCode(EFFECT_UNRELEASABLE_SUM)
c:RegisterEffect(e8)
local e9=e4:Clone()
e9:SetCode(EFFECT_UNRELEASABLE_NONSUM)
c:RegisterEffect(e9)
local e10=e4:Clone()
e10:SetCode(EFFECT_CANNOT_TO_GRAVE)
c:RegisterEffect(e10)
--chage name
local e0=Effect.CreateEffect(c)
e0:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_REPEAT+EFFECT_FLAG_DELAY+EFFECT_FLAG_SET_AVAILABLE)
e0:SetType(EFFECT_TYPE_FIELD)
e0:SetCode(EFFECT_CHANGE_CODE)
e0:SetRange(LOCATION_FZONE)
e0:SetTargetRange(0xff,0xff)
e0:SetValue(121082833)
c:RegisterEffect(e0)
Duel.RegisterFlagEffect(tp,10469,0,0,0)
Duel.RegisterFlagEffect(1-tp,10469,0,0,0)
end
Duel.BreakEffect()
Duel.ShuffleDeck(tp)
Duel.Draw(Duel.GetTurnPlayer(),5,REASON_RULE)
if c:GetActivateEffect():IsActivatable(tp) then
Duel.MoveToField(c,tp,tp,LOCATION_FZONE,POS_FACEUP,true)
-- Duel.ShuffleDeck(tp)
--cannot set/activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SSET)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetRange(LOCATION_FZONE)
e1:SetTargetRange(1,0)
e1:SetTarget(c121082833.setlimit)
e1:SetReset(RESET_EVENT+0x1fe0000)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_CANNOT_ACTIVATE)
e2:SetRange(LOCATION_FZONE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetTargetRange(1,0)
e2:SetValue(c121082833.actlimit)
e2:SetReset(RESET_EVENT+0x1fe0000)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_CANNOT_ACTIVATE)
e:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e3:SetRange(LOCATION_FZONE)
e3:SetTargetRange(1,1)
e3:SetValue(c121082833.nofilter)
e3:SetReset(RESET_EVENT+0x1fe0000)
c:RegisterEffect(e3)
--indes
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetRange(LOCATION_FZONE)
e4:SetCode(EFFECT_INDESTRUCTABLE)
e4:SetValue(1)
e4:SetReset(RESET_EVENT+0x1fe0000)
c:RegisterEffect(e4)
local e5=e4:Clone()
e5:SetCode(EFFECT_CANNOT_REMOVE)
c:RegisterEffect(e5)
local e6=e4:Clone()
e6:SetCode(EFFECT_CANNOT_TO_DECK)
c:RegisterEffect(e6)
local e7=e4:Clone()
e7:SetCode(EFFECT_CANNOT_TO_HAND)
c:RegisterEffect(e7)
local e8=e4:Clone()
e8:SetCode(EFFECT_UNRELEASABLE_SUM)
c:RegisterEffect(e8)
local e9=e4:Clone()
e9:SetCode(EFFECT_UNRELEASABLE_NONSUM)
c:RegisterEffect(e9)
local e10=e4:Clone()
e10:SetCode(EFFECT_CANNOT_TO_GRAVE)
c:RegisterEffect(e10)
--chage name
local e0=Effect.CreateEffect(c)
e0:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_REPEAT+EFFECT_FLAG_DELAY+EFFECT_FLAG_SET_AVAILABLE)
e0:SetType(EFFECT_TYPE_FIELD)
e0:SetCode(EFFECT_CHANGE_CODE)
e0:SetRange(LOCATION_FZONE)
e0:SetTargetRange(0xff,0xff)
e0:SetValue(121082833)
c:RegisterEffect(e0)
Duel.RegisterFlagEffect(tp,10469,0,0,0)
Duel.RegisterFlagEffect(1-tp,10469,0,0,0)
end
Duel.BreakEffect()
Duel.ShuffleDeck(tp)
Duel.Draw(Duel.GetTurnPlayer(),5,REASON_RULE)
end
function c121082833.efilter(e,te)
return te:GetOwner()~=e:GetOwner()
return te:GetOwner()~=e:GetOwner()
end
function c121082833.setlimit(e,c,tp)
return c:IsType(TYPE_FIELD)
return c:IsType(TYPE_FIELD)
end
function c121082833.actlimit(e,re,tp)
return re:IsActiveType(TYPE_FIELD) and re:IsHasType(EFFECT_TYPE_ACTIVATE)
return re:IsActiveType(TYPE_FIELD) and re:IsHasType(EFFECT_TYPE_ACTIVATE)
end
function c121082833.nofilter(e,re,tp)
return re:GetHandler():IsCode(73468603)
return re:GetHandler():IsCode(73468603)
end
expansions/script/c13254077.lua
View file @ d90a1c46
......@@ -16,8 +16,8 @@ function cm.initial_effect(c)
e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND+CATEGORY_SUMMON)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetTarget(s.smtg)
e1:SetOperation(s.smop)
e1:SetTarget(cm.smtg)
e1:SetOperation(cm.smop)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
......@@ -28,26 +28,26 @@ function cm.initial_effect(c)
e2:SetTarget(cm.thtg)
e2:SetOperation(cm.thop)
c:RegisterEffect(e2)
if not s.global_check then
if not cm.global_check then
s.global_check=true
s[0]=0
s[1]=0
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SUMMON)
ge1:SetOperation(s.regop)
ge1:SetOperation(cm.regop)
Duel.RegisterEffect(ge1,0)
end
end
function s.regop(e,tp,eg,ep,ev,re,r,rp)
function cm.regop(e,tp,eg,ep,ev,re,r,rp)
local c=eg:GetFirst()
if s[ep]==0 and c:IsCode(m) then s[ep]=1 end
if cm[ep]==0 and c:IsCode(m) then cm[ep]=1 end
end
function cm.ntcon(e,c,minc)
if c==nil then return true end
return minc==0 and c:IsLevelAbove(5) and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
and s[c:GetControler()]==0
and cm[c:GetControler()]==0
end
function cm.thfilter(c)
return c:IsSetCard(0x3356) and c:IsAbleToHand()
......
expansions/script/c13254078.lua
View file @ d90a1c46
......@@ -24,7 +24,7 @@ function s.initial_effect(c)
e3:SetTarget(s.pctg)
e3:SetOperation(s.pcop)
c:RegisterEffect(e3)
elements={{"tama_elements",{{TAMA_ELEMENT_ORDER,1},{TAMA_ELEMENT_CHAOS,1}}}
elements={{"tama_elements",{{TAMA_ELEMENT_ORDER,1},{TAMA_ELEMENT_CHAOS,1}}}}
s[c]=elements
end
......
expansions/script/c60150504.lua
View file @ d90a1c46
......@@ -11,7 +11,7 @@ function c60150504.initial_effect(c)
--特招
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(60150504,1))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_HANDES+CATEGORY_DRAW)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCountLimit(1)
......
expansions/script/c60150507.lua
View file @ d90a1c46
--幻想曲 纯白的女骑士
function c60150507.initial_effect(c)
--summon with no tribute
local e0=Effect.CreateEffect(c)
e0:SetDescription(aux.Stringid(60150505,0))
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_SUMMON_PROC)
e0:SetCondition(c60150507.ntcon)
c:RegisterEffect(e0)
--
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(60150507,0))
......@@ -37,6 +45,10 @@ function c60150507.initial_effect(c)
c:RegisterEffect(e3)]]
Duel.AddCustomActivityCounter(60150507,ACTIVITY_SPSUMMON,c60150507.counterfilter)
end
function c60150507.ntcon(e,c,minc)
if c==nil then return true end
return minc==0 and c:GetLevel()>4 and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
end
function c60150507.counterfilter(c)
return (c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_FIEND))
end
......
expansions/script/c60150520.lua
View file @ d90a1c46
......@@ -98,18 +98,16 @@ function c60150520.filter(c,e,tp)
return c:GetRank()<=10 and c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_FIEND) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c60150520.sumtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_EXTRA) and c60150520.filter(chkc,e,tp) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(c60150520.filter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,c60150520.filter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
if chk==0 then return Duel.IsExistingMatchingCard(c60150520.filter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
end
function c60150520.sumop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then
Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
local c=e:GetHandler()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c60150520.filter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end
end
function c60150520.atkcon(e,tp,eg,ep,ev,re,r,rp)
......
expansions/script/c75000019.lua
View file @ d90a1c46
--热砂大地 密斯提拉
function c75000019.initial_effect(c)
aux.AddCodeList(c,75000001)
--spsummon
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
......
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