SannyBuilder.com Forums

Amaimon

From: Yakutsk

Registered: 20-03-2009

Posts: 11

[SA|WIP] Rhino support soldier

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

Собственно почему 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)

---

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