// This file was decompiled using sascm.ini published by Seemann (http://sannybuilder.com/files/SASCM.rar) on 13.10.2007
DEFINE OBJECTS 1
DEFINE OBJECT SANNY BUILDER 3.04       

DEFINE MISSIONS 0

DEFINE EXTERNAL_SCRIPTS 0 // Use -1 in order not to compile AAA script

DEFINE UNKNOWN_EMPTY_SEGMENT 0

DEFINE UNKNOWN_THREADS_MEMORY 0

{$VERSION 3.1.0027}

//-------------MAIN---------------
03A4: name_thread 'SUMMER'  
01F0: set_max_wanted_level_to 0  
0111: set_wasted_busted_check 0  
00C0: set_current_time_hours_to 14 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 -143.5986 37.3621 10.3  
01F5: $PLAYER_ACTOR = get_player_actor $PLAYER_CHAR  
07AF: $PLAYER_GROUP = player $PLAYER_CHAR group  
0373: set_camera_directly_behind_player  
0581: enable_radar 0  
01B6: set_weather 1  
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 "TRACKTRERIS" model "TRACKTR" body_part 2  
087B: set_player $PLAYER_CHAR clothes_texture "BASK1ERIS" model "BASK1" body_part 3  
087B: set_player $PLAYER_CHAR clothes_texture "HOODYABASE5" model "HOODYA" body_part 0  
070D: rebuild_player $PLAYER_CHAR  
01B4: set_player $PLAYER_CHAR can_move 1  
04BB: select_interior 0  
0629: change_integer_stat 181 to 4  
0629: change_integer_stat 23 to 1000.0  
0109: player $PLAYER_CHAR money += 1000  
070D: rebuild_player $PLAYER_CHAR  
016C: restart_if_wasted_at 0.0 0.0 17.5 angle 137.0 town_number 0  
016D: restart_if_busted_at 0.0 0.0 17.5 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  
create_thread @main
0002: jump @SUMMER_329  

:SUMMER_329
0001: wait 0 ms  
0002: jump @SUMMER_329  

wait 900

:main
0226: $HEAL = actor $PLAYER_ACTOR health  
0008: $HEAL += 1  
0223: set_actor $PLAYER_ACTOR health_to $HEAL  
0001: wait 15000 ms  
jump @main

:SUMMER_329
0001: wait 0 ms     
0002: jump @SUMMER_329

jump @main

:2_19
wait 0  
if and
0390: load_txd_dictionary "MALIBU"  
038F: load_texture "MASKA1" as 10 // Load dictionary with 0390 first  
0AB0:   key_pressed 67  
jump @2_60  

:2_60
wait 0  
038D: draw_texture 10 position 160.0 350.0 size 100.0 100.0 RGBA 255 255 255 255  
067C: put_camera_on_actor $PLAYER_ACTOR with_offset 0.1 -0.1 0.65 rotation 0.1 0.1 0.65 0.0 2  
wait 300  
jump @3_154  

:3_154
wait 0  
if  
0AB0:   key_pressed 79  
jf @3_154  
Camera.Restore_WithJumpCut
wait 5  
jump @2_19

0000:

:2_19
wait 0  
    Player.Defined($PLAYER_CHAR)
jf @2_19  
0AB0:   key_pressed 67  
jf @2_19
0390: load_txd_dictionary "MALIBU"  
038F: load_texture "MASKA1" as 10 // Load dictionary with 0390 first
   

:2_60
wait 0  
038D: draw_texture 10 position 160.0 350.0 size 100.0 100.0 RGBA 255 255 255 255  
067C: put_camera_on_actor $PLAYER_ACTOR with_offset 0.1 -0.1 0.65 rotation 0.1 0.1 0.65 0.0 2  
wait 300  
jump @3_154  

:3_154
wait 0  
if  
0AB0:   key_pressed 79  
jf @3_154  
Camera.Restore_WithJumpCut
wait 5  
jump @2_19

051D: cars 1@ and 0@ collided

{$CLEO}
wait 0
while true
     wait 0
     if
         not player.Defined($player_char)
     then
         continue
     end
     if
         actor.Driving($player_actor)
     then
         03C0: 0@ $player_actor  
         if
             0AE2: 1@ = random_vehicle_near_point 0.0 0.0 0.0 in_radius 10000.0 find_next 0 pass_wrecked 1 //IF and SET
         then
             repeat
                 if
                     09CB:   vehicle 0@ colliding_with_vehicle 1@  
                 then
                     046C: 2@ = car 1@ driver  
                     if
                         2@ > 0
                     then
                         if
                             0973:   fire 3@ exists  
                         then
                             02D1: remove_fire 3@  
                         end
                         0326: 3@ = create_actor 2@ fire  
                     end
                 end
             until 8AE2: not 1@ = random_vehicle_near_point 0.0 0.0 0.0 in_radius 10000.0 find_next 1 pass_wrecked 1 //IF and SET
         end
     end
end