ヘリから、兵器投下用スクリプト

_heli = _this select 0;
_car = _this select 1;
_chute1 = createVehicle ["ParachuteC", _car, [], 20, 'NONE'];
_chute2 = createVehicle ["ParachuteC", _car, [], 20, 'NONE'];
_chute3 = createVehicle ["ParachuteC", _car, [], 20, 'NONE'];
_chute4 = createVehicle ["ParachuteC", _car, [], 20, 'NONE'];


#Update

_heliPos = getPos _heli;
_heliPosX = _heliPos select 0;
_heliPosY = _heliPos select 1;
_heliPosZ = _heliPos select 2;

_chute1Pos = getPos _chute1;
_chute1PosX = _chute1Pos select 0;
_chute1PosY = _chute1Pos select 1;
_chute1PosZ = _chute1Pos select 2;
_chute1 setPos [_chute1PosX, _chute1PosY, 300];

_chute2Pos = getPos _chute2;
_chute2PosX = _chute2Pos select 0;
_chute2PosY = _chute2Pos select 1;
_chute2PosZ = _chute2Pos select 2;
_chute2 setPos [_chute2PosX, _chute2PosY, 300];

_chute3Pos = getPos _chute3;
_chute3PosX = _chute3Pos select 0;
_chute3PosY = _chute3Pos select 1;
_chute3PosZ = _chute3Pos select 2;
_chute3 setPos [_chute3PosX, _chute3PosY, 300];

_chute4Pos = getPos _chute4;
_chute4PosX = _chute4Pos select 0;
_chute4PosY = _chute4Pos select 1;
_chute4PosZ = _chute4Pos select 2;
_chute4 setPos [_chute4PosX, _chute4PosY, 300];


_chuteNewPosZ = _heliPosZ - 10;
?(_chuteNewPosZ < 0) : _chuteNewPosZ = 0;

_car setPos [_heliPosX, _heliPosY, _chuteNewPosZ];
_heading = getDir _heli;
_car setDir _heading;
~0.01
? (release1 == 1) : goto "Drop"
goto "Update"


#Drop

_chute1 setDir _heading;
_chute2 setDir _heading;
_chute3 setDir _heading;
_chute4 setDir _heading;

~0.001

_carPos = getPos _car;
_carPosX = _carPos select 0;
_carPosY = _carPos select 1;
_carPosZ = _carPos select 2;

if (_heliPosZ > 10) then
{
_chute1 setPos [_carPosX + 1.5, _carPosY - 1.5, _heliPosZ - 18];
_chute2 setPos [_carPosX + 1.5, _carPosY + 1.5, _heliPosZ - 18];
_chute3 setPos [_carPosX - 1.5, _carPosY + 1.5, _heliPosZ - 18];
_chute4 setPos [_carPosX - 1.5, _carPosY - 1.5, _heliPosZ - 18];
};

#DropUpdate

_chute1Pos = getPos _chute1;
_chute1PosX = _chute1Pos select 0;
_chute1PosY = _chute1Pos select 1;
_chute1PosZ = _chute1Pos select 2;

_chuteNewPosZ = _chute1PosZ - 10;
?(_chuteNewPosZ < 0) : _chuteNewPosZ = 0;

_car setPos [_chute1PosX, _chute1PosY, _chuteNewPosZ];

_chute2 setPos [_chute1PosX, _chute1PosY + 3, _chute1PosZ];
_chute3 setPos [_chute1PosX - 3, _chute1PosY + 3, _chute1PosZ];
_chute4 setPos [_chute1PosX - 3, _chute1PosY, _chute1PosZ];

~0.01
? (_chute1PosZ > 3) : goto "DropUpdate"