Exp hediye etme questi

[korums]

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!

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.

[/QUOTE]

 

[mesut2434]

kilti ! quest bölümüne açın

 

[crimetime67]

İşime Yaradı Teşekkürler :ka19:

 

[vAzraeL1]

exop gs