1. quest snow_dungeon begin
  2. state start begin
  3. when 9010.chat."Tasi indir" with snow_dungeon.is_nemeres_dungeon() == true begin
  4. d.purge()
  5. d.spawn_mob_dir(20397, 173,262,1)
  6. setskin(NOWINDOW)
  7. end
  8. when 9010.chat."TESTSERVER: SnowDungeon 9.seviye'ye git" with snow_dungeon.is_nemeres_dungeon() == true begin
  9. local set = snow_dungeon.get_settings()
  10. --- d.notice("Der Richtige Schlussel wurde gefunden, in wenigen Sekunden geht es in den nächsten Stock.")
  11. server_timer("Jp_9",6,d.get_map_index())
  12. d.clear_regen()
  13. d.kill_all()
  14. d.regen_file("data/dungeon/ice_dungeon/zone_9.txt")
  15. setskin(NOWINDOW)
  16. end
  17. when 9010.chat."TESTSERVER: SnowDungeon 10.seviye'ye git" with snow_dungeon.is_nemeres_dungeon() == true begin
  18. local set = snow_dungeon.get_settings()
  19. server_timer("Jp_Boss",3,d.get_map_index())
  20. d.clear_regen()
  21. d.kill_all()
  22. d.regen_file("data/dungeon/ice_dungeon/zone_boss.txt")
  23. local v = set.BossVnumGroup
  24. d.spawn_group(v, 928, 335, 5 ,1, 1) -- (Input from SRC: argument: vnum,x,y,radius,aggressive,count)
  25. setskin(NOWINDOW)
  26. end
  27. when 9010.chat."TESTSERVER: SnowDungeon boss at" with snow_dungeon.is_nemeres_dungeon() == true begin
  28. local set = snow_dungeon.get_settings()
  29. local v = set.BossVnumGroup
  30. d.spawn_group(v, 928, 335, 5 ,1, 1) -- (INFO from SRC: argument: vnum,x,y,radius,aggressive,count)
  31. end
  32. when 9010.chat."TESTSERVER: SnowDungeon'u bitir" with snow_dungeon.is_nemeres_dungeon() == true begin
  33. server_timer("Jp_OutAll",5,d.get_map_index())
  34. say("done")
  35. end
  36. -- when 30331.use begin --key_level_2
  37. -- LIB_writelog("{"..pc.get_local_x()..","..pc.get_local_y().."}",3,"snowcordis.txt")
  38. -- d.spawn_mob(20399, pc.get_local_x(), pc.get_local_y())
  39. -- chat("write Nordstern Kordinaten")
  40. -- end
  41. when 9010.chat."TESTSERVER: SnowDungeon test 5.kat" with snow_dungeon.is_nemeres_dungeon() == true begin
  42. snow_dungeon._Create_Stones_level5()
  43. setskin(NOWINDOW)
  44. end
  45. when 9010.chat."TESTSERVER: SnowDungeon 5.kat" with snow_dungeon.is_nemeres_dungeon() == true begin
  46. snow_dungeon._DropKeyOnLevel5()
  47. setskin(NOWINDOW)
  48. end
  49. when 9010.chat."TESTSERVER: SnowDungeon pozisyonlarım" with snow_dungeon.is_nemeres_dungeon() == true begin
  50. local set = snow_dungeon.get_settings()
  51. local warp_to_level = set.Position_level_1
  52. local level = 2
  53. say("Eski: x: "..warp_to_level[1].." y:"..warp_to_level[2].."")
  54. local warp_to_level = set. _G[ "Position_level_"..level ]
  55. say("Yeni: x: "..warp_to_level[1].." y:"..warp_to_level[2].."")
  56. --DONT WORKS!
  57. end
  58. function get_settings()
  59. local snow_dungeon_settings = {}
  60. snow_dungeon_settings.map_index = 352 --Mapindex
  61. snow_dungeon_settings.base_cord = {5120, 1536 } --Base Kordinaten
  62. snow_dungeon_settings.outside_entry_pos = {61,4321,1667} --Mapindex, Exit Position (Eisland)
  63. snow_dungeon_settings.need_level = 100 --Ab wann ist der Dungeon betretbar.
  64. snow_dungeon_settings.need_level_group = 100 --Benotigte Level fur Gruppenmitglieder
  65. snow_dungeon_settings.WaitBeforOutAllOnExit = 60 --Wartezeit bevor alle alle herausteleportiert werden bei einem erfolgreichen Run. (Empfohlen 60)
  66. snow_dungeon_settings.NextJumpTime = 5 --Wann man zur nächsten ebene Gejumpt wird (timer) (Empfohlen 5)
  67. snow_dungeon_settings.DurationLoopTimer = 45 --Welchen intervall die Level und Missionen gepruft werden sollen. (Empfohlen 45)
  68. snow_dungeon_settings.wait_duration = 60*60*4 --Ab wann der Dungeon wieder betretbar ist (PartyLeader)
  69. snow_dungeon_settings.maxlife_time_on_dungeon = 60*60*1 --Maximale Zeit fur den Dungeon.
  70. snow_dungeon_settings.DurationMaxOnReJoinGroup = 60*5 --Maximale Zeit innerhalb wann man wieder in die Gruppe joinen kann.
  71. snow_dungeon_settings.key_level_2 = 30331 --KeyVnum fur die 2.Ebene --Frostschlussel
  72. snow_dungeon_settings.NpcVnum_level_5 = 20398 --MobVnum von 5.Ebene --Wurfel des Arktos
  73. snow_dungeon_settings.StoneCount_level_5 = 6 --Wie viele Wurfel des Arktos sollen erscheinen?
  74. snow_dungeon_settings.Key_on_level_5 = 30332 --KeyVnum von 5.Ebene --Nordstern
  75. snow_dungeon_settings.StoneCords_level_5 = {
  76. {432,508},{437,493},{448,492},{448,476},{467,475},{466,464},
  77. {462,450},{458,428},{446,439},{431,431},{415,416},{402,427},
  78. {397,438},{375,434},{374,456},{390,468},{385,492},{402,505},
  79. {404,489},{386,482}
  80. } --Positionen von Wurfel des Arktos
  81. snow_dungeon_settings.MobVnum_level_6 = 8058 --MobVnum von 6.Ebene --Metin der Kälte
  82. snow_dungeon_settings.MobVnum_level_7 = 6151 --MobVnum von 7.Ebene --Szel
  83. snow_dungeon_settings.SzelCords_level_7 = {
  84. {752,499},{758,479},{772,452},{763,444},{750,451},{728,441},
  85. {726,455},{718,482},{715,491},{731,473},{748,429}
  86. } --Positionen von Szel
  87. snow_dungeon_settings.Key_on_level_8 = 30333 --KeyVnum von 8.Ebene --Eisblumenschlussel
  88. snow_dungeon_settings.NpcVnum_level_9 = 20399 --MobVnum von 9.Ebene --Säule des Norddrachen
  89. snow_dungeon_settings.BossVnumGroup = 6062 --GroupMobVnum vom Boss --(Group.txt)
  90. snow_dungeon_settings.BossVnum = 6191 --MobVnum von 10.Ebene --Nemere(6191)
  92. snow_dungeon_settings.Position_level_1 = { 171,271 } --Position ebene 1 --Startposition --Tote alle Monster auf dieser Ebene.
  93. snow_dungeon_settings.Position_level_2 = { 761,270 } --Position ebene 2 --Finde den richtigen Frostschlussel, nur ein Schamane kann ihn benutzen.
  94. snow_dungeon_settings.Position_level_3 = { 187,491 } --Position ebene 3 --Tote alle Monster auf dieser Ebene.
  95. snow_dungeon_settings.Position_level_4 = { 421,259 } --Position ebene 4 --Tote alle Monster auf dieser Ebene.
  96. snow_dungeon_settings.Position_level_5 = { 419,530 } --Position ebene 5 --offnet die Siegel an den Wurfel des Arktos in der richtigen Reihenfolge. (Zieht Nordstern auf die Wurfel)
  97. snow_dungeon_settings.Position_level_6 = { 571,706 } --Position ebene 6 --Tote alle Monster auf dieser Ebene. Danach Zersore den Metin der Kälte (Nur ein Schamane kann ihn Schaden)
  98. snow_dungeon_settings.Position_level_7 = { 746,534 } --Position ebene 7 --Tote alle Monster auf dieser Ebene und Szel
  99. snow_dungeon_settings.Position_level_8 = { 303,710 } --Position ebene 8 --Der Eisblumenschlussel muss gedroppt werden, jedoch kann dieser nur von Schamanen und Ninja benutzt werden.
  100. snow_dungeon_settings.Position_level_9 = { 848,693 } --Position ebene 9 --Zerstort die Säule des Norddrachen. Nur Ninjas und Schamanen konnen ihm Schaden zufugen.
  101. snow_dungeon_settings.Position_level_10 = { 927,391 } --Position ebene 10 (BossZone) --Besiege Nemere, den Konig uber Frost und Eis.
  102. snow_dungeon_settings.Enable_TestServerMode = false --Ob TestServer mode aktiviert ist. Wenn ja werden die Aufgaben schneller beendet.
  103. snow_dungeon_settings.IsNewga_me_re_vi_sion = true --Need ga_me_re_vi_sion 40301
  104. return snow_dungeon_settings
  105. end
  106. function is_TestServerMode()
  107. local set = snow_dungeon.get_settings()
  108. return set.Enable_TestServerMode
  109. end
  110. function is_nemeres_dungeon()
  111. local set = snow_dungeon.get_settings()
  112. local map = pc.get_map_index()
  113. if map >= (set.map_index * 10000) and map < (set.map_index * 10000 + 9000) then
  114. return true
  115. else
  116. return false
  117. end
  118. end
  119. when 20395.chat."Gruba tekrar katıl" with (party.is_party() and d.find(party.getf("ice_dungeon_map_index"))) begin
  120. local set = snow_dungeon.get_settings()
  121. local n = party.getf("ice_dungeon_map_index")
  122. local cord = set.base_cord
  123. local level = d.getf_from_map_index("level", n)
  124. --say("Aktuelles Dungeon Level deiner Gruppe: "..level.."")
  125. if level == 0 then
  126. say_npc_name()
  127. say("Grubunuz zaten Buzdaği'ni fethetti.")
  128. return
  129. end
  130. if pc.getqf("out_party_time") < get_global_time() then
  131. say_npc()
  132. say("")
  133. say("Du hast länger als "..math.ceil(set.DurationMaxOnReJoinGroup /60) .." Minute(n) vor dem")
  134. say("Eisberg verweilt und kannst jetzt nicht")
  135. say("mehr eintreten.")
  136. return
  137. end
  138. if n == 0 then
  139. setskin(NOWINDOW)
  140. return
  141. else
  142. say_npc()
  143. say("")
  144. say("Tekrar grubuna katılmak istiyor musun?")
  145. if select("Evet","Hayır") == 1 then
  146. local warp_to_level = set.Position_level_1
  147. local level = d.getf_from_map_index("level", n)
  148. if level >= 1 and level <= 10 then
  149. if level == 1 then warp_to_level = set.Position_level_1
  150. elseif level == 2 then warp_to_level = set.Position_level_2
  151. elseif level == 3 then warp_to_level = set.Position_level_3
  152. elseif level == 4 then warp_to_level = set.Position_level_4
  153. elseif level == 5 then warp_to_level = set.Position_level_5
  154. elseif level == 6 then warp_to_level = set.Position_level_6
  155. elseif level == 7 then warp_to_level = set.Position_level_7
  156. elseif level == 8 then warp_to_level = set.Position_level_8
  157. elseif level == 9 then warp_to_level = set.Position_level_9
  158. elseif level == 10 then warp_to_level = set.Position_level_10
  159. end
  160. pc.warp((cord[1] + warp_to_level[1])*100,(cord[2] + warp_to_level[2])*100,n)
  161. else
  162. return
  163. end
  164. end
  165. end
  166. end
  168. when 20395.chat."Nemere'nin Gözetleme Kulesi" begin
  169. local set = snow_dungeon.get_settings()
  170. local need_level = 35
  171. say_npc()
  172. say("")
  173. say("Grubunuz ile gerçekten Nemere'nin")
  174. say("Gözetleme Kulesi'ne girmek istiyor musunuz?")
  175. if select("Evet, girmek istiyoruz.","Hayır, orası çok soğuk.") == 2 then
  176. return
  177. end
  178. if (pc.is_gm() and pc.getf("snow_dungeon","duration") >= get_global_time()) then
  179. say("Game Master; süreyi sıfırlamak mı istiyorsun?")
  180. if select("Evet","Hayır") == 1 then
  181. pc.setf("snow_dungeon","duration",0)
  182. return
  183. end
  184. end
  185. if (is_test_server() and snow_dungeon.is_TestServerMode() == true ) then
  186. say("Test server modu etkinleştirildi.")
  187. say(" Şimdi ışınlanacksınız.")
  188. timer("make_dungeon",3)
  189. return
  190. end
  191. if not party.is_leader() then
  192. say_npc()
  193. say("Cesaretini takdir ediyorum ama")
  194. say("yalnızca grup lideri giriş talebi yapabilir.")
  195. return
  196. end
  197. if pc.get_level() < need_level then
  198. say("Zindan'a girmek için en az "..need_level..".")
  199. say("seviyede olmalisin.")
  200. return
  201. end
  202. if pc.getf("snow_dungeon","duration") >= get_global_time() then
  203. say_npc()
  204. say("Nemeres Gözetleme Kulesi'ne yeniden giriş ")
  205. say("için bekleme süresi henüz dolmamış.")
  206. say("Kalan süre: "..LIB_duration(pc.getf("snow_dungeon","duration") - get_global_time()).."")
  207. return
  208. end
  209. if snow_dungeon._CheckMembersLevel() == false then
  210. return
  211. else
  212. timer("make_dungeon",2)
  213. end
  214. end
  215. when 20397.chat."Savaşı başlat" begin --Eisiger Lowe
  216. say_npc()
  217. say("")
  218. say("Savaş'ı başlatmak istiyor musun?")
  219. if select("Evet","Hayır, korkuyorum. ") == 1 then
  220. local set = snow_dungeon.get_settings()
  221. local loop_durr = set.DurationLoopTimer
  222. local wait_durations = set.wait_duration
  223. local t = get_global_time()
  224. d.setf("LastTimeGetOutPut",0)
  225. server_loop_timer("CheckLevelAndCountKillOnMobs",loop_durr,d.get_map_index())
  226. d.regen_file("data/dungeon/ice_dungeon/zone_1.txt")
  227. d.setf("Start_Time",t + set.maxlife_time_on_dungeon)
  228. server_timer("Jp_OutAllFailNotice",(t + set.maxlife_time_on_dungeon) - t,d.get_map_index())
  229. --pc.setqf("duration",t + wait_durations)
  230. d.setqf2("snow_dungeon","duration",t + wait_durations)
  231. d.setf("level",1)
  232. d.notice("Bir sonraki kata çıkmak için Tüm yaratıkları öldürmelisiniz.")
  233. npc.purge()
  234. snow_dungeon._GetLastTime()
  235. end
  236. setskin(NOWINDOW)
  237. end
  238. when make_dungeon.timer begin
  239. local set = snow_dungeon.get_settings()
  240. local cord = set.base_cord
  241. local start_pos = set.Position_level_1
  242. local t = get_global_time()
  243. d.new_jump_party(set.map_index,(cord[1] + start_pos[1]), (cord[2] + start_pos[2]))
  244. --d.new_jump_all(set.map_index,(cord[1] + start_pos[1]), (cord[2] + start_pos[2]))
  245. snow_dungeon._ClearAlls()
  246. d.setf("party_leader_pid",party.get_leader_pid())
  247. party.setf("ice_dungeon_map_index",d.get_map_index())
  248. d.spawn_mob_dir(20397, 173,262,1) --Eisiger Lowe
  249. end
  250. function _ClearAlls()
  251. local d_index = d.get_map_index()
  252. clear_server_timer("CheckLevelAndCountKillOnMobs",d_index)
  253. clear_server_timer("Jp_1",d_index)
  254. clear_server_timer("Jp_2",d_index)
  255. clear_server_timer("Jp_3",d_index)
  256. clear_server_timer("Jp_4",d_index)
  257. clear_server_timer("Jp_5",d_index)
  258. clear_server_timer("Jp_6",d_index)
  259. clear_server_timer("Jp_7",d_index)
  260. clear_server_timer("Jp_8",d_index)
  261. clear_server_timer("Jp_9",d_index)
  262. clear_server_timer("Jp_10",d_index)
  263. clear_server_timer("Jp_OutAll",d_index)
  264. clear_server_timer("Jp_OutAllFail",d_index)
  265. clear_server_timer("Jp_OutAllFailNotice",d_index)
  266. d.setf("level",0)
  267. d.setf("party_leader_pid",0)
  268. d.setf("Start_Time",0)
  269. d.setf("LastTimeGetOutPut",0)
  270. d.setf("Stone_5_count",0)
  271. d.setf("Stone_5_item_fail",0)
  272. d.clear_regen()
  273. d.kill_all()
  274. end
  276. function _CheckMembersLevel()
  277. local set = snow_dungeon.get_settings()
  278. local user_fail_level = {}
  279. local pids = {party.get_member_pids()}
  280. local need_level = set.need_level_group
  281. local have_ninja = false
  282. local have_shaman = false
  283. for i = 1, table.getn(pids), 1 do
  284. q.begin_other_pc_block(pids[i])
  285. if pc.get_level() < need_level then
  286. table.insert(user_fail_level, table.getn(user_fail_level) +1, pc.get_name())
  287. end
  288. local job = pc.get_job()
  289. if job == 1 -- Ninja weiblich
  290. or job == 5 --Ninja männlich
  291. then
  292. have_ninja = true
  293. end
  294. if job == 3 -- Schamane weiblich
  295. or job == 7 --Schamane männlich
  296. then
  297. have_shaman = true
  298. end
  299. q.end_other_pc_block()
  300. end
  301. if (is_test_server() and snow_dungeon.is_TestServerMode() == true ) then
  302. --dchat("TEST modu aktif.")
  303. return true
  304. end
  305. if have_ninja == false then
  306. say("Grubunuzda Ninja olmadan yukarı çıkamazsınız.")
  307. return false
  308. end
  309. if have_shaman == false then
  310. say("Grubunuzda Şaman olmadan yukarı çıkamazsınız.")
  311. return false
  312. end
  313. if table.getn(user_fail_level) >= 1 then
  314. say_npc()
  315. say("")
  316. say("Grubun bağzı üyeleri")
  317. say("henüz "..need_level..". seviyeye ulaşmamış:")
  318. for x = 1, table.getn(user_fail_level), 1 do
  319. say(color(1,1,0), " "..user_fail_level[x])
  320. end
  321. return false
  322. end
  323. if table.getn(user_fail_level) == 0 then
  324. return true
  325. end
  326. end
  327. when logout begin
  328. if snow_dungeon.is_nemeres_dungeon() == true then
  329. local set = snow_dungeon.get_settings()
  330. pc.setqf("out_party_time",get_global_time() + set.DurationMaxOnReJoinGroup)
  331. --snow_dungeon.unregister_name()
  332. end
  333. end
  335. when login begin
  336. if snow_dungeon.is_nemeres_dungeon() == true then
  337. local set = snow_dungeon.get_settings()
  338. local backk = set.outside_entry_pos
  339. pc.set_warp_location(backk[1], backk[2],backk[3])
  340. if d.getf("party_leader_pid") != party.get_leader_pid() then
  341. chat("nemeres_wait_dungeon #RAUS:# Sizin grubunuz içeride değil.")
  342. chat("nemeres_wait_dungeon #RAUS:#debug -> "..d.getf("party_leader_pid").." != "..party.get_leader_pid().."")
  343. d.exit()
  344. return
  345. end
  346. if pc.get_level() < set.need_level_group then
  347. chat("nemeres_wait_dungeon #RAUS:# Benim seviyem düşük.")
  348. d.exit()
  349. return
  350. end
  351. --chat("Hos geldiniz. Burada "..math.ceil((d.getf("Start_Time") - get_global_time()) /60) .." dakikalik sureniz var.")
  352. --notice("Sonraki kata cikmak icin Tum yaratiklari oldurun.")
  353. --snow_dungeon._GetLastTime()
  354. end
  355. end
  357. function _GetLastTime()
  358. local c = get_global_time()
  359. local t = d.getf("Start_Time") - c
  360. local o = d.getf("LastTimeGetOutPut")
  361. --d.notice("CurrentTime: "..c.." Last: "..o.."")
  362. if c >= o then
  363. if t >= 60 then
  364. d.notice("Yaklaşık "..math.ceil(t / 60).." dakikanız kaldı...")
  365. else
  366. d.notice("Yaklaşık "..t .." saniyeniz kaldı...")
  367. end
  368. if t >= (60*10) then
  369. d.setf("LastTimeGetOutPut",c + 60*5)
  370. elseif t >= (60*5) then
  371. d.setf("LastTimeGetOutPut",c + 60*2)
  372. else
  373. d.setf("LastTimeGetOutPut",c + 10)
  374. end
  375. --d.setf("LastTimeGetOutPut",c + 60*number(3,5)) -- Random
  376. end
  377. end
  379. when Jp_OutAllFailNotice.server_timer begin
  380. if d.select(get_server_timer_arg()) then
  381. d.notice("Zaman doldu.")
  382. server_timer("Jp_OutAll",1,d.get_map_index())
  383. end
  384. end
  386. when CheckLevelAndCountKillOnMobs.server_timer begin
  387. if d.select(get_server_timer_arg()) then
  388. local set = snow_dungeon.get_settings()
  389. local level = d.getf("level")
  390. local mob_count = d.count_monster()
  391. local next_jump_time = set.NextJumpTime
  392. --d.notice("level: "..level.." mob_count: "..mob_count.."")
  393. if level == 1 and mob_count <= 0 then
  394. d.notice("Tüm yaratıkları mağlup ettin. Bir kaç dakika içerisinde bir sonraki kata ışınlanacaksın.")
  395. d.notice("")
  396. server_timer("Jp_2",next_jump_time,d.get_map_index())
  397. d.clear_regen()
  398. d.kill_all()
  399. d.set_regen_file("data/dungeon/ice_dungeon/zone_2.txt")
  400. elseif level == 3 and mob_count <= 0 then
  401. d.notice("Tüm yaratıkları mağlup ettin. Bir kaç dakika içerisinde bir sonraki kata ışınlanacaksın.")
  402. d.notice("")
  403. server_timer("Jp_4",next_jump_time,d.get_map_index())
  404. d.clear_regen()
  405. d.kill_all()
  406. d.regen_file("data/dungeon/ice_dungeon/zone_4.txt")
  407. elseif level == 4 and mob_count <= 0 then
  408. d.notice("Tüm yaratıkları mağlup ettin. Bir kaç dakika içerisinde bir sonraki kata ışınlanacaksın.")
  409. d.notice("")
  410. server_timer("Jp_5",next_jump_time,d.get_map_index())
  411. d.clear_regen()
  412. d.kill_all()
  413. d.set_regen_file("data/dungeon/ice_dungeon/zone_5.txt")
  414. elseif level == 6 and mob_count <= 0 then
  415. local MobStonelvl6 = set.MobVnum_level_6
  416. d.notice("Tüm canavarları yok ettiniz. "..mob_name(MobStonelvl6).."'i öldürün.")
  417. d.notice("")
  418. d.clear_regen()
  419. d.kill_all()
  420. d.regen_file("data/dungeon/ice_dungeon/zone_6.txt")
  421. d.spawn_mob(MobStonelvl6,570,649)
  422. elseif level == 7 and mob_count <= 0 then
  423. d.notice("Tüm yaratıkları mağlup ettin. Bir kaç dakika içerisinde bir sonraki kata ışınlanacaksın.")
  424. d.notice("")
  425. server_timer("Jp_8",next_jump_time,d.get_map_index())
  426. d.clear_regen()
  427. d.kill_all()
  428. d.set_regen_file("data/dungeon/ice_dungeon/zone_8.txt")
  429. end
  430. snow_dungeon._GetLastTime()
  431. end
  432. end
  434. when Jp_2.server_timer begin --Jump Level 2
  435. if d.select(get_server_timer_arg()) then
  436. local set = snow_dungeon.get_settings()
  437. local v = set.key_level_2
  438. d.setf("level",2)
  439. local cord = set.base_cord
  440. local pos = set.Position_level_2
  441. d.jump_all((cord[1] + pos[1]), (cord[2] + pos[2]))
  442. d.notice("Yukarı çıkmak için "..item_name(v).."'i bulun.")
  443. d.notice("")
  444. end
  445. end
  446. when 30331.use with snow_dungeon.is_nemeres_dungeon() == true begin --key_level_2
  447. local set = snow_dungeon.get_settings()
  448. local next_jump_time = set.NextJumpTime
  449. local job = pc.get_job()
  450. local level = d.getf("level")
  451. if level == 2 then
  452. if (is_test_server() and snow_dungeon.is_TestServerMode() == true ) then
  453. --dchat("SET VARIABLE JOB 3")
  454. job = 3
  455. end
  456. if job == 3 -- Schamane weiblich
  457. or job == 7 --Schamane männlich
  458. then
  459. if number(1,3) == 1 then --or d.count_monster() < 10 then
  460. d.notice("Doğru anahtarı buldunuz! Bir kaç saniye sonra ışınlanacaksınız.")
  461. server_timer("Jp_3",next_jump_time,d.get_map_index())
  462. d.clear_regen()
  463. d.kill_all()
  464. d.regen_file("data/dungeon/ice_dungeon/zone_3.txt")
  465. item.remove()
  466. else
  467. d.notice("Bu yanlış anahtar.")
  468. item.remove()
  469. end
  470. else
  471. d.notice("Bunu sadece Şamanlar kullanabilir.")
  472. return
  473. end
  474. end
  475. end
  477. when Jp_3.server_timer begin --Jump Level 3
  478. if d.select(get_server_timer_arg()) then
  479. local set = snow_dungeon.get_settings()
  480. d.setf("level",3)
  481. local cord_MQ = set.base_cord
  482. local pos = set.Position_level_3
  483. d.jump_all((cord_MQ[1] + pos[1]), (cord_MQ[2] + pos[2]))
  484. d.notice("Sonraki seviyeye ulaşmak için bütün yaratıkları öldürün!")
  485. end
  486. end
  488. when Jp_4.server_timer begin --Jump Level 4
  489. if d.select(get_server_timer_arg()) then
  490. local set = snow_dungeon.get_settings()
  491. d.setf("level",4)
  492. local cord = set.base_cord
  493. local pos = set.Position_level_4
  494. d.jump_all((cord[1] + pos[1]), (cord[2] + pos[2]))
  495. d.notice("Sonraki seviyeye ulaşmak için bütün yaratıkları öldürün!")
  496. end
  497. end
  499. when Jp_5.server_timer begin --Jump Level 5
  500. if d.select(get_server_timer_arg()) then
  501. local set = snow_dungeon.get_settings()
  502. local v = set.NpcVnum_level_5
  503. d.setf("level",5)
  504. local cord = set.base_cord
  505. local pos = set.Position_level_5
  506. d.jump_all((cord[1] + pos[1]), (cord[2] + pos[2]))
  507. d.notice("Anahtar düşürerek "..mob_name(v).." isimli buz küpünden mühürü açın. ")
  508. if set.IsNewga_me_re_vi_sion == true then
  509. d.notice("Anahtarı canavarlardan düşürebilirsiniz.")
  510. else
  511. d.notice("Anahtarlar otomatikman envanterinize gelecek.")
  512. end
  513. snow_dungeon._Create_Stones_level5()
  514. end
  515. end
  517. function _DropKeyOnLevel5()
  518. if number(1,1000) >= 666 then --Abbruch der weiteren funtion -> Damit es spannend bleibt bei den wurfeln... :P
  519. return
  520. end
  521. local set = snow_dungeon.get_settings()
  522. local count = set.StoneCount_level_5
  523. local vnum = set.Key_on_level_5
  524. local get_random_unique = d.get_unique_vid("stone5_"..number(1,count).."")
  525. local fail_count = d.getf("Stone_5_item_fail") +1
  526. local search = d.getf("Stone_5_count")
  527. local search2 = d.get_unique_vid("stone5_"..search.."")
  528. if search2 != get_random_unique then
  529. d.setf("Stone_5_item_fail",fail_count)
  530. end
  531. --
  532. if set.IsNewga_me_re_vi_sion == true then
  533. --New function
  534. game.drop_item(vnum,1)
  535. else
  536. pc.give_item2_select(vnum,1)
  537. end
  538. --dchat("Creaty Key fail_count: "..fail_count.."")
  539. if (is_test_server() and snow_dungeon.is_TestServerMode() == true ) then --Wenn TestServer Modus
  540. item.set_socket(1,search2)
  541. d.setf("Stone_5_item_fail",0)
  542. elseif fail_count > 6 then --Wenn mehr wie x mal nicht richtig erstellt wird, dann kommt der richtige Key
  543. item.set_socket(1,search2)
  544. d.setf("Stone_5_item_fail",0)
  545. else
  546. item.set_socket(1,get_random_unique)
  547. end
  548. end
  550. function _Create_Stones_level5()
  551. local set = snow_dungeon.get_settings()
  552. local stone_level5_count_MQ = set.StoneCount_level_5
  553. local c = set.StoneCords_level_5 --{ {432,508},{437,493},{448,492},{448,476},{467,475},{466,464}}
  554. local v = set.NpcVnum_level_5
  555. for i = 1, stone_level5_count_MQ, 1 do
  556. local n = number(1,table.getn(c))
  557. --d.spawn_mob(20398, c[n][1], c[n][2])
  558. d.set_unique("stone5_"..i.."", d.spawn_mob(v, c[n][1], c[n][2]))
  559. --d.set_unique("stone5_"..i.."", mob.spawn(20398, c[n][1], c[n][2],1,1,1)) --GEHT
  560. --d.set_unique("stone5_"..i.."", d.spawn_mob_ac_dir(20398, c[n][1], c[n][2],i)) --GEHT
  561. table.remove(c,n)
  562. if i == 1 then
  563. d.setf("Stone_5_count",1)
  564. d.setf("Stone_5_item_fail",0)
  565. end
  566. end
  567. end
  569. when 20398.take begin --NpcVnum_level_5
  570. if snow_dungeon.is_nemeres_dungeon() == true then
  571. local set = snow_dungeon.get_settings()
  572. local stone_level5_count = 6
  573. local next_jump_time = 5
  574. local vnum = item.get_vnum()
  575. local key_level_5 = 30332
  576. local search = d.getf("Stone_5_count")
  577. if vnum == key_level_5 then
  578. local new = search +1
  579. if new > stone_level5_count then
  580. d.notice("Son taşı açtınız, biraz sonra çıkacaksınız.")
  581. npc.purge()
  582. item.remove()
  583. server_timer("Jp_6",next_jump_time,d.get_map_index())
  584. d.clear_regen()
  585. d.kill_all()
  586. d.regen_file("data/dungeon/ice_dungeon/zone_6.txt")
  587. else
  588. d.notice(""..search..". Taşı açtınız, biraz daha ilerlemeniz gerekmekte. ".. stone_level5_count - search .." Adet taşınız kaldı.")
  589. npc.purge()
  590. item.remove()
  591. end
  592. d.setf("Stone_5_count",new)
  593. end --if is dungeon end
  594. end --when end
  595. end
  596. end
  598. state start begin
  599. when Jp_6.server_timer begin --Jump Level 6
  600. if d.select(get_server_timer_arg()) then
  601. local set = snow_dungeon.get_settings()
  602. local v = set.MobVnum_level_6
  603. d.setf("level",6)
  604. local cord = set.base_cord
  605. local pos = set.Position_level_6
  606. d.jump_all((cord[1] + pos[1]), (cord[2] + pos[2]))
  608. d.notice("Tüm canavarları öldürdünüz. Şimdi bütün canavarları yok edin ve "..mob_name(v).."'i mağlup edin.")
  609. --- d.notice("Nur Schamanen konnen ihm Schaden hinzufugen.")
  610. --d.spawn_mob(v,570,649)
  612. end
  613. end
  615. when Jp_7.server_timer begin --Jump Level 7
  616. if d.select(get_server_timer_arg()) then
  617. local set = snow_dungeon.get_settings()
  618. local v = set.MobVnum_level_7
  619. d.setf("level",7)
  620. local cord = set.base_cord
  621. local pos = set.Position_level_7
  622. d.jump_all((cord[1] + pos[1]), (cord[2] + pos[2]))
  623. d.notice("Metin taşarını başarıyla yok ettiniz. Şimdi "..mob_name(v).."'i mağlup edin!")
  624. end
  625. end
  627. when Jp_8.server_timer begin --Jump Level 8
  628. if d.select(get_server_timer_arg()) then
  629. local set = snow_dungeon.get_settings()
  630. local v = set.Key_on_level_8
  631. d.setf("level",8)
  632. local cord = set.base_cord
  633. local pos = set.Position_level_8
  634. d.jump_all((cord[1] + pos[1]), (cord[2] + pos[2]))
  635. d.notice("Yaratıkları keserek "..item_name(v).." düşürün.")
  636. d.notice("Bu nesnenin dilinden sadece Şaman ve Ninjalar anlayabiliyor...")
  637. end
  638. end
  640. when 30333.use with snow_dungeon.is_nemeres_dungeon() == true begin --Key_on_level_8
  641. local set = snow_dungeon.get_settings()
  642. local next_jump_time = set.NextJumpTime
  643. local level = d.getf("level")
  644. local job = pc.get_job()
  645. if level == 8 then
  646. if (is_test_server() and snow_dungeon.is_TestServerMode() == true ) then
  647. --dchat("SET VARIABLE JOB 3")
  648. job = 3
  649. end
  650. if job == 1 -- Ninja weiblich
  651. or job == 5 --Ninja männlich
  652. or job == 3 -- Schamane weiblich
  653. or job == 7 --Schamane männlich
  654. then
  655. if number(1,3) == 1 then
  656. d.notice("Doğru anahtarı buldunuz.Bir kaç saniye içinde ışınlanacaksınız.")
  657. server_timer("Jp_9",next_jump_time,d.get_map_index())
  658. d.clear_regen()
  659. d.kill_all()
  660. d.regen_file("data/dungeon/ice_dungeon/zone_9.txt")
  661. item.remove()
  662. else
  663. d.notice("Bu anahtar yanlış.")
  664. item.remove()
  665. end
  666. else
  667. d.notice("Bunu sadece Şaman ve Ninja karakterleri kullanabilir.")
  668. return
  669. end
  670. end
  671. end
  673. when Jp_9.server_timer begin --Jump Level 9
  674. if d.select(get_server_timer_arg()) then
  675. local set = snow_dungeon.get_settings()
  676. local v = set.NpcVnum_level_9
  677. d.setf("level",9)
  678. local cord = set.base_cord
  679. local pos = set.Position_level_9
  680. d.jump_all((cord[1] + pos[1]), (cord[2] + pos[2]))
  681. d.notice(""..mob_name(v).."'yi mağlup edin!")
  682. d.notice("Fakat ona sadece Şaman'ın tecrübesi ve Ninja'nın kuvveti karşı koyabilir.")
  683. d.notice("")
  684. d.spawn_mob(v,849,655)
  685. end
  686. end
  688. when Jp_Boss.server_timer begin --Jump Level BossZone
  689. if d.select(get_server_timer_arg()) then
  690. local set = snow_dungeon.get_settings()
  691. local v = set.BossVnum
  692. d.setf("level",10)
  693. local cord = set.base_cord
  694. local pos = set.Position_level_10
  695. d.jump_all((cord[1] + pos[1]), (cord[2] + pos[2]))
  696. d.notice(""..mob_name(v).."'yi dondurun ve mağlup edin!")
  697. end
  698. end
  700. when kill begin
  701. if snow_dungeon.is_nemeres_dungeon() == true then
  702. local set = snow_dungeon.get_settings()
  703. local next_jump_time = set.NextJumpTime
  704. local level = d.getf("level")
  705. local stone_level_6 = set.MobVnum_level_6
  706. local stone_level_9 = set.NpcVnum_level_9
  707. local boss_vnum = set.BossVnum
  708. local wait_time = set.WaitBeforOutAllOnExit
  709. local mobvnum = npc.get_race()
  710. --dchat("nemeres_wait_dungeon MobVnum = "..mobvnum.."")
  711. if level == 2 and mobvnum >= 6101 and mobvnum <= 6108 and 1 == number(1,10) then
  712. local v = set.key_level_2
  713. game.drop_item(v,1)
  714. elseif level == 5 and mobvnum >= 6101 and mobvnum <= 6108 and 1 == number(1,15) then
  715. snow_dungeon._DropKeyOnLevel5()
  716. elseif level == 6 and mobvnum == stone_level_6 then
  717. d.notice(""..mob_name(stone_level_6).." mağlup edildi ve bir sonraki seviyeye geçiyorsunuz.")
  718. d.notice("")
  719. server_timer("Jp_7",next_jump_time,d.get_map_index())
  720. d.clear_regen()
  721. d.kill_all()
  722. d.regen_file("data/dungeon/ice_dungeon/zone_7.txt") --Szel
  723. local v_MQv = set.MobVnum_level_7
  724. local c = set.SzelCords_level_7
  725. local n = number(1,table.getn(c))
  726. d.spawn_mob(v_MQv, c[n][1], c[n][2])
  727. elseif level == 8 and mobvnum >= 6101 and mobvnum <= 6108 and 1 == number(1,10) then
  728. local v = set.Key_on_level_8
  729. game.drop_item(v,1)
  730. elseif level == 9 and mobvnum == stone_level_9 then
  731. d.notice(""..mob_name(stone_level_9).." mağlup edildi ve bir sonraki seviyeye geçiyorsunuz.")
  732. server_timer("Jp_Boss",next_jump_time,d.get_map_index())
  733. d.clear_regen()
  734. d.kill_all()
  735. d.regen_file("data/dungeon/ice_dungeon/zone_boss.txt")
  736. local v = set.BossVnumGroup
  737. d.spawn_group(v, 928, 335, 5 ,1, 1) -- (Input from SRC: argument: vnum,x,y,radius,aggressive,count)
  738. elseif level == 10 and mobvnum == boss_vnum then
  739. d.clear_regen()
  740. d.kill_all()
  741. d.notice("Tebrikler cesur savaşçılar! "..mob_name(boss_vnum).."'yu mağlup ettiniz!.. Grup olarak "..wait_time.." saniye sonra ışınlanacaksınız.")
  742. notice_all(""..pc.get_name().." ve grup arkadaşları Nemeres'i mağlup etti!")
  743. server_timer("Jp_OutAll",wait_time,d.get_map_index())
  744. end
  745. end
  746. end
  747. when Jp_OutAll.server_timer begin --Jump Out Bye bye ;D
  748. if d.select(get_server_timer_arg()) then
  749. snow_dungeon._ExitAll()
  750. end
  751. end
  752. function _ExitAll()
  753. d.exit_all()
  754. end
  755. end
  756. end