Matrix Games Forums

Code: Select all

gKH={}; --my personal global namespace prefix should use your own, suggest gXXXX where X are ascii chars.
 gKH.Util={}; -- sub namespaces that contains all my utility functions, though only one is included in this sample.
 gKH.SceneGlobals={};  -- sub namespace that usually hold all my scene-specific vars and constants. 
 -- Function: GetGlobalPostureData(paramTable)
 -- Params: paramTable is optional, if provided instead of returning a table it will populate the one you send it.
 -- Returns: a table of all side relations to each other indexed by string key side1_to_side2.

Code: Select all

function gKH.Util:GetGlobalPostureData(paramTable)
     local pTbl={}; pTbl["entrycount"] = 0;pTbl["sidecount"] = 0;
     local s = VP_GetSides();
 -- ipairs goes in numberical order if table is indexed with only sequencial number (otherwise it stops at first break in series);
 -- pairs goes in unspecified order but will work over everything no matter if # based indexes or not;
     for k,v in ipairs(s) do  --for each side
         for i,j in ipairs(s) do -- for each side again.. 
             if i ~= k then --skip if same side otherwise do this.
                 pTbl[v.name .. "_to_" .. j.name]= {posture = ScenEdit_GetSidePosture(v.name,j.name)};
                 pTbl["entrycount"] = pTbl["entrycount"] + 1;
             end
         end
                 pTbl["sidecount"] = pTbl["sidecount"] + 1;
     end
     if (paramTable ~=nil) and type(paramTable) == "Table" then
         paramTable = pTbl; return; --assumes incoming table is byref.
     end
     return pTbl;
 end

Code: Select all

-- Now access the function to build the full list and then store globally, 
 -- it only needs to be updated if a posture change event happens assuming you do it after you random posture assignments
 gKH.SceneGlobals.PostureData = gKH.Util:GetGlobalPostureData()
 -- Now lets say the following runs in some event later... or really for that matter even in your setup scripts after the above line ran.
 local pd = gKH.SceneGlobals.PostureData; create shortcut ref to it so we're not typing as much. 
 --print(pd);
 if pd["Russia_to_Civilian"].posture == 'F' then
  --do something here ..
 elseif pd["Azerbaijan_to_Civilian"].posture == 'H' then 
  --do other stuff here
 elseif pd["Downed Pilots_to_Azerbaijan"].posture == 'F' then 
 -- do other stuff here
 elseif pd["Downed Pilots_to_Azerbaijan"].posture == 'H' and pd["Civilian_to_Russia"].posture == 'H' then 
 -- do other stuff here
 else
  --- default else case here if you need.
 end

Code: Select all

local tbl1 = {[1]={someid=1,name="a"},[2]={someid=2,name="b"},[3]={someid=3,name="c"}}
 local tbl2 = {[1]={someid=1,name="a"},[3]={someid=2,name="b"},[4]={someid=3,name="c"}}
 local tbl3 = {["apples"]={someid=1,name="a"},["blueberries"]={someid=2,name="b"},["carrots"]={someid=3,name="c"}}
 print("--- using ipairs ---");
 -- This will print "3" and then each entry as expected and ALWAYS in order. 
     print(#tbl1); --get the built in count property of the table.
     for k,v in ipairs(tbl1) do
       print(v);
     end
 -- This will print "1" even though there are 3 entries, but because they are not numerically contiguous it's not correct.
 -- it will also only print the first entry for the same reason, it stops at the first break in the series. 
     print(#tbl2);
     for k,v in ipairs(tbl2) do
       print(v);
     end
 -- This will print "0" even though there are 3 entries, but because they are not numeric.
 -- it will print no entries at all because none are numeric indexes.
     print(#tbl3);
     for k,v in ipairs(tbl3) do
       print(v);
     end

Code: Select all

print("--- using pairs ---");
 -- This will print "3" and then each entry as expected but in ANY order, run it a 10 times and you'll probably see some out of order. 
     print(#tbl1); 
     for k,v in pairs(tbl1) do
       print(v);
     end
 -- This will print "1" even though there are 3 entries, but because they are not numerically contiguous it's not correct.
 -- it will print every entry however as expected but again, in any order. 
     print(#tbl2);
     for k,v in pairs(tbl2) do
       print(v);
     end
 -- This will print "0" even though there are 3 entries, but because they are not numeric.
 -- it will print every entry however as expected but again, in any order. 
     print(#tbl3);
     for k,v in pairs(tbl3) do
       print(v);
     end

Code: Select all

...
     for i=1,#s do  --for each side
         for j=1,#s do -- for each side again.. with new counter 
             if i ~= j then --skip if same side otherwise do this.
                 pTbl[s[i].name .. "_to_" .. s[j].name]= {posture = ScenEdit_GetSidePosture(s[i].name,s[j].name)};
  ...
 

Code: Select all

 local data = {} --test table.
 for i = 1,10000 do -- increase upward as you like this should be enough to show difference.
    data[#data + 1] = 1 --populate our data.
 end
 
 --speed tests do 100 iterations of running through the above sized table for each type.
 local start = os.clock() -- Start time
 for iteration = 1,100 do -- Iterate 100 times
    for i,v in ipairs(data) do local v1 = v; end -- ipairs
 end
 print("ipairs Result: " .. os.clock() - start .. " secs") -- Print duration
 
 local start = os.clock() -- Start time
 for iteration = 1,100 do -- Iterate 100 times
    for i,v in pairs(data) do local v1 = v; end -- pairs
 end
 print("pairs Result: " .. os.clock() - start .. " secs") -- Print duration
 
 local start = os.clock() -- Start time
 for iteration = 1,100 do -- Iterate 100 times
    for i = 1,#data do local v = data[i]; end  --direct index
 end
 print("direct counter Result: " .. os.clock() - start .." secs") -- Print duration