Exp hediye etme questi - Vector

[Vectors]

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!

Günceldir.

 

[DarkKnights]

Teşekkürler

 

[Trabz0nLu]

bence saçma ya 101 level biri yan çarla exp kasıp hediye edebilir ve kasma kolaylaşır böylece bunuda düşünelim bence.

 

[Vectors]

​Günceldir.

 

[CsFraNq]

quest Vector_exphediye begin    state start begin
    when 20095.chat."Gezgin Senmisin ?" begin
    say_title(mob_name(npc.get_race())..":")


    if (0 > get_global_time() - pc.getqf("zweite")) then
    say("üzgünüm.")
    say("10 dakika sonra gelin.")
    return
    end

    
    say_title("Merhaba "..pc.get_name().." ")
    say_title("Eger Bir Kişiye Exp Hediye.")
    say_title("Etmek İstiyorsan Doğru Yerdesin ")
    say_title("Unutma Verecegin Exp Kadar")
    say_title("Yang Miktarında Düşecektir.")
    say_title("Bana İsmini Ver O Kişinin.")
    local sname = input()
    local u_vid = find_pc_by_name(sname)
    local m_vid = pc.get_vid()
    if (sname == "" or sname == pc.get_name() or u_vid == 0) then return end
    
   
    
    say_title(mob_name(npc.get_race())..":")
    say("")
    say_title("Ne kadar Exp Göndereceksin?")
    say_title("Örnek 300 ")
    say_title("Ayni Zamanda Yang Miktarında Azalacak!")
    say_title("Unutma! Yang Miktarından Fazla Exp")
    say_title("Gönderemezsin.")
    local exp = tonumber(input())
    
    if (exp == "" or exp == nil) then return end
    
    if (pc.get_exp() < exp) then
    say_reward(exp.." yang paranız yok.")
    say_reward("Hile yapmayınız !")
    return
    end
    
    local old = pc.select(u_vid)
    local u_level = pc.get_level()
    local m_level = pc.get_level()
    pc.select(old)
    
    if (m_level - u_level > 15 or u_level - m_level > 15) then
    say(sname.." ile aranızda en az")
    say("15 level fark olması gerekiyor bu fark çok fazla şuan.")
    return
    end
    
    local frage = confirm(u_vid, pc.name.." "..exp.." Göndermek istiyor?",30)
    
    if (frage == CONFIRM_OK) then
    local m_name = pc.name
    pc.change_gold(-exp)
    pc.change_gold(-exp)
    pc.change_gold(-exp)
    pc.setqf("status",1)
    pc.setqf("zweite",get_global_time())
    local old = pc.select(u_vid)
    pc.give_exp2(exp)
    pc.setqf("status",1)
    pc.setqf("zweite",get_global_time())
    pc.select(old)
    
    say_title(mob_name(npc.get_race())..":")
    say("")
    say_title(sname.. " Teklifini kabul etti.")
    say_title("Hesabından Giden Yang : "..exp)
    say_title("Hediye Edilen Exp : "..exp)
    say_title(sname..  " Eminim Seni Çok Sevmiştir.")
    say("")
    wait()
    setskin(NOWINDOW)
    pc.setqf("u_gold",exp)
    pc.setqf("m_gold",exp)
    else
    
    say_title(mob_name(npc.get_race())..":")
    say("")
    say(sname.. " Teklifini Redetti.")
    end
   end
  end
end

questin mantıgını anlatayım istedigin bi kişiye exp hediye ediyosunuz ayrıca hediye ettiğiniz exp miktarı kadar paranız gidiyor.karşı taraf 30 saniye içinde kabul yada reddetmesi gerekir.20095 hangi npcde olcagı
kayıtlı olmayan bi oyuncu yazıldıgında panel kapanır.
açık olmayan bi oyuncu yazdıgında ne oldugunu bilmiyorum denemedim.yeteri derecede parası yoksa exp göndermez.

quest kurulumu;
yeni bi metin2 belgesi açıp ismini hediye uzantısını quest yapın hediye.quest şeklinde yukarıda ki verdigim kodları içine yapıştırın ftp /usr/game/share/locale/turkey/quest dizinine atın

putty girip sırasıyla

cd /usr/game/share/locale/turkey/quest

./qc hediye.quest

yazın oyun içinden /reload q çekin yedek almadan işlem yapmayın sorumluluk kabul etmem.quest denendi sorunsuz.

quest buglu @Vektors .
Onaylama penceresindeyken EXP'i gönderen kişi oyundan çıkarsa EXP gitmiş, kişi oyundan çıktığı içinde para gitmemiş olur. Az biraz para olduktan sonra bir günde maksimum levele ulaşabilir karakterler.