Yeni Quest I Kelle Avcısı

[SeumonDizayn]

ROHAN2 WORLD 1-120 TR TİPİ OFFICIAL YOHARA, BALATHOR VE AMON! 80. GÜNÜNDE! +10.000 ONLİNE! HİLE VE BOT %100 ENGELLİ HEMEN TIKLA!

OYUNCU 20095 KODLU NPCDEN (DEĞİŞTİRİLEBİLİR) KELLE AVCILIĞINI SEÇER.

BELİRLEDİĞİ OYUNCU İSMİNİ GİRER VE ÖDÜL KOYAR.

BELİRLEDİĞİ KİŞİYİ İLK ÖLDÜREN OYUNCUYA KELLE AVCILIĞINI BAŞLATAN OYUNCUDAN ÖDÜL AKTARILIR.

OYUNCU KENDİSİNE ÖDÜL KOYAMAZ VEYA KENDİSİ ÖDÜL ALAMAZ.

​

[CODE title="kelle_avciligi.quest"]quest kelle_avciligi begin
state start begin
when 20095.chat."SeumonDizayn - Kelle Avcısı" begin
say_title("SeumonDizayn - Kelle Avcısı")
local s = select("Ödül Koy", "Kapat")

if s == 1 then
say_title("SeumonDizayn - Kelle Avcısı")
say("Hedef oyuncu ismi:")
local hedef_isim = string.gsub(input(), "[^A-Za-z0-9]", "")
local hedef_vid = find_pc_by_name(hedef_isim)

if hedef_vid == 0 then
say_reward("Hata: Oyuncu çevrimiçi değil.")
return
elseif hedef_isim == pc.get_name() then
say_reward("Hata: Kendi başına ödül koyamazsın.")
return
end

say_title("SeumonDizayn - Kelle Avcısı")
say("Ödül miktarı (Min: 10M - Max: 500M):")
local odul = tonumber(input())

if odul == nil or odul < 10000000 or odul > 500000000 then
say_reward("Hata: Geçersiz miktar.")
return
end

if pc.get_gold() < odul then
say_reward("Hata: Paran yetersiz.")
return
end

pc.change_gold(-odul)
game.set_event_flag("kelle_"..hedef_isim, odul)
game.set_event_flag("kelle_koyan_"..hedef_isim, pc.get_player_id())

notice_all("SeumonDizayn: " .. hedef_isim .. " başına " .. odul .. " Yang ödül kondu!")
syschat("Ödül başarıyla ilan edildi.")
end
end

when kill begin
if npc.is_pc() then
local kurban = pc.get_name()
local katil_id = pc.get_player_id()
local kelle_odul = game.get_event_flag("kelle_"..kurban)

if kelle_odul > 0 then
local koyan_id = game.get_event_flag("kelle_koyan_"..kurban)

if katil_id == koyan_id then
syschat("SeumonDizayn: Kendi koyduğun ödülü alamazsın.")
return
end

pc.change_gold(kelle_odul)
game.set_event_flag("kelle_"..kurban, 0)
game.set_event_flag("kelle_koyan_"..kurban, 0)

notice_all("SeumonDizayn: " .. pc.get_name() .. ", " .. kurban .. " adlı oyuncuyu infaz etti ve " .. kelle_odul .. " Yang kazandı!")
end
end
end
end
end[/CODE]

 

[Son1Dem]

PAYLAŞIM İÇİN TEŞEKKÜRLER,ELİNE SAĞLIK.​

 

[Nizam-ı Alem]

eline sağlık paylaşım için teşekkürler.

 

[CoderPia]

OYUNCU 20095 KODLU NPCDEN (DEĞİŞTİRİLEBİLİR) KELLE AVCILIĞINI SEÇER.

BELİRLEDİĞİ OYUNCU İSMİNİ GİRER VE ÖDÜL KOYAR.

BELİRLEDİĞİ KİŞİYİ İLK ÖLDÜREN OYUNCUYA KELLE AVCILIĞINI BAŞLATAN OYUNCUDAN ÖDÜL AKTARILIR.

OYUNCU KENDİSİNE ÖDÜL KOYAMAZ VEYA KENDİSİ ÖDÜL ALAMAZ.

​

[CODE title="kelle_avciligi.quest"]quest kelle_avciligi begin
state start begin
when 20095.chat."SeumonDizayn - Kelle Avcısı" begin
say_title("SeumonDizayn - Kelle Avcısı")
local s = select("Ödül Koy", "Kapat")

if s == 1 then
say_title("SeumonDizayn - Kelle Avcısı")
say("Hedef oyuncu ismi:")
local hedef_isim = string.gsub(input(), "[^A-Za-z0-9]", "")
local hedef_vid = find_pc_by_name(hedef_isim)

if hedef_vid == 0 then
say_reward("Hata: Oyuncu çevrimiçi değil.")
return
elseif hedef_isim == pc.get_name() then
say_reward("Hata: Kendi başına ödül koyamazsın.")
return
end

say_title("SeumonDizayn - Kelle Avcısı")
say("Ödül miktarı (Min: 10M - Max: 500M):")
local odul = tonumber(input())

if odul == nil or odul < 10000000 or odul > 500000000 then
say_reward("Hata: Geçersiz miktar.")
return
end

if pc.get_gold() < odul then
say_reward("Hata: Paran yetersiz.")
return
end

pc.change_gold(-odul)
game.set_event_flag("kelle_"..hedef_isim, odul)
game.set_event_flag("kelle_koyan_"..hedef_isim, pc.get_player_id())

notice_all("SeumonDizayn: " .. hedef_isim .. " başına " .. odul .. " Yang ödül kondu!")
syschat("Ödül başarıyla ilan edildi.")
end
end

when kill begin
if npc.is_pc() then
local kurban = pc.get_name()
local katil_id = pc.get_player_id()
local kelle_odul = game.get_event_flag("kelle_"..kurban)

if kelle_odul > 0 then
local koyan_id = game.get_event_flag("kelle_koyan_"..kurban)

if katil_id == koyan_id then
syschat("SeumonDizayn: Kendi koyduğun ödülü alamazsın.")
return
end

pc.change_gold(kelle_odul)
game.set_event_flag("kelle_"..kurban, 0)
game.set_event_flag("kelle_koyan_"..kurban, 0)

notice_all("SeumonDizayn: " .. pc.get_name() .. ", " .. kurban .. " adlı oyuncuyu infaz etti ve " .. kelle_odul .. " Yang kazandı!")
end
end
end
end
end[/CODE]

Paylaşım için teşekkürler

 

[Lorenzo]

Paylaşım için teşekkürler