Napisano dnia: 2010-12-31 14:12:50
Witam. Wzorując się na skrypcie z tego tematu: http://www.gta-mods.pl/forum/topics/view/id/684 z drugiego posta, napisałem swój. Skomplikowałem. Wchodzę w grę, gra się załaduje, idę tam gdzie stoi marker, wchodzę w niego i... crash. I nie wiem co źle zrobiłem (analizowałem wzorca 2 razy) i nic nie znalazłem... Oto cały kod.
Proszę o pomoc
Cytat:
{$VERSION 3.1.0027}
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP
:NONAME_2
wait 0
if
Player.Defined($PLAYER_ACTOR)
else_jump @NONAME_2
Model.Load(#HMYST)
Model.Load(#ELEGY)
Model.Load(#BMORI)
Model.Load(#NRG500)
7@ = Marker.CreateIconAndSphere(23, 2378.961, -1729.756, 13.3828)
:NONAME_62
wait 10
if
00ED: actor $PLAYER_ACTOR 0 near_point 2378.961 -1729.756 radius 13.3828 1.0 on_foot
else_jump @NONAME_62
fade 0 1500
wait 1500
Marker.Disable(7@)
$1 = Car.Create(#ELEGY, 2378.961, -1729.756, 13.3828)
$PLAYER_CHAR = Car.Create(#NRG500, 2400.817, -1729.675, 13.3828)
3@ = Actor.Create(Mission2, #HMYST, 2416.829, -1666.706, 13.5355)
4@ = Actor.Create(Mission2, #BMORI, 2416.829, -1666.706, 13.5355)
5@ = Actor.Create(Mission2, #BMORI, 2416.829, -1666.706, 13.5355)
072A: put_actor $PLAYER_ACTOR into_car 1@ driverseat
0430: put_actor 3@ into_car 1@ passenger_seat 0
0430: put_actor 4@ into_car 2@ passenger_seat 0
072A: put_actor 5@ into_car 2@ driverseat
01B2: give_actor 3@ weapon 28 ammo 9999 // Load the weapon model before using this
01B2: give_actor 4@ weapon 28 ammo 9999 // Load the weapon model before using this
:NONAME_295
wait 10
if
Actor.InCar($PLAYER_ACTOR, 1@)
else_jump @NONAME_295
0713: actor 3@ driveby_actor -1 car 2@ point 0.0 0.0 0.0 radius -1 8 1 firing_rate 100
0713: actor 4@ driveby_actor -1 car 1@ point 0.0 0.0 0.0 radius -1 8 1 firing_rate 100
Car.DriveTo(1@, 2060.385, -1916.034, 13.5469)
Car.SetMaxSpeed(1@, 30.0)
00AE: set_car 1@ traffic_behaviour_to 3
07F8: car 2@ follow_car 1@ radius 7.5
Car.SetMaxSpeed(2@, 50.0)
02A3: enable_widescreen 1
wait 1500
fade 1 1500
:NONAME_460
wait 10
if
00EE: actor $PLAYER_ACTOR 0 near_point 2067.859 -1913.868 radius 4.0 4.0 in_car
else_jump @NONAME_460
fade 0 1500
wait 1500
02A3: enable_widescreen 0
Camera.Restore_WithJumpCut
wait 1500
fade 1 1500
0A93: end_custom_thread
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP
:NONAME_2
wait 0
if
Player.Defined($PLAYER_ACTOR)
else_jump @NONAME_2
Model.Load(#HMYST)
Model.Load(#ELEGY)
Model.Load(#BMORI)
Model.Load(#NRG500)
7@ = Marker.CreateIconAndSphere(23, 2378.961, -1729.756, 13.3828)
:NONAME_62
wait 10
if
00ED: actor $PLAYER_ACTOR 0 near_point 2378.961 -1729.756 radius 13.3828 1.0 on_foot
else_jump @NONAME_62
fade 0 1500
wait 1500
Marker.Disable(7@)
$1 = Car.Create(#ELEGY, 2378.961, -1729.756, 13.3828)
$PLAYER_CHAR = Car.Create(#NRG500, 2400.817, -1729.675, 13.3828)
3@ = Actor.Create(Mission2, #HMYST, 2416.829, -1666.706, 13.5355)
4@ = Actor.Create(Mission2, #BMORI, 2416.829, -1666.706, 13.5355)
5@ = Actor.Create(Mission2, #BMORI, 2416.829, -1666.706, 13.5355)
072A: put_actor $PLAYER_ACTOR into_car 1@ driverseat
0430: put_actor 3@ into_car 1@ passenger_seat 0
0430: put_actor 4@ into_car 2@ passenger_seat 0
072A: put_actor 5@ into_car 2@ driverseat
01B2: give_actor 3@ weapon 28 ammo 9999 // Load the weapon model before using this
01B2: give_actor 4@ weapon 28 ammo 9999 // Load the weapon model before using this
:NONAME_295
wait 10
if
Actor.InCar($PLAYER_ACTOR, 1@)
else_jump @NONAME_295
0713: actor 3@ driveby_actor -1 car 2@ point 0.0 0.0 0.0 radius -1 8 1 firing_rate 100
0713: actor 4@ driveby_actor -1 car 1@ point 0.0 0.0 0.0 radius -1 8 1 firing_rate 100
Car.DriveTo(1@, 2060.385, -1916.034, 13.5469)
Car.SetMaxSpeed(1@, 30.0)
00AE: set_car 1@ traffic_behaviour_to 3
07F8: car 2@ follow_car 1@ radius 7.5
Car.SetMaxSpeed(2@, 50.0)
02A3: enable_widescreen 1
wait 1500
fade 1 1500
:NONAME_460
wait 10
if
00EE: actor $PLAYER_ACTOR 0 near_point 2067.859 -1913.868 radius 4.0 4.0 in_car
else_jump @NONAME_460
fade 0 1500
wait 1500
02A3: enable_widescreen 0
Camera.Restore_WithJumpCut
wait 1500
fade 1 1500
0A93: end_custom_thread
Proszę o pomoc