daniaozhuanzhuanzhuan

expansions/script/c12014000.lua

@@ -7,7 +7,8 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(0x3ee)
+	e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_MACHINE)
 	c:RegisterEffect(e1)
 	--special summon proc

expansions/script/c12014001.lua

@@ -7,7 +7,8 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(0x3ee)
+	e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_MACHINE)
 	c:RegisterEffect(e1)
 	

expansions/script/c12014003.lua

@@ -7,7 +7,8 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(0x3ee)
+	e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_MACHINE)
 	c:RegisterEffect(e1)
 	--

expansions/script/c12014011.lua

@@ -7,7 +7,8 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(0x3ee)
+	e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_MACHINE)
 	c:RegisterEffect(e1)
 	--tohand

expansions/script/c12014012.lua

@@ -7,7 +7,8 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(0x3ee)
+	e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_MACHINE)
 	c:RegisterEffect(e1)
 

expansions/script/c12014013.lua

@@ -7,7 +7,8 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(0x3ee)
+	e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_MACHINE)
 	c:RegisterEffect(e1)
 

expansions/script/c12014014.lua

@@ -10,7 +10,8 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(0x3ee)
+	e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_MACHINE)
 	c:RegisterEffect(e1)
 	--to hand

expansions/script/c12014015.lua

+Duel.LoadScript("c12000000.lua")
 --梦装暗·影 阿斯尔
 local m=12014015
 local cm=_G["c"..m]
+  cm.srre_front_side=12014014
+  cm.srre_back_side=12014015
 function cm.initial_effect(c)
 	--change race
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(0x3ee)
+	e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_MACHINE)
 	c:RegisterEffect(e1)
 	--immune

expansions/script/c12014016.lua

@@ -7,7 +7,8 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(0x3ee)
+	e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_MACHINE)
 	c:RegisterEffect(e1)
 	--tohand

expansions/script/c12014020.lua

@@ -10,7 +10,8 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(0x3ee)
+	e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_MACHINE)
 	c:RegisterEffect(e1)
 	--special summon
@@ -59,7 +60,7 @@ end
 function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if re:GetHandler()==c then
-	   Duel.SetChainLimit(cm.chainlm)	
+	   Duel.SetChainLimit(cm.chainlm)   
    end
 end
 function cm.chainlm(e,ep,tp)

expansions/script/c12083001.lua

@@ -7,7 +7,7 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(LOCATION_ONFIELD+LOCATION_EXTRA+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_SPELLCASTER)
 	c:RegisterEffect(e1)
 	--special summon proc
@@ -58,6 +58,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM) 
 	local tt=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_HAND,0,3,3,nil)
 	Duel.ConfirmCards(1-tp,tt)
+	Duel.ShuffleHand(tp)
 end
 function cm.actcon(e,tp,eg,ep,ev,re,r,rp)
 	local te=e:GetLabelObject()

expansions/script/c12083003.lua

@@ -7,7 +7,7 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(0x3ee)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_SPELLCASTER)
 	c:RegisterEffect(e1)
 	--target

expansions/script/c12083005.lua

@@ -7,7 +7,7 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(0x3ee)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_SPELLCASTER)
 	c:RegisterEffect(e1)
 	--
@@ -15,7 +15,7 @@ function cm.initial_effect(c)
 	e1:SetDescription(aux.Stringid(m,3))
 	e1:SetCategory(CATEGORY_DRAW)
 	e1:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_FIELD)
-	e1:SetRange(LOCATION_GRAVE)
+	e1:SetRange(LOCATION_HAND)
 	e1:SetCountLimit(1,m+100)
 	e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
 	e1:SetHintTiming(0,0x1e0)

expansions/script/c12083010.lua

@@ -7,7 +7,7 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(LOCATION_ONFIELD+LOCATION_EXTRA+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_SPELLCASTER)
 	c:RegisterEffect(e1)
 	--target
@@ -17,6 +17,7 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_IGNITION)
 	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e1:SetRange(LOCATION_HAND)
+	e1:SetCountLimit(1,m)
 	e1:SetTarget(cm.target)
 	e1:SetOperation(cm.operation)
 	c:RegisterEffect(e1)
@@ -26,6 +27,7 @@ function cm.initial_effect(c)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
 	e3:SetCode(EVENT_SUMMON_SUCCESS)
+	e3:SetCountLimit(1,m+100)
 	e3:SetTarget(cm.postg)
 	e3:SetOperation(cm.posop)
 	c:RegisterEffect(e3)
@@ -37,12 +39,14 @@ function cm.filter(c)
 	return c:IsPosition(POS_FACEUP_ATTACK) and not c:IsAttack(c:GetBaseAttack())
 end
 function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return  Duel.IsExistingTarget(cm.filter,tp,0,LOCATION_MZONE,1,nil) and Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=3 end
