MMORPG Brasil
Ola, visitante! Agradecemos sua visita, para ter acesso a todo nosso conteúdo recomendamos que faça um cadastro no fórum, com ele você pode participar de tópicos e ter acesso a todas áreas da comunidade!

Participe do fórum, é rápido e fácil

MMORPG Brasil
Ola, visitante! Agradecemos sua visita, para ter acesso a todo nosso conteúdo recomendamos que faça um cadastro no fórum, com ele você pode participar de tópicos e ter acesso a todas áreas da comunidade!
MMORPG Brasil
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

[Tutorial] Quantidade Randômica de Drop

5 participantes

Ir para baixo

[Tutorial] Quantidade Randômica de Drop Empty [Tutorial] Quantidade Randômica de Drop

Mensagem por jonny157 Seg 13 Ago 2012, 17:33

Bom pessoal eu estava estudando a engine e mechendo em algumas coisas consegui fazer algo que pelo menos eu, ainda não vi por aqui. Então resolvi fazer meu primeiro tutorial.

O que o Sistema faz?

R= Vamos dar um exemplo de uma espada. Quando você coloca uma espada para cair de uma criatura e coloca abaixo a quantidade 2. Sempre que o monstro dropar este item, cairá 2 espadas sempre.

Com este sistema você poderá fazer com que tenha a possibilidade de cair 1 ou 2 espadas quanto a criatura der drop. Isto se a quantidade máxima for 2, se for mais irá cair até esta quantidade.

Em alguns jogos por exemplo, temos drops de gold onde a criatura dropa entre 1 á 10 golds, 1 á 15 golds, 1 á 20 golds.. etc..

**Vamos ao Tutorial**

Abra o seu Servidor..

-~Server Side-~

No ModCombat, procure por:

Código:
Public Sub PlayerAttackNpc


Embaixo de:

Código:
Dim Buffer As clsBuffer


Adicione:

Código:
Dim r As Long


Na mesma Sub Procure por:

Código:
n = Int(Rnd * Npc(npcNum).DropChance) + 1


Abaixo disto adicione:

Código:
r = Int(Rnd * Npc(npcNum).DropItemValue) + 1


Mais abaixo onde estiver:

Código:
Call SpawnItem(Npc(npcNum).DropItem, Npc(npcNum).DropItemValue, mapNum, MapNpc(mapNum).Npc(mapNpcNum).x, MapNpc(mapNum).Npc(mapNpcNum).y)


Onde estiver "Npc(npcNum).DropItemValue", troque por r.

Pronto, compile e seja feliz.. ;D



Tutorial bobo, mas concerteza irá ajudar alguém. ^^

Quem quiser dar créditos, tamos ai..rs
jonny157
jonny157
Membro Sênior
Membro Sênior

Mensagens : 406

Ir para o topo Ir para baixo

[Tutorial] Quantidade Randômica de Drop Empty Re: [Tutorial] Quantidade Randômica de Drop

Mensagem por Guardian Seg 13 Ago 2012, 17:51

Este não é um tutorial Bobo parceiro. Smile
Este é um tutorial que parece simples, porém é algo muito eficiente para fazer uma Databse, tanto é que o tenho em meu projeto. tongue
De qualquer forma, Parabéns! É nóis Cool
Guardian
Guardian
Membro de Honra
Membro de Honra

Mensagens : 781

Ir para o topo Ir para baixo

[Tutorial] Quantidade Randômica de Drop Empty Re: [Tutorial] Quantidade Randômica de Drop

Mensagem por Wellington Cortez Seg 13 Ago 2012, 18:20

eI não entendi esta parte

Na mesma Sub Procure por: (entendi)




Código:
n = Int(Rnd * Npc(npcNum).DropChance) + 1



Abaixo disto adicione: (não entendi)




Código:
r = Int(Rnd * Npc(npcNum).DropItemValue) + 1



Mais abaixo onde estiver: (não entendi)




