Skip to content

Y
ygopro-222DIY-cards
Commit 0f7e0bec authored by Huangnan's avatar Huangnan
Browse files
Options

cdb delete add lflist strings update

parent f4a33404
Pipeline #33500 passed with stage
    in 29 minutes and 45 seconds
    Show whitespace changes
    Inline Side-by-side
    Showing with 89 additions and 8344 deletions
    expansions/FiNALE.cdb
    View file @ 0f7e0bec
    No preview for this file type
    expansions/lflist.conf
    View file @ 0f7e0bec
    #[2025.1.DIY....] #[2025.1.DIY....]
    !2025.1.DIY.... !2025.1.DIY....
    #001
    110015 0 --Fate/Grand Order·Lancer·埃列什基伽勒
    110025 0 --Fate/Grand Order·埃尔梅罗Ⅱ世
    114514 0 --超级沼气前辈 野兽形态
    155567 0 --第三次无限战争
    155580 0 --究极魔导之页
    155590 0 --神说：要有光
    155601 0 --禁忌万物的一滴
    166660 0 --星系守护神 长蛇星神
    166661 0 --拉伊达 3σ
    166662 0 --拉伊达 3σ『龙骑展开』
    166670 0 --拟龙贵族·引导龙女
    166700 3 --拟龙贵族·谋士龙女
    166725 1 --拟龙贵族·复仇龙女
    182130 0 --古道登仙·炼龙骨
    183570 0 --全能全知的栞啊！回应我的呼唤！
    #002 #002
    00200001 1 --魔王的剑 00200001 1 --魔王的剑
    00200007 0 --青行灯·辉火 00200007 0 --青行灯·辉火
    #010 #010
    01000376 0 --美丽的公主·姬丝秀忒 01000376 0 --美丽的公主·姬丝秀忒
    01000378 1 --美丽善良的金发神明 01000378 1 --美丽善良的金发神明
    ...@@ -97,11 +115,10 @@ ...@@ -97,11 +115,10 @@
    05012601 2 --茵蒂克丝 05012601 2 --茵蒂克丝
    05012603 1 --一方通行 05012603 1 --一方通行
    05012604 1 --上条当麻 05012604 1 --上条当麻
    05012605 0 --奥雷欧斯·伊萨德 05012605 1 --奥雷欧斯·伊萨德
    05012609 2 --滨面仕上 05012609 2 --滨面仕上
    05012613 1 --欧提努斯 05012613 1 --欧提努斯
    05012615 1 --学院都市 05012615 1 --学院都市
    05012616 0 --欧雷尔斯
    05012622 2 --月咏小萌 05012622 2 --月咏小萌
    05012628 1 --科隆尊 05012628 1 --科隆尊
    05012630 2 --圣日耳曼 05012630 2 --圣日耳曼
    ...@@ -594,6 +611,8 @@ ...@@ -594,6 +611,8 @@
    16362069 2 --英雄传说 神话 16362069 2 --英雄传说 神话
    16362070 2 --英雄传说 复仇者 16362070 2 --英雄传说 复仇者
    16372009 2 --山菊·花信 16372009 2 --山菊·花信
    16349310 1 --中坚骑士 骑士兽
    16372008 1 --玉桂·花信
    #164 #164
    16400039 0 --独裁者的计谋 16400039 0 --独裁者的计谋
    16400040 1 --Geass-逃避的战斗 16400040 1 --Geass-逃避的战斗
    ...@@ -637,6 +656,29 @@ ...@@ -637,6 +656,29 @@
    16400130 1 --Knightmare-红莲 16400130 1 --Knightmare-红莲
    16400131 1 --Knightmare-兰斯洛特 16400131 1 --Knightmare-兰斯洛特
    16400370 1 --光之战士 布鲁 跃水 16400370 1 --光之战士 布鲁 跃水
    # 光之战士系列
    16400310 1 --光之战士 欧布 原生
    16400272 1 --光之战士 杰克
    16400291 1 --光之战士 赛文
    16400374 1 --光之战士 泽塔 原始
    16400289 1 --光之战士 阿斯特拉
    16400286 1 --光之战士 奥特曼
    16400379 1 --光之战士 泽塔 德尔塔天爪
    16400337 1 --光之战士 捷德 刚燃
    16400316 1 --光之战士 欧布 三重
    16400390 1 --光之战士 罗布
    16400295 1 --等离子火花塔
    16400296 1 --宇宙警备队 本部
    16400329 1 --奥特宇宙港
    16400330 1 --奥特竞技场
    16400331 1 --奥特技术实验室
    # 光之战士系列（限制为2）
    16400270 2 --光之战士 希卡利
    16400305 2 --光之战士 迪迦
    16400365 2 --光之战士 特利迦
    16400278 2 --光之战士 维克特利
    16400322 2 --光之战士 奈克赛斯
    16400297 2 --光之战士 出动
    #170 #170
    17020410 0 --失落的火焰 17020410 0 --失落的火焰
    17030610 1 --火神龙 17030610 1 --火神龙
    ...@@ -703,7 +745,7 @@ ...@@ -703,7 +745,7 @@
    17243306 0 --米勒山谷 狼巫 17243306 0 --米勒山谷 狼巫
    17243322 0 --基金会 编号682 17243322 0 --基金会 编号682
    17243327 0 --基金会 编号173 17243327 0 --基金会 编号173
    17243329 2 --基金会 编号294 17243329 1 --基金会 编号294
    17243339 0 --基金会 博士Clef 17243339 0 --基金会 博士Clef
    17243344 0 --传说的黑夜 耀月龙 17243344 0 --传说的黑夜 耀月龙
    17243349 0 --恩佐·内洛法 17243349 0 --恩佐·内洛法
    ...@@ -719,6 +761,7 @@ ...@@ -719,6 +761,7 @@
    17243617 1 --剑与魔法石 天鹅座 17243617 1 --剑与魔法石 天鹅座
    17243056 1 --势卫吴疆 17243056 1 --势卫吴疆
    17243060 1 --破军杀敌 17243060 1 --破军杀敌
    17243312 1 --米勒山谷 石像鬼
    #173 #173
    17300007 0 --Arcaea 绝对的理性 咲弥 17300007 0 --Arcaea 绝对的理性 咲弥
    17300011 0 --Arcaea 记忆回响的世界 17300011 0 --Arcaea 记忆回响的世界
    ...@@ -766,7 +809,7 @@ ...@@ -766,7 +809,7 @@
    18700055 1 --血罪灵骸·业罪骨 18700055 1 --血罪灵骸·业罪骨
    18700062 2 --血罪灵骸·嗔罪骸蛇 18700062 2 --血罪灵骸·嗔罪骸蛇
    18700067 1 --天魔血罪·万千苦厄皆呓语·十恶埋骨·原罪骸灵 18700067 1 --天魔血罪·万千苦厄皆呓语·十恶埋骨·原罪骸灵
    18700087 0 --灾绝灭术·归鸿 18700087 1 --灾绝灭术·归鸿
    18700090 0 --奇物-16 真相没于虚假 18700090 0 --奇物-16 真相没于虚假
    18700130 0 --奇物-36 蓝槿罗之华 18700130 0 --奇物-36 蓝槿罗之华
    18700132 1 --无常戏伶 芙蕾娜·维尔薇特 18700132 1 --无常戏伶 芙蕾娜·维尔薇特
    ...@@ -852,6 +895,7 @@ ...@@ -852,6 +895,7 @@
    21113820 1 --芳青之梦 写彩 21113820 1 --芳青之梦 写彩
    21113835 1 --芳青之梦 幻天使 21113835 1 --芳青之梦 幻天使
    21113810 1 --芳青之梦 天弦声 21113810 1 --芳青之梦 天弦声
    21185665 0 --H：P 自闭宅
    #215 #215
    21520061 1 --玲珑法师-夕雾 21520061 1 --玲珑法师-夕雾
    21520066 1 --玲珑法师-鸢尾 21520066 1 --玲珑法师-鸢尾
    ...@@ -1004,26 +1048,6 @@ ...@@ -1004,26 +1048,6 @@
    30052005 0 --克里斯汀·罗森塔尔-633cae 30052005 0 --克里斯汀·罗森塔尔-633cae
    30052011 0 --克里斯汀·罗森塔尔-22b15d 30052011 0 --克里斯汀·罗森塔尔-22b15d
    30052073 0 --感知现实镜面 30052073 0 --感知现实镜面
    #306
    30610015 0 --Fate/Grand Order·Lancer·埃列什基伽勒
    30610025 0 --Fate/Grand Order·埃尔梅罗Ⅱ世
    30614514 0 --超级沼气前辈 野兽形态
    30655567 0 --第三次无限战争
    30655580 0 --究极魔导之页
    30655590 0 --神说：要有光
    30655601 0 --禁忌万物的一滴
    30666660 0 --星系守护神 长蛇星神
    30666661 0 --拉伊达 3σ
    30666662 0 --拉伊达 3σ『龙骑展开』
    30666670 0 --拟龙贵族·引导龙女
    30666700 3 --拟龙贵族·谋士龙女
    30666725 1 --拟龙贵族·复仇龙女
    30682130 0 --古道登仙·炼龙骨
    30683110 0 --M·A·L·Hydra
    30683305 0 --M·A·L·Growth Wedge
    30683425 0 --M·A·L——Null
    30683435 0 --M·A·L·Hive balloon
    30683570 0 --全能全知的栞啊！回应我的呼唤！
    #305 #305
    30553214 0 --墟界天使紊乱 30553214 0 --墟界天使紊乱
    30553252 1 --浮世苍景 30553252 1 --浮世苍景
    ...@@ -1306,6 +1330,7 @@ ...@@ -1306,6 +1330,7 @@
    33538036 1 --下午茶会 苹果茶会 33538036 1 --下午茶会 苹果茶会
    33538061 0 --少女绘梦 图仓 33538061 0 --少女绘梦 图仓
    33538067 0 --少女绘梦 梦想衣橱 33538067 0 --少女绘梦 梦想衣橱
    33500939 0 --水晶洞窟 无名者之墓
    #337 #337
    33700001 1 --上级Protoform 乞力马扎罗 33700001 1 --上级Protoform 乞力马扎罗
    33700028 1 --Proto-Protoform 33700028 1 --Proto-Protoform
    ...@@ -1507,10 +1532,16 @@ ...@@ -1507,10 +1532,16 @@
    36700010 1 --三重小队·风马－神速残像 36700010 1 --三重小队·风马－神速残像
    36700001 2 --三重小队·光之勇者－泰迦 36700001 2 --三重小队·光之勇者－泰迦
    36700016 2 --泰迦光饰·钥匙 36700016 2 --泰迦光饰·钥匙
    36700018 2 --泰迦火花 36700018 1 --泰迦火花
    36700013 1 --太阳之子－泰罗 36700013 1 --太阳之子－泰罗
    36700034 1 --极星光波手里剑 36700034 1 --极星光波手里剑
    36700031 1 --泰迦光饰·钥匙·形态切换 36700031 1 --泰迦光饰·钥匙·形态切换
    36700239 1 --乱炖龙仔-究极龙 新星
    36700242 1 --乱炖龙仔-无牙龙 黑爆裂
    36700245 1 --乱炖龙仔-杰庞顿
    36700250 1 --乱炖龙仔-猛烈凶魇
    36700253 1 --乱炖龙仔-邪恶双头龙
    #375 #375
    37564012 0 --元灵毁灭者·Aya Ayane 37564012 0 --元灵毁灭者·Aya Ayane
    37564041 0 --阎-少女之梦·虚无的世界 37564041 0 --阎-少女之梦·虚无的世界
    ...@@ -1611,7 +1642,7 @@ ...@@ -1611,7 +1642,7 @@
    47370104 0 --饕灵魔暗伏 47370104 0 --饕灵魔暗伏
    47390001 2 --LCB=司机 卡戎 47390001 2 --LCB=司机 卡戎
    47390004 1 --In Hell We Live, Lament 47390004 1 --In Hell We Live, Lament
    47390035 0 --绽放E.G.O::燃气捕鲸叉 亚哈 47390035 1 --绽放E.G.O::燃气捕鲸叉 亚哈
    47390036 0 --魔王希斯克利夫 47390036 0 --魔王希斯克利夫
    47390254 1 --Dieci协会南部4科 鸿璐 47390254 1 --Dieci协会南部4科 鸿璐
    47310307 0 --残赫照灵 熔火无穷 47310307 0 --残赫照灵 熔火无穷
    ...@@ -1693,6 +1724,11 @@ ...@@ -1693,6 +1724,11 @@
    51419716 0 --地狱的狂气女神-赫卡提亚 51419716 0 --地狱的狂气女神-赫卡提亚
    51419718 0 --地狱的时尚女神-赫卡提亚 51419718 0 --地狱的时尚女神-赫卡提亚
    51419720 0 --地狱的三球女神-赫卡提亚 51419720 0 --地狱的三球女神-赫卡提亚
    #523
    52300105 1 --无名者·牺牲
    52300110 1 --无名者·精灵
    #527 #527
    52700103 1 --百群骑士 血腥独角仙 52700103 1 --百群骑士 血腥独角仙
    52700106 1 --百群骑士 格拉法 52700106 1 --百群骑士 格拉法
    ...@@ -1710,6 +1746,7 @@ ...@@ -1710,6 +1746,7 @@
    52700709 0 --报复之鬼 忍·鬼 大星 52700709 0 --报复之鬼 忍·鬼 大星
    52700712 1 --忍·妖 玉雪 52700712 1 --忍·妖 玉雪
    52700715 0 --忍·兽 鹿雷 52700715 0 --忍·兽 鹿雷
    52700697 1 --鬼行大道而世人惮之 忍·鬼 猩猩童子
    #537 #537
    53705018 0 --超极幻海袭 丰之黄金 53705018 0 --超极幻海袭 丰之黄金
    53707016 0 --清响 抄染扉 53707016 0 --清响 抄染扉
    ...@@ -1925,20 +1962,23 @@ ...@@ -1925,20 +1962,23 @@
    61000009 0 --霞烈之魔妖 火取魔 61000009 0 --霞烈之魔妖 火取魔
    61000101 1 --“敬畏” 61000101 1 --“敬畏”
    #612 #612
    61200001 0 --云轮之界域 云轮界 61200001 1 --云轮之界域 云轮界
    61200002 1 --至高之器 云轮之玄 61200002 1 --至高之器 云轮之玄
    61200003 1 --至高之器 云轮之元 61200003 1 --至高之器 云轮之元
    61200004 1 --云轮大榜 道古玄碑 61200004 1 --云轮大榜 道古玄碑
    61200005 0 --云轮王证 流云令 61200005 1 --云轮王证 流云令
    61200101 1 --前尘轮转 悲戚云轮之愚者 61200101 1 --前尘轮转 悲戚云轮之愚者
    61200110 1 --玄元尊仪 云轮之云落 61200110 1 --玄元尊仪 云轮之云落
    61200000 1 --瀚古云轮之秘仪 61200000 1 --瀚古云轮之秘仪
    61200201 1 --五剑一心 云轮之白夜 61200201 1 --五剑一心 云轮之白夜
    61200310 0 --执我酌光 云轮之月曦 61200310 1 --执我酌光 云轮之月曦
    61200105 1 --前尘轮转 引领云轮之歌者 61200105 1 --前尘轮转 引领云轮之歌者
    61200207 1 --云轮秘造 殇 61200207 1 --云轮秘造 殇
    61200205 1 --云轮铸造 赤璃玄霜 61200205 1 --云轮铸造 赤璃玄霜
    61200202 1 --云轮伴剑 白夜 61200202 1 --云轮伴剑 白夜
    61200103 1 --前尘轮转 协同云轮之奏者
    61200006 1 --青夜弧光 云轮夜未央
    #639 #639
    63924105 0 --米诺陶诺斯 63924105 0 --米诺陶诺斯
    63924110 1 --米诺陶诺斯-无法走出的迷宫 63924110 1 --米诺陶诺斯-无法走出的迷宫
    ...@@ -2079,10 +2119,12 @@ ...@@ -2079,10 +2119,12 @@
    65899905 0 --抽1！抽1！再抽1！ 65899905 0 --抽1！抽1！再抽1！
    65899920 0 --反多元防空炮 65899920 0 --反多元防空炮
    65899935 0 --甲虫武士 65899935 0 --甲虫武士
    65870030 0 ----Protoss·黑暗圣堂武士 65870030 1 ----Protoss·黑暗圣堂武士
    65870055 1 --Protoss·执政官 65870055 1 --Protoss·执政官
    65870110 1 --Protoss·黑暗执政官 65870110 1 --Protoss·黑暗执政官
    65870025 1 --Protoss·母舰核心 65870025 1 --Protoss·母舰核心
    65899940 0 --万虫希冀之手
    #666 #666
    66600000 0 --夜行的领路人 滑头鬼 66600000 0 --夜行的领路人 滑头鬼
    66600002 0 --百鬼夜行 滑头鬼 66600002 0 --百鬼夜行 滑头鬼
    ...@@ -2223,7 +2265,7 @@ ...@@ -2223,7 +2265,7 @@
    81902106 1 --TC.105 隐匿于幕后的禁忌门扉 摩多罗隐岐奈 81902106 1 --TC.105 隐匿于幕后的禁忌门扉 摩多罗隐岐奈
    81902107 1 --TC.106 赛之河原的弃子 戎璎花 81902107 1 --TC.106 赛之河原的弃子 戎璎花
    81902112 1 --TC.111 孤立无援的造形神 埴安神袿姬 81902112 1 --TC.111 孤立无援的造形神 埴安神袿姬
    81903100 0 --未确认幻想少女 81903100 1 --未确认幻想少女
    81905005 1 --八云友·侍 丁礼田舞&尔子田里乃 81905005 1 --八云友·侍 丁礼田舞&尔子田里乃
    81905013 0 --八云友 西行寺幽幽子 81905013 0 --八云友 西行寺幽幽子
    81905014 0 --境界的妖怪 八云紫 81905014 0 --境界的妖怪 八云紫
    ......
    expansions/script/c183011.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Gladiator
    local m=183011
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --tohand
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e1:SetCode(EVENT_SUMMON_SUCCESS)
    e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.cost)
    e1:SetTarget(cm.thtg)
    e1:SetOperation(cm.thop)
    c:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EVENT_SPSUMMON_SUCCESS)
    c:RegisterEffect(e2)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    --atk/def
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e3:SetRange(LOCATION_MZONE)
    e3:SetCode(EFFECT_UPDATE_ATTACK)
    e3:SetValue(cm.adval)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_UPDATE_DEFENSE)
    c:RegisterEffect(e4)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.thfilter(c)
    return c:IsSetCard(0xc19) and c:IsAbleToHand() and not c:IsCode(m) and c:IsType(TYPE_MONSTER)
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    KanKan.MALcanntspm(e:GetHandler())
    Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
    end
    function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
    end
    function cm.thop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_DECK,0,1,1,nil)
    if #g>0 then
    Duel.SendtoHand(g,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,g)
    end
    end
    function cm.filter(c)
    return c:IsFaceup() and c:IsRace(RACE_MACHINE)
    end
    function cm.adval(e,c)
    return Duel.GetMatchingGroupCount(cm.filter,c:GetControler(),LOCATION_MZONE+LOCATION_GRAVE,0,c)*500
    end
    expansions/script/c183015.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Tracker
    local m=183015
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --special summon
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetCode(EFFECT_SPSUMMON_PROC)
    e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
    e1:SetRange(LOCATION_HAND)
    e1:SetCondition(cm.spcon)
    c:RegisterEffect(e1)
    --draw
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,0))
    e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_IGNITION)
    e2:SetRange(LOCATION_GRAVE)
    e2:SetCountLimit(1,m)
    e2:SetCost(cm.cost)
    e2:SetTarget(cm.target)
    e2:SetOperation(cm.operation)
    c:RegisterEffect(e2)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.filter(c)
    return c:IsFaceup() and c:IsSetCard(0xc19) and not c:IsCode(m)
    end
    function cm.spcon(e,c)
    if c==nil then return true end
    return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0 and
    Duel.IsExistingMatchingCard(cm.filter,c:GetControler(),LOCATION_MZONE,0,1,nil)
    end
    function cm.costfilter(c)
    return c:IsSetCard(0xc19) and c:IsAbleToRemoveAsCost()
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.costfilter,tp,LOCATION_GRAVE,0,1,e:GetHandler()) and Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
    local g=Duel.SelectMatchingCard(tp,cm.costfilter,tp,LOCATION_GRAVE,0,1,1,e:GetHandler())
    Duel.Remove(g,POS_FACEUP,REASON_COST)
    KanKan.MALcanntspm(e:GetHandler())
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
    end
    function cm.operation(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) then
    Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
    end
    end
    \ No newline at end of file
    expansions/script/c183020.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Breakthrough
    local m=183020
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --special summon rule
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetCode(EFFECT_SPSUMMON_PROC)
    e1:SetRange(LOCATION_HAND)
    e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
    e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
    e1:SetCondition(cm.spcon)
    c:RegisterEffect(e1)
    --change level
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_SPSUMMON_COST)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e2:SetOperation(cm.lvop)
    c:RegisterEffect(e2)
    --search
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
    e3:SetCode(EVENT_SUMMON_SUCCESS)
    e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
    e3:SetCountLimit(1,m+1)
    e3:SetCost(cm.cost)
    e3:SetTarget(cm.settg)
    e3:SetOperation(cm.setop)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EVENT_SPSUMMON_SUCCESS)
    c:RegisterEffect(e4)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.cfilter(c)
    return c:IsFaceup() and c:IsSetCard(0xc19)
    end
    function cm.spcon(e,c)
    if c==nil then return true end
    local tp=c:GetControler()
    return Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==0 or Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_MZONE,0,1,nil) and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
    end
    function cm.lvop(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_CHANGE_LEVEL)
    e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e1:SetRange(LOCATION_MZONE)
    e1:SetValue(4)
    e1:SetReset(RESET_EVENT+0x7f0000)
    c:RegisterEffect(e1)
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_SET_BASE_ATTACK)
    e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e2:SetRange(LOCATION_MZONE)
    e2:SetValue(1500)
    e2:SetReset(RESET_EVENT+0x7f0000)
    c:RegisterEffect(e2)
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    KanKan.MALcanntspm(e:GetHandler())
    Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
    end
    function cm.filter(c)
    return c:IsSetCard(0xc19) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable() and c:GetType()~=TYPE_SPELL
    end
    function cm.settg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
    and Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) end
    end
    function cm.setop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
    local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,1,1,nil)
    if #g>0 then
    Duel.SSet(tp,g)
    end
    end
    expansions/script/c183025.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Metal Squad
    local m=183025
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --special summon rule
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetCode(EFFECT_SPSUMMON_PROC)
    e1:SetRange(LOCATION_HAND)
    e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
    e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
    e1:SetCondition(cm.spcon)
    c:RegisterEffect(e1)
    --change level
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_SPSUMMON_COST)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e2:SetOperation(cm.lvop)
    c:RegisterEffect(e2)
    --double attack
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
    e3:SetCode(EVENT_TO_GRAVE)
    e3:SetCountLimit(1,m+1)
    e3:SetTarget(cm.datg)
    e3:SetOperation(cm.daop)
    c:RegisterEffect(e3)
    end
    function cm.cfilter(c)
    return c:IsFaceup() and c:IsType(TYPE_XYZ)
    end
    function cm.spcon(e,c)
    if c==nil then return true end
    local tp=c:GetControler()
    return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_MZONE,0,1,nil)
    end
    function cm.lvop(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_CHANGE_LEVEL)
    e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e1:SetRange(LOCATION_MZONE)
    e1:SetValue(4)
    e1:SetReset(RESET_EVENT+0x7f0000)
    c:RegisterEffect(e1)
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_SET_BASE_DEFENSE)
    e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e2:SetRange(LOCATION_MZONE)
    e2:SetValue(500)
    e2:SetReset(RESET_EVENT+0x7f0000)
    c:RegisterEffect(e2)
    end
    function cm.dafilter(c)
    return c:IsFaceup() and c:IsSetCard(0xc19)
    end
    function cm.datg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and cm.dafilter(chkc) end
    if chk==0 then return Duel.IsExistingTarget(cm.dafilter,tp,LOCATION_MZONE,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
    Duel.SelectTarget(tp,cm.dafilter,tp,LOCATION_MZONE,0,1,1,nil)
    end
    function cm.daop(e,tp,eg,ep,ev,re,r,rp)
    local tc=Duel.GetFirstTarget()
    if tc:IsRelateToEffect(e) and tc:IsFaceup() then
    local atk=tc:GetAttack()
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetCode(EFFECT_SET_ATTACK_FINAL)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    e1:SetValue(atk*2)
    tc:RegisterEffect(e1)
    end
    end
    expansions/script/c183030.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Cathode Ray Tube
    local m=183030
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --special summon
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
    e1:SetCode(EVENT_SUMMON_SUCCESS)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.cost)
    e1:SetTarget(cm.sptg)
    e1:SetOperation(cm.spop)
    c:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EVENT_SPSUMMON_SUCCESS)
    c:RegisterEffect(e2)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    --atk/def
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e3:SetRange(LOCATION_MZONE)
    e3:SetCode(EFFECT_UPDATE_ATTACK)
    e3:SetValue(cm.adval)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_UPDATE_DEFENSE)
    c:RegisterEffect(e4)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.thfilter(c)
    return c:IsSetCard(0xc19) and c:IsAbleToHand() and not c:IsCode(m) and c:IsType(TYPE_MONSTER)
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    KanKan.MALcanntspm(e:GetHandler())
    Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
    end
    function cm.spfilter(c,e,tp)
    return c:IsSetCard(0xc19) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) and not c:IsCode(m) and c:IsType(TYPE_MONSTER)
    end
    function cm.sptg(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.spfilter(chkc,e,tp) end
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsExistingTarget(cm.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectTarget(tp,cm.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    local tc=Duel.GetFirstTarget()
    if tc:IsRelateToEffect(e) then
    Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP_DEFENSE)
    end
    end
    function cm.filter(c)
    return c:IsType(TYPE_SPELL+TYPE_TRAP)
    end
    function cm.adval(e,c)
    return Duel.GetMatchingGroupCount(cm.filter,c:GetControler(),LOCATION_ONFIELD+LOCATION_GRAVE,0,c)*300
    end
    expansions/script/c183035.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L
    local m=183035
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --to grave
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_TOGRAVE)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e1:SetProperty(EFFECT_FLAG_DELAY)
    e1:SetCode(EVENT_SUMMON_SUCCESS)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.cost)
    e1:SetTarget(cm.tgtg)
    e1:SetOperation(cm.tgop)
    c:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EVENT_SPSUMMON_SUCCESS)
    c:RegisterEffect(e2)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    --hand link
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e3:SetCode(EFFECT_EXTRA_LINK_MATERIAL)
    e3:SetRange(LOCATION_HAND)
    e3:SetCountLimit(1,m+1)
    e3:SetValue(cm.matval)
    c:RegisterEffect(e3)
    --search
    local e4=Effect.CreateEffect(c)
    e4:SetDescription(aux.Stringid(m,1))
    e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
    e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e4:SetProperty(EFFECT_FLAG_DELAY)
    e4:SetCode(EVENT_BE_MATERIAL)
    e4:SetCountLimit(1,m+2)
    e4:SetCondition(cm.thcon)
    e4:SetOperation(cm.thop)
    c:RegisterEffect(e4)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    KanKan.MALcanntspm(e:GetHandler())
    Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
    end
    function cm.tgfilter(c)
    return c:IsSetCard(0xc19) and not c:IsCode(m) and c:IsAbleToGrave()
    end
    function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.tgfilter,tp,LOCATION_DECK,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
    end
    function cm.tgop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
    local g=Duel.SelectMatchingCard(tp,cm.tgfilter,tp,LOCATION_DECK,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.SendtoGrave(g,REASON_EFFECT)
    end
    end
    function cm.mfilter(c)
    return c:IsLocation(LOCATION_MZONE+LOCATION_GRAVE) and c:IsSetCard(0xc19)
    end
    function cm.exmfilter(c)
    return c:IsLocation(LOCATION_HAND) and c:IsCode(m)
    end
    function cm.matval(e,lc,mg,c,tp)
    if not lc:IsSetCard(0xc19) then return false,nil end
    return true,not mg or mg:IsExists(cm.mfilter,1,nil) and not mg:IsExists(cm.exmfilter,1,nil)
    end
    function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    e:SetLabel(0)
    if c:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and c:IsPreviousLocation(LOCATION_ONFIELD+LOCATION_HAND) and r==REASON_LINK and c:GetReasonCard():IsSetCard(0xc19) then
    if c:IsPreviousLocation(LOCATION_ONFIELD) then
    e:SetLabel(1)
    c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,1))
    end
    return true
    else
    return false
    end
    end
    function cm.thop(e,tp,eg,ep,ev,re,r,rp)
    if (e:GetLabel()==0 or Duel.SelectOption(tp,1003,1100)==0) then
    local sg1=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_SZONE,LOCATION_SZONE,nil)
    Duel.Destroy(sg1,REASON_EFFECT)
    else
    local sg2=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_SZONE,nil)
    Duel.Destroy(sg2,REASON_EFFECT)
    end
    end
    expansions/script/c183040.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L
    local m=183040
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --pendulum summon
    aux.EnablePendulumAttribute(c)
    --pendulum set
    local e0=Effect.CreateEffect(c)
    e0:SetDescription(aux.Stringid(m,0))
    e0:SetType(EFFECT_TYPE_IGNITION)
    e0:SetRange(LOCATION_PZONE)
    e0:SetCountLimit(1,m)
    e0:SetCost(cm.pccost)
    e0:SetTarget(cm.pctg)
    e0:SetOperation(cm.pcop)
    c:RegisterEffect(e0)
    --spsummon
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,1))
    e1:SetType(EFFECT_TYPE_IGNITION)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCountLimit(1,m+1)
    e1:SetCost(cm.spcost)
    e1:SetTarget(cm.settg)
    e1:SetOperation(cm.setop)
    c:RegisterEffect(e1)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    KanKan.MALPleave(c,m)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.pcfilter1(c)
    return c:IsDiscardable()
    end
    function cm.pccost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.pcfilter1,tp,LOCATION_HAND,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISCARD)
    local g=Duel.SelectMatchingCard(tp,cm.pcfilter1,tp,LOCATION_HAND,0,1,1,nil)
    Duel.SendtoGrave(g,REASON_COST+REASON_DISCARD)
    end
    function cm.pcfilter0(c)
    return c:IsType(TYPE_PENDULUM) and not c:IsForbidden() and c:IsSetCard(0xc19)
    end
    function cm.pctg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1))
    and Duel.IsExistingMatchingCard(cm.pcfilter0,tp,LOCATION_DECK,0,1,nil) end
    end
    function cm.pcop(e,tp,eg,ep,ev,re,r,rp)
    if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
    local g=Duel.SelectMatchingCard(tp,cm.pcfilter0,tp,LOCATION_DECK,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.MoveToField(g:GetFirst(),tp,tp,LOCATION_PZONE,POS_FACEUP,true)
    end
    end
    function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():IsReleasable() and Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    KanKan.MALcanntspm(e:GetHandler())
    Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
    Duel.Release(e:GetHandler(),REASON_COST)
    end
    function cm.filter(c)
    return c:IsSetCard(0xc19) and c:IsType(TYPE_SPELL) and c:IsSSetable()
    end
    function cm.settg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
    and Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) end
    end
    function cm.setop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
    local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,1,1,nil)
    if #g>0 then
    Duel.SSet(tp,g)
    end
    end
    \ No newline at end of file
    expansions/script/c183045.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L Riot
    local m=183045
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --pendulum summon
    aux.EnablePendulumAttribute(c)
    --special summon
    local e0=Effect.CreateEffect(c)
    e0:SetDescription(aux.Stringid(m,0))
    e0:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON)
    e0:SetType(EFFECT_TYPE_IGNITION)
    e0:SetRange(LOCATION_PZONE)
    e0:SetCountLimit(1,m)
    e0:SetCondition(cm.spcon)
    e0:SetTarget(KanKan.MALFusionPEXtg)
    e0:SetOperation(KanKan.MALFusionPEXop)
    c:RegisterEffect(e0)
    --spsummon
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,1))
    e1:SetType(EFFECT_TYPE_IGNITION)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCountLimit(1,m+1)
    e1:SetCost(cm.spcost)
    e1:SetTarget(cm.pentg)
    e1:SetOperation(cm.penop)
    c:RegisterEffect(e1)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    --set
    local e4=Effect.CreateEffect(c)
    e4:SetDescription(aux.Stringid(m,2))
    e4:SetType(EFFECT_TYPE_IGNITION)
    e4:SetRange(LOCATION_EXTRA)
    e4:SetCountLimit(1,m+2)
    e4:SetCost(cm.lpcost)
    e4:SetTarget(cm.tftg)
    e4:SetOperation(cm.tfop)
    c:RegisterEffect(e4)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
    return Duel.IsExistingMatchingCard(nil,tp,LOCATION_PZONE,0,1,e:GetHandler())
    end
    function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    KanKan.MALcanntspm(e:GetHandler())
    Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
    end
    function cm.penfilter(c,e,tp)
    return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function cm.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsExistingMatchingCard(cm.penfilter,tp,LOCATION_PZONE,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_PZONE)
    end
    function cm.penop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if not c:IsRelateToEffect(e) or Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.penfilter,tp,LOCATION_PZONE,0,1,1,nil,e,tp)
    if g:GetCount()>0 and Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)>0 then
    Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
    end
    end
    function cm.lpcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return true end
    Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
    end
    function cm.tffilter(c)
    return c:IsSetCard(0xc19) and not c:IsForbidden() and c:IsType(TYPE_MONSTER)
    end
    function cm.tftg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
    and Duel.IsExistingMatchingCard(cm.tffilter,tp,LOCATION_DECK,0,1,nil) end
    end
    function cm.tfop(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
    local g=Duel.SelectMatchingCard(tp,cm.tffilter,tp,LOCATION_DECK,0,1,1,nil)
    if g:GetCount()>0 then
    local tc=g:GetFirst()
    Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetCode(EFFECT_CHANGE_TYPE)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    e1:SetValue(TYPE_SPELL+TYPE_TRAP+TYPE_CONTINUOUS)
    tc:RegisterEffect(e1)
    end
    end
    \ No newline at end of file
    expansions/script/c183050.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L Arsenal Crab
    local m=183050
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --pendulum summon
    aux.EnablePendulumAttribute(c)
    --spsummon
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_IGNITION)
    e1:SetRange(LOCATION_PZONE)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.cost)
    e1:SetTarget(cm.target)
    e1:SetOperation(cm.operation)
    c:RegisterEffect(e1)
    --to hand
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,2))
    e2:SetCategory(CATEGORY_TOHAND)
    e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e2:SetType(EFFECT_TYPE_IGNITION)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCountLimit(1,m+1)
    e2:SetCost(cm.thcost)
    e2:SetTarget(cm.thtg)
    e2:SetOperation(cm.thop)
    c:RegisterEffect(e2)
    --Summon
    KanKan.MALSZSpm(c,m)
    end
    function cm.cfilter(c)
    return c:IsFaceup() and c:IsType(TYPE_PENDULUM) and c:IsAbleToDeckAsCost()
    end
    function cm.spfilter(c,e,tp)
    return c:IsSetCard(0xc19) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_EXTRA,0,3,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_EXTRA,0,3,3,nil)
    Duel.SendtoDeck(g,nil,3,REASON_COST)
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function cm.operation(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
    if g:GetCount()>0 then
    Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
    end
    end
    function cm.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():IsReleasable() end
    Duel.Release(e:GetHandler(),REASON_COST)
    end
    function cm.thfilter(c)
    return c:IsType(TYPE_MONSTER) and c:IsAbleToHand() and c:IsSetCard(0xc19)
    end
    function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and cm.thfilter(chkc) end
    if chk==0 then return Duel.IsExistingTarget(cm.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
    local g=Duel.SelectTarget(tp,cm.thfilter,tp,LOCATION_GRAVE,0,1,1,nil)
    Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
    end
    function cm.thop(e,tp,eg,ep,ev,re,r,rp)
    local tc=Duel.GetFirstTarget()
    if tc:IsRelateToEffect(e) then
    Duel.SendtoHand(tc,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,tc)
    end
    end
    expansions/script/c183055.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L Titan
    local m=183055
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    aux.EnablePendulumAttribute(c)
    --spsummon
    local e0=Effect.CreateEffect(c)
    e0:SetDescription(aux.Stringid(m,0))
    e0:SetCategory(CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON)
    e0:SetType(EFFECT_TYPE_IGNITION)
    e0:SetRange(LOCATION_PZONE)
    e0:SetCountLimit(1,m)
    e0:SetTarget(cm.rptg)
    e0:SetOperation(cm.rpop)
    c:RegisterEffect(e0)
    --act limit
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,5))
    e1:SetType(EFFECT_TYPE_IGNITION)
    e1:SetCountLimit(1,m+3)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCost(cm.cost)
    e1:SetTarget(cm.target)
    e1:SetOperation(cm.operation)
    c:RegisterEffect(e1)
    --Summon
    KanKan.MALSZSpm(c,m)
    KanKan.MALPleave(c,m)
    end
    function cm.spfilter(c,e,tp)
    return c:IsSetCard(0xc19) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function cm.rptg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
    Duel.SetOperationInfo(0,CATEGORY_DESTROY,e:GetHandler(),1,0,0)
    end
    function cm.rpop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) and Duel.Destroy(c,REASON_EFFECT)>0 then
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
    if g:GetCount()>0 then
    Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
    end
    end
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():IsReleasable() end
    Duel.Release(e:GetHandler(),REASON_COST)
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return true end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CARDTYPE)
    e:SetLabel(Duel.AnnounceType(tp))
    end
    function cm.operation(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
    e1:SetCode(EFFECT_CANNOT_ACTIVATE)
    e1:SetTargetRange(0,1)
    if e:GetLabel()==0 then
    e1:SetDescription(aux.Stringid(m,2))
    e1:SetValue(cm.aclimit1)
    elseif e:GetLabel()==1 then
    e1:SetDescription(aux.Stringid(m,3))
    e1:SetValue(cm.aclimit2)
    else
    e1:SetDescription(aux.Stringid(m,4))
    e1:SetValue(cm.aclimit3)
    end
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
    Duel.RegisterEffect(e1,tp)
    end
    function cm.aclimit1(e,re,tp)
    local rc=re:GetHandler()
    return rc:IsLocation(LOCATION_HAND) and re:IsActiveType(TYPE_MONSTER)
    end
    function cm.aclimit2(e,re,tp)
    local rc=re:GetHandler()
    return rc:IsLocation(LOCATION_HAND) and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL)
    end
    function cm.aclimit3(e,re,tp)
    local rc=re:GetHandler()
    return rc:IsLocation(LOCATION_HAND) and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_TRAP)
    end
    expansions/script/c183060.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L Army Space Fleet
    local m=183060
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    c:EnableReviveLimit()
    --special summon
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetCode(EFFECT_SPSUMMON_PROC)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
    e1:SetCost(cm.spcost)
    e1:SetCondition(cm.spcon)
    e1:SetTarget(cm.sptg)
    e1:SetOperation(cm.spop)
    c:RegisterEffect(e1)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    --actlimit
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e2:SetCode(EFFECT_CANNOT_ACTIVATE)
    e2:SetRange(LOCATION_MZONE)
    e2:SetTargetRange(0,1)
    e2:SetValue(1)
    e2:SetCondition(cm.actcon)
    c:RegisterEffect(e2)
    --ATK
    local e3=Effect.CreateEffect(c)
    e3:SetDescription(aux.Stringid(m,1))
    e3:SetCategory(CATEGORY_ATKCHANGE)
    e3:SetType(EFFECT_TYPE_QUICK_O)
    e3:SetCode(EVENT_FREE_CHAIN)
    e3:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
    e3:SetRange(LOCATION_MZONE)
    e3:SetCountLimit(1,m)
    e3:SetCondition(cm.atkcon)
    e3:SetTarget(cm.atktg)
    e3:SetOperation(cm.atkop)
    c:RegisterEffect(e3)
    --immune
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e5:SetRange(LOCATION_MZONE)
    e5:SetCode(EFFECT_IMMUNE_EFFECT)
    e5:SetValue(cm.efilter1)
    c:RegisterEffect(e5)
    --immune
    local e6=Effect.CreateEffect(c)
    e6:SetType(EFFECT_TYPE_SINGLE)
    e6:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e6:SetRange(LOCATION_MZONE)
    e6:SetCode(EFFECT_IMMUNE_EFFECT)
    e6:SetValue(cm.efilter2)
    c:RegisterEffect(e6)
    end
    cm.spchecks=aux.CreateChecks(Card.IsType,{TYPE_RITUAL,TYPE_FUSION,TYPE_SYNCHRO,TYPE_XYZ,TYPE_PENDULUM,TYPE_LINK})
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
    e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e1:SetReset(RESET_PHASE+PHASE_END)
    e1:SetTargetRange(1,0)
    e1:SetTarget(cm.splimit)
    Duel.RegisterEffect(e1,tp)
    end
    function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
    return not c:IsSetCard(0xc19)
    end
    function cm.spcostfilter(c)
    return c:IsFaceup() and c:IsAbleToDeckOrExtraAsCost() and c:IsType(TYPE_RITUAL+TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ+TYPE_PENDULUM+TYPE_LINK) and c:IsSetCard(0xc19) and c:IsType(TYPE_MONSTER)
    end
    function cm.spcon(e,c)
    if c==nil then return true end
    local tp=c:GetControler()
    local g=Duel.GetMatchingGroup(cm.spcostfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED,0,nil)
    return g:CheckSubGroupEach(cm.spchecks,aux.mzctcheck,tp)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,c)
    local g=Duel.GetMatchingGroup(cm.spcostfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED,0,nil)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local sg=g:SelectSubGroupEach(tp,cm.spchecks,true,aux.mzctcheck,tp)
    if sg then
    sg:KeepAlive()
    e:SetLabelObject(sg)
    return true
    else return false end
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp,c)
    local g=e:GetLabelObject()
    Duel.SendtoDeck(g,nil,2,REASON_COST)
    end
    function cm.actcon(e)
    return Duel.GetAttacker()==e:GetHandler() or Duel.GetAttackTarget()==e:GetHandler()
    end
    function cm.efilter1(e,te)
    return (te:GetHandler():GetType()&TYPE_RITUAL~=0 or te:GetHandler():GetType()&TYPE_FUSION~=0 or te:GetHandler():GetType()&TYPE_SYNCHRO~=0 or te:GetHandler():GetType()&TYPE_XYZ~=0 or te:GetHandler():GetType()&TYPE_PENDULUM~=0 or te:GetHandler():GetType()&TYPE_LINK~=0) and te:GetOwner()~=e:GetOwner()
    end
    function cm.efilter2(e,te)
    return te:IsActiveType(TYPE_SPELL+TYPE_TRAP)
    end
    function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
    end
    function cm.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED,e:GetHandler()):GetSum(Card.GetAttack)>0 end
    end
    function cm.filter1(c)
    return c:IsType(TYPE_XYZ) and c:GetOverlayCount()>0
    end
    function cm.filter2(c)
    return c:IsType(TYPE_MONSTER) and c:IsAttackAbove(0)
    end
    function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsFaceup() and c:IsRelateToEffect(e) then
    local atk1=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED,c):GetSum(Card.GetAttack)
    local g2=Duel.GetMatchingGroup(cm.filter1,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
    local atk2=0
    if g2:GetCount()>0 then
    local tc2=g2:GetFirst()
    while tc2 do
    local cg=tc2:GetOverlayGroup()
    local sg=cg:Filter( cm.filter2,nil)
    if sg:GetCount()>0 then
    local tc3=sg:GetFirst()
    while tc3 do
    atk2=atk2+tc3:GetAttack()
    tc3=sg:GetNext()
    end
    end
    tc2=g2:GetNext()
    end
    end
    local atk=atk1+atk2
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_UPDATE_ATTACK)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    e1:SetValue(atk)
    c:RegisterEffect(e1)
    end
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_FIELD)
    e0:SetCode(EFFECT_CANNOT_ATTACK_ANNOUNCE)
    e0:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
    e0:SetTargetRange(LOCATION_MZONE,0)
    e0:SetTarget(cm.ftarget)
    e0:SetLabel(c:GetFieldID())
    e0:SetReset(RESET_PHASE+PHASE_END)
    Duel.RegisterEffect(e0,tp)
    end
    function cm.ftarget(e,c)
    return e:GetLabel()~=c:GetFieldID()
    end
    expansions/script/c183085.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Imperial Chief
    local m=183085
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    aux.EnablePendulumAttribute(c)
    c:EnableReviveLimit()
    --ev
    KanKan.MALritual(c,m,cm.descon)
    KanKan.MALSZSpm(c,m,183085)
    KanKan.MALeffectgain(c,m,cm.effop)
    --to hand
    local e0=Effect.CreateEffect(c)
    e0:SetDescription(aux.Stringid(m,0))
    e0:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH+CATEGORY_GRAVE_ACTION)
    e0:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e0:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
    e0:SetRange(LOCATION_PZONE)
    e0:SetCountLimit(1,m+1)
    e0:SetTarget(cm.thtg)
    e0:SetOperation(cm.thop)
    c:RegisterEffect(e0)
    end
    function cm.filter(c)
    return c:IsSetCard(0xc19) and c:IsDiscardable(REASON_DISCARD)
    end
    function cm.descon(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetTurnPlayer()~=tp then return false end
    local loc=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION)
    local ph=Duel.GetCurrentPhase()
    return rp~=tp and Duel.IsChainDisablable(ev) and re:IsActiveType(TYPE_MONSTER) and loc==LOCATION_GRAVE+LOCATION_REMOVED
    and Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_HAND,0,1,nil) and not (ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE)
    end
    function cm.effop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local rc=c:GetReasonCard()
    --
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetDescription(aux.Stringid(m,4))
    e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
    e1:SetCode(EFFECT_CANNOT_REMOVE)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCondition(cm.reascon)
    e1:SetReset(RESET_EVENT+RESETS_REDIRECT)
    rc:RegisterEffect(e1,true)
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetDescription(aux.Stringid(m,4))
    e2:SetCode(EFFECT_CANNOT_ACTIVATE)
    e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
    e2:SetRange(LOCATION_MZONE)
    e2:SetTargetRange(1,1)
    e2:SetCondition(function (e,rc)
    return Duel.IsExistingMatchingCard(function (c)
    return c:IsFaceup() and c==e:GetHandler()
    end,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
    end)
    e2:SetValue(cm.limval)
    e2:SetReset(RESET_EVENT+RESETS_REDIRECT)
    rc:RegisterEffect(e2,true)
    local e4=Effect.CreateEffect(c)
    e4:SetDescription(aux.Stringid(m,4))
    e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e4:SetCode(EFFECT_DESTROY_REPLACE)
    e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CLIENT_HINT+EFFECT_FLAG_CANNOT_DISABLE)
    e4:SetRange(LOCATION_MZONE)
    e4:SetTarget(cm.reptg)
    e4:SetReset(RESET_EVENT+RESETS_REDIRECT)
    rc:RegisterEffect(e4,true)
    if not Auxiliary.HackIsAbleToGrave then
    Auxiliary.HackIsAbleToGrave=true
    HackIsAbleToGrave=Card.IsAbleToGrave
    HackIsAbleToGraveAsCost=Card.IsAbleToGraveAsCost
    function Card.IsAbleToGrave(c)
    if rc:IsFaceup() then
    return false
    end
    end
    function Card.IsAbleToGraveAsCost(c)
    if rc:IsFaceup() then
    return false
    end
    end
    end
    if not rc:IsType(TYPE_EFFECT) then
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_ADD_TYPE)
    e3:SetValue(TYPE_EFFECT)
    e3:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e3,true)
    end
    rc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,4))
    end
    function cm.reascon(e,tp,eg,ep,ev,re,r,rp)
    return not (r==REASON_SYNCHRO or r==REASON_FUSION or r==REASON_LINK or r==REASON_XYZ)
    end
    function cm.limval(e,te)
    local ex=Duel.GetOperationInfo(ev,CATEGORY_TOGRAVE)
    return te:IsHasCategory(CATEGORY_TOGRAVE) or ex
    or te:IsHasCategory(CATEGORY_DECKDES)
    or te:IsHasCategory(CATEGORY_HANDES)
    end
    function cm.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return c:IsReason(REASON_BATTLE+REASON_EFFECT) and not c:IsReason(REASON_REPLACE) end
    Duel.SendtoDeck(c,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    function cm.thfilter(c)
    return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_SPELL) and c:IsAbleToHand()
    end
    function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) and e:GetHandler():IsAbleToHand() end
    Duel.SetOperationInfo(0,CATEGORY_TOHAND,e:GetHandler(),1,0,0)
    end
    function cm.thop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
    local tc=g:GetFirst()
    if tc and Duel.SendtoHand(tc,nil,REASON_EFFECT)~=0 and tc:IsLocation(LOCATION_HAND) then
    Duel.ConfirmCards(1-tp,tc)
    if c:IsRelateToEffect(e) then
    Duel.BreakEffect()
    Duel.SendtoHand(c,nil,REASON_EFFECT)
    end
    end
    end
    expansions/script/c183090.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Orion
    local m=183090
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    c:EnableReviveLimit()
    --ev
    KanKan.MALritual(c,m,cm.descon)
    --atkup
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetCategory(CATEGORY_ATKCHANGE)
    e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e2:SetCode(EVENT_SPSUMMON_SUCCESS)
    e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
    e2:SetCountLimit(1,m+1)
    e2:SetCondition(cm.atkcon)
    e2:SetTarget(cm.atktg)
    e2:SetOperation(cm.atkop)
    c:RegisterEffect(e2)
    end
    function cm.filter(c)
    return c:IsSetCard(0xc19) and c:IsDiscardable(REASON_DISCARD)
    end
    function cm.descon(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetTurnPlayer()~=tp then return false end
    local loc=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION)
    local ph=Duel.GetCurrentPhase()
    return rp~=tp and Duel.IsChainDisablable(ev) and re:IsActiveType(TYPE_MONSTER) and loc==LOCATION_HAND and Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_HAND,0,1,nil) and not (ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE)
    end
    function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_RITUAL)
    end
    function cm.atktgfilter1(c,tp)
    return c:IsFaceup() and Duel.IsExistingTarget(cm.atktgfilter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,c)
    end
    function cm.atktgfilter2(c)
    return c:IsFaceup()
    end
    function cm.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return false end
    if chk==0 then return Duel.IsExistingTarget(cm.atktgfilter1,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
    local g=Duel.SelectTarget(tp,cm.atktgfilter1,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
    Duel.SelectTarget(tp,cm.atktgfilter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,g)
    end
    function cm.atkfilter(c,e)
    return c:IsRelateToEffect(e) and c:IsFaceup()
    end
    function cm.atkupfilter(c,g)
    return g:FilterCount(cm.atktgfilter2,c)>0
    end
    function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
    local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(cm.atkfilter,nil,e)
    if #g==2 then
    Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,2))
    local hc=g:FilterSelect(tp,cm.atkupfilter,1,1,nil,g):GetFirst()
    if not hc then return end
    local tc=g:Filter(aux.TRUE,hc):GetFirst()
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_UPDATE_ATTACK)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    e1:SetValue(tc:GetAttack())
    hc:RegisterEffect(e1)
    end
    end
    expansions/script/c183095.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Command Chief
    local m=183095
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    c:EnableReviveLimit()
    --ev
    KanKan.MALritual(c,m,cm.descon)
    --to hand
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetCategory(CATEGORY_TOHAND)
    e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e2:SetCode(EVENT_SPSUMMON_SUCCESS)
    e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
    e2:SetCountLimit(1,m+1)
    e2:SetCondition(cm.thcon)
    e2:SetTarget(cm.thtg)
    e2:SetOperation(cm.thop)
    c:RegisterEffect(e2)
    end
    function cm.filter(c)
    return c:IsSetCard(0xc19) and c:IsDiscardable(REASON_DISCARD)
    end
    function cm.descon(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetTurnPlayer()~=tp then return false end
    local ph=Duel.GetCurrentPhase()
    return rp~=tp and Duel.IsChainDisablable(ev) and re:IsActiveType(TYPE_SPELL+TYPE_TRAP) and Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_HAND,0,1,nil) and not (ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE)
    end
    function cm.thfilter1(c,lv)
    return c:IsType(TYPE_MONSTER) and c:IsAbleToHand() and c:IsLevelAbove(1)
    end
    function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_RITUAL)
    end
    function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    local c=e:GetHandler()
    local lv=c:GetLevel()
    if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and cm.thfilter1(chkc,lv) end
    if chk==0 then return c:IsLevelAbove(1) and c:IsRelateToEffect(e)
    and Duel.IsExistingTarget(cm.thfilter1,tp,LOCATION_GRAVE,0,1,nil,lv) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectTarget(tp,cm.thfilter1,tp,LOCATION_GRAVE,0,1,1,nil,lv)
    Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
    end
    function cm.thop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local tc=Duel.GetFirstTarget()
    if c:IsFaceup() and c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) then
    local lv=tc:GetLevel()
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_CHANGE_LEVEL)
    e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e1:SetRange(LOCATION_MZONE)
    e1:SetValue(lv)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    c:RegisterEffect(e1)
    Duel.BreakEffect()
    Duel.SendtoHand(tc,nil,REASON_EFFECT)
    end
    end
    expansions/script/c183100.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Ground Roar
    local m=183100
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --fusion material
    c:EnableReviveLimit()
    aux.AddFusionProcFunRep(c,cm.ffilter,2,true)
    --spsummon
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.cost)
    e1:SetCondition(cm.spcon)
    e1:SetTarget(cm.sptg)
    e1:SetOperation(cm.spop)
    c:RegisterEffect(e1)
    --to extra
    local e2=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,1))
    e2:SetCategory(CATEGORY_TOEXTRA)
    e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
    e2:SetProperty(EFFECT_FLAG_DELAY)
    e2:SetCode(EVENT_DESTROYED)
    e2:SetCondition(cm.tecon)
    e2:SetTarget(cm.tetg)
    e2:SetOperation(cm.teop)
    c:RegisterEffect(e2)
    end
    function cm.ffilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return true end
    Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
    end
    function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION)
    end
    function cm.spfilter(c,e,tp)
    return c:IsSetCard(0xc19) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
    if g:GetCount()>0 then
    Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
    end
    end
    function cm.tecon(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return c:IsReason(REASON_EFFECT+REASON_BATTLE) and c:IsPreviousLocation(LOCATION_ONFIELD)
    end
    function cm.tetg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return true end
    Duel.SetOperationInfo(0,CATEGORY_TOEXTRA,e:GetHandler(),1,0,0)
    end
    function cm.teop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) then
    Duel.SendtoDeck(c,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    end
    expansions/script/c183105.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Enfocer
    local m=183105
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    c:EnableReviveLimit()
    aux.AddFusionProcFun2(c,cm.matfilter1,cm.matfilter2,true)
    --cannot be target
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_FIELD)
    e0:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
    e0:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_SET_AVAILABLE)
    e0:SetRange(LOCATION_MZONE)
    e0:SetTargetRange(LOCATION_MZONE,0)
    e0:SetCondition(cm.imcon)
    e0:SetTarget(cm.imval)
    e0:SetValue(cm.imfilter)
    c:RegisterEffect(e0)
    --position
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetCode(EFFECT_SET_POSITION)
    e1:SetRange(LOCATION_MZONE)
    e1:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
    e1:SetValue(POS_FACEUP_ATTACK)
    c:RegisterEffect(e1)
    --immune
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e2:SetCode(EFFECT_IMMUNE_EFFECT)
    e2:SetRange(LOCATION_MZONE)
    e2:SetValue(cm.immval)
    c:RegisterEffect(e2)
    --atk
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_MATERIAL_CHECK)
    e3:SetValue(cm.valcheck)
    c:RegisterEffect(e3)
    local e4=Effect.CreateEffect(c)
    e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e4:SetCode(EVENT_SPSUMMON_SUCCESS)
    e4:SetCondition(cm.atkcon)
    e4:SetOperation(cm.atkop)
    e4:SetLabelObject(e3)
    c:RegisterEffect(e4)
    end
    function cm.matfilter1(c)
    return c:IsFusionSetCard(0xc19) and c:IsType(TYPE_FUSION)
    end
    function cm.matfilter2(c)
    return c:IsRace(RACE_MACHINE)
    end
    function cm.imcon(e)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION)
    end
    function cm.imval(e,c)
    return c~=e:GetHandler()
    end
    function cm.imfilter(e,re,rp)
    return aux.tgoval(e,re,rp) and re:IsActiveType(TYPE_MONSTER)
    end
    function cm.immval(e,re)
    local rc=re:GetHandler()
    return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and re:GetActivateLocation()==LOCATION_MZONE
    and (rc:IsRelateToEffect(re) and rc:IsAttackPos() or not rc:IsRelateToEffect(re) and rc:IsPreviousPosition(POS_ATTACK))
    end
    function cm.valcheck(e,c)
    local g=c:GetMaterial()
    local atk=0
    local tc=g:GetFirst()
    while tc do
    local lk
    if tc:IsLevelAbove(1) then lk=tc:GetLevel()
    elseif tc:IsRankAbove(1) then lk=tc:GetRank()
    elseif tc:IsLinkAbove(1) then lk=tc:GetLink()
    end
    atk=atk+lk
    tc=g:GetNext()
    end
    e:SetLabel(atk)
    end
    function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION)
    end
    function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local atk=e:GetLabelObject():GetLabel()*300
    if atk>0 then
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_UPDATE_ATTACK)
    e1:SetValue(atk)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    c:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EFFECT_UPDATE_DEFENSE)
    c:RegisterEffect(e2)
    end
    end
    expansions/script/c183110.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Hydra
    local m=183110
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --fusion material
    c:EnableReviveLimit()
    aux.AddFusionProcFunRep(c,cm.ffilter,2,true)
    --spsummon
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.cost)
    e1:SetCondition(cm.thcon)
    e1:SetTarget(cm.thtg)
    e1:SetOperation(cm.thop)
    c:RegisterEffect(e1)
    KanKan.MALeffectgain(c,m,cm.effop)
    end
    function cm.ffilter(c)
    return c:IsSetCard(0xc19) and c:IsType(TYPE_LINK)
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return true end
    Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
    end
    function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION)
    end
    function cm.thfilter1(c)
    return c:GetType()==TYPE_SPELL and c:IsAbleToHand() and c:IsSetCard(0xc19)
    end
    function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter1,tp,LOCATION_DECK,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
    end
    function cm.thop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectMatchingCard(tp,cm.thfilter1,tp,LOCATION_DECK,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.SendtoHand(g,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,g)
    end
    end
    function cm.effop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local rc=c:GetReasonCard()
    --
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,1))
    e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
    e1:SetValue(aux.tgoval)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e1,true)
    if not rc:IsType(TYPE_EFFECT) then
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_ADD_TYPE)
    e2:SetValue(TYPE_EFFECT)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e2,true)
    end
    rc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,1))
    end
    expansions/script/c183115.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Cheiron
    local m=183115
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --fusion material
    aux.AddFusionProcFunFunRep(c,aux.FilterBoolFunction(Card.IsSetCard,0xc19),aux.FilterBoolFunction(Card.IsRace,RACE_MACHINE),1,99,true,true)
    c:EnableReviveLimit()
    aux.EnablePendulumAttribute(c,false)
    KanKan.MALeffectgain(c,m,cm.effop)
    KanKan.MALPleave(c,m)
    --pendulum set
    local e0=Effect.CreateEffect(c)
    e0:SetDescription(aux.Stringid(m,0))
    e0:SetType(EFFECT_TYPE_IGNITION)
    e0:SetRange(LOCATION_PZONE)
    e0:SetCountLimit(1,m+1)
    e0:SetTarget(cm.pctg)
    e0:SetOperation(cm.pcop)
    c:RegisterEffect(e0)
    --search
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.cost1)
    e1:SetCondition(cm.spcon1)
    e1:SetTarget(cm.sptg)
    e1:SetOperation(cm.spop)
    c:RegisterEffect(e1)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    --destroy
    local e3=Effect.CreateEffect(c)
    e3:SetDescription(aux.Stringid(m,2))
    e3:SetCategory(CATEGORY_DESTROY)
    e3:SetType(EFFECT_TYPE_IGNITION)
    e3:SetRange(LOCATION_MZONE)
    e3:SetCountLimit(1,m+3)
    e3:SetTarget(cm.tgtg)
    e3:SetOperation(cm.tgop)
    c:RegisterEffect(e3)
    end
    function cm.pcfilter(c,tp)
    return c:IsFaceup() and c:IsType(TYPE_PENDULUM) and not c:IsForbidden() and c:CheckUniqueOnField(tp,LOCATION_SZONE)
    end
    function cm.pctg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1))
    and Duel.IsExistingMatchingCard(cm.pcfilter,tp,LOCATION_EXTRA,0,1,nil,tp) end
    end
    function cm.pcop(e,tp,eg,ep,ev,re,r,rp)
    if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
    local g=Duel.SelectMatchingCard(tp,cm.pcfilter,tp,LOCATION_EXTRA,0,1,1,nil,tp)
    if g:GetCount()>0 then
    Duel.MoveToField(g:GetFirst(),tp,tp,LOCATION_PZONE,POS_FACEUP,true)
    end
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    KanKan.MALcanntspm(e:GetHandler())
    end
    function cm.spcon1(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION)
    end
    function cm.spfilter1(c)
    return c:IsCode(183530) and c:IsSSetable()
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
    and Duel.IsExistingMatchingCard(cm.spfilter1,tp,LOCATION_DECK,0,1,nil) end
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
    local g=Duel.SelectMatchingCard(tp,cm.spfilter1,tp,LOCATION_DECK,0,1,1,nil)
    if #g>0 then
    Duel.SSet(tp,g)
    end
    end
    function cm.desfilter(c)
    return c:IsType(TYPE_SPELL+TYPE_TRAP+TYPE_MONSTER)
    end
    function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsOnField() and cm.desfilter(chkc) end
    if chk==0 then return Duel.IsExistingTarget(cm.desfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
    local ct=e:GetHandler():GetMaterialCount()
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
    local g=Duel.SelectTarget(tp,cm.desfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,ct,nil)
    Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
    end
    function cm.tgop(e,tp,eg,ep,ev,re,r,rp)
    local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
    Duel.Destroy(g,REASON_EFFECT)
    end
    function cm.effop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local rc=c:GetReasonCard()
    --
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetDescription(aux.Stringid(m,1))
    e1:SetProperty(EFFECT_FLAG_CLIENT_HINT+EFFECT_FLAG_PLAYER_TARGET)
    e1:SetCode(EFFECT_CANNOT_TO_DECK)
    e1:SetTargetRange(1,0)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e1,true)
    if not rc:IsType(TYPE_EFFECT) then
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_ADD_TYPE)
    e2:SetValue(TYPE_EFFECT)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e2,true)
    end
    rc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,1))
    end
    expansions/script/c183120.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L 【Centaur】
    local m=183120
    local cm=_G["c"..m]
    cm.dfc_front_side=183120
    cm.dfc_back_side=183445
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --link summon
    aux.AddLinkProcedure(c,nil,2,99,cm.lcheck)
    c:EnableReviveLimit()
    c:SetUniqueOnField(1,0,m)
    --special summon
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,1))
    e1:SetCategory(CATEGORY_ATKCHANGE)
    e1:SetType(EFFECT_TYPE_IGNITION)
    e1:SetCountLimit(99)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCost(cm.spcost)
    e1:SetOperation(cm.spop)
    c:RegisterEffect(e1)
    --selfdes(Excessive idling)
    local e7=Effect.CreateEffect(c)
    e7:SetType(EFFECT_TYPE_SINGLE)
    e7:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e7:SetRange(LOCATION_MZONE)
    e7:SetCode(EFFECT_SELF_DESTROY)
    e7:SetCondition(cm.descon1)
    c:RegisterEffect(e7)
    --atkdown
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,3))
    e2:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_REMOVE)
    e2:SetType(EFFECT_TYPE_IGNITION)
    e2:SetCountLimit(1,m+1)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCost(cm.atkcost)
    e2:SetCondition(cm.atkcon)
    e2:SetOperation(cm.atkop)
    c:RegisterEffect(e2)
    end
    function cm.lcheck(g,lc)
    return g:IsExists(cm.lkfilter1,1,nil)
    end
    function cm.lkfilter1(c)
    return c:IsLinkType(TYPE_FUSION) and c:IsSetCard(0xc19)
    end
    function cm.costfilter(c)
    return c:IsDiscardable()
    end
    function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.costfilter,tp,LOCATION_HAND,0,1,nil) end
    local g1=Duel.SelectMatchingCard(tp,cm.costfilter,tp,LOCATION_HAND,0,0,99,nil)
    if Duel.SendtoGrave(g1,REASON_COST+REASON_DISCARD)~=0 then
    local gc=g1:GetCount()
    e:SetLabel(gc)
    end
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsFaceup() and c:IsRelateToEffect(e) then
    local gc=e:GetLabel()
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_SET_BASE_ATTACK)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    e1:SetValue(gc*2000)
    c:RegisterEffect(e1)
    end
    Duel.BreakEffect()
    if c:GetFlagEffect(m)>=3 then
    Duel.Hint(24,0,aux.Stringid(m,11))
    Duel.Hint(24,0,aux.Stringid(m,11))
    Duel.Hint(24,0,aux.Stringid(m,11))
    end
    Duel.BreakEffect()
    if c:IsAttackAbove(6000) then
    c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5))
    end
    end
    function cm.descon1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return c:GetFlagEffect(m)>=4
    end
    function cm.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return true end
    c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
    end
    function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():GetBaseAttack()>=4000
    end
    function cm.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(nil,tp,0,LOCATION_MZONE,1,nil) end
    end
    ---
    ---
    ---
    function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
    local g11=Duel.SelectMatchingCard(tp,nil,tp,0,LOCATION_MZONE,1,1,nil)
    local tc=g11:GetFirst()
    local atk1=tc:GetAttack()
    local atkac=c:GetBaseAttack()
    local atkwtf=math.floor(((c:GetAttack()-6000)/1000)/2)
    local atkmax=atkwtf*10
    if tc then
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_UPDATE_ATTACK)
    e2:SetValue(-atkac)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e2)
    Duel.BreakEffect()
    if tc:IsAttack(0) then
    Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
    if c:GetAttack()<6000 and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
    Duel.BreakEffect()
    Duel.Hint(24,0,aux.Stringid(m,13))
    Duel.BreakEffect()
    Duel.Hint(24,0,aux.Stringid(m,14))
    local tcode=c.dfc_back_side
    c:SetEntityCode(tcode,true)
    c:ReplaceEffect(tcode,0,0)
    Duel.Hint(HINT_CARD,1,183445)
    end
    elseif tc:IsAttack(atk1) then
    Duel.Remove(tc,POS_FACEDOWN,REASON_RULE)
    if c:GetAttack()<6000 and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
    Duel.BreakEffect()
    Duel.Hint(24,0,aux.Stringid(m,13))
    Duel.BreakEffect()
    Duel.Hint(24,0,aux.Stringid(m,14))
    local tcode=c.dfc_back_side
    c:SetEntityCode(tcode,true)
    c:ReplaceEffect(tcode,0,0)
    Duel.Hint(HINT_CARD,1,183445)
    end
    end
    if c:GetAttack()>=6000 then
    if tc:IsAttack(0) then
    Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
    if not KanKan.resultnumber then
    local result=0
    local g=Duel.GetFieldGroup(0,0xff,0xff):RandomSelect(0,8)
    local ct={}
    local c=g:GetFirst()
    for i=0,7 do
    ct[c]=i
    c=g:GetNext()
    end
    for i=0,10 do
    result=result+(ct[g:RandomSelect(2,1):GetFirst()]<<(3*i))
    end
    g:DeleteGroup()
    KanKan.resultnumber=result&0xffffffff
    end
    local dice1=KanKan.odds(1,10)
    e:GetHandler():SetTurnCounter(dice1)
    local dice2=KanKan.odds(1,10)
    e:GetHandler():SetTurnCounter(dice2)
    local c=e:GetHandler()
    if c:IsFaceup() and c:IsRelateToEffect(e) then
    if dice1==10 and dice2~=10 then dice1=0 end
    if dice1~=10 and dice2==10 then dice2=0 end
    local x=(dice1*10)+dice2
    if dice1==10 and dice2==10 then x=100 end
    if x>50-atkmax then
    Duel.Hint(24,0,aux.Stringid(m,12))
    Duel.Hint(24,0,aux.Stringid(m,12))
    Duel.Hint(24,0,aux.Stringid(m,12))
    Duel.BreakEffect()
    Duel.SendtoGrave(c,REASON_RULE)
    else
    if Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
    Duel.BreakEffect()
    Duel.Hint(24,0,aux.Stringid(m,13))
    Duel.BreakEffect()
    Duel.Hint(24,0,aux.Stringid(m,14))
    local tcode=c.dfc_back_side
    c:SetEntityCode(tcode,true)
    c:ReplaceEffect(tcode,0,0)
    Duel.Hint(HINT_CARD,1,183445)
    end
    end
    end--(结算完毕开始骰)
    elseif tc:IsAttack(atk1) then
    Duel.Remove(tc,POS_FACEDOWN,REASON_RULE)
    if not KanKan.resultnumber then
    local result=0
    local g=Duel.GetFieldGroup(0,0xff,0xff):RandomSelect(0,8)
    local ct={}
    local c=g:GetFirst()
    for i=0,7 do
    ct[c]=i
    c=g:GetNext()
    end
    for i=0,10 do
    result=result+(ct[g:RandomSelect(2,1):GetFirst()]<<(3*i))
    end
    g:DeleteGroup()
    KanKan.resultnumber=result&0xffffffff
    end
    local dice1=KanKan.odds(1,10)
    e:GetHandler():SetTurnCounter(dice1)
    local dice2=KanKan.odds(1,10)
    e:GetHandler():SetTurnCounter(dice2)
    local c=e:GetHandler()
    if c:IsFaceup() and c:IsRelateToEffect(e) then
    if dice1==10 and dice2~=10 then dice1=0 end
    if dice1~=10 and dice2==10 then dice2=0 end
    local x=(dice1*10)+dice2
    if dice1==10 and dice2==10 then x=100 end
    if x>50-atkmax then
    Duel.Hint(24,0,aux.Stringid(m,12))
    Duel.Hint(24,0,aux.Stringid(m,12))
    Duel.Hint(24,0,aux.Stringid(m,12))
    Duel.BreakEffect()
    Duel.SendtoGrave(c,REASON_RULE)
    else
    if Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
    Duel.BreakEffect()
    Duel.Hint(24,0,aux.Stringid(m,13))
    Duel.BreakEffect()
    Duel.Hint(24,0,aux.Stringid(m,14))
    local tcode=c.dfc_back_side
    c:SetEntityCode(tcode,true)
    c:ReplaceEffect(tcode,0,0)
    Duel.Hint(HINT_CARD,1,183445)
    end
    end
    end--(结算完毕开始骰)
    end--(2种除外的结算)
    end--
    end
    end
    function cm.efilter(e,te)
    return te:GetOwner()~=e:GetOwner()
    end
    expansions/script/c183125.lua deleted 100644 → 0
    View file @ f4a33404
    --M——A——L
    local m=183125
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --fusion material
    c:EnableReviveLimit()
    aux.AddFusionProcCode2FunRep(c,183215,183345,aux.FilterBoolFunction(Card.IsRace,RACE_MACHINE),1,99,true,true)
    aux.AddContactFusionProcedure(c,Card.IsReleasable,LOCATION_MZONE,0,Duel.Release,REASON_COST+REASON_MATERIAL+REASON_FUSION)
    --immune
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_SINGLE)
    e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e0:SetRange(LOCATION_MZONE)
    e0:SetCode(EFFECT_IMMUNE_EFFECT)
    e0:SetValue(cm.efilter)
    c:RegisterEffect(e0)
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
    e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
    e1:SetCode(EVENT_ADJUST)
    e1:SetRange(LOCATION_MZONE)
    e1:SetOperation(cm.adjustop)
    c:RegisterEffect(e1)
    KanKan.MAL(c)
    --disable field
    local e9=Effect.CreateEffect(c)
    e9:SetType(EFFECT_TYPE_FIELD)
    e9:SetCode(EFFECT_DISABLE_FIELD)
    e9:SetRange(LOCATION_MZONE)
    e9:SetValue(cm.disval)
    c:RegisterEffect(e9)
    --multi
    local e10=Effect.CreateEffect(c)
    e10:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e10:SetCode(EVENT_SPSUMMON_SUCCESS)
    e10:SetOperation(cm.atk)
    c:RegisterEffect(e10)
    local e11=Effect.CreateEffect(c)
    e11:SetType(EFFECT_TYPE_SINGLE)
    e11:SetCode(EFFECT_CANNOT_DISABLE_SPSUMMON)
    e11:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    c:RegisterEffect(e11)
    end
    function cm.efilter(e,te)
    local tc=te:GetHandler()
    local c=e:GetHandler()
    return te:IsActiveType(TYPE_MONSTER) and te:GetOwner()~=e:GetOwner() and (tc:GetAttack()<=c:GetAttack() or tc:GetDefense()<=c:GetDefense())
    end
    function cm.adjustfilter(c)
    return not c:IsType(TYPE_FIELD)
    end
    function cm.adjustop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local phase=Duel.GetCurrentPhase()
    if (phase==PHASE_DAMAGE and not Duel.IsDamageCalculated()) or phase==PHASE_DAMAGE_CAL then return end
    local g=Duel.GetMatchingGroup(cm.adjustfilter,tp,LOCATION_ONFIELD,0,c)
    if g:GetCount()>0 then
    Duel.SendtoGrave(g,REASON_RULE)
    Duel.Readjust()
    end
    end
    function cm.disval(e)
    local tp=e:GetOwnerPlayer()
    local val1,val2,val3,val4,val5,val6,val7,val8,val9,val10=0,0,0,0,0,0,0,0,0,0
    val1=aux.SequenceToGlobal(tp,LOCATION_MZONE,0)
    val2=aux.SequenceToGlobal(tp,LOCATION_MZONE,1)
    val3=aux.SequenceToGlobal(tp,LOCATION_MZONE,2)
    val4=aux.SequenceToGlobal(tp,LOCATION_MZONE,3)
    val5=aux.SequenceToGlobal(tp,LOCATION_MZONE,4)
    val6=aux.SequenceToGlobal(tp,LOCATION_SZONE,0)
    val7=aux.SequenceToGlobal(tp,LOCATION_SZONE,1)
    val8=aux.SequenceToGlobal(tp,LOCATION_SZONE,2)
    val9=aux.SequenceToGlobal(tp,LOCATION_SZONE,3)
    val10=aux.SequenceToGlobal(tp,LOCATION_SZONE,4)
    return val1|val2|val3|val4|val5|val6|val7|val8|val9|val10
    end
    function cm.atk(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local ct=c:GetMaterialCount()
    --ATK
    local e10=Effect.CreateEffect(c)
    e10:SetDescription(aux.Stringid(m,1))
    e10:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE)
    e10:SetType(EFFECT_TYPE_QUICK_O)
    e10:SetCode(EVENT_FREE_CHAIN)
    e10:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
    e10:SetHintTiming(TIMING_DAMAGE_STEP,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
    e10:SetRange(LOCATION_MZONE)
    e10:SetCountLimit(ct)
    e10:SetOperation(cm.atkop)
    e10:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e10)
    c:SetTurnCounter(ct)
    end
    function cm.filter1(c)
    return c:IsType(TYPE_XYZ) and c:GetOverlayCount()>0
    end
    function cm.filter2(c)
    return c:IsType(TYPE_MONSTER) and (c:IsAttackAbove(0) or c:IsDefenseAbove(0))
    end
    function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local atk1=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_EXTRA,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_EXTRA,nil):GetSum(Card.GetAttack)
    local def1=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_EXTRA,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_EXTRA,nil):GetSum(Card.GetDefense)
    local g2=Duel.GetMatchingGroup(cm.filter1,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
    local atk2=0
    local def2=0
    if g2:GetCount()>0 then
    local tc2=g2:GetFirst()
    while tc2 do
    local cg=tc2:GetOverlayGroup()
    local sg=cg:Filter( cm.filter2,nil)
    if sg:GetCount()>0 then
    local tc3=sg:GetFirst()
    while tc3 do
    atk2=atk2+tc3:GetAttack()
    def2=def2+tc3:GetDefense()
    tc3=sg:GetNext()
    end
    end
    tc2=g2:GetNext()
    end
    end
    local atk=atk1+atk2
    local def=def1+def2
    local catk=c:GetAttack()
    local cdef=c:GetDefense()
    if catk>=1070000000 then
    --attack
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_SET_ATTACK_FINAL)
    e1:SetValue(2147480000)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e1)
    else
    local e4=Effect.CreateEffect(c)
    e4:SetType(EFFECT_TYPE_SINGLE)
    e4:SetCode(EFFECT_UPDATE_ATTACK)
    e4:SetValue(atk)
    e4:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e4)
    end
    if cdef>=1070000000 then
    --
    local e6=Effect.CreateEffect(c)
    e6:SetType(EFFECT_TYPE_SINGLE)
    e6:SetCode(EFFECT_SET_DEFENSE_FINAL)
    e6:SetValue(2147480000)
    e6:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e6)
    else
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetCode(EFFECT_UPDATE_DEFENSE)
    e5:SetValue(def)
    e5:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e5)
    end
    --immune
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_IMMUNE_EFFECT)
    e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e3:SetRange(LOCATION_MZONE)
    e3:SetValue(cm.efilter)
    c:RegisterEffect(e3)
    end
    function cm.efilter(e,te)
    return not te:GetOwner():IsSetCard(0xc19) and
    (te:GetCode()&EFFECT_SET_ATTACK~=0
    or te:GetCode()&EFFECT_SET_ATTACK_FINAL~=0
    or te:GetCode()&EFFECT_SET_BASE_ATTACK~=0
    or te:GetCode()&EFFECT_SET_BASE_ATTACK_FINAL~=0
    or te:GetCode()&EFFECT_SET_BATTLE_ATTACK~=0
    or te:GetCode()&EFFECT_UPDATE_ATTACK~=0
    or te:GetCode()&EFFECT_SET_DEFENSE~=0
    or te:GetCode()&EFFECT_SET_DEFENSE_FINAL~=0
    or te:GetCode()&EFFECT_SET_BASE_DEFENSE~=0
    or te:GetCode()&EFFECT_SET_BASE_DEFENSE_FINAL~=0
    or te:GetCode()&EFFECT_SET_BATTLE_DEFENSE~=0
    or te:GetCode()&EFFECT_UPDATE_DEFENSE~=0)
    end
    expansions/script/c183200.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Surveillance Crawler
    local m=183200
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --synchro summon
    aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0xc19),aux.NonTuner(nil),1,1)
    c:EnableReviveLimit()
    --search
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.cost1)
    e1:SetCondition(cm.spcon1)
    e1:SetTarget(cm.sptg)
    e1:SetOperation(cm.spop)
    c:RegisterEffect(e1)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    KanKan.MALeffectgain(c,m,cm.effop)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    KanKan.MALcanntspm(e:GetHandler())
    end
    function cm.spcon1(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
    end
    function cm.spfilter1(c)
    return c:IsCode(183500) and c:IsSSetable()
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
    and Duel.IsExistingMatchingCard(cm.spfilter1,tp,LOCATION_DECK,0,1,nil) end
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
    local g=Duel.SelectMatchingCard(tp,cm.spfilter1,tp,LOCATION_DECK,0,1,1,nil)
    if #g>0 then
    Duel.SSet(tp,g)
    end
    end
    function cm.effop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local rc=c:GetReasonCard()
    --
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetDescription(aux.Stringid(m,1))
    e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
    e1:SetValue(1)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e1,true)
    if not rc:IsType(TYPE_EFFECT) then
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_ADD_TYPE)
    e2:SetValue(TYPE_EFFECT)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e2,true)
    end
    rc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,1))
    end
    expansions/script/c183205.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Dominant Pillar
    local m=183205
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --synchro summon
    aux.AddSynchroProcedure(c,aux.FilterBoolFunction(cm.sfilter1),aux.NonTuner(nil),1,1)
    c:EnableReviveLimit()
    --negate
    local e0=Effect.CreateEffect(c)
    e0:SetDescription(aux.Stringid(m,0))
    e0:SetCategory(CATEGORY_NEGATE+CATEGORY_TODECK)
    e0:SetType(EFFECT_TYPE_QUICK_O)
    e0:SetCode(EVENT_CHAINING)
    e0:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
    e0:SetCountLimit(1,m)
    e0:SetRange(LOCATION_MZONE)
    e0:SetCost(cm.negcost)
    e0:SetCondition(cm.negcon)
    e0:SetTarget(cm.negtg)
    e0:SetOperation(cm.negop)
    c:RegisterEffect(e0)
    --SpecialSummon
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,1))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
    e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCode(EVENT_TO_GRAVE)
    e1:SetCountLimit(1,m+1)
    e1:SetTarget(cm.sptg)
    e1:SetOperation(cm.spop)
    c:RegisterEffect(e1)
    end
    function cm.sfilter1(c)
    return c:IsSetCard(0xc19) and c:IsType(TYPE_SYNCHRO)
    end
    function cm.negcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return true end
    Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
    end
    function cm.negcon(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if ep==tp or c:IsStatus(STATUS_BATTLE_DESTROYED) then return false end
    return re:IsActiveType(TYPE_MONSTER) and Duel.IsChainNegatable(ev)
    end
    function cm.negtg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return true end
    Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
    if re:GetHandler():IsRelateToEffect(re) then
    Duel.SetOperationInfo(0,CATEGORY_TODECK,eg,1,0,0)
    end
    end
    function cm.negop(e,tp,eg,ep,ev,re,r,rp)
    local ec=re:GetHandler()
    if Duel.NegateActivation(ev) and ec:IsRelateToEffect(re) then
    ec:CancelToGrave()
    if Duel.SendtoDeck(ec,nil,2,REASON_EFFECT)~=0 and ec:IsLocation(LOCATION_DECK) then
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e1:SetCode(EFFECT_CANNOT_ACTIVATE)
    e1:SetTargetRange(0,1)
    e1:SetValue(cm.aclimit)
    e1:SetLabelObject(ec)
    e1:SetReset(RESET_PHASE+PHASE_END,2)
    Duel.RegisterEffect(e1,tp)
    end
    end
    end
    function cm.aclimit(e,re,tp)
    local c=re:GetHandler()
    local ec=e:GetLabelObject()
    return c:IsOriginalCodeRule(ec:GetOriginalCodeRule())
    end
    function cm.filter(c,e,tp,g)
    return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsPreviousLocation(LOCATION_HAND) and c:IsPreviousControler(1-tp) and g:IsContains(c)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_GRAVE) and cm.filter(chkc,e,tp,eg) end
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsExistingTarget(cm.filter,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,nil,e,tp,eg) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectTarget(tp,cm.filter,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,1,nil,e,tp,eg)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    local tc,c=Duel.GetFirstTarget(),e:GetHandler()
    if tc:IsRelateToEffect(e) and Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP) then
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_DISABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e1)
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_DISABLE_EFFECT)
    e2:SetValue(RESET_TURN_SET)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e2)
    end
    Duel.SpecialSummonComplete()
    end
    expansions/script/c183210.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·α·β·γ·Δ
    local m=183210
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    aux.EnablePendulumAttribute(c)
    c:EnableReviveLimit()
    KanKan.MALSynchro(c)
    KanKan.MALPleave(c,code)
    --spsummon
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_IGNITION)
    e1:SetRange(LOCATION_PZONE)
    e1:SetCountLimit(1,m)
    e1:SetTarget(cm.rptg)
    e1:SetOperation(cm.rpop)
    c:RegisterEffect(e1)
    --special summon
    local e5=Effect.CreateEffect(c)
    e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e5:SetRange(LOCATION_PZONE)
    e5:SetCode(EVENT_DESTROYED)
    e5:SetCountLimit(1,m+1)
    e5:SetCondition(cm.spcon)
    e5:SetTarget(cm.sptg)
    e5:SetOperation(cm.spop)
    c:RegisterEffect(e5)
    --disable attack
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e2:SetCode(EVENT_ATTACK_ANNOUNCE)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCountLimit(3,m+2)
    e2:SetCondition(cm.atkcon)
    e2:SetOperation(cm.atkop)
    c:RegisterEffect(e2)
    --atk
    local e3=Effect.CreateEffect(c)
    e3:SetDescription(aux.Stringid(m,2))
    e3:SetCategory(CATEGORY_ATKCHANGE)
    e3:SetType(EFFECT_TYPE_QUICK_O)
    e3:SetCode(EVENT_CHAINING)
    e3:SetRange(LOCATION_MZONE)
    e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e3:SetCountLimit(1,EFFECT_COUNT_CODE_CHAIN)
    e3:SetCondition(cm.atkcon2)
    e3:SetTarget(cm.atktg2)
    e3:SetOperation(cm.atkop2)
    c:RegisterEffect(e3)
    end
    function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetAttacker():IsControler(1-tp)
    end
    function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
    Duel.NegateAttack()
    end
    function cm.atkcon2(e,tp,eg,ep,ev,re,r,rp)
    return ep==1-tp and re:IsActiveType(TYPE_MONSTER) and not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED)
    end
    function cm.atktg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and aux.nzatk(chkc) end
    if chk==0 then return Duel.IsExistingTarget(aux.nzatk,tp,0,LOCATION_MZONE,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
    Duel.SelectTarget(tp,aux.nzatk,tp,0,LOCATION_MZONE,1,1,nil)
    end
    function cm.atkop2(e,tp,eg,ep,ev,re,r,rp)
    local tc=Duel.GetFirstTarget()
    if tc:IsRelateToEffect(e) and tc:IsFaceup() then
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_SET_ATTACK_FINAL)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE,EFFECT_FLAG2_WICKED)
    e1:SetValue(0)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
    tc:RegisterEffect(e1)
    end
    end
    function cm.spfilter(c,e,tp)
    return c:IsSetCard(0xc19) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function cm.rptg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
    Duel.SetOperationInfo(0,CATEGORY_DESTROY,e:GetHandler(),1,0,0)
    end
    function cm.rpop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) and Duel.Destroy(c,REASON_EFFECT)>0 then
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.spfilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp)
    if g:GetCount()>0 then
    Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
    end
    end
    end
    function cm.cfilter(c,tp)
    return c:IsPreviousLocation(LOCATION_MZONE) and c:IsPreviousControler(tp) and c:IsReason(REASON_BATTLE+REASON_EFFECT)
    and c:IsSetCard(0xc19)
    end
    function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
    return eg:IsExists(cm.cfilter,1,nil,tp)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if not c:IsRelateToEffect(e) then return end
    Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
    end
    \ No newline at end of file
    expansions/script/c183215.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Cathode Ray Tube MAX!
    local m=183215
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --synchro summon
    aux.AddSynchroProcedure(c,aux.FilterBoolFunction(cm.sfilter1),aux.NonTuner(nil),1,1)
    c:EnableReviveLimit()
    --act limit
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCondition(cm.regcon)
    e1:SetOperation(cm.regop)
    c:RegisterEffect(e1)
    --avoid damage
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_FIELD)
    e0:SetCode(EFFECT_CHANGE_DAMAGE)
    e0:SetRange(LOCATION_MZONE)
    e0:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e0:SetTargetRange(1,0)
    e0:SetValue(cm.damval)
    c:RegisterEffect(e0)
    KanKan.MALeffectgain(c,m,cm.effop)
    end
    function cm.sfilter1(c)
    return c:IsSetCard(0xc19) and c:IsType(TYPE_SYNCHRO)
    end
    function cm.regcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
    end
    function cm.regop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetCode(EFFECT_IMMUNE_EFFECT)
    e1:SetRange(LOCATION_MZONE)
    e1:SetTargetRange(LOCATION_MZONE,0)
    e1:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0xc19))
    e1:SetCondition(cm.condition)
    e1:SetValue(cm.efilter)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e1)
    end
    function cm.condition(e,tp,eg,ep,ev,re,r,rp)
    local ct=Duel.GetCurrentChain()
    return not ct or ct<3
    end
    function cm.efilter(e,te)
    return e:GetOwnerPlayer()~=te:GetOwnerPlayer() and te:IsActiveType(TYPE_SPELL+TYPE_TRAP)
    end
    function cm.damval(e,re,val,r,rp,rc)
    local atk=e:GetHandler():GetDefense()
    if val<=atk then return 0 else return val end
    end
    function cm.effop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local rc=c:GetReasonCard()
    --
    --avoid damage
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_FIELD)
    e0:SetCode(EFFECT_CHANGE_DAMAGE)
    e0:SetRange(LOCATION_MZONE)
    e0:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e0:SetTargetRange(1,0)
    e0:SetValue(cm.damval2)
    e0:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e0,true)
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetDescription(aux.Stringid(m,1))
    e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
    e1:SetCode(EFFECT_REFLECT_BATTLE_DAMAGE)
    e1:SetValue(1)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e1,true)
    if not rc:IsType(TYPE_EFFECT) then
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_ADD_TYPE)
    e2:SetValue(TYPE_EFFECT)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e2,true)
    end
    rc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,1))
    end
    function cm.damval2(e,re,val,r,rp,rc)
    local atk=e:GetHandler():GetAttack()
    if val<=atk then return 0 else return val end
    end
    expansions/script/c183220.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·MALB
    local m=183220
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    aux.EnablePendulumAttribute(c)
    c:EnableReviveLimit()
    ---
    KanKan.MALSynchro(c,m)
    KanKan.MALeffectgain(c,m,cm.effop)
    KanKan.MALPleave(c,m)
    --special summon
    local e1=Effect.CreateEffect(c)
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
    e1:SetCountLimit(1,m)
    e1:SetCondition(cm.spcon)
    e1:SetCost(cm.spcost)
    e1:SetTarget(cm.sptg)
    e1:SetOperation(cm.spop)
    c:RegisterEffect(e1)
    --set
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,2))
    e2:SetType(EFFECT_TYPE_QUICK_O)
    e2:SetCode(EVENT_FREE_CHAIN)
    e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
    e2:SetCountLimit(1,m+1)
    e2:SetRange(LOCATION_PZONE)
    e2:SetTarget(cm.sttg)
    e2:SetOperation(cm.stop)
    c:RegisterEffect(e2)
    end
    function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
    end
    function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
    e:SetLabel(100)
    if chk==0 then return true end
    end
    function cm.costfilter(c,e,tp)
    return c:IsType(TYPE_SYNCHRO) and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,c:GetLevel(),e:GetHandler(),c:GetCode())
    end
    function cm.spfilter(c,e,tp,lv,ec,code)
    return c:IsLevel(lv) and c:IsType(TYPE_SYNCHRO) and c:IsSetCard(0xc19) and not c:IsCode(code)
    and Duel.GetLocationCountFromEx(tp,tp,ec,c)>0
    and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then
    if e:GetLabel()~=100 then return false end
    e:SetLabel(0)
    return aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL)
    and Duel.CheckReleaseGroup(tp,cm.costfilter,1,nil,e,tp)
    end
    e:SetLabel(0)
    local g=Duel.SelectReleaseGroup(tp,cm.costfilter,1,1,nil,e,tp)
    Duel.Release(g,REASON_COST)
    Duel.SetTargetCard(g)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    local c=e:GetHandler()
    local tc=Duel.GetFirstTarget()
    if not aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL) then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local sc=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,tc:GetLevel(),nil):GetFirst()
    if sc then
    sc:SetMaterial(nil)
    if Duel.SpecialSummon(sc,SUMMON_TYPE_SYNCHRO,tp,tp,false,false,POS_FACEUP)>0 then
    sc:CompleteProcedure()
    end
    end
    end
    function cm.effop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local rc=c:GetReasonCard()
    --
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetDescription(aux.Stringid(m,1))
    e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_PIERCE)
    e1:SetValue(1)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e1,true)
    if not rc:IsType(TYPE_EFFECT) then
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_ADD_TYPE)
    e2:SetValue(TYPE_EFFECT)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e2,true)
    end
    rc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,1))
    end
    function cm.stfilter(c,tp)
    local seq=c:GetSequence()
    return seq<=4 and c:IsType(TYPE_MONSTER) and c:IsFaceup()
    end
    function cm.sttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and cm.stfilter(chkc,tp) end
    if chk==0 then return Duel.IsExistingTarget(cm.stfilter,tp,0,LOCATION_MZONE,1,nil,tp) end
    Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,4))
    Duel.SelectTarget(tp,cm.stfilter,tp,0,LOCATION_MZONE,1,1,nil,tp)
    end
    function cm.stop(e,tp,eg,ep,ev,re,r,rp)
    local tc=Duel.GetFirstTarget()
    if not (tc:IsRelateToEffect(e) and tc:IsControler(1-tp) and not tc:IsImmuneToEffect(e)) then return end
    local zone=1<<tc:GetSequence()
    local oc=Duel.GetMatchingGroup(cm.seqfilter,tp,0,LOCATION_SZONE,nil,tc:GetSequence()):GetFirst()
    if oc then
    Duel.Destroy(oc,REASON_RULE)
    end
    if Duel.MoveToField(tc,tp,1-tp,LOCATION_SZONE,POS_FACEUP,true,zone) then
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetCode(EFFECT_CHANGE_TYPE)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
    e1:SetValue(TYPE_TRAP+TYPE_CONTINUOUS)
    tc:RegisterEffect(e1)
    end
    end
    function cm.seqfilter(c,seq)
    return c:GetSequence()==seq
    end
    expansions/script/c183300.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Merciless
    local m=183300
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --xyz summon
    aux.AddXyzProcedure(c,nil,4,2)
    c:EnableReviveLimit()
    --rank up/down
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_IGNITION)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.cost)
    e1:SetTarget(cm.target)
    e1:SetOperation(cm.operation)
    c:RegisterEffect(e1)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    --special summon
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e2:SetProperty(EFFECT_FLAG_DELAY)
    e2:SetCode(EVENT_TO_GRAVE)
    e2:SetCountLimit(1,m+1)
    e2:SetCost(cm.cost2)
    e2:SetCondition(cm.spcon2)
    e2:SetTarget(cm.sptg2)
    e2:SetOperation(cm.spop2)
    c:RegisterEffect(e2)
    KanKan.MALeffectgain(c,m,cm.effop)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) and Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    local e1=Effect.CreateEffect(e:GetHandler())
    KanKan.MALcanntspm(e:GetHandler())
    e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
    end
    function cm.filter(c,e,tp,mc)
    return c:IsRank(mc:GetRank()) and c:IsSetCard(0xc19) and c:IsType(TYPE_XYZ)
    and mc:IsCanBeXyzMaterial(c)
    and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false)
    and Duel.GetLocationCountFromEx(tp,tp,mc,c)>0
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return aux.MustMaterialCheck(c,tp,EFFECT_MUST_BE_XMATERIAL)
    and Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_EXTRA,0,1,nil,e,tp,c) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function cm.operation(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsFaceup() and c:IsRelateToEffect(e) and c:IsControler(tp) and not c:IsImmuneToEffect(e) and aux.MustMaterialCheck(c,tp,EFFECT_MUST_BE_XMATERIAL) then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,c)
    local tc=g:GetFirst()
    if tc then
    local mg=c:GetOverlayGroup()
    if mg:GetCount()>0 then
    Duel.Overlay(tc,mg)
    end
    tc:SetMaterial(Group.FromCards(c))
    Duel.Overlay(tc,Group.FromCards(c))
    if Duel.SpecialSummon(tc,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)~=0 then
    tc:CompleteProcedure()
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCode(EFFECT_CANNOT_CHANGE_CONTROL)
    Duel.RegisterEffect(e1,tp)
    end
    end
    end
    end
    function cm.ctfilter(c)
    return c:IsSetCard(0xc19) and c:GetOriginalType()&TYPE_MONSTER==TYPE_MONSTER
    end
    function cm.ctcon(e)
    return e:GetHandler():GetOverlayGroup():IsExists(cm.ctfilter,1,nil)
    end
    function cm.ctval(e,c)
    return e:GetHandler():GetOverlayGroup():FilterCount(cm.ctfilter,nil)-1
    end
    function cm.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    KanKan.MALcanntspm(e:GetHandler())
    end
    function cm.spcon2(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return c:GetOverlayGroup():IsExists(cm.ctfilter,1,nil) and c:IsPreviousLocation(LOCATION_MZONE)
    end
    function cm.spfilter2(c,e,tp)
    return c:IsSetCard(0xc19) and c:IsType(TYPE_XYZ) and not c:IsCode(30683300) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
    end
    function cm.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.spfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp)
    and e:GetHandler():IsCanOverlay() end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
    end
    function cm.spop2(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.spfilter2,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
    local tc=g:GetFirst()
    if tc then
    Duel.SpecialSummon(tc,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)
    tc:CompleteProcedure()
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) then
    Duel.Overlay(tc,Group.FromCards(c))
    end
    end
    end
    function cm.effop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local rc=c:GetReasonCard()
    --
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetDescription(aux.Stringid(m,2))
    e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e1:SetValue(1)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e1,true)
    if not rc:IsType(TYPE_EFFECT) then
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_ADD_TYPE)
    e2:SetValue(TYPE_EFFECT)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e2,true)
    end
    rc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,2))
    end
    expansions/script/c183305.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Growth Wedge
    local m=183305
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    aux.AddXyzProcedure(c,nil,4,4)
    c:EnableReviveLimit()
    --destroy
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE)
    e1:SetType(EFFECT_TYPE_QUICK_O)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
    e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e1:SetCountLimit(1)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCondition(cm.descon)
    e1:SetCost(cm.descost)
    e1:SetTarget(cm.destg)
    e1:SetOperation(cm.desop)
    c:RegisterEffect(e1)
    --special summon
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
    e2:SetCode(EVENT_TO_GRAVE)
    e2:SetCost(cm.cost)
    e2:SetCondition(cm.spcon)
    e2:SetTarget(cm.sptg)
    e2:SetOperation(cm.spop)
    c:RegisterEffect(e2)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.descon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():GetOverlayGroup():IsExists(Card.IsType,1,nil,TYPE_XYZ)
    end
    function cm.descost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
    e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
    end
    function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_MZONE,1,nil) end
    local sg=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_MZONE,nil)
    Duel.SetOperationInfo(0,CATEGORY_DESTROY,sg,sg:GetCount(),0,0)
    end
    function cm.desop(e,tp,eg,ep,ev,re,r,rp)
    local sg=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_MZONE,nil)
    if sg:GetCount()==0 then return end
    local oc=Duel.Destroy(sg,REASON_EFFECT)
    if oc>0 then Duel.Damage(1-tp,oc*1000,REASON_EFFECT) end
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    KanKan.MALcanntspm(e:GetHandler())
    Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
    end
    function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return c:IsPreviousControler(tp) and rp==1-tp and c:IsReason(REASON_DESTROY)
    end
    function cm.spfilter(c,e,tp)
    return c:IsType(TYPE_XYZ) and c:IsSetCard(0xc19) and not c:IsCode(m) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and cm.spfilter(chkc,e,tp) end
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsExistingTarget(cm.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp)
    and e:GetHandler():IsCanOverlay() end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectTarget(tp,cm.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    local c=e:GetHandler()
    local tc=Duel.GetFirstTarget()
    if tc:IsRelateToEffect(e) and Duel.SpecialSummonStep(tc,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP) then
    tc:CompleteProcedure()
    if c:IsRelateToEffect(e) and not tc:IsImmuneToEffect(e) then
    Duel.Overlay(tc,Group.FromCards(c))
    end
    end
    Duel.SpecialSummonComplete()
    end
    expansions/script/c183310.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L Nighthaunt
    local m=183310
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --xyz summon
    aux.AddXyzProcedure(c,cm.mfilter,8,3)
    c:EnableReviveLimit()
    --equip
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,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+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
    e1:SetCondition(cm.eqcon)
    e1:SetTarget(cm.eqtg)
    e1:SetOperation(cm.eqop)
    c:RegisterEffect(e1)
    --disable
    local e3=Effect.CreateEffect(c)
    e3:SetDescription(aux.Stringid(m,1))
    e3:SetCategory(CATEGORY_DISABLE)
    e3:SetType(EFFECT_TYPE_IGNITION)
    e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e3:SetRange(LOCATION_MZONE)
    e3:SetCountLimit(1)
    e3:SetCost(cm.discost)
    e3:SetTarget(cm.distg)
    e3:SetOperation(cm.disop)
    c:RegisterEffect(e3)
    end
    function cm.mfilter(c)
    return c:IsRace(RACE_MACHINE) and c:IsAttribute(ATTRIBUTE_LIGHT)
    end
    function cm.eqcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
    end
    function cm.filter(c)
    return c:IsSetCard(0xc19) and not c:IsForbidden() and c:IsType(TYPE_MONSTER)
    end
    function cm.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and cm.filter(chkc) end
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
    and Duel.IsExistingTarget(cm.filter,tp,LOCATION_GRAVE,0,1,nil) end
    local ft=Duel.GetLocationCount(tp,LOCATION_SZONE)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
    local g=Duel.SelectTarget(tp,cm.filter,tp,LOCATION_GRAVE,0,1,ft,nil)
    Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,g,g:GetCount(),0,0)
    Duel.SetOperationInfo(0,CATEGORY_EQUIP,g,g:GetCount(),0,0)
    end
    function cm.eqop(e,tp,eg,ep,ev,re,r,rp)
    local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
    local sg=g:Filter(Card.IsRelateToEffect,nil,e)
    if Duel.GetLocationCount(tp,LOCATION_SZONE)<sg:GetCount() then return end
    local c=e:GetHandler()
    if c:IsFacedown() or not c:IsRelateToEffect(e) then return end
    local tc=sg:GetFirst()
    local atk=tc:GetTextAttack()
    while tc do
    Duel.Equip(tp,tc,c,false,true)
    --Add Equip limit
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_COPY_INHERIT)
    e1:SetCode(EFFECT_EQUIP_LIMIT)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    e1:SetValue(cm.eqlimit)
    tc:RegisterEffect(e1)
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_EQUIP)
    e2:SetCode(EFFECT_UPDATE_ATTACK)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    e2:SetValue(atk)
    tc:RegisterEffect(e2)
    tc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD,0,1)
    tc=sg:GetNext()
    end
    Duel.EquipComplete()
    end
    function cm.eqlimit(e,c)
    return e:GetOwner()==c
    end
    function cm.discost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
    e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
    end
    function cm.cfilter(c)
    return c:IsFaceup() and c:IsSetCard(0xc19) and c:GetOriginalType()&TYPE_MONSTER~=0
    end
    function cm.distg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) and aux.NegateAnyFilter(chkc) end
    local ct=e:GetHandler():GetEquipGroup():FilterCount(cm.cfilter,nil)
    if chk==0 then return ct>0 and Duel.IsExistingTarget(aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
    local g=Duel.SelectTarget(tp,aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,1,ct,nil)
    Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,#g,0,0)
    end
    function cm.disfilter(c,e)
    return aux.NegateAnyFilter(c) and c:IsRelateToEffect(e)
    end
    function cm.disop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(cm.disfilter,nil,e)
    local tc=g:GetFirst()
    while tc do
    Duel.NegateRelatedChain(tc,RESET_TURN_SET)
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_DISABLE)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e1)
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_DISABLE_EFFECT)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e2:SetValue(RESET_TURN_SET)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e2)
    if tc:IsType(TYPE_TRAPMONSTER) then
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e3:SetCode(EFFECT_DISABLE_TRAPMONSTER)
    e3:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e3)
    end
    tc=g:GetNext()
    end
    end
    \ No newline at end of file
    expansions/script/c183315.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Phoenix
    local m=183315
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --xyz summon
    c:EnableReviveLimit()
    aux.AddXyzProcedureLevelFree(c,cm.mfilter,nil,3,99,cm.ovfilter,aux.Stringid(m,0),cm.xyzop)
    --XYZ SUM
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e3:SetCode(EFFECT_SPSUMMON_CONDITION)
    e3:SetValue(cm.splimit0)
    c:RegisterEffect(e3)
    local e7=Effect.CreateEffect(c)
    e7:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
    e7:SetCode(EVENT_SPSUMMON_SUCCESS)
    e7:SetCondition(cm.txtcon1)
    e7:SetOperation(cm.txtop1)
    c:RegisterEffect(e7)
    local e8=Effect.CreateEffect(c)
    e8:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
    e8:SetCode(EVENT_SPSUMMON_SUCCESS)
    e8:SetCondition(cm.txtcon2)
    e8:SetOperation(cm.txtop2)
    c:RegisterEffect(e8)
    --atkup
    local e0=Effect.CreateEffect(c)
    e0:SetDescription(aux.Stringid(m,0))
    e0:SetCategory(CATEGORY_ATKCHANGE)
    e0:SetType(EFFECT_TYPE_IGNITION)
    e0:SetRange(LOCATION_MZONE)
    e0:SetCountLimit(1)
    e0:SetCost(cm.atkcost1)
    e0:SetTarget(cm.atktg1)
    e0:SetOperation(cm.atkop1)
    c:RegisterEffect(e0)
    --tograve
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,1))
    e1:SetCategory(CATEGORY_TODECK)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetProperty(EFFECT_FLAG_DELAY)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.tgcost)
    e1:SetCondition(cm.tgcon)
    e1:SetTarget(cm.tgtg)
    e1:SetOperation(cm.tgop)
    c:RegisterEffect(e1)
    --special summon
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e2:SetProperty(EFFECT_FLAG_DELAY)
    e2:SetCode(EVENT_TO_GRAVE)
    e2:SetCountLimit(1,m+1)
    e2:SetCost(cm.cost2)
    e2:SetCondition(cm.spcon2)
    e2:SetTarget(cm.sptg2)
    e2:SetOperation(cm.spop2)
    c:RegisterEffect(e2)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    end
    function cm.txtcon1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return c:IsSummonType(SUMMON_TYPE_XYZ)
    end
    function cm.txtop1(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(24,0,aux.Stringid(m,12))
    Duel.Hint(24,0,aux.Stringid(m,13))
    Duel.Hint(24,0,aux.Stringid(m,14))
    end
    function cm.txtcon2(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return not c:IsSummonType(SUMMON_TYPE_XYZ)
    end
    function cm.txtop2(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(24,0,aux.Stringid(m,15))
    end
    function cm.splimit0(e,se,sp,st)
    if st&SUMMON_TYPE_XYZ~=0 then return not se or not se:IsHasType(EFFECT_TYPE_ACTIONS)
    else
    return true
    end
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.mfilter(c)
    return c:IsSetCard(0xc19) and c:IsRankAbove(1)
    end
    function cm.cfilter(c)
    return c:IsSetCard(0x95,0x15e,0xc1f) and c:IsType(TYPE_SPELL) and c:IsDiscardable()
    end
    function cm.ovfilter(c)
    return c:IsFaceup() and c:IsSetCard(0xc19) and c:IsType(TYPE_XYZ)
    end
    function cm.xyzop(e,tp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_HAND,0,1,nil) end
    Duel.DiscardHand(tp,cm.cfilter,1,1,REASON_COST+REASON_DISCARD,nil)
    end
    function cm.ftarget(e,c)
    return e:GetLabel()~=c:GetFieldID()
    end
    function cm.atkcost1(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
    e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
    local e0=Effect.CreateEffect(e:GetHandler())
    e0:SetType(EFFECT_TYPE_FIELD)
    e0:SetCode(EFFECT_CANNOT_ATTACK)
    e0:SetProperty(EFFECT_FLAG_OATH)
    e0:SetTargetRange(LOCATION_MZONE,0)
    e0:SetTarget(cm.ftarget)
    e0:SetLabel(e:GetHandler():GetFieldID())
    e0:SetReset(RESET_PHASE+PHASE_END)
    Duel.RegisterEffect(e0,tp)
    end
    function cm.filter1(c,e,tp)
    return c:IsType(TYPE_MONSTER)
    end
    function cm.filter11(c,e,tp)
    return c:IsType(TYPE_MONSTER) and c:IsFaceup()
    end
    function cm.atktg1(e,tp,eg,ep,ev,re,r,rp,chk)
    local og2=Duel.GetOverlayGroup(tp,1,1)
    if chk==0 then return og2:IsExists(cm.filter1,1,nil,e,tp) end
    end
    function cm.atkop1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsFaceup() and c:IsRelateToEffect(e) then
    local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_MZONE,0,c)
    if g:GetCount()>0 then
    for oc in aux.Next(g) do
    local og1=oc:GetOverlayGroup()
    if og1:GetCount()>0 then
    Duel.SendtoGrave(og1,REASON_RULE)
    end
    end
    Duel.Overlay(c,g)
    end
    local og2=Duel.GetOverlayGroup(tp,1,1)
    local g1=og2:Filter(cm.filter1,nil,e,tp)
    local g2=Duel.GetMatchingGroup(cm.filter11,c:GetControler(),LOCATION_MZONE+LOCATION_GRAVE,0,nil)
    local atk11=0
    local atk12=0
    if g1:GetCount()>0 then
    local tc=g1:GetFirst()
    while tc do
    local lk1
    if tc:IsLevelAbove(1) then lk1=tc:GetLevel()
    elseif tc:IsRankAbove(1) then lk1=tc:GetRank()
    elseif tc:IsLinkAbove(1) then lk1=tc:GetLink()
    end
    atk11=atk11+lk1
    tc=g1:GetNext()
    end
    end
    if g2:GetCount()>0 then
    local ttc=g2:GetFirst()
    while ttc do
    local lk2
    if ttc:IsLevelAbove(1) then lk2=ttc:GetLevel()
    elseif ttc:IsRankAbove(1) then lk2=ttc:GetRank()
    elseif ttc:IsLinkAbove(1) then lk2=ttc:GetLink()
    end
    atk12=atk12+lk2
    ttc=g2:GetNext()
    end
    end
    local atkall1=atk11+atk12
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_SINGLE)
    e0:SetCode(EFFECT_UPDATE_ATTACK)
    e0:SetValue(atkall1*700)
    e0:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    c:RegisterEffect(e0)
    local e2=e0:Clone()
    e2:SetCode(EFFECT_UPDATE_DEFENSE)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    c:RegisterEffect(e2)
    end
    end
    function cm.tgcon(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetTurnPlayer()~=tp then return false end
    return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
    end
    function cm.tgcost(e,tp,eg,ep,ev,re,r,rp,chk)
    local lp=Duel.GetLP(tp)
    if chk==0 then return Duel.CheckLPCost(tp,lp-10) end
    Duel.PayLPCost(tp,lp-10)
    end
    function cm.tgfilter(c)
    return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToDeck()
    end
    function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return Duel.IsExistingMatchingCard(cm.tgfilter,tp,LOCATION_ONFIELD,0,1,c) and Duel.IsExistingMatchingCard(cm.filter2,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end
    local sg=Duel.GetMatchingGroup(cm.filter,tp,LOCATION_ONFIELD,0,c)
    Duel.SetOperationInfo(0,CATEGORY_TODECK,sg,sg:GetCount(),0,0)
    end
    function cm.filter2(c)
    return c:IsSetCard(0x95,0x15e,0xc1f) and c:IsSSetable()
    end
    function cm.tgop(e,tp,eg,ep,ev,re,r,rp)
    local sg=Duel.GetMatchingGroup(cm.tgfilter,tp,LOCATION_ONFIELD,0,aux.ExceptThisCard(e))
    if Duel.SendtoDeck(sg,nil,2,REASON_RULE)~=0 then
    local ft=sg:GetCount()
    Duel.ShuffleDeck(tp)
    Duel.BreakEffect()
    if ft>=3 then ft=3 end
    local g9=Duel.GetMatchingGroup(aux.NecroValleyFilter(cm.filter2),tp,LOCATION_DECK+LOCATION_GRAVE,0,nil)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
    local sg2=g9:SelectSubGroup(tp,aux.dncheck,false,1,ft)
    if sg2:GetCount()>0 then
    Duel.SSet(tp,sg2)
    end
    for ttc in aux.Next(sg2) do
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_QP_ACT_IN_SET_TURN)
    e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    ttc:RegisterEffect(e1)
    end
    local c=e:GetHandler()
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e2:SetTargetRange(1,0)
    e2:SetReset(RESET_PHASE+PHASE_END)
    e2:SetTarget(cm.splimit2)
    Duel.RegisterEffect(e2,tp)
    end
    end
    function cm.splimit2(e,c)
    return not c:IsType(TYPE_XYZ) and c:IsLocation(LOCATION_EXTRA)
    end
    function cm.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    KanKan.MALcanntspm(e:GetHandler())
    end
    function cm.ctfilter(c)
    return c:IsSetCard(0xc19) and c:GetOriginalType()&TYPE_MONSTER==TYPE_MONSTER
    end
    function cm.spcon2(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return c:GetOverlayGroup():IsExists(cm.ctfilter,1,nil) and c:IsPreviousLocation(LOCATION_MZONE)
    end
    function cm.spfilter2(c,e,tp)
    return c:IsSetCard(0xc19) and not c:IsCode(30683315) and c:IsCanOverlay()
    end
    function cm.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
    end
    function cm.spop2(e,tp,eg,ep,ev,re,r,rp)
    local ct=Duel.GetMatchingGroupCount(nil,e:GetHandlerPlayer(),LOCATION_GRAVE,0,nil)
    Duel.SetLP(tp,Duel.GetLP(tp)+ct*500)
    local e0=Effect.CreateEffect(e:GetHandler())
    e0:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
    e0:SetCode(EVENT_PHASE+PHASE_STANDBY)
    e0:SetCountLimit(1)
    e0:SetLabel(Duel.GetTurnCount())
    e0:SetCondition(cm.regcon)
    e0:SetOperation(cm.regop)
    if Duel.GetCurrentPhase()<=PHASE_STANDBY then
    e0:SetReset(RESET_PHASE+PHASE_STANDBY,2)
    else
    e0:SetReset(RESET_PHASE+PHASE_STANDBY)
    end
    Duel.RegisterEffect(e0,tp)
    end
    function cm.spfilter(c,e,tp)
    return c:IsSetCard(0xc008) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function cm.regcon(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetTurnCount()~=e:GetLabel() and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    end
    function cm.regop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_CARD,0,m)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local c=e:GetHandler()
    Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
    end
    expansions/script/c183320.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Fuser
    local m=183320
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --xyz summon
    aux.AddXyzProcedure(c,nil,5,2)
    c:EnableReviveLimit()
    --
    local e1=Effect.CreateEffect(c)
    e1:SetCategory(CATEGORY_DAMAGE)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e1:SetCode(EVENT_BATTLE_CONFIRM)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e1:SetCountLimit(1,m)
    e1:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local bc=c:GetBattleTarget()
    return c:IsRelateToBattle() and bc and bc:IsFaceup() and bc:IsRelateToBattle()
    end)
    e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return true end
    local bc=e:GetHandler():GetBattleTarget()
    Duel.SetTargetPlayer(1-tp)
    Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,bc:GetAttack()/2)
    end)
    e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local bc=c:GetBattleTarget()
    local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
    if c:IsFaceup() and c:IsRelateToBattle() and bc:IsFaceup() and bc:IsRelateToBattle() then
    local dam=bc:GetAttack()/2
    if dam>0 then Duel.Damage(p,dam,REASON_EFFECT) end
    end
    end)
    c:RegisterEffect(e1)
    --destroy
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetCategory(CATEGORY_DESTROY)
    e2:SetType(EFFECT_TYPE_IGNITION)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCost(cm.descost)
    e2:SetTarget(cm.destg)
    e2:SetOperation(cm.desop)
    c:RegisterEffect(e2)
    --spsummon
    local e3=Effect.CreateEffect(c)
    e3:SetDescription(aux.Stringid(m,2))
    e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e3:SetType(EFFECT_TYPE_QUICK_O)
    e3:SetRange(LOCATION_MZONE)
    e3:SetCode(EVENT_FREE_CHAIN)
    e3:SetCountLimit(1,m+1)
    e3:SetCost(cm.spcost)
    e3:SetTarget(cm.sptg)
    e3:SetOperation(cm.spop)
    e3:SetHintTiming(0,TIMING_END_PHASE)
    c:RegisterEffect(e3)
    end
    function cm.descost(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return c:CheckRemoveOverlayCard(tp,1,REASON_COST) end
    local rt=Duel.GetFieldGroupCount(tp,0,LOCATION_MZONE)
    local ct=c:RemoveOverlayCard(tp,1,rt,REASON_COST)
    e:SetLabel(ct)
    end
    function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_ONFIELD,1,nil) end
    local g=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_ONFIELD,nil)
    Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,e:GetLabel(),0,0)
    end
    function cm.desop(e,tp,eg,ep,ev,re,r,rp)
    local ct=e:GetLabel()
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
    local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,0,LOCATION_ONFIELD,ct,ct,nil)
    if g:GetCount()>0 then
    Duel.HintSelection(g)
    Duel.Destroy(g,REASON_EFFECT)
    end
    end
    function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return c:CheckRemoveOverlayCard(tp,1,REASON_COST) and c:GetFlagEffect(m)==0 end
    local ct=c:RemoveOverlayCard(tp,1,c:GetOverlayCount(),REASON_COST)
    e:SetLabel(ct)
    c:RegisterFlagEffect(m,RESET_CHAIN,0,1)
    end
    function cm.filter(c,e,tp,rk,mc)
    return c:IsRank(rk) and e:GetHandler():IsCanBeXyzMaterial(c) and c:IsSetCard(0xc19)
    and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,mc,c)>0
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return c:GetBattledGroupCount()>0 end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsFaceup() and c:IsRelateToEffect(e) then
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_UPDATE_RANK)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    e2:SetValue(e:GetLabel())
    c:RegisterEffect(e2)
    end
    if not aux.MustMaterialCheck(c,tp,EFFECT_MUST_BE_XMATERIAL) then return end
    if c:IsFacedown() or not c:IsRelateToEffect(e) or c:IsControler(1-tp) or c:IsImmuneToEffect(e) then return end
    local rg=Duel.GetMatchingGroup(cm.filter,tp,LOCATION_EXTRA,0,nil,e,tp,c:GetRank(),c)
    if #rg>0 and Duel.SelectYesNo(tp,aux.Stringid(m,3)) then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,c:GetRank(),c)
    local sc=g:GetFirst()
    if sc then
    local mg=c:GetOverlayGroup()
    if mg:GetCount()~=0 then
    Duel.Overlay(sc,mg)
    end
    sc:SetMaterial(Group.FromCards(c))
    Duel.Overlay(sc,Group.FromCards(c))
    Duel.SpecialSummon(sc,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)
    sc:CompleteProcedure()
    end
    end
    end
    \ No newline at end of file
    expansions/script/c183325.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Marauder
    local m=183325
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --xyz summon
    aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_MACHINE),6,3)
    c:EnableReviveLimit()
    --to hand
    local e0=Effect.CreateEffect(c)
    e0:SetDescription(aux.Stringid(m,0))
    e0:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
    e0:SetType(EFFECT_TYPE_IGNITION)
    e0:SetRange(LOCATION_MZONE)
    e0:SetCountLimit(1)
    e0:SetCost(cm.thcost)
    e0:SetTarget(cm.thtg)
    e0:SetOperation(cm.thop)
    c:RegisterEffect(e0)
    --indes
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e1:SetValue(1)
    c:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
    c:RegisterEffect(e2)
    --spsummon
    local e3=Effect.CreateEffect(c)
    e3:SetDescription(aux.Stringid(m,1))
    e3:SetCategory(CATEGORY_TOEXTRA+CATEGORY_SPECIAL_SUMMON)
    e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e3:SetCode(EVENT_BE_BATTLE_TARGET)
    e3:SetRange(LOCATION_MZONE)
    e3:SetCountLimit(1,m)
    e3:SetCondition(cm.spcon1)
    e3:SetTarget(cm.sptg)
    e3:SetOperation(cm.spop)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetType(EFFECT_TYPE_QUICK_O)
    e4:SetCode(EVENT_BECOME_TARGET)
    e4:SetCondition(cm.spcon2)
    c:RegisterEffect(e4)
    end
    function cm.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    local rt=e:GetHandler():GetOverlayCount()
    if rt>0 then
    if chk==0 then return c:CheckRemoveOverlayCard(tp,rt,REASON_COST) end
    local ct=c:RemoveOverlayCard(tp,rt,rt,REASON_COST)
    end
    end
    function cm.thfilter(c)
    return c:IsSetCard(0x95,0x15e,0xc1f) and c:IsAbleToHand()
    end
    function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
    end
    function cm.thop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_DECK,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.SendtoHand(g,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,g)
    end
    local e2=Effect.CreateEffect(e:GetHandler())
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e2:SetTargetRange(1,0)
    e2:SetReset(RESET_PHASE+PHASE_END)
    e2:SetTarget(cm.xyzsplimit)
    Duel.RegisterEffect(e2,tp)
    end
    function cm.xyzsplimit(e,c)
    return not c:IsType(TYPE_XYZ) and c:IsLocation(LOCATION_EXTRA)
    end
    function cm.spcon1(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetAttacker():IsControler(1-tp)
    end
    function cm.spcon2(e,tp,eg,ep,ev,re,r,rp)
    return eg:IsContains(e:GetHandler()) and rp==1-tp
    end
    function cm.toexfilter(c,tp)
    return c:IsType(TYPE_XYZ) and c:IsAbleToExtra() and c:GetOwner()==tp
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    local g=c:GetOverlayGroup()
    local g2=Duel.GetMatchingGroup(cm.toexfilter,tp,LOCATION_GRAVE,0,nil,tp)
    g:Merge(g,g2)
    if chk==0 then return c:GetFlagEffect(m)==0 and g:IsExists(cm.toexfilter,1,nil,tp) or g2:IsExists(cm.toexfilter,1,nil,tp) end
    c:RegisterFlagEffect(m,RESET_CHAIN,0,1)
    Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local g=c:GetOverlayGroup()
    local g2=Duel.GetMatchingGroup(cm.toexfilter,tp,LOCATION_GRAVE,0,nil,tp)
    g:Merge(g,g2)
    if c:IsRelateToEffect(e) then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local sc=g:FilterSelect(tp,cm.toexfilter,1,1,nil,tp):GetFirst()
    if sc and Duel.SendtoDeck(sc,nil,0,REASON_EFFECT)>0 and sc:IsLocation(LOCATION_EXTRA)
    and c:IsFaceup() and c:IsControler(tp) and not c:IsImmuneToEffect(e)
    and aux.MustMaterialCheck(c,tp,EFFECT_MUST_BE_XMATERIAL) and c:IsCanBeXyzMaterial(sc)
    and sc:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,c,sc)>0
    and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
    Duel.BreakEffect()
    local mg=c:GetOverlayGroup()
    if mg:GetCount()~=0 then
    Duel.Overlay(sc,mg)
    end
    sc:SetMaterial(Group.FromCards(c))
    Duel.Overlay(sc,Group.FromCards(c))
    Duel.SpecialSummon(sc,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)
    sc:CompleteProcedure()
    end
    end
    end
    \ No newline at end of file
    expansions/script/c183335.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Outer·Limits
    local m=183335
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --xyz summon
    aux.AddXyzProcedure(c,nil,7,3)
    c:EnableReviveLimit()
    --atkup
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_ATKCHANGE)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetProperty(EFFECT_FLAG_DELAY)
    e1:SetCondition(cm.atkcon)
    e1:SetOperation(cm.atkop)
    c:RegisterEffect(e1)
    --destroy
    local e3=Effect.CreateEffect(c)
    e3:SetDescription(aux.Stringid(m,1))
    e3:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE)
    e3:SetType(EFFECT_TYPE_IGNITION)
    e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e3:SetCountLimit(1)
    e3:SetRange(LOCATION_MZONE)
    e3:SetCondition(cm.descon)
    e3:SetTarget(cm.destg)
    e3:SetOperation(cm.desop)
    c:RegisterEffect(e3)
    --special summon
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,2))
    e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e2:SetProperty(EFFECT_FLAG_DELAY)
    e2:SetCode(EVENT_TO_GRAVE)
    e2:SetCountLimit(1,m)
    e2:SetCost(cm.cost2)
    e2:SetCondition(cm.spcon2)
    e2:SetTarget(cm.sptg2)
    e2:SetOperation(cm.spop2)
    c:RegisterEffect(e2)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetLP(tp)<=Duel.GetLP(1-tp)-7000 and e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
    end
    function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) and c:IsFaceup() then
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_UPDATE_ATTACK)
    e1:SetValue(3000)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    c:RegisterEffect(e1)
    end
    end
    function cm.filter(c)
    return c:IsSetCard(0xc19) and c:IsType(TYPE_XYZ)
    end
    function cm.descon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():GetOverlayGroup():IsExists(cm.filter,1,nil)
    end
    function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_MZONE) end
    if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
    local g=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
    Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
    end
    function cm.desop(e,tp,eg,ep,ev,re,r,rp)
    local tc=Duel.GetFirstTarget()
    if tc:IsRelateToEffect(e) then
    local rec=math.floor(tc:GetAttack())
    if rec<0 or tc:IsFacedown() then rec=0 end
    Duel.SetLP(tp,Duel.GetLP(tp)+rec)
    Duel.BreakEffect()
    Duel.Destroy(tc,REASON_EFFECT)
    end
    end
    function cm.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    KanKan.MALcanntspm(e:GetHandler())
    end
    function cm.ctfilter2(c)
    return c:IsSetCard(0xc19) and c:GetOriginalType()&TYPE_MONSTER==TYPE_MONSTER
    end
    function cm.spcon2(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return c:GetOverlayGroup():IsExists(cm.ctfilter2,1,nil) and c:IsPreviousLocation(LOCATION_MZONE)
    end
    function cm.spfilter2(c,e,tp)
    return c:IsSetCard(0xc19) and c:IsType(TYPE_XYZ) and not c:IsCode(183335)
    and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsRankBelow(7)
    and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
    end
    function cm.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.spfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp)
    and e:GetHandler():IsCanOverlay() end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
    end
    function cm.spop2(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.spfilter2,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
    local tc=g:GetFirst()
    if tc then
    Duel.SpecialSummon(tc,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)
    tc:CompleteProcedure()
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) then
    Duel.Overlay(tc,Group.FromCards(c))
    end
    end
    end
    \ No newline at end of file
    expansions/script/c183340.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L Armament Bulwarker
    local m=183340
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --xyz summon
    c:EnableReviveLimit()
    aux.AddXyzProcedureLevelFree(c,cm.mfilter,nil,2,2)
    --spsummon1
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_IGNITION)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.spcost1)
    e1:SetTarget(cm.sptg1)
    e1:SetOperation(cm.spop1)
    c:RegisterEffect(e1)
    KanKan.MALeffectgain(c,m,cm.effop)
    end
    function cm.mfilter(c,xyzc)
    return c:IsSetCard(0xc19) and (c:IsXyzLevel(xyzc,8) or c:IsLinkAbove(1))
    end
    function cm.spcost1(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
    e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
    end
    function cm.spfilter1(c,e,tp)
    return c:IsSetCard(0xc19) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function cm.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsExistingMatchingCard(cm.spfilter1,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
    end
    function cm.spop1(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.spfilter1),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp)
    if g:GetCount()>0 then
    Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
    end
    end
    function cm.effop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local rc=c:GetReasonCard()
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,1))
    e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_IMMUNE_EFFECT)
    e1:SetValue(cm.efilter)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e1,true)
    rc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,1))
    end
    function cm.efilter(e,te)
    return e:GetHandlerPlayer()~=te:GetOwnerPlayer() and not te:IsActivated()
    end
    \ No newline at end of file
    expansions/script/c183345.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Taraxacum
    local m=183345
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --xyz summon
    c:SetSPSummonOnce(183345)
    aux.AddXyzProcedureLevelFree(c,cm.xyzfilter,cm.xyzcheck,2,99,cm.ovfilter,aux.Stringid(m,0),cm.xyzop)
    c:EnableReviveLimit()
    KanKan.MALXYZ(c)
    KanKan.MALPleave(c,m)
    --spsummon other
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,1))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_IGNITION)
    e1:SetCountLimit(1,m)
    e1:SetRange(LOCATION_PZONE)
    e1:SetCost(cm.cost)
    e1:SetTarget(cm.tg)
    e1:SetOperation(cm.op)
    c:RegisterEffect(e1)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    --spsummon self
    local e2=Effect.CreateEffect(c)
    e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY)
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e2:SetCode(EVENT_DESTROYED)
    e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
    e2:SetRange(LOCATION_PZONE)
    e2:SetCountLimit(1,m+1)
    e2:SetCondition(cm.spcon1)
    e2:SetTarget(cm.sptg1)
    e2:SetOperation(cm.spop1)
    c:RegisterEffect(e2)
    --negate
    local e3=Effect.CreateEffect(c)
    e3:SetDescription(aux.Stringid(m,2))
    e3:SetCategory(CATEGORY_POSITION+CATEGORY_ATKCHANGE)
    e3:SetType(EFFECT_TYPE_QUICK_O)
    e3:SetCode(EVENT_FREE_CHAIN)
    e3:SetRange(LOCATION_MZONE)
    e3:SetCountLimit(1,m+2)
    e3:SetCost(cm.cost3)
    e3:SetTarget(cm.target3)
    e3:SetOperation(cm.operation3)
    c:RegisterEffect(e3)
    --atk & def
    local e4=Effect.CreateEffect(c)
    e4:SetType(EFFECT_TYPE_SINGLE)
    e4:SetCode(EFFECT_UPDATE_ATTACK)
    e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e4:SetRange(LOCATION_MZONE)
    e4:SetValue(cm.atkval)
    c:RegisterEffect(e4)
    local e5=e4:Clone()
    e5:SetCode(EFFECT_UPDATE_DEFENSE)
    c:RegisterEffect(e5)
    --destroy replace
    local e6=Effect.CreateEffect(c)
    e6:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
    e6:SetCode(EFFECT_DESTROY_REPLACE)
    e6:SetRange(LOCATION_MZONE)
    e6:SetTarget(cm.desreptg)
    e6:SetValue(cm.desrepval)
    e6:SetOperation(cm.desrepop)
    c:RegisterEffect(e6)
    if not cm.global_check then
    cm.global_check=TRUE
    material_check=2
    rank_check=12
    end
    end
    function cm.xyzfilter(c,xyzc)
    return c:IsSetCard(0xc19) and c:IsLevelAbove(1)
    end
    function cm.xyzcheck(g)
    return g:GetSum(Card.GetLevel)==12
    end
    function cm.ovfilter(c)
    return c:IsFaceup() and c:IsSetCard(0xc19)
    end
    function cm.xyzcfilter1(c)
    return c:GetType()==TYPE_SPELL and c:IsDiscardable()
    end
    function cm.xyzcfilter2(c)
    return c:IsType(TYPE_MONSTER) and c:IsDiscardable()
    end
    function cm.xyzop(e,tp,chk)
    local xg=Group.CreateGroup()
    if chk==0 then return Duel.IsExistingMatchingCard(cm.xyzcfilter1,tp,LOCATION_HAND,0,1,nil) and Duel.IsExistingMatchingCard(cm.xyzcfilter2,tp,LOCATION_HAND,0,2,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
    local tc1=Duel.SelectMatchingCard(tp,cm.xyzcfilter1,tp,LOCATION_HAND,0,1,1,nil):GetFirst()
    xg:AddCard(tc1)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
    local tc2=Duel.SelectMatchingCard(tp,cm.xyzcfilter2,tp,LOCATION_HAND,0,2,2,nil)
    xg:AddCard(tc2)
    Duel.SendtoGrave(xg,REASON_DISCARD+REASON_COST)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    local e1=Effect.CreateEffect(e:GetHandler())
    KanKan.MALcanntspm(e:GetHandler())
    end
    function cm.filter(c,e,tp)
    return c:IsLevelBelow(4) and c:IsSetCard(0xc19) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
    end
    function cm.tg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
    end
    function cm.op(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
    if g:GetCount()>0 then
    Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP_DEFENSE)
    end
    end
    function cm.cfilter(c,tp)
    return c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsSetCard(0xc19) and c:IsPreviousLocation(LOCATION_MZONE) and c:IsPreviousControler(tp)
    end
    function cm.spcon1(e,tp,eg,ep,ev,re,r,rp)
    return eg:IsExists(cm.cfilter,1,nil,tp)
    end
    function cm.cfiltertt(c)
    return c:IsSetCard(0xc19)
    end
    function cm.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
    local g=Duel.GetMatchingGroup(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
    Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
    end
    function cm.spop1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
    local ct=Duel.GetMatchingGroupCount(cm.cfiltertt,tp,LOCATION_ONFIELD,0,nil)
    if ct==0 then return end
    Duel.BreakEffect()
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
    local g=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,ct,nil)
    Duel.HintSelection(g)
    Duel.Destroy(g,REASON_EFFECT)
    end
    end
    function cm.cost3(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
    e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
    end
    function cm.target3(e,tp,eg,ep,ev,re,r,rp,chk)
    local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
    if chk==0 then return #g>0 end
    Duel.SetOperationInfo(0,CATEGORY_POSITION,g,#g,0,0)
    end
    function cm.operation3(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
    if Duel.ChangePosition(g,POS_FACEDOWN_DEFENSE)>=0 then
    local tg=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
    if #tg>0 then
    Duel.BreakEffect()
    local tc=tg:GetFirst()
    local atk=0
    while tc do
    if tc:GetAttack()>0 then
    atk=atk+tc:GetAttack()
    end
    tc=tg:GetNext()
    end
    if c:IsFaceup() then
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetProperty(EFFECT_FLAG_COPY_INHERIT)
    e5:SetCode(EFFECT_UPDATE_ATTACK)
    e5:SetReset(RESET_EVENT+RESETS_STANDARD)
    e5:SetValue(atk)
    c:RegisterEffect(e5)
    end
    end
    end
    end
    function cm.atkval(e,c)
    return c:GetOverlayCount()*1000
    end
    function cm.repfilter(c,tp)
    return c:IsControler(tp) and c:IsOnField()
    and c:IsReason(REASON_BATTLE+REASON_EFFECT) and not c:IsReason(REASON_REPLACE)
    end
    function cm.desreptg(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return eg:IsExists(cm.repfilter,1,nil,tp)
    and c:CheckRemoveOverlayCard(tp,1,REASON_EFFECT) end
    return Duel.SelectEffectYesNo(tp,c,96)
    end
    function cm.desrepval(e,c)
    return cm.repfilter(c,e:GetHandlerPlayer())
    end
    function cm.desrepop(e,tp,eg,ep,ev,re,r,rp)
    e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_EFFECT)
    Duel.Hint(HINT_CARD,0,m)
    local c=e:GetHandler()
    if c:IsFaceup() then
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_COPY_INHERIT)
    e1:SetCode(EFFECT_UPDATE_ATTACK)
    e1:SetValue(2000)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e1)
    end
    end
    expansions/script/c183350.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L——Blink
    local m=183350
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --xyz summon
    c:EnableReviveLimit()
    aux.AddXyzProcedureLevelFree(c,cm.mfilter,cm.xyzcheck,2,99)
    --search
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_DRAW)
    e1:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.cost1)
    e1:SetCondition(cm.spcon1)
    e1:SetTarget(cm.sptg)
    e1:SetOperation(cm.spop)
    c:RegisterEffect(e1)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    --reflect
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetRange(LOCATION_MZONE)
    e2:SetTargetRange(LOCATION_MZONE,0)
    e2:SetCode(EFFECT_REFLECT_BATTLE_DAMAGE)
    e2:SetTarget(cm.reftg)
    e2:SetValue(1)
    c:RegisterEffect(e2)
    --indes
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e3:SetValue(1)
    c:RegisterEffect(e3)
    --control
    local e6=Effect.CreateEffect(c)
    e6:SetDescription(aux.Stringid(m,1))
    e6:SetCategory(CATEGORY_DESTROY)
    e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e6:SetCode(EVENT_DAMAGE_STEP_END)
    e6:SetCost(cm.atkcost)
    e6:SetCondition(cm.atkcon)
    e6:SetTarget(cm.cttg)
    e6:SetOperation(cm.ctop)
    c:RegisterEffect(e6)
    --negate
    local e5=Effect.CreateEffect(c)
    e5:SetDescription(aux.Stringid(m,2))
    e5:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e5:SetType(EFFECT_TYPE_QUICK_O)
    e5:SetCode(EVENT_FREE_CHAIN)
    e5:SetRange(LOCATION_MZONE)
    e5:SetCountLimit(1)
    e5:SetCondition(cm.condition)
    e5:SetOperation(cm.operation)
    c:RegisterEffect(e5)
    end
    function cm.mfilter(c,xyzc)
    return c:IsSetCard(0xc19)
    end
    function cm.xygfilter(c)
    return c:IsSummonLocation(LOCATION_EXTRA)
    end
    function cm.xyzcheck(g)
    return g:IsExists(cm.xygfilter,1,nil)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    KanKan.MALcanntspm(e:GetHandler())
    end
    function cm.spcon1(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
    end
    function cm.spfilter1(c)
    return c:IsCode(183525) and c:IsSSetable()
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
    and Duel.IsExistingMatchingCard(cm.spfilter1,tp,LOCATION_DECK+LOCATION_HAND+LOCATION_GRAVE,0,1,nil) end
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
    local g=Duel.SelectMatchingCard(tp,cm.spfilter1,tp,LOCATION_DECK+LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil)
    local tc=g:GetFirst()
    if #g>0 then
    Duel.SSet(tp,g)
    if tc:IsPreviousLocation(LOCATION_HAND) then
    Duel.BreakEffect()
    Duel.Draw(tp,1,REASON_EFFECT)
    end
    end
    end
    function cm.reftg(e,c)
    return c:IsSetCard(0xc19)
    end
    function cm.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
    e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
    end
    function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return c:IsRelateToBattle() and c:IsStatus(STATUS_OPPO_BATTLE)
    end
    function cm.cttg(e,tp,eg,ep,ev,re,r,rp,chk)
    local tc=e:GetHandler():GetBattleTarget()
    if chk==0 then return tc and tc:IsRelateToBattle() end
    Duel.SetOperationInfo(0,CATEGORY_DESTROY,tc,1,0,0)
    end
    function cm.ctop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local tc=c:GetBattleTarget()
    if tc:IsRelateToBattle() then
    if Duel.Destroy(tc,REASON_EFFECT)==0 and not tc:IsImmuneToEffect(e) then
    local og=tc:GetOverlayGroup()
    if og:GetCount()>0 then
    Duel.SendtoGrave(og,REASON_RULE)
    end
    Duel.Overlay(c,Group.FromCards(tc))
    end
    end
    end
    function cm.ssfilter(c,e,tp)
    return c:IsType(TYPE_MONSTER) and c:GetOwner()==1-tp
    end
    function cm.condition(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local tg=c:GetOverlayGroup()
    local ph=Duel.GetCurrentPhase()
    return tp~=Duel.GetTurnPlayer() and bit.band(ph,PHASE_MAIN2+PHASE_END)==0 and tg:IsExists(cm.ssfilter,1,nil,e,tp)
    end
    function cm.operation(e,tp,eg,ep,ev,re,r,rp)
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetCode(EFFECT_CANNOT_ATTACK_ANNOUNCE)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e1:SetReset(RESET_PHASE+PHASE_END)
    e1:SetTargetRange(0,1)
    Duel.RegisterEffect(e1,tp)
    end
    expansions/script/c183355.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L+-Sharp Blow
    local m=183355
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --xyz summon
    aux.AddXyzProcedure(c,nil,4,4)
    c:EnableReviveLimit()
    --multi attack
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetType(EFFECT_TYPE_IGNITION)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCountLimit(1)
    e1:SetCost(cm.atkcost)
    e1:SetOperation(cm.atkop)
    c:RegisterEffect(e1)
    end
    function cm.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
    e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
    end
    function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) then
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetCode(EFFECT_EXTRA_ATTACK)
    e1:SetCondition(cm.spcon2)
    e1:SetValue(2)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
    c:RegisterEffect(e1)
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e2:SetCode(EFFECT_DIRECT_ATTACK)
    e2:SetCondition(cm.spcon2)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
    c:RegisterEffect(e2)
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_FIELD)
    e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
    e3:SetCode(EFFECT_CANNOT_ACTIVATE)
    e3:SetRange(LOCATION_MZONE)
    e3:SetTargetRange(0,1)
    e3:SetValue(1)
    e3:SetCondition(cm.actcon)
    e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
    c:RegisterEffect(e3)
    end
    local e0=Effect.CreateEffect(e:GetHandler())
    e0:SetType(EFFECT_TYPE_FIELD)
    e0:SetCode(EFFECT_CANNOT_ATTACK)
    e0:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
    e0:SetTargetRange(LOCATION_MZONE,0)
    e0:SetTarget(cm.ftarget)
    e0:SetLabel(c:GetFieldID())
    e0:SetReset(RESET_PHASE+PHASE_END)
    Duel.RegisterEffect(e0,tp)
    end
    function cm.ftarget(e,c)
    return e:GetLabel()~=c:GetFieldID()
    end
    function cm.ctfilter(c)
    return c:IsSetCard(0xc19) and c:GetOriginalType()&TYPE_MONSTER==TYPE_MONSTER
    end
    function cm.spcon2(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return c:GetOverlayGroup():IsExists(cm.ctfilter,1,nil)
    end
    function cm.actcon(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return c:GetOverlayGroup():IsExists(cm.ctfilter,1,nil)
    and Duel.GetAttacker()==e:GetHandler()
    or Duel.GetAttackTarget()==e:GetHandler()
    end
    expansions/script/c183400.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L OP-COM
    local m=183400
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --link summon
    c:EnableReviveLimit()
    aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkSetCard,0xc19),2,2)
    --search
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.cost1)
    e1:SetCondition(cm.spcon1)
    e1:SetTarget(cm.sptg)
    e1:SetOperation(cm.spop)
    c:RegisterEffect(e1)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    --destroy
    local e2=Effect.CreateEffect(c)
    e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e2:SetCode(EVENT_SPSUMMON_SUCCESS)
    e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCountLimit(1,m+1)
    e2:SetCondition(cm.thcon)
    e2:SetTarget(cm.thtg)
    e2:SetOperation(cm.thop)
    c:RegisterEffect(e2)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    KanKan.MALcanntspm(e:GetHandler())
    end
    function cm.spcon1(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
    end
    function cm.spfilter1(c)
    return c:IsCode(183510) and c:IsSSetable()
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
    and Duel.IsExistingMatchingCard(cm.spfilter1,tp,LOCATION_DECK,0,1,nil) end
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
    local g=Duel.SelectMatchingCard(tp,cm.spfilter1,tp,LOCATION_DECK,0,1,1,nil)
    if #g>0 then
    Duel.SSet(tp,g)
    end
    end
    function cm.cfilter(c,lg)
    return c:IsFaceup() and c:IsSetCard(0xc19) and lg:IsContains(c)
    end
    function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
    local lg=e:GetHandler():GetLinkedGroup()
    return eg:IsExists(cm.cfilter,1,nil,lg)
    end
    function cm.thfilter(c)
    return c:IsSetCard(0xc19) and c:IsAbleToHand() and c:IsType(TYPE_MONSTER)
    end
    function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
    end
    function cm.thop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_DECK,0,1,1,nil)
    if #g>0 then
    Duel.SendtoHand(g,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,g)
    end
    end
    expansions/script/c183405.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L Wunder
    local m=183405
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --link summon
    c:EnableReviveLimit()
    aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkSetCard,0xc19),2,99)
    --atk
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_SINGLE)
    e0:SetCode(EFFECT_MATERIAL_CHECK)
    e0:SetValue(cm.valcheck)
    c:RegisterEffect(e0)
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCondition(cm.atkcon)
    e1:SetOperation(cm.atkop)
    e1:SetLabelObject(e0)
    c:RegisterEffect(e1)
    --indestructable
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e2:SetCondition(cm.indcon)
    e2:SetValue(1)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
    c:RegisterEffect(e3)
    end
    function cm.valcheck(e,c)
    local g=c:GetMaterial()
    local atk=0
    local tc=g:GetFirst()
    while tc do
    local lk
    if tc:IsLevelAbove(1) then lk=tc:GetLevel()
    elseif tc:IsRankAbove(1) then lk=tc:GetRank()
    elseif tc:IsLinkAbove(1) then lk=tc:GetLink()
    end
    atk=atk+lk
    tc=g:GetNext()
    end
    e:SetLabel(atk)
    end
    function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
    end
    function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local atk=e:GetLabelObject():GetLabel()*500
    if atk>0 then
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_UPDATE_ATTACK)
    e1:SetValue(atk)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    c:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EFFECT_UPDATE_DEFENSE)
    c:RegisterEffect(e2)
    end
    end
    function cm.lkfilter(c)
    return c:IsFaceup() and c:IsSetCard(0xc19)
    end
    function cm.indcon(e)
    return e:GetHandler():GetLinkedGroup():IsExists(cm.lkfilter,1,nil)
    end
    \ No newline at end of file
    expansions/script/c183410.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L Black Mantle
    local m=183410
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --link summon
    c:EnableReviveLimit()
    aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkSetCard,0xc19),2,2)
    --race
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_FIELD)
    e0:SetRange(LOCATION_MZONE)
    e0:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
    e0:SetCode(EFFECT_CHANGE_RACE)
    e0:SetCondition(cm.condition)
    e0:SetValue(RACE_MACHINE)
    c:RegisterEffect(e0)
    --flip
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_CONTROL)
    e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e1:SetType(EFFECT_TYPE_IGNITION)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCountLimit(1,m)
    e1:SetTarget(cm.fltg)
    e1:SetOperation(cm.flop)
    c:RegisterEffect(e1)
    --spsummon
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
    e2:SetCode(EVENT_TO_GRAVE)
    e2:SetCountLimit(1,m+1)
    e2:SetTarget(cm.sptg)
    e2:SetOperation(cm.spop)
    c:RegisterEffect(e2)
    end
    function cm.condition(e)
    local tp=e:GetHandlerPlayer()
    return not Duel.IsPlayerAffectedByEffect(tp,EFFECT_NECRO_VALLEY) and not Duel.IsPlayerAffectedByEffect(1-tp,EFFECT_NECRO_VALLEY)
    and e:GetHandler():GetMutualLinkedGroupCount()>0
    end
    function cm.ctfilter(c)
    return c:IsFaceup() and c:IsRace(RACE_MACHINE) and c:IsControlerCanBeChanged()
    end
    function cm.fltg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and cm.ctfilter(chkc) end
    if chk==0 then return Duel.IsExistingTarget(cm.ctfilter,tp,0,LOCATION_MZONE,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
    local g1=Duel.SelectTarget(tp,cm.ctfilter,tp,0,LOCATION_MZONE,1,1,nil)
    Duel.SetOperationInfo(0,CATEGORY_CONTROL,g1,g1:GetCount(),0,0)
    end
    function cm.flop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local ttc=Duel.GetFirstTarget()
    if c:IsRelateToEffect(e) and c:IsFaceup() and ttc and ttc:IsRelateToEffect(e)
    and not ttc:IsImmuneToEffect(e) then
    c:SetCardTarget(ttc)
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_SET_CONTROL)
    e1:SetValue(tp)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    e1:SetCondition(cm.ctcon)
    ttc:RegisterEffect(e1)
    end
    end
    function cm.ctcon(e)
    local c=e:GetOwner()
    local h=e:GetHandler()
    return c:IsHasCardTarget(h)
    end
    function cm.filter(c,e,tp)
    return c:IsSetCard(0xc19) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
    if g:GetCount()>0 then
    Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
    end
    end
    \ No newline at end of file
    expansions/script/c183415.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L Skirmisher
    local m=183415
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --link summon
    c:EnableReviveLimit()
    aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkSetCard,0xc19),2,99)
    --atk
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_SINGLE)
    e0:SetCode(EFFECT_MATERIAL_CHECK)
    e0:SetValue(cm.valcheck)
    c:RegisterEffect(e0)
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCondition(cm.atkcon)
    e1:SetOperation(cm.atkop)
    e1:SetLabelObject(e0)
    c:RegisterEffect(e1)
    --all
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetCategory(CATEGORY_DESTROY)
    e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
    e2:SetCode(EVENT_SPSUMMON_SUCCESS)
    e2:SetCondition(cm.descon)
    e2:SetTarget(cm.target)
    e2:SetOperation(cm.operation)
    c:RegisterEffect(e2)
    KanKan.MALeffectgain(c,m,cm.effop)
    end
    function cm.valcheck(e,c)
    local g=c:GetMaterial()
    local atk=0
    local tc=g:GetFirst()
    while tc do
    local lk
    if tc:IsLinkAbove(1) then
    lk=tc:GetLink()
    else lk=0
    end
    atk=atk+lk
    tc=g:GetNext()
    end
    e:SetLabel(atk)
    end
    function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
    end
    function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local atk=e:GetLabelObject():GetLabel()*1000
    if atk>0 then
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_UPDATE_ATTACK)
    e1:SetValue(atk)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    c:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EFFECT_UPDATE_DEFENSE)
    c:RegisterEffect(e2)
    end
    end
    function cm.descon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
    end
    function cm.filter(c)
    return c:IsFaceup() and c:GetAttack()>0
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,0,LOCATION_MZONE,1,nil) end
    end
    function cm.operation(e,tp,eg,ep,ev,re,r,rp)
    local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
    local tc=g:GetFirst()
    while tc do
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_SET_ATTACK_FINAL)
    e1:SetValue(0)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e1)
    tc=g:GetNext()
    end
    end
    function cm.effop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local rc=c:GetReasonCard()
    --immune
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,1))
    e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_IMMUNE_EFFECT)
    e1:SetValue(cm.efilter)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e1,true)
    if not rc:IsType(TYPE_EFFECT) then
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_ADD_TYPE)
    e2:SetValue(TYPE_EFFECT)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e2,true)
    end
    rc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,1))
    end
    function cm.efilter(e,te)
    if te:GetHandlerPlayer()==e:GetHandlerPlayer() or not te:IsActivated() then return false end
    if not te:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return true end
    local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
    return not g or not g:IsContains(e:GetHandler())
    end
    expansions/script/c183420.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L——Hyperion
    local m=183420
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --link summon
    c:EnableReviveLimit()
    aux.AddLinkProcedure(c,nil,4,99,cm.lcheck)
    KanKan.MAL(c)
    --spsummon condition
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_SINGLE)
    e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e0:SetCode(EFFECT_SPSUMMON_CONDITION)
    e0:SetValue(aux.linklimit)
    c:RegisterEffect(e0)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCondition(cm.atkcon)
    e1:SetOperation(cm.sumsuc)
    c:RegisterEffect(e1)
    --position
    local e9=Effect.CreateEffect(c)
    e9:SetType(EFFECT_TYPE_FIELD)
    e9:SetCode(EFFECT_SET_POSITION)
    e9:SetRange(LOCATION_MZONE)
    e9:SetTargetRange(0,LOCATION_MZONE)
    e9:SetValue(POS_FACEUP_ATTACK)
    c:RegisterEffect(e9)
    --atk limit
    local e10=Effect.CreateEffect(c)
    e10:SetType(EFFECT_TYPE_FIELD)
    e10:SetRange(LOCATION_MZONE)
    e10:SetTargetRange(0,LOCATION_MZONE)
    e10:SetCode(EFFECT_CANNOT_SELECT_BATTLE_TARGET)
    e10:SetValue(cm.atklimit)
    c:RegisterEffect(e10)
    end
    function cm.lcheck(g,lc)
    return g:IsExists(cm.lkfilter1,1,nil) and g:IsExists(cm.lkfilter2,1,nil) and g:IsExists(cm.lkfilter3,1,nil) and g:IsExists(cm.lkfilter4,1,nil)
    end
    function cm.lkfilter1(c)
    return c:IsLinkType(TYPE_FUSION) and c:IsSetCard(0xc19)
    end
    function cm.lkfilter2(c)
    return c:IsLinkType(TYPE_SYNCHRO) and c:IsSetCard(0xc19)
    end
    function cm.lkfilter3(c)
    return c:IsLinkType(TYPE_XYZ) and c:IsSetCard(0xc19)
    end
    function cm.lkfilter4(c)
    return c:IsLinkType(TYPE_LINK) and c:IsSetCard(0xc19)
    end
    function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
    end
    function cm.sumsuc(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local sg=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_GRAVE,LOCATION_GRAVE,nil)
    Duel.SendtoDeck(sg,nil,2,REASON_EFFECT)
    local og=Duel.GetOperatedGroup()
    local ct=og:FilterCount(aux.TRUE,nil)
    if ct>0 then
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,1))
    e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_UPDATE_ATTACK)
    e1:SetValue(ct*800)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_DISABLE)
    c:RegisterEffect(e1)
    end
    local sg2=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_REMOVED,LOCATION_REMOVED,nil)
    Duel.SendtoDeck(sg2,nil,2,REASON_EFFECT)
    if sg2:GetCount()>0 then
    local og2=Duel.GetOperatedGroup()
    local ct2=og2:FilterCount(Card.IsLocation,nil,LOCATION_DECK+LOCATION_EXTRA)
    if ct2>0 then
    Duel.BreakEffect()
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,2))
    e2:SetProperty(EFFECT_FLAG_CLIENT_HINT)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_EXTRA_ATTACK)
    e2:SetValue(ct2)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e2)
    Duel.NegateRelatedChain(c,RESET_TURN_SET)
    end
    end
    Duel.Hint(24,0,aux.Stringid(m,12))
    Duel.Hint(24,0,aux.Stringid(m,13))
    Duel.Hint(24,0,aux.Stringid(m,14))
    end
    function cm.atklimit(e,c)
    return c~=e:GetHandler()
    end
    expansions/script/c183425.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L——Null
    local m=183425
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    c:EnableReviveLimit()
    KanKan.MALLink(c)
    --effect gain
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCondition(cm.regcon)
    e1:SetOperation(cm.regop)
    c:RegisterEffect(e1)
    --effect gain
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
    e2:SetProperty(EFFECT_FLAG_DELAY)
    e2:SetCode(EVENT_SPSUMMON_SUCCESS)
    e2:SetCountLimit(1)
    e2:SetCondition(cm.tkcon)
    e2:SetOperation(cm.tkop)
    c:RegisterEffect(e2)
    end
    function cm.regcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
    end
    function cm.regop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:GetMaterial():FilterCount(Card.IsLinkType,nil,TYPE_FUSION)>0 then
    --activate limit - fusion -> Search
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SEARCH)
    e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e1:SetProperty(EFFECT_FLAG_DELAY)
    e1:SetCode(EVENT_PHASE+PHASE_END)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCountLimit(1)
    e1:SetCondition(cm.thcon1)
    e1:SetTarget(cm.thtac1)
    e1:SetOperation(cm.thop1)
    c:RegisterEffect(e1)
    c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,0))
    end
    if c:GetMaterial():FilterCount(Card.IsLinkType,nil,TYPE_SYNCHRO)>0 then
    --activate limit - synchro -> actlimit
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e2:SetCode(EFFECT_CANNOT_ACTIVATE)
    e2:SetRange(LOCATION_MZONE)
    e2:SetTargetRange(1,1)
    e2:SetValue(1)
    e2:SetCondition(cm.actcon2)
    c:RegisterEffect(e2)
    c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,1))
    end
    if c:GetMaterial():FilterCount(Card.IsLinkType,nil,TYPE_XYZ)>0 then
    --activate limit - XYZ -> spell
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_FIELD)
    e3:SetProperty(EFFECT_FLAG_SET_AVAILABLE+EFFECT_FLAG_IGNORE_RANGE+EFFECT_FLAG_IGNORE_IMMUNE)
    e3:SetCode(EFFECT_TO_GRAVE_REDIRECT)
    e3:SetRange(LOCATION_MZONE)
    e3:SetTargetRange(0xff,0xff)
    e3:SetValue(LOCATION_DECK)
    e3:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e3)
    c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,2))
    end
    if c:GetMaterial():FilterCount(Card.IsLinkType,nil,TYPE_LINK)>0 then
    --activate limit - Link -> must use Summon
    local e4=Effect.CreateEffect(c)
    e4:SetType(EFFECT_TYPE_FIELD)
    e4:SetCode(EFFECT_MUST_USE_MZONE)
    e4:SetRange(LOCATION_MZONE)
    e4:SetTargetRange(LOCATION_EXTRA,LOCATION_EXTRA)
    e4:SetValue(cm.frcval4)
    e4:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e4)
    c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,3))
    end
    Duel.Hint(24,0,aux.Stringid(m,12))
    Duel.Hint(24,0,aux.Stringid(m,13))
    Duel.Hint(24,0,aux.Stringid(m,14))
    end
    function cm.thfilter1(c)
    return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable()
    end
    function cm.thcon1(e,tp,eg,ep,ev,re,r,rp)
    return tp==Duel.GetTurnPlayer()
    end
    function cm.thtac1(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter1,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end
    end
    function cm.thop1(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
    local g=Duel.SelectMatchingCard(tp,cm.thfilter1,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.SSet(tp,g:GetFirst())
    end
    end
    function cm.ffilter2(c)
    return c:IsFaceup() and c:IsType(TYPE_FIELD)
    end
    function cm.actcon2(e)
    local ph=Duel.GetCurrentPhase()
    local tp=e:GetHandlerPlayer()
    return Duel.IsExistingMatchingCard(cm.ffilter2,e:GetHandlerPlayer(),LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) and ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
    end
    function cm.frcval4(e,c,fp,rp,r)
    local tp=e:GetHandlerPlayer()
    local zone = 0
    zone = zone | Duel.GetLinkedZone(tp)
    zone = zone | Duel.GetLinkedZone(1-tp)
    zone = zone | 0x60
    zone = zone | (0x60*0x10000)
    return zone
    end
    function cm.tkcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
    end
    function cm.tkop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local g=c:GetMaterial()
    local link=0
    local tc=g:GetFirst()
    while tc do
    local lk
    if tc:IsLinkAbove(1) then
    lk=tc:GetLink()
    else lk=0
    end
    link=link+lk
    tc=g:GetNext()
    end
    local atk=link*1000
    if c:GetFlagEffect(183426)==0 and link>=1 then
    --atk
    local e1_1=Effect.CreateEffect(e:GetHandler())
    e1_1:SetType(EFFECT_TYPE_SINGLE)
    e1_1:SetCode(EFFECT_SET_BASE_ATTACK)
    e1_1:SetValue(atk)
    e1_1:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e1_1)
    c:RegisterFlagEffect(183426,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,4))
    end
    if c:GetFlagEffect(183427)==0 and link>=2 then
    --damage reduce
    local e2_1=Effect.CreateEffect(e:GetHandler())
    e2_1:SetType(EFFECT_TYPE_FIELD)
    e2_1:SetCode(EFFECT_CHANGE_DAMAGE)
    e2_1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e2_1:SetRange(LOCATION_MZONE)
    e2_1:SetTargetRange(1,0)
    e2_1:SetValue(cm.damval)
    e2_1:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e2_1)
    local e3_1=e2_1:Clone()
    e3_1:SetCode(EFFECT_NO_EFFECT_DAMAGE)
    c:RegisterEffect(e3_1)
    c:RegisterFlagEffect(183427,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5))
    end
    if c:GetFlagEffect(183428)==0 and link>=4 then
    --atlimit
    local e4_1=Effect.CreateEffect(e:GetHandler())
    e4_1:SetType(EFFECT_TYPE_FIELD)
    e4_1:SetCode(EFFECT_CANNOT_SELECT_BATTLE_TARGET)
    e4_1:SetRange(LOCATION_MZONE)
    e4_1:SetTargetRange(0,LOCATION_MZONE)
    e4_1:SetValue(cm.atlimit)
    e4_1:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e4_1)
    c:RegisterFlagEffect(183428,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,6))
    end
    if c:GetFlagEffect(183429)==0 and link>=5 then
    --atkup
    local e5_1=Effect.CreateEffect(e:GetHandler())
    e5_1:SetType(EFFECT_TYPE_SINGLE)
    e5_1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e5_1:SetRange(LOCATION_MZONE)
    e5_1:SetCode(EFFECT_SET_ATTACK_FINAL)
    e5_1:SetValue(cm.atkval)
    e5_1:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e5_1)
    c:RegisterFlagEffect(183429,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,7))
    end
    if c:GetFlagEffect(183430)==0 and link>=7 then
    --Damage
    local e6_1=Effect.CreateEffect(e:GetHandler())
    e6_1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e6_1:SetCode(EVENT_PRE_BATTLE_DAMAGE)
    e6_1:SetRange(LOCATION_MZONE)
    e6_1:SetOperation(cm.rdop)
    e6_1:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e6_1)
    c:RegisterFlagEffect(183430,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,8))
    end
    if c:GetFlagEffect(183431)==0 and link>=8 then
    --pierce
    local e8_1=Effect.CreateEffect(e:GetHandler())
    e8_1:SetType(EFFECT_TYPE_SINGLE)
    e8_1:SetCode(EFFECT_PIERCE)
    e8_1:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e8_1)
    c:RegisterFlagEffect(183431,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,9))
    end
    end
    function cm.damval(e,re,val,r,rp,rc)
    if bit.band(r,REASON_EFFECT+REASON_BATTLE)~=0 then return 0 end
    return val
    end
    function cm.atlimit(e,c)
    return c~=e:GetHandler()
    end
    function cm.atkval(e,c)
    return c:GetAttack()*2
    end
    function cm.rdop(e,tp,eg,ep,ev,re,r,rp)
    Duel.ChangeBattleDamage(ep,ev*3)
    end
    expansions/script/c183430.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Valiant
    local m=183430
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --link summon
    c:EnableReviveLimit()
    aux.AddLinkProcedure(c,cm.matfilter,1,1)
    --atk
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_SINGLE)
    e0:SetCode(EFFECT_MATERIAL_CHECK)
    e0:SetValue(cm.valcheck)
    c:RegisterEffect(e0)
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCondition(cm.atkcon)
    e1:SetOperation(cm.atkop)
    e1:SetLabelObject(e0)
    c:RegisterEffect(e1)
    --search
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,0))
    e2:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
    e2:SetCode(EVENT_SPSUMMON_SUCCESS)
    e2:SetCountLimit(1,m)
    e2:SetCost(cm.cost1)
    e2:SetCondition(cm.spcon1)
    e2:SetTarget(cm.sptg)
    e2:SetOperation(cm.spop)
    c:RegisterEffect(e2)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    end
    function cm.matfilter(c)
    return c:IsLinkSetCard(0xc19) and not c:IsLinkCode(183430)
    end
    function cm.valcheck(e,c)
    local g=c:GetMaterial()
    local atk=0
    local tc=g:GetFirst()
    while tc do
    local lk
    if tc:IsLevelAbove(1) then lk=tc:GetLevel()
    elseif tc:IsRankAbove(1) then lk=tc:GetRank()
    elseif tc:IsLinkAbove(1) then lk=tc:GetLink()
    end
    atk=atk+lk
    tc=g:GetNext()
    end
    e:SetLabel(atk)
    end
    function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
    end
    function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local atk=e:GetLabelObject():GetLabel()*200
    if atk>0 then
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_UPDATE_ATTACK)
    e1:SetValue(atk)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    c:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EFFECT_UPDATE_DEFENSE)
    c:RegisterEffect(e2)
    end
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    local e2=Effect.CreateEffect(e:GetHandler())
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
    e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e2:SetReset(RESET_PHASE+PHASE_END)
    e2:SetTargetRange(1,0)
    e2:SetTarget(cm.splimit)
    Duel.RegisterEffect(e2,tp)
    end
    function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
    return not c:IsSetCard(0xc19)
    end
    function cm.spcon1(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
    end
    function cm.filter(c,e,tp,zone)
    return c:IsSetCard(0xc19) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then
    local zone=e:GetHandler():GetLinkedZone(tp)
    return zone~=0 and Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_HAND,0,1,nil,e,tp,zone)
    end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    local zone=e:GetHandler():GetLinkedZone(tp)
    if zone==0 then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_HAND,0,1,1,nil,e,tp,zone)
    if g:GetCount()>0 then
    Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP,zone)
    end
    end
    \ No newline at end of file
    expansions/script/c183435.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Hive balloon
    local m=183435
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --link summon
    aux.AddLinkProcedure(c,cm.mfilter,2,2,cm.lcheck)
    c:EnableReviveLimit()
    --cannot link material
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_SINGLE)
    e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e0:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
    e0:SetValue(cm.lmlimit)
    c:RegisterEffect(e0)
    --to hand
    local e2=Effect.CreateEffect(c)
    e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SEARCH)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e2:SetCode(EVENT_SPSUMMON_SUCCESS)
    e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCountLimit(1,m+1)
    e2:SetCondition(cm.thcon)
    e2:SetCost(cm.thcost)
    e2:SetTarget(cm.thtg)
    e2:SetOperation(cm.thop)
    c:RegisterEffect(e2)
    --special summon
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCountLimit(1,m)
    e1:SetCondition(cm.spcon)
    e1:SetTarget(cm.sptg)
    e1:SetOperation(cm.spop)
    c:RegisterEffect(e1)
    end
    function cm.lmlimit(e)
    local c=e:GetHandler()
    return c:IsStatus(STATUS_SPSUMMON_TURN) and c:IsSummonType(SUMMON_TYPE_LINK)
    end
    function cm.mfilter(c)
    return c:IsRankAbove(1)
    end
    function cm.lcheck(g,lc)
    return g:GetClassCount(Card.GetRank)==1
    end
    function cm.cfilter(c,lg)
    return c:IsFaceup() and c:IsType(TYPE_XYZ) and lg:IsContains(c)
    end
    function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
    local lg=e:GetHandler():GetLinkedGroup()
    return eg:IsExists(cm.cfilter,1,nil,lg)
    end
    function cm.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
    e:SetLabel(100)
    if chk==0 then return true end
    Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
    end
    function cm.cpfilter(c)
    return c:IsType(TYPE_SPELL) and c:IsSetCard(0x95,0x15e,0xc1f) and c:IsAbleToGraveAsCost()
    and c:CheckActivateEffect(true,true,false)~=nil
    end
    function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then
    if e:GetLabel()~=100 then return false end
    e:SetLabel(0)
    return Duel.IsExistingMatchingCard(cm.cpfilter,tp,LOCATION_DECK,0,1,nil)
    end
    e:SetLabel(0)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
    local g=Duel.SelectMatchingCard(tp,cm.cpfilter,tp,LOCATION_DECK,0,1,1,nil)
    local te,ceg,cep,cev,cre,cr,crp=g:GetFirst():CheckActivateEffect(true,true,true)
    Duel.SendtoGrave(g,REASON_COST)
    e:SetProperty(te:GetProperty())
    local tg=te:GetTarget()
    if tg then tg(e,tp,ceg,cep,cev,cre,cr,crp,1) end
    te:SetLabelObject(e:GetLabelObject())
    e:SetLabelObject(te)
    Duel.ClearOperationInfo(0)
    end
    function cm.thop(e,tp,eg,ep,ev,re,r,rp)
    local te=e:GetLabelObject()
    if not te then return end
    e:SetLabelObject(te:GetLabelObject())
    local op=te:GetOperation()
    if op then op(e,tp,eg,ep,ev,re,r,rp) end
    local e2=Effect.CreateEffect(e:GetHandler())
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e2:SetTargetRange(1,0)
    e2:SetReset(RESET_PHASE+PHASE_END)
    e2:SetTarget(cm.xyzsplimit)
    Duel.RegisterEffect(e2,tp)
    end
    function cm.xyzsplimit(e,c)
    return not c:IsType(TYPE_XYZ) and c:IsLocation(LOCATION_EXTRA)
    end
    function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
    end
    function cm.filter(c,e,tp)
    return c:IsCanBeEffectTarget(e) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function cm.xyzfilter(c,mg)
    return c:IsType(TYPE_XYZ) and c:IsXyzSummonable(mg,2,2)
    end
    function cm.mfilter1(c,mg,exg)
    return mg:IsExists(cm.mfilter2,1,c,c,exg)
    end
    function cm.mfilter2(c,mc,exg)
    return exg:IsExists(Card.IsXyzSummonable,1,nil,Group.FromCards(c,mc))
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return false end
    local mg=Duel.GetMatchingGroup(cm.filter,tp,LOCATION_GRAVE,0,nil,e,tp)
    local exg=Duel.GetMatchingGroup(cm.xyzfilter,tp,LOCATION_EXTRA,0,nil,mg)
    if chk==0 then return Duel.IsPlayerCanSpecialSummonCount(tp,2)
    and not Duel.IsPlayerAffectedByEffect(tp,59822133)
    and Duel.GetLocationCount(tp,LOCATION_MZONE)>1
    and exg:GetCount()>0 end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local sg1=mg:FilterSelect(tp,cm.mfilter1,1,1,nil,mg,exg)
    local tc1=sg1:GetFirst()
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local sg2=mg:FilterSelect(tp,cm.mfilter2,1,1,tc1,tc1,exg)
    sg1:Merge(sg2)
    Duel.SetTargetCard(sg1)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,sg1,2,0,0)
    end
    function cm.filter2(c,e,tp)
    return c:IsRelateToEffect(e) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    if Duel.IsPlayerAffectedByEffect(tp,59822133) then return end
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<2 then return end
    local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(cm.filter2,nil,e,tp)
    if g:GetCount()<2 then return end
    local tc=g:GetFirst()
    while tc do
    Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP)
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_DISABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EFFECT_DISABLE_EFFECT)
    e2:SetValue(RESET_TURN_SET)
    tc:RegisterEffect(e2)
    tc=g:GetNext()
    end
    Duel.SpecialSummonComplete()
    Duel.AdjustAll()
    if g:FilterCount(Card.IsLocation,nil,LOCATION_MZONE)<2 then return end
    local xyzg=Duel.GetMatchingGroup(cm.xyzfilter,tp,LOCATION_EXTRA,0,nil,g)
    if xyzg:GetCount()>0 then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local xyz=xyzg:Select(tp,1,1,nil):GetFirst()
    Duel.XyzSummon(tp,xyz,g)
    local e2=Effect.CreateEffect(e:GetHandler())
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e2:SetTargetRange(1,0)
    e2:SetReset(RESET_PHASE+PHASE_END)
    e2:SetTarget(cm.xyzsplimit)
    Duel.RegisterEffect(e2,tp)
    end
    end
    function cm.xyzsplimit(e,c)
    return not c:IsType(TYPE_XYZ) and c:IsLocation(LOCATION_EXTRA)
    end
    \ No newline at end of file
    expansions/script/c183445.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L 【Helepolis】
    local m=183445
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --attack target
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_FIELD)
    e0:SetRange(LOCATION_MZONE)
    e0:SetCode(EFFECT_PATRICIAN_OF_DARKNESS)
    e0:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e0:SetTargetRange(0,1)
    c:RegisterEffect(e0)
    --link add
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(183120,6))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_IGNITION)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.linkcost)
    e1:SetTarget(cm.linktg)
    e1:SetOperation(cm.linkop)
    c:RegisterEffect(e1)
    --to grave
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(183120,7))
    e2:SetCategory(CATEGORY_TOGRAVE)
    e2:SetType(EFFECT_TYPE_QUICK_O)
    e2:SetCode(EVENT_FREE_CHAIN)
    e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
    e2:SetCountLimit(1,m+1)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCost(cm.tgcost)
    e2:SetTarget(cm.gytg)
    e2:SetOperation(cm.gyop)
    c:RegisterEffect(e2)
    --indestructable effect
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_FIELD)
    e3:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
    e3:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
    e3:SetRange(LOCATION_MZONE)
    e3:SetTargetRange(LOCATION_ONFIELD,0)
    e3:SetTarget(cm.indtg)
    e3:SetValue(aux.indoval)
    c:RegisterEffect(e3)
    --link lose
    local e5=Effect.CreateEffect(c)
    e5:SetDescription(aux.Stringid(183120,8))
    e5:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_SPECIAL_SUMMON)
    e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
    e5:SetCode(EVENT_PHASE+PHASE_END)
    e5:SetRange(LOCATION_MZONE)
    e5:SetCountLimit(1)
    e5:SetCondition(cm.lscon)
    e5:SetOperation(cm.lsop)
    c:RegisterEffect(e5)
    end
    function cm.linkcost(e,tp,eg,ep,ev,re,r,rp,chk)
    e:SetLabel(100)
    if chk==0 then return true end
    end
    function cm.linkfilter(c)
    return c:IsType(TYPE_LINK) and c:IsType(TYPE_MONSTER) and c:IsSetCard(0xc19)
    end
    function cm.linktg(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then
    if e:GetLabel()~=100 then return false end
    e:SetLabel(0)
    return Duel.CheckReleaseGroup(tp,cm.linkfilter,1,c)
    end
    e:SetLabel(0)
    local g=Duel.SelectReleaseGroup(tp,cm.linkfilter,1,1,c)
    Duel.Release(g,REASON_COST)
    Duel.SetTargetCard(g)
    end
    function cm.linkop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local tc=Duel.GetFirstTarget()
    local lm1=0
    local lm2=0
    local lm3=0
    local lm4=0
    local lm5=0
    local lm6=0
    local lm7=0
    local lm8=0
    if tc:IsLinkAbove(1) then
    if tc:IsLinkMarker(LINK_MARKER_TOP_RIGHT) then lm1=lm1+1 end
    if tc:IsLinkMarker(LINK_MARKER_TOP_LEFT) then lm2=lm2+1 end
    if tc:IsLinkMarker(LINK_MARKER_TOP) then lm3=lm3+1 end
    if tc:IsLinkMarker(LINK_MARKER_LEFT) then lm4=lm4+1 end
    if tc:IsLinkMarker(LINK_MARKER_RIGHT) then lm5=lm5+1 end
    if tc:IsLinkMarker(LINK_MARKER_BOTTOM_LEFT) then lm6=lm6+1 end
    if tc:IsLinkMarker(LINK_MARKER_BOTTOM) then lm7=lm7+1 end
    if tc:IsLinkMarker(LINK_MARKER_BOTTOM_RIGHT) then lm8=lm8+1 end
    end
    if c:IsLinkMarker(LINK_MARKER_TOP_RIGHT) then lm1=0 end
    if c:IsLinkMarker(LINK_MARKER_TOP_LEFT) then lm2=0 end
    if c:IsLinkMarker(LINK_MARKER_TOP) then lm3=0 end
    if c:IsLinkMarker(LINK_MARKER_LEFT) then lm4=0 end
    if c:IsLinkMarker(LINK_MARKER_RIGHT) then lm5=0 end
    if c:IsLinkMarker(LINK_MARKER_BOTTOM_LEFT) then lm6=0 end
    if c:IsLinkMarker(LINK_MARKER_BOTTOM) then lm7=0 end
    if c:IsLinkMarker(LINK_MARKER_BOTTOM_RIGHT) then lm8=0 end
    if lm1+lm2+lm3+lm4+lm5+lm6+lm7+lm8>=5 then
    local linksurprised=4
    while linksurprised do
    local off=1
    local ops={}
    local opval={}
    if lm1==1 then
    ops[off]=aux.Stringid(m,0)
    opval[off-1]=1
    off=off+1
    end
    if lm2==1 then
    ops[off]=aux.Stringid(m,1)
    opval[off-1]=2
    off=off+1
    end
    if lm3==1 then
    ops[off]=aux.Stringid(m,2)
    opval[off-1]=3
    off=off+1
    end
    if lm4==1 then
    ops[off]=aux.Stringid(m,3)
    opval[off-1]=4
    off=off+1
    end
    if lm5==1 then
    ops[off]=aux.Stringid(m,4)
    opval[off-1]=5
    off=off+1
    end
    if lm6==1 then
    ops[off]=aux.Stringid(m,5)
    opval[off-1]=6
    off=off+1
    end
    if lm7==1 then
    ops[off]=aux.Stringid(m,6)
    opval[off-1]=7
    off=off+1
    end
    if lm8==1 then
    ops[off]=aux.Stringid(m,7)
    opval[off-1]=8
    off=off+1
    end
    if off==1 then return end
    local op=Duel.SelectOption(tp,table.unpack(ops))
    if opval[op]==1 then
    lm1=0
    local e0_1=Effect.CreateEffect(c)
    e0_1:SetType(EFFECT_TYPE_SINGLE)
    e0_1:SetCode(EFFECT_ADD_LINK_MARKER_KOISHI)
    e0_1:SetValue(LINK_MARKER_TOP_RIGHT)
    e0_1:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e0_1)
    c:ResetFlagEffect(m+9)
    c:RegisterFlagEffect(m+1,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,0))
    elseif opval[op]==2 then
    lm2=0
    local e0_2=Effect.CreateEffect(c)
    e0_2:SetType(EFFECT_TYPE_SINGLE)
    e0_2:SetCode(EFFECT_ADD_LINK_MARKER_KOISHI)
    e0_2:SetValue(LINK_MARKER_TOP_LEFT)
    e0_2:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e0_2)
    c:ResetFlagEffect(m+10)
    c:RegisterFlagEffect(m+2,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,1))
    elseif opval[op]==3 then
    lm3=0
    local e0_3=Effect.CreateEffect(c)
    e0_3:SetType(EFFECT_TYPE_SINGLE)
    e0_3:SetCode(EFFECT_ADD_LINK_MARKER_KOISHI)
    e0_3:SetValue(LINK_MARKER_TOP)
    e0_3:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e0_3)
    c:ResetFlagEffect(m+11)
    c:RegisterFlagEffect(m+3,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,2))
    elseif opval[op]==4 then
    lm4=0
    local e0_4=Effect.CreateEffect(c)
    e0_4:SetType(EFFECT_TYPE_SINGLE)
    e0_4:SetCode(EFFECT_ADD_LINK_MARKER_KOISHI)
    e0_4:SetValue(LINK_MARKER_LEFT)
    e0_4:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e0_4)
    c:ResetFlagEffect(m+12)
    c:RegisterFlagEffect(m+4,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,3))
    elseif opval[op]==5 then
    lm5=0
    local e0_5=Effect.CreateEffect(c)
    e0_5:SetType(EFFECT_TYPE_SINGLE)
    e0_5:SetCode(EFFECT_ADD_LINK_MARKER_KOISHI)
    e0_5:SetValue(LINK_MARKER_RIGHT)
    e0_5:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e0_5)
    c:ResetFlagEffect(m+13)
    c:RegisterFlagEffect(m+5,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,4))
    elseif opval[op]==6 then
    lm6=0
    local e0_6=Effect.CreateEffect(c)
    e0_6:SetType(EFFECT_TYPE_SINGLE)
    e0_6:SetCode(EFFECT_ADD_LINK_MARKER_KOISHI)
    e0_6:SetValue(LINK_MARKER_BOTTOM_LEFT)
    e0_6:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e0_6)
    c:ResetFlagEffect(m+14)
    c:RegisterFlagEffect(m+6,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5))
    elseif opval[op]==7 then
    lm7=0
    local e0_7=Effect.CreateEffect(c)
    e0_7:SetType(EFFECT_TYPE_SINGLE)
    e0_7:SetCode(EFFECT_ADD_LINK_MARKER_KOISHI)
    e0_7:SetValue(LINK_MARKER_BOTTOM)
    e0_7:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e0_7)
    c:ResetFlagEffect(m+15)
    c:RegisterFlagEffect(m+7,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,6))
    elseif opval[op]==8 then
    lm8=0
    local e0_8=Effect.CreateEffect(c)
    e0_8:SetType(EFFECT_TYPE_SINGLE)
    e0_8:SetCode(EFFECT_ADD_LINK_MARKER_KOISHI)
    e0_8:SetValue(LINK_MARKER_BOTTOM_RIGHT)
    e0_8:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e0_8)
    c:ResetFlagEffect(m+16)
    c:RegisterFlagEffect(m+8,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,7))
    end--(op)
    linksurprised=linksurprised-1
    if linksurprised<=0 then
    break
    end
    end--(while)
    else--(<=4)
    if lm1>0 then
    local e1_1=Effect.CreateEffect(c)
    e1_1:SetType(EFFECT_TYPE_SINGLE)
    e1_1:SetCode(EFFECT_ADD_LINK_MARKER_KOISHI)
    e1_1:SetValue(LINK_MARKER_TOP_RIGHT)
    e1_1:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e1_1)
    c:ResetFlagEffect(m+9)
    c:RegisterFlagEffect(m+1,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,0))
    end
    if lm2>0 then
    local e1_2=Effect.CreateEffect(c)
    e1_2:SetType(EFFECT_TYPE_SINGLE)
    e1_2:SetCode(EFFECT_ADD_LINK_MARKER_KOISHI)
    e1_2:SetValue(LINK_MARKER_TOP_LEFT)
    e1_2:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e1_2)
    c:ResetFlagEffect(m+10)
    c:RegisterFlagEffect(m+2,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,1))
    end
    if lm3>0 then
    local e1_3=Effect.CreateEffect(c)
    e1_3:SetType(EFFECT_TYPE_SINGLE)
    e1_3:SetCode(EFFECT_ADD_LINK_MARKER_KOISHI)
    e1_3:SetValue(LINK_MARKER_TOP)
    e1_3:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e1_3)
    c:ResetFlagEffect(m+11)
    c:RegisterFlagEffect(m+3,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,2))
    end
    if lm4>0 then
    local e1_4=Effect.CreateEffect(c)
    e1_4:SetType(EFFECT_TYPE_SINGLE)
    e1_4:SetCode(EFFECT_ADD_LINK_MARKER_KOISHI)
    e1_4:SetValue(LINK_MARKER_LEFT)
    e1_4:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e1_4)
    c:ResetFlagEffect(m+12)
    c:RegisterFlagEffect(m+4,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,3))
    end
    if lm5>0 then
    local e1_5=Effect.CreateEffect(c)
    e1_5:SetType(EFFECT_TYPE_SINGLE)
    e1_5:SetCode(EFFECT_ADD_LINK_MARKER_KOISHI)
    e1_5:SetValue(LINK_MARKER_RIGHT)
    e1_5:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e1_5)
    c:ResetFlagEffect(m+13)
    c:RegisterFlagEffect(m+5,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,4))
    end
    if lm6>0 then
    local e1_6=Effect.CreateEffect(c)
    e1_6:SetType(EFFECT_TYPE_SINGLE)
    e1_6:SetCode(EFFECT_ADD_LINK_MARKER_KOISHI)
    e1_6:SetValue(LINK_MARKER_BOTTOM_LEFT)
    e1_6:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e1_6)
    c:ResetFlagEffect(m+14)
    c:RegisterFlagEffect(m+6,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5))
    end
    if lm7>0 then
    local e1_7=Effect.CreateEffect(c)
    e1_7:SetType(EFFECT_TYPE_SINGLE)
    e1_7:SetCode(EFFECT_ADD_LINK_MARKER_KOISHI)
    e1_7:SetValue(LINK_MARKER_BOTTOM)
    e1_7:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e1_7)
    c:ResetFlagEffect(m+15)
    c:RegisterFlagEffect(m+7,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,6))
    end
    if lm8>0 then
    local e1_8=Effect.CreateEffect(c)
    e1_8:SetType(EFFECT_TYPE_SINGLE)
    e1_8:SetCode(EFFECT_ADD_LINK_MARKER_KOISHI)
    e1_8:SetValue(LINK_MARKER_BOTTOM_RIGHT)
    e1_8:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e1_8)
    c:ResetFlagEffect(m+16)
    c:RegisterFlagEffect(m+8,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,7))
    end
    end--(>5;<=4)
    end--(end)
    function cm.tgcost(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    local tc=Duel.GetFirstTarget()
    local lm1=0
    local lm2=0
    local lm3=0
    local lm4=0
    local lm5=0
    local lm6=0
    local lm7=0
    local lm8=0
    if c:IsLinkMarker(LINK_MARKER_TOP_RIGHT) then lm1=lm1+1 end
    if c:IsLinkMarker(LINK_MARKER_TOP_LEFT) then lm2=lm2+1 end
    if c:IsLinkMarker(LINK_MARKER_TOP) then lm3=lm3+1 end
    if c:IsLinkMarker(LINK_MARKER_LEFT) then lm4=lm4+1 end
    if c:IsLinkMarker(LINK_MARKER_RIGHT) then lm5=lm5+1 end
    if c:IsLinkMarker(LINK_MARKER_BOTTOM_LEFT) then lm6=lm6+1 end
    if c:IsLinkMarker(LINK_MARKER_BOTTOM) then lm7=lm7+1 end
    if c:IsLinkMarker(LINK_MARKER_BOTTOM_RIGHT) then lm8=lm8+1 end
    if chk==0 then return lm1+lm2+lm3+lm4+lm5+lm6+lm7+lm8>=1 end
    local off=1
    local ops={}
    local opval={}
    if lm1>0 then
    ops[off]=aux.Stringid(m,0)
    opval[off-1]=1
    off=off+1
    end
    if lm2>0 then
    ops[off]=aux.Stringid(m,1)
    opval[off-1]=2
    off=off+1
    end
    if lm3>0 then
    ops[off]=aux.Stringid(m,2)
    opval[off-1]=3
    off=off+1
    end
    if lm4>0 then
    ops[off]=aux.Stringid(m,3)
    opval[off-1]=4
    off=off+1
    end
    if lm5>0 then
    ops[off]=aux.Stringid(m,4)
    opval[off-1]=5
    off=off+1
    end
    if lm6>0 then
    ops[off]=aux.Stringid(m,5)
    opval[off-1]=6
    off=off+1
    end
    if lm7>0 then
    ops[off]=aux.Stringid(m,6)
    opval[off-1]=7
    off=off+1
    end
    if lm8>0 then
    ops[off]=aux.Stringid(m,7)
    opval[off-1]=8
    off=off+1
    end
    if off==1 then return end
    local op=Duel.SelectOption(tp,table.unpack(ops))
    if opval[op]==1 then
    local e0_1=Effect.CreateEffect(c)
    e0_1:SetType(EFFECT_TYPE_SINGLE)
    e0_1:SetCode(EFFECT_REMOVE_LINK_MARKER_KOISHI)
    e0_1:SetValue(LINK_MARKER_TOP_RIGHT)--没有问题
    e0_1:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e0_1)
    c:ResetFlagEffect(m+1)
    c:RegisterFlagEffect(m+9,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,8))
    elseif opval[op]==2 then
    local e0_2=Effect.CreateEffect(c)
    e0_2:SetType(EFFECT_TYPE_SINGLE)
    e0_2:SetCode(EFFECT_REMOVE_LINK_MARKER_KOISHI)
    e0_2:SetValue(LINK_MARKER_TOP_LEFT)--没有问题
    e0_2:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e0_2)
    c:ResetFlagEffect(m+2)
    c:RegisterFlagEffect(m+10,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,9))
    elseif opval[op]==3 then
    local e0_3=Effect.CreateEffect(c)
    e0_3:SetType(EFFECT_TYPE_SINGLE)
    e0_3:SetCode(EFFECT_REMOVE_LINK_MARKER_KOISHI)
    e0_3:SetValue(LINK_MARKER_TOP)--没有问题
    e0_3:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e0_3)
    c:ResetFlagEffect(m+3)
    c:RegisterFlagEffect(m+11,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,10))
    elseif opval[op]==4 then
    local e0_4=Effect.CreateEffect(c)
    e0_4:SetType(EFFECT_TYPE_SINGLE)
    e0_4:SetCode(EFFECT_REMOVE_LINK_MARKER_KOISHI)
    e0_4:SetValue(LINK_MARKER_LEFT)--没有问题
    e0_4:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e0_4)
    c:ResetFlagEffect(m+4)
    c:RegisterFlagEffect(m+12,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,11))
    elseif opval[op]==5 then
    local e0_5=Effect.CreateEffect(c)
    e0_5:SetType(EFFECT_TYPE_SINGLE)
    e0_5:SetCode(EFFECT_REMOVE_LINK_MARKER_KOISHI)
    e0_5:SetValue(LINK_MARKER_RIGHT)
    e0_5:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e0_5)
    c:ResetFlagEffect(m+5)
    c:RegisterFlagEffect(m+13,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,12))
    elseif opval[op]==6 then
    local e0_6=Effect.CreateEffect(c)
    e0_6:SetType(EFFECT_TYPE_SINGLE)
    e0_6:SetCode(EFFECT_REMOVE_LINK_MARKER_KOISHI)
    e0_6:SetValue(LINK_MARKER_BOTTOM_LEFT)
    e0_6:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e0_6)
    c:ResetFlagEffect(m+6)
    c:RegisterFlagEffect(m+14,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,13))
    elseif opval[op]==7 then
    local e0_7=Effect.CreateEffect(c)
    e0_7:SetType(EFFECT_TYPE_SINGLE)
    e0_7:SetCode(EFFECT_REMOVE_LINK_MARKER_KOISHI)
    e0_7:SetValue(LINK_MARKER_BOTTOM)
    e0_7:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e0_7)
    c:ResetFlagEffect(m+7)
    c:RegisterFlagEffect(m+15,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,14))
    elseif opval[op]==8 then
    local e0_8=Effect.CreateEffect(c)
    e0_8:SetType(EFFECT_TYPE_SINGLE)
    e0_8:SetCode(EFFECT_REMOVE_LINK_MARKER_KOISHI)
    e0_8:SetValue(LINK_MARKER_BOTTOM_RIGHT)
    e0_8:SetReset(RESET_EVENT+0x7e0000)
    c:RegisterEffect(e0_8)
    c:ResetFlagEffect(m+8)
    c:RegisterFlagEffect(m+16,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,15))
    end--(op)
    end
    function cm.gyfilter(c,g)
    return g:IsContains(c)
    end
    function cm.gytg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil,tp) end
    Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,0,1-tp,LOCATION_ONFIELD)
    end
    function cm.gyop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local pg=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,tp)
    if pg:GetCount()==0 then return end
    local pc=pg:GetFirst()
    local g=Duel.GetMatchingGroup(cm.gyfilter,tp,0,LOCATION_ONFIELD,nil,pc:GetColumnGroup())
    if pc:GetControler()~=c:GetControler() then
    g:AddCard(pc)
    Duel.SendtoGrave(g,REASON_EFFECT)
    else
    Duel.SendtoGrave(g,REASON_EFFECT)
    end
    end
    function cm.indtg(e,c)
    return c~=e:GetHandler()
    end
    function cm.lscon(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetTurnPlayer()~=tp
    end
    function cm.exspfilter(c,e,tp)
    return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsCode(183120)
    and c:IsLocation(LOCATION_EXTRA) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
    end
    function cm.lsop(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(math.ceil(c:GetAttack()/2))
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e1)
    Duel.BreakEffect()
    local lm1=0
    local lm2=0
    local lm3=0
    local lm4=0
    local lm5=0
    local lm6=0
    local lm7=0
    local lm8=0
    if c:IsLinkMarker(LINK_MARKER_TOP_RIGHT) then lm1=lm1+1 end
    if c:IsLinkMarker(LINK_MARKER_TOP_LEFT) then lm2=lm2+1 end
    if c:IsLinkMarker(LINK_MARKER_TOP) then lm3=lm3+1 end
    if c:IsLinkMarker(LINK_MARKER_LEFT) then lm4=lm4+1 end
    if c:IsLinkMarker(LINK_MARKER_RIGHT) then lm5=lm5+1 end
    if c:IsLinkMarker(LINK_MARKER_BOTTOM_LEFT) then lm6=lm6+1 end
    if c:IsLinkMarker(LINK_MARKER_BOTTOM) then lm7=lm7+1 end
    if c:IsLinkMarker(LINK_MARKER_BOTTOM_RIGHT) then lm8=lm8+1 end
    if lm1+lm2+lm3+lm4+lm5+lm6+lm7+lm8<1 or c:GetBaseAttack()<=2500 then
    Duel.SendtoDeck(c,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    Duel.Hint(24,0,aux.Stringid(m,10))
    Duel.Hint(24,0,aux.Stringid(m,10))
    Duel.Hint(24,0,aux.Stringid(m,10))
    end
    end
    expansions/script/c183465.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·
    local m=183465
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    c:SetUniqueOnField(1,0,m)
    --link summon
    c:EnableReviveLimit()
    aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkSetCard,0xc19),2,99)
    --immune
    local e6=Effect.CreateEffect(c)
    e6:SetType(EFFECT_TYPE_SINGLE)
    e6:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e6:SetRange(LOCATION_MZONE)
    e6:SetCode(EFFECT_IMMUNE_EFFECT)
    e6:SetCondition(cm.immcon)
    e6:SetValue(cm.efilter)
    c:RegisterEffect(e6)
    --change battle target
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
    e2:SetCode(EVENT_ATTACK_ANNOUNCE)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCondition(cm.cbcon)
    e2:SetOperation(cm.cbop)
    c:RegisterEffect(e2)
    --remove
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_REMOVE)
    e1:SetType(EFFECT_TYPE_QUICK_O)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCountLimit(1)
    e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
    e1:SetCondition(cm.rmcon)
    e1:SetTarget(cm.rmtg)
    e1:SetOperation(cm.rmop)
    c:RegisterEffect(e1)
    end
    function cm.immcon(e)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
    end
    function cm.efilter(e,te)
    return not (te:GetHandler():IsType(TYPE_FIELD) or te:GetHandler():IsType(TYPE_QUICKPLAY))
    end
    function cm.cbcon(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetTurnPlayer()~=tp and Duel.GetAttackTarget()~=e:GetHandler()
    end
    ---
    ---
    ---
    ---
    ---
    ---
    function cm.cbop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local atkwtf=math.floor((c:GetAttack()-3500)/1000)
    local atkmax=atkwtf*4
    if c:IsRelateToEffect(e) then
    local at=Duel.GetAttacker()
    if not KanKan.resultnumber then
    local result=0
    local g=Duel.GetFieldGroup(0,0xff,0xff):RandomSelect(0,8)
    local ct={}
    local c=g:GetFirst()
    for i=0,7 do
    ct[c]=i
    c=g:GetNext()
    end
    for i=0,10 do
    result=result+(ct[g:RandomSelect(2,1):GetFirst()]<<(3*i))
    end
    g:DeleteGroup()
    KanKan.resultnumber=result&0xffffffff
    end
    local dice1=KanKan.odds(1,10)
    e:GetHandler():SetTurnCounter(dice1)
    local dice2=KanKan.odds(1,10)
    e:GetHandler():SetTurnCounter(dice2)
    local c=e:GetHandler()
    if c:IsFaceup() and c:IsRelateToEffect(e) then
    if dice1==10 and dice2~=10 then dice1=0 end
    if dice1~=10 and dice2==10 then dice2=0 end
    local x=(dice1*10)+dice2
    if dice1==10 and dice2==10 then x=100 end
    if x>60-atkmax then
    if at:IsAttackable() and not at:IsImmuneToEffect(e) then
    Duel.CalculateDamage(at,c)
    end
    end
    end
    end
    end
    function cm.rmcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():GetFlagEffect(m)==0
    end
    function cm.tfilter2(c)
    return not c:IsLocation(LOCATION_SZONE) or c:GetSequence()<5
    end
    function cm.seqfilter2(c,seq)
    local loc=LOCATION_MZONE
    if seq>8 then
    loc=LOCATION_SZONE
    seq=seq-8
    end
    if seq>=5 and seq<=7 then return false end
    local cseq=c:GetSequence()
    local cloc=c:GetLocation()
    if cloc==LOCATION_SZONE and cseq>=5 then return false end
    if cloc==LOCATION_MZONE and cseq>=5 and loc==LOCATION_MZONE
    and (seq==1 and cseq==5 or seq==3 and cseq==6) then return true end
    return cseq==seq or cloc==loc and math.abs(cseq-seq)==1
    end
    function cm.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.tfilter2,tp,0,LOCATION_ONFIELD,1,nil) end
    local filter=0
    for i=0,16 do
    if not Duel.IsExistingMatchingCard(cm.seqfilter2,tp,0,LOCATION_ONFIELD,1,nil,i) then
    filter=filter|1<<(i+16)
    end
    end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
    local flag=Duel.SelectField(tp,1,0,LOCATION_ONFIELD,filter)
    local seq=math.log(flag>>16,2)
    e:SetLabel(seq)
    local sg=Duel.GetMatchingGroup(cm.seqfilter2,tp,0,LOCATION_ONFIELD,nil,seq)
    Duel.SetOperationInfo(0,CATEGORY_DESTROY,sg,1,0,0)
    end
    function cm.rmop(e,tp,eg,ep,ev,re,r,rp)
    local seq=e:GetLabel()
    local dg=Duel.GetMatchingGroup(cm.seqfilter2,tp,0,LOCATION_ONFIELD,nil,seq)
    if dg:GetCount()<1 then return end
    Duel.Destroy(dg,REASON_EFFECT)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) then
    c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,2)
    end
    end
    expansions/script/c183470.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·Pendragon
    local m=183470
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --link summon
    c:EnableReviveLimit()
    aux.AddLinkProcedure(c,nil,3,99,cm.lcheck)
    --atk
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_SINGLE)
    e0:SetCode(EFFECT_MATERIAL_CHECK)
    e0:SetValue(cm.valcheck)
    c:RegisterEffect(e0)
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCondition(cm.atkcon)
    e1:SetOperation(cm.atkop)
    e1:SetLabelObject(e0)
    c:RegisterEffect(e1)
    --act limit
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetRange(LOCATION_ONFIELD)
    e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e2:SetCode(EFFECT_CANNOT_ACTIVATE)
    e2:SetTargetRange(0,LOCATION_MZONE+LOCATION_HAND)
    e2:SetValue(cm.actlimit)
    c:RegisterEffect(e2)
    --disable
    local e6=Effect.CreateEffect(c)
    e6:SetType(EFFECT_TYPE_FIELD)
    e6:SetCode(EFFECT_DISABLE)
    e6:SetRange(LOCATION_ONFIELD)
    e6:SetTargetRange(0,LOCATION_MZONE+LOCATION_HAND)
    e6:SetTarget(cm.distg)
    c:RegisterEffect(e6)
    --to grave
    local e3=Effect.CreateEffect(c)
    e3:SetDescription(aux.Stringid(m,2))
    e3:SetCategory(CATEGORY_TOGRAVE)
    e3:SetType(EFFECT_TYPE_QUICK_O)
    e3:SetCode(EVENT_FREE_CHAIN)
    e3:SetRange(LOCATION_MZONE)
    e3:SetProperty(EFFECT_FLAG_NO_TURN_RESET)
    e3:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
    e3:SetCondition(cm.tgcon)
    e3:SetTarget(cm.tgtg)
    e3:SetOperation(cm.tgop)
    c:RegisterEffect(e3)
    --Revive
    local e4=Effect.CreateEffect(c)
    e4:SetDescription(aux.Stringid(m,3))
    e4:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_FIELD)
    e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e4:SetCode(EVENT_PHASE+PHASE_END)
    e4:SetRange(0xff-LOCATION_ONFIELD)
    e4:SetCountLimit(1)
    e4:SetCondition(cm.sumcon)
    e4:SetTarget(cm.sumtg)
    e4:SetOperation(cm.sumop)
    c:RegisterEffect(e4)
    local e5=Effect.CreateEffect(c)
    e5:SetDescription(aux.Stringid(m,3))
    e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e5:SetProperty(EFFECT_FLAG_DELAY)
    e5:SetCode(EVENT_DESTROYED)
    e5:SetCondition(cm.spcon)
    e5:SetOperation(cm.sumop)
    c:RegisterEffect(e5)
    end
    function cm.lcheck(g,lc)
    return g:IsExists(cm.lkfilter1,1,nil)
    end
    function cm.lkfilter1(c)
    return (c:IsLinkType(TYPE_FUSION) or c:IsLinkType(TYPE_SYNCHRO) or c:IsLinkType(TYPE_XYZ) or c:IsLinkType(TYPE_LINK)) and c:IsSetCard(0xc19)
    end
    function cm.lkfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.valcheck(e,c)
    local g=c:GetMaterial()
    local fg=g:Filter(cm.lkfilter,nil)
    local atk=0
    local tc=fg:GetFirst()
    while tc do
    local lk
    if tc:IsLevelAbove(1) then lk=tc:GetLevel()
    elseif tc:IsRankAbove(1) then lk=tc:GetRank()
    elseif tc:IsLinkAbove(1) then lk=tc:GetLink()
    end
    atk=atk+lk
    tc=fg:GetNext()
    end
    e:SetLabel(atk)
    end
    function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
    end
    function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local atk=e:GetLabelObject():GetLabel()*700
    if atk>0 then
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_SET_BASE_ATTACK)
    e1:SetValue(atk)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_DISABLE)
    c:RegisterEffect(e1)
    end
    Duel.Hint(24,0,aux.Stringid(m,12))
    Duel.Hint(24,0,aux.Stringid(m,13))
    Duel.Hint(24,0,aux.Stringid(m,14))
    end
    function cm.actlimit(e,re,tp)
    local loc=re:GetActivateLocation()
    return (loc==LOCATION_MZONE or loc==LOCATION_HAND) and re:IsActiveType(TYPE_MONSTER) and re:GetHandler():GetAttack()<e:GetHandler():GetAttack()
    end
    function cm.distg(e,c)
    return c:GetAttack()<e:GetHandler():GetAttack()
    end
    function cm.tgcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():GetBaseAttack()>=5000
    end
    function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
    local g=Duel.GetMatchingGroup(Card.IsAbleToGrave,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
    if chk==0 then return #g>0 end
    Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,#g,0,0)
    end
    function cm.tgop(e,tp,eg,ep,ev,re,r,rp)
    local g=Duel.GetMatchingGroup(Card.IsAbleToGrave,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
    if #g>0 then
    Duel.SendtoGrave(g,REASON_EFFECT)
    end
    Duel.RegisterFlagEffect(tp,m,RESET_EVENT+RESET_PHASE+PHASE_END,0,0)
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetDescription(aux.Stringid(m,3))
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
    e1:SetTargetRange(1,0)
    Duel.RegisterEffect(e1,tp)
    end
    function cm.sumcon(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetFieldGroupCount(tp,0,LOCATION_ONFIELD)>0 and Duel.GetFlagEffect(tp,m)>0
    end
    function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return c:IsPreviousLocation(LOCATION_MZONE)
    and c:IsSummonType(SUMMON_TYPE_LINK)
    and bit.band(r,REASON_EFFECT+REASON_BATTLE)~=0
    and Duel.GetFieldGroupCount(tp,0,LOCATION_ONFIELD)>0
    end
    function cm.sumtg(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
    end
    function cm.sumop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) and Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)>0 and c:IsFaceup() then
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_SET_BASE_ATTACK)
    e1:SetValue(4000)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    c:RegisterEffect(e1)
    --immune
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_IMMUNE_EFFECT)
    e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e2:SetRange(LOCATION_MZONE)
    e2:SetValue(cm.efilter)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    c:RegisterEffect(e2)
    end
    end
    function cm.efilter(e,te)
    return te:GetOwner()~=e:GetOwner()
    end
    expansions/script/c183500.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L<Armament Bulwar>
    local m=183500
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --Activate
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_ACTIVATE)
    e0:SetCode(EVENT_FREE_CHAIN)
    c:RegisterEffect(e0)
    --fusion summon
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON)
    e1:SetType(EFFECT_TYPE_QUICK_O)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetHintTiming(0,TIMING_MAIN_END)
    e1:SetRange(LOCATION_FZONE)
    e1:SetCountLimit(1,m)
    e1:SetTarget(cm.target)
    e1:SetOperation(cm.activate)
    c:RegisterEffect(e1)
    --Atk
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetCode(EFFECT_UPDATE_ATTACK)
    e2:SetRange(LOCATION_FZONE)
    e2:SetTargetRange(LOCATION_MZONE,0)
    e2:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0xc19))
    e2:SetValue(cm.val)
    c:RegisterEffect(e2)
    --Def
    local e3=e2:Clone()
    e3:SetCode(EFFECT_UPDATE_DEFENSE)
    c:RegisterEffect(e3)
    --reduce battle damage
    local e4=Effect.CreateEffect(c)
    e4:SetType(EFFECT_TYPE_FIELD)
    e4:SetCode(EFFECT_CHANGE_BATTLE_DAMAGE)
    e4:SetRange(LOCATION_FZONE)
    e4:SetTargetRange(LOCATION_MZONE,0)
    e4:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0xc19))
    e4:SetValue(aux.ChangeBattleDamage(1,HALF_DAMAGE))
    c:RegisterEffect(e4)
    end
    function cm.val(e,c)
    return math.abs(Duel.GetLP(0)-Duel.GetLP(1))
    end
    function cm.filter0(c)
    return c:IsOnField() and c:IsAbleToDeck()
    end
    function cm.filter1(c,e)
    return c:IsOnField() and c:IsAbleToDeck() and not c:IsImmuneToEffect(e)
    end
    function cm.filter2(c,e,tp,m,f,chkf)
    return c:IsType(TYPE_FUSION) and c:IsSetCard(0xc19) and (not f or f(c))
    and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf)
    end
    function cm.filter3(c)
    return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToDeck()
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then
    local chkf=tp
    local mg1=Duel.GetFusionMaterial(tp):Filter(cm.filter0,nil)
    local mg2=Duel.GetMatchingGroup(cm.filter3,tp,LOCATION_GRAVE,0,nil)
    mg1:Merge(mg2)
    local res=Duel.IsExistingMatchingCard(cm.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf)
    if not res then
    local ce=Duel.GetChainMaterial(tp)
    if ce~=nil then
    local fgroup=ce:GetTarget()
    local mg3=fgroup(ce,e,tp)
    local mf=ce:GetValue()
    res=Duel.IsExistingMatchingCard(cm.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg3,mf,chkf)
    end
    end
    return res
    end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_ONFIELD+LOCATION_GRAVE)
    end
    function cm.activate(e,tp,eg,ep,ev,re,r,rp)
    local chkf=tp
    local mg1=Duel.GetFusionMaterial(tp):Filter(cm.filter1,nil,e)
    local mg2=Duel.GetMatchingGroup(cm.filter3,tp,LOCATION_GRAVE,0,nil)
    mg1:Merge(mg2)
    local sg1=Duel.GetMatchingGroup(cm.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf)
    local mg3=nil
    local sg2=nil
    local ce=Duel.GetChainMaterial(tp)
    if ce~=nil then
    local fgroup=ce:GetTarget()
    mg3=fgroup(ce,e,tp)
    local mf=ce:GetValue()
    sg2=Duel.GetMatchingGroup(cm.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg3,mf,chkf)
    end
    if sg1:GetCount()>0 or (sg2~=nil and sg2:GetCount()>0) then
    local sg=sg1:Clone()
    if sg2 then sg:Merge(sg2) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local tg=sg:Select(tp,1,1,nil)
    local tc=tg:GetFirst()
    if sg1:IsContains(tc) and (sg2==nil or not sg2:IsContains(tc) or not Duel.SelectYesNo(tp,ce:GetDescription())) then
    local mat1=Duel.SelectFusionMaterial(tp,tc,mg1,nil,chkf)
    tc:SetMaterial(mat1)
    Duel.SendtoDeck(mat1,nil,2,REASON_EFFECT+REASON_MATERIAL+REASON_FUSION)
    Duel.BreakEffect()
    Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
    else
    local mat2=Duel.SelectFusionMaterial(tp,tc,mg3,nil,chkf)
    local fop=ce:GetOperation()
    fop(ce,e,tp,tc,mat2)
    end
    tc:CompleteProcedure()
    end
    end
    \ No newline at end of file
    expansions/script/c183505.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L A!A!A!
    local m=183505
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
    e1:SetTarget(cm.target)
    e1:SetOperation(cm.activate)
    c:RegisterEffect(e1)
    --Destroy replace
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
    e2:SetCode(EFFECT_DESTROY_REPLACE)
    e2:SetRange(LOCATION_GRAVE)
    e2:SetCountLimit(1)
    e2:SetTarget(cm.reptg)
    e2:SetValue(cm.repval)
    c:RegisterEffect(e2)
    end
    function cm.filter(c,e,tp)
    return c:IsSetCard(0xc19) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and cm.filter(chkc,e,tp) end
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsExistingTarget(cm.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectTarget(tp,cm.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
    end
    function cm.activate(e,tp,eg,ep,ev,re,r,rp)
    local tc=Duel.GetFirstTarget()
    if tc:IsRelateToEffect(e) then
    Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
    end
    end
    function cm.repfilter(c,tp)
    return c:IsLocation(LOCATION_SZONE) and c:GetSequence()<5 and c:IsControler(tp) and c:IsFaceup() and c:IsSetCard(0xc19) and c:GetReasonPlayer()==1-tp
    and c:IsReason(REASON_EFFECT) and not c:IsReason(REASON_REPLACE)
    end
    function cm.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():IsAbleToRemove() and eg:IsExists(cm.repfilter,1,nil,tp) end
    if Duel.SelectEffectYesNo(tp,e:GetHandler(),96) then
    Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT)
    return true
    else return false end
    end
    function cm.repval(e,c)
    return cm.repfilter(c,e:GetHandlerPlayer())
    end
    expansions/script/c183510.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L<Eclipse>
    local m=183510
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --Activate
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_ACTIVATE)
    e0:SetCode(EVENT_FREE_CHAIN)
    c:RegisterEffect(e0)
    --special summon
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_QUICK_O)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetHintTiming(0,TIMING_MAIN_END)
    e1:SetRange(LOCATION_FZONE)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.spcost)
    e1:SetCondition(cm.spcon1)
    e1:SetTarget(cm.sptg)
    e1:SetOperation(cm.spop)
    c:RegisterEffect(e1)
    --special summon
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetCategory(CATEGORY_DRAW)
    e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e2:SetRange(LOCATION_FZONE)
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e2:SetCode(EVENT_PHASE+PHASE_END)
    e2:SetCountLimit(1,m+1)
    e2:SetCost(cm.drcost)
    e2:SetCondition(cm.drcon)
    e2:SetTarget(cm.drtg)
    e2:SetOperation(cm.drop)
    c:RegisterEffect(e2)
    end
    function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
    e:SetLabel(100)
    return true
    end
    function cm.spcon1(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
    end
    function cm.cfilter1(c)
    return c:IsSetCard(0xc19) and c:IsAbleToRemoveAsCost() and c:IsType(TYPE_MONSTER)
    end
    function cm.fselect(g,tg)
    return tg:IsExists(Card.IsLink,1,nil,#g)
    end
    function cm.spfilter(c,e,tp)
    return c:IsType(TYPE_LINK) and c:IsSetCard(0xc19)
    and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    local cg=Duel.GetMatchingGroup(cm.cfilter1,tp,LOCATION_GRAVE+LOCATION_HAND,0,nil)
    local tg=Duel.GetMatchingGroup(cm.spfilter,tp,LOCATION_EXTRA,0,nil,e,tp)
    local _,maxlink=tg:GetMaxGroup(Card.GetLink)
    if chk==0 then
    if e:GetLabel()~=100 then return false end
    e:SetLabel(0)
    if #tg==0 then return false end
    return cg:CheckSubGroup(cm.fselect,1,maxlink,tg)
    end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
    local rg=cg:SelectSubGroup(tp,cm.fselect,false,1,maxlink,tg)
    Duel.Remove(rg,POS_FACEUP,REASON_COST)
    e:SetLabel(rg:GetCount())
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function cm.spfilter1(c,e,tp,lk)
    return cm.spfilter(c,e,tp) and c:IsLink(lk)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    local lk=e:GetLabel()
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.spfilter1,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,lk)
    local tc=g:GetFirst()
    if tc then
    Duel.SpecialSummon(tc,SUMMON_TYPE_LINK,tp,tp,false,false,POS_FACEUP)
    tc:CompleteProcedure()
    end
    end
    function cm.cfilter2(c)
    return c:IsSetCard(0xc19) and (c:IsAbleToDeckAsCost() or c:IsAbleToExtraAsCost())
    end
    function cm.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter2,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,2,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local g=Duel.SelectMatchingCard(tp,cm.cfilter2,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,2,2,nil)
    Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_COST)
    end
    function cm.drcon(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetTurnPlayer()==tp
    end
    function cm.drtg(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 cm.drop(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
    expansions/script/c183515.lua deleted 100644 → 0
    View file @ f4a33404
    --
    local m=183515
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --Activate
    local e0=Effect.CreateEffect(c)
    e0:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
    e0:SetType(EFFECT_TYPE_ACTIVATE)
    e0:SetCode(EVENT_FREE_CHAIN)
    e0:SetCountLimit(1,m)
    e0:SetCondition(cm.condition)
    e0:SetOperation(cm.activate)
    c:RegisterEffect(e0)
    --to hand
    local e1=Effect.CreateEffect(c)
    e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e1:SetCode(EVENT_TO_GRAVE)
    e1:SetProperty(EFFECT_FLAG_DELAY)
    e1:SetCountLimit(1,m)
    e1:SetTarget(cm.thtg)
    e1:SetOperation(cm.thop)
    c:RegisterEffect(e1)
    --recover
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetCategory(CATEGORY_RECOVER)
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
    e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e2:SetRange(LOCATION_SZONE)
    e2:SetCode(EVENT_BATTLE_DAMAGE)
    e2:SetCountLimit(1)
    e2:SetCondition(cm.reccon)
    e2:SetTarget(cm.rectg)
    e2:SetOperation(cm.recop)
    c:RegisterEffect(e2)
    end
    function cm.cfilter(c)
    return c:IsFaceup() and c:IsSetCard(0xc19) and c:IsType(TYPE_MONSTER)
    end
    function cm.condition(e,tp,eg,ep,ev,re,r,rp)
    return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_MZONE,0,1,nil)
    end
    function cm.thfilter(c)
    return c:IsSetCard(0xc19) and c:IsAbleToHand()
    end
    function cm.activate(e,tp,eg,ep,ev,re,r,rp)
    local g=Duel.GetMatchingGroup(cm.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,nil)
    if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local sg=g:Select(tp,1,1,nil)
    Duel.SendtoHand(sg,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,sg)
    end
    end
    function cm.thfilter(c)
    return c:IsSetCard(0xc19) and c:IsAbleToHand()
    end
    function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
    end
    function cm.thop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_DECK,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.SendtoHand(g,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,g)
    end
    end
    function cm.reccon(e,tp,eg,ep,ev,re,r,rp)
    return ep~=tp and eg:GetFirst():IsControler(tp) and eg:GetFirst():IsSetCard(0xc19)
    end
    function cm.rectg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return true end
    Duel.SetTargetPlayer(tp)
    Duel.SetTargetParam(ev)
    Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,ev)
    end
    function cm.recop(e,tp,eg,ep,ev,re,r,rp)
    local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
    Duel.Recover(p,d,REASON_EFFECT)
    end
    \ No newline at end of file
    expansions/script/c183520.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·B-5［Vulture］
    local m=183520
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetCategory(CATEGORY_DESTROY)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetCondition(cm.condition)
    e1:SetTarget(cm.target)
    e1:SetOperation(cm.activate)
    c:RegisterEffect(e1)
    end
    function cm.cfilter(c)
    return c:IsFaceup() and c:IsCode(183420,183425)
    end
    function cm.condition(e,tp,eg,ep,ev,re,r,rp)
    return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_ONFIELD,0,1,nil)
    end
    function cm.filter(c)
    return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToGrave()
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,0,LOCATION_ONFIELD,1,c) end
    local g=Duel.GetMatchingGroup(cm.filter,tp,0,LOCATION_ONFIELD,c)
    Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,g:GetCount(),0,0)
    end
    function cm.activate(e,tp,eg,ep,ev,re,r,rp)
    local g=Duel.GetMatchingGroup(cm.filter,tp,0,LOCATION_ONFIELD,aux.ExceptThisCard(e))
    if g:GetCount()>0 then
    Duel.SendtoGrave(g,REASON_EFFECT)
    end
    end
    \ No newline at end of file
    expansions/script/c183525.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L<SF>
    local m=183525
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --Activate
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_ACTIVATE)
    e0:SetCode(EVENT_FREE_CHAIN)
    c:RegisterEffect(e0)
    --special summon
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_QUICK_O)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e1:SetHintTiming(0,TIMING_MAIN_END)
    e1:SetRange(LOCATION_FZONE)
    e1:SetCountLimit(1,m)
    e1:SetCondition(cm.spcon1)
    e1:SetTarget(cm.sptg)
    e1:SetOperation(cm.spop)
    c:RegisterEffect(e1)
    --Draw
    local e3=Effect.CreateEffect(c)
    e3:SetDescription(aux.Stringid(m,1))
    e3:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
    e3:SetType(EFFECT_TYPE_IGNITION)
    e3:SetRange(LOCATION_SZONE)
    e3:SetCountLimit(1,m+1)
    e3:SetTarget(cm.drawtg)
    e3:SetOperation(cm.drawop)
    c:RegisterEffect(e3)
    end
    function cm.spcon1(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
    end
    function cm.cfilter1(c)
    return c:IsSetCard(0xc19) and c:IsType(TYPE_SPELL) and c:IsCanOverlay()
    end
    function cm.fselect(g,tg)
    return tg:IsExists(Card.IsRank,1,nil,#g*4)
    end
    function cm.spfilter(c,e,tp)
    return c:IsType(TYPE_XYZ) and c:IsSetCard(0xc19)
    and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    local cg=Duel.GetMatchingGroup(cm.cfilter1,tp,LOCATION_GRAVE+LOCATION_HAND+LOCATION_REMOVED,0,nil)
    local tg=Duel.GetMatchingGroup(cm.spfilter,tp,LOCATION_EXTRA,0,nil,e,tp)
    local _,maxrank=tg:GetMaxGroup(Card.GetRank)
    if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and cm.cfilter1(chkc) end
    if chk==0 then
    if #tg==0 then return false end
    return cg:CheckSubGroup(cm.fselect,1,maxrank,tg) and Duel.IsExistingTarget(cm.cfilter1,tp,LOCATION_GRAVE+LOCATION_HAND+LOCATION_REMOVED,0,1,nil)
    end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
    local rg=Duel.SelectTarget(tp,cm.cfilter1,tp,LOCATION_GRAVE,0,1,maxrank/4,nil)
    e:SetLabel(rg:GetCount())
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function cm.spfilter1(c,e,tp,rk)
    return cm.spfilter(c,e,tp) and c:IsRank(rk*4)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local rk=e:GetLabel()
    local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
    if not tg or tg:FilterCount(Card.IsRelateToEffect,nil,e)~=rk then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.spfilter1,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,rk)
    local tc=g:GetFirst()
    if tc then
    Duel.SpecialSummon(tc,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)
    tc:CompleteProcedure()
    Duel.Overlay(tc,Group.FromCards(tg))
    end
    end
    function cm.cfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.drawtg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsPlayerCanDraw(tp,1)
    and Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_HAND,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_HAND)
    Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
    end
    function cm.drawop(e,tp,eg,ep,ev,re,r,rp)
    local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_HAND,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.SendtoDeck(g,nil,1,REASON_EFFECT)
    Duel.BreakEffect()
    Duel.Draw(tp,1,REASON_EFFECT)
    end
    end
    expansions/script/c183530.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L<Locust>
    local m=183530
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --Activate
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_ACTIVATE)
    e0:SetCode(EVENT_FREE_CHAIN)
    c:RegisterEffect(e0)
    --special summon
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_QUICK_O)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetHintTiming(0,TIMING_MAIN_END)
    e1:SetRange(LOCATION_FZONE)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.cost)
    e1:SetCondition(cm.spcon1)
    e1:SetTarget(cm.target)
    e1:SetOperation(cm.operation)
    c:RegisterEffect(e1)
    --actlimit
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_FIELD)
    e3:SetCode(EFFECT_CANNOT_ACTIVATE)
    e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e3:SetRange(LOCATION_SZONE)
    e3:SetTargetRange(0,1)
    e3:SetValue(1)
    e3:SetCondition(cm.actcon)
    c:RegisterEffect(e3)
    end
    function cm.cfilter(c,tp)
    return c:IsFaceup() and c:IsSetCard(0xc19) and c:IsControler(tp)
    end
    function cm.actcon(e)
    local tp=e:GetHandlerPlayer()
    local a=Duel.GetAttacker()
    local d=Duel.GetAttackTarget()
    return (a and cm.cfilter(a,tp)) or (d and cm.cfilter(d,tp))
    end
    function cm.spcon1(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
    end
    function cm.tdfilter(c)
    return c:IsSetCard(0xc19) and c:IsType(TYPE_MONSTER) and c:GetLevel()>0
    and c:IsAbleToDeckOrExtraAsCost()
    and (c:IsFaceup() or c:IsLocation(LOCATION_GRAVE))
    end
    function cm.fselect(g,e,tp)
    return aux.gffcheck(g,Card.IsType,TYPE_TUNER,aux.NOT(Card.IsType),TYPE_TUNER)
    and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,g:GetSum(Card.GetLevel))
    end
    function cm.spfilter(c,e,tp,lv)
    return c:IsSetCard(0xc19) and c:IsType(TYPE_SYNCHRO) and c:IsLevel(lv) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
    and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false)
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    e:SetLabel(100)
    local g=Duel.GetMatchingGroup(cm.tdfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,nil)
    if chk==0 then
    return g:CheckSubGroup(cm.fselect,2,2,e,tp)
    end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local sg=g:SelectSubGroup(tp,cm.fselect,false,2,2,e,tp)
    e:SetLabel(sg:GetSum(Card.GetLevel))
    Duel.SendtoDeck(sg,nil,SEQ_DECKSHUFFLE,REASON_COST)
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then
    if e:GetLabel()~=100 then return false end
    e:SetLabel(0)
    return aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL)
    end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function cm.operation(e,tp,eg,ep,ev,re,r,rp)
    if not aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL) then return end
    local lv=e:GetLabel()
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local tc=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,lv):GetFirst()
    if tc then
    tc:SetMaterial(nil)
    if Duel.SpecialSummon(tc,SUMMON_TYPE_SYNCHRO,tp,tp,false,false,POS_FACEUP)>0 then
    tc:CompleteProcedure()
    end
    end
    end
    expansions/script/c183535.lua deleted 100644 → 0
    View file @ f4a33404
    --马尔特效应
    local m=183535
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetTarget(KanKan.MALRitualspelltg)
    e1:SetOperation(KanKan.MALRitualspellop)
    c:RegisterEffect(e1)
    --salvage
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,0))
    e2:SetCategory(CATEGORY_ATKCHANGE)
    e2:SetType(EFFECT_TYPE_IGNITION)
    e2:SetRange(LOCATION_GRAVE)
    e2:SetCountLimit(1,m)
    e2:SetCost(cm.thcost)
    e2:SetTarget(cm.atktg)
    e2:SetOperation(cm.atkop)
    c:RegisterEffect(e2)
    end
    function cm.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():IsAbleToDeckAsCost() end
    Duel.SendtoDeck(e:GetHandler(),nil,SEQ_DECKSHUFFLE,REASON_COST)
    end
    function cm.atkfilter(c)
    return c:IsFaceup() and c:IsSetCard(0xc19)
    end
    function cm.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.atkfilter,tp,LOCATION_MZONE,0,1,nil) end
    end
    function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
    local g=Duel.GetMatchingGroup(cm.atkfilter,tp,LOCATION_MZONE,0,nil)
    local tc=g:GetFirst()
    while tc do
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_UPDATE_ATTACK)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetValue(1500)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e1)
    tc=g:GetNext()
    end
    end
    \ No newline at end of file
    expansions/script/c183540.lua deleted 100644 → 0
    View file @ f4a33404
    --升阶魔法·来自不死鸟的呼鸣
    local m=183540
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e1:SetTarget(cm.target)
    e1:SetOperation(cm.activate)
    c:RegisterEffect(e1)
    --salvage
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetCategory(CATEGORY_TOHAND)
    e2:SetType(EFFECT_TYPE_IGNITION)
    e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e2:SetRange(LOCATION_GRAVE)
    e2:SetCost(cm.thcost)
    e2:SetTarget(cm.thtg)
    e2:SetOperation(cm.thop)
    c:RegisterEffect(e2)
    end
    function cm.filter1(c,e,tp)
    local rk=c:GetRank()
    return c:IsFaceup() and c:IsType(TYPE_XYZ)
    and Duel.IsExistingMatchingCard(cm.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,c,rk+1)
    and aux.MustMaterialCheck(c,tp,EFFECT_MUST_BE_XMATERIAL)
    end
    function cm.filter2(c,e,tp,mc,rk)
    return c:IsRank(rk) and c:IsSetCard(0xc19) and mc:IsCanBeXyzMaterial(c)
    and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,mc,c)>0
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_MZONE) and cm.filter1(chkc,e,tp) end
    if chk==0 then return Duel.IsExistingTarget(cm.filter1,tp,LOCATION_MZONE,0,1,nil,e,tp) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
    Duel.SelectTarget(tp,cm.filter1,tp,LOCATION_MZONE,0,1,1,nil,e,tp)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function cm.activate(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(24,0,aux.Stringid(m,12))
    Duel.Hint(24,0,aux.Stringid(m,13))
    Duel.Hint(24,0,aux.Stringid(m,14))
    local tc=Duel.GetFirstTarget()
    if not aux.MustMaterialCheck(tc,tp,EFFECT_MUST_BE_XMATERIAL) then return end
    if tc:IsFacedown() or not tc:IsRelateToEffect(e) or tc:IsControler(1-tp) or tc:IsImmuneToEffect(e) then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.filter2,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,tc,tc:GetRank()+1)
    local sc=g:GetFirst()
    if sc then
    local mg=tc:GetOverlayGroup()
    if mg:GetCount()~=0 then
    Duel.Overlay(sc,mg)
    end
    sc:SetMaterial(Group.FromCards(tc))
    Duel.Overlay(sc,Group.FromCards(tc))
    Duel.SpecialSummon(sc,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)
    sc:CompleteProcedure()
    end
    end
    function cm.cfilter(c)
    return c:IsSetCard(0xc19) and c:IsAbleToRemoveAsCost()
    end
    function cm.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost()
    and Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_GRAVE,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
    local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_GRAVE,0,1,1,nil)
    g:AddCard(e:GetHandler())
    Duel.Remove(g,POS_FACEUP,REASON_COST)
    end
    function cm.thfilter(c)
    return c:IsSetCard(0x95,0x15e,0xc1f) and not c:IsCode(183540) and c:IsAbleToHand()
    end
    function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and cm.thfilter(chkc) end
    if chk==0 then return Duel.IsExistingTarget(cm.thfilter,tp,LOCATION_GRAVE,0,1,e:GetHandler()) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectTarget(tp,cm.thfilter,tp,LOCATION_GRAVE,0,1,1,e:GetHandler())
    Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
    end
    function cm.thop(e,tp,eg,ep,ev,re,r,rp)
    local tc=Duel.GetFirstTarget()
    if tc:IsRelateToEffect(e) then
    Duel.SendtoHand(tc,nil,REASON_EFFECT)
    end
    end
    expansions/script/c183545.lua deleted 100644 → 0
    View file @ f4a33404
    --降阶魔法·破灭性降临
    local m=183545
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e1:SetTarget(cm.target)
    e1:SetOperation(cm.activate)
    c:RegisterEffect(e1)
    --material
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e2:SetCode(EVENT_SPSUMMON_SUCCESS)
    e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
    e2:SetRange(LOCATION_GRAVE)
    e2:SetCountLimit(1,m)
    e2:SetCondition(cm.matcon)
    e2:SetTarget(cm.mattg)
    e2:SetOperation(cm.matop)
    c:RegisterEffect(e2)
    end
    function cm.filter1(c,e,tp)
    local rk=c:GetRank()
    return c:IsFaceup() and c:IsType(TYPE_XYZ)
    and Duel.IsExistingMatchingCard(cm.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,c,rk-1)
    and aux.MustMaterialCheck(c,tp,EFFECT_MUST_BE_XMATERIAL)
    end
    function cm.filter2(c,e,tp,mc,rk)
    return c:IsRank(rk) and c:IsSetCard(0xc19) and mc:IsCanBeXyzMaterial(c)
    and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,mc,c)>0
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_MZONE) and cm.filter1(chkc,e,tp) end
    if chk==0 then return Duel.IsExistingTarget(cm.filter1,tp,LOCATION_MZONE,0,1,nil,e,tp) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
    Duel.SelectTarget(tp,cm.filter1,tp,LOCATION_MZONE,0,1,1,nil,e,tp)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function cm.activate(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local tc=Duel.GetFirstTarget()
    if not aux.MustMaterialCheck(tc,tp,EFFECT_MUST_BE_XMATERIAL) then return end
    if tc:IsFacedown() or not tc:IsRelateToEffect(e) or tc:IsControler(1-tp) or tc:IsImmuneToEffect(e) then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.filter2,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,tc,tc:GetRank()-1)
    local sc=g:GetFirst()
    if sc then
    local mg=tc:GetOverlayGroup()
    if mg:GetCount()~=0 then
    Duel.Overlay(sc,mg)
    end
    sc:SetMaterial(Group.FromCards(tc))
    Duel.Overlay(sc,Group.FromCards(tc))
    Duel.SpecialSummon(sc,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)
    sc:CompleteProcedure()
    if c:IsRelateToEffect(e) then
    c:CancelToGrave()
    Duel.Overlay(sc,Group.FromCards(c))
    end
    --to grave
    local e5=Effect.CreateEffect(sc)
    e5:SetCategory(CATEGORY_TOGRAVE)
    e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e5:SetCode(EVENT_ATTACK_ANNOUNCE)
    e5:SetRange(LOCATION_MZONE)
    e5:SetReset(RESET_EVENT+RESETS_STANDARD)
    e5:SetTarget(cm.tgtg)
    e5:SetOperation(cm.tgop)
    sc:RegisterEffect(e5)
    if not sc:IsType(TYPE_EFFECT) then
    local e6=Effect.CreateEffect(c)
    e6:SetType(EFFECT_TYPE_SINGLE)
    e6:SetCode(EFFECT_ADD_TYPE)
    e6:SetValue(TYPE_EFFECT)
    e6:SetReset(RESET_EVENT+RESETS_STANDARD)
    sc:RegisterEffect(e6)
    end
    sc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,0))
    end
    end
    function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
    local g=Duel.GetFieldGroup(tp,0,LOCATION_MZONE)
    if chk==0 then return g:GetCount()>0 end
    Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,1-tp,LOCATION_MZONE)
    end
    function cm.tgop(e,tp,eg,ep,ev,re,r,rp)
    local g=Duel.GetFieldGroup(tp,0,LOCATION_MZONE)
    if g:GetCount()>0 then
    Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_TOGRAVE)
    local sg=g:Select(1-tp,1,1,nil)
    Duel.HintSelection(sg)
    Duel.SendtoGrave(sg,REASON_RULE)
    end
    end
    function cm.cfilter(c,e)
    return c:IsFaceup() and c:IsType(TYPE_XYZ) and c:IsCanBeEffectTarget(e)
    end
    function cm.matcon(e,tp,eg,ep,ev,re,r,rp)
    local rc=re:GetHandler()
    return rc and re:IsActivated() and rc:IsType(TYPE_XYZ) and rc:IsRankAbove(9) and rc:IsSetCard(0xc19) and eg:IsExists(cm.cfilter,1,nil,e)
    end
    function cm.tgfilter(c,eg)
    return eg:IsContains(c) and c:IsFaceup() and c:IsType(TYPE_XYZ)
    end
    function cm.mattg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_MZONE) and cm.tgfilter(chkc,eg) end
    if chk==0 then return Duel.IsExistingTarget(cm.tgfilter,tp,LOCATION_MZONE,0,1,nil,eg)
    and e:GetHandler():IsCanOverlay() end
    if eg:GetCount()==1 then
    Duel.SetTargetCard(eg)
    else
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
    Duel.SelectTarget(tp,cm.tgfilter,tp,LOCATION_MZONE,0,1,1,nil,eg)
    end
    Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
    end
    function cm.matop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local tc=Duel.GetFirstTarget()
    if c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) and not tc:IsImmuneToEffect(e) then
    Duel.Overlay(tc,Group.FromCards(c))
    end
    end
    expansions/script/c183550.lua deleted 100644 → 0
    View file @ f4a33404
    --同阶魔法·引力转变
    local m=183550
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e1:SetTarget(cm.target)
    e1:SetOperation(cm.activate)
    c:RegisterEffect(e1)
    --salvage
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,0))
    e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_IGNITION)
    e2:SetRange(LOCATION_GRAVE)
    e2:SetCountLimit(1,m)
    e2:SetCost(cm.thcost)
    e2:SetTarget(cm.tg)
    e2:SetOperation(cm.op)
    c:RegisterEffect(e2)
    end
    function cm.filter1(c,e,tp)
    local rk=c:GetRank()
    return c:IsFaceup() and c:IsType(TYPE_XYZ) and c:IsSetCard(0xc19)
    and Duel.IsExistingMatchingCard(cm.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,c,rk)
    and aux.MustMaterialCheck(c,tp,EFFECT_MUST_BE_XMATERIAL)
    end
    function cm.filter2(c,e,tp,mc,rk)
    return c:IsRank(rk) and c:IsAttribute(ATTRIBUTE_WIND) and mc:IsCanBeXyzMaterial(c)
    and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,mc,c)>0
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_MZONE) and cm.filter1(chkc,e,tp) end
    if chk==0 then return Duel.IsExistingTarget(cm.filter1,tp,LOCATION_MZONE,0,1,nil,e,tp) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
    Duel.SelectTarget(tp,cm.filter1,tp,LOCATION_MZONE,0,1,1,nil,e,tp)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function cm.activate(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local tc=Duel.GetFirstTarget()
    if not aux.MustMaterialCheck(tc,tp,EFFECT_MUST_BE_XMATERIAL) then return end
    if tc:IsFacedown() or not tc:IsRelateToEffect(e) or tc:IsControler(1-tp) or tc:IsImmuneToEffect(e) then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.filter2,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,tc,tc:GetRank())
    local sc=g:GetFirst()
    if sc then
    local mg=tc:GetOverlayGroup()
    if mg:GetCount()~=0 then
    Duel.Overlay(sc,mg)
    end
    sc:SetMaterial(Group.FromCards(tc))
    Duel.Overlay(sc,Group.FromCards(tc))
    Duel.SpecialSummon(sc,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)
    sc:CompleteProcedure()
    if c:IsRelateToEffect(e) then
    c:CancelToGrave()
    Duel.Overlay(sc,Group.FromCards(c))
    end
    end
    end
    function cm.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():IsAbleToDeckAsCost() end
    Duel.SendtoDeck(e:GetHandler(),nil,SEQ_DECKSHUFFLE,REASON_COST)
    end
    function cm.filter10(c,e,tp)
    local rk=c:GetRank()
    return c:IsFaceup() and c:IsType(TYPE_XYZ) and not c:IsAttribute(ATTRIBUTE_WATER)
    and Duel.IsExistingMatchingCard(cm.filter20,tp,LOCATION_EXTRA,0,1,nil,e,tp,c,rk)
    and aux.MustMaterialCheck(c,tp,EFFECT_MUST_BE_XMATERIAL)
    end
    function cm.filter20(c,e,tp,mc,rk)
    return c:IsRank(rk) and c:IsAttribute(ATTRIBUTE_WATER) and mc:IsCanBeXyzMaterial(c)
    and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,mc,c)>0
    end
    function cm.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_MZONE) and cm.filter10(chkc,e,tp) end
    if chk==0 then return Duel.IsExistingTarget(cm.filter10,tp,LOCATION_MZONE,0,1,nil,e,tp) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
    Duel.SelectTarget(tp,cm.filter10,tp,LOCATION_MZONE,0,1,1,nil,e,tp)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function cm.op(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local tc=Duel.GetFirstTarget()
    if not aux.MustMaterialCheck(tc,tp,EFFECT_MUST_BE_XMATERIAL) then return end
    if tc:IsFacedown() or not tc:IsRelateToEffect(e) or tc:IsControler(1-tp) or tc:IsImmuneToEffect(e) then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.filter20,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,tc,tc:GetRank())
    local sc=g:GetFirst()
    if sc then
    local mg=tc:GetOverlayGroup()
    if mg:GetCount()~=0 then
    Duel.Overlay(sc,mg)
    end
    sc:SetMaterial(Group.FromCards(tc))
    Duel.Overlay(sc,Group.FromCards(tc))
    Duel.SpecialSummon(sc,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)
    sc:CompleteProcedure()
    end
    end
    \ No newline at end of file
    expansions/script/c183560.lua deleted 100644 → 0
    View file @ f4a33404
    --挟持命运的赛博抽卡
    local m=183560
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetCode(EVENT_DRAW)
    e1:SetCondition(cm.regcon)
    e1:SetOperation(cm.regop)
    c:RegisterEffect(e1)
    local e2=Effect.CreateEffect(c)
    e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SEARCH+CATEGORY_TOHAND)
    e2:SetType(EFFECT_TYPE_ACTIVATE)
    e2:SetCode(EVENT_FREE_CHAIN)
    e2:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
    e2:SetCost(cm.cost)
    e2:SetCondition(cm.condition)
    e2:SetTarget(cm.target)
    e2:SetOperation(cm.activate)
    c:RegisterEffect(e2)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    end
    cm.spchecks=aux.CreateChecks(Card.IsType,{TYPE_RITUAL,TYPE_FUSION,TYPE_SYNCHRO,TYPE_XYZ,TYPE_PENDULUM,TYPE_LINK})
    function cm.counterfilter(c)
    return c:IsCode(183060)
    end
    function cm.regcon(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return Duel.GetFlagEffect(tp,m)==0 and Duel.GetCurrentPhase()==PHASE_DRAW and c:IsReason(REASON_RULE)
    end
    function cm.regop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_PUBLIC)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE)
    c:RegisterEffect(e1)
    c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,66)
    end
    end
    function cm.condition(e,tp,eg,ep,ev,re,r,rp)
    if c==nil then return true end
    local tp=c:GetControler()
    local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
    if g:GetCount()==0 then return false end
    local tg=g:GetMaxGroup(Card.GetAttack)
    return (tg:IsExists(Card.IsControler,1,nil,1-tp) or Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==0)
    and e:GetHandler():GetFlagEffect(m)~=0
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 and e:GetHandler():GetFlagEffect(m)~=0 end
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
    e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e1:SetReset(RESET_PHASE+PHASE_END)
    e1:SetTargetRange(1,0)
    e1:SetTarget(cm.splimit)
    Duel.RegisterEffect(e1,tp)
    end
    function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
    return not c:IsCode(183060)
    end
    function cm.tgfilter(c)
    return c:IsType(TYPE_MONSTER) and c:IsType(TYPE_RITUAL+TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ+TYPE_PENDULUM+TYPE_LINK)
    and c:IsAbleToGrave()
    end
    function cm.fgoal(g)
    return g:GetClassCount(Card.GetType)==#g
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
    local g=Duel.GetMatchingGroup(cm.tgfilter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA,0,nil)
    if chk==0 then return g:CheckSubGroupEach(cm.spchecks,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,6,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA)
    end
    function cm.srfilter(c)
    return c:IsCode(183060) and c:IsAbleToHand()
    end
    function cm.activate(e,tp,eg,ep,ev,re,r,rp)
    local g=Duel.GetMatchingGroup(cm.tgfilter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA,0,nil)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
    local sg=g:SelectSubGroupEach(tp,cm.spchecks,false,nil,e,tp)
    local tg=Duel.GetMatchingGroup(cm.srfilter,tp,LOCATION_DECK,0,nil)
    if sg and Duel.SendtoGrave(sg,REASON_EFFECT)>0 and sg:IsExists(Card.IsLocation,6,nil,LOCATION_GRAVE)
    and tg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
    Duel.BreakEffect()
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local tg2=Duel.SelectMatchingCard(tp,cm.srfilter,tp,LOCATION_DECK,0,1,1,nil)
    Duel.SendtoHand(tg2,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,tg2)
    end
    end
    expansions/script/c183565.lua deleted 100644 → 0
    View file @ f4a33404
    --疾步前行
    local m=183565
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetCost(cm.cost)
    e1:SetTarget(cm.target)
    e1:SetOperation(cm.activate)
    e1:SetLabel(0)
    c:RegisterEffect(e1)
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    e:SetLabel(100)
    if chk==0 then return true end
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
    local hp=Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)
    if chk==0 then
    if e:GetLabel()~=100 then return false end
    e:SetLabel(0)
    return e:IsHasType(EFFECT_TYPE_ACTIVATE) and Duel.CheckLPCost(tp,hp*1000+1000) and Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>4
    end
    e:SetLabel(0)
    Duel.PayLPCost(tp,hp*1000+1000)
    end
    function cm.filter(c)
    return (c:IsSetCard(0xc19) or c:IsRace(RACE_MACHINE)) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
    end
    function cm.activate(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)<5 then return end
    local g=Duel.GetDecktopGroup(tp,5)
    Duel.ConfirmCards(tp,g)
    if g:IsExists(cm.filter,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local sg=g:FilterSelect(tp,cm.filter,1,1,nil)
    Duel.DisableShuffleCheck()
    Duel.SendtoHand(sg,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,sg)
    Duel.ShuffleHand(tp)
    Duel.SortDecktop(tp,tp,4)
    else
    Duel.SortDecktop(tp,tp,5)
    end
    if g:IsExists(Card.IsSetCard,1,nil,0xc19) then
    local lg=g:FilterCount(Card.IsSetCard,nil,0xc19)
    if lg==0 then
    Duel.SetLP(tp,Duel.GetLP(tp)-3000)
    else
    Duel.SetLP(tp,Duel.GetLP(tp)-lg*500)
    end
    end
    end
    expansions/script/c183585.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·M7 [Gehrels]
    local m=183585
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetCategory(CATEGORY_DRAW)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e1:SetTarget(cm.target)
    e1:SetOperation(cm.activate)
    c:RegisterEffect(e1)
    end
    function cm.filter(c,e,tp)
    return c:IsSetCard(0xc19)
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and cm.filter(chkc,e,tp) end
    if chk==0 then return Duel.IsExistingTarget(cm.filter,tp,LOCATION_MZONE,0,1,nil,e,tp) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
    Duel.SelectTarget(tp,cm.filter,tp,LOCATION_MZONE,0,1,1,nil,e,tp)
    end
    function cm.activate(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local tc=Duel.GetFirstTarget()
    if tc:IsRelateToEffect(e) then
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
    e1:SetValue(1)
    tc:RegisterEffect(e1)
    --immune effect
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetCode(EFFECT_IMMUNE_EFFECT)
    e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
    e2:SetRange(LOCATION_MZONE)
    e2:SetTargetRange(LOCATION_MZONE,0)
    e2:SetTarget(cm.indtg)
    e2:SetValue(cm.efilter)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
    tc:RegisterEffect(e2,true)
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_FIELD)
    e3:SetCode(EFFECT_CHANGE_DAMAGE)
    e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e3:SetRange(LOCATION_MZONE)
    e3:SetAbsoluteRange(tp,1,0)
    e3:SetTargetRange(1,0)
    e3:SetValue(0)
    e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
    tc:RegisterEffect(e3,true)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_NO_EFFECT_DAMAGE)
    e4:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
    tc:RegisterEffect(e4,true)
    end
    end
    function cm.indtg(e,c)
    return c:IsSetCard(0xc19)
    end
    function cm.efilter(e,te)
    return not te:GetOwner():IsSetCard(0xc19)
    end
    expansions/script/c183600.lua deleted 100644 → 0
    View file @ f4a33404
    --M！A！L！Jumping！
    local m=183600
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetCategory(CATEGORY_NEGATE+CATEGORY_TODECK)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetCode(EVENT_CHAINING)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.cost)
    e1:SetCondition(cm.necon)
    e1:SetTarget(cm.netg)
    e1:SetOperation(cm.neop)
    c:RegisterEffect(e1)
    end
    function cm.cfilter(c,tp)
    return c:IsFaceup() and c:IsType(TYPE_XYZ) and c:IsSetCard(0xc19) and c:CheckRemoveOverlayCard(tp,1,REASON_COST)
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_MZONE,0,1,nil,tp) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DEATTACHFROM)
    local c=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_MZONE,0,1,1,nil,tp):GetFirst()
    c:RemoveOverlayCard(tp,1,1,REASON_COST)
    end
    function cm.necon(e,tp,eg,ep,ev,re,r,rp)
    return re:IsActiveType(TYPE_SPELL+TYPE_TRAP+TYPE_MONSTER) and Duel.IsChainNegatable(ev)
    end
    function cm.netg(e,tp,eg,ep,ev,re,r,rp,chk)
    local rc=re:GetHandler()
    if chk==0 then return Duel.IsPlayerCanSendtoDeck(tp) end
    Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
    if rc:IsRelateToEffect(re) then
    Duel.SetOperationInfo(0,CATEGORY_TODECK,eg,1,0,0)
    end
    end
    function cm.neop(e,tp,eg,ep,ev,re,r,rp)
    local rc=re:GetHandler()
    if Duel.NegateActivation(ev) and rc:IsRelateToEffect(re) then
    rc:CancelToGrave()
    Duel.SendtoDeck(rc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    end
    \ No newline at end of file
    expansions/script/c183605.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L FIRE
    local m=183605
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --activate
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetHintTiming(TIMING_DAMAGE_STEP)
    e1:SetCondition(aux.dscon)
    c:RegisterEffect(e1)
    --atk/def
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetCode(EFFECT_UPDATE_ATTACK)
    e2:SetRange(LOCATION_SZONE)
    e2:SetTargetRange(LOCATION_MZONE,0)
    e2:SetTarget(cm.atktg)
    e2:SetValue(1000)
    c:RegisterEffect(e2)
    --negate
    local e3=Effect.CreateEffect(c)
    e3:SetDescription(aux.Stringid(m,0))
    e3:SetCategory(CATEGORY_DESTROY)
    e3:SetType(EFFECT_TYPE_QUICK_O)
    e3:SetCode(EVENT_FREE_CHAIN)
    e3:SetRange(LOCATION_SZONE)
    e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e3:SetCountLimit(1,m)
    e3:SetCondition(cm.descon)
    e3:SetCost(cm.cost)
    e3:SetTarget(cm.target)
    e3:SetOperation(cm.operation)
    c:RegisterEffect(e3)
    --destroy
    local e4=Effect.CreateEffect(c)
    e4:SetDescription(aux.Stringid(m,1))
    e4:SetCategory(CATEGORY_DESTROY)
    e4:SetType(EFFECT_TYPE_QUICK_O)
    e4:SetRange(LOCATION_SZONE)
    e4:SetCode(EVENT_FREE_CHAIN)
    e4:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
    e4:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e4:SetCountLimit(1,m+1)
    e4:SetCost(cm.descost)
    e4:SetTarget(cm.destg)
    e4:SetOperation(cm.desop)
    c:RegisterEffect(e4)
    end
    function cm.atktg(e,c)
    return c:IsSetCard(0xc19)
    end
    function cm.cfilter(c)
    return c:IsFaceup() and c:IsSetCard(0xc19) and c:IsType(TYPE_MONSTER)
    end
    function cm.descon(e,tp,eg,ep,ev,re,r,rp)
    return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_MZONE,0,1,nil) and e:GetHandler():IsStatus(STATUS_EFFECT_ENABLED)
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
    Duel.SendtoGrave(e:GetHandler(),REASON_COST)
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsControler(1-tp) and chkc:IsOnField() and aux.NegateAnyFilter(chkc) end
    if chk==0 then return Duel.IsExistingTarget(aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
    local g=Duel.SelectTarget(tp,aux.NegateAnyFilter,tp,0,LOCATION_ONFIELD,1,1,nil)
    Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,1,0,0)
    end
    function cm.operation(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local tc=Duel.GetFirstTarget()
    if ((tc:IsFaceup() and not tc:IsDisabled()) or tc:IsType(TYPE_TRAPMONSTER)) and tc:IsRelateToEffect(e) then
    Duel.NegateRelatedChain(tc,RESET_TURN_SET)
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetCode(EFFECT_DISABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e1)
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e2:SetCode(EFFECT_DISABLE_EFFECT)
    e2:SetValue(RESET_TURN_SET)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e2)
    if tc:IsType(TYPE_TRAPMONSTER) then
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e3:SetCode(EFFECT_DISABLE_TRAPMONSTER)
    e3:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e3)
    end
    end
    end
    function cm.cfilter(c)
    return c:IsSetCard(0xc19) and c:IsAbleToGraveAsCost()
    end
    function cm.descost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_HAND,0,1,nil) end
    Duel.DiscardHand(tp,cm.cfilter,1,1,REASON_COST)
    end
    function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsOnField() end
    local xg=nil
    if not e:GetHandler():IsStatus(STATUS_EFFECT_ENABLED) then xg=e:GetHandler() end
    if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,xg) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
    local g=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,xg)
    Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
    end
    function cm.desop(e,tp,eg,ep,ev,re,r,rp)
    local tc=Duel.GetFirstTarget()
    if tc:IsRelateToEffect(e) then
    Duel.Destroy(tc,REASON_EFFECT)
    end
    end
    \ No newline at end of file
    expansions/script/c183610.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L{Windward Giant Bird}
    local m=183610
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetCost(cm.cost)
    e1:SetTarget(cm.target)
    e1:SetOperation(cm.activate)
    c:RegisterEffect(e1)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    --spsummon
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
    e2:SetCode(EVENT_DESTROYED)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCost(cm.cost)
    e2:SetCondition(cm.spcon)
    e2:SetTarget(cm.sptg)
    e2:SetOperation(cm.spop)
    c:RegisterEffect(e2)
    --revive
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_IGNITION)
    e3:SetRange(LOCATION_GRAVE+LOCATION_REMOVED)
    e3:SetCountLimit(1,m)
    e3:SetCost(cm.setcost)
    e3:SetTarget(cm.settg)
    e3:SetOperation(cm.setop)
    c:RegisterEffect(e3)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
    e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e1:SetReset(RESET_PHASE+PHASE_END)
    e1:SetTargetRange(1,0)
    e1:SetTarget(cm.splimit)
    Duel.RegisterEffect(e1,tp)
    end
    function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
    return not c:IsSetCard(0xc19)
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsPlayerCanSpecialSummonMonster(tp,183610,0xc19,TYPES_EFFECT_TRAP_MONSTER,1500,3500,7,RACE_MACHINE,ATTRIBUTE_WIND)
    and Duel.IsPlayerCanSpecialSummonMonster(tp,183615,0xc19,TYPES_TOKEN_MONSTER,200,200,1,RACE_MACHINE,ATTRIBUTE_WIND) end
    local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
    if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end
    Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,ft,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,ft,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
    end
    function cm.activate(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0
    or not Duel.IsPlayerCanSpecialSummonMonster(tp,183610,0xc19,TYPES_EFFECT_TRAP_MONSTER,1500,3500,7,RACE_MACHINE,ATTRIBUTE_WIND) then return end
    c:AddMonsterAttribute(TYPE_EFFECT+TYPE_TRAP)
    Duel.SpecialSummon(c,SUMMON_VALUE_SELF,tp,tp,true,false,POS_FACEUP)
    Duel.BreakEffect()
    local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
    if ft<=0 or not Duel.IsPlayerCanSpecialSummonMonster(tp,183615,0xc19,TYPES_TOKEN_MONSTER,200,200,1,RACE_MACHINE,ATTRIBUTE_WIND) then return end
    if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end
    local g=Group.CreateGroup()
    for i=1,ft do
    local token=Duel.CreateToken(tp,183615)
    Duel.SpecialSummonStep(token,0,tp,tp,false,false,POS_FACEUP)
    g:AddCard(token)
    end
    local tc=g:GetFirst()
    local lp=0
    while tc do
    local e6=Effect.CreateEffect(c)
    e6:SetType(EFFECT_TYPE_SINGLE)
    e6:SetCode(EFFECT_NO_BATTLE_DAMAGE)
    e6:SetValue(1)
    e6:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e6,true)
    local e7=e6:Clone()
    e7:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
    tc:RegisterEffect(e7,true)
    tc=g:GetNext()
    end
    Duel.SpecialSummonComplete()
    Duel.BreakEffect()
    if c then
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e1:SetTargetRange(1,0)
    e1:SetTarget(cm.splimit)
    e1:SetReset(RESET_PHASE+PHASE_END)
    Duel.RegisterEffect(e1,tp)
    end
    end
    function cm.splimit(e,c)
    return c:IsLocation(LOCATION_EXTRA)
    end
    function cm.cfilter(c)
    return c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsCode(183615)
    end
    function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
    return eg:IsExists(cm.cfilter,1,e:GetHandler())
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsPlayerCanSpecialSummonMonster(tp,183615,0xc19,TYPES_TOKEN_MONSTER,200,200,1,RACE_MACHINE,ATTRIBUTE_WIND) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0
    or not Duel.IsPlayerCanSpecialSummonMonster(tp,183615,0xc19,TYPES_TOKEN_MONSTER,200,200,1,RACE_MACHINE,ATTRIBUTE_WIND) then return end
    local token=Duel.CreateToken(tp,183615)
    Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
    local e6=Effect.CreateEffect(c)
    e6:SetType(EFFECT_TYPE_SINGLE)
    e6:SetCode(EFFECT_NO_BATTLE_DAMAGE)
    e6:SetValue(1)
    e6:SetReset(RESET_EVENT+RESETS_STANDARD)
    token:RegisterEffect(e6,true)
    local e7=e6:Clone()
    e7:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
    token:RegisterEffect(e7,true)
    Duel.SpecialSummonComplete()
    end
    function cm.setfilter(c)
    return c:IsRace(RACE_MACHINE)
    end
    function cm.setcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.CheckReleaseGroupEx(REASON_COST,tp,cm.setfilter,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
    local g=Duel.SelectReleaseGroupEx(REASON_COST,tp,cm.setfilter,1,1,nil)
    Duel.Release(g,REASON_COST)
    end
    function cm.settg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():IsSSetable() end
    Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
    end
    function cm.setop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) then
    Duel.SSet(tp,c)
    end
    end
    expansions/script/c183620.lua deleted 100644 → 0
    View file @ f4a33404
    --M！A！L！Neutron annihilation！
    local m=183620
    local cm=_G["c"..m]
    Duel.LoadScript("c100000.lua")
    function cm.initial_effect(c)
    --ev
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,8))
    e1:SetCategory(CATEGORY_DESTROY)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetCode(EVENT_ATTACK_ANNOUNCE)
    e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_DUEL+EFFECT_COUNT_CODE_OATH)
    e1:SetCondition(cm.con)
    e1:SetCost(cm.cost)
    e1:SetTarget(cm.destg)
    e1:SetOperation(cm.desop)
    c:RegisterEffect(e1)
    --remove
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,9))
    e2:SetCategory(CATEGORY_REMOVE)
    e2:SetType(EFFECT_TYPE_ACTIVATE)
    e2:SetCode(EVENT_ATTACK_ANNOUNCE)
    e2:SetCountLimit(1,m+EFFECT_COUNT_CODE_DUEL+EFFECT_COUNT_CODE_OATH)
    e2:SetCondition(cm.con)
    e2:SetCost(cm.cost)
    e2:SetTarget(KanKan.MALcounterdistg)
    e2:SetOperation(KanKan.MALcounterdisop)
    c:RegisterEffect(e2)
    Duel.AddCustomActivityCounter(m,ACTIVITY_CHAIN,cm.counterfilter)
    end
    function cm.counterfilter(re,tp)
    local rc=re:GetHandler()
    return rc:IsSetCard(0xc19)
    end
    function cm.con(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetAttacker():IsControler(1-tp)
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_CHAIN)==0 end
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e1:SetCode(EFFECT_CANNOT_ACTIVATE)
    e1:SetTargetRange(1,0)
    e1:SetValue(cm.aclimit)
    e1:SetReset(RESET_PHASE+PHASE_END)
    Duel.RegisterEffect(e1,tp)
    Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
    end
    function cm.aclimit(e,re,tp)
    return not re:GetHandler():IsSetCard(0xc19)
    end
    function cm.filter(c)
    return c:IsType(TYPE_SPELL+TYPE_TRAP)
    end
    function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAttackPos,tp,0,LOCATION_MZONE,1,nil)
    or Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
    local g1=Duel.GetMatchingGroup(Card.IsAttackPos,tp,0,LOCATION_MZONE,nil)
    local g2=Duel.GetMatchingGroup(cm.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
    g1:Merge(g2)
    Duel.SetOperationInfo(0,CATEGORY_DESTROY,g1,g1:GetCount(),0,0)
    end
    function cm.desop(e,tp,eg,ep,ev,re,r,rp)
    local g1=Duel.GetMatchingGroup(Card.IsAttackPos,tp,0,LOCATION_MZONE,nil)
    local g2=Duel.GetMatchingGroup(cm.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
    g1:Merge(g2)
    if g:GetCount()>0 then
    Duel.Destroy(g,REASON_EFFECT)
    end
    end
    expansions/script/c184000.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·U·P·Lair
    local m=184000
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    aux.EnableDualAttribute(c)
    --spsummon proc
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_FIELD)
    e0:SetCode(EFFECT_SPSUMMON_PROC)
    e0:SetProperty(EFFECT_FLAG_UNCOPYABLE)
    e0:SetRange(LOCATION_HAND)
    e0:SetCountLimit(1,m)
    e0:SetCondition(cm.spcon)
    e0:SetTarget(cm.sptg)
    e0:SetOperation(cm.spop)
    e0:SetValue(SUMMON_VALUE_SELF)
    c:RegisterEffect(e0)
    --remove
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_REMOVE)
    e1:SetType(EFFECT_TYPE_IGNITION)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCountLimit(1,m+1)
    e1:SetCost(cm.cost)
    e1:SetCondition(aux.IsDualState)
    e1:SetTarget(cm.rmtg)
    e1:SetOperation(cm.rmop)
    c:RegisterEffect(e1)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    --atk/def
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e3:SetRange(LOCATION_MZONE)
    e3:SetCode(EFFECT_UPDATE_ATTACK)
    e3:SetCondition(aux.IsDualState)
    e3:SetValue(cm.adval)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_UPDATE_DEFENSE)
    c:RegisterEffect(e4)
    --spsummon cost
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetCode(EFFECT_SPSUMMON_COST)
    e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e5:SetCost(cm.spccost)
    e5:SetOperation(cm.spccop)
    c:RegisterEffect(e5)
    end
    function cm.spccost(e,c,tp)
    return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0
    end
    function cm.spccop(e,tp,eg,ep,ev,re,r,rp)
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
    e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e1:SetReset(RESET_PHASE+PHASE_END)
    e1:SetTargetRange(1,0)
    e1:SetTarget(cm.splimit)
    Duel.RegisterEffect(e1,tp)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.spfilter(c)
    return c:IsReleasable()
    end
    function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return Duel.IsExistingMatchingCard(cm.spfilter,c:GetControler(),LOCATION_ONFIELD,0,1,nil)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,c)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
    local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_ONFIELD,0,1,99,nil)
    if g then
    g:KeepAlive()
    e:SetLabelObject(g)
    return true
    else return false end
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp,c)
    local g=e:GetLabelObject()
    Duel.Release(g,REASON_COST)
    g:DeleteGroup()
    end
    function cm.cfilter(c)
    return ((c:IsSetCard(0x1c19) and c:IsType(TYPE_MONSTER)) or (c:IsSetCard(0xc19) and c:IsType(TYPE_SPELL+TYPE_TRAP))) and not c:IsCode(m) and c:IsAbleToGraveAsCost()
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0
    and Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_DECK,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
    local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_DECK,0,1,1,nil)
    Duel.SendtoGrave(g,REASON_COST)
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
    e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e1:SetReset(RESET_PHASE+PHASE_END)
    e1:SetTargetRange(1,0)
    e1:SetTarget(cm.splimit)
    Duel.RegisterEffect(e1,tp)
    end
    function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
    return not c:IsSetCard(0xc19)
    end
    function cm.rmfilter(c,tp)
    return c:IsFaceup() and c:IsAbleToRemove(tp)
    end
    function cm.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
    local g=Duel.GetMatchingGroup(cm.rmfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil,tp)
    if chk==0 then return g:GetCount()>0 end
    Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
    end
    function cm.rmop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
    local g=Duel.SelectMatchingCard(tp,cm.rmfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil,tp)
    if g:GetCount()>0 then
    Duel.HintSelection(g)
    Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
    end
    end
    function cm.filter(c)
    return c:IsType(TYPE_MONSTER) and c:IsFaceup()
    end
    function cm.adval(e,c)
    return Duel.GetMatchingGroupCount(cm.filter,c:GetControler(),0,LOCATION_MZONE+LOCATION_GRAVE,c)*500
    end
    expansions/script/c184005.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·U·P
    local m=184005
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    aux.EnableDualAttribute(c)
    --spsummon proc
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_FIELD)
    e0:SetCode(EFFECT_SPSUMMON_PROC)
    e0:SetProperty(EFFECT_FLAG_UNCOPYABLE)
    e0:SetRange(LOCATION_HAND)
    e0:SetCountLimit(1,m)
    e0:SetCondition(cm.spcon)
    e0:SetTarget(cm.sptg)
    e0:SetOperation(cm.spop)
    e0:SetValue(SUMMON_VALUE_SELF)
    c:RegisterEffect(e0)
    --set
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetType(EFFECT_TYPE_IGNITION)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCountLimit(1,m+1)
    e1:SetCost(cm.cost)
    e1:SetCondition(aux.IsDualState)
    e1:SetTarget(cm.sttg)
    e1:SetOperation(cm.stop)
    c:RegisterEffect(e1)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    --pierce
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_PIERCE)
    e2:SetCondition(aux.IsDualState)
    c:RegisterEffect(e2)
    --spsummon cost
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetCode(EFFECT_SPSUMMON_COST)
    e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e5:SetCost(cm.spccost)
    e5:SetOperation(cm.spccop)
    c:RegisterEffect(e5)
    end
    function cm.spccost(e,c,tp)
    return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0
    end
    function cm.spccop(e,tp,eg,ep,ev,re,r,rp)
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
    e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e1:SetReset(RESET_PHASE+PHASE_END)
    e1:SetTargetRange(1,0)
    e1:SetTarget(cm.splimit)
    Duel.RegisterEffect(e1,tp)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.spfilter(c)
    return c:IsAbleToRemoveAsCost()
    end
    function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return Duel.IsExistingMatchingCard(cm.spfilter,c:GetControler(),LOCATION_ONFIELD,0,1,nil)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,c)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
    local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_ONFIELD,0,1,99,nil)
    if g then
    g:KeepAlive()
    e:SetLabelObject(g)
    return true
    else return false end
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp,c)
    local g=e:GetLabelObject()
    Duel.Remove(g,POS_FACEUP,REASON_COST)
    g:DeleteGroup()
    end
    function cm.cfilter(c)
    return ((c:IsSetCard(0x1c19) and c:IsType(TYPE_MONSTER)) or (c:IsSetCard(0xc19) and c:IsType(TYPE_SPELL+TYPE_TRAP))) and not c:IsCode(m) and c:IsAbleToRemoveAsCost()
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0
    and Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_DECK,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
    local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_DECK,0,1,1,nil)
    Duel.Remove(g,POS_FACEUP,REASON_COST)
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
    e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e1:SetReset(RESET_PHASE+PHASE_END)
    e1:SetTargetRange(1,0)
    e1:SetTarget(cm.splimit)
    Duel.RegisterEffect(e1,tp)
    end
    function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
    return not c:IsSetCard(0xc19)
    end
    function cm.stfilter(c)
    local seq=c:GetSequence()
    return seq<=4 and c:IsType(TYPE_MONSTER) and c:IsFaceup()
    end
    function cm.sttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.stfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
    end
    function cm.stop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,0))
    local mg=Duel.SelectMatchingCard(tp,cm.stfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
    local tc=mg:GetFirst()
    if tc:IsImmuneToEffect(e) and not tc:IsRelateToEffect(e) then return end
    if tc:IsControler(tp) then
    if tc then
    local zone=1<<tc:GetSequence()
    local oc=Duel.GetMatchingGroup(cm.seqfilter,tp,LOCATION_SZONE,0,nil,tc:GetSequence()):GetFirst()
    if oc then
    Duel.Destroy(oc,REASON_RULE)
    end
    if Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true,zone) then
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetCode(EFFECT_CHANGE_TYPE)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
    e1:SetValue(TYPE_TRAP+TYPE_CONTINUOUS)
    tc:RegisterEffect(e1)
    end
    end
    else
    if tc then
    local zone=1<<tc:GetSequence()
    local oc=Duel.GetMatchingGroup(cm.seqfilter,tp,0,LOCATION_SZONE,nil,tc:GetSequence()):GetFirst()
    if oc then
    Duel.Destroy(oc,REASON_RULE)
    end
    if Duel.MoveToField(tc,tp,1-tp,LOCATION_SZONE,POS_FACEUP,true,zone) then
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetCode(EFFECT_CHANGE_TYPE)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
    e1:SetValue(TYPE_TRAP+TYPE_CONTINUOUS)
    tc:RegisterEffect(e1)
    end
    end
    end
    end
    function cm.seqfilter(c,seq)
    return c:GetSequence()==seq
    end
    expansions/script/c184010.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·U·P·Upward
    local m=184010
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    aux.EnableDualAttribute(c)
    --spsummon proc
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_FIELD)
    e0:SetCode(EFFECT_SPSUMMON_PROC)
    e0:SetProperty(EFFECT_FLAG_UNCOPYABLE)
    e0:SetRange(LOCATION_HAND)
    e0:SetCountLimit(1,m)
    e0:SetCondition(cm.spcon)
    e0:SetTarget(cm.sptg)
    e0:SetOperation(cm.spop)
    e0:SetValue(SUMMON_VALUE_SELF)
    c:RegisterEffect(e0)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    --copy
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,0))
    e2:SetType(EFFECT_TYPE_IGNITION)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCountLimit(1,m+1)
    e2:SetCost(cm.cost)
    e2:SetCondition(aux.IsDualState)
    e2:SetTarget(cm.copytg)
    e2:SetOperation(cm.copyop)
    c:RegisterEffect(e2)
    --equip
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,1))
    e1:SetCategory(CATEGORY_EQUIP)
    e1:SetType(EFFECT_TYPE_IGNITION)
    e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCountLimit(1)
    e1:SetCondition(aux.IsDualState)
    e1:SetTarget(cm.eqtg)
    e1:SetOperation(cm.eqop)
    c:RegisterEffect(e1)
    --spsummon cost
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetCode(EFFECT_SPSUMMON_COST)
    e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e5:SetCost(cm.spccost)
    e5:SetOperation(cm.spccop)
    c:RegisterEffect(e5)
    end
    function cm.spccost(e,c,tp)
    return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0
    end
    function cm.spccop(e,tp,eg,ep,ev,re,r,rp)
    local e2=Effect.CreateEffect(e:GetHandler())
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
    e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e2:SetReset(RESET_PHASE+PHASE_END)
    e2:SetTargetRange(1,0)
    e2:SetTarget(cm.splimit)
    Duel.RegisterEffect(e2,tp)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.spfilter(c)
    return c:IsAbleToHandAsCost()
    end
    function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
    return Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_ONFIELD,0,1,nil)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,c)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
    local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_ONFIELD,0,1,99,nil)
    if g then
    g:KeepAlive()
    e:SetLabelObject(g)
    return true
    else return false end
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp,c)
    local g=e:GetLabelObject()
    Duel.SendtoHand(g,tp,REASON_COST)
    g:DeleteGroup()
    end
    function cm.cfilter(c)
    return c:IsSetCard(0xc19) and c:IsType(TYPE_MONSTER) and not c:IsCode(m) and c:IsAbleToGraveAsCost()
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    e:SetLabel(100)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    local e2=Effect.CreateEffect(e:GetHandler())
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
    e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e2:SetReset(RESET_PHASE+PHASE_END)
    e2:SetTargetRange(1,0)
    e2:SetTarget(cm.splimit)
    Duel.RegisterEffect(e2,tp)
    end
    function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
    return not c:IsSetCard(0xc19)
    end
    function cm.copytg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    local c=e:GetHandler()
    if chk==0 then
    if e:GetLabel()~=100 then return false end
    e:SetLabel(0)
    return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_DECK,0,1,nil)
    end
    e:SetLabel(0)
    local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_DECK,0,1,1,nil)
    Duel.SendtoGrave(g,REASON_COST)
    Duel.SetTargetCard(g)
    end
    function cm.copyop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local tc=Duel.GetFirstTarget()
    if c:IsRelateToEffect(e) and c:IsFaceup() and tc:IsRelateToEffect(e) then
    local code=tc:GetOriginalCode()
    c:CopyEffect(code,RESET_EVENT+RESETS_STANDARD,1)
    end
    end
    function cm.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and chkc:IsAbleToChangeControler() end
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
    and Duel.IsExistingTarget(Card.IsAbleToChangeControler,tp,0,LOCATION_MZONE,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
    local g=Duel.SelectTarget(tp,Card.IsAbleToChangeControler,tp,0,LOCATION_MZONE,1,1,nil)
    Duel.SetOperationInfo(0,CATEGORY_EQUIP,g,1,0,0)
    end
    function cm.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
    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(cm.eqlimit)
    tc:RegisterEffect(e1)
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_EQUIP)
    e2:SetCode(EFFECT_UPDATE_ATTACK)
    e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    e2:SetValue(1000)
    tc:RegisterEffect(e2)
    tc:RegisterFlagEffect(6387204,RESET_EVENT+RESETS_STANDARD,0,0)
    end
    end
    function cm.eqlimit(e,c)
    return e:GetOwner()==c
    end
    expansions/script/c184015.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·U·P·Captor
    local m=184015
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    aux.EnableDualAttribute(c)
    --spsummon proc
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_FIELD)
    e0:SetCode(EFFECT_SPSUMMON_PROC)
    e0:SetProperty(EFFECT_FLAG_UNCOPYABLE)
    e0:SetRange(LOCATION_HAND)
    e0:SetCountLimit(1,m)
    e0:SetCondition(cm.spcon)
    e0:SetTarget(cm.sptg)
    e0:SetOperation(cm.spop)
    e0:SetValue(SUMMON_VALUE_SELF)
    c:RegisterEffect(e0)
    Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
    --search
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e1:SetProperty(EFFECT_FLAG_DELAY)
    e1:SetCode(EVENT_SUMMON_SUCCESS)
    e1:SetCountLimit(1,m+1)
    e1:SetCost(cm.cost)
    e1:SetCondition(aux.IsDualState)
    e1:SetTarget(cm.settg)
    e1:SetOperation(cm.setop)
    c:RegisterEffect(e1)
    local e3=e1:Clone()
    e3:SetCode(EVENT_SPSUMMON_SUCCESS)
    c:RegisterEffect(e3)
    --effect gain
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e2:SetCode(EVENT_BE_MATERIAL)
    e2:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
    e2:SetCondition(cm.effcon)
    e2:SetOperation(cm.effop)
    c:RegisterEffect(e2)
    --spsummon cost
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetCode(EFFECT_SPSUMMON_COST)
    e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e5:SetCost(cm.spccost)
    e5:SetOperation(cm.spccop)
    c:RegisterEffect(e5)
    end
    function cm.spccost(e,c,tp)
    return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0
    end
    function cm.spccop(e,tp,eg,ep,ev,re,r,rp)
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
    e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e1:SetReset(RESET_PHASE+PHASE_END)
    e1:SetTargetRange(1,0)
    e1:SetTarget(cm.splimit)
    Duel.RegisterEffect(e1,tp)
    end
    function cm.counterfilter(c)
    return c:IsSetCard(0xc19)
    end
    function cm.spfilter(c)
    return c:IsAbleToGraveAsCost()
    end
    function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
    return Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_ONFIELD,0,1,nil)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,c)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
    local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_ONFIELD,0,1,99,nil)
    if g then
    g:KeepAlive()
    e:SetLabelObject(g)
    return true
    else return false end
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp,c)
    local g=e:GetLabelObject()
    Duel.SendtoGrave(g,tp,REASON_COST)
    g:DeleteGroup()
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
    c:RegisterFlagEffect(m,RESET_PHASE+PHASE_END,0,1,0)
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
    e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e1:SetReset(RESET_PHASE+PHASE_END)
    e1:SetTargetRange(1,0)
    e1:SetTarget(cm.splimit)
    Duel.RegisterEffect(e1,tp)
    end
    function cm.splimit(e,c,sump,sumtype,sumpos,targetp,se)
    return not c:IsSetCard(0xc19)
    end
    function cm.setfilter(c)
    return c:IsSetCard(0xc19) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand()
    end
    function cm.settg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.setfilter,tp,LOCATION_DECK,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
    end
    function cm.setop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectMatchingCard(tp,cm.setfilter,tp,LOCATION_DECK,0,1,1,nil)
    if #g>0 then
    Duel.SendtoHand(g,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,g)
    end
    end
    function cm.effcon(e,tp,eg,ep,ev,re,r,rp)
    return (r==REASON_SYNCHRO or r==REASON_FUSION or r==REASON_LINK or r==REASON_XYZ) and e:GetHandler():GetReasonCard():IsSetCard(0xc19)
    and e:GetHandler():GetFlagEffect(m)>0
    end
    function cm.filter1(c)
    return c:IsType(TYPE_XYZ) and c:GetOverlayCount()>0
    end
    function cm.filter2(c)
    return c:IsType(TYPE_MONSTER) and (c:IsAttackAbove(0) or c:IsDefenseAbove(0))
    end
    function cm.effop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local rc=c:GetReasonCard()
    local atk1=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_EXTRA,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_EXTRA,c):GetSum(Card.GetAttack)
    local atk3=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_EXTRA,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_EXTRA,c):GetSum(Card.GetDefense)
    local g2=Duel.GetMatchingGroup(cm.filter1,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
    local atk2=0
    if g2:GetCount()>0 then
    local tc2=g2:GetFirst()
    while tc2 do
    local cg=tc2:GetOverlayGroup()
    local sg=cg:Filter( cm.filter2,nil)
    if sg:GetCount()>0 then
    local tc3=sg:GetFirst()
    while tc3 do
    atk2=atk2+tc3:GetAttack()+tc3:GetDefense()
    tc3=sg:GetNext()
    end
    end
    tc2=g2:GetNext()
    end
    end
    local atk=atk1+atk2+atk3
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,1))
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_CLIENT_HINT+EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetCode(EFFECT_UPDATE_ATTACK)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    e1:SetValue(atk)
    rc:RegisterEffect(e1,true)
    --immune
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_IMMUNE_EFFECT)
    e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CLIENT_HINT+EFFECT_FLAG_CANNOT_DISABLE)
    e3:SetRange(LOCATION_MZONE)
    e3:SetValue(cm.efilter)
    rc:RegisterEffect(e3,true)
    if not rc:IsType(TYPE_EFFECT) then
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_ADD_TYPE)
    e2:SetValue(TYPE_EFFECT)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e2,true)
    end
    rc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,1))
    end
    function cm.efilter(e,te)
    return not (te:GetOwner():IsSetCard(0xc19) and
    (te:GetCode()&EFFECT_SET_ATTACK~=0
    or te:GetCode()&EFFECT_SET_ATTACK_FINAL~=0
    or te:GetCode()&EFFECT_SET_BASE_ATTACK~=0
    or te:GetCode()&EFFECT_SET_BASE_ATTACK_FINAL~=0
    or te:GetCode()&EFFECT_SET_BATTLE_ATTACK~=0
    or te:GetCode()&EFFECT_UPDATE_ATTACK~=0))
    end
    expansions/script/c184100.lua deleted 100644 → 0
    View file @ f4a33404
    --M·A·L·U·P·Sabretooth
    local m=184100
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --fusion material
    aux.AddFusionProcFunFunRep(c,aux.FilterBoolFunction(Card.IsSetCard,0xc19),aux.FilterBoolFunction(Card.IsRace,RACE_MACHINE),1,99,true,true)
    aux.AddContactFusionProcedure(c,aux.FilterBoolFunction(Card.IsReleasable,REASON_SPSUMMON),LOCATION_MZONE,0,Duel.Release,REASON_SPSUMMON+REASON_MATERIAL)
    c:EnableReviveLimit()
    --spsummon condition
    local e0=Effect.CreateEffect(c)
    e0:SetType(EFFECT_TYPE_SINGLE)
    e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e0:SetCode(EFFECT_SPSUMMON_CONDITION)
    e0:SetValue(aux.fuslimit)
    c:RegisterEffect(e0)
    --multi
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetOperation(cm.attkop)
    c:RegisterEffect(e1)
    --immune
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e2:SetCode(EFFECT_IMMUNE_EFFECT)
    e2:SetRange(LOCATION_MZONE)
    e2:SetValue(cm.immval)
    c:RegisterEffect(e2)
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e3:SetCode(EFFECT_CANNOT_CHANGE_POS_E)
    e3:SetRange(LOCATION_MZONE)
    c:RegisterEffect(e3)
    --activate limit
    local e4=Effect.CreateEffect(c)
    e4:SetType(EFFECT_TYPE_FIELD)
    e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e4:SetCode(EFFECT_CANNOT_ACTIVATE)
    e4:SetRange(LOCATION_MZONE)
    e4:SetTargetRange(1,1)
    e4:SetValue(cm.actlimit)
    c:RegisterEffect(e4)
    --
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_QUICK_O)
    e5:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
    e5:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
    e5:SetRange(LOCATION_MZONE)
    e5:SetCondition(cm.atkcon)
    e5:SetCost(cm.atkcost)
    e5:SetOperation(cm.op)
    c:RegisterEffect(e5)
    end
    function cm.attkop(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_EXTRA_ATTACK)
    e1:SetValue(c:GetMaterialCount()*2)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e1)
    c:SetTurnCounter(c:GetMaterialCount()*2)
    end
    function cm.immval(e,re)
    local rc=re:GetHandler()
    return re:IsActiveType(TYPE_MONSTER) and re:IsActivated() and re:GetActivateLocation()==LOCATION_MZONE
    and (rc:IsRelateToEffect(re) and rc:IsDefensePos() or not rc:IsRelateToEffect(re) and rc:IsPreviousPosition(POS_DEFENSE))
    end
    function cm.actlimit(e,re,tp)
    local rc=re:GetHandler()
    return re:IsActiveType(TYPE_MONSTER) and rc:IsDefensePos()
    end
    function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local bc=c:GetBattleTarget()
    return bc
    end
    function cm.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return c:GetFlagEffect(m)==0 end
    c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE_CAL,0,1)
    end
    function cm.op(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local atk=c:GetBaseAttack()
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e1:SetTargetRange(1,1)
    e1:SetReset(RESET_PHASE+PHASE_DAMAGE)
    Duel.RegisterEffect(e1,tp)
    Duel.SetLP(1-tp,Duel.GetLP(1-tp)-atk)
    end
    expansions/strings.conf
    View file @ 0f7e0bec
    ...@@ -392,6 +392,7 @@ ...@@ -392,6 +392,7 @@
    !setname 0x9dc2 驯兽师 !setname 0x9dc2 驯兽师
    !setname 0xdc3 X抗体 !setname 0xdc3 X抗体
    !setname 0xdc4 阿尔法兽 !setname 0xdc4 阿尔法兽
    !setname 0x3dc6 Legend-Arms
    !counter 0xdc0 神耀指示物 !counter 0xdc0 神耀指示物
    !counter 0xdc1 辛指示物 !counter 0xdc1 辛指示物
    !counter 3dc1 神印指示物 !counter 3dc1 神印指示物
    ...@@ -435,6 +436,7 @@ ...@@ -435,6 +436,7 @@
    #cm.SetCard_MLSG 米勒山谷 #cm.SetCard_MLSG 米勒山谷
    #cm.SetCard_PPX_foundation 基金会 #cm.SetCard_PPX_foundation 基金会
    #cm.SetCard_TSJ 铁三角 #cm.SetCard_TSJ 铁三角
    #named_with_ThKingdWei 银幕（三国-魏）
    #副连_VOLIAN 984086774 173 0x260-0x26f #副连_VOLIAN 984086774 173 0x260-0x26f
    !setname 0x268 Arcaea !setname 0x268 Arcaea
    ...@@ -470,7 +472,13 @@ ...@@ -470,7 +472,13 @@
    !setname 0x6ee 忆炼 !setname 0x6ee 忆炼
    !setname 0x66e6 纯白骑士 !setname 0x66e6 纯白骑士
    !setname 0x66e8 玉馔 !setname 0x66e8 玉馔
    !setname 0x56e9 妙聚星
    !setname 0x6f0 煌剑 !setname 0x6f0 煌剑
    !setname 0xa6e9 白雪恋
    setname 0xc6e9 早乙女志乃
    !setname 0xa6ea 大厨精选
    !setname 0x96ea 灾祸魔女
    !setname 56e6 心阴
    #DefineSet(code,"LianXing") 恋星 #DefineSet(code,"LianXing") 恋星
    #setname="advency" 冒险遗产 #setname="advency" 冒险遗产
    #setcard="Shinkansen" 新干线 #setcard="Shinkansen" 新干线
    ...@@ -1130,6 +1138,7 @@ ...@@ -1130,6 +1138,7 @@
    !setname 0x3620 永夜抄 !setname 0x3620 永夜抄
    !setname 0x6620 灵代 !setname 0x6620 灵代
    !setname 0xa620 时光酒桌 !setname 0xa620 时光酒桌
    !setname 0xc620 奇术尊者
    !setname 0x626 黄昏 !setname 0x626 黄昏
    !setname 0x3626 黄昏之骑士 !setname 0x3626 黄昏之骑士
    !setname 0x6629 伊兹尼亚 !setname 0x6629 伊兹尼亚
    ...@@ -1161,6 +1170,7 @@ ...@@ -1161,6 +1170,7 @@
    !setname 0x562e 圣兽装骑·鲨 !setname 0x562e 圣兽装骑·鲨
    !setname 0x662e 圣兽装骑·蜂 !setname 0x662e 圣兽装骑·蜂
    !setname 0x962e 圣兽装骑·骸 !setname 0x962e 圣兽装骑·骸
    #AddCodeList(60001179) 紫罗兰永恒花园卡名记述 #AddCodeList(60001179) 紫罗兰永恒花园卡名记述
    !counter 0x624 进化指示物 !counter 0x624 进化指示物
    !counter 0x625 吟唱指示物 !counter 0x625 吟唱指示物
    ...@@ -1213,11 +1223,13 @@ ...@@ -1213,11 +1223,13 @@
    !setname 0x6d1 世界猫咪联盟 !setname 0x6d1 世界猫咪联盟
    !setname 0x6de 千古食魂录 !setname 0x6de 千古食魂录
    !setname 0x6df 猫箱反转 !setname 0x6df 猫箱反转
    !setname 0x26df “星之眷族”|猫箱反转
    !counter 0x6d0 蝴蝶指示物 !counter 0x6d0 蝴蝶指示物
    !counter 0x6dd 触足指示物 !counter 0x6dd 触足指示物
    !counter 0x6dc 弦音指示物 !counter 0x6dc 弦音指示物
    !counter 0x16de 像素化指示物 !counter 0x16de 像素化指示物
    !counter 0x16df 基因污染指示物 !counter 0x16df 基因污染指示物
    !counter 0x16db 剧毒指示物
    #希尔薇 - 639 0x860-0x86f #希尔薇 - 639 0x860-0x86f
    !setname 0x860 米诺陶诺斯 !setname 0x860 米诺陶诺斯
    ...@@ -1241,6 +1253,7 @@ ...@@ -1241,6 +1253,7 @@
    !setname 0x341a 深层幻夜 !setname 0x341a 深层幻夜
    !setname 0x541a 燃煤 !setname 0x541a 燃煤
    !setname 0x641a 神代丰 !setname 0x641a 神代丰
    !setname 0x1419 摩斯迪露姆
    #set_without_id 02 #set_without_id 02
    #setname="Devildiocese" 魔军教廷 #setname="Devildiocese" 魔军教廷
    #setname="VrAqua" 虚拟水神 #setname="VrAqua" 虚拟水神
    ...@@ -1588,7 +1601,9 @@ ...@@ -1588,7 +1601,9 @@
    !counter 0x3597 旧地狱 !counter 0x3597 旧地狱
    #2987736314 阿塔 888 0x890-0x89f #2987736314 阿塔 888 0x890-0x89f
    #等数理罪论修正字段
    !setname 0x8903 数理罪论 !setname 0x8903 数理罪论
    !setname 0x898 深渊的呼唤VII
    #王道游老子 995602632 894 0x700-0x70f #王道游老子 995602632 894 0x700-0x70f
    !setname 0xa701 XTale !setname 0xa701 XTale
    ......
    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