Исправление qulinxao3, (текущая версия) :
+n медитаций (енумерейты не нужно)
(function()
local base = CroApp.GetBank():GetVocabulary():GetBase("XX") if !base then return nil end
local v=0,rst = base.RecordSet if !rst then return nil end
rst:Sort{{field=5,descent=true},{field=7},{field=10}}
for rec in rst.Records do v = v + 1
arrSimpleConv[v] = {
Type = rec:GetValue(5),
LegName = rec:GetValue(10),
PickName = rec:GetValue(11),
FlagHierarch = tonumber(rec:GetValue(30)),
Rules = (function(B) local a={}
for i,p in ipairs(B) do a[i] = table.unserialize(p)end
return a end)(rec:GetValue(20, 0))
}
end
end)() Исправление qulinxao3, :
+1 медитация (енумерейты не нужно)
(function()
local base = CroApp.GetBank():GetVocabulary():GetBase("XX")
if !base then return nil end
local v=0,rst = base.RecordSet
if !rst then then return nil end
rst:Sort{
{field=5, descent=true, case=false},
{field=7, descent=false, case=false},
{field=10, descent=false, case=false}
}
for rec in rst.Records do
v = v + 1
arrSimpleConv[v] = {
Type = rec:GetValue(5),
LegName = rec:GetValue(10),
PickName = rec:GetValue(11),
FlagHierarch = tonumber(rec:GetValue(30)),
HyTable = nil,
Rules = (function(B) local a={}
for i,p in ipairs(B) do
a[i] = table.unserialize(p)
end
return a end)(rec:GetValue(20, 0))
}
end
end)() Исходная версия qulinxao3, :
+1 медитация (енумерейты не нужно)
(function()
local base = CroApp.GetBank():GetVocabulary():GetBase("XX")
if !base then return nil end
local v=0,rst = base.RecordSet
if !rst then then return nil end
rst:Sort{
{field=5, descent=true, case=false},
{field=7, descent=false, case=false},
{field=10, descent=false, case=false}
}
for rec in rst.Records do
v = v + 1
arrSimpleConv[v] = {
Type = rec:GetValue(5),
LegName = rec:GetValue(10),
PickName = rec:GetValue(11),
FlagHierarch = tonumber(rec:GetValue(30)),
HyTable = nil,
Rules = (function() local a={}
for i,p in ipairs(rec:GetValue(20, 0)) do
a[i] = table.unserialize(p)
end
return a end)()
}
end
end)()