API tools faq
paste
Guest User

Tuneable Rides!

a guest
Sep 19th, 2012
926
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 7.26 KB | None | 0 0
raw download clone embed print report
  1. //all by XtremeR
  2. #include <a_samp>
  3. #include <zcmd>
  4. new tune[MAX_PLAYERS];
  5. new o;
  6. new ob2;
  7. new ob3;
  8. new ob4;
  9. new ob5;
  10. new ob6;
  11. new ob7;
  12. new ob8;
  13. new ob9;
  14. new ob10;
  15. new ob11;
  16. new ob12;
  17. new ob13;
  18. new ob14;
  19. new ob15;
  20. new ob16;
  21. new ob17;
  22. new ob18;
  23. new ob19;
  24. new ob20;
  25. new ob21;
  26. new ob22;
  27. #if defined FILTERSCRIPT
  28.  
  29. public OnFilterScriptInit()
  30. {
  31.     print("\n--------------------------------------");
  32.     print("Tune Able Cars FS By XtremeR");
  33.     print("--------------------------------------\n");
  34.     return 1;
  35. }
  36.  
  37. public OnFilterScriptExit()
  38. {
  39.     return 1;
  40. }
  41. #endif
  42.  
  43.  
  44. public OnPlayerExitVehicle(playerid, vehicleid)
  45. {
  46.     if (tune[playerid] == 1)
  47.     {
  48.      o = CreateObject(1006,0,0,-1000,0,0,0,100);
  49.      ob2 = CreateObject(1161,0,0,-1000,0,0,0,100);
  50.      ob3 = CreateObject(1161,0,0,-1000,0,0,0,100);
  51.      ob4 = CreateObject(1059,0,0,-1000,0,0,0,100);
  52.      ob5 = CreateObject(1146,0,0,-1000,0,0,0,100);
  53.      ob6 = CreateObject(1006,0,0,-1000,0,0,0,100);
  54.      ob7 = CreateObject(1146,0,0,-1000,0,0,0,100);
  55.      ob8 = CreateObject(1006,0,0,-1000,0,0,0,100);
  56.      ob9 = CreateObject(1006,0,0,-1000,0,0,0,100);
  57.      ob10 = CreateObject(1006,0,0,-1000,0,0,0,100);
  58.      ob11 = CreateObject(1027,0,0,-1000,0,0,0,100);
  59.      ob12 = CreateObject(1027,0,0,-1000,0,0,0,100);
  60.      ob13 = CreateObject(1146,0,0,-1000,0,0,0,100);
  61.      ob14 = CreateObject(1003,0,0,-1000,0,0,0,100);
  62.      ob15 = CreateObject(1018,0,0,-1000,0,0,0,100);
  63.      ob16 = CreateObject(1149,0,0,-1000,0,0,0,100);
  64.      ob17 = CreateObject(1018,0,0,-1000,0,0,0,100);
  65.      ob18 = CreateObject(1006,0,0,-1000,0,0,0,100);
  66.      ob19 = CreateObject(1166,0,0,-1000,0,0,0,100);
  67.      ob20 = CreateObject(1006,0,0,-1000,0,0,0,100);
  68.      ob21 = CreateObject(1026,0,0,-1000,0,0,0,100);
  69.      ob22 = CreateObject(1027,0,0,-1000,0,0,0,100);
  70.      tune[playerid] = 0;
  71.     }
  72. }
  73.  
  74. public OnGameModeInit()
  75. {
  76.      o = CreateObject(1006,0,0,-1000,0,0,0,100);
  77.      ob2 = CreateObject(1161,0,0,-1000,0,0,0,100);
  78.      ob3 = CreateObject(1161,0,0,-1000,0,0,0,100);
  79.      ob4 = CreateObject(1059,0,0,-1000,0,0,0,100);
  80.      ob5 = CreateObject(1146,0,0,-1000,0,0,0,100);
  81.      ob6 = CreateObject(1006,0,0,-1000,0,0,0,100);
  82.      ob7 = CreateObject(1146,0,0,-1000,0,0,0,100);
  83.      ob8 = CreateObject(1006,0,0,-1000,0,0,0,100);
  84.      ob9 = CreateObject(1006,0,0,-1000,0,0,0,100);
  85.      ob10 = CreateObject(1006,0,0,-1000,0,0,0,100);
  86.      ob11 = CreateObject(1027,0,0,-1000,0,0,0,100);
  87.      ob12 = CreateObject(1027,0,0,-1000,0,0,0,100);
  88.      ob13 = CreateObject(1146,0,0,-1000,0,0,0,100);
  89.      ob14 = CreateObject(1003,0,0,-1000,0,0,0,100);
  90.      ob15 = CreateObject(1018,0,0,-1000,0,0,0,100);
  91.      ob16 = CreateObject(1149,0,0,-1000,0,0,0,100);
  92.      ob17 = CreateObject(1018,0,0,-1000,0,0,0,100);
  93.      ob18 = CreateObject(1006,0,0,-1000,0,0,0,100);
  94.      ob19 = CreateObject(1166,0,0,-1000,0,0,0,100);
  95.      ob20 = CreateObject(1006,0,0,-1000,0,0,0,100);
  96.      ob21 = CreateObject(1026,0,0,-1000,0,0,0,100);
  97.      ob22 = CreateObject(1027,0,0,-1000,0,0,0,100);
  98. }
  99.  
  100.  
  101. public OnPlayerConnect(playerid)
  102. {
  103. tune[playerid] = 0;
  104. SendClientMessage(playerid,-1,"Tune Able Cars FS By XtremeR");
  105. return 1;
  106. }
  107.  
  108. public OnPlayerText(playerid, text[])
  109. {
  110.     return 1;
  111. }
  112. CMD:credits(playerid, params[])
  113. {
  114. SendClientMessage(playerid,-1,"Thanks To XtremeR for the Car Tune System!");
  115. return 1;
  116. }
  117.  
  118. CMD:untune(playerid, params[])
  119. {
  120. if(tune[playerid] == 1)
  121. {
  122. RemovePlayerFromVehicle(playerid);
  123. DestroyObject(o);
  124. DestroyObject(ob2 );
  125. DestroyObject(ob3);
  126. DestroyObject(ob4);
  127. DestroyObject(ob5);
  128. DestroyObject(ob6);
  129. DestroyObject(ob7);
  130. DestroyObject(ob8);
  131. DestroyObject(ob9);
  132. DestroyObject(ob10);
  133. DestroyObject(ob11);
  134. DestroyObject(ob12);
  135. DestroyObject(ob13);
  136. DestroyObject(ob14);
  137. DestroyObject(ob15);
  138. DestroyObject(ob16);
  139. DestroyObject(ob17);
  140. DestroyObject(ob18);
  141. DestroyObject(ob19);
  142. DestroyObject(ob20);
  143. DestroyObject(ob21);
  144. DestroyObject(ob22);
  145. SendClientMessage(playerid,-1,"SERVER:Untuned Sucessfully !");
  146. }
  147. else
  148. if(tune[playerid] == 0)
  149. {
  150. SendClientMessage(playerid,-1,"SERVER:Your vehicle is not tuned!");
  151. }
  152. return 1;
  153. }
  154. CMD:tune(playerid, params[])
  155. {
  156. new vehicleid = GetPlayerVehicleID(playerid);
  157. if(GetVehicleModel(vehicleid) == 411) // 411 is the infernus model
  158. {
  159. tune[playerid] = 1;
  160. AttachObjectToVehicle(o, GetPlayerVehicleID(playerid), -0.300000,0.000000,0.675000,0.000000,0.000000,0.000000);
  161. AttachObjectToVehicle(ob2, GetPlayerVehicleID(playerid), 1.049999,2.174999,-0.599999,0.000005,180.899887,180.899963);
  162. AttachObjectToVehicle(ob3, GetPlayerVehicleID(playerid), -1.049999,-1.950001,-0.599999,0.000005,180.899887,361.799743);
  163. AttachObjectToVehicle(ob4, GetPlayerVehicleID(playerid), 0.000000,0.000000,0.000000,0.000000,0.000000,0.000000);
  164. AttachObjectToVehicle(ob5, GetPlayerVehicleID(playerid), -0.074999,-2.325000,0.375000,0.000000,0.000000,0.000000);
  165. AttachObjectToVehicle(ob6, GetPlayerVehicleID(playerid), 0.225000,0.000000,0.674999,0.000000,0.000000,0.000000);
  166. AttachObjectToVehicle(ob7, GetPlayerVehicleID(playerid), -0.074999,-2.325000,0.524999,0.000000,0.000000,0.000000);
  167. AttachObjectToVehicle(ob8, GetPlayerVehicleID(playerid), 0.000000,1.800000,0.149999,0.000000,0.000000,0.000000);
  168. AttachObjectToVehicle(ob9, GetPlayerVehicleID(playerid), 0.000000,1.650000,0.150000,0.000000,0.000000,0.000000);
  169. AttachObjectToVehicle(ob10, GetPlayerVehicleID(playerid), 0.000000,1.950000,0.150000,-10.800001,0.000000,0.000000);
  170. AttachObjectToVehicle(ob11, GetPlayerVehicleID(playerid), -1.049999,-0.824999,-0.599999,0.000000,0.000000,0.000000);
  171. AttachObjectToVehicle(ob12, GetPlayerVehicleID(playerid), 0.974999,-0.824999,-0.599999,0.000000,0.000000,0.000000);
  172. AttachObjectToVehicle(ob13, GetPlayerVehicleID(playerid), -0.074999,-2.325000,0.449999,0.000000,0.000000,0.000000);
  173. AddVehicleComponent(vehicleid, 1079);
  174. ChangeVehicleColor(vehicleid,0,0);
  175. SendClientMessage(playerid, 0xDEEE20FF, "Your Infernes is now Tuned!");
  176. }
  177. else
  178. if(GetVehicleModel(vehicleid) == 541) // 541 is the Bullet model
  179. {
  180. tune[playerid] = 1;
  181. AttachObjectToVehicle(ob14, GetPlayerVehicleID(playerid), 0.000000,-2.025000,0.300000,0.000000,0.000000,0.000000);
  182. AttachObjectToVehicle(ob15, GetPlayerVehicleID(playerid), -0.375000,-1.275000,-0.375000,0.000000,0.000000,0.000000);
  183. AttachObjectToVehicle(ob16, GetPlayerVehicleID(playerid), 1.049999,-1.500000,0.075000,0.000000,0.000000,0.000000);
  184. AttachObjectToVehicle(ob17, GetPlayerVehicleID(playerid), 0.374999,-1.275000,-0.375000,0.000000,0.000000,0.000000);
  185. AttachObjectToVehicle(ob18, GetPlayerVehicleID(playerid), 0.000000,0.224999,0.600000,0.000000,0.000000,0.000000);
  186. AttachObjectToVehicle(ob19, GetPlayerVehicleID(playerid), 1.049999,1.575000,0.000000,0.000000,0.000000,0.000000);
  187. AttachObjectToVehicle(ob20, GetPlayerVehicleID(playerid), -0.075000,1.200000,0.300000,0.000000,0.000000,0.000000);
  188. AttachObjectToVehicle(ob21, GetPlayerVehicleID(playerid), 1.049999,-0.899999,-0.375000,0.000000,0.000000,0.000000);
  189. AttachObjectToVehicle(ob22, GetPlayerVehicleID(playerid), -1.049999,-0.974999,-0.449999,0.000000,0.000000,0.000000);
  190. AddVehicleComponent(vehicleid, 1079);
  191. ChangeVehicleColor(vehicleid,0,0);
  192. SendClientMessage(playerid, 0xDEEE20FF, "Your Bullet is now Tuned!");
  193. }
  194. else
  195. {
  196. tune[playerid] = 0;
  197. SendClientMessage(playerid,-1,"SERVER:You need to be in infernus or bullet to use this command.");
  198. }
  199. return 1;
  200. }
  201. //End of File.. Dont Re Release, Dont Remove the Credits and Enjoy!
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
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!