[İNDİR] Özel Tag Oluşturma Sistemi

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı #Serius

  • Uzman Üye
  • *
    • İleti: 685
: 03 Ağustos 2022, 21:42:45
-- ÖZEL TAG OLUŞTURMA SİSTEMİ --








-tüm ayarlar shared.luada


Farklı tag panellerde veya tag sistemlerinde iki defa yazı olayı çıkıyorsa kendi sisteminize alttaki vereceğim kodu uyarlamanız gerekir.

Mahlukatın paylaştığı - Tag Panel şuan çoğunlukla kullanıldığı için ona uyarladım
Kod
addEventHandler('onPlayerChat', root ,function(text,typechat) -- chat eventi
cancelEvent()
local isim = getPlayerName(source)
local r, g, b = getPlayerNametagColor(source) or math.random(0,255), math.random(0,255), math.random(0,255)
local oyuncuTag = oyuncununTaginiCek(source)
local randomID = math.random ( 1, #yazilar )
local yazi = yazilar[randomID]
local serial = getPlayerSerial(source)
if serialler[serial]  then return end

-- spam koruma
if ayarlar.spamKoruma then
if not isPlayerExcluded(source) then
if isTimer(antiSpam[source]) then
cancelEvent() 
spamEngelle(source,"Mutele")
else
antiSpam[source] = setTimer(function(oyuncu)
antiSpam[oyuncu] = nil
end, 1000, 1, source)
end
end
end

-- reklam koruma
if ayarlar.reklamKoruma then
if isAdvertisement(text) then
if not isPlayerExcluded(source) then
for i, yetkililer in ipairs (getElementsByType("player")) do
if isPlayerExcluded(yetkililer) then
if text == yazi then return end
if ayarlar.mesajGorme then
outputChatBox("#000000[#FF0000REKLAM UYARI#000000] " .. isim ..  " #FF0000İsimli oyuncu reklam yaptı: #FFFFFF" .. text, yetkililer, 255, 255, 255, true)
outputServerLog("[ReklamUyari] " .. isim:gsub('#%x%x%x%x%x%x', '') .. ": " .. text)
end
end
end
if hakVer(source) then
text =  yazi
else
text =  yazi
spamEngelle(source,"Mutele")
end
end
end
end
-- hızlı yazma koruma
    if hizliYazma[source] and hizliYazma[source]  > getTickCount() then
outputChatBox("Teker teker yazınız!", source, 255, 0, 0)
        return
    else
        hizliYazma[source] = getTickCount()
    end
-- aynı mesaj engelleme
    if ayniMesaj[source] and ayniMesaj[source] == text then
outputChatBox("Aynı kelimeleri tekrarlamayınız!", source, 255, 0, 0)
return
    else
        ayniMesaj[source] = text
    end
-- kısaltma mesajlar
if ayarlar.kisaltmaMesaj then
for i,v in pairs ( mesajTablo ) do
for k,t in pairs(i) do
if text:lower() == t then
text = v
end
end
end
end
if typechat == 2 then cancelEvent() end -- eğer Y den yazmışsa iptal et
if typechat == 0 then -- eğer T den yazmış ise
if oyuncuYetkilimi(source) then -- eğer oyuncu yetkili ise
local tag,chat = oyuncuYetkilimi(source) -- yetkinin tagını ve chat renklerini çek
--custom tagscript
local tagdata = exports["customtagpanel"]:getPlayerTagDatas(source)
if tagdata then
if tagdata.customtag then
outputChatBox(tagdata.tag.." "..tag..isim..chat..text,root,r,g,b,true)
end
else--eğer yoksa data
outputChatBox(tag..isim..chat..text, root, r, g, b, true ) -- chate aktar
end
elseif oyuncuTag then -- eğer oyuncu panelden tag almışsa
local tagdata = exports["customtagpanel"]:getPlayerTagDatas(source)
if tagdata then
if tagdata.customtag then
outputChatBox(tagdata.tag.." #ffffff"..isim..": #ffffff"..text,root,r,g,b,true)
end
else--eğer yoksa data
outputChatBox(oyuncuTag.." "..isim.."#FFFFFF:#ededed "..text, root, r, g, b, true ) -- chate aktar
end
else --eğer yukardakilerden ikiside yoksa
--customtag script
local tagdata = exports["customtagpanel"]:getPlayerTagDatas(source)
if tagdata then
if tagdata.customtag then
--cancelEvent()
outputChatBox(tagdata.tag.." #ffffff"..isim..": #ffffff"..text,root,r,g,b,true)
end
else--eğer yoksa data
outputChatBox(""..isim.."#FFFFFF:#FFFFFF "..text, root, r, g, b, true ) -- chate yolla
end
end
end
outputServerLog( "CHAT: "  .. isim:gsub('#%x%x%x%x%x%x', '').. ": " .. text )
end)

export;  -- shared function hem client hem server çalışır
Kod
exports["customtagpanel"]:getPlayerTagDatas(player)
return gelen veri; array = {
            kullanan = player,
            tag = tag,
            customtag = true,   
        }

Başka scriptte uygulamak için;
Kod
local tagdata = exports["customtagpanel"]:getPlayerTagDatas(player)
if tagdata then
if tagdata.customtag then
       outputChatBox(tagdata.tag.." #ffffff"..getPlayerName(player)..": #ffffff"..text,root,r,g,b,true)
end

--shared luada tagpanel dosya ismini yazmayı unutmayın aksi takdirde scriptler çakışır iki yazı atar chate

Linki görebilmek için Kayıt olun yada Giriş yapın.
« Son Düzenleme: 14 Ağustos 2022, 01:37:20 Gönderen: #Serius »
 


MTASATURK

[İNDİR] Özel Tag Oluşturma Sistemi
« : 03 Ağustos 2022, 21:42:45 »

Çevrimdışı Casti

  • C-se (Discord - Casti#9795)
  • Deneyimli Üye
  • *
    • İleti: 307
Yanıtla #1 : 03 Ağustos 2022, 21:53:20
harika
>:( >:( >:( >:( >:( >:( >:( >:( >:( >:(
 


Çevrimdışı #Serius

  • Uzman Üye
  • *
    • İleti: 685
Yanıtla #2 : 03 Ağustos 2022, 21:59:28
kayıt edilen taglar/ bilgisayarınıza format atılmazsa veya mtayı slip yüklemezseniz her zaman kayıtlı kalır

Dosya Konumu: D:\Mtaa\mods\deathmatch\resources\customtagpanel\kaydettigimtaglar.xml - kaydettigimtaglar.xml dosyasını bulup kayıt ederseniz mtayı silip yüklediğinizde değişitirip tekrar kayıt ettiğiniz taglar listede gözükür.

 


Çevrimdışı Strong

  • Deneyimli Üye
  • *
    • İleti: 455
  • After Roleplay Developer
Yanıtla #3 : 03 Ağustos 2022, 22:01:48
helal olsun trabzonun son efsanesi.
 


Çevrimdışı Stucmo

  • Yeni Üye
  • *
    • İleti: 14
Yanıtla #4 : 03 Ağustos 2022, 23:01:06
Eline sağlık, güzel bir script olmuş.  :-*
 


Çevrimdışı Chearbhall

  • Hasan
  • Moderatör
  • *
    • İleti: 128
Yanıtla #5 : 04 Ağustos 2022, 09:10:04
Eline sağlık.
 


MTASATURK

Ynt: [İNDİR] Özel Tag Oluşturma Sistemi
« Yanıtla #5 : 04 Ağustos 2022, 09:10:04 »

Çevrimdışı 'Aspect

  • Yeni Üye
  • *
    • İleti: 49
  • Wolf RPG
Yanıtla #6 : 04 Ağustos 2022, 11:21:45
Eline Sağlık. ;)
 


Çevrimdışı peynir

  • Yeni Üye
  • *
    • İleti: 4
Yanıtla #7 : 06 Ağustos 2022, 00:09:02
İlk öncelikle eline sağlık çok güzel olmuş
ama panele restart attığımız zaman taglar siliniyor.
onuda yaparsa daha iyi oluyor oyle düşünüyorum hayırlı geceler.
 


Çevrimdışı #Serius

  • Uzman Üye
  • *
    • İleti: 685
Yanıtla #8 : 06 Ağustos 2022, 00:44:49
Linki görebilmek için Kayıt olun yada Giriş yapın.
İlk öncelikle eline sağlık çok güzel olmuş
ama panele restart attığımız zaman taglar siliniyor.
onuda yaparsa daha iyi oluyor oyle düşünüyorum hayırlı geceler.

Kayıt edilen taglar silinmez, oluşturulan taglar silinir. Konuda belirtmemişim bunu kusura Bakma oluşturulan taglar oyundan çıktığın zaman gider oluşturduğun taglar bölümünden kayıtlı olmasını istediğin tagi seçip kaydet basarsan script res yese bile taglar durur
« Son Düzenleme: 06 Ağustos 2022, 00:49:11 Gönderen: #Serius »
 


Çevrimdışı peynir

  • Yeni Üye
  • *
    • İleti: 4
Yanıtla #9 : 06 Ağustos 2022, 11:28:54
Tamamdır reis eline sağlık güzel olmuş.
Hayırlı günler
 


Çevrimdışı Strong

  • Deneyimli Üye
  • *
    • İleti: 455
  • After Roleplay Developer
Yanıtla #10 : 06 Ağustos 2022, 13:59:26
Linki görebilmek için Kayıt olun yada Giriş yapın. 'un kodlamasından anlayan bu dünyadan değildir. zaten serius'da bu dünya dan değil. >:(
 


Çevrimdışı #Serius

  • Uzman Üye
  • *
    • İleti: 685
Yanıtla #11 : 06 Ağustos 2022, 14:01:57
Linki görebilmek için Kayıt olun yada Giriş yapın.
Linki görebilmek için Kayıt olun yada Giriş yapın. 'un kodlamasından anlayan bu dünyadan değildir. zaten serius'da bu dünya dan değil. >:(

🤔🤣
 


Çevrimdışı shephard^

  • Uzman Üye
  • *
    • İleti: 776
  • decay.
Yanıtla #12 : 10 Ağustos 2022, 06:39:59
Dosya.co hariç bişi kullan kendine mega Yandex yada mediafire hesabı aç dosya.co gibi siteler linke giren olmayınca siliyor dosyayı
 


Çevrimdışı Mozilla

  • Yeni Üye
  • *
    • İleti: 12
Yanıtla #13 : 11 Ağustos 2022, 21:05:49
Eline sağlık gerçekten güzel bir sistem olmuş
 


Çevrimdışı #Serius

  • Uzman Üye
  • *
    • İleti: 685
Yanıtla #14 : 14 Ağustos 2022, 01:37:32
Link yenilenmiştir.