eme

expansions/script/c16114203.lua

 --仙精罐
 xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
-local m,cm=rk.set(16114203,"FAIRY")
+local m,cm=rk.set(16114203,"FAIRY",1)
 function cm.initial_effect(c)
 	--Activate
 	local e0=Effect.CreateEffect(c)

expansions/script/c16114205.lua

 --未来仙精 未来
 xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
-local m,cm=rk.set(16114205,"FAIRY")
+local m,cm=rk.set(16114205,"FAIRY",1)
 function cm.initial_effect(c)
 	--synchro summon
 	aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_FAIRY),aux.NonTuner(nil),1)

expansions/script/c16114206.lua

 --死仪仙精 贝拉多麦
 xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
-local m,cm=rk.set(16114206,"FAIRY")
+local m,cm=rk.set(16114206,"FAIRY",1)
 function cm.initial_effect(c)
 	c:SetSPSummonOnce(m)
 	c:EnableReviveLimit()
@@ -56,6 +56,7 @@ function cm.tdtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsLocation(LOCATION_MZONE) and cm.tdfilter(chkc) end
 	if chk==0 then return Duel.IsExistingTarget(cm.tdfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	Duel.Hint(24,0,aux.Stringid(m,5))
 	local g=Duel.SelectTarget(tp,cm.tdfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,2,nil)
 	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)

expansions/script/c16114208.lua

 --恶魔仙精 贝拉冬娜
 xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
-local m,cm=rk.set(16114208,"FAIRY")
+local m,cm=rk.set(16114208,"FAIRY",1)
 function cm.initial_effect(c)
 	c:SetSPSummonOnce(m)
 	c:EnableReviveLimit()

expansions/script/c16114209.lua

 --不死仙精 贝拉多阿涅
 xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
-local m,cm=rk.set(16114209,"FAIRY")
+local m,cm=rk.set(16114209,"FAIRY",1)
 function cm.initial_effect(c)
 	c:SetSPSummonOnce(m)
 	c:EnableReviveLimit()

expansions/script/c16114212.lua

@@ -38,6 +38,7 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 						return rk.check(c,"FAIRY") and c:IsType(TYPE_MONSTER) end,nil)>=2 then
 		Duel.ShuffleDeck(tp)
 		Duel.BreakEffect()
+		Duel.Hint(24,0,aux.Stringid(m,8))
 		local a=Duel.IsExistingMatchingCard(cm.spc,tp,LOCATION_DECK,0,1,nil,e,tp) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		local b=Duel.IsExistingMatchingCard(cm.thc,tp,LOCATION_DECK,0,1,nil)
 		local op=2
@@ -66,6 +67,8 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 			Duel.Recover(tp,2000,REASON_EFFECT)
 		end
 		return
+	else
+		Duel.Hint(24,0,aux.Stringid(m,7))
 	end
 	Duel.ShuffleDeck(tp)
 end
\ No newline at end of file

expansions/script/c16114213.lua

@@ -29,6 +29,7 @@ function cm.initial_effect(c)
 end
 function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,1,nil)  end
+	Duel.Hint(24,0,aux.Stringid(m,8))
 end
 function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()

expansions/script/c16114216.lua

 --仙精的生活
 xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
-local m,cm=rk.set(16114216,"FAIRY")
+local m,cm=rk.set(16114216,"FAIRY",1)
 function cm.initial_effect(c)
    --Activate
 	local e1=Effect.CreateEffect(c)

expansions/script/c16114218.lua

@@ -30,6 +30,7 @@ function cm.smc(e,c)
 end
 function cm.rectg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
+	Duel.Hint(24,0,aux.Stringid(m,8))
 	Duel.SetTargetPlayer(tp)
 	Duel.SetTargetParam(500)
 	Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,500)

expansions/script/c16114221.lua

@@ -26,6 +26,7 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return not Duel.IsPlayerAffectedByEffect(tp,59822133)
 		and Duel.GetLocationCount(tp,LOCATION_MZONE)>1
 		and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_DECK,0,2,nil,e,tp) end
