{$CLEO .cs}
thread 'HELICAR'

:HELICAR_1
wait  0
if  
0256:   player $PLAYER_CHAR defined 
jf @HELICAR_1
if
0AB0:   key_pressed 17// 	ctrl key
jf @HELICAR_1
if
00DD:   actor $PLAYER_ACTOR driving_car_with_model #BUFFALO
jf @HELICAR_3
2@ = 488// 	vcnmav
gosub @HELICAR_5
jump @HELICAR_13


:HELICAR_3
if
00DD:   actor $PLAYER_ACTOR driving_car_with_model #vcnmav
jf @HELICAR_1
2@ = 402// 	buffalo
gosub @HELICAR_5
jump @HELICAR_13



:HELICAR_5
03C0: 0@ = actor $PLAYER_ACTOR car
00AA: store_car 0@ position_to 3@ 4@ 5@
0174: 6@ = car 0@ z_angle
03F3: get_vehicle 0@ color 7@ 8@

:HELICAR_7
wait 0
if
8248: not  model 2@ available
jf @HELICAR_9
0247: request_model 2@
jump @HELICAR_7

:HELICAR_9
0792: disembark_instantly_actor $PLAYER_ACTOR
00A6: destroy_car 0@
wait 0
00A5: 1@ = create_car 2@ at 3@ 4@ 5@
0175: set_car 1@ z_angle_to 6@
0229: set_car 1@ color_to 7@ 8@
036A: put_actor $PLAYER_ACTOR in_car 1@
01C3: remove_references_to_car 1@
return




:HELICAR_13
wait 0
if
0AB0:   key_pressed 17// 	ctrl key
jf @HELICAR_1
jump @HELICAR_13 