[EO] Sistema Vip

Codigo Fonte Servidor

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: [Selecionar]
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:


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

Opa eu estava precisando
vlw

ser estiver igual o da mmo que eu postei ta incompleto se não parabéns

Ajudou muito,obrigado...