fix

expansions/lflist.conf

@@ -1676,7 +1676,6 @@
 98941048 0
 98941049 0
 98941050 0
-98942050 0
 99550610 0
 99700125 0
 99700135 0
@@ -5953,18 +5952,6 @@
 70007756 0
 70007757 0
 98920615 0
-65830000 0
-65830005 0
-65830010 0
-65830015 0
-65830020 0
-65830025 0
-65830030 0
-65830035 0
-65830040 0
-65830045 0
-65830050 0
-65830055 0
 40009673 0
 40009675 0
 40009677 0

expansions/script/c40011619.lua

@@ -33,6 +33,7 @@ function cm.spcfilter(c)
 end
 function cm.spccon(e,c)
 	if c==nil then return true end
+	local tp=c:GetControler()
 	return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		and (Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==0 or not Duel.IsExistingMatchingCard(cm.spcfilter,tp,LOCATION_MZONE,0,1,nil))
 end

expansions/script/c40011623.lua

@@ -59,7 +59,7 @@ function cm.destg1(e,tp,eg,ep,ev,re,r,rp,chk)
 	local sg=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_MZONE,nil)
 	Duel.SetOperationInfo(0,CATEGORY_DESTROY,sg,sg:GetCount(),0,0)
 end
-function cm.deop1(e,tp,eg,ep,ev,re,r,rp)
+function cm.desop1(e,tp,eg,ep,ev,re,r,rp)
 	local sg=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_MZONE,nil)
 	Duel.Destroy(sg,REASON_EFFECT)
 end
@@ -74,7 +74,7 @@ function cm.destg2(e,tp,eg,ep,ev,re,r,rp,chk)
 	local sg=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_SZONE,nil)
 	Duel.SetOperationInfo(0,CATEGORY_DESTROY,sg,sg:GetCount(),0,0)
 end
-function cm.deop2(e,tp,eg,ep,ev,re,r,rp)
+function cm.desop2(e,tp,eg,ep,ev,re,r,rp)
 	local sg=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_SZONE,nil)
 	Duel.Destroy(sg,REASON_EFFECT)
 end
@@ -89,7 +89,7 @@ function cm.destg3(e,tp,eg,ep,ev,re,r,rp,chk)
 	local sg=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_ONFIELD,nil)
 	Duel.SetOperationInfo(0,CATEGORY_DESTROY,sg,sg:GetCount(),0,0)
 end
-function cm.deop3(e,tp,eg,ep,ev,re,r,rp)
+function cm.desop3(e,tp,eg,ep,ev,re,r,rp)
 	local sg=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_ONFIELD,nil)
 	Duel.Destroy(sg,REASON_EFFECT)
 end

expansions/script/c65131114.lua

@@ -81,7 +81,7 @@ function s.setop(e,tp,eg,ep,ev,re,r,rp)
 			e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
 			e1:SetCode(EFFECT_QP_ACT_IN_SET_TURN)
 			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-			dc:RegisterEffect(e1)
+			tc:RegisterEffect(e1)
 		end
 		if tc:IsType(TYPE_TRAP) then
 			local e1=Effect.CreateEffect(c)
@@ -89,7 +89,7 @@ function s.setop(e,tp,eg,ep,ev,re,r,rp)
 			e1:SetCode(EFFECT_TRAP_ACT_IN_SET_TURN)
 			e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
 			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-			dc:RegisterEffect(e1)
+			tc:RegisterEffect(e1)
 		end
 	end
 end
\ No newline at end of file

expansions/script/c65131118.lua

@@ -38,11 +38,11 @@ function s.checkop(e,tp,eg,ep,ev,re,r,rp)
 	while tc do
 		Duel.RegisterFlagEffect(tc:GetControler(),id,nil,0,1)
 		tc=eg:GetNext()
-	end 
-	Duel.GetFieldGroup(0,0xff,0xff):Filter(s.checkfilter,nil):ForEach(s.hintop)
-end
-function s.hintop(c)
-	c:SetHint(CHINT_NUMBER,Duel.GetFlagEffect(c:GetControler(),id))
+	end
+	local g=Duel.GetFieldGroup(0,0xff,0xff):Filter(s.checkfilter,nil)
+	for tc in aux.Next(g) do
+		tc:SetHint(CHINT_NUMBER,Duel.GetFlagEffect(c:GetControler(),id))
+	end
 end
 function s.filter(c,dam)
 	return c:IsFaceup() and c:IsAttackBelow(dam)

