HERAKLES Otomatik Avlı kalıcı sunucu. 19 Haziran'da açılıyor. Atius & Wizard güvencesiyle hemen kayıt ol, ön kayıt ödülleri aktif. HEMEN TIKLA!
Çok Teşekkür Ederim Üstad
quest kasilmaodasi begin
state start begin
when 20094.chat."Kasilma Odasi" with game.get_event_flag("ozeloda") == 1 begin
if pc.get_map_index() >= 700000 and pc.get_map_index() < 710000 then
if not party.is_leader() then
say_title("Merhaba "..pc.get_name().."")
say("Bir parti lideri değilsen")
say("ne cürretle benimle konuşursun!")
else
say_title("Merhaba "..pc.get_name().."")
say("Bu odada istediğin kadar durabilirsin.")
say("Hangi tür slotları getirtmemi istersin?")
local s = select(" Siyah ork "," Pençe Örümcekler","Kırmızı Orman","Setaou Slotları ","Daha sonra karar vereceğim.")
if s == 1 then
npc.purge()
say_title("Merhaba "..pc.get_name().."")
say("Siyah ork slotlarını getirdim.")
say("Beni öldürmeden önce buradan kaçmam gerekiyor.")
say("Onlarla bensiz mücadele etmelisin!")
wait()
d.set_regen_file("data/dungeon/kasilmaodasi_siyahork.txt")
elseif s == 2 then
npc.purge()
say_title("Merhaba "..pc.get_name().."")
say("Pençe Örümcek slotlarını getirdim.")
say("Beni öldürmeden önce buradan kaçmam gerekiyor.")
say("Onlarla bensiz mücadele etmelisin!")
wait()
d.set_regen_file("data/dungeon/kasilmaodasi_penceorumcek.txt")
elseif s == 3 then
npc.purge()
say_title("Merhaba "..pc.get_name().."")
say("Kırmızı Orman slotlarını getirdim.")
say("Beni öldürmeden önce buradan kaçmam gerekiyor.")
say("Onlarla bensiz mücadele etmelisin!")
wait()
d.set_regen_file("data/dungeon/kasilmaodasi_kirmiziorman.txt")
elseif s == 4 then
say_title("Merhaba "..pc.get_name().."")
say("Hangi tür setaou slotlarının gelmesini istiyorsun?")
local ss = select("1. Kat Setaou Slotları ","2. Kat -Pembe- Setaou Slotları ","Vazgeçtim")
if ss == 1 then
npc.purge()
say_title("Merhaba "..pc.get_name().."")
say("Setaou slotlarını getirdim.")
say("Beni öldürmeden önce buradan kaçmam gerekiyor.")
say("Onlarla bensiz mücadele etmelisin!")
wait()
d.set_regen_file("data/dungeon/kasilmaodasi_setaouslotlari_1.txt")
elseif ss == 2 then
npc.purge()
say_title("Merhaba "..pc.get_name().."")
say("Setaou slotlarını getirdim.")
say("Beni öldürmeden önce buradan kaçmam gerekiyor.")
say("Onlarla bensiz mücadele etmelisin!")
wait()
d.set_regen_file("data/dungeon/kasilmaodasi_setaouslotlari_2.txt")
elseif ss == 3 then
say_title("Merhaba "..pc.get_name().."")
say("Hadi, hadi!")
say("Korktuğun yüzünden okunuyor!")
say("Bu zindanda kalmaya cesaretim yok demiyorsun da!")
end
elseif s == 5 then
say_title("Merhaba "..pc.get_name().."")
say("Hadi, hadi!")
say("Korktuğun yüzünden okunuyor!")
say("Bu zindanda kalmaya cesaretim yok demiyorsun da!")
end
end
else
if pc.getqf("odaya_giris") < get_time() then
say_title("Merhaba "..pc.get_name().."")
say("Kasılma odasında tek başına istediğin kadar")
say("slot kesebilirsin.")
say("Kimse tarafından rahatsız edilmeden!")
say("Giriş yapmak istiyor musun?")
local s = select("Evet","Hayır")
if s == 1 then
if not party.is_party() then
say_title("Merhaba "..pc.get_name().."")
say("Seni içeri tek başına yollayamam.")
say("Bir gruba dahil olmalısın.")
else
if not party.is_leader() then
say_title("Merhaba "..pc.get_name().."")
say("Grup lideri olmak zorundasın!")
else
if pc.count_item(istenileniteminkodu) < 3 then
say_title("Merhaba "..pc.get_name().."")
say("Item eksikliği mevcut seni alamam.")
else
say_title(" Merhaba "..pc.get_name().."")
say(" Seni ve grubunu oraya ışınlıyorum.")
say(" Çok dikkatli ol!")
wait()
local idx = 70
local x = 8298
local y = 7635
d.new_jump_party(idx , x, y)
d.regen_file("data/dungeon/kasilmaodasi_npc.txt")
pc.remove_item(istenileniteminkodu,3)
end
end
end
end
else
say_title("Merhaba "..pc.get_name().."")
say("Odaya 1 saatte bir giriş yapabilirsin!")
end
end
end
when login begin
if pc.get_map_index() >= 700000 and pc.get_map_index() < 710000 then
if pc.getqf("ilk_girdim") == 0 then
pc.setqf("ilk_girdim", 1)
pc.setqf("odaya_giris", get_time()+60*60)
end
else
pc.setqf("ilk_girdim", 0)
end
end
end
end
Kod:quest kasilmaodasi begin state start begin when 20094.chat."Kasilma Odasi" with game.get_event_flag("ozeloda") == 1 begin if pc.get_map_index() >= 700000 and pc.get_map_index() < 710000 then if not party.is_leader() then say_title("Merhaba "..pc.get_name().."") say("Bir parti lideri değilsen") say("ne cürretle benimle konuşursun!") else say_title("Merhaba "..pc.get_name().."") say("Bu odada istediğin kadar durabilirsin.") say("Hangi tür slotları getirtmemi istersin?") local s = select(" Siyah ork "," Pençe Örümcekler","Kırmızı Orman","Setaou Slotları ","Daha sonra karar vereceğim.") if s == 1 then npc.purge() say_title("Merhaba "..pc.get_name().."") say("Siyah ork slotlarını getirdim.") say("Beni öldürmeden önce buradan kaçmam gerekiyor.") say("Onlarla bensiz mücadele etmelisin!") wait() d.set_regen_file("data/dungeon/kasilmaodasi_siyahork.txt") elseif s == 2 then npc.purge() say_title("Merhaba "..pc.get_name().."") say("Pençe Örümcek slotlarını getirdim.") say("Beni öldürmeden önce buradan kaçmam gerekiyor.") say("Onlarla bensiz mücadele etmelisin!") wait() d.set_regen_file("data/dungeon/kasilmaodasi_penceorumcek.txt") elseif s == 3 then npc.purge() say_title("Merhaba "..pc.get_name().."") say("Kırmızı Orman slotlarını getirdim.") say("Beni öldürmeden önce buradan kaçmam gerekiyor.") say("Onlarla bensiz mücadele etmelisin!") wait() d.set_regen_file("data/dungeon/kasilmaodasi_kirmiziorman.txt") elseif s == 4 then say_title("Merhaba "..pc.get_name().."") say("Hangi tür setaou slotlarının gelmesini istiyorsun?") local ss = select("1. Kat Setaou Slotları ","2. Kat -Pembe- Setaou Slotları ","Vazgeçtim") if ss == 1 then npc.purge() say_title("Merhaba "..pc.get_name().."") say("Setaou slotlarını getirdim.") say("Beni öldürmeden önce buradan kaçmam gerekiyor.") say("Onlarla bensiz mücadele etmelisin!") wait() d.set_regen_file("data/dungeon/kasilmaodasi_setaouslotlari_1.txt") elseif ss == 2 then npc.purge() say_title("Merhaba "..pc.get_name().."") say("Setaou slotlarını getirdim.") say("Beni öldürmeden önce buradan kaçmam gerekiyor.") say("Onlarla bensiz mücadele etmelisin!") wait() d.set_regen_file("data/dungeon/kasilmaodasi_setaouslotlari_2.txt") elseif ss == 3 then say_title("Merhaba "..pc.get_name().."") say("Hadi, hadi!") say("Korktuğun yüzünden okunuyor!") say("Bu zindanda kalmaya cesaretim yok demiyorsun da!") end elseif s == 5 then say_title("Merhaba "..pc.get_name().."") say("Hadi, hadi!") say("Korktuğun yüzünden okunuyor!") say("Bu zindanda kalmaya cesaretim yok demiyorsun da!") end end else if pc.getqf("odaya_giris") < get_time() then say_title("Merhaba "..pc.get_name().."") say("Kasılma odasında tek başına istediğin kadar") say("slot kesebilirsin.") say("Kimse tarafından rahatsız edilmeden!") say("Giriş yapmak istiyor musun?") local s = select("Evet","Hayır") if s == 1 then if not party.is_party() then say_title("Merhaba "..pc.get_name().."") say("Seni içeri tek başına yollayamam.") say("Bir gruba dahil olmalısın.") else if not party.is_leader() then say_title("Merhaba "..pc.get_name().."") say("Grup lideri olmak zorundasın!") else if pc.count_item(istenileniteminkodu) < 3 then say_title("Merhaba "..pc.get_name().."") say("Item eksikliği mevcut seni alamam.") else say_title(" Merhaba "..pc.get_name().."") say(" Seni ve grubunu oraya ışınlıyorum.") say(" Çok dikkatli ol!") wait() local idx = 70 local x = 8298 local y = 7635 d.new_jump_party(idx , x, y) d.regen_file("data/dungeon/kasilmaodasi_npc.txt") pc.remove_item(istenileniteminkodu,3) end end end end else say_title("Merhaba "..pc.get_name().."") say("Odaya 1 saatte bir giriş yapabilirsin!") end end end when login begin if pc.get_map_index() >= 700000 and pc.get_map_index() < 710000 then if pc.getqf("ilk_girdim") == 0 then pc.setqf("ilk_girdim", 1) pc.setqf("odaya_giris", get_time()+60*60) end else pc.setqf("ilk_girdim", 0) end end end end
istenilenitemkodu yerine item kodunu yaz
Çok Teşekkür Ederim Üstad
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?