Ayyıldız2 | 2008 TR Yapısı • 1-99 Orta Emek Destan • Oto Avsız • 10 Temmuz 21:00 HEMEN TIKLA!
Selam arkadaşlar bu filesi kulanıyorum
https://forum.turkmmo.com/konu/3825968-1-99-gelismis-old-scholl-tarzi-server-files-gelistirmeye-acik-red2game/ sorunum yönetim paneli questi açılmıyor quest içi kodlar
quest akira_event_sys begin
state start begin
when letter with pc.is_gm() begin
send_letter("Yönetim Paneli")
end
when button or info begin
say_white("Yönetim Paneli")
local event_name = akira_event_sys.AkiraEventList(0)
local event_flag = akira_event_sys.AkiraEventList(1)
local confirm = select("Etkinlikler ", "İptal ")
if confirm == 2 then
return
send_letter("Yönetim Paneli")
end
if confirm == 1 then
say_white("Yönetim Paneli -> Etkinlikler: ")
say_reward("Ne yapmak istiyorsun? ")
local confirm = select("Aktif Etkinlikler ", "Etkinlik Başlat ", "Otomatik Etkinlik", "İptal ")
if confirm == 4 then
return
send_letter("Yönetim Paneli")
end
if confirm == 1 then
say_size(350,350)
say_white("Yönetim Paneli -> Aktif Etkinlikler: ")
local event_name_list = {}
local event_flag_list = {}
for i=1, table.getn(event_flag) do
if event_flag[i] == "auto_event" then
break
end
if game.get_event_flag(event_flag[i]) == 1 then
table.insert(event_name_list, event_name[i])
table.insert(event_flag_list, event_flag[i])
end
end
if table.getn(event_name_list) == 0 then
say_reward("Aktif etkinlik bulunmuyor.")
return
end
say_reward("Bitirmek istediğin etkinliği seç.")
table.insert(event_name_list, "İptal")
local list = select_table(event_name_list)
if list == table.getn(event_name_list)then
return
send_letter("Yönetim Paneli")
end
say_white("Yönetim Paneli -> Aktif Etkinlikler: ")
say_white(event_name_list[list].." kapatıyorsun.")
say_reward("Devam etmek istediğine eminmisin? ")
local confirm = select("Evet ", "Hayır ")
if confirm == 2 then
return
send_letter("Yönetim Paneli")
end
akira_event_sys.AkiraEventSys(0, event_name_list[list], event_flag_list[list])
send_letter("Yönetim Paneli")
elseif confirm == 2 then
say_size(350,350)
say_white("Yönetim Paneli -> Etkinlik Başlat: ")
local event_name_list = {}
local event_flag_list = {}
for i=1, table.getn(event_flag) do
if event_flag[i] == "auto_event" then
break
end
if game.get_event_flag(event_flag[i]) == 0 then
table.insert(event_name_list, event_name[i])
table.insert(event_flag_list, event_flag[i])
end
end
if table.getn(event_name_list) == 0 then
say_reward("Etkinliklerin hepsi zaten aktif.")
return
end
say_reward("Başlatmak istediğin etkinliği seç.")
table.insert(event_name_list, "İptal")
local list = select_table(event_name_list)
if list == table.getn(event_name_list)then
return
send_letter("Yönetim Paneli")
end
say_white("Yönetim Paneli -> Etkinlik Başlat: ")
say_white(event_name_list[list].." başlatıyorsun.")
say_reward("Devam etmek istediğine eminmisin? ")
local confirm = select("Evet ", "Hayır ")
if confirm == 2 then
return
send_letter("Yönetim Paneli")
end
akira_event_sys.AkiraEventSys(1, event_name_list[list], event_flag_list[list])
send_letter("Yönetim Paneli")
elseif confirm == 3 then
say_white("Yönetim Paneli -> Otomatik Etkinlik: ")
say_reward("Ne yapmak istiyorsun? ")
local confirm = select("Etkinlikleri Başlat ", "Etkinlikleri Bitir ", "İptal")
if confirm == 3 then
return
send_letter("Yönetim Paneli")
end
if confirm == 1 then
if game.get_event_flag("auto_event") == 1 then
say_white("Yönetim Paneli -> Otomatik Etkinlik: ")
say_reward("Otomatik etkinlik sistemi zaten aktif.")
return
send_letter("Yönetim Paneli")
end
say_white("Etkinlikleri otomatik olarak başlatıyorsun. ")
say_reward("Devam etmek istediğine eminmisin? ")
local confirm = select("Evet ", "Hayır ")
if confirm == 2 then
return
send_letter("Yönetim Paneli")
end
game.set_event_flag("auto_event",1)
clear_server_timer("auto_event")
server_loop_timer("auto_event",1)
elseif confirm == 2 then
say_white("Otomatik etkinlikleri kapatıyorsun. ")
say_reward("Devam etmek istediğine eminmisin? ")
local confirm = select("Evet ", "Hayır ")
if confirm == 2 then
return
send_letter("Yönetim Paneli")
end
game.set_event_flag("auto_event",0)
clear_server_timer("auto_event")
end
send_letter("Yönetim Paneli")
end
end
end
-- Server To Client
when login begin
event_flag = akira_event_sys.AkiraEventList(1)
event_name = akira_event_sys.AkiraEventList(0)
for i=1, table.getn(event_flag) do
if event_flag[i] == "auto_event" then
if game.get_event_flag("auto_event") == 1 then
for j=1, 7 do
auto_event_setting = akira_event_sys.AkiraEventList(2)
if j == 7 then
cmdchat("AkiraEventSys auto_event|"..tostring(j-1).."|"..auto_event_setting[0][5].."|"..auto_event_setting[0][6].."|"..auto_event_setting[0][3].."|")
else
cmdchat("AkiraEventSys auto_event|"..tostring(j-1).."|"..auto_event_setting[j][5].."|"..auto_event_setting[j][6].."|"..auto_event_setting[j][3].."|")
end
end
end
end
if event_flag[i] != "auto_event" and game.get_event_flag(event_flag[i]) == 1 then
notice(event_name[i].."aktif!")
notice("Gerekli bilgileri sağ üstteki event penceresinden alabilirsiniz.")
cmdchat("AkiraEventSys event|"..event_flag[i].."|")
end
end
end
-- Server To Client End
-- Event Timer
when auto_event.server_timer begin
auto_event_setting = akira_event_sys.AkiraEventList(2)
local day = tonumber(os.date("%w"))
local zaman = tostring(os.date("%X"))
if auto_event_setting[day][1] == zaman then
akira_event_sys.AkiraEventSys(1, auto_event_setting[day][4], auto_event_setting[day][3])
elseif auto_event_setting[day][2] == zaman then
akira_event_sys.AkiraEventSys(0, auto_event_setting[day][4], auto_event_setting[day][3])
end
end
-- Event Timer End
-- Item Drop
when kill with not npc.is_pc() begin
event_flag = akira_event_sys.AkiraEventList(1)
event_setting = akira_event_sys.AkiraEventList(3)
for i=1, table.getn(event_flag) do
if event_flag[i] != "kostum" and event_flag[i] != "auto_event" and "sertifika" != event_flag[i] and "kuzeykutusu" != event_flag[i] and game.get_event_flag(event_flag[i]) == 1 then
if npc.get_level() >= pc.get_level() - 10 then
if event_setting[event_flag[i]][1] >= number(1, 150) then
game.drop_item_with_ownership(number(event_setting[event_flag[i]][2],event_setting[event_flag[i]][3]), 1)
end
end
end
end
end
--Futbol topu
when 50096.use begin
syschat("Futbol topunu yalnizca Altin Futbol Topu iken acabilirsin. ")
syschat("Topladiginiz futbol toplari 30 adet oldugunda bir sonra ki isinlanmanizda Altin Futbol topuna donusur. ")
syschat("Topladiginiz Futbol toplarinizi Altin Futbol Topu yapmak icin baska bir haritaya isinlanin. ")
end
when kill or login or logout or levelup begin
if pc.count_item(50096) >= 30 then
pc.remove_item(50096, 30)
pc.give_item2(50265)
end
end
--Futbol topu
--Kostüm
when 8006.kill or 8007.kill or 8008.kill or 8009.kill or
8010.kill or 8011.kill or 8012.kill or 8013.kill or
8014.kill or 8024.kill or 8025.kill or 8026.kill or
8027.kill or 8051.kill or 8052.kill or 8053.kill or
8054.kill or 8055.kill or 8056.kill or 8057.kill or
8058.kill with game.get_event_flag("kostum") == 1 begin
local plvl = pc.get_level()
local mlvl
local chance = number(1,10)
local vnumlist_m = {41041,41043,41045,41049,41051,41053,41095,41097,41099,41101,41103,41105,41107,41109,41111,41113}
local vnumlist_w = {41042,41044,41046,41050,41052,41054,41096,41098,41100,41102,41104,41106,41108,41110,41112,41114}
local drop = number(1,16)
if npc.get_race() < 8015 then
mlvl = (npc.get_race()-8000)*5
else
mlvl = (npc.get_race()-8009)*5
end
if mlvl-plvl >= -10 then
if chance*10 == 100 then
if pc.get_sex() == 1 then
game.drop_item_with_ownership(vnumlist_w[drop],1)
else
game.drop_item_with_ownership(vnumlist_m[drop],1)
end
end
end
end
--Kostüm
--Sertifika
when 691.kill or 791.kill or 792.kill or 1192.kill or 1304.kill or
1901.kill or 2091.kill or 2191.kill or 2206.kill or 2306.kill or
2595.kill or 2596.kill or 3090.kill or 3091.kill or 3190.kill or
3191.kill or 3290.kill or 3291.kill or 3390.kill or 3391.kill or
3490.kill or 3491.kill or 3590.kill or 3591.kill or 3595.kill or
3596.kill or 3690.kill or 3691.kill or 3790.kill or 3791.kill or
3890.kill or 3891.kill or 3901.kill or 3902.kill or 3903.kill or
3904.kill or 3905.kill or 3906.kill or 8001.kill or 8002.kill or
8003.kill or 8004.kill or 8005.kill or 8006.kill or 8007.kill or
8008.kill or 8009.kill or 8010.kill or 8011.kill or 8012.kill or
8013.kill or 8014.kill or 8024.kill or 8025.kill or 8026.kill or
8027.kill or 8051.kill or 8052.kill or 8053.kill or 8054.kill or
8055.kill or 8056.kill with game.get_event_flag("sertifika") == 1 and not npc.is_pc() begin
local event_setting = akira_event_sys.AkiraEventList(3)
if npc.get_level() >= pc.get_level() - 10 then
if event_setting["sertifika"][1] >= number(1, 100) then
local random_ = number(event_setting["sertifika"][2],event_setting["sertifika"][3])
notice(""..item_name(random_).." buldum! ")
game.drop_item_with_ownership(random_, 1)
end
end
end
--Sertifika
--Kuzey Kutusu
when 691.kill or 791.kill or 792.kill or 1192.kill or 1304.kill or
1901.kill or 2091.kill or 2191.kill or 2206.kill or 2306.kill or
2595.kill or 2596.kill or 3090.kill or 3091.kill or 3190.kill or
3191.kill or 3290.kill or 3291.kill or 3390.kill or 3391.kill or
3490.kill or 3491.kill or 3590.kill or 3591.kill or 3595.kill or
3596.kill or 3690.kill or 3691.kill or 3790.kill or 3791.kill or
3890.kill or 3891.kill or 3901.kill or 3902.kill or 3903.kill or
3904.kill or 3905.kill or 3906.kill or 8001.kill or 8002.kill or
8003.kill or 8004.kill or 8005.kill or 8006.kill or 8007.kill or
8008.kill or 8009.kill or 8010.kill or 8011.kill or 8012.kill or
8013.kill or 8014.kill or 8024.kill or 8025.kill or 8026.kill or
8027.kill or 8051.kill or 8052.kill or 8053.kill or 8054.kill or
8055.kill or 8056.kill with game.get_event_flag("kuzeykutusu") == 1 and not npc.is_pc() begin
local event_setting = akira_event_sys.AkiraEventList(3)
if npc.get_level() >= pc.get_level() - 10 then
if event_setting["kuzeykutusu"][1] >= number(1, 350) then
local random_ = number(event_setting["kuzeykutusu"][2],event_setting["kuzeykutusu"][3])
notice(""..item_name(random_).." buldum! ")
game.drop_item_with_ownership(random_, 1)
end
end
end
--Kuzey Kutusu
-- Item Drop End
--Function
function AkiraEventList(type)
event_list = {
[0] = {"Ayışığı Etkinliği ", "Futbol Topu Etkinliği ", "Paskalya Etkinliği ", "Kostüm Etkinliği ", "Okey Etkinliği ", "Sertifika Etkinliği ", "Kuzey Kutusu Etkinliği "},
[1] = {"ayisigi", "futboltopu", "paskalya", "kostum", "okey","sertifika", "kuzeykutusu", "auto_event"},
[2] = { [0] = {"21:25:00", "21:35:00", "kuzeykutusu", "Kuzey Kutusu Etkinliği ", "21:25", "21:35"},--Pazar
[1] = {"15:40:00", "22:00:00", "ayisigi", "Ayışığı Etkinliği ", "15:40", "22:00"},
[2] = {"20:00:00", "22:00:00", "futboltopu", "Futbol Topu Etkinliği ", "20:00", "22:00"},
[3] = {"20:00:00", "22:00:00", "paskalya", "Paskalya Etkinliği ", "20:00", "22:00"},
[4] = {"20:00:00", "22:00:00", "kostum", "Kostüm Etkinliği ", "20:00", "22:00"},
[5] = {"15:42:00", "22:00:00", "okey", "Okey Etkinliği ", "15:42", "22:00"},
[6] = {"20:00:00", "22:00:00", "sertifika", "Sertifika Etkinliği ", "20:00", "22:00"}, },
[3] = { ["ayisigi"] = {2, 50011, 50011},
["futboltopu"] = {2, 50096, 50096},
["paskalya"] = {5, 50160, 50179},
["okey"] = {3, 79505, 79505},
["sertifika"] = {1, 52701, 52705},
["kuzeykutusu"] = {1, 38057, 38057},}, }
return event_list[type]
end
function AkiraEventSys(type_, event_name, event_flag)
if type_ == 1 then
notice_all(event_name.."başladı!")
notice_all("Gerekli bilgileri sağ üstteki event penceresinden alabilirsiniz.")
game.set_event_flag(event_flag,1)
else
notice_all(event_name.."sona erdi!")
notice_all("Yönetim ekibi iyi oyunlar diler.")
game.set_event_flag(event_flag,0)
end
end
--Function End
end
end
