Merge pull request #64 from denjifb/feature/physical-properties-group

Add support for Physical Properties Group

Author: Fernando-A-Rocha

newmodels_azul/models/README.md

@@ -22,4 +22,5 @@ See the [example files](/newmodels_azul/models/) to visualize the structure of t
   - `dff=PATH_TO_DFF_FILE_INSIDE_models_FOLDER` (used for shared models)
   - `col=PATH_TO_COL_FILE_INSIDE_models_FOLDER` (used for shared collisions)
   - `lodDistance=NUMBER` (used for setting https://wiki.multitheftauto.com/wiki/EngineSetModelLODDistance)
+  - `physicalPropsGroup=GROUP_ID` (used for setting https://wiki.multitheftauto.com/wiki/EngineSetModelPhysicalPropertiesGroup)
   - `settings=PATH_TO_ANOTHER_SETTINGS_FILE_INSIDE_models_FOLDER` (in case you want to share the same settings between multiple models)

newmodels_azul/scripts/core/client_logic.lua

@@ -98,6 +98,11 @@ local function finishLoadCustomModel(customModel)
         engineSetModelLODDistance(allocatedModel, lodDistance)
     end
 
+    local physicalPropsGroup = customInfo.settings.physicalPropsGroup
+    if physicalPropsGroup then
+        engineSetModelPhysicalPropertiesGroup(allocatedModel, physicalPropsGroup)
+    end
+
     -- Set loadedModel info
     loadedModels[customModel] = {
         id = allocatedModel,
@@ -273,6 +278,7 @@ local function freeAllocatedModelNow(customModel)
         killTimer(loadedModel.freeAllocatedTimer)
     end
     engineResetModelLODDistance(loadedModel.id)
+    engineRestoreModelPhysicalPropertiesGroup(loadedModel.id)
     engineFreeModel(loadedModel.id)
 
     -- Destroy model elements unless used by another loaded model

newmodels_azul/scripts/core/server_logic.lua

@@ -40,6 +40,12 @@ local function parseModelSettings(customModel, customModelInfo, thisFullPath, is
                 return false, "invalid lodDistance value: " .. settingStr
             end
             customModelSettings.lodDistance = lodDistance
+        elseif stringStartswith(settingStr, "physicalPropsGroup=") then
+            local physicalPropsGroup = tonumber(settingStr:sub(20))
+            if not physicalPropsGroup then
+                return false, "invalid physicalPropsGroup value: " .. settingStr
+            end
+            customModelSettings.physicalPropsGroup = physicalPropsGroup
         elseif stringStartswith(settingStr, "settings=") then
             if isFromSettingsOption then -- prevent inception and recursion
                 return false, "settings option cannot point to a settings file that contains another settings option @ " .. thisFullPath