Makers Brasil
Bem Vindos a Maker´s Brasil (um forum para criação de servidores 2D e 3D)Nos desejamos boa sorte no seu projeto!

Bloqueando uma classe na hora de fazer o char

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Bloqueando uma classe na hora de fazer o char

Mensagem por Dracolas em Ter Jun 14, 2011 8:14 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

Private Type ClassRec
Procure por:StartSpell() As Long
e adcione:



Código:
 
        Class(i).Locked = Val(GetVar(filename, "CLASS" & i, "Locked"))


modServerTCP

Sub SendNewCharClasses
Procure por:Buffer.WriteLong SNewCharClasses
e adcione isso logo em baixo:


Código:
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
Next

Troque oBuffer.WriteLong Max_Classes por Buffer.WriteLong Class_Number

de Modo que fique essa parte assim
Spoiler for Hiden:


Código:
<...>
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
Next
Buffer.WriteLong Class_Number

Logo abaixo irá encontrar For i = 1 To Class_Number

adcione esta linha abaixo:


Código:
 If Class(i).Locked = 0 Then


Ainda no mesmo local procure por:

Código:

        For q = 1 To Stats.Stat_Count - 1
            Buffer.WriteLong Class(i).Stat(q)
        Next
    Next


Subistitua isso por isso:


Código:
        For q = 1 To Stats.Stat_Count - 1
            Buffer.WriteLong Class(i).Stat(q)
        Next
    End If
    Next

~FIM~


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


cheers cheers











Dracolas
Sentinela
Sentinela

Mensagens : 16
Estrelas Makers : 93
Creditos : 7
Data de inscrição : 21/01/2011
Idade : 19
Localização : Vitória da Conquista/BA

Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo

- Tópicos similares

 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum