Скрипт работает только с экипажем игроков, ботов не сажать.
Даёт очки экипажу кроме пассажиров
контролирует и начисляет очки сервер, у клиентов файл незапускать
сначала сервер даёт выбранной технике обработчик "GetIn" , можно списком по именам
например
Code
if ! isServer exitWith {};
{
_x addEventHandler ["GetIn", {as = _this ExecVM "File.sqf"}];
} forEach [Trac1, Tank1, Tank2, Hamm1];
текст для файла "File.sqf"
Code
private ["_ob","_of", "_cr","_sc","_tx","_a"];
_ob = _this select 0;
if (count crew _ob != 2) exitWith {};
WaitUntil {
_of = _ob call {
if (isNull (_this turretUnit [0,0])) then {
if (isNull (_this turretUnit [0])) then {
if !(isNull (_this turretUnit [0,1])) then {_this turretUnit [0,1]}
} else {_this turretUnit [0]}
} else {_this turretUnit [0,0]}
};
_cr = crew _ob;
_tx = str _cr;
_cr = _cr - (assignedCargo _ob) - [_of];
_sc = score _of;
WaitUntil {
if (_sc != score _of) then {
_a = (score _of) - _sc;
{_x addScore _a} forEach _cr;
_sc = score _of};
sleep 0.1;
_tx != str(crew _ob)
};
count crew _ob < 2
};
Автор - Slon