Discussion :

[nakwakwak]

Bonjour à tous,
je me suis lancé dans la programmation d'un Snake en pascal, mais je suis bloqué. J'ai fait mes procédures pour que le snake aille dans la direction que je veux avec les paramètres qui vont bien, et ça marche au poil, mais je voudrais pouvoir effectuer mon readkey en même temps qu'une "différence de temps" pour que le snake continue d'avancer en attendant la touche de l'utilisateur. Problème : le readkey me stope l'exécution du programme jusqu'à ce qu'un touche soit pressée, ce qui n'est pas l'effet escompté. Un solution miracle ? Aussi, quel moyen y'a-t-il pour prendre en compte les flèches directionnelles et éviter de devoir utiliser les touches i,l,k et j ?

Question subsidiaire : Y'a-t-il un moyen de faire de la programmation modulaire en pascal ?

Merci d'avance,
Nakwakwak

[Paul TOTH]

le mot clé m'échappe car la mémoire me fait défaut, mais il me semble que Keypressed te permet de savoir si une touche a été appuyée et qu'il faut donc appeler ReadKey pour la lire.

[nakwakwak]

le mot clé m'échappe car la mémoire me fait défaut, mais il me semble que Keypressed te permet de savoir si une touche a été appuyée et qu'il faut donc appeler ReadKey pour la lire.

Merci Paul TOTH . Ça me fait bien du bien !

[EpiTouille]

Quand tu appuis sur une touche, elle va dans une mémoire tampon. Après tu dois utilisé la méthode de PAUL TOTH

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
 
var
  ch : char;
 
begin
 
  repeat
 
    while keypressed do ch := readkey;
 
    case ch of
       (* Gestion de la touche *)
    end;
 
  until ch = #27; (* Touche ECHAP pour quitter *)
 
end.

Le touches directionnelles ont un code ASCII. Je me rappel que les touches haut et bas qui ont les caractères 72 et 80 respectivement. Pour droite et gauche, il faudra que tu fasse une recherche sur google.

Pour l'utilisation des touche directionnelle, tu doit ajouter le préfix # qui fais une conversion du code au caractère, comme utilisé dans mon exemple avec echap.

Si par programmation modulaire tu entends Fonctions et procedures, oui tu peut en faire. Va voir sur la FAQ pascal, tu trouveras tout ce qu'il te faut


Espèrant t'avoir aidé

Titeeee

[Paul TOTH]

attention, certaines touches renvoient 2 code ascii

je ne sais plus lesquelles ceci dit