From 0a52a97383a6bc6308c13125a5f029d2642eb94e Mon Sep 17 00:00:00 2001 From: ClaireStanfield Date: Thu, 3 Jul 2025 21:52:17 -0400 Subject: [PATCH] Add Twin Photon Lizard (Anime) --- unofficial/c511027041.lua | 45 +++++++++++++++++++++++++++++++++++++++ 1 file changed, 45 insertions(+) create mode 100644 unofficial/c511027041.lua diff --git a/unofficial/c511027041.lua b/unofficial/c511027041.lua new file mode 100644 index 0000000000..501c0e2923 --- /dev/null +++ b/unofficial/c511027041.lua @@ -0,0 +1,45 @@ +--ツイン・フォトン・リザード (Anime) +--Twin Photon Lizard (Anime) +local s,id=GetID() +function s.initial_effect(c) + --Fusion Materials + c:EnableReviveLimit() + Fusion.AddProcMixN(c,true,true,38973775,2) + --Special Summon, from your Graveyard, both of the Fusion Material Monsters used for the Fusion Summon of this card + local e1=Effect.CreateEffect(c) + e1:SetDescription(aux.Stringid(id,0)) + e1:SetCategory(CATEGORY_SPECIAL_SUMMON) + e1:SetType(EFFECT_TYPE_IGNITION) + e1:SetRange(LOCATION_MZONE) + e1:SetCost(Cost.SelfTribute) + e1:SetTarget(s.target) + e1:SetOperation(s.operation) + c:RegisterEffect(e1) +end +s.listed_names={38973775} +s.material_setcode=SET_PHOTON +function s.mgfilter(c,e,tp,fusc,mg) + return c:IsControler(tp) and c:IsLocation(LOCATION_GRAVE) + and (c:GetReason()&(REASON_FUSION|REASON_MATERIAL))==(REASON_FUSION|REASON_MATERIAL) and c:GetReasonCard()==fusc + and c:IsCanBeSpecialSummoned(e,0,tp,false,false) + and fusc:CheckFusionMaterial(mg,c,PLAYER_NONE+65536) +end +function s.target(e,tp,eg,ep,ev,re,r,rp,chk) + local g=e:GetHandler():GetMaterial() + if chk==0 then + local ct=#g + return ct>0 and Duel.GetMZoneCount(tp,e:GetHandler())>=ct and not Duel.IsPlayerAffectedByEffect(tp,CARD_BLUEEYES_SPIRIT) + and e:GetHandler():IsFusionSummoned() + and g:FilterCount(s.mgfilter,nil,e,tp,e:GetHandler(),g)==ct + end + Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,#g,0,0) +end +function s.operation(e,tp,eg,ep,ev,re,r,rp) + if Duel.IsPlayerAffectedByEffect(tp,CARD_BLUEEYES_SPIRIT) then return end + local g=e:GetHandler():GetMaterial() + local ct=#g + if Duel.GetLocationCount(tp,LOCATION_MZONE)>=ct + and g:FilterCount(s.mgfilter,nil,e,tp,e:GetHandler(),g)==ct then + Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) + end +end \ No newline at end of file