API tools faq
paste
Guest User

Untitled

a guest
Dec 12th, 2013
124
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 16.45 KB | None | 0 0
raw download clone embed print report
  1.  
  2. #include <a_samp>
  3. #define GREEN 0x21DD00FF
  4. #define RED 0xE60000FF
  5. #define ADMIN_RED 0xFB0000FF
  6. #define YELLOW 0xFFFF00FF
  7. #define ORANGE 0xF97804FF
  8. #define LIGHTRED 0xFF8080FF
  9. #define LIGHTBLUE 0x00C2ECFF
  10. #define PURPLE 0xB360FDFF
  11. #define BLUE 0x1229FAFF
  12. #define LIGHTGREEN 0x38FF06FF
  13. #define DARKPINK 0xE100E1FF
  14. #define NICESKY 0x99FFFFAA
  15. #define GRAY 0xCECECEFF
  16. //====================//
  17. forward ActualizarVelocimetro();
  18. //====================//
  19. new HGS;
  20. new Gosterge[MAX_PLAYERS];
  21.  
  22. new Text: GostergeYazi[MAX_PLAYERS];
  23. new Text: Hizg[MAX_PLAYERS];
  24. new Text: Cang[MAX_PLAYERS];
  25. new Text: Cizgi;
  26. new Text: ArkaPlan0;
  27. new Text: ArkaPlan1;
  28. new Text: ArkaPlan2;
  29. new Text: ArkaPlan3;
  30. new Text: ArkaPlan4;
  31. new Text: ArkaPlan5;
  32. new Text: ArkaPlan6;
  33.  
  34. new Float: KMH;
  35. new Float: Yukseklik;
  36. new Float: Xa;
  37. new Float: Ya;
  38. new Float: Za;
  39. new Float: Xb[MAX_PLAYERS];
  40. new Float: Yb[MAX_PLAYERS];
  41. new Float: Zb[MAX_PLAYERS];
  42.  
  43. new ArIsim[][] =
  44. {
  45.  
  46. "Landstalker", "Bravura", "Buffalo", "Linerunner", "Perrenial", "Sentinel",
  47. "Dumper", "Firetruck", "Trashmaster", "Stretch", "Manana", "Infernus",
  48. "Voodoo", "Pony", "Mule", "Cheetah", "Ambulance", "Leviathan", "Moonbeam",
  49. "Esperanto", "Taxi", "Washington", "Bobcat", "Whoopee", "BF Injection",
  50. "Hunter", "Premier", "Enforcer", "Securicar", "Banshee", "Predator", "Bus",
  51. "Rhino", "Barracks", "Hotknife", "Trailer", "Previon", "Coach", "Cabbie",
  52. "Stallion", "Rumpo", "RC Bandit", "Romero", "Packer", "Monster", "Admiral",
  53. "Squalo", "Seasparrow", "Pizzaboy", "Tram", "Trailer", "Turismo", "Speeder",
  54. "Reefer", "Tropic", "Flatbed", "Yankee", "Caddy", "Solair", "Berkley's RC Van",
  55. "Skimmer", "PCJ-600", "Faggio", "Freeway", "RC Baron", "RC Raider", "Glendale",
  56. "Oceanic","Sanchez", "Sparrow", "Patriot", "Quad", "Coastguard", "Dinghy",
  57. "Hermes", "Sabre", "Rustler", "ZR-350", "Walton", "Regina", "Comet", "BMX",
  58. "Burrito", "Camper", "Marquis", "Baggage", "Dozer", "Maverick", "News Chopper",
  59. "Rancher", "FBI Rancher", "Virgo", "Greenwood", "Jetmax", "Hotring", "Sandking",
  60. "Blista Compact", "Police Maverick", "Boxvillde", "Benson", "Mesa", "RC Goblin",
  61. "Hotring Racer A", "Hotring Racer B", "Bloodring Banger", "Rancher", "Super GT",
  62. "Elegant", "Journey", "Bike", "Mountain Bike", "Beagle", "Cropduster", "Stunt",
  63. "Tanker", "Roadtrain", "Nebula", "Majestic", "Buccaneer", "Shamal", "Hydra",
  64. "FCR-900", "NRG-500", "HPV1000", "Cement Truck", "Tow Truck", "Fortune",
  65. "Cadrona", "FBI Truck", "Willard", "Forklift", "Tractor", "Combine", "Feltzer",
  66. "Remington", "Slamvan", "Blade", "Freight", "Streak", "Vortex", "Vincent",
  67. "Bullet", "Clover", "Sadler", "Firetruck", "Hustler", "Intruder", "Primo",
  68. "Cargobob", "Tampa", "Sunrise", "Merit", "Utility", "Nevada", "Yosemite",
  69. "Windsor", "Monster", "Monster", "Uranus", "Jester", "Sultan", "Stratium",
  70. "Elegy", "Raindance", "RC Tiger", "Flash", "Tahoma", "Savanna", "Bandito",
  71. "Freight Flat", "Streak Carriage", "Kart", "Mower", "Dune", "Sweeper",
  72. "Broadway", "Tornado", "AT-400", "DFT-30", "Huntley", "Stafford", "BF-400",
  73. "News Van", "Tug", "Trailer", "Emperor", "Wayfarer", "Euros", "Hotdog", "Club",
  74. "Freight Box", "Trailer", "Andromada", "Dodo", "RC Cam", "Launch", "Police Car",
  75. "Police Car", "Police Car", "Police Ranger", "Picador", "S.W.A.T", "Alpha",
  76. "Phoenix", "Glendale", "Sadler", "Luggage", "Luggage", "Stairs", "Boxville",
  77. "Tiller", "Utility Trailer"
  78. };
  79. //==========================TEXTDRAWS================================================//
  80. public OnFilterScriptInit()
  81. {
  82.  
  83.  
  84. HGS = SetTimer("AtualizarVelocimetro",300,1);
  85.  
  86. ArkaPlan0 = TextDrawCreate(611.000000,377.000000,"_");
  87. TextDrawUseBox(ArkaPlan0,1);
  88. TextDrawBoxColor(ArkaPlan0,0x00000033);
  89. TextDrawTextSize(ArkaPlan0,529.000000,0.000000);
  90. TextDrawAlignment(ArkaPlan0,0);
  91. TextDrawBackgroundColor(ArkaPlan0,0x000000ff);
  92. TextDrawFont(ArkaPlan0,1);
  93. TextDrawLetterSize(ArkaPlan0,-3.700000,5.100007);
  94. TextDrawColor(ArkaPlan0,0xffffffff);
  95. TextDrawSetProportional(ArkaPlan0,1);
  96. TextDrawSetShadow(ArkaPlan0,1);
  97.  
  98. ArkaPlan1 = TextDrawCreate(611.000000,375.000000,"_");
  99. TextDrawUseBox(ArkaPlan1,1);
  100. TextDrawBoxColor(ArkaPlan1,0x000000ff);
  101. TextDrawTextSize(ArkaPlan1,530.000000,185.000000);
  102. TextDrawAlignment(ArkaPlan1,0);
  103. TextDrawBackgroundColor(ArkaPlan1,0x000000ff);
  104. TextDrawFont(ArkaPlan1,3);
  105. TextDrawLetterSize(ArkaPlan1,2.799999,-0.200000);
  106. TextDrawColor(ArkaPlan1,0xffffffff);
  107. TextDrawSetOutline(ArkaPlan1,1);
  108. TextDrawSetProportional(ArkaPlan1,1);
  109. TextDrawSetShadow(ArkaPlan1,1);
  110.  
  111. ArkaPlan2 = TextDrawCreate(532.000000,375.000000,"_");
  112. TextDrawUseBox(ArkaPlan2,1);
  113. TextDrawBoxColor(ArkaPlan2,0x000000ff);
  114. TextDrawTextSize(ArkaPlan2,530.000000,32.000000);
  115. TextDrawAlignment(ArkaPlan2,0);
  116. TextDrawBackgroundColor(ArkaPlan2,0x000000ff);
  117. TextDrawFont(ArkaPlan2,3);
  118. TextDrawLetterSize(ArkaPlan2,1.000000,5.299999);
  119. TextDrawColor(ArkaPlan2,0xffffffff);
  120. TextDrawSetOutline(ArkaPlan2,1);
  121. TextDrawSetProportional(ArkaPlan2,1);
  122. TextDrawSetShadow(ArkaPlan2,1);
  123.  
  124. ArkaPlan3 = TextDrawCreate(532.000000,426.000000,"_");
  125. TextDrawUseBox(ArkaPlan3,1);
  126. TextDrawBoxColor(ArkaPlan3,0x000000ff);
  127. TextDrawTextSize(ArkaPlan3,609.000000,82.000000);
  128. TextDrawAlignment(ArkaPlan3,0);
  129. TextDrawBackgroundColor(ArkaPlan3,0x000000ff);
  130. TextDrawFont(ArkaPlan3,3);
  131. TextDrawLetterSize(ArkaPlan3,1.500000,-0.200000);
  132. TextDrawColor(ArkaPlan3,0xffffffff);
  133. TextDrawSetOutline(ArkaPlan3,1);
  134. TextDrawSetProportional(ArkaPlan3,1);
  135. TextDrawSetShadow(ArkaPlan3,1);
  136.  
  137. ArkaPlan4 = TextDrawCreate(613.000000,375.000000,"_");
  138. TextDrawUseBox(ArkaPlan4,1);
  139. TextDrawBoxColor(ArkaPlan4,0x000000ff);
  140. TextDrawTextSize(ArkaPlan4,607.000000,-1.000000);
  141. TextDrawAlignment(ArkaPlan4,0);
  142. TextDrawBackgroundColor(ArkaPlan4,0x000000ff);
  143. TextDrawLetterSize(ArkaPlan4,0.199999,5.399997);
  144. TextDrawFont(ArkaPlan4,3);
  145. TextDrawColor(ArkaPlan4,0xffffffff);
  146. TextDrawSetOutline(ArkaPlan4,1);
  147. TextDrawSetProportional(ArkaPlan4,1);
  148. TextDrawSetShadow(ArkaPlan4,1);
  149.  
  150. ArkaPlan5 = TextDrawCreate(538.000000,397.000000,"_");
  151. TextDrawUseBox(ArkaPlan5,1);
  152. TextDrawBoxColor(ArkaPlan5,0x00ff0033);
  153. TextDrawTextSize(ArkaPlan5,603.000000,64.000000);
  154. TextDrawAlignment(ArkaPlan5,0);
  155. TextDrawBackgroundColor(ArkaPlan5,0x000000ff);
  156. TextDrawFont(ArkaPlan5,3);
  157. TextDrawLetterSize(ArkaPlan5,1.000000,-0.000000);
  158. TextDrawColor(ArkaPlan5,0xffffffff);
  159. TextDrawSetOutline(ArkaPlan5,1);
  160. TextDrawSetProportional(ArkaPlan5,1);
  161. TextDrawSetShadow(ArkaPlan5,1);
  162.  
  163. ArkaPlan6 = TextDrawCreate(607.000000,420.000000,"_");
  164. TextDrawUseBox(ArkaPlan6,1);
  165. TextDrawBoxColor(ArkaPlan6,0xff000033);
  166. TextDrawTextSize(ArkaPlan6,534.000000,0.000000);
  167. TextDrawAlignment(ArkaPlan6,0);
  168. TextDrawBackgroundColor(ArkaPlan6,0x000000ff);
  169. TextDrawFont(ArkaPlan6,3);
  170. TextDrawLetterSize(ArkaPlan6,1.000000,-0.000000);
  171. TextDrawColor(ArkaPlan6,0xffffffff);
  172. TextDrawSetOutline(ArkaPlan6,1);
  173. TextDrawSetProportional(ArkaPlan6,1);
  174. TextDrawSetShadow(ArkaPlan6,1);
  175.  
  176. Cizgi = TextDrawCreate(556.000000,420.000000,"_");
  177. TextDrawUseBox(Cizgi,1);
  178. TextDrawBoxColor(Cizgi,0xffffffff);
  179. TextDrawTextSize(Cizgi,551.000000,0.000000);
  180. TextDrawAlignment(Cizgi,0);
  181. TextDrawBackgroundColor(Cizgi,0x000000ff);
  182. TextDrawFont(Cizgi,3);
  183. TextDrawLetterSize(Cizgi,0.199999,-0.000000);
  184. TextDrawColor(Cizgi,0xffffffff);
  185. TextDrawSetOutline(Cizgi,1);
  186. TextDrawSetProportional(Cizgi,1);
  187. TextDrawSetShadow(Cizgi,1);
  188.  
  189. for(new i=0; i<GetMaxPlayers(); i++)
  190. {
  191.  
  192. Gosterge[i] = 1;
  193. GostergeYazi[i] = TextDrawCreate(535.000000,376.000000, " ");
  194. TextDrawAlignment(GostergeYazi[i],0);
  195. TextDrawBackgroundColor(GostergeYazi[i],0x000000ff);
  196. TextDrawFont(GostergeYazi[i],1);
  197. TextDrawLetterSize(GostergeYazi[i],0.199999,0.899999);
  198. TextDrawSetProportional(GostergeYazi[i],1);
  199. TextDrawSetShadow(GostergeYazi[i],1);
  200. TextDrawColor(GostergeYazi[i],0xffff00ff);
  201.  
  202. Hizg[i] = TextDrawCreate(538.000000,397.000000,"_");
  203. TextDrawUseBox(Hizg[i],1);
  204. TextDrawBoxColor(Hizg[i],0x00ff0066);
  205. TextDrawAlignment(Hizg[i],0);
  206. TextDrawBackgroundColor(Hizg[i],0x000000ff);
  207. TextDrawFont(Hizg[i],3);
  208. TextDrawLetterSize(Hizg[i],9.100000,-0.000000);
  209. TextDrawColor(Hizg[i],0xffffffff);
  210. TextDrawSetOutline(Hizg[i],1);
  211. TextDrawSetProportional(Hizg[i],1);
  212. TextDrawSetShadow(Hizg[i],1);
  213.  
  214. Cang[i] = TextDrawCreate(538.000000,420.000000,"_");
  215. TextDrawUseBox(Cang[i],1);
  216. TextDrawBoxColor(Cang[i],0xff000066);
  217. TextDrawAlignment(Cang[i],0);
  218. TextDrawBackgroundColor(Cang[i],0x000000ff);
  219. TextDrawFont(Cang[i],3);
  220. TextDrawLetterSize(Cang[i],1.000000,-0.000000);
  221. TextDrawColor(Cang[i],0xffffffff);
  222. TextDrawSetOutline(Cang[i],1);
  223. TextDrawSetProportional(Cang[i],1);
  224. TextDrawSetShadow(Cang[i],1);
  225.  
  226. }
  227. return 1;
  228. }
  229. //====================//
  230. public OnFilterScriptExit()
  231. {
  232.  
  233. print("\n-----------------------------");
  234. print(" Velocimetro desligado");
  235. print("-------------------------------\n");
  236. KillTimer(HGS);
  237.  
  238. TextDrawDestroy(Text:ArkaPlan0);
  239. TextDrawDestroy(Text:ArkaPlan1);
  240. TextDrawDestroy(Text:ArkaPlan2);
  241. TextDrawDestroy(Text:ArkaPlan3);
  242. TextDrawDestroy(Text:ArkaPlan4);
  243. TextDrawDestroy(Text:ArkaPlan5);
  244. TextDrawDestroy(Text:ArkaPlan6);
  245. TextDrawDestroy(Text:Cizgi);
  246.  
  247. for(new i=0; i<GetMaxPlayers(); i++)
  248. {
  249.  
  250. TextDrawDestroy(GostergeYazi[i]);
  251. TextDrawDestroy(Hizg[i]);
  252. TextDrawDestroy(Cang[i]);
  253. }
  254. return 1;
  255. }
  256. //====================//
  257. public OnPlayerCommandText(playerid, cmdtext[])
  258. {
  259.  
  260. if (strcmp("/velocimetro", cmdtext, true, 10) == 0)
  261. {
  262.  
  263. if(Gosterge[playerid] == 1)
  264. {
  265.  
  266. Gosterge[playerid] = 0;
  267. SendClientMessage(playerid,ADMIN_RED,"Velocimetro desligado.");
  268. }
  269. else if(Gosterge[playerid] == 0)
  270. {
  271.  
  272. Gosterge[playerid] = 1;
  273. SendClientMessage(playerid,LIGHTGREEN,"Velocimetro ligado.");
  274. }
  275. return 1;
  276. }
  277. return 0;
  278. }
  279. //====================//
  280. public ActualizarVelocimetro()
  281. {
  282.  
  283. for(new i=0; i<GetMaxPlayers(); i++)
  284. {
  285.  
  286. if(IsPlayerConnected(i) && IsPlayerInAnyVehicle(i) && Gosterge[i] == 1)
  287. {
  288.  
  289. TextDrawShowForPlayer(i, Text:ArkaPlan0);
  290. TextDrawShowForPlayer(i, Text:ArkaPlan1);
  291. TextDrawShowForPlayer(i, Text:ArkaPlan2);
  292. TextDrawShowForPlayer(i, Text:ArkaPlan3);
  293. TextDrawShowForPlayer(i, Text:ArkaPlan4);
  294. TextDrawShowForPlayer(i, Text:ArkaPlan5);
  295. TextDrawShowForPlayer(i, Text:ArkaPlan6);
  296.  
  297. new HGG[265]; new Float:Can;
  298. GetVehicleHealth(GetPlayerVehicleID(i), Can);
  299. GetPlayerPos(i,Xa,Ya,Za);
  300. KMH = floatsqroot(floatpower(floatabs(floatsub(Xa,Xb[i])),2)+floatpower(floatabs(floatsub(Ya,Yb[i])),2)+floatpower(floatabs(floatsub(Za,Zb[i])),2));
  301. KMH *= 14.2;
  302. Yukseklik = Za;
  303. format(HGG, sizeof(HGG), "~b~~h~~h~Carro: ~w~%s~n~~g~~h~Velocidade: ~w~%0.0f km/h~n~~n~~y~~h~Peso: ~w~%.1f m~n~~r~~h~Vida: ~w~%.2f", ArIsim[GetVehicleModel(GetPlayerVehicleID(i))-400], KMH, Yukseklik, Can);
  304. TextDrawSetString(Text:GostergeYazi[i], HGG);
  305. TextDrawShowForPlayer(i, GostergeYazi[i]);
  306.  
  307. if(KMH >= 250)
  308. {
  309.  
  310. TextDrawTextSize(Hizg[i],603.000000,0.000000);
  311. }
  312. else
  313. {
  314.  
  315. TextDrawTextSize(Hizg[i], floatadd(534.0, floatdiv(KMH, 3.900000)),0.000000);
  316. }
  317. TextDrawShowForPlayer(i, Hizg[i]);
  318.  
  319. if(Can < 0)
  320. {
  321.  
  322. TextDrawTextSize(Cang[i],538.000000,0.000000);
  323. }
  324. else if(Can >= 1000)
  325. {
  326.  
  327. TextDrawTextSize(Cang[i],603.000000,0.000000);
  328. }
  329. else
  330. {
  331.  
  332. TextDrawTextSize(Cang[i],floatadd(534.0, floatdiv(Can, 14.6000000)),0.000000);
  333. }
  334. TextDrawShowForPlayer(i, Cang[i]);
  335. TextDrawShowForPlayer(i, Cizgi);
  336. }
  337. else
  338. {
  339.  
  340. TextDrawHideForPlayer(i, Text:GostergeYazi[i]);
  341. TextDrawHideForPlayer(i, Text:Hizg[i]);
  342. TextDrawHideForPlayer(i, Text:Cang[i]);
  343. TextDrawHideForPlayer(i, Text:ArkaPlan0);
  344. TextDrawHideForPlayer(i, Text:ArkaPlan1);
  345. TextDrawHideForPlayer(i, Text:ArkaPlan2);
  346. TextDrawHideForPlayer(i, Text:ArkaPlan3);
  347. TextDrawHideForPlayer(i, Text:ArkaPlan4);
  348. TextDrawHideForPlayer(i, Text:ArkaPlan5);
  349. TextDrawHideForPlayer(i, Text:ArkaPlan6);
  350. TextDrawHideForPlayer(i, Text:Cizgi);
  351. } GetPlayerPos(i,Xb[i],Yb[i],Zb[i]), Xb[i] = Xa; Yb[i] = Ya; Zb[i] = Za;
  352. }
  353. }
  354. //=================================PAWNOSCRIPTING===================================//
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!