expansions/script/c65131132.lua

@@ -129,8 +129,7 @@ function s.eqop(e,tp,eg,ep,ev,re,r,rp)
 			tc:RegisterEffect(e2)
 			eqg2:AddCard(tc)
 			tc=eqg:GetNext()
-		end  
-		Duel.RaiseEvent(eqg2,EVENT_SSET,e,REASON_EFFECT,tp,tp,0)
+		end
 	end
 	local e0=Effect.CreateEffect(c) 
 	e0:SetDescription(aux.Stringid(id,0))
@@ -169,8 +168,10 @@ function s.efcon(e,tp,eg,ep,ev,re,r,rp)
 	return dg:GetCount()>0
 end
 function s.efop(e,tp,eg,ep,ev,re,r,rp)
-	local dg=eg:Filter(s.effilter,nil,e:GetHandler())   
-	dg:ForEach(s.addeffect) 
+	local dg=eg:Filter(s.effilter,nil,e:GetHandler())
+	for tc in aux.Next(dg) do
+		s.addeffect(tc)
+	end
 end
 function s.addeffect(c) 
 	local efft={c:GetActivateEffect()}
@@ -188,7 +189,6 @@ function s.addeffect(c)
 		e1:SetCondition(s.condition(v))
 		e1:SetTarget(s.target(v))
 		e1:SetOperation(s.operation(v))
-		Debug.Message(v:GetHandler():GetCode())
 		c:RegisterEffect(e1,true)
 	end
 end
@@ -207,10 +207,8 @@ function s.cost(ae)
 end
 function s.condition(ae)  
 	return function (e,tp,eg,ep,ev,re,r,rp)
-		Debug.Message(1)
 		local c=e:GetHandler()
 		local fcon=ae:GetCondition()
-		Debug.Message(c:IsFacedown() and (not fcon or fcon(e,tp,eg,ep,ev,re,r,rp)))
 		return c:IsFacedown() and (not fcon or fcon(e,tp,eg,ep,ev,re,r,rp))
 	end
 end

expansions/script/c65830045.lua

---种子雨
-function c65830045.initial_effect(c)
-	--检索
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(65830045,0))
-	e1:SetCategory(CATEGORY_SEARCH)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCountLimit(1,65830045+EFFECT_COUNT_CODE_OATH)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetOperation(c65830045.activate)
-	c:RegisterEffect(e1)
-	local e3=Effect.CreateEffect(c)
-	e3:SetCategory(CATEGORY_HANDES+CATEGORY_SEARCH)
-	e3:SetType(EFFECT_TYPE_IGNITION)
-	e3:SetRange(LOCATION_SZONE)
-	e3:SetCountLimit(1)
-	e3:SetTarget(c65830045.drawtg)
-	e3:SetOperation(c65830045.drawop)
-	c:RegisterEffect(e3)
-end
-
-
-
-function c65830045.thfilter(c)
-	return c:IsSetCard(0xa33) and c:IsAbleToHand()
-end
-function c65830045.activate(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.GetMatchingGroup(c65830045.thfilter,tp,LOCATION_DECK,0,nil)
-	if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(65830045,0)) then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-		local sg=g:Select(tp,1,1,nil)
-		Duel.SendtoHand(sg,nil,REASON_EFFECT)
-		Duel.ConfirmCards(1-tp,sg)
-	end
-end
-
-
-function c65830045.filter2(e,c)
-	return c:IsSetCard(0xa33) and c:IsAbleToHand()
-end
-function c65830045.filter1(c)
-	return c:IsDiscardable(REASON_EFFECT)
-end
-function c65830045.drawtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	local c=e:GetHandler()
-	if chk==0 then return Duel.IsExistingMatchingCard(c65830045.filter2,tp,LOCATION_DECK,0,1,nil,c) and Duel.IsExistingMatchingCard(c65830045.filter1,tp,LOCATION_HAND,0,1,nil,c) end
-	Duel.SetOperationInfo(0,CATEGORY_HANDES,nil,1,tp,LOCATION_HAND)
-	Duel.SetOperationInfo(0,CATEGORY_SEARCH,nil,1,tp,LOCATION_DECK)
-end
-function c65830045.drawop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c65830045.thfilter,tp,LOCATION_DECK,0,1,1,nil,c)
-	if g:GetCount()>0 and Duel.SendtoHand(g,nil,REASON_EFFECT)~=0 and g:GetFirst():IsLocation(LOCATION_HAND) then
-		Duel.ConfirmCards(1-tp,g)
-		Duel.ShuffleHand(tp)
-		Duel.BreakEffect()
-		Duel.DiscardHand(tp,nil,1,1,REASON_EFFECT+REASON_DISCARD,nil,c)
-	end
-end
\ No newline at end of file

