Napisałem sobie skrypt na nową posiadłość. Wszystko byłoby ok gdyby nie to, że muszę to "zgrać" z CLEO_SAVES.

Kod:
{$CLEO .cs}
0000: NOP

0247: request_model #MAVERICK
0247: request_model #JETMAX
038B: load_requested_models

$cena1 = 250000
0180: set_on_mission_flag_to $ONMISSION // Note: your missions have to use the variable defined here 

:petla01
wait 10
if
0256:   player $PLAYER_CHAR defined 
jf @petla01

jump @spr23
 
:spr23
wait 10
if
0039:   4@ == 1
jf @petla1

jump @save2_check1

:petla1
wait 10
if and
0256:   player $PLAYER_CHAR defined 
00EC:   actor $PLAYER_ACTOR 0 near_point 724.3397 -2392.6152 radius 250.0 250.0 
$ONMISSION = 0
jf @petla1

00A5: $PARKED_HELI = create_car #MAVERICK at 690.2287 -2391.1602 1.6224
0175: set_car $PARKED_HELI Z_angle_to 181.9410 
020A: set_car $PARKED_HELI door_status_to 2 

00A5: $PARKED_JET = create_car #JETMAX at 724.6205 -2358.9104 -1.6433 
0175: set_car $PARKED_JET Z_angle_to 90.0  

0518: $domkuptrue = create_available_asset_pickup 'PROP_3' at 724.3397 -2392.6152 2.6896 price $cena1  // Press ~k~~PED_ANSWER_PHONE~ to buy this property.


:dom_check2
wait 10
if and
00EC:   actor $PLAYER_ACTOR 0 near_point 724.3397 -2392.6152 radius 1.0 1.0  
00E1:   player 0 pressed_key 4 
010A:   player $PLAYER_CHAR money > $cena1 
$ONMISSION = 0
jf @dom_check2

0109: player $PLAYER_CHAR money += -250000
0215: destroy_pickup $domkuptrue
01B4: set_player $PLAYER_CHAR can_move 0 
wait 500
0826: enable_hud 0 
0581: enable_radar 0 
Camera.SetPosition(734.0233, -2420.2095, 10.3088, 0.0, 0.0, 0.0)
Camera.PointAt(717.9075, -2382.9634, 2.6896, 2)
0394: play_music 2
00BA: show_text_styled GXT 'BUYPRO' time 5000 style 2
00A6: destroy_car $PARKED_JET  
00A6: destroy_car $PARKED_HELI

:stworzauta
014B: $PARKED_HELI = init_parked_car_generator #MAVERICK color 21 0 1 alarm 0 door_lock 0 0 10000 at 690.2287 -2391.1602 1.6224 angle 181.9410 
014C: set_parked_car_generator $PARKED_HELI cars_to_generate_to 101 

014B: $PARKED_JET = init_parked_car_generator #JETMAX color 21 0 1 alarm 0 door_lock 0 0 10000 at 724.6205 -2358.9104 -1.6433 angle 90.0 
014C: set_parked_car_generator $PARKED_JET cars_to_generate_to 102 

wait 5000

0826: enable_hud 1 
0581: enable_radar 1
02EB: restore_camera_with_jumpcut 
0373: set_camera_directly_behind_player  
01B4: set_player $PLAYER_CHAR can_move 1

wait 2000

03E5: show_text_box 'POSHELP1'

0039:   4@ == 1 
0A95: enable_thread_saving

:save2_check1
wait 10
if and
Player.Defined($PLAYER_CHAR)
$ONMISSION = 0
jf @save2_check1

$SAVEPCKP1 = Pickup.Create(1277, 3, 714.7087, -2389.7297, 2.6896)

:save2_check2
wait 10
if
$ONMISSION == 1
jf @save2_check3

Pickup.Destroy($SavePickup)
jump @save2_check1

:save2_check3
wait 10
if and
80DF:   not actor $PLAYER_ACTOR driving 
$ONMISSION = 0
0214:   pickup $SAVEPCKP1 picked_up 
jf @save2_check2

Player.CanMove($PLAYER_CHAR) = False

fade 0 10

:save2_check4
wait 10
if
816B: not fading
jf @save2_check4

0395: clear_area 1 at 714.7087 -2389.7297 2.6896 radius 80.0 
00A1: put_actor $PLAYER_ACTOR at 716.7087 -2389.7297 2.6896 
0173: set_actor $PLAYER_ACTOR Z_angle_to 12.0 
02EB: restore_camera_with_jumpcut 
wait 50
03D8: show_save_screen 

:save2_check5
wait 10
if
83D9:   not save_done 
jf @save2_check6

jump @save2_check5

:save2_check6
fade 1 1500

Player.CanMove($PLAYER_CHAR) = True

jump @save2_check1

0A93: end_custom_thread


Uruchamiam grę i wszystko jest OK. Wykonuje część skryptu do miejsca w którym tworzy mi się pickup dyskietki. Zapisuję wtedy grę.
Gdy ją wczytam to pasek dochodzi do końca, widzę czarny ekran i gra się wiesza.
Co jest przyczyną?

___________________
http://img834.imageshack.us/img834/861/yrmwsig