fix

expansions/script/c10202929.lua

@@ -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

 --混沌(エラッタ前)
 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

@@ -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

@@ -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

@@ -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

 --幻想曲 纯白的女骑士
 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

@@ -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

 --热砂大地 密斯提拉
 function c75000019.initial_effect(c)
+	aux.AddCodeList(c,75000001)
 	--spsummon
 	local e1=Effect.CreateEffect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)