Commit 8eceac44 authored by linmeng's avatar linmeng

更新小写

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