[EO] Adicionando Sistema Vip para o Servidor

[size=20pt]Código fonte servidor[/size]


abra o modulo modTypes segure ctrl + f e procure por

Código:

Private Type PlayerRec

na mesma sub acima procure por:

Código:

Dir As Byte

abaixo do código acima adicione:

Código:

Vip as byte

no modulo modServerTCP procure por:

Código:

Function PlayerData(ByVal Index As Long) As Byte()

na sub acima procure por:

Código:

Buffer.WriteLong GetPlayerPK(Index)

abaixo do código acima adicione:

Código:

buffer.writebyte player(index).vip

agora abra o frmServer na aba de players

adicione os seguinte componentes:

HSscrollBar
label
CommandButton

agora nos componentes acima faça o seguinte:

HSscrollBar = mode seu nome para scrlVip e mude o max dela para 255, e clique duas vezes nela e adicionar
lblVip.Caption = scrlVip.Value

label = mude seu nome para lblVip

CommandButton = mude seu nome para CDMVIP,e clique duas vezes nela e adicionar
setvip


depois de pronto ele ficara asim:
[Tens de ter uma conta e sessão iniciada para poderes visualizar esta imagem]

Credito:
Dshfox = por Criar o Tutorial
Ian = por simplificar e postar na mmov2