Merhaba , itemine vs sistemini sizlerle paylaşiyorum.
Anlatım ;
Kodları alıp bir txt içine kaydedin daha sonra uzantısını .lua olarak değiştirin
- cd /usr/game/share/locale/turkey/quest Klasörüne atın
- ./qc isim.lua
Yazın reboot atın hazır.
Güle güle kullanın bir teşekkür yeterli.
quest arena begin
state start begin
when 20087.take with item.get_id() begin
local kod = item.get_vnum()
local itemid = item.get_id()
say_title(" Merhaba "..pc.get_name().." ")
say_item_vnum(kod)
say("Kaç Adetine Vs Atmak İstiyorsun ?")
local adet = tonumber(input())
if pc.count_item (kod) < adet then
say("Yeterli İtemin Yok")
else
if get_time() < pc.getqf("next_time") then
say(" Tekrar İtemine Vs Atabilmek İçin ")
say(" 1 Saat Beklemelisin ")
elseif pc.get_level() < 74 then
say(" Arenada dövüşebilmek için ")
say(" en az 75 olman gerekir. ")
else
say_title("İtemine Duello System")
say(" Arenaya hoşgeldin. ")
-- local kontrol = mysql_query("SELECT *FROM player.item WHERE item.id = '"..itemid.."' ORDER BY item.attrtype0 DESC, item.attrvalue0 DESC, item.attrtype1 DESC, item.attrvalue1 DESC, item.attrtype2 DESC, item.attrvalue2 DESC, item.attrtype3 DESC, item.attrvalue3 DESC, item.attrtype4 DESC, item.attrvalue4 DESC ")
say(" Güzel İtemini Ortaya Koydun. ")
say("Şimdi Sıra Kendine Rakip Belirlemekte")
say("Size Bu Hizmeti Sağladığım İçin İkinizdende")
say("5M Alacağım Unutma! Bu Şartları Kabul Ediyorsan")
wait()
say(" Rakibinin Adını Yaz ")
local my_vid = pc.get_vid()
local rakip = input()
local u_vid = find_pc_by_name(rakip)
local m_vid = pc.get_vid()
game.set_event_flag("duello_rakip", rakip)
if rakip == "" or rakip == pc.get_name() or u_vid == 0 then
say(" Bir Hata Oluştu Bunun sebebi")
say(" Gerekli Alanı Boş Bırakmış Olabilir Veya ")
say(" Kendi adınızı yazmış olabilirsiniz ")
return
elseif not npc.is_near_vid(u_vid,10) then
say(" "..rakip.." senden çok uzak ")
say(" Yoksa senden korktu mu ? ")
return
elseif npc.is_near_vid(u_vid,10) then
local old = pc.select(u_vid)
local u_level = pc.get_level()
local rakip_gold = pc.get_gold()
local u_sure = pc.getqf("next_timee")
pc.select(old)
local m_level = pc.get_level()
local param = pc.get_gold()
if m_level - u_level > 10 or u_level - m_level > 10 then
say(" "..rakip.." senden çok güçlü ")
say(" veya zayıf. ")
say(" Başka bir rakip bul kendine. ")
say(" Unutma Bu Senin İyiliğin İçin.")
return
else
if rakip_gold < 5000000 then
say(" Rakibinin yeterli parası yok. ")
else
pc.select(u_vid)
if pc.count_item (kod) < adet then
pc.select(m_vid)
say("Rakibinin yeterli itemi yok.")
else
if param < 5000000 then
say(" Yeterli paran yok. (5M) ")
else
if get_time() < u_sure then
say(" Rakibin daha yeni ")
say(" arenayı kullanmış. ")
return
else
pc.select(m_vid)
local teklif = confirm(u_vid, pc.name.." ile arenada dövüşmek istiyor musunnnnnnnnnnn ?",30)
if teklif == CONFIRM_OK then
local old = pc.select(u_vid)
pc.setqf("durumm",1)
pc.setqf("next_time", get_time() + 3600 * 1)
pc.change_gold(-5000000)
pc.remove_item(kod,adet)
game.set_event_flag("iteminevs_price_count", adet)
game.set_event_flag("iteminevs_price_vnum", kod)
pc.select(old)
local m_name = pc.name
pc.setqf("durum",1)
pc.setqf("next_time", get_time() + 3600 * 1)
pc.change_gold(-5000000)
pc.remove_item(kod,adet)
game.set_event_flag("iteminevs_price_count", adet)
game.set_event_flag("iteminevs_price_vnum", kod)
say("")
say(" "..rakip.. " İtemine dövüşü kabul etti. ")
say("")
wait()
setskin(NOWINDOW)
notice_all(" "..rakip.." ile "..pc.name.. " İtemine Dövüşe Başlıyor ")
pc.select(m_vid)
command("pvp "..u_vid)
pc.select(u_vid)
command("pvp "..m_vid)
else
say("")
say(" "..rakip.. " Arenaya çağrını redetti. ")
end
end
end
end
end
end
end
end
end
end
when kill with pc.getqf("durum") == 1 begin
pc.setqf("raund",pc.getqf("raund")+1)
if pc.getqf("raund") == 1 then
chat(" Tebrikler Rakibini Başarıyla Yendin. ")
chat(" Bende Sana Hak Ettiğin Ödülü Veriyorum. ")
pc.give_item2(game.get_event_flag("iteminevs_price_vnum"), game.get_event_flag("iteminevs_price_count"))
pc.give_item2(game.get_event_flag("iteminevs_price_vnum"), game.get_event_flag("iteminevs_price_count"))
pc.delqf("raund")
pc.setqf("durum",0)
pc.select(u_vid)
say("Üzgünüm Dostum Malesef Yenildin Üzülme")
say("Kendini Geliştirmelisin.")
pc.delqf("raund")
pc.setqf("durum",0)
end
end
end
endquest itemineduello begin
state start begin
when 20087.chat. "İtemine Duello Atmak İstiyorum" begin
say_title("İtemine Duello Sistemi")
local isim = pc.get_name()
say("Merhaba "..isim.."")
game.set_event_flag("yollayan1",isim)
say("Demek İtemine Duello Atmak İstiyorsun.")
say("Lütfen Buraya Rakibinin Adını Yaz")
local my_vid = pc.get_vid()
game.set_event_flag("myvid", my_vid)
local rakip = input()
game.set_event_flag("yollayan",rakip)
local u_vid = find_pc_by_name(rakip)
local old = pc.select(u_vid)
pc.select(old)
game.set_event_flag("rakipvid", u_vid)
local teklif = confirm(u_vid, pc.name.." ile İtemine dövüşmek istiyor musun ?",30)
if teklif == CONFIRM_OK then
say_title("İtemine Duello Sistemi")
say("Rakibin İtemine Duelloyu Kabul Etti.")
say("Şimdi Üzerime Vs Atmak İstediğin İtemi")
say("Sürükleyebilirsin.")
pc.setqf("duelloyollayan",1)
pc.select(old)
pc.getqf("duellorakip",1)
pc.select(my_vid)
else
say_title("İtemine Duello Sistemi")
say("Üzgünüm "..isim.."")
say("Malesef Rakibin Duelloyu Kabul Etmedi.")
end
end
when 20087.take with pc.getqf("duelloyollayan") == 1 begin
say_title("İtemine Duello Sistemi")
say("Merhaba "..pc.get_name().."")
say("Demek İtemiini Üzerime Sürükledin.")
say("İteminin Özelliklerine Bakalım.")
local kod = item.get_vnum()
game.set_event_flag("yollayan_item",kod)
local itemid = item.get_id()
say_item_vnum(kod)
wait()
say_title("İtemine Duello Sistemi")
say("Pekala Şimdi Rakibinin İtem Koymasını Bekliyeceğiz.")
pc.setqf("duelloyollayan",0)
end
when 20087.take begin
say_title("İtemine Duello Sistemi")
say("Merhaba "..pc.get_name().."")
say("Demek İtemiini Üzerime Sürükledin.")
say("İteminin Özelliklerine Bakalım.")
local kodd = item.get_vnum()
game.set_event_flag("rakip_item",kodd)
pc.setqf("iteminevs",1)
local itemid = item.get_id()
say_item_vnum(kodd)
wait()
game.set_event_flag("duello_rakip", 0)
pc.select(game.get_event_flag("myvid"))
say_title("İtemine Duello Sistemi")
say("Merhaba "..pc.get_name()"")
say("Rakibinde İteminini Ortaya Koydu.")
say_item_vnum(game.set_event_flag("rakip_item"))
end
end
endquest iteminevs begin
state start begin
when 20087.take with item.get_id() begin
local kod = item.get_vnum()
local itemid = item.get_id()
local vsyollayan = pc.get_name()
say_title(" Merhaba "..pc.get_name().." ")
say_item_vnum(kod)
say("Kaç Adetine Vs Atmak İstiyorsun ?")
local adet = tonumber(input())
game.set_event_flag("iteminevs_price_count", adet)
game.set_event_flag("iteminevs_price_vnum", kod)
if pc.count_item (kod) < adet then
local itemname = item_name(kod)
local bulunan = pc.count_item(kod)
local eksikhesapla = adet-bulunan
say("Malesef Envanterinde "..adet.." "..itemname.." Bulunmuyor!")
say("Envanterinde Toplam: "..bulunan.." adet "..itemname.." Var")
say("Envanterinde "..eksikhesapla.." Adet "..itemname.." Eksik !")
else
if get_time() < pc.getqf("next_timee") then
say(" Tekrar İtemine Vs Atabilmek İçin ")
say(" 1 Saat Beklemelisin ")
elseif pc.get_level() < 74 then
say(" Arenada dövüşebilmek için ")
say(" en az 75 olman gerekir. ")
else
say_title("İtemine Duello System")
say(" Arenaya hoşgeldin. ")
--local kontrol = mysql_query("SELECT *FROM player.item WHERE item.id = '"..itemid.."' ORDER BY item.attrtype0 DESC, item.attrvalue0 DESC, item.attrtype1 DESC, item.attrvalue1 DESC, item.attrtype2 DESC, item.attrvalue2 DESC, item.attrtype3 DESC, item.attrvalue3 DESC, item.attrtype4 DESC, item.attrvalue4 DESC ")
say(" Güzel İtemini Ortaya Koydun. ")
say("Şimdi Sıra Kendine Rakip Belirlemekte")
say("Size Bu Hizmeti Sağladığım İçin İkinizdende")
say("5M Alacağım Unutma! Bu Şartları Kabul Ediyorsan")
wait()
say(" Rakibinin Adını Yaz ")
local my_vid = pc.get_vid()
game.set_event_flag("myvid", myvid)
local rakip = input()
local u_vid = find_pc_by_name(rakip)
game.set_event_flag("rakipvid", u_vid)
local m_vid = pc.get_vid()
game.set_event_flag("duello_rakip", rakip)
if rakip == "" or rakip == pc.get_name() or u_vid == 0 then
say(" Bir Hata Oluştu Bunun sebebi")
say(" Gerekli Alanı Boş Bırakmış Olabilir Veya ")
say(" Kendi adınızı yazmış olabilirsiniz ")
return
elseif not npc.is_near_vid(u_vid,10) then
say(" "..rakip.." senden çok uzak ")
say(" Yoksa senden korktu mu ? ")
return
elseif npc.is_near_vid(u_vid,10) then
local old = pc.select(u_vid)
local u_level = pc.get_level()
local rakip_gold = pc.get_gold()
local u_sure = pc.getqf("next_timee")
pc.select(old)
local m_level = pc.get_level()
local param = pc.get_gold()
if m_level - u_level > 10 or u_level - m_level > 10 then
say(" "..rakip.." senden çok güçlü ")
say(" veya zayıf. ")
say(" Başka bir rakip bul kendine. ")
say(" Unutma Bu Senin İyiliğin İçin.")
return
else
if rakip_gold < 5000000 then
say(" Rakibinin yeterli parası yok. ")
else
pc.select(u_vid)
if pc.count_item (kod) < adet then
pc.select(m_vid)
say("Rakibinde Yeterli Miktarda İtem Yok.")
else
if param < 5000000 then
say(" Yeterli paran yok. (5M) ")
else
if get_time() < u_sure then
say(" Rakibin daha yeni ")
say(" arenayı kullanmış. ")
return
else
pc.select(m_vid)
local yaziyazak = item_name(kod)
local teklif = confirm(u_vid, pc.name.." ile ["..yaziyazak.." "..adet.."x]'e dövüşmek istiyor musun ?",30)
if teklif == CONFIRM_OK then
local old = pc.select(u_vid)
pc.setqf("iteminevsdurum",1)
pc.setqf("next_time", get_time() + 3600 * 1)
pc.setqf("iteminevsdurum",1)
pc.change_gold(-5000000)
pc.remove_item(kod,adet)
pc.select(old)
local m_name = pc.name
pc.setqf("iteminevsdurum",1)
pc.setqf("next_time", get_time() + 3600 * 1)
pc.setqf("iteminevsdurum",1)
pc.change_gold(-5000000)
pc.remove_item(kod,adet)
say("")
say(" "..rakip.. " İtemine dövüşü kabul etti. ")
say("")
wait()
setskin(NOWINDOW)
notice_all(" "..rakip.." ile "..pc.name.. " İtemine Dövüşe Başlıyor ")
pc.select(u_vid)
command("pvp "..m_vid)
pc.select(m_vid)
command("pvp "..u_vid)
else
say("")
say(" "..rakip.. " Arenaya çağrını redetti. ")
end
end
end
end
end
end
end
end
end
end
when kill with npc.is_pc() and pc.getqf("iteminevsdurum") == 1 begin
pc.setqf("raund",pc.getqf("raund")+1)
if pc.getqf("raund") == 1 then
notice_big(" Tebrikler Rakibini Başarıyla Yendin. ")
notice_big(" Bende Sana Hak Ettiğin Ödülü Veriyorum. ")
pc.give_item2(game.get_event_flag("iteminevs_price_vnum"), game.get_event_flag("iteminevs_price_count"))
pc.give_item2(game.get_event_flag("iteminevs_price_vnum"), game.get_event_flag("iteminevs_price_count"))
pc.setqf("iteminevsdurum",0)
pc.setqf("raund",0)
pc.select(game.get_event_flag("rakipvid"))
pc.setqf("iteminevsdurum",0)
pc.setqf("raund",0)
pc.select(game.get_event_flag("myvid"))
pc.setqf("iteminevsdurum",0)
pc.setqf("raund",0)
end
end
end
endAnlatım ;
Kodları alıp bir txt içine kaydedin daha sonra uzantısını .lua olarak değiştirin
- cd /usr/game/share/locale/turkey/quest Klasörüne atın
- ./qc isim.lua
Yazın reboot atın hazır.
Güle güle kullanın bir teşekkür yeterli.
kaynak:mt2dosyalar
0 yorum:
Yorum Gönder