Código:
Call SpawnItem(Npc(npcNum).DropItem, Npc(npcNum).DropItemValue, mapNum, MapNpc(mapNum).Npc(mapNpcNum).x, MapNpc(mapNum).Npc(mapNpcNum
Wellington Cortez
Wellington Cortez
Membro Junior
Membro Junior

Mensagens : 96

Ir para o topo Ir para baixo

[Tutorial] Quantidade Randômica de Drop Empty Re: [Tutorial] Quantidade Randômica de Drop

Mensagem por Guardian Seg 13 Ago 2012, 18:24

Wellington Cortez escreveu:eI não entendi esta parte

Na mesma Sub Procure por: (entendi)




Código:
n = Int(Rnd * Npc(npcNum).DropChance) + 1



Abaixo disto adicione: (não entendi)




Código:
r = Int(Rnd * Npc(npcNum).DropItemValue) + 1



Mais abaixo onde estiver: (não entendi)




Código:
Call SpawnItem(Npc(npcNum).DropItem, Npc(npcNum).DropItemValue, mapNum, MapNpc(mapNum).Npc(mapNpcNum).x, MapNpc(mapNum).Npc(mapNpcNum

O que qui você não entendeu ? Shocked
Abaixo do N = Int(Rnd * Npc(npcNum).DropChance) + 1

Você vai adicionar o r = Int(Rnd * Npc(npcNum).DropItemValue) + 1

E depois procurar por esse código :

Código:
Call SpawnItem(Npc(npcNum).DropItem, Npc(npcNum).DropItemValue, mapNum, MapNpc(mapNum).Npc(mapNpcNum).x, MapNpc(mapNum).Npc

E Substituir o Map(npcnum).DropitemValue por r.

Malz pelos textos grandes, mas é pra você ver o porque da sua dúvida. kkkk'
Guardian
Guardian
Membro de Honra
Membro de Honra

Mensagens : 781

Ir para o topo Ir para baixo

[Tutorial] Quantidade Randômica de Drop Empty Re: [Tutorial] Quantidade Randômica de Drop

Mensagem por Valentine Qua 15 Ago 2012, 11:04

Nossa cara, isso é muito útil, realmente fica chato ficar caindo, por exemplo, sempre 10 golds do monstro

+ 1 crédito
avatar
Valentine
Membro de Honra
Membro de Honra

Mensagens : 472

http://www.aldeiarpgbr.com

Ir para o topo Ir para baixo

[Tutorial] Quantidade Randômica de Drop Empty Re: [Tutorial] Quantidade Randômica de Drop

Mensagem por jonny157 Qua 15 Ago 2012, 18:02

Obrigado Galera!!

Conforme eu vou aprendendo vou ajudar aos outros do mesmo jeito que me ajudaram.. ^^


;D
jonny157
jonny157
Membro Sênior
Membro Sênior

Mensagens : 406

Ir para o topo Ir para baixo

[Tutorial] Quantidade Randômica de Drop Empty Re: [Tutorial] Quantidade Randômica de Drop

Mensagem por Wellington Cortez Qua 15 Ago 2012, 18:55

esquece o que eu disse esqueci de substituir no pc principal hehe ótimo tuto + 1 cred
Wellington Cortez
Wellington Cortez
Membro Junior
Membro Junior

Mensagens : 96

Ir para o topo Ir para baixo

[Tutorial] Quantidade Randômica de Drop Empty Re: [Tutorial] Quantidade Randômica de Drop

Mensagem por Moph Dom 26 Ago 2012, 12:22

Não entendi.. para que seria isso exatamente?
Moph
Moph
Novato
Novato

Mensagens : 20

Ir para o topo Ir para baixo

[Tutorial] Quantidade Randômica de Drop Empty Re: [Tutorial] Quantidade Randômica de Drop

Mensagem por Conteúdo patrocinado


Conteúdo patrocinado


Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

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