Commit 0a33bbbf authored by Huangnan's avatar Huangnan

fix&update lflist

parent fd13134a
No preview for this file type
......@@ -354,8 +354,6 @@
12866605 1 --电锯人
12866630 1 --未来恶魔
12866775 1 --战争恶魔·制服强强剑
12869010 0 --寒霜华符 游水女
12869015 0 --寒霜华符 弄沙伎
12892000 0 --终焉的妖界之门
12892003 0 --赤妖-忍众
12892006 0 --赤妖-兔
......@@ -964,7 +962,6 @@
30005010 0 --异神 灰
30005016 0 --森之妖精 萨堤尔Ⅱ
30005020 1 --心哀想
30005030 1 --懵懂的暗芽
30005035 0 --仪死的供物
30005040 0 --异神 格
30005045 1 --异神 煞
......@@ -980,7 +977,7 @@
30005170 1 --归来的“赤”
30005180 0 --魔导器具商人
30005195 1 --白厄 诺纷斯
30005200 0 --闪辉龙 凯旋龙
30005200 1 --闪辉龙 凯旋龙
30005205 0 --混沌二气
30005301 0 --蔚蓝魔装 XXIV
30005307 0 --染魔之地
......@@ -1432,19 +1429,42 @@
35801151 0 --流星河的妖精千式
35811002 0 --交界的决斗者☆ 寒山客
#367
36700100 1 --skip-咖啡饮用
36700102 2 --skip-飞世优马
36700105 0 --skip-夏目凛
36700109 2 --skip的同伴-亚刻
36700127 0 --arc妙技
36700135 1 --skip对兽·暗黑宇宙战士 苏仪德 星人态
36700142 0 --死斗-星河而来的死敌
36700144 0 --skip-比 运输车
36700145 1 --亚刻·星河装甲
36700146 1 --亚刻·灼日装甲
36700148 1 --亚刻·土星装甲
36700150 1 --亚刻·皓月装甲
36700152 1 --共战 双重螺旋光刃
36700100 0
36700102 0
36700104 0
36700105 0
36700106 0
36700108 0
36700109 0
36700112 0
36700113 0
36700114 0
36700116 0
36700118 0
36700119 0
36700120 0
36700121 0
36700122 0
36700124 0
36700125 0
36700127 0
36700129 0
36700131 0
36700133 0
36700134 0
36700142 0
36700153 0
36700135 0
36700136 0
36700138 0
36700139 0
36700141 0
36700144 0
36700145 0
36700146 0
36700148 0
36700150 0
36700152 0
36700000 2 --工藤优幸
36700008 1 --三重小队·泰迦-燕式光弹
36700010 1 --三重小队·风马-神速残像
......@@ -2209,6 +2229,18 @@
88178317 0 --生命的二刀流 魂魄妖梦
88188033 0 --天顶歌者
88188052 0 --黑猫歌者
#913
91300026 1 --猎兽魔女:罗塞特
91300027 0 --猎兽魔女:阿米莉亚
91300028 0 --猎兽魔女:芙列雅
91300029 1 --猎兽魔女:米娅
91300030 0 --猎兽魔女:露娜
91300031 0 --猎兽魔女:狩猎
91300032 0 --飞龙型:猎兽之王
91300033 0 --甲壳型:猎兽之王
91300034 0 --海德拉型:猎兽之王
91300035 0 --猎兽魔女:库洛伊
91300036 0 --猎兽魔女:洛芙
#888
88887007 1 --数理与恶性 莫里亚蒂
88887008 1 --数理与常识 福尔摩斯
......
expansions/pics/12400107.jpg

110 KB | W: | H:

expansions/pics/12400107.jpg

183 KB | W: | H:

expansions/pics/12400107.jpg
expansions/pics/12400107.jpg
expansions/pics/12400107.jpg
expansions/pics/12400107.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/12400108.jpg

106 KB | W: | H:

expansions/pics/12400108.jpg

173 KB | W: | H:

