SHARE
TWEET

Jao_lEAO fs

a guest Sep 2nd, 2011 701 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  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. */
RAW Paste Data
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
 
Top