Скрипт Поиск техники по ключу

на ру48 так 

покапайся в его файле миссии

Да уже сам написал=)

 Если кому надо забирайте:

 

 

//Floor - округление в меньшую сторону

//Делил на 100 тк выводит в админских координатах

//152 - floor...  тк точка координат отсчета у игроков и системы различаются

//для игроков начало - левый верхний угол, для системы левый нижний

//152 для чернорашки

 

_xxx = floor((_targetPosition select 0)/100);

_yyy = 152 - floor((_targetPosition select 1)/100);

 

if (_found != 0) then {

     _vehicleName = gettext (configFile >> "CfgVehicles" >> (typeof _targetVehicle) >> "displayName");

     systemChat format ["По ключу %1 найдена техника %2, последний раз была замечена: %3/%4",_keyName,_vehicleName,_xxx,_yyy];

} else {

     systemChat format ["Техника соответствующая ключу %1 была уничтожена",_keyName];

};

 

Да уже сам написал=)

 Если кому надо забирайте:

 

 

//Floor - округление в меньшую сторону

//Делил на 100 тк выводит в админских координатах

//152 - floor...  тк точка координат отсчета у игроков и системы различаются

//для игроков начало - левый верхний угол, для системы левый нижний

//152 для чернорашки

 

_xxx = floor((_targetPosition select 0)/100);

_yyy = 152 - floor((_targetPosition select 1)/100);

 

if (_found != 0) then {

     _vehicleName = gettext (configFile >> "CfgVehicles" >> (typeof _targetVehicle) >> "displayName");

     systemChat format ["По ключу %1 найдена техника %2, последний раз была замечена: %3/%4",_keyName,_vehicleName,_xxx,_yyy];

} else {

     systemChat format ["Техника соответствующая ключу %1 была уничтожена",_keyName];

};

 

Выложи полный скрипт если не сложно 

виталик это и есть полный)))

виталик это и есть полный)))

да ну не может быть 

да точно быть не может

Выложи полный скрипт если не сложно 

Держи

 

private ["_inv","_searchString","_ID","_found","_targetColor","_finalID","_targetPosition","_targetVehicle","_count","_key","_keyName","_xxx","_yyy"];

_inv = [player] call BIS_fnc_invString;

_keyColor = [];

_keyID = [];

_removedID = [];

_count = 0;

closedialog 0;

{

for "_i" from 1 to 2500 do {

_searchString = format ["ItemKey%1%2",_x,str(_i)];

if ((_searchString in _inv)) then {

_count = _count + 1;

_targetColor = _x;

_keyColor = _keyColor + [_targetColor];

_ID = str(_i);

_ID = parseNumber _ID;

if (_targetColor == "Green") then { _finalID = _ID; };

if (_targetColor == "Red") then { _finalID = _ID + 2500; };

if (_targetColor == "Blue") then { _finalID = _ID + 5000; };

if (_targetColor == "Yellow") then { _finalID = _ID + 7500; };

if (_targetColor == "Black") then { _finalID = _ID + 10000; };

_keyID = _keyID + [_finalID];

_removedID = _removedID + [_ID];

};

};

} forEach ["Black","Yellow","Blue","Green","Red"];

 

if (_count >= 0) then {

systemChat format ["Такс... Нашел у тебя %1 ключей... Минуту, свяжусь со спутником",_count];

_count = _count - 1;

_i = 0;

for "_i" from 0 to _count do {

_finalID = _keyID select _i;

_ID = _removedID select _i;

_targetColor = _keyColor select _i;

_key = format["ItemKey%1%2",_targetColor,_ID];

_keyName = getText (configFile >> "CfgWeapons" >> _key >> "displayName");

_found = 0;

 

{

private ["_tID","_vehicle_type"];

_vehicle_type = typeOf _x;

_tID = parseNumber (_x getVariable ["CharacterID","0"]);

if ((_tID == _finalID) && ((_vehicle_type isKindOf "Air") || (_vehicle_type isKindOf "LandVehicle") || (_vehicle_type isKindOf "Ship"))) then {

_targetPosition = getPosATL _x;

_targetVehicle = _x;

_found = 1;

};

} forEach vehicles;

 

_xxx = floor((_targetPosition select 0)/100);

_yyy = 152 - floor((_targetPosition select 1)/100);

 

if (_found != 0) then {

_vehicleName = gettext (configFile >> "CfgVehicles" >> (typeof _targetVehicle) >> "displayName");

systemChat format ["По ключу %1 найдена техника %2, последний раз была замечена: %3/%4",_keyName,_vehicleName,_xxx,_yyy];

} else {

systemChat format ["Техника соответствующая ключу %1 была уничтожена",_keyName];

};

};

} else {

systemChat "И что я должен определять? Ключ гони!!";

};

 

