Kod:
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
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.quest denendi sorunsuz.