Le jeu du chat et de la souris

Par

pylaterreur

Mise à jour : 22/08/2008

336 visites depuis 7 jours, dont 14 sur ce chapitre classé 314/786

Voici ce que je vous propose : créer un mini-jeu en utilisant l'écran textuel. Ce sera un jeu "du chat et de la souris" : une souris, représentée par un caractère, se déplacera aléatoirement sans sortir de l'écran, et le chat, un autre caractère, sera contrôlé par le joueur, le but étant de toucher la souris en un nombre minimal de coups. Chaque animal se déplacera d'une case (pas en diagonale), au tour par tour.

Retour en haut

Sommaire du chapitre :

Les outils
Une solution

Retour en haut

Les outils

Que vous faut-il comme fonctions ?

Locate, pour l'affichage des deux animaux
Ran# et Int, pour le déplacement de la souris et pour placer des deux compères au début du jeu
Getkey, pour le déplacement du chat

Retour en haut

Une solution

Voici une solution (ne marche que sur Graph 85 !) :
Code : Autre - Solution du jeu du chat et de la souris

ClrText
0->A~Z
"Int PRan# +1"->fn1
Do
21->P
fn1->A
fn1->C
7->P
fn1->B
fn1->D
LpWhile A=C And B=D
2->P
While 1
Locate A,B," "
A+E->A
B+F->B
Locate A,B,"C"
A=C And B=D=>Break
Do
2(fn1−1.5)->X
fn1
LpWhile Ans=2 And (X+C<1 Or X+C>21) Or Ans=1 And (X+D<1 Or X+D>7) Or C+X(Ans=2)=A And D+X(Ans=1)=B
Locate C,D," "
If Ans-1
Then X+C->C
Else X+D->D
IfEnd
Locate C,D,"S"
Do
Getkey->G
LpWhile Not (G=28 Or G=27 Or G=38 Or G=37)
1+I->I
0->E~F
(G=27 And A<21)−(G=38 And A>1)->E
(G=37 And B<7)−(G=28 And B>1)->F
WhileEnd
ClrText
Locate 1,1,"SOURIS ATTRAPEE EN"
Locate 1,2,I
Locate 1,3,"COUPS"

Retour en haut

Sacrément énervante cette souris :lol:

Retour en haut

Retour en haut

4 commentaires pour "Le jeu du chat et de la souris"

Note moyenne : 3.06 / 4 (18 votes)

Pseudo	Commentaire
Duc Au But	# Posté le 24/03/2009 à 16:12:22
Hey! It compiles! Ship it! Études : INSA Toulouse	Je suis désolé de m'être énervé dans les messages précédents au point d'en mettre juste pour obstruer . Je m'en excuse platement ( d'ailleurs si un admin passe, merci d'effacer tous ces messages inutiles ). Je trouve néanmoins dommage de ne pas avoir mis de correction de ce TP pour les autres modèles de calculatrice, surtout que si même moi y arrive, le problème n'est pas au niveau de l'aptitude à le réaliser sur d'autres calculatrices. Encore désolé et bonne continuation. Some things Man was never meant to know. For everything else, there’s Google.
sd300	# Posté le 02/09/2009 à 12:24:47
	je voulais demander a ceux qui savent ou est ce que je pourrais trouver sur ma calculatrice (graph 65) la touche fn par ce que du coup je ne peut pas faire le TP de la souris. merci beaucoup.
guydunigo	# Posté le 27/04/2011 à 18:47:08
	sd300, il y a écrit ici qu'il n'y a pas cette commande sur les graph 65 En ce moment, je lis le livre sur le langage C. J'ai étudié et je me perfectionne dans le BASIC CASIO ; Quand j'aurais le temps : Gimp ainsi que Blender et Python
fanfan54siteduzero	# Posté le 03/03/2012 à 13:56:57
L'informatique, c'est facile ! Avis : Décevant	Mais il est nul ce TP ! Il n'y a presque rien ! Je trouve qu'il n'est pas du tout détaillé. fanfan54siteduzero - L'informatique, c'est facile, vous verrez !