Nyft_

Procurados & Marcação (não testei) ~Nyft

Sep 8th, 2020 (edited)
358
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 1.62 KB | None | 0 0
  1. #include a_samp
  2. #include pawn.cmd
  3.  
  4. enum
  5. {
  6.     DIALOG_PROCURADOS
  7. }
  8.  
  9. main(){}
  10.  
  11. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  12. {
  13.     if(dialogid == DIALOG_PROCURADOS)
  14.     {
  15.         if(response)
  16.         {
  17.             new string[64], targetid = GetIDFromName(inputtext);
  18.  
  19.             if(targetid == INVALID_PLAYER_ID)
  20.                 return SendClientMessage(playerid, -1, "* Procurado não encontrado.");
  21.  
  22.             SetPlayerMarkerForPlayer(playerid, targetid, 0xFF0000FF);
  23.             format(string, sizeof(string), "* %s foi marcado em seu radar.", GetPlayerNamef(targetid));
  24.             SendClientMessage(playerid, -1, string);
  25.         }
  26.     }
  27.     return 1;
  28. }
  29.  
  30. GetPlayerNamef(playerid)
  31. {
  32.     new name[MAX_PLAYER_NAME];
  33.     GetPlayerName(playerid, name, 24);
  34.     return name;
  35. }
  36.  
  37. GetIDFromName(const Name[])
  38. {
  39.     for(new i, j = GetPlayerPoolSize(); i <= j; i++)
  40.         if(!strcmp(Name, GetPlayerNamef(i)))
  41.             return i;
  42.  
  43.     return INVALID_PLAYER_ID;
  44. }
  45.  
  46. CMD:procurados(playerid)
  47. {
  48.     new list[64 * 10] = "#\tNome\tEstrelas\n";
  49.  
  50.     for(new i, j = GetPlayerPoolSize(); i <= j; i++)
  51.         if(GetPlayerWantedLevel(i) != 0)
  52.             format(list, sizeof(list), "%s%i\t%s\t%i\n", list, i, GetPlayerNamef(i), GetPlayerWantedLevel(i));
  53.  
  54.     if(list[0] == EOS)
  55.         return SendClientMessage(playerid, -1, "* Não há nenhum procurado no momento.");
  56.  
  57.     ShowPlayerDialog(playerid, DIALOG_PROCURADOS, DIALOG_STYLE_TABLIST, "Procurados", list, "Selecionar", "Fechar");
  58.     return 1;
  59. }
  60. CMD:estrelas(playerid)
  61.     return SetPlayerWantedLevel(playerid, GetPlayerWantedLevel(playerid)+1);
Add Comment
Please, Sign In to add comment