2024/11/18 新增：TB02新卡

script/RDBase.lua

@@ -22,6 +22,8 @@ EFFECT_PLAYER_CANNOT_ACTIVATE_TRAP_BATTLE = 120261022 -- 暗物质人偶·水母
 EFFECT_ATTACK_NOT_CHAIN_TRAP = 120140004 -- 不许始末战士 (攻击宣言时, 对方不能把陷阱卡发动)
 EFFECT_ONLY_FUSION_SUMMON = 120263031 -- 只能融合召唤 (奇迹融合)
 EFFECT_MAXIMUM_MODE = 120272058 -- 通过效果变成极大模式 (时间机器)
+EFFECT_CANNOT_TO_HAND_EFFECT = EFFECT_CANNOT_TO_HAND -- 不会被效果回到手卡
+EFFECT_CANNOT_TO_DECK_EFFECT = EFFECT_CANNOT_TO_DECK -- 不会被效果回到卡组·额外卡组
 
 FLAG_SUMMON_TURN = 120000011 -- 召唤·特殊召唤的回合被盖放, 不再符合召唤·特殊召唤的回合的条件
 FLAG_ATTACK_ANNOUNCED = 120000012 -- 已经进行了攻击宣言, 不能向怪兽攻击的效果失效

script/RDFusion.lua

@@ -240,14 +240,14 @@ function RushDuel.FusionProcedureOperation(insf, sub, checker, min, max, ...)
 end
 
 -- 创建效果: 融合术/结合 召唤
-function RushDuel.CreateFusionEffect(card, matfilter, spfilter, exfilter, s_range, o_range, mat_check, mat_move, target_action, operation_action, including_self)
+function RushDuel.CreateFusionEffect(card, matfilter, spfilter, exfilter, s_range, o_range, mat_check, mat_move, target_action, operation_action, including_self, limit_action)
     local self_range = s_range or 0
     local opponent_range = o_range or 0
     local move = mat_move or RushDuel.FusionToGrave
     local include = including_self or false
     local e = Effect.CreateEffect(card)
     e:SetTarget(RushDuel.FusionTarget(matfilter, spfilter, exfilter, self_range, opponent_range, mat_check, include, target_action))
-    e:SetOperation(RushDuel.FusionOperation(matfilter, spfilter, exfilter, self_range, opponent_range, mat_check, move, include, operation_action))
+    e:SetOperation(RushDuel.FusionOperation(matfilter, spfilter, exfilter, self_range, opponent_range, mat_check, move, include, operation_action, limit_action))
     return e
 end
 -- 融合效果 - 素材过滤
