{$CLEO .csa}

03A4: script_name 'ENGLCK_CAR' 

:KUNCICAR_11
0001: wait 10 ms 
00D6: if and
0256:   player $PLAYER_ACTOR defined 
0256:   player $PLAYER_CHAR defined 
004D: jump_if_false @KUNCICAR_11 
00D6: if 
00DF:   actor $PLAYER_ACTOR driving 
004D: jump_if_false @KUNCICAR_11 
03C0: $CJ = actor $PLAYER_ACTOR car 
004D: jump_if_false @KUNCICAR_11 
0001: wait 0 ms 
00D6: if
0A51:   is_widget_pressed 25 
004D: jump_if_false @KUNCICAR_11 
004D: jump_if_false @KUNCICAR_11 
0001: wait 0 ms 
020A: set_car $CJ door_status_to 4 
0918: set_car $CJ engine_operation 1 
0001: wait 1800 ms 
0002: jump @UNLOCK_12 

:UNLOCK_12
0001: wait 10 ms 
00D6: if and
00DF:   actor $PLAYER_ACTOR driving 
8118:   not actor $PLAYER_ACTOR dead 
004D: jump_if_false @UNLOCK_12 
00D6: if
0A53:   is_widget_doubletapped 25 
004D: jump_if_false @UNLOCK_12  
004D: jump_if_false @UNLOCK_12 
020A: set_car $CJ door_status_to 1 
0918: set_car $CJ engine_operation 0 
0001: wait 1500 ms 
0002: jump @end_00 

:end_00
0002: jump @KUNCICAR_11 