expansions/script/c65830055.lua

---超乎寻常的压力
-function c65830055.initial_effect(c)
-	c:SetUniqueOnField(1,0,65830055)
-	--Activate
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	c:RegisterEffect(e1)
-	--negate
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e2:SetCode(EVENT_CHAIN_SOLVING)
-	e2:SetRange(LOCATION_SZONE)
-	e2:SetCountLimit(1)
-	e2:SetCondition(c65830055.negcon)
-	e2:SetOperation(c65830055.negop)
-	c:RegisterEffect(e2)
-end
-function c65830055.cfilter(c)
-	return c:IsFaceup() and c:IsSetCard(0xa33) and c:IsType(TYPE_MONSTER)
-end
-function c65830055.negcon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.IsExistingMatchingCard(c65830055.cfilter,tp,LOCATION_MZONE,0,1,nil)
-		and rp==1-tp and (re:IsActiveType(TYPE_TRAP) or re:IsActiveType(TYPE_SPELL))
-end
-function c65830055.negop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_CARD,0,65830055)
-	local rc=re:GetHandler()
-	if Duel.NegateEffect(ev,true) and rc:IsRelateToEffect(re) then
-		Duel.Destroy(rc,REASON_EFFECT)
-	end
-end
\ No newline at end of file

expansions/script/c67200901.lua

@@ -85,7 +85,7 @@ function c67200901.setop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
 	local tg=g:Filter(Card.IsRelateToEffect,nil,e)
 	if tg:GetCount()>0 then
-		if Duel.MoveToField(tg:GetFirst(),tp,tp,LOCATION_PZONE,POS_FACEUP,true)~=0 and Duel.IsExistingMatchingCard(c67200901.thfilter,tp,LOCATION_DECK,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(67200901,3)) then
+		if Duel.MoveToField(tg:GetFirst(),tp,tp,LOCATION_PZONE,POS_FACEUP,true)~=0 and tg:GetFirst():IsLocation(LOCATION_PZONE) and Duel.IsExistingMatchingCard(c67200901.thfilter,tp,LOCATION_DECK,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(67200901,3)) then
 			Duel.BreakEffect()
 			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 			local gg=Duel.SelectMatchingCard(tp,c67200901.thfilter,tp,LOCATION_DECK,0,1,1,nil)

expansions/script/c98942050.lua

