Advertisement
Guest User

Untitled

a guest
Nov 28th, 2015
61
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 6.08 KB | None | 0 0
  1. --translate by scary
  2. quest mining_en begin
  3. state start begin
  4. when 40006.chat."Εξόρυξη (Πληροφορίες)" begin
  5. say("")
  6. set_text_color("gold")
  7. say("Καλησπέρα σου φίλε μου,")
  8. say("Πιστεύω πως θα ήθελες να κάνεις εξόρυξη.")
  9. say("Αν θες μπορώ να σου δώσω ένα αντικείμενο όπου θα σε βοηθήσει, [ENTER] για 10.000.000 yang.")
  10. say("Ησύχασε , δεν είναι πολλά , θα βγάλεις κέρδος, [ENTER] χρειάζομαι παραπάνω μεταλλεύματα ")
  11. say("Εαν μου δώσεις το μεταλλεύμα θα σου δώσω ένα υπέροχο δώρο ")
  12. set_text_color("gold")
  13. say("")
  14. set_text_color("green")
  15. say("Θα ήθελες να αγοράσεις μια αξίνα ; ")
  16. say("")
  17. set_text_color("green")
  18. local b=select("Ναι , Φυσικά ", "Όχι, ευχαριστώ ")
  19. if 1==b then
  20. if pc.money>=10000000 then
  21. pc.changemoney(-10000000)
  22. pc.give_item2("29101")
  23. else
  24. say_title("Εξόρυξη ")
  25. say("")
  26. --- l
  27. say("Συγγνώμη,")
  28. say("Δεν έχεις αρκετά yang ")
  29. end
  30. elseif 2==b then
  31. else
  32. say("UNKNOWN BUTTON ["..b.."]")
  33. end
  34. end
  35. end
  36. end
  37.  
  38. quest minerit1 begin
  39. state start begin
  40. when 40006.chat."Copped ore" begin
  41. if pc.count_item(50604)<=0 then
  42. say("You need 200:")
  43. say_item_vnum(50604)
  44. elseif pc.count_item(50604)==200 then
  45. say("You got:")
  46. pc.give_gold(50000000)
  47. pc.remove_item(50604,200)
  48. end
  49.  
  50. end
  51. end
  52. end
  53.  
  54. quest minerit3 begin
  55. state start begin
  56. when 40006.chat."Xρυσό Μετάλλευμα" begin
  57. if pc.count_item(50606)<=0 then
  58. say("You need 200::")
  59. say_item_vnum(50606)
  60. elseif pc.count_item(50606)==200 then
  61. say("You got:")
  62. pc.give_gold(50000000)
  63. pc.remove_item(50606,200)
  64. end
  65.  
  66. end
  67. end
  68. end
  69.  
  70. quest minerit4 begin
  71. state start begin
  72. when 40006.chat."Νεφρίτης Μετάλλευμα" begin
  73. if pc.count_item(50607)<=0 then
  74. say("You need 200::")
  75. say_item_vnum(50607)
  76. elseif pc.count_item(50607)==200 then
  77. say("You got:")
  78. pc.give_gold(50000000)
  79. pc.remove_item(50607,200)
  80. end
  81.  
  82. end
  83. end
  84. end
  85.  
  86. quest minerit5 begin
  87. state start begin
  88. when 40006.chat."Έβενος Μετάλλευμα " begin
  89. if pc.count_item(50608)<=0 then
  90. say("You need 200::")
  91. say_item_vnum(50608)
  92. elseif pc.count_item(50608)==200 then
  93. say("You got:")
  94. pc.give_gold(50000000)
  95. pc.remove_item(50608,200)
  96. end
  97.  
  98. end
  99. end
  100. end
  101.  
  102. quest minerit6 begin
  103. state start begin
  104. when 40006.chat."Λευκόχρυσο μετάλλευμα " begin
  105. if pc.count_item(50610)<=0 then
  106. say("You need 200::")
  107. say_item_vnum(50610)
  108. elseif pc.count_item(50610)==200 then
  109. say("You got:")
  110. pc.give_gold(50000000)
  111. pc.remove_item(50610,200)
  112. end
  113.  
  114. end
  115. end
  116. end
  117.  
  118. quest minerit7 begin
  119. state start begin
  120. when 40006.chat."Κρυστάλλινο μετάλλευμα " begin
  121. if pc.count_item(50611)<=0 then
  122. say("You need 200::")
  123. say_item_vnum(50611)
  124. elseif pc.count_item(50611)==200 then
  125. say("You got:")
  126. pc.give_gold(50000000)
  127. pc.remove_item(50611,200)
  128. end
  129.  
  130. end
  131. end
  132. end
  133.  
  134. quest minerit8 begin
  135. state start begin
  136. when 40006.chat."Χαλαζία μετάλλευμα" begin
  137. if pc.count_item(50612)<=0 then
  138. say("You need 200::")
  139. say_item_vnum(50612)
  140. elseif pc.count_item(50612)==200 then
  141. say("You got:")
  142. pc.give_gold(50000000)
  143. pc.remove_item(50612,200)
  144. end
  145.  
  146. end
  147. end
  148. end
  149.  
  150. quest minerit9 begin
  151. state start begin
  152. when 40006.chat."Ουράνια Δάκρυα μετάλλευμα" begin
  153. if pc.count_item(50613)<=0 then
  154. say("You need 200::")
  155. say_item_vnum(50613)
  156. elseif pc.count_item(50613)==200 then
  157. say("You got:")
  158. pc.give_gold(50000000)
  159. pc.remove_item(50613,200)
  160. end
  161.  
  162. end
  163. end
  164. end
  165.  
  166. quest minerit10 begin
  167. state start begin
  168. when 40006.chat."Κρυστάλινη ψυχή μετάλλευμα " begin
  169. if pc.count_item(50614)<=0 then
  170. say("You need 200::")
  171. say_item_vnum(50614)
  172. elseif pc.count_item(50614)==200 then
  173. say("You got:")
  174. pc.give_gold(50000000)
  175. pc.remove_item(50614,200)
  176. end
  177.  
  178. end
  179. end
  180. end
  181.  
  182.  
  183. quest minerit12 begin
  184. state start begin
  185. when 40006.chat."Γρανιτης μετάλλευμα " begin
  186. if pc.count_item(50616)<=0 then
  187. say("You need 200::")
  188. say_item_vnum(50616)
  189. elseif pc.count_item(50616)==200 then
  190. say("You got:")
  191. pc.give_gold(50000000)
  192. pc.remove_item(50616,200)
  193. end
  194.  
  195. end
  196. end
  197. end
  198.  
  199. quest minerit13 begin
  200. state start begin
  201. when 40006.chat."Σμαράγδι Μετάλλευμα " begin
  202. if pc.count_item(50617)<=0 then
  203. say("You need 200::")
  204. say_item_vnum(50617)
  205. elseif pc.count_item(50617)==200 then
  206. say("You got:")
  207. pc.give_gold(50000000)
  208. pc.remove_item(50617,200)
  209. end
  210.  
  211. end
  212. end
  213. end
  214.  
  215. quest minerit14 begin
  216. state start begin
  217. when 40006.chat."Ζαφείρι Μετάλλευμα" begin
  218. if pc.count_item(50618)<=0 then
  219. say("You need 200::")
  220. say_item_vnum(50618)
  221. elseif pc.count_item(50618)==200 then
  222. say("You got:")
  223. pc.give_gold(50000000)
  224. pc.remove_item(50618,200)
  225. end
  226.  
  227. end
  228. end
  229. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement