攻略
Combo
考据
好物分享
卡图故事
支缓
盘点整理
Duel Links
--No.6 先史遺産アトランタル function c9161357.initial_effect(c) --xyz summon aux.AddXyzProcedure(c,nil,6,2) c:EnableReviveLimit() --equip local e1=Effect.CreateEffect(c) e1:SetDescription(aux.Stringid(9161357,0)) e1:SetCategory(CATEGORY_LEAVE_GRAVE+CATEGORY_EQUIP) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_SPSUMMON_SUCCESS) e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetCondition(c9161357.eqcon) e1:SetTarget(c9161357.eqtg) e1:SetOperation(c9161357.eqop) c:RegisterEffect(e1) --lp local e2=Effect.CreateEffect(c) e2:SetDescription(aux.Stringid(9161357,1)) e2:SetType(EFFECT_TYPE_IGNITION) e2:SetCountLimit(1) e2:SetRange(LOCATION_MZONE) e2:SetCost(c9161357.lpcost) e2:SetOperation(c9161357.lpop) e2:SetLabelObject(e1) c:RegisterEffect(e2) end c9161357.xyz_number=6 function c9161357.eqcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ) end function c9161357.filter(c) return c:IsSetCard(0x48) and c:IsType(TYPE_MONSTER) and not c:IsForbidden() end function c9161357.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c9161357.filter(chkc) end if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.IsExistingTarget(c9161357.filter,tp,LOCATION_GRAVE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) local g=Duel.SelectTarget(tp,c9161357.filter,tp,LOCATION_GRAVE,0,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_EQUIP,g,1,0,0) end function c9161357.eqop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) then if not Duel.Equip(tp,tc,c,false) then return end e:SetLabelObject(tc) local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetProperty(EFFECT_FLAG_OWNER_RELATE) e1:SetCode(EFFECT_EQUIP_LIMIT) e1:SetReset(RESET_EVENT+RESETS_STANDARD) e1:SetValue(c9161357.eqlimit) tc:RegisterEffect(e1) local atk=math.ceil(tc:GetBaseAttack()/2) if atk>0 then local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_EQUIP) e2:SetProperty(EFFECT_FLAG_OWNER_RELATE+EFFECT_FLAG_IGNORE_IMMUNE) e2:SetCode(EFFECT_UPDATE_ATTACK) e2:SetReset(RESET_EVENT+RESETS_STANDARD) e2:SetValue(atk) tc:RegisterEffect(e2) end end end function c9161357.eqlimit(e,c) return e:GetOwner()==c end function c9161357.lpcost(e,tp,eg,ep,ev,re,r,rp,chk) local ec=e:GetLabelObject():GetLabelObject() if chk==0 then return Duel.GetCurrentPhase()==PHASE_MAIN1 and ec and ec:GetEquipTarget()==e:GetHandler() and ec:IsAbleToGraveAsCost() and e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST) Duel.SendtoGrave(ec,REASON_COST) local e1=Effect.CreateEffect(e:GetHandler()) e1:SetType(EFFECT_TYPE_FIELD) e1:SetCode(EFFECT_CANNOT_BP) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH) e1:SetTargetRange(1,0) e1:SetReset(RESET_PHASE+PHASE_END) Duel.RegisterEffect(e1,tp) end function c9161357.lpop(e,tp,eg,ep,ev,re,r,rp) Duel.SetLP(1-tp,math.ceil(Duel.GetLP(1-tp)/2)) end