JEU -> Réflexion               

2 joueurs alternativement

Ce jeu de réflexion se joue à deux sur une grille composée de huit colonnes et six rangées. À tour de rôle, chaque joueur laisse tomber un pion de sa couleur dans la colonne de son choix. Le but du jeu est d'être le premier à aligner quatre pions de sa couleur, horizontalement, verticalement ou en diagonale, tout en bloquant les tentatives de l'adversaire.

Paru sous forme de listing en pages 1 à 6 dans le classeur "Comment exploiter toutes les ressources et augmenter les performances de votre Amstrad CPC 464/664/6128", Tome 4, Partie 9, Chapitre 3.10, aux Editions WEKA

1) Le programme autorise l'insertion d'un pion dans une colonne déjà entièrement remplie
Ajouter :

1435 IF b=0 THEN LOCATE 1,10:PRINT CHR$(7)"Erreur":PRINT" de":PRINT"saisie":FOR wt=0 TO 2000:NEXT:LOCATE 1,10:PRINT" ":PRINT" ":PRINT" ":GOTO 1390

Ajouter :

1965 b=0

2) Le programme ne gère pas le cas où la grille est entièrement remplie et qu'aucun joueur n'a réussi à aligner quatre pions
Ajouter :

1075 nombreCasesOccupees%=0

Ajouter :

1485 IF gagne=-1 THEN PRINT:PRINT"Partie":PRINT"nulle ":GOTO 1580

Ajouter :

2015 nombreCasesOccupees%=nombreCasesOccupees%+1

Ajouter :

2572 '
2573 'Test grille pleine
2574 '
2575 IF gagne=0 AND nombreCasesOccupees%=48 THEN gagne=-1

3) Le deuxième joueur peut saisir un numéro de colonne en dehors de la plage [1;8]
AVANT :

1870 IF a$<>"" THEN |PBOX,30,155,60,185,0:RETURN

APRES :

1870 IF a$<>"" THEN IF a$<="8" AND a$>="1" THEN |PBOX,30,155,60,185,0:RETURN