O mesmo server para deixar o usuário Mudo.
no Server~Side na frmServer na aba Players crie 1 commandbutton chamado:
de 2 clicks e adicione:
dps na modDatabase procure por:
em em baixo adicione:
procure por:
em baixo de :
adicione:
procure por :
em baixo adicione:
Creditos:
BGames
ThxFox
Creditos Externos:
Thales12 - Base do sistema
no Server~Side na frmServer na aba Players crie 1 commandbutton chamado:
Name: mnumMute
Caption: mutar
de 2 clicks e adicione:
Código:
Dim Name As String
Name = frmServer.lvwInfo.SelectedItem.SubItems(3)
If Not Name = "Not Playing" Then
Call ToggleMute(FindPlayer(Name))
End Ifdps na modDatabase procure por:
Código:
Public Sub LoadOptions()
Options.Game_Name = GetVar(App.Path & "\data\options.ini", "OPTIONS", "Game_Name")
Options.Port = GetVar(App.Path & "\data\options.ini", "OPTIONS", "Port")
Options.MOTD = GetVar(App.Path & "\data\options.ini", "OPTIONS", "MOTD")
Options.Website = GetVar(App.Path & "\data\options.ini", "OPTIONS", "Website")
End Subem em baixo adicione:
Código:
Public Sub ToggleMute(ByVal index As Long)
If index <= 0 Or index > MAX_PLAYERS Then Exit Sub
If Player(index).tamudo = 1 Then
Player(index).tamudo = 0
PlayerMsg index, "Você foi Discilenciado e ja pode falar em global.", BrightGreen
TextAdd GetPlayerName(index) & " Você foi Discilenciado."
Else
Player(index).tamudo = 1
PlayerMsg index, "Você foi silenciado e não pode falar em global.", BrightRed
TextAdd GetPlayerName(index) & " Você foi Silenciado."
End If
SavePlayer index 'salva o player.
End Subprocure por:
Código:
Private Sub HandleBroadcastMsg(ByVal index As Long, ByRef Data() As Byte, ByVal StartAddr As Long, ByVal ExtraVar As Long)em baixo de :
Código:
Msg = Buffer.ReadStringadicione:
Código:
If Player(index).tamudo Then
PlayerMsg index, "Você foi silenciado e não poderá falar em global.", BrightRed
Exit Sub
End Ifprocure por :
Código:
' Position
MAP As Long
x As Byte
y As Byte
Dir As Byteem baixo adicione:
Código:
'ta mudo
tamudo As ByteCreditos:
BGames
ThxFox
Creditos Externos:
Thales12 - Base do sistema