{
use macro (Ctrl+J) "headsa"
to insert a file header
}
{$VERSION 3.0.0000}
var
$PLAYER_CHAR: Player
end // var
03A4: name_thread 'MAIN'
01F0: set_max_wanted_level_to 6
0111: toggle_wasted_busted_check 0
00C0: set_current_time_hours_to 8 minutes_to 0
04E4: unknown_refresh_game_renderer_at 2488.56 -1666.84
03CB: set_rendering_origin_at 2488.56 -1666.84 13.38
0053: $PLAYER_CHAR = create_player #NULL at 2488.56 -1666.84 13.38
01F5: $PLAYER_ACTOR = create_player_actor $PLAYER_CHAR
07AF: $PLAYER_GROUP = player $PLAYER_CHAR group
0373: set_camera_directly_behind_player
01B6: set_weather 0
0001: wait 0 ms
087B: set_player $PLAYER_CHAR clothes_texture "PLAYER_FACE" model "HEAD" body_part 1
087B: set_player $PLAYER_CHAR clothes_texture "JEANSDENIM" model "JEANS" body_part 2
087B: set_player $PLAYER_CHAR clothes_texture "SNEAKERBINCBLK" model "SNEAKER" body_part 3
087B: set_player $PLAYER_CHAR clothes_texture "VEST" model "VEST" body_part 0
070D: rebuild_player $PLAYER_CHAR
01B4: toggle_player $PLAYER_CHAR can_move 1
016A: fade 1 time 0
04BB: select_interior 0
0629: change_integer_stat 181 to 4
016C: restart_if_wasted_at 2027.77 -1420.52 15.99 angle 137.0 town_number 0
016D: restart_if_busted_at 1550.68 -1675.49 14.51 angle 90.0 town_number 0
0180: set_on_mission_flag_to $ONMISSION // Note: your missions have to use the variable defined here
0004: $DEFAULT_WAIT_TIME = 250
03E6: remove_text_box
004F: create_thread @BALKJE
// put your create_thread commands here
:MAIN_LOOP
0001: wait $DEFAULT_WAIT_TIME ms
00BF: $TIME_HOURS = current_time_hours, $TIME_MINS = current_time_minutes
0002: jump @MAIN_LOOP
:BALKJE
thread "BALKJE"
:SWEET4_47
Model.Load(#GREENWOO)
038B: load_requested_models
:SWEET4_103
if
not Model.Available(#GREENWOO)
else_jump @SWEET4_152
wait 0
jump @SWEET4_103
:SWEET4_152
1@ = 2508.16 // floating-point values
2@ = -1666.47 // floating-point values
3@ = 13.0 // floating-point values
4@ = 16.0 // floating-point values
0395: clear_area 1 at 1@ 2@ 3@ range 6.0
5@ = Car.Create(#GREENWOO, 1@, 2@, 3@)
0229: set_car 5@ color_to 59 34
Car.Angle(5@) = 4@
Car.Health(5@) = 1450
$health = Car.Health(5@)
if
$health > 250 // integer values
else_jump @SWEET4_11471
$health -= 250 // integer values
:SWEET4_11471
0084: $health2 = $health // integer values and handles
$health2 /= 12 // integer values
0151: remove_status_text $health2
03C4: set_status_text_to $health2 0 'SWE4_08' // CAR HEALTH
repeat
wait 0 ms
$health = Car.Health(5@)
0084: $health2 = $health // integer values and handles
if
$health2 > 250 // integer values
else_jump @SWEET4_11472
$health2 -= 250 // integer values
:SWEET4_11472
$health2 /= 12 // integer values
until $health < 250
0151: remove_status_text $health2
end_thread