+	if chk==0 then return  Duel.IsExistingTarget(cm.filter,tp,0,LOCATION_MZONE,1,nil) and Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=3 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
 	local g=Duel.SelectTarget(tp,cm.filter,tp,0,LOCATION_MZONE,1,1,nil)
 end
 function cm.operation(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)
 	Duel.ConfirmDecktop(tp,3)
 	local g=Duel.GetDecktopGroup(tp,3)
 	local tc=Duel.GetFirstTarget()

expansions/script/c12083011.lua

@@ -7,7 +7,7 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(LOCATION_ONFIELD+LOCATION_EXTRA+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_SPELLCASTER)
 	c:RegisterEffect(e1)
 	--draw

expansions/script/c12083012.lua

@@ -7,7 +7,7 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(0x3ee)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_SPELLCASTER)
 	c:RegisterEffect(e1)
 	--draw

expansions/script/c12083013.lua

@@ -7,7 +7,7 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(LOCATION_ONFIELD+LOCATION_EXTRA+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_SPELLCASTER)
 	c:RegisterEffect(e1)
 
@@ -30,7 +30,7 @@ function cm.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_IGNITION)
 	e2:SetRange(LOCATION_MZONE)
 	e2:SetCost(cm.cost)
-	e2:SetCountLimit(1,m+100)	
+	e2:SetCountLimit(1,m+100)   
 	e2:SetTarget(cm.thtg)
 	e2:SetOperation(cm.thop)
 	c:RegisterEffect(e2)

expansions/script/c12083014.lua

@@ -10,7 +10,7 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(LOCATION_ONFIELD+LOCATION_EXTRA+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_SPELLCASTER)
 	c:RegisterEffect(e1)
 	--to hand

expansions/script/c12083015.lua

@@ -10,7 +10,7 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(LOCATION_ONFIELD+LOCATION_EXTRA+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_SPELLCASTER)
 	c:RegisterEffect(e1)
 	--immune

expansions/script/c12083020.lua

@@ -5,6 +5,14 @@ function cm.initial_effect(c)
 	--link summon
 	aux.AddLinkProcedure(c,nil,2,4,cm.lcheck)
 	c:EnableReviveLimit()
+	--change race
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetCode(EFFECT_ADD_RACE)
+	e1:SetRange(0xff)
+	e1:SetValue(RACE_SPELLCASTER)
+	c:RegisterEffect(e1)
 	--to grave
 	local e2=Effect.CreateEffect(c)
 	e2:SetDescription(aux.Stringid(m,0))

expansions/script/c12083021.lua

@@ -4,14 +4,14 @@ local cm=_G["c"..m]
 function cm.initial_effect(c)
 	--fusion material
 	c:EnableReviveLimit()
-	aux.AddFusionProcFun2(c,cm.ffiltera,cm.ffilterb,true)
+	aux.AddFusionProcCode2(c,cm.ffiltera,cm.ffilterb,true)
 	aux.AddContactFusionProcedure(c,Card.IsAbleToRemoveAsCost,LOCATION_ONFIELD,0,Duel.Release,REASON_COST)
 	--change race
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetCode(EFFECT_ADD_RACE)
-	e1:SetRange(0x3ee)
+	e1:SetRange(0xff)
 	e1:SetValue(RACE_SPELLCASTER)
 	c:RegisterEffect(e1)
 	--indes
@@ -45,7 +45,7 @@ function cm.immcon(e,tp,eg,ep,ev,re,r,rp)
 end
 function cm.immop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	c:RegisterFlagEffect(m,RESET_PHASE+PHASE_END+RESET_EVENT+RESETS_STANDARD,0,1)
+	c:RegisterFlagEffect(m,RESET_PHASE+PHASE_END+RESET_EVENT+RESETS_STANDARD-RESET_TOGRAVE,0,1)
 	
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
@@ -64,7 +64,7 @@ end
 function cm.thfilter(c)
 	return c:IsCode(24094653) and c:IsAbleToHand()
 end
-function cm.thfilter(c)
+function cm.thfilter1(c)
 	return c:IsRace(RACE_FAIRY) and c:IsAbleToHand()
 end
 function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
@@ -77,7 +77,7 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 	if g:GetCount()>0 then
 		Duel.SendtoHand(g,nil,REASON_EFFECT)
 		Duel.ConfirmCards(1-tp,g)
-		if Duel.GetFlagEffect(m)~=0 then
+		if c:GetFlagEffect(m)~=0 then
 			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 			local tg=Duel.SelectMatchingCard(tp,cm.thfilter1,tp,LOCATION_DECK,0,1,1,nil)
 			if tg:GetCount()>0 then