Don't like ads? PRO users don't see any ads ;-)
Public Pastes
Guest

loteria

By: a guest on May 15th, 2012  |  syntax: None  |  size: 3.98 KB  |  hits: 19  |  expires: Never
download  |  raw  |  embed  |  report abuse  |  print
Text below is selected. Please press Ctrl+C to copy to your clipboard. (⌘+C on Mac)
  1. #define LOTO_DIALOG 50 // Nadefinujeme si Dialog do kterého budeme dávat číslo loterie.
  2. new Loto_Cislo[MAX_PLAYERS]; // Nadefinujeme proměnu pro hráče aby mohl vyhrát (sazné číslo)
  3. forward Loto();
  4.  
  5. ////////////////////////////////////////////////////////////////////////////////////////////////
  6.  
  7. SetTimer("Loto", 6000*5, 1);// toto do ongamemodeinit .. :D
  8.  
  9.  
  10. //////////////////////////////////////////////////////////////////////////////////////////////
  11. if(newkeys == KEY_WALK)// do keystatechange
  12.         {
  13.                 if(IsPlayerInSphere(playerid,-2026.8865,-114.6956,1035.1719,3))
  14.                         {
  15.                                 if(Loto_Cislo[i] > 0) return SendClientMessage(playerid, 0xFFFFFFFF, "Už jsi vsázel do loterie, počkej na další měsíc !"); // Když už vsadí některé číslo
  16.                                 ShowPlayerDialog(playerid,LOTO_DIALOG,DIALOG_STYLE_INPUT,"Sázková Kancelář","Napiš číslo které chceš vsadit do loterie\nPokud zadáš číslo které bude jako první, dostaneš výhru $1 000 000 !\nNa vsazení je zapotřebí $200\nRozmezí je [0/20] !","Vsadit","Nic");
  17.                         }
  18.         }
  19. //ú////////////////////////////////////////////////////////////////////////////////////////////
  20. public Loto(){
  21. new Hrac[MAX_PLAYERS]; // toto som si dorobil ja
  22. new lotocislo1 = 1 + random(20), lotocislo2 = 1 + random(20), lotocislo3 = 1 + random(20), str[150]; // Nadefinujeme si proměny podle kterých budeme určovat výhru (nejméně vyjde 1 a nejvíce 20 náhodně) a string
  23. for(new i = 0; i< 500; i++){ // Projedeme hráče na serveru
  24. if(IsPlayerConnected(i) && Loto_Cislo[i] > 0){ // Když je hráč připojen a má v loterii vsazené číslo větší jak 0
  25. //-------------|
  26. if(Loto_Cislo[i] == lotocislo1){ // Když vsadí náhodné číslo které je první
  27. SendClientMessage(i, 0x0000FFFF, "Blahopřeji ! V loterii jsi zadal první nejšťastnější číslo a vyhrál jsi $1 000 000 !"); // Odešleme zprávu
  28. Loto_Cislo[i] = 0; // Nastavíme mu sázku na 0
  29. GivePlayerMoney(i, 1000000); // Dáme peníze
  30. }
  31. if(Loto_Cislo[i] == lotocislo2){ // Když vsadí náhodné číslo které je druhé
  32. SendClientMessage(i, 0x0000FFFF, "Blahopřeji ! V loterii jsi druhé správné číslo a vyhrál jsi $10 000 !");// Odešleme zprávu
  33. Hrac[Loterie][i] = 0;// Nastavíme mu sázku na 0
  34. GivePlayerMoney(i, 10000);// Dáme peníze
  35. }
  36. if(Loto_Cislo[i] == lotocislo3){ // Když vsadí náhodné číslo které je třetí
  37. SendClientMessage(i, 0x0000FFFF, "Blahopřeji ! V loterii jsi třetí správné číslo a vyhrál jsi $1000 !");// Odešleme zprávu
  38. Loto_Cislo[i] = 0;// Nastavíme mu sázku na 0
  39. GivePlayerMoney(i, 1000); // Dáme peníze
  40. }else{// Když zadá jiné
  41. SendClientMessage(i, 0x0000FFFF, "V loterii tvé číslo boužel nebylo taženo !");// Odešleme zprávu
  42. Loto_Cislo[i] = 0;// Nastavíme mu sázku na 0
  43. }
  44. }
  45. }
  46. format(str, 150, "V loterii byla podána tato čísla: %d, %d, %d !", lotocislo1, lotocislo2, lotocislo3); // zformátujeme
  47. SendClientMessageToAll(0xFFFFFFFF, str); // odešleme
  48. }
  49.  
  50. //////////////////////////////////////////////////////////////////////////////////////////////////////
  51.  
  52. //OnDialogResponse
  53. if(LOTO_DIALOG == LOTO_DIALOG && response) // Když dá první tlačítko a je dialog ID jak jsme nadefinovali
  54. {
  55. new castka = strval(inputtext), str[150]; // Nadefinujeme string a castku jako strval(inputtext).
  56. if(GetPlayerMoney(playerid) < 200) return SendClientMessage(playerid, 0xFFFFFFFF, "Potřebuješ $200 !"); // Když nemá na sázku 200
  57. if(!strlen(inputtext)) return ShowPlayerDialog(playerid,LOTO_DIALOG,DIALOG_STYLE_INPUT,"Loterie","Chybná částka !","Ok","Nic"); // Když zadá špatnou částku
  58. if(castka < 1 || castka > 20) return ShowPlayerDialog(playerid,LOTO_DIALOG,DIALOG_STYLE_INPUT,"Loterie","Rozmezí je [1/20] !","Ok","Nic"); // Když nedá rozmezí mezi 1/20.
  59. //--------------------|
  60. Loto_Cislo[playerid] = castka;
  61. GivePlayerMoney(playerid, -200);
  62. format(str, 150, "Vsadil jsi do loterie číslo %d, byl ti ubrán poplatek -$200, hodně štěstí :) !", castka);
  63. SendClientMessage(playerid, 0xFFFFFFFF, str);
  64. }
create a new version of this paste RAW Paste Data