Skip to content

V
Vgdpro Scripts
Commit d597aafa authored by ikaros131417's avatar ikaros131417 Committed by GitHub
Browse files
Options

10501085-10501118(跳过中间12个判定) 

内容是上个星期前写的，有些上个星期更新的用法还未更新。
10501086，10501116，10501117，10501118这四个当时写的时候有点小问题。近期单位有检查工作较多。。不太有大量时间写，不出意外下周检查过了就有时间写了。
parent f2d8e8b2
Hide whitespace changes
Inline Side-by-side
Showing with 305 additions and 52 deletions
c10501085.lua
View file @ d597aafa
local cm,m,o=GetID() --努力的证明 维莉丝塔
function cm.initial_effect(c) local cm,m,o=GetID()
vgf.VgCard(c) function cm.initial_effect(c)
end vgf.VgCard(c)
-- 【自】：这个单位被RIDE时，通过【费用】[将手牌中的1张卡放置到灵魂里]，从你的牌堆里探寻至多1张宝石卡，公开后加入手牌，然后牌堆洗切。
vgd.BeRidedByCard(c,m,nil,cm.op1,cm.cost1)
-- 【自】【R】：你施放指令卡时，通过【费用】[灵魂爆发1]，这个回合中，这个单位的力量+5000。
vgd.EffectTypeTrigger(c,m,LOCATION_MZONE,EFFECT_TYPE_FIELD,EVENT_CHAINING,VgF.AtkUp(c,c,5000),VgF.OverlayCost(1),cm.con)
end
function cm.op1(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,0,1,nil)
if #g>0 then
local tc = g:GetFirst()
Duel.Sendto(tc,tp,LOCATION_HAND,nil,REASON_EFFECT)
end
Duel.ShuffleDeck(tp)
end
function cm.filter(c)
return c:IsCode(0xc040) and c:IsAbleToHand()
end
function cm.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetMatchingGroupCount(nil,tp,0,LOCATION_HAND,nil)>=1 end
local rc=Duel.GetMatchingGroup(VgF.VMonsterFilter,tp,LOCATION_MZONE,0,nil):GetFirst()
local g=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_HAND,0,1,1,nil,e,tp)
Duel.HintSelection(g)
Duel.Overlay(rc,g)
end
function cm.con(e,tp,eg,ep,ev,re,r,rp)
return re:IsHasType(EFFECT_TYPE_ACTIVATE) and rp==tp and vgf.RMonsterCondition(e)
end
c10501086.lua
View file @ d597aafa
local cm,m,o=GetID() --虚梦少女 汉内洛蕾
function cm.initial_effect(c) local cm,m,o=GetID()
vgf.VgCard(c) function cm.initial_effect(c)
end vgf.VgCard(c)
-- 【自】【R】：你其他的后防者登场到这个单位的同纵列时，这个回合中，这个单位的力量+2000。
vgd.EffectTypeTrigger(c,m,LOCATION_MZONE,EFFECT_TYPE_FIELD,EVENT_SPSUMMON_SUCCESS,cm.op,nil,cm.con)
end
function cm.con(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
-- 下面这段感觉有点问题
return VgF.RMonsterCondition(e) and eg:IsExists(cm.filter,1,nil,tp)
end
function cm.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
vgf.AtkUp(c,c,2000)
end
function cm.filter(c)
return c:IsExists(VgF.GetColumnGroup)
end
\ No newline at end of file
c10501087.lua
View file @ d597aafa
local cm,m,o=GetID() --紧张的早晨 珊塔尔
function cm.initial_effect(c) local cm,m,o=GetID()
vgf.VgCard(c) function cm.initial_effect(c)
end vgf.VgCard(c)
-- 【起】【R】【1回合1次】：通过【费用】[计数爆发1]，选择你的1张先导者，这个回合中，力量+5000。
vgd.EffectTypeIgnition(c,m,LOCATION_MZONE,cm.op,vgf.DamageCost(1),vgf.RMonsterCondition,nil,1)
end
function cm.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATKUP)
-- 选择你的1张先导者
local g=Duel.SelectMatchingCard(tp,VgF.VMonsterFilter,tp,LOCATION_MZONE,0,1,1,c)
Duel.HintSelection(g)
vgf.AtkUp(c,g,5000)
end
c10501088.lua
View file @ d597aafa
local cm,m,o=GetID() --鼓起踏步向前的勇气 贝尔缇优
function cm.initial_effect(c) local cm,m,o=GetID()
vgf.VgCard(c) function cm.initial_effect(c)
end vgf.VgCard(c)
-- 【自】【R】：这个单位支援时，这个回合中，这个单位的力量+2000。
vgd.EffectTypeTrigger(c,m,LOCATION_MZONE,EFFECT_TYPE_FIELD,EVENT_CUSTOM+EVENT_SUPPORT,cm.op,nil,cm.con)
end
function cm.con(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return vgf.RMonsterFilter(c)
end
function cm.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
vgf.AtkUp(c,c,2000)
end
\ No newline at end of file
c10501091.lua
View file @ d597aafa
local cm,m,o=GetID() --微小的和平 普拉耶尔
function cm.initial_effect(c) local cm,m,o=GetID()
vgf.VgCard(c) function cm.initial_effect(c)
end vgf.VgCard(c)
-- 白翼（你的封锁区中的卡只有奇数的等级的场合才有效）-【永】【R/G】：这个单位的力量+2000、盾护+5000。
VgD.EffectTypeContinuousChangeAttack(c,EFFECT_TYPE_SINGLE,2000,cm.con1)
vgd.EffectTypeContinuousChangeAttack(c,EFFECT_TYPE_SINGLE,5000,cm.con2,tg,EFFECT_UPDATE_DEFENSE,reset,LOCATION_GZONE)
end
function cm.con1(e,tp,eg,ep,ev,re,r,rp)
local a = Duel.IsExistingMatchingCard(cm.filter1,tp,LOCATION_REMOVED,0,1,nil)
local b = Duel.IsExistingMatchingCard(cm.filter2,tp,LOCATION_REMOVED,0,1,nil)
-- 白翼（你的封锁区中的卡只有奇数的等级的场合才有效）
return not a and b and vgf.RMonsterCondition(e)
end
function cm.con2(e,tp,eg,ep,ev,re,r,rp)
local a = Duel.IsExistingMatchingCard(cm.filter1,tp,LOCATION_REMOVED,0,1,nil)
local b = Duel.IsExistingMatchingCard(cm.filter2,tp,LOCATION_REMOVED,0,1,nil)
-- 白翼（你的封锁区中的卡只有奇数的等级的场合才有效）
return not a and b
end
function cm.filter1(c)
return c:getlevel() % 2 == 1
end
function cm.filter2(c)
return c:getlevel() % 2 == 0
end
\ No newline at end of file
c10501092.lua
View file @ d597aafa
local cm,m,o=GetID() --任性姑娘 赫尔米娜
function cm.initial_effect(c) local cm,m,o=GetID()
vgf.VgCard(c) function cm.initial_effect(c)
end vgf.VgCard(c)
-- 【自】：这个单位登场到R时，你的R上有其他的〈幽灵〉的话，选择你的1张后防者，这个回合中，力量+5000。
vgd.EffectTypeTrigger(c,m,LOCATION_MZONE,EFFECT_TYPE_SINGLE,EVENT_SPSUMMON_SUCCESS,cm.op,nil,cm.con)
end
function cm.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
-- 选择你的1张后防者
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATKUP)
local g=Duel.SelectMatchingCard(tp,vgf.RMonsterFilter,tp,LOCATION_MZONE,0,1,1,nil)
Duel.HintSelection(g)
-- 这个回合中，力量+5000。
vgf.AtkUp(c,g,5000)
end
function cm.con(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
-- 这个单位登场到R时，你的R上有其他的〈幽灵〉的话，
local a = Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_MZONE,0,1,c)
return vgf.RMonsterFilter(c) and a
end
function cm.filter(c)
return c:IsSetCard(0xa013) and c:vgf.RMonsterFilter()
end
\ No newline at end of file
c10501093.lua
View file @ d597aafa
local cm,m,o=GetID() --可靠的最高年级生 阿莉艾斯
function cm.initial_effect(c) local cm,m,o=GetID()
vgf.VgCard(c) function cm.initial_effect(c)
end vgf.VgCard(c)
-- 【永】【G】：你的不存在单位的R有3个以上的话，这个单位的盾护+10000。
vgd.EffectTypeContinuousChangeAttack(c,EFFECT_TYPE_SINGLE,10000,cm.con,tg,EFFECT_UPDATE_DEFENSE,reset,LOCATION_GZONE)
end
function cm.con(e,tp,eg,ep,ev,re,r,rp)
local ct1 = bit.ReturnCount(vgf.GetAvailableLocation(tp))
local ct2 = Duel.GetMatchingGroupCount(vgf.RMonsterFilter,tp,LOCATION_MZONE,0,nil)
return ct1 - ct2 >= 3
end
c10501094.lua
View file @ d597aafa
local cm,m,o=GetID() --梦想之瞳 爱梅莱茵
function cm.initial_effect(c) local cm,m,o=GetID()
vgf.VgCard(c) function cm.initial_effect(c)
end vgf.VgCard(c)
-- 【永】【R】：你其他的后防者有3张以上的话，这个单位的力量+5000。
vgd.EffectTypeContinuousChangeAttack(c,EFFECT_TYPE_SINGLE,5000,cm.con1)
end
function cm.con1(e)
local c= e:GetHandler()
local tp=e:GetHandlerPlayer()
return vgf.RMonsterCondition(e) and Duel.IsExistingMatchingCard(vgf.RMonsterFilter,tp,LOCATION_MZONE,0,3,c) and Duel.GetTurnPlayer()==tp
end
\ No newline at end of file
c10501095.lua
View file @ d597aafa
local cm,m,o=GetID() --分赠的幸福 达纳耶尔
function cm.initial_effect(c) local cm,m,o=GetID()
vgf.VgCard(c) function cm.initial_effect(c)
end vgf.VgCard(c)
-- 白翼（你的封锁区中的卡只有奇数的等级的场合才有效）-
-- 【自】【R】：这个单位支援时，通过【费用】[灵魂爆发2]，选择你其他的1个单位，等级是奇数的这个单位以外的单位每有1个，这个回合中，那个单位的力量+5000。
vgd.EffectTypeTrigger(c,m,LOCATION_MZONE,EFFECT_TYPE_FIELD,EVENT_CUSTOM+EVENT_SUPPORT,cm.op,VgF.OverlayCost(2),cm.con)
end
function cm.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATKUP)
local g=Duel.SelectMatchingCard(tp,cm.filter1,tp,LOCATION_MZONE,0,1,1,c)
Duel.HintSelection(g)
local a = GetMatchingGroupCount(cm.filter1,tp,LOCATION_MZONE,0,c)
local b = 5000 * a
vgf.AtkUp(c,g,b)
end
function cm.con(e,tp,eg,ep,ev,re,r,rp)
local a = Duel.IsExistingMatchingCard(cm.filter1,tp,LOCATION_REMOVED,0,1,nil)
local b = Duel.IsExistingMatchingCard(cm.filter2,tp,LOCATION_REMOVED,0,1,nil)
-- 白翼（你的封锁区中的卡只有奇数的等级的场合才有效）
return not a and b and vgf.RMonsterCondition(e)
end
function cm.filter1(c)
return c:getlevel() % 2 == 1
end
function cm.filter2(c)
return c:getlevel() % 2 == 0
end
\ No newline at end of file
c10501097.lua
View file @ d597aafa
local cm,m,o=GetID() --震空的跃动 玛莉布耶尔
function cm.initial_effect(c) local cm,m,o=GetID()
vgf.VgCard(c) function cm.initial_effect(c)
end vgf.VgCard(c)
-- 白翼（你的封锁区中的卡只有奇数的等级的场合才有效）
-- 【永】【R】：你的回合中，这个单位的力量+10000。
VgD.EffectTypeContinuousChangeAttack(c,EFFECT_TYPE_SINGLE,10000,cm.con)
end
function cm.con(e,tp,eg,ep,ev,re,r,rp)
local a = Duel.IsExistingMatchingCard(cm.filter1,tp,LOCATION_REMOVED,0,1,nil)
local b = Duel.IsExistingMatchingCard(cm.filter2,tp,LOCATION_REMOVED,0,1,nil)
-- 白翼（你的封锁区中的卡只有奇数的等级的场合才有效）
return not a and b and Duel.GetTurnPlayer()==tp and vgf.RMonsterCondition(e)
end
function cm.filter1(c)
return c:getlevel() % 2 == 1
end
function cm.filter2(c)
return c:getlevel() % 2 == 0
end
\ No newline at end of file
c10501116.lua
View file @ d597aafa
local cm,m,o=GetID() --无尽之苍蓝
function cm.initial_effect(c) local cm,m,o=GetID()
vgf.VgCard(c) function cm.initial_effect(c)--这个函数下面用于注册效果
end vgf.VgCard(c)
-- 选择你的1个单位，这个回合中，力量+5000。将这张卡放置到灵魂里。
vgd.SpellActivate(c,m,cm.operation,nil)
end
function cm.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATKUP)
local g=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_MZONE,0,1,1,nil)
Duel.HintSelection(g)
VgF.AtkUp(c,g,5000,nil)
local rc=Duel.GetMatchingGroup(VgF.VMonsterFilter,tp,LOCATION_MZONE,0,nil):GetFirst()
Duel.Overlay(rc,c)
-- 测试时发现会进魂后送墓
end
c10501117.lua
View file @ d597aafa
local cm,m,o=GetID() --活力交响乐
function cm.initial_effect(c) local cm,m,o=GetID()
vgf.VgCard(c) function cm.initial_effect(c)--这个函数下面用于注册效果
end vgf.VgCard(c)
-- 这个回合中你的先导者被攻击击中过的话，选择1个被攻击的单位，这次战斗中，力量+30000。
vgd.QuickSpell(c,cm.op)
end
function cm.op(e,tp,eg,ep,ev,re,r,rp)
local c = e:GetHandler()
-- 需要判断被击中过,这段未实现，辛苦群主大大了~/doge
-- if then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATKUP)
local g = Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_MZONE,0,1,1,nil)
Duel.HintSelection(g)
local e1 = vgf.AtkUp(c,g,30000,nil)
vgf.EffectReset(c,e1,EVENT_BATTLED)
end
function cm.filter(c)
local a = Duel.GetAttackTarget()
return c == a
end
c10501118.lua
View file @ d597aafa
local cm,m,o=GetID() --相互面对，共渡难关
function cm.initial_effect(c) local cm,m,o=GetID()
vgf.VgCard(c) function cm.initial_effect(c)
end vgf.VgCard(c)
-- 你的先导者是「双翼的大天使 阿蕾斯缇耶尔」的话能施放！
-- 选择1个正在被攻击的单位，你的等级是奇数的后防者每有1张，这次战斗中，被选择的单位的力量+5000。这个回合中，你的等级是偶数的单位将要从R或G退场之际，你也可以不将那些卡放置到弃牌区，而是将那些卡放置到灵魂里。
vgd.QuickSpell(c,cm.op,cm.con)
end
function cm.con(e,tp,eg,ep,ev,re,r,rp)
local v = VgF.GetVMonster(tp)
return v:IsCode(10501002)
end
function cm.op(e,tp,eg,ep,ev,re,r,rp)
local c = e:GetHandler()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATKUP)
local g = Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_MZONE,0,1,1,nil)
Duel.HintSelection(g)
local a = GetMatchingGroupCount(cm.filter1,tp,LOCATION_MZONE,0)
local b = 5000 * a
local e1 = vgf.AtkUp(c,g,b,nil)
vgf.EffectReset(c,e1,EVENT_BATTLED)
-- 这个回合中，你的等级是偶数的单位将要从R或G退场之际，你也可以不将那些卡放置到弃牌区，而是将那些卡放置到灵魂
-- 这段未实现，辛苦群主大大了~/doge
end
function cm.filter(c)
local a = Duel.GetAttackTarget()
return c == a
end
function cm.filter1(c)
return vgf.IsLevel(c,1) or vgf.IsLevel(c,3)
end
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