@@ -362,7 +362,7 @@ function RushDuel.FusionTarget(matfilter, spfilter, exfilter, s_range, o_range,
     end
 end
 -- 融合效果 - 操作
-function RushDuel.FusionOperation(matfilter, spfilter, exfilter, s_range, o_range, mat_check, mat_move, including_self, action)
+function RushDuel.FusionOperation(matfilter, spfilter, exfilter, s_range, o_range, mat_check, mat_move, including_self, action, limit)
     return function(e, tp, eg, ep, ev, re, r, rp)
         Auxiliary.FGoalCheckAdditional = mat_check
         local fusionable, list, chkf, gc = RushDuel.GetFusionSummonData(e, tp, matfilter, spfilter, exfilter, s_range, o_range, including_self, nil, e)
@@ -373,6 +373,9 @@ function RushDuel.FusionOperation(matfilter, spfilter, exfilter, s_range, o_rang
             end
         end
         Auxiliary.FGoalCheckAdditional = nil
+        if limit ~= nil then
+            limit(e, tp, eg, ep, ev, re, r, rp)
+        end
     end
 end
 

script/RDLegend.lua

@@ -9,7 +9,7 @@ RushDuel.LegendCodes = {
     -- 青眼白龙
     {120120000, 120198001, 120231001},
     -- 真红眼黑龙
-    {120125001, 120203016, 120229101},
+    {120125001, 120203016, 120229101, 120274076},
     -- 黑魔术师
     {120130000, 120203015, 120254001},
     -- 死者苏生

script/c120109046.lua

+local m=120109046
+local list={120222017,120244004}
+local cm=_G["c"..m]
+cm.name="碧牙重轰爆速龙"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Fusion Material
+	RD.AddFusionProcedure(c,list[1],list[2])
+	--Contact Fusion
+	RD.EnableContactFusion(c,aux.Stringid(m,0))
+	--Atk Up
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,1))
+	e1:SetCategory(CATEGORY_ATKCHANGE)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCost(cm.cost)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Atk Up
+cm.cost=RD.CostSendHandToGrave(Card.IsAbleToGraveAsCost,1,1,nil,nil,function(g)
+	local tc=g:GetFirst()
+	if tc:IsLevelAbove(7) and tc:IsRace(RACE_DRAGON) then
+		return 1
+	else
+		return 0
+	end
+end)
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsFaceup() and c:IsRelateToEffect(e) then
+		local reset=RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END
+		RD.AttachAtkDef(e,c,1500,0,reset)
+		RD.AttachCannotDirectAttack(e,c,aux.Stringid(m,2),reset)
+		if e:GetLabel()==1 then
+			RD.AttachExtraAttackMonster(e,c,2,aux.Stringid(m,3),reset)
+		end
+	end
+end
\ No newline at end of file

script/c120238024.lua

@@ -3,7 +3,7 @@ local cm=_G["c"..m]
 cm.name="龙族融合"
 function cm.initial_effect(c)
 	--Activate
-	local e1=RD.CreateFusionEffect(c,cm.matfilter,nil,cm.exfilter,LOCATION_GRAVE,0,cm.matcheck,RD.FusionToDeck,nil,cm.operation)
+	local e1=RD.CreateFusionEffect(c,cm.matfilter,nil,cm.exfilter,LOCATION_GRAVE,0,cm.matcheck,RD.FusionToDeck,nil,nil,false,cm.limit)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON+CATEGORY_GRAVE_ACTION)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
@@ -27,7 +27,7 @@ end
 function cm.condition(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.IsExistingMatchingCard(cm.confilter,tp,LOCATION_MZONE,0,1,nil)
 end
-function cm.operation(e,tp,eg,ep,ev,re,r,rp,mat,fc)
+function cm.limit(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.GetFlagEffect(tp,m)~=0 then return end
 	RD.CreateHintEffect(e,aux.Stringid(m,1),tp,1,0,RESET_PHASE+PHASE_END)
 	RD.CreateAttackLimitEffect(e,cm.atktg,tp,LOCATION_MZONE,0,RESET_PHASE+PHASE_END)

script/c120261044.lua

@@ -18,7 +18,7 @@ function cm.initial_effect(c)
 	e1:SetOperation(cm.operation)
 	c:RegisterEffect(e1)
 end
---Special Summon
+--Destroy
 function cm.costfilter(c)
 	return c:IsType(TYPE_MONSTER) and c:IsAbleToDeckOrExtraAsCost()
 end

script/c120274001.lua

+local m=120274001
+local cm=_G["c"..m]
+cm.name="真红眼极炎龙［L］"
+function cm.initial_effect(c)
+	--Indes (Normal)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetValue(cm.indval)
+	c:RegisterEffect(e1)
+	--Indes (MaximumMode)
+	local e2=e1:Clone()
+	e2:SetType(EFFECT_TYPE_XMATERIAL)
+	c:RegisterEffect(e2)
+	--Damage
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_XMATERIAL+EFFECT_TYPE_CONTINUOUS)
+	e3:SetCode(EVENT_BATTLE_DESTROYING)
+	e3:SetCondition(RD.BattleDestroyingDamageCondition)
+	e3:SetOperation(cm.damop)
+	card:RegisterEffect(e3)
+	--Continuous Effect
+	RD.AddContinuousEffect(c,e1,e2,e3)
+end
+--Indes
+cm.indval=RD.ValueEffectIndesType(TYPE_MONSTER+TYPE_SPELL+TYPE_TRAP,TYPE_MONSTER+TYPE_SPELL+TYPE_TRAP)
+--Damage
+function cm.damop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_CARD,0,m)
+	Duel.Damage(1-tp,2400,REASON_EFFECT)
+end
\ No newline at end of file

