Jump to content

Ajutor AutoDrive Cleo


UberSilence

Recommended Posts

// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
30@ = 0 
4@ = 25.0 

:Noname_17
wait 0 
if 
   Player.Defined($PLAYER_CHAR)
else_jump @Noname_732 
if and
   Actor.Driving($PLAYER_ACTOR)
   not Actor.DrivingVehicleType($PLAYER_ACTOR, 537)
   not Actor.DrivingVehicleType($PLAYER_ACTOR, 538)
84A7:   not actor $PLAYER_ACTOR driving_boat 
84C8:   not actor $PLAYER_ACTOR driving_flying_vehicle 
else_jump @Noname_309 
0@ = Actor.CurrentCar($PLAYER_ACTOR)
if 
key_down 90 
else_jump @Noname_200 
if and
056E:   car 0@ defined 
0AB6: store_target_marker_coords_to 1@ 2@ 3@ // IF and SET 
else_jump @Noname_188 
018C: play_sound 1058 at 0.0 0.0 0.0 
if 
  30@ == 0 
else_jump @Noname_181 
gosub @Noname_844 
jump @Noname_188 

:Noname_181
gosub @Noname_739 

:Noname_188
call @Noname_1337 1 90 

:Noname_200
if 
  22@ == 0 
key_down 16 
else_jump @Noname_262 
0470: 21@ = actor $PLAYER_ACTOR current_weapon 
if and
  21@ >= 22 
   not 21@ > 32 
else_jump @Noname_262 
gosub @Noname_1211 

:Noname_262
if 
   not 22@ == 0 
else_jump @Noname_309 
if 
key_down 16 
else_jump @Noname_302 
jump @Noname_309 

:Noname_302
gosub @Noname_1262 

:Noname_309
if 
  30@ == 1 
else_jump @Noname_695 
if or
00E1:   player 0 pressed_key 15 
02BF:   car 0@ sunk 
   Car.Wrecked(0@)
else_jump @Noname_361 
gosub @Noname_739 

:Noname_361
if and
056E:   car 0@ defined 
01F4:   car 0@ flipped 
else_jump @Noname_389 
gosub @Noname_798 

:Noname_389
if 
856E:   not car 0@ defined 
else_jump @Noname_419 
30@ = 0 
jump @Noname_688 

:Noname_419
if 
   not Actor.InCar($PLAYER_ACTOR, 0@)
else_jump @Noname_445 
30@ = 0 

:Noname_445
if and
key_down 65 
0AB6: store_target_marker_coords_to 1@ 2@ 3@ // IF and SET 
else_jump @Noname_490 
gosub @Noname_927 
call @Noname_1337 1 65 

:Noname_490
if 
key_down 32 
else_jump @Noname_576 
054C: use_GXT_table 'FTRAIN' 
if 
  29@ == 0 
else_jump @Noname_562 
call @Noname_1365 4 10 1 -1647 3 
29@ = 1 

:Noname_562
gosub @Noname_977 
jump @Noname_613 

:Noname_576
if 
  29@ == 1 
else_jump @Noname_613 
29@ = 0 
call @Noname_1431 1 10 

:Noname_613
if 
01AE:   car 0@ sphere 0 near_point 1@ 2@ radius 3.0 3.0 stopped 
else_jump @Noname_654 
gosub @Noname_739 

:Noname_654
if 
key_down 88 
else_jump @Noname_688 
gosub @Noname_1108 
call @Noname_1337 1 88 

:Noname_688
jump @Noname_732 

:Noname_695
if 
  29@ == 1 
else_jump @Noname_732 
29@ = 0 
call @Noname_1431 1 10 

:Noname_732
jump @Noname_17 

:Noname_739
30@ = 0 
072A: put_actor $PLAYER_ACTOR into_car 0@ driverseat 
0423: set_car 0@ improved_handling_to 1.0 // (float) 
Car.RemoveReferences(0@)
03AB: set_car 0@ strong 0 
018C: play_sound 1058 at 0.0 0.0 0.0 
return 

:Noname_798
5@ = Car.Angle(0@)
Car.StorePos(0@, 6@, 7@, 8@)
Car.PutAt(0@, 6@, 7@, 8@)
Car.Angle(0@) = 5@
return 

