Advertisement
Guest User

Rc Batlle Command

a guest
Mar 2nd, 2012
115
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 3.70 KB | None | 0 0
  1. /*                  Bom Isto é Minha Primera FS (RC BATTLE COMMAND)*
  2.         Bom Ela foi feita em - de 30 minutos, (ESTAVA SEM INTERNET E DESIDIR FAZER) =)
  3.                       Bom ela é bem simples Pois e a versão v.1
  4.                             Não retire os Creditos
  5.                              Use Sem Moderação
  6.                      Em Breve V.2 Dela Com Novas Novidades
  7.              
  8.              
  9.             '--'             - = - = - = -        '--'
  10.                              - = - = - = -
  11.             - = - = - = - = (MAGNETICLOVE-) = - = - = - = -
  12.             - = - = - = - = (MAGNETICLOVE-) = - = - = - = -
  13.                              - = - = - = -
  14.                              - = - = - = -
  15.  
  16. */
  17.  
  18. #include                                <    a_samp     >
  19. #include                                <     zcmd      >
  20. #include                                <    sscanf2    >
  21. #include                                <    missel     >
  22.  
  23.  
  24. new challenger;
  25. new opponent;
  26.  
  27. new Vehicle;
  28.  
  29. new bool:Battle[MAX_PLAYERS];
  30.  
  31.  
  32. public OnFilterScriptInit()
  33. {
  34.     print("\n--------------------------------------");
  35.     print("------------RC BATTLE COMBAT-------------");
  36.     print("--------------------------------------\n");
  37.     return 1;
  38. }
  39.  
  40. public OnFilterScriptExit()
  41. {
  42.     return 1;
  43. }
  44.  
  45. public OnPlayerRequestClass(playerid, classid)
  46. {
  47.     SetPlayerPos(playerid, 1958.3783, 1343.1572, 15.3746);
  48.     SetPlayerCameraPos(playerid, 1958.3783, 1343.1572, 15.3746);
  49.     SetPlayerCameraLookAt(playerid, 1958.3783, 1343.1572, 15.3746);
  50.     return 1;
  51. }
  52.  
  53. COMMAND:criarrc(playerid, params[])
  54. {
  55.     new str[200];
  56.     new Nome[MAX_PLAYER_NAME];
  57.     GetPlayerName(playerid, Nome, 24);
  58.     if(Battle[playerid]) return SendClientMessage(playerid, -1, "{5FFF00}Tem Algum Jogador na Batalha");
  59.     if(sscanf(params, "i", opponent)) return SendClientMessage(playerid, -1, "{8C8C8C}Use /createrc {5FFF00}[ID]");
  60.     if(!IsPlayerConnected(opponent)) return SendClientMessage(playerid, -1, "ERROR:{8C8C8C} Player Não Conectado !");
  61.     format(str, sizeof(str), "{0023FF}O Jogador {5FFF00}%s {0023FF}esta Te Convidando Para um convite\nPara a Batalha de {5FFF00}RC Battle Command, {0023FF}Deseja Aceitar ?", Nome);
  62.     ShowPlayerDialog(opponent, 1, DIALOG_STYLE_MSGBOX, "RC Battle Command", str, "Confirmar","Cancelar");
  63.     return 1;
  64. }
  65. COMMAND:desistir(playerid)
  66. {
  67.     if(!Battle[playerid]) return SendClientMessage(playerid, -1, "Você Não esta No Combate");
  68.     Battle[playerid] = false;
  69.     SpawnPlayer(challenger);
  70.     SpawnPlayer(playerid);
  71.     return 1;
  72. }
  73. COMMAND:missel(playerid)
  74. {
  75.     AddVehicleMissiles(Vehicle,1.1,0.0);
  76.     return 1;
  77. }
  78.  
  79. public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
  80. {
  81.     VM_OnPlayerKeyStateChange(playerid,newkeys);
  82.     return 1;
  83. }
  84.  
  85. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  86. {
  87.     if(dialogid == 1)
  88.     {
  89.         if(!response) return SendClientMessage(challenger, -1, "{2DFF00}ele Recusou o convite");
  90.         SendClientMessage(challenger, -1, "{2DFF00}ele aceito o convite");
  91.         new
  92.             Float:x,
  93.             Float:y,
  94.             Float:z
  95.         ;
  96.         SetPlayerInterior(challenger, 10);
  97.         SetPlayerInterior(opponent, 10);
  98.         SetPlayerPos(challenger, -974.2322,1061.0780,1345.6754);
  99.         SetPlayerPos(opponent, -1130.2719,1057.8379,1346.4141);
  100.         GetPlayerPos(playerid,x,y,z);
  101.         Vehicle = 0;
  102.         Vehicle = CreateVehicle(564,-974.2322,1061.0780,1345.6754,0.0,-1,-1,1000);
  103.         Vehicle = CreateVehicle(564,-1130.2719,1057.8379,1346.4141,0.0,-1,-1,1000);
  104.         AddVehicleMissiles(Vehicle,1.1,0.0);
  105.         PutPlayerInVehicle(opponent,Vehicle,0);
  106.         PutPlayerInVehicle(challenger, Vehicle,0);
  107.         LinkVehicleToInterior(Vehicle, 10);
  108.         LinkVehicleToInterior(Vehicle, 10);
  109.         PutPlayerInVehicle(challenger, Vehicle, 0);
  110.         PutPlayerInVehicle(opponent, Vehicle, 0);
  111.         Battle[playerid] = true;
  112.         return 1;
  113.     }
  114.     return 1;
  115. }
  116.  
  117. public VM_OnVehicleFire(vehicleid,slot)
  118. {
  119.     return 1;
  120. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement