Guest User

Enquetes

a guest
Dec 21st, 2010
537
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 6.39 KB | None | 0 0
  1.                                                                                                                                                                                                                                       /*
  2.     ________________________________________________________________________
  3.     |                _______  ______   _                                   |
  4.     |               (  ____ \(  ____ \| \    /\                            |
  5.     |               | (    \/| (    \/|  \  / /                            |
  6.     |               | (__    | (__    |  |_/ /                             |
  7.     |               |  __)   |  __)   |   _ (                              |
  8.     |               | (      | (      |  | \ \                             |
  9.     |               | )      | (____/\|  /  \ \                            |
  10.     |               |/       (_______/|_/    \/                            |
  11.     |                                                                      |
  12.     |                   Created By DraKiNs                                 |
  13.     |                                                                      |
  14.     |         [FeK]Company clan of Programmers and Scripters               |
  15.     |______________________________________________________________________|
  16.                        www.feksquad.net
  17.  
  18.                    Atualizado Data 21/12/2010
  19.  
  20.                Acesse Nosso Blog para mais Atualizações
  21.  
  22.                       Deixe os Créditos!
  23.  
  24. --------------- Comandos -------------------
  25. /sim-e      > Vota sim na enquete
  26. /nao-e      > Vota não na enquete
  27. /fechar-e   > Fecha a enquete com resultados
  28. /criar-e    > Cria enquete com a pergunta
  29. /ajuda-e    > Ver comandos sobre a enquete
  30. --------------------------------------------
  31.                                                                                                                                                     */
  32.  
  33.  
  34.  
  35. //----------------------------------------------------------------------------//
  36.  
  37. #include <a_samp>       //- Include
  38. #define DIALOG_EN 1220 //- ID do Dialog
  39.  
  40. //----------------------------------------------------------------------------//
  41.  
  42. new
  43.     bool:EnqueteAberta,
  44.     EnqueteCriador[24],
  45.     SringEnquete[128],
  46.     TotalDeVotosSim,
  47.     TotalDeVotosNao,
  48.     PlayerVotou[500]
  49. ;
  50. //----------------------------------------------------------------------------//
  51.  
  52. public OnPlayerSpawn(playerid)
  53. {
  54.     SendClientMessage(playerid,0xFFFF00FF,"Este servidor usa sistema de enquetes '/ajuda-e'");
  55.     return true;
  56. }
  57.  
  58. //----------------------------------------------------------------------------//
  59.  
  60. public OnPlayerCommandText(playerid, cmdtext[])
  61. {
  62.     if(!strcmp(cmdtext, "/sim-e", true))
  63.     {
  64.         if(PlayerVotou[playerid] == 1)
  65.             return SendClientMessage(playerid,0xFFFF00FF,"No Momento seu voto não está disponível");
  66.            
  67.         if(EnqueteAberta == false)
  68.             return SendClientMessage(playerid,0xFFFF00FF,"No Momento nenhum voto não está disponível");
  69.            
  70.         TotalDeVotosSim++;
  71.         SendClientMessage(playerid,0xFFFF00FF,"Seu voto foi armazenado no banco de dados com sucesso - Sim");
  72.         PlayerVotou[playerid] = 1;
  73.         return true;
  74.     }
  75.     if(!strcmp(cmdtext, "/nao-e", true))
  76.     {
  77.         if(PlayerVotou[playerid] == 1)
  78.             return SendClientMessage(playerid,0xFFFF00FF,"No Momento seu voto não está disponível");
  79.            
  80.         if(EnqueteAberta == false)
  81.             return SendClientMessage(playerid,0xFFFF00FF,"No Momento nenhum voto não está disponível");
  82.            
  83.         TotalDeVotosNao++;
  84.         PlayerVotou[playerid] = 1;
  85.         SendClientMessage(playerid,0xFFFF00FF,"Seu voto foi armazenado no banco de dados com sucesso - Não");
  86.         return true;
  87.     }
  88.     if(!strcmp(cmdtext, "/criar-e", true))
  89.     {
  90.         if(!IsPlayerAdmin(playerid))
  91.             return SendClientMessage(playerid,0xFFFF00FF,"Você não administrador para criar enquete");
  92.            
  93.         if(EnqueteAberta == true)
  94.             return SendClientMessage(playerid,0xFFFF00FF,"No Momento já existe uma enquete aberta");
  95.            
  96.         ShowPlayerDialog(playerid,DIALOG_EN,DIALOG_STYLE_INPUT,"Criar Enquete","Por favor digite sua pergunta para enquete","Criar","Cancelar");
  97.         return true;
  98.     }
  99.     if(!strcmp(cmdtext, "/ajuda-e", true))
  100.     {
  101.         ShowPlayerDialog(playerid,(DIALOG_EN+1),DIALOG_STYLE_MSGBOX,"Sistema de Enquetes - Comandos","/ajuda-e > Ajuda sobre enquete \n /criar-e > Criar Enquetes \n /sim-e > Votar sim \n /nao-e > Votar nao \n /fechar-e > Fecha enquete e mostra resultados","Fechar","");
  102.         return true;
  103.     }
  104.     if(!strcmp(cmdtext, "/fechar-e", true))
  105.     {
  106.         if(!IsPlayerAdmin(playerid))
  107.             return SendClientMessage(playerid,0xFFFF00FF,"Você não administrador para fechar enquete");
  108.            
  109.         if(EnqueteAberta == false)
  110.             return SendClientMessage(playerid,0xFFFF00FF,"No Momento não existe uma enquete aberta");
  111.            
  112.         new TotalVotos = (TotalDeVotosSim + TotalDeVotosNao);
  113.         format(SringEnquete,64, "No Total de %d Votos | %d% Opiniram Não e %d% Opiniram Sim",TotalVotos,((TotalDeVotosNao/TotalVotos)*100),((TotalDeVotosSim/TotalVotos)*100));
  114.         SendClientMessageToAll(0xFFFFFFFF, SringEnquete);
  115.         format(SringEnquete,64, "Totalizou-se no banco de dados  | Sim: %d | Não: %d | Votos: %d ",TotalDeVotosSim,TotalDeVotosNao,(TotalDeVotosSim + TotalDeVotosNao));
  116.         SendClientMessageToAll(0xFFFFFFFF, SringEnquete);
  117.         SendClientMessageToAll(0xFFFFFFFF, "Agradecemos a Todos pelos Votos");
  118.        
  119.         TotalDeVotosSim = 0;
  120.         TotalDeVotosNao = 0;
  121.         EnqueteAberta = false;
  122.        
  123.         for(new i; i < MAX_PLAYERS; i++)
  124.             if(PlayerVotou[i] == 1)
  125.                 PlayerVotou[i] = 0;
  126.         return true;
  127.     }
  128.     return false;
  129. }
  130.  
  131. //----------------------------------------------------------------------------//
  132.  
  133. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  134. {
  135.     if(dialogid == DIALOG_EN)
  136.     {
  137.         if(!response)
  138.             return SendClientMessage(playerid, 0xFFFFFFFF, "Você cancelou a criada da Enquete");
  139.  
  140.         GetPlayerName(playerid,EnqueteCriador,24);
  141.         format(SringEnquete,84, "O Administrador %s acaba de criar uma enquete", EnqueteCriador);
  142.         SendClientMessageToAll(0xFFFFFFFF, SringEnquete);
  143.         format(SringEnquete,128, "Pergunta: %s", inputtext);
  144.         SendClientMessageToAll(0xFFFFFFFF, SringEnquete);
  145.         SendClientMessageToAll(0xFFFFFFFF, "Vote /sim-e ou /não-e conforme a enquete");
  146.         EnqueteAberta = true;
  147.         SendClientMessage(playerid,0xFFFFFFFF, "Caso queira fechar enquete digite /fechar-e");
  148.         return true;
  149.     }
  150.     return false;
  151. }
  152.  
  153. //----------------------------------------------------------------------------//
Advertisement
Add Comment
Please, Sign In to add comment