Últimos assuntos
Quem está conectado?
Há 1 usuário online :: 0 registrados, 0 invisíveis e 1 visitante :: 1 motor de buscaNenhum
[ Ver toda a lista ]
O recorde de usuários online foi de 13 em Sex Mar 04, 2022 3:18 am
Top dos mais postadores
| Warrior_Maker |
| |||
| Tayllor |
| |||
| KingSora |
| |||
| ~FullzDied |
| |||
| SynysterGates |
| |||
| NeeTo |
| |||
| Alumary |
| |||
| SameKage |
| |||
| samuel250 |
| |||
| Vitor-DR. |
|
Parceiros
Level Acima do Nome
TutoRPG :: Eclipse Origins :: Programação :: Tutoriais
Página 1 de 1
Level Acima do Nome
por Tayllor Sex Ago 24, 2012 12:41 pm
Estou postando os tutoriais aqui que vou encontrando para ajudar os membros e da mais conteúdo ao forum.
Vamos ao Tutorial
Procure:
Abaixo depois do end sub coloque
Procure:
Abaixo :
Creditos
Eduardo - Fez o tutorial
Tayllor - Postou aqui no forum
Vamos ao Tutorial
Procure:
- Spoiler:
- Public Sub DrawPlayerName(ByVal Index As Long)
Abaixo depois do end sub coloque
- Spoiler:
- Public Sub DrawPlayerlevel(ByVal Index As Long)
Dim TextA As Long
Dim TextB As Long
Dim TextX As Long
Dim TextY As Long
Dim Level As String
Dim color As Long
' If debug mode, handle error then exit out
If Options.Debug = 1 Then On Error GoTo errorhandler
Level = Trim$("Level " & GetPlayerLevel(Index))
' calc pos
TextA = ConvertMapX(GetPlayerX(Index) * PIC_X) + Player(Index).XOffset + (PIC_X \ 2) - getWidth(TexthDC, (Trim$("Level " & GetPlayerLevel(Index))))
If GetPlayerSprite(Index) < 1 Or GetPlayerSprite(Index) > NumCharacters Then
TextB = ConvertMapY(GetPlayerY(Index) * PIC_Y) + Player(Index).YOffset - 5
Else
' Determine location for text
TextB = ConvertMapY(GetPlayerY(Index) * PIC_Y) + Player(Index).YOffset - (DDSD_Character(GetPlayerSprite(Index)).lHeight / 4) + 5
End If
'Draw level
Call DrawText(TexthDC, TextA, TextB, "Level " & GetPlayerLevel(Index), &HFFFF00) ' mude a cor de exibiçao aki &HFFFF00 E.e
' Error handler
Exit Sub
errorhandler:
HandleError "DrawPlayerlevel", "modText", Err.Number, Err.Description, Err.Source, Err.HelpContext
Err.Clear
Exit Sub
End Sub
Procure:
- Spoiler:
- Call DrawPlayerName(i)
Abaixo :
- Spoiler:
- Call DrawPlayerLevel(i)
Creditos
Eduardo - Fez o tutorial
Tayllor - Postou aqui no forum
Tayllor- Admin
- Mensagens : 114
Cash : 5024
Créditos : 9
Data de inscrição : 24/08/2012 -
Tópicos semelhantes» Level ao lado do nome
» Level Maximo 1000
» Como mudar o level max a sua escolha!
» Ao ganhar level,aumentar todos stats em 1
» Level para usar arma e armadura
» Level Maximo 1000
» Como mudar o level max a sua escolha!
» Ao ganhar level,aumentar todos stats em 1
» Level para usar arma e armadura
TutoRPG :: Eclipse Origins :: Programação :: Tutoriais
Página 1 de 1
Permissões neste sub-fórum
Não podes responder a tópicos
» Sistema de Guild (do Eduardo)
» Sistema de Guild
» Teco Fabrica
» Apresentaçao
» Editando nick
» Sistema De Vila
» alguns tilesets
» Tilesets de natureza
» Olá, vim para trazer sistemas e muitas outras coisas
» [Recrutando] Bleach Online Dark Saga
» Dragon Ball Fox
» Tutorial Mapper - Como avaliar um mapa
» Life RPG Maker 2.0
» Fórum decaido
» Dragon Ball Elite
» Auto Ataque por checkbox
» Pokémon Online - Xstrond Games BETA
» Auto Correr Por CheckBox
» Auto Loot para Eclipse Origins
» Ganhar Item em Certo Nivel
» SK - Lógica de Programação - Aula 3
» Distrito Rpg Maker 2.0 no Ar !!
» Sistemas que preciso
» [ALL] Títulos nos NPC's 1.0
» Vídeo Tutorial Mapper Caverna - MMORPG 2D
» Sistema de plantar e colher
» Perfect engine
» O Seu pirata chegou !
» Novidades para tutorpg o que acha?
» [ZIG ZAG GAMES] Age of Dragons
» Me ajudem Pliss
» SK - HTML - Aula 1
» Forum Decaindo
» Meus 3 mapas
» [Apresentação] Okumura-Rin~
» 3 primeiras sprites
» [EEB] Comando para Salvar Seu Game
» [Off] Olha Suas PM Tayllor
» Fabrica da JCG Corp: Technology in designer [Fechada