Commit 555c6d40 authored by Tachibana's avatar Tachibana

eme

parent 29b1a01c
Pipeline #6253 passed with stages
in 27 minutes and 18 seconds
No preview for this file type
...@@ -9,13 +9,7 @@ function cm.initial_effect(c) ...@@ -9,13 +9,7 @@ function cm.initial_effect(c)
e0:SetCode(EVENT_FREE_CHAIN) e0:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e0) c:RegisterEffect(e0)
--change --change
local e1=Effect.CreateEffect(c) aux.EnableChangeCode(c,26806000,LOCATION_SZONE+LOCATION_GRAVE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetRange(LOCATION_SZONE+LOCATION_GRAVE)
e1:SetValue(26806000)
c:RegisterEffect(e1)
--extra summon --extra summon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_IGNITION)
......
...@@ -30,13 +30,7 @@ function cm.initial_effect(c) ...@@ -30,13 +30,7 @@ function cm.initial_effect(c)
e3:SetCondition(cm.tgcon) e3:SetCondition(cm.tgcon)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--change --change
local e4=Effect.CreateEffect(c) aux.EnableChangeCode(c,26806000,LOCATION_ONFIELD+LOCATION_GRAVE)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetCode(EFFECT_CHANGE_CODE)
e4:SetRange(LOCATION_ONFIELD+LOCATION_GRAVE)
e4:SetValue(26806000)
c:RegisterEffect(e4)
end end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk) function cm.target(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
......
...@@ -10,13 +10,7 @@ function cm.initial_effect(c) ...@@ -10,13 +10,7 @@ function cm.initial_effect(c)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--Code Change --Code Change
local e0=Effect.CreateEffect(c) aux.EnableChangeCode(c,81010004,LOCATION_SZONE)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_CHANGE_CODE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_SZONE)
e0:SetValue(81010004)
c:RegisterEffect(e0)
--to hand --to hand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,1)) e2:SetDescription(aux.Stringid(m,1))
......
...@@ -4,13 +4,7 @@ local cm=_G["c"..m] ...@@ -4,13 +4,7 @@ local cm=_G["c"..m]
Duel.LoadScript("c26800000.lua") Duel.LoadScript("c26800000.lua")
function cm.initial_effect(c) function cm.initial_effect(c)
--code --code
local e0=Effect.CreateEffect(c) aux.EnableChangeCode(c,33374561,LOCATION_MZONE+LOCATION_GRAVE)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_CHANGE_CODE)
e0:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e0:SetValue(33374561)
c:RegisterEffect(e0)
--summon --summon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0)) e1:SetDescription(aux.Stringid(m,0))
......
...@@ -8,13 +8,7 @@ function cm.initial_effect(c) ...@@ -8,13 +8,7 @@ function cm.initial_effect(c)
aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsAttribute,ATTRIBUTE_WATER),7,2) aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsAttribute,ATTRIBUTE_WATER),7,2)
c:EnableReviveLimit() c:EnableReviveLimit()
--code --code
local e1=Effect.CreateEffect(c) aux.EnableChangeCode(c,26821000,LOCATION_MZONE+LOCATION_GRAVE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e1:SetValue(26821000)
c:RegisterEffect(e1)
--destroy --destroy
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON) e2:SetCategory(CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON)
......
...@@ -7,14 +7,7 @@ function cm.initial_effect(c) ...@@ -7,14 +7,7 @@ function cm.initial_effect(c)
--xyz summon --xyz summon
aux.AddXyzProcedure(c,nil,7,3) aux.AddXyzProcedure(c,nil,7,3)
c:EnableReviveLimit() c:EnableReviveLimit()
--code aux.EnableChangeCode(c,26821000,LOCATION_MZONE+LOCATION_GRAVE)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_CHANGE_CODE)
e0:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e0:SetValue(26821000)
c:RegisterEffect(e0)
--banish extra --banish extra
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_REMOVE) e1:SetCategory(CATEGORY_REMOVE)
......
...@@ -8,13 +8,7 @@ function cm.initial_effect(c) ...@@ -8,13 +8,7 @@ function cm.initial_effect(c)
aux.AddLinkProcedure(c,cm.mfilter,2) aux.AddLinkProcedure(c,cm.mfilter,2)
c:EnableReviveLimit() c:EnableReviveLimit()
--code --code
local e1=Effect.CreateEffect(c) aux.EnableChangeCode(c,26821000,LOCATION_MZONE+LOCATION_GRAVE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e1:SetValue(26821000)
c:RegisterEffect(e1)
--disable --disable
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_DESTROY) e3:SetCategory(CATEGORY_DESTROY)
......
...@@ -7,14 +7,7 @@ function cm.initial_effect(c) ...@@ -7,14 +7,7 @@ function cm.initial_effect(c)
--link summon --link summon
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkRace,RACE_BEAST),2) aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkRace,RACE_BEAST),2)
--code aux.EnableChangeCode(c,26821000,LOCATION_MZONE+LOCATION_GRAVE)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_CHANGE_CODE)
e0:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e0:SetValue(26821000)
c:RegisterEffect(e0)
--handes --handes
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_HANDES) e1:SetCategory(CATEGORY_HANDES)
......
...@@ -5,14 +5,6 @@ function cm.initial_effect(c) ...@@ -5,14 +5,6 @@ function cm.initial_effect(c)
--xyz summon --xyz summon
aux.AddXyzProcedure(c,nil,8,2,nil,nil,99) aux.AddXyzProcedure(c,nil,8,2,nil,nil,99)
c:EnableReviveLimit() c:EnableReviveLimit()
--code
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_CHANGE_CODE)
e0:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e0:SetValue(28315001)
c:RegisterEffect(e0)
--announce --announce
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0)) e1:SetDescription(aux.Stringid(m,0))
......
...@@ -80,13 +80,7 @@ end ...@@ -80,13 +80,7 @@ end
function Tenka.Asamiya(c) function Tenka.Asamiya(c)
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddCodeList(c,81027000) aux.AddCodeList(c,81027000)
local ea=Effect.CreateEffect(c) aux.EnableChangeCode(c,81027000,LOCATION_MZONE+LOCATION_HAND)
ea:SetType(EFFECT_TYPE_SINGLE)
ea:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
ea:SetCode(EFFECT_CHANGE_CODE)
ea:SetRange(LOCATION_MZONE+LOCATION_HAND)
ea:SetValue(81027000)
c:RegisterEffect(ea)
end end
-- --
function Tenka.Einstein(c) function Tenka.Einstein(c)
......
...@@ -4,13 +4,7 @@ local cm=_G["c"..m] ...@@ -4,13 +4,7 @@ local cm=_G["c"..m]
function cm.initial_effect(c) function cm.initial_effect(c)
aux.AddCodeList(c,81002000) aux.AddCodeList(c,81002000)
--code --code
local e0=Effect.CreateEffect(c) aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_CHANGE_CODE)
e0:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e0:SetValue(81002000)
c:RegisterEffect(e0)
--special summon --special summon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0)) e1:SetDescription(aux.Stringid(m,0))
......
...@@ -14,13 +14,7 @@ function cm.initial_effect(c) ...@@ -14,13 +14,7 @@ function cm.initial_effect(c)
e0:SetOperation(cm.spop) e0:SetOperation(cm.spop)
c:RegisterEffect(e0) c:RegisterEffect(e0)
--code --code
local e1=Effect.CreateEffect(c) aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e1:SetValue(81002000)
c:RegisterEffect(e1)
--special summon --special summon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_QUICK_O) e2:SetType(EFFECT_TYPE_QUICK_O)
......
...@@ -5,13 +5,7 @@ Duel.LoadScript("c81000000.lua") ...@@ -5,13 +5,7 @@ Duel.LoadScript("c81000000.lua")
function cm.initial_effect(c) function cm.initial_effect(c)
aux.AddCodeList(c,81002000) aux.AddCodeList(c,81002000)
--code --code
local e0=Effect.CreateEffect(c) aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_CHANGE_CODE)
e0:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e0:SetValue(81002000)
c:RegisterEffect(e0)
--special summon --special summon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
......
...@@ -14,13 +14,7 @@ function cm.initial_effect(c) ...@@ -14,13 +14,7 @@ function cm.initial_effect(c)
e0:SetOperation(cm.spop) e0:SetOperation(cm.spop)
c:RegisterEffect(e0) c:RegisterEffect(e0)
--code --code
local e1=Effect.CreateEffect(c) aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e1:SetValue(81002000)
c:RegisterEffect(e1)
--tohand --tohand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_TOHAND+CATEGORY_DECKDES) e2:SetCategory(CATEGORY_TOHAND+CATEGORY_DECKDES)
......
...@@ -6,13 +6,7 @@ cm.named_with_Urban=true ...@@ -6,13 +6,7 @@ cm.named_with_Urban=true
function cm.initial_effect(c) function cm.initial_effect(c)
aux.AddCodeList(c,81002000) aux.AddCodeList(c,81002000)
--code --code
local e0=Effect.CreateEffect(c) aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_ADD_CODE)
e0:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e0:SetValue(81002000)
c:RegisterEffect(e0)
--draw --draw
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOGRAVE+CATEGORY_DRAW) e1:SetCategory(CATEGORY_TOGRAVE+CATEGORY_DRAW)
......
...@@ -6,13 +6,7 @@ cm.named_with_Urban=true ...@@ -6,13 +6,7 @@ cm.named_with_Urban=true
function cm.initial_effect(c) function cm.initial_effect(c)
aux.AddCodeList(c,81002000) aux.AddCodeList(c,81002000)
--code --code
local e1=Effect.CreateEffect(c) aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_CODE)
e1:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e1:SetValue(81002000)
c:RegisterEffect(e1)
--spsummon --spsummon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
......
...@@ -6,13 +6,7 @@ cm.named_with_Urban=true ...@@ -6,13 +6,7 @@ cm.named_with_Urban=true
function cm.initial_effect(c) function cm.initial_effect(c)
aux.AddCodeList(c,81002000) aux.AddCodeList(c,81002000)
--code --code
local e0=Effect.CreateEffect(c) aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_ADD_CODE)
e0:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e0:SetValue(81002000)
c:RegisterEffect(e0)
--tohand --tohand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
......
...@@ -8,13 +8,7 @@ function cm.initial_effect(c) ...@@ -8,13 +8,7 @@ function cm.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddFusionProcCode2(c,81002000,1110196,true,true) aux.AddFusionProcCode2(c,81002000,1110196,true,true)
--code --code
local e0=Effect.CreateEffect(c) aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_ADD_CODE)
e0:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e0:SetValue(81002000)
c:RegisterEffect(e0)
--spsummon condition --spsummon condition
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
......
...@@ -8,13 +8,7 @@ function cm.initial_effect(c) ...@@ -8,13 +8,7 @@ function cm.initial_effect(c)
aux.AddXyzProcedure(c,nil,8,2,cm.ovfilter,aux.Stringid(m,0)) aux.AddXyzProcedure(c,nil,8,2,cm.ovfilter,aux.Stringid(m,0))
c:EnableReviveLimit() c:EnableReviveLimit()
--code --code
local e0=Effect.CreateEffect(c) aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_CHANGE_CODE)
e0:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e0:SetValue(81002000)
c:RegisterEffect(e0)
--xyzlimit --xyzlimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
......
...@@ -8,13 +8,7 @@ function cm.initial_effect(c) ...@@ -8,13 +8,7 @@ function cm.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddCodeList(c,81002000) aux.AddCodeList(c,81002000)
--code --code
local e1=Effect.CreateEffect(c) aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e1:SetValue(81002000)
c:RegisterEffect(e1)
--search --search
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
......
...@@ -9,13 +9,7 @@ function cm.initial_effect(c) ...@@ -9,13 +9,7 @@ function cm.initial_effect(c)
aux.AddSynchroProcedure(c,cm.sfilter,aux.NonTuner(nil),1) aux.AddSynchroProcedure(c,cm.sfilter,aux.NonTuner(nil),1)
c:EnableReviveLimit() c:EnableReviveLimit()
--code --code
local e0=Effect.CreateEffect(c) aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_ADD_CODE)
e0:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e0:SetValue(81002000)
c:RegisterEffect(e0)
-- --
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
......
...@@ -10,13 +10,7 @@ function cm.initial_effect(c) ...@@ -10,13 +10,7 @@ function cm.initial_effect(c)
aux.AddSynchroMixProcedure(c,aux.FilterBoolFunction(Card.IsCode,81002000),nil,nil,cm.mfilter,1,1) aux.AddSynchroMixProcedure(c,aux.FilterBoolFunction(Card.IsCode,81002000),nil,nil,cm.mfilter,1,1)
c:EnableReviveLimit() c:EnableReviveLimit()
--code --code
local e0=Effect.CreateEffect(c) aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_ADD_CODE)
e0:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e0:SetValue(81002000)
c:RegisterEffect(e0)
-- --
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION) e1:SetType(EFFECT_TYPE_IGNITION)
......
...@@ -37,7 +37,7 @@ function cm.initial_effect(c) ...@@ -37,7 +37,7 @@ function cm.initial_effect(c)
e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e5:SetProperty(EFFECT_FLAG_DELAY) e5:SetProperty(EFFECT_FLAG_DELAY)
e5:SetCode(EVENT_DESTROYED) e5:SetCode(EVENT_DESTROYED)
e5:SetCountLimit(1,81011947) e5:SetCountLimit(1,m+900)
e5:SetCondition(cm.setcon) e5:SetCondition(cm.setcon)
e5:SetTarget(cm.settg) e5:SetTarget(cm.settg)
e5:SetOperation(cm.setop) e5:SetOperation(cm.setop)
......
...@@ -5,13 +5,7 @@ xpcall(function() require("expansions/script/c1110198") end,function() require(" ...@@ -5,13 +5,7 @@ xpcall(function() require("expansions/script/c1110198") end,function() require("
function cm.initial_effect(c) function cm.initial_effect(c)
aux.AddCodeList(c,81002000) aux.AddCodeList(c,81002000)
--code --code
local e0=Effect.CreateEffect(c) aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_CHANGE_CODE)
e0:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e0:SetValue(81002000)
c:RegisterEffect(e0)
--summon --summon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
......
...@@ -9,13 +9,7 @@ function cm.initial_effect(c) ...@@ -9,13 +9,7 @@ function cm.initial_effect(c)
aux.AddSynchroProcedure(c,nil,aux.FilterBoolFunction(Card.IsCode,81002000),1,1) aux.AddSynchroProcedure(c,nil,aux.FilterBoolFunction(Card.IsCode,81002000),1,1)
c:EnableReviveLimit() c:EnableReviveLimit()
--code --code
local e0=Effect.CreateEffect(c) aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_CHANGE_CODE)
e0:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e0:SetValue(81002000)
c:RegisterEffect(e0)
--negate --negate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0)) e1:SetDescription(aux.Stringid(m,0))
......
...@@ -11,13 +11,7 @@ function cm.initial_effect(c) ...@@ -11,13 +11,7 @@ function cm.initial_effect(c)
e1:SetOperation(cm.sumsuc) e1:SetOperation(cm.sumsuc)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--change --change
local e2=Effect.CreateEffect(c) aux.EnableChangeCode(c,81010004,LOCATION_MZONE+LOCATION_GRAVE)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetCode(EFFECT_CHANGE_CODE)
e2:SetRange(LOCATION_FZONE+LOCATION_GRAVE)
e2:SetValue(81010004)
c:RegisterEffect(e2)
--search --search
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
......
...@@ -9,13 +9,7 @@ function cm.initial_effect(c) ...@@ -9,13 +9,7 @@ function cm.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
Tenka.PyroLink(c) Tenka.PyroLink(c)
--change name --change name
local e2=Effect.CreateEffect(c) aux.EnableChangeCode(c,81009000,LOCATION_MZONE)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetCode(EFFECT_CHANGE_CODE)
e2:SetRange(LOCATION_MZONE)
e2:SetValue(81009000)
c:RegisterEffect(e2)
-- --
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,0)) e3:SetDescription(aux.Stringid(m,0))
......
...@@ -9,13 +9,7 @@ function cm.initial_effect(c) ...@@ -9,13 +9,7 @@ function cm.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
Tenka.PyroLink(c) Tenka.PyroLink(c)
--change name --change name
local e1=Effect.CreateEffect(c) aux.EnableChangeCode(c,81009000,LOCATION_MZONE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(81009000)
c:RegisterEffect(e1)
--material --material
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,0)) e2:SetDescription(aux.Stringid(m,0))
......
...@@ -9,13 +9,7 @@ function cm.initial_effect(c) ...@@ -9,13 +9,7 @@ function cm.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
Tenka.PyroLink(c) Tenka.PyroLink(c)
--change name --change name
local e1=Effect.CreateEffect(c) aux.EnableChangeCode(c,81009000,LOCATION_MZONE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(81009000)
c:RegisterEffect(e1)
--Unclassified Effect as material --Unclassified Effect as material
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,1)) e3:SetDescription(aux.Stringid(m,1))
......
...@@ -10,13 +10,7 @@ function cm.initial_effect(c) ...@@ -10,13 +10,7 @@ function cm.initial_effect(c)
e0:SetOperation(cm.sumsuc) e0:SetOperation(cm.sumsuc)
c:RegisterEffect(e0) c:RegisterEffect(e0)
--change --change
local e1=Effect.CreateEffect(c) aux.EnableChangeCode(c,81010004,LOCATION_MZONE+LOCATION_GRAVE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetRange(LOCATION_FZONE+LOCATION_GRAVE)
e1:SetValue(81010004)
c:RegisterEffect(e1)
--tograve --tograve
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,0)) e2:SetDescription(aux.Stringid(m,0))
......
...@@ -11,13 +11,7 @@ function cm.initial_effect(c) ...@@ -11,13 +11,7 @@ function cm.initial_effect(c)
e0:SetOperation(cm.sumsuc) e0:SetOperation(cm.sumsuc)
c:RegisterEffect(e0) c:RegisterEffect(e0)
--change --change
local e1=Effect.CreateEffect(c) aux.EnableChangeCode(c,81010004,LOCATION_MZONE+LOCATION_GRAVE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetRange(LOCATION_FZONE+LOCATION_GRAVE)
e1:SetValue(81010004)
c:RegisterEffect(e1)
--spsummon --spsummon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
......
--水晶之泪 --水晶之泪
function c81010003.initial_effect(c) function c81010003.initial_effect(c)
aux.AddCodeList(c,81010004) aux.AddCodeList(c,81010004)
--change aux.EnableChangeCode(c,81010004,LOCATION_MZONE+LOCATION_GRAVE)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_CHANGE_CODE)
e0:SetRange(LOCATION_FZONE+LOCATION_GRAVE)
e0:SetValue(81010004)
c:RegisterEffect(e0)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
......
...@@ -3,13 +3,7 @@ function c81011129.initial_effect(c) ...@@ -3,13 +3,7 @@ function c81011129.initial_effect(c)
--Activate --Activate
aux.AddRitualProcGreater2(c,c81011129.filter,nil,c81011129.mfilter,c81011129.mfilter) aux.AddRitualProcGreater2(c,c81011129.filter,nil,c81011129.mfilter,c81011129.mfilter)
--change name --change name
local e1=Effect.CreateEffect(c) aux.EnableChangeCode(c,81011107,LOCATION_REMOVED+LOCATION_GRAVE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetRange(LOCATION_REMOVED+LOCATION_GRAVE)
e1:SetValue(81011107)
c:RegisterEffect(e1)
--to hand --to hand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOHAND+CATEGORY_TOKEN) e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOHAND+CATEGORY_TOKEN)
......
...@@ -3,15 +3,10 @@ local m=81026070 ...@@ -3,15 +3,10 @@ local m=81026070
local cm=_G["c"..m] local cm=_G["c"..m]
Duel.LoadScript("c81000000.lua") Duel.LoadScript("c81000000.lua")
function cm.initial_effect(c) function cm.initial_effect(c)
aux.AddCodeList(c,33334568)
aux.AddRitualProcGreater2(c,cm.ritual_filter) aux.AddRitualProcGreater2(c,cm.ritual_filter)
--change name --change name
local e1=Effect.CreateEffect(c) aux.EnableChangeCode(c,33334568,LOCATION_GRAVE+LOCATION_REMOVED)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetRange(LOCATION_GRAVE+LOCATION_REMOVED)
e1:SetValue(33334568)
c:RegisterEffect(e1)
--draw --draw
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,0)) e2:SetDescription(aux.Stringid(m,0))
......
...@@ -24,13 +24,7 @@ function cm.initial_effect(c) ...@@ -24,13 +24,7 @@ function cm.initial_effect(c)
e1:SetOperation(cm.spop) e1:SetOperation(cm.spop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--change name --change name
local e2=Effect.CreateEffect(c) aux.EnableChangeCode(c,81041005,LOCATION_REMOVED)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetCode(EFFECT_CHANGE_CODE)
e2:SetRange(LOCATION_REMOVED)
e2:SetValue(81041005)
c:RegisterEffect(e2)
end end
cm.Attack_Defense_Listed=1 cm.Attack_Defense_Listed=1
function cm.Mayumi(c) function cm.Mayumi(c)
......
...@@ -13,13 +13,7 @@ function cm.initial_effect(c) ...@@ -13,13 +13,7 @@ function cm.initial_effect(c)
e0:SetOperation(cm.rsop) e0:SetOperation(cm.rsop)
c:RegisterEffect(e0) c:RegisterEffect(e0)
--change name --change name
local e1=Effect.CreateEffect(c) aux.EnableChangeCode(c,81041005,LOCATION_GRAVE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetRange(LOCATION_GRAVE)
e1:SetValue(81041005)
c:RegisterEffect(e1)
--set --set
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_TODECK) e2:SetCategory(CATEGORY_TODECK)
......
...@@ -13,13 +13,7 @@ function cm.initial_effect(c) ...@@ -13,13 +13,7 @@ function cm.initial_effect(c)
e0:SetOperation(cm.rsop) e0:SetOperation(cm.rsop)
c:RegisterEffect(e0) c:RegisterEffect(e0)
--change name --change name
local e1=Effect.CreateEffect(c) aux.EnableChangeCode(c,81041005,LOCATION_GRAVE+LOCATION_HAND)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetRange(LOCATION_GRAVE+LOCATION_HAND)
e1:SetValue(81041005)
c:RegisterEffect(e1)
--spsummon --spsummon
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetCategory(CATEGORY_TOHAND) e4:SetCategory(CATEGORY_TOHAND)
......
...@@ -12,13 +12,7 @@ function cm.initial_effect(c) ...@@ -12,13 +12,7 @@ function cm.initial_effect(c)
e0:SetOperation(cm.rsop) e0:SetOperation(cm.rsop)
c:RegisterEffect(e0) c:RegisterEffect(e0)
--change name --change name
local e1=Effect.CreateEffect(c) aux.EnableChangeCode(c,81041005,LOCATION_GRAVE+LOCATION_REMOVED)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetRange(LOCATION_GRAVE+LOCATION_REMOVED)
e1:SetValue(81041005)
c:RegisterEffect(e1)
--to deck --to deck
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_TODECK) e2:SetCategory(CATEGORY_TODECK)
......
...@@ -27,13 +27,7 @@ function cm.initial_effect(c) ...@@ -27,13 +27,7 @@ function cm.initial_effect(c)
e1:SetOperation(cm.atkop) e1:SetOperation(cm.atkop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--change name --change name
local e2=Effect.CreateEffect(c) aux.EnableChangeCode(c,81041005,LOCATION_REMOVED)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetCode(EFFECT_CHANGE_CODE)
e2:SetRange(LOCATION_REMOVED)
e2:SetValue(81041005)
c:RegisterEffect(e2)
--act in hand --act in hand
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
......
...@@ -13,13 +13,7 @@ function cm.initial_effect(c) ...@@ -13,13 +13,7 @@ function cm.initial_effect(c)
e0:SetOperation(cm.activate) e0:SetOperation(cm.activate)
c:RegisterEffect(e0) c:RegisterEffect(e0)
--change name --change name
local e1=Effect.CreateEffect(c) aux.EnableChangeCode(c,81041005,LOCATION_GRAVE+LOCATION_REMOVED)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_CHANGE_CODE)
e1:SetRange(LOCATION_GRAVE+LOCATION_REMOVED)
e1:SetValue(81041005)
c:RegisterEffect(e1)
--material --material
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
......
...@@ -13,13 +13,7 @@ function cm.initial_effect(c) ...@@ -13,13 +13,7 @@ function cm.initial_effect(c)
e1:SetOperation(cm.activate) e1:SetOperation(cm.activate)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--change name --change name
local e2=Effect.CreateEffect(c) aux.EnableChangeCode(c,33310200,LOCATION_GRAVE+LOCATION_HAND)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetCode(EFFECT_CHANGE_CODE)
e2:SetRange(LOCATION_GRAVE+LOCATION_HAND)
e2:SetValue(33310200)
c:RegisterEffect(e2)
end end
function cm.filter1(c,e) function cm.filter1(c,e)
return not c:IsImmuneToEffect(e) return not c:IsImmuneToEffect(e)
......
...@@ -13,13 +13,7 @@ function cm.initial_effect(c) ...@@ -13,13 +13,7 @@ function cm.initial_effect(c)
e1:SetOperation(cm.spop) e1:SetOperation(cm.spop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--change code --change code
local e2=Effect.CreateEffect(c) aux.EnableChangeCode(c,81048010,LOCATION_GRAVE)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetRange(LOCATION_GRAVE)
e2:SetCode(EFFECT_CHANGE_CODE)
e2:SetValue(81048010)
c:RegisterEffect(e2)
--destroy --destroy
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_DESTROY) e3:SetCategory(CATEGORY_DESTROY)
......
...@@ -29,13 +29,7 @@ function cm.initial_effect(c) ...@@ -29,13 +29,7 @@ function cm.initial_effect(c)
e1:SetOperation(cm.scop) e1:SetOperation(cm.scop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--change code --change code
local e2=Effect.CreateEffect(c) aux.EnableChangeCode(c,81048009,EFFECT_CHANGE_CODE)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetRange(LOCATION_GRAVE)
e2:SetCode(EFFECT_CHANGE_CODE)
e2:SetValue(81048009)
c:RegisterEffect(e2)
end end
function cm.spcon(e,tp,eg,ep,ev,re,r,rp) function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
......
...@@ -4,13 +4,7 @@ local cm=_G["c"..m] ...@@ -4,13 +4,7 @@ local cm=_G["c"..m]
Duel.LoadScript("c26800000.lua") Duel.LoadScript("c26800000.lua")
function cm.initial_effect(c) function cm.initial_effect(c)
--code --code
local e0=Effect.CreateEffect(c) aux.EnableChangeCode(c,81058000,LOCATION_MZONE+LOCATION_GRAVE)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_CHANGE_CODE)
e0:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e0:SetValue(81058000)
c:RegisterEffect(e0)
--effect gain --effect gain
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
......
...@@ -6,13 +6,7 @@ function cm.initial_effect(c) ...@@ -6,13 +6,7 @@ function cm.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_EFFECT),2,2,cm.lcheck) aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_EFFECT),2,2,cm.lcheck)
--code --code
local e0=Effect.CreateEffect(c) aux.EnableChangeCode(c,81058000,LOCATION_MZONE+LOCATION_GRAVE)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_CHANGE_CODE)
e0:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e0:SetValue(81058000)
c:RegisterEffect(e0)
--Attach --Attach
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
......
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