Автодрайвер
Вкл. "num +", выкл "num -". Автодрайвер - альтернатива такси. Все что требуется от игрока - нажимать на развилках клавишу направления, куда он хотел бы ехать дальше (WASD) Все остальное сделает "автодрайвер":)
:DRIVER_23
wait 0
if
Player.Defined($PLAYER_CHAR)
jf @DRIVER_23
if and
00DF: actor $PLAYER_ACTOR driving
84A7: not actor $PLAYER_ACTOR driving_boat
84C8: not actor $PLAYER_ACTOR driving_flying_vehicle
89AE: not actor $PLAYER_ACTOR driving_train
80DD: not actor $PLAYER_ACTOR driving_car_with_model #BMX
80DD: not actor $PLAYER_ACTOR driving_car_with_model #BIKE
jf @DRIVER_23
if
80DD: not actor $PLAYER_ACTOR driving_car_with_model #MTBIKE
jf @DRIVER_23
0@ = 304482
&0(0@,1i) == 0x00FF0000
jf @DRIVER_23
03C0: $strat = actor $PLAYER_ACTOR car
0423: car $strat improve_handling 2.5
var
$ind : integer
$x_pos : float
$y_pos : float
$z_pos : float
$x_pos2 : float = 0.0
$y_pos2 : float = 0.0
$z_pos2 : float = 0.0
$offset : float = 0.0
end
Car.SetDriverBehaviour($strat, FollowRoad)
00AD: set_car $strat max_speed_to 50.0
00AE: unknown_set_car $strat to_ignore_traffic_lights 2
:DRIVER_45
wait 0
if
Player.Defined($PLAYER_CHAR)
jf @remove
if
00DB: actor $PLAYER_ACTOR in_car $strat
jf @remove
0@ = 304482
&0(0@,1i) 0xFF
jf @remove2
if
00E1: key_pressed 0 15 // âûõîä
then
0622: AS_unknown_remove_actor $PLAYER_ACTOR from_car $strat
jump @remove
end
0@ = 304534
&0(0@,1i) 0x00FF0000
jf @DRIVER_60
0@ = 304545
&0(0@,1i) 0x00FF0000
jf @DRIVER_50
0@ = 304543
&0(0@,1i) 0x00FF0000
jf @DRIVER_55
0@ = 304536
&0(0@,1i) 0xFF
jf @DRIVER_65
if
0100: actor $PLAYER_ACTOR near_point_in_car $x_pos2 $y_pos2 $z_pos2 radius 5.0 5.0 5.0 sphere 0
then
0687: clear_actor $PLAYER_ACTOR task
Car.SetDriverBehaviour($strat, FollowRoad)
marker.Disable($chekp)
end
jump @DRIVER_45
Vova