---决斗怪兽试验场3
-function c98942050.initial_effect(c)
-	--show
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_NO_TURN_RESET+EFFECT_FLAG_INITIAL)
-	e1:SetCode(EVENT_PREDRAW)
-	e1:SetRange(0xff)
-	e1:SetCountLimit(1,98942050+EFFECT_COUNT_CODE_DUEL)
-	e1:SetOperation(c98942050.op)
-	c:RegisterEffect(e1)
-	--adjust
-	local e01=Effect.CreateEffect(c)
-	e01:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e01:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
-	e01:SetCode(EVENT_ADJUST)
-	e01:SetRange(0xff)
-	e01:SetOperation(c98942050.adjustop)
-	c:RegisterEffect(e01)
-	if not c98942050.global_activate_check then
-		c98942050.global_activate_check=true
-		local ge1=Effect.CreateEffect(c)
-		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-		ge1:SetCode(EVENT_CHAIN_SOLVED)
-		ge1:SetOperation(c98942050.checkop)
-		Duel.RegisterEffect(ge1,0)
-	end
-end
-function c98942050.op(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	Duel.Hint(HINT_CARD,0,98942050)
-end
-function c98942050.checkop(e,tp,eg,ep,ev,re,r,rp)
-	local rc=re:GetHandler()
-	if re:GetValue()~=98942051 then return end
-	if rc:IsLocation(LOCATION_MZONE) and rc:GetFlagEffect(98942050)==0 then
-		rc:RegisterFlagEffect(98942050,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
-	end
-end
-function c98942050.actarget(e,te,tp)
-	--prevent activating
-	local tc=te:GetHandler()
-	return ((te:GetValue()==98942050 or te:GetValue()==98942051) and (not Duel.IsPlayerAffectedByEffect(te:GetHandlerPlayer(),98942050) or tc:GetFlagEffect(98942050)~=0))  
-	--prevent normal activating beside S&T on field
-	or (te:GetValue()==53587968 and Duel.IsPlayerAffectedByEffect(te:GetHandlerPlayer(),98942050) and not (te:IsHasType(EFFECT_TYPE_ACTIVATE) and tc:IsLocation(LOCATION_SZONE)) and not tc:IsLocation(LOCATION_DECK)) 
-	--prevent quick activating on field
-	or (te:GetValue()==53587969 and te:IsHasType(EFFECT_TYPE_QUICK_O) and tc:IsLocation(LOCATION_SZONE))
-	--unique check 
-	or (te:GetValue()==53587969 and tc:IsCode(32692693) and tc:CheckUniqueOnField(tc:GetControler())==false)
-end
-function c98942050.adjustop(e,tp,eg,ep,ev,re,r,rp)
-	--
-	if not c98942050.globle_check then
-		local c=e:GetHandler()
-		--Debug.Message(c:CheckUniqueOnField(tp))
-		--change effect type
-		local e01=Effect.CreateEffect(c)
-		e01:SetType(EFFECT_TYPE_FIELD)
-		e01:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_PLAYER_TARGET)
-		e01:SetCode(98942050)
-		e01:SetTargetRange(1,1)
-		Duel.RegisterEffect(e01,0)
-		--
-		c98942050.globle_check=true
-		local ge0=Effect.CreateEffect(e:GetHandler())
-		ge0:SetType(EFFECT_TYPE_FIELD)
-		ge0:SetCode(EFFECT_ACTIVATE_COST)
-		ge0:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
-		ge0:SetCost(aux.FALSE)
-		ge0:SetTargetRange(1,1)
-		ge0:SetTarget(c98942050.actarget)
-		Duel.RegisterEffect(ge0,0)
-		local g=Duel.GetMatchingGroup(c98942050.filter,0,0xff,0xff,nil)
-		cregister=Card.RegisterEffect
-		ecreateeffect=Effect.CreateEffect
-		esetcountLimit=Effect.SetCountLimit
-		table_effect={}
-		table_countlimit_flag=0
-		table_countlimit_count=0
-		Ursarctic_unit=nil
-		Ursarctic_Creating=false
-		Effect.CreateEffect=function(card)
-			Ursarctic_Creating=true
-			return ecreateeffect(card)
-		end
-		Effect.SetCountLimit=function(effect,count,flag)
-			if not Ursarctic_Creating and count==1 and flag~=0 then
-				local eff=table_effect[#table_effect-1]
-				return esetcountLimit(eff,1,0)
-			end
-			table_countlimit_flag=flag
-			table_countlimit_count=count
-			return esetcountLimit(effect,count,flag)
-		end
-		Card.RegisterEffect=function(card,effect,flag)
-			if effect then
-				local eff=effect:Clone()
-				local con=eff:GetCondition()
-				if con and effect:IsHasType(EFFECT_TYPE_QUICK_O) and effect:GetCode()==EVENT_FREE_CHAIN  then
-					eff:SetValue(98942051)
-					--effect edit
-					local eff2=effect:Clone()
-					--spell speed 2
-					if con and eff2:IsHasType(EFFECT_TYPE_QUICK_O) and eff2:GetCode()==EVENT_FREE_CHAIN then
-						eff2:SetCondition(
-						function(e,tp,eg,ep,ev,re,r,rp)
-							Ursarctic_GetCurrentPhase=Duel.GetCurrentPhase
-							Duel.GetCurrentPhase=function() return PHASE_MAIN1 end
-							local Ursarctic_boolean=con(e,tp,eg,ep,ev,re,r,rp)
-							Duel.GetCurrentPhase=Ursarctic_GetCurrentPhase
-							return Ursarctic_boolean
-						end)
-						eff2:SetHintTiming(TIMING_DRAW_PHASE+TIMING_END_PHASE+TIMINGS_CHECK_MONSTER,TIMING_DRAW_PHASE+TIMING_END_PHASE+TIMINGS_CHECK_MONSTER)
-					end
-					table.insert(table_effect,eff2)
-				end
-				table.insert(table_effect,eff)
-			end
-			table_countlimit_flag=0
-			table_countlimit_count=0
-			Ursarctic_Creating=false
-			return 
-		end
-		for tc in aux.Next(g) do
-			table_effect={}
-			Ursarctic_Counter=0
-			Ursarctic_Unique=false
-			tc:ReplaceEffect(98942050,0)
-			Duel.CreateToken(0,tc:GetOriginalCode())
-			for key,eff in ipairs(table_effect) do
-				cregister(tc,eff)
-			end
-		end
-		Card.RegisterEffect=cregister
-		Effect.CreateEffect=ecreateeffect
-		Effect.SetCountLimit=esetcountLimit
-	end
-	e:Reset()
-end
-function c98942050.filter(c)
-	return not c:IsCode(98942050)
-end
\ No newline at end of file

expansions/strings.conf

@@ -78,6 +78,7 @@
 !setname 0xe714 幻异梦像
 !setname 0x7714 构异梦境
 !setname 0xd714 构异梦像
+!setname 0x715 气泡方块
 
 #Viola 011 0xe10-0xe1f
 
@@ -683,7 +684,7 @@
 !setname 0x680 UESTC
 !setname 0x3680 UESTCer
 
-#阳羽（耻辱柱）
+#阳羽（表彰柱）
 !setname 0x823 混沌病毒
 
 #Mio 345
@@ -849,6 +850,8 @@
 !setname 0x3a7b 璇姬
 !setname 0x6a7b 天之杯
 !setname 0x9a7b 狩猎游戏
+!setname 0x3a7c 25时
+!setname 0x6a7c Miku
 !counter 0xa7f 好感指示物
 
 #真正的光   164
@@ -987,6 +990,7 @@
 !setname 0x7ccd 熊猫头
 !setname 0x7cdd 魅魔娘
 !setname 0x8cdd 虫融姬战国
+!setname 0xf008 魔心英雄
 
 #逸轩
 !setname 0xe51 颜彩
@@ -1060,6 +1064,9 @@
 !setname 0x48d 微元
 !setname 0x48f 净化
 
+#会变的不幸rua 519
+!setname 0x510 《遥远·传说》
+
 #sch  258 0x210-0x21f
 !setname 0x211 舰娘
 !setname 0x3211 御三家(舰娘)
@@ -1163,6 +1170,8 @@
 #July 211 0x910-0x90f
 !setname 0x910 阿巴阿巴
 !counter 0x1910 阿巴阿巴指示物
+!setname 0x3917 幻想时间
+!setname 0x91b 幻想时间
 
 #玄羽
 !setname 0xdc1 花信
@@ -1226,6 +1235,7 @@
 !setname 0x375c 罪秽装束
 !setname 0x75e 忍法帖｜非「忍法」
 !setname 0x75f 纹章呼唤
+!counter 0x1750 寒冷指示物
 !counter 0x757 梦指示物
 
 #Tierra 117
@@ -1357,13 +1367,11 @@
 !setname 0x389 神隐
 !counter 0x389 神隐指示物
 
-#???
+#澪 519
 !setname 0x3256 暗月
 !setname 0x5256 /已腐蚀
-!counter 0x1750 寒冷指示物
-!setname 0x3a7c 25时
-!setname 0x6a7c Miku
-!setname 0x715 气泡方块
+
+#王道遊老子 894
 !setname 0x6708 灵形代
 
 #TYGOC Submissions