+	Duel.Hint(24,0,aux.Stringid(m,8))
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,2,tp,LOCATION_DECK)
 end
 function cm.spop(e,tp,eg,ep,ev,re,r,rp)

expansions/script/c16114222.lua

@@ -35,6 +35,7 @@ function cm.filter(c)
 end
 function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_GRAVE,0,1,nil) end
+	Duel.Hint(24,0,aux.Stringid(m,8))
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp,chk)

expansions/script/c16114224.lua

 --龙素融合
 xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
-local m,cm=rk.set(16114224)
+local m,cm=rk.set(16114224,nil,1)
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)

expansions/script/c16114226.lua

 --奇迹之脑
 xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
-local m,cm=rk.set(16114226,"FAIRY")
+local m,cm=rk.set(16114226,"FAIRY",1)
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)

expansions/script/c16114229.lua

 --叶鸣仙精 叶切
 xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
-local m,cm=rk.set(16114229,"FAIRY")
+local m,cm=rk.set(16114229,"FAIRY",1)
 function cm.initial_effect(c)
 	c:SetSPSummonOnce(m)
 	--xyz summon

expansions/script/c16114230.lua

 --再生仙精 铃兰
 xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
-local m,cm=rk.set(16114230,"FAIRY")
+local m,cm=rk.set(16114230,"FAIRY",1)
 function cm.initial_effect(c)
 	--xyz summon
 	aux.AddXyzProcedure(c,cm.check,4,2,cm.ovfilter,aux.Stringid(m,1),2)

expansions/script/c16114231.lua

 --雪仙精 莉琳
 xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
-local m,cm=rk.set(16114231,"FAIRY")
+local m,cm=rk.set(16114231,"FAIRY",1)
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
 	aux.AddLinkProcedure(c,cm.check,1)

expansions/script/c16114232.lua

 --胜利仙精 普琳
 xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
-local m,cm=rk.set(16114232,"FAIRY")
+local m,cm=rk.set(16114232,"FAIRY",1)
 function cm.initial_effect(c)
 	aux.AddCodeList(c,16114224)
 	c:EnableReviveLimit()

expansions/script/c16114233.lua

 --幻想仙精 卡秋雅
 xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
-local m,cm=rk.set(16114233,"FAIRY")
+local m,cm=rk.set(16114233,"FAIRY",1)
 function cm.initial_effect(c)
 	aux.AddCodeList(c,16114235)
 	--Synchro summon

expansions/script/c16114234.lua

 --雪仙精 莉琳
 xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
-local m,cm=rk.set(16114234,"FAIRY")
+local m,cm=rk.set(16114234,"FAIRY",1)
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
 	aux.AddLinkProcedure(c,cm.check,1)

expansions/script/c16120004.lua

 --圣灵龙王 威布洛斯·天堂
-local m=16120004
-local cm=_G["c"..m]
+xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
+local m,cm=rk.set(16120004,nil,1)
 function cm.initial_effect(c)
 	aux.AddCodeList(c,16120010)
 	c:EnableReviveLimit()

expansions/script/c16120006.lua

 --坚牢之翼 俄律西恩
-local m=16120006
-local cm=_G["c"..m]
+xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
+local m,cm=rk.set(16120006,nil,1)
 function cm.initial_effect(c)
 	aux.AddCodeList(c,16120010)
 	--synchro summon

expansions/script/c16120007.lua

 --圣歌之翼 昂多洛姆
-local m=16120007
-local cm=_G["c"..m]
+xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
+local m,cm=rk.set(16120007,nil,1)
 function cm.initial_effect(c)
 	--ritual summon
 	local e1=Effect.CreateEffect(c)

expansions/script/c16120008.lua

 --苍天之翼 劳
