GÖREV QUEST

goko3755 · 13 Kas 2022

state start begin
when login or levelup with pc.level >= 50 and game.get_event_flag("GRV_KAN_HAKKI")==1 begin
set_state(gorevalim)
end
end
state gorevalim begin
when login begin
if pc.get_map_index() == 1 or pc.get_map_index() == 21 or pc.get_map_index() == 41 then
local v = find_npc_by_vnum(20355)
if v > 0 then target.vid("HEDEFYUZBASI", v, "Yüzbaşı ") end
end
send_letter("KAN HAKKI ")
end

when button or info begin
say_title("KAN HAKKI: ")
say("Yüzbaşının seninle konuşmak istedikleri var ")
say("hemen yanıma gitmelisin. ")
say("")
wait()
end

when HEDEFYUZBASI.target.click or 20355.chat."KAN HAKKI " begin
target.delete("HEDEFYUZBASI")
say_title(mob_name(20355))
say("90 seviye oldun artık onurlu bir iş yapma ")
say("zamanın geldi bunun karşılığında yükseltme ")
say("eşyası vereceğim. Yükseltme eşyası sayesinde ")
say("+90 silahlarına ve zırhlarına yükseltme nesnesinde ")
say("basma için kullanabileceksin ")
say("")
wait()
say_title(mob_name(20355))
say("Kahraman ol ve bayrağını yükselt görevde ")
say("+90 karşı bayrakları kestiğinde her bayraktan ")
say("2 kan düşecek ve kanları bana getirdiğinde ")
say("sana KAN HAKKI itemini vereceğim. ")
say("Unutma Bayrak adamlarını 1. Köylerde ve ")
say("kule önünde kesebilirsin. ")
say("")
local secim = select("Kabul Ediyorum ", "Şuan İlgilenmiyorum ")
if secim ==1 then
say_title(mob_name(20355))
say("Bayrağının kahramanı olacaksın hemen işe koyul! ")
say("")
wait()
set_state(gorevbasla)
return
end
say_title(mob_name(20355))
say("işe yaramaz serseri 2 gün geçtikten sonra ")
say("ancak başvurabileceksin göreve! ")
wait()
end
end

state gorevbasla begin
function KanHakkiYaz(chat)
local durum = 0
local kan1 = ""
local kan2 = ""
local kSay = pc.getqf("kan1")
local sSay = pc.getqf("kan2")
local mSay = pc.getqf("kan3")
if pc.get_empire()==1 then
if sSay==5 then
kan1="Sarı Kan Tamamlandı. "
durum = durum + 1
else
kan1="Kalan Sarı: "..(5-sSay).." "
end
if mSay==5 then
kan2="Mavi Kan Tamamlandı. "
durum = durum + 1
else
kan2="Kalan Mavi: "..(5-mSay).." "
end
end
if pc.get_empire()==2 then
if kSay==5 then
kan1="Kırmızı Kan Tamamlandı. "
durum = durum + 1
else
kan1="Kalan Kırmızı: "..(5-kSay).." "
end
if mSay==5 then
kan2="Mavi Kan Tamamlandı. "
durum = durum + 1
else
kan2="Kalan Mavi: "..(5-mSay).." "
end
end
if pc.get_empire()==3 then
if kSay==5 then
kan1="Kırmızı Kan Tamamlandı. "
durum = durum + 1
else
kan1="Kalan Kırmızı: "..(5-kSay).." "
end
if sSay==5 then
kan2="Sarı Kan Tamamlandı. "
durum = durum + 1
else
kan2="Kalan Sarı: "..(5-sSay).." "
end
end

if chat and durum < 2 then
say_title("Yüzbaşı: ")
say("Kan Hakkı'nı alabilmen için ")
say("diğer krallıklardan +90 oyuncular ile ")
say("mücadele etmelisin. Öldür ve Hakkını al.. ")
say("")
say(kan1)
say(kan2)
say("")
say("5 intikam karşılığında 1 Kan Hakkı alacaksın. ")
say("Kule önü ve 1. Köyler geçerlidir. ")
say("")
wait()
end
if not chat then
say_title("KAN HAKKI: ")
say("Kan Hakkı'nı alabilmen için ")
say("diğer krallıklardan +90 oyuncular ile ")
say("mücadele etmelisin. Öldür ve Hakkını al.. ")
say("")
say(kan1)
say(kan2)
if durum == 2 then
say("")
say("Yüzbaşıya Git ve görevi teslim et.. ")
else
say("")
say("5 intikam karşılığında 1 Kan Hakkı alacaksın. ")
say("Kule önü ve 1. Köyler geçerlidir. ")
end
say("")
wait()
end

