SHARE
TWEET

Untitled

a guest Jun 19th, 2017 45 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. {$CLEO .cs}
  2.  
  3. 0000: NOP
  4.  
  5. :PEPE_1
  6. wait 0
  7. if
  8. 0AB0: key_pressed 97
  9. jf @PEPE_1
  10. wait 0
  11. if or
  12. 02F2: $PLAYER_ACTOR model == #TRIBOSS
  13. 02F2: $PLAYER_ACTOR model == #FBI
  14. 02F2: $PLAYER_ACTOR model == #SWAT
  15. 02F2: $PLAYER_ACTOR model == #LAPD1
  16. 02F2: $PLAYER_ACTOR model == #SFPD1
  17. 02F2: $PLAYER_ACTOR model == #LVPD1
  18. 02F2: $PLAYER_ACTOR model == #CSHER
  19. 02F2: $PLAYER_ACTOR model == #LAPDM1
  20. jf @ifMentas
  21. jump @asMentas
  22.  
  23. :ifMentas
  24. wait 0
  25. if or
  26. 02F2: $PLAYER_ACTOR model == #ARMY
  27. 02F2: $PLAYER_ACTOR model == #DSHER
  28. 02F2: $PLAYER_ACTOR model == #WMYSGRD
  29. jf @stream
  30. jump @asMentas
  31.  
  32. :stream
  33. // GET ALL STREAMED PEDS    
  34. 0A8D: 29@ = read_memory 0xB74490 size 4 virtual_protect 0
  35. 000A: 29@ += 0x4
  36. 0A8D: 29@ = read_memory 29@ size 4 virtual_protect 0
  37. for 30@ = 0 to 35584 step 0x100
  38.     0A8D: 31@ = read_memory 29@ size 1 virtual_protect 0
  39.     000A: 29@ += 0x1
  40.     if and
  41.         0029:  31@ >= 0x00
  42.         001B:  0x80 > 31@
  43.     jf @PEPE_1
  44.         wait 0
  45.         005A: 31@ += 30@
  46.         // GOT THE PED. 31@ = THE PLAYER (PED)
  47.         jump @check
  48.        
  49. :check
  50. wait 0
  51.     0AB5: store_actor $PLAYER_ACTOR closest_vehicle_to 33@ closest_ped_to 15@
  52.     0B2B: samp 16@ = get_player_id_by_actor_handle 15@
  53.     0B36: samp 17@ = get_player_nickname 16@        
  54. if and
  55. 056D: actor 15@ defined     //check if the actor defined
  56. 00DF: actor $PLAYER_ACTOR driving
  57. 8449: NOT actor 15@ in_a_car
  58. jf @PEPE_1
  59. jump @store
  60.  
  61.  
  62. :store
  63. wait 0
  64. actor.StorePos($PLAYER_ACTOR, 21@ , 22@ , 23@) //store your position
  65. actor.StorePos(15@, 24@ , 25@ , 26@)                   //store the target position
  66. 0509: 7@ = distance_between_XY 21@ 22@ and_XY 24@ 25@ //compare each position and store it in variable
  67. if
  68. 7@ < =1.9   // this will check if the target is less than 100 meter away from you ,float is better to use (.0)
  69. jf @PEPE_1
  70.     wait 0
  71.     0B2B: samp 1@ = get_player_id_by_actor_handle 15@
  72.     0B36: samp 2@ = get_player_nickname 1@
  73.     03C0: 10@ = actor $PLAYER_ACTOR car
  74.             if or
  75.                 02F2: actor 15@ model == #TRIBOSS
  76.                 02F2: actor 15@ model == #FBI
  77.                 02F2: actor 15@ model == #SWAT
  78.                 02F2: actor 15@ model == #LAPD1
  79.                 02F2: actor 15@ model == #SFPD1
  80.                 02F2: actor 15@ model == #LVPD1
  81.                 02F2: actor 15@ model == #CSHER
  82.                 02F2: actor 15@ model == #LAPDM1
  83.                 jf @model
  84.             jump @rist
  85.        
  86.             :model
  87.             wait 0
  88.             if or
  89.                 02F2: actor 15@ model == #ARMY
  90.                 02F2: actor 15@ model == #DSHER
  91.                 02F2: actor 15@ model == #WMYSGRD
  92.                 jf @PEPE_1
  93.             jump @rist
  94.  
  95. :rist
  96. wait 0
  97. 0AF9: samp say_msg "/suristi %s" 2@
  98. wait 200
  99. 0AF9: samp say_msg "/isodinti %s" 2@
  100. wait 500
  101. jump @PEPE_1    
  102.  
  103. :asMentas
  104. wait 0
  105. 0AF9: samp say_msg "as dx"
  106. jump @PEPE_1
RAW Paste Data
Top