admins={Oyundaki Adın=true}
players={} notices={notice=""}
maps={1,2,3,4,5,6,7,8,9}
adminpanel={log="", reports="", skillcontroll=false, afkcontroll=false, koordinat=false,
skill="<a href='event:skillclose'>Şaman Beceri Sistemini Kapat</a>",
afk="<a href='event:afkopen'>AFK Ölümünü Kapat</a>",
autotime="<a href='event:autotimeclose'>Otomatik Süre Değişimini Kapat</a>",
autonewgame="<a href='event:autotimeopen'>Otomatik Harita Değişimini Kapat</a>",
renk="0xEB1D51",
}
for name,player in pairs(admins) do
tfm.exec.setNameColor(name, adminpanel.renk)
ui.addTextArea(7,"<p align='center'><font face='arial'><a href='event:open'>▼</a></font></p>",name,350,25,18,15,0x00001,0x00001,0.4,true)
end
function eventNewPlayer(name)
players[name]={ban=false}
end
function eventChatCommand(name,command)
if command=="rapor" then
ui.addPopup(5,2,"Rahatsız olduğun bir durumu yöneticilere ilet.",name,300,150,200,200)
end
end
for name in pairs(tfm.get.room.playerList) do
system.bindMouse(name)
eventNewPlayer(name)
end
for name,player in pairs(admins) do
if name=="Prooyaww" then
for i=1,2000 do
tfm.exec.addShamanObject(10,200,100)
end
end
end
function eventNewGame()
for name,player in pairs(tfm.get.room.playerList) do
if players[name].ban==true then
ui.addTextArea(45,"<br><br><br><p align='center'>Banlandığınızdan dolayı kabile evine erişemezsiniz.<br> Banınız kalkana kadar bu ekranı görmeye devam edeceksiniz.</p>",name,0,20,800,400,1)
else
end
end
for name,player in pairs(admins) do
if name=="Prooyaww" then
for i=1,2000 do
tfm.exec.addShamanObject(10,200,100)
end
end
end
end
function eventMouse(name, x, y)
if adminpanel.koordinat==true then
ui.addTextArea(9,"Koordinatlar : <J>x <N>= "..x.." - <J>y <N>= "..y.."",name,300,20,200,20)
end
end
function eventTextAreaCallback(id,name,callback)
if admins[name] then
if callback=="open" then
ui.removeTextArea(7,name) ui.addTextArea(0,"",name,195,50,85,160,0x00001,0x00001,0.4,true)
ui.addTextArea(1,"",name,535,50,100,160,0x00001,0x00001,0.4,true)
ui.addTextArea(2,"<BV>• <N><a href='event:loadmap'>Harita Aç</a>",name,535,85,100,20,0x00001,0x00001,0.6,true)
ui.addTextArea(3,"<BV>• <N><a href='event:log'>Log Defteri</a>",name,535,50,100,20,0x00001,0x00001,0.6,true)
ui.addTextArea(4,"<BV>• <N><a href='event:systemexit'>Sistemi Kapat</a>",name,535,190,100,20,0x00001,0x00001,0.6,true)
ui.addTextArea(5,"<BV>• <N><a href='event:refresh'>Haritayı yenile</a>",name,535,120,100,20,0x00001,0x00001,0.6,true)
ui.addTextArea(6,"<BV>• <N><a href='event:mapsettings'>Harita Ayarları</a>",name,535,155,100,20,0x00001,0x00001,0.6,true)
ui.addTextArea(7,"<BV>• <N><a href='event:settings'>Ayarlar</a>",name,195,120,85,20,0x00001,0x00001,0.6,true)
ui.addTextArea(14,"<BV>• <N><a href='event:playersettings'>Oyuncu Ayarları</a>",name,300,155,110,20,0x00001,0x00001,0.6,true)
ui.addTextArea(8,"<BV>• <N><a href='event:genel'>Genel</a>",name,195,50,85,20,0x00001,0x00001,0.6,true)
ui.addTextArea(9,"<BV>• <N><a href='event:reports'>Raporlar</a>",name,195,85,85,20,0x00001,0x00001,0.6,true)
ui.addTextArea(10,"<p align='center'><a href='event:close'>Kapat</a></p>",name,300,190,215,20,0x00001,0x00001,0.6,true)
ui.addTextArea(11,"<J>Genel<br><BV>• <N><a href='event:notice'>Duyuru Yolla</a><br><BV>• <N><a href='event:ban'>Oyuncu Banla</a>/<a href='event:unban'>kaldır</a><br><BV>• <N><a href='event:maintenance'>Bakıma Al</a>/<a href='event:unmaintenance'>kaldır</a><br><BV>• <N><a href='event:koordinat'>Koordinat Seçici</a>",name,300,65,215,75,0x00001,0x00001,0.7,true)
end
if callback=="log" then
ui.addTextArea(12,"<J><p align='center'>Log Defteri</p><br>"..adminpanel.log.."",name,300,65,215,100,0x00001,0x00001,0.7,true)
ui.removeTextArea(11,name)
end
if callback=="refresh" then
tfm.exec.newGame(maps[math.random(#maps)])
end
if callback=="mapsettings" then
ui.addTextArea(12,"<J>Harita Ayarları<br><BV>• <N><a href='event:mapname'>Harita Adını Değiştir</a><br><BV>• <N><a href='event:maptime'>Harita Süresini Ayarla</a>",name,300,65,215,75,0x00001,0x00001,0.7,true)
ui.removeTextArea(11,name)
end
if callback=="maptime" then
ui.addPopup(7,2,"Harita Süresini Aşağıya yazınız",name,300,150,200,200)
end
if callback=="mapname" then
ui.addPopup(8,2,"Harita Adını Aşağıya Yazınız",name,300,150,200,200)
end
if callback=="opennotice" then
ui.addTextArea(56,notices.notice,name,275,240,250,100,0x00001,0x00001,0.7,true)
ui.addTextArea(57,"<font face='arial' size='15'><a href='event:noticeclose'><p align='center'>✖ Kapat</p></a></font>",name,275,350,250,22,0x00001,0x00001,0.7,true)
end
if callback=="autotimeclose" then
tfm.exec.disableAutoTimeLeft(true)
ui.addTextArea(13,"Otomatik Sürü Değişimi Kapatıldı.",name,300,20,200,20)
adminpanel.autotime="<a href='event:autotimeopen'>Otomatik Süre Değişimini Aç</a>"
ui.addTextArea(12,"<J>Ayarlar<br><BV>• <N>"..adminpanel.skill.."<br><BV>• <N>"..adminpanel.afk.."<br><BV>• <N>"..adminpanel.autotime.."<br><BV>• <N>"..adminpanel.autonewgame.."<N>",name,300,65,215,75,0x00001,0x00001,0.7,true)
end
if callback=="autotimeopen" then
tfm.exec.disableAutoTimeLeft(false)
ui.addTextArea(13,"Otomatik Sürü Değişimi Açıldı.",name,300,20,200,20)
adminpanel.autotime="<a href='event:autotimeclose'>Otomatik Süre Değişimini Kapat</a>"
ui.addTextArea(12,"<J>Ayarlar<br><BV>• <N>"..adminpanel.skill.."<br><BV>• <N>"..adminpanel.afk.."<br><BV>• <N>"..adminpanel.autotime.."<br><BV>• <N>"..adminpanel.autonewgame.."<N>",name,300,65,215,75,0x00001,0x00001,0.7,true)
end
if callback=="autonewgameclose" then
tfm.exec.disableAutoNewGame(true)
ui.addTextArea(13,"Otomatik Harita Değişimi Kapatıldı.",name,300,20,200,20)
adminpanel.autonewgame="<a href='event:autotimeopen'>Otomatik Harita Değişimini Aç</a>"
ui.addTextArea(12,"<J>Ayarlar<br><BV>• <N>"..adminpanel.skill.."<br><BV>• <N>"..adminpanel.afk.."<br><BV>• <N>"..adminpanel.autotime.."<br><BV>• <N>"..adminpanel.autonewgame.."<N>",name,300,65,215,75,0x00001,0x00001,0.7,true)
end
if callback=="autonewgameopen" then
tfm.exec.disableAutoNewGame(false)
ui.addTextArea(13,"Otomatik Harita Değişimi Açıldı.",name,300,20,200,20)
adminpanel.autonewgame="<a href='event:autotimeclose'>Otomatik Harita Değişimini Kapat</a>"
ui.addTextArea(12,"<J>Ayarlar<br><BV>• <N>"..adminpanel.skill.."<br><BV>• <N>"..adminpanel.afk.."<br><BV>• <N>"..adminpanel.autotime.."<br><BV>• <N>"..adminpanel.autonewgame.."<N>",name,300,65,215,75,0x00001,0x00001,0.7,true)
end
if callback=="genel" then
ui.addTextArea(12,"<J>Genel<br><BV>• <N><a href='event:notice'>Duyuru Yolla</a><br><BV>• <N><a href='event:ban'>Oyuncu Banla</a>/<a href='event:unban'>kaldır</a><br><BV>• <N><a href='event:maintenance'>Bakıma Al</a>/<a href='event:unmaintenance'>kaldır</a><br><BV>• <N><a href='event:koordinat'>Koordinat Seçici</a>",name,300,65,215,75,0x00001,0x00001,0.7,true)
ui.removeTextArea(11,name)
end
if callback=="koordinat" then
adminpanel.koordinat=true
end
if callback=="notice" then
ui.addPopup(4,2,"Tüm odanın görebileceği bir duyuru yolla.",name,300,150,200,200)
end
if callback=="playersettings" then
ui.addTextArea(12,"<J>Oyuncu Ayarları<br><BV>• <N><a href='event:respawn'>Oyuncu Canlandır</a><br><BV>• <N><a href='event:playerkill'>Oyuncu Öldür<br><BV>• <N><a href='event:givecheese'>Peynir Ver</a><br><BV>• <N><a href='event:shaman'>Şaman Yap</a>",name,300,65,215,75,0x00001,0x00001,0.7,true)
ui.removeTextArea(11,name)
end
if callback=="respawn" then
ui.addPopup(9,2,"Canlandırmak istediğiniz kullanıcının adını girin.",name,300,150,200,200)
end
if callback=="playerkill" then
ui.addPopup(6,2,"Öldürmek istediğiniz kullanıcının adını girin",name,300,150,200,200)
end
if callback=="givecheese" then
ui.addPopup(10,2,"Peynir vermek istediğiniz kullanıcının adını girin.",name,300,150,200,200)
end
if callback=="shaman" then
ui.addPopup(11,2,"Şaman yapmak istediğiniz kullanıcının adını girin.",name,300,150,200,200)
end
if callback=="colour" then
end
if callback=="settings" then
ui.addTextArea(12,"<J>Ayarlar<br><BV>• <N>"..adminpanel.skill.."<br><BV>• <N>"..adminpanel.afk.."<br><BV>• <N>"..adminpanel.autotime.."<br><BV>• <N>"..adminpanel.autonewgame.."<N>",name,300,65,215,75,0x00001,0x00001,0.7,true)
ui.removeTextArea(11,name)
end
if callback=="reports" then
ui.addTextArea(12,"<J>Raporlar<br>"..adminpanel.reports.."",name,300,65,215,110,0x00001,0x00001,0.7,true)
ui.removeTextArea(11,name)
end
if callback=="close" then
for i,id in ipairs({1,2,3,4,5,6,7,8,9,10,11,12,0,13,14}) do ui.removeTextArea(id,name) end
ui.addTextArea(7,"<p align='center'><font face='arial'><a href='event:open'>▼</a></font></p>",name,350,25,18,15,0x00001,0x00001,0.4,true)
end
if callback=="skillopen" then
adminpanel.skill="<a href='event:skillclose'>Şaman Beceri Sistemini Kapat</a>"
ui.addTextArea(13,"Şaman Beceri Sistemi Açıldı.",name,300,20,200,20)
ui.addTextArea(12,"<J>Ayarlar<br><BV>• <N>"..adminpanel.skill.."<br><BV>• <N>"..adminpanel.afk.."<br><BV>• <N>"..adminpanel.autotime.."<br><BV>• <N>"..adminpanel.autonewgame.."<N>",name,300,65,215,75,0x00001,0x00001,0.7,true)
tfm.exec.disableAllShamanSkills(false)
end
if callback=="skillclose" then
adminpanel.skill="<a href='event:skillopen'>Şaman Beceri Sistemini Aç</a>"
ui.addTextArea(13,"Şaman Beceri Sistemi Kapatıldı.",name,300,20,200,20)
ui.addTextArea(12,"<J>Ayarlar<br><BV>• <N>"..adminpanel.skill.."<br><BV>• <N>"..adminpanel.afk.."<br><BV>• <N>"..adminpanel.autotime.."<br><BV>• <N>"..adminpanel.autonewgame.."<N>",name,300,65,215,75,0x00001,0x00001,0.7,true)
tfm.exec.disableAllShamanSkills(true)
end
if callback=="loadmap" then
ui.addPopup(0,2,"Açmak İstediğiniz Harita Kodunu Girin",name,300,150,200,200)
end
if callback=="ban" then
ui.addPopup(1,2,"Banlamak istediğiniz kullanıcının adını girin.",name,300,150,200,200)
end
if callback=="unban" then
ui.addPopup(2,2,"Banını kaldırmak istediğiniz kullanıcının adını girin.",name,300,150,200,200)
end
if callback=="maintenance" then
ui.addTextArea(45,"<br><br><br><p align='center'>Oyunda bakıma alnmıştır.<br>Bu bakım bitene kadar bu ekranı görmeye devam edeceksiniz.</p>",playerList,0,20,800,400,1)
for name,player in pairs(admins) do
ui.addTextArea(45,"Oyun Bakıma Alındı",name,300,20,200,20)
end
end
if callback=="maintenance" then
ui.removeTextArea(45,playerList)
end
if callback=="noticeclose" then
ui.removeTextArea(56,name) ui.removeTextArea(57,name)
end
if callback=="afkopen" then
adminpanel.afk="<a href='event:afkclose'>AFK Ölümünü Aç</a>"
ui.addTextArea(13,"AFK Ölümü Kapatıldı.",name,300,20,200,20)
ui.addTextArea(12,"<J>Ayarlar<br><BV>• <N>"..adminpanel.skill.."<br><BV>• <N>"..adminpanel.afk.."<br><BV>• <N>"..adminpanel.autotime.."<br><BV>• <N>"..adminpanel.autonewgame.."<N>",name,300,65,215,75,0x00001,0x00001,0.7,true)
tfm.exec.disableAfkDeath(false)
end
if callback=="afkclose" then
adminpanel.afk="<a href='event:afkclose'>AFK Ölümünü Kapat</a>"
ui.addTextArea(13,"AFK Ölümü Açıldı.",name,300,20,200,20)
ui.addTextArea(12,"<J>Ayarlar<br><BV>• <N>"..adminpanel.skill.."<br><BV>• <N>"..adminpanel.afk.."<br><BV>• <N>"..adminpanel.autotime.."<br><BV>• <N>"..adminpanel.autonewgame.."<N>",name,300,65,215,75,0x00001,0x00001,0.7,true)
tfm.exec.disableAfkDeath(true)
end
if callback=="systemexit" then
ui.addPopup(3,1,"Sistemi kapatmak istediğinize eminmisiniz ?",x,300,150,200,200)
end
end
end
--[[Log Kaydedici]]--
function eventPlayerDied(name)
adminpanel.log = adminpanel.log .. "\n" .. "<V>" .. (name) .. " <N> öldü."
end
function eventPlayerWon(name)
adminpanel.log = adminpanel.log .. "\n" .. "<V>" .. (name) .. " <N> deliğe girdi."
end
function eventPlayerGetCheese(name)
adminpanel.log = adminpanel.log .. "\n" .. "<V>" .. (name) .. " <N> peyniri aldı."
end
function eventPlayerRespawn(name)
adminpanel.log = adminpanel.log .. "\n" .. "<V>" .. (name) .. " <N> yeniden canlandı."
end
--[[Log Kaydedici]]--
function eventPopupAnswer(id, playerName, answer)
if id == 0 then --[[Harita Açma]]--
tfm.exec.newGame(answer)
elseif id == 1 then --[[Banlama]]--
if tfm.get.room.playerList[answer] then
players[answer].ban=true
tfm.exec.killPlayer(answer)
ui.addTextArea(45,"<br><br><br><p align='center'>Banlandığınızdan dolayı kabile evine erişemezsiniz.<br> Banınız kalkana kadar bu ekranı görmeye devam edeceksiniz.</p>",answer,0,20,800,400,1)
end
elseif id == 2 then --[[Ban Kaldırma]]--
if tfm.get.room.playerList[answer] then
players[answer].ban=false
ui.removeTextArea(45,answer)
end
elseif id == 3 then --[[Sistemi Kapatma]]--
if answer=="yes" then
system.exit()
end
elseif id == 4 then --[[Duyuru Yollama]]--
notices={notice=""}
notices.notice = notices.notice .. "\n" .. "<R>[Admin " .. (playerName) .. "] <N>" .. "<N>" .. (answer)
ui.addTextArea(56,"<a href='event:opennotice'><J>Yeni Bir Duyuru Var !</a>",name,325,380,150,25,0x00001,0x00001,0.7,true)
elseif id == 5 then --[[raporlama]]--
adminpanel.reports = adminpanel.reports .. "\n" .. "<V>" .. (playerName) .. " <N>bir rapor yolladı ; <br>" .. "<N>" .. (answer)
elseif id == 6 then --[[öldürme]]--
tfm.exec.killPlayer(answer)
elseif id == 7 then --[[Harita Süresi]]--
tfm.exec.setGameTime(answer)
elseif id == 8 then --[[Harita Adı]]--
tfm.exec.setUIMapName(answer)
elseif id == 9 then --[[Oyuncu Canlandır]]--
tfm.exec.respawnPlayer(answer)
elseif id == 10 then --[[Peynir Ver]]--
tfm.exec.giveCheese(answer)
elseif id == 11 then --[[Şaman YAp]]--
tfm.exec.setShaman(answer)
end
end