kamel10 Posted July 18, 2014 Share Posted July 18, 2014 عندي مود التوب بار شات ولما اسوي اكسبورت يصير كدة exports.TopBarChat:sendClientMessage("#FDD017[Admin] #FF0000"..getPlayerName( player ).." #00FF00Has Give All Players #FF0000"..tonumber ( Money ).."$", root, 0, 255, 0 ) شوفو وين روت ابي اخليها كدة exports.TopBarChat:sendClientMessage(root, "#FDD017[Admin] #FF0000"..getPlayerName( player ).." #00FF00Has Give All Players #FF0000"..tonumber ( Money ).."$", 0, 255, 0 ) شوفو الحين وين الروت . وابي اغير sendClientMessage ب outputServer وفي الكلينت ب outputClient وهذا مود TopBarChat Server ------------------------------------------ -- TopBarChat -- ------------------------------------------ -- Developer: Braydon Davis -- -- File: s.lua -- -- Copyright 2013 (C) Braydon Davis -- -- All rights reserved. -- ------------------------------------------ sec = {{{{{{},{},{},{}}}}}} -- ------------------------------------------ local TheResourceName = getResourceName ( getThisResource ( ) ) function sendClientMessage ( msg, who, r, g, b, pos, time ) if ( msg and who ) then if ( isElement ( who ) ) then triggerClientEvent ( who, TheResourceName..":sendClientMessage", who, msg, r, g, b, pos, time ) return true else return false end else return false end end addCommandHandler ( "runtest", function ( ) for i=1,7 do setTimer ( function ( i ) sendClientMessage ( "Indexing "..i.."...", root, math.random ( 20, 255 ), math.random ( 20, 255 ), math.random ( 20, 255 ), true ) sendClientMessage ( "Indexing "..i.."...", root, math.random ( 20, 255 ), math.random ( 20, 255 ), math.random ( 20, 255 ), false ) end, i*1000, 1, i ) end end ) Client ------------------------------------------ sec = {{{{{{},{},{},{}}}}}} -- ------------------------------------------ local maxMessages = 20; -- The max messages that will show (on each bar) local DefaultTime = 8; -- The max time each message will show if time isn't defined. ---------- DON'T EDIT BELOW HERE UNLESS YOU KNOW WHAT YOUR DOING! ---------- local sx, sy = guiGetScreenSize ( ) local DefaultPos = true; -- Top bar variables local timer_top = { } local timer_btm = { } -- Bottom bar variables local messages_top = { } local messages_btm = { } function sendClientMessage ( msg, r, g, b, pos, time ) -- Msg: String -- R: Int (0-255) -- G: Int (0-255) -- B: Int (0-255) -- Pos: Boolean -- Time: Int local r, g, b = r, g, b or 255, 255, 255 if ( pos == nil ) then pos = DefaultPos end -- Check for pos if ( time == nil ) then time = DefaultTime end -- Check for time local GsubedMessage = msg:gsub ( "#%x%x%x%x%x%x", "" ) if ( pos == true ) then -- if ( not isTimer ( timer_top[GsubedMessage] ) ) then local c_messages = messages_top; if ( #messages_top >= maxMessages ) then local c_messages = messages_top; messages_top = { } for i,v in ipairs ( c_messages ) do if ( i ~= 1 ) then table.insert ( messages_top, { v[1], v[2], v[3], v[4] } ) end end end table.insert ( messages_top, { msg, r, g, b } ) timer_top[GsubedMessage] = setTimer ( function ( msg ) for i,v in ipairs ( messages_top ) do if ( v[1] == msg ) then table.remove ( messages_top, i ) break end end end, time*1000, 1, msg ) return_value = true -- else return_value = false end else if not ( isTimer ( timer_btm[GsubedMessage] ) ) then local c_messages = messages_btm; if ( #messages_btm >= maxMessages ) then local c_messages = messages_btm; messages_btm = { } for i,v in ipairs ( c_messages ) do if ( i ~= 1 ) then table.insert ( messages_btm, { v[1], v[2], v[3], v[4] } ) end end end table.insert ( messages_btm, { msg, r, g, b } ) timer_btm[GsubedMessage] = setTimer ( function ( msg ) for i,v in ipairs ( messages_btm ) do if ( v[1] == msg ) then table.remove ( messages_btm, i ) break end end end, time*1000, 1, msg ) return_value = true else return_value = false end end return return_value or false end local TheResourceName = getResourceName ( getThisResource ( ) ) addEvent ( TheResourceName..":sendClientMessage", true ) addEventHandler ( TheResourceName..":sendClientMessage", root, sendClientMessage ) function dxDrawNotificationBar ( ) for i,v in ipairs ( messages_top ) do local i = i - 1 -- Because tables start at 1 -.- if ( i == #messages_top-1 ) then dxDrawRectangle ( ( sx/2-530/2 ), i*25, 530, 25, tocolor ( 0, 0, 0, 100 ) ) end dxDrawRectangle ( ( sx/2-530/2 ), i*25, 530, 25, tocolor ( 0, 0, 0, 120 ) ) dxDrawText ( v[1], 0, i*25+5, sx, 25, tocolor ( v[2], v[3], v[4], 255 ), 1, "default-bold", "center", "top", true, false, false, true ) end for i,v in pairs ( messages_btm ) do local i = i - 1 local y = i * 25+25 if ( i+1 == #messages_btm ) then dxDrawRectangle ( ( sx/2-530/2 ), (sy-y), 530, 25, tocolor ( 0, 0, 0, 120 ) ) end dxDrawRectangle ( ( sx/2-530/2 ), (sy-y), 530, 25, tocolor ( 0, 0, 0, 120 ) ) dxDrawText ( v[1], 0, (sy-y+5), sx, sy, tocolor ( v[2], v[3], v[4], 255 ), 1, "default-bold", "center", "top", true, false, false, true ) end end addEventHandler ( "onClientRender", root, dxDrawNotificationBar ) Link to comment
kamel10 Posted July 18, 2014 Author Share Posted July 18, 2014 طيب ابي اغير sendClientMessage ب outputServer Link to comment
TAPL Posted July 18, 2014 Share Posted July 18, 2014 طيب وين المشكلة؟ outputServer إلى sendClientMessage غير ! Link to comment
kamel10 Posted July 18, 2014 Author Share Posted July 18, 2014 وفي الكليت ابي اغير sendClientMessage ب outputClient Edite 2 خلاص اغير sendClientMessage ب outputClient للقفل .. Link to comment
ALw7sH Posted July 18, 2014 Share Posted July 18, 2014 سطر 20 كلنت function sendClientMessage ( msg, r, g, b, pos, time ) الى function outputServer ( msg, r, g, b, pos, time ) مادري وش استفدت انت احين يوم غيرت الاسم بس براحتك لووول Link to comment
kamel10 Posted July 18, 2014 Author Share Posted July 18, 2014 الوحش ابيه يشتغل على مودات جراند Link to comment
Recommended Posts