TeHArGiS10

Untitled

Jul 8th, 2016
118
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 4.83 KB | None | 0 0
  1. {$CLEO .cs}
  2. 0000:
  3. thread "TrollBoss"
  4.  
  5. //-------------------------------COMMANDS-------------------------------
  6. 0B34: "tb.flip" @FLIP_CMD
  7. 0B34: "tb.launch" @LAUNCH_CMD
  8. //-------------------------------COMMANDS-------------------------------
  9. 0@ = 0
  10. //-------------------------------MAIN-----------------------------------
  11. :MAIN
  12. wait 0
  13. if
  14. 0@ == 1
  15. then
  16. jump @FLIP_ACT
  17. end
  18.  
  19. if
  20. 0@ == 2
  21. then
  22. jump @LAUNCH_ACT
  23. end
  24.  
  25. 0@ = 0
  26. SAMP.CmdRet()
  27. jump @MAIN
  28. //-------------------------------MAIN-----------------------------------
  29.  
  30. //-------------------------------ACTIONS--------------------------------
  31. :FLIP_ACT
  32. wait 0
  33. 6@ = Actor.CurrentCar(4@)
  34. Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
  35. if
  36. Actor.Driving($PLAYER_ACTOR)
  37. then
  38. 5@ = Actor.CurrentCar($PLAYER_ACTOR)
  39. 036A: put_actor $PLAYER_ACTOR in_car 6@
  40. wait 150
  41. Car.SetSpeedInstantly(6@, 0.0)
  42. 0731: set_car 6@ y_angle_to -180.0
  43. wait 400
  44. 036A: put_actor $PLAYER_ACTOR in_car 5@
  45. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  46. 036A: put_actor $PLAYER_ACTOR in_car 5@
  47. else
  48. 0430: put_actor $PLAYER_ACTOR into_car 6@ passenger_seat -1
  49. wait 250
  50. 036A: put_actor $PLAYER_ACTOR in_car 6@
  51. wait 150
  52. Car.SetSpeedInstantly(6@, 0.0)
  53. 0731: set_car 6@ y_angle_to -180.0
  54. wait 400
  55. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  56. end
  57. 0@ = 0
  58. SAMP.CmdRet()
  59. jump @MAIN
  60.  
  61. :LAUNCH_ACT
  62. wait 0
  63. 6@ = Actor.CurrentCar(4@)
  64. Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
  65. if
  66. Actor.Driving($PLAYER_ACTOR)
  67. then
  68. 5@ = Actor.CurrentCar($PLAYER_ACTOR)
  69. 036A: put_actor $PLAYER_ACTOR in_car 6@
  70. wait 150
  71. 07D5: set_car 6@ velocity_in_direction_XYZ 0.0 0.0 20000.0 rotation_velocitiesXY 0.0 0.0 unk 0.0
  72. Car.SetSpeedInstantly(6@, 100.0)
  73. wait 400
  74. 036A: put_actor $PLAYER_ACTOR in_car 5@
  75. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  76. 036A: put_actor $PLAYER_ACTOR in_car 5@
  77. else
  78. 0430: put_actor $PLAYER_ACTOR into_car 6@ passenger_seat -1
  79. wait 250
  80. 036A: put_actor $PLAYER_ACTOR in_car 6@
  81. wait 150
  82. 07D5: set_car 6@ velocity_in_direction_XYZ 0.0 3.0 0.0 rotation_velocitiesXY 0.0 0.0 unk 0.0
  83. Car.SetSpeedInstantly(6@, 100.0)
  84. wait 400
  85. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  86. end
  87. 0@ = 0
  88. SAMP.CmdRet()
  89. jump @MAIN
  90. //-------------------------------ACTIONS--------------------------------
  91.  
  92. //-------------------------------COMMANDS-------------------------
  93. :FLIP_CMD
  94. wait 0
  95. SAMP.IsCommandTyped(1@)
  96. if
  97. 0AD4: 2@ = scan_string 1@ format "%d" 3@
  98. then
  99. if
  100. SAMP.IsPlayerConnected(3@)
  101. then
  102. 4@ = SAMP.GetActorHandleByPlayerID(3@)
  103. if
  104. 056D: actor 4@ defined
  105. then
  106. if
  107. Actor.Driving(4@)
  108. then
  109. 0@ = 1
  110. else
  111. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.flip: {FFFFFF}Target must be driving!" 0xFFFFFF
  112. end
  113. else
  114. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.flip: {FFFFFF}Target too far away!" 0xFFFFFF
  115. end
  116. else
  117. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.flip: {FFFFFF}Invalid ID!" 0xFFFFFF
  118. end
  119. else
  120. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.flip: {FFFFFF}/tb.flip <ID>" 0xFFFFFF
  121. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.flip: {FFFFFF}Flip someone's car!" 0xFFFFFF
  122. end
  123. SAMP.CmdRet()
  124. jump @MAIN
  125.  
  126. :LAUNCH_CMD
  127. wait 0
  128. SAMP.IsCommandTyped(1@)
  129. if
  130. 0AD4: 2@ = scan_string 1@ format "%d" 3@
  131. then
  132. if
  133. SAMP.IsPlayerConnected(3@)
  134. then
  135. 4@ = SAMP.GetActorHandleByPlayerID(3@)
  136. if
  137. 056D: actor 4@ defined
  138. then
  139. if
  140. Actor.Driving(4@)
  141. then
  142. 0@ = 2
  143. else
  144. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.launch: {FFFFFF}Target must be driving!" 0xFFFFFF
  145. end
  146. else
  147. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.launch: {FFFFFF}Target too far away!" 0xFFFFFF
  148. end
  149. else
  150. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.launch: {FFFFFF}Invalid ID!" 0xFFFFFF
  151. end
  152. else
  153. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.launch: {FFFFFF}/tb.launch <ID>" 0xFFFFFF
  154. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.launch: {FFFFFF}Launch someone's car in the air!" 0xFFFFFF
  155. end
  156. SAMP.CmdRet()
  157. jump @MAIN
  158. //-------------------------------COMMANDS-------------------------
Advertisement
Add Comment
Please, Sign In to add comment