Discussion :

[Diesel1405]

Bonjour, je bosse actuellement sur un petit jeu 2D et je cherche désespérement à faire un switch dans la selection d'un objet de mon inventaire.
Mon souhait est qu'en appuyant sur la touche S un objet aléatoire de mon inventaire de type ARME soit séléctionné.
Je parviens avec ce bout de code à armé mon personnage mais il s'agit toujous du premier objet de l'inventaire de type arme.
J'aimerai que si dans mon inventaire j'ai plusieurs objets de type arme en appuyant sur la touche S je passe automatiquement au suivant.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
If KeyCode = vbKeyS Then
For i = 1 To MAX_INVENTAIRE
If GetPlayerInvItemNumero(MyIndex, i) > 0 And GetPlayerInvItemNumero(MyIndex, i) <= MAX_OBJET Then
If item(GetPlayerInvItemNumero(MyIndex, i)).Type = ITEM_TYPE_ARME Then
Call SendUseItem(i)
Exit Sub
End If
End If
Next i
End If

Quelqu'un a une idée ?
merci

[ProgElecT]

Salut

Il nous manque le code de la procédure SendUseItem(i).
Il faudrait faire un tirage au sort (Rnd peut être aussi passer un Randomize et comparer avec l'index de l'objet de type arme a changer.

[skysool]

Exact RND serait la solution

[Diesel1405]

JE n'ai pas réussi

[Diesel1405]

Faire un tirage au sort ne m'arrange pas.
Je souhaite que le prochain item soit équipé et non aléatoirement

[ProgElecT]

Re

VOTRE CODE s'il vous plait.

[Diesel1405]

Re,

voici le code à noter qu'il y a un client et un serveur pour le jeu.
le client execute SendUseItem sur le serveur dont voici le code.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

[Diesel1405]

ProgElecT je vous ai simplifié mon code, merci de l'aide que vous pourrez m'apporter