script/c120274002.lua

+local m=120274002
+local list={120274001,120274003}
+local cm=_G["c"..m]
+cm.name="真红眼极炎龙"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Maximum Summon
+	RD.AddMaximumProcedure(c,3700,list[1],list[2])
+	--Destroy
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_DESTROY)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.condition)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Destroy
+function cm.desfilter(c)
+	return c:IsFacedown()
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return RD.IsSummonTurn(e:GetHandler()) or RD.MaximumMode(e)
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.desfilter,tp,0,LOCATION_ONFIELD,1,nil) end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	local g=Duel.GetMatchingGroup(cm.desfilter,tp,0,LOCATION_ONFIELD,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectAndDoAction(HINTMSG_DESTROY,cm.desfilter,tp,0,LOCATION_ONFIELD,1,1,nil,function(g)
+		Duel.Destroy(g,REASON_EFFECT)
+	end)
+end
\ No newline at end of file

script/c120274003.lua

+local m=120274003
+local list={120125001}
+local cm=_G["c"..m]
+cm.name="真红眼极炎龙［R］"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Cannot To Hand & Deck & Extra
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_CANNOT_TO_HAND_EFFECT)
+	e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetTargetRange(LOCATION_ONFIELD,0)
+	e1:SetCondition(cm.condition)
+	e1:SetTarget(cm.target)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EFFECT_CANNOT_TO_DECK_EFFECT)
+	c:RegisterEffect(e2)
+	local e3=e1:Clone()
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_XMATERIAL)
+	c:RegisterEffect(e3)
+	local e4=e2:Clone()
+	e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_XMATERIAL)
+	c:RegisterEffect(e4)
+	--Fusion Code
+	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_SINGLE)
+	e5:SetCode(EFFECT_ADD_FUSION_CODE)
+	e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e5:SetRange(LOCATION_MZONE)
+	e5:SetCondition(cm.fucon)
+	e5:SetValue(list[1])
+	c:RegisterEffect(e5)
+	local e6=e5:Clone()
+	e6:SetType(EFFECT_TYPE_XMATERIAL)
+	c:RegisterEffect(e6)
+	--Continuous Effect
+	RD.AddContinuousEffect(c,e1,e2,e3,e4,e5,e6)
+end
+--Cannot To Hand & Deck & Extra
+function cm.condition(e)
+	return Duel.GetTurnPlayer()~=e:GetHandlerPlayer()
+end
+function cm.target(e,c)
+	return c:IsType(TYPE_SPELL+TYPE_TRAP)
+end
+--Fusion Code
+function cm.fucon(e)
+	return e:GetHandler():IsFaceup()
+end
\ No newline at end of file

script/c120274028.lua

