API tools faq
paste
Advertisement
TeHArGiS10

Untitled

TeHArGiS10
Jul 24th, 2016
1,693
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 39.82 KB | None | 0 0
raw download clone embed print report
  1. {$CLEO .cs}
  2. {$INCLUDE SF}
  3. 0000:
  4. thread "TrollBoss"
  5.  
  6. //-------------------------------COMMANDS-------------------------------
  7. 0B34: "tb.cmds" @CMDS
  8. 0B34: "tb.panic" @PANIC_CMD
  9. 0B34: "tb.flip" @FLIP_CMD
  10. 0B34: "tb.fly" @FLY_CMD
  11. 0B34: "tb.fire" @FIRE_CMD
  12. 0B34: "tb.load" @LOAD_CMD
  13. 0B34: "tb.pop" @POP_CMD
  14. 0B34: "tb.color" @COLOR_CMD
  15. 0B34: "tb.ocean" @OCEAN_CMD
  16. 0B34: "tb.jack" @JACK_CMD
  17. 0B34: "tb.tpto" @TPTO_CMD
  18. 0B34: "tb.heaven" @HEAVEN_CMD
  19. 0B34: "tb.kick" @KICK_CMD
  20. 0B34: "tb.ground" @GROUND_CMD
  21. 0B34: "tb.slag" @SLAG_CMD
  22. 0B34: "tb.kill" @KILL_CMD
  23. 0B34: "tb.killall" @KILLALL_CMD
  24. 0B34: "tb.magnet" @MAGNET_CMD
  25. 0B34: "tb.random" @RANDOM_CMD
  26. //-------------------------------COMMANDS-------------------------------
  27. 0@ = 0
  28. //-------------------------------MAIN-----------------------------------
  29. :MAIN
  30. wait 0
  31. if
  32. 0@ == 1
  33. then
  34. jump @FLIP_ACT
  35. end
  36.  
  37. if
  38. 0@ == 2
  39. then
  40. jump @FLY_ACT
  41. end
  42.  
  43. if
  44. 0@ == 3
  45. then
  46. jump @FIRE_ACT
  47. end
  48.  
  49. if
  50. 0@ == 4
  51. then
  52. jump @LOAD_ACT
  53. end
  54.  
  55. if
  56. 0@ == 5
  57. then
  58. jump @POP_ACT
  59. end
  60.  
  61. if
  62. 0@ == 6
  63. then
  64. jump @COLOR_ACT
  65. end
  66.  
  67. if
  68. 0@ == 7
  69. then
  70. jump @OCEAN_ACT
  71. end
  72.  
  73. if
  74. 0@ == 8
  75. then
  76. jump @JACK_ACT
  77. end
  78.  
  79. if
  80. 0@ == 9
  81. then
  82. jump @TPTO_ACT
  83. end
  84.  
  85. if
  86. 0@ == 10
  87. then
  88. jump @HEAVEN_ACT
  89. end
  90.  
  91. if
  92. 0@ == 11
  93. then
  94. jump @KICK_ACT
  95. end
  96.  
  97. if
  98. 0@ == 12
  99. then
  100. jump @GROUND_ACT
  101. end
  102.  
  103. if
  104. 0@ == 13
  105. then
  106. jump @SLAG_ACT
  107. end
  108.  
  109. if
  110. 0@ == 14
  111. then
  112. jump @KILL_ACT
  113. end
  114.  
  115. if
  116. 0@ == 15
  117. then
  118. jump @KILLALL_ACT
  119. end
  120.  
  121. if
  122. 0@ == 16
  123. then
  124. jump @MAGNET_ACT
  125. end
  126.  
  127. if
  128. 0@ == 17
  129. then
  130. jump @RANDOM_ACT
  131. end
  132.  
  133. 0@ = 0
  134. SAMP.CmdRet()
  135. jump @MAIN
  136. //-------------------------------MAIN-----------------------------------
  137.  
  138. //-------------------------------ACTIONS--------------------------------
  139. :FLIP_ACT
  140. wait 0
  141. 6@ = Actor.CurrentCar(4@)
  142. Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
  143. if
  144. Actor.Driving($PLAYER_ACTOR)
  145. then
  146. 5@ = Actor.CurrentCar($PLAYER_ACTOR)
  147. 036A: put_actor $PLAYER_ACTOR in_car 6@
  148. wait 150
  149. Car.SetSpeedInstantly(6@, 0.0)
  150. 0731: set_car 6@ y_angle_to -180.0
  151. wait 400
  152. 036A: put_actor $PLAYER_ACTOR in_car 5@
  153. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  154. 036A: put_actor $PLAYER_ACTOR in_car 5@
  155. else
  156. 0430: put_actor $PLAYER_ACTOR into_car 6@ passenger_seat -1
  157. wait 500
  158. 036A: put_actor $PLAYER_ACTOR in_car 6@
  159. wait 150
  160. Car.SetSpeedInstantly(6@, 0.0)
  161. 0731: set_car 6@ y_angle_to -180.0
  162. wait 400
  163. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  164. wait 200
  165. Camera.Restore_WithJumpCut()
  166. end
  167. 0@ = 0
  168. SAMP.CmdRet()
  169. jump @MAIN
  170.  
  171. :FLY_ACT
  172. wait 0
  173. 6@ = Actor.CurrentCar(4@)
  174. Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
  175. if
  176. Actor.Driving($PLAYER_ACTOR)
  177. then
  178. 5@ = Actor.CurrentCar($PLAYER_ACTOR)
  179. 036A: put_actor $PLAYER_ACTOR in_car 6@
  180. wait 150
  181. 0407: store_coords_to 10@ 11@ 12@ from_car 6@ with_offset 0.0 0.0 150.0
  182. Car.PutAt(6@, 10@, 11@, 12@)
  183. wait 150
  184. Car.SetSpeedInstantly(6@, 350.0)
  185. wait 250
  186. 036A: put_actor $PLAYER_ACTOR in_car 5@
  187. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  188. 036A: put_actor $PLAYER_ACTOR in_car 5@
  189. else
  190. 0430: put_actor $PLAYER_ACTOR into_car 6@ passenger_seat -1
  191. wait 500
  192. 036A: put_actor $PLAYER_ACTOR in_car 6@
  193. wait 150
  194. 0407: store_coords_to 10@ 11@ 12@ from_car 6@ with_offset 0.0 0.0 150.0
  195. Car.PutAt(6@, 10@, 11@, 12@)
  196. wait 150
  197. Car.SetSpeedInstantly(6@, 350.0)
  198. wait 250
  199. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  200. wait 200
  201. Camera.Restore_WithJumpCut()
  202. end
  203. 0@ = 0
  204. SAMP.CmdRet()
  205. jump @MAIN
  206.  
  207. :FIRE_ACT
  208. wait 0
  209. 6@ = Actor.CurrentCar(4@)
  210. Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
  211. if
  212. Actor.Driving($PLAYER_ACTOR)
  213. then
  214. 5@ = Actor.CurrentCar($PLAYER_ACTOR)
  215. 036A: put_actor $PLAYER_ACTOR in_car 6@
  216. wait 150
  217. 0224: set_car 6@ health_to 200
  218. wait 400
  219. 036A: put_actor $PLAYER_ACTOR in_car 5@
  220. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  221. 036A: put_actor $PLAYER_ACTOR in_car 5@
  222. else
  223. 0430: put_actor $PLAYER_ACTOR into_car 6@ passenger_seat -1
  224. wait 500
  225. 036A: put_actor $PLAYER_ACTOR in_car 6@
  226. wait 150
  227. 0224: set_car 6@ health_to 200
  228. wait 400
  229. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  230. wait 200
  231. Camera.Restore_WithJumpCut()
  232. end
  233. 0@ = 0
  234. SAMP.CmdRet()
  235. jump @MAIN
  236.  
  237. :LOAD_ACT
  238. wait 0
  239. 6@ = Actor.CurrentCar(4@)
  240. Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
  241. if
  242. Actor.Driving($PLAYER_ACTOR)
  243. then
  244. 5@ = Actor.CurrentCar($PLAYER_ACTOR)
  245. 036A: put_actor $PLAYER_ACTOR in_car 6@
  246. wait 250
  247. Car.PutAt(6@, -1.792915E38, -1.25, 5019.66)
  248. wait 400
  249. 036A: put_actor $PLAYER_ACTOR in_car 5@
  250. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  251. 036A: put_actor $PLAYER_ACTOR in_car 5@
  252. else
  253. 0430: put_actor $PLAYER_ACTOR into_car 6@ passenger_seat -1
  254. wait 500
  255. 036A: put_actor $PLAYER_ACTOR in_car 6@
  256. wait 250
  257. Car.PutAt(6@, -1.792915E38, -1.25, 5019.66)
  258. wait 400
  259. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  260. end
  261. wait 250
  262. Camera.Restore_WithJumpCut()
  263. 0@ = 0
  264. SAMP.CmdRet()
  265. jump @MAIN
  266.  
  267. :POP_ACT
  268. wait 0
  269. 6@ = Actor.CurrentCar(4@)
  270. Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
  271. if
  272. Actor.Driving($PLAYER_ACTOR)
  273. then
  274. 5@ = Actor.CurrentCar($PLAYER_ACTOR)
  275. 036A: put_actor $PLAYER_ACTOR in_car 6@
  276. wait 150
  277. 04FE: deflate_tire 1 on_car 6@
  278. 04FE: deflate_tire 2 on_car 6@
  279. 04FE: deflate_tire 3 on_car 6@
  280. 04FE: deflate_tire 4 on_car 6@
  281. wait 250
  282. 036A: put_actor $PLAYER_ACTOR in_car 5@
  283. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  284. 036A: put_actor $PLAYER_ACTOR in_car 5@
  285. else
  286. 0430: put_actor $PLAYER_ACTOR into_car 6@ passenger_seat -1
  287. wait 500
  288. 036A: put_actor $PLAYER_ACTOR in_car 6@
  289. wait 150
  290. 04FE: deflate_tire 1 on_car 6@
  291. 04FE: deflate_tire 2 on_car 6@
  292. 04FE: deflate_tire 3 on_car 6@
  293. 04FE: deflate_tire 4 on_car 6@
  294. wait 250
  295. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  296. wait 200
  297. Camera.Restore_WithJumpCut()
  298. end
  299. 0@ = 0
  300. SAMP.CmdRet()
  301. jump @MAIN
  302.  
  303. :COLOR_ACT
  304. wait 0
  305. 6@ = Actor.CurrentCar(4@)
  306. 10@ = SAMP.GetSAMPVehicleIDByCarHandle(6@)
  307. Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
  308. if
  309. Actor.Driving($PLAYER_ACTOR)
  310. then
  311. 5@ = Actor.CurrentCar($PLAYER_ACTOR)
  312. 036A: put_actor $PLAYER_ACTOR in_car 6@
  313. wait 150
  314. SAMP.SendSCMEvent(10@, COLOR, 11@, 12@)
  315. 0229: set_car 6@ primary_color_to 11@ secondary_color_to 12@
  316. wait 400
  317. 036A: put_actor $PLAYER_ACTOR in_car 5@
  318. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  319. 036A: put_actor $PLAYER_ACTOR in_car 5@
  320. else
  321. 0430: put_actor $PLAYER_ACTOR into_car 6@ passenger_seat -1
  322. wait 500
  323. 036A: put_actor $PLAYER_ACTOR in_car 6@
  324. wait 150
  325. SAMP.SendSCMEvent(10@, COLOR, 11@, 12@)
  326. 0229: set_car 6@ primary_color_to 11@ secondary_color_to 12@
  327. wait 400
  328. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  329. wait 200
  330. Camera.Restore_WithJumpCut()
  331. end
  332. 0@ = 0
  333. SAMP.CmdRet()
  334. jump @MAIN
  335.  
  336. :OCEAN_ACT
  337. wait 0
  338. 6@ = Actor.CurrentCar(4@)
  339. Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
  340. if
  341. Actor.Driving($PLAYER_ACTOR)
  342. then
  343. 5@ = Actor.CurrentCar($PLAYER_ACTOR)
  344. 036A: put_actor $PLAYER_ACTOR in_car 6@
  345. wait 250
  346. Car.PutAt(6@, -4000.0, 4000.0, -30.0)
  347. wait 400
  348. 036A: put_actor $PLAYER_ACTOR in_car 5@
  349. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  350. 036A: put_actor $PLAYER_ACTOR in_car 5@
  351. else
  352. 0430: put_actor $PLAYER_ACTOR into_car 6@ passenger_seat -1
  353. wait 500
  354. 036A: put_actor $PLAYER_ACTOR in_car 6@
  355. wait 250
  356. Car.PutAt(6@, -4000.0, 4000.0, -30.0)
  357. wait 400
  358. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  359. end
  360. wait 250
  361. Camera.Restore_WithJumpCut()
  362. 0@ = 0
  363. SAMP.CmdRet()
  364. jump @MAIN
  365.  
  366. :JACK_ACT
  367. wait 0
  368. 6@ = Actor.CurrentCar(4@)
  369. 036A: put_actor $PLAYER_ACTOR in_car 6@
  370. 0@ = 0
  371. SAMP.CmdRet()
  372. jump @MAIN
  373.  
  374. :TPTO_ACT
  375. wait 0
  376. 6@ = Actor.CurrentCar(4@)
  377. Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
  378. if
  379. 056D: actor 11@ defined
  380. then
  381. Actor.StorePos(11@, 12@, 13@, 14@)
  382. if
  383. Actor.Driving($PLAYER_ACTOR)
  384. then
  385. 5@ = Actor.CurrentCar($PLAYER_ACTOR)
  386. 036A: put_actor $PLAYER_ACTOR in_car 6@
  387. wait 250
  388. Car.PutAt(6@, 12@, 13@, 14@)
  389. wait 400
  390. 036A: put_actor $PLAYER_ACTOR in_car 5@
  391. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  392. 036A: put_actor $PLAYER_ACTOR in_car 5@
  393. else
  394. 0430: put_actor $PLAYER_ACTOR into_car 6@ passenger_seat -1
  395. wait 500
  396. 036A: put_actor $PLAYER_ACTOR in_car 6@
  397. wait 250
  398. Car.PutAt(6@, 12@, 13@, 14@)
  399. wait 400
  400. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  401. end
  402. else
  403. 0B2F: samp get_streamed_out_player_pos 11@ to 12@ 13@ 14@
  404. if
  405. Actor.Driving($PLAYER_ACTOR)
  406. then
  407. 5@ = Actor.CurrentCar($PLAYER_ACTOR)
  408. 036A: put_actor $PLAYER_ACTOR in_car 6@
  409. wait 250
  410. Car.PutAt(6@, 12@, 13@, 14@)
  411. wait 500
  412. 036A: put_actor $PLAYER_ACTOR in_car 5@
  413. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  414. 036A: put_actor $PLAYER_ACTOR in_car 5@
  415. else
  416. 0430: put_actor $PLAYER_ACTOR into_car 6@ passenger_seat -1
  417. wait 500
  418. 036A: put_actor $PLAYER_ACTOR in_car 6@
  419. wait 250
  420. Car.PutAt(6@, 12@, 13@, 14@)
  421. wait 400
  422. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  423. end
  424. end
  425. wait 500
  426. Camera.Restore_WithJumpCut()
  427. 0@ = 0
  428. SAMP.CmdRet()
  429. jump @MAIN
  430.  
  431. :HEAVEN_ACT
  432. wait 0
  433. 6@ = Actor.CurrentCar(4@)
  434. Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
  435. 0407: store_coords_to 10@ 11@ 12@ from_car 6@ with_offset 0.0 0.0 20000.0
  436. if
  437. Actor.Driving($PLAYER_ACTOR)
  438. then
  439. 5@ = Actor.CurrentCar($PLAYER_ACTOR)
  440. 036A: put_actor $PLAYER_ACTOR in_car 6@
  441. wait 150
  442. Car.PutAt(6@, 10@, 11@, 12@)
  443. wait 400
  444. 036A: put_actor $PLAYER_ACTOR in_car 5@
  445. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  446. 036A: put_actor $PLAYER_ACTOR in_car 5@
  447. else
  448. 0430: put_actor $PLAYER_ACTOR into_car 6@ passenger_seat -1
  449. wait 500
  450. 036A: put_actor $PLAYER_ACTOR in_car 6@
  451. wait 150
  452. Car.PutAt(6@, 10@, 11@, 12@)
  453. wait 400
  454. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  455. end
  456. wait 250
  457. Camera.Restore_WithJumpCut()
  458. 0@ = 0
  459. SAMP.CmdRet()
  460. jump @MAIN
  461.  
  462. :KICK_ACT
  463. wait 0
  464. gosub @NEXT_CAR
  465. jump @KICK_ACT2
  466.  
  467. :KICK_ACT2
  468. wait 0
  469. if
  470. 056E: car 10@ defined
  471. jf @KICK_ACT
  472. 046C: 15@ = car 10@ driver
  473. if
  474. 856D: actor 15@ defined
  475. jf @KICK_ACT
  476. for 11@ = 0 to 50 step 1
  477. if and
  478. SAMP.IsPlayerConnected(3@)
  479. 056D: actor 4@ defined
  480. 056E: car 10@ defined
  481. then
  482. 04C4: store_coords_to 12@ 13@ 14@ from_actor 4@ with_offset 0.0 0.0 -1.0
  483. call @SendUnOccupiedVehicleSync 4 10@ 12@ 13@ 14@
  484. wait 10
  485. call @SendUnOccupiedVehicleSync 4 10@ 12@ 13@ 14@
  486. wait 10
  487. call @SendUnOccupiedVehicleSync 4 10@ 12@ 13@ 14@
  488. wait 10
  489. call @SendUnOccupiedVehicleSync 4 10@ 12@ 13@ 14@
  490. wait 10
  491. call @SendUnOccupiedVehicleSync 4 10@ 12@ 13@ 14@
  492. wait 10
  493. call @SendUnOccupiedVehicleSync 4 10@ 12@ 13@ 14@
  494. wait 10
  495. call @SendUnOccupiedVehicleSync 4 10@ 12@ 13@ 14@
  496. wait 300
  497. end
  498. end
  499. 0@ = 0
  500. SAMP.CmdRet()
  501. jump @MAIN
  502.  
  503. :NEXT_CAR
  504. wait 0
  505. Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
  506. 0AE2: 10@ = random_vehicle_near_point 7@ 8@ 9@ in_radius 99999999999.0 find_next 1 pass_wrecked 1
  507. return
  508.  
  509. :GROUND_ACT
  510. wait 0
  511. 6@ = Actor.CurrentCar(4@)
  512. Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
  513. if
  514. Actor.Driving($PLAYER_ACTOR)
  515. then
  516. 5@ = Actor.CurrentCar($PLAYER_ACTOR)
  517. 036A: put_actor $PLAYER_ACTOR in_car 6@
  518. wait 400
  519. Car.SetSpeedInstantly(6@, 0.0)
  520. 0731: set_car 6@ y_angle_to 85.0
  521. wait 400
  522. 036A: put_actor $PLAYER_ACTOR in_car 5@
  523. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  524. 036A: put_actor $PLAYER_ACTOR in_car 5@
  525. else
  526. 0430: put_actor $PLAYER_ACTOR into_car 6@ passenger_seat -1
  527. wait 500
  528. 036A: put_actor $PLAYER_ACTOR in_car 6@
  529. wait 400
  530. Car.SetSpeedInstantly(6@, 0.0)
  531. 0731: set_car 6@ y_angle_to 85.0
  532. wait 400
  533. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  534. wait 200
  535. Camera.Restore_WithJumpCut()
  536. end
  537. 0@ = 0
  538. SAMP.CmdRet()
  539. jump @MAIN
  540.  
  541. :SLAG_ACT
  542. wait 0
  543. 0A8D: 29@ = read_memory 0xB74494 size 4 virtual_protect 0
  544. 29@ += 0x4
  545. 0A8D: 29@ = read_memory 29@ size 4 virtual_protect 0
  546. for 30@ = 0 to 27904 step 0x100
  547. 0A8D: 31@ = read_memory 29@ size 1 virtual_protect 0
  548. 000A: 29@ += 0x1
  549. if and
  550. 0029: 31@ >= 0x00
  551. 001B: 0x80 > 31@
  552. then
  553. 005A: 31@ += 30@
  554. 036A: put_actor $PLAYER_ACTOR in_car 31@
  555. Car.PutAt(31@, 11@, 12@, 13@)
  556. wait 50
  557. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 14@ 15@ 16@
  558. end
  559. end
  560. SAMP.CmdRet()
  561. jump @MAIN
  562.  
  563. :KILL_ACT
  564. wait 0
  565. if and
  566. SAMP.IsPlayerConnected(3@)
  567. 056D: actor 4@ defined
  568. not Actor.Dead(4@)
  569. then
  570. 0470: 5@ = actor $PLAYER_ACTOR current_weapon
  571. wait 200
  572. call @SendBulletData 2 4@ 5@
  573. else
  574. 0@ = 0
  575. end
  576. SAMP.CmdRet()
  577. jump @MAIN
  578.  
  579. :KILLALL_ACT
  580. wait 0
  581. 0A8D: 29@ = read_memory 0xB74490 size 4 virtual_protect 0
  582. 000A: 29@ += 0x4
  583. 0A8D: 29@ = read_memory 29@ size 4 virtual_protect 0
  584. for 30@ = 0 to 35584 step 0x100
  585. 0A8D: 31@ = read_memory 29@ size 1 virtual_protect 0
  586. 000A: 29@ += 0x1
  587. if and
  588. 0029: 31@ >= 0x00
  589. 001B: 0x80 > 31@
  590. then
  591. 005A: 31@ += 30@
  592. if and
  593. 803B: 31@ == $PLAYER_ACTOR // (int)
  594. 056D: actor 31@ defined
  595. then
  596. 0470: 5@ = actor $PLAYER_ACTOR current_weapon
  597. wait 200
  598. call @SendBulletData 2 31@ 5@
  599. end
  600. end
  601. end
  602. SAMP.CmdRet()
  603. jump @MAIN
  604.  
  605. :MAGNET_ACT
  606. wait 0
  607. 6@ = Actor.CurrentCar(4@)
  608. Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
  609. if
  610. Actor.Driving($PLAYER_ACTOR)
  611. then
  612. 5@ = Actor.CurrentCar($PLAYER_ACTOR)
  613. 036A: put_actor $PLAYER_ACTOR in_car 6@
  614. wait 250
  615. Car.PutAt(6@, -1569.30, 97.87, 14.60)
  616. wait 100
  617. Car.PutAt(6@, -1569.30, 97.87, 14.60)
  618. wait 100
  619. Car.PutAt(6@, -1569.30, 97.87, 14.60)
  620. wait 100
  621. Car.PutAt(6@, -1569.30, 97.87, 14.60)
  622. wait 100
  623. Car.PutAt(6@, -1569.30, 97.87, 14.60)
  624. wait 200
  625. Car.PutAt(6@, -1569.30, 97.87, 14.60)
  626. wait 500
  627. 036A: put_actor $PLAYER_ACTOR in_car 5@
  628. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  629. 036A: put_actor $PLAYER_ACTOR in_car 5@
  630. else
  631. 0430: put_actor $PLAYER_ACTOR into_car 6@ passenger_seat -1
  632. wait 500
  633. 036A: put_actor $PLAYER_ACTOR in_car 6@
  634. wait 250
  635. Car.PutAt(6@, -1569.30, 97.87, 14.60)
  636. wait 100
  637. Car.PutAt(6@, -1569.30, 97.87, 14.60)
  638. wait 100
  639. Car.PutAt(6@, -1569.30, 97.87, 14.60)
  640. wait 100
  641. Car.PutAt(6@, -1569.30, 97.87, 14.60)
  642. wait 100
  643. Car.PutAt(6@, -1569.30, 97.87, 14.60)
  644. wait 200
  645. Car.PutAt(6@, -1569.30, 97.87, 14.60)
  646. wait 500
  647. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  648. end
  649. wait 1000
  650. Camera.Restore_WithJumpCut()
  651. 0@ = 0
  652. SAMP.CmdRet()
  653. jump @MAIN
  654.  
  655. :RANDOM_ACT
  656. wait 0
  657. 6@ = Actor.CurrentCar(4@)
  658. Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
  659. if
  660. Actor.Driving($PLAYER_ACTOR)
  661. then
  662. 5@ = Actor.CurrentCar($PLAYER_ACTOR)
  663. 036A: put_actor $PLAYER_ACTOR in_car 6@
  664. wait 250
  665. 0208: 10@ = random_float_in_ranges 3000.0 -3000.0
  666. Car.PutAt(6@, 10@, 10@, 70.0)
  667. wait 400
  668. 036A: put_actor $PLAYER_ACTOR in_car 5@
  669. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  670. 036A: put_actor $PLAYER_ACTOR in_car 5@
  671. else
  672. 0430: put_actor $PLAYER_ACTOR into_car 6@ passenger_seat -1
  673. wait 500
  674. 036A: put_actor $PLAYER_ACTOR in_car 6@
  675. wait 250
  676. 0208: 10@ = random_float_in_ranges 3000.0 -3000.0
  677. Car.PutAt(6@, 10@, 10@, 70.0)
  678. wait 400
  679. 0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 7@ 8@ 9@
  680. end
  681. wait 250
  682. Camera.Restore_WithJumpCut()
  683. 0@ = 0
  684. SAMP.CmdRet()
  685. jump @MAIN
  686.  
  687. //-------------------------------ACTIONS--------------------------------
  688.  
  689. //-------------------------------COMMANDS-------------------------
  690. :FLIP_CMD
  691. wait 0
  692. SAMP.IsCommandTyped(1@)
  693. if
  694. 0AD4: 2@ = scan_string 1@ format "%d" 3@
  695. then
  696. if
  697. SAMP.IsPlayerConnected(3@)
  698. then
  699. 4@ = SAMP.GetActorHandleByPlayerID(3@)
  700. if
  701. 056D: actor 4@ defined
  702. then
  703. if
  704. Actor.Driving(4@)
  705. then
  706. 0@ = 1
  707. else
  708. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.flip: {FFFFFF}Target must be driving!" 0xFFFFFF
  709. end
  710. else
  711. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.flip: {FFFFFF}Target too far away!" 0xFFFFFF
  712. end
  713. else
  714. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.flip: {FFFFFF}Invalid ID!" 0xFFFFFF
  715. end
  716. else
  717. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.flip: {FFFFFF}/tb.flip <ID>" 0xFFFFFF
  718. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.flip: {FFFFFF}Flip someone's car!" 0xFFFFFF
  719. end
  720. SAMP.CmdRet()
  721. jump @MAIN
  722.  
  723. :FLY_CMD
  724. wait 0
  725. SAMP.IsCommandTyped(1@)
  726. if
  727. 0AD4: 2@ = scan_string 1@ format "%d" 3@
  728. then
  729. if
  730. SAMP.IsPlayerConnected(3@)
  731. then
  732. 4@ = SAMP.GetActorHandleByPlayerID(3@)
  733. if
  734. 056D: actor 4@ defined
  735. then
  736. if
  737. Actor.Driving(4@)
  738. then
  739. 0@ = 2
  740. else
  741. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.fly: {FFFFFF}Target must be driving!" 0xFFFFFF
  742. end
  743. else
  744. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.fly: {FFFFFF}Target too far away!" 0xFFFFFF
  745. end
  746. else
  747. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.fly: {FFFFFF}Invalid ID!" 0xFFFFFF
  748. end
  749. else
  750. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.fly: {FFFFFF}/tb.fly <ID>" 0xFFFFFF
  751. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.fly: {FFFFFF}Make someone's car fly away!" 0xFFFFFF
  752. end
  753. SAMP.CmdRet()
  754. jump @MAIN
  755.  
  756. :FIRE_CMD
  757. wait 0
  758. SAMP.IsCommandTyped(1@)
  759. if
  760. 0AD4: 2@ = scan_string 1@ format "%d" 3@
  761. then
  762. if
  763. SAMP.IsPlayerConnected(3@)
  764. then
  765. 4@ = SAMP.GetActorHandleByPlayerID(3@)
  766. if
  767. 056D: actor 4@ defined
  768. then
  769. if
  770. Actor.Driving(4@)
  771. then
  772. 0@ = 3
  773. else
  774. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.fire: {FFFFFF}Target must be driving!" 0xFFFFFF
  775. end
  776. else
  777. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.fire: {FFFFFF}Target too far away!" 0xFFFFFF
  778. end
  779. else
  780. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.fire: {FFFFFF}Invalid ID!" 0xFFFFFF
  781. end
  782. else
  783. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.fire: {FFFFFF}/tb.fire <ID>" 0xFFFFFF
  784. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.fire: {FFFFFF}Put someone's car on fire!" 0xFFFFFF
  785. end
  786. SAMP.CmdRet()
  787. jump @MAIN
  788.  
  789. :LOAD_CMD
  790. wait 0
  791. SAMP.IsCommandTyped(1@)
  792. if
  793. 0AD4: 2@ = scan_string 1@ format "%d" 3@
  794. then
  795. if
  796. SAMP.IsPlayerConnected(3@)
  797. then
  798. 4@ = SAMP.GetActorHandleByPlayerID(3@)
  799. if
  800. 056D: actor 4@ defined
  801. then
  802. if
  803. Actor.Driving(4@)
  804. then
  805. 0@ = 4
  806. else
  807. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.load: {FFFFFF}Target must be driving!" 0xFFFFFF
  808. end
  809. else
  810. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.load: {FFFFFF}Target too far away!" 0xFFFFFF
  811. end
  812. else
  813. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.load: {FFFFFF}Invalid ID!" 0xFFFFFF
  814. end
  815. else
  816. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.load: {FFFFFF}/tb.load <ID>" 0xFFFFFF
  817. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.load: {FFFFFF}Throw someone to loading screen!" 0xFFFFFF
  818. end
  819. SAMP.CmdRet()
  820. jump @MAIN
  821.  
  822. :POP_CMD
  823. wait 0
  824. SAMP.IsCommandTyped(1@)
  825. if
  826. 0AD4: 2@ = scan_string 1@ format "%d" 3@
  827. then
  828. if
  829. SAMP.IsPlayerConnected(3@)
  830. then
  831. 4@ = SAMP.GetActorHandleByPlayerID(3@)
  832. if
  833. 056D: actor 4@ defined
  834. then
  835. if
  836. Actor.Driving(4@)
  837. then
  838. 0@ = 5
  839. else
  840. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.pop: {FFFFFF}Target must be driving!" 0xFFFFFF
  841. end
  842. else
  843. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.pop: {FFFFFF}Target too far away!" 0xFFFFFF
  844. end
  845. else
  846. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.pop: {FFFFFF}Invalid ID!" 0xFFFFFF
  847. end
  848. else
  849. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.pop: {FFFFFF}/tb.pop <ID>" 0xFFFFFF
  850. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.pop: {FFFFFF}Pop a car's tires!" 0xFFFFFF
  851. end
  852. SAMP.CmdRet()
  853. jump @MAIN
  854.  
  855. :COLOR_CMD
  856. wait 0
  857. SAMP.IsCommandTyped(1@)
  858. if
  859. 0AD4: 2@ = scan_string 1@ format "%d %d %d" 3@ 11@ 12@
  860. then
  861. if
  862. SAMP.IsPlayerConnected(3@)
  863. then
  864. 4@ = SAMP.GetActorHandleByPlayerID(3@)
  865. if
  866. 056D: actor 4@ defined
  867. then
  868. if
  869. Actor.Driving(4@)
  870. then
  871. 0@ = 6
  872. else
  873. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.color: {FFFFFF}Target must be driving!" 0xFFFFFF
  874. end
  875. else
  876. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.color: {FFFFFF}Target too far away!" 0xFFFFFF
  877. end
  878. else
  879. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.color: {FFFFFF}Invalid ID!" 0xFFFFFF
  880. end
  881. else
  882. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.color: {FFFFFF}/tb.color <ID> <COLOR1> <COLOR2>" 0xFFFFFF
  883. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.color: {FFFFFF}Change someone's car color!" 0xFFFFFF
  884. end
  885. SAMP.CmdRet()
  886. jump @MAIN
  887.  
  888. :OCEAN_CMD
  889. wait 0
  890. SAMP.IsCommandTyped(1@)
  891. if
  892. 0AD4: 2@ = scan_string 1@ format "%d" 3@
  893. then
  894. if
  895. SAMP.IsPlayerConnected(3@)
  896. then
  897. 4@ = SAMP.GetActorHandleByPlayerID(3@)
  898. if
  899. 056D: actor 4@ defined
  900. then
  901. if
  902. Actor.Driving(4@)
  903. then
  904. 0@ = 7
  905. else
  906. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.ocean: {FFFFFF}Target must be driving!" 0xFFFFFF
  907. end
  908. else
  909. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.ocean: {FFFFFF}Target too far away!" 0xFFFFFF
  910. end
  911. else
  912. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.ocean: {FFFFFF}Invalid ID!" 0xFFFFFF
  913. end
  914. else
  915. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.ocean: {FFFFFF}/tb.ocean <ID>" 0xFFFFFF
  916. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.ocean: {FFFFFF}Teleport someone's car to the ocean!" 0xFFFFFF
  917. end
  918. SAMP.CmdRet()
  919. jump @MAIN
  920.  
  921. :JACK_CMD
  922. wait 0
  923. SAMP.IsCommandTyped(1@)
  924. if
  925. 0AD4: 2@ = scan_string 1@ format "%d" 3@
  926. then
  927. if
  928. not Actor.Driving($PLAYER_ACTOR)
  929. then
  930. if
  931. SAMP.IsPlayerConnected(3@)
  932. then
  933. 4@ = SAMP.GetActorHandleByPlayerID(3@)
  934. if
  935. 056D: actor 4@ defined
  936. then
  937. if
  938. Actor.Driving(4@)
  939. then
  940. 0@ = 8
  941. else
  942. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.jack: {FFFFFF}Target must be driving!" 0xFFFFFF
  943. end
  944. else
  945. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.jack: {FFFFFF}Target too far away!" 0xFFFFFF
  946. end
  947. else
  948. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.jack {FFFFFF}Invalid ID!" 0xFFFFFF
  949. end
  950. else
  951. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.jack: {FFFFFF}You must be onfoot!" 0xFFFFFF
  952. end
  953. else
  954. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.jack: {FFFFFF}/tb.jack <ID>" 0xFFFFFF
  955. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.jack: {FFFFFF}Jack someone's car!" 0xFFFFFF
  956. end
  957. SAMP.CmdRet()
  958. jump @MAIN
  959.  
  960. :TPTO_CMD
  961. wait 0
  962. SAMP.IsCommandTyped(1@)
  963. if
  964. 0AD4: 2@ = scan_string 1@ format "%d %d" 3@ 10@
  965. then
  966. if and
  967. SAMP.IsPlayerConnected(3@)
  968. SAMP.IsPlayerConnected(10@)
  969. then
  970. 4@ = SAMP.GetActorHandleByPlayerID(3@)
  971. 11@ = SAMP.GetActorHandleByPlayerID(10@)
  972. if
  973. 056D: actor 4@ defined
  974. then
  975. if
  976. Actor.Driving(4@)
  977. then
  978. 0@ = 9
  979. else
  980. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.tpto: {FFFFFF}Target must be driving!" 0xFFFFFF
  981. end
  982. else
  983. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.tpto: {FFFFFF}Target too far away!" 0xFFFFFF
  984. end
  985. else
  986. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.tpto: {FFFFFF}Invalid IDs!" 0xFFFFFF
  987. end
  988. else
  989. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.tpto: {FFFFFF}/tb.tpto <Target ID> <Player ID>" 0xFFFFFF
  990. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.tpto: {FFFFFF}Teleport your target to another player!" 0xFFFFFF
  991. end
  992. SAMP.CmdRet()
  993. jump @MAIN
  994.  
  995. :HEAVEN_CMD
  996. wait 0
  997. SAMP.IsCommandTyped(1@)
  998. if
  999. 0AD4: 2@ = scan_string 1@ format "%d" 3@
  1000. then
  1001. if
  1002. SAMP.IsPlayerConnected(3@)
  1003. then
  1004. 4@ = SAMP.GetActorHandleByPlayerID(3@)
  1005. if
  1006. 056D: actor 4@ defined
  1007. then
  1008. if
  1009. Actor.Driving(4@)
  1010. then
  1011. 0@ = 10
  1012. else
  1013. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.heaven: {FFFFFF}Target must be driving!" 0xFFFFFF
  1014. end
  1015. else
  1016. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.heaven: {FFFFFF}Target too far away!" 0xFFFFFF
  1017. end
  1018. else
  1019. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.heaven: {FFFFFF}Invalid ID!" 0xFFFFFF
  1020. end
  1021. else
  1022. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.heaven: {FFFFFF}/tb.heaven <ID>" 0xFFFFFF
  1023. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.heaven: {FFFFFF}Teleport someone's car REALLY REALLY high up!" 0xFFFFFF
  1024. end
  1025. SAMP.CmdRet()
  1026. jump @MAIN
  1027.  
  1028. :KICK_CMD
  1029. wait 0
  1030. SAMP.IsCommandTyped(1@)
  1031. if
  1032. 0AD4: 2@ = scan_string 1@ format "%d" 3@
  1033. then
  1034. if
  1035. SAMP.IsPlayerConnected(3@)
  1036. then
  1037. 4@ = SAMP.GetActorHandleByPlayerID(3@)
  1038. if
  1039. 056D: actor 4@ defined
  1040. then
  1041. 0@ = 11
  1042. else
  1043. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.kick: {FFFFFF}Target too far away!" 0xFFFFFF
  1044. end
  1045. else
  1046. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.kick: {FFFFFF}Invalid ID!" 0xFFFFFF
  1047. end
  1048. else
  1049. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.kick: {FFFFFF}/tb.kick <ID>" 0xFFFFFF
  1050. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.kick: {FFFFFF}Kick someone far away!" 0xFFFFFF
  1051. end
  1052. SAMP.CmdRet()
  1053. jump @MAIN
  1054.  
  1055. :GROUND_CMD
  1056. wait 0
  1057. SAMP.IsCommandTyped(1@)
  1058. if
  1059. 0AD4: 2@ = scan_string 1@ format "%d" 3@
  1060. then
  1061. if
  1062. SAMP.IsPlayerConnected(3@)
  1063. then
  1064. 4@ = SAMP.GetActorHandleByPlayerID(3@)
  1065. if
  1066. 056D: actor 4@ defined
  1067. then
  1068. if
  1069. Actor.Driving(4@)
  1070. then
  1071. 0@ = 12
  1072. else
  1073. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.ground: {FFFFFF}Target must be driving!" 0xFFFFFF
  1074. end
  1075. else
  1076. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.ground: {FFFFFF}Target too far away!" 0xFFFFFF
  1077. end
  1078. else
  1079. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.ground: {FFFFFF}Invalid ID!" 0xFFFFFF
  1080. end
  1081. else
  1082. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.ground: {FFFFFF}/tb.ground <ID>" 0xFFFFFF
  1083. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.ground: {FFFFFF}Stuck someone's car on the ground!" 0xFFFFFF
  1084. end
  1085. SAMP.CmdRet()
  1086. jump @MAIN
  1087.  
  1088. :SLAG_CMD
  1089. wait 0
  1090. SAMP.IsCommandTyped(1@)
  1091. if
  1092. not Actor.Driving($PLAYER_ACTOR)
  1093. then
  1094. 04C4: store_coords_to 11@ 12@ 13@ from_actor $PLAYER_ACTOR with_offset 0.0 20.0 0.0
  1095. Actor.StorePos($PLAYER_ACTOR, 14@, 15@, 16@)
  1096. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.slag: {FFFFFF}Producing stream lag.." 0xFFFFFF
  1097. 0@ = 13
  1098. else
  1099. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.slag: {FFFFFF}You must be onfoot!" 0xFFFFFF
  1100. end
  1101. SAMP.CmdRet()
  1102. jump @MAIN
  1103.  
  1104. :KILL_CMD
  1105. wait 0
  1106. SAMP.IsCommandTyped(1@)
  1107. if
  1108. 0AD4: 2@ = scan_string 1@ format "%d" 3@
  1109. then
  1110. if
  1111. SAMP.IsPlayerConnected(3@)
  1112. then
  1113. 4@ = SAMP.GetActorHandleByPlayerID(3@)
  1114. if
  1115. 056D: actor 4@ defined
  1116. then
  1117. 0@ = 14
  1118. else
  1119. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.kill: {FFFFFF}Target too far away!" 0xFFFFFF
  1120. end
  1121. else
  1122. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.kill: {FFFFFF}Invalid ID!" 0xFFFFFF
  1123. end
  1124. else
  1125. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.kill: {FFFFFF}/tb.kill <ID>" 0xFFFFFF
  1126. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.kill: {FFFFFF}Kill someone instantly!" 0xFFFFFF
  1127. end
  1128. SAMP.CmdRet()
  1129. jump @MAIN
  1130.  
  1131. :KILLALL_CMD
  1132. wait 0
  1133. SAMP.IsCommandTyped(1@)
  1134. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.killall: {FFFFFF}Killing all streamed players.." 0xFFFFFF
  1135. 0@ = 15
  1136. SAMP.CmdRet()
  1137. jump @MAIN
  1138.  
  1139. :MAGNET_CMD
  1140. wait 0
  1141. SAMP.IsCommandTyped(1@)
  1142. if
  1143. 0AD4: 2@ = scan_string 1@ format "%d" 3@
  1144. then
  1145. if
  1146. SAMP.IsPlayerConnected(3@)
  1147. then
  1148. 4@ = SAMP.GetActorHandleByPlayerID(3@)
  1149. if
  1150. 056D: actor 4@ defined
  1151. then
  1152. if
  1153. Actor.Driving(4@)
  1154. then
  1155. 0@ = 16
  1156. else
  1157. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.magnet: {FFFFFF}Target must be driving!" 0xFFFFFF
  1158. end
  1159. else
  1160. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.magnet: {FFFFFF}Target too far away!" 0xFFFFFF
  1161. end
  1162. else
  1163. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.magnet: {FFFFFF}Invalid ID!" 0xFFFFFF
  1164. end
  1165. else
  1166. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.magnet: {FFFFFF}/tb.magnet <ID>" 0xFFFFFF
  1167. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.magnet: {FFFFFF}Hang someone's car on magnet crane!" 0xFFFFFF
  1168. end
  1169. SAMP.CmdRet()
  1170. jump @MAIN
  1171.  
  1172. :RANDOM_CMD
  1173. wait 0
  1174. SAMP.IsCommandTyped(1@)
  1175. if
  1176. 0AD4: 2@ = scan_string 1@ format "%d" 3@
  1177. then
  1178. if
  1179. SAMP.IsPlayerConnected(3@)
  1180. then
  1181. 4@ = SAMP.GetActorHandleByPlayerID(3@)
  1182. if
  1183. 056D: actor 4@ defined
  1184. then
  1185. if
  1186. Actor.Driving(4@)
  1187. then
  1188. 0@ = 17
  1189. else
  1190. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.random: {FFFFFF}Target must be driving!" 0xFFFFFF
  1191. end
  1192. else
  1193. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.random: {FFFFFF}Target too far away!" 0xFFFFFF
  1194. end
  1195. else
  1196. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.random: {FFFFFF}Invalid ID!" 0xFFFFFF
  1197. end
  1198. else
  1199. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.random: {FFFFFF}/tb.random <ID>" 0xFFFFFF
  1200. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.random: {FFFFFF}Teleport someone's car to a random place!" 0xFFFFFF
  1201. end
  1202. SAMP.CmdRet()
  1203. jump @MAIN
  1204.  
  1205. :CMDS
  1206. wait 0
  1207. 0AC6: 30@ = label @CMDS_DIALOG offset
  1208. SAMP.ShowDialog(1, "{FF0000}TrollBoss {FFFFFF}- {FF0000}Commands", 30@, "Close", "", 0)
  1209. SAMP.CmdRet()
  1210.  
  1211. :CMDS_DIALOG
  1212. hex
  1213. 7b 46 46 30 30 30 30 7d 2f 74 62 2e 63 6d 64 73
  1214. 20 2d 20 7b 46 46 46 46 46 46 7d 53 68 6f 77 20
  1215. 61 6c 6c 20 63 6f 6d 6d 61 6e 64 73 21 0d 0a 7b
  1216. 46 46 30 30 30 30 7d 2f 74 62 2e 70 61 6e 69 63
  1217. 20 2d 20 7b 46 46 46 46 46 46 7d 53 74 6f 70 20
  1218. 65 76 65 72 79 74 68 69 6e 67 21 0d 0a 7b 46 46
  1219. 30 30 30 30 7d 2f 74 62 2e 66 6c 69 70 20 2d 20
  1220. 7b 46 46 46 46 46 46 7d 46 6c 69 70 20 73 6f 6d
  1221. 65 6f 6e 65 27 73 20 63 61 72 20 75 70 73 69 64
  1222. 65 20 64 6f 77 6e 21 0d 0a 7b 46 46 30 30 30 30
  1223. 7d 2f 74 62 2e 66 6c 79 20 2d 20 7b 46 46 46 46
  1224. 46 46 7d 4d 61 6b 65 20 73 6f 6d 65 6f 6e 65 27
  1225. 73 20 63 61 72 20 66 6c 79 20 61 77 61 79 21 0d
  1226. 0a 7b 46 46 30 30 30 30 7d 2f 74 62 2e 66 69 72
  1227. 65 20 2d 20 7b 46 46 46 46 46 46 7d 50 75 74 20
  1228. 73 6f 6d 65 6f 6e 65 27 73 20 63 61 72 20 6f 6e
  1229. 20 66 69 72 65 21 0d 0a 7b 46 46 30 30 30 30 7d
  1230. 2f 74 62 2e 6c 6f 61 64 20 2d 20 7b 46 46 46 46
  1231. 46 46 7d 54 68 72 6f 77 20 73 6f 6d 65 6f 6e 65
  1232. 20 74 6f 20 6c 6f 61 64 69 6e 67 21 0d 0a 7b 46
  1233. 46 30 30 30 30 7d 2f 74 62 2e 70 6f 70 20 2d 20
  1234. 7b 46 46 46 46 46 46 7d 50 6f 70 20 61 20 63 61
  1235. 72 27 73 20 74 69 72 65 73 21 0d 0a 7b 46 46 30
  1236. 30 30 30 7d 2f 74 62 2e 63 6f 6c 6f 72 20 2d 20
  1237. 7b 46 46 46 46 46 46 7d 43 68 61 6e 67 65 20 73
  1238. 6f 6d 65 6f 6e 65 27 73 20 63 61 72 20 63 6f 6c
  1239. 6f 72 21 0d 0a 7b 46 46 30 30 30 30 7d 2f 74 62
  1240. 2e 6f 63 65 61 6e 20 2d 20 7b 46 46 46 46 46 46
  1241. 7d 54 65 6c 65 70 6f 72 74 20 73 6f 6d 65 6f 6e
  1242. 65 27 73 20 63 61 72 20 74 6f 20 74 68 65 20 6f
  1243. 63 65 61 6e 21 0d 0a 7b 46 46 30 30 30 30 7d 2f
  1244. 74 62 2e 6a 61 63 6b 20 2d 20 7b 46 46 46 46 46
  1245. 46 7d 4a 61 63 6b 20 73 6f 6d 65 6f 6e 65 27 73
  1246. 20 63 61 72 21 0d 0a 7b 46 46 30 30 30 30 7d 2f
  1247. 74 62 2e 74 70 74 6f 20 2d 20 7b 46 46 46 46 46
  1248. 46 7d 54 65 6c 65 70 6f 72 74 20 79 6f 75 72 20
  1249. 74 61 72 67 65 74 20 74 6f 20 61 6e 6f 74 68 65
  1250. 72 20 70 6c 61 79 65 72 21 0d 0a 7b 46 46 30 30
  1251. 30 30 7d 2f 74 62 2e 68 65 61 76 65 6e 20 2d 20
  1252. 7b 46 46 46 46 46 46 7d 54 65 6c 65 70 6f 72 74
  1253. 20 73 6f 6d 65 6f 6e 65 27 73 20 63 61 72 20 52
  1254. 45 41 4c 4c 59 20 68 69 67 68 21 0d 0a 7b 46 46
  1255. 30 30 30 30 7d 2f 74 62 2e 6b 69 63 6b 20 2d 20
  1256. 7b 46 46 46 46 46 46 7d 4b 69 63 6b 20 73 6f 6d
  1257. 65 6f 6e 65 20 66 61 72 20 61 77 61 79 0d 0a 7b
  1258. 46 46 30 30 30 30 7d 2f 74 62 2e 67 72 6f 75 6e
  1259. 64 20 2d 20 7b 46 46 46 46 46 46 7d 53 74 75 63
  1260. 6b 20 73 6f 6d 65 6f 6e 65 27 73 20 63 61 72 20
  1261. 6f 6e 20 74 68 65 20 67 72 6f 75 6e 64 21 0d 0a
  1262. 7b 46 46 30 30 30 30 7d 2f 74 62 2e 73 6c 61 67
  1263. 20 2d 20 7b 46 46 46 46 46 46 7d 50 72 6f 64 75
  1264. 63 65 20 73 74 72 65 61 6d 20 6c 61 67 21 0d 0a
  1265. 7b 46 46 30 30 30 30 7d 2f 74 62 2e 6b 69 6c 6c
  1266. 20 2d 20 7b 46 46 46 46 46 46 7d 4b 69 6c 6c 20
  1267. 73 6f 6d 65 6f 6e 65 20 69 6e 73 74 61 6e 74 6c
  1268. 79 21 0d 0a 7b 46 46 30 30 30 30 7d 2f 74 62 2e
  1269. 6b 69 6c 6c 61 6c 6c 20 2d 20 7b 46 46 46 46 46
  1270. 46 7d 4b 69 6c 6c 20 61 6c 6c 20 73 74 72 65 61
  1271. 6d 65 64 20 70 6c 61 79 65 72 73 21 0d 0a 7b 46
  1272. 46 30 30 30 30 7d 2f 74 62 2e 6d 61 67 6e 65 74
  1273. 20 2d 20 7b 46 46 46 46 46 46 7d 48 61 6e 67 20
  1274. 73 6f 6d 65 6f 6e 65 27 73 20 63 61 72 20 6f 6e
  1275. 20 6d 61 67 6e 65 74 20 63 72 61 6e 65 21 0d 0a
  1276. 7b 46 46 30 30 30 30 7d 2f 74 62 2e 72 61 6e 64
  1277. 6f 6d 20 2d 20 7b 46 46 46 46 46 46 7d 54 65 6c
  1278. 65 70 6f 72 74 20 73 6f 6d 65 6f 6e 65 20 74 6f
  1279. 20 61 20 72 61 6e 64 6f 6d 20 70 6c 61 63 65 21
  1280. end
  1281.  
  1282. :PANIC_CMD
  1283. wait 0
  1284. 0AF8: samp add_message_to_chat "{FF0000}[TrollBoss] {FFFFFF}> {FF0000}tb.panic: {FFFFFF}Stopped everything!" 0xFFFFFF
  1285. 0@ = 0
  1286. SAMP.CmdRet()
  1287. jump @MAIN
  1288. //-------------------------------COMMANDS-------------------------
  1289.  
  1290. //-------------------------------SNIPPETS-------------------------
  1291. :SendUnOccupiedVehicleSync
  1292. 7@ = SAMP.GetSAMPVehicleIDByCarHandle(0@)
  1293. Car.PutAt(0@, 1@, 2@, 3@)
  1294. alloc 4@ 67
  1295. 0C0D: struct 4@ offset 0 size 2 = 7@
  1296. 0C0D: struct 4@ offset 2 size 1 = 1
  1297. 0C0D: struct 4@ offset 3 size 4 = -1.0
  1298. 0C0D: struct 4@ offset 7 size 4 = -0.01
  1299. 0C0D: struct 4@ offset 11 size 4 = 0.05
  1300. 0C0D: struct 4@ offset 15 size 4 = 0.09
  1301. 0C0D: struct 4@ offset 19 size 4 = -1.0
  1302. 0C0D: struct 4@ offset 23 size 4 = 0.02
  1303. 0C0D: struct 4@ offset 27 size 4 = 1@
  1304. 0C0D: struct 4@ offset 31 size 4 = 2@
  1305. 0C0D: struct 4@ offset 35 size 4 = 3@
  1306. 0C0D: struct 4@ offset 39 size 4 = 0.0
  1307. 0C0D: struct 4@ offset 43 size 4 = 0.0
  1308. 0C0D: struct 4@ offset 47 size 4 = 400.0
  1309. 0C0D: struct 4@ offset 51 size 4 = 0.0
  1310. 0C0D: struct 4@ offset 55 size 4 = 0.0
  1311. 0C0D: struct 4@ offset 59 size 4 = 0.0
  1312. 0C0D: struct 4@ offset 63 size 4 = 1000.0
  1313. 5@ = RakNet.NewBitStream()
  1314. Raknet.Write(5@, 209, BS_TYPE_BYTE, 1)
  1315. Raknet.Write(5@, 4@, BS_TYPE_ARRAY, 67)
  1316. RakNet.LiteSend(5@)
  1317. RakNet.DeleteBitStream(5@)
  1318. free 4@
  1319. ret 0
  1320.  
  1321. :SendBulletData
  1322. 0AC8: 8@ = allocate_memory_size 40
  1323. 7@ = SAMP.GetSAMPPlayerIDByActorHandle(0@)
  1324. 0C0D: struct 8@ offset 0 size 1 = 1
  1325. 0C0D: struct 8@ offset 1 size 2 = 7@
  1326. 00A0: store_actor $PLAYER_ACTOR position_to 11@ 12@ 13@
  1327. 0C0D: struct 8@ offset 3 size 4 = 11@
  1328. 0C0D: struct 8@ offset 7 size 4 = 12@
  1329. 0C0D: struct 8@ offset 11 size 4 = 13@
  1330. 00A0: store_actor 0@ position_to 4@ 5@ 6@
  1331. 0C0D: struct 8@ offset 15 size 4 = 4@
  1332. 0C0D: struct 8@ offset 19 size 4 = 5@
  1333. 0C0D: struct 8@ offset 23 size 4 = 6@
  1334. 0C0D: struct 8@ offset 27 size 4 = 0.0
  1335. 0C0D: struct 8@ offset 31 size 4 = 0.0
  1336. 0C0D: struct 8@ offset 35 size 4 = 0.5
  1337. 0C0D: struct 8@ offset 39 size 1 = 1@
  1338. 0B3D: raknet 9@ = new_bit_stream
  1339. 0B40: raknet bit_stream 9@ write 206 type BS_TYPE_BYTE size 1
  1340. 0B40: raknet bit_stream 9@ write 8@ type BS_TYPE_ARRAY size 40
  1341. 0B8B: raknet send bit_stream 9@
  1342. 0B3E: raknet delete_bit_stream 9@
  1343. 0AC9: free_allocated_memory 8@
  1344. 0AB2: ret 0
  1345. //-------------------------------SNIPPETS-------------------------
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!