1. quest biyolog_kristal begin
  2. state start begin
  3. when login or levelup with pc.level >= 30 begin
  4. set_state(bilgiver)
  5. end
  6. end
  7. state bilgiver begin
  8. when letter begin
  9. local v = find_npc_by_vnum(20084)
  10. if v != 0 then
  11. target.vid("basla", v, "Bio")
  12. end
  13. send_letter("Biyoloğun Ricası ")
  14. end
  15. when button or info begin
  16. say_title("Biyoloğun Ricası ")
  17. say("")
  18. say("Uriel'in öğrencisi Biyolog Chaegirab, ")
  19. say("seni arıyor.")
  20. say("Git ve ona yardım et.")
  21. say("")
  22. end
  23. when goreve_basla.target.click or
  24. 20084.chat."Kristaller" begin
  25. say ( "Eğer bana 200 adet ruh kristalini getirisen" )
  26. say ( "sana ödül olarak +500 saldırı değerini veriyorum" )
  27. say("")
  28. say ( "Eğer bana 500 tane kan kristali getirirsen" )
  29. say ( "Sana ödül olarak +1000 saldırı değeri verebilirim." )
  30. say("Seçimin kendin yap")
  31. local biyosec = select("Ruh Kristali Topla","Kan Kristali Topla","Düşüneyim")
  32. if biyosec == 1 then
  33. if pc.getqf("biyo1") == 0 then
  34. say_title ( "Biyolog Chaegirab:" )
  35. target.delete("goreve_basla")
  36. say ( "Merhaba yolcu bu günlerde 1. köyü inceliyorum" )
  37. say ( "1. köydeki metinlerden ruh kristallerini topluyorum" )
  38. say ( "Bu konuda biraz yardıma ihtiyacım olacak" )
  39. say ( "Eğer bana 200 tane ruh kristali getirirsen" )
  40. say ( "Sana ödül olarak +500 saldırı değeri verebilirim." )
  41. say ( "200 adet ruh kristalin var mı?." )
  42. local biyo1 = select("Evet","Hayır")
  44. if biyo1 == 1 then
  46. if pc . count_item ( 8500 ) > 199 then
  47. pc . remove_item ( "8500" , 200 )
  48. affect . add_collect ( apply . ATT_GRADE_BONUS , 500 , 60 * 60 * 24 * 365 * 60 )
  49. say_title ( "Biyolog Chaegirab:" )
  50. say ( "Muhteşem 200 adet ruh kristalini buldun" )
  51. say ( "sana ödül olarak +500 saldırı değerini veriyorum" )
  52. say ( "diğer araştırmalarımda görüşmek üzere." )
  54. pc.setqf("biyo1",1)
  55. else
  56. say ( "Yeterince ruh kristalin bulunmuyor!" )
  58. end
  59. end
  60. else
  61. say ( "Bu görevi zaten tamamladın!" )
  62. end
  63. elseif biyosec == 2 then
  64. if pc.getqf("biyo2") == 0 then
  65. say_title ( "Biyolog Chaegirab:" )
  66. target.delete("goreve_basla")
  67. say ( "Merhaba yolcu bu günlerde 2. köyü inceliyorum" )
  68. say ( "2. köydeki metinlerden kan kristallerini topluyorum" )
  69. say ( "Bu konuda biraz yardıma ihtiyacım olacak" )
  70. say ( "Eğer bana 500 tane kan kristali getirirsen" )
  71. say ( "Sana ödül olarak +1000 saldırı değeri verebilirim." )
  72. say ( "500 adet kan kristalin var mı?." )
  73. local biyo1 = select("Evet","Hayır")
  75. if biyo1 == 1 then
  77. if pc . count_item ( 8501 ) > 499 then
  78. pc . remove_item ( "8501" , 500 )
  79. affect . add_collect ( apply . ATT_GRADE_BONUS , 1000 , 60 * 60 * 24 * 365 * 60 )
  80. say_title ( "Biyolog Chaegirab:" )
  81. say ( "Muhteşem 500 adet kan kristalini buldun" )
  82. say ( "sana ödül olarak +1000 saldırı değerini veriyorum" )
  83. say ( "diğer araştırmalarımda görüşmek üzere." )
  85. pc.setqf("biyo2",1)
  86. else
  87. say ( "Yeterince kan kristalin bulunmuyor!" )
  88. end
  89. end
  90. else
  91. say ( "Bu görevi zaten tamamladın!" )
  92. end
  93. end
  94. end
  95. end
  96. end

Biyolog Kristal görevi