eme

expansions/script/c81002006.lua

@@ -6,7 +6,13 @@ cm.named_with_Urban=true
 function cm.initial_effect(c)
 	aux.AddCodeList(c,81002000)
 	--code
-    aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
+	local e0=Effect.CreateEffect(c)
+	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
 	local e1=Effect.CreateEffect(c)
 	e1:SetCategory(CATEGORY_TOGRAVE+CATEGORY_DRAW)

expansions/script/c81002007.lua

@@ -6,7 +6,13 @@ cm.named_with_Urban=true
 function cm.initial_effect(c)
 	aux.AddCodeList(c,81002000)
 	--code
-    aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
+	local e0=Effect.CreateEffect(c)
+	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
 	local e2=Effect.CreateEffect(c)
 	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)

expansions/script/c81002008.lua

@@ -6,7 +6,13 @@ cm.named_with_Urban=true
 function cm.initial_effect(c)
 	aux.AddCodeList(c,81002000)
 	--code
-    aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
+	local e0=Effect.CreateEffect(c)
+	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
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)

expansions/script/c81002013.lua

@@ -9,7 +9,13 @@ function cm.initial_effect(c)
 	aux.AddSynchroProcedure(c,cm.sfilter,aux.NonTuner(nil),1)
 	c:EnableReviveLimit()
 	--code
-    aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
+	local e0=Effect.CreateEffect(c)
+	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)
 	e1:SetType(EFFECT_TYPE_FIELD)

expansions/script/c81002014.lua

@@ -10,7 +10,13 @@ function cm.initial_effect(c)
 	aux.AddSynchroMixProcedure(c,aux.FilterBoolFunction(Card.IsCode,81002000),nil,nil,cm.mfilter,1,1)
 	c:EnableReviveLimit()
 	--code
-    aux.EnableChangeCode(c,81002000,LOCATION_MZONE+LOCATION_GRAVE)
+	local e0=Effect.CreateEffect(c)
+	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)
 	e1:SetType(EFFECT_TYPE_IGNITION)