korn

Untitled

Jul 11th, 2011
224
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.58 KB | None | 0 0
  1. /*
  2. @Project: Save and Get VIP With Dini
  3. @Credits: DraKiNs and DracoBlue (in Dini)
  4. @Date: 03/06/200xB
  5. @Release: 29/06/200xB
  6. @Site: www.ips-team.blogspot.com
  7. */
  8.  
  9. //================ [ Funções Vip Salvável ] ===================================
  10.  
  11. stock getDiasVip(sPlayer[]) // Exemplo: if(getDiasVip("DraKiNs.ini")) print("drakisn é vip");
  12. {
  13. new
  14. _iYear,
  15. _iMonth,
  16. iDay_;
  17.  
  18. new
  19. iDay_ = dini_Int(sPlayer, "Dia");
  20. _iMonth = dini_Int(sPlayer, "Mes");
  21. _iYear = dini_Int(sPlayer, "Ano");
  22.  
  23. getdate(_iYear, _iMonth, iDay_);
  24.  
  25. return (iYear_ == _iYear && _iMonth == iMonth_ && iDay_ == _iDay);
  26. }
  27.  
  28.  
  29. stock setDiasVip(iDias,sPlayer[]) //Exemplo: setDiasVip(20,"DraKiNs.ini"); (20 dias de vip para drakins)
  30. {
  31. new Year, Month, Day;
  32. getdate(Year, Month, Day);
  33. return giveDias(Day, Month, Year,iDias,sPlayer);
  34. }
  35.  
  36. // =============== [ Função para fazer as funções de vips] =================
  37. stock giveDias(iDia,iMes,iAno,iDias,sPlayer[])
  38. {
  39. new
  40. iMeses[6] =
  41. {
  42. 1,
  43. 2,
  44. 4,
  45. 6,
  46. 8,
  47. 9,
  48. 0xB
  49. },
  50. bool:iMesAtual = false,
  51. sString[0x1F];
  52.  
  53. iDia += iDias;
  54. if(iDia > 0x1E) {
  55. iVoltar:
  56. for(new i; i < sizeof(iMes); ++i) {
  57. if(iMes == iMeses[i]) {
  58. iMesAtual = true;
  59. }
  60. }
  61. }
  62. if(iMesAtual) {
  63. iMes++;
  64. iDia =- 0x1F;
  65. if(iDia > 0x1F) {
  66. goto iVoltar;
  67. }
  68. }
  69. else if(iDia > 0x1F) {
  70. iMes++;
  71. iDia =- 0x1F;
  72. if(iDia > 0x1F) {
  73. goto iVoltar;
  74. }
  75. iMesAtual = false;
  76. }
  77. return dini_IntSet(sPlayer,"Dia",iDia), dini_IntSet(sPlayer,"Mes",iMes), dini_IntSet(sPlayer,"Ano",iAno), true;
  78. }
Advertisement
Add Comment
Please, Sign In to add comment