1. -----------------------------------------
  2. ----------- Salihq Deneme -----------
  3. ----------- Deneme -----------
  4. -----------------------------------------
  5. quest deviltower_zone begin
  6. state start begin
  7. function continue()
  8. if (get_time() > pc.getqf("last_login_time")) then
  10. say_title(string.format("%s:", mob_name(npc.get_race())))
  11. say("[ENTER]5 dakika içinde geri giriş yapmadığın[ENTER]için kaldığın yerden artık devam edemezsin.")
  12. say("")
  13. say_title("Geri Dönme Sistemi Hakkında Bilgi :")
  14. say("kuleye geri dönme sistemi (5,6,7,8) katlar için[ENTER]kullanılabilir eğer bu katlarda oyundan atma vs sorunlar[ENTER]olursa tek başınıza yeniden kuleye devam edebilirsiniz")
  15. pc.setqf("last_login_time", 0)
  16. pc.setqf("deviltower_continue", 0)
  17. return
  18. end
  19. if (pc.getqf("level") == 4 and pc.getqf("devil_stone4_fail_timer") ~= 3) then
  20. if party.is_party() then
  21. if not party.is_leader() then
  22. say_npc()
  23. say("yalnızca grup lideri giriş talebi yapabilir.")
  24. say("eğer grup'dan çıkarsan seni tek başına içeri alabilirim.")
  25. say("böylece kaldıgın yerden devam edebilirsin")
  26. else
  27. d.new_jump_party(66, special.devil_tower[3][1], special.devil_tower[3][2])
  28. deviltower_zone.process_floor()
  29. pc.setqf("last_login_time", 0)
  30. party.setqf("birkerebosmetinkes",1)
  31. party.syschat("Grup olarak kuleye tekrar giriş yaptınız")
  32. end
  33. else
  34. d.new_jump(66, special.devil_tower[3][1] * 100, special.devil_tower[3][2] * 100)
  35. deviltower_zone.process_floor()
  36. pc.setqf("last_login_time", 0)
  37. end
  39. elseif (pc.getqf("level") == 5 and pc.getqf("devil_stone5_fail_timer") ~= 4) then
  40. if party.is_party() then
  41. pc.setqf("bevisquestkontrol",1)
  42. if not party.is_leader() then
  43. say_npc()
  44. say("yalnızca grup lideri giriş talebi yapabilir.")
  45. say("eğer grup'dan çıkarsan seni tek başına içeri alabilirim.")
  46. say("böylece kaldıgın yerden devam edebilirsin")
  47. else
  48. d.new_jump_party(66, special.devil_tower[4][1], special.devil_tower[4][2])
  49. deviltower_zone.process_floor()
  50. pc.setqf("last_login_time", 0)
  51. end
  52. else
  53. d.new_jump(66, special.devil_tower[4][1] * 100, special.devil_tower[4][2] * 100)
  54. deviltower_zone.process_floor()
  55. pc.setqf("last_login_time", 0)
  56. end
  58. elseif (pc.getqf("level") >= 6 and pc.getqf("level") <= 9) then
  59. if party.is_party() then
  60. if not party.is_leader() then
  61. say_npc()
  62. say("yalnızca grup lideri giriş talebi yapabilir.")
  63. say("eğer grup'dan çıkarsan seni tek başına içeri alabilirim.")
  64. say("böylece kaldıgın yerden devam edebilirsin")
  65. else
  66. d.new_jump_party(66, special.devil_tower[5][1], special.devil_tower[5][2])
  67. deviltower_zone.process_floor()
  68. pc.setqf("last_login_time", 0)
  69. end
  70. else
  71. d.new_jump(66, special.devil_tower[5][1] * 100, special.devil_tower[5][2] * 100)
  72. deviltower_zone.process_floor()
  73. pc.setqf("last_login_time", 0)
  74. end
  75. else
  76. say("Bir hata oluştu.")
  77. pc.setqf("deviltower_continue", 0)
  78. end
  79. end
  81. function process_floor()
  82. d.setf("level", pc.getqf("level"))
  83. pc.setqf("deviltower_continue", 0)
  84. if (pc.getqf("level") == 4) then
  85. for i = 1, 6, 1 do
  86. if (pc.getqf("fake_metin"..i.."_x") > 0 and pc.getqf("fake_metin"..i.."_y") > 0) then
  87. d.set_unique("fake"..i, d.spawn_mob(8017, pc.getqf("fake_metin"..i.."_x"), pc.getqf("fake_metin"..i.."_y")))
  88. end
  89. end
  91. local vid = d.spawn_mob(8017, pc.getqf("real_metin_x"), pc.getqf("real_metin_y"))
  92. d.set_unique("real", vid)
  93. server_loop_timer('devil_stone4_update', 5, pc.get_map_index())
  94. server_timer('devil_stone4_fail'..pc.getqf("devil_stone4_fail_timer"), 5 * 60, pc.get_map_index())
  95. elseif (pc.getqf("level") == 5) then
  96. d.set_regen_file('data/dungeon/deviltower5_regen.txt')
  97. d.setf("stone_count", pc.getqf("stone_count"))
  98. server_timer('devil_stone5_fail'..pc.getqf("devil_stone5_fail_timer"), 5 * 60, get_server_timer_arg())
  99. local position_list = { {421, 452}, {380, 460}, {428, 414}, {398, 392}, {359, 426} }
  100. for i = 1, pc.getqf("stone_count"), 1 do
  101. d.spawn_mob(20073, position_list[i][1], position_list[i][2])
  102. end
  103. elseif (pc.getqf("level") == 6) then
  104. if (pc.getqf("proud_demon_king_killed") == 0) then
  105. d.regen_file('data/dungeon/deviltower6_regen.txt')
  106. elseif (pc.getqf("proud_demon_king_killed") == 1 and pc.getqf("deviltower_refine") == 1 and pc.getqf("refine_used") == 0) then
  107. d.spawn_mob(pc.getqf("reward_alchemist"), 425, 216)
  108. end
  109. elseif (pc.getqf("level") == 7) then
  110. if (pc.getqf("7_stone_kill") == 0) then
  111. local position_list = { {639, 658}, {611, 637}, {596, 674}, {629, 670} }
  112. for i = 1, 4, 1 do
  113. d.spawn_mob(8018, position_list[i][1], position_list[i][2])
  114. end
  115. else
  116. d.set_regen_file("data/dungeon/deviltower7_regen.txt")
  117. end
  118. d.jump_all(2638, 7294)
  119. elseif (pc.getqf("level") == 8) then
  120. d.set_regen_file("data/dungeon/deviltower8_regen.txt")
  121. d.spawn_mob(20366, 640, 460)
  122. d.jump_all(2638, 7059)
  123. --[[elseif (pc.getqf("level") == 9) then
  124. bugfix0001 start
  125. if() then
  127. else
  128. d.jump_all(2638, 6811)
  129. d.regen_file("data/dungeon/deviltower9_regen.txt")--]]
  130. --end
  131. end
  132. end
  134. function deviltower_continue()
  135. return pc.getf("deviltower_zone", "deviltower_continue") == 1
  136. end
  138. function clear_flags()
  139. for i = 1, 6, 1 do
  140. pc.setqf("fake_metin"..i.."_x", 0)
  141. pc.setqf("fake_metin"..i.."_y", 0)
  142. end
  143. pc.setqf("proud_demon_king_killed", 0)
  144. pc.setqf("stone_count", 0)
  145. pc.setqf("7_stone_kill", 0)
  146. pc.setqf("reward_alchemist", 0)
  147. end--]]
  149. when login begin
  150. if pc.get_map_index() == 66 then
  151. if pc.get_x() < 2048+88 or pc.get_y() < 6656+577 or pc.get_x() > 2048+236 or pc.get_y() > 6656+737 then
  152. pc.warp(590500, 110500)
  153. end
  154. pc.set_warp_location(65, 5905, 1105)
  155. elseif pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 then
  156. pc.set_warp_location(65, 5376+532, 512+596+4)
  157. end
  158. end
  160. when logout begin
  161. if pc.count_item(30300) >= 1 then
  162. pc.remove_item(30300, pc.count_item(30300))
  163. end
  164. if pc.count_item(30302) >= 1 then
  165. pc.remove_item(30302, pc.count_item(30302))
  166. end
  168. if (d.getf("level") >= 4) then
  169. if ((d.getf("level") == 9 and pc.getqf("lucifer_killed") == 1)) then
  170. return
  171. end
  173. if (d.getf("level") == 6 and pc.getqf("proud_demon_king_killed") == 1 and pc.getqf("refine_used") == 1) then
  174. if (pc.level < 75) then
  175. return
  176. end
  177. --d.setf("level", d.getf("level") + 1)
  178. end
  180. if (pc.getqf("last_login_time") == 0) then
  181. pc.setqf("last_login_time", get_time() + (5 * 60))
  182. end
  184. --pc.setqf("deviltower_continue", 1)
  185. --pc.setqf("level", d.getf("level"))
  186. pc.setqf("stone_count", d.getf("stone_count"))
  187. end
  188. end
  190. when 20348.chat."Şeytan Kulesi " begin
  191. if pc.get_level() < 40 then
  192. say_title("Şeytan Kulesi Bekçisi:")
  193. say(locale.deviltower_man_say_you_cant)
  194. else
  195. say_title("Şeytan Kulesi Bekçisi:")
  196. say(locale.deviltower_man_say)
  197. local secim = select(locale.kulesecim,locale.kulesecimiki,locale.kulesecimuc,"Vazgeçtim")
  198. if secim == 1 then
  199. pc.warp(216500,727000)
  200. elseif secim == 2 then
  201. say_npc()
  202. say("Eğer 50.000.000 yang verirsen seni hiçbir")
  203. say("şeyle uğraştırmadan 2.Kat'a gönderebilirim.")
  204. say("ister misin?")
  205. local icsecimiki = select("Girmek istiyorum","Girmek istemiyorum.")
  206. if icsecimiki ==1 then
  207. if pc.get_money() < 50000000 then
  208. say_npc()
  209. say_reward("Hay aksi!")
  210. say("Seni içeri alamam envanterinde yeterli")
  211. say("yang bulamadım bana 50.000.000 yang getirmelisin.")
  212. return
  213. end
  214. --[[if pc.is_busy() then
  215. say_npc()
  216. say_reward("Hay aksi!")
  217. say("Diğer penceleri kapatmadan buraya giremezsin.")
  218. say("Ticaret, NPC, Depo gibi.")
  219. say("Ek olarak 10 saniye beklemen gerekebilir.")
  220. return
  221. end --]]
  222. pc.change_money(-50000000)
  223. --d.new_jump(66, special.devil_tower[1][1], special.devil_tower[1][2])
  224. d.new_jump(66, special.devil_tower[1][1] * 100, special.devil_tower[1][2] * 100)
  225. d.regen_file("data/dungeon/deviltower2_regen.txt")
  226. d.set_warp_at_eliminate(4, d.get_map_index(), special.devil_tower[2][1], special.devil_tower[2][2], "data/dungeon/deviltower3_regen.txt")
  227. end
  228. elseif secim == 3 then
  229. say_npc()
  230. say("Eğer 75.000.000 yang verirsen seni ve grubunu hiçbir")
  231. say("şeyle uğraştırmadan 2.Kat'a gönderebilirim.")
  232. say("İster misin?")
  233. local icsecimgrup = select("Girmek İstiyorum","Girmek İstemiyorum.")
  234. if icsecimgrup ==1 then
  235. if pc.get_money() < 75000000 then
  236. say_npc()
  237. say_reward("Hay aksi!")
  238. say("Seni içeri alamam envanterinde yeterli")
  239. say("yang bulamadım bana 75.000.000 yang getirmelisin.")
  240. return
  241. end
  242. if not party.is_party() then
  243. say_npc()
  244. say_reward("Heey "..pc.get_name().."")
  245. say("Bu işlemi yapmak istiyorsan önce grup olmalısın")
  246. say("unutma kulede insanlar değişebilir kendine")
  247. say("güvenilir bir grup kurmanı tavsiye ederim")
  248. return
  249. end
  250. if not party.is_leader() then
  251. say_npc()
  252. say_reward("Heey "..pc.get_name().."")
  253. say("Cesaretini takdir ediyorum ama")
  254. say("yalnızca grup lideri giriş talebi yapabilir.")
  255. return
  256. end
  257. --[[if pc.is_busy() then
  258. say_npc()
  259. say_reward("Hay aksi!")
  260. say("Diğer penceleri kapatmadan buraya giremezsin.")
  261. say("Ticaret, NPC, Depo gibi.")
  262. say("Ek olarak 10 saniye beklemen gerekebilir.")
  263. return
  264. end --]]
  265. pc.change_money(-75000000)
  266. d.new_jump_party(66, special.devil_tower[1][1], special.devil_tower[1][2])
  267. d.regen_file("data/dungeon/deviltower2_regen.txt")
  268. d.set_warp_at_eliminate(4, d.get_map_index(), special.devil_tower[2][1], special.devil_tower[2][2], "data/dungeon/deviltower3_regen.txt")
  269. end
  270. end
  271. end
  272. end
  275. --[[when 20348.chat."Şeytan Kulesine devam et..." with (deviltower_zone.deviltower_continue() --[[and game.get_event_flag("dt_recall") == 0--]]) begin
  276. say_title(string.format("%s :",mob_name(npc.get_race())))
  277. say("Şeytan Kulesine daha önceden giriş yaptın.[ENTER]Kaldığın yerden devam etmek istiyor musun?[ENTER]")
  278. say_title("Geri Dönme Sistemi Hakkında Bilgi :")
  279. say("kuleye geri dönme sistemi (5,6,7,8) katlar için[ENTER]kullanılabilir eğer bu katlarda oyundan atma vs sorunlar[ENTER]olursa tek başınıza yeniden kuleye devam edebilirsiniz")
  280. say("")
  281. if (select(locale.yes, locale.no) == 2) then return end
  282. deviltower_zone.continue()
  283. end--]]
  285. when kill with npc.get_race() == 8015 begin
  286. timer("devil_stone1_1", 8)
  287. end
  288. when devil_stone1_1.timer begin
  289. d.new_jump_all(66, special.devil_tower[1][1], special.devil_tower[1][2])
  290. d.regen_file("data/dungeon/deviltower2_regen.txt")
  291. d.set_warp_at_eliminate(4, d.get_map_index(), special.devil_tower[2][1], special.devil_tower[2][2], "data/dungeon/deviltower3_regen.txt")
  292. end
  293. when kill with npc.get_race() == 1091 and pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
  294. d.set_warp_at_eliminate(4, d.get_map_index(), special.devil_tower[3][1], special.devil_tower[3][2], "data/dungeon/deviltower4_regen.txt")
  295. d.check_eliminated()
  296. end
  298. function get_4floor_stone_pos()
  299. local positions =
  300. {
  301. {368, 629}, {419, 630}, {428, 653}, {422, 679},
  302. {395, 689}, {369, 679}, {361, 658},
  303. }
  304. for i = 1, 6 do
  305. local j = number(i, 7)
  306. if i != j then
  307. local t = positions[i];
  308. positions[i] = positions[j];
  309. positions[j] = t;
  310. end
  311. end
  312. return positions
  313. end
  315. when kill with npc.get_race() == 8016 and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
  316. --d.setf("level", 4)
  317. local positions = deviltower_zone.get_4floor_stone_pos()
  319. for i = 1, 6 do
  320. test_chat(positions[i][1], positions[i][2])
  321. d.set_unique("fake" .. i , d.spawn_mob(8017, positions[i][1], positions[i][2]))
  322. end
  324. test_chat(positions[7][1], positions[7][2])
  326. local vid = d.spawn_mob(8017, positions[7][1], positions[7][2])
  327. test_chat(vid)
  328. d.set_unique("real", vid)
  329. server_loop_timer('devil_stone4_update', 10, pc.get_map_index())
  330. server_timer('devil_stone4_fail1', 5*60, pc.get_map_index())
  332. notice_multiline(gameforge.deviltower_zone._50_dNotice,d.notice)
  334. end
  336. when devil_stone4_fail1.server_timer begin
  337. if d.select(get_server_timer_arg()) then
  338. pc.setqf("devil_stone4_fail_timer", 2)
  339. notice_multiline(gameforge.deviltower_zone._60_dNotice,d.notice)
  340. server_timer('devil_stone4_fail2', 5*60, get_server_timer_arg())
  341. end
  342. end
  344. when devil_stone4_fail2.server_timer begin
  345. if d.select(get_server_timer_arg()) then
  346. pc.setqf("devil_stone4_fail_timer", 3)
  347. notice_multiline(gameforge.deviltower_zone._70_dNotice,d.notice)
  348. server_timer('devil_stone4_fail', 5*60, get_server_timer_arg())
  349. end
  350. end
  352. when devil_stone4_fail.server_timer begin
  353. if d.select(get_server_timer_arg()) then
  354. pc.setqf("devil_stone4_fail_timer", 1)
  355. notice_multiline(gameforge.deviltower_zone._80_dNotice,d.notice)
  356. d.clear_regen()
  357. d.exit_all()
  358. clear_server_timer('devil_stone4_update', get_server_timer_arg())
  359. end
  360. end
  362. when devil_stone4_update.server_timer begin
  363. if d.select(get_server_timer_arg()) then
  364. if not d.is_unique_dead("real") then
  365. for i = 1, 6 do
  366. if d.getf("fakedead" .. i) == 0 then
  367. if d.unique_get_hp_perc("fake" .. i) < 50 then
  368. d.purge_unique("fake" .. i)
  369. d.setf("fakedead" .. i, 1)
  370. notice_multiline(gameforge.deviltower_zone._90_dNotice,d.notice)
  371. end
  372. end
  373. end
  374. else
  375. server_timer("devil_stone4_end", 5, get_server_timer_arg())
  376. --d.kill_all()
  377. d.purge()
  378. notice_multiline(gameforge.deviltower_zone._100_dNotice,d.notice)
  379. clear_server_timer('devil_stone4_fail1', get_server_timer_arg())
  380. clear_server_timer('devil_stone4_fail2', get_server_timer_arg())
  381. clear_server_timer('devil_stone4_fail', get_server_timer_arg())
  382. pc.setqf("devil_stone4_fail_timer", 0)
  383. end
  384. else
  385. server_timer('devil_stone4_stop_timer', 1, get_server_timer_arg())
  386. end
  387. end
  389. when devil_stone4_stop_timer.server_timer begin
  390. clear_server_timer('devil_stone4_update', get_server_timer_arg())
  391. end
  393. when devil_stone4_end.server_timer begin
  394. if d.select(get_server_timer_arg()) then
  395. clear_server_timer('devil_stone4_update', get_server_timer_arg())
  396. clear_server_timer('devil_stone4_fail1', get_server_timer_arg())
  397. clear_server_timer('devil_stone4_fail2', get_server_timer_arg())
  398. clear_server_timer('devil_stone4_fail', get_server_timer_arg())
  400. d.clear_regen()
  402. -- d.setf("level", 5)
  403. d.setf("stone_count", 5)
  404. notice_multiline(gameforge.deviltower_zone._110_dNotice,d.notice)
  405. d.jump_all(special.devil_tower[4][1], special.devil_tower[4][2])
  406. server_timer('devil_stone5_fail1', 5*60, get_server_timer_arg())
  407. clear_server_timer('devil_stone4_update', get_server_timer_arg())
  408. pc.setqf("dt_recall", 1)
  409. d.set_regen_file("data/dungeon/deviltower5_regen.txt")
  411. d.spawn_mob(20073, 421, 452)
  412. d.spawn_mob(20073, 380, 460)
  413. d.spawn_mob(20073, 428, 414)
  414. d.spawn_mob(20073, 398, 392)
  415. d.spawn_mob(20073, 359, 426)
  416. end
  417. end
  418. when devil_stone5_fail1.server_timer begin
  419. if d.select(get_server_timer_arg()) then
  420. pc.setqf("devil_stone5_fail_timer", 1)
  421. notice_multiline(gameforge.deviltower_zone._120_dNotice,d.notice)
  422. server_timer('devil_stone5_fail2', 5*60, get_server_timer_arg())
  423. end
  424. end
  426. when devil_stone5_fail2.server_timer begin
  427. if d.select(get_server_timer_arg()) then
  428. pc.setqf("devil_stone5_fail_timer", 2)
  429. notice_multiline(gameforge.deviltower_zone._60_dNotice,d.notice)
  430. server_timer('devil_stone5_fail3', 5*60, get_server_timer_arg())
  431. end
  432. end
  434. when devil_stone5_fail3.server_timer begin
  435. if d.select(get_server_timer_arg()) then
  436. pc.setqf("devil_stone5_fail_timer", 3)
  437. notice_multiline(gameforge.deviltower_zone._70_dNotice,d.notice)
  438. server_timer('devil_stone5_fail', 5*60, get_server_timer_arg())
  439. end
  440. end
  442. when devil_stone5_fail.server_timer begin
  443. if d.select(get_server_timer_arg()) then
  444. pc.setqf("devil_stone5_fail_timer", 4)
  445. notice_multiline(gameforge.deviltower_zone._80_dNotice,d.notice)
  446. d.exit_all()
  447. end
  448. end
  451. when kill with npc.get_race() == 8013 --[[and d.getf("level") == 5--]] begin
  452. --if pc.getqf("bevisquestkontrol") == 1 then
  453. -- pc.setqf("bevisquestkontrol",0)
  454. --else
  455. game.drop_item(50084, 1)
  456. --end
  457. end
  459. when devil_stone5.take with item.vnum == 50084 and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
  460. npc.purge()
  461. npc.purge()
  462. npc.purge()
  463. npc.purge()
  464. npc.purge()
  465. npc.purge()
  466. npc.purge()
  467. npc.purge()
  468. item.remove()
  469. d.setf("stone_count", d.getf("stone_count") - 1)
  470. if d.getf("stone_count") <= 0 then
  471. --d.setf("level", 6)
  472. d.clear_regen()
  473. d.regen_file("data/dungeon/deviltower6_regen.txt")
  475. notice_multiline(gameforge.deviltower_zone._130_dNotice,d.notice)
  476. d.jump_all(special.devil_tower[5][1], special.devil_tower[5][2])
  477. local server_arg = d.get_map_index()
  478. clear_server_timer('devil_stone5_fail1', server_arg)
  479. clear_server_timer('devil_stone5_fail2', server_arg)
  480. clear_server_timer('devil_stone5_fail3', server_arg)
  481. clear_server_timer('devil_stone5_fail', server_arg)
  482. else
  483. d.notice(string.format(gameforge.deviltower_zone._140_dNotice, d.getf("stone_count")))
  484. end
  485. end
  487. when kill with npc.get_race() == 1092 and pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 and d.getf("level") == 6 begin
  488. d.kill_all()
  489. notice_multiline(gameforge.deviltower_zone._150_dNotice,d.notice)
  490. d.check_eliminated()
  491. notice_multiline(gameforge.deviltower_zone._160_dNotice,d.notice)
  492. local reward_alchemist = {20074, 20075, 20076}
  493. d.spawn_mob(reward_alchemist[number(1,3)], 425, 216);
  494. d.setqf2("deviltower_zone","deviltower_refine", 1)
  495. end
  498. when 20074.chat.gameforge.deviltower_zone._170_npcChat with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 and npc.lock() begin
  499. say_title(mob_name(20074))
  500. say(gameforge.deviltower_zone._190_say)
  501. wait()
  502. if pc.level >=75 then
  503. say_title(mob_name(20074))
  505. say(gameforge.deviltower_zone._200_say)
  506. local s= select(gameforge.deviltower_zone._210_select, gameforge.locale.cancel, gameforge.deviltower_zone._220_select)
  507. if s==3 then
  508. pc.warp(590500, 110900)
  509. return
  510. end
  511. if s==2 then
  512. return
  513. end
  515. timer("devil_jump_7", 6)
  516. npc.unlock()
  517. d.purge()
  518. return
  519. end
  520. say_title(mob_name(20074))
  521. say(gameforge.deviltower_zone._230_say)
  522. wait()
  523. pc.warp(590500, 110500)
  524. return
  525. end
  527. when 20075.chat.gameforge.deviltower_zone._170_npcChat with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 and npc.lock() begin
  528. say_title(mob_name(20075))
  529. say(gameforge.deviltower_zone._190_say)
  530. wait()
  531. if pc.level >=75 then
  532. say_title(mob_name(20075))
  534. say(gameforge.deviltower_zone._200_say)
  535. local s= select(gameforge.deviltower_zone._210_select, gameforge.deviltower_zone._220_select)
  536. if s==3 then
  537. pc.warp(590500, 110900)
  538. return
  539. end
  540. if s==2 then
  541. return
  542. end
  544. timer("devil_jump_7", 6)
  545. npc.unlock()
  546. d.purge()
  547. return
  548. end
  549. say_title(mob_name(20075))
  550. say(gameforge.deviltower_zone._230_say)
  551. wait()
  552. pc.warp(590500, 110500)
  553. return
  554. end
  555. when 20076.chat.gameforge.deviltower_zone._170_npcChat with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 and npc.lock() begin
  556. say_title(mob_name(20076))
  557. say(gameforge.deviltower_zone._190_say)
  558. wait()
  559. if pc.level >=75 then
  560. say_title(mob_name(20076))
  562. say(gameforge.deviltower_zone._200_say)
  563. local s= select(gameforge.deviltower_zone._210_select, gameforge.deviltower_zone._220_select)
  564. if s==3 then
  565. pc.warp(590500, 110900)
  566. return
  567. end
  568. if s==2 then
  569. return
  570. end
  572. timer("devil_jump_7", 6)
  573. npc.unlock()
  574. d.purge()
  575. return
  576. end
  577. say_title(mob_name(20076))
  578. say(gameforge.deviltower_zone._230_say)
  579. wait()
  580. pc.warp(590500, 110500)
  581. return
  582. end
  583. when devil_jump_7.timer begin
  584. d.clear_regen()
  586. d.spawn_mob(8018, 639, 658)
  587. d.spawn_mob(8018, 611, 637)
  588. d.spawn_mob(8018, 596, 674)
  589. d.spawn_mob(8018, 629, 670)
  591. -- d.setf("level", 7)
  594. notice_multiline(gameforge.deviltower_zone._240_dNotice,d.notice)
  595. d.jump_all(2048+590, 6656+638)
  596. end
  598. when kill with npc.get_race() == 8018 and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
  599. local cont = d.getf("7_stone_kill") + 1
  600. d.setf("7_stone_kill", cont)
  602. if cont >= 4 then
  603. d.setf("7_stone_kill", 0)
  604. d.set_regen_file("data/dungeon/deviltower7_regen.txt")
  605. end
  606. end
  608. when kill with npc.get_race() == 8019 and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
  609. game.drop_item(30300, 1)
  611. local cont = d.getf("7_stone_kill_metin") + 1
  612. d.setf("7_stone_kill_metin", cont)
  614. if cont >= 200 then
  615. d.setf("7_stone_kill_metin", 0)
  616. notice_multiline("Metin kesme hakkiniz bitti!",d.notice)
  617. d.clear_regen()
  618. else
  619. d.notice("Metin kesme hakkiniz "..200-cont.." tane kaldi.")
  620. end
  621. end
  623. when 30300.use with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
  624. pc.remove_item("30300", 1)
  626. local pct = number(1,5)
  628. if pct == 1 then
  629. game.drop_item(30302, 1)
  630. d.clear_regen()
  631. else
  632. game.drop_item(30301, 1)
  634. end
  635. end
  637. when 30302.use with pc.in_dungeon() and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
  638. --if d.getf( "level" ) != 7 then
  639. -- pc.remove_item( "30302", 1)
  640. -- return
  641. --end
  642. say_title(gameforge.blacksmith._40_sayTitle)
  643. say(gameforge.deviltower_zone._250_say)
  644. pc.remove_item("30302", 1)
  645. timer("devil_jump_8", 6)
  646. --d.setf("level", 8)
  647. d.clear_regen()
  648. end
  650. when devil_jump_8.timer begin
  651. --d.setf("level", 8)
  652. notice_multiline(gameforge.deviltower_zone._260_dNotice,d.notice)
  653. d.jump_all(2048+590, 6656+403)
  654. d.set_regen_file("data/dungeon/deviltower8_regen.txt")
  655. d.spawn_mob(20366, 640, 460)
  656. local _count = pc.count_item(30302)
  657. pc.remove_item(30302,_count)
  659. end
  661. when kill with npc.get_race() == 1040 and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
  662. local pct1 = number(1, 5)
  663. if pct1 == 1 then
  664. local pct2 = number(1, 10)
  665. if pct2 == 1 then
  666. game.drop_item(30304, 1)
  667. else
  668. game.drop_item(30303, 1)
  669. end
  670. else
  671. return
  672. end
  673. end
  675. when 20366.take with item.vnum == 30304 begin
  676. npc.purge()
  677. npc.purge()
  678. npc.purge()
  679. npc.purge()
  680. npc.purge()
  681. npc.purge()
  682. npc.purge()
  683. npc.purge()
  684. item.remove()
  685. timer("devil_jump_9", 6)
  686. end
  688. when devil_jump_9.timer begin
  689. -- d.setf("level", 9)
  690. notice_multiline(gameforge.deviltower_zone._270_dNotice,d.notice)
  691. d.jump_all(2048+590, 6656+155)
  692. d.regen_file("data/dungeon/deviltower9_regen.txt")
  693. end
  695. when kill with npc.get_race() == 1093 and pc.get_map_index() >= 660000 and pc.get_map_index() < 670000 begin
  696. d.kill_all()
  697. d.setqf2("deviltower_zone","9_done", 1)
  698. notice_multiline(gameforge.deviltower_zone._280_dNotice,d.notice)
  699. notice_multiline(gameforge.deviltower_zone._290_dNotice,d.notice)
  700. pc.setqf("lucifer_killed", 1)
  701. pc.setqf("dt_recall", 1)
  702. server_timer("devil_end_jump", 60, d.get_map_index())
  703. end
  705. when devil_end_jump.server_timer begin
  706. if d.select (get_server_timer_arg()) then
  707. d.clear_regen()
  708. d.exit_all()
  709. end
  710. end
  711. end
  712. end