if durum == 2 then
return true
else
return false
end
end

function DurumKontrol(bayrak)
local kSay = pc.getqf("kan1")
local sSay = pc.getqf("kan2")
local mSay = pc.getqf("kan3")
if (kSay+sSay+mSay) == 10 then
return true
else
return false
end
end

when login begin
send_letter("KAN HAKKI ")
end

when button or info begin
grv_kanhakki.KanHakkiYaz(false)
send_letter("KAN HAKKI ")
end

when 20355.chat."KAN HAKKI " begin
if not grv_kanhakki.KanHakkiYaz(true) then return end
end
when 20355.chat."KAN HAKKI Sil " with pc.is_gm() begin
say_title(mob_name(20355))
say("Kan Skorları silindi.. ")
say("Görev başlanğıç konumuna alındı.. ")
wait()
pc.setqf("kan1", 0)
pc.setqf("kan2", 0)
pc.setqf("kan3", 0)
set_state(gorevbasla)
chat("skorlar silindi. ")
end

when kill with npc.is_pc() begin
if pc.getqf("kan_time")>get_time() then return end
if pc.get_map_index() !=1 and pc.get_map_index() !=21 and pc.get_map_index() !=41 and pc.get_map_index() !=65 then return end
local old_pc = pc.select(npc.get_vid())
local olenLvl = 0
local olenEmpire = 0
if old_pc != 0 then
olenEmpire = pc.get_empire()
olenLvl = pc.get_level()
pc.select(old_pc)
end
if olenLvl < 90 then return end
if olenEmpire == pc.get_empire() then return end
if number(1,100) > game.get_event_flag("IRS_GRV_KAN_HAKKI_SANS") then return end

local olSay = pc.getqf("kan"..olenEmpire.."") + 1
if olSay > 5 then return end
pc.setqf("kan"..olenEmpire.."",olSay)
if olSay<5 then
chat((5-olSay).." intikam daha alman gerekli. ")
end
pc.setqf("kan_time", get_time()+10)
if olSay == 5 then
pc.give_item2((79630 + olenEmpire), 1)
else
return
end
if grv_kanhakki.DurumKontrol(pc.get_empire()) then
say_title("KAN HAKKI ")
say("Hakkın olanı aldın. ")
say("Görevi tamamladın yüzbaşı ile görüş. ")
say("")
wait()
set_state(gorevteslim)
end
end
end

state gorevteslim begin
when login begin
send_letter("KAN HAKKI ")
end

when button or info begin
say_title("KAN HAKKI ")
say("Hakkın olanı aldın. ")
say("Görevi tamamladın yüzbaşı ile görüş. ")
say("")
wait()
send_letter("KAN HAKKI ")
end

when 20355.chat."KAN HAKKI " begin
local iVnum1=0
local iVnum2=0
if pc.get_empire() == 1 then
iVnum1=79632
iVnum2=79633
end
if pc.get_empire() == 2 then
iVnum1=79631
iVnum2=79633
end
if pc.get_empire() == 3 then
iVnum1=79631
iVnum2=79632
end
if pc.count_item(iVnum1) < 1 or pc.count_item(iVnum2) < 1 then
say_title("Yüzbaşı ")
say("Elde ettiğin kanlar nerede. ")
say("Kanları yanına aldığında tekrar gel. ")
say("")
wait()
return
end
say_title(mob_name(20355))
say("Tebrik ederim. ")
say("Hakkın olanı aldın işte buda ödülün. ")
say("")
say_item_vnum(79630)
say("")
wait()
pc.remove_item(iVnum1,1)
pc.remove_item(iVnum2,1)
pc.give_item2(79630,1)
local gSay = pc.getqf("kan_gorev") + 1
pc.setqf("kan_gorev", gSay)
local gSinir = game.get_event_flag("IRS_GRV_KAN_HAKKI_ADET")
if gSay == gSinir then
set_state(__COMPLETE__)
else
pc.setqf("kan1", 0)
pc.setqf("kan2", 0)
pc.setqf("kan3", 0)
set_state(gorevalim)
end
end
end

state __COMPLETE__ begin
end