added new rush cards

Author: Yoshi80

rush/c160321001.lua

@@ -0,0 +1,31 @@
+--キメラテック・オーバー・ドラゴン
+--Chimeratech Overdragon
+local s,id=GetID()
+function s.initial_effect(c)
+	c:EnableReviveLimit()
+	--fusion material
+	Fusion.AddProcMixRep(c,true,true,aux.FilterBoolFunctionEx(Card.IsRace,RACE_MACHINE),1,99,CARD_CYBER_DRAGON)
+	--spsummon success
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetOperation(s.sucop)
+	c:RegisterEffect(e1)
+end
+s.material_setcode={0x93,0x1093}
+function s.sucop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_SET_BASE_ATTACK)
+	e1:SetValue(c:GetMaterialCount()*800)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD_DISABLE)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EFFECT_SET_BASE_DEFENSE)
+	c:RegisterEffect(e2)
+	local e3=e1:Clone()
+	e3:SetCode(EFFECT_EXTRA_ATTACK_MONSTER)
+	e3:SetValue(c:GetMaterialCount()-1)
+	c:RegisterEffect(e3)
+end

rush/c160321029.lua

@@ -0,0 +1,29 @@
+--サイバー・ラッシュ・フュージョン
+--Cyber Rush Fusion
+--scripted by YoshiDuels
+local s,id=GetID()
+function s.initial_effect(c)
+	local e1=Fusion.CreateSummonEff(c,s.filter,s.mfilter,s.fextra,Fusion.ShuffleMaterial,nil,s.stage2,nil,nil,nil,nil,nil,nil,nil,nil,nil,5)
+	e1:SetCondition(s.condition)
+	c:RegisterEffect(e1)
+end
+function s.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.IsExistingMatchingCard(Card.IsMonster,tp,LOCATION_MZONE,0,1,nil)
+end
+function s.filter(c)
+	return c:ListsCodeAsMaterial(CARD_CYBER_DRAGON)
+end
+function s.mfilter(c)
+	return c:IsRace(RACE_MACHINE) and c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsLocation(LOCATION_GRAVE|LOCATION_MZONE) and c:IsAbleToDeck()
+end
+function s.fextra(e,tp,mg)
+	return Duel.GetMatchingGroup(s.mfilter,tp,LOCATION_GRAVE|LOCATION_MZONE,0,nil)
+end
+function s.stage2(e,tc,tp,mg,chk)
+	if chk==0 then
+		local sg=Duel.GetMatchingGroup(Card.IsNotMaximumModeSide,tp,LOCATION_MZONE,0,tc)
+		if #sg>0 then
+			Duel.Destroy(sg,REASON_EFFECT)
+		end
+	end
+end

rush/c160322001.lua

@@ -0,0 +1,56 @@
+--ハーピィ三姉妹・ＴＢ
+--Harpie Lady Sisters Triangle Beauty
+--scripted by YoshiDuels
+local s,id=GetID()
+function s.initial_effect(c)
+	--fusion material
+	c:EnableReviveLimit()
+	Fusion.AddProcMixN(c,true,true,160208002,1,s.matfilter,2)
+	Fusion.AddContactProc(c,s.contactfil,s.contactop,nil,nil,SUMMON_TYPE_FUSION,nil,false)
+	--Name becomes "Harpie Ladies"
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_CHANGE_CODE)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetRange(LOCATION_GRAVE+LOCATION_MZONE)
+	e1:SetValue(160208002)
+	c:RegisterEffect(e1)
+	--Cannot be destroyed
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
+	e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetValue(s.indval)
+	c:RegisterEffect(e2)
+	--cannot be used as Fusion Material
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_FIELD)
+	e3:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
+	e3:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetTargetRange(LOCATION_MZONE,0)
+	e3:SetTarget(s.indtg)
+	e3:SetValue(s.sumlimit)
+	c:RegisterEffect(e3)
+end
+s.named_material={160208002}
+function s.matfilter(c,scard,sumtype,tp)
+	return c:IsAttribute(ATTRIBUTE_WIND,scard,sumtype,tp) and c:IsRace(RACE_WINGEDBEAST,scard,sumtype,tp)
+end
+function s.contactfil(tp)
+	return Duel.GetMatchingGroup(aux.FaceupFilter(Card.IsAbleToDeckOrExtraAsCost),tp,LOCATION_ONFIELD,0,nil)
+end
+function s.contactop(g,tp)
+	Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_COST+REASON_MATERIAL)
+end
+function s.indval(e,re,rp)
+	return (re:IsTrapEffect() or re:IsSpellEffect()) and aux.indoval(e,re,rp)
+end
+function s.indtg(e,c)
+	return c:IsLevel(12)
+end
+function s.sumlimit(e,c)
+	if not c then return false end
+	return c:IsControler(1-e:GetHandlerPlayer())
+end

rush/c160322035.lua

@@ -0,0 +1,59 @@
+--ヒステリック・パーティー
+--Hysteric Party
+--scripted by YoshiDuels
+local s,id=GetID()
+function s.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(id,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_DESTROYED)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e1:SetCondition(s.condition)
+	e1:SetTarget(s.target)
+	e1:SetOperation(s.activate)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EVENT_DRAW)
+	e2:SetCondition(s.condition2)
+	c:RegisterEffect(e2)
+end
+function s.filter(c,tp)
+	return c:GetReasonPlayer()==1-tp and c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_MZONE)
+		and c:IsReason(REASON_BATTLE) and Duel.GetAttacker():IsControler(1-tp)
+end
+function s.condition(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(s.filter,1,nil,tp)
+end
+function s.condition2(e,tp,eg,ep,ev,re,r,rp)
+	return ep==1-tp and Duel.IsTurnPlayer(1-tp)
+end
+function s.spfilter(c,e,tp)
+	return (c:IsCode(CARD_HARPIE_LADY,160208002) or (c:IsRace(RACE_WINGEDBEAST) and c:IsAttribute(ATTRIBUTE_WIND) and c:IsType(TYPE_FUSION))) 
+		and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
+end
+function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToGrave,tp,LOCATION_HAND,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_HAND)
+	Duel.SetPossibleOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
+end
+function s.activate(e,tp,eg,ep,ev,re,r,rp)
+	--Effect
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g=Duel.SelectMatchingCard(tp,Card.IsAbleToGrave,tp,LOCATION_HAND,0,1,1,nil)
+	if Duel.SendtoGrave(g,REASON_EFFECT)==0 then return end
+	--Special Summon
+	local ft=Duel.GetMZoneCount(tp)
+	if ft<=0 then return end
+	if ft>=3 then ft=3 end
+	if Duel.IsPlayerAffectedByEffect(tp,CARD_BLUEEYES_SPIRIT) then ft=1 end
+	local sg=Duel.GetMatchingGroup(s.spfilter,tp,LOCATION_GRAVE,0,nil,e,tp)
+	if #sg>0 and ft>0 and Duel.SelectYesNo(tp,aux.Stringid(id,1)) then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local ssg=sg:Select(tp,1,ft,nil)
+		if #ssg>0 then
+			Duel.SpecialSummon(ssg,0,tp,tp,false,false,POS_FACEUP)
+		end
+	end
+end