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

Seu mundo de criatividade!


Você não está conectado. Conecte-se ou registre-se

ProPixel Fórum » Criação e Desenvolvimento de Jogos » Criação de Jogos em 2D » Outras Engines » Eclipse Origins » Tutoriais » Magias por level e classe.

Magias por level e classe.

+2
Kincy
BabyLoves
6 participantes

Ir para baixo  Mensagem [Página 1 de 1]

1Magias por level e classe. Empty Magias por level e classe. Dom Abr 10, 2016 11:12 am

BabyLoves

BabyLoves
Administrador

Bem, este tutorial é bem simples!
Ele fará que quando você passe de level, você aprenda a magia que você editou no editor de magias.
Ok, ele mexe só com o servidor, então, abra seu "Server.vbp".

Agora, no final do "ModPlayer" , adicione isto:


Código:
Public Sub CheckGiveSpell(ByVal Index As Long)[size=11][/size]
Dim i As Long[size=11][/size]
Dim n As Long[size=11][/size]
Dim s As Long
[size=11][/size]
        ' Check Sucess as Long[size=11][/size]
         If Not IsPlaying(Index) Then Exit Sub[size=11][/size]
    For i = 1 To MAX_SPELLS[size=11][/size]
        If GetPlayerLevel(Index) >= Spell(i).LevelReq Then[size=11][/size]
            If Spell(i).ClassReq = GetPlayerClass(Index) Then[size=11][/size]
            If i > 0 Then[size=11][/size]
            s = FindOpenSpellSlot(Index)[size=11][/size]
              If s > 0 Then[size=11][/size]
                If Not HasSpell(Index, i) Then[size=11][/size]
                    Call SetPlayerSpell(Index, s, i)[size=11][/size]
                    Call PlayerMsg(Index, "Você aprendeu uma nova Magia: " & trim$(Spell(i).Name), White)[size=11][/size]
                    Else[size=11][/size]
                    End If[size=11][/size]
                Else[size=11][/size]
                    Exit Sub[size=11][/size]
                End If[size=11][/size]
            End If[size=11][/size]
          End If[size=11][/size]
        End If[size=11][/size]
    Sub[size=11][/size]
End Nex

Ainda em "ModPlayer" , procure por esta "SUB" :



Código:
Sub CheckPlayerLevelUp(ByVal Index As Long)


E, nesta "SUB" , abaixo de:


Código:
SendEXP Index
        SendPlayerData Index


Adicione:


Código:
CheckGiveSpell Index

E Pronto ! Magias por level e classe. 332646

Explicando:

-O sistema funciona assim, você edita sua magia normalmente, o que vai fazer o jogador ganhar a magia, é a "Barra de Level" e a "Caixa de Classes" situada no editor de Magias.

-Caixa de Classe(cmbClass): Será a Classe que ganhará a Magia.
-Barra de Level(scrlLevel): Será o Level que a classe ganhará a Magia. Esta barra no "E.O 2.0" original , é usada como requerimento de nível no uso da magia.

Então lembrem, não será qualquer magia que editem que você ganhará, a não ser que você edite a classe, e o nível em que se ganha.
Lembrando também que, se você editar pra classe "X" ganhar a magia no nível "120" e a classe "X" estiver no nível "120" ou por algum motivo você deixe ele no nível "121" , quando você mudar de nível "122" , você ganhará a magia, ou seja, níveis "Maiores ou Iguais" ao que você editará, ganharão a magia selecionada.E lembrem de escolher a classe no editor também !!!

por lucas100vzs



Última edição por BabyLoves em Seg Abr 11, 2016 7:12 pm, editado 1 vez(es)

https://www.facebook.com/wydKandK/

2Magias por level e classe. Empty Re: Magias por level e classe. Dom Abr 10, 2016 11:15 am

Kincy

Kincy
Fundador

Eu gostei muito do seu tutorial, muito obrigado por trazer ele para nós, é muito interessante esse sistema, eu também desenvolvo projetos, gostei bastante! Offtopic: (Em breve irei adicionar o sistema de reputação, porém corrigido o bug de diminuir a reputação, fico te devendo essa.)

http://www.propixelforum.com

3Magias por level e classe. Empty Re: Magias por level e classe. Dom Abr 10, 2016 11:17 am

Teteu

Teteu
Experiente

eu tinha visto um tutorial parecido, mas esse ta mais explicado brother, eu vim aqui pro forum ja na intenção de buscar gente que ajude, to vendo que ta massa. valeu

4Magias por level e classe. Empty Re: Magias por level e classe. Dom Abr 10, 2016 11:25 am

BabyLoves

BabyLoves
Administrador

Grato, eu que agradeço a vocês por gostarem do conteúdo que eu trouxe. : ))

https://www.facebook.com/wydKandK/

5Magias por level e classe. Empty Re: Magias por level e classe. Dom Abr 10, 2016 12:56 pm

JackOS

JackOS
Semi-Experiente

Em qualquer versão do EO vai funcionar?

6Magias por level e classe. Empty Re: Magias por level e classe. Dom Abr 10, 2016 1:13 pm

BabyLoves

BabyLoves
Administrador

JackOS escreveu:Em qualquer versão do EO vai funcionar?

