kero instala esse pet system
http://aldeiarpgbr.forumeiros.com/t940-eo-sistema-de-pet
mais e a primeira vez q mecho em VB :S entao to agarrado nessa parte
http://aldeiarpgbr.forumeiros.com/t940-eo-sistema-de-pet
mais e a primeira vez q mecho em VB :S entao to agarrado nessa parte
Depois de ter feito isso, você precisará criar cinco botões ou etiquetas para acionar cada um dos comandos.
Colocá-los
no menu de opções, ou em qualquer outro menu que você deseja. Depois de
ter criado eles, deve ser algo parecido com isto:
Terá
então a chamar cada um dos procedimentos anteriores para cada uma das
suas respectivas funções. O parâmetro será necessário para passar para
eles será "MyIndex" para cada um.
Finalmente, você precisará adicionar o código abaixo para o fundo do "MapNpcRec" em modTypes:
CÓDIGO:
'Pet Data
IsPet As Byte
PetData As PetRec
Abaixo "Dir As Byte" em PlayerRec, adicione isto:
CÓDIGO:
Pet As PetRec
e adicionar esse tipo personalizado acima PlayerRec:
CÓDIGO:
Public Type PetRec
SpriteNum As Byte
Name As String * 50
Owner As Long
End Type