I wrote this library to cut down on the number of tokens taken up by large tables with string data, e.g. for dialogue text/translations/etc. Most helpful if those tokens are using a lot of your tokens (i.e. more than 150), since the library itself takes up 139 tokens. But all your table declarations can be reduced to 5 tokens each!
Here's an example of what your code can look like.
Before:
my_table = {
hello='world',
nested={
some='data\'s nested',
inside_of='here'
},
'and',
'indexed',
'data',
{ as='well' }
} |
After:
function table_from_string(str)
local tab, is_key = {}, true
local key,val,is_on_key
local function reset()
key,val,is_on_key = '','',true
end
reset()
local i, len = 1, #str
while i <= len do
local char = sub(str, i, i)
-- token separator
if char == '\31' then
if is_on_key then
is_on_key = false
else
tab[tonum(key) or key] = val
reset()
end
-- subtable start
elseif char == '\29' then
local j,c = i,''
-- checking for subtable end character
while (c ~= '\30') do
j = j + 1
c = sub(str, j, j)
end
tab[tonum(key) or key] = table_from_string(sub(str,i+1,j-1))
reset()
i = j
else
if is_on_key then
key = key..char
else
val = val..char
end
end
i = i + 1
end
return tab
end
my_table=
table_from_string(
'1�and�2�indexed�3�data�4�as�well��hello�world�nested�inside_of�here�some�data\'s nested��'
) |
Clearly it's more helpful if your data table is much larger than this. In my case, my data tables took up almost 200 tokens, and I saved about 50 using this technique. If I go to add more translations in the future, it will save even more.
And no I wouldn't suggest keeping this compressed version as your only record of your data table, of course! For my own workflow, I am setting up an automated script to take my data table from a separate Lua file and periodically update the contents of the p8 file with the stringified version.
-- print out a table - for debug
function tableout(t,deep)
deep=deep or 0
local str=sub(" ",1,deep)
print(str.."table size: "..#t)
for k,v in pairs(t) do
if type(v)=="table" then
print(str..tostr(k).."[]")
tableout(v,deep+1)
else
print(str..tostr(k).." = "..tostr(v))
end
end
end
-- convert a string to a table
function str2table(str)
local out,s={}
add(out,{})
for l in all(split(str,"\n")) do
while ord(l)==9 or ord(l)==32 do
l=sub(l,2)
end
if l~="" then
s=split(l,"=")
if (#s==1) s[1]=#out[#out]+1 s[2]=l
if (s[2]=="{") s[2]={}
if s[2]=="}" then
deli(out)
else
out[#out][s[1]]=s[2]
if (type(s[2])=="table") add(out,s[2])
end
end
end
return out[1]
end
table2=str2table([[
hello=world
something
{
a=10
b=20
c=30
doda
{
doublenest
}
}
and
indexed
nestedkey={
something
}
]])
cls()
tableout(table2)
print("---") |
My Variant :)
It use a multi-line-String and a more lua-like syntax. So it is easier change- and readable. Disadvantage is, that it don't allow escape-sequenzes like \n \r.
[Please log in to post a comment]