+local m=120274028
+local cm=_G["c"..m]
+cm.name="呼唤暗流星"
+function cm.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON+CATEGORY_GRAVE_SPSUMMON)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.activate)
+	c:RegisterEffect(e1)
+end
+--Activate
+function cm.costfilter(c)
+	return c:IsType(TYPE_MONSTER) and c:IsAbleToDeckOrExtraAsCost()
+end
+function cm.filter(c)
+	return c:IsType(TYPE_SPELL+TYPE_TRAP)
+end
+function cm.spfilter(c,e,tp)
+	return not c:IsType(TYPE_EFFECT) and c:IsType(TYPE_FUSION)
+		and c:IsAttribute(ATTRIBUTE_DARK+ATTRIBUTE_FIRE)
+		and RD.IsCanBeSpecialSummoned(c,e,tp,POS_FACEUP)
+end
+cm.cost=RD.CostSendGraveToDeckBottom(cm.costfilter,2,2)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,0,LOCATION_ONFIELD,1,nil) end
+	local g=Duel.GetMatchingGroup(cm.filter,tp,0,LOCATION_ONFIELD,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
+end
+function cm.activate(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectAndDoAction(HINTMSG_DESTROY,cm.filter,tp,0,LOCATION_ONFIELD,1,1,nil,function(g)
+		if Duel.Destroy(g,REASON_EFFECT)~=0 then
+			RD.CanSelectAndSpecialSummon(aux.Stringid(m,1),aux.NecroValleyFilter(cm.spfilter),tp,LOCATION_GRAVE,0,1,1,nil,e,POS_FACEUP,true)
+		end
+	end)
+end
\ No newline at end of file

script/c120274031.lua

+local m=120274031
+local list={120151005}
+local cm=_G["c"..m]
+cm.name="大剑龙驾 联力恐龙车［L］"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Change Code
+	RD.EnableChangeCode(c,list[1],LOCATION_HAND)
+	--To Hand
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_TOHAND)
+	e1:SetType(EFFECT_TYPE_XMATERIAL+EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetLabel(m)
+	e1:SetCondition(RD.MaximumMode)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--To Hand
+function cm.filter(c)
+	return c:IsAbleToHand()
+end
+cm.cost=RD.CostSendDeckTopToGrave(1)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,0,LOCATION_MZONE,1,nil) end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	local g=Duel.GetMatchingGroup(cm.filter,tp,0,LOCATION_MZONE,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectAndDoAction(HINTMSG_RTOHAND,cm.filter,tp,0,LOCATION_MZONE,1,1,nil,function(g)
+		RD.SendToOpponentHand(g)
+	end)
+end
\ No newline at end of file

script/c120274032.lua

+local m=120274032
+local list={120151005,120151007}
+local cm=_G["c"..m]
+cm.name="大恐龙驾 联力恐龙车"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Maximum Summon
+	RD.AddMaximumProcedure(c,3400,list[1],list[2])
+	--Destroy
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_DESTROY)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.condition)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Destroy
+function cm.confilter(c)
+	return c:IsFaceup() and c:IsLevelAbove(9)
+end
+function cm.costfilter(c)
+	return c:IsType(TYPE_MONSTER) and c:IsAbleToGraveAsCost()
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return RD.MaximumMode(e) and not Duel.IsExistingMatchingCard(cm.confilter,tp,0,LOCATION_MZONE,1,nil)
+end
+cm.cost=RD.CostSendHandToGrave(cm.costfilter,1,1)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(nil,tp,0,LOCATION_MZONE,1,nil) end
+	local g=Duel.GetMatchingGroup(nil,tp,0,LOCATION_MZONE,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectAndDoAction(HINTMSG_DESTROY,nil,tp,0,LOCATION_MZONE,1,2,nil,function(g)
+		Duel.Destroy(g,REASON_EFFECT)
+	end)
+end
\ No newline at end of file

script/c120274033.lua

+local m=120274033
+local list={120151007}
+local cm=_G["c"..m]
+cm.name="大铠龙驾 联力恐龙车［R］"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Change Code
+	RD.EnableChangeCode(c,list[1],LOCATION_HAND)
+	--Indes (Normal)
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+	--Indes (MaximumMode)
+	local e2=e1:Clone()
+	e2:SetType(EFFECT_TYPE_XMATERIAL+EFFECT_TYPE_IGNITION)
+	e2:SetLabel(m)
+	c:RegisterEffect(e2)
+end
+--Indes
+cm.indval=RD.ValueEffectIndesType(0,TYPE_MONSTER+TYPE_SPELL+TYPE_TRAP)
+cm.cost=RD.CostSendDeckTopToGrave(2)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return RD.IsCanAttachEffectIndes(e:GetHandler(),tp,cm.indval) end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsFaceup() and c:IsRelateToEffect(e) then
+		RD.AttachEffectIndes(e,c,cm.indval,aux.Stringid(m,1),RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
+	end
+end
\ No newline at end of file

script/c120274042.lua

+local m=120274042
+local list={120274050}
+local cm=_G["c"..m]
+cm.name="收集白金小翼龙"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--To Hand
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_GRAVE_ACTION)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--To Hand
+function cm.thfilter(c)
+	return ((c:IsLevel(8,10) and c:IsRace(RACE_DINOSAUR)) or c:IsCode(list[1])) and c:IsAbleToHand()
+end
+cm.cost=RD.CostSendHandToDeckBottom(Card.IsAbleToDeckAsCost,1,1,false)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
+		RD.SendToHandAndExists(g,1-tp)
+	end)
+end
\ No newline at end of file

