Полиция использует шипы v1.2
...если уровень розыска > 2
:SHIPI
wait 250
if
Player.Defined($PLAYER_CHAR)
else_jump @SHIPI
if
Actor.Driving($PLAYER_ACTOR)
else_jump @SHIPI
if and
84C8: not actor $PLAYER_ACTOR driving_flying_vehicle
84A9: not actor $PLAYER_ACTOR driving_helicopter
84A7: not actor $PLAYER_ACTOR driving_boat
89AE: not actor $PLAYER_ACTOR driving_train
else_jump @SHIPI
if
010F: player $PLAYER_CHAR wanted_level > 2
jf @SHIPI
03C0: 5@ = actor $PLAYER_ACTOR car
if and
not Car.Id(5@) == #BMX
not Car.Id(5@) == #BIKE
not Car.Id(5@) == #MTBIKE
jf @SHIPI11
#TEMP_STINGER2.Load
while not #TEMP_STINGER2.Available
wait 0
end
var
$ship: array 10 of object
$plspeed : float
end
jump @SHIPI4
:SHIPI4
wait 0
if
Player.Defined($PLAYER_CHAR)
jf @SHIPI10
if and
Actor.Driving($PLAYER_ACTOR)
010F: player $PLAYER_CHAR wanted_level > 2
else_jump @SHIPI10
if
83CA: not object $ship[1] exists
then
gosub @SHIPI1
else
if
8474: not actor $PLAYER_ACTOR near_object_in_cube $ship[1] radius 190.0 190.0 40.0 flag 0
then
object.Destroy($ship[1])
object.Destroy($ship[2])
object.Destroy($ship[3])
end
end
if
83CA: not object $ship[4] exists
then
gosub @SHIPI2
else
if
8474: not actor $PLAYER_ACTOR near_object_in_cube $ship[4] radius 190.0 190.0 40.0 flag 0
then
object.Destroy($ship[4])
object.Destroy($ship[5])
object.Destroy($ship[6])
end
end
if
83CA: not object $ship[7] exists
then
gosub @SHIPI3
else
if
8474: not actor $PLAYER_ACTOR near_object_in_cube $ship[7] radius 190.0 190.0 40.0 flag 0
then
object.Destroy($ship[7])
object.Destroy($ship[8])
object.Destroy($ship[9])
end
end
for $nu = 1 to 9
if
03CA: object $ship[$nu] exists
then
0400: create_coordinate 7@ 8@ 9@ from_object $ship[$nu] offset -0.5 2.5 0.0
0400: create_coordinate 9@ 10@ 11@ from_object $ship[$nu] offset -0.5 -2.5 0.0
if
05F8: (unknown) $PLAYER_ACTOR 7@ 8@ 9@ 10@ 1.0 0
then
if
8496: not tire 2 on_car 5@ deflated
jf @SHIPI_1
04FE: deflate_tire 2 on_car 5@
:SHIPI_1
if
8496: not tire 0 on_car 5@ deflated
jf @SHIPI_2
04FE: deflate_tire 0 on_car 5@
:SHIPI_2
if
8496: not tire 1 on_car 5@ deflated
jf @SHIPI_3
04FE: deflate_tire 1 on_car 5@
:SHIPI_3
if
8496: not tire 3 on_car 5@ deflated
jf @SHIPI_4
04FE: deflate_tire 3 on_car 5@
end
:SHIPI_4
09C0: 11@ = get_random_car_in_area 7@ 8@ 9@ 10@ 1.0 with_actor_type -1
if
not Car.Wrecked(11@)
jf @SHIPI_8
if
8496: not tire 2 on_car 11@ deflated
jf @SHIPI_5
04FE: deflate_tire 2 on_car 11@
:SHIPI_5
if
8496: not tire 0 on_car 11@ deflated
jf @SHIPI_6
04FE: deflate_tire 0 on_car 11@
:SHIPI_6
if
8496: not tire 1 on_car 11@ deflated
jf @SHIPI_7
04FE: deflate_tire 1 on_car 11@
:SHIPI_7
if
8496: not tire 3 on_car 11@ deflated
jf @SHIPI_8
04FE: deflate_tire 3 on_car 11@
:SHIPI_8
end
end
jump @SHIPI4
:SHIPI10
for $nu = 1 to 9
if
03CA: object $ship[$nu] exists
then
object.RemoveReferences($ship[$nu])
end
end
Model.Destroy(#TEMP_STINGER2)
:SHIPI11
Car.RemoveReferences(5@)
jump @SHIPI
Nikitos end.
1178 Прочтений • [Полиция использует шипы v1.2] [13.05.2012] [Комментариев: 0]