thread 'MEDIC_CALL' 
$PLAYER_ACTOR = Actor.EmulateFromPlayer($PLAYER_CHAR)
wait 5 

:MEDIC_CALL_31
wait 100 
$ACTOR_HEALTH = Actor.Health($PLAYER_ACTOR)
if 
   not $ACTOR_HEALTH >= 30 
jf @MEDIC_CALL_31 
wait 5 
if and
0AB0:   key_pressed 9 
0AB0:   key_pressed 89 
jf @MEDIC_CALL_31 
Model.Load(#CELLPHONE)
Model.Load(#AMBULAN)
Model.Load(#LAEMT1)
wait 5 
0729: AS_actor $PLAYER_ACTOR hold_cellphone 1 
wait 2500 
00BC: show_text_highpriority GXT 'MED_1' time 1500 flag 1 
wait 1500 
00BC: show_text_highpriority GXT 'MED_2' time 2000 flag 1 
wait 2000 
00BC: show_text_highpriority GXT 'MED_3' time 1500 flag 1 
wait 1200 
04C4: store_coords_to 1@ 2@ 3@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 0.0 
0843: get_zone_at 1@ 2@ 3@ nameA_to $ZONE_MED // 8-byte string 
wait 300 
01E5: show_text_1number_highpriority GXT 'MED_4' number $ZONE_MED time 2000 flag 1 
wait 2000 
00BC: show_text_highpriority GXT 'MED_5' time 3000 flag 1 
wait 3000 
00BC: show_text_highpriority GXT 'MED_6' time 1500 flag 1 
wait 1500 
0729: AS_actor $PLAYER_ACTOR hold_cellphone 0 
wait 5 
04C4: store_coords_to 4@ 5@ 6@ from_actor $PLAYER_ACTOR with_offset -200.0 -200.0 0.0 
02C1: store_to 4@ 5@ 6@ car_path_coords_closest_to 4@ 5@ 6@ 
wait 5 
$MED_CAR = Car.Create(#AMBULAN, 4@, 5@, 6@)
$MED_ACT = Actor.Create(Medic, #LAEMT1, 0.0, 0.0, 0.0)
wait 5 
036A: put_actor $MED_ACT in_car $MED_CAR 
0397: enable_car $MED_CAR siren 1 
wait 5 
00AE: set_car $MED_CAR traffic_behaviour_to 2 
wait 5 

:MEDIC_CALL_432
wait 5 
04C4: store_coords_to 7@ 8@ 9@ from_actor $PLAYER_ACTOR with_offset -1.5 -1.5 0.0 
wait 5 
05D1: AS_actor $MED_ACT drive_car $MED_CAR to 7@ 8@ 9@ speed 50.0 0 model #NULL 0 
if and
8449:   not actor $PLAYER_ACTOR in_a_car 
00F2:   actor $MED_ACT near_actor $PLAYER_ACTOR radius 10.0 10.0 0 
jf @MEDIC_CALL_432 
wait 5 
0633: AS_actor $MED_ACT exit_car 

:MEDIC_CALL_542
wait 5 
04C4: store_coords_to 7@ 8@ 9@ from_actor $PLAYER_ACTOR with_offset -1.5 -1.5 0.0 
wait 5 
05D3: AS_actor $MED_ACT goto_point 7@ 8@ 9@ mode 4 time 7000 ms // versionA 
if and
8449:   not actor $PLAYER_ACTOR in_a_car 
00F2:   actor $MED_ACT near_actor $PLAYER_ACTOR radius 2.0 2.0 0 
jf @MEDIC_CALL_542 
00BC: show_text_highpriority GXT 'MED_7' time 2000 flag 1 
wait 2000 
03E5: show_text_box 'MED_8' 

:MEDIC_CALL_666
wait 5 
if 
0AB0:   key_pressed 89 
jf @MEDIC_CALL_719 
03E6: remove_text_box 
wait 5 
00BC: show_text_highpriority GXT 'MED_10' time 2000 flag 1 
wait 2000 
jump @MEDIC_CALL_881 

:MEDIC_CALL_719
wait 5 
if 
0AB0:   key_pressed 78 
jf @MEDIC_CALL_666 
03E6: remove_text_box 
wait 5 
00BC: show_text_highpriority GXT 'MED_9' time 2000 flag 1 
wait 2000 
00BC: show_text_highpriority GXT 'MED_11' time 2000 flag 1 
wait 2000 
Player.Money($PLAYER_CHAR) += -1500
wait 5 
04C4: store_coords_to 10@ 11@ 12@ from_actor $PLAYER_ACTOR with_offset -1000.5 -1000.5 0.0 
wait 5 
05D1: AS_actor $MED_ACT drive_car $MED_CAR to 10@ 11@ 12@ speed 50.0 0 model #NULL 0 
wait 30000 
Car.Destroy($MED_CAR)
Actor.DestroyInstantly($MED_ACT)
jump @MEDIC_CALL_31 

:MEDIC_CALL_881
wait 5 
Actor.Health($PLAYER_ACTOR) = 500
wait 5 
Player.Money($PLAYER_CHAR) += -150
wait 5 
00BC: show_text_highpriority GXT 'MED_12' time 2000 flag 1 
wait 2000 
04C4: store_coords_to 10@ 11@ 12@ from_actor $PLAYER_ACTOR with_offset -1000.5 -1000.5 0.0 
wait 5 
05D1: AS_actor $MED_ACT drive_car $MED_CAR to 10@ 11@ 12@ speed 50.0 0 model #NULL 0 
wait 30000 
Car.Destroy($MED_CAR)
Actor.DestroyInstantly($MED_ACT)
jump @MEDIC_CALL_31