LABYRINTHE
cyrianox
Messages postés
17
Date d'inscription
samedi 9 février 2002
Statut
Membre
Dernière intervention
8 avril 2005
-
29 nov. 2002 à 04:38
DaRkViRuS Messages postés 2 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 5 avril 2004 - 5 avril 2004 à 18:27
DaRkViRuS Messages postés 2 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 5 avril 2004 - 5 avril 2004 à 18:27
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/5202-labyrinthe
https://codes-sources.commentcamarche.net/source/5202-labyrinthe
5 avril 2004 à 18:27
5 avril 2004 à 18:27
4 juin 2003 à 13:23
Le code provient d'un cachier. Mais j'ai fait ça dans un cours, et le prof nous faisait deviner le code. Elle nous a expliqué le principe de la matrice. Et voilà j'ai deviné le code, je l'ai fait. Et le prof m'a expliqué où je pourrais rendre ça plus clair etc... Le code je crois provient de moi. Je crois que l'important c'est que le monde puisse en profiter.
4 juin 2003 à 04:10
29 nov. 2002 à 23:35
Miko500: Ben oui, mais j'adore ça, mes parents me disent toujours de lâcher l'ordinateur... mais c'est rare que je les écoute et j'y vais le soir héhé... bon tranche de vie, je vais agrandir les niveaux du labyrinthe et essayer de faire une mise à jour.. on verra :P
Ceux qui voudrait me contacter par MSN Messenger ou par courriel tout simplement: yawa14@free.fr
Bonne fin de soirée !
29 nov. 2002 à 15:58
à+
29 nov. 2002 à 14:10
Darksidious: Je crois que je vais agrandir les niveaux et en ajouter des mises à jour quand j'aurai terminé. J'ajouterai aussi des méchants et autres...
Moustachu: Merci ^^
SibosisITS: C'est vrai quand même qu'on pourrait regrouper haut et bas ensemble.. j'y avais pas pensé... je vais peut-être modifier le codage de la prochaine version de cette méthode. Merci ^^
Miko500: Ça fait environ 1 an et demi que je programme en VB. Ça fait plusieurs mois que je viens sur VBFrance, mais je ne me suis jamais inscrit ni posté des sources et commentaires. Tu vas voir, avec le temps, ça va venir ! (pense que moi, à 7 ans, je savais naviguer sur internet donc ça fait longtemps que je connais les ordinateurs et je suis assez bon, sans vouloir me vanter !)
Merci à tous.
Je répondrai à tous les autres commentaires s'ils se postent.
Yawa
29 nov. 2002 à 12:37
29 nov. 2002 à 12:09
Le code pourrait être un peu condensé (tout en conservant sa clarté). Les fonctions 'haut' et 'bas' d'une part, 'gauche' et 'droite' d'autre part pourraient être réunies en une, en passant un argument à la procédure lui indiquant la direction :
Public Sub gauchedroite(D as Integer) 'D=-1 pour gauche, D=1 pour droite
' Quand l'utilisateur a appuyé sur la touche gauche ou droite...
If Colonne + D > 8 or Colonne + D < 1 Then Beep: Exit Sub
If Planche(Ligne, Colonne + D) <> 1 Then
For J = 1 To 8
DsnBonhomme.Left = DsnBonhomme.Left + D * (480 / 8)
Sleep 30 ' Effet de glissement (voir module)
Next J
Colonne = Colonne + D
End If
End Sub
Public Sub hautbas(D as Integer) 'D=-1 pour haut, D=1 pour bas
' Quand l'utilisateur a appuyé sur la touche haut...
If (Ligne + D) < 1 Or (Ligne + D) > 8 Then Beep: Exit Sub
If Planche(Ligne + D, Colonne) <> 1 Then
For J = 1 To 8
DsnBonhomme.Top = DsnBonhomme.Top + D * (480 / 8)
Sleep 30 ' Effet de glissement (voir module)
Next J
Ligne = Ligne + D
End If
End Sub
Ainsi, dans la fonction keydown, on remplace :
'haut' par 'hautbas -1'
'bas' par 'hautbas 1'
'gauche' par 'gauchedroite -1'
'droite' par 'gauche droite 1'
Même si le 'Copier-Coller' fonctionne très bien - et on aurait tort de s'en priver ;) -, ce genre de regroupements peut s'avérer pratique pour le débogage : Ici, s'il y a une erreur, on n'aura à la corriger qu'une fois au lieu de deux...
(: Sibo ;)
29 nov. 2002 à 09:29
Blagues à part ce n'est pas fréquent de voir un code propre alors 9/10 également
moustachu
29 nov. 2002 à 06:35
DARK SIDIOUS
29 nov. 2002 à 04:41
Ça fait toujours plaisir d'avoir des commentaires comme ceux-ci !
Yawa
29 nov. 2002 à 04:38
code clair et simple; prévu pour être évolué.
Félicitations, à 14ans, j'étais loin de savoir faire ça :)