script/c120274048.lua

+local m=120274048
+local cm=_G["c"..m]
+cm.name="侏罗纪抽卡"
+function cm.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DRAW)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.activate)
+	c:RegisterEffect(e1)
+end
+--Activate
+function cm.costfilter(c)
+	return c:IsRace(RACE_DINOSAUR) and c:IsAbleToGraveAsCost()
+end
+cm.cost=RD.CostSendHandToGrave(cm.costfilter,1,1)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,2) end
+	RD.TargetDraw(tp,2)
+end
+function cm.activate(e,tp,eg,ep,ev,re,r,rp)
+	RD.Draw()
+	if Duel.GetFlagEffect(tp,m)~=0 then return end
+	RD.CreateRaceCannotAttackEffect(e,aux.Stringid(m,1),RACE_ALL-RACE_DINOSAUR,tp,1,0,RESET_PHASE+PHASE_END)
+	Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
+end
\ No newline at end of file

script/c120274050.lua

+local m=120274050
+local cm=_G["c"..m]
+cm.name="恐龙体温"
+function cm.initial_effect(c)
+	--Activate
+	RD.RegisterEquipEffect(c,nil,nil,cm.target)
+	--Indes
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_EQUIP)
+	e1:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
+	e1:SetValue(cm.indval)
+	c:RegisterEffect(e1)
+	--Pierce
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetCode(EFFECT_PIERCE)
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
+	e3:SetRange(LOCATION_SZONE)
+	e3:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
+	e3:SetTarget(cm.prctg)
+	e3:SetLabelObject(e2)
+	c:RegisterEffect(e3)
+	--Cannot To Hand & Deck & Extra
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_EQUIP)
+	e4:SetCode(EFFECT_CANNOT_TO_HAND_EFFECT)
+	e4:SetCondition(cm.condition)
+	c:RegisterEffect(e4)
+	local e5=e4:Clone()
+	e5:SetCode(EFFECT_CANNOT_TO_DECK_EFFECT)
+	c:RegisterEffect(e5)
+end
+--Activate
+function cm.target(c,e,tp)
+	return c:IsFaceup() and c:IsControler(tp) and c:IsRace(RACE_DINOSAUR)
+end
+--Indes
+cm.indval=RD.ValueEffectIndesType(0,TYPE_MONSTER+TYPE_SPELL+TYPE_TRAP,true)
+--Pierce
+function cm.prctg(e,c)
+	return c==e:GetHandler():GetEquipTarget()
+end
+--Cannot To Hand & Deck & Extra
+function cm.condition(e)
+	local tc=e:GetHandler():GetEquipTarget()
+	local tp=e:GetHandlerPlayer()
+	return Duel.GetTurnPlayer()~=tp and tc:IsControler(tp)
+end
\ No newline at end of file

script/c120274052.lua

