Added feature: select unit payload at spawn and visibility.

scripts/OlympusMission.lua

@@ -5,29 +5,86 @@ function Olympus.notify(message, displayFor)
 end
 
 function Olympus.setMissionData(arg, time)
+	local missionData = {}
+
+	-- Bullseye data
 	local bullseyeVec3 = coalition.getMainRefPoint(0)
 	local bullseyeLatitude, bullseyeLongitude, bullseyeAltitude = coord.LOtoLL(bullseyeVec3)
-	local command = "Olympus.missionData = " ..
-					"{" ..
-						"bullseye = {" .. 
-							"x = " .. bullseyeVec3.x .. "," ..
-							"y = " .. bullseyeVec3.z .. "," ..
-							"lat = " .. bullseyeLatitude .. "," ..
-							"lng = " .. bullseyeLongitude .. "," ..	 								
-						"}," ..
-					"}\n" ..
-					"Olympus.OlympusDLL.setMissionData()"
+	local bullseye = {}
+	bullseye["x"] =  bullseyeVec3.x
+	bullseye["y"] =  bullseyeVec3.z
+	bullseye["lat"] =  bullseyeLatitude
+	bullseye["lng"] =  bullseyeLongitude
 
-	for groupName, group in pairs(mist.DBs.groupsByName) do
-		if groupName and group then
-			local hasTask = Group.getByName(groupName):getController():hasTask()
-			Olympus.notify(groupName .. ": " .. tostring(hasTask), 2)
+	-- Units tactical data
+	-- TODO find some way to spread the load of getting this data (split)
+	local unitsData = {}
+	for groupName, gp in pairs(mist.DBs.groupsByName) do
+		if groupName ~= nil then
+			local group = Group.getByName(groupName)
+			if group ~= nil then
+				local controller = group:getController()
+				for index, unit in pairs(group:getUnits()) do
+					local table = {}
+					table["targets"] = {}
+					table["targets"]["visual"] = controller:getDetectedTargets(1)
+					table["targets"]["radar"] = controller:getDetectedTargets(4)
+					table["targets"]["rwr"] = controller:getDetectedTargets(16)
+					table["targets"]["other"] = controller:getDetectedTargets(2, 8, 32)
+					
+					table["ammo"] = unit:getAmmo()
+					table["fuel"] = unit:getFuel()
+					table["life"] = unit:getLife() / unit:getLife0()
+					unitsData[unit:getObjectID()] = table
+				end
+			end
 		end
 	end
-					  
+
+	-- Assemble missionData table
+	missionData["bullseye"] = bullseye
+	missionData["unitsData"] = unitsData 
+
+	local command = "Olympus.missionData = " .. Olympus.serializeTable(missionData) .. "\n" .. "Olympus.OlympusDLL.setMissionData()"
 	net.dostring_in("export", command)
 	return time + 5
 end
 
+function Olympus.serializeTable(val, name, skipnewlines, depth)
+    skipnewlines = skipnewlines or false
+    depth = depth or 0
+
+    local tmp = string.rep(" ", depth)
+
+
+    if name then 
+		if type(name) == "number" then
+			tmp = tmp .. "[" .. name .. "]" .. " = " 
+		else
+			tmp = tmp .. name  .. " = " 
+		end
+	end
+
+    if type(val) == "table" then
+        tmp = tmp .. "{" .. (not skipnewlines and "\n" or "")
+
+        for k, v in pairs(val) do
+            tmp =  tmp .. Olympus.serializeTable(v, k, skipnewlines, depth + 1) .. "," .. (not skipnewlines and "\n" or "")
+        end
+
+        tmp = tmp .. string.rep(" ", depth) .. "}"
+    elseif type(val) == "number" then
+        tmp = tmp .. tostring(val)
+    elseif type(val) == "string" then
+        tmp = tmp .. string.format("%q", val)
+    elseif type(val) == "boolean" then
+        tmp = tmp .. (val and "true" or "false")
+    else
+        tmp = tmp .. "\"[inserializeable datatype:" .. type(val) .. "]\""
+    end
+
+    return tmp
+end
+
 timer.scheduleFunction(Olympus.setMissionData, {}, timer.getTime() + 1)
 Olympus.notify("OlympusMission script loaded correctly", 10)