:Noname_844
30@ = 1 
02CE: 3@ = ground_z_at 1@ 2@ 3@ 
Car.SetDriverBehaviour(0@, Nowhere)
00AE: set_car 0@ traffic_behaviour_to 2 
0423: set_car 0@ improved_handling_to 2.0 // (float) 
03AB: set_car 0@ strong 1 
Car.DriveTo(0@, 1@, 2@, 3@)
Car.SetMaxSpeed(0@, 4@)
20@ = 0 
return 

:Noname_927
02CE: 3@ = ground_z_at 1@ 2@ 3@ 
Car.DriveTo(0@, 1@, 2@, 3@)
018C: play_sound 1058 at 0.0 0.0 0.0 
return 

:Noname_977
if and
  4@ > 3.5 
key_down 40 
  32@ >= 75 
else_jump @Noname_1034 
32@ = 0 
4@ += -0.5 
Car.SetMaxSpeed(0@, 4@)

:Noname_1034
if and
   not 4@ >= 50.0 
key_down 38 
  32@ >= 75 
else_jump @Noname_1091 
32@ = 0 
4@ += 0.5 
Car.SetMaxSpeed(0@, 4@)

:Noname_1091
0092: 10@ = float 4@ to_integer 
10@ *= 2 
return 

:Noname_1108
if 
  20@ == 0 
else_jump @Noname_1154 
20@ = 1 
00AE: set_car 0@ traffic_behaviour_to 1 
Car.SetDriverBehaviour(0@, FollowRoad)
jump @Noname_1189 

:Noname_1154
20@ = 0 
00AE: set_car 0@ traffic_behaviour_to 2 
Car.SetDriverBehaviour(0@, Nowhere)
Car.DriveTo(0@, 1@, 2@, 3@)

:Noname_1189
018C: play_sound 1058 at 0.0 0.0 0.0 
return 

:Noname_1211
22@ = 1 
0713: actor $PLAYER_ACTOR driveby_actor -1 car -1 point 0.0 0.0 0.0 radius 300.0 8 0 firing_rate 75 
015D: set_gamespeed 0.5 
return 

:Noname_1262
22@ = 0 
072A: put_actor $PLAYER_ACTOR into_car 0@ driverseat 
if 
  30@ == 1 
else_jump @Noname_1328 

:Noname_1295
wait 0 
   Actor.InCar($PLAYER_ACTOR, 0@)
else_jump @Noname_1295 
Car.DriveTo(0@, 1@, 2@, 3@)

:Noname_1328
015D: set_gamespeed 1.0 
return 

:Noname_1337
key_down 0@ 
else_jump @Noname_1360 
wait 0 
jump @Noname_1337 

:Noname_1360
ret 0 

:Noname_1365
call @Noname_1472 1 0@ 0@ 
call @Noname_1575 1 2@ 2@ 
0AA6: call_method 4509088 struct 12195720 num_params 4 pop 0 3@ 2@ 1@ 0@  
ret 0 

:Noname_1431
call @Noname_1472 1 0@ 0@ 
0AA6: call_method 4509312 struct 12195720 num_params 1 pop 0 0@  
ret 0 

:Noname_1472
0A9F: 1@ = current_thread_pointer 
0A8E: 2@ = 1@ + 220 // int 
0A8D: 2@ = read_memory 2@ size 1 virtual_protect 0 
if 
  2@ == 1 
else_jump @Noname_1535 
1@ = 10783072 
jump @Noname_1542 

:Noname_1535
1@ += 60 

:Noname_1542
0@ *= 4 
005A: 1@ += 0@ // (int) 
1@ -= 10787168 
ret 1 1@ 

:Noname_1575
if 
  0@ == 0 
else_jump @Noname_1600 
ret 1 0 

:Noname_1600
0A9F: 1@ = current_thread_pointer 
1@ += 16 
0A8D: 1@ = read_memory 1@ size 4 virtual_protect 0 
0062: 1@ -= 0@ // (int) 
1@ += 3 
ret 1 1@ 
0900: clear_object 'FREI_11' last_weapon_damage 
0000: NOP 

Este un auto-drive care te duce la checkpointul pus de tine pe mapa.

As vrea sa stiu daca pot sa-l fac sa se duca la checkpointul pus de gamemodeul unui server (fara sa te mai duci tu pe mapa si sa pui)

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue. For more details you can also review our Terms of Use and Privacy Policy.