-local m=16120008
-local cm=_G["c"..m]
+xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
+local m,cm=rk.set(16120008,nil,1)
 function cm.initial_effect(c)
 	aux.AddCodeList(c,16120010)
 	--special summon

expansions/script/c16120009.lua

 --师团之先导者 希拉托斯忒·拉
-local m=16120009
-local cm=_G["c"..m]
+xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
+local m,cm=rk.set(16120009,nil,1)
 function cm.initial_effect(c)
 	--fusion material
 	c:EnableReviveLimit()

expansions/script/c16120010.lua

 --龙素记号Xf
-local m=16120010
-local cm=_G["c"..m]
+xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
+local m,cm=rk.set(16120010,nil,1)
 function cm.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)

expansions/script/c16120011.lua

 --源龙帝·乌托邦
-local m=16120011
-local cm=_G["c"..m]
+xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
+local m,cm=rk.set(16120011,nil,1)
 function cm.initial_effect(c)
 --link summon
 	c:EnableReviveLimit()

expansions/script/c16199990.lua

 if not pcall(function() require("expansions/script/c16101100") end) then require("script/c16101100") end
 rk=rk or {}
-function rk.set(code,setcode)
+function rk.set(code,setcode,rkflag)
 	if not _G["c"..code] then _G["c"..code]={}
 		setmetatable(_G["c"..code],Card)
 		_G["c"..code].__index=_G["c"..code]
@@ -9,8 +9,56 @@ function rk.set(code,setcode)
 	if setcode and not ccodem.rksetcode then
 		ccodem.rksetcode=setcode
 	end
+	if rkflag==1 then
+		ccodem.rkcheck=true
+	end
+	if not rk.Dalogcheck then
+		rk.Dalogcheck=true
+		local e1=Effect.GlobalEffect()
+		e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+		e1:SetCode(EVENT_CHAINING)
+		e1:SetCondition(rk.Dalogactcon)
+		e1:SetOperation(rk.Dalogactop)
+		Duel.RegisterEffect(e1,0)
+		local e2=Effect.GlobalEffect()
+		e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+		e2:SetCode(EVENT_SUMMON_SUCCESS)
+		e2:SetCondition(rk.Dalogscon)
+		e2:SetOperation(rk.Dalogsop)
+		Duel.RegisterEffect(e2,0)
+		local e3=e2:Clone()
+		e3:SetCode(EVENT_SPSUMMON_SUCCESS)
+		Duel.RegisterEffect(e3,0)
+	end
 	return code,ccodem
 end
+function rk.rkcardcheck(c)
+	return c.rkcheck==true 
+end
+function rk.Dalogactcon(e,tp,eg,ep,ev,re,r,rp)
+	return re:GetHandler().rkcheck==true and re:IsHasType(EFFECT_TYPE_ACTIVATE)
+end
+function rk.Dalogactop(e,tp,eg,ep,ev,re,r,rp)
+	local og=eg:Filter(rk.rkcardcheck,nil)
+	for tc in aux.Next(og) do
+		local codefordal=tc:GetOriginalCode()
+		Duel.Hint(24,0,aux.Stringid(codefordal,9))
+		Duel.Hint(24,0,aux.Stringid(codefordal,10))
+		Duel.Hint(24,0,aux.Stringid(codefordal,11))
+	end
+end
+function rk.Dalogscon(e,tp,eg)
+	return eg:IsExists(rk.rkcardcheck,1,nil)
+end
+function rk.Dalogsop(e,tp,eg)
+	local og=eg:Filter(rk.rkcardcheck,nil)
+	for tc in aux.Next(og) do
+		local codefordal=tc:GetOriginalCode()
+		Duel.Hint(24,0,aux.Stringid(codefordal,12))
+		Duel.Hint(24,0,aux.Stringid(codefordal,13))
+		Duel.Hint(24,0,aux.Stringid(codefordal,14))
+	end
+end
 function rk.check(c,str)
 	local substr=c.rksetcode
 	if substr==nil then return false end