expansions/pics/12400108.jpg
expansions/pics/12400108.jpg
expansions/pics/12400108.jpg
expansions/pics/12400108.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/12400109.jpg

87.9 KB | W: | H:

expansions/pics/12400109.jpg

143 KB | W: | H:

expansions/pics/12400109.jpg
expansions/pics/12400109.jpg
expansions/pics/12400109.jpg
expansions/pics/12400109.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/12400110.jpg

94.4 KB | W: | H:

expansions/pics/12400110.jpg

153 KB | W: | H:

expansions/pics/12400110.jpg
expansions/pics/12400110.jpg
expansions/pics/12400110.jpg
expansions/pics/12400110.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/12400111.jpg

98.9 KB | W: | H:

expansions/pics/12400111.jpg

160 KB | W: | H:

expansions/pics/12400111.jpg
expansions/pics/12400111.jpg
expansions/pics/12400111.jpg
expansions/pics/12400111.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/12400112.jpg

93.8 KB | W: | H:

expansions/pics/12400112.jpg

150 KB | W: | H:

expansions/pics/12400112.jpg
expansions/pics/12400112.jpg
expansions/pics/12400112.jpg
expansions/pics/12400112.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/12400113.jpg

105 KB | W: | H:

expansions/pics/12400113.jpg

172 KB | W: | H:

expansions/pics/12400113.jpg
expansions/pics/12400113.jpg
expansions/pics/12400113.jpg
expansions/pics/12400113.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/12400114.jpg

249 KB | W: | H:

expansions/pics/12400114.jpg

164 KB | W: | H:

expansions/pics/12400114.jpg
expansions/pics/12400114.jpg
expansions/pics/12400114.jpg
expansions/pics/12400114.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/12400115.jpg

96.7 KB | W: | H:

expansions/pics/12400115.jpg

158 KB | W: | H:

expansions/pics/12400115.jpg
expansions/pics/12400115.jpg
expansions/pics/12400115.jpg
expansions/pics/12400115.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/12400116.jpg

103 KB | W: | H:

expansions/pics/12400116.jpg

167 KB | W: | H:

expansions/pics/12400116.jpg
expansions/pics/12400116.jpg
expansions/pics/12400116.jpg
expansions/pics/12400116.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/12400117.jpg

92.5 KB | W: | H:

expansions/pics/12400117.jpg

149 KB | W: | H:

expansions/pics/12400117.jpg
expansions/pics/12400117.jpg
expansions/pics/12400117.jpg
expansions/pics/12400117.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/12400118.jpg

85.9 KB | W: | H:

expansions/pics/12400118.jpg

138 KB | W: | H:

expansions/pics/12400118.jpg
expansions/pics/12400118.jpg
expansions/pics/12400118.jpg
expansions/pics/12400118.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/12400119.jpg

102 KB | W: | H:

expansions/pics/12400119.jpg

165 KB | W: | H:

expansions/pics/12400119.jpg
expansions/pics/12400119.jpg
expansions/pics/12400119.jpg
expansions/pics/12400119.jpg
  • 2-up
  • Swipe
  • Onion skin
expansions/pics/12400120.jpg

92.3 KB | W: | H:

expansions/pics/12400120.jpg

151 KB | W: | H:

expansions/pics/12400120.jpg
expansions/pics/12400120.jpg
expansions/pics/12400120.jpg
expansions/pics/12400120.jpg
  • 2-up
  • Swipe
  • Onion skin
