Commit 0d4ab585 authored by kamijyoeast's avatar kamijyoeast Committed by GitHub

20210505_16:27_new lflist and skills reupload (#45)

* Add files via upload

* Add files via upload

* Add files via upload

* Add files via upload

* Add files via upload

* Update lflist.conf
parent 0c968061
--高速决斗技能-中世纪机械
Duel.LoadScript("speed_duel_common.lua")
function c100730002.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(37694547,c)
aux.SpeedDuelMoveCardToFieldCommon(92001300,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
......@@ -2,5 +2,6 @@
Duel.LoadScript("speed_duel_common.lua")
function c100730003.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(10080320,c)
aux.SpeedDuelMoveCardToFieldCommon(38589847,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
......@@ -2,5 +2,6 @@
Duel.LoadScript("speed_duel_common.lua")
function c100730004.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(50913601,c)
aux.SpeedDuelMoveCardToFieldCommon(54178050,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
--高速决斗技能-新生宇宙
Duel.LoadScript("speed_duel_common.lua")
function c100730005.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(43644025,c)
aux.SpeedDuelMoveCardToFieldCommon(42015635,c)
aux.SpeedDuelBeforeDraw(c,c100730005.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730005.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730005)
local c=Duel.CreateToken(tp,47274077)
Duel.SendtoHand(c,tp,REASON_RULE)
local tc=Duel.CreateToken(tp,14772491)
Duel.SSet(tp,tc)
e:Reset()
end
......@@ -2,5 +2,6 @@
Duel.LoadScript("speed_duel_common.lua")
function c100730006.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(59197169,c)
aux.SpeedDuelMoveCardToFieldCommon(88851326,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
......@@ -2,5 +2,6 @@
Duel.LoadScript("speed_duel_common.lua")
function c100730007.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(75782277,c)
aux.SpeedDuelMoveCardToFieldCommon(92881099,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
......@@ -2,5 +2,6 @@
Duel.LoadScript("speed_duel_common.lua")
function c100730008.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(90011152,c)
aux.SpeedDuelMoveCardToFieldCommon(86780027,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
--高速决斗技能-龙印·头
Duel.LoadScript("speed_duel_common.lua")
function c100730010.initial_effect(c)
aux.SpeedDuelMoveCardToDeckCommon(68431965,c)
aux.SpeedDuelMoveCardToDeckCommon(63977008,c)
aux.SpeedDuelMoveCardToDeckCommon(63977008,c)
aux.SpeedDuelMoveCardToDeckCommon(44508094,c)
aux.SpeedDuelMoveCardToDeckCommon(24696097,c)
aux.SpeedDuelMoveCardToDeckCommon(35952884,c)
aux.SpeedDuelMoveCardToDeckCommon(83994433,c)
aux.SpeedDuelMoveCardToDeckCommon(89474727,c)
aux.SpeedDuelMoveCardToDeckCommon(26268488,c)
aux.SpeedDuelMoveCardToDeckCommon(21123811,c)
aux.SpeedDuelMoveCardToDeckCommon(7841112,c)
aux.SpeedDuelMoveCardToDeckCommon(63180841,c)
aux.SpeedDuelMoveCardToDeckCommon(60025883,c)
aux.SpeedDuelMoveCardToDeckCommon(1686814,c)
aux.SpeedDuelMoveCardToFieldCommon(1003840,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
\ No newline at end of file
--高速决斗技能-龙印·翼
Duel.LoadScript("speed_duel_common.lua")
function c100730011.initial_effect(c)
aux.SpeedDuelMoveCardToDeckCommon(66141736,c)
aux.SpeedDuelMoveCardToDeckCommon(76547525,c)
aux.SpeedDuelMoveCardToDeckCommon(97021916,c)
aux.SpeedDuelMoveCardToDeckCommon(97021916,c)
aux.SpeedDuelMoveCardToDeckCommon(70902743,c)
aux.SpeedDuelMoveCardToDeckCommon(80666118,c)
aux.SpeedDuelMoveCardToDeckCommon(16172067,c)
aux.SpeedDuelMoveCardToDeckCommon(39765958,c)
aux.SpeedDuelMoveCardToDeckCommon(36857073,c)
aux.SpeedDuelMoveCardToDeckCommon(62242678,c)
aux.SpeedDuelMoveCardToDeckCommon(97489701,c)
aux.SpeedDuelMoveCardToDeckCommon(99585850,c)
aux.SpeedDuelMoveCardToDeckCommon(60025883,c)
aux.SpeedDuelMoveCardToDeckCommon(1686814,c)
aux.SpeedDuelMoveCardToFieldCommon(59593925,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
......@@ -4,5 +4,9 @@ function c100730012.initial_effect(c)
aux.SpeedDuelMoveCardToDeckCommon(22835145,c)
aux.SpeedDuelMoveCardToDeckCommon(22835145,c)
aux.SpeedDuelMoveCardToDeckCommon(9012916,c)
aux.SpeedDuelMoveCardToDeckCommon(60992105,c)
aux.SpeedDuelMoveCardToDeckCommon(60025883,c)
aux.SpeedDuelMoveCardToDeckCommon(1686814,c)
aux.SpeedDuelMoveCardToFieldCommon(91351370,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
......@@ -4,5 +4,11 @@ function c100730013.initial_effect(c)
aux.SpeedDuelMoveCardToDeckCommon(66457407,c)
aux.SpeedDuelMoveCardToDeckCommon(66457407,c)
aux.SpeedDuelMoveCardToDeckCommon(73580471,c)
aux.SpeedDuelMoveCardToDeckCommon(33698022,c)
aux.SpeedDuelMoveCardToDeckCommon(72218246,c)
aux.SpeedDuelMoveCardToDeckCommon(40139997,c)
aux.SpeedDuelMoveCardToDeckCommon(60025883,c)
aux.SpeedDuelMoveCardToDeckCommon(1686814,c)
aux.SpeedDuelMoveCardToFieldCommon(71645242,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
--高速决斗技能-进化后的最强龙族
--高速决斗技能-龙印·爪
Duel.LoadScript("speed_duel_common.lua")
function c100730014.initial_effect(c)
aux.SpeedDuelMoveCardToDeckCommon(23995346,c)
aux.SpeedDuelMoveCardToDeckCommon(56532353,c)
aux.SpeedDuelMoveCardToDeckCommon(11747708,c)
aux.SpeedDuelMoveCardToDeckCommon(11747708,c)
aux.SpeedDuelMoveCardToDeckCommon(25862681,c)
aux.SpeedDuelMoveCardToDeckCommon(4179255,c)
aux.SpeedDuelMoveCardToDeckCommon(60025883,c)
aux.SpeedDuelMoveCardToDeckCommon(1686814,c)
aux.SpeedDuelMoveCardToFieldCommon(87624166,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
--高速决斗技能-龙印·爪
--高速决斗技能-复仇末日龙
Duel.LoadScript("speed_duel_common.lua")
function c100730015.initial_effect(c)
aux.SpeedDuelMoveCardToDeckCommon(11747708,c)
aux.SpeedDuelMoveCardToDeckCommon(11747708,c)
aux.SpeedDuelMoveCardToDeckCommon(25862681,c)
aux.SpeedDuelMoveCardToDeckCommon(85475641,c)
aux.SpeedDuelMoveCardToDeckCommon(85475641,c)
aux.SpeedDuelMoveCardToDeckCommon(81020646,c)
aux.SpeedDuelMoveCardToDeckCommon(72896720,c)
aux.SpeedDuelMoveCardToDeckCommon(38904695,c)
aux.SpeedDuelMoveCardToDeckCommon(50321796,c)
aux.SpeedDuelMoveCardToDeckCommon(52687916,c)
aux.SpeedDuelMoveCardToDeckCommon(70980824,c)
aux.SpeedDuelMoveCardToFieldCommon(40555959,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
......@@ -4,5 +4,7 @@ function c100730016.initial_effect(c)
aux.SpeedDuelMoveCardToDeckCommon(60410769,c)
aux.SpeedDuelMoveCardToDeckCommon(60410769,c)
aux.SpeedDuelMoveCardToDeckCommon(7391448,c)
aux.SpeedDuelMoveCardToDeckCommon(7391448,c)
aux.SpeedDuelMoveCardToFieldCommon(16227556,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
......@@ -4,5 +4,11 @@ function c100730017.initial_effect(c)
aux.SpeedDuelMoveCardToDeckCommon(57108202,c)
aux.SpeedDuelMoveCardToDeckCommon(57108202,c)
aux.SpeedDuelMoveCardToDeckCommon(2403771,c)
aux.SpeedDuelMoveCardToDeckCommon(68084557,c)
aux.SpeedDuelMoveCardToDeckCommon(25165047,c)
aux.SpeedDuelMoveCardToDeckCommon(60025883,c)
aux.SpeedDuelMoveCardToDeckCommon(1686814,c)
aux.SpeedDuelMoveCardToFieldCommon(56074358,c)
aux.SpeedDuelMoveCardToFieldCommon(28284902,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
......@@ -32,5 +32,8 @@ function c100730018.skill(e,tp,eg,ep,ev,re,r,rp)
Duel.SendtoDeck(g,nil,-1,REASON_RULE)
local g2=g:RandomSelect(tp,3)
Duel.Exile(g2,REASON_RULE)
Duel.Hint(HINT_CARD,1-tp,100730018)
local d=Duel.CreateToken(tp,11429811)
Duel.SSet(tp,d)
e:Reset()
end
......@@ -8,5 +8,7 @@ function c100730020.initial_effect(c)
aux.SpeedDuelMoveCardToDeckCommon(68215963,c)
aux.SpeedDuelMoveCardToDeckCommon(69937550,c)
aux.SpeedDuelMoveCardToDeckCommon(95600067,c)
aux.SpeedDuelMoveCardToFieldCommon(47408488,c)
aux.SpeedDuelMoveCardToFieldCommon(34487429,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
\ No newline at end of file
......@@ -6,7 +6,8 @@ function c100730021.initial_effect(c)
end
function c100730021.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730023)
local lp=Duel.GetLP(tp)
Duel.SetLP(tp,lp+1000)
Duel.SetLP(tp,lp+1500)
e:Reset()
end
\ No newline at end of file
......@@ -6,10 +6,13 @@ function c100730022.initial_effect(c)
end
function c100730022.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730022)
local lp=Duel.GetLP(tp)
Duel.SetLP(tp,lp+1500)
Duel.SetLP(tp,lp+3500)
local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_HAND,0,nil)
g=g:RandomSelect(tp,1)
aux.SpeedDuelSendToDeckWithExile(tp,g)
local c=Duel.CreateToken(tp,20871001)
aux.SpeedDuelSendToHandWithExile(tp,c)
e:Reset()
end
\ No newline at end of file
......@@ -6,10 +6,15 @@ function c100730023.initial_effect(c)
end
function c100730023.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730023)
local lp=Duel.GetLP(tp)
Duel.SetLP(tp,lp+2000)
Duel.SetLP(tp,lp+5000)
local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_HAND,0,nil)
g=g:RandomSelect(tp,2)
aux.SpeedDuelSendToDeckWithExile(tp,g)
local c=Duel.CreateToken(tp,38199696)
aux.SpeedDuelSendToHandWithExile(tp,c)
local c=Duel.CreateToken(tp,38199696)
aux.SpeedDuelSendToHandWithExile(tp,c)
e:Reset()
end
\ No newline at end of file
--高速决斗技能-生命增加Ω
--高速决斗技能-生命增加δ
Duel.LoadScript("speed_duel_common.lua")
function c100730024.initial_effect(c)
aux.SpeedDuelBeforeDraw(c,c100730024.skill)
......@@ -6,10 +6,17 @@ function c100730024.initial_effect(c)
end
function c100730024.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730024)
local lp=Duel.GetLP(tp)
Duel.SetLP(tp,lp+2500)
Duel.SetLP(tp,lp+7500)
local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_HAND,0,nil)
g=g:RandomSelect(tp,3)
aux.SpeedDuelSendToDeckWithExile(tp,g)
local c=Duel.CreateToken(tp,98535702)
aux.SpeedDuelSendToHandWithExile(tp,c)
local c=Duel.CreateToken(tp,98535702)
aux.SpeedDuelSendToHandWithExile(tp,c)
local c=Duel.CreateToken(tp,98535702)
aux.SpeedDuelSendToHandWithExile(tp,c)
e:Reset()
end
\ No newline at end of file
--高速决斗技能-平衡
--高速决斗技能-生命增加Ω
Duel.LoadScript("speed_duel_common.lua")
function c100730025.initial_effect(c)
aux.SpeedDuelBeforeDraw(c,c100730025.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730025.skill(e,tp)
function c100730025.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
if Duel.GetMatchingGroupCount(Card.IsType,tp,LOCATION_HAND+LOCATION_DECK,0,nil,TYPE_MONSTER)<6 then
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730025,0))
e:Reset()
return
end
if Duel.GetMatchingGroupCount(Card.IsType,tp,LOCATION_HAND+LOCATION_DECK,0,nil,TYPE_SPELL)<6 then
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730025,1))
e:Reset()
return
end
if Duel.GetMatchingGroupCount(Card.IsType,tp,LOCATION_HAND+LOCATION_DECK,0,nil,TYPE_TRAP)<6 then
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730025,2))
e:Reset()
return
end
Duel.Hint(HINT_CARD,1-tp,100730025)
local lp=Duel.GetLP(tp)
Duel.SetLP(tp,lp+10000)
local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_HAND,0,nil)
if not g then return end
local count=aux.SpeedDuelSendToDeckWithExile(tp,g)
local gm=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_DECK,0,nil,TYPE_MONSTER)
local gs=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_DECK,0,nil,TYPE_SPELL)
local gt=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_DECK,0,nil,TYPE_TRAP)
local gmc=gm:GetCount()
local gsc=gm:GetCount()
local gtc=gm:GetCount()
local sum=gmc+gsc+gtc
local resultM=count/sum*gmc
local resultMInt=math.floor(resultM)
local resultMSpare=resultM-resultMInt
local resultS=count/sum*gsc
local resultSInt=math.floor(resultS)
local resultSSpare=resultS-resultSInt
local resultT=count/sum*gtc
local resultTInt=math.floor(resultT)
local resultTSpare=resultS-resultSInt
local gResult=Group.CreateGroup()
local gtmp=gm:RandomSelect(tp,resultMInt)
gResult:Merge(gtmp)
gm:Sub(gtmp)
gtmp=gs:RandomSelect(tp,resultSInt)
gResult:Merge(gtmp)
gs:Sub(gtmp)
gtmp=gt:RandomSelect(tp,resultTInt)
gResult:Merge(gtmp)
gt:Sub(gtmp)
count=count-gResult:GetCount()
local most=Group.CreateGroup()
local second=Group.CreateGroup()
if resultMSpare>=resultSSpare and resultMSpare>=resultTSpare then
most:Merge(gm)
end
if (resultMSpare>=resultSSpare and resultMSpare<resultTSpare) or (resultMSpare<resultSSpare and resultMSpare>=resultTSpare)
or (resultMSpare<resultSSpare and resultMSpare<resultTSpare and resultSSpare==resultTSpare) then
second:Merge(gm)
end
if resultSSpare>=resultMSpare and resultSSpare>=resultTSpare then
most:Merge(gs)
end
if (resultSSpare>=resultMSpare and resultSSpare<resultTSpare) or (resultSSpare<resultMSpare and resultSSpare>=resultTSpare)
or (resultSSpare<resultMSpare and resultSSpare<resultTSpare and resultMSpare==resultTSpare) then
second:Merge(gs)
end
if resultTSpare>=resultSSpare and resultTSpare>=resultMSpare then
most:Merge(gt)
end
if (resultTSpare>=resultSSpare and resultTSpare<resultMSpare) or (resultTSpare<resultSSpare and resultTSpare>=resultMSpare)
or (resultTSpare<resultMSpare and resultTSpare<resultSSpare and resultSSpare==resultTSpare) then
second:Merge(gt)
end
gtmp=most:RandomSelect(tp,1)
gResult:Merge(gtmp)
if count>1 then
most:Sub(gtmp)
if second:GetCount()==0 then
second:Merge(most)
end
gtmp=second:RandomSelect(tp,1)
gResult:Merge(gtmp)
end
aux.SpeedDuelSendToHandWithExile(tp,gResult)
g=g:RandomSelect(tp,4)
aux.SpeedDuelSendToDeckWithExile(tp,g)
local c=Duel.CreateToken(tp,29389368)
aux.SpeedDuelSendToHandWithExile(tp,c)
local c=Duel.CreateToken(tp,29389368)
aux.SpeedDuelSendToHandWithExile(tp,c)
local c=Duel.CreateToken(tp,29389368)
aux.SpeedDuelSendToHandWithExile(tp,c)
local c=Duel.CreateToken(tp,29389368)
aux.SpeedDuelSendToHandWithExile(tp,c)
e:Reset()
end
\ No newline at end of file
--高速决斗技能-命运盘
--高速决斗技能-英雄有英雄战斗的舞台
Duel.LoadScript("speed_duel_common.lua")
function c100730026.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730026.skill,c100730026.con,aux.Stringid(100730026,0))
aux.SpeedDuelMoveCardToFieldCommon(63035430,c)
aux.SpeedDuelMoveCardToFieldCommon(8951260,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730026.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,31829185)
and Duel.GetLP(tp)<=2000
end
function c100730026.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730026,0))
Duel.Hint(HINT_MESSAGE,1-tp,aux.Stringid(100730026,0))
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetLabel(0)
e1:SetCountLimit(1,100730026+100)
e1:SetOperation(c100730026.skillwin)
Duel.RegisterEffect(e1,tp,true)
local e2=Effect.GlobalEffect()
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_ADJUST)
e2:SetLabelObject(e1)
e2:SetOperation(c100730026.skillstop)
Duel.RegisterEffect(e2,tp,true)
e:Reset()
end
function c100730026.skillwin(e,tp)
local count=e:GetLabel()
count=count+1
e:SetLabel(count)
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730026,count))
Duel.Hint(HINT_MESSAGE,1-tp,aux.Stringid(100730026,count))
if count==5 then Duel.SetLP(1-tp,0) end
end
function c100730026.skillstop(e,tp)
if Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,31829185) then return end
e:GetLabelObject():Reset()
e:Reset()
end
\ No newline at end of file
--高速决斗技能-寄生虫感染
--高速决斗技能-被托付的卡
Duel.LoadScript("speed_duel_common.lua")
function c100730027.initial_effect(c)
aux.SpeedDuelBeforeDraw(c,c100730027.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730027.filter(c,g)
if not c:IsRace(RACE_INSECT) then return false end
local tc=g:GetFirst()
while tc do
if c:GetOriginalCode()==tc:GetOriginalCode() then
return false
end
tc=g:GetNext()
end
g:AddCard(c)
return true
end
function c100730027.skill(e,tp)
local g=Group.CreateGroup()
if not Duel.IsExistingMatchingCard(c100730027.filter,tp,LOCATION_DECK+LOCATION_HAND,0,4,nil,g) then
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730027,0))
e:Reset()
return
end
tp=e:GetLabelObject():GetOwner()
local count=1
if Duel.TossCoin(tp,1)==1 then
count=2
end
while count>0 do
local parasite=Duel.CreateToken(tp,27911549)
Duel.DisableShuffleCheck()
Duel.SendtoDeck(parasite,1-tp,2,REASON_RULE)
parasite:ReverseInDeck()
count=count-1
end
Duel.ShuffleDeck(1-tp)
tp = e:GetLabelObject():GetOwner()
local c=Duel.CreateToken(tp,24874630)
Duel.SendtoDeck(c,tp,0,REASON_RULE)
e:Reset()
end
\ No newline at end of file
......@@ -2,10 +2,12 @@
Duel.LoadScript("speed_duel_common.lua")
function c100730028.initial_effect(c)
aux.SpeedDuelBeforeDraw(c,c100730028.skill)
aux.SpeedDuelMoveCardToFieldCommon(56433456,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730028.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730028)
local g=Duel.GetDecktopGroup(tp,1)
aux.SpeedDuelSendToHandWithExile(tp,g)
local g2=Duel.GetDecktopGroup(1-tp,1)
......@@ -33,7 +35,7 @@ function c100730028.skill(e,tp)
e2:SetValue(c100730028.limval)
e2:SetReset(RESET_PHASE+PHASE_END,count)
Duel.RegisterEffect(e2,tp)
e:Reset()
end
function c100730028.limcon(e)
if count==2 then return Duel.GetTurnCount()==2 end
......
......@@ -12,13 +12,14 @@ end
function c100730029.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
if Duel.GetLP(tp)>=4000 then
if Duel.GetLP(tp)>=2000 then
c100730029.turn[tp]=Duel.GetTurnCount()
else
c100730029.turn[tp]=-1
end
if not c100730029.reg[tp] then
c100730029.reg[tp]=true
Duel.Hint(HINT_CARD,1-tp,100730029)
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CHANGE_DAMAGE)
......
--高速决斗技能-魔法专家
Duel.LoadScript("speed_duel_common.lua")
function c100730030.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(4259068,c)
aux.SpeedDuelBeforeDraw(c,c100730030.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
......@@ -19,11 +20,12 @@ end
function c100730030.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
local g=Group.CreateGroup()
if not Duel.IsExistingMatchingCard(c100730030.filter,tp,LOCATION_DECK+LOCATION_HAND,0,5,nil,g) then
if not Duel.IsExistingMatchingCard(c100730030.filter,tp,LOCATION_DECK,0,5,nil,g) then
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730030,0))
e:Reset()
return
end
Duel.Hint(HINT_CARD,1-tp,100730030)
g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_HAND,0,nil)
local count=aux.SpeedDuelSendToDeckWithExile(tp,g)
local gA=Group.CreateGroup()
......
......@@ -11,15 +11,14 @@ end
function c100730031.con(e,tp)
tp=e:GetLabelObject():GetOwner()
local num=math.floor((4000-Duel.GetLP(tp))/1000)
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.GetLP(tp)<=3000
and Duel.GetLP(tp)<=6000
and Duel.GetMZoneCount(tp)>0
end
function c100730031.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730031)
local num=math.floor((4000-Duel.GetLP(tp))/1000)
local num=math.floor((8000-Duel.GetLP(tp))/2000)
local max=3-Duel.GetMatchingGroupCount(c100730031.filter,tp,LOCATION_MZONE,0,nil)
if num>max then num=max end
while num>0 do
......
......@@ -15,7 +15,7 @@ function c100730032.con(e,tp)
end
function c100730032.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730049)
Duel.Hint(HINT_CARD,1-tp,100730032)
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(100730032,1))
local source=Duel.SelectMatchingCard(tp,c100730032.filter,tp,LOCATION_HAND,0,1,1,nil):GetFirst()
Duel.ConfirmCards(1-tp,source)
......@@ -25,8 +25,8 @@ function c100730032.skill(e,tp)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_LEVEL)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
e1:SetValue(source:GetLevel())
to:RegisterEffect(e1)
e:Reset()
Duel.ShuffleHand(tp)
end
\ No newline at end of file
......@@ -2,5 +2,6 @@
Duel.LoadScript("speed_duel_common.lua")
function c100730033.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(23424603,c)
aux.SpeedDuelMoveCardToFieldCommon(34646691,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
--高速决斗技能-陷阱分堆
Duel.LoadScript("speed_duel_common.lua")
function c100730035.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(17874674,c)
aux.SpeedDuelBeforeDraw(c,c100730035.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
......@@ -19,11 +20,12 @@ end
function c100730035.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
local g=Group.CreateGroup()
if not Duel.IsExistingMatchingCard(c100730035.filter,tp,LOCATION_DECK+LOCATION_HAND,0,5,nil,g) then
if not Duel.IsExistingMatchingCard(c100730035.filter,tp,LOCATION_DECK,0,5,nil,g) then
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730035,0))
e:Reset()
return
end
Duel.Hint(HINT_CARD,1-tp,100730035)
g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_HAND,0,nil)
local count=aux.SpeedDuelSendToDeckWithExile(tp,g)
local gA=Group.CreateGroup()
......
--高速决斗技能-我的怪兽卡
Duel.LoadScript("speed_duel_common.lua")
function c100730036.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(66865880,c)
aux.SpeedDuelBeforeDraw(c,c100730036.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
......@@ -22,11 +23,12 @@ end
function c100730036.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
local g=Group.CreateGroup()
if not Duel.IsExistingMatchingCard(c100730036.filter,tp,LOCATION_DECK+LOCATION_HAND,0,6,nil,g) then
if not Duel.IsExistingMatchingCard(c100730036.filter,tp,LOCATION_DECK,0,6,nil,g) then
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730036,0))
e:Reset()
return
end
Duel.Hint(HINT_CARD,1-tp,100730036)
g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_HAND,0,nil)
local count=aux.SpeedDuelSendToDeckWithExile(tp,g)
local gA=Group.CreateGroup()
......
--高速决斗技能-假陷阱
Duel.LoadScript("speed_duel_common.lua")
function c100730037.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(66526672,c)
if not c100730037.UsedLP then
c100730037.UsedLP={}
c100730037.UsedLP[0]=0
......
--高速决斗技能-无尽陷阱地狱
Duel.LoadScript("speed_duel_common.lua")
function c100730038.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(59237154,c)
aux.SpeedDuelAtMainPhase(c,c100730038.skill,c100730038.con,aux.Stringid(100730038,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
......@@ -29,8 +30,5 @@ function c100730038.skill(e,tp)
local g3=g1:RandomSelect(tp,1)
g2:Sub(g3)
Duel.SendtoHand(g3,nil,REASON_RULE)
e:Reset()
if g2:GetCount()<1 then return end
g3=g2:RandomSelect(tp,1)
Duel.SendtoDeck(g3,nil,2,REASON_RULE)
Duel.SendtoDeck(g2,nil,2,REASON_RULE)
end
\ No newline at end of file
......@@ -27,7 +27,7 @@ function c100730039.regop(e,tp,eg,ep,ev,re,r,rp)
if rp==tp and not c100730039.chain[re] and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_TRAP) then
c100730039.chain[re]=true
Duel.Hint(HINT_CARD,0,100730039)
local lp=Duel.GetLP(1-tp)-200
local lp=Duel.GetLP(1-tp)-350
if lp<0 then lp=0 end
Duel.SetLP(1-tp,lp)
end
......
--高速决斗技能-海之传说
--高速决斗技能-神秘深渊
Duel.LoadScript("speed_duel_common.lua")
function c100730040.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(22702055,c)
aux.SpeedDuelMoveCardToFieldCommon(18605135,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
......@@ -30,7 +30,6 @@ function c100730041.skill(e,tp)
local newc=Duel.CreateToken(tp,38517737)
Duel.MoveToField(newc,tp,tp,LOCATION_MZONE,pos,true)
Duel.MoveSequence(newc,seq)
e:Reset()
end
function c100730041.DisableMonsterZone(e,tp)
return 0x1f-aux.SequenceToZone(tc:GetSequence())
......
--高速决斗技能-心灵扫描
Duel.LoadScript("speed_duel_common.lua")
function c100730043.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(34694160,c)
aux.SpeedDuelAtMainPhaseNoCountLimit(c,c100730043.skill,c100730043.con,aux.Stringid(100730043,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
......
--高速决斗技能-反转痛苦
--高速决斗技能-天使的微笑
Duel.LoadScript("speed_duel_common.lua")
function c100730044.initial_effect(c)
aux.SpeedDuelAtMainPhaseNoCountLimit(c,c100730044.skill,c100730044.con,aux.Stringid(100730044,0))
aux.SpeedDuelAtMainPhase(c,c100730044.skill,c100730044.con,aux.Stringid(100730044,0))
aux.RegisterSpeedDuelSkillCardCommon()
if not c100730044.battle_damage then
c100730044.battle_damage={}
c100730044.battle_damage[0]=0
c100730044.battle_damage[1]=0
c100730044.battle_damage[2]=0
c100730044.battle_damage[3]=0
end
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_BATTLE_DAMAGE)
e1:SetOperation(c100730044.damcal)
Duel.RegisterEffect(e1,0)
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetOperation(c100730044.damcalreset)
Duel.RegisterEffect(e1,0)
end
function c100730044.damcal(e,tp,eg,ep,ev,re,r,rp)
c100730044.battle_damage[ep]=c100730044.battle_damage[ep]+ev
end
function c100730044.damcalreset(e,tp,eg,ep,ev,re,r,rp)
c100730044.battle_damage[2]=c100730044.battle_damage[0]
c100730044.battle_damage[3]=c100730044.battle_damage[1]
c100730044.battle_damage[0]=0
c100730044.battle_damage[1]=0
end
function c100730044.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and c100730044.battle_damage[tp+2]>0
and Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil)
and Duel.IsExistingMatchingCard(Card.IsRace,tp,LOCATION_HAND,0,1,nil,RACE_FAIRY)
end
function c100730044.skill(e,tp)
function c100730044.skill(e,tp,c)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_SELECTMSG,HINTMSG_FACEUP)
local g=Duel.SelectMatchingCard(tp,Card.IsFaceup,tp,LOCATION_MZONE,0,1,1,nil)
if not g or g:GetCount()==0 then return end
local fc=g:GetFirst()
local e1=Effect.CreateEffect(fc)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
e1:SetValue(math.floor(c100730044.battle_damage[tp+2]/2))
fc:RegisterEffect(e1)
Duel.Hint(HINT_CARD,1-tp,100730044)
local g=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_HAND,0,1,nil,RACE_FAIRY)
local g1=g:Select(tp,1,1,nil)
if g1 then
Duel.ConfirmCards(1-tp,g1)
Duel.Recover(tp,1000,REASON_EFFECT)
local g2=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE,0,0,1,nil,2130625)
if g2:GetCount()==0 then return end
Duel.SendtoHand(g2,tp,REASON_RULE)
Duel.ConfirmCards(1-tp,g2)
end
end
\ No newline at end of file
......@@ -12,7 +12,6 @@ end
function c100730045.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return Duel.IsExistingMatchingCard(c100730045.filter,tp,LOCATION_DECK,0,1,nil)
and Duel.GetLP(tp)>=3000
end
function c100730045.reg(c)
......@@ -21,6 +20,7 @@ end
function c100730045.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730045)
local g=Duel.GetDecktopGroup(tp,1)
if not g or g:GetCount()==0 then return end
g:ForEach(c100730045.reg)
......
......@@ -8,7 +8,7 @@ function c100730046.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
e1:SetCode(EFFECT_REVERSE_DAMAGE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetValue(c100730046.abdcon)
......
......@@ -2,8 +2,16 @@
Duel.LoadScript("speed_duel_common.lua")
function c100730047.initial_effect(c)
aux.SpeedDuelReplaceDraw(c,c100730047.skill,c100730047.con,aux.Stringid(100730047,1))
aux.SpeedDuelBeforeDraw(c,c100730047.skill2)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730047.skill2(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730136)
local tc=Duel.CreateToken(tp,97362768)
aux.SpeedDuelSendToHandWithExile(tp,tc)
e:Reset()
end
function c100730047.filter(c)
return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x3008)
......@@ -18,6 +26,7 @@ end
function c100730047.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
if Duel.SelectYesNo(tp,aux.Stringid(100730047,0)) then
Duel.Hint(HINT_CARD,1-tp,100730047)
local c=Duel.CreateToken(tp,55144522)
......
--高速决斗技能-噩梦呈现
Duel.LoadScript("speed_duel_common.lua")
function c100730048.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(78637313,c)
aux.SpeedDuelAtMainPhase(c,c100730048.skill,c100730048.con,aux.Stringid(100730048,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
......
......@@ -11,7 +11,7 @@ function c100730049.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730049.filter,tp,LOCATION_HAND,0,1,nil)
and Duel.IsExistingMatchingCard(c100730049.filter,tp,LOCATION_MZONE,0,1,nil)
and Duel.IsExistingMatchingCard(c100730049.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil)
end
function c100730049.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
......@@ -20,7 +20,7 @@ function c100730049.skill(e,tp)
local source=Duel.SelectMatchingCard(tp,c100730049.filter,tp,LOCATION_HAND,0,1,1,nil):GetFirst()
Duel.ConfirmCards(1-tp,source)
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(100730049,2))
local to=Duel.SelectMatchingCard(tp,c100730049.filter,tp,LOCATION_MZONE,0,1,1,nil):GetFirst()
local to=Duel.SelectMatchingCard(tp,c100730049.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil):GetFirst()
local e1=Effect.CreateEffect(to)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_CHANGE_LEVEL)
......@@ -28,5 +28,5 @@ function c100730049.skill(e,tp)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1:SetValue(source:GetLevel())
to:RegisterEffect(e1)
e:Reset()
Duel.ShuffleHand(tp)
end
\ No newline at end of file
......@@ -12,6 +12,7 @@ function c100730050.initial_effect(c)
local result={}
while c100730050.used[tp]>0 and count>0 do
table.insert(result,1)
Duel.Hint(HINT_CARD,1-tp,100730050)
Duel.Hint(HINT_OPSELECTED,tp,aux.Stringid(100730050,4))
Duel.Hint(HINT_OPSELECTED,1-tp,aux.Stringid(100730050,4))
count=count-1
......
......@@ -17,14 +17,14 @@ function c100730051.skill(e,tp)
Duel.Hint(HINT_CARD,1-tp,100730051)
local g=Duel.GetMatchingGroup(c100730051.filter,tp,LOCATION_MZONE,0,nil)
if g:GetCount()==0 then return end
local ct=Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)*100
local ct=Duel.GetFieldGroupCount(tp,LOCATION_ONFIELD,0)*100
local tc=g:GetFirst()
while tc do
local e1=Effect.CreateEffect(tc)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,2)
e1:SetValue(ct)
tc:RegisterEffect(e1)
tc=g:GetNext()
......
--高速决斗技能-黑暗决斗
--高速决斗技能黑暗决斗
Duel.LoadScript("speed_duel_common.lua")
function c100730053.initial_effect(c)
if not c100730053.reg then
c100730053.reg=1
else
c100730053.reg=c100730053.reg+1
end
if c100730053.reg == 1 then
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetCode(EVENT_TURN_END)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCountLimit(1)
e1:SetOperation(c100730053.skill)
Duel.RegisterEffect(e1,0)
end
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730053.skill(e,tp,eg,ep,ev,re,r,rp)
tp=Duel.GetTurnPlayer()
Duel.Hint(HINT_CARD,tp,100730053)
local ct=Duel.GetFieldGroupCount(tp,LOCATION_GRAVE,0)*200
Duel.Hint(HINT_CARD,1-tp,100730053)
local ct=Duel.GetFieldGroupCount(tp,LOCATION_GRAVE,0)*100*c100730053.reg
ct=Duel.GetLP(tp)-ct
if ct<0 then ct=0 end
Duel.SetLP(tp,ct)
Duel.Damage(tp,ct,REASON_RULE)
end
\ No newline at end of file
--高速决斗技能-重新开始
--高速决斗技能-来自墓碑的复仇
Duel.LoadScript("speed_duel_common.lua")
function c100730054.initial_effect(c)
aux.SpeedDuelMoveCardToDeckCommon(81020646,c)
aux.SpeedDuelMoveCardToDeckCommon(72896720,c)
aux.SpeedDuelMoveCardToDeckCommon(38904695,c)
aux.SpeedDuelMoveCardToDeckCommon(50321796,c)
aux.SpeedDuelMoveCardToDeckCommon(52687916,c)
aux.SpeedDuelMoveCardToDeckCommon(70980824,c)
aux.SpeedDuelBeforeDraw(c,c100730054.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730054.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
e:Reset()
local g=Duel.GetFieldGroup(tp,LOCATION_HAND,0)
local ct=g:GetCount()
if ct==0 then return end
if not Duel.SelectYesNo(tp,aux.Stringid(100730054,0)) then return end
aux.SpeedDuelSendToDeckWithExile(tp,g)
local g2=Duel.GetFieldGroup(tp,LOCATION_DECK,0)
g2=g2:RandomSelect(tp,ct)
aux.SpeedDuelSendToHandWithExile(tp,g2)
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EFFECT_SKIP_DP)
e1:SetTargetRange(1,0)
if Duel.GetTurnPlayer()==tp then
e1:SetReset(RESET_PHASE+PHASE_DRAW+RESET_SELF_TURN,2)
if Duel.IsExistingMatchingCard(Card.IsAttribute,tp,LOCATION_DECK,0,1,nil,0x5f) then
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730054,0))
else
e1:SetReset(RESET_PHASE+PHASE_DRAW+RESET_SELF_TURN)
aux.SpeedDuelSendToDeckWithExile(tp,g)
local c=Duel.CreateToken(tp,85475641)
Duel.SendtoGrave(c,REASON_RULE)
end
Duel.RegisterEffect(e1,tp)
end
--高速决斗技能-秘密交换
--高速决斗技能-融合大师
Duel.LoadScript("speed_duel_common.lua")
function c100730055.initial_effect(c)
if not c100730055.UsedLP then
......@@ -8,6 +8,7 @@ function c100730055.initial_effect(c)
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelAtMainPhase(c,c100730055.skill,c100730055.con,aux.Stringid(100730055,0))
aux.SpeedDuelMoveCardToFieldCommon(30548775,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730055.con(e,tp)
......
......@@ -4,22 +4,19 @@ function c100730057.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730057.skill,c100730057.con,aux.Stringid(100730057,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730057.filter(c)
return c:IsType(TYPE_MONSTER)
end
function c100730057.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730057.filter,tp,0,LOCATION_GRAVE,1,nil)
and Duel.GetLP(tp)+2000<=Duel.GetLP(1-tp)
end
function c100730057.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730057)
local g1=Duel.GetMatchingGroup(c100730057.filter,tp,0,LOCATION_GRAVE,nil)
local g1=Duel.GetMatchingGroup(nil,tp,0,LOCATION_GRAVE,nil)
local g2=Group.CreateGroup()
local tc=g1:GetFirst()
while tc do
......
......@@ -4,30 +4,27 @@ function c100730058.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730058.skill,c100730058.con,aux.Stringid(100730058,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730058.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.GetLP(tp)+1000<=Duel.GetLP(1-tp)
end
function c100730058.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730058)
local e1=Effect.CreateEffect(c)
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetTargetRange(1,1)
e1:SetTarget(c100730058.limit)
e1:SetReset(RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
Duel.RegisterEffect(e1,tp)
Duel.RegisterEffect(e1,1-tp)
local e2=e1:Clone()
e2:SetCode(EFFECT_CANNOT_REMOVE)
Duel.RegisterEffect(e2,tp)
Duel.RegisterEffect(e2,1-tp)
e:Reset()
end
function c100730058.limit(e,c,sump,sumtype,sumpos,targetp,se)
return c:IsLocation(LOCATION_GRAVE)
end
--高速决斗技能-抽卡预感:魔法·陷阱
--高速决斗技能-反转痛苦
Duel.LoadScript("speed_duel_common.lua")
function c100730059.initial_effect(c)
if not c100730059.UsedLP then
c100730059.UsedLP={}
c100730059.UsedLP[0]=0
c100730059.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730059.skill,c100730059.con,aux.Stringid(100730059,1))
aux.SpeedDuelAtMainPhaseNoCountLimit(c,c100730059.skill,c100730059.con,aux.Stringid(100730059,0))
aux.RegisterSpeedDuelSkillCardCommon()
if not c100730059.battle_damage then
c100730059.battle_damage={}
c100730059.battle_damage[0]=0
c100730059.battle_damage[1]=0
c100730059.battle_damage[2]=0
c100730059.battle_damage[3]=0
end
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_BATTLE_DAMAGE)
e1:SetOperation(c100730059.damcal)
Duel.RegisterEffect(e1,0)
local e2=Effect.GlobalEffect()
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_PHASE)
e2:SetReset(RESET_PHASE+PHASE_END)
e2:SetOperation(c100730059.damcalreset)
Duel.RegisterEffect(e2,0)
end
function c100730059.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730059,0)) then
Duel.Hint(HINT_CARD,1-tp,100730059)
c100730059.UsedLP[tp]=c100730059.UsedLP[tp]+1000
local g=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_DECK,0,nil,TYPE_SPELL+TYPE_TRAP)
if not g or g:GetCount()==0 then return end
g=g:RandomSelect(tp,1)
Duel.MoveSequence(g:GetFirst(),0)
e:Reset()
end
function c100730059.damcal(e,tp,eg,ep,ev,re,r,rp)
c100730059.battle_damage[ep]=c100730059.battle_damage[ep]+ev
end
function c100730059.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and Duel.GetMatchingGroupCount(Card.IsType,tp,LOCATION_DECK,0,nil,TYPE_SPELL+TYPE_TRAP)>0
and aux.DecreasedLP[tp]-c100730059.UsedLP[tp] >= 1000
function c100730059.damcalreset(e,tp,eg,ep,ev,re,r,rp)
c100730059.battle_damage[2]=c100730059.battle_damage[0]
c100730059.battle_damage[3]=c100730059.battle_damage[1]
c100730059.battle_damage[0]=0
c100730059.battle_damage[1]=0
end
function c100730059.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and c100730059.battle_damage[tp+2]>0
and Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil)
end
function c100730059.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_SELECTMSG,HINTMSG_FACEUP)
local g=Duel.SelectMatchingCard(tp,Card.IsFaceup,tp,LOCATION_MZONE,0,1,1,nil)
if not g or g:GetCount()==0 then return end
local fc=g:GetFirst()
local e1=Effect.GlobalEffect(fc)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
e1:SetValue(math.floor(c100730059.battle_damage[tp+2]/2))
fc:RegisterEffect(e1)
end
\ No newline at end of file
......@@ -15,6 +15,7 @@ end
function c100730060.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730060)
local token=Duel.CreateToken(1-tp,14470846)
Duel.MoveToField(token,tp,1-tp,LOCATION_MZONE,POS_FACEUP_DEFENSE,true)
e:Reset()
......
......@@ -9,7 +9,7 @@ function c100730061.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.GetMZoneCount(1-tp)>0
and Duel.GetLP(tp)<=500
and Duel.GetLP(tp)<=1000
end
function c100730061.skill(e,tp)
......@@ -18,6 +18,7 @@ function c100730061.skill(e,tp)
local z=Duel.GetMZoneCount(1-tp)
if m>z then m=z end
while m>0 do
Duel.Hint(HINT_CARD,1-tp,100730061)
local token=Duel.CreateToken(tp,14470846)
Duel.MoveToField(token,tp,1-tp,LOCATION_MZONE,POS_FACEUP_DEFENSE,true)
m=m-1
......
--高速决斗技能-抽卡预感:魔法·陷阱
--高速决斗技能-当然是正位置!
Duel.LoadScript("speed_duel_common.lua")
function c100730062.initial_effect(c)
aux.SpeedDuelBeforeDraw(c,c100730062.skill)
aux.SpeedDuelMoveCardToFieldCommon(96012004,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
......
--高速决斗技能-逆转的命运
Duel.LoadScript("speed_duel_common.lua")
function c100730063.initial_effect(c)
aux.SpeedDuelAtMainPhaseNoCountLimit(c,c100730063.skill,c100730063.con,aux.Stringid(100730063,0))
aux.SpeedDuelAtMainPhase(c,c100730063.skill,c100730063.con,aux.Stringid(100730063,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
......@@ -13,14 +13,17 @@ function c100730063.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730063.filter,tp,LOCATION_MZONE,0,1,nil)
and Duel.IsPlayerCanDraw(tp,1)
end
function c100730063.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730063,0)) then
Duel.Hint(HINT_CARD,1-tp,100730063)
Duel.Draw(tp,1,REASON_RULE)
local g=Duel.SelectMatchingCard(tp,c100730063.filter,tp,LOCATION_MZONE,0,1,1,nil)
local tc=g:GetFirst()
local val=tc:GetFlagEffectLabel(36690018)
tc:SetFlagEffectLabel(36690018,1-val)
end
end
\ No newline at end of file
--高速决斗技能-光之结界
Duel.LoadScript("speed_duel_common.lua")
function c100730064.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(73206827,c)
aux.SpeedDuelBeforeDraw(c,c100730064.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730064.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730064)
local c=Duel.CreateToken(tp,73206827)
Duel.SSet(tp,c)
local d=Duel.CreateToken(tp,62784717)
Duel.SSet(tp,d)
e:Reset()
end
\ No newline at end of file
......@@ -20,7 +20,9 @@ function c100730065.skill(e,tp)
Duel.Hint(HINT_CARD,1-tp,100730065)
local g=Duel.SelectMatchingCard(tp,c100730065.filter,tp,LOCATION_MZONE,0,1,1,nil,tp)
if #g>0 then
Duel.SendtoHand(g,nil,REASON_RULE)
Duel.SendtoHand(g,nil,REASON_EFFECT)
local c=Duel.CreateToken(tp,93108433)
Duel.SendtoHand(c,nil,REASON_RULE)
end
e:Reset()
end
\ No newline at end of file
......@@ -7,13 +7,15 @@ end
function c100730066.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
local tc=Duel.CreateToken(tp,423705)
aux.SpeedDuelSendToHandWithExile(tp,tc)
--atk up
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(c100730066.tgfilter)
e1:SetValue(200)
e1:SetValue(600)
Duel.RegisterEffect(e1,tp)
e:Reset()
end
......
......@@ -32,6 +32,5 @@ function c100730069.skill(e,tp)
Duel.Exile(c,REASON_RULE)
local nc=Duel.CreateToken(tp,code)
Duel.MoveToField(nc,tp,tp,LOCATION_MZONE,pos,true)
nc:MoveSequence(seq)
e:Reset()
Duel.MoveSequence(nc,seq)
end
......@@ -7,7 +7,7 @@ end
function c100730058.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.GetLP(tp)<=1000
and Duel.GetLP(tp)<=2500
end
function c100730058.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
......
--高速决斗技能-魔术手
Duel.LoadScript("speed_duel_common.lua")
function c100730071.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(67048711,c)
if not c100730071.UsedLP then
c100730071.UsedLP={}
c100730071.UsedLP[0]=0
......@@ -14,9 +15,7 @@ end
function c100730071.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,nil)
and aux.DecreasedLP[tp]-c100730071.UsedLP[tp]>=1500
and c100730071.UsedLP[tp]<3000
end
function c100730071.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
......
--高速决斗技能-盗贼
--高速决斗技能-永火炼狱
Duel.LoadScript("speed_duel_common.lua")
function c100730073.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730073.skill,c100730073.con,aux.Stringid(100730073,0))
......
--高速决斗技能-一手起动器
Duel.LoadScript("speed_duel_common.lua")
function c100730074.initial_effect(c)
aux.SpeedDuelMoveCardToDeckCommon(72896720,c)
aux.SpeedDuelMoveCardToDeckCommon(38904695,c)
aux.SpeedDuelMoveCardToDeckCommon(81020646,c)
aux.SpeedDuelBeforeDraw(c,c100730074.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730074.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
e:Reset()
if Duel.IsExistingMatchingCard(Card.IsAttribute,tp,LOCATION_DECK,0,1,nil,0x5f) then
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730074,0))
else
......
--高速决斗技能-空手组合技100
--高速决斗技能-仪式大师
Duel.LoadScript("speed_duel_common.lua")
function c100730075.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(95453143,c)
aux.SpeedDuelBeforeDraw(c,c100730075.skill)
aux.SpeedDuelAtMainPhase(c,c100730075.skill,c100730075.con,aux.Stringid(100730075,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730075.skill(e,tp,eg,ep,ev,re,r,rp)
function c100730075.con(e,tp)
tp=e:GetLabelObject():GetOwner()
local g=Duel.GetFieldGroup(tp,LOCATION_HAND,0)
aux.SpeedDuelSendToDeckWithExile(tp,g)
return Duel.GetTurnPlayer()==tp
and aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,nil)
and Duel.IsExistingMatchingCard(c100730075.filter,tp,LOCATION_DECK,0,1,nil)
end
function c100730075.filter(c)
return c:IsType(TYPE_RITUAL) and c:IsAbleToHand()
end
function c100730075.filter1(c)
return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
end
function c100730075.filter2(c)
return bit.band(c:GetType(),0x82)==0x82 and c:IsAbleToHand()
end
function c100730075.skill(e,tp,c)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730075)
local g1=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,nil)
local c=g1:Select(tp,1,1,nil)
Duel.SendtoDeck(c,nil,1,REASON_RULE)
local g=Duel.GetMatchingGroup(c100730075.filter1,tp,LOCATION_DECK,0,1,nil)
local g4=Duel.GetMatchingGroup(c100730075.filter2,tp,LOCATION_DECK,0,1,nil)
local op=Duel.SelectOption(tp,aux.Stringid(100730075,1),aux.Stringid(100730075,2))
if op==0 and g:GetCount()~=0 then
local g2=g:RandomSelect(tp,1)
Duel.SendtoHand(g2,tp,REASON_RULE)
elseif op==1 and g4:GetCount()~=0 then
local g3=g4:RandomSelect(tp,1)
Duel.SendtoHand(g3,tp,REASON_RULE)
else Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730075,3))
end
end
\ No newline at end of file
......@@ -14,7 +14,7 @@ function c100730077.skill(e,tp)
local g2=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK,0,1,1,nil,47355498)
Duel.SSet(tp,g2)
local d=Duel.CreateToken(tp,4081094)
Duel.SendtoDeck(d,tp,0,REASON_RULE)
Duel.SendtoDeck(d,tp,1,REASON_RULE)
local g=Group.CreateGroup()
local c=Duel.CreateToken(tp,89959682)
g:AddCard(c)
......
--高速决斗技能-这不是怪兽!是神!
Duel.LoadScript("speed_duel_common.lua")
function c100730078.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730078.skill,c100730078.con,aux.Stringid(100730078,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730078.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(Card.IsAbleToGrave,tp,LOCATION_HAND,0,1,nil)
end
function c100730078.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(Card.IsAbleToGraveAsCost,tp,LOCATION_HAND,0,1,nil)
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,10000000)
end
function c100730078.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730078)
local g1=Duel.SelectMatchingCard(tp,Card.IsAbleToGraveAsCost,tp,LOCATION_HAND,0,1,29,nil)
if not g1 then return end
Duel.SendtoGrave(g1,nil,REASON_EFFECT)
local g=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,10000000)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
if g:GetFirst():IsLocation(LOCATION_HAND) then
if Duel.IsPlayerCanSummon(tp) and Duel.IsPlayerCanAdditionalSummon(tp) and Duel.GetFlagEffect(tp,78665705)==0 then
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetDescription(aux.Stringid(100730154,0))
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetTargetRange(LOCATION_HAND,0)
e1:SetCode(EFFECT_EXTRA_SUMMON_COUNT)
e1:SetValue(0x1)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
local e2=e1:Clone()
e2:SetCode(EFFECT_EXTRA_SET_COUNT)
Duel.RegisterEffect(e2,tp)
Duel.RegisterFlagEffect(tp,78665705,RESET_PHASE+PHASE_END,0,1)
end
end
end
end
\ No newline at end of file
--高速决斗技能-钢铁袭击者
Duel.LoadScript("speed_duel_common.lua")
function c100730079.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(3113667,c)
aux.SpeedDuelMoveCardToFieldCommon(49511705,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
\ No newline at end of file
--高速决斗技能-我的名字叫于贝尔
Duel.LoadScript("speed_duel_common.lua")
function c100730080.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730080.skill,c100730080.con,aux.Stringid(100730080,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730080.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_HAND,0,1,nil,4779091,31764700)
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,78371393)
end
function c100730080.skill(e,tp,c)
tp=e:GetLabelObject():GetOwner()
local g=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_HAND,0,nil,4779091,31764700)
local c=g:Select(tp,1,1,nil)
if c then
Duel.Hint(HINT_CARD,1-tp,100730080)
Duel.SendtoDeck(g,1-tp,0,REASON_RULE)
local g=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,78371393)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_RULE)
Duel.ConfirmCards(1-tp,g)
end
end
end
\ No newline at end of file
--高速决斗技能-我永远在你身边
Duel.LoadScript("speed_duel_common.lua")
function c100730081.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730081.skill,c100730081.con,aux.Stringid(100730081,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730081.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,78371393,4779091,31764700)
end
function c100730081.skill(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,1-tp,100730081)
local sg=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,78371393,4779091,31764700)
local g=sg:Select(tp,1,9,nil)
Duel.SendtoDeck(g,1-tp,0,REASON_RULE)
local ct=g:GetCount()
local g1=Duel.GetDecktopGroup(tp,ct)
Duel.DisableShuffleCheck()
Duel.Destroy(g1,REASON_EFFECT)
end
\ No newline at end of file
--高速决斗技能-抽卡预感:地
Duel.LoadScript("speed_duel_common.lua")
function c100730082.initial_effect(c)82
aux.SpeedDuelMoveCardToFieldCommon(5973663,c)
if not c100730082.UsedLP then
c100730082.UsedLP={}
c100730082.UsedLP[0]=0
c100730082.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730082.skill,c100730082.con,aux.Stringid(100730082,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730082.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730082,0)) then
Duel.Hint(HINT_CARD,1-tp,100730082)
c100730082.UsedLP[tp]=c100730082.UsedLP[tp]+1500
local g=Duel.GetMatchingGroup(Card.IsAttribute,tp,LOCATION_DECK,0,nil,ATTRIBUTE_EARTH)
if not g or g:GetCount()==0 then return end
g=g:RandomSelect(tp,1)
Duel.MoveSequence(g:GetFirst(),0)
e:Reset()
end
end
function c100730082.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and Duel.GetMatchingGroupCount(Card.IsAttribute,tp,LOCATION_DECK,0,nil,ATTRIBUTE_EARTH)>0
and aux.DecreasedLP[tp]-c100730082.UsedLP[tp] >= 1500
end
\ No newline at end of file
--高速决斗技能-抽卡预感:炎
Duel.LoadScript("speed_duel_common.lua")
function c100730083.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(94804055,c)
if not c100730083.UsedLP then
c100730083.UsedLP={}
c100730083.UsedLP[0]=0
c100730083.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730083.skill,c100730083.con,aux.Stringid(100730083,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730083.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730083,0)) then
Duel.Hint(HINT_CARD,1-tp,100730083)
c100730083.UsedLP[tp]=c100730083.UsedLP[tp]+1500
local g=Duel.GetMatchingGroup(Card.IsAttribute,tp,LOCATION_DECK,0,nil,ATTRIBUTE_FIRE)
if not g or g:GetCount()==0 then return end
g=g:RandomSelect(tp,1)
Duel.MoveSequence(g:GetFirst(),0)
e:Reset()
end
end
function c100730083.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and Duel.GetMatchingGroupCount(Card.IsAttribute,tp,LOCATION_DECK,0,nil,ATTRIBUTE_FIRE)>0
and aux.DecreasedLP[tp]-c100730083.UsedLP[tp] >= 1500
end
\ No newline at end of file
--高速决斗技能-抽卡预感:水
Duel.LoadScript("speed_duel_common.lua")
function c100730084.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(95132338,c)
if not c100730084.UsedLP then
c100730084.UsedLP={}
c100730084.UsedLP[0]=0
c100730084.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730084.skill,c100730084.con,aux.Stringid(100730084,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730084.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730084,0)) then
Duel.Hint(HINT_CARD,1-tp,100730084)
c100730084.UsedLP[tp]=c100730084.UsedLP[tp]+1500
local g=Duel.GetMatchingGroup(Card.IsAttribute,tp,LOCATION_DECK,0,nil,ATTRIBUTE_WATER)
if not g or g:GetCount()==0 then return end
g=g:RandomSelect(tp,1)
Duel.MoveSequence(g:GetFirst(),0)
e:Reset()
end
end
function c100730084.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and Duel.GetMatchingGroupCount(Card.IsAttribute,tp,LOCATION_DECK,0,nil,ATTRIBUTE_WATER)>0
and aux.DecreasedLP[tp]-c100730084.UsedLP[tp] >= 1500
end
\ No newline at end of file
--高速决斗技能-抽卡预感:风
Duel.LoadScript("speed_duel_common.lua")
function c100730085.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(26022485,c)
if not c100730085.UsedLP then
c100730085.UsedLP={}
c100730085.UsedLP[0]=0
c100730085.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730085.skill,c100730085.con,aux.Stringid(100730085,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730085.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730085,0)) then
Duel.Hint(HINT_CARD,1-tp,100730085)
c100730085.UsedLP[tp]=c100730085.UsedLP[tp]+1500
local g=Duel.GetMatchingGroup(Card.IsAttribute,tp,LOCATION_DECK,0,nil,ATTRIBUTE_WIND)
if not g or g:GetCount()==0 then return end
g=g:RandomSelect(tp,1)
Duel.MoveSequence(g:GetFirst(),0)
e:Reset()
end
end
function c100730085.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and Duel.GetMatchingGroupCount(Card.IsAttribute,tp,LOCATION_DECK,0,nil,ATTRIBUTE_WIND)>0
and aux.DecreasedLP[tp]-c100730085.UsedLP[tp] >= 1500
end
\ No newline at end of file
--高速决斗技能-抽卡预感:暗
Duel.LoadScript("speed_duel_common.lua")
function c100730086.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(6733059,c)
if not c100730086.UsedLP then
c100730086.UsedLP={}
c100730086.UsedLP[0]=0
c100730086.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730086.skill,c100730086.con,aux.Stringid(100730086,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730086.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730086,0)) then
Duel.Hint(HINT_CARD,1-tp,100730086)
c100730086.UsedLP[tp]=c100730086.UsedLP[tp]+1500
local g=Duel.GetMatchingGroup(Card.IsAttribute,tp,LOCATION_DECK,0,nil,ATTRIBUTE_DARK)
if not g or g:GetCount()==0 then return end
g=g:RandomSelect(tp,1)
Duel.MoveSequence(g:GetFirst(),0)
e:Reset()
end
end
function c100730086.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and Duel.GetMatchingGroupCount(Card.IsAttribute,tp,LOCATION_DECK,0,nil,ATTRIBUTE_DARK)>0
and aux.DecreasedLP[tp]-c100730086.UsedLP[tp] >= 1500
end
\ No newline at end of file
--高速决斗技能-抽卡预感:光
Duel.LoadScript("speed_duel_common.lua")
function c100730087.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(62867251,c)
if not c100730087.UsedLP then
c100730087.UsedLP={}
c100730087.UsedLP[0]=0
c100730087.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730087.skill,c100730087.con,aux.Stringid(100730087,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730087.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730087,0)) then
Duel.Hint(HINT_CARD,1-tp,100730087)
c100730087.UsedLP[tp]=c100730087.UsedLP[tp]+1500
local g=Duel.GetMatchingGroup(Card.IsAttribute,tp,LOCATION_DECK,0,nil,ATTRIBUTE_LIGHT)
if not g or g:GetCount()==0 then return end
g=g:RandomSelect(tp,1)
Duel.MoveSequence(g:GetFirst(),0)
e:Reset()
end
end
function c100730087.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and Duel.GetMatchingGroupCount(Card.IsAttribute,tp,LOCATION_DECK,0,nil,ATTRIBUTE_LIGHT)>0
and aux.DecreasedLP[tp]-c100730087.UsedLP[tp] >= 1500
end
\ No newline at end of file
--高速决斗技能--嘻嘻嘻嘻(虫鸣不止)
Duel.LoadScript("speed_duel_common.lua")
function c100730088.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(22991179,c)
if not c100730088.UsedLP then
c100730088.UsedLP={}
c100730088.UsedLP[0]=0
c100730088.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730088.skill,c100730088.con,aux.Stringid(100730088,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730088.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730088,0)) then
Duel.Hint(HINT_CARD,1-tp,100730088)
c100730088.UsedLP[tp]=c100730088.UsedLP[tp]+1000
local g=Duel.GetMatchingGroup(Card.IsRace,tp,LOCATION_DECK,0,nil,RACE_INSECT)
if not g or g:GetCount()==0 then return end
g=g:RandomSelect(tp,1)
Duel.MoveSequence(g:GetFirst(),0)
e:Reset()
end
end
function c100730088.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and Duel.GetMatchingGroupCount(Card.IsRace,tp,LOCATION_DECK,0,nil,RACE_INSECT)>0
and aux.DecreasedLP[tp]-c100730088.UsedLP[tp] >= 1000
end
\ No newline at end of file
--高速决斗技能--丧尸招来
Duel.LoadScript("speed_duel_common.lua")
function c100730089.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(66835946,c)
if not c100730089.UsedLP then
c100730089.UsedLP={}
c100730089.UsedLP[0]=0
c100730089.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730089.skill,c100730089.con,aux.Stringid(100730089,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730089.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730089,0)) then
Duel.Hint(HINT_CARD,1-tp,100730089)
c100730089.UsedLP[tp]=c100730089.UsedLP[tp]+1000
local g=Duel.GetMatchingGroup(Card.IsRace,tp,LOCATION_DECK,0,nil,RACE_ZOMBIE)
if not g or g:GetCount()==0 then return end
g=g:RandomSelect(tp,1)
Duel.MoveSequence(g:GetFirst(),0)
e:Reset()
end
end
function c100730089.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and Duel.GetMatchingGroupCount(Card.IsRace,tp,LOCATION_DECK,0,nil,RACE_ZOMBIE)>0
and aux.DecreasedLP[tp]-c100730089.UsedLP[tp] >= 1000
end
\ No newline at end of file
--高速决斗技能-魔力流通
Duel.LoadScript("speed_duel_common.lua")
function c100730090.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(51481927,c)
if not c100730090.UsedLP then
c100730090.UsedLP={}
c100730090.UsedLP[0]=0
c100730090.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730090.skill,c100730090.con,aux.Stringid(100730090,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730090.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730090,0)) then
Duel.Hint(HINT_CARD,1-tp,100730090)
c100730090.UsedLP[tp]=c100730090.UsedLP[tp]+1500
local g=Duel.GetMatchingGroup(Card.IsRace,tp,LOCATION_DECK,0,nil,RACE_SPELLCASTER)
if not g or g:GetCount()==0 then return end
g=g:RandomSelect(tp,1)
Duel.MoveSequence(g:GetFirst(),0)
e:Reset()
end
end
function c100730090.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and Duel.GetMatchingGroupCount(Card.IsRace,tp,LOCATION_DECK,0,nil,RACE_SPELLCASTER)>0
and aux.DecreasedLP[tp]-c100730090.UsedLP[tp] >= 1500
end
\ No newline at end of file
--高速决斗技能-增援
Duel.LoadScript("speed_duel_common.lua")
function c100730091.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(10012614,c)
if not c100730091.UsedLP then
c100730091.UsedLP={}
c100730091.UsedLP[0]=0
c100730091.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730091.skill,c100730091.con,aux.Stringid(100730091,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730091.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730091,0)) then
Duel.Hint(HINT_CARD,1-tp,100730091)
c100730091.UsedLP[tp]=c100730091.UsedLP[tp]+1500
local g=Duel.GetMatchingGroup(Card.IsRace,tp,LOCATION_DECK,0,nil,RACE_WARRIOR)
if not g or g:GetCount()==0 then return end
g=g:RandomSelect(tp,1)
Duel.MoveSequence(g:GetFirst(),0)
e:Reset()
end
end
function c100730091.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and Duel.GetMatchingGroupCount(Card.IsRace,tp,LOCATION_DECK,0,nil,RACE_WARRIOR)>0
and aux.DecreasedLP[tp]-c100730091.UsedLP[tp] >= 1500
end
\ No newline at end of file
--高速决斗技能--生命总会找到出路
Duel.LoadScript("speed_duel_common.lua")
function c100730092.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(54407825,c)
if not c100730092.UsedLP then
c100730092.UsedLP={}
c100730092.UsedLP[0]=0
c100730092.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730092.skill,c100730092.con,aux.Stringid(100730092,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730092.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730092,0)) then
Duel.Hint(HINT_CARD,1-tp,100730092)
c100730092.UsedLP[tp]=c100730092.UsedLP[tp]+1000
local g=Duel.GetMatchingGroup(Card.IsRace,tp,LOCATION_DECK,0,nil,RACE_DINOSAUR)
if not g or g:GetCount()==0 then return end
g=g:RandomSelect(tp,1)
Duel.MoveSequence(g:GetFirst(),0)
e:Reset()
end
end
function c100730092.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and Duel.GetMatchingGroupCount(Card.IsRace,tp,LOCATION_DECK,0,nil,RACE_DINOSAUR)>0
and aux.DecreasedLP[tp]-c100730092.UsedLP[tp] >= 1000
end
\ No newline at end of file
--高速决斗技能-抽卡预感:魔法·陷阱
Duel.LoadScript("speed_duel_common.lua")
function c100730093.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(96316857,c)
if not c100730093.UsedLP then
c100730093.UsedLP={}
c100730093.UsedLP[0]=0
c100730093.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730093.skill,c100730093.con,aux.Stringid(100730093,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730093.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730093,0)) then
Duel.Hint(HINT_CARD,1-tp,100730093)
c100730093.UsedLP[tp]=c100730093.UsedLP[tp]+1000
local g=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_DECK,0,nil,TYPE_SPELL+TYPE_TRAP)
if not g or g:GetCount()==0 then return end
g=g:RandomSelect(tp,1)
Duel.MoveSequence(g:GetFirst(),0)
e:Reset()
end
end
function c100730093.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and Duel.GetMatchingGroupCount(Card.IsType,tp,LOCATION_DECK,0,nil,TYPE_SPELL+TYPE_TRAP)>0
and aux.DecreasedLP[tp]-c100730093.UsedLP[tp] >= 1000
end
\ No newline at end of file
--高速决斗技能-电子化天使的祝福
Duel.LoadScript("speed_duel_common.lua")
function c100730094.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(91946859,c)
aux.SpeedDuelReplaceDraw(c,c100730094.skill,c100730094.con,aux.Stringid(100730094,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730094.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp and Duel.GetLP(tp)<=5000
end
function c100730094.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730094,0)) then
Duel.Hint(HINT_CARD,1-tp,100730094)
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730094,1))
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CODE)
getmetatable(e:GetHandler()).announce_filter={TYPE_RITUAL,OPCODE_ISTYPE,TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ+TYPE_LINK,OPCODE_ISTYPE,OPCODE_NOT,OPCODE_AND}
local ac=Duel.AnnounceCard(tp,table.unpack(getmetatable(e:GetHandler()).announce_filter))
local c=Duel.CreateToken(tp,ac)
if c:IsSetCard(0x2093) then
Duel.SendtoDeck(c,tp,0,REASON_RULE)
else Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730094,2))
end
end
end
\ No newline at end of file
--高速决斗技能-别找借口!
Duel.LoadScript("speed_duel_common.lua")
function c100730095.initial_effect(c)
aux.SpeedDuelReplaceDraw(c,c100730095.skill,c100730095.con,aux.Stringid(100730095,1))
aux.SpeedDuelMoveCardToFieldCommon(63477921,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730095.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp and Duel.GetLP(tp)<=4000
end
function c100730095.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730095,0)) then
Duel.Hint(HINT_CARD,1-tp,100730095)
local c=Duel.CreateToken(tp,37630732)
Duel.SendtoDeck(c,tp,0,REASON_RULE)
e:Reset()
end
end
\ No newline at end of file
--高速决斗技能-元素合体!
Duel.LoadScript("speed_duel_common.lua")
function c100730096.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730096.skill,c100730096.con,aux.Stringid(100730096,2))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730096.con(e,tp)
tp=e:GetLabelObject():GetOwner()
local g=Duel.GetMatchingGroup(c100730096.spfilter,tp,LOCATION_DECK+LOCATION_HAND,0,nil,tp)
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsPlayerCanSpecialSummon(tp)
and Duel.GetMZoneCount(tp)>0
and not Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_MZONE,0,1,nil,25833572)
and g:GetClassCount(Card.GetCode)>=3
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_DECK+LOCATION_HAND,0,1,nil,25833572)
and Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_HAND,0,2,nil)
end
function c100730096.spfilter(c)
return c:IsCode(98434877) or c:IsCode(62340868) or c:IsCode(25955164)
end
function c100730096.skill(e,tp,c)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730096)
local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_HAND,0,2,nil)
local c=g:Select(tp,2,2,nil)
Duel.SendtoDeck(c,nil,2,REASON_RULE)
local sg=Duel.GetMatchingGroup(c100730096.spfilter,tp,LOCATION_DECK+LOCATION_HAND,0,nil)
local g1=sg:SelectSubGroup(tp,aux.dncheck,false,3,3)
local g2=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_HAND,0,1,1,nil,25833572)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tc=g2:GetFirst()
Duel.SpecialSummonStep(tc,0,tp,tp,true,true,POS_FACEUP)
local e1=Effect.CreateEffect(tc)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_ADD_TYPE)
e1:SetValue(TYPE_XYZ)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1,true)
Duel.Overlay(tc,g1)
local e2=Effect.CreateEffect(tc)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e2:SetReset(RESET_EVENT+RESETS_REDIRECT)
e2:SetValue(LOCATION_DECKBOT)
tc:RegisterEffect(e2)
local e3=Effect.CreateEffect(tc)
e3:SetDescription(aux.Stringid(100730096,1))
e3:SetCategory(CATEGORY_ATKCHANGE)
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetRange(LOCATION_MZONE)
e3:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1)
e3:SetCondition(c100730096.condition)
e3:SetCost(c100730096.cost)
e3:SetTarget(c100730096.target)
e3:SetOperation(c100730096.operation)
tc:RegisterEffect(e3)
local e4=Effect.CreateEffect(tc)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e4:SetCode(EFFECT_DESTROY_REPLACE)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetRange(LOCATION_MZONE)
e4:SetTarget(c100730096.reptg)
tc:RegisterEffect(e4)
local e5=Effect.CreateEffect(tc)
e5:SetDescription(aux.Stringid(100730096,0))
e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e5:SetCode(EVENT_BATTLE_DESTROYING)
e5:SetCountLimit(1)
e5:SetCondition(c100730096.atcon)
e5:SetCost(c100730096.atcost)
e5:SetOperation(c100730096.atop)
tc:RegisterEffect(e5)
Duel.SpecialSummonComplete()
end
function c100730096.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()~=tp and Duel.GetAttackTarget()==e:GetHandler()
end
function c100730096.cost(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 c100730096.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetAttacker():IsCanBeEffectTarget(e) end
Duel.SetTargetCard(Duel.GetAttacker())
end
function c100730096.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) and tc:GetAttack()>0 then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SET_ATTACK_FINAL)
e1:SetValue(0)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1)
end
end
function c100730096.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) and c:CheckRemoveOverlayCard(tp,1,REASON_EFFECT) end
if Duel.SelectEffectYesNo(tp,e:GetHandler(),96) then
c:RemoveOverlayCard(tp,1,1,REASON_EFFECT)
return true
else return false end
end
function c100730096.atcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local bc=c:GetBattleTarget()
return bc:IsLocation(LOCATION_GRAVE) and bc:IsType(TYPE_MONSTER) and c:IsChainAttackable() and c:IsStatus(STATUS_OPPO_BATTLE)
end
function c100730096.atcost(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 c100730096.atop(e,tp,eg,ep,ev,re,r,rp)
Duel.ChainAttack()
end
--高速决斗技能-丧悼之假面
Duel.LoadScript("speed_duel_common.lua")
function c100730097.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730097.skill,c100730097.con,aux.Stringid(100730097,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730097.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsPlayerCanSpecialSummon(tp)
and Duel.GetMZoneCount(tp)>0
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_MZONE+LOCATION_GRAVE,0,2,nil,13676474,86569121)
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_HAND,0,1,nil,48948935)
end
function c100730097.skill(e,tp,c)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730097)
local g1=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_MZONE+LOCATION_GRAVE,0,2,nil,13676474,86569121)
local c=g1:Select(tp,2,2,nil)
if c then
Duel.ConfirmCards(1-tp,c)
Duel.SendtoDeck(c,nil,2,REASON_RULE)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c100730097.filter),tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_HAND,0,1,1,nil)
if g:GetCount()>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tc=g:GetFirst()
if tc and Duel.SpecialSummonStep(tc,0,tp,tp,true,true,POS_FACEUP) then
local e1=Effect.GlobalEffect()
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)
Duel.RegisterEffect(e1,tp,true)
e1:SetOwnerPlayer(tp)
tc:RegisterEffect(e1,true)
end
Duel.SpecialSummonComplete()
end
end
end
function c100730097.filter(c)
return c:IsCode(48948935)
end
\ No newline at end of file
--高速决斗技能-宇宙启示
Duel.LoadScript("speed_duel_common.lua")
function c100730098.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(91654806,c)
if not c100730098.UsedLP then
c100730098.UsedLP={}
c100730098.UsedLP[0]=0
c100730098.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730098.skill,c100730098.con,aux.Stringid(100730098,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730098.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730098,0)) then
Duel.Hint(HINT_CARD,1-tp,100730098)
c100730098.UsedLP[tp]=c100730098.UsedLP[tp]+1000
local g=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_DECK,0,nil,RACE_PSYCHO)
if not g or g:GetCount()==0 then return end
g=g:RandomSelect(tp,1)
Duel.MoveSequence(g:GetFirst(),0)
e:Reset()
end
end
function c100730098.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and Duel.GetMatchingGroupCount(Card.IsType,tp,LOCATION_DECK,0,nil,RACE_PSYCHO)>0
and aux.DecreasedLP[tp]-c100730098.UsedLP[tp] >= 1000
end
\ No newline at end of file
--高速决斗技能-暗之诱惑
Duel.LoadScript("speed_duel_common.lua")
function c100730099.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(61623148,c)
if not c100730099.UsedLP then
c100730099.UsedLP={}
c100730099.UsedLP[0]=0
c100730099.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730099.skill,c100730099.con,aux.Stringid(100730099,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730099.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730099,0)) then
Duel.Hint(HINT_CARD,1-tp,100730099)
c100730099.UsedLP[tp]=c100730099.UsedLP[tp]+1800
Duel.Hint(HINT_CARD,1-tp,100730099)
local c=Duel.CreateToken(tp,1475311)
Duel.SendtoDeck(c,tp,0,REASON_RULE)
e:Reset()
end
end
function c100730099.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and aux.DecreasedLP[tp]-c100730099.UsedLP[tp] >= 1800
end
\ No newline at end of file
--高速决斗技能-天赐的宝牌
Duel.LoadScript("speed_duel_common.lua")
function c100730100.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730100.operation,c100730100.con,aux.Stringid(100730100,0))
local e1=Effect.GlobalEffect(c)
e1:SetCategory(CATEGORY_DRAW)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetOperation(c100730100.operation)
c:RegisterEffect(e1)
aux.SpeedDuelBeforeDraw(c,c100730100.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730100.Isgod(c)
return c:IsOriginalCodeRule(10000020) and c:IsFaceup()
end
function c100730100.con(e,tp)
tp=e:GetLabelObject():GetOwner()
local ht=Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)
if ht>=6 then return end
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730100.Isgod,tp,LOCATION_MZONE,0,1,nil)
and Duel.IsPlayerCanDraw(tp,6-ht)
end
function c100730100.operation(e,tp,eg,ep,ev,re,r,rp)
local ht=Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)
local hp=Duel.GetFieldGroupCount(1-tp,LOCATION_HAND,0)
Duel.Hint(HINT_CARD,1-tp,100730100)
Duel.Draw(tp,6-ht,REASON_RULE)
if hp<6 then
Duel.Draw(1-tp,6-hp,REASON_RULE)
end
end
function c100730100.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
local e2=Effect.GlobalEffect()
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetTargetRange(LOCATION_MZONE,0)
e2:SetTarget(c100730100.tgfilter)
e2:SetCode(EFFECT_IMMUNE_EFFECT)
e2:SetValue(c100730100.imfilter)
Duel.RegisterEffect(e2,tp)
e:Reset()
end
function c100730100.tgfilter(e,c)
return c:IsOriginalCodeRule(10000020) and c:IsFaceup()
end
function c100730100.imfilter(e,re)
return re:IsActiveType(TYPE_TRAP)
end
--高速决斗技能-祭品的力量
Duel.LoadScript("speed_duel_common.lua")
function c100730101.initial_effect(c)
aux.SpeedDuelBeforeDraw(c,c100730101.skill)
local e3=Effect.GlobalEffect()
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_PREDRAW)
e3:SetOperation(c100730101.operation)
e3:SetLabel(10000090)
e3:SetLabelObject(c)
Duel.RegisterEffect(e3,0)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730101.operation(e,tp,eg,ep,ev,re,r,rp)
local id=e:GetLabel()
tp = e:GetLabelObject():GetOwner()
local c=Duel.CreateToken(tp,id)
Duel.SendtoGrave(c,REASON_RULE)
e:Reset()
end
function c100730101.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
local c=e:GetHandler()
--tribute check
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_MATERIAL_CHECK)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_SET_AVAILABLE+EFFECT_FLAG_IGNORE_RANGE)
e1:SetValue(c100730101.valcheck)
Duel.RegisterEffect(e1,tp)
--give atk effect only when summon
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_SUMMON_COST)
e2:SetTargetRange(LOCATION_HAND,0)
e2:SetTarget(c100730101.tgchk)
e2:SetOperation(c100730101.facechk)
e2:SetLabelObject(e1)
Duel.RegisterEffect(e2,tp)
Duel.RegisterFlagEffect(tp,100424104,RESET_PHASE+PHASE_END,0,1)
e:Reset()
end
function c100730101.valcheck(e,c)
if e:GetLabel()==1 then
e:SetLabel(0)
local g=c:GetMaterial()
local tc=g:GetFirst()
local atk=0
local def=0
while tc do
atk=atk+math.max(tc:GetTextAttack(),0)
def=def+math.max(tc:GetTextDefense(),0)
tc=g:GetNext()
end
--atk continuous effect
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SET_BASE_ATTACK)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(atk)
e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD)
c:RegisterEffect(e1)
--def continuous effect
local e2=e1:Clone()
e2:SetCode(EFFECT_SET_BASE_DEFENSE)
e2:SetValue(def)
c:RegisterEffect(e2)
end
end
function c100730101.tgchk(e,c)
return c:IsCode(10000010)
end
function c100730101.facechk(e,tp,eg,ep,ev,re,r,rp)
e:GetLabelObject():SetLabel(1)
end
\ No newline at end of file
--高速决斗技能-牲祭封印之假面
Duel.LoadScript("speed_duel_common.lua")
function c100730102.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730102.skill,c100730102.con,aux.Stringid(100730102,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730102.Ismask(c)
return c:IsCode(48948935) or c:IsCode(49064413) and c:IsFaceup()
end
function c100730102.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730102.Ismask,tp,LOCATION_MZONE+LOCATION_SZONE,0,1,nil)
and Duel.GetMZoneCount(tp)>0
end
function c100730102.skill(e,tp)
Duel.Hint(HINT_CARD,1-tp,100730102)
local d=Duel.CreateToken(tp,29549364)
Duel.MoveToField(d,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
end
\ No newline at end of file
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
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