Commit 4fd0ea21 authored by Nemo Ma's avatar Nemo Ma

fix

parent 91906a87
No preview for this file type
--方舟骑士-莫斯提马
local m=14010242
local cm=_G["c"..m]
cm.named_with_Arknight=1
function cm.initial_effect(c)
--special summon
local e1=Effect.CreateEffect(c)
......
......@@ -33,6 +33,7 @@ function c33700929.initial_effect(c)
e2:SetTarget(c33700929.atktg)
e2:SetOperation(c33700929.atkop)
c:RegisterEffect(e2)
e2:SetLabelObject(e1)
--
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE)
......
......@@ -8,6 +8,7 @@ function cm.initial_effect(c)
e1:SetCategory(CATEGORY_DAMAGE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,m)
e1:SetTarget(cm.damtg)
e1:SetOperation(cm.damop)
c:RegisterEffect(e1)
......@@ -33,7 +34,7 @@ end
function cm.damop(e,tp,eg,ep,ev,re,r,rp)
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Damage(p,d,REASON_EFFECT)
if Duel.GetActivityCount(m,tp,ACTIVITY_CHAIN)==1 then
if Duel.GetActivityCount(m,tp,ACTIVITY_CHAIN)==0 then
Duel.BreakEffect()
Duel.Damage(p,1000,REASON_EFFECT)
end
......
--方舟骑士 泥岩
cm.named_with_Arknight=1
function c72410180.initial_effect(c)
--special summon rule
local e1=Effect.CreateEffect(c)
......
--扭曲念想·不死的黑蛇
function c79036001.initial_effect(c)
c:EnableReviveLimit()
--spsummon condition
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_SPSUMMON_CONDITION)
c:RegisterEffect(e1)
--special summon rule
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_SPSUMMON_PROC)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e2:SetRange(LOCATION_EXTRA)
e2:SetCondition(c79036001.sprcon)
e2:SetOperation(c79036001.sprop)
c:RegisterEffect(e2)
--Announce
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_ANNOUNCE+CATEGORY_EQUIP)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetCode(EVENT_FREE_CHAIN)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1)
e3:SetTarget(c79036001.antg)
e3:SetOperation(c79036001.anop)
c:RegisterEffect(e3)
end
function c79036001.sprfilter(c)
return c:IsFaceup() and c:IsAbleToGraveAsCost()
end
function c79036001.sprfilter1(c,tp,g,sc)
local lv=c:GetLevel()
return c:IsType(TYPE_TUNER) and g:IsExists(c79036001.sprfilter2,1,c,tp,c,sc,lv)
end
function c79036001.sprfilter2(c,tp,mc,sc,lv)
local sg=Group.FromCards(c,mc)
return c:IsLevel(lv) and not c:IsType(TYPE_TUNER)
and Duel.GetLocationCountFromEx(tp,tp,sg,sc)>0
end
function c79036001.sprcon(e,c)
if c==nil then return true end
local tp=c:GetControler()
local g=Duel.GetMatchingGroup(c79036001.sprfilter,tp,LOCATION_MZONE,0,nil)
return g:IsExists(c79036001.sprfilter1,1,nil,tp,g,c)
end
function c79036001.sprop(e,tp,eg,ep,ev,re,r,rp,c)
local g=Duel.GetMatchingGroup(c79036001.sprfilter,tp,LOCATION_MZONE,0,nil)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g1=g:FilterSelect(tp,c79036001.sprfilter1,1,1,nil,tp,g,c)
local mc=g1:GetFirst()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g2=g:FilterSelect(tp,c79036001.sprfilter2,1,1,mc,tp,mc,c,mc:GetLevel())
g1:Merge(g2)
Duel.SendtoGrave(g1,REASON_COST)
end
function c79036001.antg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
local op=0
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(79036001,3))
op=Duel.SelectOption(tp,aux.Stringid(79036001,0),aux.Stringid(79036001,1),aux.Stringid(79036001,2))
e:SetLabel(op)
end
function c79036001.anop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local op=e:GetLabel()
--
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_CHAINING)
e1:SetLabel(op)
e1:SetCondition(c79036001.eqcon)
e1:SetOperation(c79036001.eqop)
e1:SetReset(RESET_PHASE+PHASE_END,2)
Duel.RegisterEffect(e1,tp)
end
function c79036001.eqcon(e,tp,eg,ep,ev,re,r,rp)
local op=e:GetLabel()
local ex2,g2,gc2,dp2,dv2=Duel.GetOperationInfo(ev,CATEGORY_SPECIAL_SUMMON)
if op==0 then
return ((ex2 and bit.band(dv2,LOCATION_DECK)==LOCATION_DECK) or (ex2 and bit.band(dv2,LOCATION_EXTRA)==LOCATION_EXTRA)) and rp==1-tp and Duel.IsChainDisablable(ev) and re:GetHandler():IsType(TYPE_MONSTER)
elseif op==1 then
return (ex2 and bit.band(dv2,LOCATION_GRAVE)==LOCATION_GRAVE) and rp==1-tp and Duel.IsChainDisablable(ev) and re:GetHandler():IsType(TYPE_MONSTER)
elseif op==2 then
return (ex2 and bit.band(dv2,LOCATION_HAND)==LOCATION_HAND) and rp==1-tp and Duel.IsChainDisablable(ev) and re:GetHandler():IsType(TYPE_MONSTER)
end
end
function c79036001.eqop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,0,79036001)
Duel.NegateEffect(ev)
local c=e:GetHandler()
local tc=re:GetHandler()
if c:IsOnField() and c:IsFaceup() and not c:IsStatus(STATUS_BATTLE_DESTROYED) then
if tc:IsLocation(LOCATION_MZONE) then
Duel.Equip(tp,c,tc)
--Add Equip limit
local e1=Effect.CreateEffect(tc)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_EQUIP_LIMIT)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1:SetValue(c79036001.eqlimit)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_EQUIP)
e2:SetCode(EFFECT_SET_CONTROL)
e2:SetValue(tp)
e2:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
c:RegisterEffect(e2)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_EQUIP)
e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetValue(1000)
e2:SetReset(RESET_EVENT+RESETS_STANDARD)
c:RegisterEffect(e2)
elseif not tc:IsLocation(LOCATION_MZONE) then
Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
Duel.Equip(tp,c,tc)
--Add Equip limit
local e1=Effect.CreateEffect(tc)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_EQUIP_LIMIT)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1:SetValue(c79036001.eqlimit)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_EQUIP)
e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetValue(1000)
e2:SetReset(RESET_EVENT+RESETS_STANDARD)
c:RegisterEffect(e2)
end
end
e:Reset()
end
function c79036001.eqlimit(e,c)
return e:GetOwner()==c
end
......@@ -527,6 +527,8 @@
!setname 0x6f3d 秋之刻证兽
!setname 0x9f3d 冬之刻证兽
!setname 0x3f3e 灵核机
!setname 0x5f3e Pecftlcus(未来圣罚)
!setname 0x6f3e Se7en(罪名)
!counter 0xf3 陨星指示物
!counter 0xf3c 幻象指示物
!counter 0x1f35 龙鳞指示物
......@@ -567,7 +569,11 @@
!counter 0xca13 鲨鱼指示物
!setname 0xcab 镜碎
!counter 0x10cb 镜碎指示物
#空鸽 0x7f0-0x7ff
!setname 0x7fa 假面骑士
!setname 0x37fb 零一
!setname 0x47fb 亚克
#洛基卡奥斯 Dr.Chaos 670489248 107 0xa00-0xa0f
!setname 0x3a01 姬绊连结
......@@ -729,6 +735,9 @@
!setname 0x323 灵兽训练师
!setname 0x324 幻梦灵兽
!setname 0x326 机略纵横
!setname 0x329 异界旅人
!setname 0xa329 夜幕魔术团
!setname 0xc329 幻兽佣兵团
#vestige 751011441 825 0x820-0x82f
!setname 0x829 钢战
......@@ -767,6 +776,10 @@
#拳定天下 230 0x350-0x35f
#永远的干涸
!setname 0x888
!setname 0x889 铭恶魔
!setname 0x890 铭魔王
#老凤凰 672 0x670-0x67f
!setname 0x673 创刻
......@@ -790,9 +803,6 @@
!system 0x1222 U87
#???
!setname 0x5f3e Pecftlcus(未来圣罚)
!setname 0x6f3e Se7en(罪名)
#TYGOC Submissions
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment