20 Haziran 2018, 16:06:43

Gönderen Konu: [YARDIM] Chat Rengi Bind Ekleme  (Okunma sayısı 340 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

kamaci4444

  • Acemi Üye
  • *
  • İleti: 146
  • Skype:yunus_kamaci
[YARDIM] Chat Rengi Bind Ekleme
« : 02 Mayıs 2017, 11:58:13 »
merhaba beyler /chatrengi ile açılıp kapanan bi kaynak var herkez bunu bilir muhtemelen
bind eklemek istiyorum örnek f2 basip açip kapaniyor yardım eden olursa sevinirim iyi forumlar

Client.lua
Kod: Lua
  1. addEvent("colorchat",true)
  2. addEventHandler("colorchat",root,
  3. function()
  4. openPicker( "chatrenk",(getElementData(localPlayer,"chatrenk") or "#FFFFFF"), "Chat Rengi Seç" )
  5. end)
  6.  
  7. addEvent ("onColorPickerOK", true )
  8. addEventHandler ("onColorPickerOK", root,
  9. function ( id, hex, r, g, b )
  10.     if ( id == "chatrenk" ) then
  11.     setElementData(localPlayer,"chatrenk",hex)
  12.     outputChatBox("* Chat Renk: "..hex)
  13. end
  14. end)

Server.lua
Kod: Lua
  1.     addEventHandler("onPlayerQuit",root,function()
  2.     serial = getPlayerSerial(source)
  3.     local openFile = fileOpen(serial..".txt")
  4.     if openFile then
  5.     fileDelete(serial..".txt")
  6.     end
  7.     local newFile = fileCreate(serial..".txt")
  8.     if newFile then
  9.     fileWrite(newFile, getElementData(source,"chatrenk") or "#FFFFFF")
  10.     fileClose(newFile)    
  11.     end
  12.     end)
  13.      
  14.     addEventHandler("onPlayerJoin",root,function()
  15.     serial = getPlayerSerial(source)
  16.     local openFile = fileOpen(serial..".txt")
  17.     if openFile then
  18.     local buffer
  19.     while not fileIsEOF(openFile) do
  20.     buffer = fileRead(openFile, 500)
  21.     if buffer then--and getPlayerName(source) ~= buffer then
  22.     setElementData(source,"chatrenk",buffer)
  23.     --outputChatBox("* "..buffer.." #cc0000adlı oyuncu nickini #cc0000"..getPlayerName(source).." #cc0000olarak değiştirdi.",root,200,0,0,true)
  24.     end
  25.     end
  26.     end
  27.     fileClose(openFile)
  28.     end)
  29.    
  30.     local chatTime = {}
  31.     local lastChatMessage = {}
  32.    
  33.     addEventHandler('onPlayerChat', root,
  34.     function(msg, type)
  35.         if type == 0 then
  36.             cancelEvent()
  37.             if chatTime[source] and chatTime[source] + 500 > getTickCount() then
  38.                 outputChatBox("Stop spamming main chat!", source, 255, 0, 0)
  39.                 return
  40.             else
  41.                 chatTime[source] = getTickCount()
  42.             end
  43.             if lastChatMessage[source] and lastChatMessage[source] == msg then
  44.                 outputChatBox("Stop repeating yourself!", source, 255, 0, 0)
  45.                 return
  46.             else
  47.                 lastChatMessage[source] = msg
  48.             end
  49.             if getElementData(source,"chatrenk") then
  50.             local r, g, b = getPlayerNametagColor(source)
  51.             local cr = getElementData(source,"chatrenk")
  52.             outputChatBox(getPlayerName(source) .. ': '..cr..msg, root, r, g, b, true)
  53.             outputServerLog( "CHAT: " .. getPlayerName(source) .. ": " .. msg )
  54.                 return  end        
  55.             local r, g, b = getPlayerNametagColor(source)
  56.             outputChatBox(getPlayerName(source) .. ': #FFFFFF' .. msg, root, r, g, b, true)
  57.             outputServerLog( "CHAT: " .. getPlayerName(source) .. ": " .. msg )
  58.         end
  59.     end
  60. )
  61.  
  62. addCommandHandler("chatrengi",
  63. function(player,cmd)
  64. triggerClientEvent(player,"colorchat",player)
  65. end)
« Son Düzenleme: 02 Mayıs 2017, 23:00:31 Gönderen: Narkoz »
 

MTASA-TURK | Türkiye'nin En Güncel MTA Platformu

[YARDIM] Chat Rengi Bind Ekleme
« : 02 Mayıs 2017, 11:58:13 »

Paradox

  • Kurucu
  • *
  • İleti: 639
  • SH Gaming
Ynt: [Yardım] Chat rengi bind ekleme
« Yanıtla #1 : 02 Mayıs 2017, 12:53:33 »
Server
Kod: Lua
  1.     addEventHandler("onPlayerQuit",root,function()
  2.     serial = getPlayerSerial(source)
  3.     local openFile = fileOpen(serial..".txt")
  4.     if openFile then
  5.     fileDelete(serial..".txt")
  6.     end
  7.     local newFile = fileCreate(serial..".txt")
  8.     if newFile then
  9.     fileWrite(newFile, getElementData(source,"chatrenk") or "#FFFFFF")
  10.     fileClose(newFile)    
  11.     end
  12.     end)
  13.  
  14. function displayLoadedRes ( res )
  15.         for i, player in ipairs(getElementsByType("player")) do
  16.             bindKey ( player, "F2", "down", chatrengi )
  17.         end
  18. end
  19. addEventHandler ( "onResourceStart", getRootElement(), displayLoadedRes )      
  20.  
  21.      
  22.     addEventHandler("onPlayerJoin",root,function()
  23.         bindKey ( source, "F2", "down", chatrengi )
  24.     serial = getPlayerSerial(source)
  25.     local openFile = fileOpen(serial..".txt")
  26.     if openFile then
  27.     local buffer
  28.     while not fileIsEOF(openFile) do
  29.     buffer = fileRead(openFile, 500)
  30.     if buffer then--and getPlayerName(source) ~= buffer then
  31.     setElementData(source,"chatrenk",buffer)
  32.     --outputChatBox("* "..buffer.." #cc0000adlı oyuncu nickini #cc0000"..getPlayerName(source).." #cc0000olarak değiştirdi.",root,200,0,0,true)
  33.     end
  34.     end
  35.     end
  36.     fileClose(openFile)
  37.     end)
  38.    
  39.     local chatTime = {}
  40.     local lastChatMessage = {}
  41.    
  42.     addEventHandler('onPlayerChat', root,
  43.     function(msg, type)
  44.         if type == 0 then
  45.             cancelEvent()
  46.             if chatTime[source] and chatTime[source] + 500 > getTickCount() then
  47.                 outputChatBox("Stop spamming main chat!", source, 255, 0, 0)
  48.                 return
  49.             else
  50.                 chatTime[source] = getTickCount()
  51.             end
  52.             if lastChatMessage[source] and lastChatMessage[source] == msg then
  53.                 outputChatBox("Stop repeating yourself!", source, 255, 0, 0)
  54.                 return
  55.             else
  56.                 lastChatMessage[source] = msg
  57.             end
  58.             if getElementData(source,"chatrenk") then
  59.             local r, g, b = getPlayerNametagColor(source)
  60.             local cr = getElementData(source,"chatrenk")
  61.             outputChatBox(getPlayerName(source) .. ': '..cr..msg, root, r, g, b, true)
  62.             outputServerLog( "CHAT: " .. getPlayerName(source) .. ": " .. msg )
  63.                 return  end        
  64.             local r, g, b = getPlayerNametagColor(source)
  65.             outputChatBox(getPlayerName(source) .. ': #FFFFFF' .. msg, root, r, g, b, true)
  66.             outputServerLog( "CHAT: " .. getPlayerName(source) .. ": " .. msg )
  67.         end
  68.     end
  69. )
  70.  
  71. function chatrengi(player,cmd)
  72. triggerClientEvent(player,"colorchat",player)
  73. end)
  74. addCommandHandler("chatrengi",chatrengi)
 