......@@ -18,7 +18,7 @@ function s.initial_effect(c)
e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetRange(LOCATION_SZONE)
e2:SetCountLimit(1,EFFECT_COUNT_CODE_SINGLE)
e2:SetCountLimit(1)
e2:SetCondition(s.atkcon1)
e2:SetOperation(s.atkop)
c:RegisterEffect(e2)
......
......@@ -22,7 +22,6 @@ function s.initial_effect(c)
e2:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetTarget(s.atktg)
e2:SetOperation(s.atkop)
e2:SetCountLimit(1,id+30000)
......@@ -45,9 +44,8 @@ function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end
function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e,tp)
and Duel.GetMZoneCount(tp,c)>0 end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE)
end
function s.spop(e,tp,eg,ep,ev,re,r,rp)
......
......@@ -67,7 +67,8 @@ function cm.rettg(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE)
end
function cm.actop(e,tp)
if not e:GetHandler():IsRelateToEffect(e) then return end
local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local g=Duel.SelectMatchingCard(tp,cm.tdfilter,tp,LOCATION_GRAVE,0,1,3,c)
if Duel.SendtoDeck(g,nil,2,REASON_EFFECT)>0 then
......
......@@ -45,7 +45,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e2)
--Effect 3
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(m,0))
e3:SetDescription(aux.Stringid(m,2))
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1)
......
--天界的修女
--天界银 亚沙拉姆
local m=16104402
local cm=_G["c"..m]
function cm.initial_effect(c)
......
......@@ -36,7 +36,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e7)
--Effect 2
local e9=Effect.CreateEffect(c)
e9:SetDescription(aux.Stringid(m,2))
e9:SetDescription(aux.Stringid(m,4))
e9:SetType(EFFECT_TYPE_IGNITION)
e9:SetCode(EVENT_FREE_CHAIN)
e9:SetRange(LOCATION_PZONE)
......@@ -58,7 +58,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e2)
--Effect 4
local e5=Effect.CreateEffect(c)
e5:SetDescription(aux.Stringid(m,0))
e5:SetDescription(aux.Stringid(m,3))
e5:SetType(EFFECT_TYPE_QUICK_O)
e5:SetCode(EVENT_FREE_CHAIN)
e5:SetRange(LOCATION_EXTRA)
......
--天界的力天使
--天界法 谟涅西斯
local m=16104404
local cm=_G["c"..m]
function cm.initial_effect(c)
......
......@@ -36,6 +36,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e7)
--Effect 2
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,3))
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetRange(LOCATION_PZONE)
......@@ -46,6 +47,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e1)
--Effect 3
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,1))
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_MZONE)
......@@ -56,6 +58,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e2)
--Effect 4
local e5=Effect.CreateEffect(c)
e5:SetDescription(aux.Stringid(m,2))
e5:SetCategory(CATEGORY_TOHAND)
e5:SetType(EFFECT_TYPE_QUICK_O)
e5:SetCode(EVENT_FREE_CHAIN)
......
--天界的住民
--天界法 伊阿珀瑟斯
local m=16104406
local cm=_G["c"..m]
function cm.initial_effect(c)
......@@ -113,6 +113,7 @@ function cm.cfilter(c,e,tp)
return c:IsSummonPlayer(tp) and c:IsSetCard(0xccb) and c:IsType(TYPE_MONSTER) and c~=e:GetHandler()
end
function cm.reccon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
return eg:IsExists(cm.cfilter,1,nil,e,tp) and g:GetCount()>0 and c:GetFlagEffect(m*10)==0
end
......
--天界的圣天使
--自天界而来的制裁
local m=16104408
local cm=_G["c"..m]
function cm.initial_effect(c)
......
--天界的门番
--天界律 克洛萨斯
local m=16104412
local cm=_G["c"..m]
function cm.initial_effect(c)
......@@ -149,9 +149,12 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
end
--Effect 3
function cm.chainop(e,tp,eg,ep,ev,re,r,rp)
if ep==tp then
Duel.SetChainLimit(aux.FALSE)
end
Duel.SetChainLimit(c62242678.chainlm(e:GetHandlerPlayer()))
end
function c62242678.chainlm(ep)
return function(e,rp,tp)
return tp==ep
end
end
--Effect 4
function cm.namecon(e,tp,eg,ep,ev,re,r,rp)
......
--与天界的再续
--与天界的再续
--天界法 忒希斯
local m=16104416
local cm=_G["c"..m]
function cm.initial_effect(c)
......
--天界律 欧西纳斯
--天界律 欧西纳斯
local m=16104417
local cm=_G["c"..m]
function cm.initial_effect(c)
......
--大王具 智慧的抱拥
xpcall(function() require("expansions/script/c16199990") end,function() require("script/c16199990") end)
local m,cm=rk.set(16150020,"DAIOUGU")
local code,ccode=rk.set(16150024,"OUMEI")
function cm.initial_effect(c)
c:SetUniqueOnField(1,1,m)
--Activate
......@@ -97,27 +96,19 @@ function cm.tktg(e,tp,eg,ep,ev,re,r,rp,chk)
end
function cm.tkop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetTarget(aux.TargetBoolFunction(Card.IsLocation,LOCATION_EXTRA))
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0
or not Duel.IsPlayerCanSpecialSummonMonster(tp,m+4,0,TYPES_TOKEN_MONSTER,1000,1000,4,RACE_SPELLCASTER,ATTRIBUTE_LIGHT,POS_FACEUP) then return end
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 or not Duel.IsPlayerCanSpecialSummonMonster(tp,m+4,0,TYPES_TOKEN_MONSTER,1000,1000,4,RACE_SPELLCASTER,ATTRIBUTE_LIGHT,POS_FACEUP) then return end
local token=Duel.CreateToken(tp,m+4)
Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
end
function cm.condition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetFlagEffect(m)==0
return e:GetHandler():GetFlagEffect(m+1)==0
end
function cm.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local op=re:GetOperation()
if Duel.IsChainNegatable(ev) and Duel.SelectYesNo(tp,aux.Stringid(m,2)) and Duel.NegateActivation(ev) then
local e0=c:RegisterFlagEffect(m+1,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,0,0,aux.Stringid(m,3))
getmetatable(c).daioufilter={e0}
if not op then return end
if not c:GetEquipTarget() then return end
Duel.Hint(HINT_CARD,tp,re:GetHandler():GetOriginalCode())
......@@ -133,7 +124,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
end
ce:SetReset(RESET_EVENT+RESETS_STANDARD)
ec:RegisterEffect(ce)
getmetatable(c).daioufilter={ce,e1}
getmetatable(c).daioufilter={ce,e1,e0}
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_ADJUST)
......
......@@ -125,14 +125,14 @@ function c23100117.cnop(e,tp,eg,ep,ev,re,r,rp)
end
end
function c23100117.acop(e,tp,eg,ep,ev,re,r,rp)
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 and Duel.IsExistingMatchingCard(Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,nil,0x1f65,1) then
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 and Duel.IsExistingMatchingCard(Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,nil,0x1f76,1) then
Duel.Hint(HINT_CARD,0,23100117)
local tc=Duel.SelectMatchingCard(tp,Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,1,nil,0x1f65,1):GetFirst()
tc:AddCounter(0x1f65,1)
local tc=Duel.SelectMatchingCard(tp,Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,1,nil,0x1f76,1):GetFirst()
tc:AddCounter(0x1f76,1)
end
end
function c23100117.cfilter(c)
return c:IsLocation(LOCATION_MZONE) and c:GetCounter(0x1f65)>=3
return c:IsLocation(LOCATION_MZONE) and c:GetCounter(0x1f76)>=3
end
function c23100117.regop(e,tp,eg,ep,ev,re,r,rp)
if eg:IsExists(c23100117.cfilter,1,nil) then
......
......@@ -62,14 +62,14 @@ end
c23100119.named_with_ZhanShuRenXing=true
c23100119.assault_name=23100122
function c23100119.cttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,nil,0x1f67,1) end
if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,nil,0x1f79,1) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,1,nil,0x1f67,1)
Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,1,nil,0x1f79,1)
end
function c23100119.ctop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and tc:AddCounter(0x1f67,1) then
if tc:IsRelateToEffect(e) and tc:AddCounter(0x1f79,1) then
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_CANNOT_TRIGGER)
......@@ -79,10 +79,10 @@ function c23100119.ctop(e,tp,eg,ep,ev,re,r,rp)
end
end
function c23100119.lvcon(e)
return e:GetHandler():GetCounter(0x1f67)>0
return e:GetHandler():GetCounter(0x1f79)>0
end
function c23100119.atkfilter(e,c)
if c:GetCounter(0x1f67)>0 then
if c:GetCounter(0x1f79)>0 then
return 2
else
return 0
......
......@@ -72,22 +72,22 @@ function c23100125.val(e,c)
return Duel.GetMatchingGroupCount(c23100125.atkfil1,c:GetControler(),LOCATION_MZONE,0,nil)*300
end
function c23100125.acop(e,tp,eg,ep,ev,re,r,rp)
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 and Duel.IsExistingMatchingCard(Card.IsCanAddCounter,tp,LOCATION_MZONE,0,1,nil,0x1f64,1) then
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 and Duel.IsExistingMatchingCard(Card.IsCanAddCounter,tp,LOCATION_MZONE,0,1,nil,0x1f70,1) then
Duel.Hint(HINT_CARD,0,23100125)
local tc=Duel.SelectMatchingCard(tp,Card.IsCanAddCounter,tp,LOCATION_MZONE,0,1,1,nil,0x1f64,1):GetFirst()
tc:AddCounter(0x1f64,1)
local tc=Duel.SelectMatchingCard(tp,Card.IsCanAddCounter,tp,LOCATION_MZONE,0,1,1,nil,0x1f70,1):GetFirst()
tc:AddCounter(0x1f70,1)
end
end
function c23100125.acop1(e,tp,eg,ep,ev,re,r,rp)
if Duel.IsExistingMatchingCard(Card.IsCanAddCounter,tp,LOCATION_MZONE,0,1,nil,0x1f64,1) then
if Duel.IsExistingMatchingCard(Card.IsCanAddCounter,tp,LOCATION_MZONE,0,1,nil,0x1f70,1) then
Duel.Hint(HINT_CARD,0,23100125)
local tc=Duel.SelectMatchingCard(tp,Card.IsCanAddCounter,tp,LOCATION_MZONE,0,1,1,nil,0x1f64,1):GetFirst()
tc:AddCounter(0x1f64,1)
local tc=Duel.SelectMatchingCard(tp,Card.IsCanAddCounter,tp,LOCATION_MZONE,0,1,1,nil,0x1f70,1):GetFirst()
tc:AddCounter(0x1f70,1)
end
end
function c23100125.tgcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1f64,3,REASON_COST) end
Duel.RemoveCounter(tp,1,0,0x1f64,3,REASON_COST)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1f70,3,REASON_COST) end
Duel.RemoveCounter(tp,1,0,0x1f70,3,REASON_COST)
end
function c23100125.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToGrave,tp,0,LOCATION_ONFIELD,3,nil) end
......
......@@ -104,7 +104,7 @@ end
function c23100134.cncon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local bc=c:GetBattleTarget()
return bc and bc:GetCounter(0x1f65)>0 and bc:IsStatus(STATUS_OPPO_BATTLE) and bc:IsRelateToBattle()
return bc and bc:GetCounter(0x1f76)>0 and bc:IsStatus(STATUS_OPPO_BATTLE) and bc:IsRelateToBattle()
end
function c23100134.cntg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
......
......@@ -85,8 +85,8 @@ function c23100135.damop(e,tp,eg,ep,ev,re,r,rp)
Duel.Damage(p,d,REASON_EFFECT)
end
function c23100135.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,1,0x1f65,1,REASON_COST) end
Duel.RemoveCounter(tp,1,1,0x1f65,1,REASON_COST)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,1,0x1f76,1,REASON_COST) end
Duel.RemoveCounter(tp,1,1,0x1f76,1,REASON_COST)
end
function c23100135.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
......
......@@ -115,7 +115,7 @@ function c23100140.atkcon(e)
return Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_MZONE,0,1,nil,24400072)
end
function c23100140.damcon(e)
return e:GetHandler():GetBattleTarget()~=nil and e:GetHandler():GetBattleTarget():GetCounter(0x1f65)
return e:GetHandler():GetBattleTarget()~=nil and e:GetHandler():GetBattleTarget():GetCounter(0x1f76)
end
......
......@@ -52,15 +52,15 @@ end
c23100144.named_with_ZhanShuRenXing=true
c23100144.assault_name=23100140
function c23100144.cttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,nil,0x1f66,1) end
if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,nil,0x1f78,1) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,1,nil,0x1f66,1)
Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,1,nil,0x1f78,1)
end
function c23100144.ctop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then
tc:AddCounter(0x1f66,1)
tc:AddCounter(0x1f78,1)
end
end
function c23100144.indct(e,re,r,rp)
......@@ -76,7 +76,7 @@ function c23100144.tgcon(e)
end
function c23100144.atkval(e)
local tp=e:GetHandlerPlayer()
return Duel.GetCounter(tp,LOCATION_ONFIELD,LOCATION_ONFIELD,0x1f66)*400
return Duel.GetCounter(tp,LOCATION_ONFIELD,LOCATION_ONFIELD,0x1f78)*400
end
......
......@@ -64,14 +64,14 @@ function c23100151.indct(e,re,r,rp)
end
function c23100151.atkval(e)
local tp=e:GetHandlerPlayer()
return Duel.GetCounter(tp,LOCATION_SZONE,LOCATION_SZONE,0x1f65)*-400
return Duel.GetCounter(tp,LOCATION_SZONE,LOCATION_SZONE,0x1f76)*-400
end
function c23100151.discon(e,tp,eg,ep,ev,re,r,rp)
return rp==1-tp and Duel.IsChainNegatable(ev)
end
function c23100151.discost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,1,0x1f65,3,REASON_COST) end
Duel.RemoveCounter(tp,1,1,0x1f65,3,REASON_COST)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,1,0x1f76,3,REASON_COST) end
Duel.RemoveCounter(tp,1,1,0x1f76,3,REASON_COST)
end
function c23100151.distg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return aux.nbcon(tp,re) end
......@@ -92,11 +92,11 @@ function c23100151.ctcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c23100151.cfilter2,1,nil,tp)
end
function c23100151.cttg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanAddCounter(0x1f65,2) end
if chk==0 then return e:GetHandler():IsCanAddCounter(0x1f76,2) end
end
function c23100151.ctop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
c:AddCounter(0x1f65,2)
c:AddCounter(0x1f76,2)
end
......
--骷髅士兵
local s,id,o=GetID()
function s.initial_effect(c)
--link summon
c:EnableReviveLimit()
aux.AddLinkProcedure(c,nil,2,2)
local e2=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetCondition(s.immcon)
e2:SetTarget(s.immtg)
e2:SetOperation(s.immop)
c:RegisterEffect(e2)
end
function s.immcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
end
function s.immfilter(c)
return c:IsFaceup() and c:IsType(TYPE_MONSTER)
end
function s.immtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(s.immfilter,tp,0,LOCATION_MZONE,1,nil) end
end
function s.immop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(s.immfilter,tp,0,LOCATION_MZONE,nil)
local tc=g:GetFirst()
while tc do
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_IMMUNE_EFFECT)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(s.efilter)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e1)
tc=g:GetNext()
end
end
function s.efilter(e,te,c)
return te:IsActiveType(TYPE_MONSTER) and te:GetOwner():IsRace(RACE_ZOMBIE)
end
--暗夜暴龙
local s,id,o=GetID()
function s.initial_effect(c)
aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsAttribute,ATTRIBUTE_DARK),aux.NonTuner(nil),1)
c:EnableReviveLimit()
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_DELAY)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCountLimit(1,id)
e1:SetCondition(s.spcon)
e1:SetTarget(s.sptg)
e1:SetOperation(s.spop)
c:RegisterEffect(e1)
end
function s.spcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end
function s.spfilter(c,e,tp)
return c:IsLevel(1) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and s.spfilter(chkc,e,tp) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,s.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
end
function s.filter1(c,e,tp)
return c:IsRace(RACE_DRAGON) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
end
function s.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and
Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP) and tc:IsCode(30900659) then
local tg=Duel.SelectMatchingCard(tp,s.filter1,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
if tg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then
Duel.SpecialSummon(tg,0,tp,tp,false,false,POS_FACEUP)
end
end
end
\ No newline at end of file
--阴森森的森林
local s,id,o=GetID()
function s.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetLabel(0)
e1:SetCountLimit(1,id)
e1:SetCost(s.cost)
e1:SetTarget(s.target)
e1:SetOperation(s.activate)
c:RegisterEffect(e1)
end
function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
e:SetLabel(100)
if chk==0 then return true end
end
function s.cfilter(c,e,tp)
local lv=c:GetOriginalLevel()
local rc=c:GetRaceInGrave()
local att=c:GetAttributeInGrave()
return bit.band(c:GetOriginalType(),TYPE_MONSTER)~=0 and lv>0 and c:IsFaceup() and c:IsAbleToGraveAsCost()
and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,lv+1,rc,att,e,tp)
end
function s.spfilter(c,lv,rc,att,e,tp)
return c:IsLevel(lv) and c:IsRace(rc) and c:IsAttribute(att) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function s.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 Duel.GetLocationCount(tp,LOCATION_MZONE)>-1
and Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_MZONE,0,1,nil,e,tp)
end
e:SetLabel(0)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,s.cfilter,tp,LOCATION_MZONE,0,1,1,nil,e,tp)
local tc=g:GetFirst()
Duel.SendtoGrave(tc,REASON_COST)
Duel.SetTargetCard(tc)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
end
function s.activate(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
local tc=Duel.GetFirstTarget()
if not tc:IsRelateToEffect(e) then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,tc:GetLevel()+2,tc:GetRace(),tc:GetAttribute(),e,tp)
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end
end
--次元超越
local s,id,o=GetID()
function s.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(TIMING_BATTLE_END)
e1:SetCondition(s.condition)
e1:SetCost(s.skipcost)
e1:SetTarget(s.target)
e1:SetOperation(s.activate)
c:RegisterEffect(e1)
end
function s.condition(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetCurrentChain()>0 or Duel.GetCurrentPhase()~=PHASE_BATTLE or Duel.GetTurnPlayer()~=tp then return false end
return Duel.GetTurnPlayer()==tp
end
function s.filter(c)
return c:IsType(TYPE_SPELL) and c:IsAbleToRemoveAsCost()
end
function s.skipcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_GRAVE,0,10,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_GRAVE,0,10,10,nil)
Duel.Remove(g,POS_FACEDOWN,REASON_COST)
end
function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
if e:IsHasType(EFFECT_TYPE_ACTIVATE) then
Duel.SetChainLimit(aux.FALSE)
end
end
function s.activate(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) then
Duel.SendtoGrave(c,REASON_EFFECT)
end
Duel.SkipPhase(tp,PHASE_BATTLE,RESET_PHASE+PHASE_END,1)
Duel.SkipPhase(tp,PHASE_MAIN2,RESET_PHASE+PHASE_END,1)
Duel.SkipPhase(tp,PHASE_END,RESET_PHASE+PHASE_END,1)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EFFECT_SKIP_TURN)
e1:SetTargetRange(0,1)
e1:SetReset(RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
Duel.RegisterEffect(e1,tp)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetCode(EFFECT_CANNOT_EP)
e2:SetTargetRange(1,0)
e2:SetReset(RESET_PHASE+PHASE_MAIN1+RESET_SELF_TURN)
Duel.RegisterEffect(e2,tp)
end
\ No newline at end of file
......@@ -196,6 +196,11 @@
!setname 0x32a1 八狱
!setname 0x52a1 灾祸
!setname 0x2aa Never Gonna
!setname 0x32a2 艾娃
!setname 0x52a2 MOB
!setname 0x62a2 奥布斯克迪特
!setname 0x92a2 阿尔琪特
#AddCodeList(12400119) 艾娃卡名记述
#AddCodeList(12410000) 奥契丝卡名记述
!counter 0x2a0 雷电指示物
!counter 0x32a1 魔法指示物
......
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