API tools faq
paste
Advertisement
Guest User

Jao_lEAO fs

a guest
Sep 2nd, 2011
1,148
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 14.52 KB | None | 0 0
raw download clone embed print report
  1. /*
  2. CRÉDITOS DO SISTEMA DE SHICKCARD,RYDER' E JOSMA_CMD!
  3. WWW.DOMINIOSAMP.BLOGSPOT.COM - VENHA CRESCER CONOSCO!
  4. */
  5.  
  6. #include <a_samp>
  7.  
  8. #define Branco 0xFFFFFFFF
  9. #define vermelho 0xE3191950
  10. #define AdminCor 0xE3191950
  11. #define amarelo 0xF6FF00AA
  12.  
  13. #if defined FILTERSCRIPT
  14.  
  15. #if !defined SetSharingData
  16. #define SetSharingData(%0,%1) \
  17. setproperty(0, "", (%0), (%1))
  18. #endif
  19.  
  20. public OnFilterScriptInit()
  21. {
  22. print("\n--------------------------------------");
  23. print(" [FS] Sistema de Veículo Avançado v1.1 Alpha");
  24. print("Créditos a: [KoS]Shickcard, Josma_cmd e Ryder'");
  25. print("WWW.KINGSOFSAMP.COM - VENHA CRESCER CONOSCO!");
  26. print("--------------------------------------\n");
  27. return 1;
  28. }
  29.  
  30. #else
  31.  
  32. main()
  33. {
  34. print("\n----------------------------------");
  35. print(" [FS] Sistema de Veículo Avançado v1.1 Alpha");
  36. print("Créditos a: [KoS]Shickcard, Josma_cmd e Ryder'");
  37. print("www.dominiosamp.blogspot.com - VENHA CRESCER CONOSCO!");
  38. print("----------------------------------\n");
  39. }
  40.  
  41. #endif
  42.  
  43. new iLuzes[MAX_PLAYERS];
  44. new Alarme[MAX_PLAYERS];
  45. new Capo[MAX_PLAYERS];
  46. new PMalas[MAX_PLAYERS];
  47. new Motor[MAX_PLAYERS];
  48.  
  49. public OnPlayerConnect(playerid)
  50. {
  51. SendClientMessage(playerid, Branco, "[FS-SVA] Esse servidor usa o Sistema de Veículo Avançado v1.1 Alpha do [KoS] Shickcard");
  52. return 1;
  53. }
  54.  
  55. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  56. {
  57. if(dialogid == 3)
  58. {
  59. if(listitem == 0)
  60. {
  61. if(iLuzes[playerid] == 0)
  62. {
  63. new veiculo = GetPlayerVehicleID(playerid);
  64. new engine,lights,alarm,doors,bonnet,boot,objective;
  65. GetVehicleParamsEx(GetPlayerVehicleID(playerid),engine,lights,alarm,doors,bonnet,boot,objective);
  66. SetVehicleParamsEx(veiculo,engine,VEHICLE_PARAMS_ON,alarm,doors,bonnet,boot,objective);
  67. iLuzes[playerid] = 1;
  68. }
  69. else if(iLuzes[playerid] == 1)
  70. {
  71. new veiculo = GetPlayerVehicleID(playerid);
  72. new engine,lights,alarm,doors,bonnet,boot,objective;
  73. GetVehicleParamsEx(veiculo,engine,lights,alarm,doors,bonnet,boot,objective);
  74. SetVehicleParamsEx(veiculo,engine,VEHICLE_PARAMS_OFF,alarm,doors,bonnet,boot,objective);
  75. iLuzes[playerid] = 0;
  76. }
  77. }
  78. if(listitem == 1)
  79. {
  80. if(Capo[playerid] == 0)
  81. {
  82. new veiculo = GetPlayerVehicleID(playerid);
  83. new engine,lights,alarm,doors,bonnet,boot,objective;
  84. GetVehicleParamsEx(veiculo,engine,lights,alarm,doors,bonnet,boot,objective);
  85. SetVehicleParamsEx(veiculo,engine,lights,alarm,doors,VEHICLE_PARAMS_ON,boot,objective);
  86. Capo[playerid] = 1;
  87. }
  88. else if(Capo[playerid] == 1)
  89. {
  90. new veiculo = GetPlayerVehicleID(playerid);
  91. new engine,lights,alarm,doors,bonnet,boot,objective;
  92. GetVehicleParamsEx(veiculo,engine,lights,alarm,doors,bonnet,boot,objective);
  93. SetVehicleParamsEx(veiculo,engine,lights,alarm,doors,VEHICLE_PARAMS_OFF,boot,objective);
  94. Capo[playerid] = 0;
  95. }
  96. }
  97. if(listitem == 2)
  98. {
  99. if(PMalas[playerid] == 0)
  100. {
  101. new veiculo = GetPlayerVehicleID(playerid);
  102. new engine,lights,alarm,doors,bonnet,boot,objective;
  103. GetVehicleParamsEx(veiculo,engine,lights,alarm,doors,bonnet,boot,objective);
  104. SetVehicleParamsEx(veiculo,engine,lights,alarm,doors,bonnet,VEHICLE_PARAMS_ON,objective);
  105. PMalas[playerid] = 1;
  106. }
  107. else if(PMalas[playerid] == 1)
  108. {
  109. new engine,lights,alarm,doors,bonnet,boot,objective;
  110. new veiculo = GetPlayerVehicleID(playerid);
  111. GetVehicleParamsEx(veiculo,engine,lights,alarm,doors,bonnet,boot,objective);
  112. SetVehicleParamsEx(veiculo,engine,lights,alarm,doors,bonnet,VEHICLE_PARAMS_OFF,objective);
  113. PMalas[playerid] = 0;
  114. }
  115. }
  116. if(listitem == 3)
  117. {
  118. if(Motor[playerid] == 0)
  119. {
  120. new veiculo = GetPlayerVehicleID(playerid);
  121. new engine,lights,alarm,doors,bonnet,boot,objective;
  122. GetVehicleParamsEx(veiculo,engine,lights,alarm,doors,bonnet,boot,objective);
  123. SetVehicleParamsEx(veiculo,VEHICLE_PARAMS_ON,lights,alarm,doors,bonnet,boot,objective);
  124. Motor[playerid] = 1;
  125. }
  126. else if(Motor[playerid] == 1)
  127. {
  128. new veiculo = GetPlayerVehicleID(playerid);
  129. new engine,lights,alarm,doors,bonnet,boot,objective;
  130. GetVehicleParamsEx(veiculo,engine,lights,alarm,doors,bonnet,boot,objective);
  131. SetVehicleParamsEx(veiculo,VEHICLE_PARAMS_OFF,lights,alarm,doors,bonnet,boot,objective);
  132. Motor[playerid] = 0;
  133. }
  134. }
  135. if(listitem == 4)
  136. {
  137. if(Alarme[playerid] == 0)
  138. {
  139. new veiculo = GetPlayerVehicleID(playerid);
  140. new engine,lights,alarm,doors,bonnet,boot,objective;
  141. GetVehicleParamsEx(veiculo,engine,lights,alarm,doors,bonnet,boot,objective);
  142. SetVehicleParamsEx(veiculo,engine,lights,VEHICLE_PARAMS_ON,doors,bonnet,boot,objective);
  143. Alarme[playerid] = 1;
  144. }
  145. else if(Alarme[playerid] == 1)
  146. {
  147. new veiculo = GetPlayerVehicleID(playerid);
  148. new engine,lights,alarm,doors,bonnet,boot,objective;
  149. GetVehicleParamsEx(veiculo,engine,lights,alarm,doors,bonnet,boot,objective);
  150. SetVehicleParamsEx(veiculo,engine,lights,VEHICLE_PARAMS_OFF,doors,bonnet,boot,objective);
  151. Alarme[playerid] = 0;
  152. }
  153. }
  154. return 1;
  155. }
  156. return 0;
  157. }
  158.  
  159. public OnPlayerCommandText(playerid, cmdtext[])
  160. {
  161. new tmp[256],cmd[256],idx;
  162. if(strcmp(cmd, "/ComandosSVA", true) == 0)
  163. {
  164. if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, AdminCor, "Você não é um administrador para usar este comando");
  165. SendClientMessage(playerid, Branco, "/Criarveiculo , /DestruirVeiculo, /VidaVeiculo, /AnguloVeiculo, /PosicaoVeiculo");
  166. SendClientMessage(playerid, Branco, "/VwVeiculo , /VeloVeiculo, /ModeloVeiculo, /StatusVeiculo, /CoresVeiculo");
  167. SendClientMessage(playerid, Branco, "/SetarPaintjob , /InfoVeiculo, /SpecVeiculo, /Creditos, /ComandosSVA");
  168. SendClientMessage(playerid, Branco, "/SpecVeiculoOff");
  169. return 1;
  170. }
  171. if(strcmp(cmd, "/Painel", true) == 0)
  172. {
  173. if(!IsPlayerInAnyVehicle(playerid)) SendClientMessage(playerid, -1, "Você deve está em um veículo para usar o comando!");
  174. ShowPlayerDialog(playerid, 1, DIALOG_STYLE_LIST,".:: Painel [SVA] v1.1a ::","Luzes\nAbrir/Fechar Capô\nAbrir/Fechar Porta-Malas\nLigar Motor\nAlarme","Confirmar","Cancelar");
  175. return 1;
  176. }
  177. if(strcmp(cmd, "/CriarVeiculo", true) == 0)
  178. {
  179. if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, AdminCor, "Você não é um administrador para usar este comando");
  180. new modelo, cor1, cor2, string[95];
  181. tmp = strtok(cmdtext, idx);
  182. if(!strlen(tmp))return SendClientMessage(playerid, vermelho, "Uso correto:{FFFFFF} /CriarVeiculo [Modelo] [Cor1] [Cor2]");
  183. modelo = strval(tmp);
  184. tmp = strtok(cmdtext, idx);
  185. if(modelo < 400 || modelo > 611) return SendClientMessage(playerid, Branco, "O modelo não pode ser maior que {E31919}611{FFFFFF} ou menor que {E31919}400");
  186. if(!strlen(tmp)) return SendClientMessage(playerid, vermelho, "Uso correto:{FFFFFF} /CriarVeiculo [Modelo] [Cor1] [Cor2]");
  187. cor1 = strval(tmp);
  188. tmp = strtok(cmdtext, idx);
  189. if(!strlen(tmp)) return SendClientMessage(playerid, vermelho, "Uso correto:{FFFFFF} /CriarVeiculo [Modelo] [Cor1] [Cor2]");
  190. cor2 = strval(tmp);
  191. format(string, sizeof(string), "Você criou um veiculo modelo {E31919}[%d] {E31919}cor {E31919}[%d] {FFFFFF}e {E31919}[%d]", modelo, cor1, cor2);
  192. SendClientMessage(playerid, Branco, string);
  193. new Float:X, Float:Y, Float:Z, Float: angulo;
  194. GetPlayerPos(playerid, X, Y, Z);
  195. GetPlayerFacingAngle(playerid, angulo);
  196. CreateVehicle(modelo, X, Y, Z-1, angulo, cor1, cor2, 25000);
  197. return 1;
  198. }
  199. if(strcmp(cmd, "/DestruirVeiculo", true) == 0)
  200. {
  201. if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, AdminCor, "Você não é um administrador para usar este comando");
  202. tmp = strtok(cmdtext, idx);
  203. new veiculo,string[33];
  204. if(!strlen(tmp)) return SendClientMessage(playerid, vermelho, "Uso correto:{FFFFFF} /DestruirVeiculo [ID]");
  205. veiculo = strval(tmp);
  206. DestroyVehicle(veiculo);
  207. format(string, sizeof(string), "Você destruiu o veículo [%d]", veiculo);
  208. SendClientMessage(playerid, Branco, string);
  209. return 1;
  210. }
  211. if(strcmp(cmd, "/VidaVeiculo", true) == 0)
  212. {
  213. new Float:health,string[15];
  214. format(string, sizeof(string), "Seu veículo possui [%d] de vida.", health);
  215. SendClientMessage(playerid, Branco, string);
  216. return 1;
  217. }
  218. if(strcmp(cmd, "/AnguloVeiculo", true) == 0)
  219. {
  220. new Float:z_rot,string[50];
  221. format(string, sizeof(string), "Seu veículo possui [%f] de rotação.", z_rot);
  222. SendClientMessage(playerid, Branco, string);
  223. return 1;
  224. }
  225. if(strcmp(cmd, "/PosicaoVeiculo", true) == 0)
  226. {
  227. new Float:vehx,Float:vehy,Float:vehz,string[50];
  228. format(string, sizeof(string), "[X]: %f - [Y]: %f - [Z]: %f.", vehx, vehy, vehz);
  229. SendClientMessage(playerid, Branco, string);
  230. return 1;
  231. }
  232. if(strcmp(cmd, "/VwVeiculo", true) == 0)
  233. {
  234. new veiculo = GetPlayerVehicleID(playerid),string[20];
  235. format(string, sizeof(string), "[Virtual World]: %d", GetVehicleVirtualWorld(veiculo));
  236. SendClientMessage(playerid, Branco, string);
  237. return 1;
  238. }
  239. if(strcmp(cmd, "/VeloVeiculo", true) == 0)
  240. {
  241. new Float:Velocity[3],string[50];
  242. format(string, sizeof(string), "[Velo Veiculo]: X - [%f] || Y - [%f] || [Z] - [%f]", Velocity[0], Velocity[1], Velocity[2]);
  243. SendClientMessage(playerid, Branco, string);
  244. return 1;
  245. }
  246. if(strcmp(cmd, "/ModeloVeiculo", true) == 0)
  247. {
  248. new veiculo = GetPlayerVehicleID(playerid),string[20];
  249. format(string, sizeof(string), "[Modelo Veículo]: [%d]", GetVehicleModel(veiculo));
  250. SendClientMessage(playerid, Branco, string);
  251. return 1;
  252. }
  253. if(strcmp(cmd, "/StatusVeiculo", true) == 0)
  254. {
  255. new panels,doors,lights,tires,string[128];
  256. format(string, sizeof(string), "[Status Veículo]: Paineis - [%d] || Portas - [%d] || Luzes - [%d] || Pneus - [%d]", panels,doors,lights,tires);
  257. SendClientMessage(playerid, Branco, string);
  258. return 1;
  259. }
  260. if(strcmp(cmd, "/CoresVeiculo", true) == 0)
  261. {
  262. new color1,color2,string[30];
  263. format(string, sizeof(string), "[Cores Veículo]: Cor 1 - [%d] || Cor 2 - [%d]", color1, color2);
  264. SendClientMessage(playerid, Branco, string);
  265. return 1;
  266. }
  267. if(strcmp(cmd, "/SetarPaintjob", true) == 0)
  268. {
  269. new veiculo = GetPlayerVehicleID(playerid),paintj,string[45];
  270. tmp = strtok(cmdtext, idx);
  271. if(!strlen(tmp)) return SendClientMessage(playerid, vermelho, "Uso correto:{FFFFFF} /SetarPaintJob [Numero]");
  272. paintj = strval(tmp);
  273. ChangeVehiclePaintjob(veiculo, paintj);
  274. format(string, sizeof(string), "Você setou a paintjob do veículo para: [%d]", paintj);
  275. SendClientMessage(playerid, -1, string);
  276. return 1;
  277. }
  278. if(strcmp(cmd, "/InfoVeiculo", true) == 0)
  279. {
  280. tmp = strtok(cmdtext, idx);
  281. new string[60],panels,doors,lights,tires,color1,color2;
  282. new Float:vehx, Float:vehy, Float:vehz,Float:z_rot,Float:Velocity[3],Float:health;
  283. new veiculo = GetPlayerVehicleID(playerid);
  284. if(!strlen(tmp)) return SendClientMessage(playerid, vermelho, "Uso correto:{FFFFFF} /InfoVeiculo [ID]");
  285. veiculo = strval(tmp);
  286. GetVehicleHealth(veiculo, health);
  287. GetVehicleZAngle(veiculo, z_rot);
  288. GetVehiclePos(veiculo, vehx, vehy, vehz);
  289. GetVehicleVirtualWorld(veiculo);
  290. GetVehicleVelocity(veiculo, Velocity[0], Velocity[1], Velocity[2]);
  291. GetVehicleModel(veiculo);
  292. GetVehicleDamageStatus(veiculo,panels,doors,lights,tires);
  293. GetVehicleColor(veiculo, color1, color2);
  294. format(string, sizeof(string), "[Vida]: %d || [Angulo] [Z] - %f || [Posição]: [X] - %f , [Y] - %f, [Z] - %f || [VW]: %d || [Velo]: [X] - %f, [Y] - %f, [Z] - %f || [Modelo]: %d || Status: [Paineis]: %d - [Portas]: %d - [Luzes]: %d - [Pneus]: %d || [Cor 1]: %d || [Cor 2]: %d", health, z_rot, vehx, vehy, vehz, GetVehicleVirtualWorld(veiculo), Velocity[0], Velocity[1], Velocity[2], GetVehicleModel(veiculo), panels,doors,lights,tires, color1, color2);
  295. SendClientMessage(playerid, Branco, string);
  296. return 1;
  297. }
  298. if(strcmp(cmd, "/SpecVeiculo", true) == 0)
  299. {
  300. if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, AdminCor, "Você não é um administrador para usar este comando");
  301. tmp = strtok(cmdtext, idx);
  302. new string[60];
  303. new veiculo = GetPlayerVehicleID(playerid);
  304. if(!strlen(tmp)) return SendClientMessage(playerid, vermelho, "Uso correto:{FFFFFF} /SpecVeiculo [ID]");
  305. veiculo = strval(tmp);
  306. PlayerSpectateVehicle(playerid, veiculo);
  307. format(string, sizeof(string), "Você está de spec no veículo modelo [%d]", veiculo);
  308. SendClientMessage(playerid, -1, string);
  309. return 1;
  310. }
  311. if(strcmp(cmd, "/SpecVeiculoOff", true) == 0)
  312. {
  313. if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, AdminCor, "Você não é um administrador para usar este comando");
  314. PlayerSpectateVehicle(playerid, 0);
  315. SendClientMessage(playerid, -1, "Spec Veículo OFF");
  316. return 1;
  317. }
  318. if(strcmp(cmd, "/Creditos", true) == 0)
  319. {
  320. SendClientMessage(playerid, AdminCor, ".:: Créditos do Sistema de Veículo Avançado v1.1 Alpha ::.");
  321. SendClientMessage(playerid, AdminCor, "[KoS]Shickcard - Criador do Sistema");
  322. SendClientMessage(playerid, AdminCor, "Ryder' - Getar cor veículo");
  323. SendClientMessage(playerid, AdminCor, "Josma_cmd - Idealizador do Sistema");
  324. SendClientMessage(playerid, Branco, ".:: www.kingsofsamp.com - Acesse agora mesmo e cadastre-se em nossa equipe! ::.");
  325. return 1;
  326. }
  327. return 0;
  328. }
  329.  
  330. #if !defined GetSharingData
  331. #define GetSharingData(%0,%1) \
  332. getproperty(0, "", (%0), (%1))
  333. #endif
  334.  
  335. stock GetVehicleColor(veiculo, &color1, &color2)
  336. {
  337. new
  338. stringData[24],
  339. stringColor[2][12],
  340. i
  341. ;
  342. GetSharingData(veiculo, stringData);
  343.  
  344. if((i = strfind(stringData, "-", true)) != -1)
  345. {
  346. strmid(stringColor[0], stringData, 0, i);
  347. strmid(stringColor[1], stringData, (i + 1), strlen(stringData));
  348.  
  349. color1 = strval(stringColor[0]);
  350. color2 = strval(stringColor[1]);
  351. return 1;
  352. }
  353. return 0;
  354. }
  355.  
  356. strtok(const string[], &index)
  357. {
  358. new length = strlen(string);
  359. while ((index < length) && (string[index] <= ' '))
  360. {
  361. index++;
  362. }
  363.  
  364. new offset = index;
  365. new result[20];
  366. while ((index < length) && (string[index] > ' ') && ((index - offset) < (sizeof(result) - 1)))
  367. {
  368. result[index - offset] = string[index];
  369. index++;
  370. }
  371. result[index - offset] = EOS;
  372. return result;
  373. }
  374.  
  375. /*
  376. CRÉDITOS DO SISTEMA DE SHICKCARD,RYDER E JOSMA_CMD!
  377. WWW.DOMINIOSAMP.BLOGSPOT.COM - VENHA CRESCER CONOSCO!
  378. */
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!