Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- local rtbox = nil
- local isOpen = false
- local messages = ""
- net.Receive("receiveMessage" , function()
- local Timestamp = os.time()
- local TimeS = os.date( "%H:%M:%S" , Timestamp )
- local message = net.ReadString()
- local sender = net.ReadEntity()
- messages = messages.."\n"..TimeS.."||"..sender:Name().." : "..message
- if isOpen == true then
- rtbox:SetText(messages)
- end
- end )
- function OpenSocial()
- isOpen = true
- local frame = vgui.Create("DFrame")
- frame:SetSize( 500,500 )
- frame:Center()
- frame:MakePopup()
- frame:SetTitle("")
- frame.OnClose = function(s)
- isOpen = false
- s:Remove()
- end
- function frame:Paint( self, w )
- surface.SetDrawColor( 255, 255, 255, 255 )
- surface.DrawRect( 0, 0, 500, 500 )
- surface.SetDrawColor(0, 0, 0, 255)
- surface.DrawRect( 500, 500, 500, 75 )
- surface.SetDrawColor( 178, 185, 186 )
- surface.DrawRect( 10, 3, 145, 23)
- draw.DrawText( "mafiachat.com", "Trebuchet24", 15, 5, Color( 0, 0, 0, 255 ), TEXT_ALIGN_LEFT )
- end
- local panel = vgui.Create("DPanel", frame)
- panel:SetPos(10,30)
- panel:SetSize( 500-20 , 500-30-50)
- rtbox = vgui.Create("RichText" , panel)
- rtbox:SetSize(500-20 , 500-30-50)
- rtbox:SetText(messages)
- local entry = vgui.Create("DTextEntry", frame)
- entry:SetPos(10,30+ (500-30-50) + 5)
- entry:SetSize(500-20 , 40)
- entry.OnEnter = function(s)
- net.Start("sendMessage")
- net.WriteString(s:GetText())
- net.SendToServer()
- s:SetText("")
- s:RequestFocus()
- end
- end
- hook.Add("OnPlayerChat" , "OpenChatMenu" , function( ply , text )
- if ply == LocalPlayer() then
- if string.lower(text) == "!sendmafia" then
- OpenSocial()
- return true
- end
- end
- end )
- -------SERVER SHIT --------------------------------------
- util.AddNetworkString("sendMessage")
- util.AddNetworkString("receiveMessage")
- util.AddNetworkString("onlinePlayers")
- net.Receive("sendMessage" , function( len , ply )
- local message = net.ReadString()
- if( string.len(message) == 0 ) then return end
- net.Start("receiveMessage")
- net.WriteString(message)
- net.WriteEntity(ply)
- net.Broadcast()
- end )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement