2023/10/27 新增：HC01新卡

script/RDLegend.lua

@@ -11,7 +11,7 @@ RushDuel.LegendCodes = {
     -- 真红眼黑龙
     {120125001, 120203016, 120229101},
     -- 黑魔术师
-    {120130000, 120203015},
+    {120130000, 120203015, 120255001},
     -- 死者苏生
     {120194004, 120195004},
     -- 天使的施舍

script/c120253033.lua

@@ -24,7 +24,7 @@ function cm.exfilter(c)
 	return c:IsType(TYPE_MONSTER)
 end
 function cm.excheck(g)
-	return g:GetClassCount(Card.GetAttribute)==g:GetCount()
+	return g:GetClassCount(Card.GetAttribute)==1
 end
 function cm.spfilter(c,e,tp)
 	return c:IsLevelBelow(7) and RD.IsCanBeSpecialSummoned(c,e,tp,POS_FACEUP)

script/c120255035.lua

+local m=120255035
+local list={120130000}
+local cm=_G["c"..m]
+cm.name="黑魔导之遂行者"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Change Code
+	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:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Change Code
+function cm.tdfilter(c)
+	return c:IsType(TYPE_SPELL) and c:IsAbleToDeck()
+end
+function cm.desfilter(c)
+	return c:IsFaceup() and c:IsLevelBelow(8)
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return not e:GetHandler():IsCode(list[1])
+end
+cm.cost=RD.CostSendDeckTopToGrave(1)
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsFaceup() and c:IsRelateToEffect(e) then
+		RD.ChangeCode(e,c,list[1],RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END)
+		RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_TODECK,aux.NecroValleyFilter(cm.tdfilter),tp,LOCATION_GRAVE,0,10,10,nil,function(g)
+			Duel.BreakEffect()
+			if RD.SendToDeckAndExists(g) then
+				RD.CanSelectAndDoAction(aux.Stringid(m,2),HINTMSG_DESTROY,cm.desfilter,tp,0,LOCATION_MZONE,1,1,nil,function(sg)
+					Duel.Destroy(sg,REASON_EFFECT)
+				end)
+			end
+		end)
+	end
+end
\ No newline at end of file

script/c120255037.lua

+local m=120255037
+local cm=_G["c"..m]
+cm.name="超银河王 银河舰王道帝［L］"
+function cm.initial_effect(c)
+	--Atk Down
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DESTROY)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+	--MaximumMode
+	local e2=e1:Clone()
+	e2:SetDescription(aux.Stringid(m,3))
+	e2:SetType(EFFECT_TYPE_IGNITION+EFFECT_TYPE_XMATERIAL)
+	e2:SetLabel(m)
+	c:RegisterEffect(e2)
+end
+--Atk Down
+function cm.filter(c)
+	return c:IsFaceup() and c:GetBaseAttack()>=4000 and c:IsRace(RACE_GALAXY+RACE_SPELLCASTER+RACE_MACHINE+RACE_DRAGON) and c:IsAttackAbove(4000)
+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,LOCATION_MZONE,0,1,nil) end
+	if e:GetLabel()==m then
+		Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	end
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectAndDoAction(aux.Stringid(m,1),cm.filter,tp,LOCATION_MZONE,0,1,1,nil,function(g)
+		RD.AttachAtkDef(e,g:GetFirst(),-4000,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		RD.CanSelectAndDoAction(aux.Stringid(m,2),HINTMSG_DESTROY,nil,tp,0,LOCATION_ONFIELD,1,4,nil,function(g)
+			Duel.BreakEffect()
+			Duel.Destroy(g,REASON_EFFECT)
+		end)
+	end)
+end
\ No newline at end of file

script/c120255038.lua

+local m=120255038
+local list={120255037,120255039}
+local cm=_G["c"..m]
+cm.name="超银河王 银河舰王道帝"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Maximum Summon
+	RD.AddMaximumProcedure(c,4000,list[1],list[2])
+	--Tribute
+	RD.CreateAdvanceCheck(c,cm.tricheck,1,20255038)
+	--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:SetCondition(cm.condition)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Tribute
+function cm.tricheck(c)
+	return c:IsType(TYPE_NORMAL) and c:IsRace(RACE_GALAXY)
+end
+--To Hand
+function cm.thfilter(c)
+	return c:IsLevel(10) and c:IsAbleToHand()
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return RD.IsSummonTurn(c) and c:GetFlagEffect(20130031)~=0
+end
+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,2,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,2,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,2,2,nil,function(g)
+		local c=e:GetHandler()
+		if RD.SendToHandAndExists(g,1-tp) and c:IsFaceup() and c:IsRelateToEffect(e) then
+			Duel.BreakEffect()
+			RD.SendToHandAndExists(c,1-tp)
+		end
+	end)
+end
\ No newline at end of file

script/c120255039.lua

+local m=120255039
+local cm=_G["c"..m]
+cm.name="超银河王 银河舰王道帝［R］"
+function cm.initial_effect(c)
+	--Atk Up
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_TOGRAVE+CATEGORY_ATKCHANGE)
+	e1:SetType(EFFECT_TYPE_XMATERIAL+EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetLabel(m)
+	e1:SetCondition(RD.MaximumMode)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Atk Up
+function cm.filter1(c)
+	return c:IsLevelAbove(1) and c:IsAbleToGrave()
+end
+function cm.filter2(c,g)
+	return c:IsFaceup() and c:IsLevelAbove(1)
+		and g:CheckWithSumEqual(Card.GetLevel,c:GetLevel(),1,g:GetCount())
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=Duel.GetMatchingGroup(cm.filter1,tp,LOCATION_HAND,0,nil)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter2,tp,0,LOCATION_MZONE,1,nil,g) end
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_HAND)
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(cm.filter1,tp,LOCATION_HAND,0,nil)
+	local filter=RD.Filter(cm.filter2,g)
+	RD.SelectAndDoAction(aux.Stringid(m,1),filter,tp,0,LOCATION_MZONE,1,1,nil,function(sg)
+		local c=e:GetHandler()
+		local tc=sg:GetFirst()
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+		local mg=g:SelectWithSumEqual(tp,Card.GetLevel,tc:GetLevel(),1,g:GetCount())
+		if Duel.SendtoGrave(mg,REASON_EFFECT)~=0 and c:IsFaceup() and c:IsRelateToEffect(e) and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
+			RD.AttachAtkDef(e,c,tc:GetAttack(),0,RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END)
+		end
+	end)
+end
\ No newline at end of file