Advertisement
Guest User

Untitled

a guest
Jul 24th, 2017
48
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 6.13 KB | None | 0 0
  1. quest vara_2016 begin
  2. state start begin
  3. when login with game.get_event_flag("inghetata") == 1 begin
  4. syschat("Dragi jucatori evenimentul de vara este activ!")
  5. syschat("Aduna inghetata de la mobi si schimb-o pe un premiu")
  6. syschat("valoros la Octavio!")
  7. end
  8. when kill with game.get_event_flag("optiunefva") == 4 begin
  9. local inghetata=number(1, 500)
  10. if inghetata==1 and game.get_event_flag("inghetata") == 1 then
  11.  
  12. pc.give_item2(30149,1)
  13.  
  14. end
  15. end
  16. when kill with game.get_event_flag("optiunefva") == 3 begin
  17. local inghetata=number(1, 250)
  18. if inghetata==1 and game.get_event_flag("inghetata") == 1 then
  19.  
  20. pc.give_item2(30149,1)
  21.  
  22. end
  23. end
  24. when kill with game.get_event_flag("optiunefva") == 2 begin
  25. local inghetata=number(1, 150)
  26. if inghetata==1 and game.get_event_flag("inghetata") == 1 then
  27.  
  28. pc.give_item2(30149,1)
  29.  
  30. end
  31. end
  32. when kill with game.get_event_flag("optiunefva") == 1 begin
  33. local inghetata=number(1, 50)
  34. if inghetata==1 and game.get_event_flag("inghetata") == 1 then
  35.  
  36. pc.give_item2(30149,1)
  37.  
  38. end
  39. end
  40. when 33004.chat."Event: Vara 2016" with pc.is_gm() begin
  41. say_title("Eventul de Vara -"..pc.getname().."-")
  42. local eventul = select("Porneste Event-ul de vara", "Opreste Eventul de vara", "Panoul de control", "Anuleaza.")
  43. if eventul == 1 and game.get_event_flag("inghetata") == 1 then
  44. say_title("Eventul de inghetata :")
  45. say("Event-ul este deja pornit.")
  46. wait()
  47.  
  48. return
  49. else
  50. if eventul == 1 then
  51. say_title("Eventul de vara :")
  52. say("Event-ul a fost pornit si automat a fost pus pe mod")
  53. say("'Normal',daca vrei sa modifici modul fa o tura prin")
  54. say("Panoul de control.Bafta!")
  55. notice_all("Dragi jucatori!")
  56. notice_all("Eventul de vara este activ!!")
  57. game.set_event_flag("optiunefva", 3)
  58. game.set_event_flag("inghetata", 1)
  59. wait()
  60. return
  61. end
  62. end
  63. if eventul == 2 and game.get_event_flag("inghetata") == 0 then
  64. say_title("Eventul de vara :")
  65. say("Event-ul este deja oprit.")
  66. wait()
  67. return
  68. else
  69. if eventul == 2 then
  70. say_title("Eventul de inghetata :")
  71. say("Event-ul a fost oprit.")
  72. notice_all("Dragi jucatori!")
  73. notice_all("Event-ul de vara a luat sfarsit!")
  74. game.set_event_flag("inghetata", 0)
  75. wait()
  76. return
  77. end
  78. end
  79. if eventul == 3 then
  80. say_title("Panou de control'Eventul de vara '")
  81. local optiunefva = select("Inghetata rata de 1/50 'USOR'","Inghetata rata de 1/150 'Binisor'","Inghetata rata de 1/250 'Normal'","Inghetata rata de 1/500 'Greu'","Inchide")
  82. if optiunefva == 1 then
  83. game.set_event_flag("optiunefva", 1)
  84. syschat("Succes!")
  85. return
  86. end
  87. if optiunefva == 2 then
  88. game.set_event_flag("optiunefva", 2)
  89. syschat("Succes!")
  90. return
  91. end
  92. if optiunefva == 5 then
  93. return
  94. end
  95. if optiunefva == 3 then
  96. syschat("Succes!")
  97. game.set_event_flag("optiunefva", 3)
  98. return
  99. end
  100. if optiunefva == 4 then
  101. game.set_event_flag("optiunefva", 4)
  102. syschat("Succes!")
  103. return
  104. end
  105. return
  106. end
  107. if eventul == 4 then
  108. return
  109. end
  110. end
  111.  
  112. end
  113. end[/spoiler]
  114.  
  115. [spoiler]quest negustoare_2016 begin
  116. state start begin
  117. when 9003.chat."Shop Special(Puncte)" begin
  118.  
  119. say_title("Octavio!")
  120. say("")
  121. say("Salut "..pc.get_name().." aici poti sa")
  122. say("schimbi inghetata pe care o castigi")
  123. say("omorand mobii !")
  124. say("")
  125. say("Sansa de drop este random")
  126. say("In acest moment ai "..pc.count_item("30149").." Inghetata cu sirop")
  127. say("")
  128. wait()
  129. say("Lista de schimb:")
  130. say("Print Desert(Rosu,PvM) : 350x Inghetata")
  131. say("Print Desert(Albastru,PvP): 350x Inghetata")
  132. say("Printesa Desert(Rosu,PvM): 350x Inghetata")
  133. say("Printesa Desert(Albastru,PvP): 350x Inghetata")
  134. say("Sigiliu:Pepsi(15zile): 800x Inghetata")
  135. say("Amuleta Dragostei Eterne(60zile): 1600x Inghetata")
  136. say("Cufar Misterios(O Bucata): 30x Inghetata")
  137. say("")
  138. say("Ce alegi sa faci?")
  139.  
  140.  
  141. local canj = select ("Cumpara" , "Iesire")
  142.  
  143. if canj == 1 then
  144.  
  145.  
  146. say_title("Lista de schimb:")
  147. say("")
  148. local elegir = select("Print Desert(Rosu,PvM)","Print Desert(Albastru,PvP)","Printesa Desert(Rosu,PvM)","Printesa Desert(Albastru,PvP)","Sigiliu:Pepsi(15zile)","Amuleta Dragostei Eterne(60 zile)","Cufar Misterios","Iesire")
  149. local premios = {
  150.  
  151. {41546,1,30149,350},
  152. {41547,1,30149,350},
  153. {41548,1,30149,350},
  154. {41549,1,30149,350},
  155. {52022,1,30149,800},
  156. {71145,1,30149,1600},
  157. {50125,1,30149,30}
  158.  
  159. }
  160.  
  161. if elegir != 14 then
  162.  
  163. if pc.count_item(premios[elegir][3]) < premios[elegir][4] then
  164.  
  165. say_title("Octavio")
  166. say("")
  167. say("Imi pare rau, dar nu ai inghetata necesara")
  168. say("pentru a cumpara acest item")
  169. say("")
  170. say("Mai ai nevoie de "..premios[elegir][4]-pc.count_item(premios[elegir][3]).." pentru al cumpara")
  171. say("revino cand ai toata inghetata necesara")
  172. say("")
  173. return
  174. end
  175.  
  176. pc.give_item2(premios[elegir][1],premios[elegir][2])
  177. pc.remove_item(premios[elegir][3],premios[elegir][4])
  178.  
  179. end
  180. end
  181. end
  182. end
  183. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement