API tools faq
paste
Kaczmi

Loterie

Kaczmi
May 15th, 2012
177
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 19.25 KB | None | 0 0
raw download clone embed print report
  1. #include <a_samp>
  2.  
  3. #define MAX_PL 100
  4. #define DIAL_1 150
  5. #define DIAL_2 151
  6. #define DIAL_3 152
  7. #define DIAL_4 153
  8. #define DIAL_5 154
  9. #define DIAL_6 155
  10. #define DIAL_7 156
  11. #define DIAL_8 157
  12. #define DIAL_9 158
  13. #define DIAL_10 159
  14. #define DIAL_11 160
  15. #define DIAL_12 161
  16.  
  17. main()
  18. {
  19. }
  20.  
  21. forward Losovani();
  22.  
  23. new
  24. bool:l_Bet[MAX_PL][6],
  25. l_Nums[MAX_PL][5][5],
  26. l_Chance[MAX_PL],
  27. bool:l_Results,
  28. l_ResultsOfLotery[5][5],
  29. l_ResultOfChance,
  30. bool:l_Vsadil[MAX_PL]
  31. ;
  32.  
  33. public OnGameModeInit()
  34. {
  35. SetTimer("Losovani",900000,true);
  36. }
  37.  
  38. public OnPlayerConnect(playerid)
  39. {
  40. SendClientMessage(playerid,-1,"Server používá Loterii od {FF0000}Mort! {FFFFFF}({FFFF00}/loto{FFFFFF})");
  41. return 1;
  42. }
  43.  
  44. public OnPlayerCommandText(playerid,cmdtext[])
  45. {
  46. if(strcmp(cmdtext[1],"loto",true)==0)
  47. {
  48. ShowPlayerDialog(playerid,DIAL_1,DIALOG_STYLE_LIST,"Loterie by Mort","Vsadit","Vybrat","Zrušit");
  49. return 1;
  50. }
  51. if(strcmp(cmdtext[1],"loto_res",true)==0)
  52. {
  53. if(l_Results)
  54. {
  55. ShowResults(playerid);
  56. }
  57. return 1;
  58. }
  59. if(strcmp(cmdtext[1],"loto_speed",true)==0)
  60. {
  61. if(IsPlayerAdmin(playerid))
  62. {
  63. Losovani();
  64. }
  65. return 1;
  66. }
  67. return 0;
  68. }
  69.  
  70. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  71. {
  72. if(response == 1)
  73. {
  74. if(dialogid == DIAL_1)
  75. {
  76. ShowPlayerDialog(playerid,DIAL_2,DIALOG_STYLE_MSGBOX,"Loterie by Mort","Vsází se celkem na 5 řad (+ šance) po pěti náhodných číslech od 0 - 50\nOdměny se dělí podle toho, kolik čísel jsi uhodl a taky kolik řad\nCena vsazení všech čísel stojí 1250$","Pokračovat","Zrušit");
  77. return 1;
  78. }
  79. if(dialogid == DIAL_2)
  80. {
  81. if(GetPlayerMoney(playerid) < 1250) return SendClientMessage(playerid,-1,"Bohužel nemáš 1250$ na vsazení do loterie");
  82. ShowDialog(playerid);
  83. GivePlayerMoney(playerid,-1250);
  84. return 1;
  85. }
  86. if(dialogid == DIAL_3)
  87. {
  88. switch(listitem)
  89. {
  90. case 0:
  91. {
  92. ShowPlayerDialog(playerid,DIAL_4,DIALOG_STYLE_INPUT,"Loterie by Mort","Chystáš se vsadit na řadu č. 1\r\nMůžeš vsadit celkem 5 čísel oddělených čárkou( , )\r\nPř.: 15,16,17,18,19","Vsadit","Zpět");
  93. }
  94. case 1:
  95. {
  96. ShowPlayerDialog(playerid,DIAL_5,DIALOG_STYLE_INPUT,"Loterie by Mort","Chystáš se vsadit na řadu č. 2\r\nMůžeš vsadit celkem 5 čísel oddělených čárkou( , )\r\nPř.: 15,16,17,18,19","Vsadit","Zpět");
  97. }
  98. case 2:
  99. {
  100. ShowPlayerDialog(playerid,DIAL_6,DIALOG_STYLE_INPUT,"Loterie by Mort","Chystáš se vsadit na řadu č. 3\r\nMůžeš vsadit celkem 5 čísel oddělených čárkou( , )\r\nPř.: 15,16,17,18,19","Vsadit","Zpět");
  101. }
  102. case 3:
  103. {
  104. ShowPlayerDialog(playerid,DIAL_7,DIALOG_STYLE_INPUT,"Loterie by Mort","Chystáš se vsadit na řadu č. 4\r\nMůžeš vsadit celkem 5 čísel oddělených čárkou( , )\r\nPř.: 15,16,17,18,19","Vsadit","Zpět");
  105. }
  106. case 4:
  107. {
  108. ShowPlayerDialog(playerid,DIAL_8,DIALOG_STYLE_INPUT,"Loterie by Mort","Chystáš se vsadit na řadu č. 5\r\nMůžeš vsadit celkem 5 čísel oddělených čárkou( , )\r\nPř.: 15,16,17,18,19","Vsadit","Zpět");
  109. }
  110. case 5:
  111. {
  112. ShowPlayerDialog(playerid,DIAL_9,DIALOG_STYLE_INPUT,"Loterie by Mort","Chystáš se vsadit šanci\r\nMusíš vsadit pouze jedno číslo","Vsadit","Zpět");
  113. }
  114. }
  115. return 1;
  116. }
  117. if(dialogid == DIAL_4)
  118. {
  119. new n[5];
  120. if(!(GetNumAndConvertIt(inputtext,n[0],n[1],n[2],n[3],n[4]))) return ShowPlayerDialog(playerid,DIAL_4,DIALOG_STYLE_INPUT,"Loterie by Mort","Špatně zadaný text, 5 čísel, oddělit čárkou (5,10,15,20,25)","Vsadit","Zpět");
  121. else if(l_Bet[playerid][0]) return ShowDialog(playerid);
  122. else
  123. {
  124. GetNumAndConvertIt(inputtext,n[0],n[1],n[2],n[3],n[4]);
  125. l_Nums[playerid][0][0] = n[0];
  126. l_Nums[playerid][0][1] = n[1];
  127. l_Nums[playerid][0][2] = n[2];
  128. l_Nums[playerid][0][3] = n[3];
  129. l_Nums[playerid][0][4] = n[4];
  130. l_Bet[playerid][0] = true;
  131. }
  132. ShowDialog(playerid);
  133. return 1;
  134. }
  135. if(dialogid == DIAL_5)
  136. {
  137. new n[5];
  138. if(!(GetNumAndConvertIt(inputtext,n[0],n[1],n[2],n[3],n[4]))) return ShowPlayerDialog(playerid,DIAL_5,DIALOG_STYLE_INPUT,"Loterie by Mort","Špatně zadaný text, 5 čísel, oddělit čárkou (5,10,15,20,25)","Vsadit","Zpět");
  139. else if(l_Bet[playerid][1]) return ShowDialog(playerid);
  140. else
  141. {
  142. GetNumAndConvertIt(inputtext,n[0],n[1],n[2],n[3],n[4]);
  143. l_Nums[playerid][1][0] = n[0];
  144. l_Nums[playerid][1][1] = n[1];
  145. l_Nums[playerid][1][2] = n[2];
  146. l_Nums[playerid][1][3] = n[3];
  147. l_Nums[playerid][1][4] = n[4];
  148. l_Bet[playerid][1] = true;
  149. }
  150. ShowDialog(playerid);
  151. return 1;
  152. }
  153. if(dialogid == DIAL_6)
  154. {
  155. new n[5];
  156. if(!(GetNumAndConvertIt(inputtext,n[0],n[1],n[2],n[3],n[4]))) return ShowPlayerDialog(playerid,DIAL_6,DIALOG_STYLE_INPUT,"Loterie by Mort","Špatně zadaný text, 5 čísel, oddělit čárkou (5,10,15,20,25)","Vsadit","Zpět");
  157. else if(l_Bet[playerid][2]) return ShowDialog(playerid);
  158. else
  159. {
  160. GetNumAndConvertIt(inputtext,n[0],n[1],n[2],n[3],n[4]);
  161. l_Nums[playerid][2][0] = n[0];
  162. l_Nums[playerid][2][1] = n[1];
  163. l_Nums[playerid][2][2] = n[2];
  164. l_Nums[playerid][2][3] = n[3];
  165. l_Nums[playerid][2][4] = n[4];
  166. l_Bet[playerid][2] = true;
  167. }
  168. ShowDialog(playerid);
  169. return 1;
  170. }
  171. if(dialogid == DIAL_7)
  172. {
  173. new n[5];
  174. if(!(GetNumAndConvertIt(inputtext,n[0],n[1],n[2],n[3],n[4]))) return ShowPlayerDialog(playerid,DIAL_7,DIALOG_STYLE_INPUT,"Loterie by Mort","Špatně zadaný text, 5 čísel, oddělit čárkou (5,10,15,20,25)","Vsadit","Zpět");
  175. else if(l_Bet[playerid][3]) return ShowDialog(playerid);
  176. else
  177. {
  178. GetNumAndConvertIt(inputtext,n[0],n[1],n[2],n[3],n[4]);
  179. l_Nums[playerid][3][0] = n[0];
  180. l_Nums[playerid][3][1] = n[1];
  181. l_Nums[playerid][3][2] = n[2];
  182. l_Nums[playerid][3][3] = n[3];
  183. l_Nums[playerid][3][4] = n[4];
  184. l_Bet[playerid][3] = true;
  185. }
  186. ShowDialog(playerid);
  187. return 1;
  188. }
  189. if(dialogid == DIAL_8)
  190. {
  191. new n[5];
  192. if(!(GetNumAndConvertIt(inputtext,n[0],n[1],n[2],n[3],n[4]))) return ShowPlayerDialog(playerid,DIAL_8,DIALOG_STYLE_INPUT,"Loterie by Mort","Špatně zadaný text, 5 čísel, oddělit čárkou (5,10,15,20,25)","Vsadit","Zpět");
  193. else if(l_Bet[playerid][4]) return ShowDialog(playerid);
  194. else
  195. {
  196. GetNumAndConvertIt(inputtext,n[0],n[1],n[2],n[3],n[4]);
  197. l_Nums[playerid][4][0] = n[0];
  198. l_Nums[playerid][4][1] = n[1];
  199. l_Nums[playerid][4][2] = n[2];
  200. l_Nums[playerid][4][3] = n[3];
  201. l_Nums[playerid][4][4] = n[4];
  202. l_Bet[playerid][4] = true;
  203. }
  204. ShowDialog(playerid);
  205. return 1;
  206. }
  207. if(dialogid == DIAL_9)
  208. {
  209. if(!(IsNum(inputtext))) return ShowPlayerDialog(playerid,DIAL_8,DIALOG_STYLE_INPUT,"Loterie by Mort","Špatně zadaný text, 1 číslo (šance)","Vsadit","Zpět");
  210. else
  211. {
  212. l_Chance[playerid] = strval(inputtext);
  213. l_Bet[playerid][5] = true;
  214. }
  215. ShowDialog(playerid);
  216. return 1;
  217. }
  218. if(dialogid == DIAL_11)
  219. {
  220. GivePlayerMoney(playerid,GetMoney(playerid));
  221. }
  222. }
  223. else if(response == 0)
  224. {
  225. if(dialogid == DIAL_3)
  226. {
  227. if(!l_Bet[playerid][0] || !l_Bet[playerid][1] || !l_Bet[playerid][2] || !l_Bet[playerid][3] || !l_Bet[playerid][4]) return ShowDialog(playerid);
  228. else
  229. {
  230. new str[204],str2[60];
  231. strcat(str,"Vsadil jsi na čísla:\n");
  232. format(str2,sizeof(str2),"Řada 1: %d,%d,%d,%d,%d\n",l_Nums[playerid][0][0],l_Nums[playerid][0][1],l_Nums[playerid][0][2],l_Nums[playerid][0][3],l_Nums[playerid][0][4]);
  233. strcat(str,str2);
  234. str2[0] = EOS;
  235. format(str2,sizeof(str2),"Řada 2: %d,%d,%d,%d,%d\n",l_Nums[playerid][1][0],l_Nums[playerid][1][1],l_Nums[playerid][1][2],l_Nums[playerid][1][3],l_Nums[playerid][1][4]);
  236. strcat(str,str2);
  237. str2[0] = EOS;
  238. format(str2,sizeof(str2),"Řada 3: %d,%d,%d,%d,%d\n",l_Nums[playerid][2][0],l_Nums[playerid][2][1],l_Nums[playerid][2][2],l_Nums[playerid][2][3],l_Nums[playerid][2][4]);
  239. strcat(str,str2);
  240. str2[0] = EOS;
  241. format(str2,sizeof(str2),"Řada 4: %d,%d,%d,%d,%d\n",l_Nums[playerid][3][0],l_Nums[playerid][3][1],l_Nums[playerid][3][2],l_Nums[playerid][3][3],l_Nums[playerid][3][4]);
  242. strcat(str,str2);
  243. str2[0] = EOS;
  244. format(str2,sizeof(str2),"Řada 5: %d,%d,%d,%d,%d\n",l_Nums[playerid][4][0],l_Nums[playerid][4][1],l_Nums[playerid][4][2],l_Nums[playerid][4][3],l_Nums[playerid][4][4]);
  245. strcat(str,str2);
  246. str2[0] = EOS;
  247. format(str2,sizeof(str2),"Šance: %d\n",l_Chance[playerid]);
  248. strcat(str,str2);
  249. str2[0] = EOS;
  250. strcat(str,"Výsledky hlasování probíhají každých 15 minut");
  251. l_Vsadil[playerid] = true;
  252. ShowPlayerDialog(playerid,DIAL_10,DIALOG_STYLE_MSGBOX,"Loterie by Mort",str,"OK","");
  253. }
  254. return 1;
  255. }
  256. }
  257. return 1;
  258. }
  259.  
  260. stock ShowDialog(playerid)
  261. {
  262. new str[104];
  263. if(!l_Bet[playerid][0])
  264. {
  265. strcat(str,"{FF0000}Řada 1\r\n");
  266. }
  267. if(l_Bet[playerid][0])
  268. {
  269. strcat(str,"{33FF00}Řada 1\r\n");
  270. }
  271. if(!l_Bet[playerid][1])
  272. {
  273. strcat(str,"{FF0000}Řada 2\r\n");
  274. }
  275. if(l_Bet[playerid][1])
  276. {
  277. strcat(str,"{33FF00}Řada 2\r\n");
  278. }
  279. if(!l_Bet[playerid][2])
  280. {
  281. strcat(str,"{FF0000}Řada 3\r\n");
  282. }
  283. if(l_Bet[playerid][2])
  284. {
  285. strcat(str,"{33FF00}Řada 3\r\n");
  286. }
  287. if(!l_Bet[playerid][3])
  288. {
  289. strcat(str,"{FF0000}Řada 4\r\n");
  290. }
  291. if(l_Bet[playerid][3])
  292. {
  293. strcat(str,"{33FF00}Řada 4\r\n");
  294. }
  295. if(!l_Bet[playerid][4])
  296. {
  297. strcat(str,"{FF0000}Řada 5\r\n");
  298. }
  299. if(l_Bet[playerid][4])
  300. {
  301. strcat(str,"{33FF00}Řada 5\r\n");
  302. }
  303. if(!l_Bet[playerid][5])
  304. {
  305. strcat(str,"{FF0000}Šance\r\n");
  306. }
  307. if(l_Bet[playerid][5])
  308. {
  309. strcat(str,"{33FF00}Šance\r\n");
  310. }
  311. ShowPlayerDialog(playerid,DIAL_3,DIALOG_STYLE_LIST,"Loterie by Mort",str,"Vsadit","Hotovo");
  312. return true;
  313. }
  314.  
  315. stock GetNumAndConvertIt(inputtext[],&num1,&num2,&num3,&num4,&num5)
  316. {
  317. if(!(inputtext[0])) return false;
  318.  
  319. new
  320. var[5][10],
  321. count
  322. ;
  323.  
  324. count = UnFormat(inputtext,var,',');
  325. if(count != 5) return false;
  326. if(!IsNum(var[0]) || !IsNum(var[1]) || !IsNum(var[2]) || !IsNum(var[3]) || !IsNum(var[4])) return false;
  327. for(new i;i<sizeof(var);i++)
  328. {
  329. if(strval(var[i]) > 50 || strval(var[i]) < 0) return false;
  330. }
  331. num1 = strval(var[0]);
  332. num2 = strval(var[1]);
  333. num3 = strval(var[2]);
  334. num4 = strval(var[3]);
  335. num5 = strval(var[4]);
  336. if(NumOfSame(num1,num2,num3,num4,num5) != 0) return false;
  337. return true;
  338. }
  339.  
  340. stock IsNum(txt[])
  341. {
  342. for(new i,len = strlen(txt);i<len;i++) if(txt[i] > '9' || txt[i] < '0') return false;
  343. return true;
  344. }
  345.  
  346. stock NumOfSame(...){
  347. new same = 0;
  348.  
  349. for(new i=0; i<numargs(); i++){
  350. for(new y=0; y<numargs(); y++){
  351. if(y != i){
  352. if(getarg(i) == getarg(y)) same++;
  353. }
  354. }
  355. }
  356. return same;
  357. }
  358.  
  359. stock UnFormat(str[],variables[][],cha,m=0) // unformat by QWER
  360. {
  361. new len = strlen(str),chcount,i,start,varcount;
  362. while(i < len+1)
  363. {
  364. if(i == len && chcount != 0)
  365. {
  366. strmid(variables[varcount],str,start+1,strlen(str),128);
  367. chcount++;
  368. }
  369. if(str[i] == cha)
  370. {
  371. if((m == 0) || (chcount != m-1))
  372. {
  373. strmid(variables[varcount],str,start + ((start == 0) ? 0 : 1),i,128);
  374. start = i;
  375. chcount++;
  376. varcount++;
  377. }
  378. }
  379. i++;
  380. }
  381. return chcount;
  382. }
  383.  
  384. stock ShowResults(playerid)
  385. {
  386. if(l_Vsadil[playerid] == true)
  387. {
  388. new str[204+186+22+16+30],str2[60];
  389. strcat(str,"Jsou zde nyní výsledky loterie!! Vsadil jsi tato čísla:\n");
  390. format(str2,sizeof(str2),"Řada 1: %d,%d,%d,%d,%d\n",l_Nums[playerid][0][0],l_Nums[playerid][0][1],l_Nums[playerid][0][2],l_Nums[playerid][0][3],l_Nums[playerid][0][4]);
  391. strcat(str,str2);
  392. str2[0] = EOS;
  393. format(str2,sizeof(str2),"Řada 2: %d,%d,%d,%d,%d\n",l_Nums[playerid][1][0],l_Nums[playerid][1][1],l_Nums[playerid][1][2],l_Nums[playerid][1][3],l_Nums[playerid][1][4]);
  394. strcat(str,str2);
  395. str2[0] = EOS;
  396. format(str2,sizeof(str2),"Řada 3: %d,%d,%d,%d,%d\n",l_Nums[playerid][2][0],l_Nums[playerid][2][1],l_Nums[playerid][2][2],l_Nums[playerid][2][3],l_Nums[playerid][2][4]);
  397. strcat(str,str2);
  398. str2[0] = EOS;
  399. format(str2,sizeof(str2),"Řada 4: %d,%d,%d,%d,%d\n",l_Nums[playerid][3][0],l_Nums[playerid][3][1],l_Nums[playerid][3][2],l_Nums[playerid][3][3],l_Nums[playerid][3][4]);
  400. strcat(str,str2);
  401. str2[0] = EOS;
  402. format(str2,sizeof(str2),"Řada 5: %d,%d,%d,%d,%d\n",l_Nums[playerid][4][0],l_Nums[playerid][4][1],l_Nums[playerid][4][2],l_Nums[playerid][4][3],l_Nums[playerid][4][4]);
  403. strcat(str,str2);
  404. str2[0] = EOS;
  405. format(str2,sizeof(str2),"Šance: %d\n",l_Chance[playerid]);
  406. strcat(str,str2);
  407. str2[0] = EOS;
  408. strcat(str,"Byla vylosována tato čísla:\n");
  409.  
  410. format(str2,sizeof(str2),"Řada 1: %d,%d,%d,%d,%d\n",l_ResultsOfLotery[0][0],l_ResultsOfLotery[0][1],l_ResultsOfLotery[0][2],l_ResultsOfLotery[0][3],l_ResultsOfLotery[0][4]);
  411. strcat(str,str2);
  412. str2[0] = EOS;
  413. format(str2,sizeof(str2),"Řada 2: %d,%d,%d,%d,%d\n",l_ResultsOfLotery[1][0],l_ResultsOfLotery[1][1],l_ResultsOfLotery[1][2],l_ResultsOfLotery[1][3],l_ResultsOfLotery[1][4]);
  414. strcat(str,str2);
  415. str2[0] = EOS;
  416. format(str2,sizeof(str2),"Řada 3: %d,%d,%d,%d,%d\n",l_ResultsOfLotery[2][0],l_ResultsOfLotery[2][1],l_ResultsOfLotery[2][2],l_ResultsOfLotery[2][3],l_ResultsOfLotery[2][4]);
  417. strcat(str,str2);
  418. str2[0] = EOS;
  419. format(str2,sizeof(str2),"Řada 4: %d,%d,%d,%d,%d\n",l_ResultsOfLotery[3][0],l_ResultsOfLotery[3][1],l_ResultsOfLotery[3][2],l_ResultsOfLotery[3][3],l_ResultsOfLotery[3][4]);
  420. strcat(str,str2);
  421. str2[0] = EOS;
  422. format(str2,sizeof(str2),"Řada 5: %d,%d,%d,%d,%d\n",l_ResultsOfLotery[4][0],l_ResultsOfLotery[4][1],l_ResultsOfLotery[4][2],l_ResultsOfLotery[4][3],l_ResultsOfLotery[4][4]);
  423. strcat(str,str2);
  424. str2[0] = EOS;
  425. format(str2,sizeof(str2),"Šance: %d\n",l_ResultOfChance);
  426. strcat(str,str2);
  427. str2[0] = EOS;
  428. format(str2,sizeof(str2),"Celková získaná cena: {FF0000}%d{33FF00}$",GetMoney(playerid));
  429. strcat(str,str2);
  430. str2[0] = EOS;
  431.  
  432. ShowPlayerDialog(playerid,DIAL_11,DIALOG_STYLE_MSGBOX,"Loterie by Mort",str,"Vzít peníze","");
  433. l_Vsadil[playerid] = false;
  434. }
  435. else
  436. {
  437. new str[240],str2[60];
  438. strcat(str,"Vylosovaná čísla:\n");
  439. format(str2,sizeof(str2),"Řada 1: %d,%d,%d,%d,%d\n",l_ResultsOfLotery[0][0],l_ResultsOfLotery[0][1],l_ResultsOfLotery[0][2],l_ResultsOfLotery[0][3],l_ResultsOfLotery[0][4]);
  440. strcat(str,str2);
  441. str2[0] = EOS;
  442. format(str2,sizeof(str2),"Řada 2: %d,%d,%d,%d,%d\n",l_ResultsOfLotery[1][0],l_ResultsOfLotery[1][1],l_ResultsOfLotery[1][2],l_ResultsOfLotery[1][3],l_ResultsOfLotery[1][4]);
  443. strcat(str,str2);
  444. str2[0] = EOS;
  445. format(str2,sizeof(str2),"Řada 3: %d,%d,%d,%d,%d\n",l_ResultsOfLotery[2][0],l_ResultsOfLotery[2][1],l_ResultsOfLotery[2][2],l_ResultsOfLotery[2][3],l_ResultsOfLotery[2][4]);
  446. strcat(str,str2);
  447. str2[0] = EOS;
  448. format(str2,sizeof(str2),"Řada 4: %d,%d,%d,%d,%d\n",l_ResultsOfLotery[3][0],l_ResultsOfLotery[3][1],l_ResultsOfLotery[3][2],l_ResultsOfLotery[3][3],l_ResultsOfLotery[3][4]);
  449. strcat(str,str2);
  450. str2[0] = EOS;
  451. format(str2,sizeof(str2),"Řada 5: %d,%d,%d,%d,%d\n",l_ResultsOfLotery[4][0],l_ResultsOfLotery[4][1],l_ResultsOfLotery[4][2],l_ResultsOfLotery[4][3],l_ResultsOfLotery[4][4]);
  452. strcat(str,str2);
  453. str2[0] = EOS;
  454. format(str2,sizeof(str2),"Šance: %d\n",l_ResultOfChance);
  455. strcat(str,str2);
  456. str2[0] = EOS;
  457. ShowPlayerDialog(playerid,DIAL_12,DIALOG_STYLE_MSGBOX,"Loterie by Mort",str,"OK","");
  458. }
  459. return true;
  460. }
  461.  
  462. stock GetMoney(playerid)
  463. {
  464. new num,a;
  465. a = NumOfSame(l_Nums[playerid][0][0],l_Nums[playerid][0][1],l_Nums[playerid][0][2],l_Nums[playerid][0][3],l_Nums[playerid][0][4],l_ResultsOfLotery[0][0],l_ResultsOfLotery[0][1],l_ResultsOfLotery[0][2],l_ResultsOfLotery[0][3],l_ResultsOfLotery[0][4]);
  466. switch(a)
  467. {
  468. case 0: a = 0;
  469. case 1: num = num + 200;
  470. case 2: num = num + 400;
  471. case 3: num = num + 1000;
  472. case 4: num = num + 5000;
  473. case 5: num = num + 10000;
  474. default: a = 0;
  475. }
  476. a = 0;
  477. a = NumOfSame(l_Nums[playerid][1][0],l_Nums[playerid][1][1],l_Nums[playerid][1][2],l_Nums[playerid][1][3],l_Nums[playerid][1][4],l_ResultsOfLotery[1][0],l_ResultsOfLotery[1][1],l_ResultsOfLotery[1][2],l_ResultsOfLotery[1][3],l_ResultsOfLotery[1][4]);
  478. switch(a)
  479. {
  480. case 0: a = 0;
  481. case 1: num = num + 200;
  482. case 2: num = num + 400;
  483. case 3: num = num + 1000;
  484. case 4: num = num + 5000;
  485. case 5: num = num + 10000;
  486. default: a = 0;
  487. }
  488. a = 0;
  489. a = NumOfSame(l_Nums[playerid][2][0],l_Nums[playerid][2][1],l_Nums[playerid][2][2],l_Nums[playerid][2][3],l_Nums[playerid][2][4],l_ResultsOfLotery[2][0],l_ResultsOfLotery[2][1],l_ResultsOfLotery[2][2],l_ResultsOfLotery[2][3],l_ResultsOfLotery[2][4]);
  490. switch(a)
  491. {
  492. case 0: a = 0;
  493. case 1: num = num + 200;
  494. case 2: num = num + 400;
  495. case 3: num = num + 1000;
  496. case 4: num = num + 5000;
  497. case 5: num = num + 10000;
  498. default: a = 0;
  499. }
  500. a = 0;
  501. a = NumOfSame(l_Nums[playerid][3][0],l_Nums[playerid][3][1],l_Nums[playerid][3][2],l_Nums[playerid][3][3],l_Nums[playerid][3][4],l_ResultsOfLotery[3][0],l_ResultsOfLotery[3][1],l_ResultsOfLotery[3][2],l_ResultsOfLotery[3][3],l_ResultsOfLotery[3][4]);
  502. switch(a)
  503. {
  504. case 0: a = 0;
  505. case 1: num = num + 200;
  506. case 2: num = num + 400;
  507. case 3: num = num + 1000;
  508. case 4: num = num + 5000;
  509. case 5: num = num + 10000;
  510. default: a = 0;
  511. }
  512. a = 0;
  513. a = NumOfSame(l_Nums[playerid][4][0],l_Nums[playerid][4][1],l_Nums[playerid][4][2],l_Nums[playerid][4][3],l_Nums[playerid][4][4],l_ResultsOfLotery[4][0],l_ResultsOfLotery[4][1],l_ResultsOfLotery[4][2],l_ResultsOfLotery[4][3],l_ResultsOfLotery[4][4]);
  514. switch(a)
  515. {
  516. case 0: a = 0;
  517. case 1: num = num + 200;
  518. case 2: num = num + 400;
  519. case 3: num = num + 1000;
  520. case 4: num = num + 5000;
  521. case 5: num = num + 10000;
  522. default: a = 0;
  523. }
  524.  
  525. a = 0;
  526. a = NumOfSame(l_Chance[playerid],l_ResultOfChance);
  527. if(a == 1) num += 1000000;
  528. return num;
  529. }
  530.  
  531. public Losovani()
  532. {
  533. l_Results = true;
  534. SendClientMessageToAll(-1,"Proběhlo losování. Výsledky: {FFFF00}/loto_res");
  535. SendClientMessageToAll(-1,"Můžete znova začít vsázet do loterie: {FFFF00}/loto");
  536. for(new i;i<MAX_PL;i++)
  537. {
  538. for(new p;p<6;p++)
  539. {
  540. l_Bet[i][p] = false;
  541. }
  542. }
  543. skip:
  544. for(new x;x<5;x++)
  545. {
  546. for(new n;n<5;n++)
  547. {
  548. l_ResultsOfLotery[x][n] = random(50);
  549. }
  550. }
  551. for(new t;t<5;t++)
  552. {
  553. if(NumOfSame(l_ResultsOfLotery[t][0],l_ResultsOfLotery[t][1],l_ResultsOfLotery[t][2],l_ResultsOfLotery[t][3],l_ResultsOfLotery[t][4]))
  554. goto skip;
  555. }
  556. l_ResultOfChance = random(50);
  557. return true;
  558. }
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
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
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!