Commit bcac7663 authored by Huangnan's avatar Huangnan

add new cards list&delete cards

parent 68b160cb
No preview for this file type
This diff is collapsed.
--薇尔莉特·伊芙加登
function c60001180.initial_effect(c)
aux.AddCodeList(c,60001179)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_CANNOT_ATTACK)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetRange(LOCATION_MZONE)
e2:SetCode(EFFECT_UNRELEASABLE_SUM)
e2:SetValue(1)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EFFECT_UNRELEASABLE_NONSUM)
c:RegisterEffect(e3)
local e4=e2:Clone()
e4:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
c:RegisterEffect(e4)
local e5=e2:Clone()
e5:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
c:RegisterEffect(e5)
local e6=e2:Clone()
e6:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
c:RegisterEffect(e6)
local e7=e2:Clone()
e7:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
c:RegisterEffect(e7)
local e8=Effect.CreateEffect(c)
e8:SetDescription(aux.Stringid(60001167,0))
e8:SetCategory(CATEGORY_DRAW)
e8:SetType(EFFECT_TYPE_QUICK_O)
e8:SetCode(EVENT_CHAINING)
e8:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL+EFFECT_FLAG_DELAY)
e8:SetRange(LOCATION_MZONE)
e8:SetCountLimit(1)
e8:SetCondition(c60001180.ckcon)
e8:SetTarget(c60001180.cktg)
e8:SetOperation(c60001180.ckop)
c:RegisterEffect(e8)
local e9=Effect.CreateEffect(c)
e9:SetDescription(aux.Stringid(60001167,1))
e9:SetCategory(CATEGORY_TOHAND)
e9:SetType(EFFECT_TYPE_IGNITION)
e9:SetRange(LOCATION_GRAVE)
e9:SetCountLimit(1,60001180)
e9:SetTarget(c60001180.hstg)
e9:SetOperation(c60001180.hsop)
c:RegisterEffect(e9)
local e10=e9:Clone()
e10:SetRange(LOCATION_REMOVED)
c:RegisterEffect(e10)
end
function c60001180.ckcon(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and re:IsHasType(EFFECT_TYPE_ACTIVATE) and aux.IsCodeListed(tc,60001179)
end
function c60001180.cktg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(1)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
end
function c60001180.ckop(e,tp,eg,ep,ev,re,r,rp)
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Draw(p,d,REASON_EFFECT)
end
function c60001180.hstg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToHand() end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,e:GetHandler(),1,0,0)
end
function c60001180.filter(c,sc)
return c:IsFaceup() and c:IsCode(60001179) and not c:IsType(sc:GetType())
end
function c60001180.filter2(c)
return aux.IsCodeListed(c,60001179) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand()
end
function c60001180.hsop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetMatchingGroup(c60001180.filter2,tp,LOCATION_DECK,0,nil)
if c:IsRelateToEffect(e) then
if Duel.SendtoHand(c,nil,REASON_EFFECT)>0 and Duel.IsExistingMatchingCard(c60001180.filter,tp,LOCATION_ONFIELD,0,1,nil,c) and #g>0 and Duel.SelectYesNo(tp,aux.Stringid(60001167,2)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local sg=g:FilterSelect(tp,c60001180.filter2,1,1,nil)
Duel.SendtoHand(sg,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,sg)
Duel.ShuffleHand(tp)
end
end
end
--紫罗兰之恋
local m=60001192
local cm=_G["c"..m]
function cm.initial_effect(c)
aux.AddCodeList(c,60001179)
--code
aux.EnableChangeCode(c,60001179,LOCATION_MZONE)
--activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e1)
--to grave
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0))
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_SZONE)
e1:SetCountLimit(1)
e1:SetTarget(cm.target)
e1:SetOperation(cm.activate)
c:RegisterEffect(e1)
--maintain
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e4:SetCode(EVENT_PHASE+PHASE_STANDBY)
e4:SetRange(LOCATION_SZONE)
e4:SetCountLimit(1)
e4:SetOperation(cm.mtop)
c:RegisterEffect(e4)
end
function cm.tdfilter(c)
return (c:IsLocation(LOCATION_GRAVE) or c:IsFaceup()) and c:IsType(TYPE_SPELL+TYPE_TRAP)
and aux.IsCodeListed(c,60001179) and not c:IsCode(m) and c:IsAbleToDeck()
end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and chkc:IsControler(tp) and cm.tdfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(cm.tdfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,2,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local g=Duel.SelectTarget(tp,cm.tdfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,2,2,nil)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,2,0,0)
end
function cm.activate(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
local tg=g:Filter(Card.IsRelateToEffect,nil,e)
if tg:GetCount()>0 then
Duel.SendtoDeck(tg,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
local ct=tg:FilterCount(Card.IsLocation,nil,LOCATION_DECK)
local sg=Duel.GetMatchingGroup(cm.stfilter,tp,LOCATION_DECK,0,nil)
local ft=Duel.GetLocationCount(tp,LOCATION_SZONE)
if ct>0 and Duel.IsExistingMatchingCard(cm.demfilter,tp,LOCATION_MZONE,0,1,nil)
and sg:GetClassCount(Card.GetCode)>=ct and ft>=ct
and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
local stg=sg:SelectSubGroup(tp,aux.dncheck,false,ct,ct)
Duel.SSet(tp,stg)
end
end
end
function cm.demfilter(c)
return c:IsCode(60001179) and c:IsType(TYPE_MONSTER) and c:IsFaceup()
end
function cm.stfilter(c)
return c:GetType()==TYPE_TRAP and not aux.IsCodeListed(c,60001179) and c:IsSSetable()
end
function cm.mtop(e,tp,eg,ep,ev,re,r,rp)
Duel.Destroy(e:GetHandler(),REASON_COST)
end
\ No newline at end of file
......@@ -226,9 +226,13 @@
!setname 0x9a7c 对魔特异
!setname 0xaa7c 武器人
!setname 0x3a7d 塔尔塔罗斯
!setname 0xaa70 乙女之剑
!setname 0xca70 协奏
!setname 0x5a70 舞斗
!counter 0xa7d 女神指示物
!counter 0xa7f 好感指示物
#▽乐 3113279818 130 0xe00-0xe0f
!setname 0xe08 尘世侧写
......@@ -321,6 +325,14 @@
!setname 0xcc6 龙帝
!setname 0xcc7 煌世
!setname 0xccf 仙精
!setname 0xccd 天命
!setname 0x3ccd 天命教骑
!setname 0x5ccd 天命教令
!setname 0x6ccd 天命教义
!setname 0xccb 天界
#rk.set(code,"DAIOU") DAIOU
#rk.set(code,"DAIOUGU") 大王具
#rk.set(code,"OUMEI") 王命
#rk.set(code,"RYUUHA") 龙霸
#AddCodeList(c,16120010)「龙素记号xf」记述
#AddCodeList(c,16172004) 禁时王记述
......@@ -332,6 +344,7 @@
!counter 0x1ccc 无字指示物
!counter 0xcc2 魔帝指示物
#小桥流水 2466894135 162 0xf00-0xf0f
#AddCodeList(16200003) 单推人衍生物卡名记述
......@@ -391,7 +404,8 @@
#副连_VOLIAN 984086774 173 0x260-0x26f
!setname 0x268 Arcaea
#祈予之心 - 174
#祈予之心 385149215 174 0x4b0~0x4bf
!setname 0x4b1 域控
#圣灵兽骑 643865567 180 0x6e0-0x6ef
!setname 0x36e1 调音
......@@ -442,6 +456,7 @@
!setname 0x825 溯猎逐时
!setname 0x826 风吟游歌
!setname 0x827 忆质渊
!setname 0x828 姬丝缇可
!counter 0x1820 灵骸指示物
!counter 0x1822 誓约指示物
!counter 0x1823 幽梦指示物
......@@ -495,6 +510,7 @@
!setname 0x6904 阿巴阿巴
!setname 0x3907 幻想时间
!setname 0x90b 赛博
!setname 0xc904 芳青之梦
!counter 0x903 自然界指示物
!counter 0x1904 阿巴阿巴指示物
......@@ -800,7 +816,8 @@
!counter 0x46d 重负指示物
!counter 0x46e 天堂指示物
!counter 0x46f 明星指示物
!counter 0x471 Gale卡用泛用指示物(Unnamed Counter
!counter 0x472 鲜血指示物(Blood Counter
#▽海原 3398862193 339 0x9d0-0x9df
!setname 0x9d2 魔楔
!setname 0x9d3 岩筮
......@@ -937,6 +954,7 @@
!setname 0x3ca5 LCB罪人
!setname 0x5ca5 LCBE.G.O
!setname 0x3ca6 染荆
!setname 0x6ca0 残赫
!counter 0xca0 少女病指示物
!counter 0xcaf 妖精乡指示物
#setcard="lcb_jianqi" 剑契组
......@@ -1097,7 +1115,7 @@
#AddCodeList(60001179) 紫罗兰永恒花园卡名记述
!counter 0x624 进化指示物
!counter 0x625 吟唱指示物
!counter 0x62a 万世铭指示物
!counter 0x62b 万世铭指示物
!counter 0x162a 源石指示物
#LaiBill 529508379 601 0xb20-0xb2f
......@@ -1179,6 +1197,8 @@
#AddCodeList(64810001) 白马零儿卡名记述
#AddCodeList(64836050) 「常山赵子龙」记述
#灰蓝 2455659904 650 0xda0-0xdaf
!counter 0x1da0 逆卡巴拉指示物
!counter 0x1da1 外身指示物
......@@ -1417,6 +1437,7 @@
#yee 1138772630 792 0x5c0-0x5cf
!setname 0x5c0 星钢
#cm.setcard="Abnormality" 异想体
#s.setcard="Library_Of_Ruina"
!counter 0x15c1 异想体指示物
#望月理奈 - 810
......@@ -1431,6 +1452,7 @@
!setname 0xa851 F-TC.
!setname 0xc851 C-TC.
!setname 0x855 都市传说
!setname 0x858 畜生界
!setname 0x859 地心灵殿
!setname 0x85a 梦幻馆
#AddCodeList(81902000) TC.记述
......@@ -1507,6 +1529,9 @@
!counter 0x1596 幻想指示物
!counter 0x3597 旧地狱
#2987736314 阿塔 888 0x890-0x89f
!setname 0x8903 数理罪论
#王道游老子 995602632 894 0x700-0x70f
!setname 0xa701 XTale
!setname 0x70a S.W.
......@@ -1519,6 +1544,9 @@
#AddCodeList(89451031) S.W.惡狼 霜月雪成卡名记述
!counter 0x70a 囚馆指示物
#WasteWind 1103516856 910
#hackclad 猎兽
#bywdsm 1079774209 923 0xa40-0xa4f
!setname 0x3a41 幻梦境的碎片
!setname 0x3a44 延迟?!
......
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