+local m=120274052
+local cm=_G["c"..m]
+cm.name="现梦中丝绸蚕"
+function cm.initial_effect(c)
+	--Fusion Material
+	RD.AddFusionProcedure(c,false,cm.matfilter,cm.matfilter)
+	--Atk Up
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_TODECK)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.condition)
+	e1:SetCost(cm.cost)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Fusion Material
+cm.unspecified_funsion=true
+function cm.matfilter(c)
+	return c:IsLevel(7,8,9) and c:IsRace(RACE_INSECT) and c:IsFusionType(TYPE_EFFECT)
+end
+--Atk Up
+function cm.costfilter(c)
+	return not c:IsLevel(9) and c:IsRace(RACE_INSECT) and c:IsAbleToDeckOrExtraAsCost()
+end
+function cm.exfilter(c)
+	return c:IsAbleToDeck()
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsSummonType(SUMMON_TYPE_FUSION) and RD.IsSpecialSummonTurn(c)
+end
+cm.cost=RD.CostSendGraveToDeck(cm.costfilter,3,3)
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsFaceup() and c:IsRelateToEffect(e) then
+		RD.AttachAtkDef(e,c,500,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_TODECK,cm.exfilter,tp,0,LOCATION_ONFIELD,1,1,nil,function(g)
+			RD.SendToDeckAndExists(g)
+		end)
+	end
+end
\ No newline at end of file

script/c120274053.lua

+local m=120274053
+local cm=_G["c"..m]
+cm.name="荣华梦中丝绸蚕"
+function cm.initial_effect(c)
+	--Fusion Material
+	RD.AddFusionProcedure(c,false,cm.matfilter1,cm.matfilter2)
+	--Indes
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetTargetRange(LOCATION_MZONE,0)
+	e1:SetTarget(cm.target)
+	e1:SetValue(cm.indval)
+	c:RegisterEffect(e1)
+	--Cannot Be Fusion Material
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
+	e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetTargetRange(LOCATION_MZONE,0)
+	e2:SetValue(cm.fuslimit)
+	c:RegisterEffect(e2)
+	--Continuous Effect
+	RD.AddContinuousEffect(c,e1,e2)
+end
+--Fusion Material
+cm.unspecified_funsion=true
+function cm.matfilter1(c)
+	return c:IsLevel(7,8,9) and c:IsRace(RACE_INSECT) and c:IsFusionType(TYPE_EFFECT)
+end
+function cm.matfilter2(c)
+	return c:IsRace(RACE_INSECT) and c:IsFusionType(TYPE_EFFECT)
+end
+--Indes
+cm.indval=RD.ValueEffectIndesType(0,TYPE_MONSTER+TYPE_SPELL+TYPE_TRAP,true)
+function cm.target(e,c)
+	return c:IsFaceup() and c:IsRace(RACE_INSECT)
+end
+--Cannot Be Fusion Material
+function cm.fuslimit(e,c,sumtype)
+	if not c then return false end
+	return not c:IsControler(e:GetHandlerPlayer()) and sumtype==SUMMON_TYPE_FUSION
+end
\ No newline at end of file

script/c120274055.lua

+local m=120274055
+local cm=_G["c"..m]
+cm.name="梦中丝绸蚕"
+function cm.initial_effect(c)
+	--Summon Procedure
+	RD.AddSummonProcedureOne(c,aux.Stringid(m,0),nil,cm.sumfilter)
+	--Fusion Summon
+	local e1=RD.CreateFusionEffect(c,nil,cm.spfilter)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	c:RegisterEffect(e1)
+end
+--Summon Procedure
+function cm.sumfilter(c,e,tp)
+	return c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_INSECT)
+end
+--Fusion Summon
+function cm.spfilter(c)
+	return c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_INSECT)
+end
\ No newline at end of file

script/c120274057.lua

