WebRPG
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

WebRPG


 
InícioInício  PortalPortal  Últimas imagensÚltimas imagens  ProcurarProcurar  RegistarRegistar  EntrarEntrar  

 

 Bloqueando uma classe na hora de fazer o char

Ir para baixo 
2 participantes
AutorMensagem
avaaa

avaaa


Mensagens : 2
Data de inscrição : 08/12/2011

Bloqueando uma classe na hora de fazer o char Empty
MensagemAssunto: Bloqueando uma classe na hora de fazer o char   Bloqueando uma classe na hora de fazer o char I_icon_minitimeQui Dez 08, 2011 11:35 pm

Bom esse tutorial é bem simples. Ele fará com que você possa trancar o char na hora de um jogador for fazer a conta simplesmente para ele não começar com um Char muito forte.

~TUDO LADO DO SERVIDOR~
Vá na sua pasta data do server e abra o Arquivo classes.ini, e em cada classe coloque isso"Locked=0"
Após ter feito tudo isso e salvo o arquivo, vamos para a programação:

MOD TYPES
Código:
Private Type ClassRec
Procure por:[code]StartSpell() As Long[code]

Código:

[code]Class(i).Locked = Val(GetVar(filename, "CLASS" & i, "Locked"))[/code]

modServerTCP

[code]Sub SendNewCharClasses[/code]
Procure por:

[code]Buffer.WriteLong SNewCharClasses[code]

e adcione isso logo em baixo:

Código:
[code]Dim Class_Number As Long
Class_Number = 0
For i = 1 To Max_Classes
If Class(i).Locked = 0 Then
Class_Number = Class_Number + 1
End If[/code]
Next

Troque o

[code]Buffer.WriteLong Max_Classes por Buffer.WriteLong Class_Number[/code]

de Modo que fique essa parte assim

<...>
[code]Buffer.WriteLong SNewCharClasses
Dim Class_Number As Long
Class_Number = 0
For i = 1 To Max_Classes
If Class(i).Locked = 0 Then
Class_Number = Class_Number + 1
End If[/code]
Next
[code]Buffer.WriteLong Class_Number[/code]


Logo abaixo irá encontrar [code]For i = 1 To Class_Number[/code]
adcione esta linha abaixo:

Código:
[code]If Class(i).Locked = 0 Then[/code]

Ainda no mesmo local procure por:

Código:
[code]For q = 1 To Stats.Stat_Count - 1
Buffer.WriteLong Class(i).Stat(q)
Next
Next[/code]

Subistitua isso por isso:

[code]For q = 1 To Stats.Stat_Count - 1
Buffer.WriteLong Class(i).Stat(q)
Next
End If
Next[/code]



Very Happy END

Bom agora você poderá restringir as suas classes. Se colocar LOCKED=1 então sua classe estará trancada se LOCKED =0 sua classe estará livre para escolha

CREDITOS:
Admiral Refuge(Por ter feito o código)
EU Por postar


[code]
Ir para o topo Ir para baixo
シャイニング
Administrador
Administrador
シャイニング


Mensagens : 19
Data de inscrição : 19/11/2011
Idade : 27
Localização : Fortaleza-ceará

Bloqueando uma classe na hora de fazer o char Empty
MensagemAssunto: (Sem assunto)   Bloqueando uma classe na hora de fazer o char I_icon_minitimeSex Dez 09, 2011 12:47 am

Por favor,coloque os códigos em :

Código:
 CODIGO

Para organizar,arrume isso.
Ir para o topo Ir para baixo
http://www.webrpg.directorioforuns.com
 
Bloqueando uma classe na hora de fazer o char
Ir para o topo 
Página 1 de 1

Permissões neste sub-fórumNão podes responder a tópicos
WebRPG :: Eclipse Origins :: Tutoriais Eclipse Origins-
Ir para: