Quelques astuces avant de commencer
Contents
1. 3 Getkey gt B LpWhile B 0 Fin 3 Le programme tourne en boucle tant qu une touche n est appuy e 0 Mettre un 0 tout seul attribue la valeur 0 Ans qui est une variable temporaire B 72 gt 1 B 62 gt 2 B 52 gt 3 Les deux points fonctionnent comme des retours la ligne B 73 gt 4 B 63 gt 5 B 53 gt 6 ils permettent de condenser le code PRGM F6 F5 B 74 gt 7 B 64 gt 8 B 54 gt 9 Lphile Ans 0 Fin 2 Si Ans 0 cela veut dire que la touche appuy e n est pas valide Sup primez cette v rification et votre programme s arr tera cause d une erreur de calcul LE CODE DU PRO GRA MME CONTINUE SUR LA PA GE SUIVANTE Par Thomas GAIGNAGE pour la page facebook Casio Calculatrices Sauf mention contraire toutes les images proviennent d une Graph 85 SD v2 01 l aide de l utilitaire Screen Receiver de Casio Ans gt B 1 nt B 1 3 gt E 1 3Frac B 1 3 gt F If Mat A E F 0 0n v rifie que la case soit vide 0 Then l Mat A E F Isz Z On incr mente le compteur de cases prises de 1 If 1 1 0n affiche le symbole correspondant au joueur dans la case Then Locate 7 2F 6 E O Else Locate 7 2F 6 E X lfEnd JH Isz J On incr mente de 1 le num ro du joueur 12 3 J 3 gt 1 J Si le num ro du joueur vaut 3 alors c est au tour du joueur 1 31 lfEnd VERIFICATION SI UN JOUEUR A GAGNE 0 gt G Si G 0 aucun joueur a gagn le cas contraire pour G 1 For2. 1 gt BTo3 Lignes horizontales Mat A B 1 gt Mat A B 1 Mat A B 2 And Mat A B 1 Mat A B 3 gt 1 gt G Next For 1 gt BTo3 Lignes verticales Mat A 1 B gt Mat A 1 B Mat A 2 B And Mat A 1 B Mat A 3 B gt 1 gt G Next Mat A 2 2 gt Mat A 1 1 Mat A 2 2 And Mat A 1 1 Mat A 3 3 Or Mat A 1 3 Mat A 2 2 And Mat A 1 3 Mat A 3 1 gt 1 gt G Les deux diagonales LpWhile G 0 And Z lt 9 Fin 1 Si un joueur a gagn G 1 ou si toutes les cases sont prises Z 9 alors la partie est termin e MESSAGE DE FIN DE PARTIE If G 1 Then Locate 1 7 Le joueur 3 espaces a gagne Locate 11 7 H Else Locate 1 7 5 espaces Match nul IfEnd A part le syst me de v rification des lignes si vous avez bien suivi le cours vous ne devriez pas avoir rencontr de grosses difficult s La semaine prochaine nous aborderons les chaines de caract res appel es String en anglais gr auxquelles vous pourrez manipuler les mots et d autres utilisations plus puissantes Par Thomas GAIGNAGE pour la page facebook Casio Calculatrices Sauf mention contraire toutes les images proviennent d une Graph 85 SD v2 01 l aide de l utilitaire Screen Receiver de Casio
3. onglet JUMP car elles permettent d effectuer un saut selon une condition bien pr cise Le morpion Vous connaissez tous le jeu du morpion o deux joueurs s affrontent sur une grille de 3 3 cases et doivent aligner 3 croix ou 3 ronds Le syst me de v rification des cases sera la partie la plus difficile Lorsque vous aurez termin continuez sur la page suivante pour une proposition de correction Par Thomas GAIGNAGE pour la page facebook Casio Calculatrices Sauf mention contraire toutes les images proviennent d une Graph 85 SD v2 01 l aide de l utilitaire Screen Receiver de Casio MENU DU DEBUT LE JOUEUR 1 CHOISIT 1 Les ronds O 2 Les croix X Do Getkey LpWhile Ansz72 And Ansz62 Tant que 1 ou 2 n est pas appuy e le programme tourne en boucle Si une autre touche est appuy e la boucle continue car la condition est vraie INITIALISATION DE LA PARTIE If Ans 72 0n stocke qui prend les ronds et les croix Then 1 2 List 1 Else 2 1 list 1 IfEnd 0 Z Initialisation du compteur de cases prises 1 3 3 Dim Mat A Initialisation de la grille du morpion PREPRATION DE L ECRAN DE JEU CirText MORPION Locate 9 3 7 8 9 Locate 9 4 45 6 Locate 9 3 1 2 3 Locate 1 7 Joueur 3 espaces Do 1 Locate 8 7 J 0n affiche qui est le tour List 1 J 1 If 1 1 Then Locate 11 7 O Else Locate 11 7 X IfEnd LA PARTIE Do 2 Do
4. Le Plus ou Moins est un peu simple vous ne trouvez pas Montons la difficult d un cran Quelques astuces avant de commencer Le Getkey Pour l instant nous ne connaissons qu un seul moyen pour communiquer avec l utilisateur la fonction Cependant elle n est ni tr s pratique ni tr s esth tique car son appel d cale le texte vers le haut Heureusement il est possible de d tecter quelle touche est appuy e via Getkey SHIFT VARS PRGM puis F6 F4 1 0 F2 Gtky Do Getkey gt B LpWhile B 0 Si aucune touche n est appuy e Getkey renvoie 0 l image ci contre donne les valeurs de touches Remarquez que AC ON n a pas de valeur car elle permet d interrompre le programme Par exemple si j appuie sur 0 Getkey renvoie 71 et 48 pour MENU Je vous d conseille vivement de mettre le Getkey toute seule dans la boucle vous gagnerez en r activit Je vois trop souvent ce genre de code dans les programmes Do Getkey gt B If B 71 Then IfEnd If B 72 Then IfEnd plusieurs lignes plus loin LpWhile B47 GDQD D pogga prog EIC EN Ean Dom E DAEA EnEn Source Manuel d utilisateur Calculatrices Casio Isolez au maximum vos Getkey de tous calculs inutiles Certes vous perdez quelques octets mais les gains en vitesse d ex cution du programme sont importants Do Do Getkey gt B LpWhile B 0 votre code LpWhile B47 Par Thomas GAIGNAGE pour la page fac
5. ebook Casio Calculatrices Sauf mention contraire toutes les images proviennent d une Graph 85 SD v2 01 l aide de l utilitaire Screen Receiver de Casio All gez vos conditions sss MURPIUN Dans l onglet PRGM puis JUMP F3 vous avez ce qu on appelle la double fl che Elle agit comme un If mais ne peut avoir qu une seule action D Les Graph 100 et USB n ont pas cette double fl che dans leur menu m me si elles savent l interpr ter On peut la r cup rer d un programme et avec le copier coller CTRL F1 Copy puis CTRL F2 Paste Les deux codes suivants ont le m me effet mais l un est plus l ger en m moire If A 1 Then 3 gt B IfEnd A 1 gt 3 gt B Isz et Dsz incr mentez ou d cr mentez facilement Une derni re petite astuce les fonctions Isz et Dsz La premi re incr mente de 1 la variable l autre d cr mente de 1 Ces fonctions sont disponibles dans l onglet PRGM puis F3 JUMP 1 gt B While B lt 100 Isz B Locate 1 1 B While End Mais comme rien n est simple Isz et Dsz ont une fonction cach e si la variable vaut O apr s l incr mentation ou la d cr mentation la ligne suivante est ignor e Faites bien attention cette particularit c est une source r currente d erreurs 1 B Dsz B BONJOUR AU REVOIR BONJOUR ne s affichera pas l cran D ailleurs vous comprenez maintenant pourquoi elles se trouvent dans l
Download Pdf Manuals
Related Search