+local m=120274057
+local cm=_G["c"..m]
+cm.name="梦中飞蛾"
+function cm.initial_effect(c)
+	--Atk & Def Down
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.condition)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Atk & Def Down
+function cm.confilter(c)
+	return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_INSECT)
+end
+function cm.exfilter(c)
+	return c:IsFaceup() and not c:IsRace(RACE_INSECT)
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.IsExistingMatchingCard(cm.confilter,tp,LOCATION_MZONE,0,1,e:GetHandler())
+end
+cm.cost=RD.CostChangeSelfPosition(POS_FACEUP_ATTACK,POS_FACEUP_DEFENSE)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectAndDoAction(aux.Stringid(m,1),Card.IsFaceup,tp,0,LOCATION_MZONE,1,1,nil,function(g)
+		RD.AttachAtkDef(e,g:GetFirst(),-500,-500,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		RD.CanSelectAndDoAction(aux.Stringid(m,2),aux.Stringid(m,3),cm.exfilter,tp,0,LOCATION_MZONE,1,1,nil,function(sg)
+			Duel.BreakEffect()
+			RD.ChangeRace(e,sg:GetFirst(),RACE_INSECT,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
+		end)
+	end)
+end
\ No newline at end of file

script/c120274058.lua

+local m=120274058
+local cm=_G["c"..m]
+cm.name="梦中软壳"
+function cm.initial_effect(c)
+	--Position
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_POSITION)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.condition)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Position
+function cm.confilter(c)
+	return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_INSECT)
+end
+function cm.exfilter(c)
+	return c:IsFaceup() and not c:IsRace(RACE_INSECT)
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.IsExistingMatchingCard(cm.confilter,tp,LOCATION_MZONE,0,1,e:GetHandler())
+end
+cm.cost=RD.CostChangeSelfPosition(POS_FACEUP_ATTACK,POS_FACEUP_DEFENSE)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(RD.IsCanChangePosition,tp,0,LOCATION_MZONE,1,nil) end
+	local g=Duel.GetMatchingGroup(RD.IsCanChangePosition,tp,0,LOCATION_MZONE,nil)
+	Duel.SetOperationInfo(0,CATEGORY_POSITION,g,1,0,0)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectAndDoAction(HINTMSG_POSCHANGE,RD.IsCanChangePosition,tp,0,LOCATION_MZONE,1,1,nil,function(g)
+		if RD.ChangePosition(g)~=0 then
+			RD.CanSelectAndDoAction(aux.Stringid(m,1),aux.Stringid(m,2),cm.exfilter,tp,0,LOCATION_MZONE,1,1,nil,function(sg)
+				Duel.BreakEffect()
+				RD.ChangeRace(e,sg:GetFirst(),RACE_INSECT,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
+			end)
+		end
+	end)
+end
\ No newline at end of file

script/c120274065.lua

+local m=120274065
+local cm=_G["c"..m]
+cm.name="梦中拥抱"
+function cm.initial_effect(c)
+	--Activate
+	local e1=RD.CreateFusionEffect(c,cm.matfilter,cm.spfilter,cm.exfilter,0,LOCATION_MZONE,cm.matcheck,RD.FusionToGrave,nil,nil,false,cm.limit)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	c:RegisterEffect(e1)
+end
+--Activate
+function cm.matfilter(c)
+	return c:IsOnField() and c:IsFaceup()
+end
+function cm.spfilter(c)
+	return c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_INSECT)
+end
+function cm.exfilter(c)
+	return c:IsFaceup() and c:IsLevelBelow(9)
+end
+function cm.matcheck(tp,sg,fc)
+	return sg:GetCount()==2 and sg:IsExists(Card.IsControler,1,nil,tp)
+		and sg:IsExists(Card.IsLevelBelow,1,nil,9)
+end
+function cm.limit(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetFlagEffect(tp,m)~=0 then return end
+	RD.CreateRaceCannotAttackEffect(e,aux.Stringid(m,1),RACE_ALL-RACE_INSECT,tp,1,0,RESET_PHASE+PHASE_END)
+	Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
+end
\ No newline at end of file