Изменено 31 октября 2015 пользователем ZerG (история изменений)

Держи

 

private ["_inv","_searchString","_ID","_found","_targetColor","_finalID","_targetPosition","_targetVehicle","_count","_key","_keyName","_xxx","_yyy"];

_inv = [player] call BIS_fnc_invString;

_keyColor = [];

_keyID = [];

_removedID = [];

_count = 0;

closedialog 0;

{

for "_i" from 1 to 2500 do {

_searchString = format ["ItemKey%1%2",_x,str(_i)];

if ((_searchString in _inv)) then {

_count = _count + 1;

_targetColor = _x;

_keyColor = _keyColor + [_targetColor];

_ID = str(_i);

_ID = parseNumber _ID;

if (_targetColor == "Green") then { _finalID = _ID; };

if (_targetColor == "Red") then { _finalID = _ID + 2500; };

if (_targetColor == "Blue") then { _finalID = _ID + 5000; };

if (_targetColor == "Yellow") then { _finalID = _ID + 7500; };

if (_targetColor == "Black") then { _finalID = _ID + 10000; };

_keyID = _keyID + [_finalID];

_removedID = _removedID + [_ID];

};

};

} forEach ["Black","Yellow","Blue","Green","Red"];

 

if (_count >= 0) then {

systemChat format ["Такс... Нашел у тебя %1 ключей... Минуту, свяжусь со спутником",_count];

_count = _count - 1;

_i = 0;

for "_i" from 0 to _count do {

_finalID = _keyID select _i;

_ID = _removedID select _i;

_targetColor = _keyColor select _i;

_key = format["ItemKey%1%2",_targetColor,_ID];

_keyName = getText (configFile >> "CfgWeapons" >> _key >> "displayName");

_found = 0;

 

{

private ["_tID","_vehicle_type"];

_vehicle_type = typeOf _x;

_tID = parseNumber (_x getVariable ["CharacterID","0"]);

if ((_tID == _finalID) && ((_vehicle_type isKindOf "Air") || (_vehicle_type isKindOf "LandVehicle") || (_vehicle_type isKindOf "Ship"))) then {

_targetPosition = getPosATL _x;

_targetVehicle = _x;

_found = 1;

};

} forEach vehicles;

 

_xxx = floor((_targetPosition select 0)/100);

_yyy = 152 - floor((_targetPosition select 1)/100);

 

if (_found != 0) then {

_vehicleName = gettext (configFile >> "CfgVehicles" >> (typeof _targetVehicle) >> "displayName");

systemChat format ["По ключу %1 найдена техника %2, последний раз была замечена: %3/%4",_keyName,_vehicleName,_xxx,_yyy];

} else {

systemChat format ["Техника соответствующая ключу %1 была уничтожена",_keyName];

};

};

} else {

systemChat "И что я должен определять? Ключ гони!!";

};

 

Спасибо 

