Подскажите пжалуста

Главная
Форум
Загрузка
ArmA ArmA II ArmA OA ArmA 3

ArmA ArmA II ArmA OA ArmA 3

ArmA ArmA II ArmA OA ArmA 3

ArmA ArmA II ArmA OA ArmA 3

ArmA ArmA II ArmA OA ArmA 3

ArmA ArmA II ArmA OA ArmA 3

ArmA ArmA II ArmA OA ArmA 3

ArmA ArmA II ArmA OA ArmA 3

ArmA ArmA II ArmA OA ArmA 3

ArmA ArmA II ArmA OA ArmA 3

ArmA ArmA II ArmA OA ArmA 3

ArmA ArmA II ArmA OA ArmA 3

ArmA ArmA II ArmA OA ArmA 3
Другие новости
- Военные новости
- Игровые новости

Страница 1 из 2 1 2 »
Модератор форума: СМЕРШ, Slon

Подскажите пжалуста

Agronom › Вторник › 15.01.2008 › 20:16 › Сообщение # 1

Рядовой

В увольнительной

Группа:: Пользователи

Сообщений:: 128

Сделал скрипт чтобы в пункте А появлялся вертолёт с пехотой летел в пункт Б,садился высаживал пехоту, пехота идёт в пункт С,а вертолёт возвращается в пункт А и удаляется. НО вертолёт прилетает и тупо висит в воздухе.
Почему? Подскажите кто знает.

Вот сам скрипт

****************************************************************************
_pozice = _this select 0
_pozice2 = _this select 1
_pozice3 = _this select 1

_heli = createVehicle ["Mi17_MG",getPos _pozice,[],0,"FLY"]
_heli setdir 90
_heli engineon true
_heli lock true

_pilot = createGroup (east)
"SoldierEPilot" createUnit [[1,1,1],_pilot]
(units _pilot select 0) moveInDriver _heli
(units _pilot select 0) setBehaviour "careless"
#Start

_para = createGroup (east)

"SquadleaderE" createUnit [[1,1,1], _para]
"TeamLeaderE" createUnit [[1,1,1], _para]
"SoldierEG" createUnit [[1,1,1], _para]
"SoldierEMG" createUnit [[1,1,1], _para]
"SoldierEAT" createUnit [[1,1,1], _para]
"TeamLeaderE" createUnit [[1,1,1], _para]
"SoldierEG" createUnit [[1,1,1], _para]
"SoldierEMG" createUnit [[1,1,1], _para]
"SoldierESniper" createUnit [[1,1,1], _para]

_side = side leader _para

Goto "Uni"

#uni

{_x moveincargo _heli} forEach (units _para)
{_x allowFleeing 0} forEach (units _para)
(driver _heli) commandMove getPos _pozice2
(driver _heli) doMove getPos _pozice2

@(_heli distance _pozice2 < 50)

(driver _heli) land "get out"
_aunits = units _para
_i = 0
_j = count _aunits

#Here
unassignvehicle (_aunits select _i)
_i=_i+1
~0.5
?_j>_i:goto "Here"

driver _heli commandMove getpos _pozice

leader _para move [(getpos _pozice3 select 0)+1,(getpos _pozice3 select 1)+1,0]

@_heli distance pozice3 <= 50
{deletevehicle _x} foreach (crew _heli)
deletevehicle _heli
***************************************************************************

P.S. А если сделать чтоб он выбрасывал десант то всё работает.

Сообщение отредактировал Agronom - Вторник, 15.01.2008, 20:17

RadriGO › Среда › 16.01.2008 › 00:18 › Сообщение # 2

Полковник

В увольнительной

Группа:: Пользователи

Сообщений:: 188

Agronom › Среда › 16.01.2008 › 04:46 › Сообщение # 3

Рядовой

В увольнительной

Группа:: Пользователи

Сообщений:: 128

RadriGO › Среда › 16.01.2008 › 13:52 › Сообщение # 4

Полковник

В увольнительной

Группа:: Пользователи

Сообщений:: 188

Agronom › Среда › 16.01.2008 › 14:06 › Сообщение # 5

Рядовой

В увольнительной

Группа:: Пользователи

Сообщений:: 128

RadriGO › Четверг › 17.01.2008 › 11:09 › Сообщение # 6

Полковник

В увольнительной

Группа:: Пользователи

Сообщений:: 188

Agronom › Четверг › 17.01.2008 › 19:18 › Сообщение # 7

Рядовой

В увольнительной

Группа:: Пользователи

Сообщений:: 128

СМЕРШ › Четверг › 17.01.2008 › 19:46 › Сообщение # 8

Генералиссимус

В увольнительной

Группа:: Пользователи

Сообщений:: 3013

Титул:

Iron Front – Liberation 1944

Agronom › Пятница › 18.01.2008 › 17:03 › Сообщение # 9

Рядовой

В увольнительной

Группа:: Пользователи

Сообщений:: 128

Вот исправленный вариант =) Всё работает happy

ещё раз повтарюсь что этот скрипт создаёт вертолёт в воздухе в позиции _pozice с группой пехоты внутри. Летит на точку _pozice2,садится выгружает пехоту,которая идёт в точку _pozice3,а сам вертолёт возращается на стартовую позицию (_pozice) и удаляется.

************************************************************************
_pozice = _this select 0
_pozice2 = _this select 1
_pozice3 = _this select 1

_heli = createVehicle ["mi17",getPos _pozice,[],0,"FLY"]
_heli setpos [(getPos _pozice select 0),(getpos _pozice select 1),+200]
_heli setdir 90
_heli engineon true
_heli lock true

_pilot = createGroup (east)
"SoldierEB" createUnit [[1,1,1],_pilot]
(units _pilot select 0) moveInDriver _heli
(units _pilot select 0) setBehaviour "careless"
(units _pilot select 0) allowFleeing 0
#Start

_para = createGroup (east)

Goto "Uni"

#uni

{_x moveincargo _heli} forEach (units _para)
{_x allowFleeing 0} forEach (units _para)
(driver _heli) commandMove getPos _pozice2
(driver _heli) doMove getPos _pozice2

@(_heli distance _pozice2 < 200)

_heli setspeedmode "LIMITED"
_heli land "get out"
_heli flyinheight 0

_aunits = units _para
_i = 0
_j = count _aunits

#Here
unassignvehicle (_aunits select _i)
_i=_i+1
~0.5
?_j>_i:goto "Here"

_heli flyinheight 50
_heli setspeedmode "NORMAL"
driver _heli commandMove getpos _pozice
leader _para move [(getpos _pozice3 select 0)+1,(getpos _pozice3 select 1)+1,0]

@_heli distance pozice3 <= 50
{deletevehicle _x} foreach (crew _heli)
deletevehicle _heli

*************************************************************************

s229 › Вторник › 04.01.2011 › 16:33 › Сообщение # 10