#1 28-09-2010 09:43

Amaimon
From: Yakutsk
Registered: 20-03-2009
Posts: 11

[SA|WIP] Rhino support soldier

При наборе 6 звезд на танках будут появляться солдаты, стреляющие по Вам из M4. Идея не нова, так что если изобретаю велосипед просьба простить smile

Собственно почему WIP. На данный момент заметил две проблемы:
1) После смерти актера, новый актер создается почти мгновенно. Если это убрать, то было бы идеально. Помнится, где то был тред как не натыкаться на одну и ту же машину по нескольку раз. Поиск результатов не принес. Видимо потерли.
2) оффсет. Я использую нестандартную модель танка, так что могут быть некоторые несущественные различия:) когда поставлю модель оригинальную, сделаю отдельный кусок кода для оригинальной модели. Пока что оффсет можно вычислить экспериментальным путем:)

От загрузки модели #M4 было решено отказаться. Ошибок не наблюдал.

{$CLEO}

thread 'ro'

0000: NOP

:ro
wait 250
if
player.Defined($player_char)
jf @ro
if
Player.WantedLevel($PLAYER_CHAR) > 5
jf @ro
model.Load(#ARMY)
038B: load_requested_models

:ro2
wait 500
if and
model.Available(#ARMY)
jf @ro2
04C4: store_coords_to 1@ 2@ 3@ from_actor $PLAYER_ACTOR with_offset 60.0 60.0 0.0 
04C4: store_coords_to 4@ 5@ 6@ from_actor $PLAYER_ACTOR with_offset -60.0 -60.0 0.0 
7@ = -1 
053E: 7@ = get_random_car_with_model -1 in_rectangle_cornerA 1@ 2@ cornerB 4@ 5@ 
if 
not 7@ == -1
jf @ro4
if
Car.Model(7@) == #RHINO
jf @ro4
8@ = Actor.Create(Cop, #ARMY, 0.0, 0.0, 0.0)
Actor.Health(8@) = 1000
Actor.Armour(8@) = 150
087E: set_actor 8@ weapon_droppable 0 
Actor.WeaponAccuracy(8@) = 95
0464: put_actor 8@ into_turret_on_car 7@ at_car_offset 0.0 0.0 2.7 position 0 shooting_angle_limit 360.0 with_weapon 31
0350: set_actor 8@ maintain_position_when_attacked 1 
05E2: AS_actor 8@ kill_actor $PLAYER_ACTOR 

:ro3
wait 250
if or
810F:   not player $PLAYER_CHAR wanted_level > 5
actor.Dead($PLAYER_ACTOR)
actor.Dead(8@)
car.Wrecked(7@)
jf @ro3
actor.RemoveReferences(8@)

:ro4
wait 250
car.RemoveReferences(7@)
model.Destroy(#ARMY)
jump @ro

Готовый скрипт и исходник к нему в архиве.

Last edited by Amaimon (30-09-2010 12:20)


Эпитафия на могиле фидошника: "Меня видно?"

Offline

Board footer

Powered by FluxBB