2023/2/10 新增：名匠 虎铁，名匠的头盔

script/c120238036.lua

+local m=120238036
+local list={120238045}
+local cm=_G["c"..m]
+cm.name="名匠 虎铁"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--To Deck
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_TODECK+CATEGORY_GRAVE_ACTION+CATEGORY_DRAW)
+	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
+--To Deck
+function cm.filter(c)
+	return ((c:IsType(TYPE_NORMAL) and c:IsLevelBelow(4)) or c:IsType(TYPE_EQUIP)) and c:IsAbleToDeck()
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return RD.IsSummonTurn(e:GetHandler())
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_GRAVE,0,1,nil) end
+	local g=Duel.GetMatchingGroup(cm.filter,tp,LOCATION_GRAVE,0,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(cm.filter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
+		if RD.SendToDeckTop(g,tp,tp,true)~=0 then
+			Duel.ConfirmDecktop(tp,1)
+			local tc=g:GetFirst()
+			if (RD.IsLegendCard(tc) and tc:IsType(TYPE_MONSTER)) or tc:IsCode(list[1]) then
+				RD.CanDraw(aux.Stringid(m,1),tp,1)
+			end
+		end
+	end)
+end
\ No newline at end of file

script/c120238045.lua

+local m=120238045
+local list={120238036}
+local cm=_G["c"..m]
+cm.name="名匠的头盔"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Activate
+	RD.RegisterEquipEffect(c,nil,nil,cm.target)
+	--Atk & Def Up
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_EQUIP)
+	e1:SetCode(EFFECT_UPDATE_ATTACK)
+	e1:SetValue(cm.upval)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EFFECT_UPDATE_DEFENSE)
+	e2:SetValue(200)
+	c:RegisterEffect(e2)
+end
+--Activate
+function cm.target(c,e,tp)
+	return c:IsControler(tp) and c:IsFaceup()
+end
+--Atk & Def Up
+function cm.upval(e,c)
+	local atk=200
+	local ec=e:GetHandler():GetEquipTarget()
+	if ec:IsCode(list[1]) or (RD.IsLegendCard(ec) and ec:GetOriginalLevel()<=4) then
+		atk=atk+ec:GetBaseAttack()
+	end
+	return atk
+end
\ No newline at end of file