:SignalProverka
wait 0
if and
actor.Driving($PLAYER_ACTOR)
847E: NOT player $PLAYER_CHAR driving a motorbike
84AB: not actor $PLAYER_ACTOR driving_plane
84A7: not actor $PLAYER_ACTOR driving_boat
84A9: not actor $PLAYER_ACTOR driving_helicopter
jf @SignalProverka
0002: jump @Signal

:Signal
wait 0
03C0: $PLAYERCAR = actor $PLAYER_ACTOR car

:Signal2
wait 0
if
8448: not actor $PLAYER_ACTOR in_car $PLAYERCAR
jf @Signal2
0002: jump @Signal3

:Signal3
wait 3000
067F: set_car $PLAYERCAR headlights 2
car.DoorStatus($PLAYERCAR) = 2
wait 500
067F: set_car $PLAYERCAR headlights 0

:Signal4
wait 0
if and
00E1: key_pressed 0 11
0202: actor $PLAYER_ACTOR near_car $PLAYERCAR radius 45.0 45.0 unknown 0
jf @Signal4
0002: jump @Signal5

:Signal5
wait 0
067F: set_car $PLAYERCAR headlights 2
car.DoorStatus($PLAYERCAR) = 0
wait 500
067F: set_car $PLAYERCAR headlights 0
0002: jump @SignalProverka