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. send_letter("Biyoloğun Ricası ")
  10. end
  11. when button or info begin
  12. say ( "Eğer bana 200 adet ruh kristalini getirisen" )
  13. say ( "sana ödül olarak +500 saldırı değerini veriyorum" )
  14. say("")
  15. say ( "Eğer bana 500 tane kan kristali getirirsen" )
  16. say ( "Sana ödül olarak +1000 saldırı değeri verebilirim." )
  17. say("Seçimin kendin yap")
  18. local biyosec = select("Ruh Kristali Topla","Kan Kristali Topla","Düşüneyim")
  19. if biyosec == 1 then
  20. if pc.getqf("biyo1") == 0 then
  21. say_title ( "Biyolog Chaegirab:" )
  22. target.delete("goreve_basla")
  23. say ( "Merhaba yolcu bu günlerde 1. köyü inceliyorum" )
  24. say ( "1. köydeki metinlerden ruh kristallerini topluyorum" )
  25. say ( "Bu konuda biraz yardıma ihtiyacım olacak" )
  26. say ( "Eğer bana 200 tane ruh kristali getirirsen" )
  27. say ( "Sana ödül olarak +500 saldırı değeri verebilirim." )
  28. say ( "200 adet ruh kristalin var mı?." )
  29. local biyo1 = select("Evet","Hayır")
  31. if biyo1 == 1 then
  33. if pc . count_item ( 8500 ) > 199 then
  34. pc . remove_item ( "8500" , 200 )
  35. affect . add_collect ( apply . ATT_GRADE_BONUS , 500 , 60 * 60 * 24 * 365 * 60 )
  36. say_title ( "Biyolog Chaegirab:" )
  37. say ( "Muhteşem 200 adet ruh kristalini buldun" )
  38. say ( "sana ödül olarak +500 saldırı değerini veriyorum" )
  39. say ( "diğer araştırmalarımda görüşmek üzere." )
  41. pc.setqf("biyo1",1)
  42. else
  43. say ( "Yeterince ruh kristalin bulunmuyor!" )
  45. end
  46. end
  47. else
  48. say ( "Bu görevi zaten tamamladın!" )
  49. end
  50. elseif biyosec == 2 then
  51. if pc.getqf("biyo2") == 0 then
  52. say_title ( "Biyolog Chaegirab:" )
  53. target.delete("goreve_basla")
  54. say ( "Merhaba yolcu bu günlerde 2. köyü inceliyorum" )
  55. say ( "2. köydeki metinlerden kan kristallerini topluyorum" )
  56. say ( "Bu konuda biraz yardıma ihtiyacım olacak" )
  57. say ( "Eğer bana 500 tane kan kristali getirirsen" )
  58. say ( "Sana ödül olarak +1000 saldırı değeri verebilirim." )
  59. say ( "500 adet kan kristalin var mı?." )
  60. local biyo1 = select("Evet","Hayır")
  62. if biyo1 == 1 then
  64. if pc . count_item ( 8501 ) > 499 then
  65. pc . remove_item ( "8501" , 500 )
  66. affect . add_collect ( apply . ATT_GRADE_BONUS , 1000 , 60 * 60 * 24 * 365 * 60 )
  67. say_title ( "Biyolog Chaegirab:" )
  68. say ( "Muhteşem 500 adet kan kristalini buldun" )
  69. say ( "sana ödül olarak +1000 saldırı değerini veriyorum" )
  70. say ( "diğer araştırmalarımda görüşmek üzere." )
  72. pc.setqf("biyo2",1)
  73. else
  74. say ( "Yeterince kan kristalin bulunmuyor!" )
  75. end
  76. end
  77. else
  78. say ( "Bu görevi zaten tamamladın!" )
  79. end
  80. end
  81. end
  82. end
  83. end