dagger/arma-3-scripts
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Ace Version

Browse Source
This commit is contained in:
mrpvtdagger 2021-02-22 21:31:26 -04:00
parent 26b15a8f57
commit f436866e13
2 changed files with 107 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

42
ACE_MPD_SlingLoad/init.sqf Normal file
View File

@ -0,0 +1,42 @@
/*
Simple Sling Load Script by MrPvTDagger#4176 :D
*/
diag_log "MPD_SlingLoad is Loading...";
/*
This is for Modded Objects that Might not be slingable by default. I have done this automtically but Just incase it doesn't work with all mods.
EXAMPLE:
_ccargo = [
RHS_Storage_Create_1,
RHS_Storage_Create_2,
RHS_Storage_Create_3 // Make sure the last one doesn't have a comment at the end
];
*/
_ccargo = [
];
// ====================== Don't Touch Anything Below this line ======================
_acargo = entities [[], ["Air","Man","Tank","Logic"], true];; // Maybe Better way of Doing This????
_acargo append _ccargo;
{
_action = [
"SlingLoad", // Action Name
"Sling Load", // Name Of action Shown In menu
"", // Icon
{[_target] execVM "MPD_SlingLoad\sling.sqf";}, // Statment
{(nearestObject [_target, "Helicopter"]) distance _target < 10}, // Condition
{}, //
[],
[0,0,0], 100] call ace_interact_menu_fnc_createAction;
[_x, 0, ["ACE_MainActions"], _action] call ace_interact_menu_fnc_addActionToObject;
} forEach _acargo;

65
ACE_MPD_SlingLoad/sling.sqf Normal file
View File

@ -0,0 +1,65 @@
[10, [_this select 0], {
private ["_cargo","_nObject","_pilot","_Rope1","_Rope2","_Rope3","_Rope4","_widthFactor","_lengthFactor","_centerOfMass","_bbr","_p1","_p2","_maxWidth","_widthOffset","_maxLength","_lengthOffset","_maxHeight","_heightOffset","_rearCorner","_rearCorner2","_frontCorner","_frontCorner2"];
_cargo = _args select 0;
_nObject = nearestObject [_cargo, "Helicopter"];
_pilot = currentPilot _nObject;
_cargo attachTo [_nObject, [0, 1.1, -7]];
removeAllActions _cargo;
/*
Credits for finding corners go to sethduda from Advanced Sling Loading
https://github.com/sethduda/
https://github.com/sethduda/AdvancedSlingLoading
*/
_widthFactor = 0.5;
_lengthFactor = 0.5;
if(_cargo isKindOf "Air") then {
_widthFactor = 0.3;
};
if(_cargo isKindOf "Helicopter") then {
_widthFactor = 0.2;
_lengthFactor = 0.45;
};
_centerOfMass = getCenterOfMass _cargo;
_bbr = boundingBoxReal _cargo;
_p1 = _bbr select 0;
_p2 = _bbr select 1;
_maxWidth = abs ((_p2 select 0) - (_p1 select 0));
_widthOffset = ((_maxWidth / 2) - abs ( _centerOfMass select 0 )) * _widthFactor;
_maxLength = abs ((_p2 select 1) - (_p1 select 1));
_lengthOffset = ((_maxLength / 2) - abs (_centerOfMass select 1 )) * _lengthFactor;
_maxHeight = abs ((_p2 select 2) - (_p1 select 2));
_heightOffset = _maxHeight/6;
_rearCorner = [(_centerOfMass select 0) + _widthOffset, (_centerOfMass select 1) - _lengthOffset, (_centerOfMass select 2)+_heightOffset];
_rearCorner2 = [(_centerOfMass select 0) - _widthOffset, (_centerOfMass select 1) - _lengthOffset, (_centerOfMass select 2)+_heightOffset];
_frontCorner = [(_centerOfMass select 0) + _widthOffset, (_centerOfMass select 1) + _lengthOffset, (_centerOfMass select 2)+_heightOffset];
_frontCorner2 = [(_centerOfMass select 0) - _widthOffset, (_centerOfMass select 1) + _lengthOffset, (_centerOfMass select 2)+_heightOffset];
_Rope1 = ropeCreate [_nObject, [0,1.1,-2], _heightOffset + (_cargo distance _nObject)];
_Rope2 = ropeCreate [_nObject, [0,1.1,-2], _heightOffset + (_cargo distance _nObject)];
_Rope3 = ropeCreate [_nObject, [0,1.1,-2], _heightOffset + (_cargo distance _nObject)];
_Rope4 = ropeCreate [_nObject, [0,1.1,-2], _heightOffset + (_cargo distance _nObject)];
[_cargo , _rearCorner, [0,0,-1]] ropeAttachTo (_Rope1);
[_cargo , _rearCorner2, [0,0,-1]] ropeAttachTo (_Rope2);
[_cargo , _frontCorner, [0,0,-1]] ropeAttachTo (_Rope3);
[_cargo , _frontCorner2, [0,0,-1]] ropeAttachTo (_Rope4);
_pilot addAction ["Release Cargo", {
private ["_heli","_cargoRopes"];
if !(isNull objectParent player) then {
_heli = (vehicle player);
_cargoRopes = ropes _heli;
{
ropeDestroy _x;
} forEach _cargoRopes;
{
detach _x;
[_x] execVM "MPD_SlingLoad\sling.sqf";
} forEach attachedObjects _heli;
};
removeAllActions player;
}];
}, {}, "Sling Loading..."] call ace_common_fnc_progressBar; //I was lazy...