Distintivo por Nivel de acesso

por **Warrior_Maker** Seg Ago 27, 2012 7:34 pm

[Tens de ter uma conta e sessão iniciada para poderes visualizar esta imagem]

Olá, eu estava estudando um pouquinho, e com a ajuda de um
amigo consegui criar esse sisteminha simples mas que pode dar
ao seu jogo um charme [Tens de ter uma conta e sessão iniciada para poderes visualizar esta imagem]

Vamos ao que interessa, como esse sistema só usa Dx7, iremos trabalhar apenas
com Client ~ Side.
Ao trabalho!

Client ~ Side

No modDirectDraw7 procure por:

Código:: "Public DDS_Bars As DirectDrawSurface7"

Em seguida adicione:

Código:: Public DDS_Coroa As DirectDrawSurface7

Depois procure por:

Código:: Public DDSD_Bars As DDSURFACEDESC2

E adicione embaixo:

Código:: Public DDSD_Coroa As DDSURFACEDESC2

Agora na SubDestroyDirectDraw procure por:

Código:: Set DDS_Target = Nothing ZeroMemory ByVal VarPtr(DDSD_Target), LenB(DDSD_Target)

Em baixo Adicione:

Código:: Set DDS_Coroa = Nothing ZeroMemory ByVal VarPtr(DDSD_Coroa), LenB(DDSD_Coroa)

Em modDirectDraw7 Adicione no Final:

Código:: Public Sub DrawCoroa() Dim Rec As RECT, X as Long, Y as Long If DDS_Coroa Is Nothing Then Call InitDDSurf("coroa", DDSD_Coroa, DDS_Coroa) End If With Rec .Top = 0 .Bottom = DDSD_Coroa.lHeight .Left = 0 .Right = DDSD_Coroa.lWidth End With X = 1 * 32 Y = 1 * 32 Engine_BltFast X, Y, DDS_Coroa, Rec, DDBLTFAST_SRCCOLORKEY End Sub

Na Public Sub BltPlayer(ByVal Index As Long) procure por:

Código:: ' render the actual sprite Call BltSprite(Sprite, x, Y, rec)

Adicione Abaixo esse código:

Código:: If GetPlayerAccess(Index) >= 2 Then If DDS_Coroa Is Nothing Then Call InitDDSurf("coroa", DDSD_Coroa, DDS_Coroa) End If With rec .top = 0 .Bottom = DDSD_Coroa.lWidth .Left = 0 .Right = DDSD_Coroa.lHeight End With Engine_BltFast x + 32, Y - 10, DDS_Coroa, rec, DDBLTFAST_SRCCOLORKEY End If

Agora salve essa esse grafico na pasta
"data files\graphics" da sua engine!

Clique aqui para baixar a imagem!

Pronto! voce tem agora um sistema de distintivo para quem tiver o acesso maior que
o acesso de jogador! divirta-se e nao se esqueça de dar meus creditos se voce gostou [Tens de ter uma conta e sessão iniciada para poderes visualizar esta imagem]

Com esse sistema voce tambem pode modifica-lo para adicionar outros tipos de distintivos
conforme o acesso do jogador, se eu tiver tempo, eu postarei um mais completo e com
suporte até para VIP PLAYERS [Tens de ter uma conta e sessão iniciada para poderes visualizar esta imagem] até a proxima!

Creditos:
twisterbk criador
E a min

por **KingSora** Ter Ago 28, 2012 8:26 am

Esse sistema é bommas tem 1 problema,quando vvc vai pra um mapa maior a coroa não fica no lugar certo.

Distintivo por Nivel de acesso

Distintivo por Nivel de acesso

Re: Distintivo por Nivel de acesso