Commit 8eceac44 authored by linmeng's avatar linmeng

更新小写

parent 5e5e6208
This diff is collapsed.
VgDefinition={}
VgID=10101001
vgdefinition={}
vgID=10101001
--min/max value
MIN_ID =1000 --4 digits, by DataManager::GetDesc()
MAX_ID =268435455 --28 bits, by DataManager::GetDesc()
......@@ -875,17 +875,17 @@ FLAG_ID_CHAINING =1
FLAG_ID_UNION =2
FLAG_ID_NO_NORMAL_DRAW =3
--Flag
CountTriggerFlag =VgID --计数标识
AttackTriggerFlag =VgID+1 --多次攻击判定标识
DamageTriggerFlag =VgID+2 --多次伤害判定标识
CountTriggerFlag =vgID --计数标识
AttackTriggerFlag =vgID+1 --多次攻击判定标识
DamageTriggerFlag =vgID+2 --多次伤害判定标识
--AffectedByEffect
AFFECT_CODE_MIX =VgID --魔合成
AFFECT_CODE_SendtoG =VgID+1 --
AFFECT_CODE_MIX =vgID --魔合成
AFFECT_CODE_SendtoG =vgID+1 --
--Counter
COUNTER_ENERGE =0x1 --能量爆发
--自定时点
EVENT_TRIGGER =VgID --判定时点
EVENT_CRITICAL_STRIKE =VgID+1 --暴击值结算时点
EVENT_TRIGGER =vgID --判定时点
EVENT_CRITICAL_STRIKE =vgID+1 --暴击值结算时点
POS_FACEUP_DEFENCE=POS_FACEUP_DEFENSE
......
VgF={}
vgf={}
function GetID()
local offset=self_code<100000000 and 1 or 100
return self_table,self_code,offset
end
function VgF.Stringid(code,id)
function vgf.Stringid(code,id)
return code*16+id
end
function VgF.SequenceToGlobal(p,loc,seq)
function vgf.SequenceToGlobal(p,loc,seq)
if p~=0 and p~=1 then
return 0
end
......@@ -27,17 +27,17 @@ function VgF.SequenceToGlobal(p,loc,seq)
return 0
end
end
function VgF.True()
function vgf.True()
return true
end
function VgF.Next(g)
function vgf.Next(g)
local first=true
return function()
if first then first=false return g:GetFirst()
else return g:GetNext() end
end
end
function VgF.GetValueType(v)
function vgf.GetValueType(v)
local t=type(v)
if t=="userdata" then
local mt=getmetatable(v)
......@@ -46,11 +46,11 @@ function VgF.GetValueType(v)
else return "Card" end
else return t end
end
function VgF.ReturnCard(g)
function vgf.ReturnCard(g)
local tc
if VgF.GetValueType(g)=="Group" then
if vgf.GetValueType(g)=="Group" then
tc=g:GetFirst()
elseif VgF.GetValueType(g)=="Card" then
elseif vgf.GetValueType(g)=="Card" then
tc=g
end
return tc
......@@ -74,19 +74,19 @@ end
function bit.bnot(a)
return ~a
end
function VgF.VMonsterFilter(c)
return VgF.IsSequence(c,5)
function vgf.VMonsterFilter(c)
return vgf.IsSequence(c,5)
end
function VgF.RMonsterFilter(c)
function vgf.RMonsterFilter(c)
return c:GetSequence()<5
end
function VgF.RMonsterCondition(e,c)
return VgF.RMonsterFilter(e:GetHandler())
function vgf.RMonsterCondition(e,c)
return vgf.RMonsterFilter(e:GetHandler())
end
function VgF.VMonsterCondition(e,c)
return VgF.VMonsterFilter(e:GetHandler())
function vgf.VMonsterCondition(e,c)
return vgf.VMonsterFilter(e:GetHandler())
end
function VgF.IsSequence(c,...)
function vgf.IsSequence(c,...)
for i,v in ipairs{...} do
if c:GetSequence()==v then
return true
......@@ -94,78 +94,78 @@ function VgF.IsSequence(c,...)
end
return false
end
function VgF.RuleCardCondtion(e)
function vgf.RuleCardCondtion(e)
local tp=e:GetHandlerPlayer()
local g=Duel.GetMatchingGroup(nil,tp,LOCATION_ALL,0,nil)
return e:GetHandler()==g:GetFirst()
end
function VgF.RuleTurnCondtion(e)
function vgf.RuleTurnCondtion(e)
local tp=e:GetHandlerPlayer()
local a=Duel.GetTurnCount(tp)
local b=Duel.GetTurnCount(1-tp)
return a+b==1
end
function VgF.Not(c,f)
function vgf.Not(c,f)
return not f(c)
end
function VgF.GetColumnGroup(c)
function vgf.GetColumnGroup(c)
local tp=c:GetControler()
local g=Group.CreateGroup()
if c:GetSequence()==0 then
local sg1=Duel.GetMatchingGroup(VgF.IsSequence,tp,LOCATION_MZONE,0,nil,1)
local sg2=Duel.GetMatchingGroup(VgF.IsSequence,tp,0,LOCATION_MZONE,nil,3,4)
local sg1=Duel.GetMatchingGroup(vgf.IsSequence,tp,LOCATION_MZONE,0,nil,1)
local sg2=Duel.GetMatchingGroup(vgf.IsSequence,tp,0,LOCATION_MZONE,nil,3,4)
if sg1 then g:Merge(sg1) end
if sg2 then g:Merge(sg2) end
end
if c:GetSequence()==1 then
local sg1=Duel.GetMatchingGroup(VgF.IsSequence,tp,LOCATION_MZONE,0,nil,0)
local sg2=Duel.GetMatchingGroup(VgF.IsSequence,tp,0,LOCATION_MZONE,nil,3,4)
local sg1=Duel.GetMatchingGroup(vgf.IsSequence,tp,LOCATION_MZONE,0,nil,0)
local sg2=Duel.GetMatchingGroup(vgf.IsSequence,tp,0,LOCATION_MZONE,nil,3,4)
if sg1 then g:Merge(sg1) end
if sg2 then g:Merge(sg2) end
end
if c:GetSequence()==2 then
local sg1=Duel.GetMatchingGroup(VgF.IsSequence,tp,LOCATION_MZONE,0,nil,5)
local sg2=Duel.GetMatchingGroup(VgF.IsSequence,tp,0,LOCATION_MZONE,nil,2,5)
local sg1=Duel.GetMatchingGroup(vgf.IsSequence,tp,LOCATION_MZONE,0,nil,5)
local sg2=Duel.GetMatchingGroup(vgf.IsSequence,tp,0,LOCATION_MZONE,nil,2,5)
if sg1 then g:Merge(sg1) end
if sg2 then g:Merge(sg2) end
end
if c:GetSequence()==3 then
local sg1=Duel.GetMatchingGroup(VgF.IsSequence,tp,LOCATION_MZONE,0,nil,4)
local sg2=Duel.GetMatchingGroup(VgF.IsSequence,tp,0,LOCATION_MZONE,nil,0,1)
local sg1=Duel.GetMatchingGroup(vgf.IsSequence,tp,LOCATION_MZONE,0,nil,4)
local sg2=Duel.GetMatchingGroup(vgf.IsSequence,tp,0,LOCATION_MZONE,nil,0,1)
if sg1 then g:Merge(sg1) end
if sg2 then g:Merge(sg2) end
end
if c:GetSequence()==4 then
local sg1=Duel.GetMatchingGroup(VgF.IsSequence,tp,LOCATION_MZONE,0,nil,3)
local sg2=Duel.GetMatchingGroup(VgF.IsSequence,tp,0,LOCATION_MZONE,nil,0,1)
local sg1=Duel.GetMatchingGroup(vgf.IsSequence,tp,LOCATION_MZONE,0,nil,3)
local sg2=Duel.GetMatchingGroup(vgf.IsSequence,tp,0,LOCATION_MZONE,nil,0,1)
if sg1 then g:Merge(sg1) end
if sg2 then g:Merge(sg2) end
end
if c:GetSequence()==5 then
local sg1=Duel.GetMatchingGroup(VgF.IsSequence,tp,LOCATION_MZONE,0,nil,2)
local sg2=Duel.GetMatchingGroup(VgF.IsSequence,tp,0,LOCATION_MZONE,nil,2,5)
local sg1=Duel.GetMatchingGroup(vgf.IsSequence,tp,LOCATION_MZONE,0,nil,2)
local sg2=Duel.GetMatchingGroup(vgf.IsSequence,tp,0,LOCATION_MZONE,nil,2,5)
if sg1 then g:Merge(sg1) end
if sg2 then g:Merge(sg2) end
end
return g
end
function VgF.Call(g,sumtype,sp,zone)
function vgf.Call(g,sumtype,sp,zone)
if not zone then zone=0x7f end
return Duel.SpecialSummon(g,sumtype,sp,sp,true,true,POS_FACEUP_ATTACK,zone)
end
function VgF.LvCondition(e)
function vgf.LvCondition(e)
local c=e:GetHandler()
local tp=c:GetControler()
local lv=c:GetLevel()
return Duel.IsExistingMatchingCard(VgF.LvConditionFilter,tp,LOCATION_MZONE,0,1,nil,lv)
return Duel.IsExistingMatchingCard(vgf.LvConditionFilter,tp,LOCATION_MZONE,0,1,nil,lv)
end
function VgF.LvConditionFilter(c,lv)
return VgF.VMonsterFilter(c) and c:IsLevelAbove(lv)
function vgf.LvConditionFilter(c,lv)
return vgf.VMonsterFilter(c) and c:IsLevelAbove(lv)
end
function VgF.AtkUp(c,g,val,reset)
function vgf.AtkUp(c,g,val,reset)
if not c or not g then return end
if not reset then reset=RESET_PHASE+PHASE_END end
local tc=VgF.ReturnCard(g)
local tc=vgf.ReturnCard(g)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
......@@ -173,10 +173,10 @@ function VgF.AtkUp(c,g,val,reset)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+reset)
tc:RegisterEffect(e1)
end
function VgF.StarUp(c,g,val,reset)
function vgf.StarUp(c,g,val,reset)
if not c or not g then return end
if not reset then reset=RESET_PHASE+PHASE_END end
local tc=VgF.ReturnCard(g)
local tc=vgf.ReturnCard(g)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_LSCALE)
......@@ -189,7 +189,7 @@ function VgF.StarUp(c,g,val,reset)
e2:SetCode(EFFECT_UPDATE_RSCALE)
tc:RegisterEffect(e2)
end
function VgF.IsAbleToGZone(c)
function vgf.IsAbleToGZone(c)
if c:IsLocation(LOCATION_MZONE) then
return c:IsAttribute(SKILL_BLOCK)
end
......
--
local cm,m,o=GetID()
function cm.initial_effect(c)
VgD.Rule(c)
VgD.RideUp(c)
VgD.CallToR(c)
VgD.MonsterBattle(c)
VgD.CardTrigger(c,nil)
vgd.Rule(c)
vgd.RideUp(c)
vgd.CallToR(c)
vgd.MonsterBattle(c)
vgd.CardTrigger(c,nil)
end
\ No newline at end of file
--
local cm,m,o=GetID()
function cm.initial_effect(c)
VgD.Rule(c)
VgD.RideUp(c)
VgD.CallToR(c)
VgD.MonsterBattle(c)
VgD.CardTrigger(c,nil)
vgd.Rule(c)
vgd.RideUp(c)
vgd.CallToR(c)
vgd.MonsterBattle(c)
vgd.CardTrigger(c,nil)
end
\ No newline at end of file
--
local cm,m,o=GetID()
function cm.initial_effect(c)
VgD.Rule(c)
VgD.RideUp(c)
VgD.CallToR(c)
VgD.MonsterBattle(c)
VgD.CardTrigger(c,nil)
vgd.Rule(c)
vgd.RideUp(c)
vgd.CallToR(c)
vgd.MonsterBattle(c)
vgd.CardTrigger(c,nil)
end
\ No newline at end of file
--
local cm,m,o=GetID()
function cm.initial_effect(c)
VgD.Rule(c)
VgD.RideUp(c)
VgD.CallToR(c)
VgD.MonsterBattle(c)
VgD.CardTrigger(c,nil)
vgd.Rule(c)
vgd.RideUp(c)
vgd.CallToR(c)
vgd.MonsterBattle(c)
vgd.CardTrigger(c,nil)
end
\ No newline at end of file
--
local cm,m,o=GetID()
function cm.initial_effect(c)
VgD.Rule(c)
VgD.RideUp(c)
VgD.CallToR(c)
VgD.MonsterBattle(c)
VgD.CardTrigger(c,nil)
vgd.Rule(c)
vgd.RideUp(c)
vgd.CallToR(c)
vgd.MonsterBattle(c)
vgd.CardTrigger(c,nil)
end
\ No newline at end of file
--
local cm,m,o=GetID()
function cm.initial_effect(c)
VgD.Rule(c)
VgD.RideUp(c)
VgD.CallToR(c)
VgD.MonsterBattle(c)
VgD.CardTrigger(c,nil)
vgd.Rule(c)
vgd.RideUp(c)
vgd.CallToR(c)
vgd.MonsterBattle(c)
vgd.CardTrigger(c,nil)
end
\ No newline at end of file
--
local cm,m,o=GetID()
function cm.initial_effect(c)
VgD.Rule(c)
VgD.RideUp(c)
VgD.CallToR(c)
VgD.MonsterBattle(c)
VgD.CardTrigger(c,nil)
vgd.Rule(c)
vgd.RideUp(c)
vgd.CallToR(c)
vgd.MonsterBattle(c)
vgd.CardTrigger(c,nil)
end
\ No newline at end of file
--
local cm,m,o=GetID()
function cm.initial_effect(c)
VgD.Rule(c)
VgD.RideUp(c)
VgD.CallToR(c)
VgD.MonsterBattle(c)
VgD.CardTrigger(c,nil)
vgd.Rule(c)
vgd.RideUp(c)
vgd.CallToR(c)
vgd.MonsterBattle(c)
vgd.CardTrigger(c,nil)
end
\ No newline at end of file
--
local cm,m,o=GetID()
function cm.initial_effect(c)
VgD.Rule(c)
VgD.RideUp(c)
VgD.CallToR(c)
VgD.MonsterBattle(c)
VgD.CardTrigger(c,nil)
vgd.Rule(c)
vgd.RideUp(c)
vgd.CallToR(c)
vgd.MonsterBattle(c)
vgd.CardTrigger(c,nil)
end
\ No newline at end of file
--
local cm,m,o=GetID()
function cm.initial_effect(c)
VgD.Rule(c)
VgD.RideUp(c)
VgD.CallToR(c)
VgD.MonsterBattle(c)
VgD.CardTrigger(c,nil)
vgd.Rule(c)
vgd.RideUp(c)
vgd.CallToR(c)
vgd.MonsterBattle(c)
vgd.CardTrigger(c,nil)
end
\ No newline at end of file
--
local cm,m,o=GetID()
function cm.initial_effect(c)
VgD.Rule(c)
VgD.RideUp(c)
VgD.CallToR(c)
VgD.MonsterBattle(c)
VgD.CardTrigger(c,nil)
vgd.Rule(c)
vgd.RideUp(c)
vgd.CallToR(c)
vgd.MonsterBattle(c)
vgd.CardTrigger(c,nil)
end
\ No newline at end of file
--
local cm,m,o=GetID()
function cm.initial_effect(c)
VgD.Rule(c)
VgD.RideUp(c)
VgD.CallToR(c)
VgD.MonsterBattle(c)
VgD.CardTrigger(c,nil)
vgd.Rule(c)
vgd.RideUp(c)
vgd.CallToR(c)
vgd.MonsterBattle(c)
vgd.CardTrigger(c,nil)
end
\ No newline at end of file
--
local cm,m,o=GetID()
function cm.initial_effect(c)
VgD.Rule(c)
VgD.RideUp(c)
VgD.CallToR(c)
VgD.MonsterBattle(c)
VgD.CardTrigger(c,nil)
vgd.Rule(c)
vgd.RideUp(c)
vgd.CallToR(c)
vgd.MonsterBattle(c)
vgd.CardTrigger(c,nil)
end
\ No newline at end of file
--
local cm,m,o=GetID()
function cm.initial_effect(c)
VgD.Rule(c)
VgD.RideUp(c)
VgD.CallToR(c)
VgD.MonsterBattle(c)
VgD.CardTrigger(c,nil)
vgd.Rule(c)
vgd.RideUp(c)
vgd.CallToR(c)
vgd.MonsterBattle(c)
vgd.CardTrigger(c,nil)
end
\ No newline at end of file
--
local cm,m,o=GetID()
function cm.initial_effect(c)
VgD.Rule(c)
VgD.RideUp(c)
VgD.CardTrigger(c,nil)
VgD.SpellActivate(c,m,cm.op)
vgd.Rule(c)
vgd.RideUp(c)
vgd.CardTrigger(c,nil)
vgd.SpellActivate(c,m,cm.op)
end
function cm.op(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
......
--
local cm,m,o=GetID()
function cm.initial_effect(c)
VgD.Rule(c)
VgD.RideUp(c)
VgD.CardTrigger(c,nil)
VgD.SpellActivate(c,m,nil,cm.op,0,1)
vgd.Rule(c)
vgd.RideUp(c)
vgd.CardTrigger(c,nil)
vgd.SpellActivate(c,m,nil,cm.op,0,1)
end
function cm.op(e,tp,eg,ep,ev,re,r,rp)
......
--能量发生器
local cm,m,o=GetID()
function cm.initial_effect(c)
VgD.Rule(c)
vgd.Rule(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_DELAY)
......
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