Bonjour tout le monde,
Pour ce tutoriel, qui regroupera plusieurs choses mais qui ne serons pas disponible pour le moment.
Prérequis
I°) Ce qu'il vous faut
2°) Ajout du code
3°) Screen
I°) Ce qu'il vous faut :
Alors tout d'abord vous aurez besoin de la DLL de bloodwolff qui est disponible ici et que votre bot puisse se connecter.
2°)Ajout du code :
Alors tout d'abord nous allons voir comment mettre la vie dans la progressbar et affiche lorsque l'on passe la sourie dessus la vie/vie maximum.
Pour cela il vous faudra faire comme ceci:
Ajouter une progressbar la renommé vitaprogress
Je vous montre ma GUI :
Loading Image
Ensuite allez ajouter comme code ceci :
'On delegate la progressbar pour que cela fonctionne
Delegate Sub myvieHandler(ByVal x As String)
Sub myvieproc(ByVal x As String)
vitaprogress.Value = (x)
End Sub
Dim vie_ As New myvieHandler(AddressOf myvieproc)
Delegate Sub myviemaxhandler(ByVal x As String)
Sub myviemaxproc(ByVal x As String)
vitaprogress.ProgressBar.Maximum = (x)
End Sub
Dim viemax_ As New myviemaxhandler(AddressOf myviemaxproc)
Ensuite vous allez ajouter un packet à votre bot qui est : CharacterStatsListMessage
Vous allez faire comme ceci :
Case CharacterStatsListMessage.ProtocolID
Dim Cslm As New CharacterStatsListMessage
Cslm.Deserialize(Content)
Me.vitaprogress.ProgressBar.BeginInvoke(viemax_, Cslm.stats.maxLifePoints.ToString) 'Affichage maximum vie
Me.vitaprogress.ProgressBar.BeginInvoke(vie_, Cslm.stats.lifePoints.ToString) ' Affichage de la vie
Me.vitaprogress.ToolTipText = Cslm.stats.lifePoints.ToString & "/" & Cslm.stats.maxLifePoints.ToString 'Affichage de la vie minimum/maximum
Maintenant lancer le bot et connecter vous, vous devrez avoir comme ceci (voir vidéo)
Vidéo
Voila pour ce 1er tutoriel.
Prochain tutoriel, sa sera sur.. on verra bien ;) je vous souhaite bonne fin de journée