Eu testei na 2.XX, 3.XX e alteradas tais como : SkyWyre,Meganium,SEB Engine.
Caso não funcione, expecifique o erro e talvez eu possa lhe ajudar.

Atenciosamente,
BabyLoves D.

https://www.facebook.com/wydKandK/

7Magias por level e classe. Empty Re: Magias por level e classe. Dom Abr 10, 2016 1:39 pm

Zer0

Zer0
Ocasional

Eu gostei, queria que tivesse um tutorial aqui falando mais sobre essa Eclipse Origins, eu procurei na internet, tem uns fóruns meio bagunçados não intendi foi nada kkk.

8Magias por level e classe. Empty Re: Magias por level e classe. Dom Abr 10, 2016 2:19 pm

BabyLoves

BabyLoves
Administrador

Zer0 escreveu:Eu gostei, queria que tivesse um tutorial aqui falando mais sobre essa Eclipse Origins, eu procurei na internet, tem uns fóruns meio bagunçados não intendi foi nada kkk.
Eu aprendi sem tutoriais apenas vendo o que cada função faz, mas, eu irei fazer uma combinação de tutorais e postarei.

Atenciosamente,
BabyLoves D.

https://www.facebook.com/wydKandK/

9Magias por level e classe. Empty Re: Magias por level e classe. Seg Abr 11, 2016 2:48 pm

Flash

Flash
Aventureiro (a)

Olá poderia trocar o codigo por esse : 

Código:
Public Sub CheckGiveSpell(ByVal Index As Long)[size=11][/size]
Dim i As Long[size=11][/size]
Dim n As Long[size=11][/size]
Dim s As Long[size=11][/size]
[size=11][/size]
        ' Check Sucess as Long[size=11][/size]
         If Not IsPlaying(Index) Then Exit Sub[size=11][/size]
[size=11][/size]
    For i = 1 To MAX_SPELLS[size=11][/size]
        If GetPlayerLevel(Index) >= Spell(i).LevelReq Then[size=11][/size]
            If Spell(i).ClassReq = GetPlayerClass(Index) Then[size=11][/size]
            If i > 0 Then[size=11][/size]
            s = FindOpenSpellSlot(Index)[size=11][/size]
              If s > 0 Then[size=11][/size]
                If Not HasSpell(Index, i) Then[size=11][/size]
                    Call SetPlayerSpell(Index, s, i)[size=11][/size]
                    Call PlayerMsg(Index, "Você aprendeu uma nova Magia: " & trim$(Spell(i).Name), White)[size=11][/size]
                    Else[size=11][/size]
                    End If[size=11][/size]
                Else[size=11][/size]
                    Exit Sub[size=11][/size]
                End If[size=11][/size]
            End If[size=11][/size]
          End If[size=11][/size]
        End If[size=11][/size]
    Sub[size=11][/size]
End Nex
Correção das Modificação:
  Sub
End Nex
 Check Sucess as Long
Tudo está ok agora Abraços.

10Magias por level e classe. Empty Re: Magias por level e classe. Seg Abr 11, 2016 7:13 pm

BabyLoves

BabyLoves
Administrador

Flash escreveu:Olá poderia trocar o codigo por esse : 

Código:
Public Sub CheckGiveSpell(ByVal Index As Long)[size=11][/size]
Dim i As Long[size=11][/size]
Dim n As Long[size=11][/size]
Dim s As Long[size=11][/size]
[size=11][/size]
        ' Check Sucess as Long[size=11][/size]
         If Not IsPlaying(Index) Then Exit Sub[size=11][/size]
[size=11][/size]
    For i = 1 To MAX_SPELLS[size=11][/size]
        If GetPlayerLevel(Index) >= Spell(i).LevelReq Then[size=11][/size]
            If Spell(i).ClassReq = GetPlayerClass(Index) Then[size=11][/size]
            If i > 0 Then[size=11][/size]
            s = FindOpenSpellSlot(Index)[size=11][/size]
              If s > 0 Then[size=11][/size]
                If Not HasSpell(Index, i) Then[size=11][/size]
                    Call SetPlayerSpell(Index, s, i)[size=11][/size]
                    Call PlayerMsg(Index, "Você aprendeu uma nova Magia: " & trim$(Spell(i).Name), White)[size=11][/size]
                    Else[size=11][/size]
                    End If[size=11][/size]
                Else[size=11][/size]
                    Exit Sub[size=11][/size]
                End If[size=11][/size]
            End If[size=11][/size]
          End If[size=11][/size]
        End If[size=11][/size]
    Sub[size=11][/size]
End Nex
Correção das Modificação:
  Sub
End Nex
 Check Sucess as Long
Tudo está ok agora Abraços.

Adicionado, grato pela contribuição.

Atenciosamente,
BabyLoves D.

https://www.facebook.com/wydKandK/

Conteúdo patrocinado



Ir para o topo  Mensagem [Página 1 de 1]

ProPixel Fórum » Criação e Desenvolvimento de Jogos » Criação de Jogos em 2D » Outras Engines » Eclipse Origins » Tutoriais » Magias por level e classe.

Permissões neste sub-fórum
Não podes responder a tópicos