Comment puis-je effectuer un compteur ?

En voilà un petit ... qui risque bien de ne te servir à rien, parce que je ne sais pas ce que tu veux en faire de ton compteur !

**************Petit compteur ***********

pour compteur :n

ec :n
compteur :n + 1

fin

****************************************

Le principe du compteur est de prendre un nombre puis de l'augmenter (incrementer) de 1 ; un compte à rebours décrémente de 1.
Logo étant un langage naturel, tu construis ta procédure tout naturellement à partir de la définition donnée :

**************Petit compteur ***********

Pour compteur :nombre

ecris :nombre
compteur :nombre + 1

fin

****************************************

Voici une petite procédure "démo".
Imagine que tu comptes jusqu'à 10 pour effectuer une action (ici on écrit simplement DEPART).
Mais tu peux remplacer ec [DEPART] par le nom d'une autre procédure que tu désires lancer.

**************Petit compteur ***********

pour compteur :n

fcouleurtexte 0 insere car 32 rc
fcouleurtexte 14 ec :n
attends 10
sisinon :n = 10 [vt ec [DEPART]] [vt compteur :n + 1]

fin

****************************************