API tools faq
paste
Advertisement
_DarkLight_

☼•:. Armed_Car .:•☼ V2

_DarkLight_
Feb 7th, 2016
78
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 15.71 KB | None | 0 0
raw download clone embed print report
  1. //=========Includes=====
  2. ////////////////////////|
  3. #include <a_samp> //|
  4. #include <zcmd> //|
  5. ////////////////////////|
  6. //======================
  7.  
  8. //==================Defines===============
  9. #define COLOR_BLACK 0x000000AA
  10. #define red 0xFF0000AA
  11. #define COLOR_YELLOW 0xFFFF00AA
  12. #define COLOR_LIGHTBLUE 0x33CCFFAA
  13. #define COLOR_BLUE 0x0000BBAA
  14. //========================================
  15. new ckrtasa[MAX_OBJECTS];
  16. new cknbola[MAX_OBJECTS];
  17.  
  18. public OnFilterScriptInit()
  19. {
  20. print("\n--------------------------------------");
  21. print(" Super Car By Dark_Light Loaded :D ");
  22. print("--------------------------------------\n");
  23. /////////////////////////////////////////////////////////
  24. ckrtasa[1] = CreateObject(343,0,0,-1000,0,0,0,100);
  25. ckrtasa[2] = CreateObject(343,0,0,-1000,0,0,0,100);
  26. ckrtasa[3] = CreateObject(343,0,0,-1000,0,0,0,100);
  27. ckrtasa[4] = CreateObject(343,0,0,-1000,0,0,0,100);
  28. ckrtasa[5] = CreateObject(343,0,0,-1000,0,0,0,100);
  29. ckrtasa[6] = CreateObject(343,0,0,-1000,0,0,0,100);
  30. ckrtasa[7] = CreateObject(343,0,0,-1000,0,0,0,100);
  31. ckrtasa[8] = CreateObject(343,0,0,-1000,0,0,0,100);
  32. ckrtasa[9] = CreateObject(343,0,0,-1000,0,0,0,100);
  33. ckrtasa[10] = CreateObject(343,0,0,-1000,0,0,0,100);
  34. ckrtasa[11] = CreateObject(343,0,0,-1000,0,0,0,100);
  35. ckrtasa[12] = CreateObject(343,0,0,-1000,0,0,0,100);
  36. ckrtasa[13] = CreateObject(343,0,0,-1000,0,0,0,100);
  37. ckrtasa[14] = CreateObject(343,0,0,-1000,0,0,0,100);
  38. ckrtasa[15] = CreateObject(343,0,0,-1000,0,0,0,100);
  39. ckrtasa[16] = CreateObject(343,0,0,-1000,0,0,0,100);
  40. ckrtasa[17] = CreateObject(343,0,0,-1000,0,0,0,100);
  41. ckrtasa[18] = CreateObject(343,0,0,-1000,0,0,0,100);
  42. //////////////////////////////////////////////////////////
  43. /////////////////////////////////////////////////////////
  44. cknbola[1] = CreateObject(354,0,0,-1000,0,0,0,100);
  45. cknbola[2] = CreateObject(354,0,0,-1000,0,0,0,100);
  46. cknbola[3] = CreateObject(354,0,0,-1000,0,0,0,100);
  47. cknbola[4] = CreateObject(354,0,0,-1000,0,0,0,100);
  48. cknbola[5] = CreateObject(354,0,0,-1000,0,0,0,100);
  49. cknbola[6] = CreateObject(354,0,0,-1000,0,0,0,100);
  50. cknbola[7] = CreateObject(354,0,0,-1000,0,0,0,100);
  51. cknbola[8] = CreateObject(354,0,0,-1000,0,0,0,100);
  52. cknbola[9] = CreateObject(354,0,0,-1000,0,0,0,100);
  53. cknbola[10] = CreateObject(354,0,0,-1000,0,0,0,100);
  54. cknbola[11] = CreateObject(354,0,0,-1000,0,0,0,100);
  55. cknbola[12] = CreateObject(354,0,0,-1000,0,0,0,100);
  56. cknbola[13] = CreateObject(354,0,0,-1000,0,0,0,100);
  57. cknbola[14] = CreateObject(354,0,0,-1000,0,0,0,100);
  58. cknbola[15] = CreateObject(354,0,0,-1000,0,0,0,100);
  59. cknbola[16] = CreateObject(354,0,0,-1000,0,0,0,100);
  60. cknbola[17] = CreateObject(354,0,0,-1000,0,0,0,100);
  61. cknbola[18] = CreateObject(354,0,0,-1000,0,0,0,100);
  62. //////////////////////////////////////////////////////////
  63. SetTimer("explodevk",1,1);
  64. return 1;
  65. }
  66.  
  67. public OnFilterScriptExit()
  68. {
  69. print("\n--------------------------------------");
  70. print(" Super Car By Dark_Light Unloaded :( ");
  71. print("--------------------------------------\n");
  72.  
  73. return 1;
  74. }
  75.  
  76. //==============Enums===
  77. enum pInfo
  78. {
  79. usesuperc,
  80. }
  81. //======================
  82.  
  83. //==============NEWS============
  84. new
  85. kratstimer[MAX_PLAYERS],
  86. kratsremove[MAX_PLAYERS],
  87. godc[MAX_PLAYERS],
  88. expv[MAX_PLAYERS],
  89. Float:BX,
  90. Float:BY,
  91. Float:BZ,
  92. PlayerInfo[MAX_PLAYERS][pInfo],
  93. krtasa[MAX_OBJECTS],
  94. ch7al;
  95. //==============================
  96.  
  97. //================Forwards======
  98. forward Firekrats(playerid);
  99. forward godcar(playerid);
  100. forward removekrtas(playerid);
  101. forward explodevk(playerid);
  102. //==============================
  103. crkrtasa(playerid)
  104. {
  105. new Float:ox, Float:oy, Float:oz, Float:a;
  106. GetPlayerPos(playerid, ox, oy, oz);
  107. GetPlayerFacingAngle(playerid, a);
  108. SetPlayerHealth(playerid, 200);
  109. ox += (0 * floatsin(-a, degrees));//ch7al b3ida
  110. oy += (0 * floatcos(-a, degrees));//ch7al b3ida
  111. if(ch7al >= 18) return ch7al = 0;
  112. ch7al +=1;
  113. SetObjectPos(ckrtasa[ch7al],ox,oy,oz);
  114. movekrtasa(playerid);
  115. return 1;
  116. }
  117.  
  118. knbola(playerid)
  119. {
  120. new Float:ox, Float:oy, Float:oz, Float:a;
  121. GetPlayerPos(playerid, ox, oy, oz);
  122. GetPlayerFacingAngle(playerid, a);
  123. SetPlayerHealth(playerid, 200);
  124. ox += (0 * floatsin(-a, degrees));//ch7al b3ida
  125. oy += (0 * floatcos(-a, degrees));//ch7al b3ida
  126. if(ch7al >= 18) return ch7al = 0;
  127. ch7al +=1;
  128. SetObjectPos(cknbola[ch7al],ox,oy,oz);
  129. moveknbola(playerid);
  130. return 1;
  131. }
  132. movekrtasa(playerid)
  133. {
  134. new Float:px, Float:py, Float:pz;
  135. GetPlayerPos(playerid, px, py, pz);
  136. GetXYInFrontOfPlayer(playerid, px, py, 100000);//,dist
  137. MoveObject(ckrtasa[ch7al],px,py,pz,100);//,speed
  138. }
  139. moveknbola(playerid)
  140. {
  141. new Float:px, Float:py, Float:pz;
  142. GetPlayerPos(playerid, px, py, pz);
  143. GetXYInFrontOfPlayer(playerid, px, py, 100000);//,dist
  144. MoveObject(cknbola[ch7al],px,py,pz,50);//,speed
  145. }
  146. //============Publics===========
  147. public explodevk(playerid)
  148. {
  149. for(new v; v < MAX_VEHICLES; v ++)
  150. {
  151. new Float:KX, Float:KY, Float:KZ;
  152. GetObjectPos(cknbola[ch7al], KX, KY, KZ);
  153. new Float:X, Float:Y, Float:Z;
  154. GetObjectPos(ckrtasa[ch7al], X, Y, Z);
  155. if(GetVehicleDistanceFromPoint(v,X,Y,Z) <= 4.0 && v != GetPlayerVehicleID(playerid))
  156. {
  157. SetVehicleHealth(v,0);
  158. }
  159. if(GetVehicleDistanceFromPoint(v,KX,KY,KZ) <= 4.0 && v != GetPlayerVehicleID(playerid))
  160. {
  161. SetVehicleHealth(v,0);
  162. }
  163. if(GetPlayerDistanceFromPoint(v,X,Y,Z) <= 4.0 && v != playerid)
  164. {
  165. SetPlayerHealth(v,0);
  166. }
  167. if(GetPlayerDistanceFromPoint(v,KX,KY,KZ) <= 4.0 && v != playerid)
  168. {
  169. SetPlayerHealth(v,0);
  170. }
  171. }
  172. }
  173. //========================================================
  174. public Firekrats(playerid)
  175. {
  176. new KEYS, UD, LR; GetPlayerKeys( playerid, KEYS, UD, LR );
  177. new Float:PX, Float:PY, Float:PZ; GetPlayerPos( playerid, PX, PY, PZ );
  178. if(KEYS == KEY_FIRE)
  179. {
  180. SoundForAll(1135,PX,PY,PZ);
  181. crkrtasa(playerid);
  182. KillTimer(kratsremove[playerid]),kratsremove[playerid] = SetTimerEx("removekrtas",1000,1,"d",playerid);
  183. }
  184. if(KEYS == KEY_FIRE && LR == KEY_RIGHT)
  185. {
  186. SoundForAll(1135,PX,PY,PZ);
  187. crkrtasa(playerid);
  188. KillTimer(kratsremove[playerid]),kratsremove[playerid] = SetTimerEx("removekrtas",1000,1,"d",playerid);
  189. }
  190. if(KEYS == KEY_FIRE && LR == KEY_LEFT)
  191. {
  192. SoundForAll(1135,PX,PY,PZ);
  193. crkrtasa(playerid);
  194. KillTimer(kratsremove[playerid]),kratsremove[playerid] = SetTimerEx("removekrtas",1000,1,"d",playerid);
  195. }
  196. return true;
  197. }
  198. //==============================================================================
  199. public godcar(playerid)
  200. {
  201. /////////////////////////////////////////////////
  202. SetVehicleHealth(GetPlayerVehicleID(playerid),100000);
  203. RepairVehicle(GetPlayerVehicleID(playerid));
  204. /////////////////////////////////////////////////
  205. return true;
  206. }
  207. //==============================================================================
  208. public removekrtas(playerid)
  209. {
  210. for(new i = 0; i < MAX_PLAYERS; i++)
  211. {
  212. if(ch7al <= 0) return ch7al = 0,KillTimer(kratsremove[playerid]);
  213. DestroyObject(krtasa[i]);
  214. ch7al =0;
  215. }
  216. return true;
  217. }
  218. //===============================================================================
  219.  
  220. public OnPlayerConnect(playerid)
  221. {
  222. kratstimer[playerid] = SetTimerEx("Firekrats",66,1,"d",playerid),KillTimer(kratstimer[playerid]);
  223. return 1;
  224. }
  225.  
  226. public OnPlayerDisconnect(playerid, reason)
  227. {
  228. PlayerInfo[playerid][usesuperc] = 0;
  229. KillTimer(expv[playerid]);
  230. KillTimer(godc[playerid]);
  231. KillTimer(kratstimer[playerid]);
  232. return 1;
  233. }
  234. public OnPlayerDeath(playerid, killerid, reason)
  235. {
  236. PlayerInfo[playerid][usesuperc] = 0;
  237. KillTimer(expv[playerid]);
  238. KillTimer(godc[playerid]);
  239. KillTimer(kratstimer[playerid]);
  240. return 1;
  241. }
  242.  
  243. //================CMDS==========================================================
  244. CMD:supercoff(playerid, params[])
  245. {
  246. PlayerInfo[playerid][usesuperc] = 0;
  247. DestroyVehicle(GetPlayerVehicleID(playerid));
  248. return 1;
  249. }
  250. CMD:supercon(playerid,params[]) {
  251. if(IsPlayerInAnyVehicle(playerid)) return SendClientMessage(playerid,red,"Error: You already have a vehicle");
  252. else
  253. {
  254. ////////////////////////////////////////////////////////////////////////////////////////
  255. PlayerInfo[playerid][usesuperc] = 1;
  256. KillTimer(kratstimer[playerid]),kratstimer[playerid] = SetTimerEx("Firekrats",66,1,"d",playerid);
  257. KillTimer(godc[playerid]),godc[playerid] = SetTimerEx("godcar",50,1,"d",playerid);
  258. KillTimer(expv[playerid]),expv[playerid] = SetTimerEx("explodev",1,1,"d",playerid);
  259. //////////////////////////////////////////////////////////////////////////////////////////
  260. new Float:X,Float:Y,Float:Z,Float:Angle,LVehicleIDt; GetPlayerPos(playerid,X,Y,Z); GetPlayerFacingAngle(playerid,Angle);
  261. LVehicleIDt = CreateVehicle(475,X,Y,Z,Angle,-1,-1,10000);
  262. PutPlayerInVehicle(playerid,LVehicleIDt,0);
  263.  
  264. SetPVarInt(playerid,"xsabobj1",CreateObject(1004,0,0,-1000,0,0,0,100));
  265. SetPVarInt(playerid,"xsabobj2",CreateObject(1001,0,0,-1000,0,0,0,100));
  266. SetPVarInt(playerid,"xsabobj3",CreateObject(1001,0,0,-1000,0,0,0,100));
  267. SetPVarInt(playerid,"xsabobj4",CreateObject(1001,0,0,-1000,0,0,0,100));
  268. SetPVarInt(playerid,"xsabobj7",CreateObject(1142,0,0,-1000,0,0,0,100));
  269. SetPVarInt(playerid,"xsabobj8",CreateObject(1142,0,0,-1000,0,0,0,100));
  270. SetPVarInt(playerid,"xsabobj9",CreateObject(1170,0,0,-1000,0,0,0,100));
  271. SetPVarInt(playerid,"xsabobj10",CreateObject(1149,0,0,-1000,0,0,0,100));
  272. SetPVarInt(playerid,"xsabobj11",CreateObject(1146,0,0,-1000,0,0,0,100));
  273. SetPVarInt(playerid,"xsabobj12",CreateObject(1146,0,0,-1000,0,0,0,100));
  274. SetPVarInt(playerid,"xsabobj13",CreateObject(360,0,0,-1000,0,0,0,100));
  275. SetPVarInt(playerid,"xsabobj14",CreateObject(360,0,0,-1000,0,0,0,100));
  276. SetPVarInt(playerid,"xsabobj15",CreateObject(360,0,0,-1000,0,0,0,100));
  277. SetPVarInt(playerid,"xsabobj16",CreateObject(360,0,0,-1000,0,0,0,100));
  278. SetPVarInt(playerid,"xsabobj17",CreateObject(360,0,0,-1000,0,0,0,100));
  279. SetPVarInt(playerid,"xsabobj18",CreateObject(360,0,0,-1000,0,0,0,100));
  280. SetPVarInt(playerid,"xsabobj19",CreateObject(362,0,0,-1000,0,0,0,100));
  281. SetPVarInt(playerid,"xsabobj20",CreateObject(362,0,0,-1000,0,0,0,100));
  282. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj1"), GetPlayerVehicleID(playerid), -0.000000,0.000000,0.654999,0.000000,0.000000,0.000000);
  283. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj2"), GetPlayerVehicleID(playerid), -0.045000,-2.700001,0.084999,0.000000,0.000000,0.000000);
  284. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj3"), GetPlayerVehicleID(playerid), -0.050000,-2.700001,0.154999,0.000000,0.000000,0.000000);
  285. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj4"), GetPlayerVehicleID(playerid), -0.050000,-2.700001,0.204999,0.000000,0.000000,0.000000);
  286. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj7"), GetPlayerVehicleID(playerid), -0.300000,1.255000,0.270000,0.000000,0.000000,0.000000);
  287. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj8"), GetPlayerVehicleID(playerid), 0.309999,1.255000,0.270000,0.000000,0.000000,0.000000);
  288. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj9"), GetPlayerVehicleID(playerid), 1.060000,1.750000,-0.210000,0.000000,0.000000,0.000000);
  289. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj10"), GetPlayerVehicleID(playerid), 1.055000,-2.025000,-0.180000,0.000000,0.000000,0.000000);
  290. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj11"), GetPlayerVehicleID(playerid),-1.909998,0.934999,0.000000,0.000000,0.000000,0.000000);
  291. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj12"), GetPlayerVehicleID(playerid),1.899998,0.929999,0.000000,0.000000,0.000000,0.000000);
  292. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj13"), GetPlayerVehicleID(playerid),2.845017,1.404998,-0.069999,0.000000,0.000000,90.000000);
  293. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj14"), GetPlayerVehicleID(playerid),2.290004,1.404998,-0.074999,0.000000,0.000000,90.000000);
  294. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj15"), GetPlayerVehicleID(playerid),1.589998,1.404998,-0.074999,0.000000,0.000000,90.000000);
  295. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj16"), GetPlayerVehicleID(playerid),-1.504998,1.404998,-0.074999,0.000000,0.000000,90.000000);
  296. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj17"), GetPlayerVehicleID(playerid),-2.205003,1.404998,-0.074999,0.000000,0.000000,90.000000);
  297. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj18"), GetPlayerVehicleID(playerid),-2.810016,1.404998,-0.074999,0.000000,0.000000,90.000000);
  298. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj19"), GetPlayerVehicleID(playerid),-0.394999,2.250004,0.135000,0.000000,30.500000,90.000000);
  299. AttachObjectToVehicle(GetPVarInt(playerid,"xsabobj20"), GetPlayerVehicleID(playerid),0.354999,2.285004,0.135000,0.000000,30.500000,90.000000);
  300. AddVehicleComponent(GetPlayerVehicleID(playerid), 1079);
  301. ChangeVehicleColor(GetPlayerVehicleID(playerid),0,0);
  302. PlayerPlaySound(playerid,1133,0.0,0.0,0.0); ChangeVehiclePaintjob(LVehicleIDt,0);
  303. SetVehicleVirtualWorld(LVehicleIDt, GetPlayerVirtualWorld(playerid));
  304. LinkVehicleToInterior(LVehicleIDt, GetPlayerInterior(playerid));
  305. }
  306. return 1;
  307. }
  308. //==============================================================================
  309. public OnPlayerExitVehicle(playerid, vehicleid)
  310. {
  311. if(PlayerInfo[playerid][usesuperc] ==1)
  312. {
  313. DestroyVehicle(vehicleid);
  314. KillTimer(godc[playerid]);
  315. KillTimer(kratstimer[playerid]);
  316. DestroyObject(GetPVarInt(playerid,"xsabobj1")),DestroyObject(GetPVarInt(playerid,"xsabobj2")),DestroyObject(GetPVarInt(playerid,"xsabobj3")),DestroyObject(GetPVarInt(playerid,"xsabobj4")),DestroyObject(GetPVarInt(playerid,"xsabobj7")),DestroyObject(GetPVarInt(playerid,"xsabobj8")),DestroyObject(GetPVarInt(playerid,"xsabobj9")),DestroyObject(GetPVarInt(playerid,"xsabobj10"));
  317. DestroyObject(GetPVarInt(playerid,"xsabobj11")),DestroyObject(GetPVarInt(playerid,"xsabobj12")),DestroyObject(GetPVarInt(playerid,"xsabobj13")),DestroyObject(GetPVarInt(playerid,"xsabobj14")),DestroyObject(GetPVarInt(playerid,"xsabobj15")),DestroyObject(GetPVarInt(playerid,"xsabobj16")),DestroyObject(GetPVarInt(playerid,"xsabobj17")),DestroyObject(GetPVarInt(playerid,"xsabobj18")),DestroyObject(GetPVarInt(playerid,"xsabobj19")),DestroyObject(GetPVarInt(playerid,"xsabobj20"));
  318. cmd_supercoff(playerid,"");
  319. }
  320. return 1;
  321. }
  322. //====================================================================//
  323. forward SoundForAll(soundid,Float:X,Float:Y,Float:Z);
  324. public SoundForAll(soundid,Float:X,Float:Y,Float:Z)
  325. {
  326. for(new i = 0; i < MAX_OBJECTS; i++)
  327. {
  328. if(IsPlayerConnected(i) == 1) PlayerPlaySound(i,soundid,Float:X,Float:Y,Float:Z);
  329. }
  330. return 1;
  331. }
  332. //===================================================================//
  333. GetXYInFrontOfPlayer(playerid, &Float:x, &Float:y, Float:distance)
  334. {
  335. new Float:a;
  336. GetPlayerPos(playerid, x, y, a);
  337. GetPlayerFacingAngle(playerid, a);
  338. if (GetPlayerVehicleID(playerid))
  339. {
  340. GetVehicleZAngle(GetPlayerVehicleID(playerid), a);
  341. }
  342. x += (distance * floatsin(-a, degrees));
  343. y += (distance * floatcos(-a, degrees));
  344. }
  345. public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
  346. {
  347. if(newkeys & KEY_CROUCH)
  348. {
  349. if(PlayerInfo[playerid][usesuperc] == 1) {
  350. if(IsPlayerInAnyVehicle(playerid))
  351. {
  352. GetObjectPos(GetPVarInt(playerid,"xsabobj17"),BX,BY,BZ);
  353. knbola(playerid);
  354. }
  355. }
  356. }
  357. }
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!