if (_count >= 0) then {

лучше так:

if (_count > 0) then {

 

if (_count >= 0) then {

лучше так:

if (_count > 0) then {

А что измениться если изменить эту строчку?

более правильная проверка ключей.  Если больше 0 - то ищем, иначе говорим что нет ключа.

более правильная проверка ключей.  Если больше 0 - то ищем, иначе говорим что нет ключа.

Понятно спасибо

 

Удалял строки, не vehicle = []; не vehicle = vehicle; в AH.sqf увы нету, используется версия 3.1 с этого сайта

 

/* ************************Обновление за 08.03.15*********************************** */

/* **************Автор русификации и улучшений TheFirstNoob************************* */

/* ************************Сделано на базе AH342************************************ */

так ты все же решил проблему или нет ? если да, то как ?

максимум чего я добился- пишет и: \выкиньте ключ, техники нет\, и \найдено,проверьте карту.\одновременно - но на карте пусто

Изменено 6 ноября 2015 пользователем shturman (история изменений)

Как в новом инфистаре сделать,что бы работу скрипта видели все? а то работает только для админов,перепробовал все,в новом инфистаре половины нет того,что здесь описано. Спасибо.

Как в новом инфистаре сделать,что бы работу скрипта видели все? а то работает только для админов,перепробовал все,в новом инфистаре половины нет того,что здесь описано. Спасибо.

Я у себя вот так поставил может это и неправильно но работать начинает у игроков    _BHF =  false;

Ну так можно вообще весь античит выключить и все будет работать. Но это не выход...

Ну так можно вообще весь античит выключить и все будет работать. Но это не выход...

Перед тем как отключить это я несколько дней искал способы как сделать по другому,пробовал по гайду менять как написано,но не чего в итоге так и не получилось 

Я у себя вот так поставил может это и неправильно но работать начинает у игроков    _BHF =  false;

Да после отключения _BHF =  false; все работает и показывает,спасибо,а то я в коде ковырялся,а тут все просто оказывается,только вот какие последствия может повлечь за собой отключение этой функции?

Только у меня в клиентском логе ругается на строку 51?

} forEach vehicles;

_xxx = floor((_targetPosition select 0)/100);
_yyy = 152 - floor((_targetPosition select 1)/100);

на это, что необъявлена переменная _targetPosition, хотя явно в начале файла укказана приватная.

Ошибка в "3.Создать файл locate_vehlcle.sqf ..." vehicle вместо i стоит l  отредактируйте пожалуйста.

Вот объясните мне, почему не использовать mapGridPosition ?

 

Вместо этой части кода:

private ["_tID","_vehicle_type"];
_vehicle_type = typeOf _x;
_tID = parseNumber (_x getVariable ["CharacterID","0"]);
if ((_tID == _finalID) && ((_vehicle_type isKindOf "Air") || (_vehicle_type isKindOf "LandVehicle") || (_vehicle_type isKindOf "Ship"))) then {
_targetPosition = getPosATL _x;
_targetVehicle = _x;
_found = 1;
};
} forEach vehicles;

_xxx = floor((_targetPosition select 0)/100);
_yyy = 152 - floor((_targetPosition select 1)/100);

 

Использую эту:

private ["_tID","_vehicle_type"];
_vehicle_type = typeOf _x;
_tID = parseNumber (_x getVariable ["CharacterID","0"]);
if ((_tID == _finalID) && ((_vehicle_type isKindOf "Air") || (_vehicle_type isKindOf "LandVehicle") || (_vehicle_type isKindOf "Ship"))) then {
_targetPosition = mapGridPosition getPos _x;
_targetVehicle = _x;
_found = 1;
};
} forEach vehicles;

 

Для вывода информации:

if (_found != 0) then {
_vehicleName = gettext (configFile >> "CfgVehicles" >> (typeof _targetVehicle) >> "displayName");
systemChat format ["По ключу %1 найдена техника %2, координаты: %3",_keyName,_vehicleName,_targetPosition];
} else {
systemChat format ["Техника соответствующая ключу %1 была уничтожена",_keyName];
};

 

Выводит координаты в формате XXXYYY, т.е. 125075, 079104 и.т.д...

Но к сожалению только для админа, у игроков всегда пишет "Техника соответствующая ключу ...(1234) была уничтожена".

В AH.sqf нет строки vehicle = []; , что посоветуете?

 

UPD: небольшая правка, чтобы внести немного ясности - мне не нужно отображение маркеров на карте, достаточно текста в системном чате с названием и координатами, так интереснее и хардкорнее.

Судя по всему инфи блокирует запрос игрока в бд, где тот по CharacterID получает координаты транспорта для этого CharacterID. Где в AH.sqf можно посмотреть отвечающий за это код, подскажите пожалуйста.

Изменено 24 декабря 2015 пользователем Ramond (история изменений)

Что неужели никто не знает как инфистар на последней версии настроить?

Я вообще не пойму зачем на этот форум кидать нерабочие скрипты

http://rnrportal.ru/forum/index.php?/topic/282-%D0%BF%D0%BE%D0%B8%D1%81%D0%BA-%D1%82%D0%B5%D1%85%D0%BD%D0%B8%D0%BA%D0%B8-%D0%BF%D0%BE-%D0%BA%D0%BB%D1%8E%D1%87%D1%83-%D0%B8%D0%B7%D0%BC%D0%B5%D0%BD%D0%B5%D0%BD%D0%BD%D1%8B%D0%B9/

Тут брал рабочий. С инфистаром дружит.

Народ, ставлю этот скрипт и вот этот(единый замок). Все работает, но когда 2 и более единиц техники привязаны на 1 ключ и игрок ищет технику, то находит только 1 из, а другие нет. Подскажите что и где подправить надо?

Народ, ставлю этот скрипт и вот этот(единый замок).

Вот этот, вот тот.........

 

Ну тогда лови ответ - Вот ТАМ пропиши вместо - exitWith - then