Skip to content

Y
ygopro
Commit aea8f539 authored by kamijyoeast's avatar kamijyoeast Committed by GitHub
Browse files
Options

update_20210629_20:37 (#53) 

* Add files via upload

* Add files via upload

* Add files via upload

* Add files via upload
parent e6cd98fa
Expand all Show whitespace changes
Inline Side-by-side
Showing with 9945 additions and 5482 deletions
expansions/script/c100730001.lua
View file @ aea8f539
--高速决斗技能-注定一抽
--高速决斗技能-爷爷的卡
Duel.LoadScript("speed_duel_common.lua")
function c100730001.initial_effect(c)
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730001.skill,c100730001.con,aux.Stringid(100730001,1))
aux.SpeedDuelMoveCardToDeckCommon(33396948,c)
aux.SpeedDuelMoveCardToDeckCommon(7902349,c)
aux.SpeedDuelMoveCardToDeckCommon(8124921,c)
aux.SpeedDuelMoveCardToDeckCommon(44519536,c)
aux.SpeedDuelMoveCardToDeckCommon(70903634,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730001.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730001,0)) then
Duel.Hint(HINT_CARD,1-tp,100730001)
Duel.Hint(HINTMSG_SELECT,tp,aux.Stringid(100730001,1))
local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,LOCATION_DECK,0,1,1,nil)
if not g then return end
Duel.MoveSequence(g:GetFirst(),0)
e:Reset()
end
end
function c100730001.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp and aux.DecreasedLP[tp] >= 2000
end
\ No newline at end of file
expansions/script/c100730002.lua
View file @ aea8f539
--高速决斗技能-中世纪机械
--高速决斗技能-皇家同花顺
Duel.LoadScript("speed_duel_common.lua")
function c100730002.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(37694547,c)
aux.SpeedDuelMoveCardToFieldCommon(92001300,c)
aux.SpeedDuelAtMainPhase(c,c100730002.skill,c100730002.con,aux.Stringid(100730106,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730002.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_HAND,0,1,nil,64788463)
end
function c100730002.skill(e,tp,c)
tp=e:GetLabelObject():GetOwner()
local g=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_HAND,0,1,nil,64788463)
local c=g:Select(tp,1,3,nil)
if c then
Duel.ConfirmCards(1-tp,c)
Duel.Hint(HINT_CARD,1-tp,100730002)
Duel.PayLPCost(tp,1000)
local d=Duel.CreateToken(tp,25652259)
Duel.SpecialSummon(d,0,tp,tp,true,true,POS_FACEUP)
local d2=Duel.CreateToken(tp,74335036)
Duel.SendtoHand(d2,nil,REASON_RULE)
e:Reset()
end
end
\ No newline at end of file
expansions/script/c100730003.lua
View file @ aea8f539
--高速决斗技能-恐龙王国
--高速决斗技能-被托付的卡
Duel.LoadScript("speed_duel_common.lua")
function c100730003.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(10080320,c)
aux.SpeedDuelMoveCardToFieldCommon(38589847,c)
aux.SpeedDuelBeforeDraw(c,c100730003.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730003.skill(e,tp)
tp = e:GetLabelObject():GetOwner()
local c=Duel.CreateToken(tp,29228529)
Duel.SendtoDeck(c,tp,0,REASON_RULE)
local d=Duel.CreateToken(tp,24874630)
Duel.SendtoDeck(d,tp,0,REASON_RULE)
local d1=Duel.CreateToken(tp,55144522)
Duel.SendtoDeck(d1,tp,0,REASON_RULE)
e:Reset()
end
\ No newline at end of file
expansions/script/c100730004.lua
View file @ aea8f539
--高速决斗技能-攀登高峰
--高速决斗技能-生命增加γ
Duel.LoadScript("speed_duel_common.lua")
function c100730004.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(50913601,c)
aux.SpeedDuelMoveCardToFieldCommon(54178050,c)
aux.SpeedDuelBeforeDraw(c,c100730004.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730004.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730004)
local lp=Duel.GetLP(tp)
Duel.SetLP(tp,lp+5000)
local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_HAND,0,nil)
local c=g:Select(tp,2,2,nil)
Duel.SendtoDeck(c,nil,1,REASON_RULE)
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
expansions/script/c100730005.lua
View file @ aea8f539
--高速决斗技能-新生宇宙
--高速决斗技能-力量提升！
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.SpeedDuelAtMainPhase(c,c100730005.skill,c100730005.con,aux.Stringid(100730005,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730005.skill(e,tp)
function c100730005.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730005.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil)
end
function c100730005.skill(e,tp,eg,ep,ev,re,r,rp)
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()
local g=Duel.SelectMatchingCard(tp,c100730005.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
local tc=g:GetFirst()
if tc then
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:SetValue(500)
tc:RegisterEffect(e1)
end
local g1=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE,0,0,1,nil,78211862)
if g1:GetCount()==0 then return end
Duel.SendtoHand(g1,tp,REASON_RULE)
end
function c100730005.filter(c)
return c:IsFaceup() and c:IsType(TYPE_MONSTER)
end
\ No newline at end of file
expansions/script/c100730007.lua
View file @ aea8f539
--高速决斗技能-鹰身女妖的狩猎场
--高速决斗技能-平衡
Duel.LoadScript("speed_duel_common.lua")
function c100730007.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(75782277,c)
aux.SpeedDuelMoveCardToFieldCommon(92881099,c)
aux.SpeedDuelBeforeDraw(c,c100730007.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730007.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730007)
if Duel.GetMatchingGroupCount(Card.IsType,tp,LOCATION_HAND+LOCATION_DECK,0,nil,TYPE_MONSTER)<6 then
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730007,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(100730007,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(100730007,2))
e:Reset()
return
end
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)
e:Reset()
end
expansions/script/c100730008.lua
View file @ aea8f539
--高速决斗技能-扰乱之乡
--高速决斗技能-天赐的宝牌
Duel.LoadScript("speed_duel_common.lua")
function c100730008.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(90011152,c)
aux.SpeedDuelMoveCardToFieldCommon(86780027,c)
aux.SpeedDuelAtMainPhase(c,c100730008.operation,c100730008.con,aux.Stringid(100730008,0))
local e1=Effect.GlobalEffect(c)
e1:SetCategory(CATEGORY_DRAW)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetOperation(c100730008.operation)
c:RegisterEffect(e1)
aux.SpeedDuelBeforeDraw(c,c100730008.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730008.Isgod(c)
return c:IsOriginalCodeRule(10000020) and c:IsFaceup()
end
function c100730008.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(c100730008.Isgod,tp,LOCATION_MZONE,0,1,nil)
and Duel.IsPlayerCanDraw(tp,6-ht)
end
function c100730008.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,100730008)
Duel.Draw(tp,6-ht,REASON_RULE)
if hp<6 then
local c=Duel.CreateToken(1-tp,42664989)
Duel.SendtoDeck(c,1-tp,0,REASON_RULE)
Duel.Draw(1-tp,6-hp,REASON_RULE)
end
end
function c100730008.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(c100730008.tgfilter)
e2:SetCode(EFFECT_IMMUNE_EFFECT)
e2:SetValue(c100730008.imfilter)
Duel.RegisterEffect(e2,tp)
e:Reset()
end
function c100730008.tgfilter(e,c)
return c:IsOriginalCodeRule(10000020) and c:IsFaceup()
end
function c100730008.imfilter(e,re)
return re:IsActiveType(TYPE_TRAP)
end
expansions/script/c100730009.lua
View file @ aea8f539
--高速决斗技能-墓孽生万物
--高速决斗技能-暴怒的雷霆
Duel.LoadScript("speed_duel_common.lua")
function c100730009.initial_effect(c)
--activate
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PREDRAW)
aux.SpeedDuelAtMainPhase(c,c100730009.operation,c100730009.con,aux.Stringid(100730009,0))
local e1=Effect.GlobalEffect(c)
e1:SetCategory(CATEGORY_DRAW)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetOperation(c100730009.operation)
e1:SetLabel(50164989)
e1:SetLabelObject(c)
Duel.RegisterEffect(e1,0)
c:RegisterEffect(e1)
aux.SpeedDuelBeforeDraw(c,c100730009.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730009.Isgod(c)
return c:IsOriginalCodeRule(10000020) and c:IsFaceup()
end
function c100730009.con(e,tp)
tp=e:GetLabelObject():GetOwner()
local ht=Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)
if ht>=4 then return end
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730009.Isgod,tp,LOCATION_MZONE,0,1,nil)
and Duel.IsPlayerCanDraw(tp,4-ht)
end
function c100730009.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)
local ht=Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)
if ht<4 then
Duel.Hint(HINT_CARD,1-tp,100730009)
local g=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_DECK,0,nil,55144522,79571449,76375976)
if g:GetCount()>0 then
g=g:RandomSelect(tp,1)
Duel.MoveSequence(g:GetFirst(),0)
end
Duel.Draw(tp,4-ht,REASON_RULE)
end
end
function c100730009.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
local e2=Effect.GlobalEffect()
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
e2:SetTargetRange(LOCATION_MZONE,0)
e2:SetTarget(c100730009.tgfilter)
e2:SetValue(LOCATION_HAND)
Duel.RegisterEffect(e2,tp)
e:Reset()
end
function c100730009.tgfilter(e,c)
return c:IsOriginalCodeRule(10000020)
end
\ No newline at end of file
expansions/script/c100730010.lua
View file @ aea8f539
--高速决斗技能-龙印·头
--高速决斗技能-幻影的野兽
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.SpeedDuelAtMainPhase(c,c100730010.skill,c100730010.con,aux.Stringid(100730010,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730010.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsPlayerCanSpecialSummon(tp)
and Duel.GetMZoneCount(tp)>1
and Duel.IsExistingMatchingCard(Card.IsAbleToGrave,tp,LOCATION_HAND,0,1,nil)
end
function c100730010.skill(e,tp,c)
tp=e:GetLabelObject():GetOwner()
local g=Duel.GetMatchingGroup(Card.IsAbleToGrave,tp,LOCATION_HAND,0,nil)
local c=g:Select(tp,1,1,nil)
if not c then return end
Duel.SendtoGrave(c,nil,REASON_RULE)
Duel.Hint(HINT_CARD,1-tp,100730010)
local d=Duel.CreateToken(tp,4796100)
local d1=Duel.CreateToken(tp,5818798)
local d2=Duel.CreateToken(tp,77207191)
Duel.SpecialSummon(d1,0,tp,tp,true,true,POS_FACEUP)
Duel.SpecialSummon(d2,0,tp,tp,true,true,POS_FACEDOWN_DEFENSE)
Duel.SendtoDeck(d,tp,0,REASON_RULE)
local chkf=tp
local mg1=Duel.GetFusionMaterial(tp):Filter(c100730010.filter1,nil,e)
local sg1=Duel.GetMatchingGroup(c100730010.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf)
local mg2=nil
local sg2=nil
local ce=Duel.GetChainMaterial(tp)
if ce~=nil then
local fgroup=ce:GetTarget()
mg2=fgroup(ce,e,tp)
local mf=ce:GetValue()
sg2=Duel.GetMatchingGroup(c100730010.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,chkf)
end
if sg1:GetCount()>0 or (sg2~=nil and sg2:GetCount()>0) then
local sg=sg1:Clone()
if sg2 then sg:Merge(sg2) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tg=sg:Select(tp,1,1,nil)
local tc=tg:GetFirst()
if sg1:IsContains(tc) and (sg2==nil or not sg2:IsContains(tc) or not Duel.SelectYesNo(tp,ce:GetDescription())) then
local mat1=Duel.SelectFusionMaterial(tp,tc,mg1,nil,chkf)
tc:SetMaterial(mat1)
Duel.SendtoGrave(mat1,REASON_EFFECT+REASON_MATERIAL+REASON_FUSION)
Duel.BreakEffect()
Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
else
local mat2=Duel.SelectFusionMaterial(tp,tc,mg2,nil,chkf)
local fop=ce:GetOperation()
fop(ce,e,tp,tc,mat2)
end
tc:CompleteProcedure()
local g1=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE,0,0,3,nil,46009906,76539047)
if g1:GetCount()>=1 then
Duel.SendtoHand(g1,tp,REASON_RULE)
end
e:Reset()
end
end
function c100730010.filter1(c,e)
return not c:IsImmuneToEffect(e)
end
function c100730010.filter2(c,e,tp,m,f,chkf)
return c:IsType(TYPE_FUSION) and c:IsCode(4796100) and (not f or f(c))
and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf)
end
\ No newline at end of file
expansions/script/c100730011.lua
View file @ aea8f539
--高速决斗技能-龙印·翼
--高速决斗技能-魔力流通
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.SpeedDuelMoveCardToFieldCommon(51481927,c)
if not c100730011.UsedLP then
c100730011.UsedLP={}
c100730011.UsedLP[0]=0
c100730011.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730011.skill,c100730011.con,aux.Stringid(100730011,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730011.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730011,0)) then
Duel.Hint(HINT_CARD,1-tp,100730011)
c100730011.UsedLP[tp]=c100730011.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 c100730011.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]-c100730011.UsedLP[tp] >= 1500
end
\ No newline at end of file
expansions/script/c100730012.lua
View file @ aea8f539
--高速决斗技能-龙印·尾
--高速决斗技能-魔法专家
Duel.LoadScript("speed_duel_common.lua")
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.SpeedDuelMoveCardToFieldCommon(4259068,c)
aux.SpeedDuelBeforeDraw(c,c100730012.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730012.filter(c,g)
if not c:IsType(TYPE_SPELL) 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 c100730012.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
local g=Group.CreateGroup()
if not Duel.IsExistingMatchingCard(c100730012.filter,tp,LOCATION_DECK,0,5,nil,g) then
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730012,0))
e:Reset()
return
end
Duel.Hint(HINT_CARD,1-tp,100730012)
g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_HAND,0,nil)
local count=aux.SpeedDuelSendToDeckWithExile(tp,g)
local gA=Group.CreateGroup()
local gB=Group.CreateGroup()
local gDeck=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_DECK,0,nil)
gA=gDeck:RandomSelect(tp,2)
gDeck:Sub(gA)
gB=gDeck:RandomSelect(tp,4)
gDeck:Sub(gB)
local gBFinal=Group.CreateGroup()
if (not gA:IsExists(Card.IsType,1,nil,TYPE_SPELL)) and (gB:IsExists(Card.IsType,1,nil,TYPE_SPELL)) then
local tc=gB:GetFirst()
local sp=nil
while tc do
if tc:IsType(TYPE_SPELL) and sp==nil then
sp=tc
gBFinal:Merge(gA)
gA:Clear()
gA:AddCard(tc)
tc=gB:GetNext()
if not tc then
tc=gDeck:RandomSelect(tp,1):GetFirst()
break
end
gA:AddCard(tc)
else
gBFinal:AddCard(tc)
end
tc=gB:GetNext()
end
end
if gA:GetCount()+gBFinal:GetCount()<count then
local add=count-gA:GetCount()-gBFinal:GetCount()
local gtmp=gDeck:RandomSelect(tp,add)
gBFinal:Merge(gtmp)
end
local fc=gA:GetFirst()
while count>0 and fc do
aux.SpeedDuelSendToHandWithExile(tp,fc)
fc=gA:GetNext()
count=count-1
end
fc=gBFinal:GetFirst()
while count>0 and fc do
aux.SpeedDuelSendToHandWithExile(tp,fc)
fc=gBFinal:GetNext()
count=count-1
end
e:Reset()
end
\ No newline at end of file
expansions/script/c100730013.lua
View file @ aea8f539
--高速决斗技能-龙印·足
--高速决斗技能-注定一抽
Duel.LoadScript("speed_duel_common.lua")
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.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730013.skill,c100730013.con,aux.Stringid(100730013,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730013.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730013,0)) then
Duel.Hint(HINT_CARD,1-tp,100730013)
Duel.Hint(HINTMSG_SELECT,tp,aux.Stringid(100730013,1))
local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,LOCATION_DECK,0,1,1,nil)
if not g then return end
Duel.MoveSequence(g:GetFirst(),0)
e:Reset()
end
end
function c100730013.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp and aux.DecreasedLP[tp] >= 2000
end
\ No newline at end of file
expansions/script/c100730014.lua
View file @ aea8f539
--高速决斗技能-龙印·爪
--高速决斗技能-传说之骑士
Duel.LoadScript("speed_duel_common.lua")
function c100730014.initial_effect(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.SpeedDuelAtMainPhase(c,c100730014.skill,c100730014.con,aux.Stringid(100730014,0))
aux.SpeedDuelBeforeDraw(c,c100730014.skill2)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730014.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_HAND,0,1,nil,6368038)
and Duel.GetMZoneCount(tp)>0
end
function c100730014.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
local g=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_HAND,0,1,nil,6368038)
local c=g:Select(tp,1,1,nil)
if c then
Duel.Hint(HINT_CARD,1-tp,100730014)
Duel.ConfirmCards(1-tp,c)
local e1=Effect.CreateEffect(e:GetHandler(c))
e1:SetDescription(aux.Stringid(100730014,0))
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetTargetRange(LOCATION_HAND,0)
e1:SetCode(EFFECT_SUMMON_PROC)
e1:SetTarget(c100730014.nttg)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
Duel.ShuffleHand(tp)
end
function c100730014.nttg(e,c)
return c:IsCode(6368038)
end
function c100730014.skill2(e,tp)
tp=e:GetLabelObject():GetOwner()
local c=e:GetHandler()
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_PIERCE)
e2:SetTargetRange(LOCATION_MZONE,0)
e2:SetTarget(c100730014.pietg)
Duel.RegisterEffect(e2,tp)
local e3=Effect.CreateEffect(c)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e3:SetTargetRange(1,0)
e3:SetCategory(CATEGORY_DRAW)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_BATTLE_DAMAGE)
e3:SetValue(c100730014.abdcon)
e3:SetCondition(c100730014.condition)
e3:SetOperation(c100730014.op)
Duel.RegisterEffect(e3,tp)
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_CANNOT_TRIGGER)
e4:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
e4:SetTargetRange(LOCATION_SZONE,0)
e4:SetTarget(c100730014.distg)
e4:SetCondition(c100730014.effcon)
Duel.RegisterEffect(e4,tp)
e:Reset()
end
function c100730014.effcon(e)
return Duel.IsExistingMatchingCard(Card.IsFacedown,tp,LOCATION_SZONE,0,1,nil)
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_MZONE,0,1,nil,6368038,16589042,66889139)
end
function c100730014.distg(e,c)
return c:IsFacedown()
end
function c100730014.pietg(e,c)
return c:IsCode(6368038,16589042,66889139)
end
function c100730014.condition(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
local bc=tc:GetBattleTarget()
return tc:IsControler(tp) and bc and bc:IsDefensePos() and tc:IsCode(6368038,16589042,66889139)
end
function c100730014.abdcon(e)
return Duel.GetTurnPlayer()==e:GetHandlerPlayer()
end
function c100730014.op(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetLabelObject()
local c=e:GetHandler()
Duel.Hint(HINT_CARD,0,100730014)
Duel.Draw(tp,2,REASON_RULE)
Duel.ShuffleHand(tp)
Duel.BreakEffect()
Duel.DiscardHand(tp,nil,1,1,REASON_EFFECT+REASON_DISCARD)
end
\ No newline at end of file
expansions/script/c100730015.lua
View file @ aea8f539
--高速决斗技能-复仇末日龙
--高速决斗技能-最后一抽
Duel.LoadScript("speed_duel_common.lua")
function c100730015.initial_effect(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.SpeedDuelReplaceDraw(c,c100730015.skill,c100730015.con,aux.Stringid(100730015,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730015.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp and Duel.GetTurnCount(tp)>=4
end
function c100730015.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730015,0)) then
Duel.Hint(HINT_CARD,1-tp,100730015)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CODE)
getmetatable(e:GetHandler()).announce_filter={TYPE_MONSTER+TYPE_TRAP+TYPE_SPELL,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)
Duel.SendtoDeck(c,tp,0,REASON_RULE)
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PHASE+PHASE_END)
e1:SetLabel(1)
e1:SetCountLimit(1)
e1:SetOperation(c100730015.skilllose)
Duel.RegisterEffect(e1,tp,true)
e:Reset()
end
end
function c100730015.skilllose(e,tp)
Duel.Hint(HINT_CARD,1-tp,100730015)
local lp=Duel.GetLP(tp)
Duel.Damage(tp,lp,REASON_RULE)
Duel.Win(1-tp,WIN_REASON_FINAL_DRAW)
end
expansions/script/c100730016.lua
View file @ aea8f539
--高速决斗技能-上吧！御用守护者
--高速决斗技能-磁吸引力
Duel.LoadScript("speed_duel_common.lua")
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.SpeedDuelAtMainPhase(c,c100730016.skill,c100730016.con,aux.Stringid(100730016,0))
aux.SpeedDuelBeforeDraw(c,c100730016.skill2)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730016.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(Card.IsSetCard,tp,LOCATION_HAND,0,2,nil,0x2066)
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,75347539)
end
function c100730016.skill(e,tp,c)
tp=e:GetLabelObject():GetOwner()
local g=Duel.GetMatchingGroup(Card.IsSetCard,tp,LOCATION_HAND,0,nil,0x2066)
local g2=g:Select(tp,2,2,nil)
Duel.Hint(HINT_CARD,1-tp,100730016)
if g2 then
Duel.ConfirmCards(1-tp,g2)
local g=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,75347539)
local tc=g:GetFirst()
Duel.SendtoHand(tc,nil,REASON_RULE)
end
end
function c100730016.skill2(e,tp)
tp=e:GetLabelObject():GetOwner()
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCountLimit(1)
e1:SetCondition(c100730016.condition)
e1:SetOperation(c100730016.op)
Duel.RegisterEffect(e1,tp)
e:Reset()
end
function c100730016.condition(e,tp,eg,ep,ev,re,r,rp)
return ep==tp and eg:GetFirst():IsSummonType(SUMMON_TYPE_NORMAL)
end
function c100730016.op(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,1-tp,100730016)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c100730016.filter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
end
end
function c100730016.filter(c)
return c:IsSetCard(0x2066) and c:IsAbleToHand() and c:IsLevelBelow(4)
end
\ No newline at end of file
expansions/script/c100730017.lua
View file @ aea8f539
--高速决斗技能-勇气与力量
--高速决斗技能-假释！
Duel.LoadScript("speed_duel_common.lua")
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.SpeedDuelAtMainPhase(c,c100730017.operation,c100730017.con,aux.Stringid(100730017,0))
local e1=Effect.GlobalEffect(c)
e1:SetCategory(CATEGORY_DRAW)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetOperation(c100730017.operation)
c:RegisterEffect(e1)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730017.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730017.otfilter,tp,LOCATION_MZONE,0,1,nil)
end
function c100730017.operation(e,tp,eg,ep,ev,re,r,rp)
local sg=Duel.GetMatchingGroup(c100730017.otfilter,tp,LOCATION_MZONE,0,nil)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local tc=sg:GetFirst()
local atk=tc:GetAttack()
if not tc then return end
Duel.Hint(HINT_CARD,1-tp,100730017)
Duel.SendtoDeck(tc,nil,0,REASON_RULE)
Duel.Recover(tp,atk,REASON_EFFECT)
end
function c100730017.otfilter(c,tp)
return c:GetOwner()~=c:GetControler()
end
\ No newline at end of file
expansions/script/c100730019.lua
View file @ aea8f539
--高速决斗技能-爷爷的卡
--高速决斗技能-上吧！御用守护者
Duel.LoadScript("speed_duel_common.lua")
function c100730019.initial_effect(c)
aux.SpeedDuelMoveCardToDeckCommon(33396948,c)
aux.SpeedDuelMoveCardToDeckCommon(7902349,c)
aux.SpeedDuelMoveCardToDeckCommon(8124921,c)
aux.SpeedDuelMoveCardToDeckCommon(44519536,c)
aux.SpeedDuelMoveCardToDeckCommon(70903634,c)
aux.SpeedDuelMoveCardToDeckCommon(60410769,c)
aux.SpeedDuelMoveCardToDeckCommon(60410769,c)
aux.SpeedDuelMoveCardToDeckCommon(7391448,c)
aux.SpeedDuelMoveCardToDeckCommon(7391448,c)
aux.SpeedDuelMoveCardToFieldCommon(16227556,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
expansions/script/c100730021.lua
View file @ aea8f539
--高速决斗技能-生命增加α
--高速决斗技能-卓越的宝玉
Duel.LoadScript("speed_duel_common.lua")
function c100730021.initial_effect(c)
aux.SpeedDuelBeforeDraw(c,c100730021.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730021.skill(e,tp,eg,ep,ev,re,r,rp)
function c100730021.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730023)
local lp=Duel.GetLP(tp)
Duel.SetLP(tp,lp+1500)
Duel.Hint(HINT_CARD,1-tp,100730021)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
local g=Duel.SelectMatchingCard(tp,Card.IsSetCard,tp,LOCATION_DECK,0,0,3,nil,0x1034)
local c=g:GetFirst()
while c do
Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetCode(EFFECT_CHANGE_TYPE)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
e1:SetValue(TYPE_SPELL+TYPE_CONTINUOUS)
c:RegisterEffect(e1)
c=g:GetNext()
end
e:Reset()
end
expansions/script/c100730022.lua
View file @ aea8f539
--高速决斗技能-生命增加α
--高速决斗技能-仪式典礼
Duel.LoadScript("speed_duel_common.lua")
function c100730022.initial_effect(c)
aux.SpeedDuelBeforeDraw(c,c100730022.skill)
aux.SpeedDuelAtMainPhase(c,c100730022.skill,c100730022.con,aux.Stringid(100730022,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730022.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730022.filter,tp,LOCATION_HAND,0,1,nil)
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,13048472)
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+3500)
local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_HAND,0,nil)
local c=g:Select(tp,1,1,nil)
Duel.SendtoDeck(c,nil,1,REASON_RULE)
local d=Duel.CreateToken(tp,20871001)
aux.SpeedDuelSendToHandWithExile(tp,d)
e:Reset()
local g=Duel.SelectMatchingCard(tp,c100730022.filter,tp,LOCATION_HAND,0,1,1,nil,tp)
Duel.ConfirmCards(1-tp,g)
local g1=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,13048472)
Duel.SendtoHand(g1,tp,REASON_RULE)
end
function c100730022.filter(c)
return bit.band(c:GetType(),0x81)==0x81
end
\ No newline at end of file
expansions/script/c100730023.lua
View file @ aea8f539
--高速决斗技能-生命增加γ
--高速决斗技能-小艾玛能有什么坏心思呢
Duel.LoadScript("speed_duel_common.lua")
function c100730023.initial_effect(c)
aux.SpeedDuelBeforeDraw(c,c100730023.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730023.skill(e,tp,eg,ep,ev,re,r,rp)
function c100730023.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730023)
local lp=Duel.GetLP(tp)
Duel.SetLP(tp,lp+5000)
local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_HAND,0,nil)
local c=g:Select(tp,2,2,nil)
Duel.SendtoDeck(c,nil,1,REASON_RULE)
local c=Duel.CreateToken(tp,38199696)
aux.SpeedDuelSendToHandWithExile(tp,c)
local c=Duel.CreateToken(tp,38199696)
aux.SpeedDuelSendToHandWithExile(tp,c)
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_DRAW)
e1:SetLabel(0)
e1:SetCountLimit(1,100730023+100)
e1:SetOperation(c100730023.skillflash)
Duel.RegisterEffect(e1,tp)
e:Reset()
end
function c100730023.skillflash(e,tp)
local count=e:GetLabel()
count=count+1
e:SetLabel(count)
if count==3 then
local c=Duel.CreateToken(tp,7902349)
Duel.SendtoDeck(c,tp,0,REASON_RULE)
local c=Duel.CreateToken(tp,55144522)
Duel.SendtoDeck(c,tp,0,REASON_RULE)
elseif count==5 then
local c=Duel.CreateToken(tp,70903634)
Duel.SendtoDeck(c,tp,0,REASON_RULE)
elseif count==7 then
local c=Duel.CreateToken(tp,44519536)
Duel.SendtoDeck(c,tp,0,REASON_RULE)
elseif count==9 then
local c=Duel.CreateToken(tp,8124921)
Duel.SendtoDeck(c,tp,0,REASON_RULE)
elseif count==11 then
Duel.Hint(HINT_CARD,1-tp,100730023)
local c=Duel.CreateToken(tp,33396948)
Duel.SendtoHand(c,tp,REASON_RULE)
end
end
\ No newline at end of file
expansions/script/c100730024.lua
View file @ aea8f539
--高速决斗技能-生命增加δ
--高速决斗技能-挖金矿
Duel.LoadScript("speed_duel_common.lua")
function c100730024.initial_effect(c)
aux.SpeedDuelBeforeDraw(c,c100730024.skill)
aux.SpeedDuelAtMainPhase(c,c100730024.operation,c100730024.con,aux.Stringid(100730024,0))
local e1=Effect.GlobalEffect(c)
e1:SetCategory(CATEGORY_DRAW)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetOperation(c100730024.operation)
c:RegisterEffect(e1)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730024.skill(e,tp,eg,ep,ev,re,r,rp)
function c100730024.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(Card.IsAbleToGrave,tp,LOCATION_HAND,0,3,nil)
and Duel.IsPlayerCanDraw(tp,1)
end
function c100730024.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetFieldGroup(tp,LOCATION_HAND,0)
if g:GetCount()>=3 then
Duel.Hint(HINT_CARD,1-tp,100730024)
local lp=Duel.GetLP(tp)
Duel.SetLP(tp,lp+7500)
local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_HAND,0,nil)
local c=g:Select(tp,3,3,nil)
Duel.SendtoDeck(c,nil,1,REASON_RULE)
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)
local sg=g:Select(tp,3,3,nil)
Duel.SendtoGrave(sg,REASON_EFFECT+REASON_DISCARD)
if Duel.TossCoin(tp,1)==1 then
local gold1=Duel.CreateToken(tp,55144522)
Duel.SendtoDeck(gold1,tp,0,REASON_RULE)
Duel.Draw(tp,1,REASON_RULE)
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730024,0))
else Duel.Draw(tp,1,REASON_RULE)
end
end
e:Reset()
end
\ No newline at end of file
expansions/script/c100730025.lua
View file @ aea8f539
--高速决斗技能-生命增加Ω
--高速决斗技能-生命支付0
Duel.LoadScript("speed_duel_common.lua")
function c100730025.initial_effect(c)
aux.SpeedDuelBeforeDraw(c,c100730025.skill)
......@@ -6,19 +6,17 @@ function c100730025.initial_effect(c)
end
function c100730025.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730025)
local lp=Duel.GetLP(tp)
Duel.SetLP(tp,lp+10000)
local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_HAND,0,nil)
local c=g:Select(tp,4,4,nil)
Duel.SendtoDeck(c,nil,1,REASON_RULE)
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()
local c=e:GetHandler()
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_LPCOST_CHANGE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetCondition(c100730025.con)
e2:SetTargetRange(1,0)
e2:SetValue(0)
Duel.RegisterEffect(e2,tp)
end
function c100730025.con(e)
local tp=e:GetHandlerPlayer()
return Duel.GetLP(tp)<=2500
end
\ No newline at end of file
expansions/script/c100730026.lua
View file @ aea8f539
--高速决斗技能-英雄有英雄战斗的舞台
--高速决斗技能-友情的力量
Duel.LoadScript("speed_duel_common.lua")
function c100730026.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(63035430,c)
aux.SpeedDuelMoveCardToFieldCommon(8951260,c)
aux.SpeedDuelBeforeDraw(c,c100730026.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730026.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
local c=Duel.CreateToken(tp,82085619)
Duel.SendtoHand(c,tp,REASON_RULE)
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_REVERSE_DAMAGE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetValue(c100730026.rev)
Duel.RegisterEffect(e1,tp)
e:Reset()
end
function c100730026.rev(e,re,r,rp,rc)
return bit.band(r,REASON_EFFECT)~=0
end
\ No newline at end of file
expansions/script/c100730027.lua
View file @ aea8f539
--高速决斗技能-被托付的卡
--高速决斗技能-生命增加α
Duel.LoadScript("speed_duel_common.lua")
function c100730027.initial_effect(c)
aux.SpeedDuelBeforeDraw(c,c100730027.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730027.skill(e,tp)
tp = e:GetLabelObject():GetOwner()
local c=Duel.CreateToken(tp,24874630)
Duel.SendtoDeck(c,tp,0,REASON_RULE)
function c100730027.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730027)
local lp=Duel.GetLP(tp)
Duel.SetLP(tp,lp+3500)
local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_HAND,0,nil)
local c=g:Select(tp,1,1,nil)
Duel.SendtoDeck(c,nil,1,REASON_RULE)
local d=Duel.CreateToken(tp,20871001)
aux.SpeedDuelSendToHandWithExile(tp,d)
e:Reset()
end
\ No newline at end of file
expansions/script/c100730029.lua
View file @ aea8f539
--高速决斗技能-毅力
--高速决斗技能-神秘礼物
Duel.LoadScript("speed_duel_common.lua")
function c100730029.initial_effect(c)
if not c100730029.reg then
c100730029.reg={}
c100730029.turn={}
c100730029.used={}
end
aux.SpeedDuelBeforeDraw(c,c100730029.skill)
aux.SpeedDuelAtMainPhase(c,c100730029.skill,c100730029.con,aux.Stringid(100730029,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730029.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730029.filter,tp,LOCATION_SZONE,0,1,nil)
and Duel.GetLocationCount(1-tp,LOCATION_SZONE)>0
end
function c100730029.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
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)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetValue(c100730029.val)
e1:SetLabel(tp)
Duel.RegisterEffect(e1,tp,true)
end
end
function c100730029.val(e,re,dam,r,rp,rc)
local tp=e:GetLabel()
if c100730029.used[tp] or c100730029.turn[tp]~=Duel.GetTurnCount() then return dam end
if dam>=Duel.GetLP(tp) then
c100730029.used[tp]=true
c100730029.limit(tp)
return Duel.GetLP(tp)-1
local tc=Duel.SelectMatchingCard(tp,c100730029.filter,tp,LOCATION_SZONE,0,1,1,nil):GetFirst()
if tc:IsLocation(LOCATION_FZONE) then
Duel.MoveToField(tc,tp,1-tp,LOCATION_FZONE,tc:GetPosition(),true)
else
Duel.MoveToField(tc,tp,1-tp,LOCATION_SZONE,tc:GetPosition(),true)
end
return dam
local d=Duel.CreateToken(1-tp,56119752)
Duel.SendtoHand(d,tp,REASON_RULE)
e:Reset()
end
function c100730029.limit(tp)
local count=1
if Duel.GetTurnPlayer()~=tp then
count=2
end
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_SPSUMMON_COUNT_LIMIT)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetValue(1)
e1:SetReset(RESET_PHASE+PHASE_END,count)
Duel.RegisterEffect(e1,tp,true)
function c100730029.filter(c)
return c:IsFacedown()
end
\ No newline at end of file
expansions/script/c100730030.lua
View file @ aea8f539
--高速决斗技能-魔法专家
--高速决斗技能-生命增加δ
Duel.LoadScript("speed_duel_common.lua")
function c100730030.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(4259068,c)
aux.SpeedDuelBeforeDraw(c,c100730030.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730030.filter(c,g)
if not c:IsType(TYPE_SPELL) 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 c100730030.skill(e,tp,eg,ep,ev,re,r,rp)
function c100730024.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,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()
local gB=Group.CreateGroup()
local gDeck=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_DECK,0,nil)
gA=gDeck:RandomSelect(tp,2)
gDeck:Sub(gA)
gB=gDeck:RandomSelect(tp,4)
gDeck:Sub(gB)
local gBFinal=Group.CreateGroup()
if (not gA:IsExists(Card.IsType,1,nil,TYPE_SPELL)) and (gB:IsExists(Card.IsType,1,nil,TYPE_SPELL)) then
local tc=gB:GetFirst()
local sp=nil
while tc do
if tc:IsType(TYPE_SPELL) and sp==nil then
sp=tc
gBFinal:Merge(gA)
gA:Clear()
gA:AddCard(tc)
tc=gB:GetNext()
if not tc then
tc=gDeck:RandomSelect(tp,1):GetFirst()
break
end
gA:AddCard(tc)
else
gBFinal:AddCard(tc)
end
tc=gB:GetNext()
end
end
if gA:GetCount()+gBFinal:GetCount()<count then
local add=count-gA:GetCount()-gBFinal:GetCount()
local gtmp=gDeck:RandomSelect(tp,add)
gBFinal:Merge(gtmp)
end
local fc=gA:GetFirst()
while count>0 and fc do
aux.SpeedDuelSendToHandWithExile(tp,fc)
fc=gA:GetNext()
count=count-1
end
fc=gBFinal:GetFirst()
while count>0 and fc do
aux.SpeedDuelSendToHandWithExile(tp,fc)
fc=gBFinal:GetNext()
count=count-1
end
local lp=Duel.GetLP(tp)
Duel.SetLP(tp,lp+7500)
local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_HAND,0,nil)
local c=g:Select(tp,3,3,nil)
Duel.SendtoDeck(c,nil,1,REASON_RULE)
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
expansions/script/c100730031.lua
View file @ aea8f539
--高速决斗技能-电子流派
--高速决斗技能-神圣护卫
Duel.LoadScript("speed_duel_common.lua")
function c100730031.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730031.skill,c100730031.con,aux.Stringid(100730031,0))
aux.SpeedDuelBeforeDraw(c,c100730031.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730031.filter(c)
return c:GetSequence()<5
end
function c100730031.con(e,tp)
function c100730031.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
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((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
local c=Duel.CreateToken(tp,26439287)
Duel.MoveToField(c,tp,tp,LOCATION_MZONE,POS_FACEUP_ATTACK,true)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1:SetValue(1)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
c:RegisterEffect(e2)
local e3=e1:Clone()
e3:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
c:RegisterEffect(e3)
local e5=e1:Clone()
e5:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
c:RegisterEffect(e5)
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_UNRELEASABLE_SUM)
e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e4:SetValue(1)
e4:SetReset(RESET_EVENT+RESETS_STANDARD)
c:RegisterEffect(e4)
local e5=e1:Clone()
e5:SetCode(EFFECT_UNRELEASABLE_NONSUM)
c:RegisterEffect(e5)
num=num-1
end
local c=Duel.CreateToken(tp,88789641)
Duel.SendtoHand(c,tp,REASON_RULE)
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_REVERSE_DAMAGE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetValue(c100730031.abdcon)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
e:Reset()
end
function c100730031.abdcon(e)
return Duel.GetTurnPlayer()==e:GetHandlerPlayer()
end
\ No newline at end of file
expansions/script/c100730032.lua
View file @ aea8f539
--高速决斗技能-等级提升
--高速决斗技能-准备战斗！
Duel.LoadScript("speed_duel_common.lua")
function c100730032.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730032.skill,c100730032.con,aux.Stringid(100730032,0))
aux.SpeedDuelBeforeDraw(c,c100730032.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730032.filter(c)
return c:IsType(TYPE_MONSTER) and c:IsLevelAbove(1)
end
function c100730032.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730032.filter,tp,LOCATION_HAND,0,1,nil)
and Duel.IsExistingMatchingCard(c100730032.filter,tp,LOCATION_MZONE,0,1,nil)
end
function c100730032.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
local c=Duel.CreateToken(tp,60643553)
Duel.SendtoHand(c,tp,REASON_RULE)
local e1=Effect.GlobalEffect()
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetOperation(c100730032.lpop)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCategory(CATEGORY_RECOVER)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
Duel.RegisterEffect(e1,tp)
e:Reset()
end
function c100730032.lpop(e,tp,eg,ep,ev,re,r,rp)
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)
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(100730032,2))
local to=Duel.SelectMatchingCard(tp,c100730032.filter,tp,LOCATION_MZONE,0,1,1,nil):GetFirst()
local e1=Effect.CreateEffect(to)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_LEVEL)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
e1:SetValue(source:GetLevel())
to:RegisterEffect(e1)
Duel.ShuffleHand(tp)
Duel.Recover(tp,200,REASON_EFFECT)
end
\ No newline at end of file
expansions/script/c100730033.lua
View file @ aea8f539
--高速决斗技能-直通墓穴
--高速决斗技能-魔术女孩防御
Duel.LoadScript("speed_duel_common.lua")
function c100730033.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(23424603,c)
aux.SpeedDuelMoveCardToFieldCommon(34646691,c)
aux.SpeedDuelMoveCardToFieldCommon(89448140,c)
aux.SpeedDuelBeforeDraw(c,c100730033.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730033.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCondition(c100730033.kaicon)
e1:SetCode(EFFECT_CHANGE_DAMAGE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetValue(c100730033.damval)
Duel.RegisterEffect(e1,tp)
e:Reset()
end
function c100730033.damval(e,re,val,r,rp,rc)
return math.floor(val/2)
end
function c100730033.filter(c)
return c:IsFaceup() and c:IsSetCard(0x20a2)
end
function c100730033.kaicon(e,tp)
return Duel.IsExistingMatchingCard(c100730033.filter,tp,LOCATION_MZONE,LOCATION_MZONE,2,nil)
end
\ No newline at end of file
expansions/script/c100730034.lua
View file @ aea8f539
--高速决斗技能-战士的领域
--高速决斗技能-魔术少女们
Duel.LoadScript("speed_duel_common.lua")
function c100730034.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(86318356,c)
aux.SpeedDuelMoveCardToFieldCommon(17896384,c)
aux.SpeedDuelBeforeDraw(c,c100730034.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730034.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_UPDATE_ATTACK)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(c100730034.gfilter)
e1:SetValue(c100730034.val)
Duel.RegisterEffect(e1,tp)
e:Reset()
end
function c100730034.gfilter(e,c)
return c:IsSetCard(0x20a2) and c:IsFaceup()
end
function c100730034.val(e,tp)
return Duel.GetFieldGroupCount(tp,LOCATION_ONFIELD,LOCATION_ONFIELD)*100
end
expansions/script/c100730036.lua
View file @ aea8f539
--高速决斗技能-我的怪兽卡
--高速决斗技能-无尽陷阱
Duel.LoadScript("speed_duel_common.lua")
function c100730036.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(66865880,c)
aux.SpeedDuelBeforeDraw(c,c100730036.skill)
aux.SpeedDuelMoveCardToFieldCommon(30653113,c)
aux.SpeedDuelAtMainPhase(c,c100730036.skill,c100730036.con,aux.Stringid(100730036,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730036.monfilter(c)
return c:IsType(TYPE_MONSTER) and c:IsLevelBelow(4)
function c100730036.filter1(c)
return c:IsType(TYPE_TRAP) and c:IsAbleToDeck()
end
function c100730036.filter(c,g)
if not c100730036.monfilter(c) 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
function c100730036.filter2(c)
return c:IsType(TYPE_TRAP) and c:IsAbleToHand()
end
function c100730036.skill(e,tp,eg,ep,ev,re,r,rp)
function c100730036.con(e,tp)
tp=e:GetLabelObject():GetOwner()
local g=Group.CreateGroup()
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()
local gB=Group.CreateGroup()
local gDeck=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_DECK,0,nil)
gA=gDeck:RandomSelect(tp,2)
gDeck:Sub(gA)
gB=gDeck:RandomSelect(tp,5)
gDeck:Sub(gB)
local gBFinal=Group.CreateGroup()
if (not gA:IsExists(c100730036.monfilter,1,nil)) and (gB:IsExists(c100730036.monfilter,1,nil)) then
local tc=gB:GetFirst()
local sp=nil
while tc do
if c100730036.monfilter(tc) and sp==nil then
sp=tc
gBFinal:Merge(gA)
gA:Clear()
gA:AddCard(tc)
tc=gB:GetNext()
if not tc then
tc=gDeck:RandomSelect(tp,1):GetFirst()
break
end
gA:AddCard(tc)
else
gBFinal:AddCard(tc)
end
tc=gB:GetNext()
end
end
if gA:GetCount()+gBFinal:GetCount()<count then
local add=count-gA:GetCount()-gBFinal:GetCount()
local gtmp=gDeck:RandomSelect(tp,add)
gBFinal:Merge(gtmp)
end
local fc=gA:GetFirst()
while count>0 and fc do
aux.SpeedDuelSendToHandWithExile(tp,fc)
fc=gA:GetNext()
count=count-1
end
fc=gBFinal:GetFirst()
while count>0 and fc do
aux.SpeedDuelSendToHandWithExile(tp,fc)
fc=gBFinal:GetNext()
count=count-1
end
e:Reset()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_GRAVE,0,3,nil,TYPE_TRAP)
and Duel.IsExistingMatchingCard(c100730036.filter1,tp,LOCATION_GRAVE,0,1,nil)
and Duel.IsExistingMatchingCard(c100730036.filter2,tp,LOCATION_GRAVE,0,1,nil)
end
function c100730036.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
local g1=Duel.GetMatchingGroup(c100730036.filter1,tp,LOCATION_GRAVE,0,nil)
local g2=Duel.GetMatchingGroup(c100730036.filter2,tp,LOCATION_GRAVE,0,nil)
if not (g1 and g1:GetCount()>0 and g2 and g2:GetCount()>0) then return end
local g3=g1:RandomSelect(tp,1)
g2:Sub(g3)
Duel.SendtoHand(g3,nil,REASON_RULE)
if g2:GetCount()<1 then return end
g3=g2:RandomSelect(tp,1)
Duel.SendtoDeck(g3,nil,2,REASON_RULE)
g3=g2:RandomSelect(tp,1)
Duel.Remove(g3,nil,REASON_RULE)
end
\ No newline at end of file
expansions/script/c100730040.lua
View file @ aea8f539
--高速决斗技能-神秘深渊
--高速决斗技能-生命增加Ω
Duel.LoadScript("speed_duel_common.lua")
function c100730040.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(22702055,c)
aux.SpeedDuelMoveCardToFieldCommon(18605135,c)
aux.SpeedDuelBeforeDraw(c,c100730040.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730040.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730040)
local lp=Duel.GetLP(tp)
Duel.SetLP(tp,lp+10000)
local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_HAND,0,nil)
local c=g:Select(tp,4,4,nil)
Duel.SendtoDeck(c,nil,1,REASON_RULE)
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
expansions/script/c100730042.lua
View file @ aea8f539
--高速决斗技能-袖口藏卡
--高速决斗技能-重新开始
Duel.LoadScript("speed_duel_common.lua")
function c100730042.initial_effect(c)
if not c100730042.use then
c100730042.use={}
c100730042.use[0]=0
c100730042.use[1]=0
end
aux.SpeedDuelBeforeDraw(c,c100730042.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730042.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PREDRAW)
e1:SetCountLimit(1,100730042+100)
e1:SetCondition(c100730042.skillcond)
e1:SetOperation(c100730042.skillask)
Duel.RegisterEffect(e1,tp)
--draw count
local e2=Effect.GlobalEffect()
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_DRAW_COUNT)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetTargetRange(1,0)
e2:SetLabel(tp)
e1:SetLabelObject(e2)
e2:SetLabelObject(e1)
e2:SetValue(c100730042.drval)
Duel.RegisterEffect(e2,tp)
local e3=Effect.GlobalEffect()
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_BATTLE_DESTROYED)
e3:SetOperation(c100730042.reg)
e3:SetLabelObject(e1)
Duel.RegisterEffect(e3,tp)
end
function c100730042.reg(e,tp,eg,ep,ev,re,r,rp)
if e:GetLabelObject() and eg:IsExists(Card.IsLevelAbove,1,nil,7) and c100730042.use[tp]~=2 then
c100730042.use[tp]=1
end
end
function c100730042.skillcond(e,tp,eg,ep,ev,re,r,rp)
return c100730042.use[tp]>0
end
function c100730042.skillask(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetTurnPlayer()~=tp then return end
if c100730042.use[tp]==1 then
if not Duel.SelectYesNo(tp,aux.Stringid(100730042,0)) then
c100730042.use[tp]=0
end
return
elseif c100730042.use[tp]==2 then
e:GetLabelObject():Reset()
tp=e:GetLabelObject():GetOwner()
e:Reset()
return
end
end
function c100730042.drval(e)
local tp=e:GetLabel()
if c100730042.use[tp]==1 then
c100730042.use[tp]=2
return 2
local g=Duel.GetFieldGroup(tp,LOCATION_HAND,0)
local ct=g:GetCount()
if ct==0 then return end
if Duel.SelectYesNo(tp,aux.Stringid(100730042,0)) then
aux.SpeedDuelSendToDeckWithExile(tp,g)
Duel.ShuffleDeck(tp)
local g2=Duel.GetDecktopGroup(tp,ct)
aux.SpeedDuelSendToHandWithExile(tp,g2)
end
return 1
local c=Duel.CreateToken(tp,7736719)
aux.SpeedDuelSendToHandWithExile(tp,c)
end
\ No newline at end of file
expansions/script/c100730043.lua
View file @ aea8f539
--高速决斗技能-心灵扫描
--高速决斗技能-这不是怪兽！是神！
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.SpeedDuelAtMainPhase(c,c100730043.skill,c100730043.con,aux.Stringid(100730043,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730043.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return Duel.GetTurnCount()>=3 and Duel.GetCurrentChain()==0
and Duel.IsExistingMatchingCard(c100730043.filter,tp,0,LOCATION_ONFIELD,1,nil)
and Duel.GetLP(tp)>=3000
end
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(Card.IsAbleToGrave,tp,LOCATION_HAND,0,1,nil)
function c100730043.filter(c)
return c:GetFlagEffect(100730043)==0 and c:GetFlagEffectLabel(100730043)~=c:GetFieldID() and c:IsFacedown()
end
function c100730043.reg(c)
c:RegisterFlagEffect(100730043,RESET_EVENT+RESETS_STANDARD+EVENT_FLIP,0,1,c:GetFieldID())
function c100730043.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 c100730043.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
local g=Duel.GetMatchingGroup(c100730043.filter,tp,0,LOCATION_ONFIELD,nil)
if not g or g:GetCount()==0 then return end
g:ForEach(c100730043.reg)
Duel.ConfirmCards(tp,g)
Duel.Hint(HINT_CARD,1-tp,100730043)
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
expansions/script/c100730044.lua
View file @ aea8f539
--高速决斗技能-天使的微笑
--高速决斗技能-攀登高峰
Duel.LoadScript("speed_duel_common.lua")
function c100730044.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730044.skill,c100730044.con,aux.Stringid(100730044,0))
aux.SpeedDuelMoveCardToFieldCommon(50913601,c)
aux.SpeedDuelMoveCardToFieldCommon(54178050,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730044.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(Card.IsRace,tp,LOCATION_HAND,0,1,nil,RACE_FAIRY)
end
function c100730044.skill(e,tp,c)
tp=e:GetLabelObject():GetOwner()
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
expansions/script/c100730045.lua
View file @ aea8f539
--高速决斗技能-香水战术
--高速决斗技能-唤龙者
Duel.LoadScript("speed_duel_common.lua")
function c100730045.initial_effect(c)
aux.SpeedDuelAtMainPhaseNoCountLimit(c,c100730045.skill,c100730045.con,aux.Stringid(100730045,0))
aux.SpeedDuelAtMainPhase(c,c100730045.skill,c100730045.con,aux.Stringid(100730045,0))
aux.SpeedDuelBeforeDraw(c,c100730045.skill2)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730045.filter(c)
return c:GetFlagEffect(100730045)==0 and c:GetFlagEffectLabel(100730045)~=c:GetFieldID() and c:IsFacedown()
end
function c100730045.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return Duel.IsExistingMatchingCard(c100730045.filter,tp,LOCATION_DECK,0,1,nil)
end
function c100730045.reg(c)
c:RegisterFlagEffect(100730045,RESET_EVENT+RESETS_STANDARD+EVENT_FLIP,0,1,c:GetFieldID())
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_HAND,0,1,nil,43973174)
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,17985575)
end
function c100730045.skill(e,tp)
function c100730045.skill(e,tp,c)
tp=e:GetLabelObject():GetOwner()
local g=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_HAND,0,nil,43973174)
local g2=g:Select(tp,1,1,nil)
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)
Duel.ConfirmCards(tp,g)
if g2 then
Duel.ConfirmCards(1-tp,g2)
local g=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,17985575)
local tc=g:GetFirst()
Duel.SendtoHand(tc,nil,REASON_RULE)
end
end
function c100730045.skill2(e,tp)
tp=e:GetLabelObject():GetOwner()
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCountLimit(1)
e1:SetCondition(c100730045.condition)
e1:SetOperation(c100730045.op)
Duel.RegisterEffect(e1,tp)
e:Reset()
end
function c100730045.condition(e,tp,eg,ep,ev,re,r,rp)
return ep==tp and eg:GetFirst():IsSummonType(SUMMON_TYPE_NORMAL)
end
function c100730045.adjustop(e,tp)
local g=Duel.GetDecktopGroup(tp,1)
if not g or g:GetCount()==0 then return end
local fc=g:GetFirst()
if fc:IsPosition(POS_FACEUP_DEFENSE) then return end
fc:ReverseInDeck()
function c100730045.op(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,1-tp,100730045)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,43973174)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
Duel.ShuffleHand(tp)
end
end
\ No newline at end of file
expansions/script/c100730046.lua
View file @ aea8f539
--高速决斗技能-神圣护卫
--高速决斗技能-进化后的最强龙族
Duel.LoadScript("speed_duel_common.lua")
function c100730046.initial_effect(c)
aux.SpeedDuelBeforeDraw(c,c100730046.skill)
aux.SpeedDuelMoveCardToDeckCommon(23995346,c)
aux.SpeedDuelMoveCardToDeckCommon(56532353,c)
aux.SpeedDuelMoveCardToDeckCommon(2129638,c)
aux.SpeedDuelMoveCardToDeckCommon(62873545,c)
aux.SpeedDuelMoveCardToDeckCommon(43228023,c)
aux.SpeedDuelAtMainPhase(c,c100730046.skill,c100730046.con,aux.Stringid(100730106,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730046.skill(e,tp,eg,ep,ev,re,r,rp)
function c100730046.con(e,tp)
tp=e:GetLabelObject():GetOwner()
local c=Duel.CreateToken(tp,88789641)
Duel.SendtoHand(c,tp,REASON_RULE)
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_REVERSE_DAMAGE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetValue(c100730046.abdcon)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_HAND,0,2,nil,89631139)
end
function c100730046.abdcon(e)
return Duel.GetTurnPlayer()==e:GetHandlerPlayer()
function c100730046.skill(e,tp,c)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730046)
local g=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_HAND,0,nil,89631139)
Duel.ConfirmCards(1-tp,g)
local d=Duel.CreateToken(tp,24094653)
Duel.SendtoHand(d,nil,REASON_RULE)
Duel.ConfirmCards(1-tp,d)
if g:GetCount()==3 then
local c=Duel.CreateToken(tp,53347303)
Duel.SendtoHand(c,nil,REASON_RULE)
Duel.ConfirmCards(1-tp,c)
end
e:Reset()
end
\ No newline at end of file
expansions/script/c100730047.lua
View file @ aea8f539
--高速决斗技能-奇迹抽卡
--高速决斗技能-同盟联合
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.SpeedDuelBeforeDraw(c,c100730047.skill)
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)
end
function c100730047.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and Duel.IsExistingMatchingCard(c100730047.filter,tp,LOCATION_GRAVE,0,1,nil)
and Duel.GetTurnCount()>=3
function c100730047.nttg(e,c)
return c:IsType(TYPE_UNION) or c:IsType(TYPE_NORMAL)
end
function c100730047.skill(e,tp)
function c100730047.skill(e,tp,eg,ep,ev,re,r,rp)
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.SendtoDeck(c,tp,0,REASON_RULE)
local c=e:GetLabelObject()
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(100730047,0))
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_EXTRA_SUMMON_COUNT)
e2:SetTargetRange(LOCATION_HAND+LOCATION_MZONE,0)
e2:SetTarget(aux.TargetBoolFunction(Card.IsType,TYPE_NORMAL))
Duel.RegisterEffect(e2,tp)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(100730047,1))
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetTargetRange(LOCATION_HAND,0)
e3:SetCode(EFFECT_SUMMON_PROC)
e3:SetTarget(c100730047.nttg)
Duel.RegisterEffect(e3,tp)
e:Reset()
end
end
\ No newline at end of file
expansions/script/c100730048.lua
View file @ aea8f539
--高速决斗技能-噩梦呈现
--高速决斗技能--抽卡预感：高星
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.SpeedDuelMoveCardToFieldCommon(76297408,c)
if not c100730048.UsedLP then
c100730048.UsedLP={}
c100730048.UsedLP[0]=0
c100730048.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730048.skill,c100730048.con,aux.Stringid(100730048,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730048.filter(c)
return c:IsType(TYPE_SPELL) and c:IsAbleToHand()
end
function c100730048.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_GRAVE,0,3,nil,TYPE_SPELL)
and Duel.IsExistingMatchingCard(c100730048.filter,tp,LOCATION_GRAVE,0,1,nil)
function c100730048.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730048,0)) then
Duel.Hint(HINT_CARD,1-tp,100730048)
c100730048.UsedLP[tp]=c100730048.UsedLP[tp]+1000
local g=Duel.GetMatchingGroup(Card.IsLevelAbove,tp,LOCATION_DECK,0,nil,5)
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 c100730048.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
local g1=Duel.GetMatchingGroup(c100730048.filter,tp,LOCATION_GRAVE,0,nil)
if not (g1 and g1:GetCount()>0) then return end
local g2=g1:RandomSelect(tp,1)
Duel.SendtoHand(g2,nil,REASON_RULE)
e:Reset()
function c100730048.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and Duel.GetMatchingGroupCount(Card.IsLevelAbove,tp,LOCATION_DECK,0,nil,5)>0
and aux.DecreasedLP[tp]-c100730048.UsedLP[tp] >= 1000
end
\ No newline at end of file
expansions/script/c100730049.lua
View file @ aea8f539
--高速决斗技能-等级复制
--高速决斗技能-其名为完全败北之鞭
Duel.LoadScript("speed_duel_common.lua")
function c100730049.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730049.skill,c100730049.con,aux.Stringid(100730049,0))
aux.SpeedDuelReplaceDraw(c,c100730049.skill,c100730049.con,aux.Stringid(100730049,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730049.filter(c)
return c:IsType(TYPE_MONSTER) and c:IsLevelAbove(1)
end
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,LOCATION_MZONE,1,nil)
return Duel.GetTurnPlayer()==tp
and Duel.GetTurnCount()>=6
end
function c100730049.Is8800(c)
return c:IsType(TYPE_MONSTER) and c:IsFaceup() and c:GetDefense()>=3500
end
function c100730049.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730049,0)) then
Duel.Hint(HINT_CARD,1-tp,100730049)
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(100730049,1))
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,LOCATION_MZONE,1,1,nil):GetFirst()
local e1=Effect.CreateEffect(to)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_CHANGE_LEVEL)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
e1:SetValue(source:GetLevel())
to:RegisterEffect(e1)
Duel.ShuffleHand(tp)
local c=Duel.CreateToken(tp,55410871)
Duel.SendtoDeck(c,tp,0,REASON_RULE)
local g=Duel.GetMatchingGroup(c100730049.Is8800,1-tp,LOCATION_MZONE,0,nil)
if g:GetCount()==0 then return end
local c=Duel.CreateToken(tp,21082832)
Duel.SendtoHand(c,nil,REASON_RULE)
e:Reset()
end
end
\ No newline at end of file
expansions/script/c100730050.lua
View file @ aea8f539
--高速决斗技能-绝对命运之力！
--高速决斗技能-高星起手
Duel.LoadScript("speed_duel_common.lua")
function c100730050.initial_effect(c)
if not c100730050.reg then
c100730050.reg=true
local toss_orig=Duel.TossCoin
c100730050.used={}
c100730050.used[0]=0
c100730050.used[1]=0
Duel.TossCoin =
function (tp,count)
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
c100730050.used[tp]=c100730050.used[tp]-1
end
while count>0 do
count=count-1
table.insert(result,toss_orig(tp,1))
end
return table.unpack(result)
end
end
aux.SpeedDuelBeforeDraw(c,c100730050.skill)
aux.SpeedDuelMoveCardToFieldCommon(76224717,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730050.monfilter(c)
return c:IsType(TYPE_MONSTER) and c:IsLevelAbove(5)
end
function c100730050.filter(c,g)
if not c.toss_coin then return false end
if not c100730050.monfilter(c) then return false end
local tc=g:GetFirst()
while tc do
if c:GetOriginalCode()==tc:GetOriginalCode() then
......@@ -41,25 +20,62 @@ function c100730050.filter(c,g)
g:AddCard(c)
return true
end
function c100730050.skill(e,tp)
function c100730050.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
local g=Group.CreateGroup()
if not Duel.IsExistingMatchingCard(c100730050.filter,tp,LOCATION_DECK+LOCATION_HAND,0,7,nil,g) then
if not Duel.IsExistingMatchingCard(c100730050.filter,tp,LOCATION_DECK,0,3,nil,g) then
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730050,0))
e:Reset()
return
end
Duel.Hint(HINT_CARD,1-tp,100730050)
g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_HAND,0,nil)
local count=aux.SpeedDuelSendToDeckWithExile(tp,g)
local gA=Group.CreateGroup()
local gB=Group.CreateGroup()
local gDeck=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_DECK,0,nil)
gA=gDeck:RandomSelect(tp,2)
gDeck:Sub(gA)
gB=gDeck:RandomSelect(tp,5)
gDeck:Sub(gB)
local gBFinal=Group.CreateGroup()
if (not gA:IsExists(c100730050.monfilter,1,nil)) and (gB:IsExists(c100730050.monfilter,1,nil)) then
local tc=gB:GetFirst()
local sp=nil
while tc do
if c100730050.monfilter(tc) and sp==nil then
sp=tc
gBFinal:Merge(gA)
gA:Clear()
gA:AddCard(tc)
tc=gB:GetNext()
if not tc then
tc=gDeck:RandomSelect(tp,1):GetFirst()
break
end
gA:AddCard(tc)
else
c100730050.used[tp]=3
gBFinal:AddCard(tc)
end
tc=gB:GetNext()
end
end
if gA:GetCount()+gBFinal:GetCount()<count then
local add=count-gA:GetCount()-gBFinal:GetCount()
local gtmp=gDeck:RandomSelect(tp,add)
gBFinal:Merge(gtmp)
end
local fc=gA:GetFirst()
while count>0 and fc do
aux.SpeedDuelSendToHandWithExile(tp,fc)
fc=gA:GetNext()
count=count-1
end
fc=gBFinal:GetFirst()
while count>0 and fc do
aux.SpeedDuelSendToHandWithExile(tp,fc)
fc=gBFinal:GetNext()
count=count-1
end
e:Reset()
end
\ No newline at end of file
expansions/script/c100730051.lua
View file @ aea8f539
--高速决斗技能-羁绊的力量
--高速决斗技能-强攻压制
Duel.LoadScript("speed_duel_common.lua")
function c100730051.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730051.skill,c100730051.con,aux.Stringid(100730051,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730051.filter(c)
return c:IsType(TYPE_MONSTER) and c:IsFaceup()
return c:IsType(TYPE_MONSTER) and c:IsFaceup() and c:IsLevelAbove(5)
end
function c100730051.con(e,tp)
tp=e:GetLabelObject():GetOwner()
......@@ -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_ONFIELD,0)*100
local ct=g:GetCount()*300
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,2)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
e1:SetValue(ct)
tc:RegisterEffect(e1)
tc=g:GetNext()
......
expansions/script/c100730052.lua
View file @ aea8f539
--高速决斗技能-秘密交换
--高速决斗技能-先见之明
Duel.LoadScript("speed_duel_common.lua")
function c100730052.initial_effect(c)
if not c100730052.UsedLP then
c100730052.UsedLP={}
c100730052.UsedLP[0]=0
c100730052.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelAtMainPhase(c,c100730052.skill,c100730052.con,aux.Stringid(100730052,0))
aux.SpeedDuelAtMainPhaseNoCountLimit(c,c100730052.skill,c100730052.con,aux.Stringid(100730052,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730052.filter(c)
return c:GetFlagEffect(100730052)==0 and c:GetFlagEffectLabel(100730052)~=c:GetFieldID() and c:IsFacedown()
end
function c100730052.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]-c100730052.UsedLP[tp]>=1000
and c100730052.UsedLP[tp]<2000
return Duel.IsExistingMatchingCard(c100730052.filter,tp,LOCATION_DECK,LOCATION_DECK,1,nil)
and Duel.GetTurnCount(tp)<=5
end
function c100730052.reg(c)
c:RegisterFlagEffect(100730052,RESET_EVENT+RESETS_STANDARD+EVENT_FLIP,0,1,c:GetFieldID())
end
function c100730052.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
c100730052.UsedLP[tp]=c100730052.UsedLP[tp]+1000
Duel.Hint(HINT_CARD,1-tp,100730052)
local g=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,1,nil)
if not g then return end
Duel.SendtoDeck(g,nil,0,REASON_RULE)
Duel.ShuffleDeck(tp)
Duel.Draw(tp,1,REASON_RULE)
local op=Duel.SelectOption(tp,aux.Stringid(100730052,1),aux.Stringid(100730052,2))
if op==0 then
local g1=Duel.GetDecktopGroup(tp,1)
if not g1 or g1:GetCount()==0 then return end
g1:ForEach(c100730052.reg)
Duel.ConfirmCards(tp,g1)
elseif op==1 then
local g2=Duel.GetDecktopGroup(1-tp,1)
if not g2 or g2:GetCount()==0 then return end
g2:ForEach(c100730052.reg)
Duel.ConfirmCards(tp,g2)
end
end
function c100730052.adjustop(e,tp)
local g1=Duel.GetDecktopGroup(tp,1)
if not g1 or g1:GetCount()==0 then return end
local fc=g1:GetFirst()
if fc:IsPosition(POS_FACEUP_DEFENSE) then return end
fc:ReverseInDeck()
local g2=Duel.GetDecktopGroup(1-tp,1)
if not g2 or g2:GetCount()==0 then return end
local fc=g2:GetFirst()
if fc:IsPosition(POS_FACEUP_DEFENSE) then return end
fc:ReverseInDeck()
end
\ No newline at end of file
expansions/script/c100730053.lua
View file @ aea8f539
--高速决斗技能黑暗决斗
--高速决斗技能-坠落升空
Duel.LoadScript("speed_duel_common.lua")
function c100730053.initial_effect(c)
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_TURN_END)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCountLimit(1)
e1:SetOperation(c100730053.skill)
Duel.RegisterEffect(e1,0)
aux.SpeedDuelAtMainPhase(c,c100730053.skill,c100730053.con,aux.Stringid(100730053,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730053.filter(c)
return c:IsRace(RACE_FAIRY) and c:IsLevelBelow(4)
end
function c100730053.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.GetMZoneCount(tp)>0
and Duel.IsPlayerCanSpecialSummon(tp)
and Duel.IsExistingMatchingCard(c100730053.filter,tp,LOCATION_GRAVE,0,1,nil)
end
function c100730053.skill(e,tp,eg,ep,ev,re,r,rp)
tp=Duel.GetTurnPlayer()
local ct=Duel.GetFieldGroupCount(tp,LOCATION_GRAVE,0)*200
Duel.Hint(HINT_CARD,1-tp,100730053)
Duel.Damage(tp,ct,REASON_RULE)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c100730053.filter,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,1,nil)
local tc=g:GetFirst()
if not tc then return end
local atk=tc:GetTextAttack()
Duel.SpecialSummon(tc,0,tp,tp,true,true,POS_FACEUP_DEFENSE)
Duel.Recover(tp,atk,REASON_EFFECT)
e:Reset()
end
\ No newline at end of file
expansions/script/c100730054.lua
View file @ aea8f539
--高速决斗技能-来自墓碑的复仇
--高速决斗技能-抽卡预感：光
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.SpeedDuelMoveCardToFieldCommon(62867251,c)
if not c100730054.UsedLP then
c100730054.UsedLP={}
c100730054.UsedLP[0]=0
c100730054.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730054.skill,c100730054.con,aux.Stringid(100730054,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730054.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730054,0)) then
Duel.Hint(HINT_CARD,1-tp,100730054)
c100730054.UsedLP[tp]=c100730054.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()
if Duel.IsExistingMatchingCard(Card.IsAttribute,tp,LOCATION_DECK,0,1,nil,0x5f) then
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730054,0))
else
aux.SpeedDuelSendToDeckWithExile(tp,g)
local c=Duel.CreateToken(tp,85475641)
Duel.SendtoGrave(c,REASON_RULE)
end
end
function c100730054.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]-c100730054.UsedLP[tp] >= 1500
end
\ No newline at end of file
expansions/script/c100730055.lua
View file @ aea8f539
--高速决斗技能-融合大师
--高速决斗技能-守墓的宿命
Duel.LoadScript("speed_duel_common.lua")
function c100730055.initial_effect(c)
if not c100730055.UsedLP then
......@@ -7,24 +7,34 @@ function c100730055.initial_effect(c)
c100730055.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelAtMainPhase(c,c100730055.skill,c100730055.con,aux.Stringid(100730055,0))
aux.SpeedDuelMoveCardToFieldCommon(30548775,c)
aux.SpeedDuelReplaceDraw(c,c100730055.skill,c100730055.con,aux.Stringid(100730055,1))
aux.SpeedDuelBeforeDraw(c,c100730055.skill2)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730055.skill2(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730055)
local tc=Duel.CreateToken(tp,50412166)
aux.SpeedDuelSendToHandWithExile(tp,tc)
e:Reset()
end
function c100730055.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]-c100730055.UsedLP[tp]>=1000
and c100730055.UsedLP[tp]<2000
return Duel.GetTurnPlayer()==tp
and aux.DecreasedLP[tp]-c100730055.UsedLP[tp] >= 1800
end
function c100730055.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
c100730055.UsedLP[tp]=c100730055.UsedLP[tp]+1000
if Duel.SelectYesNo(tp,aux.Stringid(100730055,0)) then
Duel.Hint(HINT_CARD,1-tp,100730055)
local g=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,1,nil)
if not g then return end
Duel.SendtoDeck(g,nil,2,REASON_RULE)
local c=Duel.CreateToken(tp,24094653)
Duel.SendtoHand(c,nil,REASON_RULE)
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730055,1))
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CODE)
getmetatable(e:GetHandler()).announce_filter={TYPE_MONSTER+TYPE_SPELL+TYPE_TRAP,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(0x2e) then
Duel.SendtoDeck(c,tp,0,REASON_RULE)
else Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730055,2))
end
end
end
\ No newline at end of file
expansions/script/c100730056.lua
View file @ aea8f539
--高速决斗技能-强攻压制
--高速决斗技能-法老的陵墓
Duel.LoadScript("speed_duel_common.lua")
function c100730056.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730056.skill,c100730056.con,aux.Stringid(100730056,0))
aux.SpeedDuelBeforeDraw(c,c100730056.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730056.filter(c)
return c:IsType(TYPE_MONSTER) and c:IsFaceup() and c:IsLevelAbove(5)
end
function c100730056.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730056.filter,tp,LOCATION_MZONE,0,1,nil)
end
function c100730056.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
local g1=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_HAND,0,1,1,nil,31076103)
if g1:GetCount()>0 then
Duel.Hint(HINT_CARD,1-tp,100730056)
local g=Duel.GetMatchingGroup(c100730056.filter,tp,LOCATION_MZONE,0,nil)
if g:GetCount()==0 then return end
local ct=g:GetCount()*300
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:SetValue(ct)
tc:RegisterEffect(e1)
tc=g:GetNext()
local tc=g1:GetFirst()
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
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,1,REASON_RULE)
local g=Group.CreateGroup()
local c=Duel.CreateToken(tp,89959682)
g:AddCard(c)
aux.CardAddedBySkill:AddCard(c)
c=Duel.CreateToken(tp,52550973)
g:AddCard(c)
aux.CardAddedBySkill:AddCard(c)
Duel.SendtoGrave(g,REASON_RULE)
end
e:Reset()
end
\ No newline at end of file
expansions/script/c100730059.lua
View file @ aea8f539
--高速决斗技能-反转痛苦
--高速决斗技能-龙之融合
Duel.LoadScript("speed_duel_common.lua")
function c100730059.initial_effect(c)
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
aux.SpeedDuelMoveCardToDeckCommon(99267150,c)
aux.SpeedDuelMoveCardToDeckCommon(10669138,c)
aux.SpeedDuelMoveCardToDeckCommon(75906310,c)
aux.SpeedDuelMoveCardToDeckCommon(71490127,c)
if not c100730059.UsedLP then
c100730059.UsedLP={}
c100730059.UsedLP[0]=0
c100730059.UsedLP[1]=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.damcal(e,tp,eg,ep,ev,re,r,rp)
c100730059.battle_damage[ep]=c100730059.battle_damage[ep]+ev
end
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
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelAtMainPhase(c,c100730059.skill,c100730059.con,aux.Stringid(100730059,0))
aux.RegisterSpeedDuelSkillCardCommon()
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)
and Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,nil)
and aux.DecreasedLP[tp]-c100730059.UsedLP[tp]>=1500
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)
c100730059.UsedLP[tp]=c100730059.UsedLP[tp]+1500
Duel.Hint(HINT_CARD,1-tp,100730059)
local g=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,1,nil)
Duel.SendtoDeck(g,nil,2,REASON_RULE)
local c=Duel.CreateToken(tp,71490127)
Duel.SendtoHand(c,nil,REASON_RULE)
if Duel.IsExistingMatchingCard(c100730059.Isyubel,tp,LOCATION_MZONE,0,1,nil) then
local g=Duel.SelectMatchingCard(tp,c100730059.Isyubel,tp,LOCATION_MZONE,0,1,1,nil)
local tc=g:GetFirst()
if tc:IsOriginalCodeRule(99267150) then code=10669138 end
if tc:IsOriginalCodeRule(10669138) then code=75906310 end
local g2=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_EXTRA,0,1,1,nil,code)
if g2:GetCount()>0 then
Duel.SendtoDeck(tc,nil,0,REASON_RULE)
Duel.SpecialSummon(g2,0,tp,tp,true,false,POS_FACEUP_ATTACK)
end
end
end
function c100730059.Isyubel(c)
return c:IsOriginalCodeRule(99267150,10669138) and c:IsFaceup()
end
\ No newline at end of file
expansions/script/c100730062.lua
View file @ aea8f539
--高速决斗技能-当然是正位置！
--高速决斗技能-扰乱之乡
Duel.LoadScript("speed_duel_common.lua")
function c100730062.initial_effect(c)
aux.SpeedDuelBeforeDraw(c,c100730062.skill)
aux.SpeedDuelMoveCardToFieldCommon(96012004,c)
aux.SpeedDuelMoveCardToFieldCommon(90011152,c)
aux.SpeedDuelMoveCardToFieldCommon(86780027,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730062.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_TOSS_COIN_NEGATE)
e1:SetCondition(c100730062.coincon2)
e1:SetOperation(c100730062.coinop2)
e1:SetLabelObject(e:GetLabelObject())
Duel.RegisterEffect(e1,tp)
e:Reset()
end
function c100730062.coincon2(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():GetControler()==e:GetLabelObject():GetOwner()
and re:GetHandler():IsSetCard(0x05)
end
function c100730062.coinop2(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,0,100730062)
local res={Duel.GetCoinResult()}
local ct=ev
for i=1,ct do
res[i]=1
end
Duel.SetCoinResult(table.unpack(res))
end
expansions/script/c100730063.lua
View file @ aea8f539
--高速决斗技能-逆转的命运
--高速决斗技能-抽卡预感：地
Duel.LoadScript("speed_duel_common.lua")
function c100730063.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730063.skill,c100730063.con,aux.Stringid(100730063,0))
function c100730063.initial_effect(c)82
aux.SpeedDuelMoveCardToFieldCommon(5973663,c)
if not c100730063.UsedLP then
c100730063.UsedLP={}
c100730063.UsedLP[0]=0
c100730063.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730063.skill,c100730063.con,aux.Stringid(100730063,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730063.filter(c)
return c:IsFaceup() and c:GetFlagEffect(36690018)~=0
end
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()
function c100730063.skill(e,tp,eg,ep,ev,re,r,rp)
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)
c100730063.UsedLP[tp]=c100730063.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 c100730063.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]-c100730063.UsedLP[tp] >= 1500
end
\ No newline at end of file
expansions/script/c100730064.lua
View file @ aea8f539
--高速决斗技能-光之结界
--高速决斗技能-增援
Duel.LoadScript("speed_duel_common.lua")
function c100730064.initial_effect(c)
aux.SpeedDuelBeforeDraw(c,c100730064.skill)
aux.SpeedDuelMoveCardToFieldCommon(10012614,c)
if not c100730064.UsedLP then
c100730064.UsedLP={}
c100730064.UsedLP[0]=0
c100730064.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730064.skill,c100730064.con,aux.Stringid(100730064,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730064.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
function c100730064.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730064,0)) then
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)
c100730064.UsedLP[tp]=c100730064.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 c100730064.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]-c100730064.UsedLP[tp] >= 1500
end
\ No newline at end of file
expansions/script/c100730065.lua
View file @ aea8f539
--高速决斗技能-拜拜了！
--高速决斗技能-战士的领域
Duel.LoadScript("speed_duel_common.lua")
function c100730065.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730065.skill,c100730065.con,aux.Stringid(100730065,0))
aux.SpeedDuelMoveCardToFieldCommon(86318356,c)
aux.SpeedDuelMoveCardToFieldCommon(403847,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730065.filter(c,tp)
return c:GetOwner()==tp
end
function c100730065.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730065.filter,tp,LOCATION_MZONE,0,1,nil,tp)
end
function c100730065.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
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_EFFECT)
local c=Duel.CreateToken(tp,93108433)
Duel.SendtoHand(c,nil,REASON_RULE)
end
e:Reset()
end
\ No newline at end of file
expansions/script/c100730070.lua
View file @ aea8f539
--高速决斗技能-召唤封锁
--高速决斗技能-生命增加α
Duel.LoadScript("speed_duel_common.lua")
function c100730070.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730070.skill,c100730058.con,aux.Stringid(100730058,0))
aux.SpeedDuelBeforeDraw(c,c100730070.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730058.con(e,tp)
function c100730070.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.GetLP(tp)<=2500
end
function c100730058.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730058)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetTargetRange(1,1)
e1:SetTarget(c100730058.splimit)
e1:SetReset(RESET_PHASE+PHASE_END,2)
Duel.RegisterEffect(e1,tp)
local e2=e1:Clone()
e2:SetCode(EFFECT_CANNOT_SUMMON)
Duel.RegisterEffect(e2,tp)
local e3=e1:Clone()
e3:SetCode(EFFECT_CANNOT_MSET)
Duel.RegisterEffect(e3,tp)
local e4=e1:Clone()
e4:SetCode(EFFECT_CANNOT_ACTIVATE)
Duel.RegisterEffect(e4,tp)
Duel.Hint(HINT_CARD,1-tp,100730070)
local lp=Duel.GetLP(tp)
Duel.SetLP(tp,lp+1500)
e:Reset()
end
\ No newline at end of file
function c100730058.splimit(e,c)
return c:IsType(TYPE_MONSTER) and c:IsType(TYPE_EFFECT)
end
function c100730058.limit(e,c,sump,sumtype,sumpos,targetp,se)
return c:IsLocation(LOCATION_GRAVE)
end
expansions/script/c100730071.lua
View file @ aea8f539
--高速决斗技能-魔术手
--高速决斗技能-好运常在
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
c100730071.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelAtMainPhase(c,c100730071.skill,c100730071.con,aux.Stringid(100730071,0))
aux.SpeedDuelBeforeDraw(c,c100730071.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730071.con(e,tp)
function c100730071.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and aux.DecreasedLP[tp]-c100730071.UsedLP[tp]>=1500
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_TOSS_COIN_NEGATE)
e1:SetCondition(c100730071.coincon2)
e1:SetOperation(c100730071.coinop2)
e1:SetLabelObject(e:GetLabelObject())
Duel.RegisterEffect(e1,tp)
e:Reset()
end
function c100730071.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
c100730071.UsedLP[tp]=c100730071.UsedLP[tp]+1500
Duel.Hint(HINT_CARD,1-tp,100730071)
local c=Duel.CreateToken(tp,86198326)
Duel.SendtoHand(c,nil,REASON_RULE)
function c100730071.coincon2(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler():GetControler()==e:GetLabelObject():GetOwner()
and Duel.GetLP(tp)+1000<=Duel.GetLP(1-tp)
end
function c100730071.coinop2(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,0,100730071)
local res={Duel.GetCoinResult()}
local ct=ev
for i=1,ct do
res[i]=1
end
Duel.SetCoinResult(table.unpack(res))
end
\ No newline at end of file
expansions/script/c100730072.lua
View file @ aea8f539
--高速决斗技能-盗贼
--高速决斗技能-孤注一掷
Duel.LoadScript("speed_duel_common.lua")
function c100730072.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730072.skill,c100730072.con,aux.Stringid(100730072,0))
......@@ -6,19 +6,21 @@ function c100730072.initial_effect(c)
end
function c100730072.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.GetLP(tp)<=1500
and Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_SZONE,1,nil)
and Duel.GetLocationCount(tp,LOCATION_SZONE)>0
return Duel.GetTurnPlayer()==tp
and aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.GetTurnCount()>=5
and Duel.GetLP(tp)>100
and Duel.IsExistingMatchingCard(Card.IsAbleToGrave,tp,LOCATION_HAND,0,2,nil)
end
function c100730072.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730072)
local tc=Duel.SelectMatchingCard(tp,aux.TRUE,tp,0,LOCATION_SZONE,1,1,nil):GetFirst()
if tc:IsLocation(LOCATION_FZONE) then
Duel.MoveToField(tc,tp,tp,LOCATION_FZONE,tc:GetPosition(),true)
else
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,tc:GetPosition(),true)
end
local lp=Duel.GetLP(tp)
Duel.PayLPCost(tp,lp-100)
local g=Duel.SelectMatchingCard(tp,Card.IsAbleToGrave,tp,LOCATION_HAND,0,2,2,nil)
if not g then return end
Duel.SendtoGrave(g,REASON_COST)
local d=Duel.TossDice(tp,1)
Duel.Draw(tp,d,REASON_RULE)
e:Reset()
end
\ No newline at end of file
expansions/script/c100730073.lua
View file @ aea8f539
--高速决斗技能-永火炼狱
--高速决斗技能-凡人融合
Duel.LoadScript("speed_duel_common.lua")
function c100730073.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730073.skill,c100730073.con,aux.Stringid(100730073,0))
......@@ -6,20 +6,69 @@ function c100730073.initial_effect(c)
end
function c100730073.con(e,tp)
tp=e:GetLabelObject():GetOwner()
local ct=Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)
local mg1=Duel.GetFusionMaterial(tp)
local res=Duel.IsExistingMatchingCard(c100730073.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,tp)
if not res then
local ce=Duel.GetChainMaterial(tp)
if ce~=nil then
local fgroup=ce:GetTarget()
local mg2=fgroup(ce,e,tp)
local mf=ce:GetValue()
res=Duel.IsExistingMatchingCard(c100730073.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,tp)
end
return res
end
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.GetTurnCount(tp)==2
and ct>2
and Duel.IsExistingMatchingCard(Card.IsSetCard,tp,LOCATION_DECK,0,ct-2,nil,0xb)
and Duel.IsPlayerCanSpecialSummon(tp)
and Duel.GetMZoneCount(tp)>1
end
function c100730073.skill(e,tp)
function c100730073.skill(e,tp,c)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730073)
local ct=Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)-2
if ct<=0 then return end
local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,LOCATION_HAND,0,ct,ct,nil)
Duel.SendtoGrave(g,REASON_RULE+REASON_DISCARD)
local g2=Duel.SelectMatchingCard(tp,Card.IsSetCard,tp,LOCATION_DECK,0,ct,ct,nil,0xb)
Duel.SendtoGrave(g2,REASON_RULE)
e:Reset()
local chkf=tp
local mg1=Duel.GetFusionMaterial(tp):Filter(c100730073.filter1,nil,e)
local sg1=Duel.GetMatchingGroup(c100730073.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf)
local mg2=nil
local sg2=nil
local ce=Duel.GetChainMaterial(tp)
if ce~=nil then
local fgroup=ce:GetTarget()
mg2=fgroup(ce,e,tp)
local mf=ce:GetValue()
sg2=Duel.GetMatchingGroup(c100730073.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,chkf)
end
if sg1:GetCount()>0 or (sg2~=nil and sg2:GetCount()>0) then
local sg=sg1:Clone()
if sg2 then sg:Merge(sg2) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tg=sg:Select(tp,1,1,nil)
local tc=tg:GetFirst()
if sg1:IsContains(tc) and (sg2==nil or not sg2:IsContains(tc) or not Duel.SelectYesNo(tp,ce:GetDescription())) then
local mat1=Duel.SelectFusionMaterial(tp,tc,mg1,nil,chkf)
tc:SetMaterial(mat1)
Duel.SendtoGrave(mat1,REASON_EFFECT+REASON_MATERIAL+REASON_FUSION)
Duel.BreakEffect()
Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
else
local mat2=Duel.SelectFusionMaterial(tp,tc,mg2,nil,chkf)
local fop=ce:GetOperation()
fop(ce,e,tp,tc,mat2)
end
tc:CompleteProcedure()
if tc:GetAttack()<=2000 then
local g1=Duel.SelectMatchingCard(tp,Card.IsSetCard,tp,LOCATION_DECK+LOCATION_GRAVE,0,0,1,nil,0x46)
Duel.SendtoHand(g1,tp,REASON_RULE)
end
if tc:GetDefense()<=2000 then
local g2=Duel.SelectMatchingCard(tp,Card.IsType,tp,LOCATION_DECK+LOCATION_GRAVE,0,0,1,nil,TYPE_NORMAL)
Duel.SendtoHand(g2,tp,REASON_RULE)
end
end
end
function c100730073.filter1(c,e)
return not c:IsImmuneToEffect(e)
end
function c100730073.filter2(c,e,tp,m,f,chkf)
return c:IsType(TYPE_FUSION) and (not f or f(c)) and not c:IsType(TYPE_EFFECT)
and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf)
end
\ No newline at end of file
expansions/script/c100730075.lua
View file @ aea8f539
--高速决斗技能-仪式大师
--高速决斗技能-毅力
Duel.LoadScript("speed_duel_common.lua")
function c100730075.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730075.skill,c100730075.con,aux.Stringid(100730075,0))
if not c100730075.reg then
c100730075.reg={}
c100730075.turn={}
c100730075.used={}
end
aux.SpeedDuelBeforeDraw(c,c100730075.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730075.con(e,tp)
function c100730075.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
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()
if Duel.GetLP(tp)>=2000 then
c100730075.turn[tp]=Duel.GetTurnCount()
else
c100730075.turn[tp]=-1
end
if not c100730075.reg[tp] then
c100730075.reg[tp]=true
Duel.Hint(HINT_CARD,1-tp,100730075)
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CHANGE_DAMAGE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetValue(c100730075.val)
e1:SetLabel(tp)
Duel.RegisterEffect(e1,tp,true)
end
end
function c100730075.filter2(c)
return bit.band(c:GetType(),0x82)==0x82 and c:IsAbleToHand()
function c100730075.val(e,re,dam,r,rp,rc)
local tp=e:GetLabel()
if c100730075.used[tp] or c100730075.turn[tp]~=Duel.GetTurnCount() then return dam end
if dam>=Duel.GetLP(tp) then
c100730075.used[tp]=true
c100730075.limit(tp)
return Duel.GetLP(tp)-1
end
return dam
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))
function c100730075.limit(tp)
local count=1
if Duel.GetTurnPlayer()~=tp then
count=2
end
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_SPSUMMON_COUNT_LIMIT)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetValue(1)
e1:SetReset(RESET_PHASE+PHASE_END,count)
Duel.RegisterEffect(e1,tp,true)
end
\ No newline at end of file
expansions/script/c100730077.lua
View file @ aea8f539
--高速决斗技能-法老的陵墓
--高速决斗技能-契约的门扉
Duel.LoadScript("speed_duel_common.lua")
function c100730077.initial_effect(c)
aux.SpeedDuelBeforeDraw(c,c100730077.skill)
if not c100730077.UsedLP then
c100730077.UsedLP={}
c100730077.UsedLP[0]=0
c100730077.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelAtMainPhase(c,c100730077.skill,c100730077.con,aux.Stringid(100730077,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730077.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]-c100730077.UsedLP[tp]>=2000
and c100730077.UsedLP[tp]<4000
end
function c100730077.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
local g1=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_HAND,0,1,1,nil,31076103)
if g1:GetCount()>0 then
c100730077.UsedLP[tp]=c100730077.UsedLP[tp]+2000
Duel.Hint(HINT_CARD,1-tp,100730077)
local tc=g1:GetFirst()
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
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,1,REASON_RULE)
local g=Group.CreateGroup()
local c=Duel.CreateToken(tp,89959682)
g:AddCard(c)
aux.CardAddedBySkill:AddCard(c)
c=Duel.CreateToken(tp,52550973)
g:AddCard(c)
aux.CardAddedBySkill:AddCard(c)
Duel.SendtoGrave(g,REASON_RULE)
end
e:Reset()
local c=Duel.CreateToken(tp,18809562)
Duel.SendtoHand(c,nil,REASON_RULE)
Duel.ConfirmCards(1-tp,c)
local d=Duel.CreateToken(tp,83764718)
Duel.SendtoHand(d,1-tp,REASON_RULE)
Duel.ConfirmCards(tp,d)
end
\ No newline at end of file
expansions/script/c100730078.lua
View file @ aea8f539
--高速决斗技能-这不是怪兽！是神！
--高速决斗技能-沉默的决斗者
Duel.LoadScript("speed_duel_common.lua")
function c100730078.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730078.skill,c100730078.con,aux.Stringid(100730078,0))
if not c100730078.UsedLP then
c100730078.UsedLP={}
c100730078.UsedLP[0]=0
c100730078.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730078.skill1,c100730078.con,aux.Stringid(100730078,1))
aux.SpeedDuelBeforeDraw(c,c100730078.skill2)
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)
return Duel.GetTurnPlayer()==tp
and Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,nil)
and Duel.IsExistingMatchingCard(c100730078.filter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil)
and Duel.GetMZoneCount(tp)>0
end
function c100730078.skill(e,tp)
function c100730078.skill1(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730078,1)) then
local g=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,1,nil)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
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)
Duel.SendtoDeck(g:GetFirst(),nil,1,REASON_RULE)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
local sg=Duel.SelectMatchingCard(tp,c100730078.filter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil)
Duel.MoveToField(sg:GetFirst(),tp,tp,LOCATION_MZONE,POS_FACEUP_ATTACK,true)
if aux.DecreasedLP[tp]-c100730078.UsedLP[tp]>=1800 then
c100730078.UsedLP[tp]=c100730078.UsedLP[tp]+1800
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g1=Duel.SelectMatchingCard(tp,Card.IsType,tp,LOCATION_DECK,0,0,1,nil,TYPE_QUICKPLAY)
Duel.SendtoHand(g1,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g1)
if Duel.GetMZoneCount(1-tp)>0 and Duel.SelectYesNo(tp,aux.Stringid(100730078,0)) then
local c=Duel.CreateToken(1-tp,41859700)
Duel.SpecialSummon(c,0,tp,1-tp,false,false,POS_FACEUP_DEFENSE)
end
end
end
end
function c100730078.skill2(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
local c=e:GetLabelObject()
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(c100730078.LVfilter)
e1:SetCode(EFFECT_IMMUNE_EFFECT)
e1:SetValue(c100730078.efilter)
Duel.RegisterEffect(e1,tp)
local e2=Effect.GlobalEffect()
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_SET_ATTACK)
e2:SetTargetRange(LOCATION_MZONE,0)
e2:SetTarget(c100730078.LV2filter)
e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e2:SetCondition(c100730078.atkcon)
e2:SetValue(c100730078.val)
Duel.RegisterEffect(e2,tp)
e:Reset()
end
function c100730078.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c100730078.LV2filter(e,c)
return c:IsSetCard(0x41) and c:IsRace(RACE_SPELLCASTER+RACE_FIEND) and c:IsFaceup()
end
function c100730078.LVfilter(e,c)
return c:IsSetCard(0x41) and c:IsRace(RACE_SPELLCASTER+RACE_WARRIOR) and c:IsFaceup()
end
function c100730078.filter(c)
return c:IsSetCard(0x41) and c:IsLevelBelow(4)
end
function c100730078.efilter(e,te)
return not te:GetOwner():IsType(TYPE_SPELL) and not te:GetOwner():IsSetCard(0x41) and te:IsActivated()
end
function c100730078.val(e,c)
return c:GetLevel()*1000-c:GetTextAttack()-c:GetTextDefense()-1000
end
\ No newline at end of file
expansions/script/c100730079.lua
View file @ aea8f539
--高速决斗技能-钢铁袭击者
--高速决斗技能-光之护封灵剑
Duel.LoadScript("speed_duel_common.lua")
function c100730079.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(3113667,c)
aux.SpeedDuelMoveCardToFieldCommon(49511705,c)
aux.SpeedDuelMoveCardToFieldCommon(78625592,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
expansions/script/c100730080.lua
View file @ aea8f539
--高速决斗技能-我的名字叫于贝尔
--高速决斗技能-螺旋枪杀
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.filter(c)
return c:IsSetCard(0xbd) or c:IsCode(66889139) and c:IsFaceup()
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)
and Duel.IsExistingMatchingCard(c100730080.filter,tp,LOCATION_MZONE,0,1,nil)
and Duel.GetLocationCount(tp,LOCATION_SZONE)>0
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
function c100730080.skill(e,tp)
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
local d=Duel.CreateToken(1-tp,49328340)
Duel.MoveToField(d,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
local g1=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE,0,0,1,nil,34370473)
if g1:GetCount()==0 then return end
Duel.SendtoHand(g1,tp,REASON_RULE)
end
\ No newline at end of file
expansions/script/c100730081.lua
View file @ aea8f539
--高速决斗技能-我永远在你身边
--高速决斗技能-暗的地平线
Duel.LoadScript("speed_duel_common.lua")
function c100730081.initial_effect(c)
if not c100730081.UsedLP then
c100730081.UsedLP={}
c100730081.UsedLP[0]=0
c100730081.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
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)
tp = e:GetLabelObject():GetOwner()
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)
c100730081.UsedLP[tp]=c100730081.UsedLP[tp]+2000
if aux.DecreasedLP[tp]-c100730081.UsedLP[tp]>=2500 and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_DECK,0,1,nil,46986414) then
local op=Duel.SelectOption(tp,aux.Stringid(100730081,1),aux.Stringid(100730081,2))
if op==1 and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_DECK,0,1,nil,38033121) then
code=38033121
else code=46986414
end
else local d=Duel.CreateToken(tp,38033121)
Duel.SendtoDeck(d,tp,0,REASON_RULE)
code=38033121
end
local g=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_DECK,0,nil,code)
local c=g:Select(tp,1,1,nil)
if not c or g:GetCount()==0 then return end
Duel.SpecialSummon(c,0,tp,tp,true,true,POS_FACEUP)
e:Reset()
end
function c100730081.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and aux.SpeedDuelAtMainPhaseCondition(e,tp)
and aux.DecreasedLP[tp]-c100730081.UsedLP[tp] >=2000
and Duel.GetMZoneCount(tp)>0
and Duel.IsPlayerCanSpecialSummon(tp)
end
\ No newline at end of file
expansions/script/c100730082.lua
View file @ aea8f539
--高速决斗技能-抽卡预感：地
--高速决斗技能-我的怪兽卡
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))
function c100730082.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(66865880,c)
aux.SpeedDuelBeforeDraw(c,c100730082.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730082.monfilter(c)
return c:IsType(TYPE_MONSTER) and c:IsLevelBelow(4)
end
function c100730082.filter(c,g)
if not c100730082.monfilter(c) 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 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)
tp=e:GetLabelObject():GetOwner()
local g=Group.CreateGroup()
if not Duel.IsExistingMatchingCard(c100730082.filter,tp,LOCATION_DECK,0,6,nil,g) then
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730082,0))
e:Reset()
return
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
Duel.Hint(HINT_CARD,1-tp,100730082)
g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_HAND,0,nil)
local count=aux.SpeedDuelSendToDeckWithExile(tp,g)
local gA=Group.CreateGroup()
local gB=Group.CreateGroup()
local gDeck=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_DECK,0,nil)
gA=gDeck:RandomSelect(tp,2)
gDeck:Sub(gA)
gB=gDeck:RandomSelect(tp,5)
gDeck:Sub(gB)
local gBFinal=Group.CreateGroup()
if (not gA:IsExists(c100730082.monfilter,1,nil)) and (gB:IsExists(c100730082.monfilter,1,nil)) then
local tc=gB:GetFirst()
local sp=nil
while tc do
if c100730082.monfilter(tc) and sp==nil then
sp=tc
gBFinal:Merge(gA)
gA:Clear()
gA:AddCard(tc)
tc=gB:GetNext()
if not tc then
tc=gDeck:RandomSelect(tp,1):GetFirst()
break
end
gA:AddCard(tc)
else
gBFinal:AddCard(tc)
end
tc=gB:GetNext()
end
end
if gA:GetCount()+gBFinal:GetCount()<count then
local add=count-gA:GetCount()-gBFinal:GetCount()
local gtmp=gDeck:RandomSelect(tp,add)
gBFinal:Merge(gtmp)
end
local fc=gA:GetFirst()
while count>0 and fc do
aux.SpeedDuelSendToHandWithExile(tp,fc)
fc=gA:GetNext()
count=count-1
end
fc=gBFinal:GetFirst()
while count>0 and fc do
aux.SpeedDuelSendToHandWithExile(tp,fc)
fc=gBFinal:GetNext()
count=count-1
end
e:Reset()
end
\ No newline at end of file
expansions/script/c100730083.lua
View file @ aea8f539
--高速决斗技能-抽卡预感：炎
--高速决斗技能-召唤封锁
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.SpeedDuelAtMainPhase(c,c100730083.skill,c100730083.con,aux.Stringid(100730083,0))
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
function c100730083.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.GetLP(tp)<=2500
end
function c100730083.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
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)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetTargetRange(1,1)
e1:SetTarget(c100730083.splimit)
e1:SetReset(RESET_PHASE+PHASE_END,2)
Duel.RegisterEffect(e1,tp)
local e2=e1:Clone()
e2:SetCode(EFFECT_CANNOT_SUMMON)
Duel.RegisterEffect(e2,tp)
local e3=e1:Clone()
e3:SetCode(EFFECT_CANNOT_MSET)
Duel.RegisterEffect(e3,tp)
local e4=e1:Clone()
e4:SetCode(EFFECT_CANNOT_ACTIVATE)
Duel.RegisterEffect(e4,tp)
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
function c100730083.splimit(e,c)
return c:IsType(TYPE_MONSTER) and c:IsType(TYPE_EFFECT)
end
function c100730083.limit(e,c,sump,sumtype,sumpos,targetp,se)
return c:IsLocation(LOCATION_GRAVE)
end
expansions/script/c100730084.lua
View file @ aea8f539
--高速决斗技能-抽卡预感：水
--高速决斗技能-祭品的力量
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.SpeedDuelBeforeDraw(c,c100730084.skill)
local e3=Effect.GlobalEffect()
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_PREDRAW)
e3:SetOperation(c100730084.operation)
e3:SetLabel(10000090)
e3:SetLabelObject(c)
Duel.RegisterEffect(e3,0)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730084.skill(e,tp,eg,ep,ev,re,r,rp)
function c100730084.operation(e,tp,eg,ep,ev,re,r,rp)
local id=e:GetLabel()
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)
local c=Duel.CreateToken(tp,id)
Duel.SendtoGrave(c,REASON_RULE)
e:Reset()
end
function c100730084.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(c100730084.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(c100730084.tgchk)
e2:SetOperation(c100730084.facechk)
e2:SetLabelObject(e1)
Duel.RegisterEffect(e2,tp)
Duel.RegisterFlagEffect(tp,100424104,RESET_PHASE+PHASE_END,0,1)
e:Reset()
end
function c100730084.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 c100730084.tgchk(e,c)
return c:IsCode(10000010)
end
function c100730084.facechk(e,tp,eg,ep,ev,re,r,rp)
e:GetLabelObject():SetLabel(1)
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
expansions/script/c100730085.lua
View file @ aea8f539
--高速决斗技能-抽卡预感：风
--高速决斗技能-神官的咏唱
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.SpeedDuelAtMainPhase(c,c100730085.skill,c100730085.con,aux.Stringid(100730085,0))
local e3=Effect.GlobalEffect()
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_PREDRAW)
e3:SetOperation(c100730085.operation)
e3:SetLabel(78665705)
e3:SetLabelObject(c)
Duel.RegisterEffect(e3,0)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730085.skill(e,tp,eg,ep,ev,re,r,rp)
function c100730085.operation(e,tp,eg,ep,ev,re,r,rp)
local id=e:GetLabel()
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)
local c=Duel.CreateToken(tp,id)
Duel.SendtoGrave(c,REASON_RULE)
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
function c100730085.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,10000010)
end
function c100730085.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730085)
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,10000010)
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(100730085,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
expansions/script/c100730086.lua
View file @ aea8f539
--高速决斗技能-抽卡预感：暗
--高速决斗技能-黑暗苏生
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.SpeedDuelAtMainPhase(c,c100730086.skill,c100730086.con,aux.Stringid(100730086,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730086.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.GetMZoneCount(tp)>0
and Duel.IsPlayerCanSpecialSummon(tp)
and Duel.IsExistingMatchingCard(c100730086.filter,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,nil)
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)
Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_ACTIVATE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetValue(c100730086.limval)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
local e2=Effect.GlobalEffect()
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetTargetRange(1,0)
e2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2,1-tp)
local g=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_GRAVE,LOCATION_GRAVE,nil,TYPE_MONSTER)
local tc=g:Select(tp,1,1,nil)
if tc then
Duel.SpecialSummon(tc,0,tp,tp,true,true,POS_FACEUP)
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
function c100730086.filter(c)
return c:IsType(TYPE_MONSTER) and c:IsAttackBelow(4000)
end
function c100730086.limval(e,re,rp)
return true
end
\ No newline at end of file
expansions/script/c100730087.lua
View file @ aea8f539
--高速决斗技能-抽卡预感：光
--高速决斗技能黑暗决斗
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))
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_TURN_END)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCountLimit(1)
e1:SetOperation(c100730087.skill)
Duel.RegisterEffect(e1,0)
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
tp=Duel.GetTurnPlayer()
local ct=Duel.GetFieldGroupCount(tp,LOCATION_GRAVE,0)*200
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
Duel.Damage(tp,ct,REASON_RULE)
end
\ No newline at end of file
expansions/script/c100730088.lua
View file @ aea8f539
--高速决斗技能--嘻嘻嘻嘻（虫鸣不止）
--高速决斗技能-反转痛苦
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.SpeedDuelAtMainPhaseNoCountLimit(c,c100730088.skill,c100730088.con,aux.Stringid(100730088,0))
aux.RegisterSpeedDuelSkillCardCommon()
if not c100730088.battle_damage then
c100730088.battle_damage={}
c100730088.battle_damage[0]=0
c100730088.battle_damage[1]=0
c100730088.battle_damage[2]=0
c100730088.battle_damage[3]=0
end
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_BATTLE_DAMAGE)
e1:SetOperation(c100730088.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(c100730088.damcalreset)
Duel.RegisterEffect(e2,0)
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
function c100730088.damcal(e,tp,eg,ep,ev,re,r,rp)
c100730088.battle_damage[ep]=c100730088.battle_damage[ep]+ev
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
function c100730088.damcalreset(e,tp,eg,ep,ev,re,r,rp)
c100730088.battle_damage[2]=c100730088.battle_damage[0]
c100730088.battle_damage[3]=c100730088.battle_damage[1]
c100730088.battle_damage[0]=0
c100730088.battle_damage[1]=0
end
function c100730088.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and c100730088.battle_damage[tp+2]>0
and Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil)
end
function c100730088.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(c100730088.battle_damage[tp+2]/2))
fc:RegisterEffect(e1)
end
\ No newline at end of file
expansions/script/c100730089.lua
View file @ aea8f539
--高速决斗技能--丧尸招来
--高速决斗技能-抽卡预感：炎
Duel.LoadScript("speed_duel_common.lua")
function c100730089.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(66835946,c)
aux.SpeedDuelMoveCardToFieldCommon(94804055,c)
if not c100730089.UsedLP then
c100730089.UsedLP={}
c100730089.UsedLP[0]=0
......@@ -16,8 +16,8 @@ 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)
c100730089.UsedLP[tp]=c100730089.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)
......@@ -28,6 +28,6 @@ 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
and Duel.GetMatchingGroupCount(Card.IsAttribute,tp,LOCATION_DECK,0,nil,ATTRIBUTE_FIRE)>0
and aux.DecreasedLP[tp]-c100730089.UsedLP[tp] >= 1500
end
\ No newline at end of file
expansions/script/c100730090.lua
View file @ aea8f539
--高速决斗技能-魔力流通
--高速决斗技能--丧尸招来
Duel.LoadScript("speed_duel_common.lua")
function c100730090.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(51481927,c)
aux.SpeedDuelMoveCardToFieldCommon(66835946,c)
if not c100730090.UsedLP then
c100730090.UsedLP={}
c100730090.UsedLP[0]=0
......@@ -16,8 +16,8 @@ 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)
c100730090.UsedLP[tp]=c100730090.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)
......@@ -28,6 +28,6 @@ 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
and Duel.GetMatchingGroupCount(Card.IsRace,tp,LOCATION_DECK,0,nil,RACE_ZOMBIE)>0
and aux.DecreasedLP[tp]-c100730090.UsedLP[tp] >= 1000
end
\ No newline at end of file
expansions/script/c100730091.lua
View file @ aea8f539
--高速决斗技能-增援
--高速决斗技能-不死王的从者
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.SpeedDuelAtMainPhase(c,c100730091.skill,c100730091.con,aux.Stringid(100730091,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730091.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730091.filter,tp,LOCATION_DECK,0,1,nil)
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
tp=e:GetLabelObject():GetOwner()
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()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c100730091.filter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoGrave(g,REASON_EFFECT)
local g1=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_HAND,0,0,1,nil,29155212)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
if ft<1 or not g1 then return end
Duel.SpecialSummon(g1,0,tp,tp,true,true,POS_FACEUP)
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
function c100730091.filter(c)
return c:IsType(TYPE_NORMAL) and c:IsLevelBelow(3) and c:IsRace(RACE_ZOMBIE) and c:IsAbleToGrave()
end
expansions/script/c100730092.lua
View file @ aea8f539
--高速决斗技能--生命总会找到出路
--高速决斗技能-墓穴大军
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.SpeedDuelAtMainPhase(c,c100730092.skill,c100730092.con,aux.Stringid(100730092,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730092.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730092.filter,tp,LOCATION_MZONE+LOCATION_GRAVE,LOCATION_MZONE+LOCATION_GRAVE,1,nil)
and aux.DecreasedLP[tp]-c100730092.UsedLP[tp]>=1000
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
tp=e:GetLabelObject():GetOwner()
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
local c=e:GetHandler()
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetTargetRange(LOCATION_MZONE+LOCATION_GRAVE,LOCATION_MZONE+LOCATION_GRAVE)
e2:SetCode(EFFECT_CHANGE_RACE)
e2:SetCondition(c100730092.condition)
e2:SetReset(RESET_PHASE+PHASE_END,2)
e2:SetValue(RACE_ZOMBIE)
Duel.RegisterEffect(e2,tp)
end
function c100730092.filter(c)
return c:IsType(TYPE_MONSTER) and not c:IsRace(RACE_ZOMBIE)
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
function c100730092.condition(e)
local tp=e:GetHandlerPlayer()
return not Duel.IsPlayerAffectedByEffect(tp,EFFECT_NECRO_VALLEY)
and not Duel.IsPlayerAffectedByEffect(1-tp,EFFECT_NECRO_VALLEY)
end
expansions/script/c100730095.lua
View file @ aea8f539
--高速决斗技能-别找借口！
--高速决斗技能-仪式大师2
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.SpeedDuelMoveCardToFieldCommon(25796442,c)
aux.SpeedDuelMoveCardToFieldCommon(81380218,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
expansions/script/c100730097.lua
View file @ aea8f539
--高速决斗技能-丧悼之假面
--高速决斗技能-守护者呼唤
Duel.LoadScript("speed_duel_common.lua")
function c100730097.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730097.skill,c100730097.con,aux.Stringid(100730097,0))
if not c100730097.UsedLP then
c100730097.UsedLP={}
c100730097.UsedLP[0]=0
c100730097.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730097.skill,c100730097.con,aux.Stringid(100730097,1))
aux.SpeedDuelBeforeDraw(c,c100730097.skill2)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730097.skill2(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730097)
local tc=Duel.CreateToken(tp,50412166)
aux.SpeedDuelSendToHandWithExile(tp,tc)
e:Reset()
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)
return Duel.GetTurnPlayer()==tp
and aux.DecreasedLP[tp]-c100730097.UsedLP[tp] >= 1800
end
function c100730097.skill(e,tp,c)
function c100730097.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730097,0)) then
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()
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730097,1))
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CODE)
getmetatable(e:GetHandler()).announce_filter={TYPE_MONSTER+TYPE_SPELL+TYPE_TRAP,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(0x52) then
Duel.SendtoDeck(c,tp,0,REASON_RULE)
Duel.Draw(tp,1,REASON_RULE)
else Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730097,2))
end
end
end
\ No newline at end of file
function c100730097.filter(c)
return c:IsCode(48948935)
end
\ No newline at end of file
expansions/script/c100730098.lua
View file @ aea8f539
--高速决斗技能-宇宙启示
--高速决斗技能-迷宫建造
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.SpeedDuelAtMainPhase(c,c100730098.skill,c100730098.con,aux.Stringid(100730098,0))
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
function c100730098.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.GetLocationCount(tp,LOCATION_SZONE)>0
and Duel.GetMZoneCount(tp)>1
and Duel.IsPlayerCanSpecialSummon(tp)
and Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_HAND,0,2,nil)
and Duel.IsExistingMatchingCard(c100730098.filter,tp,LOCATION_DECK+LOCATION_HAND,0,1,nil)
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_EXTRA,0,1,nil,99551425)
end
function c100730098.skill(e,tp,c)
tp=e:GetLabelObject():GetOwner()
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)
local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,nil)
local c=g:Select(tp,2,2,nil)
Duel.SendtoDeck(c,nil,2,REASON_RULE)
local d=Duel.CreateToken(tp,67284908)
Duel.MoveToField(d,tp,tp,LOCATION_MZONE,POS_FACEUP_DEFENSE,true)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
local g=Duel.SelectMatchingCard(tp,c100730098.filter,tp,LOCATION_DECK+LOCATION_HAND,0,1,1,nil)
local eqc=g:GetFirst()
Duel.Equip(tp,eqc,d)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g2=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_EXTRA,0,1,1,nil,99551425)
local tc=g2:GetFirst()
Duel.SpecialSummon(tc,0,tp,tp,true,true,POS_FACEUP)
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
function c100730098.filter(c)
return c:IsCode(64389297) and not c:IsForbidden()
end
\ No newline at end of file
expansions/script/c100730100.lua
View file @ aea8f539
--高速决斗技能-天赐的宝牌
--高速决斗技能-痛苦进化
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.SpeedDuelAtMainPhase(c,c100730100.skill,c100730100.con,aux.Stringid(100730100,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730100.Isgod(c)
return c:IsOriginalCodeRule(10000020) and c:IsFaceup()
function c100730100.Isyubel(c)
return c:IsOriginalCodeRule(78371393,4779091) 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)
and Duel.IsExistingMatchingCard(c100730100.Isyubel,tp,LOCATION_MZONE,0,1,nil)
and Duel.GetMZoneCount(tp)>-1
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
function c100730100.SequenceToZone(seq)
return 1 << seq
end
function c100730100.skill(e,tp,eg,ep,ev,re,r,rp)
function c100730100.skill(e,tp)
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()
local g=Duel.SelectMatchingCard(tp,c100730100.Isyubel,tp,LOCATION_MZONE,0,1,1,nil)
if not g then return end
local tc=g:GetFirst()
local pos=tc:GetPosition()
local seq=tc:GetSequence()
if tc:IsOriginalCodeRule(78371393) then code=4779091 end
if tc:IsOriginalCodeRule(4779091) then code=31764700 end
Duel.SendtoGrave(tc,REASON_RULE)
local nc=Duel.CreateToken(tp,code)
Duel.MoveToField(nc,tp,tp,LOCATION_MZONE,pos,true)
Duel.MoveSequence(nc,seq)
end
function c100730100.imfilter(e,re)
return re:IsActiveType(TYPE_TRAP)
function c100730100.DisableMonsterZone(e,tp)
return 0x1f-aux.SequenceToZone(tc:GetSequence())
end
expansions/script/c100730101.lua
View file @ aea8f539
--高速决斗技能-祭品的力量
--高速决斗技能-爱即是伤
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()
aux.SpeedDuelBeforeDraw(c,c100730101.skill)
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)
local e3=Effect.CreateEffect(c)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e3:SetTargetRange(1,0)
e3:SetCategory(CATEGORY_DAMAGE)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_BATTLED)
e3:SetValue(c100730101.abdcon)
e3:SetCondition(c100730101.damcon)
e3:SetOperation(c100730101.damop)
Duel.RegisterEffect(e3,tp)
Duel.Hint(HINT_CARD,1-tp,100730101)
local c=Duel.CreateToken(tp,19763315)
Duel.SendtoDeck(c,nil,0,REASON_RULE)
local d1=Duel.CreateToken(tp,31245780)
Duel.SendtoDeck(d1,nil,0,REASON_RULE)
local d2=Duel.CreateToken(tp,28378427)
Duel.SendtoDeck(d2,nil,0,REASON_RULE)
local sg=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_DECK,0,nil,19763315,31245780,28378427)
local g=sg:SelectSubGroup(tp,aux.dncheck,false,2,2)
Duel.SSet(tp,g)
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
function c100730101.damcon(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetAttacker()
return tc:IsControler(tp) and tc:IsRelateToBattle() and tc:IsCode(78371393,4779091,31764700)
end
function c100730101.tgchk(e,c)
return c:IsCode(10000010)
function c100730101.damop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetAttacker()
local bc=tc:GetBattleTarget()
if bc:IsLocation(LOCATION_MZONE) and bc:IsType(TYPE_MONSTER) then
local dam=bc:GetAttack()
if dam<0 then dam=0 end
Duel.Damage(1-tp,dam,REASON_RULE)
end
end
function c100730101.facechk(e,tp,eg,ep,ev,re,r,rp)
e:GetLabelObject():SetLabel(1)
function c100730101.abdcon(e)
return Duel.GetTurnPlayer()==e:GetHandlerPlayer()
end
\ No newline at end of file
expansions/script/c100730102.lua
View file @ aea8f539
--高速决斗技能-牲祭封印之假面
--高速决斗技能-我的名字叫于贝尔
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.GetLocationCount(tp,LOCATION_SZONE)>0
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 c100730102.skill(e,tp)
function c100730102.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,100730102)
local d=Duel.CreateToken(tp,29549364)
Duel.MoveToField(d,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
local g1=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE,0,0,1,nil,53046408)
if g1:GetCount()==0 then return end
Duel.SendtoHand(g1,tp,REASON_RULE)
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
expansions/script/c100730103.lua
View file @ aea8f539
--高速决斗技能-幻影的野兽
--高速决斗技能-我永远在你身边
Duel.LoadScript("speed_duel_common.lua")
function c100730103.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730103.skill,c100730103.con,aux.Stringid(100730103,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730103.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsPlayerCanSpecialSummon(tp)
and Duel.GetMZoneCount(tp)>1
and Duel.IsExistingMatchingCard(Card.IsAbleToGrave,tp,LOCATION_HAND,0,1,nil)
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,78371393,4779091,31764700)
end
function c100730103.skill(e,tp,c)
tp=e:GetLabelObject():GetOwner()
local g=Duel.GetMatchingGroup(Card.IsAbleToGrave,tp,LOCATION_HAND,0,nil)
local c=g:Select(tp,1,1,nil)
if not c then return end
Duel.SendtoGrave(c,nil,REASON_RULE)
function c100730103.skill(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,1-tp,100730103)
local d=Duel.CreateToken(tp,4796100)
local d1=Duel.CreateToken(tp,5818798)
local d2=Duel.CreateToken(tp,77207191)
Duel.SpecialSummon(d1,0,tp,tp,true,true,POS_FACEUP)
Duel.SpecialSummon(d2,0,tp,tp,true,true,POS_FACEDOWN_DEFENSE)
Duel.SendtoDeck(d,tp,0,REASON_RULE)
local chkf=tp
local mg1=Duel.GetFusionMaterial(tp):Filter(c100730103.filter1,nil,e)
local sg1=Duel.GetMatchingGroup(c100730103.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf)
local mg2=nil
local sg2=nil
local ce=Duel.GetChainMaterial(tp)
if ce~=nil then
local fgroup=ce:GetTarget()
mg2=fgroup(ce,e,tp)
local mf=ce:GetValue()
sg2=Duel.GetMatchingGroup(c100730103.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,chkf)
end
if sg1:GetCount()>0 or (sg2~=nil and sg2:GetCount()>0) then
local sg=sg1:Clone()
if sg2 then sg:Merge(sg2) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tg=sg:Select(tp,1,1,nil)
local tc=tg:GetFirst()
if sg1:IsContains(tc) and (sg2==nil or not sg2:IsContains(tc) or not Duel.SelectYesNo(tp,ce:GetDescription())) then
local mat1=Duel.SelectFusionMaterial(tp,tc,mg1,nil,chkf)
tc:SetMaterial(mat1)
Duel.SendtoGrave(mat1,REASON_EFFECT+REASON_MATERIAL+REASON_FUSION)
Duel.BreakEffect()
Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
else
local mat2=Duel.SelectFusionMaterial(tp,tc,mg2,nil,chkf)
local fop=ce:GetOperation()
fop(ce,e,tp,tc,mat2)
end
tc:CompleteProcedure()
local g1=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE,0,0,3,nil,46009906,76539047)
if g1:GetCount()>=1 then
Duel.SendtoHand(g1,tp,REASON_RULE)
end
e:Reset()
end
end
function c100730103.filter1(c,e)
return not c:IsImmuneToEffect(e)
end
function c100730103.filter2(c,e,tp,m,f,chkf)
return c:IsType(TYPE_FUSION) and c:IsCode(4796100) and (not f or f(c))
and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf)
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
expansions/script/c100730104.lua
View file @ aea8f539
--高速决斗技能-攻击力：8800P
--高速决斗技能-抽卡预感：暗
Duel.LoadScript("speed_duel_common.lua")
function c100730104.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730104.skill,c100730104.con,aux.Stringid(100730104,0))
aux.SpeedDuelMoveCardToFieldCommon(6733059,c)
if not c100730104.UsedLP then
c100730104.UsedLP={}
c100730104.UsedLP[0]=0
c100730104.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730104.skill,c100730104.con,aux.Stringid(100730104,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730104.Is8800(c)
return c:IsLevel(4) and c:IsFaceup() and c:GetAttack()==c:GetDefense()
function c100730104.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730104,0)) then
Duel.Hint(HINT_CARD,1-tp,100730104)
c100730104.UsedLP[tp]=c100730104.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 c100730104.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730104.Is8800,tp,LOCATION_MZONE,0,1,nil)
end
function c100730104.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
Duel.Hint(HINT_CARD,1-tp,100730104)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local g=Duel.SelectMatchingCard(tp,c100730104.Is8800,tp,LOCATION_MZONE,0,1,1,nil)
local tc=g:GetFirst()
local e1=Effect.CreateEffect(tc)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SET_BASE_ATTACK)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetValue(8800)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetTargetRange(1,0)
e2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2,1-tp)
function c100730104.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]-c100730104.UsedLP[tp] >= 1500
end
\ No newline at end of file
expansions/script/c100730105.lua
View file @ aea8f539
--高速决斗技能-超进化之茧
--高速决斗技能-直通墓穴
Duel.LoadScript("speed_duel_common.lua")
function c100730105.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730105.skill,c100730105.con,aux.Stringid(100730105,0))
aux.SpeedDuelAtMainPhase(c,c100730105.skill2,c100730105.con2,aux.Stringid(100730105,1))
function c100730090.initial_effect(c)
aux.SpeedDuelMoveCardToFieldCommon(23424603,c)
aux.SpeedDuelMoveCardToFieldCommon(34646691,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730105.cfilter(c)
return c:IsFaceup() and c:IsRace(RACE_INSECT) and c:IsReleasableByEffect()
and c:GetEquipCount()>0
end
function c100730105.filter(c,e,tp)
return c:IsRace(RACE_INSECT) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
end
function c100730105.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.GetMZoneCount(tp)>0
and Duel.IsPlayerCanSpecialSummon(tp)
and Duel.IsExistingMatchingCard(c100730105.cfilter,tp,LOCATION_MZONE,loc,1,nil)
and Duel.IsExistingMatchingCard(c100730105.filter,tp,LOCATION_DECK,0,1,nil,e,tp)
end
function c100730105.skill(e,tp,eg,ep,ev,re,r,rp)
local loc=LOCATION_MZONE
if Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then loc=0 end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
local g=Duel.SelectMatchingCard(tp,c100730105.cfilter,tp,LOCATION_MZONE,loc,1,1,nil)
if g:GetCount()>0 and Duel.Release(g,REASON_EFFECT)>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=Duel.SelectMatchingCard(tp,c100730105.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
if sg:GetCount()>0 then
Duel.SpecialSummon(sg,0,tp,tp,true,false,POS_FACEUP)
end
end
end
function c100730105.tdfilter(c)
return c:IsRace(RACE_INSECT) and c:IsAbleToDeck()
end
function c100730105.con2(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730105.tdfilter,tp,LOCATION_GRAVE,0,1,nil)
and Duel.IsPlayerCanDraw(tp,1)
end
function c100730105.skill2(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,c100730105.tdfilter,tp,LOCATION_GRAVE,0,1,1,nil)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local tc=g:GetFirst()
Duel.SendtoDeck(tc,nil,0,REASON_EFFECT)
if tc:IsLocation(LOCATION_DECK) then Duel.ShuffleDeck(tp) end
if tc:IsLocation(LOCATION_DECK+LOCATION_EXTRA) then
Duel.BreakEffect()
Duel.Draw(tp,1,REASON_EFFECT)
end
end
expansions/script/c100730106.lua
View file @ aea8f539
--高速决斗技能-龙之融合
--高速决斗技能-僵尸之主
Duel.LoadScript("speed_duel_common.lua")
function c100730106.initial_effect(c)
aux.SpeedDuelMoveCardToDeckCommon(99267150,c)
aux.SpeedDuelMoveCardToDeckCommon(71490127,c)
if not c100730106.UsedLP then
c100730106.UsedLP={}
c100730106.UsedLP[0]=0
c100730106.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelAtMainPhase(c,c100730106.skill,c100730106.con,aux.Stringid(100730106,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730106.filter(c)
return c:IsRace(RACE_ZOMBIE) and c:IsLevelBelow(4)
end
function c100730106.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]-c100730106.UsedLP[tp]>=1500
and c100730106.UsedLP[tp]<2000
and Duel.GetMZoneCount(tp)>0
and Duel.IsPlayerCanSpecialSummon(tp)
and Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_HAND,0,1,nil,TYPE_MONSTER)
and Duel.IsExistingMatchingCard(c100730106.filter,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,nil)
end
function c100730106.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
c100730106.UsedLP[tp]=c100730106.UsedLP[tp]+1500
function c100730106.skill(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,1-tp,100730106)
local g=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,1,nil)
if not g then return end
Duel.SendtoDeck(g,nil,2,REASON_RULE)
local c=Duel.CreateToken(tp,71490127)
Duel.SendtoHand(c,nil,REASON_RULE)
local g1=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_HAND,0,nil,TYPE_MONSTER)
local c=g1:Select(tp,1,1,nil)
if not c then return end
Duel.SendtoGrave(c,nil,REASON_RULE)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c100730106.filter,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,1,nil)
local tc=g:GetFirst()
if not tc then return end
Duel.SpecialSummon(tc,0,tp,tp,true,true,POS_FACEUP)
e:Reset()
end
\ No newline at end of file
expansions/script/c100730108.lua
View file @ aea8f539
--高速决斗技能-决斗饭团
--高速决斗技能-攻击力：8800P
Duel.LoadScript("speed_duel_common.lua")
function c100730108.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730108.skill,c100730108.con,aux.Stringid(100730108,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730108.Is8800(c)
return c:IsLevel(4) and c:IsFaceup() and c:GetAttack()==c:GetDefense()
end
function c100730108.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return Duel.GetLP(tp)<Duel.GetLP(1-tp)
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730108.Is8800,tp,LOCATION_MZONE,0,1,nil)
end
function c100730108.skill(e,tp,eg,ep,ev,re,r,rp)
function c100730108.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
if not Duel.SelectYesNo(tp,aux.Stringid(100730108,0)) then return end
Duel.Hint(HINT_CARD,1-tp,100730108)
Duel.Recover(tp,1000,REASON_EFFECT)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local g=Duel.SelectMatchingCard(tp,c100730108.Is8800,tp,LOCATION_MZONE,0,1,1,nil)
local tc=g:GetFirst()
local e1=Effect.CreateEffect(tc)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_SET_BASE_ATTACK)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetValue(8800)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetTargetRange(1,0)
e2:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2,1-tp)
end
\ No newline at end of file
expansions/script/c100730109.lua
View file @ aea8f539
--高速决斗技能-吃点决斗饭团！
--高速决斗技能-上膛
Duel.LoadScript("speed_duel_common.lua")
function c100730109.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730109.skill,c100730109.con,aux.Stringid(100730109,0))
aux.SpeedDuelAtMainPhase(c,c100730109.skill,c100730109.con,aux.Stringid(100730109,1))
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730109.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(Card.IsRace,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,2,nil,RACE_FAIRY)
return Duel.GetTurnPlayer()==tp
and aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.GetTurnCount()>=5
end
function c100730109.skill(e,tp,c)
function c100730109.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
local g=Duel.GetMatchingGroup(Card.IsRace,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,nil,RACE_FAIRY)
local c=g:Select(tp,2,4,nil)
if c then
Duel.Hint(HINT_CARD,1-tp,100730109)
Duel.HintSelection(c)
Duel.SendtoDeck(c,nil,0,REASON_EFFECT)
Duel.Recover(tp,2000,REASON_EFFECT)
e:Reset()
end
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(100730109,0)) then return end
Duel.SendtoDeck(g,nil,1,REASON_RULE)
Duel.Draw(tp,g:GetCount(),REASON_RULE)
end
\ No newline at end of file
expansions/script/c100730110.lua
View file @ aea8f539
--高速决斗技能-七皇之剑
--高速决斗技能-生命充能
Duel.LoadScript("speed_duel_common.lua")
function c100730110.initial_effect(c)
aux.SpeedDuelBeforeDraw(c,c100730110.skill)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730110.filter(c,g)
if not c:IsRace(RACE_FISH) 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 c100730110.skill(e,tp)
function c100730110.skill(e,tp,eg,ep,ev,re,r,rp)
tp=e:GetLabelObject():GetOwner()
local g=Group.CreateGroup()
if not Duel.IsExistingMatchingCard(c100730110.filter,tp,LOCATION_DECK+LOCATION_HAND,0,7,nil,g) then
Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(100730110,0))
local e1=Effect.GlobalEffect()
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCategory(CATEGORY_RECOVER)
e1:SetCode(EVENT_TURN_END)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0)
e1:SetCountLimit(1)
e1:SetReset(RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN,5)
e1:SetOperation(c100730110.recop)
e1:SetValue(c100730110.abdcon)
Duel.RegisterEffect(e1,tp)
e:Reset()
return
end
tp=e:GetLabelObject():GetOwner()
end
function c100730110.recop(e,tp,eg,ep,ev,re,r,rp)
if ep~=tp then return end
local count= Duel.GetTurnCount()
Duel.Hint(HINT_CARD,1-tp,100730110)
local n101=Duel.CreateToken(tp,57734012)
Duel.SendtoDeck(n101,tp,0,REASON_RULE)
local no101=Duel.CreateToken(tp,48739166)
Duel.SendtoDeck(no101,tp,1,REASON_RULE)
local cno101=Duel.CreateToken(tp,12744567)
Duel.SendtoDeck(cno101,tp,0,REASON_RULE)
e:Reset()
Duel.Recover(tp,count*200,REASON_RULE)
local g2=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK+LOCATION_GRAVE,0,0,1,nil,9032529)
if g2:GetCount()==0 then return end
Duel.SendtoHand(g2,tp,REASON_RULE)
end
function c100730110.abdcon(e)
return Duel.GetTurnPlayer()==e:GetHandlerPlayer()
end
\ No newline at end of file
expansions/script/c100730113.lua
View file @ aea8f539
--高速决斗技能-痛苦进化
--高速决斗技能-抽卡预感：地缚神
Duel.LoadScript("speed_duel_common.lua")
function c100730113.initial_effect(c)
aux.SpeedDuelAtMainPhase(c,c100730113.skill,c100730113.con,aux.Stringid(100730105,0))
aux.SpeedDuelMoveCardToFieldCommon(44710391,c)
aux.SpeedDuelMoveCardToFieldCommon(68304813,c)
if not c100730113.UsedLP then
c100730113.UsedLP={}
c100730113.UsedLP[0]=0
c100730113.UsedLP[1]=0
end
aux.SpeedDuelCalculateDecreasedLP()
aux.SpeedDuelReplaceDraw(c,c100730113.skill,c100730113.con,aux.Stringid(100730113,1))
aux.SpeedDuelMoveCardToDeckCommon(39823987,c)
aux.SpeedDuelMoveCardToDeckCommon(66818682,c)
aux.SpeedDuelMoveCardToDeckCommon(41131774,c)
aux.SpeedDuelMoveCardToDeckCommon(37910722,c)
aux.SpeedDuelMoveCardToDeckCommon(25472513,c)
aux.SpeedDuelMoveCardToDeckCommon(1686814,c)
aux.SpeedDuelMoveCardToDeckCommon(60025883,c)
aux.SpeedDuelMoveCardToDeckCommon(90884403,c)
aux.RegisterSpeedDuelSkillCardCommon()
end
function c100730113.Isyubel(c)
return (c:IsOriginalCodeRule(78371393) and c:IsFaceup())
or (c:IsOriginalCodeRule(4779091) and c:IsFaceup())
function c100730113.skill(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
if Duel.SelectYesNo(tp,aux.Stringid(100730113,0)) then
Duel.Hint(HINT_CARD,1-tp,100730113)
c100730113.UsedLP[tp]=c100730113.UsedLP[tp]+1000
local g=Duel.GetMatchingGroup(Card.IsSetCard,tp,LOCATION_DECK,0,nil,0x21)
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 c100730113.con(e,tp)
tp=e:GetLabelObject():GetOwner()
return aux.SpeedDuelAtMainPhaseCondition(e,tp)
and Duel.IsExistingMatchingCard(c100730113.Isyubel,tp,LOCATION_MZONE,0,1,nil)
and Duel.GetMZoneCount(tp)>-1
end
function c100730113.SequenceToZone(seq)
return 1 << seq
end
function c100730113.skill(e,tp)
tp=e:GetLabelObject():GetOwner()
local g=Duel.SelectMatchingCard(tp,c100730113.Isyubel,tp,LOCATION_MZONE,0,1,1,nil)
if not g then return end
local tc=g:GetFirst()
local pos=tc:GetPosition()
local seq=tc:GetSequence()
if tc:IsOriginalCodeRule(78371393) then code=4779091 end
if tc:IsOriginalCodeRule(4779091) then code=31764700 end
Duel.SendtoGrave(tc,REASON_RULE)
local nc=Duel.CreateToken(tp,code)
Duel.MoveToField(nc,tp,tp,LOCATION_MZONE,pos,true)
Duel.MoveSequence(nc,seq)
end
function c100730113.DisableMonsterZone(e,tp)
return 0x1f-aux.SequenceToZone(tc:GetSequence())
function c100730113.con(e,tp,eg,ep,ev,re,r,rp)
tp = e:GetLabelObject():GetOwner()
return Duel.GetTurnPlayer()==tp
and Duel.GetMatchingGroupCount(Card.IsSetCard,tp,LOCATION_DECK,0,nil,0x21)>0
and aux.DecreasedLP[tp]-c100730113.UsedLP[tp] >= 1000
end
\ No newline at end of file
expansions/script/c100730118.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730120.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730121.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730122.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730123.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730124.lua
View file @ aea8f539
--高速决斗技能-XYZ猎人
Duel.LoadScript("speed_duel_common.lua")
function c100730124.initial_effect(c)
aux.SpeedDuelMoveCardToDeckCommon(1127737,c)
aux.SpeedDuelAtMainPhase(c,c100730124.skill,c100730124.con,aux.Stringid(100730124,0))
aux.RegisterSpeedDuelSkillCardCommon()
end
......
expansions/script/c100730126.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730128.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730129.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730130.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730132.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730133.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730134.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730135.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730136.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730137.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730138.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730139.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730141.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730142.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730143.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730144.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730145.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730146.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730147.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730149.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730150.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730152.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730153.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730154.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730155.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730158.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730159.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730161.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730162.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730164.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730165.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730166.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730167.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730168.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730170.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730171.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730172.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730176.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730177.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730178.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730179.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730180.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730184.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730185.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730186.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730187.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730188.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730189.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730190.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730191.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730192.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730193.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730194.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730195.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730196.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730197.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730198.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730199.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730200.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730201.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730202.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730203.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730205.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730208.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730209.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730210.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730211.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730212.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730213.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730214.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730216.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730218.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730219.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730220.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730226.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730227.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730228.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730229.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730230.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730231.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730234.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730235.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730236.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730237.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730238.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730242.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730245.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730246.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730248.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730249.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730250.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730251.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730253.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730254.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730263.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730265.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730266.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730269.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730270.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730271.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730272.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730273.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730274.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730275.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730277.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730280.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730281.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730282.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730283.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730284.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730286.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730287.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730288.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730289.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730290.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730291.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730292.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730293.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730294.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730295.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730296.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730297.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730298.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730299.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730300.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730301.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730302.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730303.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730304.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730305.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730306.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730314.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730315.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730316.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730317.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730318.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c100730319.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c123656668.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c138212991.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c138814750.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c150690129.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c171971101.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c173309161.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c20936251.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c210000020.lua
View file @ aea8f539
This diff is collapsed.
expansions/script/c210000040.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c27157996.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c28270534.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c29092121.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c29114773.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c31059809.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c32281491.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c32671443.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c33129626.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c33393090.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c33907039.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c34242278.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c34293667.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c34419588.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c44632120.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c45064756.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c54374642.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c55496220.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c56619778.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c60514625.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c6186304.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c6309986.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c64591429.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c67331360.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c67557908.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c68679595.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c6909330.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c69492187.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c69792699.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c7021574.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c70914287.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c71036835.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c71459861.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c71736213.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c7721912.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c81769387.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c81881839.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c8843569.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c9069157.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c92607427.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c93729065.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c94942656.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c95664204.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c95886782.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/c99328137.lua 0 → 100644
View file @ aea8f539
This diff is collapsed.
expansions/script/special.lua
View file @ aea8f539
This diff is collapsed.
expansions/speed-duel.cdb
View file @ aea8f539
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