Bloqueando uma classe na hora de fazer o char

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

---

---

---

---

---