kamaci4444

  • Acemi Üye
  • *
  • İleti: 146
  • Skype:yunus_kamaci
Ynt: [Yardım] Chat rengi bind ekleme
« Yanıtla #2 : 02 Mayıs 2017, 17:25:55 »
Çalışmıyor malesef debug hata gösteriyor
Linkleri Görebilmek İçin Kayıt Olun veya Giriş Yapın
« Son Düzenleme: 02 Mayıs 2017, 17:31:46 Gönderen: kamaci4444 »
 

Paradox

  • Kurucu
  • *
  • İleti: 639
  • SH Gaming
Ynt: [Yardım] Chat rengi bind ekleme
« Yanıtla #3 : 02 Mayıs 2017, 17:37:25 »
Ufak birşeyi gözden kaçırmışım birde bunu denermisin.
Kod: Lua
  1.     addEventHandler("onPlayerQuit",root,function()
  2.     serial = getPlayerSerial(source)
  3.     local openFile = fileOpen(serial..".txt")
  4.     if openFile then
  5.     fileDelete(serial..".txt")
  6.     end
  7.     local newFile = fileCreate(serial..".txt")
  8.     if newFile then
  9.     fileWrite(newFile, getElementData(source,"chatrenk") or "#FFFFFF")
  10.     fileClose(newFile)    
  11.     end
  12.     end)
  13.  
  14. function displayLoadedRes ( res )
  15.         for i, player in ipairs(getElementsByType("player")) do
  16.             bindKey ( player, "F2", "down", chatrengi )
  17.         end
  18. end
  19. addEventHandler ( "onResourceStart", getRootElement(), displayLoadedRes )      
  20.  
  21.      
  22.     addEventHandler("onPlayerJoin",root,function()
  23.         bindKey ( source, "F2", "down", chatrengi )
  24.     serial = getPlayerSerial(source)
  25.     local openFile = fileOpen(serial..".txt")
  26.     if openFile then
  27.     local buffer
  28.     while not fileIsEOF(openFile) do
  29.     buffer = fileRead(openFile, 500)
  30.     if buffer then--and getPlayerName(source) ~= buffer then
  31.     setElementData(source,"chatrenk",buffer)
  32.     --outputChatBox("* "..buffer.." #cc0000adlı oyuncu nickini #cc0000"..getPlayerName(source).." #cc0000olarak değiştirdi.",root,200,0,0,true)
  33.     end
  34.     end
  35.     end
  36.     fileClose(openFile)
  37.     end)
  38.    
  39.     local chatTime = {}
  40.     local lastChatMessage = {}
  41.    
  42.     addEventHandler('onPlayerChat', root,
  43.     function(msg, type)
  44.         if type == 0 then
  45.             cancelEvent()
  46.             if chatTime[source] and chatTime[source] + 500 > getTickCount() then
  47.                 outputChatBox("Stop spamming main chat!", source, 255, 0, 0)
  48.                 return
  49.             else
  50.                 chatTime[source] = getTickCount()
  51.             end
  52.             if lastChatMessage[source] and lastChatMessage[source] == msg then
  53.                 outputChatBox("Stop repeating yourself!", source, 255, 0, 0)
  54.                 return
  55.             else
  56.                 lastChatMessage[source] = msg
  57.             end
  58.             if getElementData(source,"chatrenk") then
  59.             local r, g, b = getPlayerNametagColor(source)
  60.             local cr = getElementData(source,"chatrenk")
  61.             outputChatBox(getPlayerName(source) .. ': '..cr..msg, root, r, g, b, true)
  62.             outputServerLog( "CHAT: " .. getPlayerName(source) .. ": " .. msg )
  63.                 return  end        
  64.             local r, g, b = getPlayerNametagColor(source)
  65.             outputChatBox(getPlayerName(source) .. ': #FFFFFF' .. msg, root, r, g, b, true)
  66.             outputServerLog( "CHAT: " .. getPlayerName(source) .. ": " .. msg )
  67.         end
  68.     end
  69. )
  70.  
  71. function chatrengi(player,cmd)
  72. triggerClientEvent(player,"colorchat",player)
  73. end
  74. addCommandHandler("chatrengi",chatrengi)
 

kamaci4444

  • Acemi Üye
  • *
  • İleti: 146
  • Skype:yunus_kamaci
Ynt: [Yardım] Chat rengi bind ekleme
« Yanıtla #4 : 02 Mayıs 2017, 17:53:56 »
tamam oldu ama geri kapanmiyor onun ile ilgili bilgin varmı kardeş
« Son Düzenleme: 02 Mayıs 2017, 17:56:03 Gönderen: kamaci4444 »
 

Paradox

  • Kurucu
  • *
  • İleti: 639
  • SH Gaming
Ynt: [Yardım] Chat rengi bind ekleme
« Yanıtla #5 : 02 Mayıs 2017, 18:22:12 »
Linkleri Görebilmek İçin Kayıt Olun veya Giriş Yapın
tamam oldu ama geri kapanmiyor onun ile ilgili bilgin varmı kardeş
Sanırsam Colorpicker (cpicker) scripti ile renk seçtiriyorsun o scriptin içinde olan 'picker_client.lua' adlı dosyaya ekleyeceğin kod;
Kod: Lua
  1. function getVisiblePicker(id)
  2.   if id and pickerTable[id] then
  3.     return true
  4.   end
  5.   return false
  6. end

Client.lua
Kod: Lua
  1. addEvent("colorchat",true)
  2. addEventHandler("colorchat",root,
  3. function()
  4. if getVisiblePicker("chatrenk")==false then
  5. openPicker( "chatrenk",(getElementData(localPlayer,"chatrenk") or "#FFFFFF"), "Chat Rengi Seç" )
  6. else
  7. closePicker("chatrenk")
  8. end
  9. end)
  10.  
  11. addEvent ("onColorPickerOK", true )
  12. addEventHandler ("onColorPickerOK", root,
  13. function ( id, hex, r, g, b )
  14.     if ( id == "chatrenk" ) then
  15.     setElementData(localPlayer,"chatrenk",hex)
  16.     outputChatBox("* Chat Renk: "..hex)
  17. end
  18. end)
 

MTASA-TURK | Türkiye'nin En Güncel MTA Platformu

Ynt: [Yardım] Chat rengi bind ekleme
« Yanıtla #5 : 02 Mayıs 2017, 18:22:12 »

kamaci4444

  • Acemi Üye
  • *
  • İleti: 146
  • Skype:yunus_kamaci
Ynt: [Yardım] Chat rengi bind ekleme
« Yanıtla #6 : 02 Mayıs 2017, 18:46:03 »
Çok teşekürler kardeşim sağol ilgilendiğin için  sorun giderilmiştir @kilit
 

CruzerGq

  • Süper Moderatör
  • *
  • İleti: 503
  • LS Gaming | Hırsız & Polis
    • MTASA-TURK
Ynt: [Yardım] Chat rengi bind ekleme
« Yanıtla #7 : 02 Mayıs 2017, 18:59:54 »
Konu sahibinin isteği üzerine @Konu Kilit.